lib/MLIB/PDF/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 Oct 24 16:34:11 2003
  21 Autor:  Martin Marrese <mmarre@mecon.gov.ar>
  22 -------------------------------------------------------------------------------
  23 $Id$
  24 -----------------------------------------------------------------------------*/
  25
  26 require_once 'MLIB/PDF/Contenido.php';
  27
  28 /**
  29  * Libreria que permite agregar una tabla a un pdf.
  30  */
  31 class MLIB_PDF_Tabla extends MLIB_PDF_Contenido {
  32
  33     /**
  34      * Configuracion
  35      * @var array $config
  36      * @access protected
  37      */
  38     var $_config;
  39
  40     /**
  41      * Objeto MLIB_HTML_Tabla.
  42      * @var &Object $tabla MLIB_HTML_Tabla
  43      * @access protected
  44      */
  45     var $_tabla;
  46
  47     /**
  48      * Objeto MLIB_PDF_Marco
  49      * @var &Object $marco
  50      * @access protected
  51      */
  52     var $_marco;
  53
  54     /**
  55      * Orientacion de las nuevas paginas
  56      * @var string $orientacion
  57      * @access protected
  58      */
  59     var $_orientacion;
  60
  61     /**
  62      * Indica si el encabezado debe ir en la nuevas paginas.
  63      * @var bool $encabezado
  64      * @access protected;
  65      */
  66     var $_encabezado;
  67
  68     /**
  69      * Class Constructor
  70      *
  71      * @param &Object $TABLA MLIB_HTML_Tabla
  72      * @param string $orientacion Orientacion que deben tener las nuevas paginas
  73      * que genere la tabla.
  74      *
  75      * @return void
  76      * @access public
  77      */
  78     function MLIB_PDF_Tabla($TABLA, $orientacion = null, $encabezado = true) {
  79         $this->_tabla = $TABLA;
  80         $this->_orientacion = $orientacion;
  81         $this->_config = include 'MLIB/PDF/Tabla/medidas.php';
  82         $this->_encabezado = $encabezado;
  83     }
  84
  85     /**
  86      * Funcion que agrega el contenido de la tabla que se este utilizando al
  87      * PDF.
  88      *
  89      * @param &Object $MARCO MLIB_PDF_Marco
  90      *
  91      * @return void
  92      * @access public
  93      */
  94     function toPDF(&$MARCO) {
  95         $this->_marco =& $MARCO;
  96         $this->_agregarContenido();
  97     }
  98
  99     /**
 100      * Funcion que devuelve la posicion X en donde se debe escribir un texto
 101      * segun su ubicacion en la celda
 102      *
 103      * @param int $row Indicador de la fila
 104      * @param int $col Indicador de la columna
 105      * @param string $texto Texto a escribir
 106      * @param array $attr Atributos internos de la celda
 107      * @param array $estilo Estilo del texto
 108      *
 109      * @return int
 110      * @access protected
 111      */
 112     function _obtenerAlineacionTexto($row, $col, $texto, $attr, $estilo) {
 113
 114         $at = $this->_tabla->getCellAttributes($row, $col);
 115
 116         if (@$at['colspan']) {
 117             $offset = $at['colspan'];
 118         }
 119         else {
 120             $offset = 1;
 121         }
 122
 123         if (@$at['align'] == 'center') {
 124             $tam = $this->_marco->strlen($texto, $estilo);
 125             $init = $attr[$col] + ($attr[$col+$offset] - $attr[$col] - $tam) / 2;
 126         }
 127         elseif (@$at['align'] == 'right') {
 128             $tam = $this->_marco->strlen($texto, $estilo);
 129             $init = $attr[$col+$offset] - $tam + 1;
 130         }
 131         else {
 132             $init = $attr[$col];
 133         }
 134         return $init + 1;
 135     }
 136
 137     /**
 138      * Funcion que devuelve el estilo de la celda segun la configuracion.
 139      *
 140      * @param int $row Indicador de la fila
 141      * @param int $col Indicador de la columna
 142      *
 143      * @return array
 144      * @access protected
 145      */
 146     function _obtenerEstiloCelda($row, $col) {
 147         $clase = $this->_tabla->getCellAttributes($row, $col);
 148
 149         switch (@$clase['mlib_style'])
 150         {
 151             case 'cabecera':
 152                 $estilo = $this->_config['celda_cabecera'];
 153                 break;
 154             case 'titulo':
 155                 $estilo = $this->_config['celda_titulo'];
 156                 break;
 157             case 'oscura':
 158                 $tmp = $this->_config['celda_comun'];
 159                 $tmp['fillcolor'] = $this->_config['celda_cabecera']['fillcolor'];
 160                 $tmp['fill'] = $this->_config['celda_cabecera']['fill'];
 161                 $estilo = $tmp;
 162                 break;
 163             case 'clara':
 164                 $tmp = $this->_config['celda_comun'];
 165                 $tmp['fillcolor'] = $this->_config['celda_titulo']['fillcolor'];
 166                 $tmp['fill'] = $this->_config['celda_titulo']['fill'];
 167                 $estilo = $tmp;
 168                 break;
 169             case 'comun':
 170                 $estilo = $this->_config['celda_comun'];
 171                 break;
 172             default:
 173                 //Si no encuentro el estilo seteado a mano, le asigno el estilo
 174                 //seteado por defecto.
 175                 if (@$this->_config[$clase['mlib_style']])
 176                 {
 177                     $estilo = $this->_config[$clase['mlib_style']];
 178                 }
 179                 else
 180                 {
 181                     $estilo = $this->_config['celda_comun'];
 182                 }
 183                 break;
 184         }
 185         if (@$clase['colspan']) {
 186             $estilo['colspan'] = $clase['colspan'];
 187         }
 188         return $estilo;
 189     }
 190
 191     /**
 192      * Funcion que calcula el ancho de las columnas de la tabla.
 193      *
 194      * @return array
 195      * @access protected
 196      */
 197     function _obtenerAnchoColumnas() {
 198         $ancho_pagina = $this->_marco->getWidth($this->_marco->refPage(),
 199                 $this->_marco->getOrientation());
 200         for ($row = 0; $row<$this->_tabla->getRowCount(); $row++) {
 201             for ($i=0; $i<$this->_tabla->getColCount(); $i++ ) {
 202                 $tmp = $this->_tabla->getCellAttributes($row,$i);
 203                 if(@intval($tmp['width']) != 0)
 204                     $attr[$i] = intval($tmp['width']);
 205                 if(@count($attr) == $this->_tabla->getColCount())
 206                   break 2;
 207             }
 208         }
 209
 210         if (!isset($attr))
 211             trigger_error ('Todas las columnas tienen que tener un ancho asignado', E_USER_ERROR);
 212
 213         $tmp = array_sum($attr);
 214
 215         $attr2[0] = 0;
 216         for ($i=1; $i<count($attr); $i++) {
 217             $attr2[$i] = intval(($ancho_pagina * $attr[$i-1] / $tmp) +
 218                     $attr2[$i-1]);
 219         }
 220         $attr2[$i] = $ancho_pagina;
 221         return $attr2;
 222     }
 223     /**
 224      * Funcion que se encarga de crear las nuevas paginas.
 225      *
 226      * @return void
 227      * @access protected
 228      */
 229     function _newPage() {
 230         $tmp = ($this->_orientacion) ? $this->_orientacion :
 231             $this->_marco->getOrientation();
 232         $this->_marco->newPage($this->_marco->tamanio, $tmp, $this->_encabezado);
 233     }
 234
 235     /**
 236      * Funcion que agrega las filas y columnas a la pagina.
 237      *
 238      * @return void
 239      * @access protected
 240      */
 241     function _agregarContenido() {
 242         $alto = $this->_marco->espacioDisponible;
 243         $orientacion = $this->_marco->getOrientation();
 244         if ($alto <= 0 || ($this->_orientacion && $this->_orientacion !=
 245                     $orientacion) ) {
 246             $this->_newPage();
 247             $orientacion = $this->_marco->getOrientation();
 248             $alto = $this->_marco->espacioDisponible;
 249         }
 250         $attr2 = $this->_obtenerAnchoColumnas();
 251         for ($i = 0; $i < $this->_tabla->getRowCount(); $i++) {
 252             $max = 0;
 253             for ($j = 0; $j < $this->_tabla->getColCount(); $j++) {
 254                 $estilo = $this->_obtenerEstiloCelda($i, $j);
 255
 256                 //Actuo por el colspan
 257                 if (@$estilo['colspan']) {
 258                     if ($estilo['colspan'] > $this->_tabla->getColCount()) {
 259                         $estilo['colspan'] =
 260                             $this->_tabla->getColCount() - $j;
 261                     }
 262                     $ancho_columna = $attr2[$j+$estilo['colspan']] -
 263                         $attr2[$j];
 264                 }
 265                 else {
 266                    $ancho_columna = $attr2[$j+1] - $attr2[$j];
 267                 }
 268                 if (@$this->_tabla->getCellContents($i,$j)) {
 269                     $txt = $this->_marco->wordWrap(
 270                             @$this->_tabla->getCellContents($i,$j), $ancho_columna,
 271                             $estilo
 272                             );
 273                 }
 274                 else {
 275                     $txt = array (' ');
 276                 }
 277
 278                 $txtt[$j] = $txt; //Esto es para no hacer el wordWrap siempre
 279                 $max = max($estilo['alto_linea'] * count($txt), $max);
 280
 281                 $rep = array ();
 282                 $rep = $this->_tabla->getCellAttributes($i, $j);
 283                 if (@$rep['cabecera'] || @$rep['titulo'] ||
 284                     @$this->_config[$rep['mlib_style']]['repeat'] ) {
 285                     $repetir[$i][$j] = $txt;
 286                     $repetir[$i]['max'] = $max;
 287                 }
 288             }
 289             if ($alto <= 0)
 290             {
 291                 $this->_newPage();
 292                 $alto = $this->_marco->espacioDisponible;
 293
 294                 foreach ($repetir as $ii => $value) {
 295                     $alto -= $repetir[$ii]['max'];
 296                     for ($jj = 0; $jj < $this->_tabla->getColCount(); $jj++) {
 297                         $estilo = $this->_obtenerEstiloCelda($ii, $jj);
 298
 299                         //Actuo por el colspan
 300                         if (@$estilo['colspan']) {
 301                             if ($estilo['colspan'] > $this->_tabla->getColCount()) {
 302                                 $estilo['colspan'] =
 303                                     $this->_tabla->getColCount() - $jj;
 304                             }
 305                             $der = $attr2[$jj+$estilo['colspan']];
 306                             $izq = $attr2[$jj];
 307                         }
 308                         else {
 309                            $der = $attr2[$jj+1];
 310                            $izq = $attr2[$jj];
 311                         }
 312
 313
 314                         $this->_marco->addRectangle($izq, $alto, $der,
 315                                 $alto+$repetir[$ii]['max'], @$estilo['fill'],
 316                                 null, $orientacion);
 317                         $alto1 = $alto + $repetir[$ii]['max'];
 318                         foreach ($repetir[$ii][$jj] as $t) {
 319                             $alto1 -= $estilo['alto_linea'];
 320
 321                             //Ubico el texto segun su alineacion
 322                             $init = $this->_obtenerAlineacionTexto($ii, $jj, $t, $attr2,
 323                                     $estilo);
 324
 325                             $this->_marco->addText($init, $alto1 + 2,
 326                                     $t, $estilo, null, $orientacion);
 327                         }
 328
 329                         if (@$estilo['colspan']) {
 330                             $jj += $estilo['colspan'] -1;
 331                         }
 332
 333                     }
 334                 }
 335
 336             }
 337
 338             $alto -= $max;
 339             for ($j = 0; $j < $this->_tabla->getColCount(); $j++) {
 340
 341                 $estilo = $this->_obtenerEstiloCelda($i, $j);
 342
 343                 //Actuo por el colspan
 344                 if (@$estilo['colspan']) {
 345                     if ($estilo['colspan'] > $this->_tabla->getColCount()) {
 346                         $estilo['colspan'] = $this->_tabla->getColCount()  - 1;
 347                     }
 348                     $der = $attr2[$j+$estilo['colspan']];
 349                     $izq = $attr2[$j];
 350                 }
 351                 else {
 352                    $der = $attr2[$j+1];
 353                    $izq = $attr2[$j];
 354                 }
 355
 356
 357                 $this->_marco->addRectangle($izq, $alto, $der, $alto+$max,
 358                         @$estilo['fill'], null, $orientacion);
 359
 360                 $alto1 = $alto + $max;
 361                 if (@$txtt[$j]) {
 362                     foreach ($txtt[$j] as $t) {
 363                         $alto1 -= $estilo['alto_linea'];
 364
 365                         //Ubico el texto segun su alineacion
 366                         $init = $this->_obtenerAlineacionTexto($i, $j, $t, $attr2,
 367                                 $estilo);
 368
 369                         $this->_marco->addText($init, $alto1 + 2,
 370                                 $t, $estilo, null, $orientacion);
 371                     }
 372                 }
 373                 if (@$estilo['colspan']) {
 374                     $j += $estilo['colspan']-1;
 375                 }
 376
 377             }
 378         }
 379         $this->_marco->espacioDisponible = $alto;
 380     }
 381
 382     /**
 383      * Funcion que agrega un estilo a los definidos
 384      *
 385      * @param &Object $ESTILO MLIB_HTML_Tabla_Estilo
 386      *
 387      * @return void
 388      * @access public
 389      */
 390     function setStyle($ESTILO) {
 391         $this->_config[$ESTILO->name] = $ESTILO->__toArray();
 392     }
 393 }
 394 ?>