X-Git-Url: http://erislabs.net/gitweb/?a=blobdiff_plain;f=lib%2Fstripslash.c;h=73be737321fc326242a7730b928dd987612c8305;hb=8518213783139778cd7effa5e6f2de8f81e215a0;hp=d547e18cd3573edfd0e75cec54d026ae4eb8c38e;hpb=9edff1e338868a8fc9ebfeefe1393a8b95fc0138;p=gnulib.git diff --git a/lib/stripslash.c b/lib/stripslash.c index d547e18cd..73be73732 100644 --- a/lib/stripslash.c +++ b/lib/stripslash.c @@ -1,5 +1,5 @@ -/* stripslash.c -- remove trailing slashes from a string - Copyright (C) 1990 Free Software Foundation, Inc. +/* stripslash.c -- remove redundant trailing slashes from a file name + Copyright (C) 1990, 2001 Free Software Foundation, Inc. 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 @@ -13,31 +13,33 @@ You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software Foundation, - Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. + Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ -#ifdef HAVE_CONFIG_H +#if HAVE_CONFIG_H # include #endif -#if defined(STDC_HEADERS) || defined(HAVE_STRING_H) +#if STDC_HEADERS || HAVE_STRING_H # include #else # include #endif +#include "dirname.h" + /* Remove trailing slashes from PATH. + Return nonzero if a trailing slash was removed. This is useful when using filename completion from a shell that adds a "/" after directory names (such as tcsh and bash), because the Unix rename and rmdir system calls return an "Invalid argument" error when given a path that ends in "/" (except for the root directory). */ -void -strip_trailing_slashes (path) - char *path; +int +strip_trailing_slashes (char *path) { - int last; - - last = strlen (path) - 1; - while (last > 0 && path[last] == '/') - path[last--] = '\0'; + char *base = base_name (path); + char *base_lim = base + base_len (base); + int had_slash = *base_lim; + *base_lim = '\0'; + return had_slash; }