Se cambian los die(expr) por trigger_error(expr, E_USER_ERROR) para poder interceptar...

[mecon/ai.git] / lib / AI / Sistema.php

diff --git a/lib/AI/Sistema.php b/lib/AI/Sistema.php
index e149668b4f28c8af08e2cd55b6345d6efe9bb16f..06d5b63824b922ceb8b24229f30e289228188027 100644 (file)
--- a/lib/AI/Sistema.php
+++ b/lib/AI/Sistema.php
@@ -27,20 +27,14 @@
 // $Id$
 //
 
 // $Id$
 //
 

-// +X2C includes

 require_once 'AI/DBObject.php';
 require_once 'AI/DBObject.php';

-// ~X2C
-

 require_once 'AI/Error.php';
 require_once 'AI/Error.php';

-// TODO - preguntar a gmeray si le sirve, yo no lo uso...
-require_once 'SAMURAI/Sistema.php';

 
 /**
  * Archivo de configuración.
  */
 define('AI_SISTEMA_CONFFILE', dirname(__FILE__).'/Sistema.ini');
 
 
 /**
  * Archivo de configuración.
  */
 define('AI_SISTEMA_CONFFILE', dirname(__FILE__).'/Sistema.ini');
 

-// +X2C Class 416 :AI_Sistema

 /**
  * Sistema.
  *
 /**
  * Sistema.
  *


@@ -50,7 +44,6 @@ define('AI_SISTEMA_CONFFILE', dirname(__FILE__).'/Sistema.ini');
 class AI_Sistema extends AI_DBObject {
     /**
      * ID del sistema (ID en SAMURAI).
 class AI_Sistema extends AI_DBObject {
     /**
      * ID del sistema (ID en SAMURAI).

-FIXME - preguntar a gonzalo si le sirve.

      *
      * @var    int $sistema
      * @access public
      *
      * @var    int $sistema
      * @access public


@@ -58,8 +51,7 @@ FIXME - preguntar a gonzalo si le sirve.
     var $sistema = 0;
 
     /**
     var $sistema = 0;
 
     /**

-     * Nombre del sistema (slo de lectura, extra?o de SAMURAI).
-FIXME - preguntar a gonzalo si le sirve.
+     * Nombre del sistema (sólo de lectura, extraído de SAMURAI).

      *
      * @var    string $nombre
      * @access public
      *
      * @var    string $nombre
      * @access public


@@ -67,7 +59,7 @@ FIXME - preguntar a gonzalo si le sirve.
     var $nombre = '';
 
     /**
     var $nombre = '';
 
     /**

-     * Descripcin del sistema (slo de lectura, extra?o de SAMURAI).
+     * Descripción del sistema (sólo de lectura, extraído de SAMURAI).

      *
      * @var    string $descripcion
      * @access public
      *
      * @var    string $descripcion
      * @access public


@@ -75,7 +67,7 @@ FIXME - preguntar a gonzalo si le sirve.
     var $descripcion = '';
 
     /**
     var $descripcion = '';
 
     /**

-     * ?ono del sistema.
+     * Ícono del sistema.

      *
      * @var    string $icono
      * @access public
      *
      * @var    string $icono
      * @access public


@@ -106,56 +98,94 @@ FIXME - preguntar a gonzalo si le sirve.
      */
     var $habilitado = true;
 
      */
     var $habilitado = true;
 

-    // ~X2C
+    /**
+     * @var    string $tipo
+     * @access public
+     */
+    var $tipo = 'php';

 
 

-    // +X2C Operation 466

     /**
      * @param  int $sistema ID del sistema.
      *
      * @return void
      * @access public
      */
     /**
      * @param  int $sistema ID del sistema.
      *
      * @return void
      * @access public
      */

-    function AI_Sistema($sistema = 0) // ~X2C
+    function AI_Sistema($sistema = 0)

     {
         parent::AI_DBObject($sistema, AI_SISTEMA_CONFFILE);
     }
     {
         parent::AI_DBObject($sistema, AI_SISTEMA_CONFFILE);
     }

-    // -X2C

 
 

-    // +X2C Operation 459
+    /**
+     * @param  mixed $db Base de datos o resultado de donde cargar el sistema.
+     *
+     * @return PEAR_Error
+     * @access public
+     */
+    function cargar($db)
+    {
+        $id_field = $this->conf['id'];
+        $id = intval($this->$id_field);
+        if (is_a($db, 'db_result')) {
+            $result = $db;
+            $db     = $result->dbh;
+        // Si no es un resultado, hago el query.
+        } else {
+            $result = $db->query(
+                "SELECT AI.*, SA.nombre_sistema as nombre, SA.desc_sistema as descripcion
+                    FROM {$this->conf['base']}.{$this->conf['tabla']} as AI, samurai.sistema as SA
+                    WHERE AI.$id_field = $id AND AI.$id_field = SA.id_sistema"
+            );
+            if (DB::isError($result)) {
+                return $result;
+            }
+        }
+        // Obtengo la fila.
+        $row = $result->fetchRow(DB_FETCHMODE_ASSOC);
+        if (!$row) {
+            return new AI_Error(AI_ERROR_NO_RESULTADOS,
+                "No hay más resultados en la DB [id=$id]");
+        }
+        // Asigno valores al objeto.
+        foreach ($row as $key => $val) {
+            $this->$key = $val;
+        }
+        return true;
+    }
+

     /**
      * @param  DB $db DB donde guardar.
     /**
      * @param  DB $db DB donde guardar.

-     * @param  bool $nuevo Si es true, se fuerza a guardar el servicio como nuevo.
+     * @param  bool $nuevo Si es true, se fuerza a guardar el servicio como
+     *                     nuevo.

      *
      * @return PEAR_Error
      * @access public
      */
      *
      * @return PEAR_Error
      * @access public
      */

