diff options
Diffstat (limited to 'REORG.TODO/locale/duplocale.c')
| -rw-r--r-- | REORG.TODO/locale/duplocale.c | 89 |
1 files changed, 89 insertions, 0 deletions
diff --git a/REORG.TODO/locale/duplocale.c b/REORG.TODO/locale/duplocale.c new file mode 100644 index 0000000000..07c2c58646 --- /dev/null +++ b/REORG.TODO/locale/duplocale.c @@ -0,0 +1,89 @@ +/* Duplicate handle for selection of locales. + Copyright (C) 1997-2017 Free Software Foundation, Inc. + This file is part of the GNU C Library. + Contributed by Ulrich Drepper <drepper@cygnus.com>, 1997. + + 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, see + <http://www.gnu.org/licenses/>. */ + +#include <locale.h> +#include <libc-lock.h> +#include <stdlib.h> +#include <string.h> + +#include <localeinfo.h> + + +/* Lock for protecting global data. */ +__libc_rwlock_define (extern , __libc_setlocale_lock attribute_hidden) + + +__locale_t +__duplocale (__locale_t dataset) +{ + /* This static object is returned for newlocale (LC_ALL_MASK, "C"). */ + if (dataset == _nl_C_locobj_ptr) + return dataset; + + /* Handle a special value. */ + if (dataset == LC_GLOBAL_LOCALE) + dataset = &_nl_global_locale; + + __locale_t result; + int cnt; + size_t names_len = 0; + + /* Calculate the total space we need to store all the names. */ + for (cnt = 0; cnt < __LC_LAST; ++cnt) + if (cnt != LC_ALL && dataset->__names[cnt] != _nl_C_name) + names_len += strlen (dataset->__names[cnt]) + 1; + + /* Get memory. */ + result = malloc (sizeof (struct __locale_struct) + names_len); + + if (result != NULL) + { + char *namep = (char *) (result + 1); + + /* We modify global data (the usage counts). */ + __libc_rwlock_wrlock (__libc_setlocale_lock); + + for (cnt = 0; cnt < __LC_LAST; ++cnt) + if (cnt != LC_ALL) + { + result->__locales[cnt] = dataset->__locales[cnt]; + if (result->__locales[cnt]->usage_count < MAX_USAGE_COUNT) + ++result->__locales[cnt]->usage_count; + + if (dataset->__names[cnt] == _nl_C_name) + result->__names[cnt] = _nl_C_name; + else + { + result->__names[cnt] = namep; + namep = __stpcpy (namep, dataset->__names[cnt]) + 1; + } + } + + /* Update the special members. */ + result->__ctype_b = dataset->__ctype_b; + result->__ctype_tolower = dataset->__ctype_tolower; + result->__ctype_toupper = dataset->__ctype_toupper; + + /* It's done. */ + __libc_rwlock_unlock (__libc_setlocale_lock); + } + + return result; +} +weak_alias (__duplocale, duplocale) |