* 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.
*/
#include <sys/cdefs.h>
-__FBSDID("$FreeBSD: src/lib/libc/locale/setrunelocale.c,v 1.26 2002/10/10 22:56:18 tjr Exp $");
+__FBSDID("$FreeBSD: src/lib/libc/locale/setrunelocale.c,v 1.51 2008/01/23 03:05:35 ache Exp $");
-#include <rune.h>
+#include "xlocale_private.h"
+
+#include <runetype.h>
#include <errno.h>
#include <limits.h>
#include <string.h>
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
+#include <wchar.h>
+#include "ldpart.h"
+#include "mblocal.h"
#include "setlocale.h"
-extern int _none_init(_RuneLocale *);
-extern int _UTF2_init(_RuneLocale *);
-extern int _UTF8_init(_RuneLocale *);
-extern int _EUC_init(_RuneLocale *);
-extern int _BIG5_init(_RuneLocale *);
-extern int _MSKanji_init(_RuneLocale *);
-extern _RuneLocale *_Read_RuneMagi(FILE *);
+extern struct __xlocale_st_runelocale *_Read_RuneMagi(FILE *);
-int
-setrunelocale(char *encoding)
+#ifdef UNIFDEF_LEGACY_RUNE_APIS
+/* depreciated interfaces */
+rune_t sgetrune(const char *, size_t, char const **);
+int sputrune(rune_t, char *, size_t, char **);
+#endif /* UNIFDEF_LEGACY_RUNE_APIS */
+
+__private_extern__ int
+__setrunelocale(const char *encoding, locale_t loc)
{
FILE *fp;
char name[PATH_MAX];
+ struct __xlocale_st_runelocale *xrl;
_RuneLocale *rl;
int saverr, ret;
- static char ctype_encoding[ENCODING_LEN + 1];
- static _RuneLocale *CachedRuneLocale;
- static int Cached__mb_cur_max;
-
- if (!encoding || !*encoding || strlen(encoding) > ENCODING_LEN ||
- (encoding[0] == '.' &&
- (encoding[1] == '\0' ||
- (encoding[1] == '.' && encoding[2] == '\0'))) ||
- strchr(encoding, '/') != NULL)
- return (EINVAL);
+ static struct __xlocale_st_runelocale *CachedRuneLocale;
+ extern int __mb_cur_max;
+ extern int __mb_sb_limit;
+ static pthread_lock_t cache_lock = LOCK_INITIALIZER;
/*
* The "C" and "POSIX" locale are always here.
*/
if (strcmp(encoding, "C") == 0 || strcmp(encoding, "POSIX") == 0) {
- _CurrentRuneLocale = &_DefaultRuneLocale;
- __mb_cur_max = 1;
+ XL_RELEASE(loc->__lc_ctype);
+ loc->__lc_ctype = &_DefaultRuneXLocale;
+ /* no need to retain _DefaultRuneXLocale */
+ if (loc == &__global_locale) {
+ _CurrentRuneLocale = &loc->__lc_ctype->_CurrentRuneLocale;
+ __mb_cur_max = loc->__lc_ctype->__mb_cur_max;
+ __mb_sb_limit = loc->__lc_ctype->__mb_sb_limit;
+ }
return (0);
}
/*
* If the locale name is the same as our cache, use the cache.
*/
+ LOCK(cache_lock);
if (CachedRuneLocale != NULL &&
- strcmp(encoding, ctype_encoding) == 0) {
- _CurrentRuneLocale = CachedRuneLocale;
- __mb_cur_max = Cached__mb_cur_max;
+ strcmp(encoding, CachedRuneLocale->__ctype_encoding) == 0) {
+ XL_RELEASE(loc->__lc_ctype);
+ loc->__lc_ctype = CachedRuneLocale;
+ XL_RETAIN(loc->__lc_ctype);
+ if (loc == &__global_locale) {
+ _CurrentRuneLocale = &loc->__lc_ctype->_CurrentRuneLocale;
+ __mb_cur_max = loc->__lc_ctype->__mb_cur_max;
+ __mb_sb_limit = loc->__lc_ctype->__mb_sb_limit;
+ }
+ UNLOCK(cache_lock);
return (0);
}
+ UNLOCK(cache_lock);
/*
* Slurp the locale file into the cache.
*/
- if (_PathLocale == NULL) {
- char *p = getenv("PATH_LOCALE");
-
- if (p != NULL
-#ifndef __NETBSD_SYSCALLS
- && !issetugid()
-#endif
- ) {
- if (strlen(p) + 1/*"/"*/ + ENCODING_LEN +
- 1/*"/"*/ + CATEGORY_LEN >= PATH_MAX)
- return (ENAMETOOLONG);
- _PathLocale = strdup(p);
- if (_PathLocale == NULL)
- return (errno == 0 ? ENOMEM : errno);
- } else
- _PathLocale = _PATH_LOCALE;
- }
- /* Range checking not needed, encoding length already checked above */
+
+ /* Range checking not needed, encoding length already checked before */
(void) strcpy(name, _PathLocale);
(void) strcat(name, "/");
(void) strcat(name, encoding);
if ((fp = fopen(name, "r")) == NULL)
return (errno == 0 ? ENOENT : errno);
- if ((rl = _Read_RuneMagi(fp)) == NULL) {
+ if ((xrl = _Read_RuneMagi(fp)) == NULL) {
saverr = (errno == 0 ? EFTYPE : errno);
(void)fclose(fp);
return (saverr);
}
(void)fclose(fp);
- if (strcmp(rl->encoding, "NONE") == 0)
- ret = _none_init(rl);
- else if (strcmp(rl->encoding, "UTF2") == 0)
- ret = _UTF2_init(rl);
- else if (strcmp(rl->encoding, "UTF-8") == 0)
- ret = _UTF8_init(rl);
- else if (strcmp(rl->encoding, "EUC") == 0)
- ret = _EUC_init(rl);
- else if (strcmp(rl->encoding, "BIG5") == 0)
- ret = _BIG5_init(rl);
- else if (strcmp(rl->encoding, "MSKanji") == 0)
- ret = _MSKanji_init(rl);
+ xrl->__mbrtowc = NULL;
+ xrl->__mbsinit = NULL;
+ xrl->__mbsnrtowcs = __mbsnrtowcs_std;
+ xrl->__wcrtomb = NULL;
+ xrl->__wcsnrtombs = __wcsnrtombs_std;
+
+ rl = &xrl->_CurrentRuneLocale;
+
+#ifdef UNIFDEF_LEGACY_RUNE_APIS
+ /* provide backwards compatibility (depreciated interface) */
+ rl->__sputrune = sputrune;
+ rl->__sgetrune = sgetrune;
+#else /* UNIFDEF_LEGACY_RUNE_APIS */
+ rl->__sputrune = NULL;
+ rl->__sgetrune = NULL;
+#endif /* UNIFDEF_LEGACY_RUNE_APIS */
+
+ if (strcmp(rl->__encoding, "NONE") == 0)
+ ret = _none_init(xrl);
+ else if (strcmp(rl->__encoding, "ASCII") == 0)
+ ret = _ascii_init(xrl);
+ else if (strcmp(rl->__encoding, "UTF-8") == 0)
+ ret = _UTF8_init(xrl);
+ else if (strcmp(rl->__encoding, "EUC") == 0)
+ ret = _EUC_init(xrl);
+ else if (strcmp(rl->__encoding, "GB18030") == 0)
+ ret = _GB18030_init(xrl);
+ else if (strcmp(rl->__encoding, "GB2312") == 0)
+ ret = _GB2312_init(xrl);
+ else if (strcmp(rl->__encoding, "GBK") == 0)
+ ret = _GBK_init(xrl);
+ else if (strcmp(rl->__encoding, "BIG5") == 0)
+ ret = _BIG5_init(xrl);
+ else if (strcmp(rl->__encoding, "MSKanji") == 0)
+ ret = _MSKanji_init(xrl);
+ else if (strcmp(rl->__encoding, "UTF2") == 0)
+ ret = _UTF2_init(xrl);
else
ret = EFTYPE;
+
if (ret == 0) {
- if (CachedRuneLocale != NULL) {
- /* See euc.c */
- if (strcmp(CachedRuneLocale->encoding, "EUC") == 0)
- free(CachedRuneLocale->variable);
- free(CachedRuneLocale);
+ (void)strcpy(xrl->__ctype_encoding, encoding);
+ XL_RELEASE(loc->__lc_ctype);
+ loc->__lc_ctype = xrl;
+ if (loc == &__global_locale) {
+ _CurrentRuneLocale = &loc->__lc_ctype->_CurrentRuneLocale;
+ __mb_cur_max = loc->__lc_ctype->__mb_cur_max;
+ __mb_sb_limit = loc->__lc_ctype->__mb_sb_limit;
}
- CachedRuneLocale = _CurrentRuneLocale;
- Cached__mb_cur_max = __mb_cur_max;
- (void)strcpy(ctype_encoding, encoding);
+ LOCK(cache_lock);
+ XL_RELEASE(CachedRuneLocale);
+ CachedRuneLocale = xrl;
+ XL_RETAIN(CachedRuneLocale);
+ UNLOCK(cache_lock);
} else
- free(rl);
+ XL_RELEASE(xrl);
return (ret);
}
+#ifdef UNIFDEF_LEGACY_RUNE_APIS
+int
+setrunelocale(const char *encoding)
+{
+ int ret;
+
+ XL_LOCK(&__global_locale);
+ ret = __setrunelocale(encoding, &__global_locale);
+ XL_UNLOCK(&__global_locale);
+ return ret;
+}
+#endif /* UNIFDEF_LEGACY_RUNE_APIS */
+
+__private_extern__ int
+__wrap_setrunelocale(const char *locale, locale_t loc)
+{
+ int ret = __setrunelocale(locale, loc);
+
+ if (ret != 0) {
+ errno = ret;
+ return (_LDP_ERROR);
+ }
+ return (_LDP_LOADED);
+}
+
projects / apple / libc.git / blobdiff