php-src/ext/standard/tests/dir/opendir_variation4.phpt
2008-03-04 10:40:36 +00:00

108 lines
2.4 KiB
PHP

--TEST--
Test opendir() function : usage variations - different relative paths
--FILE--
<?php
/* Prototype : mixed opendir(string $path[, resource $context])
* Description: Open a directory and return a dir_handle
* Source code: ext/standard/dir.c
*/
/*
* Test opendir() with different relative paths as $path argument
*/
echo "*** Testing opendir() : usage variation ***\n";
$base_dir_path = dirname(__FILE__);
$level_one_dir_name = "level_one";
$level_one_dir_path = "$base_dir_path/$level_one_dir_name";
$level_two_dir_name = "level_two";
$level_two_dir_path = "$base_dir_path/$level_one_dir_name/$level_two_dir_name";
// create directories
mkdir($level_one_dir_path);
mkdir($level_two_dir_path);
echo "\n-- \$path = './level_one': --\n";
var_dump(chdir($base_dir_path));
var_dump($dh = opendir("./$level_one_dir_name"));
clean_dh($dh);
echo "\n-- \$path = 'level_one/level_two': --\n";
var_dump(chdir($base_dir_path));
var_dump($dh = opendir("$level_one_dir_name/$level_two_dir_name"));
clean_dh($dh);
echo "\n-- \$path = '..': --\n";
var_dump($dh = opendir('..'));
clean_dh($dh);
echo "\n-- \$path = 'level_two', '.': --\n";
var_dump(chdir($level_two_dir_path));
var_dump($dh = opendir('.'));
clean_dh($dh);
echo "\n-- \$path = '../': --\n";
var_dump($dh = opendir('../'));
clean_dh($dh);
echo "\n-- \$path = './': --\n";
var_dump(chdir($level_two_dir_path));
var_dump($dh = opendir('./'));
clean_dh($dh);
echo "\n-- \$path = '../../'level_one': --\n";
var_dump(chdir($level_two_dir_path));
var_dump($dh = opendir("../../$level_one_dir_name"));
clean_dh($dh);
/*
* function to remove directory handle before re-using variable name in test
* and to ensure directory is not in use at CLEAN section so can me removed
*/
function clean_dh($dh){
if (is_resource($dh)) {
closedir($dh);
}
unset($dh);
}
?>
===DONE===
--CLEAN--
<?php
$file_path = dirname(__FILE__);
rmdir("$file_path/level_one/level_two");
rmdir("$file_path/level_one");
?>
--EXPECTF--
*** Testing opendir() : usage variation ***
-- $path = './level_one': --
bool(true)
resource(%d) of type (stream)
-- $path = 'level_one/level_two': --
bool(true)
resource(%d) of type (stream)
-- $path = '..': --
resource(%d) of type (stream)
-- $path = 'level_two', '.': --
bool(true)
resource(%d) of type (stream)
-- $path = '../': --
resource(%d) of type (stream)
-- $path = './': --
bool(true)
resource(%d) of type (stream)
-- $path = '../../'level_one': --
bool(true)
resource(%d) of type (stream)
===DONE===