X-Git-Url: http://erislabs.net/gitweb/?a=blobdiff_plain;f=lib%2Fbasename.c;h=67d9420a6d9d1a5e1e18f589cc9dba152b66ca4c;hb=e2811532647e8280f13347d71579621ac441c0cd;hp=4087e3dc0fdad8c6e5c0edcbc60c8945677296f7;hpb=0fb5d9e20e611c458913ad88757f1ad3d593e3ee;p=gnulib.git diff --git a/lib/basename.c b/lib/basename.c index 4087e3dc0..67d9420a6 100644 --- a/lib/basename.c +++ b/lib/basename.c @@ -1,30 +1,58 @@ -/* basename.c -- return the last element in a path */ +/* basename.c -- return the last element in a file name -#if HAVE_CONFIG_H -# include -#endif + Copyright (C) 1990, 1998-2001, 2003-2006, 2009-2014 Free Software + Foundation, Inc. -#ifndef FILESYSTEM_PREFIX_LEN -# define FILESYSTEM_PREFIX_LEN(f) 0 -#endif + This program is free software: you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation; either version 3 of the License, or + (at your option) any later version. -#ifndef ISSLASH -# define ISSLASH(c) ((c) == '/') -#endif + This program is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + GNU General Public License for more details. -/* In general, we can't use the builtin `basename' function if available, - since it has different meanings in different environments. - In some environments the builtin `basename' modifies its argument. */ + You should have received a copy of the GNU General Public License + along with this program. If not, see . */ + +#include + +#include "dirname.h" + +#include +#include "xalloc.h" +#include "xstrndup.h" char * -base_name (name) - char const *name; +base_name (char const *name) { - char const *base = name += FILESYSTEM_PREFIX_LEN (name); + char const *base = last_component (name); + size_t length; + + /* If there is no last component, then name is a file system root or the + empty string. */ + if (! *base) + return xstrndup (name, base_len (name)); + + /* Collapse a sequence of trailing slashes into one. */ + length = base_len (base); + if (ISSLASH (base[length])) + length++; - for (; *name; name++) - if (ISSLASH (*name)) - base = name + 1; + /* On systems with drive letters, "a/b:c" must return "./b:c" rather + than "b:c" to avoid confusion with a drive letter. On systems + with pure POSIX semantics, this is not an issue. */ + if (FILE_SYSTEM_PREFIX_LEN (base)) + { + char *p = xmalloc (length + 3); + p[0] = '.'; + p[1] = '/'; + memcpy (p + 2, base, length); + p[length + 2] = '\0'; + return p; + } - return (char *) base; + /* Finally, copy the basename. */ + return xstrndup (base, length); }