Tests for module 'c-strcase'.
[pspp] / tests / test-c-strcasecmp.c
1 /* Test of case-insensitive string comparison function.
2    Copyright (C) 2007 Free Software Foundation, Inc.
3
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)
7    any later version.
8
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.
13
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 Foundation,
16    Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.  */
17
18 /* Written by Bruno Haible <bruno@clisp.org>, 2007.  */
19
20 #ifdef HAVE_CONFIG_H
21 # include <config.h>
22 #endif
23
24 #include <string.h>
25
26 #include <locale.h>
27 #include <stdlib.h>
28
29 #define ASSERT(expr) if (!(expr)) abort ();
30
31 int
32 main (int argc, char *argv[])
33 {
34   if (argc > 1)
35     {
36       /* configure should already have checked that the locale is supported.  */
37       if (setlocale (LC_ALL, "") == NULL)
38         return 1;
39     }
40
41   ASSERT (c_strcasecmp ("paragraph", "Paragraph") == 0);
42
43   ASSERT (c_strcasecmp ("paragrapH", "parAgRaph") == 0);
44
45   ASSERT (c_strcasecmp ("paragraph", "paraLyzed") < 0);
46   ASSERT (c_strcasecmp ("paraLyzed", "paragraph") > 0);
47
48   ASSERT (c_strcasecmp ("para", "paragraph") < 0);
49   ASSERT (c_strcasecmp ("paragraph", "para") > 0);
50
51   /* The following tests shows how c_strcasecmp() is different from
52      strcasecmp().  */
53
54   ASSERT (c_strcasecmp ("\311mile", "\351mile") < 0);
55   ASSERT (c_strcasecmp ("\351mile", "\311mile") > 0);
56
57   /* The following tests shows how c_strcasecmp() is different from
58      mbscasecmp().  */
59
60   ASSERT (c_strcasecmp ("\303\266zg\303\274r", "\303\226ZG\303\234R") > 0); /* özgür */
61   ASSERT (c_strcasecmp ("\303\226ZG\303\234R", "\303\266zg\303\274r") < 0); /* özgür */
62
63   /* This test shows how strings of different size cannot compare equal.  */
64   ASSERT (c_strcasecmp ("turkish", "TURK\304\260SH") < 0);
65   ASSERT (c_strcasecmp ("TURK\304\260SH", "turkish") > 0);
66
67   return 0;
68 }