-    function guardar($db, $nuevo = false) // ~X2C
+    function guardar($db, $nuevo = false)

     {
         $datos = array(
             'icono'      => $this->icono,
             'link'       => $this->link,
             'link_ayuda' => $this->link_ayuda,
             'habilitado' => $this->habilitado ? 1 : 0,
     {
         $datos = array(
             'icono'      => $this->icono,
             'link'       => $this->link,
             'link_ayuda' => $this->link_ayuda,
             'habilitado' => $this->habilitado ? 1 : 0,

+            'tipo'       => $this->tipo,

         );
         $err = parent::guardar($db, $datos, $nuevo);
         if (PEAR::isError($err)) {
             return $err;
         }
     }
         );
         $err = parent::guardar($db, $datos, $nuevo);
         if (PEAR::isError($err)) {
             return $err;
         }
     }

-    // -X2C

 
 

-    // +X2C Operation 528

     /**
      * Obtiene un array con los identificadores de los sistemas cargados.
      *
      * @param  DB $db Base de datos de la cual obtener los sistemas.
     /**
      * Obtiene un array con los identificadores de los sistemas cargados.
      *
      * @param  DB $db Base de datos de la cual obtener los sistemas.

-     * @param  string $where Clausula WHERE para filtrar resultados.
+     * @param  string $where Clausula WHERE para filtrar la búsqueda.

      *
      * @return array
      * @access public
      * @static
      */
      *
      * @return array
      * @access public
      * @static
      */

-    function getSistemasArray($db, $where = '') // ~X2C
+    function getSistemasArray($db, $where = '')

     {
         static $conf;
         if (!$conf) {
     {
         static $conf;
         if (!$conf) {


@@ -163,15 +193,67 @@ FIXME - preguntar a gonzalo si le sirve.
         }
         extract($conf);
         $query = "
         }
         extract($conf);
         $query = "

-            SELECT   $id
-            FROM     $base.$tabla";
+            SELECT    SA.id_sistema, SA.nombre_sistema
+            FROM      samurai.sistema as SA
+            LEFT JOIN $base.$tabla as AI
+            ON        AI.sistema = SA.id_sistema
+            WHERE     AI.sistema IS NULL AND SA.estado = 1";
+        if ($where) {
+            $query .= " AND $where";
+        }
+        $query .= " ORDER BY SA.nombre_sistema ASC";
+        return $db->getAssoc($query);
+    }
+
+    /**
+     * @param  $db Base de datos de donde obtener los sistemas.
+     * @param  $soloHabilitados Si es true devuelve solo los sistemas marcados como habilitados.
+     * @param  $where Clausula WHERE para filtrar la búsqueda.
+     *
+     * @return Un array de sistemas cuya clave es el id del sistema y el valor es un objeto AI_Sistema.
+     * @access public
+     * @static
+     */
+    function getSistemas($db, $soloHabilitados = true, $where = '')
+    {
+        static $conf;
+        if (!$conf) {
+            $conf = parse_ini_file(AI_SISTEMA_CONFFILE, true);
+        }
+        $id_field = $conf['id'];
+        $tabla    = $conf['base'].'.'.$conf['tabla'];
+        $query = "
+            SELECT AI.*, SA.nombre_sistema as nombre, SA.desc_sistema as descripcion
+            FROM   $tabla as AI, samurai.sistema as SA
+            WHERE  SA.id_sistema = AI.sistema AND SA.estado = 1";
+        if ($soloHabilitados) {
+            $query .= ' AND AI.habilitado = 1';
+        }

         if ($where) {
         if ($where) {

-            $query .= "WHERE $where";
+            $query .= " AND $where";
+        }
+        $query  .= ' ORDER BY nombre ASC';
+        $result  = $db->query($query);
+        if (DB::isError($result)) {
+            return $result;
+        }
+        $sistemas = array();
+        $sistema  = new AI_Sistema;
+        $err      = $sistema->cargar($result);
+        while (!PEAR::isError($err)) {
+            $sistemas[$sistema->sistema] = $sistema->__clone();
+            $err = $sistema->cargar($result);
+        }
+        // Si no hay mas resultados (terminó bien) devuelve el array de
+        // sistemas.
+        if (AI_Error::isError($err)
+                and $err->getCode() == AI_ERROR_NO_RESULTADOS) {
+            return $sistemas;

         }
         }

-        return $db->getCol($query);
+        // Si no, se devuelve el error.
+        return $err;

     }
     }

-    // -X2C

 
 

-} // -X2C Class :AI_Sistema
+}

 
 

-?>
\ No newline at end of file
+?>