~ubuntu-branches/ubuntu/quantal/gclcvs/quantal

« back to all changes in this revision

Viewing changes to binutils/libiberty/basename.c

  • Committer: Bazaar Package Importer
  • Author(s): Camm Maguire
  • Date: 2004-06-24 15:13:46 UTC
  • Revision ID: james.westby@ubuntu.com-20040624151346-xh0xaaktyyp7aorc
Tags: 2.7.0-26
C_GC_OFFSET is 2 on m68k-linux

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
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
#include "ansidecl.h"
 
16
#include "libiberty.h"
 
17
#include "safe-ctype.h"
 
18
 
 
19
#ifndef DIR_SEPARATOR
 
20
#define DIR_SEPARATOR '/'
 
21
#endif
 
22
 
 
23
#if defined (_WIN32) || defined (__MSDOS__) || defined (__DJGPP__) || \
 
24
  defined (__OS2__)
 
25
#define HAVE_DOS_BASED_FILE_SYSTEM
 
26
#ifndef DIR_SEPARATOR_2 
 
27
#define DIR_SEPARATOR_2 '\\'
 
28
#endif
 
29
#endif
 
30
 
 
31
/* Define IS_DIR_SEPARATOR.  */
 
32
#ifndef DIR_SEPARATOR_2
 
33
# define IS_DIR_SEPARATOR(ch) ((ch) == DIR_SEPARATOR)
 
34
#else /* DIR_SEPARATOR_2 */
 
35
# define IS_DIR_SEPARATOR(ch) \
 
36
        (((ch) == DIR_SEPARATOR) || ((ch) == DIR_SEPARATOR_2))
 
37
#endif /* DIR_SEPARATOR_2 */
 
38
 
 
39
char *
 
40
basename (name)
 
41
     const char *name;
 
42
{
 
43
  const char *base;
 
44
 
 
45
#if defined (HAVE_DOS_BASED_FILE_SYSTEM)
 
46
  /* Skip over the disk name in MSDOS pathnames. */
 
47
  if (ISALPHA (name[0]) && name[1] == ':') 
 
48
    name += 2;
 
49
#endif
 
50
 
 
51
  for (base = name; *name; name++)
 
52
    {
 
53
      if (IS_DIR_SEPARATOR (*name))
 
54
        {
 
55
          base = name + 1;
 
56
        }
 
57
    }
 
58
  return (char *) base;
 
59
}
 
60