mirror of
https://sourceware.org/git/glibc.git
synced 2024-11-27 07:20:11 +00:00
2b83a2a4d9
Merged 1003.2 locale and localedef programs by Ulrich Drepper. * locale/charmap.c: New file. * locale/collate.c: New file. * locale/config.h: New file. * locale/ctype.c: New file. * locale/ctypedump.c: New file. * locale/hash.c: New file. * locale/hash.h: New file. * locale/iso-4217.def: New file. * locale/keyword.gperf: New file. * locale/keyword.h: New file. * locale/libintl.h: New file. * locale/locale.c: New file. * locale/localedef.c: New file. * locale/localedef.h: New file. * locale/locfile-lex.c: New file. * locale/locfile-parse.c: New file. * locale/messages.c: New file. * locale/monetary.c: New file. * locale/numeric.c: New file. * locale/token.h: New file. * posix/regex.c, posix/regex.h: New files, incorporated from GNU regex. * posix/Makefile (headers): Add regex.h. (routines): Add regex. (gpl2lgpl): Add regex.c and regex.h. Tue May 16 17:35:07 1995 Roland McGrath <roland@churchy.gnu.ai.mit.edu> * locale/loadlocale.c: Expect macro LOCALE_PATH to be defined, instead of hard-coding "/share/locale".
133 lines
3.8 KiB
C
133 lines
3.8 KiB
C
/* Copyright (C) 1995 Free Software Foundation, Inc.
|
|
|
|
The GNU C Library is free software; you can redistribute it and/or
|
|
modify it under the terms of the GNU Library General Public License as
|
|
published by the Free Software Foundation; either version 2 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
|
|
Library General Public License for more details.
|
|
|
|
You should have received a copy of the GNU Library General Public
|
|
License along with the GNU C Library; see the file COPYING.LIB. If
|
|
not, write to the Free Software Foundation, Inc., 675 Mass Ave,
|
|
Cambridge, MA 02139, USA. */
|
|
|
|
#include <langinfo.h>
|
|
#include <libintl.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
|
|
#include "localedef.h"
|
|
#include "token.h"
|
|
|
|
|
|
/* The content iof the field int_curr_symbol has to be taken from
|
|
ISO-4217. We test for correct values. */
|
|
#define DEFINE_INT_CURR(str) str,
|
|
static const char *const valid_int_curr[] =
|
|
{
|
|
# include "iso-4217.def"
|
|
};
|
|
#define NVALID_INT_CURR ((sizeof (valid_int_curr) \
|
|
/ sizeof (valid_int_curr[0])))
|
|
#undef DEFINE_INT_CURR
|
|
|
|
|
|
/* These are defined in locfile-parse.c. */
|
|
extern struct cat_item LC_MONETARY_desc[];
|
|
extern char *LC_MONETARY_values[];
|
|
|
|
static int _curr_strcmp(const char *s1, const char **s2);
|
|
|
|
|
|
|
|
void
|
|
monetary_check(void)
|
|
{
|
|
int item_no, val;
|
|
|
|
for (item_no = 0; LC_MONETARY_desc[item_no].item_id != 0; ++item_no)
|
|
/* Test whether the entry has been defined. Byte values are simply
|
|
stored. */
|
|
if (LC_MONETARY_values[item_no] == NULL)
|
|
{
|
|
int errcode;
|
|
|
|
errcode = LC_MONETARY_desc[item_no].status = std ? 5 : 0;
|
|
|
|
error (errcode, 0, gettext ("item `%s' of category `%s' undefined"),
|
|
LC_MONETARY_desc[item_no].name, "LC_MONETARY");
|
|
}
|
|
else
|
|
switch (LC_MONETARY_desc[item_no].item_id)
|
|
{
|
|
case INT_CURR_SYMBOL:
|
|
if (strlen (LC_MONETARY_values[item_no]) != 4)
|
|
error (0, 0,
|
|
gettext ("item `%s' of category `%s' has wrong length"),
|
|
LC_MONETARY_desc[item_no].name, "LC_MONETARY");
|
|
else if (bsearch (LC_MONETARY_values[item_no], valid_int_curr,
|
|
NVALID_INT_CURR, sizeof (char *),
|
|
(comparison_fn_t) _curr_strcmp) == NULL)
|
|
error (0, 0, gettext ("item `%s' does not correspond to any "
|
|
"valid name in ISO-4217"),
|
|
LC_MONETARY_desc[item_no].name);
|
|
break;
|
|
case P_CS_PRECEDES:
|
|
case P_SEP_BY_SPACE:
|
|
case N_CS_PRECEDES:
|
|
case N_SEP_BY_SPACE:
|
|
case P_SIGN_POSN:
|
|
case N_SIGN_POSN:
|
|
val = (int) *(char *) LC_MONETARY_values[item_no];
|
|
if (val < LC_MONETARY_desc[item_no].min
|
|
|| val > LC_MONETARY_desc[item_no].max)
|
|
error (0, 0, gettext ("value for item `%s' in category `%s' "
|
|
"must be in range %d...%d"),
|
|
LC_MONETARY_desc[item_no].name, "LC_MONETARY",
|
|
LC_MONETARY_desc[item_no].min,
|
|
LC_MONETARY_desc[item_no].max);
|
|
break;
|
|
case MON_DECIMAL_POINT:
|
|
/* The decimal point must not be empty. This is not said
|
|
explicitly in POSIX but ANSI C (ISO/IEC 9899) says in
|
|
4.4.2.1 it has to be != "". */
|
|
if (LC_MONETARY_values[item_no][0] == '\0')
|
|
error (0, 0,
|
|
gettext ("item `%s' in category `%s' must not be empty"),
|
|
LC_MONETARY_desc[item_no].name, "LC_MONETARY");
|
|
break;
|
|
case CURRENCY_SYMBOL:
|
|
case MON_THOUSANDS_SEP:
|
|
case MON_GROUPING:
|
|
case POSITIVE_SIGN:
|
|
case NEGATIVE_SIGN:
|
|
case INT_FRAC_DIGITS:
|
|
case FRAC_DIGITS:
|
|
/* Everything is ok for these values. */
|
|
break;
|
|
default:
|
|
error (5, 0, gettext ("Internal error in %s, line %u"),
|
|
__FUNCTION__, __LINE__);
|
|
/* NOTREACHED */
|
|
}
|
|
|
|
}
|
|
|
|
|
|
static int
|
|
_curr_strcmp(const char *s1, const char **s2)
|
|
{
|
|
return strcmp (s1, *s2);
|
|
}
|
|
|
|
/*
|
|
* Local Variables:
|
|
* mode:c
|
|
* c-basic-offset:2
|
|
* End:
|
|
*/
|