compiler/clib/basename.c

   1 /*
   2     Copyright © 2004, The AROS Development Team. All rights reserved.
   3     $Id$
   4
   5     POSIX function basename().
   6 */
   7
   8 #include "__upath.h"
   9
  10 #define DEBUG 1
  11 #include <aros/debug.h>
  12
  13 char *basename(char *filename)
  14 {
  15     char *uname;
  16     char *pos;
  17
  18     if (!filename || *filename == '\0')
  19     {
  20         D(bug("basename()=.\n"));
  21         return ".";
  22     }
  23
  24     uname = (char *)__path_a2u(filename);
  25
  26     pos = uname;
  27
  28     if (pos[0] == '/' && pos[1] == '\0')
  29     {
  30         D(bug("basename(/)=/\n"));
  31         return uname;
  32     }
  33
  34     D(bug("basename(%s)=", filename));
  35
  36     pos = uname + strlen(uname);
  37     while (pos[-1] == '/')
  38     {
  39         --pos;
  40         pos[0] = '\0';
  41     }
  42     while (--pos > uname)
  43     {
  44         if (pos[0] == '/')
  45         {
  46             uname = ++pos;
  47             break;
  48         }
  49     }
  50
  51     D(bug("%s\n", uname));
  52     return uname;
  53 }
  54