aboutsummaryrefslogtreecommitdiff
path: root/locale/monetary.c
diff options
context:
space:
mode:
authorRoland McGrath <roland@gnu.org>1995-05-18 09:00:09 +0000
committerRoland McGrath <roland@gnu.org>1995-05-18 09:00:09 +0000
commit2b83a2a4d978012cdf78b648337c31091e20526d (patch)
tree6a5130b031f6815b6edbbb6e2b084c79ece15b1d /locale/monetary.c
parent4f6dc78a9237bb327a1d694635be9b0f50cc395e (diff)
downloadglibc-2b83a2a4d978012cdf78b648337c31091e20526d.tar
glibc-2b83a2a4d978012cdf78b648337c31091e20526d.tar.gz
glibc-2b83a2a4d978012cdf78b648337c31091e20526d.tar.bz2
glibc-2b83a2a4d978012cdf78b648337c31091e20526d.zip
Wed May 17 16:50:21 1995 Roland McGrath <roland@churchy.gnu.ai.mit.edu>
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".
Diffstat (limited to 'locale/monetary.c')
-rw-r--r--locale/monetary.c132
1 files changed, 132 insertions, 0 deletions
diff --git a/locale/monetary.c b/locale/monetary.c
new file mode 100644
index 0000000000..2683eb2bf0
--- /dev/null
+++ b/locale/monetary.c
@@ -0,0 +1,132 @@
+/* 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:
+ */