]> git.llucax.com Git - mecon/yatta.git/blob - sistema/local_lib/prepend.php
Comienzo a trabajar con los scripts de los servidores
[mecon/yatta.git] / sistema / local_lib / prepend.php
1 <?php
2 // vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4 textwidth=80 foldmethod=marker:
3
4 //require_once 'MECON/general.php';
5 //prepend_include_path('/home/mmarrese/public_html/meconlib/lib/');
6
7 require_once 'DB.php';
8 require_once 'MECON/Marco.php';
9 require_once 'SAMURAI/Perm.php';
10 require_once 'constantes.php'; //Archivo de constantes de SAMURAI
11
12 //Creo una conexion a la base de datos
13 $DB =& DB::connect('mysql://intranet:intranet@bal747f/yatta', true);
14 if (DB::isError($DB)) {
15     die ($DB->getMessage());
16 }
17 //Verifico si el usuario esta logueado
18 if (!isset($_SESSION['usuario'])) {
19     header('Location: /sistemas/intranet/login?redirect='.$_SERVER['REQUEST_URI']);
20 }
21 else {
22 //Creo el objeto SAMURAI_PERM
23     $SAMURAI_PERM = new SAMURAI_Perm ($_SESSION['usuario'],
24             YATTA_PERM, $DB);
25     $MARCO =& new MECON_Marco ('/var/www/sistemas/yatta/sistema/conf/Marco.php',
26          $SAMURAI_PERM);
27 }
28 ?>