]>
Commit | Line | Data |
---|---|---|
0b95971d UD |
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. | |
2b778ceb | 3 | Copyright (C) 2000-2021 Free Software Foundation, Inc. |
0b95971d | 4 | This file is part of the GNU C Library. |
0b95971d UD |
5 | |
6 | The GNU C Library is free software; you can redistribute it and/or | |
41bdb6e2 AJ |
7 | modify it under the terms of the GNU Lesser General Public |
8 | License as published by the Free Software Foundation; either | |
9 | version 2.1 of the License, or (at your option) any later version. | |
0b95971d UD |
10 | |
11 | The GNU C Library is distributed in the hope that it will be useful, | |
12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
13 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
41bdb6e2 | 14 | Lesser General Public License for more details. |
0b95971d | 15 | |
41bdb6e2 | 16 | You should have received a copy of the GNU Lesser General Public |
59ba27a6 | 17 | License along with the GNU C Library; if not, see |
5a82c748 | 18 | <https://www.gnu.org/licenses/>. */ |
0b95971d UD |
19 | |
20 | /* Usage example: | |
21 | $ dump-ctype de_DE.UTF-8 | |
22 | */ | |
23 | ||
24 | #include <stdio.h> | |
25 | #include <stdlib.h> | |
26 | #include <wctype.h> | |
27 | #include <locale.h> | |
28 | #include <sys/stat.h> | |
29 | #include <unistd.h> | |
30 | #include <errno.h> | |
31 | ||
32 | static const char *program_name = "dump-ctype"; | |
33 | static const char *locale; | |
34 | ||
35 | static const char *class_names[] = | |
36 | { | |
37 | "alnum", "alpha", "blank", "cntrl", "digit", "graph", "lower", | |
38 | "print", "punct", "space", "upper", "xdigit" | |
39 | }; | |
40 | ||
41 | static const char *map_names[] = | |
42 | { | |
43 | "tolower", "toupper", "totitle" | |
44 | }; | |
45 | ||
46 | static void dump_class (const char *class_name) | |
47 | { | |
48 | wctype_t class; | |
49 | FILE *f; | |
50 | unsigned int ch; | |
51 | ||
52 | class = wctype (class_name); | |
53 | if (class == (wctype_t) 0) | |
54 | { | |
55 | fprintf (stderr, "%s %s: noexistent class %s\n", program_name, | |
56 | locale, class_name); | |
57 | return; | |
58 | } | |
59 | ||
60 | f = fopen (class_name, "w"); | |
61 | if (f == NULL) | |
62 | { | |
63 | fprintf (stderr, "%s %s: cannot open file %s/%s\n", program_name, | |
64 | locale, locale, class_name); | |
65 | exit (1); | |
66 | } | |
67 | ||
68 | for (ch = 0; ch < 0x10000; ch++) | |
69 | if (iswctype (ch, class)) | |
70 | fprintf (f, "0x%04X\n", ch); | |
71 | ||
72 | if (ferror (f) || fclose (f)) | |
73 | { | |
74 | fprintf (stderr, "%s %s: I/O error on file %s/%s\n", program_name, | |
75 | locale, locale, class_name); | |
76 | exit (1); | |
77 | } | |
78 | } | |
79 | ||
80 | static void dump_map (const char *map_name) | |
81 | { | |
82 | wctrans_t map; | |
83 | FILE *f; | |
84 | unsigned int ch; | |
85 | ||
86 | map = wctrans (map_name); | |
87 | if (map == (wctrans_t) 0) | |
88 | { | |
89 | fprintf (stderr, "%s %s: noexistent map %s\n", program_name, | |
90 | locale, map_name); | |
91 | return; | |
92 | } | |
93 | ||
94 | f = fopen (map_name, "w"); | |
95 | if (f == NULL) | |
96 | { | |
97 | fprintf (stderr, "%s %s: cannot open file %s/%s\n", program_name, | |
98 | locale, locale, map_name); | |
99 | exit (1); | |
100 | } | |
101 | ||
102 | for (ch = 0; ch < 0x10000; ch++) | |
103 | if (towctrans (ch, map) != ch) | |
104 | fprintf (f, "0x%04X\t0x%04X\n", ch, towctrans (ch, map)); | |
105 | ||
106 | if (ferror (f) || fclose (f)) | |
107 | { | |
108 | fprintf (stderr, "%s %s: I/O error on file %s/%s\n", program_name, | |
109 | locale, locale, map_name); | |
110 | exit (1); | |
111 | } | |
112 | } | |
113 | ||
f00f95d1 UD |
114 | int |
115 | main (int argc, char *argv[]) | |
0b95971d UD |
116 | { |
117 | size_t i; | |
118 | ||
119 | if (argc != 2) | |
120 | { | |
121 | fprintf (stderr, "Usage: dump-ctype locale\n"); | |
122 | exit (1); | |
123 | } | |
124 | locale = argv[1]; | |
125 | ||
126 | if (setlocale (LC_ALL, locale) == NULL) | |
127 | { | |
128 | fprintf (stderr, "%s: setlocale cannot switch to locale %s\n", | |
129 | program_name, locale); | |
130 | exit (1); | |
131 | } | |
132 | ||
133 | if (mkdir (locale, 0777) < 0) | |
134 | { | |
135 | char buf[100]; | |
136 | int save_errno = errno; | |
137 | ||
138 | sprintf (buf, "%s: cannot create directory %s", program_name, locale); | |
139 | errno = save_errno; | |
140 | perror (buf); | |
141 | exit (1); | |
142 | } | |
143 | ||
144 | if (chdir (locale) < 0) | |
145 | { | |
146 | char buf[100]; | |
147 | int save_errno = errno; | |
148 | ||
149 | sprintf (buf, "%s: cannot chdir to %s", program_name, locale); | |
150 | errno = save_errno; | |
151 | perror (buf); | |
152 | exit (1); | |
153 | } | |
154 | ||
155 | for (i = 0; i < sizeof (class_names) / sizeof (class_names[0]); i++) | |
156 | dump_class (class_names[i]); | |
157 | ||
158 | for (i = 0; i < sizeof (map_names) / sizeof (map_names[0]); i++) | |
159 | dump_map (map_names[i]); | |
160 | ||
161 | return 0; | |
162 | } |