]> CyberLeo.Net >> Repos - FreeBSD/releng/7.2.git/blob - lib/libc/gen/dirname.c
Create releng/7.2 from stable/7 in preparation for 7.2-RELEASE.
[FreeBSD/releng/7.2.git] / lib / libc / gen / dirname.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: dirname.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$");
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 dirname(path)
44         const char *path;
45 {
46         static char *bname = NULL;
47         const char *endp;
48
49         if (bname == NULL) {
50                 bname = (char *)malloc(MAXPATHLEN);
51                 if (bname == NULL)
52                         return(NULL);
53         }
54
55         /* Empty or NULL string gets treated as "." */
56         if (path == NULL || *path == '\0') {
57                 (void)strcpy(bname, ".");
58                 return(bname);
59         }
60
61         /* Strip trailing slashes */
62         endp = path + strlen(path) - 1;
63         while (endp > path && *endp == '/')
64                 endp--;
65
66         /* Find the start of the dir */
67         while (endp > path && *endp != '/')
68                 endp--;
69
70         /* Either the dir is "/" or there are no slashes */
71         if (endp == path) {
72                 (void)strcpy(bname, *endp == '/' ? "/" : ".");
73                 return(bname);
74         } else {
75                 do {
76                         endp--;
77                 } while (endp > path && *endp == '/');
78         }
79
80         if (endp - path + 2 > MAXPATHLEN) {
81                 errno = ENAMETOOLONG;
82                 return(NULL);
83         }
84         (void)strncpy(bname, path, endp - path + 1);
85         bname[endp - path + 1] = '\0';
86         return(bname);
87 }