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.
435 Commits
3 Branches
110MB
Tree: 4cb45d9644
Branches Tags
${ item.name }
Create branch ${ searchTerm }
from '4cb45d9644'
${ noResults }
DedeV6/src/include/helpers/channelunit.helper.php

728 lines
22KB
Raw Blame History 

  1. <?php

  2. if (!defined('DEDEINC')) exit('dedebiz');

  3. /**

  4.  * 文档小助手

  5.  *

  6.  * @version        $Id: channelunit.helper.php 1 16:49 2010年7月6日Z tianya $

  7.  * @package        DedeBIZ.Helpers

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

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

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

  11.  */

  12. 

  13. /**

  14.  *  用星表示软件或Flash的等级

  15.  *

  16.  * @param     string  $rank  星星数

  17.  * @return    string

  18.  */

  19. if (!function_exists('GetRankStar')) {

  20.     function GetRankStar($rank)

  21.     {

  22.         $nstar = "";

  23.         for ($i = 1; $i <= $rank; $i++) {

  24.             $nstar .= "★";

  25.         }

  26.         for ($i; $i <= 5; $i++) {

  27.             $nstar .= "☆";

  28.         }

  29.         return $nstar;

  30.     }

  31. }

  32. 

  33. /**

  34.  *  获得文章网址

  35.  *  如果要获得文件的路径，直接用

  36.  *  GetFileUrl($aid,$typeid,$timetag,$title,$ismake,$rank,$namerule,$typedir,$money)

  37.  *  即是不指定站点参数则返回相当对根目录的真实路径

  38.  *

  39.  * @param     int  $aid  文档ID

  40.  * @param     int  $typeid  栏目ID

  41.  * @param     int  $timetag  时间戳

  42.  * @param     string  $title  标题

  43.  * @param     int  $ismake  是否生成

  44.  * @param     int  $rank  阅读权限

  45.  * @param     string  $namerule  名称规则

  46.  * @param     string  $typedir  栏目dir

  47.  * @param     string  $money  需要金币

  48.  * @param     string  $filename  文件名称

  49.  * @param     string  $moresite  多站点

  50.  * @param     string  $siteurl  站点地址

  51.  * @param     string  $sitepath  站点路径

  52.  * @return    string

  53.  */

  54. if (!function_exists('GetFileUrl')) {

  55.     function GetFileUrl(

  56.         $aid,

  57.         $typeid,

  58.         $timetag,

  59.         $title,

  60.         $ismake = 0,

  61.         $rank = 0,

  62.         $namerule = '',

  63.         $typedir = '',

  64.         $money = 0,

  65.         $filename = '',

  66.         $moresite = 0,

  67.         $siteurl = '',

  68.         $sitepath = ''

  69.     ) {

  70.         $articleUrl = GetFileName($aid, $typeid, $timetag, $title, $ismake, $rank, $namerule, $typedir, $money, $filename);

  71.         $sitepath = MfTypedir($sitepath);

  72. 

  73.         //是否强制使用绝对网址

  74.         if ($GLOBALS['cfg_multi_site'] == 'Y') {

  75.             if ($siteurl == '') {

  76.                 $siteurl = $GLOBALS['cfg_basehost'];

  77.             }

  78.             if ($moresite == 1) {

  79.                 $articleUrl = preg_replace("#^".$sitepath.'#', '', $articleUrl);

  80.             }

  81.             if (!preg_match("/http:/", $articleUrl)) {

  82.                 $articleUrl = $siteurl.$articleUrl;

  83.             }

  84.         }

  85. 

  86.         return $articleUrl;

  87.     }

  88. }

  89. 

  90. /**

  91.  *  获得新文件名(本函数会自动创建目录)

  92.  *

  93.  * @param     int  $aid  文档ID

  94.  * @param     int  $typeid  栏目ID

  95.  * @param     int  $timetag  时间戳

  96.  * @param     string  $title  标题

  97.  * @param     int  $ismake  是否生成

  98.  * @param     int  $rank  阅读权限

  99.  * @param     string  $namerule  名称规则

  100.  * @param     string  $typedir  栏目dir

  101.  * @param     string  $money  需要金币

  102.  * @param     string  $filename  文件名称

  103.  * @return    string

  104.  */

  105. if (!function_exists('GetFileNewName')) {

  106.     function GetFileNewName($aid, $typeid, $timetag, $title, $ismake = 0, $rank = 0, $namerule = '', $typedir = '', $money = 0, $filename = '')

  107.     {

  108.         global $cfg_arc_dirname;

  109.         $articlename = GetFileName($aid, $typeid, $timetag, $title, $ismake, $rank, $namerule, $typedir, $money, $filename);

  110. 

  111.         if (preg_match("/\?/", $articlename)) {

  112.             return $articlename;

  113.         }

  114. 

  115.         if ($cfg_arc_dirname == 'Y' && preg_match("/\/$/", $articlename)) {

  116.             $articlename = $articlename."index.html";

  117.         }

  118. 

  119.         $slen = strlen($articlename) - 1;

  120.         for ($i = $slen; $i >= 0; $i--) {

  121.             if ($articlename[$i] == '/') {

  122.                 $subpos = $i;

  123.                 break;

  124.             }

  125.         }

  126.         $okdir = substr($articlename, 0, $subpos);

  127.         CreateDir($okdir);

  128.         return $articlename;

  129.     }

  130. }

  131. 

  132. 

  133. 

  134. /**

  135.  *  获得文件相对于主站点根目录的物理文件名(动态网址返回url)

  136.  *

  137.  * @param     int  $aid  文档ID

  138.  * @param     int  $typeid  栏目ID

  139.  * @param     int  $timetag  时间戳

  140.  * @param     string  $title  标题

  141.  * @param     int  $ismake  是否生成

  142.  * @param     int  $rank  阅读权限

  143.  * @param     string  $namerule  名称规则

  144.  * @param     string  $typedir  栏目dir

  145.  * @param     string  $money  需要金币

  146.  * @param     string  $filename  文件名称

  147.  * @return    string

  148.  */

  149. if (!function_exists('GetFileName')) {

  150.     function GetFileName($aid, $typeid, $timetag, $title, $ismake = 0, $rank = 0, $namerule = '', $typedir = '', $money = 0, $filename = '')

  151.     {

  152.         global $cfg_rewrite, $cfg_cmspath, $cfg_arcdir, $cfg_special, $cfg_arc_dirname;

  153.         //没指定栏目时用固定规则（专题）

  154.         if (empty($namerule)) {

  155.             $namerule = $cfg_special.'/arc-{aid}.html';

  156.             $typeid = -1;

  157.         }

  158.         if ($rank != 0 || $ismake == -1 || $typeid == 0 || $money > 0) {

  159.             //动态文章

  160.             if ($cfg_rewrite == 'Y') {

  161.                 return $GLOBALS["cfg_plus_dir"]."/view-".$aid.'-1.html';

  162.             } else {

  163.                 return $GLOBALS['cfg_phpurl']."/view.php?aid=$aid";

  164.             }

  165.         } else {

  166.             $articleDir = MfTypedir($typedir);

  167.             $articleRule = strtolower($namerule);

  168.             if ($articleRule == '') {

  169.                 $articleRule = strtolower($GLOBALS['cfg_df_namerule']);

  170.             }

  171.             if ($typedir == '') {

  172.                 $articleDir  = $GLOBALS['cfg_cmspath'].$GLOBALS['cfg_arcdir'];

  173.             }

  174.             $dtime = GetDateMk($timetag);

  175.             list($y, $m, $d) = explode('-', $dtime);

  176.             $arr_rpsource = array('{typedir}', '{y}', '{m}', '{d}', '{timestamp}', '{aid}', '{cc}');

  177.             $arr_rpvalues = array($articleDir, $y, $m, $d, $timetag, $aid, dd2char($m.$d.$aid.$y));

  178.             if ($filename != '') {

  179.                 $articleRule = dirname($articleRule).'/'.$filename.$GLOBALS['cfg_df_ext'];

  180.             }

  181.             $articleRule = str_replace($arr_rpsource, $arr_rpvalues, $articleRule);

  182.             if (preg_match("/\{p/", $articleRule)) {

  183.                 $articleRule = str_replace('{pinyin}', GetPinyin($title).'_'.$aid, $articleRule);

  184.                 $articleRule = str_replace('{py}', GetPinyin($title, 1).'_'.$aid, $articleRule);

  185.             }

  186.             $articleUrl = '/'.preg_replace("/^\//", '', $articleRule);

  187.             if (preg_match("/index\.html/", $articleUrl) && $cfg_arc_dirname == 'Y') {

  188.                 $articleUrl = str_replace('index.html', '', $articleUrl);

  189.             }

  190.             return $articleUrl;

  191.         }

  192.     }

  193. }

  194. 

  195. 

  196. /**

  197.  *  获得指定类目的URL链接

  198.  *  对于使用封面文件和单独页面的情况，强制使用默认页名称

  199.  *

  200.  * @param     int  $typeid  栏目ID

  201.  * @param     string  $typedir  栏目目录

  202.  * @param     int  $isdefault  是否默认

  203.  * @param     string  $defaultname  默认名称

  204.  * @param     int  $ispart  栏目属性

  205.  * @param     string  $namerule2  名称规则

  206.  * @param     string  $moresite  多站点

  207.  * @param     string  $siteurl  站点地址

  208.  * @param     string  $sitepath  站点目录

  209.  * @return    string

  210.  */

  211. if (!function_exists('GetTypeUrl')) {

  212.     function GetTypeUrl($typeid, $typedir, $isdefault, $defaultname, $ispart, $namerule2, $moresite = 0, $siteurl = '', $sitepath = '')

  213.     {

  214.         global $cfg_typedir_df;

  215.         $typedir = MfTypedir($typedir);

  216.         $sitepath = MfTypedir($sitepath);

  217.         if ($isdefault == -1) {

  218.             //动态

  219.             $reurl = $GLOBALS['cfg_phpurl']."/list.php?tid=".$typeid;

  220.         } else if ($ispart == 2) {

  221.             //跳转网址

  222.             $reurl = $typedir;

  223.             return $reurl;

  224.         } else {

  225.             if ($isdefault == 0 && $ispart == 0) {

  226.                 $reurl = str_replace("{page}", "1", $namerule2);

  227.                 $reurl = str_replace("{tid}", $typeid, $reurl);

  228.                 $reurl = str_replace("{typedir}", $typedir, $reurl);

  229.             } else {

  230.                 if ($cfg_typedir_df == 'N' || $isdefault == 0) $reurl = $typedir.'/'.$defaultname;

  231.                 else $reurl = $typedir.'/';

  232.             }

  233.         }

  234. 

  235.         if (!preg_match("/^http:\/\//", $reurl)) {

  236.             $reurl = preg_replace("/\/{1,}/i", '/', $reurl);

  237.         }

  238. 

  239.         if ($GLOBALS['cfg_multi_site'] == 'Y') {

  240.             if ($siteurl == '') {

  241.                 $siteurl = $GLOBALS['cfg_basehost'];

  242.             }

  243.             if ($moresite == 1) {

  244.                 $reurl = preg_replace("#^".$sitepath."#", '', $reurl);

  245.             }

  246.             if (!preg_match("/^http:\/\//", $reurl)) {

  247.                 $reurl = $siteurl.$reurl;

  248.             }

  249.         }

  250.         return $reurl;

  251.     }

  252. }

  253. 

  254. /**

  255.  *  魔法变量，用于获取两个可变的值

  256.  *

  257.  * @param     string  $v1  第一个变量

  258.  * @param     string  $v2  第二个变量

  259.  * @return    string

  260.  */

  261. if (!function_exists('MagicVar')) {

  262.     function MagicVar($v1, $v2)

  263.     {

  264.         return $GLOBALS['autoindex'] % 2 == 0 ? $v1 : $v2;

  265.     }

  266. }

  267. 

  268. /**

  269.  *  获取某个类目的所有上级栏目id

  270.  *

  271.  * @param     int  $tid  栏目ID

  272.  * @return    string

  273.  */

  274. if (!function_exists('GetTopids')) {

  275.     function GetTopids($tid)

  276.     {

  277.         $arr = GetParentIds($tid);

  278.         return join(',', $arr);

  279.     }

  280. }

  281. 

  282. 

  283. 

  284. /**

  285.  *  获取上级ID列表

  286.  *

  287.  * @access    public

  288.  * @param     string  $tid  栏目ID

  289.  * @return    string

  290.  */

  291. if (!function_exists('GetParentIds')) {

  292.     function GetParentIds($tid)

  293.     {

  294.         global $cfg_Cs;

  295.         $GLOBALS['pTypeArrays'][] = $tid;

  296.         if (!is_array($cfg_Cs)) {

  297.             require_once(DEDEDATA."/cache/inc_catalog_base.inc");

  298.         }

  299.         if (!isset($cfg_Cs[$tid]) || $cfg_Cs[$tid][0] == 0) {

  300.             return $GLOBALS['pTypeArrays'];

  301.         } else {

  302.             return GetParentIds($cfg_Cs[$tid][0]);

  303.         }

  304.     }

  305. }

  306. 

  307. 

  308. /**

  309.  *  检测栏目是否是另一个栏目的父目录

  310.  *

  311.  * @access    public

  312.  * @param     string  $sid  顶级目录id

  313.  * @param     string  $pid  下级目录id

  314.  * @return    bool

  315.  */

  316. if (!function_exists('IsParent')) {

  317.     function IsParent($sid, $pid)

  318.     {

  319.         $pTypeArrays = GetParentIds($sid);

  320.         return in_array($pid, $pTypeArrays);

  321.     }

  322. }

  323. 

  324. 

  325. /**

  326.  *  获取一个类目的顶级类目id

  327.  *

  328.  * @param     string  $tid  栏目ID

  329.  * @return    string

  330.  */

  331. if (!function_exists('GetTopid')) {

  332.     function GetTopid($tid)

  333.     {

  334.         global $cfg_Cs;

  335.         if (!is_array($cfg_Cs)) {

  336.             require_once(DEDEDATA."/cache/inc_catalog_base.inc");

  337.         }

  338.         if (!isset($cfg_Cs[$tid][0]) || $cfg_Cs[$tid][0] == 0) {

  339.             return $tid;

  340.         } else {

  341.             return GetTopid($cfg_Cs[$tid][0]);

  342.         }

  343.     }

  344. }

  345. 

  346. 

  347. /**

  348.  *  获得某id的所有下级id

  349.  *

  350.  * @param     string  $id  栏目id

  351.  * @param     string  $channel  模型ID

  352.  * @param     string  $addthis  是否包含本身

  353.  * @return    string

  354.  */

  355. function GetSonIds($id, $channel = 0, $addthis = true)

  356. {

  357.     global $cfg_Cs;

  358.     $GLOBALS['idArray'] = array();

  359.     if (!is_array($cfg_Cs) && file_exists(DEDEDATA."/cache/inc_catalog_base.inc")) {

  360.         require_once(DEDEDATA."/cache/inc_catalog_base.inc");

  361.     }

  362.     GetSonIdsLogic($id, $cfg_Cs, $channel, $addthis);

  363.     $rquery = join(',', $GLOBALS['idArray']);

  364.     $rquery = preg_replace("/,$/", '', $rquery);

  365.     return $rquery;

  366. }

  367. 

  368. //递归逻辑

  369. function GetSonIdsLogic($id, $sArr, $channel = 0, $addthis = false)

  370. {

  371.     if ($id != 0 && $addthis) {

  372.         $GLOBALS['idArray'][$id] = $id;

  373.     }

  374.     if (is_array($sArr)) {

  375.         foreach ($sArr as $k => $v) {

  376.             if ($v[0] == $id && ($channel == 0 || $v[1] == $channel)) {

  377.                 GetSonIdsLogic($k, $sArr, $channel, true);

  378.             }

  379.         }

  380.     }

  381. }

  382. 

  383. /**

  384.  *  栏目目录规则

  385.  *

  386.  * @param     string  $typedir   栏目目录

  387.  * @return    string

  388.  */

  389. function MfTypedir($typedir)

  390. {

  391.     if (preg_match("/^http:|^ftp:/i", $typedir)) return $typedir;

  392.     $typedir = str_replace("{cmspath}", $GLOBALS['cfg_cmspath'], $typedir);

  393.     $typedir = preg_replace("/\/{1,}/", "/", $typedir);

  394.     return $typedir;

  395. }

  396. 

  397. /**

  398.  *  模板目录规则

  399.  *

  400.  * @param     string  $tmpdir  模板目录

  401.  * @return    string

  402.  */

  403. function MfTemplet($tmpdir)

  404. {

  405.     $tmpdir = str_replace("{style}", $GLOBALS['cfg_df_style'], $tmpdir);

  406.     $tmpdir = preg_replace("/\/{1,}/", "/", $tmpdir);

  407.     return $tmpdir;

  408. }

  409. 

  410. /**

  411.  *  清除用于js的空白块

  412.  *

  413.  * @param     string  $atme  字符

  414.  * @return    string

  415.  */

  416. function FormatScript($atme)

  417. {

  418.     return $atme == '&nbsp;' ? '' : $atme;

  419. }

  420. 

  421. /**

  422.  *  给属性默认值

  423.  *

  424.  * @param     array  $atts  属性

  425.  * @param     array  $attlist  属性列表

  426.  * @return    string

  427.  */

  428. function FillAttsDefault(&$atts, $attlist)

  429. {

  430.     $attlists = explode(',', $attlist);

  431.     for ($i = 0; isset($attlists[$i]); $i++) {

  432.         list($k, $v) = explode('|', $attlists[$i]);

  433.         if (!isset($atts[$k])) {

  434.             $atts[$k] = $v;

  435.         }

  436.     }

  437. }

  438. 

  439. /**

  440.  *  给块标记赋值

  441.  *

  442.  * @param     object  $dtp  模板解析引擎

  443.  * @param     object  $refObj  实例化对象

  444.  * @param     object  $parfield

  445.  * @return    string

  446.  */

  447. function MakeOneTag(&$dtp, &$refObj, $parfield = 'Y')

  448. {

  449.     global $cfg_disable_tags;

  450.     $cfg_disable_tags = isset($cfg_disable_tags) ? $cfg_disable_tags : 'php';

  451.     $disable_tags = explode(',', $cfg_disable_tags);

  452.     $alltags = array();

  453.     $dtp->setRefObj($refObj);

  454.     //读取自由调用tag列表

  455.     $dh = dir(DEDEINC.'/taglib');

  456.     while ($filename = $dh->read()) {

  457.         if (preg_match("/\.lib\./", $filename)) {

  458.             $alltags[] = str_replace('.lib.php', '', $filename);

  459.         }

  460.     }

  461.     $dh->Close();

  462. 

  463.     //遍历tag元素

  464.     if (!is_array($dtp->CTags)) {

  465.         return '';

  466.     }

  467.     foreach ($dtp->CTags as $tagid => $ctag) {

  468.         $tagname = $ctag->GetName();

  469.         if ($tagname == 'field' && $parfield == 'Y') {

  470.             $vname = $ctag->GetAtt('name');

  471.             if ($vname == 'array' && isset($refObj->Fields)) {

  472.                 $dtp->Assign($tagid, $refObj->Fields);

  473.             } else if (isset($refObj->Fields[$vname])) {

  474.                 $dtp->Assign($tagid, $refObj->Fields[$vname]);

  475.             } else if ($ctag->GetAtt('noteid') != '') {

  476.                 if (isset($refObj->Fields[$vname.'_'.$ctag->GetAtt('noteid')])) {

  477.                     $dtp->Assign($tagid, $refObj->Fields[$vname.'_'.$ctag->GetAtt('noteid')]);

  478.                 }

  479.             }

  480.             continue;

  481.         }

  482. 

  483.         //由于考虑兼容性，原来文章调用使用的标记别名统一保留，这些标记实际调用的解析文件为inc_arclist.php

  484.         if (preg_match("/^(artlist|likeart|hotart|imglist|imginfolist|coolart|specart|autolist)$/", $tagname)) {

  485.             $tagname = 'arclist';

  486.         }

  487.         if ($tagname == 'friendlink') {

  488.             $tagname = 'flink';

  489.         }

  490.         if (in_array($tagname, $alltags)) {

  491.             if (in_array($tagname, $disable_tags)) {

  492.                 if (DEBUG_LEVEL) echo 'DedeBIZ Error:Tag disabled:"'.$tagname.'" <a href="https://www.dedebiz.com/help/" target="_blank">more...</a>!';

  493.                 continue;

  494.             }

  495.             if (DEBUG_LEVEL == TRUE) {

  496.                 $ttt1 = ExecTime();

  497.             }

  498.             $filename = DEDEINC.'/taglib/'.$tagname.'.lib.php';

  499.             include_once($filename);

  500.             $funcname = 'lib_'.$tagname;

  501.             $dtp->Assign($tagid, $funcname($ctag, $refObj));

  502.             if (DEBUG_LEVEL == TRUE) {

  503.                 $queryTime = ExecTime() - $ttt1;

  504.                 if (PHP_SAPI === 'cli') {

  505.                     echo '标签：'.$tagname.'载入花费时间：'.$queryTime."\r\n";

  506.                 } else {

  507.                     echo '<div style="color: #856404;background-color: #fff3cd;border-color: #ffeeba;position: relative;padding: .75rem 1.25rem;margin-bottom: 1rem;border: 1px solid transparent;border-radius: .25rem;" class="alert alert-warning" role="alert">标签：'.$tagname.'载入花费时间：'.$queryTime."</div>\r\n";

  508.                 }

  509.                 

  510.             }

  511.         }

  512.     }

  513. }

  514. 

  515. /**

  516.  *  获取某栏目的url

  517.  *

  518.  * @param     array  $typeinfos  栏目信息

  519.  * @return    string

  520.  */

  521. function GetOneTypeUrlA($typeinfos)

  522. {

  523.     return GetTypeUrl(

  524.         $typeinfos['id'],

  525.         MfTypedir($typeinfos['typedir']),

  526.         $typeinfos['isdefault'],

  527.         $typeinfos['defaultname'],

  528.         $typeinfos['ispart'],

  529.         $typeinfos['namerule2'],

  530.         $typeinfos['moresite'],

  531.         $typeinfos['siteurl'],

  532.         $typeinfos['sitepath']

  533.     );

  534. }

  535. 

  536. /**

  537.  *  设置全局环境变量

  538.  *

  539.  * @param     int  $typeid  栏目ID

  540.  * @param     string  $typename  栏目名称

  541.  * @param     string  $aid  文档ID

  542.  * @param     string  $title  标题

  543.  * @param     string  $curfile  当前文件

  544.  * @return    string

  545.  */

  546. function SetSysEnv($typeid = 0, $typename = '', $aid = 0, $title = '', $curfile = '')

  547. {

  548.     global $_sys_globals;

  549.     if (empty($_sys_globals['curfile'])) {

  550.         $_sys_globals['curfile'] = $curfile;

  551.     }

  552.     if (empty($_sys_globals['typeid'])) {

  553.         $_sys_globals['typeid'] = $typeid;

  554.     }

  555.     if (empty($_sys_globals['typename'])) {

  556.         $_sys_globals['typename'] = $typename;

  557.     }

  558.     if (empty($_sys_globals['aid'])) {

  559.         $_sys_globals['aid'] = $aid;

  560.     }

  561. }

  562. 

  563. /**

  564.  *  获得图书的URL

  565.  *

  566.  * @param     string  $bid  书籍ID

  567.  * @param     string  $title  标题

  568.  * @param     string  $gdir

  569.  * @return    string

  570.  */

  571. function GetBookUrl($bid, $title, $gdir = 0)

  572. {

  573.     global $cfg_cmspath;

  574.     $bookurl = $gdir == 1 ?

  575.         "{$cfg_cmspath}/book/".DedeID2Dir($bid) : "{$cfg_cmspath}/book/".DedeID2Dir($bid).'/'.GetPinyin($title).'-'.$bid.'.html';

  576.     return $bookurl;

  577. }

  578. 

  579. /**

  580.  *  根据ID生成目录

  581.  *

  582.  * @param     string  $aid  内容ID

  583.  * @return    int

  584.  */

  585. function DedeID2Dir($aid)

  586. {

  587.     $n = ceil($aid / 1000);

  588.     return $n;

  589. }

  590. 

  591. /**

  592.  *  获得自由列表的网址

  593.  *

  594.  * @param     string  $lid  列表id

  595.  * @param     string  $namerule  命名规则

  596.  * @param     string  $listdir  列表目录

  597.  * @param     string  $defaultpage  默认页面

  598.  * @param     string  $nodefault  没有默认页面

  599.  * @return    string

  600.  */

  601. function GetFreeListUrl($lid, $namerule, $listdir, $defaultpage, $nodefault)

  602. {

  603.     $listdir = str_replace('{cmspath}', $GLOBALS['cfg_cmspath'], $listdir);

  604.     if ($nodefault == 1) {

  605.         $okfile = str_replace('{page}', '1', $namerule);

  606.         $okfile = str_replace('{listid}', $lid, $okfile);

  607.         $okfile = str_replace('{listdir}', $listdir, $okfile);

  608.     } else {

  609.         $okfile = $GLOBALS['cfg_phpurl']."/freelist.php?lid=$lid";

  610.         return $okfile;

  611.     }

  612.     $okfile = str_replace("\\", "/", $okfile);

  613.     $okfile = str_replace("//", "/", $okfile);

  614.     $trueFile = $GLOBALS['cfg_basedir'].$okfile;

  615.     if (!@file_exists($trueFile)) {

  616.         $okfile = $GLOBALS['cfg_phpurl']."/freelist.php?lid=$lid";

  617.     }

  618.     return $okfile;

  619. }

  620. 

  621. /**

  622.  *  获取网站搜索的热门关键字

  623.  *

  624.  * @param     object  $dsql

  625.  * @param     string  $num  获取数目

  626.  * @param     string  $nday  天数

  627.  * @param     string  $klen 关键词字数

  628.  * @param     string  $orderby 排列顺序

  629.  * @return    string

  630.  */

  631. function GetHotKeywords(&$dsql, $num = 8, $nday = 365, $klen = 16, $orderby = 'count')

  632. {

  633.     global $cfg_phpurl;

  634.     $nowtime = time();

  635.     $num = @intval($num);

  636.     $nday = @intval($nday);

  637.     $klen = @intval($klen);

  638.     if (empty($nday)) {

  639.         $nday = 365;

  640.     }

  641.     if (empty($num)) {

  642.         $num = 6;

  643.     }

  644.     if (empty($klen)) {

  645.         $klen = 16;

  646.     }

  647.     $klen = $klen + 1;

  648.     $mintime = $nowtime - ($nday * 24 * 3600);

  649.     if (empty($orderby)) {

  650.         $orderby = 'count';

  651.     }

  652.     $dsql->SetQuery("SELECT keyword FROM `#@__search_keywords` WHERE lasttime>$mintime AND length(keyword)<$klen ORDER BY $orderby DESC LIMIT 0,$num");

  653.     $dsql->Execute('hw');

  654.     $hotword = "";

  655.     while ($row = $dsql->GetArray('hw')) {

  656.         $hotword .= "　<a href='".$cfg_phpurl."/search.php?keyword=".urlencode($row['keyword'])."&searchtype=titlekeyword'>".$row['keyword']."</a> ";

  657.     }

  658.     return $hotword;

  659. }

  660. 

  661. /**

  662.  *  使用绝对网址

  663.  *

  664.  * @param     string  $gurl  地址

  665.  * @return    string

  666.  */

  667. function Gmapurl($gurl)

  668. {

  669.     return preg_match("/http[s]?:\/\//i", $gurl) ? $gurl : $GLOBALS['cfg_basehost'].$gurl;

  670. }

  671. 

  672. /**

  673.  *  引用回复标记处理

  674.  *

  675.  * @param     string  $quote

  676.  * @return    string

  677.  */

  678. function Quote_replace($quote)

  679. {

  680.     $quote = str_replace('{quote}', '<div class="decmt-box">', $quote);

  681.     $quote = str_replace('{title}', '<div class="decmt-title"><span class="username">', $quote);

  682.     $quote = str_replace('{/title}', '</span></div>', $quote);

  683.     $quote = str_replace('&lt;br/&gt;', '<br>', $quote);

  684.     $quote = str_replace('&lt;', '<', $quote);

  685.     $quote = str_replace('&gt;', '>', $quote);

  686.     $quote = str_replace('{content}', '<div class="decmt-content">', $quote);

  687.     $quote = str_replace('{/content}', '</div>', $quote);

  688.     $quote = str_replace('{/quote}', '</div>', $quote);

  689.     return $quote;

  690. }

  691. 

  692. /**

  693.  *  获取、写入指定cacheid的块

  694.  *

  695.  * @param     string  $cacheid  缓存ID

  696.  * @return    string

  697.  */

  698. function GetCacheBlock($cacheid)

  699. {

  700.     global $cfg_puccache_time;

  701.     $cachefile = DEDEDATA.'/cache/'.$cacheid.'.inc';

  702.     if (

  703.         !file_exists($cachefile) || filesize($cachefile) == 0 ||

  704.         $cfg_puccache_time == 0 || time() - filemtime($cachefile) > $cfg_puccache_time

  705.     ) {

  706.         return '';

  707.     }

  708.     $fp = fopen($cachefile, 'r');

  709.     $str = @fread($fp, filesize($cachefile));

  710.     fclose($fp);

  711.     return $str;

  712. }

  713. 

  714. /**

  715.  *  写入缓存块

  716.  *

  717.  * @param     string  $cacheid  缓存ID

  718.  * @param     string  $str  字符串信息

  719.  * @return    string

  720.  */

  721. function WriteCacheBlock($cacheid, $str)

  722. {

  723.     $cachefile = DEDEDATA.'/cache/'.$cacheid.'.inc';

  724.     $fp = fopen($cachefile, 'w');

  725.     $str = fwrite($fp, $str);

  726.     fclose($fp);

  727. }