1 /* vi: set sw=4 ts=4: */
3 * Mini dirname function.
5 * Copyright (C) 2001 Matt Kraai.
7 * This program is free software; you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License as published by
9 * the Free Software Foundation; either version 2 of the License, or
10 * (at your option) any later version.
12 * This program is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * General Public License for more details.
17 * You should have received a copy of the GNU General Public License
18 * along with this program; if not, write to the Free Software
19 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
25 /* Return a string on the heap containing the directory component of PATH. */
27 char *dirname(const char *path)
31 /* Go to the end of the string. */
32 s = path + strlen(path) - 1;
34 /* Strip off trailing /s (unless it is also the leading /). */
35 while (path < s && s[0] == '/')
38 /* Strip the last component. */
39 while (path <= s && s[0] != '/')
42 while (path < s && s[0] == '/')
48 return xstrndup (path, s - path + 1);