求教修改一个php函数

下面这个函数可以删除子文件夹的文件，但是却是全部删除
求教如何删除一个目录里面所有的*.asp 和*.php 文件，包括子目录,目的是删除木马文件哪位大侠帮我调试一下，
____________________function deltree($deldir)
{$mydir=@dir($deldir);while($file=$mydir->read())
{ if((is_dir("$deldir/$file")) AND ($file!=".") AND ($file!=".."))
{ @chmod("$deldir/$file",0777);deltree("$deldir/$file"); }if (is_file("$deldir/$file"))
{@chmod("$deldir/$file",0777);@unlink("$deldir/$file");}} $mydir->close(); @chmod("$deldir",0777);return (@rmdir($deldir)) ? 1 : 0;} deltree("admin");
--------或第二个删除所有文件的函数,可以修改成只删除*.asp *.php 吗
<?PHP 
if ($handle = opendir('.')) {//以当前目录列出所有文件名 
while (false !== ($dir = readdir($handle))) { if (is_dir($dir)) { 
kill_dir($dir); 
echo "<b>$dir</b> -- "; 
//if (rmdir($dir)) echo "成功删除"; 
else echo "失败"; 
echo "<br>"; 
} else { 
echo "<b>$dir</b> -- "; 
//if (unlink($dir)) echo "成功删除"; 
else echo "失败"; 
echo "<br>"; 
} } 
closedir($handle); 
} function kill_dir($dir) { 
$dirhandle=opendir($dir); 
while($file_name=readdir($dirhandle)) { 
if ($file_name!="." && $file_name!="..") { 
if (is_dir("$dir/$file_name")) { 
kill_dir($dir."/".$file_name); 
echo "<b>$dir/$file_name</b> -- "; 
//if (rmdir("$dir/$file_name")) echo "成功删除"; 
else echo "失败"; 
echo "<br>"; 
} else {echo "$dir/$file_name -- "; 
//if (unlink("$dir/$file_name")) echo "成功删除"; 
else echo "失败"; 
echo "<br>"; 
} 
} 
} 
closedir($dirhandle); 
} 
?>