Se empieza a migrar a la nueva estructura de directorios.

diff --git a/HTML/doc/Doxyfile b/doc/HTML/Doxyfile
similarity index 100%
rename from HTML/doc/Doxyfile
rename to doc/HTML/Doxyfile

diff --git a/HTML/doc/Tabla/HTML_Tabla.rtf b/doc/HTML/Tabla/HTML_Tabla.rtf
similarity index 100%
rename from HTML/doc/Tabla/HTML_Tabla.rtf
rename to doc/HTML/Tabla/HTML_Tabla.rtf

diff --git a/HTML/php/QuickForm/Renderer/Tabla.php b/lib/HTML/QuickForm/Renderer/Tabla.php
similarity index 100%
rename from HTML/php/QuickForm/Renderer/Tabla.php
rename to lib/HTML/QuickForm/Renderer/Tabla.php

diff --git a/HTML/php/QuickForm/mdate.php b/lib/HTML/QuickForm/mdate.php
similarity index 100%
rename from HTML/php/QuickForm/mdate.php
rename to lib/HTML/QuickForm/mdate.php

diff --git a/HTML/php/Tabla.php b/lib/HTML/Tabla.php
similarity index 100%
rename from HTML/php/Tabla.php
rename to lib/HTML/Tabla.php

diff --git a/HTML/php/Tabla/conf_Tabla.php b/lib/HTML/Tabla/conf_Tabla.php
similarity index 100%
rename from HTML/php/Tabla/conf_Tabla.php
rename to lib/HTML/Tabla/conf_Tabla.php

diff --git a/HTML/php/Tabla/tabla_estilos.css b/lib/HTML/Tabla/tabla_estilos.css
similarity index 100%
rename from HTML/php/Tabla/tabla_estilos.css
rename to lib/HTML/Tabla/tabla_estilos.css

