// $Id$
//
-require_once 'MECON/HTML/Error.php';
require_once 'MECON/general.php';
prepend_include_path('/var/www/sistemas/ai/sistema/local_lib');
+require_once 'MECON/HTML/Error.php';
+require_once 'permisos.php';
// Debug. {{{
require_once 'PEAR.php';
-PEAR::setErrorHandling(PEAR_ERROR_TRIGGER);
-#PEAR::setErrorHandling(PEAR_ERROR_RETURN);
+#PEAR::setErrorHandling(PEAR_ERROR_TRIGGER);
+PEAR::setErrorHandling(PEAR_ERROR_RETURN);
+// }}}
+
+// Creo la base de datos. {{{
+require_once 'AI/DB.php';
+$db =& AI_DB::connect('../conf/DB.ini');
+if (DB::isError($db)) {
+ die($db->getMessage());
+}
+// }}}
+
+// Si no está logueado, se redirige a la Intranet. {{{
+if (!@$_SESSION['usuario']) {
+ header('Location: /sistemas/intranet/sistemas');
+}
+// }}}
+
+// Creo el objeto de permisos y chequeo que tenga al menos un permiso para seguir. {{{
+require_once 'SAMURAI/Perm.php';
+$perm = new SAMURAI_Perm($_SESSION['usuario'], AI_PERM, $db);
+$perm->chequear(AI_PERM_NOTICIAS, AI_PERM_SERVICIOS, AI_PERM_SISTEMAS);
// }}}
// Creo el Marco. {{{
require_once 'MECON/Marco.php';
-$marco = new Marco('../conf/Marco.php');
+$marco = new MECON_Marco('../conf/Marco.php', $perm);
// }}}
// Averiguo si estoy administrando algún tipo de objeto. {{{
$tmp = ltrim($_SERVER['PATH_INFO'], '/');
if ($tmp == 'grupo') {
$tipo = $tmp;
- $clase = "AI_GrupoSecciones";
+ $clase = 'AI_GrupoSecciones';
$require = 'AI/GrupoSecciones.php';
$tabla = 'grupo_secciones';
- $nombre = "grupo de secciones";
+ $nombre = 'grupo de secciones';
+ $perm->chequear(AI_PERM_NOTICIAS);
} elseif ($tmp == 'servicio') {
$tipo = $tmp;
$clase = 'AI_Servicio';
$require = 'AI/Servicio.php';
$tabla = $tipo;
$nombre = $tipo;
+ $perm->chequear(AI_PERM_SERVICIOS);
} elseif ($tmp == 'sistema') {
$tipo = $tmp;
$clase = 'AI_Sistema';
$require = 'AI/Sistema.php';
$tabla = $tipo;
$nombre = $tipo;
+ $perm->chequear(AI_PERM_SISTEMAS);
} else { // No hay un objeto válido para administrar.
header('Location: '.$_SERVER['SCRIPT_NAME']);
}
}
// }}}
- // Creo la base de datos. {{{
- require_once 'AI/DB.php';
- $db =& AI_DB::connect('../conf/DB.ini');
- if (DB::isError($db)) {
- die($db->getMessage());
- }
- // }}}
-
- // Creo el árbol con el tipo de objeto que manejo y lo agrego a la página. {{{
- require_once 'AI/Arbol.php';
- $arbol = new AI_Arbol($obj, $db);
- // }}}
-
// Inicio el formulario, cargando datos de ser necesario. {{{
if ($accion & (AI_BAJA | AI_MODIF)) {
$err =& $obj->cargar($db);
if (PEAR::isError($err)) {
die($err->getMessage());
}
- $form->iniciar($obj, $accion, $arbol, $db);
+ $form->iniciar($obj, $accion, $db);
} else {
$accion = AI_ALTA;
- $form->iniciar($obj, $accion, $arbol, $db);
+ $form->iniciar($obj, $accion, $db);
}
// }}}
}
// }}}
- // Agrego el menu y formulario a la página. {{{
+ // Creo el árbol con el tipo de objeto que manejo y lo agrego a la página. {{{
+ require_once 'AI/Arbol.php';
+ $arbol = new AI_Arbol($obj, $db, false);
+ // }}}
+
+ // Agrego el menu, link para nuevo y formulario a la página. {{{
$marco->addMenuVertical($arbol);
+ if ($accion & ~AI_ALTA) {
+ require_once 'MECON/HTML/Image.php';
+ require_once 'MECON/HTML/Link.php';
+ $marco->addBody('<div class="texto11_negro" valign="middle" align="right">');
+ $link = new MECON_HTML_Link($tipo);
+ $link->addContents('Nuevo');
+ $img = new MECON_HTML_Image('/MECON/images/general_nuevo', 'Agregar nuevo',
+ array('border' => 0, 'align' => 'middle',));
+ $link->addContents($img);
+ $marco->addBody($link);
+ $marco->addBody('</div>');
+ }
$marco->addBody($form);
// }}}
// No se está editando nada, agrego la imágen de bienvenida a la página. {{{
} else {
- require_once 'HTML/Image.php';
+ require_once 'MECON/HTML/Image.php';
$marco->setEspacios(false);
- $marco->addBody(new HTML_Image('images/home', 'Adminitrador de Intranet'));
+ $marco->addBody(new MECON_HTML_Image('images/home', 'Adminitrador de Intranet'));
}
// }}}