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