xref: /freebsd/contrib/diff/lib/basename.c (revision faf25f48d601ae39f5752602f3020e2e92605625)
1 /* basename.c -- return the last element in a path
2 
3    Copyright (C) 1990, 1998, 1999, 2000, 2001, 2003 Free Software
4    Foundation, Inc.
5 
6    This program is free software; you can redistribute it and/or modify
7    it under the terms of the GNU General Public License as published by
8    the Free Software Foundation; either version 2, or (at your option)
9    any later version.
10 
11    This program is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14    GNU General Public License for more details.
15 
16    You should have received a copy of the GNU General Public License
17    along with this program; if not, write to the Free Software Foundation,
18    Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
19 
20 #if HAVE_CONFIG_H
21 # include <config.h>
22 #endif
23 
24 #include "dirname.h"
25 #include <string.h>
26 
27 /* In general, we can't use the builtin `basename' function if available,
28    since it has different meanings in different environments.
29    In some environments the builtin `basename' modifies its argument.
30 
31    Return the address of the last file name component of NAME.  If
32    NAME has no file name components because it is all slashes, return
33    NAME if it is empty, the address of its last slash otherwise.  */
34 
35 char *
36 base_name (char const *name)
37 {
38   char const *base = name + FILESYSTEM_PREFIX_LEN (name);
39   char const *p;
40 
41   for (p = base; *p; p++)
42     {
43       if (ISSLASH (*p))
44 	{
45 	  /* Treat multiple adjacent slashes like a single slash.  */
46 	  do p++;
47 	  while (ISSLASH (*p));
48 
49 	  /* If the file name ends in slash, use the trailing slash as
50 	     the basename if no non-slashes have been found.  */
51 	  if (! *p)
52 	    {
53 	      if (ISSLASH (*base))
54 		base = p - 1;
55 	      break;
56 	    }
57 
58 	  /* *P is a non-slash preceded by a slash.  */
59 	  base = p;
60 	}
61     }
62 
63   return (char *) base;
64 }
65 
66 /* Return the length of of the basename NAME.  Typically NAME is the
67    value returned by base_name.  Act like strlen (NAME), except omit
68    redundant trailing slashes.  */
69 
70 size_t
71 base_len (char const *name)
72 {
73   size_t len;
74 
75   for (len = strlen (name);  1 < len && ISSLASH (name[len - 1]);  len--)
76     continue;
77 
78   return len;
79 }
80