basename.c revision 77298
1/* Return the basename of a pathname. 2 This file is in the public domain. */ 3 4/* 5NAME 6 basename -- return pointer to last component of a pathname 7 8SYNOPSIS 9 char *basename (const char *name) 10 11DESCRIPTION 12 Given a pointer to a string containing a typical pathname 13 (/usr/src/cmd/ls/ls.c for example), returns a pointer to the 14 last component of the pathname ("ls.c" in this case). 15 16BUGS 17 Presumes a UNIX or DOS/Windows style path with UNIX or DOS/Windows 18 style separators. 19*/ 20 21#include "ansidecl.h" 22#include "libiberty.h" 23#include "safe-ctype.h" 24 25#ifndef DIR_SEPARATOR 26#define DIR_SEPARATOR '/' 27#endif 28 29#if defined (_WIN32) || defined (__MSDOS__) || defined (__DJGPP__) || \ 30 defined (__OS2__) 31#define HAVE_DOS_BASED_FILE_SYSTEM 32#ifndef DIR_SEPARATOR_2 33#define DIR_SEPARATOR_2 '\\' 34#endif 35#endif 36 37/* Define IS_DIR_SEPARATOR. */ 38#ifndef DIR_SEPARATOR_2 39# define IS_DIR_SEPARATOR(ch) ((ch) == DIR_SEPARATOR) 40#else /* DIR_SEPARATOR_2 */ 41# define IS_DIR_SEPARATOR(ch) \ 42 (((ch) == DIR_SEPARATOR) || ((ch) == DIR_SEPARATOR_2)) 43#endif /* DIR_SEPARATOR_2 */ 44 45char * 46basename (name) 47 const char *name; 48{ 49 const char *base; 50 51#if defined (HAVE_DOS_BASED_FILE_SYSTEM) 52 /* Skip over the disk name in MSDOS pathnames. */ 53 if (ISALPHA (name[0]) && name[1] == ':') 54 name += 2; 55#endif 56 57 for (base = name; *name; name++) 58 { 59 if (IS_DIR_SEPARATOR (*name)) 60 { 61 base = name + 1; 62 } 63 } 64 return (char *) base; 65} 66 67