2 // vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4:
4 //require_once 'MECON/general.php';
5 //prepend_include_path('/home/mmarrese/public_html/meconlib/lib/');
7 require_once 'MECON/Marco.php';
8 require_once 'SAMURAI/DB.php';
9 require_once 'SAMURAI/Perm.php';
10 require_once 'util.php';
11 require_once 'SAMURAI/constantes.php';
14 require_once 'MECON/Usuario.php';
16 //Realizo la conexion con la base de datos
17 $tmp = new SAMURAI_DB();
18 $DB =& $tmp->connect();
20 //CARGO LAS VARIABLES DE SESION INTERNAS {{{
21 if (!isset($_SESSION['usuario'])) {
22 header('Location: /sistemas/intranet/login?redirect='.$_SERVER['REQUEST_URI']);
24 if (isset($_GET['id_sistema'])) {
25 $_SESSION['samurai']['id_sistema'] = $_GET['id_sistema'];
27 elseif (($_SERVER['REQUEST_URI'] != "/sistemas/samurai/sel-sistema" &&
28 $_SERVER['REQUEST_URI'] !=
29 "/sistemas/samurai/sel-sistema?redirect=index")&&
30 !@$_SESSION['samurai']['id_sistema']) {
31 header('Location: /sistemas/samurai/sel-sistema?redirect=index');
33 if (@$_SESSION['samurai']['id_sistema']) {
34 //Creo el objeto Permiso
35 $SAMURAI_PERM = new SAMURAI_Perm ($_SESSION['usuario'],
36 $_SESSION['samurai']['id_sistema'], $DB);