8 #include "locale_impl.h"
21 static void *volatile bindings;
23 static char *gettextdir(const char *domainname, size_t *dirlen)
26 for (p=bindings; p; p=p->next) {
27 if (!strcmp(p->domainname, domainname) && p->active) {
29 return (char *)p->dirname;
35 char *bindtextdomain(const char *domainname, const char *dirname)
37 static volatile int lock[2];
38 struct binding *p, *q;
40 if (!domainname) return 0;
41 if (!dirname) return gettextdir(domainname, &(size_t){0});
43 size_t domlen = strlen(domainname);
44 size_t dirlen = strlen(dirname);
45 if (domlen > NAME_MAX || dirlen >= PATH_MAX) {
52 for (p=bindings; p; p=p->next) {
53 if (!strcmp(p->domainname, domainname) &&
54 !strcmp(p->dirname, dirname)) {
60 p = malloc(sizeof *p + domlen + dirlen + 2);
67 p->domainname = p->buf;
68 p->dirname = p->buf + domlen + 1;
69 memcpy(p->domainname, domainname, domlen+1);
70 memcpy(p->dirname, dirname, dirlen+1);
71 a_cas_p(&bindings, bindings, p);
74 a_store(&p->active, 1);
76 for (q=bindings; q; q=q->next) {
77 if (!strcmp(p->domainname, domainname) && q != p)
78 a_store(&q->active, 0);
83 return (char *)p->dirname;
86 static const char catnames[][12] = {
93 static const char catlens[] = { 7, 10, 11, 11 };
99 void *volatile plural_rule;
100 volatile int nplurals;
104 static char *dummy_gettextdomain()
109 weak_alias(dummy_gettextdomain, __gettextdomain);
111 const unsigned char *__map_file(const char *, size_t *);
112 int __munmap(void *, size_t);
113 unsigned long __pleval(const char *, unsigned long);
115 char *dcngettext(const char *domainname, const char *msgid1, const char *msgid2, unsigned long int n, int category)
117 static struct msgcat *volatile cats;
119 struct __locale_struct *loc = CURRENT_LOCALE;
120 struct __locale_map *lm;
121 const char *dirname, *locname, *catname;
122 size_t dirlen, loclen, catlen, domlen;
124 if (!domainname) domainname = __gettextdomain();
126 domlen = strlen(domainname);
127 if (domlen > NAME_MAX) goto notrans;
129 dirname = gettextdir(domainname, &dirlen);
130 if (!dirname) goto notrans;
134 locname = loc->messages_name;
135 if (!*locname) goto notrans;
140 lm = loc->cat[category-2];
141 if (!lm) goto notrans;
146 return (char *) ((n == 1) ? msgid1 : msgid2);
149 catname = catnames[category-2];
150 catlen = catlens[category-2];
151 loclen = strlen(locname);
153 size_t namelen = dirlen+1 + loclen+1 + catlen+1 + domlen+3;
154 char name[namelen+1], *s = name;
156 memcpy(s, dirname, dirlen);
159 memcpy(s, locname, loclen);
162 memcpy(s, catname, catlen);
165 memcpy(s, domainname, domlen);
171 for (p=cats; p; p=p->next)
172 if (!strcmp(p->name, name))
178 const void *map = __map_file(name, &map_size);
179 if (!map) goto notrans;
180 p = malloc(sizeof *p + namelen + 1);
182 __munmap((void *)map, map_size);
186 p->map_size = map_size;
187 memcpy(p->name, name, namelen+1);
191 } while (a_cas_p(&cats, old_cats, p) != old_cats);
194 const char *trans = __mo_lookup(p->map, p->map_size, msgid1);
195 if (!trans) goto notrans;
197 /* Non-plural-processing gettext forms pass a null pointer as
198 * msgid2 to request that dcngettext suppress plural processing. */
199 if (!msgid2) return (char *)trans;
201 if (!p->plural_rule) {
202 const char *rule = "n!=1;";
203 unsigned long np = 2;
204 const char *r = __mo_lookup(p->map, p->map_size, "");
206 while (r && strncmp(r, "Plural-Forms:", 13)) {
212 while (isspace(*r)) r++;
213 if (!strncmp(r, "nplurals=", 9)) {
214 np = strtoul(r+9, &z, 10);
217 while (*r && *r != ';') r++;
220 while (isspace(*r)) r++;
221 if (!strncmp(r, "plural=", 7))
225 a_store(&p->nplurals, np);
226 a_cas_p(&p->plural_rule, 0, (void *)rule);
229 unsigned long plural = __pleval(p->plural_rule, n);
230 if (plural > p->nplurals) goto notrans;
232 size_t rem = p->map_size - (trans - (char *)p->map);
233 size_t l = strnlen(trans, rem);
239 return (char *)trans;
242 char *dcgettext(const char *domainname, const char *msgid, int category)
244 return dcngettext(domainname, msgid, 0, 1, category);
247 char *dngettext(const char *domainname, const char *msgid1, const char *msgid2, unsigned long int n)
249 return dcngettext(domainname, msgid1, msgid2, n, LC_MESSAGES);
252 char *dgettext(const char *domainname, const char *msgid)
254 return dcngettext(domainname, msgid, 0, 1, LC_MESSAGES);