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
  15   ca = setlocale (LC_ALL, "da_DK.ISO-8859-1");
  16   if (ca == NULL)
  17     {
  18       printf ("cannot set locale: %m\n");
  19       return 1;
  20     }
  21   printf ("current locale : %s\n", ca);
  22
  23   nrules = _NL_CURRENT_WORD (LC_COLLATE, _NL_COLLATE_NRULES);
  24   if (nrules == 0)
  25     {
  26       printf("No rule\n");
  27       return 1;
  28     }
  29
  30   table_size = _NL_CURRENT_WORD (LC_COLLATE, _NL_COLLATE_SYMB_HASH_SIZEMB);
  31   symb_table = (const int32_t *)
  32     _NL_CURRENT (LC_COLLATE, _NL_COLLATE_SYMB_TABLEMB);
  33   extra = (const unsigned char *)
  34     _NL_CURRENT (LC_COLLATE, _NL_COLLATE_SYMB_EXTRAMB);
  35
  36   found = 0;
  37   for (i = 0; i < table_size; ++i)
  38     {
  39       if (symb_table[2 * i] != 0)
  40         {
  41           char elem[256];
  42           idx = symb_table[2 * i + 1];
  43           strncpy (elem, extra + idx + 1, extra[idx]);
  44           elem[extra[idx]] = '\0';
  45           printf ("Found a collating element: %s\n", elem);
  46           ++found;
  47         }
  48     }
  49   if (found == 0)
  50     {
  51       printf ("No collating element!\n");
  52       return 1;
  53     }
  54   else if (found != 4)
  55     {
  56       printf ("expected 4 collating elements, found %d\n", found);
  57       return 1;
  58     }
  59
  60   return 0;
  61 }