a209c3ae12
This patch fixes most of current reasons to generate compiler warnings.
The changes consist of:
- adding missing casts
- hiding or unhiding function declarations
- including headers where missing
- add __UNCONST when assigning a const char * to a char *
- adding missing return statements
- changing some types from unsigned to signed, as the code seems to want
signed ints
- converting old-style function definitions to current style (i.e.,
void func(param1, param2) short param1, param2; {...} to
void func (short param1, short param2) {...})
- making the compiler silent about signed vs unsigned comparisons. We
have too many of those in the new libc to fix.
A number of bugs in the test set were fixed. These bugs were never
triggered with our old libc. Consequently, these tests are now forced to
link with the new libc or they will generate errors (in particular tests 43
and 55).
Most changes in NetBSD libc are limited to moving aroudn "#ifndef __minix"
or stuff related to Minix-specific things (code in sys-minix or gen/minix).
173 lines
5.4 KiB
C
173 lines
5.4 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] = __UNCONST(&_generic_LC_ALL_desc),
|
|
[1] = __UNCONST(&_dummy_LC_COLLATE_desc),
|
|
#ifdef WITH_RUNE
|
|
[2] = __UNCONST(&_citrus_LC_CTYPE_desc),
|
|
[3] = __UNCONST(&_citrus_LC_MONETARY_desc),
|
|
[4] = __UNCONST(&_citrus_LC_NUMERIC_desc),
|
|
[5] = __UNCONST(&_citrus_LC_TIME_desc),
|
|
[6] = __UNCONST(&_citrus_LC_MESSAGES_desc),
|
|
#else
|
|
[2] = __UNCONST(&_localeio_LC_CTYPE_desc),
|
|
[3] = __UNCONST(&_localeio_LC_MONETARY_desc),
|
|
[4] = __UNCONST(&_localeio_LC_NUMERIC_desc),
|
|
[5] = __UNCONST(&_localeio_LC_TIME_desc),
|
|
[6] = __UNCONST(&_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);
|
|
}
|