OLD | NEW |
| (Empty) |
1 /* | |
2 ******************************************************************************** | |
3 * Copyright (C) 2005-2011, International Business Machines | |
4 * Corporation and others. All Rights Reserved. | |
5 ******************************************************************************** | |
6 * | |
7 * File WINNMTST.CPP | |
8 * | |
9 ******************************************************************************** | |
10 */ | |
11 | |
12 #include "unicode/utypes.h" | |
13 | |
14 #if U_PLATFORM_USES_ONLY_WIN32_API | |
15 | |
16 #if !UCONFIG_NO_FORMATTING | |
17 | |
18 #include "unicode/format.h" | |
19 #include "unicode/numfmt.h" | |
20 #include "unicode/locid.h" | |
21 #include "unicode/ustring.h" | |
22 #include "unicode/testlog.h" | |
23 #include "unicode/utmscale.h" | |
24 | |
25 #include "winnmfmt.h" | |
26 #include "winutil.h" | |
27 #include "winnmtst.h" | |
28 | |
29 #include "cmemory.h" | |
30 #include "cstring.h" | |
31 #include "locmap.h" | |
32 #include "wintz.h" | |
33 #include "uassert.h" | |
34 | |
35 # define WIN32_LEAN_AND_MEAN | |
36 # define VC_EXTRALEAN | |
37 # define NOUSER | |
38 # define NOSERVICE | |
39 # define NOIME | |
40 # define NOMCX | |
41 # include <windows.h> | |
42 # include <stdio.h> | |
43 # include <time.h> | |
44 # include <float.h> | |
45 # include <locale.h> | |
46 | |
47 #define ARRAY_SIZE(array) (sizeof array / sizeof array[0]) | |
48 #define NEW_ARRAY(type,count) (type *) uprv_malloc((count) * sizeof(type)) | |
49 #define DELETE_ARRAY(array) uprv_free((void *) (array)) | |
50 | |
51 #define STACK_BUFFER_SIZE 32 | |
52 | |
53 #define LOOP_COUNT 1000 | |
54 | |
55 static UBool initialized = FALSE; | |
56 | |
57 /** | |
58 * Return a random int64_t where U_INT64_MIN <= ran <= U_INT64_MAX. | |
59 */ | |
60 static uint64_t randomInt64(void) | |
61 { | |
62 int64_t ran = 0; | |
63 int32_t i; | |
64 | |
65 if (!initialized) { | |
66 srand((unsigned)time(NULL)); | |
67 initialized = TRUE; | |
68 } | |
69 | |
70 /* Assume rand has at least 12 bits of precision */ | |
71 for (i = 0; i < sizeof(ran); i += 1) { | |
72 ((char*)&ran)[i] = (char)((rand() & 0x0FF0) >> 4); | |
73 } | |
74 | |
75 return ran; | |
76 } | |
77 | |
78 /** | |
79 * Return a random double where U_DOUBLE_MIN <= ran <= U_DOUBLE_MAX. | |
80 */ | |
81 static double randomDouble(void) | |
82 { | |
83 double ran = 0; | |
84 | |
85 if (!initialized) { | |
86 srand((unsigned)time(NULL)); | |
87 initialized = TRUE; | |
88 } | |
89 #if 0 | |
90 int32_t i; | |
91 do { | |
92 /* Assume rand has at least 12 bits of precision */ | |
93 for (i = 0; i < sizeof(ran); i += 1) { | |
94 ((char*)&ran)[i] = (char)((rand() & 0x0FF0) >> 4); | |
95 } | |
96 } while (_isnan(ran)); | |
97 #else | |
98 int64_t numerator = randomInt64(); | |
99 int64_t denomenator; | |
100 do { | |
101 denomenator = randomInt64(); | |
102 } | |
103 while (denomenator == 0); | |
104 | |
105 ran = (double)numerator / (double)denomenator; | |
106 #endif | |
107 | |
108 return ran; | |
109 } | |
110 | |
111 /** | |
112 * Return a random int32_t where U_INT32_MIN <= ran <= U_INT32_MAX. | |
113 */ | |
114 static uint32_t randomInt32(void) | |
115 { | |
116 int32_t ran = 0; | |
117 int32_t i; | |
118 | |
119 if (!initialized) { | |
120 srand((unsigned)time(NULL)); | |
121 initialized = TRUE; | |
122 } | |
123 | |
124 /* Assume rand has at least 12 bits of precision */ | |
125 for (i = 0; i < sizeof(ran); i += 1) { | |
126 ((char*)&ran)[i] = (char)((rand() & 0x0FF0) >> 4); | |
127 } | |
128 | |
129 return ran; | |
130 } | |
131 | |
132 static UnicodeString &getWindowsFormat(int32_t lcid, UBool currency, UnicodeStri
ng &appendTo, const wchar_t *fmt, ...) | |
133 { | |
134 wchar_t nStackBuffer[STACK_BUFFER_SIZE]; | |
135 wchar_t *nBuffer = nStackBuffer; | |
136 va_list args; | |
137 int result; | |
138 | |
139 nBuffer[0] = 0x0000; | |
140 | |
141 /* Due to the arguments causing a result to be <= 23 characters (+2 for NULL
and minus), | |
142 we don't need to reallocate the buffer. */ | |
143 va_start(args, fmt); | |
144 result = _vsnwprintf(nBuffer, STACK_BUFFER_SIZE, fmt, args); | |
145 va_end(args); | |
146 | |
147 /* Just to make sure of the above statement, we add this assert */ | |
148 U_ASSERT(result >=0); | |
149 // The following code is not used because _vscwprintf isn't available on Min
GW at the moment. | |
150 /*if (result < 0) { | |
151 int newLength; | |
152 | |
153 va_start(args, fmt); | |
154 newLength = _vscwprintf(fmt, args); | |
155 va_end(args); | |
156 | |
157 nBuffer = NEW_ARRAY(UChar, newLength + 1); | |
158 | |
159 va_start(args, fmt); | |
160 result = _vsnwprintf(nBuffer, newLength + 1, fmt, args); | |
161 va_end(args); | |
162 }*/ | |
163 | |
164 | |
165 // vswprintf is sensitive to the locale set by setlocale. For some locales | |
166 // it doesn't use "." as the decimal separator, which is what GetNumberForma
tW | |
167 // and GetCurrencyFormatW both expect to see. | |
168 // | |
169 // To fix this, we scan over the string and replace the first non-digits, ex
cept | |
170 // for a leading "-", with a "." | |
171 // | |
172 // Note: (nBuffer[0] == L'-') will evaluate to 1 if there is a leading '-' i
n the | |
173 // number, and 0 otherwise. | |
174 for (wchar_t *p = &nBuffer[nBuffer[0] == L'-']; *p != L'\0'; p += 1) { | |
175 if (*p < L'0' || *p > L'9') { | |
176 *p = L'.'; | |
177 break; | |
178 } | |
179 } | |
180 | |
181 wchar_t stackBuffer[STACK_BUFFER_SIZE]; | |
182 wchar_t *buffer = stackBuffer; | |
183 | |
184 buffer[0] = 0x0000; | |
185 | |
186 if (currency) { | |
187 result = GetCurrencyFormatW(lcid, 0, nBuffer, NULL, buffer, STACK_BUFFER
_SIZE); | |
188 | |
189 if (result == 0) { | |
190 DWORD lastError = GetLastError(); | |
191 | |
192 if (lastError == ERROR_INSUFFICIENT_BUFFER) { | |
193 int newLength = GetCurrencyFormatW(lcid, 0, nBuffer, NULL, NULL,
0); | |
194 | |
195 buffer = NEW_ARRAY(UChar, newLength); | |
196 buffer[0] = 0x0000; | |
197 GetCurrencyFormatW(lcid, 0, nBuffer, NULL, buffer, newLength); | |
198 } | |
199 } | |
200 } else { | |
201 result = GetNumberFormatW(lcid, 0, nBuffer, NULL, buffer, STACK_BUFFER_S
IZE); | |
202 | |
203 if (result == 0) { | |
204 DWORD lastError = GetLastError(); | |
205 | |
206 if (lastError == ERROR_INSUFFICIENT_BUFFER) { | |
207 int newLength = GetNumberFormatW(lcid, 0, nBuffer, NULL, NULL, 0
); | |
208 | |
209 buffer = NEW_ARRAY(UChar, newLength); | |
210 buffer[0] = 0x0000; | |
211 GetNumberFormatW(lcid, 0, nBuffer, NULL, buffer, newLength); | |
212 } | |
213 } | |
214 } | |
215 | |
216 appendTo.append(buffer, (int32_t) wcslen(buffer)); | |
217 | |
218 if (buffer != stackBuffer) { | |
219 DELETE_ARRAY(buffer); | |
220 } | |
221 | |
222 /*if (nBuffer != nStackBuffer) { | |
223 DELETE_ARRAY(nBuffer); | |
224 }*/ | |
225 | |
226 return appendTo; | |
227 } | |
228 | |
229 static void testLocale(const char *localeID, int32_t lcid, NumberFormat *wnf, UB
ool currency, TestLog *log) | |
230 { | |
231 for (int n = 0; n < LOOP_COUNT; n += 1) { | |
232 UnicodeString u3Buffer, u6Buffer, udBuffer; | |
233 UnicodeString w3Buffer, w6Buffer, wdBuffer; | |
234 double d = randomDouble(); | |
235 int32_t i32 = randomInt32(); | |
236 int64_t i64 = randomInt64(); | |
237 | |
238 getWindowsFormat(lcid, currency, wdBuffer, L"%.16f", d); | |
239 | |
240 getWindowsFormat(lcid, currency, w3Buffer, L"%I32d", i32); | |
241 | |
242 getWindowsFormat(lcid, currency, w6Buffer, L"%I64d", i64); | |
243 | |
244 wnf->format(d, udBuffer); | |
245 if (udBuffer.compare(wdBuffer) != 0) { | |
246 UnicodeString locale(localeID); | |
247 | |
248 log->errln("Double format error for locale " + locale + | |
249 ": got " + udBuffer + " expected " + wdBuffe
r); | |
250 } | |
251 | |
252 wnf->format(i32, u3Buffer); | |
253 if (u3Buffer.compare(w3Buffer) != 0) { | |
254 UnicodeString locale(localeID); | |
255 | |
256 log->errln("int32_t format error for locale " + locale + | |
257 ": got " + u3Buffer + " expected " + w3Buffe
r); | |
258 } | |
259 | |
260 wnf->format(i64, u6Buffer); | |
261 if (u6Buffer.compare(w6Buffer) != 0) { | |
262 UnicodeString locale(localeID); | |
263 | |
264 log->errln("int64_t format error for locale " + locale + | |
265 ": got " + u6Buffer + " expected " + w6Buffe
r); | |
266 } | |
267 } | |
268 } | |
269 | |
270 void Win32NumberTest::testLocales(TestLog *log) | |
271 { | |
272 int32_t lcidCount = 0; | |
273 Win32Utilities::LCIDRecord *lcidRecords = Win32Utilities::getLocales(lcidCou
nt); | |
274 | |
275 for(int i = 0; i < lcidCount; i += 1) { | |
276 UErrorCode status = U_ZERO_ERROR; | |
277 char localeID[128]; | |
278 | |
279 // NULL localeID means ICU didn't recognize the lcid | |
280 if (lcidRecords[i].localeID == NULL) { | |
281 continue; | |
282 } | |
283 | |
284 strcpy(localeID, lcidRecords[i].localeID); | |
285 | |
286 if (strchr(localeID, '@') > 0) { | |
287 strcat(localeID, ";"); | |
288 } else { | |
289 strcat(localeID, "@"); | |
290 } | |
291 | |
292 strcat(localeID, "compat=host"); | |
293 | |
294 Locale ulocale(localeID); | |
295 NumberFormat *wnf = NumberFormat::createInstance(ulocale, status); | |
296 NumberFormat *wcf = NumberFormat::createCurrencyInstance(ulocale, status
); | |
297 | |
298 testLocale(lcidRecords[i].localeID, lcidRecords[i].lcid, wnf, FALSE, log
); | |
299 testLocale(lcidRecords[i].localeID, lcidRecords[i].lcid, wcf, TRUE, log
); | |
300 | |
301 #if 0 | |
302 char *old_locale = strdup(setlocale(LC_ALL, NULL)); | |
303 | |
304 setlocale(LC_ALL, "German"); | |
305 | |
306 testLocale(lcidRecords[i].localeID, lcidRecords[i].lcid, wnf, FALSE, log
); | |
307 testLocale(lcidRecords[i].localeID, lcidRecords[i].lcid, wcf, TRUE, log
); | |
308 | |
309 setlocale(LC_ALL, old_locale); | |
310 | |
311 free(old_locale); | |
312 #endif | |
313 | |
314 delete wcf; | |
315 delete wnf; | |
316 } | |
317 | |
318 Win32Utilities::freeLocales(lcidRecords); | |
319 } | |
320 | |
321 #endif /* #if !UCONFIG_NO_FORMATTING */ | |
322 | |
323 #endif /* U_PLATFORM_USES_ONLY_WIN32_API */ | |
OLD | NEW |