links.php

<?php
/*
+ ----------------------------------------------------------------------------+
|     e107 website system
|
|     Copyright (C) 2001-2002 Steve Dunstan (jalist@e107.org)
|     Copyright (C) 2008-2010 e107 Inc (e107.org)
|
|
|     Released under the terms and conditions of the
|     GNU General Public License (http://gnu.org).
|
|     $URL: https://e107.svn.sourceforge.net/svnroot/e107/trunk/e107_0.7/e107_plugins/links_page/links.php $
|     $Revision: 11678 $
|     $Id: links.php 11678 2010-08-22 00:43:45Z e107coders $
|     $Author: e107coders $
+----------------------------------------------------------------------------+
*/

if(!defined('e107_INIT'))
{
	require_once('../../class2.php');
}

if (!e107::isInstalled('links_page')) 
{
  e107::redirect();
  exit;
}

$link_shortcodes = e107::getScBatch('links_page',TRUE);
$link_shortcodes->wrapper('links_page');
  
require_once(e_PLUGIN.'links_page/link_defines.php');
require_once(e_HANDLER."userclass_class.php");
 
$eArrayStorage = e107::getArrayStorage();
$db  = e107::getDb();
$mes = e107::getMessage();
  
require_once(e_HANDLER."form_handler.php");
$rs = new form;
require_once(e_HANDLER."file_class.php");
$fl = new e_file;
$cobj = e107::getComment();
require_once(e_PLUGIN.'links_page/link_class.php');
$lc = new linkclass();
global $tp;

$linkspage_pref = e107::pref('links_page');
  
$deltest = array_flip($_POST);
$from = "0";       
if(e_QUERY){
	$qs = explode(".", e_QUERY);    
  // needed to have less regex 
  $qs = array_filter( $qs, 'strlen' );
	if(is_numeric($qs[0])){    
		$from = array_shift($qs);
	}else{
    $from = "0";
	}
}
 
e107::lan('links_page');
$lc -> setPageTitle();

//submit comment
if (isset($_POST['commentsubmit'])) {
	if (!$db->select("links_page", "link_id", "link_id = '".intval($qs[1])."' ")) {
		header("location:".e_BASE."index.php");
		exit;
	} else {
		$row = $db->fetch();
		if ($row[0] && (ANON === TRUE || USER === TRUE)) {

			$cobj->enter_comment($_POST['author_name'], $_POST['comment'], "links_page", $qs[1], $pid, $_POST['subject']);
			$e107cache->clear("comment.links_page.{$qs[1]}");
		}
	}
}

//update refer
if (isset($qs[0]) && $qs[0] == "view" && isset($qs[1]) && is_numeric($qs[1]))
{
	if($db->select("links_page", "*", "link_id='".intval($qs[1])."' AND link_class REGEXP '".e_CLASS_REGEXP."' "))
	{
		$row = $db->fetch();
		$db->update("links_page", "link_refer=link_refer+1 WHERE link_id='".intval($qs[1])."' ");
		//header("location:".$row['link_url']); exit;
		//jsx_location($row['link_url']);
		$url = $row['link_url']; 
		e107::getRedirect()->go($url);
	}
}

require_once(HEADERF);
 
  
//submit / manage link  link_submit_directpost - there is not this prefs
if (isset($_POST['add_link'])) {
	if($qs[0] == "submit"){
		if(check_class($linkspage_pref['link_submit_class'])){
			if(isset($linkspage_pref['link_submit_directpost']) && $linkspage_pref['link_submit_directpost']){
				$lc -> dbLinkCreate();
			}else{
				$lc -> dbLinkCreate("submit");
			}
		}else{
			e107::getRedirect()->go(e_REQUEST_URI);
      exit;
		}
	}
	if($qs[0] == "manage"){    
		if(check_class($linkspage_pref['link_manager_class'])){
			
			if(isset($qs[2]) && is_numeric($qs[2]))
			{  // edit   
  			$lc->verify_link_manage($qs[2]);     			
  			    //  link_directpost = allow direct editing
  			if(isset($linkspage_pref['link_directpost']) && $linkspage_pref['link_directpost']){
  				$lc -> dbLinkCreate();
  			}else{           //not allowed direct posting
  				$lc -> dbLinkCreate("edit");
  			}
      }
      else {    //create
  			if(isset($linkspage_pref['link_directpost']) && $linkspage_pref['link_directpost']){
  				$lc -> dbLinkCreate();
  			}else{           //not allowed direct posting
  				$lc -> dbLinkCreate("submit");
  			}      
      
      }
		}else{
      e107::getRedirect()->go(e_REQUEST_URI);
      exit;
		}
	}
}
   
