X-Git-Url: https://git.llucax.com/mecon/intranet.git/blobdiff_plain/44fcb3a7b8938f963abbb0579d7b9283fcf739df..4d9dd8fc11a8e21edf367efc0f73301e5cf428a7:/sistema/www/sistemas.php

diff --git a/sistema/www/sistemas.php b/sistema/www/sistemas.php
index 46e6310..4981c24 100644
--- a/sistema/www/sistemas.php
+++ b/sistema/www/sistemas.php
@@ -1,13 +1,13 @@
 <?php
 // vim: set binary expandtab ts=4 shiftwidth=4 textwidth=80:
 // $Id$
-require_once '../local_lib/HTML_DietMarco.php';
+require_once 'HTML_DietMarco.php';
 if(!isset($_SESSION['usuario']))
 {
-  header('location: login?redirect=sistemas');
-  exit;
+    header('location: login?redirect=sistemas');
+    exit;
 }
-require_once '../local_lib/intranetdb.php';
+require_once 'intranetdb.php';
 require_once 'HTML/Table.php';
 require_once 'MECON/HTML/Link.php';
 require_once 'MECON/HTML/Image.php';
@@ -51,19 +51,42 @@ $img->updateAttributes(array('width' => 190));
 $fila[] = $img;
 $t->addRow($fila);
 
-$db = IntranetDB::connect();
-$sistemas = AI_Sistema::getSistemas($db);
+$sists = AI_Sistema::getSistemas($DB);
 
 // Me fijo que sistemas puede ver este usuario.
 require_once 'SAMURAI/Perm.php';
-$perm = new SAMURAI_Perm($_SESSION['usuario'], 0, $db);
-foreach ($sistemas as $i => $s) {
-    // Si no tiene permisos para el sistema, lo saco de la lista.
+require_once 'SAMURAI/constantes.php';
+$perm = new SAMURAI_Perm($_SESSION['usuario'], 0, $DB);
+$samurai = false;
+$sistemas = array();
+foreach ($sists as $id => $s) {
+    // Agrego los sistemas en los que tiene permiso.
     $perm->setSistema($s->sistema);
-    if (!$perm->tiene()) {
-        unset($sistemas[$i]);
+    if ($perm->tiene()) {
+        // Si es SAMURAI hay que ver si ya no lo agregamos antes.
+        if ($id == SAMURAI_PERM) {
+            if (!$samurai) {
+                $samurai = true;
+                $sistemas[] = $sists[$id];
+            }
+        } else { // Si no es SAMURAI lo agregamos incondicionalmente.
+            $sistemas[] = $sists[$id];
+        }
+    }
+    // Si tiene permisos de SAMURAI en un sistema, hay que mostrar un link a
+    // SAMURAI.
+    if (!$samurai and $perm->tiene(SAMURAI_PERM_PERFIL_ALTA,
+            SAMURAI_PERM_PERFIL_BAJA, SAMURAI_PERM_PERFIL_MODIF,
+            SAMURAI_PERM_USUARIO_ALTA, SAMURAI_PERM_USUARIO_BAJA,
+            SAMURAI_PERM_USUARIO_MODIF)) {
+        $samurai = true;
+        if (@$sists[SAMURAI_PERM]) {
+            $sistemas[] = $sists[SAMURAI_PERM];
+        }
     }
 }
+unset($sists);
+unset($samurai);
 
 $sistema = @array_shift($sistemas);
 while ($sistema) {
@@ -72,7 +95,7 @@ while ($sistema) {
         if ($sistema) {
             $url = $sistema->link;
             if ($sistema->tipo == 'embperl') {
-                $url .= '?soy_embperl=1';
+                $url = '/Php2Embperl_Session?redirect=' . urlencode($url);
             }
             $img = new MECON_HTML_Image(
                     "/sistemas/intranet/images/$sistema->icono",
@@ -88,6 +111,9 @@ while ($sistema) {
                 $img,
 				array(),
 		    	array(
+                    'OnClick' =>
+                        "javascript:window.open('$url','s{$sistema->sistema}',"
+                        . "'width=790,height=550,scrollbars=yes,resizable=yes');return false;",
 				    'target' => '_blank',
 				)
 		    );
@@ -97,6 +123,9 @@ while ($sistema) {
                 $sistema->nombre,
 				array(),
 		    	array(
+                    'OnClick' =>
+                        "javascript:window.open('$url','s{$sistema->sistema}',"
+                        . "'width=790,height=550,scrollbars=yes,resizable=yes');return false;",
 				    'target' => '_blank',
                     'class' => 'intranet_sistemas_txt',
 				)
@@ -113,6 +142,10 @@ while ($sistema) {
 					$img,
 					array(),
 					array(
+                        'OnClick' =>
+                            "javascript:window.open('{$sistema->link_ayuda}',"
+                            . "'sa{$sistema->sistema}',"
+                            . "'width=790,height=550,scrollbars=yes,resizable=yes');return false;",
                         'target' => '_blank',
                     )
 				);
@@ -134,7 +167,7 @@ while ($sistema) {
 }
 
 $m = new HTML_DietMarco('sistemas', 'Sistemas');
-$m->addTitle('Sistemas');
+//$m->addTitle('Sistemas');
 $m->addStyleDeclaration('
     .intranet_sistemas_txt {
         color: #003366;