GNU file utilities
[gnulib.git] / lib / stripslash.c
1 /* stripslash.c -- remove trailing slashes from a string
2    Copyright (C) 1990 Free Software Foundation, Inc.
3
4    This program is free software; you can redistribute it and/or modify
5    it under the terms of the GNU General Public License as published by
6    the Free Software Foundation; either version 2, or (at your option)
7    any later version.
8
9    This program is distributed in the hope that it will be useful,
10    but WITHOUT ANY WARRANTY; without even the implied warranty of
11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12    GNU General Public License for more details.
13
14    You should have received a copy of the GNU General Public License
15    along with this program; if not, write to the Free Software
16    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.  */
17
18 #ifdef HAVE_CONFIG_H
19 #if defined (CONFIG_BROKETS)
20 /* We use <config.h> instead of "config.h" so that a compilation
21    using -I. -I$srcdir will use ./config.h rather than $srcdir/config.h
22    (which it would do because it found this file in $srcdir).  */
23 #include <config.h>
24 #else
25 #include "config.h"
26 #endif
27 #endif
28
29 #if defined(STDC_HEADERS) || defined(HAVE_STRING_H)
30 #include <string.h>
31 #else
32 #include <strings.h>
33 #endif
34
35 /* Remove trailing slashes from PATH.
36    This is useful when using filename completion from a shell that
37    adds a "/" after directory names (such as tcsh and bash), because
38    the Unix rename and rmdir system calls return an "Invalid argument" error
39    when given a path that ends in "/" (except for the root directory).  */
40
41 void
42 strip_trailing_slashes (path)
43      char *path;
44 {
45   int last;
46
47   last = strlen (path) - 1;
48   while (last > 0 && path[last] == '/')
49     path[last--] = '\0';
50 }