ad4dda469f
This patch contains changes to NetBSD libc code base to make it compile and work on Minix. Some of them are due to actual NetBSD libc bugs, as we're compiling it in non-reentrant mode and with a.out support, something not exactly frequent in NetBSD. Others are proper fixes to port it to Minix (mostly sa_len parameter missing in socket and a few mmap from files).
175 lines
5.3 KiB
C
175 lines
5.3 KiB
C
/* $NetBSD: setlocale.c,v 1.58 2010/06/07 13:52:30 tnozaki Exp $ */
|
|
|
|
/*-
|
|
* Copyright (c)2008 Citrus Project,
|
|
* All rights reserved.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 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.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
|
|
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
|
|
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
|
|
* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
|
|
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
|
|
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
|
|
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
|
|
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
|
|
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
|
|
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
|
|
* SUCH DAMAGE.
|
|
*/
|
|
|
|
#include <sys/cdefs.h>
|
|
#if defined(LIBC_SCCS) && !defined(lint)
|
|
__RCSID("$NetBSD: setlocale.c,v 1.58 2010/06/07 13:52:30 tnozaki Exp $");
|
|
#endif /* LIBC_SCCS and not lint */
|
|
|
|
#include <sys/types.h>
|
|
#include <locale.h>
|
|
#include <limits.h>
|
|
#include <paths.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <unistd.h>
|
|
|
|
#include "setlocale_local.h"
|
|
|
|
const char *_PathLocale = NULL;
|
|
|
|
__link_set_decl(all_categories, _locale_category_t);
|
|
|
|
extern const _locale_category_t _generic_LC_ALL_desc;
|
|
extern const _locale_category_t _dummy_LC_COLLATE_desc;
|
|
#ifdef WITH_RUNE
|
|
extern const _locale_category_t _citrus_LC_CTYPE_desc;
|
|
extern const _locale_category_t _citrus_LC_MONETARY_desc;
|
|
extern const _locale_category_t _citrus_LC_NUMERIC_desc;
|
|
extern const _locale_category_t _citrus_LC_TIME_desc;
|
|
extern const _locale_category_t _citrus_LC_MESSAGES_desc;
|
|
#else
|
|
extern const _locale_category_t _localeio_LC_CTYPE_desc;
|
|
extern const _locale_category_t _localeio_LC_MONETARY_desc;
|
|
extern const _locale_category_t _localeio_LC_NUMERIC_desc;
|
|
extern const _locale_category_t _localeio_LC_TIME_desc;
|
|
extern const _locale_category_t _localeio_LC_MESSAGES_desc;
|
|
#endif
|
|
|
|
#ifdef __minix
|
|
/* GNU binutils 2.x a.out support is rotten and link sets are not
|
|
supported. Workaround this by explicitely creating the structure
|
|
the linker was supposed to create. */
|
|
|
|
struct {
|
|
int __ls_length;
|
|
_locale_category_t *__ls_items[7];
|
|
} __link_set_all_categories = {
|
|
.__ls_length = 7,
|
|
.__ls_items = {
|
|
[0] = &_generic_LC_ALL_desc,
|
|
[1] = &_dummy_LC_COLLATE_desc,
|
|
#ifdef WITH_RUNE
|
|
[2] = &_citrus_LC_CTYPE_desc,
|
|
[3] = &_citrus_LC_MONETARY_desc,
|
|
[4] = &_citrus_LC_NUMERIC_desc,
|
|
[5] = &_citrus_LC_TIME_desc,
|
|
[6] = &_citrus_LC_MESSAGES_desc,
|
|
#else
|
|
[2] = &_localeio_LC_CTYPE_desc,
|
|
[3] = &_localeio_LC_MONETARY_desc,
|
|
[4] = &_localeio_LC_NUMERIC_desc,
|
|
[5] = &_localeio_LC_TIME_desc,
|
|
[6] = &_localeio_LC_MESSAGES_desc,
|
|
#endif
|
|
},
|
|
};
|
|
|
|
#endif /* __minix */
|
|
|
|
|
|
__link_set_add_data(all_categories, _generic_LC_ALL_desc);
|
|
__link_set_add_data(all_categories, _dummy_LC_COLLATE_desc);
|
|
#ifdef WITH_RUNE
|
|
__link_set_add_data(all_categories, _citrus_LC_CTYPE_desc);
|
|
__link_set_add_data(all_categories, _citrus_LC_MONETARY_desc);
|
|
__link_set_add_data(all_categories, _citrus_LC_NUMERIC_desc);
|
|
__link_set_add_data(all_categories, _citrus_LC_TIME_desc);
|
|
__link_set_add_data(all_categories, _citrus_LC_MESSAGES_desc);
|
|
#else
|
|
__link_set_add_data(all_categories, _localeio_LC_CTYPE_desc);
|
|
__link_set_add_data(all_categories, _localeio_LC_MONETARY_desc);
|
|
__link_set_add_data(all_categories, _localeio_LC_NUMERIC_desc);
|
|
__link_set_add_data(all_categories, _localeio_LC_TIME_desc);
|
|
__link_set_add_data(all_categories, _localeio_LC_MESSAGES_desc);
|
|
#endif
|
|
|
|
_locale_category_t *
|
|
_find_category(int category)
|
|
{
|
|
_locale_category_t * const *p;
|
|
|
|
__link_set_foreach(p, all_categories) {
|
|
if ((*p)->category == category)
|
|
return *p;
|
|
}
|
|
return NULL;
|
|
}
|
|
|
|
const char *
|
|
_get_locale_env(const char *category)
|
|
{
|
|
const char *name;
|
|
|
|
/* 1. check LC_ALL */
|
|
name = (const char *)getenv("LC_ALL");
|
|
if (name == NULL || *name == '\0') {
|
|
/* 2. check LC_* */
|
|
name = (const char *)getenv(category);
|
|
if (name == NULL || *name == '\0') {
|
|
/* 3. check LANG */
|
|
name = getenv("LANG");
|
|
}
|
|
}
|
|
if (name == NULL || *name == '\0' || strchr(name, '/'))
|
|
/* 4. if none is set, fall to "C" */
|
|
name = _C_LOCALE;
|
|
return name;
|
|
}
|
|
|
|
char *
|
|
__setlocale(int category, const char *name)
|
|
{
|
|
_locale_category_t *l;
|
|
struct _locale_impl_t *impl;
|
|
|
|
if (category >= LC_ALL && category < _LC_LAST) {
|
|
l = _find_category(category);
|
|
if (l != NULL) {
|
|
if (issetugid() || ((_PathLocale == NULL &&
|
|
(_PathLocale = getenv("PATH_LOCALE")) == NULL) ||
|
|
*_PathLocale == '\0'))
|
|
_PathLocale = _PATH_LOCALE;
|
|
impl = *_current_locale();
|
|
return __UNCONST((*l->setlocale)(name, impl));
|
|
}
|
|
}
|
|
return NULL;
|
|
}
|
|
|
|
|
|
char *
|
|
setlocale(int category, const char *locale)
|
|
{
|
|
|
|
/* locale may be NULL */
|
|
|
|
__mb_len_max_runtime = MB_LEN_MAX;
|
|
return __setlocale(category, locale);
|
|
}
|