Refactor bug-strtod.c to better test new types.
[glibc.git] / locale / nl_langinfo_l.c
blob0032c0bb30f5e5929ad9dc1b510a8a47cddc0f0e
1 /* User interface for extracting locale-dependent parameters.
2 Copyright (C) 1995-2016 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
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 Lesser General Public License for more details.
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, see
17 <http://www.gnu.org/licenses/>. */
19 #include <langinfo.h>
20 #include <locale.h>
21 #include <errno.h>
22 #include <stddef.h>
23 #include <stdlib.h>
24 #include "localeinfo.h"
27 /* Return a string with the data for locale-dependent parameter ITEM. */
29 char *
30 __nl_langinfo_l (nl_item item, __locale_t l)
32 int category = _NL_ITEM_CATEGORY (item);
33 unsigned int index = _NL_ITEM_INDEX (item);
34 const struct __locale_data *data;
36 if (category < 0 || category == LC_ALL || category >= __LC_LAST)
37 /* Bogus category: bogus item. */
38 return (char *) "";
40 /* Special case value for NL_LOCALE_NAME (category).
41 This is not a real item index in the string table. */
42 if (index == _NL_ITEM_INDEX (_NL_LOCALE_NAME (category)))
43 return (char *) l->__names[category];
45 #if defined NL_CURRENT_INDIRECT
46 /* Make direct reference to every _nl_current_CATEGORY symbol,
47 since we know only at runtime which categories are used. */
48 switch (category)
50 # define DEFINE_CATEGORY(category, category_name, items, a) \
51 case category: data = *_nl_current_##category; break;
52 # include "categories.def"
53 # undef DEFINE_CATEGORY
54 default: /* Should be impossible. */
55 abort();
57 #else
58 data = l->__locales[category];
59 #endif
61 if (index >= data->nstrings)
62 /* Bogus index for this category: bogus item. */
63 return (char *) "";
65 /* Return the string for the specified item. */
66 return (char *) data->values[index].string;
68 libc_hidden_def (__nl_langinfo_l)
69 weak_alias (__nl_langinfo_l, nl_langinfo_l)