//message submitted link
if(isset($qs[0]) && $qs[0] == "s"){
  e107::getMessage()->addSuccess('<b>'.LAN_LINKS_28.'</b> '.LAN_LINKS_29 );
  echo e107::getMessage()->render();
}
$qsorder = FALSE;
if(isset($qs[0]) && substr($qs[0],0,5) == "order"){
	$qsorder = TRUE;
}
 
// Frontpage separated to categories
if((!isset($qs[0]) || $qsorder) && $linkspage_pref['link_page_categories']){    
	displayCategory();
}
//show all categories added working ordering
if(isset($qs[1]) && substr($qs[1],0,5) == "order"){
	$qsorder = TRUE;
}
if(isset($qs[0]) && $qs[0] == "cat" && !isset($qs[1]) ){    
	displayCategory('cat');
}
if(isset($qs[0]) && $qs[0] == "cat" && (!isset($qs[0]) || $qsorder)  ){
	displayCategory('cat');
}
 
//show all links in all categories  or Frontpage without categories
if( ((!isset($qs[0]) || $qsorder) && !$linkspage_pref['link_page_categories']) || 
(isset($qs[0]) && $qs[0] == "all") )
{                               
	displayCategoryLinks();
}

//show all links in one category  
if(isset($qs[0]) && $qs[0] == "cat" && isset($qs[1]) && is_numeric($qs[1]))
{                       
	displayCategoryLinks($qs[1]);
}                        
//view top rated
if(isset($qs[0]) && $qs[0] == "rated")
{     
	displayTopRated();
}
//view top refer
if(isset($qs[0]) && $qs[0] == "top"){
	displayTopRefer();
}
//personal link managers
if (isset($qs[0]) && $qs[0] == "manage"){   
	displayPersonalManager();
}
//comments on links
if (isset($qs[0]) && $qs[0] == "comment" && isset($qs[1]) && is_numeric($qs[1]) ){
	displayLinkComment();
}
//submit link
if (isset($qs[0]) && $qs[0] == "submit")
{ 
  if (check_class($linkspage_pref['link_submit_class']))
  {
	displayLinkSubmit();
  }
  else
  {
  $mes->addError(LAN_LINKS_50);
  echo $mes->render();
  }
}


