chiark / gitweb /
Bring CGI docs pretty much up to date
[disorder] / lib / t-filepart.c
1
2 /*
3  * This file is part of DisOrder.
4  * Copyright (C) 2005, 2007, 2008 Richard Kettlewell
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License as published by
8  * the Free Software Foundation; either version 2 of the License, or
9  * (at your option) any later version.
10  *
11  * This program is distributed in the hope that it will be useful, but
12  * WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  * General Public License for more details.
15  *
16  * You should have received a copy of the GNU General Public License
17  * along with this program; if not, write to the Free Software
18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
19  * USA
20  */
21 #include "test.h"
22
23 #define check_filepart(PATH, DIR, BASE) do {            \
24   char *d = d_dirname(PATH), *b = d_basename(PATH);     \
25                                                         \
26   if(strcmp(d, DIR)) {                                  \
27     fprintf(stderr, "%s:%d: d_dirname failed:\n"        \
28             "    path: %s\n"                            \
29             "     got: %s\n"                            \
30             "expected: %s\n",                           \
31             __FILE__, __LINE__,                         \
32             PATH, d, DIR);                              \
33     count_error();                                      \
34   }                                                     \
35   if(strcmp(b, BASE)) {                                 \
36     fprintf(stderr, "%s:%d: d_basename failed:\n"       \
37             "    path: %s\n"                            \
38             "     got: %s\n"                            \
39             "expected: %s\n",                           \
40             __FILE__, __LINE__,                         \
41             PATH, d, DIR);                              \
42     count_error();                                      \
43   }                                                     \
44 } while(0)
45
46 static void test_filepart(void) {
47   check_filepart("", "", "");
48   check_filepart("/", "/", "/");
49   check_filepart("////", "/", "/");
50   check_filepart("/spong", "/", "spong");
51   check_filepart("/spong/", "/", "spong");
52   check_filepart("/spong//", "/", "spong");
53   check_filepart("////spong", "/", "spong");
54   check_filepart("/foo/bar", "/foo", "bar");
55   check_filepart("/foo/bar/", "/foo", "bar");
56   check_filepart("////foo/////bar", "////foo", "bar");
57   check_filepart("./bar", ".", "bar");
58   check_filepart(".//bar", ".", "bar");
59   check_filepart(".", ".", ".");
60   check_filepart("..", ".", "..");
61   check_filepart("../blat", "..", "blat");
62   check_filepart("..//blat", "..", "blat");
63   check_filepart("wibble", ".", "wibble");
64   check_string(extension("foo.c"), ".c");
65   check_string(extension(".c"), ".c");
66   check_string(extension("."), ".");
67   check_string(extension("foo"), "");
68   check_string(extension("./foo"), "");
69   check_string(extension("./foo.c"), ".c");
70   check_string(strip_extension("foo.c"), "foo");
71   check_string(strip_extension("foo.mp3"), "foo");
72   check_string(strip_extension("foo.---"), "foo.---");
73   check_string(strip_extension("foo.---xyz"), "foo.---xyz");
74   check_string(strip_extension("foo.bar/wibble.spong"), "foo.bar/wibble");
75 }
76
77 TEST(filepart);
78
79 /*
80 Local Variables:
81 c-basic-offset:2
82 comment-column:40
83 fill-column:79
84 indent-tabs-mode:nil
85 End:
86 */