test_valid.phpt
来自「视频监控网络部分的协议ddns,的模块的实现代码,请大家大胆指正.」· PHPT 代码 · 共 66 行
PHPT
66 行
--TEST--
PEAR_PackageFileManager_File->_setupDirs, valid test
--SKIPIF--
--FILE--
<?php
require_once dirname(dirname(__FILE__)) . DIRECTORY_SEPARATOR . 'setup.php.inc';
$packagexml->_options['addhiddenfiles'] = false;
$packagexml->_options['ignore'] =
$packagexml->_options['include'] = false;
$packagexml->_setupIgnore(false, 0);
$packagexml->_setupIgnore(false, 1);
$list = $packagexml->dirList($package_directory =
dirname(dirname(dirname(__FILE__))) . DIRECTORY_SEPARATOR . 'footest');
$struc = array();
foreach($list as $file) {
$path = substr(dirname($file), strlen(str_replace(DIRECTORY_SEPARATOR,
'/',
realpath($package_directory))) + 1);
if (!$path) {
$path = '/';
}
$ext = array_pop(explode('.', $file));
if (strlen($ext) == strlen($file)) {
$ext = '';
}
$struc[$path][] = array('file' => basename($file),
'ext' => $ext,
'path' => (($path == '/') ? basename($file) : $path . '/' . basename($file)),
'fullpath' => $file);
}
uksort($struc,'strnatcasecmp');
foreach($struc as $key => $ind) {
usort($ind, array($packagexml, 'sortfiles'));
$struc[$key] = $ind;
}
$test = $packagexml->_setupDirs($struc['/'], explode('/','subfoo/subsubfoo'), $struc['subfoo/subsubfoo']);
$phpunit->assertEquals(
array(
0 =>
array('file' => 'test1.txt',
'ext' => 'txt',
'path' => 'test1.txt',
'fullpath' => dirname(dirname(dirname(__FILE__))) . DIRECTORY_SEPARATOR . 'footest/test1.txt'),
1 =>
array('file' => 'test2.txt',
'ext' => 'txt',
'path' => 'test2.txt',
'fullpath' => dirname(dirname(dirname(__FILE__))) . DIRECTORY_SEPARATOR . 'footest/test2.txt'),
'subfoo' =>
array(
'subsubfoo' =>
array(
array('file' => 'boo.txt',
'ext' => 'txt',
'path' => 'subfoo/subsubfoo/boo.txt',
'fullpath' => dirname(dirname(dirname(__FILE__))) . DIRECTORY_SEPARATOR . 'footest/subfoo/subsubfoo/boo.txt')
),
),
),
$test,
'incorrect parsing'
);
echo 'tests done';
?>
--EXPECT--
tests done
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?