function displayTopRated(){
	global $qs, $lc,   $rowl, $link_shortcodes, $from,   $linkspage_pref;
	global $LINK_RATED_RATING, $LINK_RATED_APPEND;
  $db       = e107::getDb();
  $mes      = e107::getMessage();
  $template = e107::getTemplate('links_page', 'links_page');
  $tp       = e107::getParser();
    
	$number		= (isset($linkspage_pref["link_nextprev_number"]) && $linkspage_pref["link_nextprev_number"] ? $linkspage_pref["link_nextprev_number"] : "20");
	$np			= ($linkspage_pref["link_nextprev"] ? "LIMIT ".intval($from).",".intval($number) : "");
	$catrate	= (isset($qs[1]) && is_numeric($qs[1]) ? " AND l.link_category='".$qs[1]."' " : "");
	$ratemin	= (isset($linkspage_pref['link_rating_minimum']) && $linkspage_pref['link_rating_minimum'] ? $linkspage_pref['link_rating_minimum'] : "0");
	$qry = "
	SELECT l.*, r.*, lc.link_category_id, lc.link_category_name, (r.rate_rating / r.rate_votes) as rate_avg
	FROM #rate AS r
	LEFT JOIN #links_page AS l ON l.link_id = r.rate_itemid
	LEFT JOIN #links_page_cat AS lc ON lc.link_category_id = l.link_category
	WHERE l.link_active = 1 AND l.link_class REGEXP '".e_CLASS_REGEXP."' ".$catrate." AND lc.link_category_class REGEXP '".e_CLASS_REGEXP."' AND r.rate_table='links_page'
	ORDER BY rate_avg DESC
	";
	$qry2 = $qry." ".$np;
    
	if(!is_object($db)){ $db = new db; }
	$linktotalrated = $db -> gen($qry);
	if (!$ratedlinks = $db-> gen($qry2)){     
		$navigator  = displayNavigator(); 
		$navigator .= displaySortOrder(); 
		$var = array(
		'ERROR_MESSAGE' 		=> LAN_LINKS_33,
		);
 		$error = $tp->simpleParse($template['message']['error'],$var);
		$text = $navigator.$error; 
		e107::getRender()->tablerender(LAN_LINKS_11, $text);
	}else{
		$link_rated_table_string = "";
		$list = $db -> rows();
  	    foreach($list as $rowl) {
			if( ($rowl['rate_avg'] > $ratemin) ){
			$cat = $rowl['link_category_name'];
			$LINK_RATED_APPEND			= $lc -> parse_link_append($rowl);
			$LINK_RATED_RATING			= $tp -> parseTemplate('{LINK_RATED_RATING}', FALSE, $link_shortcodes);
			$link_rated_table_string	.= $tp -> parseTemplate($template['rate']['item'], FALSE, $link_shortcodes);
			}
		}
		$link_rated_table_start = $tp -> parseTemplate($template['rate']['start'], FALSE, $link_shortcodes);
		$link_rated_table_end = $tp -> parseTemplate($template['rate']['end'], FALSE, $link_shortcodes);

		if(isset($qs[1])){
			$captioncat = " : ".LAN_LINKS_40." : ".$cat;
		}
		$caption = LAN_LINKS_11." ".(isset($captioncat) ? $captioncat : "");
		$text = $link_rated_table_start.$link_rated_table_string.$link_rated_table_end;

    $navigator = displayNavigator(); 
    $pagination = $lc->ShowNextPrev($from, $number, $linktotalrated);
    $text = $navigator.$text.$pagination; 
		e107::getRender()->tablerender($caption, $text);
	 
	}      
}

function displayTopRefer(){
	global $qs,  $lc, $link_shortcodes, $cobj, $rowl, $from,    $linkspage_pref;
	global $LINK_APPEND;

  $db2      = e107::getDb('db2');
  $template = e107::getTemplate('links_page', 'links_page');
  $tp       = e107::getParser();
  
	$number	= ($linkspage_pref["link_nextprev_number"] ? $linkspage_pref["link_nextprev_number"] : "20");
	$np		= ($linkspage_pref["link_nextprev"] ? "LIMIT ".intval($from).",".intval($number) : "");
	$min	= (isset($linkspage_pref['link_refer_minimum']) && $linkspage_pref['link_refer_minimum'] ? " AND l.link_refer > ".$linkspage_pref['link_refer_minimum'] : "");

	$qry = "
	SELECT l.*, lc.*, COUNT(c.comment_id) AS link_comment
	FROM #links_page AS l
	LEFT JOIN #links_page_cat AS lc ON lc.link_category_id = l.link_category
	LEFT JOIN #comments as c ON c.comment_item_id=l.link_id AND comment_type='links_page'
	WHERE l.link_active = 1 AND l.link_class REGEXP '".e_CLASS_REGEXP."' ".$min."
	GROUP BY l.link_id
	ORDER BY l.link_refer DESC
	";
	$qry2 = $qry." ".$np;

 
	$link_total = $db2 -> gen($qry);
	if(!$db2 -> gen($qry2)){
    $mes->addError(LAN_LINKS_42.' - '.LAN_LINKS_10);
    echo $mes->render();
	}else{
		$link_top_table_string = "";
		$list = $db2 -> rows();
  	foreach($list as $rowl) {
			$category				= $rowl['link_category_id'];
			$LINK_APPEND			= $lc -> parse_link_append($rowl);
			$link_top_table_string .= $tp -> parseTemplate($template['list']['item'], FALSE, $link_shortcodes);
		}
		$link_top_table_start		= $tp -> parseTemplate($template['list']['refer'], FALSE, $link_shortcodes);
		$link_top_table_end			= $tp -> parseTemplate($template['list']['end'], FALSE, $link_shortcodes);

		$text = $link_top_table_start.$link_top_table_string.$link_top_table_end;
		$caption = LAN_LINKS_10;
    
    $navigator = displayNavigator();  
    $pagination = $lc->ShowNextPrev($from, $number, $link_total);
    $text = $navigator.$text.$pagination;     
		e107::getRender()->tablerender($caption, $text);
	}
}

