]> git.llucax.com Git - mecon/meconlib.git/blob - lib/MLIB/HTML/Tabla.php
Se corrige un error cuando se parseaban las variables. Si el _getVars no
[mecon/meconlib.git] / lib / MLIB / HTML / Tabla.php
1 <?php /* vim: set binary expandtab tabstop=4 shiftwidth=4 textwidth=80:
2 -------------------------------------------------------------------------------
3                                     mlib
4 -------------------------------------------------------------------------------
5 This file is part of mlib.
6
7 mlib is free software; you can redistribute it and/or modify it under
8 the terms of the GNU General Public License as published by the Free
9 Software Foundation; either version 2 of the License, or (at your option)
10 any later version.
11
12 mlib is distributed in the hope that it will be useful, but WITHOUT
13 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
14 FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
15  
16 You should have received a copy of the GNU General Public License; if not,
17 write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330,
18 Boston, MA  02111-1307  USA
19 -------------------------------------------------------------------------------
20 Creado: fri mar 21 ART 2003
21 Autor:  Martin Marrese <mmarre@mecon.gov.ar>
22 -------------------------------------------------------------------------------
23 $Id$
24 -----------------------------------------------------------------------------*/
25
26 require_once 'HTML/Table.php';
27 require_once 'MLIB/HTML/Image.php';
28 require_once 'MLIB/HTML/Link.php';
29
30 /**
31  * Libreria para le manejo de las tablas de los sistemas de intranet.
32  *
33  */
34 class MLIB_HTML_Tabla extends HTML_Table {
35     
36     /**
37      * Valores de Configuracion particular
38      *
39      * @var array() $conf
40      * @access protected
41      */
42     var $_conf;
43
44     /**
45      * Atributos de las tablas.
46      *
47      * @var array() attrs
48      * @access protected
49      */
50     var $_attrs;
51
52     /**
53      * Íconos e información que va arriba de la tabla.
54      *
55      * @var array()
56      * @access private.
57      */
58     var $_cabecera = array();
59
60     /**
61      * Íconos e información que va abajo de la tabla.
62      *
63      * @var array()
64      * @access private.
65      */
66     var $_pie = array();
67
68     /**
69      * Constructor. 
70      * Puede recibir como parametro un string con los atributos que se 
71      * quieren dar a la tabla en cuestion. Estos atributos estan
72      * seteados por default segun el archivo de configuracion.
73      * Ademas puede recibir la indicacion de algun estilo en particular.
74      *
75      * @param mixed $attrs Atributos diferentes a los estandares para la tabla
76      * @param string $estilo Tipo de tabla
77      * 
78      * @access public
79      */
80     function MLIB_HTML_Tabla($attrs = null, $estilo = 'comun') {
81         // Obtengo los valores particulares de configuracion.
82         $this->_conf = include(dirname(__FILE__) . '/Tabla/estilo_' . $estilo . '.php');
83         // Seteo los atributos para la tabla
84         $this->_attrs = $this->_conf['atributos']['tabla_comun'];
85         //Genero el objeto HTML_Table
86         if (is_string($attrs)) {
87             $attrs = $this->_parseAttributes($attrs);
88         }
89         if (is_array($attrs)) {
90             if (isset($attrs['width'])) {
91                 $this->_attrs['width'] = $attrs['width'];
92             }
93             if (isset($attrs['bgcolor'])) {
94                 $this->_attrs['bgcolor'] = $attrs['bgcolor'];
95             }
96             if (isset($attrs['cellspacing'])) {
97                 $this->_attrs['cellspacing']  = $attrs['cellspacing'];
98             }            
99             if (isset($attrs['cellpadding'])) {
100                 $this->_attrs['cellpadding']  = $attrs['cellpadding'];
101             }            
102         }        
103         $this->HTML_Table($this->_attrs);
104             if (isset($attrs['align'])) {
105                 $this->_attrs['align'] = $attrs['align'];
106             }
107
108     }    
109
110     /**                 
111      * Devuelve el html de la tabla
112      *
113      * Devuelve el html de la tabla para que sea mostrado.
114      * Como parametro recibe el indicador de tabla simple.
115      * Si $simple es falso, devuelve el html comun y corriente (con 2
116      * tablas), si es false devuelve una tabla sola.
117      *
118      * @param bool $simple Tipo de tabla que se quiere recibir.
119      *
120      * @return string Html
121      * 
122      * @access public
123      */
124     function toHtml($simple = 0) {
125         if ($simple) {
126             $result = parent::toHtml();
127         // Agregar la tabla de fondo.
128         } else {
129             $contenedora = $this->_conf['atributos']['tabla_contenedora'];
130             $contenedora['width'] = $this->getAttribute('width');
131             $contenedora['align'] = $this->_attrs['align'];
132             $this->updateAttributes(array('width' => '100%'));
133             $tabla_externa =  new HTML_Table($contenedora);
134             $tabla_externa->addRow(array(parent::toHtml()),
135                 $this->_conf['atributos']['celda_contenedora']);
136             $result = $tabla_externa->toHtml();    
137         }
138         // Si tiene pie o cabecera, crea tabla.
139         if ($this->_cabecera or $this->_pie) {
140             $tabla_externa = new HTML_Table(array('width'=>'100%','border'=>0));
141         }
142         // Si tiene cabecera, la agrega.
143         $this->_addSpecialRow($this->_cabecera, $tabla_externa);
144         // Si tiene cabecera o pie, agrega la tabla original.
145         if ($this->_cabecera or $this->_pie) {
146             //$id = $tabla_externa->addRow($result);
147             $tabla_externa->addRow(array($result), array(
148                 'align'   => 'center',
149                 'valign'  => 'middle',
150                 'width'   => '100%',
151                 'colspan' => '3',
152             ));
153         }
154         // Si tiene pie, lo agrega.
155         $this->_addSpecialRow($this->_pie, $tabla_externa);
156         return ($this->_cabecera or $this->_pie) ? $tabla_externa->toHtml() : $result;
157     }
158
159     function _addSpecialRow($array, &$tabla) {
160         if ($array) {
161             $row = array();
162             foreach ($array as $key => $val) {
163                 $row[$key] = $val ? $val : '&nbsp;';
164             }
165             $id = $tabla->addRow($row, array(
166                 'valign' => 'middle',
167                 'width'  => '33%',
168             ));
169             // Si no hay celda central, hace colspan.
170             if ($array[0] and !$array[1]) {
171                 $tabla->updateCellAttributes($id, 0, array(
172                     'colspan' => 2,
173                     'width' => '67%'));
174             /* } XXX se complica hacer el colspan para atras:
175               elseif ($array[2] and !$array[1]) {
176                 $tabla->updateCellAttributes($id, 1, array(
177                     'colspan' => 2,
178                     'width' => '67%')); */
179             }
180             $tabla->updateCellAttributes($id, 0, array('align' => 'left'));
181             $tabla->updateCellAttributes($id, 1, array('align' => 'center'));
182             $tabla->updateCellAttributes($id, 2, array('align' => 'right'));
183         }
184     }
185
186     /**
187      * Cambia las propiedades de una celda
188      *
189      * Cambia las propiedades de una celda. Si $attrs es un array
190      * asociativo, se setean los atributos representados por las claves
191      * con los valores.
192      *
193      * @param int $row     Identificador de la fila que se quiere modificar    
194      * @param int $col     Identificador de la columna que se quiere modificar
195      * @param mixed $attrs Atributo a modificar                               
196      *
197      * @access public
198      */
199     function updateCellAttributes($row, $col, $attrs) {
200         return parent::updateCellAttributes($row, $col, $this->_translateAttributes($attrs, false));
201     }
202
203     /**
204      * Establece las propiedades de una celda
205      *
206      * Establece las propiedades de una celda. Si $attrs es un array
207      * asociativo, se setean los atributos representados por las claves
208      * con los valores.
209      *
210      * @param int $row     Identificador de la fila que se quiere modificar     
211      * @param int $col     Identificador de la columna que se quiere modificar
212      * @param mixed $attrs Atributo a modificar                               
213      *
214      * @access public
215      */
216     function setCellAttributes($row, $col, $attrs) {
217         return parent::setCellAttributes($row, $col, $this->_translateAttributes($attrs, true));
218     }
219
220     /**
221      * Agrega una fila
222      *
223      * Agrega una fila. El contenido es el que viene representado por 
224      * el array $content. Recibe los atributos en la variable $attrs
225      *
226      * @param mixed $content Contenido
227      * @param mixed $attrs Atributos
228      *
229      * @return int $rowId Identificador de la fila
230      *
231      * @access public
232      */
233     function addRow($content, $attrs = 'comun') {
234         return parent::addRow($content, $attrs);
235     }
236     
237     /**
238      * Convierte un atributo a string
239      * 
240      * Convierte un atributo HTML al string para pasar a los metodos de HTML_Table
241      * Recibe en $attrs los atributos a modificar.
242      *
243      * @param mixed $attrs Atributos.
244      * @param bool  $isSet Indica si hay que setear.
245      *
246      * @return array
247      * @access private
248      */
249     function _translateAttributes($attrs, $isSet) {
250         if (!$attrs) {
251             return array();
252         }
253         if (is_string($attrs)) {
254             $attrs = $this->_parseAttributes($attrs);
255         }
256         if ($isSet) {
257             $rta = $this->_conf['atributos']['celda_comun'];
258         } else {
259             $rta = array();
260         }
261         foreach ($attrs as $attr => $val) {
262             $attr = strtolower($attr);
263             switch ($attr) {
264                 // Estilos de celda
265                 case 'comun':
266                 case 'cabecera':
267                 case 'titulo':
268                     $rta = array_merge($rta,
269                             $this->_conf['atributos']["celda_$attr"]);
270                     $rta[$attr] = $attr;
271                     break;
272                 case 'align':
273                 case 'valign':
274                 case 'width':
275                 case 'height':
276                 case 'rowspan':
277                 case 'colspan':
278                 case 'bgcolor':
279                 case 'class':
280                 case 'border':
281                 case 'cellspacing':
282                 case 'cellpadding':
283                 case 'nowrap':
284                     $rta[$attr] = $val;
285                     break;
286                 case 'spacing':
287                 case 'padding':
288                     $rta["cell$attr"] = $val;
289                     break;
290                 case 'th':
291                     $rta[$attr] = '';
292                     break;
293                 case 'clara': 
294                     $tmp = $this->_conf['atributos']['celda_comun'];
295                     $tmp['bgcolor'] = $this->_conf['atributos']['celda_titulo']['bgcolor'];
296                     $tmp['class'] = $this->_conf['atributos']['celda_titulo']['class'];
297                     $rta = array_merge($rta, $tmp);
298                     $rta[$attr] = $attr;
299                     break;
300                 case 'oscura':
301                     $tmp = $this->_conf['atributos']['celda_comun'];
302                     $tmp['bgcolor'] = $this->_conf['atributos']['celda_cabecera']['bgcolor'];
303                     $tmp['class'] = $this->_conf['atributos']['celda_cabecera']['class'];
304                     $rta = array_merge($rta, $tmp);
305                     $rta[$attr] = $attr;
306                     break;
307                 case 'comun_clara':
308                     $tmp = $this->_conf['atributos']['celda_comun'];
309                     $tmp['class'].= '_clara';
310                     $rta = array_merge($rta,
311                             $this->_conf['atributos']["celda_comun"]);
312                     $rta[$attr] = $attr;
313                     break;
314                 default:
315                     trigger_error("No se permite setear el atributo $attr", E_USER_ERROR);
316             }
317         }
318         return $rta;
319     }
320
321     /**
322      * Obtiene la Cascade Style Sheet para esta tabla.
323      *
324      * @return string Path 'web' a la css.
325      */
326     function getCSS() {
327         return $this->_conf['css'];
328     }
329
330     /**
331      * Setea la cabecera.
332      * Ejemplo:
333      * @code
334      * $tabla->setCabecera(array('Hola', '', 'mundo!'));
335      * @endcode
336      *
337      * @param array $cabecera Array de 3 elementos, que son la celda izquierda,
338      *                        central y derecha de la cabecera (en ese órden).
339      */
340     function setCabecera($cabecera) {
341         if (count($cabecera) != 3) {
342             $this->raiseError('Parámetro incorrecto: debe ser un array de 3 elementos.');
343         }
344         $this->_cabecera = $cabecera;
345     }
346
347     /**
348      * Agrega información a la cabecera de la tabla.
349      * Ejemplo:
350      * @code
351      * $tabla->updateCabecera('Hola', 'izquierda');
352      * $tabla->updateCabecera('mundo!', 'derecha');
353      * @endcode
354      *
355      * @param mixed $cabecera Celda a agregar a la cabecera. Puede ser un string
356      *                        o un objeto con un método toHtml().
357      * @param string $lugar   Lugar en donde poner la cabecera. Puede ser
358      *                       'izquierda', 'centro' o 'derecha'.
359      */
360     function updateCabecera($cabecera, $lugar) {
361         if (!$this->_cabecera) {
362             $this->_cabecera = array('', '', '');
363         }
364         if ($lugar == 'izquierda') {
365             $this->_cabecera[0] = $cabecera;
366         } elseif ($lugar == 'centro') {
367             $this->_cabecera[1] = $cabecera;
368         } elseif ($lugar == 'derecha') {
369             $this->_cabecera[2] = $cabecera;
370         } else {
371             $this->raiseError('Parámetro incorrecto: lugar debe ser izquierda, centro o derecha.');
372         }
373     }
374
375     /**
376      * Setea el pie.
377      *
378      * @param array $pie Array de 3 elementos, que son la celda izquierda,
379      *                   central y derecha del pie (en ese órden).
380      *
381      * @see Ejemplo en setCabecera().
382      */
383     function setPie($pie) {
384         if (count($pie) != 3) {
385             $this->raiseError('Parámetro incorrecto: debe ser un array de 3 elementos.');
386         }
387         $this->_pie = $pie;
388     }
389
390     /**
391      * Agrega información al pie de la tabla.
392      *
393      * @param mixed $pie Celda a agregar al pie. Puede ser un string
394      *                        o un objeto con un método toHtml().
395      * @param string $lugar   Lugar en donde poner el pie. Puede ser
396      *                       'izquierda', 'centro' o 'derecha'.
397      *
398      * @see Ejemplo en updateCabecera().
399      */
400     function updatePie($pie, $lugar) {
401         if (!$this->_pie) {
402             $this->_pie = array('', '', '');
403         }
404         if ($lugar == 'izquierda') {
405             $this->_pie[0] = $pie;
406         } elseif ($lugar == 'centro') {
407             $this->_pie[1] = $pie;
408         } elseif ($lugar == 'derecha') {
409             $this->_pie[2] = $pie;
410         } else {
411             $this->raiseError('Parámetro incorrecto: lugar debe ser izquierda, centro o derecha.');
412         }
413     }
414
415     /**
416      * Agrega un link predefinido a la cabecera o pie de la tabla.
417      * Ejemplo:
418      * @code
419      * if ($muchos) {
420      *      $tabla->addLink('nuevo');
421      * } else {
422      *      $tabla->addLink('nuevos', 'nuevos.php');
423      * }
424      * $tabla->addLink('volver',
425      *      new MLIB_HTML_Link('atras.php'));
426      * $tabla->addLink('anterior',
427      *      new MLIB_HTML_Link('previo.php', 'Persona Anterior'));
428      * $tabla->addLink('siguiente',
429      *      new MLIB_HTML_Link('previo.php', 'Siguiente persona',
430      *          array('pers' => 'prox')));
431      * @endcode
432      *
433      * @param string $id Identificador del link predefinido. Puede ser 'volver',
434      *                   'nuevo', 'nuevos', 'buscar', 'anterior' y 'siguiente'.
435      * @param MLIB_HTML_Link $link Link a usar. Si no tiene contenidos, se pone
436      *                              uno por defecto. Si es null, se pone como
437      *                              link la página actual.
438      * 
439      */
440     function addLink($id, $link = null) {
441         if (!$link) {
442             $link = @$_SERVER['PHP_SELF'];
443         }
444         if (is_string($link)) {
445             $link = new MLIB_HTML_Link($link, '');
446         }
447         switch ($id) {
448             case 'nuevo':
449                 $img = new MLIB_HTML_Image('/MLIB/images/general_nuevo', ' >>');
450                 // Si no tiene titulo, le pone titulo por defecto.
451                 if (!$link->getContents()) {
452                     $link->setContents('Nuevo');
453                 }
454                 $link->addContents($img);
455                 $this->updateCabecera($link, 'derecha');
456                 break;
457             case 'nuevos':
458                 $img = new MLIB_HTML_Image('/MLIB/images/general_muchos_nuevo', ' >>');
459                 // Si no tiene titulo, le pone titulo por defecto.
460                 if (!$link->getContents()) {
461                     $link->setContents('Nuevos');
462                 }
463                 $link->addContents($img);
464                 $this->updateCabecera($link, 'derecha');
465                 break;
466             case 'buscar':
467                 $img = new MLIB_HTML_Image('/MLIB/images/general_lupa', ' ?>');
468                 // Si no tiene titulo, le pone titulo por defecto.
469                 if (!$link->getContents()) {
470                     $link->setContents('Buscar');
471                 }
472                 $link->addContents($img);
473                 $this->updateCabecera($link, 'derecha');
474                 break;
475             case 'siguiente':
476                 $img = new MLIB_HTML_Image('/MLIB/images/general_posterior', ' >>');
477                 // Si no tiene titulo, le pone titulo por defecto.
478                 if (!$link->getContents()) {
479                     $link->setContents('Siguiente');
480                 }
481                 $link->addContents($img);
482                 $this->updatePie($link, 'derecha');
483                 break;
484             case 'volver':
485                 $img = new MLIB_HTML_Image('/MLIB/images/general_anterior', '<< ');
486                 // Si no tiene titulo, le pone titulo por defecto.
487                 $cont = $link->getContents() ? $link->getContents() : 'Volver';
488                 $link->setContents($img);
489                 $link->addContents($cont);
490                 $this->updateCabecera($link, 'izquierda');
491                 break;
492             case 'anterior':
493                 $img = new MLIB_HTML_Image('/MLIB/images/general_anterior', '<< ');
494                 // Si no tiene titulo, le pone titulo por defecto.
495                 $cont = $link->getContents() ? $link->getContents() : 'Anterior';
496                 $link->setContents($img);
497                 $link->addContents($cont);
498                 $this->updatePie($link, 'izquierda');
499                 break;
500             default:
501                 $this->raiseError("No hay un link predefinido llamado '$id'.");
502         }
503     }
504
505 }
506
507 ?>