* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
- * 3. All advertising materials mentioning features or use of this software
- * must display the following acknowledgement:
- * This product includes software developed by the University of
- * California, Berkeley and its contributors.
* 4. Neither the name of the University nor the names of its contributors
* may be used to endorse or promote products derived from this software
* without specific prior written permission.
static char sccsid[] = "@(#)setlocale.c 8.1 (Berkeley) 7/4/93";
#endif /* LIBC_SCCS and not lint */
#include <sys/cdefs.h>
-__FBSDID("$FreeBSD: src/lib/libc/locale/setlocale.c,v 1.50 2004/01/31 19:15:32 ache Exp $");
+__FBSDID("$FreeBSD: src/lib/libc/locale/setlocale.c,v 1.51 2007/01/09 00:28:00 imp Exp $");
+
+#include "xlocale_private.h"
#include <sys/types.h>
#include <sys/stat.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
+#include <fcntl.h>
#include "collate.h"
#include "lmonetary.h" /* for __monetary_load_locale() */
#include "lnumeric.h" /* for __numeric_load_locale() */
#include "lmessages.h" /* for __messages_load_locale() */
#include "setlocale.h"
#include "ldpart.h"
-#include "../stdtime/timelocal.h" /* for __time_load_locale() */
+#include "timelocal.h" /* for __time_load_locale() */
/*
* Category names for getenv()
*/
-static char *categories[_LC_LAST] = {
+static const char * const categories[_LC_LAST] = {
"LC_ALL",
"LC_COLLATE",
"LC_CTYPE",
static char new_categories[_LC_LAST][ENCODING_LEN + 1];
static char saved_categories[_LC_LAST][ENCODING_LEN + 1];
-static char current_locale_string[_LC_LAST * (ENCODING_LEN + 1/*"/"*/ + 1)];
-
static char *currentlocale(void);
static char *loadlocale(int);
-static const char *__get_locale_env(int);
+__private_extern__ const char *__get_locale_env(int);
+
+#define UNLOCK_AND_RETURN(x) {XL_UNLOCK(&__global_locale); return (x);}
char *
setlocale(category, locale)
int category;
const char *locale;
{
- int i, j, len, saverr;
+ int i, j, len, saverr, save__numeric_fp_cvt;
const char *env, *r;
+ locale_t save__lc_numeric_loc;
if (category < LC_ALL || category >= _LC_LAST) {
errno = EINVAL;
return (category != LC_ALL ?
current_categories[category] : currentlocale());
+ XL_LOCK(&__global_locale);
/*
* Default to the current locale for everything.
*/
env = __get_locale_env(i);
if (strlen(env) > ENCODING_LEN) {
errno = EINVAL;
- return (NULL);
+ UNLOCK_AND_RETURN (NULL);
}
(void)strcpy(new_categories[i], env);
}
env = __get_locale_env(category);
if (strlen(env) > ENCODING_LEN) {
errno = EINVAL;
- return (NULL);
+ UNLOCK_AND_RETURN (NULL);
}
(void)strcpy(new_categories[category], env);
}
} else if (category != LC_ALL) {
if (strlen(locale) > ENCODING_LEN) {
errno = EINVAL;
- return (NULL);
+ UNLOCK_AND_RETURN (NULL);
}
(void)strcpy(new_categories[category], locale);
} else {
if ((r = strchr(locale, '/')) == NULL) {
if (strlen(locale) > ENCODING_LEN) {
errno = EINVAL;
- return (NULL);
+ UNLOCK_AND_RETURN (NULL);
}
for (i = 1; i < _LC_LAST; ++i)
(void)strcpy(new_categories[i], locale);
;
if (!r[1]) {
errno = EINVAL;
- return (NULL); /* Hmm, just slashes... */
+ UNLOCK_AND_RETURN (NULL); /* Hmm, just slashes... */
}
do {
if (i == _LC_LAST)
break; /* Too many slashes... */
if ((len = r - locale) > ENCODING_LEN) {
errno = EINVAL;
- return (NULL);
+ UNLOCK_AND_RETURN (NULL);
}
(void)strlcpy(new_categories[i], locale,
len + 1);
}
if (category != LC_ALL)
- return (loadlocale(category));
+ UNLOCK_AND_RETURN (loadlocale(category));
+ save__numeric_fp_cvt = __global_locale.__numeric_fp_cvt;
+ save__lc_numeric_loc = __global_locale.__lc_numeric_loc;
+ XL_RETAIN(save__lc_numeric_loc);
for (i = 1; i < _LC_LAST; ++i) {
(void)strcpy(saved_categories[i], current_categories[i]);
if (loadlocale(i) == NULL) {
(void)loadlocale(j);
}
}
+ __global_locale.__numeric_fp_cvt = save__numeric_fp_cvt;
+ __global_locale.__lc_numeric_loc = save__lc_numeric_loc;
+ XL_RELEASE(save__lc_numeric_loc);
errno = saverr;
- return (NULL);
+ UNLOCK_AND_RETURN (NULL);
}
}
- return (currentlocale());
+ XL_RELEASE(save__lc_numeric_loc);
+ UNLOCK_AND_RETURN (currentlocale());
}
static char *
{
int i;
- (void)strcpy(current_locale_string, current_categories[1]);
+ size_t bufsiz = _LC_LAST * (ENCODING_LEN + 1/*"/"*/ + 1);
+ static char *current_locale_string = NULL;
+
+ if (current_locale_string == NULL) {
+ current_locale_string = malloc(bufsiz);
+ if (current_locale_string == NULL) {
+ return NULL;
+ }
+ }
+
+ (void)strlcpy(current_locale_string, current_categories[1], bufsiz);
for (i = 2; i < _LC_LAST; ++i)
if (strcmp(current_categories[1], current_categories[i])) {
{
char *new = new_categories[category];
char *old = current_categories[category];
- int (*func)(const char *);
+ int (*func)(const char *, locale_t);
int saved_errno;
if ((new[0] == '.' &&
if (strcmp(new, old) == 0)
return (old);
- if (func(new) != _LDP_ERROR) {
+ if (func(new, &__global_locale) != _LDP_ERROR) {
(void)strcpy(old, new);
+ switch (category) {
+ case LC_CTYPE:
+ if (__global_locale.__numeric_fp_cvt == LC_NUMERIC_FP_SAME_LOCALE)
+ __global_locale.__numeric_fp_cvt = LC_NUMERIC_FP_UNINITIALIZED;
+ break;
+ case LC_NUMERIC:
+ __global_locale.__numeric_fp_cvt = LC_NUMERIC_FP_UNINITIALIZED;
+ XL_RELEASE(__global_locale.__lc_numeric_loc);
+ __global_locale.__lc_numeric_loc = NULL;
+ break;
+ }
return (old);
}
return (NULL);
}
-static const char *
+__private_extern__ const char *
__get_locale_env(category)
int category;
{
/*
* Detect locale storage location and store its value to _PathLocale variable
*/
-int
+__private_extern__ int
__detect_path_locale(void)
{
if (_PathLocale == NULL) {
return (0);
}
+__private_extern__ int
+__open_path_locale(const char *subpath)
+{
+ char filename[PATH_MAX];
+ int fd;
+
+ strcpy(filename, _PathLocale);
+ strcat(filename, "/");
+ strcat(filename, subpath);
+ fd = _open(filename, O_RDONLY);
+ if (fd >= 0) {
+ return fd;
+ }
+
+ strcpy(filename, _PATH_LOCALE);
+ strcat(filename, "/");
+ strcat(filename, subpath);
+ fd = _open(filename, O_RDONLY);
+ if (fd >= 0) {
+ return fd;
+ }
+
+ strcpy(filename, "/usr/local/share/locale");
+ strcat(filename, "/");
+ strcat(filename, subpath);
+ return _open(filename, O_RDONLY);
+}
+