2006-01-06 16:27:15 +00:00
--TEST--
Phar: phar:// opendir
--SKIPIF--
2008-01-04 16:26:44 +00:00
<?php if (!extension_loaded("phar")) die("skip"); ?>
2007-01-08 23:03:41 +00:00
--INI--
phar.require_hash=0
2006-01-06 16:27:15 +00:00
--FILE--
<?php
$fname = dirname(__FILE__) . '/' . basename(__FILE__, '.php') . '.phar.php';
$pname = 'phar://' . $fname;
$file = "<?php __HALT_COMPILER(); ?>";
2006-01-11 00:50:33 +00:00
$files = array();
2007-12-14 05:22:53 +00:00
$files['a.php'] = '<?php echo "This is a\n"; require \''.$pname.'/b.php\'; ?>';
$files['b.php'] = '<?php echo "This is b\n"; require \''.$pname.'/b/c.php\'; ?>';
$files['b/c.php'] = '<?php echo "This is b/c\n"; require \''.$pname.'/b/d.php\'; ?>';
$files['b/d.php'] = '<?php echo "This is b/d\n"; require \''.$pname.'/e.php\'; ?>';
2006-01-11 00:50:33 +00:00
$files['e.php'] = '<?php echo "This is e\n"; ?>';
2006-01-06 16:27:15 +00:00
2008-02-20 13:11:40 +00:00
include 'files/phar_test.inc';
2006-01-06 16:27:15 +00:00
function dump($phar, $base)
{
2006-03-06 22:19:21 +00:00
var_dump(str_replace(dirname(__FILE__), '*', $phar) . $base);
2006-01-06 16:27:15 +00:00
$dir = opendir($phar . $base);
if ($base == '/')
{
$base = '';
}
while (false !== ($entry = readdir($dir))) {
$entry = $base . '/' . $entry;
var_dump($entry);
var_dump(is_dir($phar . $entry));
if (is_dir($phar . $entry))
{
dump($phar, $entry);
}
}
}
dump($pname, '/');
2008-04-13 23:46:15 +00:00
$a = opendir($pname);
// this may stop working in future versions, but is here for code coverage purposes
echo "fseek on dir handle\n";
var_dump(fseek($a, 0, SEEK_END), ftell($a));
var_dump(fseek($a, -1), ftell($a));
var_dump(fseek($a, 1), ftell($a));
2008-04-13 23:48:46 +00:00
echo "fwrite on dir handle\n";
var_dump(fwrite($a, 'hi'));
2008-04-13 23:57:44 +00:00
var_dump(fstat($a));
2008-04-13 23:48:46 +00:00
closedir($a);
2008-04-14 04:44:04 +00:00
echo "opendir edge cases\n";
var_dump(opendir("phar://"));
var_dump(opendir("phar://foo.phar/hi"));
2008-04-14 16:34:11 +00:00
echo "extract_list test\n";
ini_set('phar.extract_list', 'test.phar=' . dirname(__FILE__) . '/ump');
mkdir($a = dirname(__FILE__) . '/ump');
file_put_contents($a . '/test1.txt', 'hi');
file_put_contents($a . '/test2.txt', 'hi');
file_put_contents($a . '/test3.txt', 'hi');
$b = opendir('phar://test.phar/');
while (false !== ($c = readdir($b))) {
echo "$c\n";
}
2008-04-14 22:22:04 +00:00
closedir($b);
2008-04-14 16:34:11 +00:00
unlink($a . '/test1.txt');
unlink($a . '/test2.txt');
unlink($a . '/test3.txt');
rmdir($a);
2006-01-06 16:27:15 +00:00
?>
===DONE===
--CLEAN--
<?php unlink(dirname(__FILE__) . '/' . basename(__FILE__, '.clean.php') . '.phar.php'); ?>
--EXPECTF--
2006-03-06 22:19:21 +00:00
string(%d) "phar://*/027.phar.php/"
2006-01-06 16:27:15 +00:00
string(6) "/a.php"
bool(false)
string(2) "/b"
bool(true)
2006-03-06 22:19:21 +00:00
string(%d) "phar://*/027.phar.php/b"
2006-01-06 16:27:15 +00:00
string(8) "/b/c.php"
bool(false)
string(8) "/b/d.php"
bool(false)
string(6) "/b.php"
bool(false)
string(6) "/e.php"
bool(false)
2008-04-13 23:46:15 +00:00
fseek on dir handle
int(0)
int(4)
int(-1)
int(4)
int(0)
int(1)
2008-04-13 23:48:46 +00:00
fwrite on dir handle
int(0)
2008-04-13 23:57:44 +00:00
bool(false)
2008-04-14 04:44:04 +00:00
opendir edge cases
2008-04-14 15:58:12 +00:00
Warning: opendir(phar://): failed to open dir: phar error: no directory in "phar://", must have at least phar:/// for root directory (always use full path to a new phar)
phar url "phar://" is unknown in %s027.php on line %d
2008-04-14 04:44:04 +00:00
bool(false)
Warning: opendir(phar://foo.phar/hi): failed to open dir: phar url "phar://foo.phar/hi" is unknown in %s027.php on line %d
bool(false)
2008-04-14 16:34:11 +00:00
extract_list test
.
..
test1.txt
test2.txt
test3.txt
2006-01-06 16:27:15 +00:00
===DONE===