<?php
// vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4 textwidth=80 foldmethod=marker:

//require_once 'MECON/general.php';
//prepend_include_path('/home/mmarrese/public_html/meconlib/lib/');

require_once 'DB.php';
require_once 'MECON/Marco.php';
require_once 'SAMURAI/Perm.php';
require_once 'constantes.php'; //Archivo de constantes de SAMURAI

//Creo una conexion a la base de datos
$conf = parse_ini_file(dirname(__FILE__) . '/consultas.ini', true);
$DB = DB::connect($conf['dsn'],$conf['opciones']);
if (DB::isError($DB)) {
     trigger_error($DB->getMessage(), E_USER_ERROR);
}
//Verifico si el usuario esta logueado
if (!isset($_SESSION['usuario'])) {
    header('Location: /sistemas/intranet/login?redirect='.$_SERVER['REQUEST_URI']);
}
else {
//Creo el objeto SAMURAI_PERM
    $SAMURAI_PERM = new SAMURAI_Perm ($_SESSION['usuario'],
            YATTA_PERM, $DB);
    $MARCO =& new MECON_Marco ('/var/www/sistemas/yatta/sistema/conf/Marco.php',
         $SAMURAI_PERM);
}
?>