<?php
##############################################################
##In-portal													##
##############################################################
##					      In-portal							##
##					Intechnic Corporation					##
##			   All Rights Reserved, 1998-2002				##
##															##	
##	No portion of this code may be copied, reproduced or	##	
##	   otherwise redistributed without proper written		##
##	  consent of Intechnic Corporation.  Violation will		##
##	   result in revocation of the license and support		##
##	 privileges along maximum prosecution allowed by law.	##
##############################################################

// new startup: begin
define('REL_PATH', 'admin/modules');
$relation_level = count( explode('/', REL_PATH) );
define('FULL_PATH', realpath(dirname(__FILE__) . str_repeat('/..', $relation_level) ) );
require_once FULL_PATH.'/kernel/startup.php';
// new startup: end

require_once ($pathtoroot.$admin."/include/elements.php");
require_once ($pathtoroot."kernel/admin/include/navmenu.php");
require_once($pathtoroot.$admin."/toolbar.php");
require_once($pathtoroot.$admin."/listview/listview.php");

$pathtolocal = $pathtoroot;

//Set Section
$section = 'in-portal:mod_status';

//Set Environment Variable
$envar = "env=" . BuildEnv();

//Display header

$objListToolBar = new clsToolBar();

$objListToolBar->Set("section",$section);
$objListToolBar->Set("load_menu_func","");
$objListToolBar->Set("CheckClass","ModChecks");
$objListToolBar->Set("CheckForm","modlistform");
$listImages = array();
                    //$img, $alt, $link, $onMouseOver, $onMouseOut, $onClick

$objListToolBar->Add(	"mod_enable",
						"la_ToolTip_Enable",
						"#", 
						"if (ModChecks.itemChecked()) swap('mod_enable','toolbar/tool_approve_f2.gif');",
                    	"if (ModChecks.itemChecked()) swap('mod_enable', 'toolbar/tool_approve.gif');",
                    	"if (ModChecks.itemChecked()) ModChecks.check_submit('mod_status', 'm_mod_enable');",
                    	"tool_approve.gif");
$listImages[] = "ModChecks.addImage('mod_enable','$imagesURL/toolbar/tool_approve.gif','$imagesURL/toolbar/tool_approve_f3.gif',1); ";

$objListToolBar->Add(	"mod_disable",
						"la_ToolTip_Disable",
						"#", 
						"if (ModChecks.itemChecked()) swap('mod_disable','toolbar/tool_decline_f2.gif');",
                    	"if (ModChecks.itemChecked()) swap('mod_disable', 'toolbar/tool_decline.gif');",
                    	"if (ModChecks.itemChecked()) ModChecks.check_submit('mod_status', 'm_mod_disable');",
                    	"tool_decline.gif");
$listImages[] = "ModChecks.addImage('mod_disable','$imagesURL/toolbar/tool_decline.gif','$imagesURL/toolbar/tool_decline_f3.gif',1); ";


$objListToolBar->AddToInitScript($listImages);

$order = $objConfig->Get("Module_SortOrder");

$orderBy = trim($objConfig->Get("Module_SortField")." ".$order);
if(strlen($orderBy))
{
    $orderBy = " ORDER BY LoadOrder,".$orderBy;
}
else
   $orderBy = " ORDER BY LoadOrder";

$where = '';
$sql = "SELECT m.Name as Name,m.Version as Version, ";
$sql .="ELT(m.Loaded+1,'".admin_language("la_Text_Disabled")."','".admin_language("la_Text_Enabled")."') as Status  ";
$sql .="FROM ".GetTablePrefix()."Modules as m ".$where." ".$orderBy;

if($objSession->HasSystemPermission("DEBUG.LIST"))
   echo htmlentities($sql,ENT_NOQUOTES)."<br>\n";


$objModules->Clear();
$objModules->Query_Item($sql);

$itemcount = TableCount(GetTablePrefix()."Modules", $where,0);


$title = admin_language("la_Text_Modules")." (".$itemcount.")";

$objListView = new clsListView($objListToolBar,$objModules);
$objListView->IdField = "Name";
$objListView->PageLinkTemplate = $pathtoroot.$admin."/templates/user_page_link.tpl";

$objListView->ColumnHeaders->Add("Name", admin_language("la_prompt_Name"),1,0,$order,"width=\"50%\"","Module_SortField","Module_SortOrder","Name");
$objListView->ColumnHeaders->Add("Status",admin_language("la_prompt_Status"),1,0,$order,"width=\"50%\"","Module_SortField","Module_SortOrder","Status");
$objListView->ColumnHeaders->Add("Version",admin_language("la_Text_Version"),1,0,$order,"width=\"50%\"","Module_SortField","Module_SortOrder","Version");

$objListView->ColumnHeaders->SetSort($objConfig->Get("Module_SortField"),$order);

$objListView->PrintToolBar = FALSE;
$objListView->SearchBar = FALSE;
$objListView->SearchAction="";
$objListView->CurrentPageVar = "Page_Modules";
$objListView->PerPageVar = "Perpage_Modules";
$objListView->CheckboxName = "itemlist[]";
$objListView->TotalItemCount = $itemcount;

int_header($objListToolBar,NULL,$title);
?>
<FORM method="POST" ACTION="" NAME="modlistform" ID="modlistform">
<?php
  $objListView->PageLinks = $objListView->PrintPageLinks(); /* call this before we slice! */
  $objListView->SliceItems();
  print $objListView->PrintList();
?>
<input type="hidden" name="Action" value="">
</FORM>
<!-- CODE FOR VIEW MENU -->
<form method="post" action="<?php echo $_SERVER["PHP_SELF"]."?env=".BuildEnv(); ?>" name="viewmenu">
<input type="hidden" name="fieldname" value="">
<input type="hidden" name="varvalue" value="">
<input type="hidden" name="varvalue2" value="">
<input type="hidden" name="Action" value="">
</form>
<script src="<?php echo $adminURL; ?>/listview/listview.js"></script>
<script>
initSelectiorContainers();
<?php echo $objListToolBar->Get("CheckClass").".setImages();"; ?>
<?php 
  if( GetVar('Refresh') == 1 )
  	echo "window.parent.frames.menu.location = window.parent.frames.menu.location;\n";
?>
</script>

<!-- END CODE-->
<?php int_footer(); ?>