1 // { dg-require-namedlocale "en_PH" }
2 // { dg-require-namedlocale "de_DE" }
3 // { dg-require-namedlocale "it_IT" }
5 // 2000-09-13 Benjamin Kosnik <bkoz@redhat.com>
7 // Copyright (C) 2000-2013 Free Software Foundation, Inc.
9 // This file is part of the GNU ISO C++ Library. This library is free
10 // software; you can redistribute it and/or modify it under the
11 // terms of the GNU General Public License as published by the
12 // Free Software Foundation; either version 3, or (at your option)
15 // This library is distributed in the hope that it will be useful,
16 // but WITHOUT ANY WARRANTY; without even the implied warranty of
17 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 // GNU General Public License for more details.
20 // You should have received a copy of the GNU General Public License along
21 // with this library; see the file COPYING3. If not see
22 // <http://www.gnu.org/licenses/>.
24 // 22.1.1.2 locale constructors and destructors [lib.locale.cons]
26 #include <cwchar> // for mbstate_t
31 #include <testsuite_hooks.h>
33 // More tests for locale("") == POSIX locale::name.
36 bool test __attribute__((unused)) = true;
39 #ifdef _GLIBCXX_HAVE_SETENV
41 const char* LANG_orig = getenv("LANG") ? strdup(getenv("LANG")) : "";
42 const char* LC_ALL_orig = getenv("LC_ALL") ? strdup(getenv("LC_ALL")) : "";
43 const char* LC_CTYPE_orig =
44 getenv("LC_CTYPE") ? strdup(getenv("LC_CTYPE")) : "";
45 const char* LC_NUMERIC_orig =
46 getenv("LC_NUMERIC") ? strdup(getenv("LC_NUMERIC")) : "";
47 const char* LC_TIME_orig =
48 getenv("LC_TIME") ? strdup(getenv("LC_TIME")) : "";
49 const char* LC_COLLATE_orig =
50 getenv("LC_COLLATE") ? strdup(getenv("LC_COLLATE")) : "";
51 const char* LC_MONETARY_orig =
52 getenv("LC_MONETARY") ? strdup(getenv("LC_MONETARY")) : "";
53 const char* LC_MESSAGES_orig =
54 getenv("LC_MESSAGES") ? strdup(getenv("LC_MESSAGES")) : "";
55 #if _GLIBCXX_NUM_CATEGORIES
56 const char* LC_PAPER_orig =
57 getenv("LC_PAPER") ? strdup(getenv("LC_PAPER")) : "";
58 const char* LC_NAME_orig =
59 getenv("LC_NAME") ? strdup(getenv("LC_NAME")) : "";
60 const char* LC_ADDRESS_orig =
61 getenv("LC_ADDRESS") ? strdup(getenv("LC_ADDRESS")) : "";
62 const char* LC_TELEPHONE_orig =
63 getenv("LC_TELEPHONE") ? strdup(getenv("LC_TELEPHONE")) : "";
64 const char* LC_MEASUREMENT_orig =
65 getenv("LC_MEASUREMENT") ? strdup(getenv("LC_MEASUREMENT")) : "";
66 const char* LC_IDENTIFICATION_orig =
67 getenv("LC_IDENTIFICATION") ? strdup(getenv("LC_IDENTIFICATION")) : "";
70 // Check that a "POSIX" LC_ALL is equivalent to "C".
71 if (!setenv("LC_ALL", "POSIX", 1))
73 locale loc = locale("");
74 VERIFY( loc.name() == "C" );
76 setenv("LC_ALL", "", 1);
78 // Check that a "en_PH" LC_ALL is equivalent to "en_PH".
79 if (!setenv("LC_ALL", "en_PH", 1))
81 locale loc = locale("");
82 VERIFY( loc.name() == "en_PH" );
84 setenv("LC_ALL", "", 1);
86 // Explicit check that LC_ALL sets regardless of LC_* and LANG.
87 if (!setenv("LANG", "es_MX", 1) && !setenv("LC_COLLATE", "de_DE", 1))
89 if (!setenv("LC_ALL", "en_PH", 1))
91 locale loc = locale("");
92 VERIFY( loc.name() == "en_PH" );
94 setenv("LC_ALL", "", 1);
95 setenv("LANG", LANG_orig ? LANG_orig : "", 1);
96 setenv("LC_COLLATE", LC_COLLATE_orig ? LC_COLLATE_orig : "", 1);
99 // NB: LANG checks all LC_* macro settings. As such, all LC_* macros
100 // must be cleared for these tests, and then restored.
101 setenv("LC_ALL", "", 1);
102 setenv("LC_CTYPE", "", 1);
103 setenv("LC_NUMERIC", "", 1);
104 setenv("LC_TIME", "", 1);
105 setenv("LC_COLLATE", "", 1);
106 setenv("LC_MONETARY", "", 1);
107 setenv("LC_MESSAGES", "", 1);
108 #if _GLIBCXX_NUM_CATEGORIES
109 setenv("LC_PAPER", "", 1);
110 setenv("LC_NAME", "", 1);
111 setenv("LC_ADDRESS", "", 1);
112 setenv("LC_TELEPHONE", "", 1);
113 setenv("LC_MEASUREMENT", "", 1);
114 setenv("LC_IDENTIFICATION", "", 1);
117 // Check the default set by LANG.
118 if (!setenv("LANG", "fr_FR", 1))
120 locale loc = locale("");
121 VERIFY( loc.name() == "fr_FR" );
124 // Check that a "POSIX" LANG is equivalent to "C".
125 if (!setenv("LANG", "POSIX", 1))
128 VERIFY( loc.name() == "C" );
131 // Setting a category in the "C" default.
132 if (!setenv("LC_COLLATE", "de_DE", 1))
134 locale loc = locale("");
136 #if _GLIBCXX_NUM_CATEGORIES
137 VERIFY( loc.name() == "LC_CTYPE=C;LC_NUMERIC=C;LC_TIME=C;"
138 "LC_COLLATE=de_DE;LC_MONETARY=C;LC_MESSAGES=C;LC_PAPER=C;"
139 "LC_NAME=C;LC_ADDRESS=C;LC_TELEPHONE=C;LC_MEASUREMENT=C;"
140 "LC_IDENTIFICATION=C" );
142 VERIFY( loc.name() == "LC_CTYPE=C;LC_NUMERIC=C;LC_TIME=C;"
143 "LC_COLLATE=de_DE;LC_MONETARY=C;LC_MESSAGES=C" );
147 // Changing the LANG default while LC_COLLATE is set.
148 if (!setenv("LANG", "fr_FR", 1))
150 locale loc = locale("");
151 #if _GLIBCXX_NUM_CATEGORIES
152 VERIFY( loc.name() == "LC_CTYPE=fr_FR;LC_NUMERIC=fr_FR;"
153 "LC_TIME=fr_FR;LC_COLLATE=de_DE;LC_MONETARY=fr_FR;"
154 "LC_MESSAGES=fr_FR;LC_PAPER=fr_FR;LC_NAME=fr_FR;"
155 "LC_ADDRESS=fr_FR;LC_TELEPHONE=fr_FR;LC_MEASUREMENT=fr_FR;"
156 "LC_IDENTIFICATION=fr_FR" );
158 VERIFY( loc.name() == "LC_CTYPE=fr_FR;LC_NUMERIC=fr_FR;"
159 "LC_TIME=fr_FR;LC_COLLATE=de_DE;LC_MONETARY=fr_FR;"
160 "LC_MESSAGES=fr_FR" );
164 // Changing another (C only) category.
165 #if _GLIBCXX_NUM_CATEGORIES
166 if (!setenv("LC_IDENTIFICATION", "it_IT", 1))
168 locale loc = locale("");
169 VERIFY( loc.name() == "LC_CTYPE=fr_FR;LC_NUMERIC=fr_FR;"
170 "LC_TIME=fr_FR;LC_COLLATE=de_DE;LC_MONETARY=fr_FR;"
171 "LC_MESSAGES=fr_FR;LC_PAPER=fr_FR;LC_NAME=fr_FR;"
172 "LC_ADDRESS=fr_FR;LC_TELEPHONE=fr_FR;LC_MEASUREMENT=fr_FR;"
173 "LC_IDENTIFICATION=it_IT" );
177 // Restore the environment.
178 setenv("LANG", LANG_orig ? LANG_orig : "", 1);
179 setenv("LC_ALL", LC_ALL_orig ? LC_ALL_orig : "", 1);
180 setenv("LC_CTYPE", LC_CTYPE_orig ? LC_CTYPE_orig : "", 1);
181 setenv("LC_NUMERIC", LC_NUMERIC_orig ? LC_NUMERIC_orig : "", 1);
182 setenv("LC_TIME", LC_TIME_orig ? LC_TIME_orig : "", 1);
183 setenv("LC_COLLATE", LC_COLLATE_orig ? LC_COLLATE_orig : "", 1);
184 setenv("LC_MONETARY", LC_MONETARY_orig ? LC_MONETARY_orig : "", 1);
185 setenv("LC_MESSAGES", LC_MESSAGES_orig ? LC_MESSAGES_orig : "", 1);
186 #if _GLIBCXX_NUM_CATEGORIES
187 setenv("LC_PAPER", LC_PAPER_orig ? LC_PAPER_orig : "", 1);
188 setenv("LC_NAME", LC_NAME_orig ? LC_NAME_orig : "", 1);
189 setenv("LC_ADDRESS", LC_ADDRESS_orig ? LC_ADDRESS_orig : "", 1);
190 setenv("LC_TELEPHONE", LC_TELEPHONE_orig ? LC_TELEPHONE_orig : "", 1);
191 setenv("LC_MEASUREMENT", LC_MEASUREMENT_orig ? LC_MEASUREMENT_orig : "", 1);
192 setenv("LC_IDENTIFICATION",
193 LC_IDENTIFICATION_orig ? LC_IDENTIFICATION_orig : "", 1);