Update of /cvsroot/phpslash/phpslash-ft/public_html/admin
In directory usw-pr-cvs1:/tmp/cvs-serv23839/phpslash-ft/public_html/admin
Added Files:
groupAdmin.php3
Log Message:
Permission Groups
--- NEW FILE: groupAdmin.php3 ---
<?php
/* $Id: groupAdmin.php3,v 1.1 2002/05/23 18:41:24 joestewart Exp $ */
$pagetitle = "Group Administration"; // header title
$xsiteobject = "Administration"; // Defines The META TAG Page Type
require("config.php3");
page_open(array("sess"=>"slashSess","auth"=>"slashAuth","perm"=>"slashPerm"));
/*****************************
START OF PAGE
*****************************/
slashhead($pagetitle,$xsiteobject);
/* DEBUG */
debug("HTTP_POST_VARS", $HTTP_POST_VARS);
debug("HTTP_GET_VARS", $HTTP_GET_VARS);
debug("group_name", $group_name);
debug("group_description", $group_description);
/* DEBUG */
$group = new Group;
if ($perm->have_perm("groupAdmin")) {
switch ($submit) {
case "delete":
$success = $group->deleteGroup($group_id);
if($success) {
echo message( pslgetText($group->getMessage()));
} else {
error( pslgetText($group->getMessage()));
}
$group->newGroup();
$group->listGroup();
$group->editPermission();
$group->listPermission();
break;
case "submit":
$success = $group->saveGroup($HTTP_POST_VARS);
if($success) {
echo message( pslgetText($group->getMessage()));
} else {
error( pslgetText($group->getMessage()));
}
$group->newGroup();
$group->listGroup();
$group->editPermission();
$group->listPermission();
break;
case "edit":
$ary["group_id"] = $HTTP_GET_VARS['group_id'];
debug("ary[group_id]", $ary["group_id"]);
$group->editGroup($ary);
$group->listGroup();
break;
case "deleteperm":
$success = $group->deletePermission($permission_id);
if($success) {
echo message( pslgetText($group->getMessage()));
} else {
error( pslgetText($group->getMessage()));
}
$group->newGroup();
$group->listGroup();
$group->editPermission();
$group->listPermission();
break;
case "submitperm":
$success = $group->savePermission($HTTP_POST_VARS);
if($success) {
echo message( pslgetText($group->getMessage()));
} else {
error( pslgetText($group->getMessage()));
}
$group->newGroup();
$group->listGroup();
$group->editPermission();
$group->listPermission();
break;
case "editperm":
$ary["permission_id"] = $HTTP_GET_VARS['permission_id'];
// debug("ary[permission_id]", $ary["permission_id"]);
$group->editPermission($ary);
$group->newGroup();
$group->listGroup();
$group->listPermission();
break;
default:
$group->newGroup();
$group->listGroup();
$group->editPermission();
$group->listPermission();
}
} else {
titlebar("100%","Error! Invalid Privileges");
echo "Sorry. You do not have the necessary privilege to view this page.";
}
slashfoot();
page_close();
?>
|
