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