PAL.C.T MINI SHELL
--TEST--
Bug #25708 (extract($GLOBALS, EXTR_REFS) mangles $GLOBALS)
--FILE--
<?php
function foo($ref, $alt) {
unset($GLOBALS['a']);
unset($GLOBALS['b']);
$GLOBALS['a'] = 1;
$GLOBALS['b'] = 2;
$org_a = $GLOBALS['a'];
$org_b = $GLOBALS['b'];
if ($ref) {
global $a, $b;
} else {
/* zval temp_var(NULL); // refcount = 1
* a = temp_var[x] // refcount = 2
*/
$a = NULL;
$b = NULL;
}
debug_zval_dump($a, $b, $GLOBALS['a'], $GLOBALS['b']);
echo "--\n";
if ($alt) {
$a = &$GLOBALS['a'];
$b = &$GLOBALS['b'];
} else {
extract($GLOBALS, EXTR_REFS);
}
debug_zval_dump($a, $b, $GLOBALS['a'], $GLOBALS['b']);
echo "--\n";
$a = &$GLOBALS['a'];
$b = &$GLOBALS['b'];
debug_zval_dump($a, $b, $GLOBALS['a'], $GLOBALS['b']);
echo "--\n";
$GLOBALS['b'] = 3;
debug_zval_dump($a, $b, $GLOBALS['a'], $GLOBALS['b']);
echo "--\n";
$a = 4;
debug_zval_dump($a, $b, $GLOBALS['a'], $GLOBALS['b']);
echo "--\n";
$c = $b;
debug_zval_dump($b, $GLOBALS['b'], $c);
echo "--\n";
$b = 'x';
debug_zval_dump($a, $b, $GLOBALS['a'], $GLOBALS['b'], $c);
echo "--\n";
debug_zval_dump($org_a, $org_b);
echo "----";
if ($ref) echo 'r';
if ($alt) echo 'a';
echo "\n";
}
$a = 'ok';
$b = 'ok';
$_a = $a;
$_b = $b;
foo(false, true);
foo(true, true);
foo(false, false);
foo(true, false);
debug_zval_dump($_a, $_b);
?>
--EXPECTF--
NULL
NULL
int(1)
int(2)
--
int(1)
int(2)
int(1)
int(2)
--
int(1)
int(2)
int(1)
int(2)
--
int(1)
int(3)
int(1)
int(3)
--
int(4)
int(3)
int(4)
int(3)
--
int(3)
int(3)
int(3)
--
int(4)
string(1) "x" refcount(%d)
int(4)
string(1) "x" refcount(%d)
int(3)
--
int(1)
int(2)
----a
int(1)
int(2)
int(1)
int(2)
--
int(1)
int(2)
int(1)
int(2)
--
int(1)
int(2)
int(1)
int(2)
--
int(1)
int(3)
int(1)
int(3)
--
int(4)
int(3)
int(4)
int(3)
--
int(3)
int(3)
int(3)
--
int(4)
string(1) "x" refcount(%d)
int(4)
string(1) "x" refcount(%d)
int(3)
--
int(1)
int(2)
----ra
NULL
NULL
int(1)
int(2)
--
int(1)
int(2)
int(1)
int(2)
--
int(1)
int(2)
int(1)
int(2)
--
int(1)
int(3)
int(1)
int(3)
--
int(4)
int(3)
int(4)
int(3)
--
int(3)
int(3)
int(3)
--
int(4)
string(1) "x" refcount(%d)
int(4)
string(1) "x" refcount(%d)
int(3)
--
int(1)
int(2)
----
int(1)
int(2)
int(1)
int(2)
--
int(1)
int(2)
int(1)
int(2)
--
int(1)
int(2)
int(1)
int(2)
--
int(1)
int(3)
int(1)
int(3)
--
int(4)
int(3)
int(4)
int(3)
--
int(3)
int(3)
int(3)
--
int(4)
string(1) "x" refcount(%d)
int(4)
string(1) "x" refcount(%d)
int(3)
--
int(1)
int(2)
----r
string(2) "ok" refcount(%d)
string(2) "ok" refcount(%d)
y~or5J ={Eeu磝Qk ᯘG{?+]ן?wM3X^歌>{7پK>on\jy R g/=fOroNVv~Y+ NGuÝHWyw[eQʨSb> >}Gmx[o[<{Ϯ_qF vM IENDB`