function displayPersonalManager()
{
	global $qs,  $lc, $link_shortcodes, $cobj, $row, $from,   $linkspage_pref;
 
  $db       = e107::getDb();
  $db2      = e107::getDb('db2');
  $template = e107::getTemplate('links_page', 'links_page');
  $tp       = e107::getParser(); 
	if(!(isset($linkspage_pref['link_manager']) && $linkspage_pref['link_manager']))
	{
		//jsx_location(e107::url('links_page', 'index'));
		$url = e107::url('links_page', 'index'); 
		e107::getRedirect()->go($url);
	}
	//delete link
	if(isset($linkspage_pref['link_directdelete']) && $linkspage_pref['link_directdelete'])
	{
	  if(isset($_POST['delete']))
	  {
		$tmp = array_pop(array_flip($_POST['delete']));
		list($delete, $del_id) = explode("_", $tmp);
	  }
	  if (isset($delete) && $delete == 'main') 
	  {
		$db->select("links_page", "link_category, link_order, link_author", "link_id='".intval($del_id)."'");		// Get the position of target in the order
		
		$row = $db->fetch();
    if($row['link_author'] != USERID) {
		  e107::redirect();
      exit;
    }
			
		$db->select("links_page", "link_id", "link_order>'".$row['link_order']."' && link_category='".intval($row['link_category'])."'");
		while ($row = $db->fetch()) 
		{
		  $db2->update("links_page", "link_order=link_order-1 WHERE link_id='".$row['link_id']."'");
		}
		if ($db->delete("links_page", "link_id='".intval($del_id)."'")) 
		{
      $mes->addSuccess(LCLAN_ADMIN_10." #".$del_id." ".LCLAN_ADMIN_11);
		}
	  }
	}
 
	//show existing links
	if(!(check_class($linkspage_pref['link_manager_class']))){    
		//jsx_location(e107::url('links_page', 'index'));   
		$url = e107::url('links_page', 'index'); 
		e107::getRedirect()->go($url);
	}else{
		$qry = "
		SELECT l.*, lc.*
		FROM #links_page AS l
		LEFT JOIN #links_page_cat AS lc ON lc.link_category_id = l.link_category
		WHERE /* l.link_active = 1 AND */  l.link_author = '".USERID."'
		ORDER BY l.link_name
		";
		$link_table_manage = "";
		if(!$manager_total = $db -> gen($qry)){
			$text = LAN_LINKS_MANAGER_4;
		}else{
			$link_table_manage_start	= $tp -> parseTemplate($template['manage']['start'], FALSE, $link_shortcodes);
			while($row = $db -> fetch()){
        $link_shortcodes->setVars($row);
				$link_table_manage .= $tp -> parseTemplate($template['manage']['item'], FALSE, $link_shortcodes);
			}
			$link_table_manage_end		= $tp -> parseTemplate($template['manage']['end'], FALSE, $link_shortcodes);
			$text = $link_table_manage_start.$link_table_manage.$link_table_manage_end;
		}
        
    $navigator = displayNavigator();  
    $text = $navigator.$text; 
    
		e107::getRender()->tablerender(LAN_LINKS_35, $text);

		//show link create
		$lc->show_link_create();
	}
	return;
}

