group.lib.php
2.3 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
<?php if(!defined('DEDEINC')) exit('Request Error!');
/**
* 圈子调用标签
*
* @version $Id: group.lib.php 1 9:29 2010年7月6日Z tianya $
* @package DedeCMS.Taglib
* @copyright Copyright (c) 2007 - 2010, DesDev, Inc.
* @license http://help.dedecms.com/usersguide/license.html
* @link http://www.dedecms.com
*/
/*>>dede>>
<name>圈子标签</name>
<type>全局标记</type>
<for>V55,V56,V57</for>
<description>圈子调用标签</description>
<demo>
{dede:group row='6' orderby='threads' titlelen='30'}
<li>
<span><img style="visibility: inherit;" title="[field:groupname/]" src="[field:icon/]" /></span>
<span><a href="[field:url/]" title="[field:groupname/]" target="_blank">[field:groupname/]</a></span>
</li>
{/dede:group}
</demo>
<attributes>
<iterm>row:调用条数</iterm>
<iterm>orderby:排列顺序（默认是主题数）</iterm>
<iterm>titlelen:圈子名称最大长度</iterm>
</attributes>
>>dede>>*/
function lib_group(&$ctag,&$refObj)
{
global $dsql, $envs, $cfg_dbprefix, $cfg_cmsurl;
//属性处理
$attlist="row|6,orderby|threads,titlelen|30";
FillAttsDefault($ctag->CAttribute->Items,$attlist);
extract($ctag->CAttribute->Items, EXTR_SKIP);
if( !$dsql->IsTable("{$cfg_dbprefix}groups") ) return '没安装圈子模块';
if(!preg("#\/$#", $cfg_cmsurl)) $cfg_group_url = $cfg_cmsurl.'/group';
else $cfg_group_url = $cfg_cmsurl.'group';
$innertext = $ctag->GetInnerText();
if(trim($innertext)=='') $innertext = GetSysTemplets("groups.htm");
$list = '';
$dsql->SetQuery("SELECT groupimg,groupid,groupname FROM `#@__groups` WHERE ishidden=0 ORDER BY $orderby DESC LIMIT 0,{$row}");
$dsql->Execute();
$ctp = new DedeTagParse();
$ctp->SetNameSpace('field', '[', ']');
while($rs = $dsql->GetArray())
{
$ctp->LoadSource($innertext);
$rs['groupname'] = cn_substr($rs['groupname'], $titlelen);
$rs['url'] = $cfg_group_url."/group.php?id={$rs['groupid']}";
$rs['icon'] = $rs['groupimg'];
foreach($ctp->CTags as $tagid=>$ctag)
{
if( !empty($rs[strtolower($ctag->GetName())]) ) {
$ctp->Assign($tagid,$rs[$ctag->GetName()]);
}
}
$list .= $ctp->GetResult();
}
return $list;
}