老蒋部落
我们很多站长是否遇到这样的问题，比如我们开始建站的时候可能会更新不少的文章，也有是通过采集获取的图文。但是后续有可能考虑网站内容的变化调整，有些文章是准备删除不要。于是我们可能单篇、批量删除文章，不过我们把文章是删除，同时文章中有的图片和附件还在我们的图片文件夹中。
虽然不影响网站的运营，但是大量的图片和附件占据磁盘，确实比较麻烦。主要是这些附件图片不用，每次搬迁网站的时候还要搬走。就好比我们家里搬家一样，没用的东西其实没有必要搬走。所以这里需要考虑是否可以将DedeCMS织梦程序删除文章的时候也同时将图片和附件删除。目前这个办法老蒋还没有用到，不过我把解决方法整理过来。
这里的解决方法是要修改DedeCMS系统核心文件的，毕竟基本上所有的程序都不带这样的功能，包括我们使用的WordPress默认也没有自带这个功能的，都需要后期的添加插件或者代码修改实现。这里老蒋找到网上的解决方法，整理这里后面看看是否可以实现。
1、修改 /include/extend.func.php
<?php
function GetPicsTruePath($body,$litpic) //解析body数据，获得所有图片的绝对地址
{
$delfiles = array();//存储图片地址数据
if(!empty($litpic))
{
$litpicpath = GetTruePath();
$litpicpath .= $litpic;
$delfiles[] = $litpicpath;//缩略图地址
}
preg_match_all("/src=[\"|'|\S|\s]([^ |\/|>]*){0,}(([^>]*)\.(gif|jpg|png))/isU",$body,$tmpdata);
$picspath = array_unique($tmpdata[2]);//body中所有图片的地址
foreach($picspath as $tmppath)
{
$path = GetTruePath();//获得绝对路径
$picpath = preg_replace("/[a-zA-z]+:\/\/[^ |\/|\s]*/",'',$tmppath);//去掉网址部分
$path .=$picpath;
$delfiles[] = $path;//保存处理后的数据
}
return $delfiles;
}
function WriteToDelFiles($msg)//删除文章的时候会通过此函数记录日志
{
if(empty($msg)) $savemsg="未获得消息";
else $savemsg = $msg;
$errorFile = dirname(__FILE__).'/../data/del_body_file.txt';//删除记录文件
$fp = @fopen($errorFile, 'a');
@fwrite($fp,"\r\n{$savemsg}");
@fclose($fp);
}
//获得文章Body数据
function GetArcBody($aid)
{
global $dsql;
$query = "SELECT dede_addonarticle.body FROM dede_addonarticle WHERE dede_addonarticle.aid = '$aid'";
$row = $dsql->GetOne($query);
if(is_array($row)) return $row;
else return false;
}
function litimgurls($imgid=0){
global $lit_imglist;
$dsql = new DedeSql(false);
//获取附加表
$row = $dsql->GetOne("SELECT c.addtable FROM dede_archives AS a LEFT JOIN dede_channeltype AS c ON a.channel=c.id where a.id='$imgid'");
$addtable = trim($row['addtable']);
//获取图片附加表imgurls字段内容进行处理
$row = $dsql->GetOne("Select imgurls From `$addtable` where aid='$imgid'");
//调用inc_channel_unit.php中ChannelUnit类
$ChannelUnit = new ChannelUnit(2,$imgid);
//调用ChannelUnit类中GetlitImgLinks方法处理缩略图
$lit_imglist = $ChannelUnit->GetlitImgLinks($row['imgurls']);
//返回结果
return $lit_imglist;
}
?>
替换全部文件。
2、找到/dede/inc/inc_batchup.php
<?php
function DelArc($aid,$type='ON',$onlyfile=false)
{
global $dsql,$cfg_cookie_encode,$cfg_multi_site,$cfg_medias_dir;
global $cuserLogin,$cfg_upload_switch,$cfg_delete,$cfg_basedir;
global $admin_catalogs, $cfg_admin_channel;
if($cfg_delete == 'N') $type = 'OK';
if(empty($aid)) return ;
$aid = ereg_replace("[^0-9]", '', $aid);
$arctitle = $arcurl = '';
//查询表信息
$query = "Select ch.maintable,ch.addtable,ch.nid,ch.issystem From `dede_arctiny` arc
left join `dede_arctype` tp on tp.id=arc.typeid
left join `dede_channeltype` ch on ch.id=arc.channel where arc.id='$aid' ";
$row = $dsql->GetOne($query);
$nid = $row['nid'];
$maintable = (trim($row['maintable'])=='' ? 'dede_archives' : trim($row['maintable']));
$addtable = trim($row['addtable']);
$issystem = $row['issystem'];
//查询档案信息
if($issystem==-1)
{
$arcQuery = "Select arc.*,tp.* from `$addtable` arc left join `dede_arctype` tp on arc.typeid=tp.id where arc.aid='$aid' ";
}
else
{
$arcQuery = "Select arc.*,tp.*,arc.id as aid from `$maintable` arc left join `dede_arctype` tp on arc.typeid=tp.id where arc.id='$aid' ";
}
$arcRow = $dsql->GetOne($arcQuery);
$arcBodyRow = GetArcBody($aid);
//检测权限
if(!TestPurview('a_Del,sys_ArcBatch'))
{
if(TestPurview('a_AccDel'))
{
if( !in_array($arcRow['typeid'], $admin_catalogs) && (count($admin_catalogs) != 0 || $cfg_admin_channel != 'all') )
{
return false;
}
}
else if(TestPurview('a_MyDel'))
{
if($arcRow['mid'] != $cuserLogin->getUserID())
{
return false;
}
}
else
{
return false;
}
}
//$issystem==-1 是单表模型，不使用回收站
if($issystem == -1) $type = 'OK';
if(!is_array($arcRow)) return false;
/** 删除到回收站 **/
if($cfg_delete == 'Y' && $type == 'ON')
{
$dsql->ExecuteNoneQuery("Update `$maintable` set arcrank='-2' where id='$aid' ");
$dsql->ExecuteNoneQuery("Update `dede_arctiny` set `arcrank` = '-2' where id = '$aid'; ");
}
else
{
//删除数据库记录
if(!$onlyfile)
{
//删除缩略图
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);
}
//删除相关附件
if($cfg_upload_switch == 'Y')
{
$dsql->Execute("me", "SELECT * FROM `dede_uploads` WHERE arcid = '$aid'");
while($row = $dsql->GetArray('me'))
{
$addfile = $row['url'];
$aid = $row['aid'];
$dsql->ExecuteNoneQuery("Delete From `dede_uploads` where aid = '$aid' ");
$upfile = $cfg_basedir.$addfile;
if(@file_exists($upfile)) @unlink($upfile);
}
}
$dsql->ExecuteNoneQuery("Delete From `dede_arctiny` where id='$aid'");
if($addtable != '')
{
$dsql->ExecuteNoneQuery("Delete From `$addtable` where aid='$aid' ");
}
if($issystem != -1)
{
$dsql->ExecuteNoneQuery("Delete From `dede_archives` where id='$aid' ");
}
$dsql->ExecuteNoneQuery("Delete From `dede_feedback` where aid='$aid' ");
$dsql->ExecuteNoneQuery("Delete From `dede_member_stow` where aid='$aid' ");
$dsql->ExecuteNoneQuery("Delete From `dede_taglist` where aid='$aid' ");
$dsql->ExecuteNoneQuery("Delete From `dede_erradd` where aid='$aid' ");
}
//删除文本数据
$filenameh = DEDEDATA."/textdata/".(ceil($aid/5000))."/{$aid}-".substr(md5($cfg_cookie_encode),0,16).".txt";
if(@is_file($filenameh)) @unlink($filenameh);
}
if(empty($arcRow['money'])) $arcRow['money'] = 0;
if(empty($arcRow['ismake'])) $arcRow['ismake'] = 1;
if(empty($arcRow['arcrank'])) $arcRow['arcrank'] = 0;
if(empty($arcRow['filename'])) $arcRow['filename'] = '';
//删除HTML
if($arcRow['ismake']==-1 || $arcRow['arcrank']!=0 || $arcRow['typeid']==0 || $arcRow['money']>0)
{
return true;
}
//强制转换非多站点模式，以便统一方式获得实际HTML文件
$GLOBALS['cfg_multi_site'] = 'N';
$arcurl = GetFileUrl($arcRow['aid'],$arcRow['typeid'],$arcRow['senddate'],$arcRow['title'],$arcRow['ismake'],
$arcRow['arcrank'],$arcRow['namerule'],$arcRow['typedir'],$arcRow['money'],$arcRow['filename']);
if(!ereg("\?", $arcurl))
{
$htmlfile = GetTruePath().str_replace($GLOBALS['cfg_basehost'],'',$arcurl);
if(file_exists($htmlfile) && !is_dir($htmlfile))
{
@unlink($htmlfile);
$arcurls = explode(".", $htmlfile);
$sname = $arcurls[count($arcurls)-1];
$fname = ereg_replace("(\.$sname)$", "", $htmlfile);
for($i=2; $i<=100; $i++)
{
$htmlfile = $fname."_{$i}.".$sname;
if( @file_exists($htmlfile) ) @unlink($htmlfile);
else break;
}
}
}
//解析Body中的资源，并删除
$willDelFiles = GetPicsTruePath($arcBodyRow['body'],$arcRow['litpic']);
$nowtime = time();
$executetime = MyDate('Y-m-d H:i:s',$nowtime);//获得执行时间
$msg = "\r\n文章标题：$arcRow[title]";
WriteToDelFiles($msg);
if(!empty($willDelFiles))
{
foreach($willDelFiles as $file)
{
if(file_exists($file) && !is_dir($file))
{
if(unlink($file)) $msg = "\r\n位置：$file\r\n结果：删除成功！\r\n时间：$executetime";
else $msg = "\r\n位置：$file\r\n结果：删除失败！\r\n时间：$executetime";
}
else $msg = "\r\n位置：$file\r\n结果：文件不存！\r\n时间：$executetime";
WriteToDelFiles($msg);
}//END foreach
}
else
{
$msg = "\r\n未在Body中解析到数据\r\nBody原始数据：$arcBodyRow[body]\r\n时间：$executetime";
WriteToDelFiles($msg);
}
return true;
}
//获取真实路径
function GetTruePath($siterefer='', $sitepath='')
{
$truepath = $GLOBALS['cfg_basedir'];
return $truepath;
}
?>
替换文件。
这里需要注意的问题是我们在修改文件之前要做好备份，万一无法实现可以换其他办法以及恢复。
解决方法参考来自：https://www.cnblogs.com/xiamidong/p/13356221.html
本文出处：老蒋部落 » DedeCMS织梦设置删除文章同步删除图片和附件策略 | 欢迎分享（ 公众号：老蒋朋友圈 ）
