channel.lib.php

这是matlab的一个小程序

<?php
function lib_channel(&$ctag,&$refObj)
{
	global $_sys_globals,$envs,$dsql;

	$attlist = "typeid|0,reid|0,row|100,col|1,type|son,currentstyle|";
	FillAttsDefault($ctag->CAttribute->Items,$attlist);
	extract($ctag->CAttribute->Items, EXTR_SKIP);
	$innertext = $ctag->GetInnerText();

	if(empty($typeid) && $envs['typeid']!=0)
	{
		$typeid = $envs['typeid'];
		$reid = $envs['reid'];
	}else{
		$reid=0;
	}

	if($type==''||$type=='sun') $type="son";
	if($innertext=='') $innertext = GetSysTemplets("channel_list.htm");

	if($reid==0 && $typeid>0)
	{
		$dbrow = $dsql->GetOne("Select reid From #@__arctype where id='$typeid' ");
		if(is_array($dbrow)) $reid = $dbrow['reid'];
	}

	$likeType = '';
	if($type=='top')
	{
		$sql = "Select id,typename,typedir,isdefault,ispart,defaultname,namerule2,moresite,siteurl,sitepath
		  From #@__arctype where reid=0 And ishidden<>1 order by sortrank asc limit 0,$row";
	}
	else if($type=="son")
	{
		if($_sys_globals['typeid']>0) $typeid = $_sys_globals['typeid'];
		if($typeid==0) {
			return '';
		}
		$sql = "Select id,typename,typedir,isdefault,ispart,defaultname,namerule2,moresite,siteurl,sitepath
		  From #@__arctype where reid='$typeid' And ishidden<>1 order by sortrank asc limit 0,$row";
	}
	else if($type=="self")
	{
		if($reid==0) {
			return '';
		}
		$sql = "Select id,typename,typedir,isdefault,ispart,defaultname,namerule2,moresite,siteurl,sitepath
			From `#@__arctype` where reid='$reid' And ishidden<>1 order by sortrank asc limit 0,$row";
	}
	//And id<>'$typeid'
	$dtp2 = new DedeTagParse();
	$dtp2->SetNameSpace("field","[","]");
	$dtp2->LoadSource($innertext);
	$dsql->SetQuery($sql);
	$dsql->Execute();
	$line = $row;
	$GLOBALS['autoindex'] = 0;
	for($i=0;$i < $line;$i++)
	{
		if($col>1) $likeType .= "<dl>\r\n";
		for($j=0;$j<$col;$j++)
		{
			if($col>1) $likeType .= "<dd>\r\n";
			if($row=$dsql->GetArray())
			{
				if($type=='self' && $row['id']==$typeid) //澶勭悊鍚岀骇鏍忕洰涓