//comments on links
function displayLinkComment(){
	global $qs, $cobj,  $linkbutton_count, $lc, $rowl, $link_shortcodes,  $linkspage_pref, $LINK_APPEND;

  $db       = e107::getDb();
  $template = e107::getTemplate('links_page', 'links_page');
  $tp       = e107::getParser();
  
	if(!(isset($linkspage_pref["link_comment"]) && $linkspage_pref["link_comment"])){
		//jsx_location(e107::url('links_page', 'index'));
		$url = e107::url('links_page', 'index'); 
		e107::getRedirect()->go($url);
	}else{
		$qry = "
		SELECT l.*, lc.*, COUNT(c.comment_id) AS link_comment
		FROM #links_page AS l
		LEFT JOIN #links_page_cat AS lc ON lc.link_category_id = l.link_category
		LEFT JOIN #comments as c ON c.comment_item_id=l.link_id AND comment_type='links_page'
		WHERE l.link_active = 1 AND l.link_id = '".intval($qs[1])."' AND lc.link_category_class REGEXP '".e_CLASS_REGEXP."' AND l.link_class REGEXP '".e_CLASS_REGEXP."'
		GROUP BY l.link_id";
		$link_comment_table_string = "";
		if(!$linkcomment = $db -> gen($qry)){
			//jsx_location(e107::url('links_page', 'index'));
			$url = e107::url('links_page', 'index'); 
			e107::getRedirect()->go($url);
		}else{
			$rowl = $db->fetch();
			$linkbutton_count   = ($rowl['link_button']) ?  $linkbutton_count + 1 : $linkbutton_count;
			$LINK_APPEND	= $lc -> parse_link_append($rowl);
			$subject		= $rowl['link_name'];
			$text = $tp -> parseTemplate($template['list']['start'], FALSE, $link_shortcodes);
			$text .= $tp -> parseTemplate($template['list']['item'], true, $link_shortcodes);
			$text .= $tp -> parseTemplate($template['list']['end'], FALSE, $link_shortcodes);
      $navigator = displayNavigator();  
      $text = $navigator.$text; 
      e107::getRender()->tablerender(LAN_LINKS_36, $text);
			$cobj->compose_comment("links_page", "comment", $qs[1], $width, $subject, $showrate=FALSE);
		}
	}
	return;
}

function displayLinkSubmit(){
	global $qs, $linkspage_pref, $link_shortcodes;
 
  $tp  = e107::getParser();
  $template = e107::getTemplate('links_page', 'links_page');
	 
	$text = $tp -> parseTemplate($template['submit'], FALSE, $link_shortcodes);
  $navigator = displayNavigator();  
  $text = $navigator.$text; 
	e107::getRender()->tablerender(LAN_LINKS_27, $text);
	return;
}

function displayCategory($mode=''){
//return '';
	global  $lc, $qs, $rowl, $link_shortcodes, $linkspage_pref, $total_links, $category_total, $alllinks;

  $mes = e107::getMessage();
  $db  = e107::getDb();
  $db2 = e107::getDb('db2');
  $tp  = e107::getParser();
  $template = e107::getTemplate('links_page', 'links_page');
	$order = $lc -> getOrder('cat');
  
	$qry = "
	SELECT lc.*
	FROM #links_page_cat AS lc
	WHERE lc.link_category_class REGEXP '".e_CLASS_REGEXP."'
	".$order."
	";

 
	if (!$category_total = $db->gen($qry)){  
    $mes->addError(LCLAN_ITEM_3." - ".LAN_LINKS_30);
    echo $mes->render();
	}else{
		$link_main_table_string = "";
		$list = $db->rows();
		foreach($list as $rowl) {
			$rowl['total_links'] = $db2 -> count("links_page", "(*)", "WHERE link_category = '".$rowl['link_category_id']."' AND link_class REGEXP '".e_CLASS_REGEXP."' ");
			if((!isset($linkspage_pref['link_cat_empty']) || $linkspage_pref['link_cat_empty'] == 0 && $rowl['total_links'] > "0") || (isset($linkspage_pref['link_cat_empty']) && $linkspage_pref['link_cat_empty'])){
				$alllinks = $alllinks + $rowl['total_links'];
				$link_main_table_string .= $tp -> parseTemplate($template['categories']['item'], FALSE, $link_shortcodes);
			}
		}
		$link_main_table_start = $tp -> parseTemplate($template['categories']['start'], FALSE, $link_shortcodes);
		$link_main_table_end = $tp -> parseTemplate($template['categories']['end'], FALSE, $link_shortcodes);
		$text = $link_main_table_start.$link_main_table_string.$link_main_table_end;
    
    $navigator  = displayNavigator('cat'); 
    $navigator .= displaySortOrder('cat');     
    $text = $navigator.$text;
//		$caption = LAN_LINKS_30;
		$caption = $tp -> parseTemplate($template['categories']['caption'], FALSE, $link_shortcodes);
		e107::getRender()->tablerender($caption, $text);
	}
	return;
}

