<?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; } ?>