织梦删除服务器中多余的没有被调用的图片

//删除缩略图
if($arcRow['litpic']!=""){
$dsql->ExecuteNoneQuery("Delete From dede_uploads where url='$arcRow[litpic]'");
$truedir = GetTruePath($arcRow['siterefer'],$arcRow['sitepath']);
$litpicfile = $truedir.$arcRow['litpic'];
@unlink($litpicfile);
}
//删除大图
$arcbodyQuery = "Select * from ".$arcRow['addtable']." where aid='$aid'";
$arcbodyRow = $dsql->GetOne($arcbodyQuery);
$imgsrcarray=GetImageSrc($arcbodyRow['body']);
foreach ($imgsrcarray as $v) {
if((trim($v)!="")&&(!eregi("^http://",$v))){
$dsql->ExecuteNoneQuery("Delete From dede_uploads where url='$v'");
$picfile = $truedir.$v;
@unlink($picfile);
}
}
//删除数据库的内容

//获得内容中的图像地址
function GetImageSrc($body){
if( !isset($body)) return '';
else{
preg_match_all ("/<(img|IMG)(.*)(src|SRC)=[\"|'|]{0,}([h|\/].*(jpg|JPG|gif|GIF))[\"|'|\s]{0,}/isU",$body,$out);
return $out[4];
}
}

<inputclass="np"type="radio"checked="checked"name="action"value="modddpic"/><br />

更正缩图错误<br /> <inputclass="np"type="radio"name="action"value="delerrdata"/><br />

清空错误的文档数据<br /> <inputclass="np"type="radio"name="action"value="delerrpic"/><br />

清空错误的图片</td>

elseif($action == 'delerrpic')
{
$file_a=array();
function rFile($p){
  global $file_a;
  $handle=opendir($p);
  $dir_a=array();
  while ($file = readdir($handle)) {
   if($file!="." && $file!=".."){
    $tmp=$p."/".$file;
    if(is_dir($tmp)){
     $dir_a[count($dir_a)]=$tmp;
    }elseif(is_file($tmp)){
     $file_a[count($file_a)]=$tmp;
    }
   }
  }
  closedir($handle);
  foreach($dir_a as $v){
   rFile($v);
  }
}
rFile("../uploads/allimg");//调用，要遍历的目录
foreach($file_a as $v){
  $temp=substr($v,2);
  $query = "select count(*) from dede_addonarticle where body like '%".$temp."%'";
  $dsql->setquery($query);
  $dsql->execute();
  while($row = $dsql->getarray())
  {
   if($row[0]==0){
    if(substr($v, -8, 4)!="_lit" && substr($v, -10, 5)!="index"){
     if(file_exists($v))
      unlink($v);
    }
   }
  }
}
$dsql->Close();
ShowMsg("成功清除错误图片！","javascript:;");
exit();