Modificaciones para los usuarios.

[mecon/samurai.git] / sistema / www / index.php

diff --git a/sistema/www/index.php b/sistema/www/index.php
index 2f071e0e5c4ab90b63ee40060d83554be85c87f6..aed8f73cfc46aedd86d5367d39760b1caa252c45 100644 (file)
--- a/sistema/www/index.php
+++ b/sistema/www/index.php
@@ -1,5 +1,5 @@
 <?php
 <?php

-// vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4:
+// vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4 foldmethod=marker:

 // +----------------------------------------------------------------------+
 // | PHP Version 4                                                        |
 // +----------------------------------------------------------------------+
 // +----------------------------------------------------------------------+
 // | PHP Version 4                                                        |
 // +----------------------------------------------------------------------+


@@ -19,10 +19,30 @@
 //
 // $Id$
 // 
 //
 // $Id$
 // 

-    require_once 'HTML/Image.php';
-    
-    $MARCO = new Marco ('../conf/confSecciones.php');
-    $MARCO->addBody(new HTML_Image('images/inicio.jpg'));
+
+//VERIFICO SI SE TIENE ACCESO A LA PAGINA{{{
+$SAMURAI_PERM->setSistema(SAMURAI_PERM);
+if (!$SAMURAI_PERM->tiene(SAMURAI_PERM_DEVELOPER)) {
+    $SAMURAI_PERM->setSistema($_SESSION['samurai']['id_sistema']);
+    $SAMURAI_PERM->chequear(SAMURAI_PERM_USUARIO_BAJA, SAMURAI_PERM_USUARIO_MODIF, SAMURAI_PERM_USUARIO_ALTA,
+                            SAMURAI_PERM_PERFIL_ALTA,SAMURAI_PERM_PERFIL_BAJA,SAMURAI_PERM_PERFIL_MODIF,SAMURAI_PERM_PERFIL_TIPO,
+                            SAMURAI_PERM_DEVELOPER);
+}
+$MARCO =& new MECON_Marco ('/var/www/sistemas/samurai/sistema/conf/confSecciones.php', $SAMURAI_PERM);
+//}}}
+
+//VERIFICO SI SE PASO ALGUNA ACCION {{{
+    if (isset($_GET['accion'])) {
+        switch ($_GET['accion']) {
+           case 'usuarios': header('Location:usuarios/usuarios');
+                             break;
+           case 'perfiles': header('Location:perfiles/perfiles');
+                             break;
+        }
+    }
+//}}}
+    require_once 'MECON/HTML/Image.php';
+    $MARCO->addBody(new MECON_HTML_Image('images/inicio.jpg'));

     $MARCO->setEspacios(false);
     $MARCO->display();
 ?>
     $MARCO->setEspacios(false);
     $MARCO->display();
 ?>