libc/string/__xpg_basename.c

   1 /*
   2  * Copyright (C) 2002     Manuel Novoa III
   3  * Copyright (C) 2000-2005 Erik Andersen <andersen@uclibc.org>
   4  *
   5  * Licensed under the LGPL v2.1, see the file COPYING.LIB in this tarball.
   6  */
   7
   8 #include <libgen.h>
   9
  10 char *__xpg_basename(register char *path)
  11 {
  12         static const char null_or_empty[] = ".";
  13         char *first;
  14         register char *last;
  15
  16         first = (char *) null_or_empty;
  17
  18         if (path && *path) {
  19                 first = path;
  20                 last = path - 1;
  21
  22                 do {
  23                         if ((*path != '/') && (path > ++last)) {
  24                                 last = first = path;
  25                         }
  26                 } while (*++path);
  27
  28                 if (*first == '/') {
  29                         last = first;
  30                 }
  31                 last[1] = 0;
  32         }
  33
  34         return first;
  35 }
  36 #ifndef __USE_GNU
  37 # undef basename
  38 weak_alias(__xpg_basename,basename)
  39 #endif