diff options
author | Ulrich Drepper <drepper@redhat.com> | 2000-07-25 04:37:22 +0000 |
---|---|---|
committer | Ulrich Drepper <drepper@redhat.com> | 2000-07-25 04:37:22 +0000 |
commit | ef4461440540e0ad4e25ba35203594e25dc38b3a (patch) | |
tree | 6b454c8f044abd370ab99f5e7f05f34b98d13fb6 /wctype/wcfuncs.c | |
parent | f79d99cb260028d1eae399c99f8cee645a32538f (diff) | |
download | glibc-ef4461440540e0ad4e25ba35203594e25dc38b3a.tar.gz glibc-ef4461440540e0ad4e25ba35203594e25dc38b3a.tar.xz glibc-ef4461440540e0ad4e25ba35203594e25dc38b3a.zip |
Update.
2000-07-23 Bruno Haible <haible@clisp.cons.org> * wctype/wchar-lookup.h: New file. * wctype/iswctype.c: Include "wchar-lookup.h". (__iswctype): Support alternate locale format with 3-level tables. * wctype/iswctype_l.c (__iswctype_l): Likewise. * wctype/towctrans.c (__towctrans): Likewise. * wctype/towctrans_l.c (__towctrans_l): Likewise. * wctype/wcfuncs.c: Include "wchar-lookup.h". (__ctype32_wctype, __ctype32_wctrans): Declare external. (__iswalnum, __iswalpha, __iswcntrl, __iswdigit, __iswlower, __iswgraph, __iswprint, __iswpunct, __iswspace, __iswupper, __iswxdigit, towlower, towupper): Support alternate locale format with 3-level tables. * wctype/wcextra.c (iswblank): Likewise. * wctype/wcfuncs_l.c: Include "wchar-lookup.h". (__iswalnum_l, __iswalpha_l, __iswcntrl_l, __iswdigit_l, __iswlower_l, __iswgraph_l, __iswprint_l, __iswpunct_l, __iswspace_l, __iswupper_l, __iswxdigit_l, __towlower_l, __towupper_l): Support alternate locale format with 3-level tables. * wctype/wcextra_l.c (__iswblank_l): Likewise. * wctype/wctype.c (__wctype): Likewise. In the alternate locale format, return a 3-level table pointer. * wctype/wctype_l.c (__wctype_l): Likewise. * wctype/wctrans.c (wctrans): Likewise. * wctype/wctype.h (__ISwupper, __ISwlower, __ISwalpha, __ISwdigit, __ISwxdigit, __ISwspace, __ISwprint, __ISwgraph, __ISwblank, __ISwcntrl, __ISwpunct, __ISwalnum): New enum values. (iswctype): Remove macro definition. * wcsmbs/wcwidth.h: Include "wchar-lookup.h". (internal_wcwidth): Support alternate locale format with 3-level tables. * locale/langinfo.h (_NL_CTYPE_CLASS_OFFSET, _NL_CTYPE_MAP_OFFSET): New nl_items. * locale/categories.def (_NL_CTYPE_CLASS_OFFSET, _NL_CTYPE_MAP_OFFSET): Define them as being type "word". * locale/C-ctype.c (_nl_C_LC_CTYPE): Add initializers for them. * ctype/ctype-info.c (__ctype32_wctype, __ctype32_wctrans, __ctype32_width): New exported variables. * locale/lc-ctype.c (_nl_postload_ctype): Initialize them in the alternate locale format. Don't initialize __ctype_names and __ctype_width in the alternate locale format. * locale/programs/localedef.h (oldstyle_tables): New declaration. * locale/programs/localedef.c (oldstyle_tables): New variable. (OPT_OLDSTYLE): New macro. (options): Add --old-style option. (parse_opt): Handle --old-style option. * locale/programs/ld-ctype.c (locale_ctype_t): Add class_offset, map_offset, class_3level, map_3level, width_3level members. (ctype_output): Support for alternate locale format: Computation of nelems changes. _NL_CTYPE_TOUPPER32, _NL_CTYPE_TOLOWER32 and _NL_CTYPE_CLASS32 only 256 characters. _NL_CTYPE_NAMES empty. New fields _NL_CTYPE_CLASS_OFFSET, _NL_CTYPE_MAP_OFFSET. Field _NL_CTYPE_WIDTH now contains the three-level table. Extra elems now contain both class and map tables. (struct wctype_table): New type. (wctype_table_init, wctype_table_add, wctype_table_finalize): New functions. (struct wcwidth_table): New type. (wcwidth_table_init, wcwidth_table_add, wcwidth_table_finalize): New functions. (struct wctrans_table): New type. (wctrans_table_init, wctrans_table_add, wctrans_table_finalize): New functions. (allocate_arrays): Support for alternate locale format: Set plane_size and plane_cnt to 0. Restrict ctype->ctype32_b to the first 256 characters. Compute ctype->class_3level. Restrict ctype->map32[idx] to the first 256 characters. Compute ctype->map_3level. Set ctype->class_offset and ctype->map_offset. Compute ctype->width_3level instead of ctype->width.
Diffstat (limited to 'wctype/wcfuncs.c')
-rw-r--r-- | wctype/wcfuncs.c | 94 |
1 files changed, 62 insertions, 32 deletions
diff --git a/wctype/wcfuncs.c b/wctype/wcfuncs.c index fdb5dc7a70..f241ed5587 100644 --- a/wctype/wcfuncs.c +++ b/wctype/wcfuncs.c @@ -21,6 +21,7 @@ #include <ctype.h> /* For __ctype_tolower and __ctype_toupper. */ #include "cname-lookup.h" +#include "wchar-lookup.h" /* If the program is compiled without optimization the following declaration is not visible in the header. */ @@ -29,6 +30,8 @@ extern unsigned int *__ctype32_b; /* These are not exported. */ extern const uint32_t *__ctype32_toupper; extern const uint32_t *__ctype32_tolower; +extern const char *__ctype32_wctype[12]; +extern const char *__ctype32_wctrans[2]; /* Provide real-function versions of all the wctype macros. */ @@ -36,63 +39,90 @@ extern const uint32_t *__ctype32_tolower; int \ __##name (wint_t wc) \ { \ - size_t idx; \ + if (_NL_CURRENT_WORD (LC_CTYPE, _NL_CTYPE_HASH_SIZE) != 0) \ + { \ + /* Old locale format. */ \ + size_t idx; \ \ - idx = cname_lookup (wc); \ - if (idx == ~((size_t) 0)) \ - return 0; \ + idx = cname_lookup (wc); \ + if (idx == ~((size_t) 0)) \ + return 0; \ \ - return __ctype32_b[idx] & type; \ + return __ctype32_b[idx] & _ISwbit (type); \ + } \ + else \ + { \ + /* New locale format. */ \ + return wctype_table_lookup (__ctype32_wctype[type], wc); \ + } \ } \ weak_alias (__##name, name) #undef iswalnum -func (iswalnum, _ISwalnum) +func (iswalnum, __ISwalnum) #undef iswalpha -func (iswalpha, _ISwalpha) +func (iswalpha, __ISwalpha) #undef iswcntrl -func (iswcntrl, _ISwcntrl) +func (iswcntrl, __ISwcntrl) #undef iswdigit -func (iswdigit, _ISwdigit) +func (iswdigit, __ISwdigit) #undef iswlower -func (iswlower, _ISwlower) +func (iswlower, __ISwlower) #undef iswgraph -func (iswgraph, _ISwgraph) +func (iswgraph, __ISwgraph) #undef iswprint -func (iswprint, _ISwprint) +func (iswprint, __ISwprint) #undef iswpunct -func (iswpunct, _ISwpunct) +func (iswpunct, __ISwpunct) #undef iswspace -func (iswspace, _ISwspace) +func (iswspace, __ISwspace) #undef iswupper -func (iswupper, _ISwupper) +func (iswupper, __ISwupper) #undef iswxdigit -func (iswxdigit, _ISwxdigit) +func (iswxdigit, __ISwxdigit) wint_t (towlower) (wc) wint_t wc; { - size_t idx; - - idx = cname_lookup (wc); - if (idx == ~((size_t) 0)) - /* Character is not known. Default action is to simply return it. */ - return wc; - - return (wint_t) __ctype32_tolower[idx]; + if (_NL_CURRENT_WORD (LC_CTYPE, _NL_CTYPE_HASH_SIZE) != 0) + { + /* Old locale format. */ + size_t idx; + + idx = cname_lookup (wc); + if (idx == ~((size_t) 0)) + /* Character is not known. Default action is to simply return it. */ + return wc; + + return (wint_t) __ctype32_tolower[idx]; + } + else + { + /* New locale format. */ + return wctrans_table_lookup (__ctype32_wctrans[1], wc); + } } wint_t (towupper) (wc) wint_t wc; { - size_t idx; - - idx = cname_lookup (wc); - if (idx == ~((size_t) 0)) - /* Character is not known. Default action is to simply return it. */ - return wc; - - return (wint_t) __ctype32_toupper[idx]; + if (_NL_CURRENT_WORD (LC_CTYPE, _NL_CTYPE_HASH_SIZE) != 0) + { + /* Old locale format. */ + size_t idx; + + idx = cname_lookup (wc); + if (idx == ~((size_t) 0)) + /* Character is not known. Default action is to simply return it. */ + return wc; + + return (wint_t) __ctype32_toupper[idx]; + } + else + { + /* New locale format. */ + return wctrans_table_lookup (__ctype32_wctrans[0], wc); + } } |