Adjust for changes to getaddrinfo.c.
[kopensolaris-gnu/glibc.git] / posix / bug-regex5.c
1 #include <stdio.h>
2 #include <string.h>
3 #include <locale.h>
4 #include <locale/localeinfo.h>
5
6 int
7 main (void)
8 {
9   int32_t table_size, idx, i, found;
10   const int32_t *symb_table;
11   const unsigned char *extra;
12   uint32_t nrules;
13   char *ca;
14   union locale_data_value u;
15
16   ca = setlocale (LC_ALL, "da_DK.ISO-8859-1");
17   if (ca == NULL)
18     {
19       printf ("cannot set locale: %m\n");
20       return 1;
21     }
22   printf ("current locale : %s\n", ca);
23
24   u.string = nl_langinfo (_NL_COLLATE_NRULES);
25   nrules = u.word;
26   if (nrules == 0)
27     {
28       printf("No rule\n");
29       return 1;
30     }
31
32   u.string = nl_langinfo (_NL_COLLATE_SYMB_HASH_SIZEMB);
33   table_size = u.word;
34   symb_table = (const int32_t *) nl_langinfo (_NL_COLLATE_SYMB_TABLEMB);
35   extra = (const unsigned char *) nl_langinfo (_NL_COLLATE_SYMB_EXTRAMB);
36
37   found = 0;
38   for (i = 0; i < table_size; ++i)
39     {
40       if (symb_table[2 * i] != 0)
41         {
42           char elem[256];
43           idx = symb_table[2 * i + 1];
44           strncpy (elem, (const char *) (extra + idx + 1), extra[idx]);
45           elem[extra[idx]] = '\0';
46           printf ("Found a collating element: %s\n", elem);
47           ++found;
48         }
49     }
50   if (found == 0)
51     {
52       printf ("No collating element!\n");
53       return 1;
54     }
55   else if (found != 4)
56     {
57       printf ("expected 4 collating elements, found %d\n", found);
58       return 1;
59     }
60
61   return 0;
62 }