diff --git a/lib/Tiempo/Banda.php b/lib/Tiempo/Banda.php
new file mode 100644 (file)
index 0000000..2b1305f
--- /dev/null
+++ b/lib/Tiempo/Banda.php
@@ -0,0 +1,365 @@
+<?php
+// vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4:
+// +--------------------------------------------------------------------+
+// |                          HORAS EXTRA                               |
+// +--------------------------------------------------------------------+
+// |    Sistema de Horas Extra - Ministerio de Economía - Argentina     |
+// +--------------------------------------------------------------------+
+// | Creado: lun abr 22 16:05:33 ART 2002                               |
+// | Autor:  Gonzalo Merayo <gmeray@mecon.gov.ar>                    |
+// +--------------------------------------------------------------------+
+//
+// $URL$
+// $Rev$
+// $Date$
+// $Author$
+//
+
+require_once 'HE/Intervalo.php';
+
+/**
+ * Representa un conjunto de entradas y salidas para formar una banda horaria
+ *
+ * @package HE
+ * @abstract
+ * @version $Rev$
+ * @author  Gonzalo Merayo <gmeray@mecon.gov.ar>
+ */
+class Banda {
+
+  var $intervalos;
+
+  function Banda() {
+    $this->intervalos = array();
+  }
+ 
+  function Cargar($agente, $fecha)
+  {
+    $dsn = "mysql://intranet:intranet@intranet-db/bandas";
+    $db = DB::connect( $dsn , true);
+    if(DB::isError($db))
+      die($db->getMessage());
+    $fecha = $fecha->format("%Y%m%d");
+    $query = "SELECT A.tipo_acceso, A.hora 
+              FROM agentes G, accesos A
+              WHERE G.cred = A.cred
+              AND G.docu = $agente
+              AND A.fecha = $fecha
+              AND A.inconsistencia = 0
+              ORDER BY A.hora";
+    $result = $db->query($query);
+    if(DB::isError($result))
+      die($result->getMessage());
+      
+    $sip     =& new HE_DB_Persona;
+    $datos   = $sip->obtener($agente);
+    $age     =& new HE_DB_Agente;
+    $ag      = $age->obtener($agente, $datos['codep']);
+    $funcion = @$ag['funcion'];
+   
+    if($funcion != 'SE')
+    {//Version tough
+      $int == null;
+      while( $r = $result->fetchRow() )
+      {
+        if($r[0] == 'E') $int = new Intervalo(new Hora( $r[1] ), new Hora( $r[1] ));
+        if($r[0] == 'S' && $int != null)
+        {
+          $int->setFin( new Hora( $r[1] ) );
+          $this->agregarIntervalo( $int );
+          $int = null;
+        }
+      }
+    }
+    else
+    {
+      if($result->numRows() > 0)
+      {//Version Light o Serenos
+        $int = new Intervalo(new Hora('00:00'), new Hora('00:00'));
+        while( $r = $result->fetchRow() )
+        {
+          if($r[0] == 'E') $int = new Intervalo(new Hora( $r[1] ), new Hora( $r[1] ));
+          if($r[0] == 'S' && $int != null)
+          {
+            $int->setFin( new Hora( $r[1] ) );
+            $this->agregarIntervalo( $int );
+            $int = null;
+          }
+        }
+        if($int != null)
+        {
+          $int->setFin( new Hora('24:00') );
+          $this->agregarIntervalo( $int );
+          $int = null;
+        }
+      }
+    }
+  }
+
+  /*
+  *
+  * Completa las salidas del medio del dia.
+  *
+  */
+  function CompletarSalidas()
+  {
+    if(count($this->intervalos) > 0)
+    {
+      $p = reset($this->intervalos);
+      $u = end($this->intervalos);
+      $p->setFin($u->fin);
+      $this->intervalos = array($p);
+    }
+  }
+
+
+  /**
+  * Agrega un intervalo a la banda
+  * Chequeando superposiciones y en orden
+  *
+  * @param Intervalo $intervalo Intervalo a agregar.
+  */
+  function agregarIntervalo($intervalo)
+  {
+    if(! is_a($intervalo, "intervalo")) return false;
+    if ($intervalo->invertido()) {
+        $intervalo->_chequear();
+        $this->agregarIntervalo(new Intervalo(new Hora('00:00'), new Hora ('24:00')));
+        $this->sacarIntervalo($intervalo);
+        return true;
+    }
+    $n_intervalos = array();
+    $insertado = false;
+    // recorre el vector de intervalos
+    foreach( $this->intervalos as $i )
+    {
+      // si se superpone con alguno, fusionar con ese
+      if($i->seSuperpone($intervalo))
+        $intervalo->fusionar($i);
+      else{
+        if($i->inicio->greater($intervalo->inicio) && ! $insertado)
+        {
+          array_push($n_intervalos, $intervalo);
+          $insertado = true;
+        }
+        array_push($n_intervalos, $i);
+      }
+    }
+    if(! $insertado ) array_push($n_intervalos,$intervalo);
+    $this->intervalos = $n_intervalos;
+    return true;
+  }
+
+  /**
+  * Saca 
+  *
+  *
+  */
+  function sacarBanda($banda)
+  {
+    foreach($banda->intervalos as $i)
+      $this->sacarIntervalo($i);
+  }
+
+  /**
+  * Saca un intervalo de una banda horaria.
+  *
+  */
+  function sacarIntervalo($intervalo)
+  {
+    if(! is_a($intervalo, "intervalo")) return false;
+    // Si el intervalo está vacío, no hace nada.
+    $dur = $intervalo->getDuracion();
+    if ($dur->isEmpty()) {
+        return true;
+    }
+    $n_intervalos = array();
+    // recorre el vector de intervalos
+    foreach( $this->intervalos as $i )
+    {
+      if($i->seSuperpone($intervalo)) {
+        $a = $i->cortar($intervalo);
+        $d = $a->getDuracion();
+        if($d->toSeconds() > 0) {
+          $n_intervalos[] = $a;
+        }
+        $d = $i->getDuracion();
+        if($d->toSeconds() > 0) {
+          $n_intervalos[] = $i;
+        }
+      } else {
+        $n_intervalos[] = $i;
+      }
+    }
+    $this->intervalos = $n_intervalos;
+    return true;
+    
+  }
+
+  function sacarTiempo($t)
+  {
+    if(! is_a($t, "time_span")) return false;
+    $n_int = array();
+    while(count($this->intervalos) > 0)
+    {
+      $int = array_shift($this->intervalos);
+      if($t->toSeconds() > 0){
+        $d = $int->getDuracion();
+        if($d->greater($t))
+        {
+          #con cortar alcanza
+          $ini = new Hora();
+          $ini->copy($int->inicio);
+          $ini->add($t);
+          /*TODO guardar este tiempo como rechazado*/$int->cortar($ini);
+          $t->setFromSeconds(0);
+        }else{
+          #con cortar no alcanza y hay que sacar...
+          $t->subtract($int->getDuracion());
+          /*TODO guardar int como rechazado*/
+        }
+      }
+      $n_int[] = $int;
+    }
+    $this->intervalos = $n_int;
+  }
+
+  /*
+  * Chequea si el intervalo pedido esta cubierto por la banda, si faltan
+  *  horas en la banta se retorna el tiempo que falta
+  *
+  * @return Time_Span el periodo faltante
+  *
+  */
+  function chequearIntervalo($intervalo)
+  {
+    if(! is_a($intervalo, "intervalo")) return false;
+    $t = new Hora();
+    foreach ($this->intervalos as $i)
+      $t->add($i->superponer($intervalo));
+    $d = $intervalo->getDuracion();
+    $d->subtract($t);
+    return $d;
+  }
+
+  /*
+  * Chequea si la banda(parametro) esta cubierto por la banda(this),
+  *  si faltan horas en la banda(this) para llegar a banda(parametro)
+  *  se retorna el tiempo que falta
+  *
+  * @return Time_Span el periodo faltante
+  *
+  */
+  function chequearBanda($banda)
+  {
+    if(! is_a($banda, "banda")) return false;
+    $f = new Hora();
+    foreach ($banda->intervalos as $i)
+      $f->add($this->chequearIntervalo($i));
+    return $f;
+  }
+
+
+  /*
+  * Devuelve una representacion del objeto como un string.
+  *
+  * @return string Representacion del objeto.
+  *
+  */
+  function toString()
+  {
+    $s = '';
+    $t = count($this->intervalos);
+    for ($n = 0; $n < ($t - 1); $n++) {
+        $s .= "intervalo $n: [" . $this->intervalos[$n]->toString() . '] | ';
+    }
+    $n = $t - 1;
+    if ($n != -1) {
+        $s .= "intervalo $n: [" . $this->intervalos[$n]->toString() . ']';
+    }
+    return $s;
+  }
+
+  function getIntervalos() {
+    return $this->intervalos;
+  }
+
+  /**
+   * Corta una banda, devolviendo la banda previa al punto de corte.
+   *
+   * La banda actual queda con los intervalos posteriores al punto de corte
+   * y se devuelve la banda con los intervalos anteriores.
+   * El punto de corte puede ser tanto una hora como un intervalo.
+   *
+   * @param mixed $c Donde cortar.
+   *
+   * @return object Banda Bnada anterior al punto de corte.
+   */
+  function cortar($c)
+  {
+    if(!is_a($c, 'hora') and !is_a($c, 'intervalo')) return false;
+    $b = $this->__clone();
+    $b->intervalos = array();
+    $intervalos = array();
+    foreach ($this->intervalos as $i) {
+      $a = $i->cortar($c);
+      $da = $a->getDuracion();
+      if (!$da->isEmpty()) {
+        $b->agregarIntervalo($a);
+      }
+      $di = $i->getDuracion();
+      if (!$di->isEmpty()) {
+        $intervalos[] = $i;
+      }
+    }
+    $this->intervalos = $intervalos;
+    return $b;
+  }
+
+  /**
+   * Devuelve el timpo total que contiene la banda.
+   *
+   * @return object Time_Span Tiempo total.
+   */
+  function total() {
+    $t = new Time_Span;
+    foreach ($this->intervalos as $i) {
+      $t->add($i->getDuracion());
+    }
+    return $t;
+  }
+
+  /**
+   * Alias de Banda::total() para compatibilidad con Intervalo.
+   *
+   * @return object Time_Span Tiempo total.
+   */
+  function getDuracion() {
+    return $this->total();
+  }
+
+  /**
+   * Resetea la banda.
+   */
+  function flush() {
+    $this->intervalos = array();
+  }
+
+  function copy($b) {
+    $this->flush();
+    foreach ($b->intervalos as $i) {
+      $this->intervalos[] = $i->__clone();
+    }
+  }
+
+  function __clone() {
+    $class = get_class($this);
+    $b = new $class;
+    $b->copy($this);
+    return $b;
+  }
+
+}
+
+// $Id$
+?>

