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