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