From cba8f8ed7ec214c7707aa44d6401b1a31b6853d0 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Mart=C3=ADn=20Marrese?= Date: Mon, 9 Feb 2004 18:45:17 +0000 Subject: [PATCH 1/1] Cuando se depura la base, tambien se depuran los procesos de la base que estan asociados a los archivos que se borran. --- script/servidores/YATTA_Tacho.php | 22 +++++++++++++++++----- 1 file changed, 17 insertions(+), 5 deletions(-) diff --git a/script/servidores/YATTA_Tacho.php b/script/servidores/YATTA_Tacho.php index d3ee88d..5d9fe70 100755 --- a/script/servidores/YATTA_Tacho.php +++ b/script/servidores/YATTA_Tacho.php @@ -54,6 +54,7 @@ require_once 'PEAR.php'; require_once 'YATTA/DB.php'; require_once 'YATTA/Controlador.php'; require_once 'YATTA/Servidor.php'; +require_once 'YATTA/Archivo.php'; require_once 'Date.php'; require_once 'Date/Span.php'; //}}} @@ -93,9 +94,19 @@ if ($dh = opendir($YATTA_SERVER['path_tacho'])) { new Date ()); if ($span->greater(new Date_Span ( array ($CONF['tacho']['cantidad_dias'],0,0,0)))) { - if (!unlink($YATTA_SERVER['path_tacho'].$fh)) { - trigger_error("No se pudo borrar el archivo - ".$YATTA_SERVER['path_tacho'].$fh, E_USER_ERROR); + + $archivo =& new YATTA_Archivo; + $archivo->archivo = $fh; + $res = $archivo->buscar($DB); + if (PEAR::isError($res)) { + trigger_error('Error: ' . $res->getMessage() . "\n", + E_USER_ERROR); + } + $archivo->cargar($res); + $res = $archivo->borrar($res); + if (PEAR::isError($res)) { + trigger_error('Error: ' . $res->getMessage() . "\n", + E_USER_ERROR); } } } @@ -105,16 +116,17 @@ if ($dh = opendir($YATTA_SERVER['path_tacho'])) { //}}} //VERIFICO LAS CUOTAS DE LOS USUARIOS{{{ -//@TODO Verificar las cuotas de los usuarios y actuar como deba. //WHILEO POR USUARIO {{{ //HAY MAS DE LA CUOTA {{{ //BORRAR LOS ARCHIVOS MAS VIEJOS HASTA LLEGAR AL VALOR DE LA CUOTA. //ENVIAR UN EMAIL AVISANDO DE ESTO. //}}} - //HAY MENOS DE LA CUOTA PERO SUPERA EL 80%{{{ + //HAY MENOS DE LA CUOTA PERO SUPERA LO ESTABLECIDO EN EL ARCHIVO DE CONFIGURAION{{{ //ENVIAR EMAIL SOBRE LA SITUACION Y AVISANDO QUE SI SE SUPERA LA CUOTA //LOS ARCHIVOS MAS VIEJOS SERAN BORRADOS HASTA CUMPLIR EL REQUERIMIENTO //DE TAMAÑO + //LEVANTAR DEL ARCHIVO DE CONFIGURACION EL HOST PARA EL LINK (ASI EL + //INFELIZ USUARIO VA A VER QUE MIERDA TIENE, QUE BORRA Y QUE NO) //}}} //}}} //}}} -- 2.43.0