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