lib/AI/DBObject.php

   1 <?php
   2 // vim: set binary expandtab tabstop=4 shiftwidth=4:
   3 // +--------------------------------------------------------------------+
   4 // |                      Ministerio de Economía                        |
   5 // |                  AI (Administrador de Intranet)                    |
   6 // +--------------------------------------------------------------------+
   7 // | This file is part of AI.                                           |
   8 // |                                                                    |
   9 // | AI is free software; you can redistribute it and/or modify         |
  10 // | it under the terms of the GNU General Public License as published  |
  11 // | by the Free Software Foundation; either version 2 of the License,  |
  12 // | or (at your option) any later version.                             |
  13 // |                                                                    |
  14 // | AI is distributed in the hope that it will be useful, but          |
  15 // | WITHOUT ANY WARRANTY; without even the implied warranty of         |
  16 // | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU   |
  17 // | General Public License for more details.                           |
  18 // |                                                                    |
  19 // | You should have received a copy of the GNU General Public License  |
  20 // | along with Hooks; if not, write to the Free Software Foundation,   |
  21 // | Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA      |
  22 // +--------------------------------------------------------------------+
  23 // | Creado: Fri Jul 18 16:05:22 2003                                   |
  24 // | Autor:  Leandro Lucarella <llucar@mecon.gov.ar>                    |
  25 // +--------------------------------------------------------------------+
  26 //
  27 // $Id$
  28 //
  29
  30 // +X2C Class 516 :AI_DBObject
  31 /**
  32  * Objecto con capacidad de guardarse, cargarse y borrarse de una base de datos.
  33  *
  34  * @package AI
  35  * @access public
  36  * @abstract
  37  */
  38 class AI_DBObject {
  39     /**
  40      * @var    array $conf
  41      * @access public
  42      */
  43     var $conf = array();
  44
  45     // ~X2C
  46
  47     // +X2C Operation 519
  48     /**
  49      * @param  int $id Identificador del objeto a cargar.
  50      * @param  string $confFile Archivo de configuracin del objeto.
  51      *
  52      * @return void
  53      * @access public
  54      */
  55     function AI_DBObject($id = 0, $confFile = '') // ~X2C
  56     {
  57         if ($confFile) {
  58             $this->conf = parse_ini_file($confFile, true);
  59         } else {
  60             $this->conf = parse_ini_file(dirname(__FILE__) . get_class($this)
  61                                 . '.ini', true);
  62         }
  63                 $id_field = $this->conf['id'];
  64         $this->$id_field = $id;
  65     }
  66     // -X2C
  67
  68     // +X2C Operation 520
  69     /**
  70      * @param  mixed $db Base de datos o resultado a usar para cargar el objeto.
  71      *
  72      * @return PEAR_Error
  73      * @access public
  74      */
  75     function cargar($db) // ~X2C
  76     {
  77                 $id_field = $this->conf['id'];
  78         $id = intval($this->$id_field);
  79         if (is_a($db, 'db_result')) {
  80             $result = $db;
  81             $db     = $result->dbh;
  82         // Si no es un resultado, hago el query.
  83         } else {
  84             $result = $db->query(
  85                 "SELECT *
  86                     FROM {$this->conf['base']}.{$this->conf['tabla']}
  87                     WHERE $id_field = $id"
  88             );
  89             if (DB::isError($result)) {
  90                 return $result;
  91             }
  92         }
  93         // Obtengo la fila.
  94         $row = $result->fetchRow(DB_FETCHMODE_ASSOC);
  95         if (!$row) {
  96             return new AI_Error(AI_ERROR_NO_RESULTADOS,
  97                 "No hay más resultados en la DB [id=$id]");
  98         }
  99         // Asigno valores al objeto.
 100                 foreach ($row as $key => $val) {
 101                         $this->$key = $val;
 102                 }
 103         return true;
 104     }
 105     // -X2C
 106
 107     // +X2C Operation 521
 108     /**
 109      * @param  DB $db Base de datos a usar para guardar el objeto.
 110      * @param  array $datos Array con los datos a guardar en la DB (donde la clave es el campo y el valor el contenido a guardar).
 111      * @param  bool $nuevo Si es true, se fuerza a cargar el objeto en la base como si fuera nuevo.
 112      *
 113      * @return PEAR_Error
 114      * @access public
 115      * @static
 116      */
 117     function guardar($db, $datos, $nuevo = false) // ~X2C
 118     {
 119                 $id_field = $this->conf['id'];
 120         $tabla    = $this->conf['tabla'];
 121         $base     = $this->conf['base'];
 122         $id       = intval($this->$id_field);
 123         $where = '';
 124         if ($id and !$nuevo) {
 125             $accion = DB_AUTOQUERY_UPDATE;
 126             $where  = "$id_field = $id";
 127         } else {
 128             $accion = DB_AUTOQUERY_INSERT;
 129             // Si no tiene ID, le asigno uno nuevo.
 130             if (!$id) {
 131                 $id = $db->nextId($tabla);
 132                 if (DB::isError($id)) {
 133                     return $id;
 134                 }
 135                 $this->$id_field = $id;
 136             }
 137             $datos[$id_field] = $id;
 138         }
 139         $res = $db->autoExecute("$base.$tabla", $datos, $accion, $where);
 140         if (DB::isError($res)) {
 141             return $res;
 142         }
 143         return true;
 144     }
 145     // -X2C
 146
 147     // +X2C Operation 522
 148     /**
 149      * @param  DB $db Base de datos a usar para borrar el objeto.
 150      *
 151      * @return PEAR_Error
 152      * @access public
 153      */
 154     function borrar($db) // ~X2C
 155     {
 156                 $id_field = $this->conf['id'];
 157         $tabla = $this->conf['base'].'.'.$this->conf['tabla'];
 158         $id = intval($this->$id_field);
 159         if ($id) {
 160             $res = $db->query(
 161                 "DELETE FROM $tabla WHERE $id_field = $id");
 162             if (DB::isError($res)) {
 163                 return $res;
 164             }
 165             return true;
 166         }
 167         return PEAR::raiseError('No hay un identificador válido para borrar');
 168     }
 169     // -X2C
 170
 171     // +X2C Operation 523
 172     /**
 173      * @return AI_DBObject
 174      * @access public
 175      */
 176     function __clone() // ~X2C
 177     {
 178         return $this;
 179     }
 180     // -X2C
 181
 182 } // -X2C Class :AI_DBObject
 183
 184 ?>