Better ASSERT macro.
[pspp] / tests / test-mbscasestr4.c
1 /* Test of case-insensitive searching in a string.
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 <stdio.h>
28 #include <stdlib.h>
29
30 #define ASSERT(expr) \
31   do                                                                         \
32     {                                                                        \
33       if (!(expr))                                                           \
34         {                                                                    \
35           fprintf (stderr, "%s:%d: assertion failed\n", __FILE__, __LINE__); \
36           abort ();                                                          \
37         }                                                                    \
38     }                                                                        \
39   while (0)
40
41 int
42 main ()
43 {
44   /* configure should already have checked that the locale is supported.  */
45   if (setlocale (LC_ALL, "") == NULL)
46     return 1;
47
48   {
49     const char input[] = "GOLD NEEDLE BEATS TIN NEEDLE";
50     ASSERT (mbscasestr (input, "Needle") == input + 5);
51   }
52
53   /* The following tests show how mbscasestr() is different from
54      strcasestr().  */
55
56   {
57     const char input[] = "s\303\266zc\303\274k"; /* sözcük */
58     ASSERT (mbscasestr (input, "\303\266z") == input + 1);
59     ASSERT (mbscasestr (input, "\303\266c") == NULL);
60   }
61
62   /* This test shows how a string of larger size can be found in a string of
63      smaller size.  */
64   {
65     const char input[] = "*Tbilisi imini*";
66     ASSERT (mbscasestr (input, "TB\304\260L\304\260S\304\260 \304\260m\304\260n\304\260") == input + 1); /* TBİLİSİ İmİnİ */
67   }
68
69   return 0;
70 }