gen/FreeBSD/basename.c

   1 /*
   2  * Copyright (c) 1997 Todd C. Miller <Todd.Miller@courtesan.com>
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  * 3. The name of the author may not be used to endorse or promote products
  14  *    derived from this software without specific prior written permission.
  15  *
  16  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
  17  * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
  18  * AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL
  19  * THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
  20  * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
  21  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
  22  * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
  23  * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
  24  * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
  25  * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  26  */
  27
  28 #if 0
  29 #ifndef lint
  30 static char rcsid[] = "$OpenBSD: basename.c,v 1.4 1999/05/30 17:10:30 espie Exp $";
  31 #endif /* not lint */
  32 #endif
  33 #include <sys/cdefs.h>
  34 __FBSDID("$FreeBSD: src/lib/libc/gen/basename.c,v 1.7 2002/12/30 01:41:14 marcel Exp $");
  35
  36 #include <errno.h>
  37 #include <libgen.h>
  38 #include <stdlib.h>
  39 #include <string.h>
  40 #include <sys/param.h>
  41
  42 char *
  43 basename_r(const char *path, char *bname)
  44 {
  45         const char *endp, *startp;
  46         size_t len;
  47
  48         /* Empty or NULL string gets treated as "." */
  49         if (path == NULL || *path == '\0') {
  50                 bname[0] = '.';
  51                 bname[1] = '\0';
  52                 return (bname);
  53         }
  54
  55         /* Strip any trailing slashes */
  56         endp = path + strlen(path) - 1;
  57         while (endp > path && *endp == '/')
  58                 endp--;
  59
  60         /* All slashes becomes "/" */
  61         if (endp == path && *endp == '/') {
  62                 bname[0] = '/';
  63                 bname[1] = '\0';
  64                 return (bname);
  65         }
  66
  67         /* Find the start of the base */
  68         startp = endp;
  69         while (startp > path && *(startp - 1) != '/')
  70                 startp--;
  71
  72         len = endp - startp + 1;
  73         if (len >= MAXPATHLEN) {
  74                 errno = ENAMETOOLONG;
  75                 return (NULL);
  76         }
  77         memcpy(bname, startp, len);
  78         bname[len] = '\0';
  79         return (bname);
  80 }
  81
  82 #if __DARWIN_UNIX03
  83 #define const /**/
  84 #endif
  85
  86 char *
  87 basename(const char *path)
  88 {
  89         static char *bname = NULL;
  90
  91         if (bname == NULL) {
  92                 bname = (char *)malloc(MAXPATHLEN);
  93                 if (bname == NULL)
  94                         return (NULL);
  95         }
  96         return (basename_r(path, bname));
  97 }