function displayNavigator($mode='')
{
	global  $lc, $cobj, $rowl, $qs,  $from, $link_shortcodes;
	global $LINK_SORTORDER;
	static $hasBeenShown = FALSE;
	$tp       = e107::getParser();
  $template = e107::getTemplate('links_page', 'links_page'); 	
	if ($hasBeenShown) return '';
	$hasBeenShown = TRUE;

  if(e107::pref('links_page','link_display_navigator')) {             
   $text1 = $tp -> parseTemplate($template['navigator'], FALSE, $link_shortcodes); 
  }
  if(e107::pref('links_page','link_navigator_allcat')) {
   $text2 = $tp -> parseTemplate($template['categories']['navigator'], FALSE, $link_shortcodes); 
  }  
  	
	return $text1.$text2;
}

function displaySortOrder($mode='')
{
	global  $lc, $cobj, $rowl, $qs,  $from, $link_shortcodes;
	global $LINK_SORTORDER;
	static $hasBeenShown = FALSE;
	$tp       = e107::getParser();
  $template = e107::getTemplate('links_page', 'links_page'); 	
	if ($hasBeenShown) return '';
	$hasBeenShown = TRUE;

	if($mode == "cat")
	{
		if(e107::pref('links_page','link_cat_sortorder')) 
		{
			$LINK_SORTORDER = $lc->showLinkSort('cat');
		}
	}
	else
	{
    if(e107::pref('links_page','link_sortorder')) 
		{
			$LINK_SORTORDER = $lc->showLinkSort();
		}
	}
 
  $text = $tp -> parseTemplate($template['sortorder'], FALSE, $link_shortcodes);  
	
	return $text;
}

