2001-07-11 H.J. Lu <hjl@gnu.org>
[deliverable/binutils-gdb.git] / libiberty / basename.c
... / ...
CommitLineData
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
This page took 0.023572 seconds and 4 git commands to generate.