DedeBIZ
/
DedeV6
Watch 2
Star 0
Fork 0
Code Pull Requests 0 Releases 25 Activity
国内流行的内容管理系统（CMS）多端全媒体解决方案 https://www.dedebiz.com
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
186 Commits
3 Branches
110MB
Tree: b631708652
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from 'b631708652'
${ noResults }
DedeV6/src/dede/inc/inc_archives_functions.php

946 lines
29KB
Raw Blame History 

  1. <?php

  2. /**

  3.  * 文档操作相关函数

  4.  *

  5.  * @version        $Id: inc_archives_functions.php 1 9:56 2010年7月21日Z tianya $

  6.  * @package        DedeCMS.Administrator

  7.  * @copyright      Copyright (c) 2020, DedeBIZ.COM

  8.  * @license        https://www.dedebiz.com/license

  9.  * @link           https://www.dedebiz.com

  10.  */

  11. require_once(DEDEINC.'/dedehttpdown.class.php');

  12. require_once(DEDEINC.'/image.func.php');

  13. require_once(DEDEINC.'/archives.func.php');

  14. require_once(DEDEINC.'/arc.partview.class.php');

  15. $backurl = !empty($_COOKIE['ENV_GOBACK_URL']) ? $_COOKIE['ENV_GOBACK_URL'] : '';

  16. $backurl = preg_match("#content_#", $backurl) ? "<a href='$backurl' class='btn btn-secondary btn-sm'>记忆的列表页</a> &nbsp;" : '';

  17. if(!isset($_NOT_ARCHIVES))

  18. {

  19.     require_once(DEDEINC.'/customfields.func.php');

  20. }

  21. 

  22. /**

  23.  * 获得HTML里的外部资源，针对图集

  24.  *

  25.  * @access    public

  26.  * @param     string  $body  文档内容

  27.  * @param     string  $rfurl  来源地址

  28.  * @param     string  $firstdd  开始标记

  29.  * @return    string

  30.  */

  31. function GetCurContentAlbum($body, $rfurl, &$firstdd)

  32. {

  33.     global $dsql,$cfg_multi_site,$cfg_basehost,$cfg_ddimg_width;

  34.     global $cfg_basedir,$pagestyle,$cuserLogin,$cfg_addon_savetype;

  35.     require_once(DEDEINC.'/dedecollection.func.php');

  36.     if(empty($cfg_ddimg_width))    $cfg_ddimg_width = 320;

  37.     $rsimg = '';

  38.     $cfg_uploaddir = $GLOBALS['cfg_image_dir'];

  39.     $cfg_basedir = $GLOBALS['cfg_basedir'];

  40.     $basehost = 'http://'.$_SERVER['HTTP_HOST'];

  41.     $img_array = array();

  42.     preg_match_all("/(src)=[\"|'| ]{0,}(http:\/\/([^>]*)\.(gif|jpg|png))/isU",$body,$img_array);

  43.     $img_array = array_unique($img_array[2]);

  44.     $imgUrl = $cfg_uploaddir.'/'.MyDate($cfg_addon_savetype, time());

  45.     $imgPath = $cfg_basedir.$imgUrl;

  46.     if(!is_dir($imgPath.'/'))

  47.     {

  48.         MkdirAll($imgPath,$GLOBALS['cfg_dir_purview']);

  49.         CloseFtp();

  50.     }

  51.     $milliSecond = 'co'.dd2char( MyDate('ymdHis',time())) ;

  52.     foreach($img_array as $key=>$value)

  53.     {

  54.         $value = trim($value);

  55.         if(preg_match("#".$basehost."#i", $value) || !preg_match("#^http:\/\/#i", $value) 

  56.         || ($cfg_basehost != $basehost && preg_match("#".$cfg_basehost."#i", $value)))

  57.         {

  58.             continue;

  59.         }

  60.         $itype =  substr($value, -4, 4);

  61.         if( !preg_match("#\.(gif|jpg|png)#", $itype) ) $itype = ".jpg";

  62.         

  63.         $rndFileName = $imgPath.'/'.$milliSecond.'-'.$key.$itype;

  64.         $iurl = $imgUrl.'/'.$milliSecond.'-'.$key.$itype;

  65.         

  66.         //下载并保存文件

  67.         $rs = DownImageKeep($value, $rfurl, $rndFileName, '', 0, 30);

  68.         if($rs)

  69.         {

  70.             $info = '';

  71.             $imginfos = GetImageSize($rndFileName, $info);

  72.             $fsize = filesize($rndFileName);

  73.             $filename = $milliSecond.'-'.$key.$itype;

  74.             //保存图片附件信息

  75.             $inquery = "INSERT INTO `#@__uploads`(arcid,title,url,mediatype,width,height,playtime,filesize,uptime,mid)

  76.             VALUES ('0','$filename','$iurl','1','{$imginfos[0]}','$imginfos[1]','0','$fsize','".time()."','".$cuserLogin->getUserID()."'); ";

  77.             $dsql->ExecuteNoneQuery($inquery);

  78.             $fid = $dsql->GetLastID();

  79.             AddMyAddon($fid, $iurl);

  80.             if($pagestyle > 2)

  81.             {

  82.                 $litpicname = GetImageMapDD($iurl, $cfg_ddimg_width);

  83.             }

  84.             else

  85.             {

  86.                 $litpicname = $iurl;

  87.             }

  88.             if(empty($firstdd) && !empty($litpicname))

  89.             {

  90.                 $firstdd = $litpicname;

  91.                 if(!file_exists($cfg_basedir.$firstdd))

  92.                 {

  93.                     $firstdd = $iurl;

  94.                 }

  95.             }

  96.             @WaterImg($rndFileName, 'down');

  97.             $rsimg .= "{dede:img ddimg='$litpicname' text='' width='".$imginfos[0]."' height='".$imginfos[1]."'} $iurl {/dede:img}\r\n";

  98.         }

  99.     }

  100.     return $rsimg;

  101. }

  102. 

  103. /**

  104.  * 获得文章body里的外部资源

  105.  *

  106.  * @access    public

  107.  * @param     string  $body  文档内容

  108.  * @return    string

  109.  */

  110. function GetCurContent($body)

  111. {

  112.     global $cfg_multi_site,$cfg_basehost,$cfg_basedir,$cfg_image_dir,$arcID,$cuserLogin,$dsql;

  113.     $cfg_uploaddir = $cfg_image_dir;

  114.     $htd = new DedeHttpDown();

  115.     $basehost = "http://".$_SERVER["HTTP_HOST"];

  116.     $img_array = array();

  117.     preg_match_all("/src=[\"|'|\s]([^\"|^\'|^\s]*?)/isU",$body,$img_array);

  118.     

  119.     $img_array = array_unique($img_array[1]);

  120.     $imgUrl = $cfg_uploaddir.'/'.MyDate("ymd", time());

  121.     $imgPath = $cfg_basedir.$imgUrl;

  122.     if(!is_dir($imgPath.'/'))

  123.     {

  124.         MkdirAll($imgPath, $GLOBALS['cfg_dir_purview']);

  125.         CloseFtp();

  126.     }

  127.     $milliSecond = MyDate('His',time());

  128.     foreach($img_array as $key=>$value)

  129.     {

  130.         if(preg_match("#".$basehost."#i", $value))

  131.         {

  132.             continue;

  133.         }

  134.         if($cfg_basehost != $basehost && preg_match("#".$cfg_basehost."#i", $value))

  135.         {

  136.             continue;

  137.         }

  138.         if(!preg_match("#^(http|https):\/\/#i", $value))

  139.         {

  140.             continue;

  141.         }

  142.         $htd->OpenUrl($value);

  143. 

  144.         $itype = $htd->GetHead("content-type");

  145.         $itype = substr($value, -4, 4);

  146.         if(!preg_match("#\.(jpg|gif|png)#i", $itype))

  147.         {

  148.             if($itype=='image/gif')

  149.             {

  150.                 $itype = ".gif";

  151.             }

  152.             else if($itype=='image/png')

  153.             {

  154.                 $itype = ".png";

  155.             }

  156.             else

  157.             {

  158.                 $itype = '.jpg';

  159.             }

  160.         }

  161.         $milliSecondN = dd2char($milliSecond.mt_rand(1000, 8000));

  162.         $value = trim($value);

  163.         $rndFileName = $imgPath.'/'.$milliSecondN.'-'.$key.$itype;

  164.         $fileurl = $imgUrl.'/'.$milliSecondN.'-'.$key.$itype;

  165. 

  166.         $rs = $htd->SaveToBin($rndFileName);

  167.         if($rs)

  168.         {

  169. 			$info = '';

  170. 			$imginfos = GetImageSize($rndFileName, $info);

  171. 			$fsize = filesize($rndFileName);

  172. 			//保存图片附件信息

  173. 			$inquery = "INSERT INTO `#@__uploads`(arcid,title,url,mediatype,width,height,playtime,filesize,uptime,mid)

  174. 			VALUES ('{$arcID}','$rndFileName','$fileurl','1','{$imginfos[0]}','$imginfos[1]','0','$fsize','".time()."','".$cuserLogin->getUserID()."'); ";

  175. 			$dsql->ExecuteNoneQuery($inquery);

  176. 			$fid = $dsql->GetLastID();

  177. 			AddMyAddon($fid, $fileurl);

  178.             if($cfg_multi_site == 'Y')

  179.             {

  180.                 $fileurl = $cfg_basehost.$fileurl;

  181.             }

  182.             $body = str_replace($value, $fileurl, $body);

  183.             @WaterImg($rndFileName, 'down');

  184.         }

  185.     }

  186.     $htd->Close();

  187.     return $body;

  188. }

  189. 

  190. /**

  191.  * 获取一个远程图片

  192.  *

  193.  * @access    public

  194.  * @param     string  $url  地址

  195.  * @param     int  $uid  用户id

  196.  * @return    array

  197.  */

  198. function GetRemoteImage($url, $uid=0)

  199. {

  200.     global $cfg_basedir, $cfg_image_dir, $cfg_addon_savetype;

  201.     $cfg_uploaddir = $cfg_image_dir;

  202.     $revalues = Array();

  203.     $ok = false;

  204.     $htd = new DedeHttpDown();

  205.     $htd->OpenUrl($url);

  206.     $sparr = Array("image/pjpeg", "image/jpeg", "image/gif", "image/png", "image/xpng", "image/wbmp");

  207.     if(!in_array($htd->GetHead("content-type"),$sparr))

  208.     {

  209.         return '';

  210.     }

  211.     else

  212.     {

  213.         $imgUrl = $cfg_uploaddir.'/'.MyDate($cfg_addon_savetype, time());

  214.         $imgPath = $cfg_basedir.$imgUrl;

  215.         CreateDir($imgUrl);

  216.         $itype = $htd->GetHead("content-type");

  217.         if($itype=="image/gif")

  218.         {

  219.             $itype = '.gif';

  220.         }

  221.         else if($itype=="image/png")

  222.         {

  223.             $itype = '.png';

  224.         }

  225.         else if($itype=="image/wbmp")

  226.         {

  227.             $itype = '.bmp';

  228.         }

  229.         else

  230.         {

  231.             $itype = '.jpg';

  232.         }

  233.         $rndname = dd2char($uid.'_'.MyDate('mdHis',time()).mt_rand(1000,9999));

  234.         $rndtrueName = $imgPath.'/'.$rndname.$itype;

  235.         $fileurl = $imgUrl.'/'.$rndname.$itype;

  236.         $ok = $htd->SaveToBin($rndtrueName);

  237.         @WaterImg($rndtrueName, 'down');

  238.         if($ok)

  239.         {

  240.             $data = GetImageSize($rndtrueName);

  241.             $revalues[0] = $fileurl;

  242.             $revalues[1] = $data[0];

  243.             $revalues[2] = $data[1];

  244.         }

  245.     }

  246.     $htd->Close();

  247.     return ($ok ? $revalues : '');

  248. }

  249. 

  250. /**

  251.  *  获取远程flash

  252.  *

  253.  * @access    public

  254.  * @param     string  $url  地址

  255.  * @param     int  $uid  用户id

  256.  * @return    string

  257.  */

  258. function GetRemoteFlash($url, $uid=0)

  259. {

  260.     global $cfg_addon_savetype, $cfg_media_dir, $cfg_basedir;

  261.     $cfg_uploaddir = $cfg_media_dir;

  262.     $revalues = '';

  263.     $sparr = 'application/x-shockwave-flash';

  264.     $htd = new DedeHttpDown();

  265.     $htd->OpenUrl($url);

  266.     if($htd->GetHead("content-type")!=$sparr)

  267.     {

  268.         return '';

  269.     }

  270.     else

  271.     {

  272.         $imgUrl = $cfg_uploaddir.'/'.MyDate($cfg_addon_savetype, time());

  273.         $imgPath = $cfg_basedir.$imgUrl;

  274.         CreateDir($imgUrl);

  275.         $itype = '.swf';

  276.         $milliSecond = $uid.'_'.MyDate('mdHis', time());

  277.         $rndFileName = $imgPath.'/'.$milliSecond.$itype;

  278.         $fileurl = $imgUrl.'/'.$milliSecond.$itype;

  279.         $ok = $htd->SaveToBin($rndFileName);

  280.         if($ok)

  281.         {

  282.             $revalues = $fileurl;

  283.         }

  284.     }

  285.     $htd->Close();

  286.     return $revalues;

  287. }

  288. 

  289. /**

  290.  *  检测频道ID

  291.  *

  292.  * @access    public

  293.  * @param     int  $typeid  栏目ID

  294.  * @param     int  $channelid  频道ID

  295.  * @return    bool

  296.  */

  297. function CheckChannel($typeid, $channelid)

  298. {

  299.     global $dsql;

  300.     if($typeid==0) return TRUE;

  301. 

  302.     $row = $dsql->GetOne("SELECT ispart,channeltype FROM `#@__arctype` WHERE id='$typeid' ");

  303.     if($row['ispart']!=0 || $row['channeltype'] != $channelid) return FALSE;

  304.     else return TRUE;

  305. }

  306. 

  307. /**

  308.  *  检测档案权限

  309.  *

  310.  * @access    public

  311.  * @param     int  $aid  文档AID

  312.  * @param     int  $adminid  管理员ID

  313.  * @return    bool

  314.  */

  315. function CheckArcAdmin($aid, $adminid)

  316. {

  317.     global $dsql;

  318.     $row = $dsql->GetOne("SELECT mid FROM `#@__archives` WHERE id='$aid' ");

  319.     if($row['mid']!=$adminid) return FALSE;

  320.     else return TRUE;

  321. }

  322. 

  323. /**

  324.  *  文档自动分页

  325.  *

  326.  * @access    public

  327.  * @param     string  $mybody  内容

  328.  * @param     string  $spsize  分页大小

  329.  * @param     string  $sptag  分页标记

  330.  * @return    string

  331.  */

  332. function SpLongBody($mybody, $spsize, $sptag)

  333. {

  334.     if(strlen($mybody) < $spsize)

  335.     {

  336.         return $mybody;

  337.     }

  338.     $mybody = stripslashes($mybody);

  339.     $bds = explode('<', $mybody);

  340.     $npageBody = '';

  341.     $istable = 0;

  342.     $mybody = '';

  343.     foreach($bds as $i=>$k)

  344.     {

  345.         if($i==0)

  346.         {

  347.             $npageBody .= $bds[$i]; continue;

  348.         }

  349.         $bds[$i] = "<".$bds[$i];

  350.         if(strlen($bds[$i])>6)

  351.         {

  352.             $tname = substr($bds[$i],1,5);

  353.             if(strtolower($tname)=='table')

  354.             {

  355.                 $istable++;

  356.             }

  357.             else if(strtolower($tname)=='/tabl')

  358.             {

  359.                 $istable--;

  360.             }

  361.             if($istable>0)

  362.             {

  363.                 $npageBody .= $bds[$i]; continue;

  364.             }

  365.             else

  366.             {

  367.                 $npageBody .= $bds[$i];

  368.             }

  369.         }

  370.         else

  371.         {

  372.             $npageBody .= $bds[$i];

  373.         }

  374.         if(strlen($npageBody)>$spsize)

  375.         {

  376.             $mybody .= $npageBody.$sptag;

  377.             $npageBody = '';

  378.         }

  379.     }

  380.     if($npageBody!='')

  381.     {

  382.         $mybody .= $npageBody;

  383.     }

  384.     return addslashes($mybody);

  385. }

  386. 

  387. /**

  388.  *  创建指定ID的文档

  389.  *

  390.  * @access    public

  391.  * @param     string  $aid  文档ID

  392.  * @param     string  $ismakesign  生成标志

  393.  * @param     int  $isremote  是否远程

  394.  * @return    string

  395.  */

  396. function MakeArt($aid, $mkindex=FALSE, $ismakesign=FALSE, $isremote=0)

  397. {

  398.     global $envs, $typeid;

  399.     require_once(DEDEINC.'/arc.archives.class.php');

  400.     if($ismakesign) $envs['makesign'] = 'yes';

  401.     $arc = new Archives($aid);

  402.     $reurl = $arc->MakeHtml($isremote);

  403.     return $reurl;

  404. }

  405. 

  406. /**

  407.  *  取第一个图片为缩略图

  408.  *

  409.  * @access    public

  410.  * @param     string  $body  文档内容

  411.  * @return    string

  412.  */

  413. function GetDDImgFromBody(&$body)

  414. {

  415.     $litpic = '';

  416.     preg_match_all("/(src)=[\"|'| ]{0,}([^>]*\.(gif|jpg|bmp|png))/isU",$body,$img_array);

  417.     $img_array = array_unique($img_array[2]);

  418.     if(count($img_array)>0)

  419.     {

  420.         $picname = preg_replace("/[\"|'| ]{1,}/", '', $img_array[0]);

  421.         if(preg_match("#_lit\.#", $picname)) $litpic = $picname;

  422.         else $litpic = GetDDImage('ddfirst', $picname,1);

  423.     }

  424.     return $litpic;

  425. }

  426. 

  427. /**

  428.  *  获得缩略图

  429.  *

  430.  * @access    public

  431.  * @param     string  $litpic  缩略图

  432.  * @param     string  $picname  图片名称

  433.  * @param     string  $isremote  是否远程

  434.  * @return    string

  435.  */

  436. function GetDDImage($litpic, $picname, $isremote)

  437. {

  438.     global $cuserLogin,$cfg_ddimg_width,$cfg_ddimg_height,$cfg_basedir,$ddcfg_image_dir,$cfg_addon_savetype;

  439.     $ntime = time();

  440.     if( ($litpic != 'none' || $litpic != 'ddfirst') && 

  441.      !empty($_FILES[$litpic]['tmp_name']) && is_uploaded_file($_FILES[$litpic]['tmp_name']))

  442.     {

  443.         //如果用户自行上传缩略图

  444.         $istype = 0;

  445.         $sparr = Array("image/pjpeg", "image/jpeg", "image/gif", "image/png");

  446.         $_FILES[$litpic]['type'] = strtolower(trim($_FILES[$litpic]['type']));

  447.         if(!in_array($_FILES[$litpic]['type'], $sparr))

  448.         {

  449.             ShowMsg("上传的图片格式错误，请使用JPEG、GIF、PNG格式的其中一种！","-1");

  450.             exit();

  451.         }

  452.         $savepath = $ddcfg_image_dir.'/'.MyDate($cfg_addon_savetype, $ntime);

  453. 

  454.         CreateDir($savepath);

  455.         $fullUrl = $savepath.'/'.dd2char(MyDate('mdHis', $ntime).$cuserLogin->getUserID().mt_rand(1000, 9999));

  456.         if(strtolower($_FILES[$litpic]['type']) == "image/gif")

  457.         {

  458.             $fullUrl = $fullUrl.".gif";

  459.         }

  460.         else if(strtolower($_FILES[$litpic]['type']) == "image/png")

  461.         {

  462.             $fullUrl = $fullUrl.".png";

  463.         }

  464.         else

  465.         {

  466.             $fullUrl = $fullUrl.".jpg";

  467.         }

  468. 

  469.         @move_uploaded_file($_FILES[$litpic]['tmp_name'], $cfg_basedir.$fullUrl);

  470.         $litpic = $fullUrl;

  471. 

  472.         if($GLOBALS['cfg_ddimg_full']=='Y') @ImageResizeNew($cfg_basedir.$fullUrl,$cfg_ddimg_width,$cfg_ddimg_height);

  473.         else @ImageResize($cfg_basedir.$fullUrl,$cfg_ddimg_width,$cfg_ddimg_height);

  474.         

  475.         $img = $cfg_basedir.$litpic;

  476. 

  477.     }

  478.     else

  479.     {

  480. 

  481.         $picname = trim($picname);

  482.         if($isremote==1 && preg_match("#^http:\/\/#i", $picname))

  483.         {

  484.             $litpic = $picname;

  485.             $ddinfos = GetRemoteImage($litpic, $cuserLogin->getUserID());

  486. 

  487.             if(!is_array($ddinfos))

  488.             {

  489.                 $litpic = '';

  490.             }

  491.             else

  492.             {

  493.                 $litpic = $ddinfos[0];

  494.                 if($ddinfos[1] > $cfg_ddimg_width || $ddinfos[2] > $cfg_ddimg_height)

  495.                 {

  496.                     if($GLOBALS['cfg_ddimg_full']=='Y') @ImageResizeNew($cfg_basedir.$litpic,$cfg_ddimg_width,$cfg_ddimg_height);

  497.                     else @ImageResize($cfg_basedir.$litpic,$cfg_ddimg_width,$cfg_ddimg_height);

  498.                 }

  499.             }

  500.         }

  501.         else

  502.         {

  503.             if($litpic=='ddfirst' && !preg_match("#^http:\/\/#i", $picname))

  504.             {

  505.                 $oldpic = $cfg_basedir.$picname;

  506.                 $litpic = str_replace('.', '-lp.', $picname);

  507.                 if($GLOBALS['cfg_ddimg_full']=='Y') @ImageResizeNew($oldpic,$cfg_ddimg_width,$cfg_ddimg_height,$cfg_basedir.$litpic);

  508.                 else @ImageResize($oldpic,$cfg_ddimg_width,$cfg_ddimg_height,$cfg_basedir.$litpic);

  509.                 if(!is_file($cfg_basedir.$litpic)) $litpic = '';

  510.             }

  511.             else

  512.             {

  513.                 $litpic = $picname;

  514.                 return $litpic;

  515.             }

  516.         }

  517.     }

  518.     if($litpic=='litpic' || $litpic=='ddfirst') $litpic = '';

  519.     return $litpic;

  520. }

  521. 

  522. /**

  523.  *  获得一个附加表单

  524.  *

  525.  * @access    public

  526.  * @param     object  $ctag  ctag

  527.  * @return    string

  528.  */

  529. function GetFormItemA($ctag)

  530. {

  531.     return GetFormItem($ctag, 'admin');

  532. }

  533. 

  534. /**

  535.  *  处理不同类型的数据

  536.  *

  537.  * @access    public

  538.  * @param     string  $dvalue

  539.  * @param     string  $dtype

  540.  * @param     int  $aid

  541.  * @param     string  $job

  542.  * @param     string  $addvar

  543.  * @return    string

  544.  */

  545. function GetFieldValueA($dvalue, $dtype, $aid=0, $job='add', $addvar='')

  546. {

  547.     return GetFieldValue($dvalue, $dtype, $aid, $job, $addvar, 'admin');

  548. }

  549. 

  550. /**

  551.  *  获得带值的表单(编辑时用)

  552.  *

  553.  * @access    public

  554.  * @param     object  $ctag  ctag

  555.  * @param     string  $fvalue  fvalue

  556.  * @return    string

  557.  */

  558. function GetFormItemValueA($ctag, $fvalue)

  559. {

  560.     return GetFormItemValue($ctag, $fvalue, 'admin');

  561. }

  562. 

  563. /**

  564.  *  载入自定义表单(用于发布)

  565.  *

  566.  * @access    public

  567.  * @param     string  $fieldset  字段列表

  568.  * @param     string  $loadtype  载入类型

  569.  * @return    string

  570.  */

  571. function PrintAutoFieldsAdd(&$fieldset, $loadtype='all')

  572. {

  573.     $dtp = new DedeTagParse();

  574.     $dtp->SetNameSpace('field','<','>');

  575.     $dtp->LoadSource($fieldset);

  576.     $dede_addonfields = '';

  577.     if(is_array($dtp->CTags))

  578.     {

  579.         foreach($dtp->CTags as $tid=>$ctag)

  580.         {

  581.             if($loadtype!='autofield'

  582.             || ($loadtype=='autofield' && $ctag->GetAtt('autofield')==1) )

  583.             {

  584.                 $dede_addonfields .= ( $dede_addonfields=="" ? $ctag->GetName().",".$ctag->GetAtt('type') : ";".$ctag->GetName().",".$ctag->GetAtt('type') );

  585.                 echo  GetFormItemA($ctag);

  586.             }

  587.         }

  588.     }

  589.     echo "<input type='hidden' name='dede_addonfields' value=\"".$dede_addonfields."\">\r\n";

  590. }

  591. 

  592. /**

  593.  *  载入自定义表单(用于编辑)

  594.  *

  595.  * @access    public

  596.  * @param     string  $fieldset  字段列表

  597.  * @param     string  $fieldValues  字段值

  598.  * @param     string  $loadtype  载入类型

  599.  * @return    string

  600.  */

  601. function PrintAutoFieldsEdit(&$fieldset, &$fieldValues, $loadtype='all')

  602. {

  603.     $dtp = new DedeTagParse();

  604.     $dtp->SetNameSpace("field", "<", ">");

  605.     $dtp->LoadSource($fieldset);

  606.     $dede_addonfields = "";

  607.     if(is_array($dtp->CTags))

  608.     {

  609.         foreach($dtp->CTags as $tid=>$ctag)

  610.         {

  611.             if($loadtype != 'autofield'

  612.             || ($loadtype == 'autofield' && $ctag->GetAtt('autofield') == 1) )

  613.             {

  614.                 $dede_addonfields .= ( $dede_addonfields=='' ? $ctag->GetName().",".$ctag->GetAtt('type') : ";".$ctag->GetName().",".$ctag->GetAtt('type') );

  615.                 echo GetFormItemValueA($ctag, $fieldValues[$ctag->GetName()]);

  616.             }

  617.         }

  618.     }

  619.     echo "<input type='hidden' name='dede_addonfields' value=\"".$dede_addonfields."\">\r\n";

  620. }

  621. 

  622. 

  623. /**

  624.  * 处理HTML文本

  625.  * 删除非站外链接、自动摘要、自动获取缩略图

  626.  *

  627.  * @access    public

  628.  * @param     string  $body  内容

  629.  * @param     string  $description  描述

  630.  * @param     string  $litpic  缩略图

  631.  * @param     string  $keywords  关键词

  632.  * @param     string  $dtype  类型

  633.  * @return    string

  634.  */

  635. function AnalyseHtmlBody($body,&$description,&$litpic,&$keywords,$dtype='')

  636. {

  637.     global $autolitpic,$remote,$dellink,$autokey,$cfg_basehost,$cfg_auot_description,$id,$title,$cfg_soft_lang;

  638.     global $cfg_bizcore_appid,$cfg_bizcore_key,$cfg_bizcore_hostname,$cfg_bizcore_port;

  639.     $autolitpic = (empty($autolitpic) ? '' : $autolitpic);

  640.     $body = stripslashes($body);

  641. 

  642.     //远程图片本地化

  643.     if($remote==1)

  644.     {

  645.         $body = GetCurContent($body);

  646.     }

  647. 

  648.     //删除非站内链接

  649.     if($dellink==1)

  650.     {

  651.         $allow_urls = array($_SERVER['HTTP_HOST']);

  652.         // 读取允许的超链接设置

  653.         if(file_exists(DEDEDATA."/admin/allowurl.txt"))

  654.         {

  655.             $allow_urls = array_merge($allow_urls, file(DEDEDATA."/admin/allowurl.txt"));

  656.         }

  657.         $body = Replace_Links($body, $allow_urls);

  658.     }

  659. 

  660.     //自动摘要

  661.     if($description=='' && $cfg_auot_description>0)

  662.     {

  663.         $description = cn_substr(html2text($body),$cfg_auot_description);

  664.         $description = trim(preg_replace('/#p#|#e#/','',$description));

  665.         $description = addslashes($description);

  666.     }

  667. 

  668.     //自动获取缩略图

  669.     if($autolitpic==1 && $litpic=='')

  670.     {

  671.         $litpic = GetDDImgFromBody($body);

  672.     }

  673. 

  674.     //自动获取关键字

  675.     if($autokey==1 && $keywords=='')

  676.     {

  677.         $subject = $title;

  678.         $message = $body;

  679.         // 采用DedeBIZ Core分词组件分词

  680.         if (!empty($cfg_bizcore_appid) && !empty($cfg_bizcore_key)) {

  681.             $keywords = '';

  682.             $client = new DedeBizClient($cfg_bizcore_hostname, $cfg_bizcore_port);

  683.             $client->appid = $cfg_bizcore_appid;

  684.             $client->key = $cfg_bizcore_key;

  685.             $data = $client->Spliteword($subject.Html2Text($message));

  686.             $keywords = $data->data;

  687.             $client->Close();

  688.         } else {

  689.             include_once(DEDEINC.'/splitword.class.php');

  690.             $keywords = '';

  691.             $sp = new SplitWord($cfg_soft_lang, $cfg_soft_lang);

  692.             $sp->SetSource($subject, $cfg_soft_lang, $cfg_soft_lang);

  693.             $sp->StartAnalysis();

  694.             $titleindexs = preg_replace("/#p#|#e#/",'',$sp->GetFinallyIndex());

  695.             $sp->SetSource(Html2Text($message), $cfg_soft_lang, $cfg_soft_lang);

  696.             $sp->StartAnalysis();

  697.             $allindexs = preg_replace("/#p#|#e#/",'',$sp->GetFinallyIndex());

  698.             

  699.             if(is_array($allindexs) && is_array($titleindexs))

  700.             {

  701.                 foreach($titleindexs as $k => $v)

  702.                 {

  703.                     if(strlen($keywords.$k)>=60)

  704.                     {

  705.                         break;

  706.                     }

  707.                     else

  708.                     {

  709.                         if(strlen($k) <= 2) continue;

  710.                         $keywords .= $k.',';

  711.                     }

  712.                 }

  713.                 foreach($allindexs as $k => $v)

  714.                 {

  715.                     if(strlen($keywords.$k)>=60)

  716.                     {

  717.                         break;

  718.                     }

  719.                     else if(!in_array($k,$titleindexs))

  720.                     {

  721.                         if(strlen($k) <= 2) continue;

  722.                         $keywords .= $k.',';

  723.                     }

  724.                 }

  725.             }

  726.             $sp = null;

  727.         }

  728.     }

  729.     $body = GetFieldValueA($body,$dtype,$id);

  730.     $body = addslashes($body);

  731.     return $body;

  732. }

  733. 

  734. /**

  735.  *  删除非站内链接

  736.  *

  737.  * @access    public

  738.  * @param     string  $body  内容

  739.  * @param     array  $allow_urls  允许的超链接

  740.  * @return    string

  741.  */

  742. function Replace_Links( &$body, $allow_urls=array()  )

  743. {

  744.     $host_rule = join('|', $allow_urls);

  745.     $host_rule = preg_replace("#[\n\r]#", '', $host_rule);

  746.     $host_rule = str_replace('.', "\\.", $host_rule);

  747.     $host_rule = str_replace('/', "\\/", $host_rule);

  748.     $arr = array();

  749.     preg_match_all("#<a([^>]*)>(.*)<\/a>#iU", $body, $arr);

  750.     if( is_array($arr[0]) )

  751.     {

  752.         $rparr = array();

  753.         $tgarr = array();

  754.         foreach($arr[0] as $i=>$v)

  755.         {

  756.             if( $host_rule != '' && preg_match('#'.$host_rule.'#i', $arr[1][$i]) )

  757.             {

  758.                 continue;

  759.             } else {

  760.                 $rparr[] = $v;

  761.                 $tgarr[] = $arr[2][$i];

  762.             }

  763.         }

  764.         if( !empty($rparr) )

  765.         {

  766.             $body = str_replace($rparr, $tgarr, $body);

  767.         }

  768.     }

  769.     $arr = $rparr = $tgarr = '';

  770.     return $body;

  771. }

  772. 

  773. /**

  774.  *  图集里大图的小图

  775.  *

  776.  * @access    public

  777.  * @param     string  $filename  图片名称

  778.  * @param     string  $maxwidth  最大宽度

  779.  * @return    string

  780.  */

  781. function GetImageMapDD($filename, $maxwidth)

  782. {

  783.     global $cuserLogin, $dsql, $cfg_ddimg_height, $cfg_ddimg_full;

  784.     $ddn = substr($filename, -3);

  785.     $ddpicok = preg_replace("#\.".$ddn."$#", "-lp.".$ddn, $filename);

  786.     $toFile = $GLOBALS['cfg_basedir'].$ddpicok;

  787.     

  788.     if($cfg_ddimg_full=='Y') ImageResizeNew($GLOBALS['cfg_basedir'].$filename, $maxwidth, $cfg_ddimg_height, $toFile);

  789.     else ImageResize($GLOBALS['cfg_basedir'].$filename, $maxwidth, $cfg_ddimg_height, $toFile);

  790.     

  791.     //保存图片附件信息

  792.     $fsize = filesize($toFile);

  793.     $ddpicoks = explode('/', $ddpicok);

  794.     $filename = $ddpicoks[count($ddpicoks)-1];

  795.     $inquery = "INSERT INTO `#@__uploads`(arcid,title,url,mediatype,width,height,playtime,filesize,uptime,mid)

  796.                     VALUES ('0','$filename','$ddpicok','1','0','0','0','$fsize','".time()."','".$cuserLogin->getUserID()."'); ";

  797.     $dsql->ExecuteNoneQuery($inquery);

  798.     $fid = $dsql->GetLastID();

  799.     AddMyAddon($fid, $ddpicok);

  800.     

  801.     return $ddpicok;

  802. }

  803. 

  804. 

  805. /**

  806.  *  上传一个未经处理的图片

  807.  *

  808.  * @access    public

  809.  * @param     string  $upname 上传框名称

  810.  * @param     string  $handurl 手工填写的网址

  811.  * @param     string  $ddisremote 是否下载远程图片 0 不下, 1 下载

  812.  * @param     string  $ntitle 注解文字 如果表单有 title 字段可不管

  813.  * @return    mixed

  814.  */

  815. function UploadOneImage($upname,$handurl='',$isremote=1,$ntitle='')

  816. {

  817.     global $cuserLogin,$cfg_basedir,$cfg_image_dir,$title, $dsql;

  818.     if($ntitle!='')

  819.     {

  820.         $title = $ntitle;

  821.     }

  822.     $ntime = time();

  823.     $filename = '';

  824.     $isrm_up = FALSE;

  825.     $handurl = trim($handurl);

  826. 

  827.     //如果用户自行上传了图片

  828.     if(!empty($_FILES[$upname]['tmp_name']) && is_uploaded_file($_FILES[$upname]['tmp_name']))

  829.     {

  830.         $istype = 0;

  831.         $sparr = Array("image/pjpeg", "image/jpeg", "image/gif", "image/png");

  832.         $_FILES[$upname]['type'] = strtolower(trim($_FILES[$upname]['type']));

  833.         if(!in_array($_FILES[$upname]['type'], $sparr))

  834.         {

  835.             ShowMsg("上传的图片格式错误，请使用JPEG、GIF、PNG格式的其中一种！","-1");

  836.             exit();

  837.         }

  838.         if(!empty($handurl) && !preg_match("#^http:\/\/#i", $handurl) && file_exists($cfg_basedir.$handurl) )

  839.         {

  840.             if(!is_object($dsql))

  841.             {

  842.                 $dsql = new DedeSql();

  843.             }

  844.             $dsql->ExecuteNoneQuery("DELETE FROM `#@__uploads` WHERE url LIKE '$handurl' ");

  845.             $fullUrl = preg_replace("#\.([a-z]*)$#i", "", $handurl);

  846.         }

  847.         else

  848.         {

  849.             $savepath = $cfg_image_dir.'/'.strftime("%Y-%m",$ntime);

  850.             CreateDir($savepath);

  851.             $fullUrl = $savepath.'/'.strftime("%d",$ntime).dd2char(strftime("%H%M%S", $ntime).'0'.$cuserLogin->getUserID().'0'.mt_rand(1000, 9999));

  852.         }

  853.         if(strtolower($_FILES[$upname]['type'])=="image/gif")

  854.         {

  855.             $fullUrl = $fullUrl.".gif";

  856.         }

  857.         else if(strtolower($_FILES[$upname]['type'])=="image/png")

  858.         {

  859.             $fullUrl = $fullUrl.".png";

  860.         }

  861.         else

  862.         {

  863.             $fullUrl = $fullUrl.".jpg";

  864.         }

  865. 

  866.         //保存

  867.         @move_uploaded_file($_FILES[$upname]['tmp_name'], $cfg_basedir.$fullUrl);

  868.         $filename = $fullUrl;

  869. 

  870.         //水印

  871.         @WaterImg($cfg_basedir.$fullUrl, 'up');

  872.         $isrm_up = TRUE;

  873.     }

  874. 

  875.     //远程或选择本地图片

  876.     else

  877.     {

  878.         if($handurl=='')

  879.         {

  880.             return '';

  881.         }

  882. 

  883.         //远程图片并要求本地化

  884.         if($isremote==1 && preg_match("#^http[s]?:\/\/#i", $handurl))

  885.         {

  886.             $ddinfos = GetRemoteImage($handurl, $cuserLogin->getUserID());

  887.             if(!is_array($ddinfos))

  888.             {

  889.                 $litpic = "";

  890.             }

  891.             else

  892.             {

  893.                 $filename = $ddinfos[0];

  894.             }

  895.             $isrm_up = TRUE;

  896. 

  897.             //本地图片或远程不要求本地化

  898.         }

  899.         else

  900.         {

  901.             $filename = $handurl;

  902.         }

  903.     }

  904.     $imgfile = $cfg_basedir.$filename;

  905.     if(is_file($imgfile) && $isrm_up && $filename!='')

  906.     {

  907.         $info = "";

  908.         $imginfos = GetImageSize($imgfile, $info);

  909. 

  910.         //把新上传的图片信息保存到媒体文档管理档案中

  911.         $inquery = "

  912.         INSERT INTO `#@__uploads`(title,url,mediatype,width,height,playtime,filesize,uptime,mid)

  913.         VALUES ('$title','$filename','1','".$imginfos[0]."','".$imginfos[1]."','0','".filesize($imgfile)."','".time()."','".$cuserLogin->getUserID()."');

  914.     ";

  915.         $dsql->ExecuteNoneQuery($inquery);

  916.     }

  917.     return $filename;

  918. }

  919. 

  920. /**

  921.  *  获取更新测试信息

  922.  *

  923.  * @access    public

  924.  * @return    string

  925.  */

  926. function GetUpdateTest()

  927. {

  928.     global $arcID, $typeid, $cfg_make_andcat, $cfg_makeindex, $cfg_make_prenext;

  929.     $revalue = $dolist = '';

  930.     if($cfg_makeindex=='Y' || $cfg_make_andcat=='Y' || $cfg_make_prenext=='Y')

  931.     {

  932.         if($cfg_make_prenext=='Y' && !empty($typeid)) $dolist = 'makeprenext';

  933.         if($cfg_makeindex=='Y') $dolist .= empty($dolist) ? 'makeindex' : ',makeindex';

  934.         if($cfg_make_andcat=='Y') $dolist .= empty($dolist) ? 'makeparenttype' : ',makeparenttype';

  935.         $dolists = explode(',', $dolist);

  936.         $jumpUrl = "task_do.php?typeid={$typeid}&aid={$arcID}&dopost={$dolists[0]}&nextdo=".preg_replace("#".$dolists[0]."[,]{0,1}#", '', $dolist);

  937.         $revalue = "<table width='80%' style='border:1px dashed #cdcdcd;margin-left:20px;margin-bottom:15px' id='tgtable' align='left'><tr><td bgcolor='#EBF5C9'>&nbsp;<strong>正在进行相关内容更新，请完成前不要进行其它操作：</strong>\r\n</td></tr>\r\n";

  938.         $revalue .= "<tr><td>\r\n<iframe name='stafrm' frameborder='0' id='stafrm' width='100%' height='200px' src='$jumpUrl'></iframe>\r\n</td></tr>\r\n";

  939.         $revalue .= "</table>";

  940.     }

  941.     else

  942.     {

  943.         $revalue = '';

  944.     }

  945.     return $revalue;

  946. }