<?php
/*
[LocoySpider] (C)2005-2010 Lewell Inc.
火车采集器 DedeCMS 5.7 UTF8 文章发布接口
Update content： 图片加水印，远程图片本地化(无后缀的图片也可以本地化)
Update people ：Abner
Update time ： 2017-01-05
*/
/********密码验证***********/
$password='huarenyuangong'; //这个密码是登陆验证用的.您需要在模块里设置和这里一样的密码....注意一定需要修改.
if($password!=$_GET['pw']) exit('验证密码错误'); //安全检测,密码不符则退出
function logLog( $path, $str)
{
$file = fopen( $path, 'w') or die('Unable to open file!');
fwrite( $file, $str );
fclose($file);
}
$path1 = '../'.time().'a.txt';
$path2 = '../'.time().'b.txt';
/****以下代码非专业人员不建议修改***************/
if($_POST) $ispost=true;
//require_once(dirname(__FILE__).'/config.php');
define('DEDEADMIN', ereg_replace("[/\\]{1,}", '/', dirname(__FILE__) ) );
require_once(DEDEADMIN.'/../include/common.inc.php');
require_once(DEDEINC.'/userlogin.class.php');
header('Cache-Control:private');
$dsql->safeCheck = false;
$dsql->SetLongLink();
$cuserLogin = new userLogin();
$cuserLogin->userID = 1;
//获得当前脚本名称，如果你的系统被禁用了$_SERVER变量，请自行更改这个选项
$dedeNowurl = $s_scriptName = '';
$isUrlOpen = @ini_get('allow_url_fopen');
$dedeNowurl = GetCurUrl();
$dedeNowurls = explode('?', $dedeNowurl);
$s_scriptName = $dedeNowurls[0];
$cfg_remote_site = empty($cfg_remote_site)? 'N' : $cfg_remote_site;
//启用远程站点则创建FTP类
if($cfg_remote_site=='Y')
{
require_once(DEDEINC.'/ftp.class.php');
if(file_exists(DEDEDATA."/cache/inc_remote_config.php"))
{
require_once DEDEDATA."/cache/inc_remote_config.php";
}
if(empty($remoteuploads)) $remoteuploads = 0;
if(empty($remoteupUrl)) $remoteupUrl = '';
$config = array(
'hostname' => $GLOBALS['cfg_ftp_host'],
'username' => $GLOBALS['cfg_ftp_user'],
'password' => $GLOBALS['cfg_ftp_pwd'],
'debug' => 'TRUE'
);
$ftp = new FTP($config);
//初始化FTP配置
if($remoteuploads==1){
$ftpconfig = array(
'hostname'=>$rmhost,
'port'=>$rmport,
'username'=>$rmname,
'password'=>$rmpwd
);
}
}
function UpDateMemberModCache()
{
global $dsql;
$cachefile = DEDEDATA.'/cache/member_model.inc';
$dsql->SetQuery("SELECT * FROM `#@__member_model` WHERE state='1'");
$dsql->Execute();
$fp1 = fopen($cachefile,'w');
$phph = '?';
$fp1Header = "<{$phph}php\r\nglobal \$_MemberMod;\r\n\$_MemberMod=array();\r\n";
fwrite($fp1,$fp1Header);
while($row=$dsql->GetObject())
{
fwrite($fp1,"\$_MemberMod[{$row->id}]=array('{$row->name}','{$row->table}');\r\n");
}
fwrite($fp1,"{$phph}>");
fclose($fp1);
}
function DedeInclude($filename,$isabs=false)
{
return $isabs ? $filename : DEDEADMIN.'/'.$filename;
}
//config引用结束
//CheckPurview('a_New,a_AccNew');
require_once(DEDEINC.'/customfields.func.php');
require_once(DEDEADMIN.'/inc/inc_archives_functions.php');
if(file_exists(DEDEDATA.'/template.rand.php'))
{
require_once(DEDEDATA.'/template.rand.php');
}
$dsql->SetSql("Select id as cid,reid as pid,typename as cname,ispart,topid from `#@__arctype` where channeltype =1 order by sortrank");
$dsql->Execute();
while($row=$dsql->GetObject())
{
$cates[]=array('cid'=>$row->cid,'pid'=>$row->pid,'cname'=>$row->cname,'ispart'=>$row->ispart,'topid'=>$row->topid);
}
if(!$ispost)
{
echo "<select name='list'>";
echo maketree($cates,0,'');
echo '</select>';
exit();
}
/*--------------------------------
function __save(){ }
-------------------------------*/
else
{
require_once(DEDEINC.'/image.func.php');
require_once(DEDEINC.'/oxwindow.class.php');
//检验用户登录状态
$userinfo=$dsql->GetOne("Select * from `#@__member` where userid='$username'");
if(!$userinfo) exit("不存在用户$username");
$uid = isset($userinfo['uid']) ? $userinfo['uid'] : $userinfo['mid'];
//检测栏目信息
foreach ($cates as $f=>$v)
{
if($v['cid']==$typeid)
{
$eid=$v;
if($v['ispart']!=0) exit("该栏目不能发布内容");
}
}
if(!$eid) exit("不存在的栏目id:$typeid");
require_once(DEDEINC.'/image.func.php');
//require_once(DEDEINC.'/oxwindow.class.php');
$flag = isset($flags) ? join(',',$flags) : '';
$notpost = isset($notpost) && $notpost == 1 ? 1: 0;
if(empty($typeid2)) $typeid2 = '';
if(!isset($autokey)) $autokey = 0;
if(!isset($remote)) $remote = 0;
if(!isset($dellink)) $dellink = 0;
if(!isset($autolitpic)) $autolitpic = 0;
if(empty($click)) $click = ($cfg_arc_click=='-1' ? mt_rand(50, 200) : $cfg_arc_click);
if(empty($typeid))
{
ShowMsg("请指定文档的栏目！","-1");
exit();
}
if(empty($channelid))
{
ShowMsg("文档为非指定的类型，请检查你发布内容的表单是否合法！","-1");
exit();
}
if(!CheckChannel($typeid,$channelid))
{
ShowMsg("你所选择的栏目与当前模型不相符，请选择白色的选项！","-1");
exit();
}
//对保存的内容进行处理
if(empty($writer))$writer=$username;
if(empty($source))$source='未知';
$pubdate = GetMkTime($pubdate);
if(!$pubdate) $pubdate=time();
$senddate = time();
$sortrank = AddDay($pubdate,$sortup);
$ismake = $ishtml==0 ? -1 : 0;
$title = ereg_replace('"', '＂', $title);
$title = htmlspecialchars(cn_substrR($title,$cfg_title_maxlen));
$shorttitle = cn_substrR($shorttitle,36);
$color = cn_substrR($color,7);
$writer = cn_substrR($writer,20);
$source = cn_substrR($source,30);
$description = cn_substrR($description,$cfg_auot_description);
$keywords = cn_substrR($keywords,60);
$filename = trim(cn_substrR($filename,40));
$userip = GetIP();
$isremote = (empty($isremote)? 0 : $isremote);
$serviterm=empty($serviterm)? "" : $serviterm;
// if(!TestPurview('a_Check,a_AccCheck,a_MyCheck'))
// {
// $arcrank = -1;
// }
$adminid = $uid;
//处理上传的缩略图
if(empty($ddisremote))
{
$ddisremote = 0;
}
$litpic = GetDDImage('none', $picname, $ddisremote);
//生成文档ID
$arcID = GetIndexKey($arcrank,$typeid,$sortrank,$channelid,$senddate,$adminid);
if(empty($arcID))
{
ShowMsg("无法获得主键，因此无法进行后续操作！","-1");
exit();
}
if(trim($title) == '')
{
ShowMsg('标题不能为空', '-1');
exit();
}
//处理body字段自动摘要、自动提取缩略图等
$body = AnalyseHtmlBody($body,$description,$litpic,$keywords,'htmltext');
$path = '../uploads/allimg/' . date( 'ymd', time() ) .'/';
$body = downloadNoExtImg( $path, $body );
//自动分页
if($sptype=='auto')
{
$body = SpLongBody($body,$spsize*1024,"#p#分页标题#e#");
}
//分析处理附加表数据
$inadd_f = $inadd_v = '';
if(!empty($dede_addonfields))
{
$addonfields = explode(';',$dede_addonfields);
if(is_array($addonfields))
{
foreach($addonfields as $v)
{
if($v=='') continue;
$vs = explode(',',$v);
if($vs[1]=='htmltext'||$vs[1]=='textdata')
{
${$vs[0]} = AnalyseHtmlBody(${$vs[0]},$description,$litpic,$keywords,$vs[1]);
}
else
{
if(!isset(${$vs[0]})) ${$vs[0]} = '';
${$vs[0]} = GetFieldValueA(${$vs[0]},$vs[1],$arcID);
}
$inadd_f .= ','.$vs[0];
$inadd_v .= " ,'".${$vs[0]}."' ";
}
}
}
//处理图片文档的自定义属性
if($litpic!='' && !ereg('p',$flag))
{
$flag = ($flag=='' ? 'p' : $flag.',p');
}
if($redirecturl!='' && !ereg('j',$flag))
{
$flag = ($flag=='' ? 'j' : $flag.',j');
}
//跳转网址的文档强制为动态
if(ereg('j', $flag)) $ismake = -1;
//保存到主表
$query = "INSERT INTO `#@__archives`(id,typeid,typeid2,sortrank,flag,ismake,channel,arcrank,click,money,title,shorttitle,
color,writer,source,litpic,pubdate,senddate,mid,notpost,description,keywords,filename,dutyadmin,weight)
VALUES ('$arcID','$typeid','$typeid2','$sortrank','$flag','$ismake','$channelid','$arcrank','$click','$money',
'$title','$shorttitle','$color','$writer','$source','$litpic','$pubdate','$senddate',
'$adminid','$notpost','$description','$keywords','$filename','$adminid','$weight');";
if(!$dsql->ExecuteNoneQuery($query))
{
$gerr = $dsql->GetError();
$dsql->ExecuteNoneQuery("Delete From `#@__arctiny` where id='$arcID'");
ShowMsg("把数据保存到数据库主表 `#@__archives` 时出错，请把相关信息提交给DedeCms官方。".str_replace('"','',$gerr),"javascript:;");
exit();
}
//保存到附加表
$cts = $dsql->GetOne("Select addtable From `#@__channeltype` where id='$channelid' ");
$addtable = trim($cts['addtable']);
if(empty($addtable))
{
$dsql->ExecuteNoneQuery("Delete From `#@__archives` where id='$arcID'");
$dsql->ExecuteNoneQuery("Delete From `#@__arctiny` where id='$arcID'");
ShowMsg("没找到当前模型[{$channelid}]的主表信息，无法完成操作！。","javascript:;");
exit();
}
$useip = GetIP();
$templet = empty($templet) ? '' : $templet;
$query = "INSERT INTO `{$addtable}`(aid,typeid,redirecturl,templet,userip,body{$inadd_f}) Values('$arcID','$typeid','$redirecturl','$templet','$useip','$body'{$inadd_v})";
if(!$dsql->ExecuteNoneQuery($query))
{
$gerr = $dsql->GetError();
$dsql->ExecuteNoneQuery("Delete From `#@__archives` where id='$arcID'");
$dsql->ExecuteNoneQuery("Delete From `#@__arctiny` where id='$arcID'");
ShowMsg("把数据保存到数据库附加表 `{$addtable}` 时出错，请把相关信息提交给DedeCms官方。".str_replace('"','',$gerr),"javascript:;");
exit();
}
//生成HTML
InsertTags($tags,$arcID);
if($cfg_remote_site=='Y' && $isremote=="1")
{
if($serviterm!=""){
list($servurl,$servuser,$servpwd) = explode(',',$serviterm);
$config=array( 'hostname' => $servurl, 'username' => $servuser, 'password' => $servpwd,'debug' => 'TRUE');
}else{
$config=array();
}
if(!$ftp->connect($config)) exit('Error:None FTP Connection!');
}
$artUrl = MakeArt($arcID,true,true,$isremote);
if($artUrl=='')
{
$artUrl = $cfg_phpurl."/view.php?aid=$arcID";
}
ClearMyAddon($arcID, $title);
//返回成功信息
$msg = " 请选择你的后续操作：
<a href='article_add.php?cid=$typeid'><u>继续发布文章</u></a>
<a href='$artUrl' target='_blank'><u>查看文章</u></a>
<a href='archives_do.php?aid=".$arcID."&dopost=editArchives'><u>更改文章</u></a>
<a href='catalog_do.php?cid=$typeid&dopost=listArchives'><u>已发布文章管理</u></a>
$backurl
";
$msg = "<div style=\"line-height:36px;height:36px\">{$msg}</div>".GetUpdateTest();
$wintitle = "成功发布文章！";
$wecome_info = "文章管理::发布文章";
$win = new OxWindow();
$win->AddTitle("成功发布文章：");
$win->AddMsgItem($msg);
$winform = $win->GetWindow("hand"," ",false);
$win->Display();
}
/***生成目录的一个遍历算法***/
function maketree($ar,$id,$pre)
{
$ids='';
foreach($ar as $k=>$v){
$pid=$v['pid'];
$cname=$v['cname'];
$cid=$v['cid'];
if($pid==$id)
{
$ids.="<option value='$cid'>{$pre}{$cname}</option>";
foreach($ar as $kk=>$vv)
{
$pp=$vv['pid'];
if($pp==$cid)
{
$ids.=maketree($ar,$cid,$pre." ");
break;
}
}
}
}
return $ids;
}
/**
* 远程无后缀的图片本地化
*
* @access public
* @param string $path 生成的图片路径路径
* @param string $body 内容
*/
function downloadNoExtImg ( $path, $body)
{
//stripslashes() 函数删除由 addslashes() 函数添加的反斜杠。
$body = stripslashes( $body );
//存放$body 数据中的图片
$imgArray = array();
//正则匹配$body 文章内容的图片URL地址,并存放到 $imgArray 数组中
preg_match_all('/<img.*?src="(.*?)".*?>/is',$body,$imgArray);
//过滤数组中重复的值：
$imgArray = array_unique($imgArray[1]);
//设置脚本执行的时间
set_time_limit(300);
//判断目录是否存在，如果不存在，则创建
if( !file_exists( $path ) )
{
if ( !mkdir( $path ) )
return false;
}
//循环图片数组，获取图片的后缀，根据后缀生成相应的图片
foreach( $imgArray as $k => $v )
{
//去掉左右的空格
$v = trim( $v );
//根据图片的路径获取图片属性值
$imgAttr = get_headers( $v, true );
//找出当前图片的后缀
switch( $imgAttr['Content-Type'] )
{
case 'image/png' :
$ext = 'png';
break;
case 'image/jpeg' :
$ext = 'jpg';
break;
case 'image/gif' :
$ext = 'gif';
break;
default:
$ext = 'jpg';
}
//读取图片二进制数据
$getImgContent = @file_get_contents( $v );
//组装图片的名字
$imgFileName = $path . date( 'YmdHms', time() ) . '_'. $k .'.'. $ext;
//把图片二进制数据写入新的图片中。
if( $getImgContent )
{
$fp = @fopen( $imgFileName, 'w' );
@fwrite($fp,$getImgContent);
@fclose($fp);
}
//因本文件位置在后台目录中，所以去掉 ".." 让前台正常显示
$imgFileName = str_replace( '..', '', $imgFileName );
$cfg_basedir = preg_replace('#'.$cfg_cmspath.'\/include$#i', '', DEDEINC);
//图片绝对路径
$absPath = $cfg_basedir.$imgFileName;
//当等于1的时候，加水印的功能
$GLOBALS['needwatermark'] = 1;
//自动加水印
WaterImg($absPath, 'up');
//把$body 文章内容中远程图片的地址替换成刚生的图片路径
$body = str_replace($v,$imgFileName,$body);
}
$body = addslashes($body);
return $body;
}
?>
