DedeBIZ
/
DedeV6
보기 2
좋아요 0
포크 0
코드 풀 리퀘스트 0 릴리즈 31 활동
国内流行的内容管理系统（CMS）多端全媒体解决方案 https://www.dedebiz.com
176 커밋
3 브랜치
5.4GB
트리: 9195053060
DedeV6/src/dede/inc/inc_archives_functions.php

934 lines
28KB
Raw Blame 히스토리 

  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/v6

  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.     $autolitpic = (empty($autolitpic) ? '' : $autolitpic);

  639.     $body = stripslashes($body);

  640. 

  641.     //远程图片本地化

  642.     if($remote==1)

  643.     {

  644.         $body = GetCurContent($body);

  645.     }

  646. 

  647.     //删除非站内链接

  648.     if($dellink==1)

  649.     {

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

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

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

  653.         {

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

  655.         }

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

  657.     }

  658. 

  659.     //自动摘要

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

  661.     {

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

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

  664.         $description = addslashes($description);

  665.     }

  666. 

  667.     //自动获取缩略图

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

  669.     {

  670.         $litpic = GetDDImgFromBody($body);

  671.     }

  672. 

  673.     //自动获取关键字

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

  675.     {

  676.         $subject = $title;

  677.         $message = $body;

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

  679.         $keywords = '';

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

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

  682.         $sp->StartAnalysis();

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

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

  685.         $sp->StartAnalysis();

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

  687.         

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

  689.         {

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

  691.             {

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

  693.                 {

  694.                     break;

  695.                 }

  696.                 else

  697.                 {

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

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

  700.                 }

  701.             }

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

  703.             {

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

  705.                 {

  706.                     break;

  707.                 }

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

  709.                 {

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

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

  712.                 }

  713.             }

  714.         }

  715.         $sp = null;

  716.     }

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

  718.     $body = addslashes($body);

  719.     return $body;

  720. }

  721. 

  722. /**

  723.  *  删除非站内链接

  724.  *

  725.  * @access    public

  726.  * @param     string  $body  内容

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

  728.  * @return    string

  729.  */

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

  731. {

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

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

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

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

  736.     $arr = array();

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

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

  739.     {

  740.         $rparr = array();

  741.         $tgarr = array();

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

  743.         {

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

  745.             {

  746.                 continue;

  747.             } else {

  748.                 $rparr[] = $v;

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

  750.             }

  751.         }

  752.         if( !empty($rparr) )

  753.         {

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

  755.         }

  756.     }

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

  758.     return $body;

  759. }

  760. 

  761. /**

  762.  *  图集里大图的小图

  763.  *

  764.  * @access    public

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

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

  767.  * @return    string

  768.  */

  769. function GetImageMapDD($filename, $maxwidth)

  770. {

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

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

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

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

  775.     

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

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

  778.     

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

  780.     $fsize = filesize($toFile);

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

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

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

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

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

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

  787.     AddMyAddon($fid, $ddpicok);

  788.     

  789.     return $ddpicok;

  790. }

  791. 

  792. 

  793. /**

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

  795.  *

  796.  * @access    public

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

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

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

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

  801.  * @return    mixed

  802.  */

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

  804. {

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

  806.     if($ntitle!='')

  807.     {

  808.         $title = $ntitle;

  809.     }

  810.     $ntime = time();

  811.     $filename = '';

  812.     $isrm_up = FALSE;

  813.     $handurl = trim($handurl);

  814. 

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

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

  817.     {

  818.         $istype = 0;

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

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

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

  822.         {

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

  824.             exit();

  825.         }

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

  827.         {

  828.             if(!is_object($dsql))

  829.             {

  830.                 $dsql = new DedeSql();

  831.             }

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

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

  834.         }

  835.         else

  836.         {

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

  838.             CreateDir($savepath);

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

  840.         }

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

  842.         {

  843.             $fullUrl = $fullUrl.".gif";

  844.         }

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

  846.         {

  847.             $fullUrl = $fullUrl.".png";

  848.         }

  849.         else

  850.         {

  851.             $fullUrl = $fullUrl.".jpg";

  852.         }

  853. 

  854.         //保存

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

  856.         $filename = $fullUrl;

  857. 

  858.         //水印

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

  860.         $isrm_up = TRUE;

  861.     }

  862. 

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

  864.     else

  865.     {

  866.         if($handurl=='')

  867.         {

  868.             return '';

  869.         }

  870. 

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

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

  873.         {

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

  875.             if(!is_array($ddinfos))

  876.             {

  877.                 $litpic = "";

  878.             }

  879.             else

  880.             {

  881.                 $filename = $ddinfos[0];

  882.             }

  883.             $isrm_up = TRUE;

  884. 

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

  886.         }

  887.         else

  888.         {

  889.             $filename = $handurl;

  890.         }

  891.     }

  892.     $imgfile = $cfg_basedir.$filename;

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

  894.     {

  895.         $info = "";

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

  897. 

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

  899.         $inquery = "

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

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

  902.     ";

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

  904.     }

  905.     return $filename;

  906. }

  907. 

  908. /**

  909.  *  获取更新测试信息

  910.  *

  911.  * @access    public

  912.  * @return    string

  913.  */

  914. function GetUpdateTest()

  915. {

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

  917.     $revalue = $dolist = '';

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

  919.     {

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

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

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

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

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

  925.         $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";

  926.         $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";

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

  928.     }

  929.     else

  930.     {

  931.         $revalue = '';

  932.     }

  933.     return $revalue;

  934. }