+ /**
+ * Contruye una columna personalizada.
+ *
+ * @param array $data Datos sobre la columna, en el formato especificado
+ * para un elemento del array usado en _prependRowsData.
+ * @param mixed $row Fila de un resultado de una base de datos. Puede ser un
+ * array asociativo o un objeto (en cuyo caso cada campo
+ * debe ser un atributo del mismo).
+ *
+ * @return mixed Columna formateada para agregar a la tabla.
+ *
+ * @protected
+ */
+ function _buildCustomColumn($data, $row) {
+ list($format, $campos) = $data;
+ // Si tiene formatos y argumentos.
+ if ($campos) {
+ // Si el formato es un MECON_HTML_Link, uso como formato a
+ // su contenido.
+ if (is_a($format, 'mecon_html_link')) {
+ $args = array($format->getContents());
+ } else {
+ $args = array($format);
+ }
+ // Proceso cada agumento.
+ foreach ($campos as $campo) {
+ // Si el agumento es un array, usa una callback para
+ // darle formato.
+ if (is_array($campo)) {
+ @list($campo, $callback, $callback_args) = $campo;
+ }
+ if (is_array($row)) {
+ if (is_array($campo)) {
+ foreach ($campo as $c) {
+ $tmp[$c] = $row[$c];
+ }
+ $campo = $tmp;
+ }
+ else {
+ $campo = $row[$campo]; // Es un campo de un array.
+ }
+ } else { //$row es un objeto
+ if (is_array($campo)) {
+ foreach ($campo as $c) {
+ $tmp[$c] = $row->$c;
+ }
+ $campo = $tmp;
+ }
+ else {
+ $campo = $row->$campo; // Es un atributo de un objeto.
+ }
+ }
+ // Si usa callback, cambio el campo por el resultado del
+ // llamado a su callback.
+ if (isset($callback)) {
+ if(function_exists($callback)) {
+ $campo = $callback($campo, $callback_args);
+ } else {
+ //Si no existe la funcion de callback usa el callback como
+ //formato y los campos como argumentos para el sprintf
+ array_unshift($campo, $callback);
+ $campo = call_user_func_array('sprintf', $campo);
+ }
+ }
+ unset($callback);
+ // Agrego argumento procesado a la lista de argumentos.
+ $args[] = $campo;
+ }
+ // Si es un link, le seteo los contenidos procesados.
+ if (is_a($format, 'mecon_html_link')) {
+ $format->setContents(call_user_func_array('sprintf', $args));
+ // Si no formateo la cadena con los argumentos procesados.
+ } else {
+ $format = call_user_func_array('sprintf', $args);
+ }
+ }
+ // Si es un link, traduce las variables GET.
+ if (is_a($format, 'mecon_html_link')) {
+ $format = $this->_translateGetVars($format, $row);
+ }
+ // devuelve la columna.
+ return $format;
+ }
+
+ /**
+ * Traduce las variables GET de un link.
+ * Puede formatearlas con printf() o llamando una callback.
+ *
+ * @param MECON_HTML_Link $link Link con las variables GET a formatear.
+ * @param mixed $row Fila de un resultado de una base de dotos. Puede ser un
+ * array asociativo o un objeto (en cuyo caso cada campo
+ * debe ser un atributo del mismo).
+ *
+ * @return MECON_HTML_Link Link con las variables GET traducidas.
+ *
+ * @protected
+ */
+ function _translateGetVars($link, $row) {
+ $vars = $link->getGetVars();
+ $prefix = $this->getGetVarPrefix();
+ foreach ($vars as $var => $val) {
+ if (preg_match("/^$prefix(.+)$/", $var, $m)) {
+ $campo = $m[1];
+ $campo = is_array($row) ? $row[$campo] : $row->$campo;
+ // Si no tiene valor, se lo reemplaza por el
+ // valor del campo.
+ if ($val === null) {
+ $link->setGetVar($var, $campo);
+ // Si existe una funcion, se la usa para obtener
+ // el formato.
+ } elseif (function_exists($val)) {
+ $link->setGetVar($var, $val($campo));
+ // Si no es ni null ni link, lo toma como
+ // formato para el sprintf
+ } else {
+ $link->setGetVar($var, sprintf($val, $campo));
+ }
+ }
+ }
+ return $link;
+ }
+
+ /**
+ * Agrega un ícono predefinido a la tabla.
+ * Ejemplo:
+ * @code
+ * $tabla = new MECON_HTML_TablaDB('personas', array('width' => '100%'));
+ * $result = $db->query('SELECT id, nombre, apellido, activo FROM tabla');
+ * if (DB::isError($result)) {
+ * trigger_error('Error', E_USER_ERROR);
+ * }
+ * $tabla->addRow(array('Col1', 'Nombre', 'Apellido', 'Modificar', 'Borrar',
+ * 'Agregar'), 'cabecera');
+ * // Agrega ícono de modificar que apunta a modificar.php y pasa el 'id'.
+ * $tabla->addRowsIcon('modificar', 'id', 'modificar.php');
+ * // Agrega ícono de eliminar desactivado.
+ * $tabla->addRowsIcon('eliminar', 'id', 'borrar.php', false);
+ * // Agrega ícono con una flecha que apunta a agregar.php, pasa 2 campos
+ * // por GET y se activa o desactiva segun el campo de la DB 'activo'.
+ * $tabla->addRowsIcon('ir', array('id', 'nombre'), 'ver.php', 'activo');
+ * // Agrega resultados de la tabla.
+ * $tabla->addRows($result, array('nombre', 'apellido'));
+ * $tabla->display();
+ * @endcode
+ *
+ * @param string $id Identificador del tipo de ícono a agregar. Puede ser:
+ * <ul>
+ * <li><tt>'modificar'</tt>: Ícono de modificar.</li>
+ * <li><tt>'eliminar'</tt>: Ícono de eliminar.</li>
+ * <li><tt>'ir'</tt>: Flecha hacia la derecha.</li>
+ * </ul>
+ * @param mixed $campos Campos de la DB a usar para generar el link. Estos
+ * campos serán pasados por GET a la página destino.
+ * Cada campo es pasado como la variable GET compuesta
+ * por el @ref getGetVarPrefix "prefijo" más el nombre
+ * del campo (ver parámetro $campos de addRowsData()
+ * para conocer de que formas se puede formatear un
+ * campo).
+ * @param mixed $link Si es un string, se usa como URL del link a generar.
+ * Si es un MECON_HTML_Link, se usa como base para el
+ * link a generar y se le va agregando las variables de
+ * GET generadas por el parámetro $campos (el link es
+ * procesado de la misma forma en que es procesado el
+ * parámetro $formato en addRowsData() con la excepción
+ * de que el contenido del Link no es tomado en cuenta).
+ * @param mixed $activo Si es una variable booleana, si es true, se pone el
+ * ícono activado (con un link), si es false se pone el
+ * ícono desactivado (sin link). Si es un string se lo
+ * utiliza como el nombre de un campo de la DB y se
+ * activa o desactiva el ícono según este campo evalue
+ * a true o false respectivamente.
+ * @param string $lugar Indica donde hay que agregar la columna. Puede ser:
+ * <tt>'prepend'</tt> o <tt>'append'</tt>.
+ *
+ * @warning Este método debe ser llamado antes de llamar a addRows().
+ */
+ function addRowsIcon($id, $campos = array(), $link = null, $activo = true,
+ $lugar = 'append') {
+ if (!$campos) {
+ $campos = array();
+ }
+ if (is_string($campos)) {
+ $campos = array($campos);
+ }
+ if (!$link) {
+ $link = @$_SERVER['PHP_SELF'];
+ }
+ if (is_string($link)) {
+ $link = new MECON_HTML_Link($link, '');
+ }
+ // Traducción para compatibilidad para atrás.
+ switch ($id) {
+ case 'no_modificar':
+ $id = 'modificar';
+ $activo = false;
+ break;
+ case 'borrar':
+ $id = 'eliminar';
+ break;
+ case 'no_borrar':
+ $id = 'eliminar';
+ $activo = false;
+ break;
+ }
+ if ($activo === true) {
+ $img = new MECON_HTML_Icon($id, $link, null,
+ array('title' => ucfirst($id)));
+ $l = $img->getLink();
+ foreach ($campos as $campo) {
+ $format = null;
+ if (is_array($campo)) {
+ list($campo, $format) = $campo;
+ }
+ $l->setGetVar($this->getGetVarPrefix().$campo, $format);
+ }
+ $this->addRowsData($l, array(), $lugar);
+ } elseif ($activo === false) {
+ $img = new MECON_HTML_Icon($id.'_des', null, '-',
+ array('title' => ucfirst($id)));
+ $this->addRowsData($img, array(), $lugar);
+ } else {
+ $campos[] = $activo;
+ $this->addRowsData('%s', array(array($campos,
+ 'MECON_HTML_TablaDB_callback_addRowsIcon',
+ array($id, $link, $activo))), $lugar);
+ }
+ }
+
+}
+
+/**
+ * Callback para activar o desactivar un ícono según un campo de la DB.
+ *
+ * @param $campos Array asociativo con los datos de la DB para la fila actual.
+ * @param $args Array de pámetros arbitrarios: 'tipo', 'link', 'activo'.
+ * tipo: tipo de link: 'modificar', 'eliminar', 'ir'.
+ * link: link a donde apunta el ícono si está activo.
+ * activo: indica el nombre del campo a evaluar para mostrar
+ * el ícono activo o inactivo.
+ * @return Campo formateado.
+ * @protected
+ */
+function MECON_HTML_TablaDB_callback_addRowsIcon($campos, $args) {
+ list($tipo, $link, $activo) = $args;
+ if ($campos[$activo]) {
+ $img = new MECON_HTML_Icon($tipo, $link, null,
+ array('title' => ucfirst($tipo)));
+ $l = $img->getLink();
+ foreach ($campos as $campo => $valor) {
+ $l->setGetVar(MECON_HTML_TablaDB::getGetVarPrefix().$campo, $valor);
+ }
+ return $l->toHtml();
+ } else {
+ $img = new MECON_HTML_Icon($tipo.'_des', null, '-',
+ array('title' => ucfirst($tipo)));
+ return $img->toHtml();
+ }