chiark - git - mdw - disorder/blob - 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 static void test_filepart(void) {
  24   check_string(d_dirname("/"), "/");
  25   check_string(d_dirname("////"), "/");
  26   check_string(d_dirname("/spong"), "/");
  27   check_string(d_dirname("////spong"), "/");
  28   check_string(d_dirname("/foo/bar"), "/foo");
  29   check_string(d_dirname("////foo/////bar"), "////foo");
  30   check_string(d_dirname("./bar"), ".");
  31   check_string(d_dirname(".//bar"), ".");
  32   check_string(d_dirname("."), ".");
  33   check_string(d_dirname(".."), ".");
  34   check_string(d_dirname("../blat"), "..");
  35   check_string(d_dirname("..//blat"), "..");
  36   check_string(d_dirname("wibble"), ".");
  37   check_string(extension("foo.c"), ".c");
  38   check_string(extension(".c"), ".c");
  39   check_string(extension("."), ".");
  40   check_string(extension("foo"), "");
  41   check_string(extension("./foo"), "");
  42   check_string(extension("./foo.c"), ".c");
  43   check_string(strip_extension("foo.c"), "foo");
  44   check_string(strip_extension("foo.mp3"), "foo");
  45   check_string(strip_extension("foo.---"), "foo.---");
  46   check_string(strip_extension("foo.---xyz"), "foo.---xyz");
  47   check_string(strip_extension("foo.bar/wibble.spong"), "foo.bar/wibble");
  48 }
  49
  50 TEST(filepart);
  51
  52 /*
  53 Local Variables:
  54 c-basic-offset:2
  55 comment-column:40
  56 fill-column:79
  57 indent-tabs-mode:nil
  58 End:
  59 */