| #include <ctype.h> |
| #include <locale.h> |
| #include <stdio.h> |
| #include <stdlib.h> |
| |
| |
| static int do_test (__locale_t l); |
| |
| int |
| main (void) |
| { |
| locale_t l; |
| locale_t l2; |
| int result; |
| |
| l = newlocale (1 << LC_ALL, "de_DE.ISO-8859-1", NULL); |
| if (l == NULL) |
| { |
| printf ("newlocale failed: %m\n"); |
| exit (EXIT_FAILURE); |
| } |
| puts ("Running tests of created locale"); |
| result = do_test (l); |
| |
| l2 = duplocale (l); |
| if (l2 == NULL) |
| { |
| printf ("duplocale failed: %m\n"); |
| exit (EXIT_FAILURE); |
| } |
| freelocale (l); |
| puts ("Running tests of duplicated locale"); |
| result |= do_test (l2); |
| |
| return result; |
| } |
| |
| |
| static const char str[] = "0123456789abcdef ABCDEF ghijklmnopqrstuvwxyzäÄöÖüÜ"; |
| static const char exd[] = "11111111110000000000000000000000000000000000000000"; |
| static const char exa[] = "00000000001111110111111011111111111111111111111111"; |
| static const char exx[] = "11111111111111110111111000000000000000000000000000"; |
| |
| |
| static int |
| do_test (locale_t l) |
| { |
| int result = 0; |
| size_t n; |
| |
| #define DO_TEST(TEST, RES) \ |
| for (n = 0; n < sizeof (str) - 1; ++n) \ |
| if ('0' + (TEST (str[n], l) != 0) != RES[n]) \ |
| { \ |
| printf ("%s(%c) failed\n", #TEST, str[n]); \ |
| result = 1; \ |
| } |
| |
| DO_TEST (isdigit_l, exd); |
| DO_TEST (isalpha_l, exa); |
| DO_TEST (isxdigit_l, exx); |
| |
| return result; |
| } |