BugFix en logout. En login se agrego la posibilidad de pasar por parametro si el...

[mecon/intranet.git] / sistema / www / sistemas.php

diff --git a/sistema/www/sistemas.php b/sistema/www/sistemas.php
index 5e51dbcc12b1e0d3ebd65817b36922d58c30927e..aa741634545ac6d23b9bbafa60733989689da204 100644 (file)
--- 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,15 +51,28 @@ $img->updateAttributes(array('width' => 190));
 $fila[] = $img;
 $t->addRow($fila);
 
-$db = IntranetDB::connect();
-$sistemas = AI_Sistema::getSistemas($db);
+$sistemas = 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.
+    $perm->setSistema($s->sistema);
+    if (!$perm->tiene()) {
+        unset($sistemas[$i]);
+    }
+}
 
-//$pct = intval(100/COLUMNAS) . '%';
 $sistema = @array_shift($sistemas);
 while ($sistema) {
     $row = array();
     for ($j = 1; $j <= COLUMNAS; $j++) {
         if ($sistema) {
+            $url = $sistema->link;
+            if ($sistema->tipo == 'embperl') {
+                $url = '/Php2Embperl_Session?redirect=' . urlencode($url);
+            }
             $img = new MECON_HTML_Image(
                     "/sistemas/intranet/images/$sistema->icono",
                     $sistema->nombre,
@@ -70,19 +83,25 @@ while ($sistema) {
                     )
             );
                        $row[] = new MECON_HTML_Link(
-                               $sistema->link,
+                               $url,
                 $img,
                                array(),
                        array(
+                    'OnClick' =>
+                        "javascript:window.open('$url','s{$sistema->sistema}',"
+                        . "'width=790,height=500,scrollbars=yes');return false;",
                                    'target' => '_blank',
                                )
                    );
             $row[] = '&nbsp;';
                        $link = new MECON_HTML_Link(
-                               $sistema->link,
+                               $url,
                 $sistema->nombre,
                                array(),
                        array(
+                    'OnClick' =>
+                        "javascript:window.open('$url','s{$sistema->sistema}',"
+                        . "'width=790,height=500,scrollbars=yes');return false;",
                                    'target' => '_blank',
                     'class' => 'intranet_sistemas_txt',
                                )
@@ -99,6 +118,10 @@ while ($sistema) {
                                        $img,
                                        array(),
                                        array(
+                        'OnClick' =>
+                            "javascript:window.open('{$sistema->link_ayuda}',"
+                            . "'sa{$sistema->sistema}',"
+                            . "'width=790,height=500,scrollbars=yes');return false;",
                         'target' => '_blank',
                     )
                                );
@@ -120,7 +143,7 @@ while ($sistema) {
 }
 
 $m = new HTML_DietMarco('sistemas', 'Sistemas');
-$m->addTitle('Sistemas');
+//$m->addTitle('Sistemas');
 $m->addStyleDeclaration('
     .intranet_sistemas_txt {
         color: #003366;