static int __setrunelocale(const char *encoding) { FILE *fp; _RuneLocale *rl; int saverr, ret; __crystax_locale_data_t *ld; size_t (*old__mbrtowc)(wchar_t * __restrict, const char * __restrict, size_t, mbstate_t * __restrict); size_t (*old__wcrtomb)(char * __restrict, wchar_t, mbstate_t * __restrict); int (*old__mbsinit)(const mbstate_t *); size_t (*old__mbsnrtowcs)(wchar_t * __restrict, const char ** __restrict, size_t, size_t, mbstate_t * __restrict); size_t (*old__wcsnrtombs)(char * __restrict, const wchar_t ** __restrict, size_t, size_t, mbstate_t * __restrict); static char ctype_encoding[ENCODING_LEN + 1]; static _RuneLocale *CachedRuneLocale; static int Cached__mb_cur_max; static int Cached__mb_sb_limit; static size_t (*Cached__mbrtowc)(wchar_t * __restrict, const char * __restrict, size_t, mbstate_t * __restrict); static size_t (*Cached__wcrtomb)(char * __restrict, wchar_t, mbstate_t * __restrict); static int (*Cached__mbsinit)(const mbstate_t *); static size_t (*Cached__mbsnrtowcs)(wchar_t * __restrict, const char ** __restrict, size_t, size_t, mbstate_t * __restrict); static size_t (*Cached__wcsnrtombs)(char * __restrict, const wchar_t ** __restrict, size_t, size_t, mbstate_t * __restrict); DBG("encoding=%s", encoding); /* * The "C" and "POSIX" locale are always here. */ if (strcmp(encoding, "C") == 0 || strcmp(encoding, "POSIX") == 0) { (void) _none_init(&_DefaultRuneLocale); return (0); } /* * If the locale name is the same as our cache, use the cache. */ if (CachedRuneLocale != NULL && strcmp(encoding, ctype_encoding) == 0) { DBG("use cached locale"); _CurrentRuneLocale = CachedRuneLocale; __mb_cur_max = Cached__mb_cur_max; __mb_sb_limit = Cached__mb_sb_limit; __mbrtowc = Cached__mbrtowc; __mbsinit = Cached__mbsinit; __mbsnrtowcs = Cached__mbsnrtowcs; __wcrtomb = Cached__wcrtomb; __wcsnrtombs = Cached__wcsnrtombs; return (0); } /* * Slurp the locale file into the cache. */ ld = __crystax_locale_get_data(LC_CTYPE, encoding); if (ld == NULL) return (errno == 0 ? ENOENT : errno); if ((rl = _Read_RuneMagi(ld->data, ld->size)) == NULL) return (errno == 0 ? EFTYPE : errno); old__mbrtowc = __mbrtowc; old__mbsinit = __mbsinit; old__mbsnrtowcs = __mbsnrtowcs; old__wcrtomb = __wcrtomb; old__wcsnrtombs = __wcsnrtombs; DBG("set std functions"); __mbrtowc = NULL; __mbsinit = NULL; __mbsnrtowcs = __mbsnrtowcs_std; __wcrtomb = NULL; __wcsnrtombs = __wcsnrtombs_std; rl->__sputrune = NULL; rl->__sgetrune = NULL; if (strcmp(rl->__encoding, "NONE") == 0) ret = _none_init(rl); else if (strcmp(rl->__encoding, "ASCII") == 0) ret = _ascii_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, "GB18030") == 0) ret = _GB18030_init(rl); else if (strcmp(rl->__encoding, "GB2312") == 0) ret = _GB2312_init(rl); else if (strcmp(rl->__encoding, "GBK") == 0) ret = _GBK_init(rl); else if (strcmp(rl->__encoding, "BIG5") == 0) ret = _BIG5_init(rl); else if (strcmp(rl->__encoding, "MSKanji") == 0) ret = _MSKanji_init(rl); else ret = EFTYPE; if (ret == 0) { if (CachedRuneLocale != NULL) { /* See euc.c */ if (strcmp(CachedRuneLocale->__encoding, "EUC") == 0) free(CachedRuneLocale->__variable); free(CachedRuneLocale); } CachedRuneLocale = _CurrentRuneLocale; Cached__mb_cur_max = __mb_cur_max; Cached__mb_sb_limit = __mb_sb_limit; Cached__mbrtowc = __mbrtowc; Cached__mbsinit = __mbsinit; Cached__mbsnrtowcs = __mbsnrtowcs; Cached__wcrtomb = __wcrtomb; Cached__wcsnrtombs = __wcsnrtombs; (void)strcpy(ctype_encoding, encoding); } else { DBG("restore old functions"); __mbrtowc = old__mbrtowc; __mbsinit = old__mbsinit; __mbsnrtowcs = old__mbsnrtowcs; __wcrtomb = old__wcrtomb; __wcsnrtombs = old__wcsnrtombs; free(rl); } return (ret); }
static int __setrunelocale(const char *encoding) { FILE *fp; char name[PATH_MAX]; _RuneLocale *rl; int saverr, ret; size_t (*old__mbrtowc)(wchar_t * __restrict, const char * __restrict, size_t, mbstate_t * __restrict); size_t (*old__wcrtomb)(char * __restrict, wchar_t, mbstate_t * __restrict); int (*old__mbsinit)(const mbstate_t *); size_t (*old__mbsnrtowcs)(wchar_t * __restrict, const char ** __restrict, size_t, size_t, mbstate_t * __restrict); size_t (*old__wcsnrtombs)(char * __restrict, const wchar_t ** __restrict, size_t, size_t, mbstate_t * __restrict); static char ctype_encoding[ENCODING_LEN + 1]; static _RuneLocale *CachedRuneLocale; static int Cached__mb_cur_max; static int Cached__mb_sb_limit; static size_t (*Cached__mbrtowc)(wchar_t * __restrict, const char * __restrict, size_t, mbstate_t * __restrict); static size_t (*Cached__wcrtomb)(char * __restrict, wchar_t, mbstate_t * __restrict); static int (*Cached__mbsinit)(const mbstate_t *); static size_t (*Cached__mbsnrtowcs)(wchar_t * __restrict, const char ** __restrict, size_t, size_t, mbstate_t * __restrict); static size_t (*Cached__wcsnrtombs)(char * __restrict, const wchar_t ** __restrict, size_t, size_t, mbstate_t * __restrict); /* * The "C" and "POSIX" locale are always here. */ if (strcmp(encoding, "C") == 0 || strcmp(encoding, "POSIX") == 0) { (void) _none_init(&_DefaultRuneLocale); return (0); } /* * If the locale name is the same as our cache, use the cache. */ if (CachedRuneLocale != NULL && strcmp(encoding, ctype_encoding) == 0) { _CurrentRuneLocale = CachedRuneLocale; __mb_cur_max = Cached__mb_cur_max; __mb_sb_limit = Cached__mb_sb_limit; __mbrtowc = Cached__mbrtowc; __mbsinit = Cached__mbsinit; __mbsnrtowcs = Cached__mbsnrtowcs; __wcrtomb = Cached__wcrtomb; __wcsnrtombs = Cached__wcsnrtombs; return (0); } /* * Slurp the locale file into the cache. */ /* Range checking not needed, encoding length already checked before */ (void) strcpy(name, _PathLocale); (void) strcat(name, "/"); (void) strcat(name, encoding); (void) strcat(name, "/LC_CTYPE"); if ((fp = fopen(name, "r")) == NULL) return (errno == 0 ? ENOENT : errno); if ((rl = _Read_RuneMagi(fp)) == NULL) { saverr = (errno == 0 ? EFTYPE : errno); (void)fclose(fp); return (saverr); } (void)fclose(fp); old__mbrtowc = __mbrtowc; old__mbsinit = __mbsinit; old__mbsnrtowcs = __mbsnrtowcs; old__wcrtomb = __wcrtomb; old__wcsnrtombs = __wcsnrtombs; __mbrtowc = NULL; __mbsinit = NULL; __mbsnrtowcs = __mbsnrtowcs_std; __wcrtomb = NULL; __wcsnrtombs = __wcsnrtombs_std; rl->__sputrune = NULL; rl->__sgetrune = NULL; if (strcmp(rl->__encoding, "NONE") == 0) ret = _none_init(rl); else if (strcmp(rl->__encoding, "ASCII") == 0) ret = _ascii_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, "GB18030") == 0) ret = _GB18030_init(rl); else if (strcmp(rl->__encoding, "GB2312") == 0) ret = _GB2312_init(rl); else if (strcmp(rl->__encoding, "GBK") == 0) ret = _GBK_init(rl); else if (strcmp(rl->__encoding, "BIG5") == 0) ret = _BIG5_init(rl); else if (strcmp(rl->__encoding, "MSKanji") == 0) ret = _MSKanji_init(rl); else ret = EFTYPE; if (ret == 0) { if (CachedRuneLocale != NULL) { /* See euc.c */ if (strcmp(CachedRuneLocale->__encoding, "EUC") == 0) free(CachedRuneLocale->__variable); free(CachedRuneLocale); } CachedRuneLocale = _CurrentRuneLocale; Cached__mb_cur_max = __mb_cur_max; Cached__mb_sb_limit = __mb_sb_limit; Cached__mbrtowc = __mbrtowc; Cached__mbsinit = __mbsinit; Cached__mbsnrtowcs = __mbsnrtowcs; Cached__wcrtomb = __wcrtomb; Cached__wcsnrtombs = __wcsnrtombs; (void)strcpy(ctype_encoding, encoding); } else { __mbrtowc = old__mbrtowc; __mbsinit = old__mbsinit; __mbsnrtowcs = old__mbsnrtowcs; __wcrtomb = old__wcrtomb; __wcsnrtombs = old__wcsnrtombs; free(rl); } return (ret); }
static int __setrunelocale(struct xlocale_ctype *l, const char *encoding) { FILE *fp; char name[PATH_MAX]; _RuneLocale *rl; int saverr, ret; struct xlocale_ctype saved = *l; /* * The "C" and "POSIX" locale are always here. */ if (strcmp(encoding, "C") == 0 || strcmp(encoding, "POSIX") == 0) { free_runes(saved.runes); (void) _none_init(l, (_RuneLocale*)&_DefaultRuneLocale); return (0); } /* Range checking not needed, encoding length already checked before */ (void) strcpy(name, _PathLocale); (void) strcat(name, "/"); (void) strcat(name, encoding); (void) strcat(name, "/LC_CTYPE"); if ((fp = fopen(name, "re")) == NULL) return (errno == 0 ? ENOENT : errno); if ((rl = _Read_RuneMagi(fp)) == NULL) { saverr = (errno == 0 ? EFTYPE : errno); (void)fclose(fp); return (saverr); } (void)fclose(fp); l->__mbrtowc = NULL; l->__mbsinit = NULL; l->__mbsnrtowcs = __mbsnrtowcs_std; l->__wcrtomb = NULL; l->__wcsnrtombs = __wcsnrtombs_std; rl->__sputrune = NULL; rl->__sgetrune = NULL; if (strcmp(rl->__encoding, "NONE") == 0) ret = _none_init(l, rl); else if (strcmp(rl->__encoding, "ASCII") == 0) ret = _ascii_init(l, rl); else if (strcmp(rl->__encoding, "UTF-8") == 0) ret = _UTF8_init(l, rl); else if (strcmp(rl->__encoding, "EUC") == 0) ret = _EUC_init(l, rl); else if (strcmp(rl->__encoding, "GB18030") == 0) ret = _GB18030_init(l, rl); else if (strcmp(rl->__encoding, "GB2312") == 0) ret = _GB2312_init(l, rl); else if (strcmp(rl->__encoding, "GBK") == 0) ret = _GBK_init(l, rl); else if (strcmp(rl->__encoding, "BIG5") == 0) ret = _BIG5_init(l, rl); else if (strcmp(rl->__encoding, "MSKanji") == 0) ret = _MSKanji_init(l, rl); else ret = EFTYPE; if (ret == 0) { /* Free the old runes if it exists. */ free_runes(saved.runes); } else { /* Restore the saved version if this failed. */ memcpy(l, &saved, sizeof(struct xlocale_ctype)); free(rl); } return (ret); }
static int __setrunelocale(struct xlocale_ctype *l, const char *encoding) { _RuneLocale *rl; int ret; char *path; struct xlocale_ctype saved = *l; /* * The "C" and "POSIX" locale are always here. */ if (strcmp(encoding, "C") == 0 || strcmp(encoding, "POSIX") == 0) { free_runes(saved.runes); (void) _none_init(l, (_RuneLocale*)&_DefaultRuneLocale); return (0); } /* Range checking not needed, encoding length already checked before */ asprintf(&path, "%s/%s/LC_CTYPE", _PathLocale, encoding); if (path == NULL) return (0); if ((rl = _Read_RuneMagi(path)) == NULL) { free(path); errno = EINVAL; return (errno); } free(path); l->__mbrtowc = NULL; l->__mbsinit = NULL; l->__mbsnrtowcs = NULL; l->__wcrtomb = NULL; l->__wcsnrtombs = NULL; rl->__sputrune = NULL; rl->__sgetrune = NULL; if (strcmp(rl->__encoding, "NONE:US-ASCII") == 0) ret = _ascii_init(l, rl); else if (strncmp(rl->__encoding, "NONE", 4) == 0) ret = _none_init(l, rl); else if (strcmp(rl->__encoding, "UTF-8") == 0) ret = _UTF8_init(l, rl); else if (strcmp(rl->__encoding, "EUC-CN") == 0) ret = _EUC_CN_init(l, rl); else if (strcmp(rl->__encoding, "EUC-JP") == 0) ret = _EUC_JP_init(l, rl); else if (strcmp(rl->__encoding, "EUC-KR") == 0) ret = _EUC_KR_init(l, rl); else if (strcmp(rl->__encoding, "EUC-TW") == 0) ret = _EUC_TW_init(l, rl); else if (strcmp(rl->__encoding, "GB18030") == 0) ret = _GB18030_init(l, rl); else if (strcmp(rl->__encoding, "GB2312") == 0) ret = _GB2312_init(l, rl); else if (strcmp(rl->__encoding, "GBK") == 0) ret = _GBK_init(l, rl); else if (strcmp(rl->__encoding, "BIG5") == 0) ret = _BIG5_init(l, rl); else if (strcmp(rl->__encoding, "MSKanji") == 0) ret = _MSKanji_init(l, rl); else ret = EFTYPE; if (ret == 0) { /* Free the old runes if it exists. */ free_runes(saved.runes); } else { /* Restore the saved version if this failed. */ memcpy(l, &saved, sizeof(struct xlocale_ctype)); free(rl); } return (ret); }