<?
/*
	getdir	讀取路徑資訊

		傳入 $dir (目標路徑)，傳回 $dirs (目標路徑及以下所有路徑)，$files (所有檔案 (包含路徑名))
*/

// ____________________________________________

if (! isset($dir)) :
	$dir = './';
elseif (substr($dir, -1) != '/') :
	$dir .= '/';
endif;

$dirs = array($dir);				// all directorys
$files = array();
for ($i=0; $i<count($dirs); $i++) :			// find all sub directory
	$to1 = opendir($dirs[$i]);
	while ($file = readdir($to1)) :
		if ($file == '.' || $file == '..') continue;
		if (! is_dir($dirs[$i] . $file)) continue;
		$dirs[] = $dirs[$i] . $file . '/';
	endwhile;
endfor;
$ti1 = count($dirs);
for ($i=0; $i<$ti1; $i++) :
	$to1 = opendir($dirs[$i]);
	while ($file = readdir($to1)) :
		if ($file == '.' || $file == '..') continue;
		if (is_dir($dirs[$i] . $file)) continue;
		$files[] = $dirs[$i] . $file;
	endwhile;
endfor;
closedir($to1);

// ____________________________________________

if (! function_exists('delfile')) :
	function delfile(){
		global $dirs, $files;
		$ti1 = count($files);
		for ($i=0; $i<$ti1; $i++) :
			unlink($files[$i]);
		endfor;
	};
endif;
if (! function_exists('deldir')) :
	function deldir(){
		global $dirs, $files;
		$ti1 = count($dirs);
		for ($i=$ti1-1; $i>=0; $i--) :
			rmdir($dirs[$i]);
		endfor;
	};
endif;
?>