crypto/openssh-3.8.1p1/openbsd-compat/basename.c

   1 /* OPENBSD ORIGINAL: lib/libc/gen/basename.c */
   2
   3 /*      $OpenBSD: basename.c,v 1.11 2003/06/17 21:56:23 millert Exp $   */
   4
   5 /*
   6  * Copyright (c) 1997 Todd C. Miller <Todd.Miller@courtesan.com>
   7  *
   8  * Permission to use, copy, modify, and distribute this software for any
   9  * purpose with or without fee is hereby granted, provided that the above
  10  * copyright notice and this permission notice appear in all copies.
  11  *
  12  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
  13  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
  14  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
  15  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
  16  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
  17  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
  18  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  19  */
  20
  21 #include "includes.h"
  22 #ifndef HAVE_BASENAME
  23
  24 #ifndef lint
  25 static char rcsid[] = "$OpenBSD: basename.c,v 1.11 2003/06/17 21:56:23 millert Exp $";
  26 #endif /* not lint */
  27
  28 char *
  29 basename(const char *path)
  30 {
  31         static char bname[MAXPATHLEN];
  32         register const char *endp, *startp;
  33
  34         /* Empty or NULL string gets treated as "." */
  35         if (path == NULL || *path == '\0') {
  36                 (void)strlcpy(bname, ".", sizeof bname);
  37                 return(bname);
  38         }
  39
  40         /* Strip trailing slashes */
  41         endp = path + strlen(path) - 1;
  42         while (endp > path && *endp == '/')
  43                 endp--;
  44
  45         /* All slashes become "/" */
  46         if (endp == path && *endp == '/') {
  47                 (void)strlcpy(bname, "/", sizeof bname);
  48                 return(bname);
  49         }
  50
  51         /* Find the start of the base */
  52         startp = endp;
  53         while (startp > path && *(startp - 1) != '/')
  54                 startp--;
  55
  56         if (endp - startp + 2 > sizeof(bname)) {
  57                 errno = ENAMETOOLONG;
  58                 return(NULL);
  59         }
  60         strlcpy(bname, startp, endp - startp + 2);
  61         return(bname);
  62 }
  63
  64 #endif /* !defined(HAVE_BASENAME) */