|  | /* Return the basename of a pathname. | 
|  | This file is in the public domain. */ | 
|  |  | 
|  | /* | 
|  |  | 
|  | @deftypefn Supplemental char* basename (const char *@var{name}) | 
|  |  | 
|  | Returns a pointer to the last component of pathname @var{name}. | 
|  | Behavior is undefined if the pathname ends in a directory separator. | 
|  |  | 
|  | @end deftypefn | 
|  |  | 
|  | */ | 
|  |  | 
|  | #ifdef HAVE_CONFIG_H | 
|  | #include "config.h" | 
|  | #endif | 
|  | #include "ansidecl.h" | 
|  | #include "libiberty.h" | 
|  | #include "safe-ctype.h" | 
|  |  | 
|  | #ifndef DIR_SEPARATOR | 
|  | #define DIR_SEPARATOR '/' | 
|  | #endif | 
|  |  | 
|  | #if defined (_WIN32) || defined (__MSDOS__) || defined (__DJGPP__) || \ | 
|  | defined (__OS2__) | 
|  | #define HAVE_DOS_BASED_FILE_SYSTEM | 
|  | #ifndef DIR_SEPARATOR_2 | 
|  | #define DIR_SEPARATOR_2 '\\' | 
|  | #endif | 
|  | #endif | 
|  |  | 
|  | /* Define IS_DIR_SEPARATOR.  */ | 
|  | #ifndef DIR_SEPARATOR_2 | 
|  | # define IS_DIR_SEPARATOR(ch) ((ch) == DIR_SEPARATOR) | 
|  | #else /* DIR_SEPARATOR_2 */ | 
|  | # define IS_DIR_SEPARATOR(ch) \ | 
|  | (((ch) == DIR_SEPARATOR) || ((ch) == DIR_SEPARATOR_2)) | 
|  | #endif /* DIR_SEPARATOR_2 */ | 
|  |  | 
|  | char * | 
|  | basename (const char *name) | 
|  | { | 
|  | const char *base; | 
|  |  | 
|  | #if defined (HAVE_DOS_BASED_FILE_SYSTEM) | 
|  | /* Skip over the disk name in MSDOS pathnames. */ | 
|  | if (ISALPHA (name[0]) && name[1] == ':') | 
|  | name += 2; | 
|  | #endif | 
|  |  | 
|  | for (base = name; *name; name++) | 
|  | { | 
|  | if (IS_DIR_SEPARATOR (*name)) | 
|  | { | 
|  | base = name + 1; | 
|  | } | 
|  | } | 
|  | return (char *) base; | 
|  | } | 
|  |  |