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.
278 Commits
3 Branches
85MB
Tree: 0220e5acfc
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from '0220e5acfc'
${ noResults }
DedeV6/src/dede/inc/inc_archives_functions.php

835 lines
29KB
Raw Blame History 

  1. <?php

  2. 

  3. /**

  4.  * 文档操作相关函数

  5.  *

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

  7.  * @package        DedeBIZ.Administrator

  8.  * @copyright      Copyright (c) 2021, DedeBIZ.COM

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

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

  11.  */

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

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

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

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

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

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

  18. if (!isset($_NOT_ARCHIVES)) {

  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.         MkdirAll($imgPath, $GLOBALS['cfg_dir_purview']);

  48.         CloseFtp();

  49.     }

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

  51.     foreach ($img_array as $key => $value) {

  52.         $value = trim($value);

  53.         if (

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

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

  56.         ) {

  57.             continue;

  58.         }

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

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

  61. 

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

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

  64. 

  65.         //下载并保存文件

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

  67.         if ($rs) {

  68.             $info = '';

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

  70.             $fsize = filesize($rndFileName);

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

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

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

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

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

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

  77.             AddMyAddon($fid, $iurl);

  78.             if ($pagestyle > 2) {

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

  80.             } else {

  81.                 $litpicname = $iurl;

  82.             }

  83.             if (empty($firstdd) && !empty($litpicname)) {

  84.                 $firstdd = $litpicname;

  85.                 if (!file_exists($cfg_basedir . $firstdd)) {

  86.                     $firstdd = $iurl;

  87.                 }

  88.             }

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

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

  91.         }

  92.     }

  93.     return $rsimg;

  94. }

  95. 

  96. /**

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

  98.  *

  99.  * @access    public

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

  101.  * @return    string

  102.  */

  103. function GetCurContent($body)

  104. {

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

  106.     $cfg_uploaddir = $cfg_image_dir;

  107.     $htd = new DedeHttpDown();

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

  109.     $img_array = array();

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

  111. 

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

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

  114.     $imgPath = $cfg_basedir . $imgUrl;

  115.     if (!is_dir($imgPath . '/')) {

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

  117.         CloseFtp();

  118.     }

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

  120.     foreach ($img_array as $key => $value) {

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

  122.             continue;

  123.         }

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

  125.             continue;

  126.         }

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

  128.             continue;

  129.         }

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

  131. 

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

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

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

  135.             if ($itype == 'image/gif') {

  136.                 $itype = ".gif";

  137.             } else if ($itype == 'image/png') {

  138.                 $itype = ".png";

  139.             } else {

  140.                 $itype = '.jpg';

  141.             }

  142.         }

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

  144.         $value = trim($value);

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

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

  147. 

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

  149.         if ($rs) {

  150.             $info = '';

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

  152.             $fsize = filesize($rndFileName);

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

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

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

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

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

  158.             AddMyAddon($fid, $fileurl);

  159.             if ($cfg_multi_site == 'Y') {

  160.                 $fileurl = $cfg_basehost . $fileurl;

  161.             }

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

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

  164.         }

  165.     }

  166.     $htd->Close();

  167.     return $body;

  168. }

  169. 

  170. /**

  171.  * 获取一个远程图片

  172.  *

  173.  * @access    public

  174.  * @param     string  $url  地址

  175.  * @param     int  $uid  用户id

  176.  * @return    array

  177.  */

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

  179. {

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

  181.     $cfg_uploaddir = $cfg_image_dir;

  182.     $revalues = array();

  183.     $ok = false;

  184.     $htd = new DedeHttpDown();

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

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

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

  188.         return '';

  189.     } else {

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

  191.         $imgPath = $cfg_basedir . $imgUrl;

  192.         CreateDir($imgUrl);

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

  194.         if ($itype == "image/gif") {

  195.             $itype = '.gif';

  196.         } else if ($itype == "image/png") {

  197.             $itype = '.png';

  198.         } else if ($itype == "image/wbmp") {

  199.             $itype = '.bmp';

  200.         } else {

  201.             $itype = '.jpg';

  202.         }

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

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

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

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

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

  208.         if ($ok) {

  209.             $data = GetImageSize($rndtrueName);

  210.             $revalues[0] = $fileurl;

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

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

  213.         }

  214.     }

  215.     $htd->Close();

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

  217. }

  218. 

  219. /**

  220.  *  获取远程flash

  221.  *

  222.  * @access    public

  223.  * @param     string  $url  地址

  224.  * @param     int  $uid  用户id

  225.  * @return    string

  226.  */

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

  228. {

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

  230.     $cfg_uploaddir = $cfg_media_dir;

  231.     $revalues = '';

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

  233.     $htd = new DedeHttpDown();

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

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

  236.         return '';

  237.     } else {

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

  239.         $imgPath = $cfg_basedir . $imgUrl;

  240.         CreateDir($imgUrl);

  241.         $itype = '.swf';

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

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

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

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

  246.         if ($ok) {

  247.             $revalues = $fileurl;

  248.         }

  249.     }

  250.     $htd->Close();

  251.     return $revalues;

  252. }

  253. 

  254. /**

  255.  *  检测频道ID

  256.  *

  257.  * @access    public

  258.  * @param     int  $typeid  栏目ID

  259.  * @param     int  $channelid  频道ID

  260.  * @return    bool

  261.  */

  262. function CheckChannel($typeid, $channelid)

  263. {

  264.     global $dsql;

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

  266. 

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

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

  269.     else return TRUE;

  270. }

  271. 

  272. /**

  273.  *  检测档案权限

  274.  *

  275.  * @access    public

  276.  * @param     int  $aid  文档AID

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

  278.  * @return    bool

  279.  */

  280. function CheckArcAdmin($aid, $adminid)

  281. {

  282.     global $dsql;

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

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

  285.     else return TRUE;

  286. }

  287. 

  288. /**

  289.  *  文档自动分页

  290.  *

  291.  * @access    public

  292.  * @param     string  $mybody  内容

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

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

  295.  * @return    string

  296.  */

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

  298. {

  299.     if (strlen($mybody) < $spsize) {

  300.         return $mybody;

  301.     }

  302.     $mybody = stripslashes($mybody);

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

  304.     $npageBody = '';

  305.     $istable = 0;

  306.     $mybody = '';

  307.     foreach ($bds as $i => $k) {

  308.         if ($i == 0) {

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

  310.             continue;

  311.         }

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

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

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

  315.             if (strtolower($tname) == 'table') {

  316.                 $istable++;

  317.             } else if (strtolower($tname) == '/tabl') {

  318.                 $istable--;

  319.             }

  320.             if ($istable > 0) {

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

  322.                 continue;

  323.             } else {

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

  325.             }

  326.         } else {

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

  328.         }

  329.         if (strlen($npageBody) > $spsize) {

  330.             $mybody .= $npageBody . $sptag;

  331.             $npageBody = '';

  332.         }

  333.     }

  334.     if ($npageBody != '') {

  335.         $mybody .= $npageBody;

  336.     }

  337.     return addslashes($mybody);

  338. }

  339. 

  340. /**

  341.  *  创建指定ID的文档

  342.  *

  343.  * @access    public

  344.  * @param     string  $aid  文档ID

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

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

  347.  * @return    string

  348.  */

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

  350. {

  351.     global $envs, $typeid;

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

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

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

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

  356.     return $reurl;

  357. }

  358. 

  359. /**

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

  361.  *

  362.  * @access    public

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

  364.  * @return    string

  365.  */

  366. function GetDDImgFromBody(&$body)

  367. {

  368.     $litpic = '';

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

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

  371.     if (count($img_array) > 0) {

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

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

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

  375.     }

  376.     return $litpic;

  377. }

  378. 

  379. /**

  380.  *  获得缩略图

  381.  *

  382.  * @access    public

  383.  * @param     string  $litpic  缩略图

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

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

  386.  * @return    string

  387.  */

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

  389. {

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

  391.     $ntime = time();

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

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

  394.     ) {

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

  396.         $istype = 0;

  397.         $sparr = array("image/pjpeg", "image/jpeg", "image/gif", "image/png");

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

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

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

  401.             exit();

  402.         }

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

  404. 

  405.         CreateDir($savepath);

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

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

  408.             $fullUrl = $fullUrl . ".gif";

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

  410.             $fullUrl = $fullUrl . ".png";

  411.         } else {

  412.             $fullUrl = $fullUrl . ".jpg";

  413.         }

  414. 

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

  416.         $litpic = $fullUrl;

  417. 

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

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

  420. 

  421.         $img = $cfg_basedir . $litpic;

  422.     } else {

  423. 

  424.         $picname = trim($picname);

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

  426.             $litpic = $picname;

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

  428. 

  429.             if (!is_array($ddinfos)) {

  430.                 $litpic = '';

  431.             } else {

  432.                 $litpic = $ddinfos[0];

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

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

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

  436.                 }

  437.             }

  438.         } else {

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

  440.                 $oldpic = $cfg_basedir . $picname;

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

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

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

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

  445.             } else {

  446.                 $litpic = $picname;

  447.                 return $litpic;

  448.             }

  449.         }

  450.     }

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

  452.     return $litpic;

  453. }

  454. 

  455. /**

  456.  *  获得一个附加表单

  457.  *

  458.  * @access    public

  459.  * @param     object  $ctag  ctag

  460.  * @return    string

  461.  */

  462. function GetFormItemA($ctag)

  463. {

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

  465. }

  466. 

  467. /**

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

  469.  *

  470.  * @access    public

  471.  * @param     string  $dvalue

  472.  * @param     string  $dtype

  473.  * @param     int  $aid

  474.  * @param     string  $job

  475.  * @param     string  $addvar

  476.  * @return    string

  477.  */

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

  479. {

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

  481. }

  482. 

  483. /**

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

  485.  *

  486.  * @access    public

  487.  * @param     object  $ctag  ctag

  488.  * @param     string  $fvalue  fvalue

  489.  * @return    string

  490.  */

  491. function GetFormItemValueA($ctag, $fvalue)

  492. {

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

  494. }

  495. 

  496. /**

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

  498.  *

  499.  * @access    public

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

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

  502.  * @return    string

  503.  */

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

  505. {

  506.     $dtp = new DedeTagParse();

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

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

  509.     $dede_addonfields = '';

  510.     if (is_array($dtp->CTags)) {

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

  512.             if (

  513.                 $loadtype != 'autofield'

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

  515.             ) {

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

  517.                 echo  GetFormItemA($ctag);

  518.             }

  519.         }

  520.     }

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

  522. }

  523. 

  524. /**

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

  526.  *

  527.  * @access    public

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

  529.  * @param     string  $fieldValues  字段值

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

  531.  * @return    string

  532.  */

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

  534. {

  535.     $dtp = new DedeTagParse();

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

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

  538.     $dede_addonfields = "";

  539.     if (is_array($dtp->CTags)) {

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

  541.             if (

  542.                 $loadtype != 'autofield'

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

  544.             ) {

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

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

  547.             }

  548.         }

  549.     }

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

  551. }

  552. 

  553. 

  554. /**

  555.  * 处理HTML文本

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

  557.  *

  558.  * @access    public

  559.  * @param     string  $body  内容

  560.  * @param     string  $description  描述

  561.  * @param     string  $litpic  缩略图

  562.  * @param     string  $keywords  关键词

  563.  * @param     string  $dtype  类型

  564.  * @return    string

  565.  */

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

  567. {

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

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

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

  571.     $body = stripslashes($body);

  572. 

  573.     //远程图片本地化

  574.     if ($remote == 1) {

  575.         $body = GetCurContent($body);

  576.     }

  577. 

  578.     //删除非站内链接

  579.     if ($dellink == 1) {

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

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

  582.         if (file_exists(DEDEDATA . "/admin/allowurl.txt")) {

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

  584.         }

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

  586.     }

  587. 

  588.     //自动摘要

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

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

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

  592.         $description = addslashes($description);

  593.     }

  594. 

  595.     //自动获取缩略图

  596.     if ($autolitpic == 1 && $litpic == '') {

  597.         $litpic = GetDDImgFromBody($body);

  598.     }

  599. 

  600.     //自动获取关键字

  601.     if ($autokey == 1 && $keywords == '') {

  602.         $subject = $title;

  603.         $message = $body;

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

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

  606.             $keywords = '';

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

  608.             $client->appid = $cfg_bizcore_appid;

  609.             $client->key = $cfg_bizcore_key;

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

  611.             $keywords = $data->data;

  612.             $client->Close();

  613.         } else {

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

  615.             $keywords = '';

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

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

  618.             $sp->StartAnalysis();

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

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

  621.             $sp->StartAnalysis();

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

  623. 

  624.             if (is_array($allindexs) && is_array($titleindexs)) {

  625.                 foreach ($titleindexs as $k => $v) {

  626.                     if (strlen($keywords . $k) >= 60) {

  627.                         break;

  628.                     } else {

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

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

  631.                     }

  632.                 }

  633.                 foreach ($allindexs as $k => $v) {

  634.                     if (strlen($keywords . $k) >= 60) {

  635.                         break;

  636.                     } else if (!in_array($k, $titleindexs)) {

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

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

  639.                     }

  640.                 }

  641.             }

  642.             $sp = null;

  643.         }

  644.     }

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

  646.     $body = addslashes($body);

  647.     return $body;

  648. }

  649. 

  650. /**

  651.  *  删除非站内链接

  652.  *

  653.  * @access    public

  654.  * @param     string  $body  内容

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

  656.  * @return    string

  657.  */

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

  659. {

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

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

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

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

  664.     $arr = array();

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

  666.     if (is_array($arr[0])) {

  667.         $rparr = array();

  668.         $tgarr = array();

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

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

  671.                 continue;

  672.             } else {

  673.                 $rparr[] = $v;

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

  675.             }

  676.         }

  677.         if (!empty($rparr)) {

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

  679.         }

  680.     }

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

  682.     return $body;

  683. }

  684. 

  685. /**

  686.  *  图集里大图的小图

  687.  *

  688.  * @access    public

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

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

  691.  * @return    string

  692.  */

  693. function GetImageMapDD($filename, $maxwidth)

  694. {

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

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

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

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

  699. 

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

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

  702. 

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

  704.     $fsize = filesize($toFile);

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

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

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

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

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

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

  711.     AddMyAddon($fid, $ddpicok);

  712. 

  713.     return $ddpicok;

  714. }

  715. 

  716. 

  717. /**

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

  719.  *

  720.  * @access    public

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

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

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

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

  725.  * @return    mixed

  726.  */

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

  728. {

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

  730.     if ($ntitle != '') {

  731.         $title = $ntitle;

  732.     }

  733.     $ntime = time();

  734.     $filename = '';

  735.     $isrm_up = FALSE;

  736.     $handurl = trim($handurl);

  737. 

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

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

  740.         $istype = 0;

  741.         $sparr = array("image/pjpeg", "image/jpeg", "image/gif", "image/png");

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

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

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

  745.             exit();

  746.         }

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

  748.             if (!is_object($dsql)) {

  749.                 $dsql = new DedeSql();

  750.             }

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

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

  753.         } else {

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

  755.             CreateDir($savepath);

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

  757.         }

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

  759.             $fullUrl = $fullUrl . ".gif";

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

  761.             $fullUrl = $fullUrl . ".png";

  762.         } else {

  763.             $fullUrl = $fullUrl . ".jpg";

  764.         }

  765. 

  766.         //保存

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

  768.         $filename = $fullUrl;

  769. 

  770.         //水印

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

  772.         $isrm_up = TRUE;

  773.     }

  774. 

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

  776.     else {

  777.         if ($handurl == '') {

  778.             return '';

  779.         }

  780. 

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

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

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

  784.             if (!is_array($ddinfos)) {

  785.                 $litpic = "";

  786.             } else {

  787.                 $filename = $ddinfos[0];

  788.             }

  789.             $isrm_up = TRUE;

  790. 

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

  792.         } else {

  793.             $filename = $handurl;

  794.         }

  795.     }

  796.     $imgfile = $cfg_basedir . $filename;

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

  798.         $info = "";

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

  800. 

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

  802.         $inquery = "

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

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

  805.     ";

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

  807.     }

  808.     return $filename;

  809. }

  810. 

  811. /**

  812.  *  获取更新测试信息

  813.  *

  814.  * @access    public

  815.  * @return    string

  816.  */

  817. function GetUpdateTest()

  818. {

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

  820.     $revalue = $dolist = '';

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

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

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

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

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

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

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

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

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

  830.     } else {

  831.         $revalue = '';

  832.     }

  833.     return $revalue;

  834. }