460b9539 |
1 | /* |
2 | * This file is part of DisOrder |
3 | * Copyright (C) 2005 Richard Kettlewell |
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 2 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, but |
11 | * WITHOUT ANY WARRANTY; without even the implied warranty of |
12 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
13 | * 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, write to the Free Software |
17 | * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 |
18 | * USA |
19 | */ |
20 | |
21 | #include <config.h> |
22 | #include "types.h" |
23 | |
24 | #include <string.h> |
25 | |
26 | #include "filepart.h" |
27 | #include "mem.h" |
28 | |
29 | char *d_dirname(const char *path) { |
30 | const char *s; |
31 | |
32 | if((s = strrchr(path, '/'))) { |
33 | if(s == path) |
34 | return xstrdup("/"); |
35 | else |
36 | return xstrndup(path, s - path); |
37 | } else |
38 | return xstrdup("."); |
39 | } |
40 | |
41 | static const char *find_extension(const char *path) { |
42 | const char *q = path + strlen(path); |
43 | |
44 | while(q > path && strchr("abcdefghijklmnopqrstuvwxyz" |
45 | "ABCDEFGHIJKLMNOPQRSTUVWXYZ" |
46 | "0123456789", *q)) |
47 | --q; |
48 | return *q == '.' ? q : 0; |
49 | } |
50 | |
51 | const char *strip_extension(const char *path) { |
52 | const char *q = find_extension(path); |
53 | |
54 | return q ? xstrndup(path, q - path) : path; |
55 | } |
56 | |
57 | const char *extension(const char *path) { |
58 | const char *q = find_extension(path); |
59 | |
60 | return q ? q : ""; |
61 | } |
62 | |
63 | /* |
64 | Local Variables: |
65 | c-basic-offset:2 |
66 | comment-column:40 |
67 | fill-column:79 |
68 | indent-tabs-mode:nil |
69 | End: |
70 | */ |