function displayCategoryLinks($mode=''){

	global  $lc,  $cobj, $rowl, $qs, $linkspage_pref, $from, $link_shortcodes, $link_category_total;
	global  $linkbutton_count,  $link_category_total,  $LINK_APPEND;

  $db2      = e107::getDb('sql2');
  $tp       = e107::getParser(); 
  $mes      = e107::getMessage();
  $template = e107::getTemplate('links_page', 'links_page');
 
	$order			= $lc -> getOrder();
	$number			= ($linkspage_pref["link_nextprev_number"] ? $linkspage_pref["link_nextprev_number"] : "20");
	$nextprevquery	= ($mode && $linkspage_pref["link_nextprev"] ? "LIMIT ".intval($from).",".intval($number) : "");
	$cat			= ($mode ? " AND l.link_category='".intval($mode)."' " : "");
	$qry			= "
	SELECT l.*, lc.*, COUNT(c.comment_id) AS link_comment
	FROM #links_page AS l
	LEFT JOIN #links_page_cat AS lc ON lc.link_category_id = l.link_category
	LEFT JOIN #comments as c ON c.comment_item_id=l.link_id AND comment_type='links_page'
	WHERE l.link_active = 1 AND l.link_class REGEXP '".e_CLASS_REGEXP."' AND lc.link_category_class REGEXP '".e_CLASS_REGEXP."' ".$cat."
	GROUP BY l.link_id
	".$order."
	".$nextprevquery."
	";

	$link_table_string = "";
	$link_total = $db2 -> count("links_page as l", "(*)", "WHERE l.link_class REGEXP '".e_CLASS_REGEXP."' ".$cat." ");
  
	if (!$db2->gen($qry)){
		$navigator  = displayNavigator(); 
		$navigator .= displaySortOrder();        
 		$var = array(
		'ERROR_MESSAGE' 		=> LAN_LINKS_34,
		);
 		$error = $tp->simpleParse($template['message']['error'],$var);
		$text = $navigator.$error; 
		e107::getRender()->tablerender(LCLAN_PAGETITLE_1, $text);
	} else{              
		$linkbutton_count = 0;
		$list = $db2 -> rows();
  	  foreach($list as $rowl) {
			$linkbutton_count   = ($rowl['link_button']) ?  $linkbutton_count + 1 : $linkbutton_count;
			if($mode){
				$cat_name			= $rowl['link_category_name'];
				$cat_desc			= $rowl['link_category_description'];
				$LINK_APPEND		= $lc -> parse_link_append($rowl);
				$link_table_string .= $tp -> parseTemplate($template['list']['item'], true, $link_shortcodes);
			}else{
				$arr[$rowl['link_category_id']][] = $rowl;
			}
		}  
		if($mode)
		{          
			$link_category_total	= $link_total;
			$link_table_start		= $tp -> parseTemplate($template['list']['start'], FALSE, $link_shortcodes);
			$link_table_end			= $tp -> parseTemplate($template['list']['end'], FALSE, $link_shortcodes);
			$text = $link_table_start.$link_table_string.$link_table_end;
/*---
			$caption = LCLAN_ITEM_2." ".$cat_name." ".($cat_desc ? " <i>[".$cat_desc."]</i>" : "");
			//number of links      
			$caption .= " (<b title='".(ADMIN ? LAN_LINKS_2 : LAN_LINKS_1)."' >".$link_total."</b>".(ADMIN ? "/<b title='".(ADMIN ? LAN_LINKS_1 : "" )."' >".$link_total."</b>" : "").") ";
---*/
      
//---      $link_shortcodes->addVars(array($cat_name, $cat_desc, $link_total));
			$caption			= $tp -> parseTemplate($template['list']['caption'], FALSE, $link_shortcodes);
     
      $navigator  = displayNavigator('cat'); 
      $navigator .= displaySortOrder('cat'); 
      $text = $navigator.$text;      
			if(is_numeric($mode))
			{
				$pagination = $lc->ShowNextPrev($from, $number, $link_total);
        $text = $text.$pagination;
			} 
      e107::getRender()->tablerender($caption, $text); 
		}
		else
		{        
			$text = '';            
			foreach($arr as $key => $value)
			{
				$link_table_string = "";
				$linkbutton_count = 0;
				$i=0;
				for($i=0;$i<count($value);$i++)
				{
					$rowl				= $value[$i];

					$linkbutton_count   = ($rowl['link_button']) ?  $linkbutton_count + 1 : $linkbutton_count;
					$cat_name			= $rowl['link_category_name'];
					$cat_desc			= $rowl['link_category_description'];
				 	$LINK_APPEND		= $lc -> parse_link_append($rowl);
					$link_table_string .= $tp -> parseTemplate($template['list']['item'], FALSE, $link_shortcodes);
				}

				$link_category_total = count($value);
				$link_table_caption 	= $tp -> parseTemplate($template['list']['caption'], FALSE, $link_shortcodes);
				$link_table_start		= $tp -> parseTemplate($template['list']['start'], FALSE, $link_shortcodes);
				$link_table_end			= $tp -> parseTemplate($template['list']['end'], FALSE, $link_shortcodes);
				$text .= $link_table_start.$link_table_string.$link_table_end;

			}
      $navigator  = displayNavigator(); 
      $navigator .= displaySortOrder(); 
      $text = $navigator.$text;       
		  e107::getRender()->tablerender($link_table_caption, $text);
		}
	}  
	return;
}

require_once(FOOTERF);




?>