ccadf7b534
2004-03-14 Ulrich Drepper <drepper@redhat.com> Make the non-_l functions wrappers around the _l functions. * include/monetary.h: Declare __vstrmon_l. * include/string.h: Add libc_hidden_proto for __strcoll_l and __strxfrm_l. * include/time.h: Define ptime_locale_status. Declare __strptime_internal. * include/wchar.h: Add libc_hidden_proto for __wcscoll_l and __wcsxfrm_l. * stdlib/strfmon.c: Move the code to strfmon_l.c. Add little wrapper around __vstrfmon_l. * stdlib/strfmon_l.c: Add real implementation. Split into new function __vstrfmon_l to allow calling it from strfmon. * stdlib/strtod.c: Move real code to strtod_l.c and add wrapper. * stdlib/strtod_l.c: Add real implementation. * stdlib/strtof.c: Adjust to changed strtod.c. * stdlib/strtof_l.c: Include strtod_l.c now. * stdlib/strtold.c: New file. * stdlib/strtold_l.c: Removed. * string/strcoll.c: Move real code to strcoll_l.c: Add wrapper. * string/strcoll_l.c: Add real implementation. * string/strxfrm.c: Move real code to strxfrm_l.c: Add wrapper. * string/strxfrm_l.c: Add real implementation. * sysdeps/generic/strtol.c: Move real implementation to strtol_l.c. Add wrappers. * sysdeps/generic/strtol_l.c: Add real implementation. * sysdeps/generic/strtold.c: Removed. * sysdeps/generic/strtold_l.c: New file. * sysdeps/generic/strtoll_l.c: Include strtol_l.c now. Adjust #defines. * sysdeps/generic/strtoul_l.c: Likewise. * sysdeps/generic/strtoull_l.c: Likewise. * sysdeps/generic/wcstol_l.c: Likewise. * sysdeps/generic/wcstoll_l.c: Likewise. * sysdeps/generic/wcstoul_l.c: Likewise. * sysdeps/generic/wcstoull_l.c: Likewise. * sysdeps/ieee754/ldbl-128/strtold.c: Removed. * sysdeps/ieee754/ldbl-128/strtold_l.c: New file. * sysdeps/ieee754/ldbl-96/strtold.c: Removed. * sysdeps/ieee754/ldbl-96/strtold_l.c: New file. * sysdeps/m68k/strtold.c: Removed. * sysdeps/m68k/strtold_l.c: New file. * time/strftime.c: Move real code to strftime_l.c. Add wrapper. * time/strftime_l.c: Add real implementation. * time/strptime.c: Move real code to strptime_l.c. Add wrapper. * time/strptime_l.c: Add real implementation. * time/wcsftime.c: Simplify since only wrappers are defined in strftime.c. * time/wcsftime_l.c: Include strftime_l.c. * wcsmbs/wcscoll.c: Simplify since the file is not used by wcscoll_l.c anymore. * wcsmbs/wcscoll_l.c: Include strcoll_l.c. * wcsmbs/wcsxfrm.c: Simplify since the file is not used by wcsxfrm_l.c anymore. * wcsmbs/wcsxfrm_l.c: Include strxfrm_l.c. * wcsmbs/wcstod.c: Prepare to include new strtod.c. * wcsmbs/wcstod_l.c: Include strtod_l.c. * wcsmbs/wcstof.c: Prepare to include new strtof.c. * wcsmbs/wcstof_l.c: Include strtof_l.c. * wcsmbs/wcstold.c: Prepare to include new strtold.c. * wcsmbs/wcstold_l.c: Include strtold_l.c. * locale/uselocale.c: Use _NL_CURRENT_LOCALE instead of __libc_tsd_get. * sysdeps/generic/strcasecmp.c: Optimize a bit. It's better to get a reference to the current locale and then use the _l functions. * sysdeps/generic/strncase.c: Likewise.
74 lines
3.0 KiB
C
74 lines
3.0 KiB
C
/* uselocale -- fetch and set the current per-thread locale
|
|
Copyright (C) 2002, 2004 Free Software Foundation, Inc.
|
|
This file is part of the GNU C Library.
|
|
|
|
The GNU C Library is free software; you can redistribute it and/or
|
|
modify it under the terms of the GNU Lesser General Public
|
|
License as published by the Free Software Foundation; either
|
|
version 2.1 of the License, or (at your option) any later version.
|
|
|
|
The GNU C Library is distributed in the hope that it will be useful,
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
Lesser General Public License for more details.
|
|
|
|
You should have received a copy of the GNU Lesser General Public
|
|
License along with the GNU C Library; if not, write to the Free
|
|
Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
|
|
02111-1307 USA. */
|
|
|
|
#include <locale.h>
|
|
#include "localeinfo.h"
|
|
#include <ctype.h>
|
|
|
|
/* Switch the current thread's locale to DATASET.
|
|
If DATASET is null, instead just return the current setting.
|
|
The special value LC_GLOBAL_LOCALE is the initial setting
|
|
for all threads, and means the thread uses the global
|
|
setting controlled by `setlocale'. */
|
|
locale_t
|
|
__uselocale (locale_t newloc)
|
|
{
|
|
locale_t oldloc = _NL_CURRENT_LOCALE;
|
|
|
|
if (newloc != NULL)
|
|
{
|
|
const locale_t locobj
|
|
= newloc == LC_GLOBAL_LOCALE ? &_nl_global_locale : newloc;
|
|
__libc_tsd_set (LOCALE, locobj);
|
|
|
|
#ifdef NL_CURRENT_INDIRECT
|
|
/* Now we must update all the per-category thread-local variables to
|
|
point into the new current locale for this thread. The magic
|
|
symbols _nl_current_LC_FOO_used are defined to meaningless values
|
|
if _nl_current_LC_FOO was linked in. By using weak references to
|
|
both symbols and testing the address of _nl_current_LC_FOO_used,
|
|
we can avoid accessing the _nl_current_LC_FOO thread-local
|
|
variable at all when no code referring to it was linked in. We
|
|
need the special bogus symbol because while TLS symbols can be
|
|
weak, there is no reasonable way to test for the default-zero
|
|
value as with a heap symbol (taking the address would just use
|
|
some bogus offset from our thread pointer). */
|
|
|
|
# define DEFINE_CATEGORY(category, category_name, items, a) \
|
|
{ \
|
|
extern char _nl_current_##category##_used; \
|
|
weak_extern (_nl_current_##category##_used) \
|
|
weak_extern (_nl_current_##category) \
|
|
if (&_nl_current_##category##_used != 0) \
|
|
_nl_current_##category = &locobj->__locales[category]; \
|
|
}
|
|
# include "categories.def"
|
|
# undef DEFINE_CATEGORY
|
|
#endif
|
|
|
|
/* Update the special tsd cache of some locale data. */
|
|
__libc_tsd_set (CTYPE_B, (void *) locobj->__ctype_b);
|
|
__libc_tsd_set (CTYPE_TOLOWER, (void *) locobj->__ctype_tolower);
|
|
__libc_tsd_set (CTYPE_TOUPPER, (void *) locobj->__ctype_toupper);
|
|
}
|
|
|
|
return oldloc == &_nl_global_locale ? LC_GLOBAL_LOCALE : oldloc;
|
|
}
|
|
weak_alias (__uselocale, uselocale)
|