]>
Commit | Line | Data |
---|---|---|
b0cacab0 | 1 | /* Copyright (C) 1995-1998, 2000-2001, 2003 Free Software Foundation, Inc. |
5bc5a89c TT |
2 | Contributed by Ulrich Drepper <drepper@gnu.ai.mit.edu>, 1995. |
3 | ||
a04eba3f TT |
4 | This program is free software; you can redistribute it and/or modify it |
5 | under the terms of the GNU Library General Public License as published | |
6 | by the Free Software Foundation; either version 2, or (at your option) | |
5bc5a89c TT |
7 | any later version. |
8 | ||
9 | This program is distributed in the hope that it will be useful, | |
10 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
a04eba3f TT |
11 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
12 | Library General Public License for more details. | |
5bc5a89c | 13 | |
a04eba3f TT |
14 | You should have received a copy of the GNU Library General Public |
15 | License along with this program; if not, write to the Free Software | |
16 | Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, | |
17 | USA. */ | |
5bc5a89c TT |
18 | |
19 | #ifdef HAVE_CONFIG_H | |
20 | # include <config.h> | |
21 | #endif | |
22 | ||
a04eba3f TT |
23 | #include <stdlib.h> |
24 | #include <string.h> | |
5bc5a89c TT |
25 | #include <sys/types.h> |
26 | ||
27 | #include "loadinfo.h" | |
28 | ||
29 | /* On some strange systems still no definition of NULL is found. Sigh! */ | |
30 | #ifndef NULL | |
31 | # if defined __STDC__ && __STDC__ | |
32 | # define NULL ((void *) 0) | |
33 | # else | |
34 | # define NULL 0 | |
35 | # endif | |
36 | #endif | |
37 | ||
38 | /* @@ end of prolog @@ */ | |
39 | ||
a04eba3f | 40 | char * |
b0cacab0 | 41 | _nl_find_language (const char *name) |
a04eba3f TT |
42 | { |
43 | while (name[0] != '\0' && name[0] != '_' && name[0] != '@' | |
44 | && name[0] != '+' && name[0] != ',') | |
45 | ++name; | |
46 | ||
47 | return (char *) name; | |
48 | } | |
49 | ||
50 | ||
5bc5a89c | 51 | int |
b0cacab0 TT |
52 | _nl_explode_name (char *name, |
53 | const char **language, const char **modifier, | |
54 | const char **territory, const char **codeset, | |
55 | const char **normalized_codeset, const char **special, | |
56 | const char **sponsor, const char **revision) | |
5bc5a89c TT |
57 | { |
58 | enum { undecided, xpg, cen } syntax; | |
59 | char *cp; | |
60 | int mask; | |
61 | ||
62 | *modifier = NULL; | |
63 | *territory = NULL; | |
64 | *codeset = NULL; | |
65 | *normalized_codeset = NULL; | |
66 | *special = NULL; | |
67 | *sponsor = NULL; | |
68 | *revision = NULL; | |
69 | ||
70 | /* Now we determine the single parts of the locale name. First | |
71 | look for the language. Termination symbols are `_' and `@' if | |
72 | we use XPG4 style, and `_', `+', and `,' if we use CEN syntax. */ | |
73 | mask = 0; | |
74 | syntax = undecided; | |
75 | *language = cp = name; | |
a04eba3f | 76 | cp = _nl_find_language (*language); |
5bc5a89c TT |
77 | |
78 | if (*language == cp) | |
79 | /* This does not make sense: language has to be specified. Use | |
80 | this entry as it is without exploding. Perhaps it is an alias. */ | |
81 | cp = strchr (*language, '\0'); | |
82 | else if (cp[0] == '_') | |
83 | { | |
84 | /* Next is the territory. */ | |
85 | cp[0] = '\0'; | |
86 | *territory = ++cp; | |
87 | ||
88 | while (cp[0] != '\0' && cp[0] != '.' && cp[0] != '@' | |
89 | && cp[0] != '+' && cp[0] != ',' && cp[0] != '_') | |
90 | ++cp; | |
91 | ||
92 | mask |= TERRITORY; | |
93 | ||
94 | if (cp[0] == '.') | |
95 | { | |
96 | /* Next is the codeset. */ | |
97 | syntax = xpg; | |
98 | cp[0] = '\0'; | |
99 | *codeset = ++cp; | |
100 | ||
101 | while (cp[0] != '\0' && cp[0] != '@') | |
102 | ++cp; | |
103 | ||
104 | mask |= XPG_CODESET; | |
105 | ||
106 | if (*codeset != cp && (*codeset)[0] != '\0') | |
107 | { | |
108 | *normalized_codeset = _nl_normalize_codeset (*codeset, | |
109 | cp - *codeset); | |
110 | if (strcmp (*codeset, *normalized_codeset) == 0) | |
111 | free ((char *) *normalized_codeset); | |
112 | else | |
113 | mask |= XPG_NORM_CODESET; | |
114 | } | |
115 | } | |
116 | } | |
117 | ||
118 | if (cp[0] == '@' || (syntax != xpg && cp[0] == '+')) | |
119 | { | |
120 | /* Next is the modifier. */ | |
121 | syntax = cp[0] == '@' ? xpg : cen; | |
122 | cp[0] = '\0'; | |
123 | *modifier = ++cp; | |
124 | ||
125 | while (syntax == cen && cp[0] != '\0' && cp[0] != '+' | |
126 | && cp[0] != ',' && cp[0] != '_') | |
127 | ++cp; | |
128 | ||
129 | mask |= XPG_MODIFIER | CEN_AUDIENCE; | |
130 | } | |
131 | ||
132 | if (syntax != xpg && (cp[0] == '+' || cp[0] == ',' || cp[0] == '_')) | |
133 | { | |
134 | syntax = cen; | |
135 | ||
136 | if (cp[0] == '+') | |
137 | { | |
138 | /* Next is special application (CEN syntax). */ | |
139 | cp[0] = '\0'; | |
140 | *special = ++cp; | |
141 | ||
142 | while (cp[0] != '\0' && cp[0] != ',' && cp[0] != '_') | |
143 | ++cp; | |
144 | ||
145 | mask |= CEN_SPECIAL; | |
146 | } | |
147 | ||
148 | if (cp[0] == ',') | |
149 | { | |
150 | /* Next is sponsor (CEN syntax). */ | |
151 | cp[0] = '\0'; | |
152 | *sponsor = ++cp; | |
153 | ||
154 | while (cp[0] != '\0' && cp[0] != '_') | |
155 | ++cp; | |
156 | ||
157 | mask |= CEN_SPONSOR; | |
158 | } | |
159 | ||
160 | if (cp[0] == '_') | |
161 | { | |
162 | /* Next is revision (CEN syntax). */ | |
163 | cp[0] = '\0'; | |
164 | *revision = ++cp; | |
165 | ||
166 | mask |= CEN_REVISION; | |
167 | } | |
168 | } | |
169 | ||
170 | /* For CEN syntax values it might be important to have the | |
171 | separator character in the file name, not for XPG syntax. */ | |
172 | if (syntax == xpg) | |
173 | { | |
174 | if (*territory != NULL && (*territory)[0] == '\0') | |
175 | mask &= ~TERRITORY; | |
176 | ||
177 | if (*codeset != NULL && (*codeset)[0] == '\0') | |
178 | mask &= ~XPG_CODESET; | |
179 | ||
180 | if (*modifier != NULL && (*modifier)[0] == '\0') | |
181 | mask &= ~XPG_MODIFIER; | |
182 | } | |
183 | ||
184 | return mask; | |
185 | } |