diff --git a/lib/Tiempo/Hora.php b/lib/Tiempo/Hora.php
new file mode 100644 (file)
index 0000000..7ed97c8
--- /dev/null
+++ b/lib/Tiempo/Hora.php
@@ -0,0 +1,83 @@
+<?php
+// vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4:
+// +--------------------------------------------------------------------+
+// |                          HORAS EXTRA                               |
+// +--------------------------------------------------------------------+
+// |    Sistema de Horas Extra - Ministerio de Economía - Argentina     |
+// +--------------------------------------------------------------------+
+// | Creado: lun abr 22 16:05:33 ART 2002                               |
+// | Autor:  Gonzalo Merayo <gmeray@mecon.gov.ar>                    |
+// +--------------------------------------------------------------------+
+//
+// $URL$
+// $Rev$
+// $Date$
+// $Author$
+//
+
+require_once "Time/Span.php";
+
+/**
+ * Representa un Intervalo entre 2 horas del mismo dia
+ *
+ * @package HE
+ * @abstract
+ * @version $Rev$
+ * @author  Gonzalo Merayo <gmeray@mecon.gov.ar>
+ */
+class Hora extends Time_Span {
+
+  function set($str)
+  {
+    $str = strval($str);
+    if (preg_match('/^\d+$/', $str)) {
+        if ($str < 24) {
+            $str = sprintf('0:%02d:00:00', $str );
+        } elseif ($str == 24 or $str == 2400) {
+            $str = '1:00:00:00';
+        } elseif ($str < 2400) {
+            switch (strlen($str)) {
+                case 2:
+                    $str = sprintf('0:%02d:%02d:00', $str{0}, $str{1});
+                    break;
+                case 3:
+                    $str = sprintf('0:%02d:%02d:00', $str{0}, $str{1} . $str{2});
+                    break;
+                case 4:
+                    $str = sprintf('0:%02d:%02d:00', $str{0} . $str{1}, $str{2} . $str{3});
+                    break;
+            }
+        } else {
+            return false;
+        }
+    } elseif (preg_match('/^(\d{0,2})\D(\d{1,2})$/', $str, $m)) {
+        if ($m[1] < 24 and $m[2] < 60) {
+            $str = sprintf('0:%02d:%02d:00', $m[1], $m[2]);
+        } elseif ($m[1] == 24 and $m[2] == 0) {
+            $str = '1:00:00:00';
+        } else {
+            return false;
+        }
+    } elseif (preg_match('/^(\d{0,2})\D(\d{1,2})\D(\d{1,2})$/', $str, $m)) {
+        if ($m[1] < 24 and $m[2] < 60 and $m[3] < 60) {
+            $str = sprintf('0:%02d:%02d:%02d', $m[1], $m[2], $m[3]);
+        } elseif ($m[1] == 24 and $m[2] == 0 and $m[3] == 0) {
+            $str = '1:00:00:00';
+        } else {
+            return false;
+        }
+    } else {
+        return false;
+    }
+    $this->setFromString($str, "%D:%H:%M:%S");
+    return true;
+  }
+
+  function get()
+  {
+    return $this->format("%E:%M");
+  }
+
+}
+// $Id$
+?>

