1 /* Functions to read locale data files.
2 Copyright (C) 1996-2017 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
4 Contributed by Ulrich Drepper <drepper@cygnus.com>, 1996.
6 The GNU C Library is free software; you can redistribute it and/or
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.
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
14 Lesser General Public License for more details.
16 You should have received a copy of the GNU Lesser General Public
17 License along with the GNU C Library; if not, see
18 <http://www.gnu.org/licenses/>. */
27 #ifdef _POSIX_MAPPED_FILES
28 # include <sys/mman.h>
32 #include <not-cancel.h>
33 #include "localeinfo.h"
36 static const size_t _nl_category_num_items
[] =
38 #define DEFINE_CATEGORY(category, category_name, items, a) \
39 [category] = _NL_ITEM_INDEX (_NL_NUM_##category),
40 #include "categories.def"
41 #undef DEFINE_CATEGORY
45 #define NO_PAREN(arg, rest...) arg, ##rest
47 #define DEFINE_CATEGORY(category, category_name, items, a) \
48 static const enum value_type _nl_value_type_##category[] = { NO_PAREN items };
49 #define DEFINE_ELEMENT(element, element_name, optstd, type, rest...) \
50 [_NL_ITEM_INDEX (element)] = type,
51 #include "categories.def"
52 #undef DEFINE_CATEGORY
54 static const enum value_type
*const _nl_value_types
[] =
56 #define DEFINE_CATEGORY(category, category_name, items, a) \
57 [category] = _nl_value_type_##category,
58 #include "categories.def"
59 #undef DEFINE_CATEGORY
63 struct __locale_data
*
64 _nl_intern_locale_data (int category
, const void *data
, size_t datasize
)
69 unsigned int nstrings
;
70 unsigned int strindex
[0];
71 } *const filedata
= data
;
72 struct __locale_data
*newdata
;
75 if (__builtin_expect (datasize
< sizeof *filedata
, 0)
76 || __builtin_expect (filedata
->magic
!= LIMAGIC (category
), 0))
83 if (__builtin_expect (filedata
->nstrings
< _nl_category_num_items
[category
],
85 || (__builtin_expect (sizeof *filedata
86 + filedata
->nstrings
* sizeof (unsigned int)
89 /* Insufficient data. */
94 newdata
= malloc (sizeof *newdata
95 + filedata
->nstrings
* sizeof (union locale_data_value
));
99 newdata
->filedata
= (void *) filedata
;
100 newdata
->filesize
= datasize
;
101 newdata
->private.data
= NULL
;
102 newdata
->private.cleanup
= NULL
;
103 newdata
->usage_count
= 0;
104 newdata
->use_translit
= 0;
105 newdata
->nstrings
= filedata
->nstrings
;
106 for (cnt
= 0; cnt
< newdata
->nstrings
; ++cnt
)
108 size_t idx
= filedata
->strindex
[cnt
];
109 if (__glibc_unlikely (idx
> (size_t) newdata
->filesize
))
113 __set_errno (EINVAL
);
117 /* Determine the type. There is one special case: the LC_CTYPE
118 category can have more elements than there are in the
119 _nl_value_type_LC_XYZ array. There are all pointers. */
122 #define CATTEST(cat) \
124 if (cnt >= (sizeof (_nl_value_type_LC_##cat) \
125 / sizeof (_nl_value_type_LC_##cat[0]))) \
137 CATTEST (MEASUREMENT
);
138 CATTEST (IDENTIFICATION
);
140 assert (category
== LC_CTYPE
);
144 if ((category
== LC_CTYPE
145 && cnt
>= (sizeof (_nl_value_type_LC_CTYPE
)
146 / sizeof (_nl_value_type_LC_CTYPE
[0])))
147 || __builtin_expect (_nl_value_types
[category
][cnt
] != word
, 1))
148 newdata
->values
[cnt
].string
= newdata
->filedata
+ idx
;
151 if (!LOCFILE_ALIGNED_P (idx
))
153 newdata
->values
[cnt
].word
=
154 *((const uint32_t *) (newdata
->filedata
+ idx
));
162 _nl_load_locale (struct loaded_l10nfile
*file
, int category
)
167 struct __locale_data
*newdata
;
169 int alloc
= ld_mapped
;
174 fd
= __open_nocancel (file
->filename
, O_RDONLY
| O_CLOEXEC
);
175 if (__builtin_expect (fd
, 0) < 0)
176 /* Cannot open the file. */
179 if (__builtin_expect (__fxstat64 (_STAT_VER
, fd
, &st
), 0) < 0)
182 __close_nocancel_nostatus (fd
);
185 if (__glibc_unlikely (S_ISDIR (st
.st_mode
)))
187 /* LOCALE/LC_foo is a directory; open LOCALE/LC_foo/SYS_LC_foo
192 __close_nocancel_nostatus (fd
);
194 filenamelen
= strlen (file
->filename
);
195 newp
= (char *) alloca (filenamelen
196 + 5 + _nl_category_name_sizes
[category
] + 1);
197 __mempcpy (__mempcpy (__mempcpy (newp
, file
->filename
, filenamelen
),
199 _nl_category_names
.str
+ _nl_category_name_idxs
[category
],
200 _nl_category_name_sizes
[category
] + 1);
202 fd
= __open_nocancel (newp
, O_RDONLY
| O_CLOEXEC
);
203 if (__builtin_expect (fd
, 0) < 0)
206 if (__builtin_expect (__fxstat64 (_STAT_VER
, fd
, &st
), 0) < 0)
210 /* Map in the file's data. */
212 #ifdef _POSIX_MAPPED_FILES
214 /* Linux seems to lack read-only copy-on-write. */
215 # define MAP_COPY MAP_PRIVATE
218 /* Some systems do not have this flag; it is superfluous. */
221 filedata
= __mmap ((caddr_t
) 0, st
.st_size
,
222 PROT_READ
, MAP_FILE
|MAP_COPY
, fd
, 0);
223 if (__glibc_unlikely (filedata
== MAP_FAILED
))
226 if (__builtin_expect (errno
, ENOSYS
) == ENOSYS
)
228 #endif /* _POSIX_MAPPED_FILES */
229 /* No mmap; allocate a buffer and read from the file. */
231 filedata
= malloc (st
.st_size
);
232 if (filedata
!= NULL
)
234 off_t to_read
= st
.st_size
;
236 char *p
= (char *) filedata
;
239 nread
= __read_nocancel (fd
, p
, to_read
);
240 if (__builtin_expect (nread
, 1) <= 0)
244 __set_errno (EINVAL
); /* Bizarreness going on. */
250 __set_errno (save_err
);
252 #ifdef _POSIX_MAPPED_FILES
255 #endif /* _POSIX_MAPPED_FILES */
257 /* We have mapped the data, so we no longer need the descriptor. */
258 __close_nocancel_nostatus (fd
);
260 if (__glibc_unlikely (filedata
== NULL
))
261 /* We failed to map or read the data. */
264 newdata
= _nl_intern_locale_data (category
, filedata
, st
.st_size
);
265 if (__glibc_unlikely (newdata
== NULL
))
268 #ifdef _POSIX_MAPPED_FILES
269 if (alloc
== ld_mapped
)
270 __munmap ((caddr_t
) filedata
, st
.st_size
);
275 /* _nl_intern_locale_data leaves us these fields to initialize. */
276 newdata
->name
= NULL
; /* This will be filled if necessary in findlocale.c. */
277 newdata
->alloc
= alloc
;
279 file
->data
= newdata
;
283 _nl_unload_locale (struct __locale_data
*locale
)
285 if (locale
->private.cleanup
)
286 (*locale
->private.cleanup
) (locale
);
288 switch (__builtin_expect (locale
->alloc
, ld_mapped
))
291 free ((void *) locale
->filedata
);
294 #ifdef _POSIX_MAPPED_FILES
295 __munmap ((caddr_t
) locale
->filedata
, locale
->filesize
);
298 case ld_archive
: /* Nothing to do. */
302 if (__builtin_expect (locale
->alloc
, ld_mapped
) != ld_archive
)
303 free ((char *) locale
->name
);