1 /* dirname.c -- return all but the last element in a path
2 Copyright (C) 1990 Free Software Foundation, Inc.
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)
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.
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. */
23 #if defined(USG) || defined(STDC_HEADERS)
25 #define rindex strrchr
30 /* Return the leading directories part of PATH,
31 allocated with malloc. If out of memory, return 0.
32 Assumes that trailing slashes have already been
41 int length; /* Length of result, not including NUL. */
43 slash = rindex (path, '/');
46 /* File is in the current directory. */
52 /* Remove any trailing slashes from the result. */
53 while (slash > path && *slash == '/')
56 length = slash - path + 1;
58 newpath = malloc (length + 1);
61 strncpy (newpath, path, length);