|
0
|
1 /* Return the basename of a pathname.
|
|
|
2 This file is in the public domain. */
|
|
|
3
|
|
|
4 /*
|
|
|
5
|
|
|
6 @deftypefn Supplemental char* basename (const char *@var{name})
|
|
|
7
|
|
|
8 Returns a pointer to the last component of pathname @var{name}.
|
|
|
9 Behavior is undefined if the pathname ends in a directory separator.
|
|
|
10
|
|
|
11 @end deftypefn
|
|
|
12
|
|
|
13 */
|
|
|
14
|
|
|
15 #ifdef HAVE_CONFIG_H
|
|
|
16 #include "config.h"
|
|
|
17 #endif
|
|
|
18 #include "ansidecl.h"
|
|
|
19 #include "libiberty.h"
|
|
|
20 #include "safe-ctype.h"
|
|
|
21
|
|
|
22 #ifndef DIR_SEPARATOR
|
|
|
23 #define DIR_SEPARATOR '/'
|
|
|
24 #endif
|
|
|
25
|
|
|
26 #if defined (_WIN32) || defined (__MSDOS__) || defined (__DJGPP__) || \
|
|
|
27 defined (__OS2__)
|
|
|
28 #define HAVE_DOS_BASED_FILE_SYSTEM
|
|
|
29 #ifndef DIR_SEPARATOR_2
|
|
|
30 #define DIR_SEPARATOR_2 '\\'
|
|
|
31 #endif
|
|
|
32 #endif
|
|
|
33
|
|
|
34 /* Define IS_DIR_SEPARATOR. */
|
|
|
35 #ifndef DIR_SEPARATOR_2
|
|
|
36 # define IS_DIR_SEPARATOR(ch) ((ch) == DIR_SEPARATOR)
|
|
|
37 #else /* DIR_SEPARATOR_2 */
|
|
|
38 # define IS_DIR_SEPARATOR(ch) \
|
|
|
39 (((ch) == DIR_SEPARATOR) || ((ch) == DIR_SEPARATOR_2))
|
|
|
40 #endif /* DIR_SEPARATOR_2 */
|
|
|
41
|
|
|
42 char *
|
|
|
43 basename (const char *name)
|
|
|
44 {
|
|
|
45 const char *base;
|
|
|
46
|
|
|
47 #if defined (HAVE_DOS_BASED_FILE_SYSTEM)
|
|
|
48 /* Skip over the disk name in MSDOS pathnames. */
|
|
|
49 if (ISALPHA (name[0]) && name[1] == ':')
|
|
|
50 name += 2;
|
|
|
51 #endif
|
|
|
52
|
|
|
53 for (base = name; *name; name++)
|
|
|
54 {
|
|
|
55 if (IS_DIR_SEPARATOR (*name))
|
|
|
56 {
|
|
|
57 base = name + 1;
|
|
|
58 }
|
|
|
59 }
|
|
|
60 return (char *) base;
|
|
|
61 }
|
|
|
62
|
