<?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.	##
##############################################################
if(!strlen($pathtoroot))
{
  $path=dirname(realpath($_SERVER['SCRIPT_FILENAME']));
  if(strlen($path))
  {
    /* determine the OS type for path parsing */
    $pos = strpos($path,":");
    if ($pos === false)
    {
      $gOS_TYPE="unix";
      $pathchar = "/";
    }
    else
    {
      $gOS_TYPE="win";
      $pathchar="\\";
    }
    $p = $path.$pathchar;
    /*Start looking for the root flag file */
    while(!strlen($pathtoroot) && strlen($p))
    {
      $sub = substr($p,strlen($pathchar)*-1);
      if($sub==$pathchar)
      {
        $filename = $p."root.flg";
      }
      else
        $filename = $p.$pathchar."root.flg";
      if(file_exists($filename))
      {
        $pathtoroot = $p;
      }
      else
      {
        $parent = realpath($p.$pathchar."..".$pathchar);
	if($parent!=$p)
	{
	  $p = $parent;
	}
	else
	  $p = "";
      }
    }
    if(!strlen($pathtoroot))
      $pathtoroot = ".".$pathchar;
  }
  else
  {
    $pathtoroot = ".".$pathchar;
  }
}

$sub = substr($pathtoroot,strlen($pathchar)*-1);
if($sub!=$pathchar)
{
  $pathtoroot = $pathtoroot.$pathchar;
}
//echo $pathtoroot;

require_once($pathtoroot."kernel/startup.php");
//admin only util
$rootURL="http://".ThisDomain().$objConfig->Get("Site_Path");
$admin = $objConfig->Get("AdminDirectory");
if(!strlen($admin))
    $admin = "admin";

$localURL=$rootURL."kernel/";
$adminURL = $rootURL.$admin;
$imagesURL = $adminURL."/images";
$browseURL = $adminURL."/browse";
$cssURL = $adminURL."/include";

//$pathtolocal = $pathtoroot."in-news/";
require_once ($pathtoroot.$admin."/include/elements.php"); 
require_once ($pathtoroot."kernel/admin/include/navmenu.php"); 
//require_once ($pathtolocal."admin/include/navmenu.php"); 
require_once($pathtoroot.$admin."/toolbar.php");
require_once($pathtoroot.$admin."/listview/listview.php");

unset($objEditItems);

$objEditItems = new clsGroupList();
$objEditItems->SourceTable = $objSession->GetEditTable("PortalGroup");
$objEditItems->EnablePaging = FALSE;
$en = (int)$_GET["en"];
$sql ="SELECT * FROM ".$objEditItems->SourceTable; 
$objEditItems->Query_Item($sql);
//echo $sql."<br>\n";
$itemcount=$objEditItems->NumItems();
$c = $objEditItems->GetItemByIndex($en);

    if($itemcount>1)
    {
	  if ($en+1 == $itemcount)
		$en_next = -1;
	  else
		$en_next = $en+1;

	  if ($en == 0)
		$en_prev = -1;
	  else
		$en_prev = $en-1;
    }
    $action = "m_edit_group";

$envar = "env=" . BuildEnv() . "&en=$en";

$section = 'in-portal:editgroup_permissions';

//Display header
$sec = $objSections->GetSection($section);
$objCatToolBar = new clsToolBar();
$objCatToolBar->Add("img_save", "la_Save","#","swap('img_save','toolbar/tool_select_f2.gif');", "swap('img_save', 'toolbar/tool_select.gif');","edit_submit('editgroup','GroupEditStatus','".$admin."/users/user_groups.php',1);","tool_select.gif");
$objCatToolBar->Add("img_cancel", "la_Cancel","#","swap('img_cancel','toolbar/tool_cancel_f2.gif');", "swap('img_cancel', 'toolbar/tool_cancel.gif');","edit_submit('editgroup','GroupEditStatus','".$admin."/users/user_groups.php',2);","tool_cancel.gif");

$title = prompt_language("la_Text_Editing")." ".prompt_language("la_Text_Group")." '".$c->Get("Name")."' - ".prompt_language("la_tab_Permissions");

if ( isset($en_prev) || isset($en_next) )
{
  $url = $RootUrl.$admin."/users/addgroup_permissions.php"; 
  $StatusField = "GroupEditStatus";
  $form = "editgroup";
  MultiEditButtons($objCatToolBar,$en_next,$en_prev,$form,$StatusField,$url,$sec->Get("OnClick"),'','la_PrevGroup','la_NextGroup');  
}

int_header($objCatToolBar,NULL,$title);
?>
<TABLE CELLPADDING=0 CELLSPACING=0 class="tableborder" width="100%">
<TBODY>
 <tr BGCOLOR="#e0e0da">
   <td WIDTH="100%" CLASS="navar">
     <img height="15" src="<?php echo $imagesURL; ?>/arrow.gif" width="15" align="middle" border="0">
     <span class="NAV_CURRENT_ITEM"><?php echo prompt_language("la_Prompt_SystemPermissions"); ?></span>
   </td>
 </TR>
</TBODY>
</TABLE>
<table width="100%" border="0" cellspacing="0" cellpadding="4" class="tableborder">
<form ID="editgroup" name="editgroup" action="" method=POST>
<?php
 $Mod_names = array();
 $Mod_ids = array();

 $Mod_names[] = admin_language("la_PermType_Admin");
 $Mod_ids[] = "Admin";
 $Mod_names[] = admin_language("la_PermType_Front");
 $Mod_ids[] = "Front";
 $UserId = $c->Get("PortalUserId");

 for($i=0;$i<count($Mod_ids);$i++)
   {
     $module = $Mod_names[$i];
     $mod_id = $Mod_ids[$i];
     echo "<TR ".int_table_color_ret().">";
     echo "<TD><IMG src=\"".$imagesURL."/itemicons/icon16_permission.gif\"> ";
     $getvar = "?env=".BuildEnv()."&en=$en&module=$mod_id";
     echo "<A class=\"NAV_URL\" HREF=\"".$adminURL."/users/group_addpermission.php$getvar\">$module</A></TD>";
     echo "</TR>";
  }
?>
<input type="hidden" name="Action" value="m_noop">
<input type="hidden" name="GroupId" value="<?php echo $c->Get("ResourceId"); ?>">
<input type="hidden" name="PermList" value="<?php echo implode(",",$permlist); ?>">
<input type="hidden" name="GroupEditStatus" value="0">
</FORM>
</TABLE>
<?php int_footer(); ?>