<?php

/* gvHIDRA. Herramienta Integral de Desarrollo Rápido de Aplicaciones de la Generalitat Valenciana
*
* Copyright (C) 2006 Generalitat Valenciana.
*
* This program is free software; you can redistribute it and/or
* modify it under the terms of the GNU General Public License
* as published by the Free Software Foundation; either version 2
* of the License, or (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307,USA.
*
* For more information, contact:
*
*  Generalitat Valenciana
*  Conselleria d'Infraestructures i Transport
*  Av. Blasco Ibáñez, 50
*  46010 VALENCIA
*  SPAIN
*  +34 96386 24 83
*  gvhidra@gva.es
*  www.gvpontis.gva.es
*
*/

/**
 * De momento acepta fecha User
 */
function Date_User2FW($str) {
	$fecha = explode(' ', $str);
	$d = explode('/', $fecha[0]);
	return new Datetime((($d[2]<30? 2000: 1900)+$d[2]).'-'.$d[1].'-'.$d[0].' '.$fecha[1]);
}

/**
 * Creado el 29-may-2006 por Toni
 *
 */ 
 //REVIEW: Toni: quitar ConfIgep cuando deje de existir es_desarrollo
 include_once "ConfIgep.php";
// include_once "ConfigFramework.php";
//
// $configuration = ConfigFramework::getConfig();;
// $customDirname = $configuration->getCustomDirName();

 //Inicializamos algunos valores
 if($_REQUEST['db_fecha']!='') 
	$valorFecha = $_REQUEST['db_fecha'];
 else
	$valorFecha = date('d/m/y H:i:s');

 //autoreload 
 if($_REQUEST['autoreload']!='') 
 	$valorAutoreload = 'checked';
 else
 	$valorAutoreload = '';
 	 
 //Comprobamos si ha pulsado alguno de los botones que indican tiempo
 switch ($_REQUEST['Refrescar']){
 	case 'Ayer':
 		$valorFecha = date('d/m/y H:i:s',strtotime("-1 day"));
 		break;
 	case 'Hoy':
 		$valorFecha = date('d/m/y')." 00:00:00";
 		break;
 	case '-10m':
 		$valorFecha = date('d/m/y H:i:s',strtotime("-10 minutes"));
 		break; 	
 	case '-5m':
 		$valorFecha = date('d/m/y H:i:s',strtotime("-5 minutes"));
 		break;
 	case 'Ya!':	
 		$valorFecha = date('d/m/y H:i:s');
 }
 
 if($_REQUEST['db_usuario']!='')
	$valorUsuario = strtoupper($_REQUEST['db_usuario']);
 else
	$valorUsuario = '';
 
 if($_REQUEST['db_aplicacion']!='')
	$valorAplicacion = $_REQUEST['db_aplicacion'];
 else{
	$fichero = '../gvHidraConfig.inc.xml';
	if (file_exists($fichero))
	{
		$sXML = simplexml_load_file($fichero);
		$nombreApp = (string) $sXML->applicationName;
		unset($sXML);//Liberamos el recurso
		$valorAplicacion = $nombreApp;
	}
 }
 
 if($_REQUEST["db_tipo"]!='')
	$valorTipo = $_REQUEST["db_tipo"];
 else
	$valorTipo = 5; 
 
 //Comprobamos si tenemos que calcular la consulta
 $error_bd = '';
 $resultDatos = array(); 
 if(($valorAplicacion!='') and ($valorFecha!='')){   
	//REVIEW: Toni Provisional hasta que este todo acabado.
	if (ConfIgep::es_desarrollo()) {
		$dsn_log = array(
			'phptype'  => 'pgsql',
			'username' => 'igep_alog',
			'password' => 'errlog',
			'hostspec' => 'rosa.coput.gva.es',
			'database' => 'marte',	
			);
	}
	else{

		$dsn_log = array(
			'phptype'  => 'pgsql',
			'username' => 'igep_alog',
			'password' => 'errlog',
			'hostspec' => 'adolfo',
			'database' => 'marte',
			);			
	}
	
	require_once('MDB2.php');
	$conexion = MDB2::connect($dsn_log);
    if (PEAR::isError($conexion)){
		die('Error de conexion a BD -> '.$conexion->getMessage());
    }
	$conexion->setFetchMode(MDB2_FETCHMODE_ASSOC);
    // cosas extraidas del postconexion de igep_bd
    if ($dsn_log['phptype']=='pgsql') {
	    $result = $conexion->exec('set session datestyle = \'sql, european\'');
	    if (PEAR::isError($result))
			die('Error al fijar encoding');
	    $result = $conexion->exec('set client_encoding=\'LATIN1\'');
	    if (PEAR::isError($result))
			die('Error al fijar variables de sesión datestyle');
		$dt =  Date_User2FW($valorFecha);
		$valorFechaQuery = $dt->format('d/m/Y H:i:s');

    } elseif ($dsn_log['phptype']=='mysqli') {
	    $result = $conexion->exec('set names \'LATIN1\'');
	    if (PEAR::isError($result))
			die('Error al fijar encoding');
		$dt =  Date_User2FW($valorFecha);
		$valorFechaQuery = $dt->format('Y-m-d H:i:s');

    } elseif ($dsn_log['phptype']=='oci8') {
	    $result = $conexion->exec('alter session set nls_date_format=\'dd/mm/yyyy hh24:mi:ss\'');
	    if (PEAR::isError($result))
			die('Error al fijar formato fechas');
		$dt =  Date_User2FW($valorFecha);
		$valorFechaQuery = $dt->format('d/m/Y H:i:s');

    } else
    	throw new Exception('Tipo de DBMS desconocido: '.$dsn_log['phptype']);

	//si hay usuario
	if($_REQUEST['db_usuario']!='')
		$whereUsuario = "and usuario='".$_REQUEST['db_usuario']."'";
	$select = "SELECT iderror,aplicacion,modulo,version,usuario,fecha as \"fecha\",tipo,mensaje FROM tcmn_errlog WHERE aplicacion='".$valorAplicacion."' and fecha>'".$valorFechaQuery."' and tipo<=".$valorTipo." $whereUsuario ORDER BY iderror DESC";
	$res = $conexion->query($select);
	if(PEAR::isError($res)) {
		$resultDatos = array();
		echo 'Error en consulta: '.$res->getMessage();
	} else
		$resultDatos = $res->fetchAll();
 }
 $htmlResult = '<html>';
 $htmlResult.= '<head>';
 $htmlResult.= '<title>';
 $htmlResult.= 'Debugger de gvHIDRA';
 $htmlResult.= '</title>'; 
 //REVIEW: creo que el visor del debugger debería estar en el custom
 $htmlResult.= "<link rel='stylesheet' href='custom/cit.gva.es/css/aplicacion.css' type='text/css' />";
 $htmlResult.= '</head>'; 
 $htmlResult.= '<body onLoad="javascript:formulario=document.forms[\'Refrescar\'];if(\''.$valorAutoreload.'\'==\'checked\'){setTimeout(\'formulario.submit();\',4000);};">';
 //Para meter los parámetros de la consulta
 $htmlResult.= "<form name='Refrescar' id='Refrescar' method='post' action=''>"; 
 $htmlResult.= '<table border="1" width="98%" class="TABLA_DATOS">';
 $htmlResult.= '<tr>';
 $htmlResult.= '<td colspan="3" width="85%">';
 $htmlResult.= '<b>Criterios de filtrado</b>';
 $htmlResult.= '</td>';
 $htmlResult.= '<td width="20%">';
 $htmlResult.= '<input type="submit" name="Refrescar"/ value="Refrescar">';
 $htmlResult.= '&nbsp;&nbsp;Auto <input id="autoreload" name="autoreload" type="checkbox" '.$valorAutoreload.' value="checked">'; 
 
 $htmlResult.= '</td>';
 $htmlResult.= '</tr>';
 $htmlResult.= '<tr>';
 $htmlResult.= '<td width="18%">'; 
 $htmlResult.= 'Usuario: <input type="text" name="db_usuario" id="db_usuario" value="'.$valorUsuario.'" style=\'padding:0px;\'  size=\'12\'/>';
 $htmlResult.= '</td>';
 $htmlResult.= '<td width="37%">';
 $htmlResult.= ' &nbsp;Fecha: <input type="text" name="db_fecha" id="db_fecha" value="'.$valorFecha.'" style=\'padding:0px;\'  size=\'12\'/>';
 $htmlResult.= '&nbsp; <input type="submit" name="Refrescar"/ value="Ayer">';
 $htmlResult.= '&nbsp;<input type="submit" name="Refrescar"/ value="Hoy">';
 $htmlResult.= '&nbsp;<input type="submit" name="Refrescar"/ value="-10m">';
 $htmlResult.= '&nbsp;<input type="submit" name="Refrescar"/ value="-5m">';
 $htmlResult.= '&nbsp;<input type="submit" name="Refrescar"/ value="Ya!">';
 $htmlResult.= '</td>';
 $htmlResult.= '<td width="15%">';
 $htmlResult.= '&nbsp; Tipo: <select name="db_tipo">';
 
 if($valorTipo==0) 
  $htmlResult.= '<option value="0" selected>PANIC</option>';
 else
  $htmlResult.= '<option value="0">PANIC</option>';
 if($valorTipo==1) 
  $htmlResult.= '<option value="1" selected>ERROR</option>';
 else
  $htmlResult.= '<option value="1">ERROR</option>';
 if($valorTipo==2) 
  $htmlResult.= '<option value="2" selected>WARNING</option>';
 else
  $htmlResult.= '<option value="2">WARNING</option>';
 if($valorTipo==3)
  $htmlResult.= '<option value="3" selected>NOTICE</option>';
 else
  $htmlResult.= '<option value="3">NOTICE</option>';
 if($valorTipo==4)
  $htmlResult.= '<option value="4" selected>DEBUG_USER</option>';
 else
  $htmlResult.= '<option value="4">DEBUG_USER</option>';
 if($valorTipo==5)
  $htmlResult.= '<option value="5" selected>DEBUG_IGEP</option>';
 else
  $htmlResult.= '<option value="5">DEBUG_IGEP</option>';
 $htmlResult.= '</select>';
 $htmlResult.= '</td>'; 
 $htmlResult.= '<td>';
 $htmlResult.= '&nbsp; Aplicación: <input type="text" name="db_aplicacion" id="db_aplicacion" value="'.$valorAplicacion.'" style=\'padding:0px;\'  size=\'12\'/>'; 
 $htmlResult.= '</td>';
 $htmlResult.= '</tr>';
 $htmlResult.= '</table>';
 $htmlResult.= '</form>';
 
 
 $htmlResult.= '<br>';
 $htmlResult.= '<table border="1" width="98%" class="TABLA_DATOS">';
 $htmlResult.= '<tr>';
 $htmlResult.= '<th class="formularios" border="1">';
 $htmlResult.= 'Nº';
 $htmlResult.= '</th>';
 $htmlResult.= '<th class="formularios" border="1" width="15%">';
 $htmlResult.= 'FECHA';
 $htmlResult.= '</th>';
 if(empty($valorUsuario)){
 	$htmlResult.= '<th class="formularios" border="1">';
 	$htmlResult.= 'USUARIO';
 	$htmlResult.= '</th>';
 } 
 $htmlResult.= '<th class="formularios" border="1">';
 $htmlResult.= 'TIPO';
 $htmlResult.= '</th>';
 $htmlResult.= '<th class="formularios" border="1">';
 $htmlResult.= 'MENSAJE';
 $htmlResult.= '</th>';
 $htmlResult.= '</tr>'; 
 //Iteramos para mostrar los resultados
 if(count($resultDatos)==0){
   $htmlResult.= '<tr>';
   if(empty($valorUsuario))
   	$htmlResult.= '<td colspan="5" align="center" border="1">';
   else
   	$htmlResult.= '<td colspan="4" align="center" border="1">';
   $htmlResult.= '<font color="#2C658F">NO HAY DATOS</font>';
   $htmlResult.= '</td>';
   $htmlResult.= '</tr>';
 }
 else{
   foreach($resultDatos as $indice=>$tupla){
     $htmlResult.= '<tr>'; 
     $htmlResult.= '<td border="1">';
     $htmlResult.= ($indice+1);
     $htmlResult.= '</td>';
     $htmlResult.= '<td border="1">';
     $htmlResult.= $tupla['fecha'];
     $htmlResult.= '</td>';
 	 if(empty($valorUsuario)){
	     $htmlResult.= '<td border="1">';
	     $htmlResult.= $tupla['usuario'];
	     $htmlResult.= '</td>';     
 	 }
     $htmlResult.= '<td border="1">';
     switch($tupla['tipo']){
      case 0:
        $htmlResult.= '<font color="#BB000C">PANIC</font>';  
        break;
      case 1:
        $htmlResult.= '<font color="#BB000C">ERROR</font>';
        break;
      case 2:
        $htmlResult.= '<font color="#FFAB3F">WARNING</font>';
        break;
      case 3:
        $htmlResult.= '<font color="#2C658F">NOTICE</font>';
        break;
      case 4:
        $htmlResult.= '<font color="#DFDFDF">DEBUG_USER</font>';
        break;
      case 5:
        $htmlResult.= '<font color="#7A8F2C">DEBUG_IGEP</font>';
        break;    
     }
     $htmlResult.= '</td>';
     $htmlResult.= '<td border="1">';
     $htmlResult.= $tupla['mensaje'];
     $htmlResult.= '</td>';
     $htmlResult.= '</tr>';
   }
 }
 $htmlResult.= '</table>';
 $htmlResult.= '</body>';
 $htmlResult.= '</html>';
 
 echo $htmlResult; 
?>