1/* $NetBSD: dirname.c,v 1.1 2005/06/01 15:07:55 lukem Exp $ */ 2/* from NetBSD: dirname.c,v 1.7 2002/10/17 11:36:39 tron Exp */ 3 4/*- 5 * Copyright (c) 1997, 2002 The NetBSD Foundation, Inc. 6 * All rights reserved. 7 * 8 * This code is derived from software contributed to The NetBSD Foundation 9 * by Klaus Klein and Jason R. Thorpe. 10 * 11 * Redistribution and use in source and binary forms, with or without 12 * modification, are permitted provided that the following conditions 13 * are met: 14 * 1. Redistributions of source code must retain the above copyright 15 * notice, this list of conditions and the following disclaimer. 16 * 2. Redistributions in binary form must reproduce the above copyright 17 * notice, this list of conditions and the following disclaimer in the 18 * documentation and/or other materials provided with the distribution. 19 * 3. All advertising materials mentioning features or use of this software 20 * must display the following acknowledgement: 21 * This product includes software developed by the NetBSD 22 * Foundation, Inc. and its contributors. 23 * 4. Neither the name of The NetBSD Foundation nor the names of its 24 * contributors may be used to endorse or promote products derived 25 * from this software without specific prior written permission. 26 * 27 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 28 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 29 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 30 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 31 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 32 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 33 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 34 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 35 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 36 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 37 * POSSIBILITY OF SUCH DAMAGE. 38 */ 39 40#include "tnftp.h" 41 42char * 43dirname(path) 44 char *path; 45{ 46 static char singledot[] = "."; 47 static char result[PATH_MAX]; 48 char *lastp; 49 size_t len; 50 51 /* 52 * If `path' is a null pointer or points to an empty string, 53 * return a pointer to the string ".". 54 */ 55 if ((path == NULL) || (*path == '\0')) 56 return (singledot); 57 58 /* Strip trailing slashes, if any. */ 59 lastp = path + strlen(path) - 1; 60 while (lastp != path && *lastp == '/') 61 lastp--; 62 63 /* Terminate path at the last occurence of '/'. */ 64 do { 65 if (*lastp == '/') { 66 /* Strip trailing slashes, if any. */ 67 while (lastp != path && *lastp == '/') 68 lastp--; 69 70 /* ...and copy the result into the result buffer. */ 71 len = (lastp - path) + 1 /* last char */; 72 if (len > (PATH_MAX - 1)) 73 len = PATH_MAX - 1; 74 75 memcpy(result, path, len); 76 result[len] = '\0'; 77 78 return (result); 79 } 80 } while (--lastp >= path); 81 82 /* No /'s found, return a pointer to the string ".". */ 83 return (singledot); 84} 85