New file.
[kopensolaris-gnu/glibc.git] / locale / nl_langinfo.c
1 /* nl_langinfo -- User interface for extracting locale-dependent parameters.
2 Copyright (C) 1995 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
4
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Library General Public License as
7 published by the Free Software Foundation; either version 2 of the
8 License, or (at your option) any later version.
9
10 The GNU C Library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13 Library General Public License for more details.
14
15 You should have received a copy of the GNU Library General Public
16 License along with the GNU C Library; see the file COPYING.LIB.  If
17 not, write to the Free Software Foundation, Inc., 675 Mass Ave,
18 Cambridge, MA 02139, USA.  */
19
20 #include <langinfo.h>
21
22 /* This array duplicates `_nl_current' defined in setlocale.c; but since
23    the references here are not weak references, this guarantees that the
24    data for all the categories will be linked in.  */
25
26 static const struct locale_data * *const nldata[] =
27 {
28 #define DEFINE_CATEGORY(category, category_name, items, a, b, c, d) \
29   [category] = &_nl_current_##category,
30 #include "categories.def"
31 #undef  DEFINE_CATEGORY
32 };
33
34
35 /* Return a string with the data for locale-dependent parameter ITEM.  */
36
37 char *
38 nl_langinfo (item)
39      nl_item item;
40 {
41   int category = _NL_ITEM_CATEGORY (item);
42   unsigned int index = _NL_ITEM_INDEX (item);
43   const struct locale_data *data;
44
45   if (category < 0 || category >= LC_ALL)
46     {
47       /* Bogus category: bogus item.  */
48       errno = EINVAL;
49       return NULL;
50     }
51
52   data = nldata[category];
53
54   if (index >= data->nstrings)
55     {
56       /* Bogus index for this category: bogus item.  */
57       errno = EINVAL;
58       return NULL;
59     }
60
61   /* Return the string for the specified item.  */
62   return (char *) nldata->strings[index];
63 }