Mercurial > hg-old > index.cgi

comparison lib/stripslash.c @ 265:68fbca173508 2.6

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Added generated files for release
author lost
date Tue, 22 Dec 2009 05:31:23 +0000
parents
children
comparison
equal deleted inserted replaced
264:61d1db1dfe2a 265:68fbca173508
1 /* stripslash.c -- remove redundant trailing slashes from a file name
2
3 Copyright (C) 1990, 2001, 2003-2006 Free Software Foundation, Inc.
4
5 This program is free software: you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation; either version 3 of the License, or
8 (at your option) any later version.
9
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details.
14
15 You should have received a copy of the GNU General Public License
16 along with this program. If not, see <http://www.gnu.org/licenses/>. */
17
18 #include <config.h>
19
20 #include "dirname.h"
21
22 /* Remove trailing slashes from FILE. Return true if a trailing slash
23 was removed. This is useful when using file name completion from a
24 shell that adds a "/" after directory names (such as tcsh and
25 bash), because on symlinks to directories, several system calls
26 have different semantics according to whether a trailing slash is
27 present. */
28
29 bool
30 strip_trailing_slashes (char *file)
31 {
32 char *base = last_component (file);
33 char *base_lim;
34 bool had_slash;
35
36 /* last_component returns "" for file system roots, but we need to turn
37 `///' into `/'. */
38 if (! *base)
39 base = file;
40 base_lim = base + base_len (base);
41 had_slash = (*base_lim != '\0');
42 *base_lim = '\0';
43 return had_slash;
44 }