xcopy関数をシミュレートする

xcopy関数をシミュレートする /**************************************
* システム名：xcopy をシミュレートする関数
*プログラム機能: xcopy 関数をシミュレート
* 開発日: 2003/03/14
***************************** * ***********/
?>

//ある方向のすべてのファイルを別の方向にコピーします
function xCopy($source, $ destination, $child){
//使用法:
// xCopy("feiy","feiy2",1): feiy の下にあるファイルをサブディレクトリも含めて feiy2 にコピーします
// xCopy(" feiy ","feiy2",0): feiy 配下のファイルをサブディレクトリを除いて feiy2 にコピーします
//パラメータの説明:
// $source: コピー元のディレクトリ名
// $destination: コピー先のディレクトリ名
// $child: コピーするときに、サブディレクトリが含まれますか?
if(!is_dir($source)){
echo("エラー: $source は方向ではありません!") ; >return 0;
}
if(!is_dir($destination)){
mkdir($destination,0777)
}


$handle =dir( $source);
while($entry=$handle->read()) {
if(($entry!=".")&&($entry!="..") ){
if(is_dir($source."/".$entry)){
if($child)
xCopy($source."/".$entry,$destination."/" .$entry ,$child);
}
else{

copy($source."/".$entry,$destination."/".$entry);
}
}

return 1;
}

?>