Line data Source code
1 : // Copyright 2006-2008 the V8 project authors. All rights reserved.
2 : // Redistribution and use in source and binary forms, with or without
3 : // modification, are permitted provided that the following conditions are
4 : // met:
5 : //
6 : // * Redistributions of source code must retain the above copyright
7 : // notice, this list of conditions and the following disclaimer.
8 : // * Redistributions in binary form must reproduce the above
9 : // copyright notice, this list of conditions and the following
10 : // disclaimer in the documentation and/or other materials provided
11 : // with the distribution.
12 : // * Neither the name of Google Inc. nor the names of its
13 : // contributors may be used to endorse or promote products derived
14 : // from this software without specific prior written permission.
15 : //
16 : // THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
17 : // "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
18 : // LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
19 : // A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
20 : // OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
21 : // SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
22 : // LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23 : // DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24 : // THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25 : // (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
26 : // OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27 :
28 : #include <stdlib.h>
29 :
30 : #include "src/v8.h"
31 :
32 : #include "src/base/utils/random-number-generator.h"
33 : #include "src/bignum.h"
34 : #include "src/diy-fp.h"
35 : #include "src/double.h"
36 : #include "src/strtod.h"
37 : #include "test/cctest/cctest.h"
38 :
39 : namespace v8 {
40 : namespace internal {
41 : namespace test_strtod {
42 :
43 : static Vector<const char> StringToVector(const char* str) {
44 564 : return Vector<const char>(str, StrLength(str));
45 : }
46 :
47 :
48 564 : static double StrtodChar(const char* str, int exponent) {
49 564 : return Strtod(StringToVector(str), exponent);
50 : }
51 :
52 :
53 23724 : TEST(Strtod) {
54 6 : Vector<const char> vector;
55 :
56 6 : vector = StringToVector("0");
57 6 : CHECK_EQ(0.0, Strtod(vector, 1));
58 6 : CHECK_EQ(0.0, Strtod(vector, 2));
59 6 : CHECK_EQ(0.0, Strtod(vector, -2));
60 6 : CHECK_EQ(0.0, Strtod(vector, -999));
61 6 : CHECK_EQ(0.0, Strtod(vector, +999));
62 :
63 6 : vector = StringToVector("1");
64 6 : CHECK_EQ(1.0, Strtod(vector, 0));
65 6 : CHECK_EQ(10.0, Strtod(vector, 1));
66 6 : CHECK_EQ(100.0, Strtod(vector, 2));
67 6 : CHECK_EQ(1e20, Strtod(vector, 20));
68 6 : CHECK_EQ(1e22, Strtod(vector, 22));
69 6 : CHECK_EQ(1e23, Strtod(vector, 23));
70 6 : CHECK_EQ(1e35, Strtod(vector, 35));
71 6 : CHECK_EQ(1e36, Strtod(vector, 36));
72 6 : CHECK_EQ(1e37, Strtod(vector, 37));
73 6 : CHECK_EQ(1e-1, Strtod(vector, -1));
74 6 : CHECK_EQ(1e-2, Strtod(vector, -2));
75 6 : CHECK_EQ(1e-5, Strtod(vector, -5));
76 6 : CHECK_EQ(1e-20, Strtod(vector, -20));
77 6 : CHECK_EQ(1e-22, Strtod(vector, -22));
78 6 : CHECK_EQ(1e-23, Strtod(vector, -23));
79 6 : CHECK_EQ(1e-25, Strtod(vector, -25));
80 6 : CHECK_EQ(1e-39, Strtod(vector, -39));
81 :
82 6 : vector = StringToVector("2");
83 6 : CHECK_EQ(2.0, Strtod(vector, 0));
84 6 : CHECK_EQ(20.0, Strtod(vector, 1));
85 6 : CHECK_EQ(200.0, Strtod(vector, 2));
86 6 : CHECK_EQ(2e20, Strtod(vector, 20));
87 6 : CHECK_EQ(2e22, Strtod(vector, 22));
88 6 : CHECK_EQ(2e23, Strtod(vector, 23));
89 6 : CHECK_EQ(2e35, Strtod(vector, 35));
90 6 : CHECK_EQ(2e36, Strtod(vector, 36));
91 6 : CHECK_EQ(2e37, Strtod(vector, 37));
92 6 : CHECK_EQ(2e-1, Strtod(vector, -1));
93 6 : CHECK_EQ(2e-2, Strtod(vector, -2));
94 6 : CHECK_EQ(2e-5, Strtod(vector, -5));
95 6 : CHECK_EQ(2e-20, Strtod(vector, -20));
96 6 : CHECK_EQ(2e-22, Strtod(vector, -22));
97 6 : CHECK_EQ(2e-23, Strtod(vector, -23));
98 6 : CHECK_EQ(2e-25, Strtod(vector, -25));
99 6 : CHECK_EQ(2e-39, Strtod(vector, -39));
100 :
101 6 : vector = StringToVector("9");
102 6 : CHECK_EQ(9.0, Strtod(vector, 0));
103 6 : CHECK_EQ(90.0, Strtod(vector, 1));
104 6 : CHECK_EQ(900.0, Strtod(vector, 2));
105 6 : CHECK_EQ(9e20, Strtod(vector, 20));
106 6 : CHECK_EQ(9e22, Strtod(vector, 22));
107 6 : CHECK_EQ(9e23, Strtod(vector, 23));
108 6 : CHECK_EQ(9e35, Strtod(vector, 35));
109 6 : CHECK_EQ(9e36, Strtod(vector, 36));
110 6 : CHECK_EQ(9e37, Strtod(vector, 37));
111 6 : CHECK_EQ(9e-1, Strtod(vector, -1));
112 6 : CHECK_EQ(9e-2, Strtod(vector, -2));
113 6 : CHECK_EQ(9e-5, Strtod(vector, -5));
114 6 : CHECK_EQ(9e-20, Strtod(vector, -20));
115 6 : CHECK_EQ(9e-22, Strtod(vector, -22));
116 6 : CHECK_EQ(9e-23, Strtod(vector, -23));
117 6 : CHECK_EQ(9e-25, Strtod(vector, -25));
118 6 : CHECK_EQ(9e-39, Strtod(vector, -39));
119 :
120 6 : vector = StringToVector("12345");
121 6 : CHECK_EQ(12345.0, Strtod(vector, 0));
122 6 : CHECK_EQ(123450.0, Strtod(vector, 1));
123 6 : CHECK_EQ(1234500.0, Strtod(vector, 2));
124 6 : CHECK_EQ(12345e20, Strtod(vector, 20));
125 6 : CHECK_EQ(12345e22, Strtod(vector, 22));
126 6 : CHECK_EQ(12345e23, Strtod(vector, 23));
127 6 : CHECK_EQ(12345e30, Strtod(vector, 30));
128 6 : CHECK_EQ(12345e31, Strtod(vector, 31));
129 6 : CHECK_EQ(12345e32, Strtod(vector, 32));
130 6 : CHECK_EQ(12345e35, Strtod(vector, 35));
131 6 : CHECK_EQ(12345e36, Strtod(vector, 36));
132 6 : CHECK_EQ(12345e37, Strtod(vector, 37));
133 6 : CHECK_EQ(12345e-1, Strtod(vector, -1));
134 6 : CHECK_EQ(12345e-2, Strtod(vector, -2));
135 6 : CHECK_EQ(12345e-5, Strtod(vector, -5));
136 6 : CHECK_EQ(12345e-20, Strtod(vector, -20));
137 6 : CHECK_EQ(12345e-22, Strtod(vector, -22));
138 6 : CHECK_EQ(12345e-23, Strtod(vector, -23));
139 6 : CHECK_EQ(12345e-25, Strtod(vector, -25));
140 6 : CHECK_EQ(12345e-39, Strtod(vector, -39));
141 :
142 6 : vector = StringToVector("12345678901234");
143 6 : CHECK_EQ(12345678901234.0, Strtod(vector, 0));
144 6 : CHECK_EQ(123456789012340.0, Strtod(vector, 1));
145 6 : CHECK_EQ(1234567890123400.0, Strtod(vector, 2));
146 6 : CHECK_EQ(12345678901234e20, Strtod(vector, 20));
147 6 : CHECK_EQ(12345678901234e22, Strtod(vector, 22));
148 6 : CHECK_EQ(12345678901234e23, Strtod(vector, 23));
149 6 : CHECK_EQ(12345678901234e30, Strtod(vector, 30));
150 6 : CHECK_EQ(12345678901234e31, Strtod(vector, 31));
151 6 : CHECK_EQ(12345678901234e32, Strtod(vector, 32));
152 6 : CHECK_EQ(12345678901234e35, Strtod(vector, 35));
153 6 : CHECK_EQ(12345678901234e36, Strtod(vector, 36));
154 6 : CHECK_EQ(12345678901234e37, Strtod(vector, 37));
155 6 : CHECK_EQ(12345678901234e-1, Strtod(vector, -1));
156 6 : CHECK_EQ(12345678901234e-2, Strtod(vector, -2));
157 6 : CHECK_EQ(12345678901234e-5, Strtod(vector, -5));
158 6 : CHECK_EQ(12345678901234e-20, Strtod(vector, -20));
159 6 : CHECK_EQ(12345678901234e-22, Strtod(vector, -22));
160 6 : CHECK_EQ(12345678901234e-23, Strtod(vector, -23));
161 6 : CHECK_EQ(12345678901234e-25, Strtod(vector, -25));
162 6 : CHECK_EQ(12345678901234e-39, Strtod(vector, -39));
163 :
164 6 : vector = StringToVector("123456789012345");
165 6 : CHECK_EQ(123456789012345.0, Strtod(vector, 0));
166 6 : CHECK_EQ(1234567890123450.0, Strtod(vector, 1));
167 6 : CHECK_EQ(12345678901234500.0, Strtod(vector, 2));
168 6 : CHECK_EQ(123456789012345e20, Strtod(vector, 20));
169 6 : CHECK_EQ(123456789012345e22, Strtod(vector, 22));
170 6 : CHECK_EQ(123456789012345e23, Strtod(vector, 23));
171 6 : CHECK_EQ(123456789012345e35, Strtod(vector, 35));
172 6 : CHECK_EQ(123456789012345e36, Strtod(vector, 36));
173 6 : CHECK_EQ(123456789012345e37, Strtod(vector, 37));
174 6 : CHECK_EQ(123456789012345e39, Strtod(vector, 39));
175 6 : CHECK_EQ(123456789012345e-1, Strtod(vector, -1));
176 6 : CHECK_EQ(123456789012345e-2, Strtod(vector, -2));
177 6 : CHECK_EQ(123456789012345e-5, Strtod(vector, -5));
178 6 : CHECK_EQ(123456789012345e-20, Strtod(vector, -20));
179 6 : CHECK_EQ(123456789012345e-22, Strtod(vector, -22));
180 6 : CHECK_EQ(123456789012345e-23, Strtod(vector, -23));
181 6 : CHECK_EQ(123456789012345e-25, Strtod(vector, -25));
182 6 : CHECK_EQ(123456789012345e-39, Strtod(vector, -39));
183 :
184 6 : CHECK_EQ(0.0, StrtodChar("0", 12345));
185 6 : CHECK_EQ(0.0, StrtodChar("", 1324));
186 6 : CHECK_EQ(0.0, StrtodChar("000000000", 123));
187 6 : CHECK_EQ(0.0, StrtodChar("2", -324));
188 6 : CHECK_EQ(4e-324, StrtodChar("3", -324));
189 : // It would be more readable to put non-zero literals on the left side (i.e.
190 : // CHECK_EQ(1e-325, StrtodChar("1", -325))), but then Gcc complains that
191 : // they are truncated to zero.
192 6 : CHECK_EQ(0.0, StrtodChar("1", -325));
193 6 : CHECK_EQ(0.0, StrtodChar("1", -325));
194 6 : CHECK_EQ(0.0, StrtodChar("20000", -328));
195 6 : CHECK_EQ(40000e-328, StrtodChar("30000", -328));
196 6 : CHECK_EQ(0.0, StrtodChar("10000", -329));
197 6 : CHECK_EQ(0.0, StrtodChar("90000", -329));
198 6 : CHECK_EQ(0.0, StrtodChar("000000001", -325));
199 6 : CHECK_EQ(0.0, StrtodChar("000000001", -325));
200 6 : CHECK_EQ(0.0, StrtodChar("0000000020000", -328));
201 6 : CHECK_EQ(40000e-328, StrtodChar("00000030000", -328));
202 6 : CHECK_EQ(0.0, StrtodChar("0000000010000", -329));
203 6 : CHECK_EQ(0.0, StrtodChar("0000000090000", -329));
204 :
205 : // It would be more readable to put the literals (and not V8_INFINITY) on the
206 : // left side (i.e. CHECK_EQ(1e309, StrtodChar("1", 309))), but then Gcc
207 : // complains that the floating constant exceeds range of 'double'.
208 12 : CHECK_EQ(V8_INFINITY, StrtodChar("1", 309));
209 6 : CHECK_EQ(1e308, StrtodChar("1", 308));
210 6 : CHECK_EQ(1234e305, StrtodChar("1234", 305));
211 6 : CHECK_EQ(1234e304, StrtodChar("1234", 304));
212 12 : CHECK_EQ(V8_INFINITY, StrtodChar("18", 307));
213 6 : CHECK_EQ(17e307, StrtodChar("17", 307));
214 12 : CHECK_EQ(V8_INFINITY, StrtodChar("0000001", 309));
215 6 : CHECK_EQ(1e308, StrtodChar("00000001", 308));
216 6 : CHECK_EQ(1234e305, StrtodChar("00000001234", 305));
217 6 : CHECK_EQ(1234e304, StrtodChar("000000001234", 304));
218 12 : CHECK_EQ(V8_INFINITY, StrtodChar("0000000018", 307));
219 6 : CHECK_EQ(17e307, StrtodChar("0000000017", 307));
220 12 : CHECK_EQ(V8_INFINITY, StrtodChar("1000000", 303));
221 6 : CHECK_EQ(1e308, StrtodChar("100000", 303));
222 6 : CHECK_EQ(1234e305, StrtodChar("123400000", 300));
223 6 : CHECK_EQ(1234e304, StrtodChar("123400000", 299));
224 12 : CHECK_EQ(V8_INFINITY, StrtodChar("180000000", 300));
225 6 : CHECK_EQ(17e307, StrtodChar("170000000", 300));
226 12 : CHECK_EQ(V8_INFINITY, StrtodChar("00000001000000", 303));
227 6 : CHECK_EQ(1e308, StrtodChar("000000000000100000", 303));
228 6 : CHECK_EQ(1234e305, StrtodChar("00000000123400000", 300));
229 6 : CHECK_EQ(1234e304, StrtodChar("0000000123400000", 299));
230 12 : CHECK_EQ(V8_INFINITY, StrtodChar("00000000180000000", 300));
231 6 : CHECK_EQ(17e307, StrtodChar("00000000170000000", 300));
232 6 : CHECK_EQ(1.7976931348623157E+308, StrtodChar("17976931348623157", 292));
233 6 : CHECK_EQ(1.7976931348623158E+308, StrtodChar("17976931348623158", 292));
234 12 : CHECK_EQ(V8_INFINITY, StrtodChar("17976931348623159", 292));
235 :
236 : // The following number is the result of 89255.0/1e22. Both floating-point
237 : // numbers can be accurately represented with doubles. However on Linux,x86
238 : // the floating-point stack is set to 80bits and the double-rounding
239 : // introduces an error.
240 6 : CHECK_EQ(89255e-22, StrtodChar("89255", -22));
241 :
242 : // Some random values.
243 6 : CHECK_EQ(358416272e-33, StrtodChar("358416272", -33));
244 6 : CHECK_EQ(104110013277974872254e-225,
245 : StrtodChar("104110013277974872254", -225));
246 :
247 6 : CHECK_EQ(123456789e108, StrtodChar("123456789", 108));
248 6 : CHECK_EQ(123456789e109, StrtodChar("123456789", 109));
249 6 : CHECK_EQ(123456789e110, StrtodChar("123456789", 110));
250 6 : CHECK_EQ(123456789e111, StrtodChar("123456789", 111));
251 6 : CHECK_EQ(123456789e112, StrtodChar("123456789", 112));
252 6 : CHECK_EQ(123456789e113, StrtodChar("123456789", 113));
253 6 : CHECK_EQ(123456789e114, StrtodChar("123456789", 114));
254 6 : CHECK_EQ(123456789e115, StrtodChar("123456789", 115));
255 :
256 6 : CHECK_EQ(1234567890123456789012345e108,
257 : StrtodChar("1234567890123456789012345", 108));
258 6 : CHECK_EQ(1234567890123456789012345e109,
259 : StrtodChar("1234567890123456789012345", 109));
260 6 : CHECK_EQ(1234567890123456789012345e110,
261 : StrtodChar("1234567890123456789012345", 110));
262 6 : CHECK_EQ(1234567890123456789012345e111,
263 : StrtodChar("1234567890123456789012345", 111));
264 6 : CHECK_EQ(1234567890123456789012345e112,
265 : StrtodChar("1234567890123456789012345", 112));
266 6 : CHECK_EQ(1234567890123456789012345e113,
267 : StrtodChar("1234567890123456789012345", 113));
268 6 : CHECK_EQ(1234567890123456789012345e114,
269 : StrtodChar("1234567890123456789012345", 114));
270 6 : CHECK_EQ(1234567890123456789012345e115,
271 : StrtodChar("1234567890123456789012345", 115));
272 :
273 6 : CHECK_EQ(1234567890123456789052345e108,
274 : StrtodChar("1234567890123456789052345", 108));
275 6 : CHECK_EQ(1234567890123456789052345e109,
276 : StrtodChar("1234567890123456789052345", 109));
277 6 : CHECK_EQ(1234567890123456789052345e110,
278 : StrtodChar("1234567890123456789052345", 110));
279 6 : CHECK_EQ(1234567890123456789052345e111,
280 : StrtodChar("1234567890123456789052345", 111));
281 6 : CHECK_EQ(1234567890123456789052345e112,
282 : StrtodChar("1234567890123456789052345", 112));
283 6 : CHECK_EQ(1234567890123456789052345e113,
284 : StrtodChar("1234567890123456789052345", 113));
285 6 : CHECK_EQ(1234567890123456789052345e114,
286 : StrtodChar("1234567890123456789052345", 114));
287 6 : CHECK_EQ(1234567890123456789052345e115,
288 : StrtodChar("1234567890123456789052345", 115));
289 :
290 6 : CHECK_EQ(5.445618932859895e-255,
291 : StrtodChar("5445618932859895362967233318697132813618813095743952975"
292 : "4392982234069699615600475529427176366709107287468930197"
293 : "8628345413991790019316974825934906752493984055268219809"
294 : "5012176093045431437495773903922425632551857520884625114"
295 : "6241265881735209066709685420744388526014389929047617597"
296 : "0302268848374508109029268898695825171158085457567481507"
297 : "4162979705098246243690189880319928315307816832576838178"
298 : "2563074014542859888710209237525873301724479666744537857"
299 : "9026553346649664045621387124193095870305991178772256504"
300 : "4368663670643970181259143319016472430928902201239474588"
301 : "1392338901353291306607057623202353588698746085415097902"
302 : "6640064319118728664842287477491068264828851624402189317"
303 : "2769161449825765517353755844373640588822904791244190695"
304 : "2998382932630754670573838138825217065450843010498555058"
305 : "88186560731", -1035));
306 :
307 : // Boundary cases. Boundaries themselves should round to even.
308 : //
309 : // 0x1FFFFFFFFFFFF * 2^3 = 72057594037927928
310 : // next: 72057594037927936
311 : // boundary: 72057594037927932 should round up.
312 6 : CHECK_EQ(72057594037927928.0, StrtodChar("72057594037927928", 0));
313 6 : CHECK_EQ(72057594037927936.0, StrtodChar("72057594037927936", 0));
314 6 : CHECK_EQ(72057594037927936.0, StrtodChar("72057594037927932", 0));
315 6 : CHECK_EQ(72057594037927928.0, StrtodChar("7205759403792793199999", -5));
316 6 : CHECK_EQ(72057594037927936.0, StrtodChar("7205759403792793200001", -5));
317 :
318 : // 0x1FFFFFFFFFFFF * 2^10 = 9223372036854774784
319 : // next: 9223372036854775808
320 : // boundary: 9223372036854775296 should round up.
321 6 : CHECK_EQ(9223372036854774784.0, StrtodChar("9223372036854774784", 0));
322 6 : CHECK_EQ(9223372036854775808.0, StrtodChar("9223372036854775808", 0));
323 6 : CHECK_EQ(9223372036854775808.0, StrtodChar("9223372036854775296", 0));
324 6 : CHECK_EQ(9223372036854774784.0, StrtodChar("922337203685477529599999", -5));
325 6 : CHECK_EQ(9223372036854775808.0, StrtodChar("922337203685477529600001", -5));
326 :
327 : // 0x1FFFFFFFFFFFF * 2^50 = 10141204801825834086073718800384
328 : // next: 10141204801825835211973625643008
329 : // boundary: 10141204801825834649023672221696 should round up.
330 6 : CHECK_EQ(10141204801825834086073718800384.0,
331 : StrtodChar("10141204801825834086073718800384", 0));
332 6 : CHECK_EQ(10141204801825835211973625643008.0,
333 : StrtodChar("10141204801825835211973625643008", 0));
334 6 : CHECK_EQ(10141204801825835211973625643008.0,
335 : StrtodChar("10141204801825834649023672221696", 0));
336 6 : CHECK_EQ(10141204801825834086073718800384.0,
337 : StrtodChar("1014120480182583464902367222169599999", -5));
338 6 : CHECK_EQ(10141204801825835211973625643008.0,
339 : StrtodChar("1014120480182583464902367222169600001", -5));
340 :
341 : // 0x1FFFFFFFFFFFF * 2^99 = 5708990770823838890407843763683279797179383808
342 : // next: 5708990770823839524233143877797980545530986496
343 : // boundary: 5708990770823839207320493820740630171355185152
344 : // The boundary should round up.
345 6 : CHECK_EQ(5708990770823838890407843763683279797179383808.0,
346 : StrtodChar("5708990770823838890407843763683279797179383808", 0));
347 6 : CHECK_EQ(5708990770823839524233143877797980545530986496.0,
348 : StrtodChar("5708990770823839524233143877797980545530986496", 0));
349 6 : CHECK_EQ(5708990770823839524233143877797980545530986496.0,
350 : StrtodChar("5708990770823839207320493820740630171355185152", 0));
351 6 : CHECK_EQ(5708990770823838890407843763683279797179383808.0,
352 : StrtodChar("5708990770823839207320493820740630171355185151999", -3));
353 6 : CHECK_EQ(5708990770823839524233143877797980545530986496.0,
354 : StrtodChar("5708990770823839207320493820740630171355185152001", -3));
355 :
356 : // The following test-cases got some public attention in early 2011 when they
357 : // sent Java and PHP into an infinite loop.
358 6 : CHECK_EQ(2.225073858507201e-308, StrtodChar("22250738585072011", -324));
359 6 : CHECK_EQ(2.22507385850720138309e-308,
360 : StrtodChar("22250738585072011360574097967091319759348195463516456480"
361 : "23426109724822222021076945516529523908135087914149158913"
362 : "03962110687008643869459464552765720740782062174337998814"
363 : "10632673292535522868813721490129811224514518898490572223"
364 : "07285255133155755015914397476397983411801999323962548289"
365 : "01710708185069063066665599493827577257201576306269066333"
366 : "26475653000092458883164330377797918696120494973903778297"
367 : "04905051080609940730262937128958950003583799967207254304"
368 : "36028407889577179615094551674824347103070260914462157228"
369 : "98802581825451803257070188608721131280795122334262883686"
370 : "22321503775666622503982534335974568884423900265498198385"
371 : "48794829220689472168983109969836584681402285424333066033"
372 : "98508864458040010349339704275671864433837704860378616227"
373 : "71738545623065874679014086723327636718751", -1076));
374 6 : }
375 :
376 :
377 9767 : static int CompareBignumToDiyFp(const Bignum& bignum_digits,
378 : int bignum_exponent,
379 : DiyFp diy_fp) {
380 9767 : Bignum bignum;
381 9767 : bignum.AssignBignum(bignum_digits);
382 9767 : Bignum other;
383 9767 : other.AssignUInt64(diy_fp.f());
384 9767 : if (bignum_exponent >= 0) {
385 863 : bignum.MultiplyByPowerOfTen(bignum_exponent);
386 : } else {
387 8904 : other.MultiplyByPowerOfTen(-bignum_exponent);
388 : }
389 9767 : if (diy_fp.e() >= 0) {
390 4458 : other.ShiftLeft(diy_fp.e());
391 : } else {
392 5309 : bignum.ShiftLeft(-diy_fp.e());
393 : }
394 9767 : return Bignum::Compare(bignum, other);
395 : }
396 :
397 :
398 4884 : static bool CheckDouble(Vector<const char> buffer,
399 : int exponent,
400 : double to_check) {
401 4884 : DiyFp lower_boundary;
402 4883 : DiyFp upper_boundary;
403 4884 : Bignum input_digits;
404 4884 : input_digits.AssignDecimalString(buffer);
405 4884 : if (to_check == 0.0) {
406 : const double kMinDouble = 4e-324;
407 : // Check that the buffer*10^exponent < (0 + kMinDouble)/2.
408 : Double d(kMinDouble);
409 1 : d.NormalizedBoundaries(&lower_boundary, &upper_boundary);
410 1 : return CompareBignumToDiyFp(input_digits, exponent, lower_boundary) <= 0;
411 : }
412 4883 : if (to_check == V8_INFINITY) {
413 : const double kMaxDouble = 1.7976931348623157e308;
414 : // Check that the buffer*10^exponent >= boundary between kMaxDouble and inf.
415 : Double d(kMaxDouble);
416 0 : d.NormalizedBoundaries(&lower_boundary, &upper_boundary);
417 0 : return CompareBignumToDiyFp(input_digits, exponent, upper_boundary) >= 0;
418 : }
419 : Double d(to_check);
420 4883 : d.NormalizedBoundaries(&lower_boundary, &upper_boundary);
421 4883 : if ((d.Significand() & 1) == 0) {
422 4928 : return CompareBignumToDiyFp(input_digits, exponent, lower_boundary) >= 0 &&
423 4928 : CompareBignumToDiyFp(input_digits, exponent, upper_boundary) <= 0;
424 : } else {
425 4838 : return CompareBignumToDiyFp(input_digits, exponent, lower_boundary) > 0 &&
426 4838 : CompareBignumToDiyFp(input_digits, exponent, upper_boundary) < 0;
427 : }
428 : }
429 :
430 :
431 : // Copied from v8.cc and adapted to make the function deterministic.
432 4884 : static uint32_t DeterministicRandom() {
433 : // Random number generator using George Marsaglia's MWC algorithm.
434 : static uint32_t hi = 0;
435 : static uint32_t lo = 0;
436 :
437 : // Initialization values don't have any special meaning. (They are the result
438 : // of two calls to rand().)
439 4884 : if (hi == 0) hi = 0xbfe166e7;
440 4884 : if (lo == 0) lo = 0x64d1c3c9;
441 :
442 : // Mix the bits.
443 4884 : hi = 36969 * (hi & 0xFFFF) + (hi >> 16);
444 4884 : lo = 18273 * (lo & 0xFFFF) + (lo >> 16);
445 4884 : return (hi << 16) + (lo & 0xFFFF);
446 : }
447 :
448 :
449 : static const int kBufferSize = 1024;
450 : static const int kShortStrtodRandomCount = 2;
451 : static const int kLargeStrtodRandomCount = 2;
452 :
453 23724 : TEST(RandomStrtod) {
454 6 : v8::base::RandomNumberGenerator rng;
455 : char buffer[kBufferSize];
456 90 : for (int length = 1; length < 15; length++) {
457 168 : for (int i = 0; i < kShortStrtodRandomCount; ++i) {
458 : int pos = 0;
459 1260 : for (int j = 0; j < length; ++j) {
460 1260 : buffer[pos++] = rng.NextInt(10) + '0';
461 : }
462 168 : int exponent = DeterministicRandom() % (25*2 + 1) - 25 - length;
463 168 : buffer[pos] = '\0';
464 168 : Vector<const char> vector(buffer, pos);
465 168 : double strtod_result = Strtod(vector, exponent);
466 168 : CHECK(CheckDouble(vector, exponent, strtod_result));
467 : }
468 : }
469 2358 : for (int length = 15; length < 800; length += 2) {
470 4716 : for (int i = 0; i < kLargeStrtodRandomCount; ++i) {
471 : int pos = 0;
472 1919412 : for (int j = 0; j < length; ++j) {
473 1919412 : buffer[pos++] = rng.NextInt(10) + '0';
474 : }
475 4716 : int exponent = DeterministicRandom() % (308*2 + 1) - 308 - length;
476 4716 : buffer[pos] = '\0';
477 4716 : Vector<const char> vector(buffer, pos);
478 4716 : double strtod_result = Strtod(vector, exponent);
479 4716 : CHECK(CheckDouble(vector, exponent, strtod_result));
480 : }
481 : }
482 6 : }
483 :
484 : } // namespace test_strtod
485 : } // namespace internal
486 71154 : } // namespace v8
|
