Libreria SAMURAI_Perm en Perl casi lista. Falta getObservaciones y verificar que...

[mecon/samurai.git] / sistema / local_lib / prepend.php

diff --git a/sistema/local_lib/prepend.php b/sistema/local_lib/prepend.php
index 18ca4ae7403fdf4b5e8587a9b498e0e143f3cc00..279b387b3ba8b0be8c5350b1667c048bf6b4ea26 100644 (file)
--- a/sistema/local_lib/prepend.php
+++ b/sistema/local_lib/prepend.php
@@ -1,25 +1,33 @@
 <?php
 // vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4:
 
 <?php
 // vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4:
 

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

 
 require_once 'MECON/Marco.php';
 require_once 'SAMURAI/DB.php';
 
 require_once 'MECON/Marco.php';
 require_once 'SAMURAI/DB.php';

+require_once 'SAMURAI/Perm.php';

 require_once 'util.php';
 require_once 'util.php';

+require_once 'SAMURAI/constantes.php';
+
+
+require_once 'MECON/Usuario.php';

 
 session_start();
 
 
 session_start();
 

-if (!isset($_SESSION['samurai']['id_sistema']) && isset($_GET['id_sistema'])) {
-    $_SESSION['samurai']['id_sistema'] = $_GET['id_sistema'];
+//CARGO LAS VARIABLES DE SESION INTERNAS {{{
+if (!isset($_SESSION['usuario'])) {
+    header('Location: /sistemas/intranet');

 }
 }

-if (!isset($_SESSION['samurai']['login']) && isset($_GET['login'])) {
-    $_SESSION['samurai']['login'] = $_GET['login'];
+if (isset($_GET['id_sistema'])) {
+    $_SESSION['samurai']['id_sistema'] = $_GET['id_sistema'];

 }
 }

-
+//}}}

 //Realizo la conexion con la base de datos
 $tmp = new SAMURAI_DB();
 $DB  =& $tmp->connect();
 //Realizo la conexion con la base de datos
 $tmp = new SAMURAI_DB();
 $DB  =& $tmp->connect();

+//Creo el objeto Permiso
+$SAMURAI_PERM = new SAMURAI_Perm ($_SESSION['usuario'], SAMURAI_PERM, $DB);

 //Creo el objeto Marco
 //Creo el objeto Marco

-$MARCO = new MECON_Marco ('/var/www/sistemas/samurai/sistema/conf/confSecciones.php');
+$MARCO =& new MECON_Marco ('/var/www/sistemas/samurai/sistema/conf/confSecciones.php', $SAMURAI_PERM);

 ?>
 ?>