1 /* Dump the character classes and character maps of a locale to a bunch
2 of individual files which can be processed with diff, sed etc.
3 Copyright (C) 2000-2019 Free Software Foundation, Inc.
4 This file is part of the GNU C Library.
5 Contributed by Bruno Haible <haible@clisp.cons.org>, 2000.
7 The GNU C Library is free software; you can redistribute it and/or
8 modify it under the terms of the GNU Lesser General Public
9 License as published by the Free Software Foundation; either
10 version 2.1 of the License, or (at your option) any later version.
12 The GNU C Library is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 Lesser General Public License for more details.
17 You should have received a copy of the GNU Lesser General Public
18 License along with the GNU C Library; if not, see
19 <http://www.gnu.org/licenses/>. */
22 $ dump-ctype de_DE.UTF-8
33 static const char *program_name
= "dump-ctype";
34 static const char *locale
;
36 static const char *class_names
[] =
38 "alnum", "alpha", "blank", "cntrl", "digit", "graph", "lower",
39 "print", "punct", "space", "upper", "xdigit"
42 static const char *map_names
[] =
44 "tolower", "toupper", "totitle"
47 static void dump_class (const char *class_name
)
53 class = wctype (class_name
);
54 if (class == (wctype_t) 0)
56 fprintf (stderr
, "%s %s: noexistent class %s\n", program_name
,
61 f
= fopen (class_name
, "w");
64 fprintf (stderr
, "%s %s: cannot open file %s/%s\n", program_name
,
65 locale
, locale
, class_name
);
69 for (ch
= 0; ch
< 0x10000; ch
++)
70 if (iswctype (ch
, class))
71 fprintf (f
, "0x%04X\n", ch
);
73 if (ferror (f
) || fclose (f
))
75 fprintf (stderr
, "%s %s: I/O error on file %s/%s\n", program_name
,
76 locale
, locale
, class_name
);
81 static void dump_map (const char *map_name
)
87 map
= wctrans (map_name
);
88 if (map
== (wctrans_t) 0)
90 fprintf (stderr
, "%s %s: noexistent map %s\n", program_name
,
95 f
= fopen (map_name
, "w");
98 fprintf (stderr
, "%s %s: cannot open file %s/%s\n", program_name
,
99 locale
, locale
, map_name
);
103 for (ch
= 0; ch
< 0x10000; ch
++)
104 if (towctrans (ch
, map
) != ch
)
105 fprintf (f
, "0x%04X\t0x%04X\n", ch
, towctrans (ch
, map
));
107 if (ferror (f
) || fclose (f
))
109 fprintf (stderr
, "%s %s: I/O error on file %s/%s\n", program_name
,
110 locale
, locale
, map_name
);
116 main (int argc
, char *argv
[])
122 fprintf (stderr
, "Usage: dump-ctype locale\n");
127 if (setlocale (LC_ALL
, locale
) == NULL
)
129 fprintf (stderr
, "%s: setlocale cannot switch to locale %s\n",
130 program_name
, locale
);
134 if (mkdir (locale
, 0777) < 0)
137 int save_errno
= errno
;
139 sprintf (buf
, "%s: cannot create directory %s", program_name
, locale
);
145 if (chdir (locale
) < 0)
148 int save_errno
= errno
;
150 sprintf (buf
, "%s: cannot chdir to %s", program_name
, locale
);
156 for (i
= 0; i
< sizeof (class_names
) / sizeof (class_names
[0]); i
++)
157 dump_class (class_names
[i
]);
159 for (i
= 0; i
< sizeof (map_names
) / sizeof (map_names
[0]); i
++)
160 dump_map (map_names
[i
]);