diff --git a/lib/Tiempo/Intervalo.php b/lib/Tiempo/Intervalo.php
new file mode 100644 (file)
index 0000000..c02c49e
--- /dev/null
+++ b/lib/Tiempo/Intervalo.php
@@ -0,0 +1,232 @@
+<?php
+// vim: set expandtab tabstop=4 softtabstop=4 shiftwidth=4:
+// +--------------------------------------------------------------------+
+// |                          HORAS EXTRA                               |
+// +--------------------------------------------------------------------+
+// |    Sistema de Horas Extra - Ministerio de Economía - Argentina     |
+// +--------------------------------------------------------------------+
+// | Creado: lun abr 22 16:05:33 ART 2002                               |
+// | Autor:  Gonzalo Merayo <gmeray@mecon.gov.ar>                    |
+// +--------------------------------------------------------------------+
+//
+// $URL$
+// $Rev$
+// $Date$
+// $Author$
+//
+
+require_once 'HE/Hora.php';
+
+/**
+ * Representa un Intervalo entre 2 horas del mismo dia
+ *
+ * @package HE
+ * @version $Rev$
+ * @author  Gonzalo Merayo <gmeray@mecon.gov.ar>
+ */
+class Intervalo {
+  /**
+   *
+   * Hora de inicio del intervalo
+   *
+   * @var object Hora
+   */
+  var $inicio;    
+  
+  /**
+   *
+   * Hora de fin del intervalo
+   *
+   * @var object Hora
+   */
+  var $fin;
+
+  /**
+   * Constructor.
+   *
+   * @param Hora $inicio   Hora de inicio (por defecto cero).
+   * @param Hora $fin      Hora de fin (por defecto cero).
+   * @param bool $chequear Invierte el intervalo si la hora de
+   *                       fin es anterior a la de inicio.
+   *                       
+   */
+  function Intervalo( $inicio = null, $fin = null, $chequear = true ) {
+    if (is_null($inicio)) $inicio = new Hora;
+    if (is_null($fin)) $fin = new Hora;
+    if(!is_a($inicio, 'hora')) return false;
+    if(!is_a($fin,    'hora')) return false;
+    $this->inicio = $inicio;
+    $this->fin    = $fin;
+    if ($chequear) {
+        $this->_chequear();
+    }
+  }
+
+  function _chequear()
+  {
+    $a = $this->fin;
+    if($a->lower($this->inicio))
+    {
+      $tmp = $this->fin;
+      $this->fin = $this->inicio;
+      $this->inicio = $tmp;
+    }
+  }
+
+  function invertido()
+  {
+    return $this->fin->lower($this->inicio);
+  }
+  
+  function setInicio( $inicio ) {
+    if(! is_a($inicio, "hora")) return false;
+    $this->inicio = $inicio;
+    $this->_chequear();
+  }
+
+  /**
+   *
+   * setFin
+   *
+   * @param var $fin
+   *
+   */
+  function setFin( $fin )
+  {
+    if(! is_a($fin, "hora")) return false;
+    $this->fin = $fin;
+    $this->_chequear();
+  }
+
+  function getDuracion()
+  {
+    $c = new Hora;
+    $c->copy($this->fin);
+    $c->subtract($this->inicio);
+    return $c;
+  }
+
+  // XXX - Amplié el método para comparar con varios intervalos a la vez,
+  // si el argumento no es un array, anda de todas maneras.
+  function seSuperpone( $intervalos )
+  {
+    if (!is_array($intervalos)) $intervalos = array($intervalos);
+    foreach ($intervalos as $i) {
+        if (is_a($i, "intervalo")) {
+            if ($i->fin->greaterEqual($this->inicio) &&
+                $this->fin->greaterEqual($i->inicio)) return true;
+            if ($this->fin->greaterEqual($i->inicio) &&
+                $i->fin->greaterEqual($this->inicio)) return true;
+        }
+    }
+    return false;
+  }
+
+  function fusionar( $f )
+  {
+    if(! is_a($f, "intervalo")) return false;
+    if(! $this->seSuperpone( $f )) return false;
+    if($f->fin->greater($this->fin))
+      $this->fin = $f->fin;
+    if($f->inicio->lower($this->inicio))
+      $this->inicio = $f->inicio;
+    return true;
+  }
+
+  function superponer( $i )
+  {
+    if(! is_a($i, "intervalo")) return false;
+    $inicio = $this->inicio;
+    $fin = $this->fin;
+    if($this->inicio->lower($i->inicio)) $inicio = $i->inicio;
+    if($this->fin->greater( $i->fin   )) $fin = $i->fin;
+    $fin->subtract($inicio);
+    return $fin;
+  }
+
+  /**
+   * Corta un intervalo, devolviendo el intervalo previo al punto de corte.
+   * El intervalo actual queda con el intervalo posterior al punto de corte.
+   * El punto de corte puede ser tanto una hora como un intervalo.
+   *
+   * @param mixed $c Donde cortar.
+   *
+   * @return object Intervalo Intervalo anterior al punto de corte.
+   */
+  function cortar($c)
+  {
+    if(is_a($c, 'hora')) {
+        return $this->cortarHora($c);
+    } elseif (is_a($c, 'intervalo')) {
+        return $this->cortarIntervalo($c);
+    } else {
+        return false;
+    }
+  }
+
+  /**
+   * Corta un intervalo, devolviendo el intervalo previo a la hora de corte.
+   * El intervalo actual queda con el intervalo posterior a la hora de corte.
+   *
+   * @param mixed $h Donde cortar.
+   *
+   * @return object Intervalo Intervalo anterior a la hora de corte.
+   */
+  function cortarHora($h)
+  {
+    if (!is_a($h, 'hora')) return false;
+    $class = get_class($this);
+    $r = new $class;
+    $r->copy($this);
+    if($this->inicio->greater($h)) {
+      $r->setFin($r->inicio);
+      return $r;
+    }
+    if($this->fin->lowerEqual($h)) {
+      $this->setInicio($this->fin);
+    }else{
+      $this->setInicio($h);
+      $r->setFin($h);
+    }
+    return $r;
+  }
+
+  /**
+   * Corta un intervalo, devolviendo el intervalo previo al intervalo de corte.
+   * El intervalo actual queda con el intervalo posterior al intervalo de corte.
+   *
+   * @param mixed $i Donde cortar.
+   *
+   * @return object Intervalo Intervalo anterior al intervalo de corte.
+   */
+  function cortarIntervalo($i)
+  {
+    if (!is_a($i, 'intervalo')) return false;
+    $ant = $this->cortarHora($i->inicio);
+    $this->cortarHora($i->fin);
+    return $ant;
+  }
+
+    function toString() {
+        return 'inicio: ' . $this->inicio->format() . ' | fin: ' . $this->fin->format();
+    }
+
+    function copy($int = null) {
+        if (!(is_a($int, 'intervalo'))) return false; 
+        $this->inicio = new Hora($int->inicio->get());
+        $this->fin = new Hora($int->fin->get());
+        return true;  
+    }
+
+  function __clone() {
+    $class = get_class($this);
+    $i = new $class;
+    $i->inicio = $this->inicio->__clone();
+    $i->fin    = $this->fin->__clone();
+    return $i;
+  }
+
+}
+
+// $Id$
+?>

diff --git a/HTML/test/.htaccess b/test/HTML/.htaccess
similarity index 100%
rename from HTML/test/.htaccess
rename to test/HTML/.htaccess

diff --git a/HTML/test/prueba_html_quickform_renderer_tabla.php b/test/HTML/prueba_html_quickform_renderer_tabla.php
similarity index 100%
rename from HTML/test/prueba_html_quickform_renderer_tabla.php
rename to test/HTML/prueba_html_quickform_renderer_tabla.php

diff --git a/HTML/test/prueba_tabla.php b/test/HTML/prueba_tabla.php
similarity index 100%
rename from HTML/test/prueba_tabla.php
rename to test/HTML/prueba_tabla.php

diff --git a/HTML/test/prueba_tabla2.php b/test/HTML/prueba_tabla2.php
similarity index 100%
rename from HTML/test/prueba_tabla2.php
rename to test/HTML/prueba_tabla2.php