X-Git-Url: https://git.llucax.com/mecon/ai.git/blobdiff_plain/bf3397e09f20d6ee9ea3bfeec51e56f24118aae9..ef1da2e8ecfb3480a55cd70cb42ab9acb36fd1cc:/sistema/www/index.php diff --git a/sistema/www/index.php b/sistema/www/index.php index 090c6fb..4983778 100644 --- a/sistema/www/index.php +++ b/sistema/www/index.php @@ -27,19 +27,33 @@ // $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()); +} +// }}} + +// Creo el objeto de permisos - FIXME - esto debería venir de intranet. {{{ +require_once 'SAMURAI/Perm.php'; +$perm = new SAMURAI_Perm(@$_GET['login'] ? $_GET['login'] : 'llucar@mecon', AI_PERM, $db); // }}} // 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,25 +62,31 @@ 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"; - $arbol = 'NOTICIAS'; + $nombre = 'grupo de secciones'; + if (!$perm->tiene(AI_PERM_NOTICIAS)) { + die('Acceso no autorizado!!!'); // FIXME - se va a poner más lindo? + } } elseif ($tmp == 'servicio') { $tipo = $tmp; $clase = 'AI_Servicio'; $require = 'AI/Servicio.php'; $tabla = $tipo; $nombre = $tipo; - $arbol = 'SERVICIOS'; + if (!$perm->tiene(AI_PERM_SERVICIOS)) { + die('Acceso no autorizado!!!'); // FIXME - se va a poner más lindo? + } } elseif ($tmp == 'sistema') { $tipo = $tmp; $clase = 'AI_Sistema'; $require = 'AI/Sistema.php'; $tabla = $tipo; $nombre = $tipo; - $arbol = 'SISTEMAS'; + if (!$perm->tiene(AI_PERM_SISTEMAS)) { + die('Acceso no autorizado!!!'); // FIXME - se va a poner más lindo? + } } else { // No hay un objeto válido para administrar. header('Location: '.$_SERVER['SCRIPT_NAME']); } @@ -124,40 +144,9 @@ 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 'MECON/HTML/Arbol/ArbolDB.php'; - $dbdata = array( - 'db' => &$db, - 'tabla' => $tabla, - 'id' => $tipo, - 'nombre' => 'nombre', - 'order' => 'asc', - ); - // Activo el id del objeto que estamos modificando. - if ($accion & (AI_BAJA | AI_MODIF)) { - $dbdata['id_activo'] = $obj->$tipo; - } - if ($tipo == 'grupo' or $tipo == 'servicio') { - $dbdata['id_padre'] = $tipo . '_padre'; - } elseif ($tipo == 'sistema') { // FIXME - horrible!!! - $dbdata = - array( - 'tabla' => "intranet.$tabla as A, samurai.sistema as S", - 'id' => "A.$tipo", - 'nombre' => 'S.nombre_sistema', - 'where' => 'S.id_sistema = A.sistema AND S.estado = 1', - ) - + $dbdata; - } - $arbol = new HTML_ArbolDB($dbdata, $arbol, $tipo.'?accion='.AI_MODIF.'&id='); + require_once 'AI/Arbol.php'; + $arbol = new AI_Arbol($obj, $db); // }}} // Inicio el formulario, cargando datos de ser necesario. {{{ @@ -243,8 +232,21 @@ if ($tipo) { } // }}} - // Agrego el menu y formulario a la página. {{{ + // 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('