2 // vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4 textwidth=80 foldmethod=marker:
4 //require_once 'MECON/general.php';
5 //prepend_include_path('/home/mmarrese/public_html/meconlib/lib/');
8 require_once 'MECON/Marco.php';
9 require_once 'SAMURAI/Perm.php';
10 require_once 'constantes.php'; //Archivo de constantes de SAMURAI
12 //Creo una conexion a la base de datos
13 $conf = parse_ini_file(dirname(__FILE__) . '/consultas.ini', true);
14 $DB = DB::connect($conf['dsn'],$conf['opciones']);
15 if (DB::isError($DB)) {
16 trigger_error($DB->getMessage(), E_USER_ERROR);
18 //Verifico si el usuario esta logueado
19 if (!isset($_SESSION['usuario'])) {
20 header('Location: /sistemas/intranet/login?redirect='.$_SERVER['REQUEST_URI']);
23 //Creo el objeto SAMURAI_PERM
24 $SAMURAI_PERM = new SAMURAI_Perm ($_SESSION['usuario'],
26 $MARCO =& new MECON_Marco ('/var/www/sistemas/yatta/sistema/conf/Marco.php',