mirror of
https://github.com/php/php-src.git
synced 2024-12-21 16:00:18 +08:00
77566edbaf
PHP should preserve the least significant bits when casting from double to long. Zend.m4 contains this: AC_DEFINE([ZEND_DVAL_TO_LVAL_CAST_OK], 1, [Define if double cast to long preserves least significant bits]) If ZEND_DVAL_TO_LVAL_CAST_OK is not defined, zend_operators.h had an inline implementation of zend_dval_to_lval() that would do a cast to an int64_t (when sizeof(long) == 4), then a cast to unsigned long and finally the cast to long. While this works well for doubles inside the range of values of the type used in the first cast (int64_t in the 32-bit version and unsigned long in the 64-bit version), if outside the range, it is undefined behavior that WILL give varying and not particularly useful results. This commit uses fmod() to first put the double in a range that can safely be cast to unsigned long and then casts this unsigned long to long. This last cast is implementation defined, but it's very likely that this gives the expected result (i.e. the internal 2's complement representation is unchanged) on all platforms that PHP supports. In any case, the previous implementationa already had this assumption. This alternative code path is indeed significantly slower than simply casting the double (almost an order of magnitude), but that should not matter because casting doubles with a very high absolute value is a rare event.
106 lines
1.8 KiB
PHP
106 lines
1.8 KiB
PHP
--TEST--
|
|
Bug #39018 (Error control operator '@' fails to suppress "Uninitialized string offset")
|
|
--FILE--
|
|
<?php
|
|
|
|
error_reporting(E_ALL);
|
|
|
|
$a = 'foo';
|
|
$a[111111111111111111111];
|
|
|
|
$a = '';
|
|
|
|
$a[0];
|
|
|
|
print $a[0]; // 12
|
|
|
|
$a[-11111111111111111111111];
|
|
|
|
print $a[-11111111111111111111111]; // 16
|
|
|
|
$a[-0];
|
|
|
|
$x = 'test';
|
|
|
|
@$x[4];
|
|
|
|
@$y = $x[4];
|
|
|
|
@('a' == $x[4]);
|
|
|
|
$x[4] == 'a'; // 28
|
|
|
|
@$x[4] == 'a';
|
|
|
|
(@$x[4]) == 'a';
|
|
|
|
($x[4]) == 'a'; // 34
|
|
|
|
(@($x[4])) == 'a';
|
|
|
|
(($x[4])) == 'a'; // 38
|
|
|
|
@($x[4]) == 'a';
|
|
|
|
($x[4]) == 'a'; // 42
|
|
|
|
@($x[4] == 'a');
|
|
|
|
($x[4] == 'a'); // 46
|
|
|
|
$y = 'foobar';
|
|
|
|
$y[12.2];
|
|
|
|
print $y[12.2]; // 52
|
|
|
|
$y[3.5];
|
|
|
|
print $y[3.5]; // 56
|
|
|
|
print "\nDone\n";
|
|
|
|
?>
|
|
--EXPECTF--
|
|
Notice: String offset cast occurred in %s on line %d
|
|
|
|
Notice: Uninitialized string offset: %s in %s on line 6
|
|
|
|
Notice: Uninitialized string offset: 0 in %s on line %d
|
|
|
|
Notice: Uninitialized string offset: 0 in %s on line %d
|
|
|
|
Notice: String offset cast occurred in %s on line %d
|
|
|
|
Notice: Uninitialized string offset: %i in %s on line %d
|
|
|
|
Notice: String offset cast occurred in %s on line %d
|
|
|
|
Notice: Uninitialized string offset: %i in %s on line %d
|
|
|
|
Notice: Uninitialized string offset: 0 in %s on line %d
|
|
|
|
Notice: Uninitialized string offset: 4 in %s on line %d
|
|
|
|
Notice: Uninitialized string offset: 4 in %s on line %d
|
|
|
|
Notice: Uninitialized string offset: 4 in %s on line %d
|
|
|
|
Notice: Uninitialized string offset: 4 in %s on line %d
|
|
|
|
Notice: Uninitialized string offset: 4 in %s on line %d
|
|
|
|
Notice: String offset cast occurred in %s on line %d
|
|
|
|
Notice: Uninitialized string offset: 12 in %s on line %d
|
|
|
|
Notice: String offset cast occurred in %s on line %d
|
|
|
|
Notice: Uninitialized string offset: 12 in %s on line %d
|
|
|
|
Notice: String offset cast occurred in %s on line %d
|
|
|
|
Notice: String offset cast occurred in %s on line %d
|
|
b
|
|
Done
|