X-Git-Url: https://git.llucax.com/mecon/ai.git/blobdiff_plain/6295690d016e83a22cd0f402e8ac71c3d35ca4a1..929da9471027949b8a0ccff5d4769f9920dcd773:/sistema/www/index.php diff --git a/sistema/www/index.php b/sistema/www/index.php index 90cdcd7..b41957a 100644 --- a/sistema/www/index.php +++ b/sistema/www/index.php @@ -27,19 +27,41 @@ // $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'; + +// Si no está logueado, se redirige a la Intranet. {{{ +if (!@$_SESSION['usuario']) { + header('Location: /sistemas/intranet/login?redirect=' + . urlencode($_SERVER['REQUEST_URI'])); +} +// }}} // 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()); +} +// }}} + +// 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(); // }}} // 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. {{{ @@ -48,22 +70,25 @@ if (@$_SERVER['PATH_INFO']) { $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']); } @@ -121,29 +146,16 @@ if ($tipo) { } // }}} - // 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); } // }}} @@ -217,20 +229,15 @@ if ($tipo) { } // }}} + // 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 'HTML/Image.php'; - require_once 'HTML/Link.php'; - $img = new HTML_Image('/MECON/images/general_nuevo', 'Agregar nuevo', - array('border' => 0, 'align' => 'middle',)); - $link = new HTML_Link($tipo); - $marco->addBody('
'); - $link->addContents($img); - $link_text = ' Agregar un nuevo ' . $nombre; - $link->addContents($link_text); - $marco->addBody($link); - $marco->addBody('
'); + $form->renderer->tabla->addLink('nuevo', $tipo); } $marco->addBody($form); // }}} @@ -239,9 +246,9 @@ if ($tipo) { // 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')); } // }}}