X-Git-Url: https://git.llucax.com/mecon/yatta.git/blobdiff_plain/855e52d23917114954f97ad0066f51c89ff7aa1a..cba8f8ed7ec214c7707aa44d6401b1a31b6853d0:/lib/YATTA/Controlador.php diff --git a/lib/YATTA/Controlador.php b/lib/YATTA/Controlador.php index 63ac167..deeb668 100644 --- a/lib/YATTA/Controlador.php +++ b/lib/YATTA/Controlador.php @@ -25,9 +25,11 @@ $Id$ -----------------------------------------------------------------------------*/ require_once 'YATTA/Proceso.php'; -require_once 'YATTA/ProcesoWeb.php'; +require_once 'YATTA/ProcesoDB.php'; require_once 'YATTA/Servidor.php'; +define ('PATH_TACHO', '/var/www/yatta/tacho/'); + /** * Clase para el manejo centralizado de toda la informacion de YATTA. * @@ -57,8 +59,22 @@ class YATTA_Controlador { /** * Agrega un proceso a la base de datos - * Los datos obligatorios a pasar son: script, id_sistema, descripcion, - * owner, destinos, prioridad, scheduling y notificar. + * Los datos a pasar son: + * Obligatorios + * script : Path completo para el require_once. + * id_sistema : Identificador del sistema al que pertenece . + * descripcion: Es lo que permite al usuario identificar al proecso. + * owner : Login@Organismo de la persona responsable del proceso. + * + * Opcionales + * destinos : Login@Organismo separado por comas de aquellos usuarios + * que deben poder ver los resultados del proceso. + * prioridad : Indica la prioridad del proceso. + * notificar : Indica si hay que notificar al owner y a los destinos + * cuando finalize el proceso. + * resultado : En caso que el proceso genere archivos resultado, se debe + * indicar aqui el nombre del archivo que deben visualizar + * los usuarios. * * @param DB $db Conexion a la base de datos. * @param mixed $datos Datos necesarios del proceso. @@ -110,27 +126,206 @@ class YATTA_Controlador { $proceso->owner = $owner; if (@$id) { $proceso->id = $id; + $res = $proceso->buscar($db, MECON_DBO_AND, ' id ASC'); + $res = $proceso->cargar($res); + return $proceso; + } + else { + return $proceso->buscar($db, MECON_DBO_AND, ' id ASC'); } - return $proceso->buscar($db, MECON_DBO_AND, ' id ASC'); } /** - * Obtiene un proceso de un usuario. + * Actualiza los datos de un proceso al terminar. * * @param DB $db Conexion a la base de datos. - * @param string $owner Usuario duenio de los procesos. - * @param int $id Identificador del proceso a buscar + * @param int $id_proceso Identificador del proceso. + * @param int $id_server Identificador del Servidor. + * @param int $status Identificador del estado de finalizacion. + * @param string $nota Nota de error o similar. + * @param string $archivo Nombre del archivo temporal que esta en el fs. + * @param int $notificar Indica si hay que notificar al owner. * * @return mixed * @access public */ - function obtenerProcesoUsuario($db, $owner, $id) { - $proceso =& new YATTA_ProcesoDB; - $proceso->owner = $owner; - $proceso->id = $id; - $res = $proceso->buscar($db, MECON_DBO_AND, ' id ASC'); - $res = $proceso->cargar($res); - return $proceso; + function terminarProceso($db, $id_proceso, $id_server, $status, $nota = + null, $archivo = null, $notificar = 0) { + + //Actualizo la base procesos + $sql = 'UPDATE yatta.procesos SET status = '. $status; + if (@$nota) { + $sql.= ', nota = '. $nota; + } + if (@$archivo) { + $sql.= ', archivo = '. $archivo; + } + if (@$notificar) { + $sql.= ', notificar = '. $notificar; + } + $sql.= ' WHERE id = '. $id_proceso; + $res = $db->query($sql); + if (DB::isError($res)) { + return $res; + } + + //NOTIFICO + if (@$notificar) { + $this->_emailUsuario ($db, $id_proceso, $status, $nota, $archivo); + } + + //COPIO EL ARCHIVO + if (@$archivo) { + $arch = basename ($archivo); + rename ($archivo, PATH_TACHO.$arch); + } + + //Actualizo los servidores + $SERVER =& new YATTA_Servidor; + return $SERVER->quitarProceso($db, $id_server); + } + + /** + * Busca un proceso en cola para el servidor + * + * @param DB $db Conexion a la base de datos. + * @param int $id Identificador del servidor. + * + * @return mixed + * @access public + */ + function obtenerNuevoProceso($db, $id) { + $res = $db->query('SELECT p.id AS id, p.script AS script + FROM yatta.procesos AS p + WHERE p.server = '.$id.' AND status = 0 + ORDER BY p.prioridad, p.id'); + // Si hay error lo devuelve. + if (DB::isError($res)) { + return $res; + } + return $res->fetchRow(DB_FETCHMODE_ASSOC); + } + + /** + * Busca si un proceso que se esta ejecutando tiene pedido de cancelacion. + * + * @param DB $db Conexion a la base de datos. + * @param int $id Identificador del proceso. + * + * @return mixed + * @access public + */ + function abortar($db, $id) { + $res = $db->query('SELECT count(*) AS cuenta + FROM yatta.procesos + WHERE id = '.$id.' AND status = 5'); + // Si hay error lo devuelve. + if (DB::isError($res)) { + return $res; + } + $res = $res->fetchRow(DB_FETCHMODE_ASSOC); + return $res['cuenta']; + } + + /** + * Envia el email al usuario informandole la finalizacion de uno de sus + * procesos. + * + * @param DB $db Conexion a la base de datos. + * @param int $id_proceso Identificador del proceso. + * @param int $status Identificador del estado de finalizacion. + * @param string $nota Nota de error o similar. + * @param string $archivo Nombre del archivo temporal que esta en el fs. + * + * @return void + * @access private + */ + function _emailUsuario($db, $id_proceso, $status, $nota = null, $archivo = null) { + $res = $db->query( + "SELECT p.descripcion AS descripcion, p.owner AS owner, ". + "p.destinos AS destinos, p.resultado AS resultado, ". + "p.estado AS estado, p.nota AS nota ". + "FROM yatta.procesos AS p". + "WHERE p.id = ". $id_proceso); + if (DB::isError($res)) { + return $res; + } + $res = $res->fetchRow(DB_FETCHMODE_ASSOC); + +//@FIXME El email se lo envio al owner y a los destinos, o al owner solamente? + + $dest = split (',', @$res['destinos']); + $to = $owner.'.gov.ar'; + foreach ($dest as $d) { + $to = $to . ", $d.gov.ar"; + } + $headers = "From: Intranet - YATTA \r\n"; + $subject = "INTRANET - YATTA - Proceso Finalizado"; + + $body = "El proceso {$res['descripcion']} ha finalizado ". + + switch ($status) { + case 2: + $body .= "con éxito.\n"; + break; + case 3: + $body .= "con errores.\n"; + if ($nota) { + $body .= "Motivo:\n$nota\n"; + } + break; + case 4: + $body .= "porque se abortó su ejecución.\n"; + if ($nota) { + $body .= "Motivo:\n$nota\n"; + } + break; + } + + if ($archivo) { + $body .= "Usted puede obtener el archivo resultado del proceso\n". + "en la seccion Archivos del sistema YATTA.\n". + "Recuerde que este archivo puede ser borrado sin previo aviso\n". + "por tres motivos:\n". + "\t1- El archivo supera la antigüedad máxima establecida.\n". + "\t2- Se supero la capacidad máxima de información permitida\n". + "\t por usuario.\n". + "\t3- Decisión administrativa por mantenimiento de los servidores.\n"; + } + + + + $body .="\n\n\n". + "************************************************************\n". + "Este es un mensaje generado automaticamente por MECON_YATTA.\n". + "Por favor no responder a esta direccion de e-mail.\n". + "************************************************************\n"; + + mail($to, $subject, $body, $headers); + } + + /** + * Verifica si un usuario tiene alguna informacion en la base de yatta para + * mostrarle el icono en la lista de sistemas de la intranet. + * + * @param DB $db Conexion a la base de datos. + * @param string $login Usuario que se esta verificando + * + * @return bool + * @access private + * @static + */ + function visible($DB, $login) { + $res = $db->query('SELECT count (p.id) AS id FROM yatta.procesos AS p'. + ' WHERE (p.owner LIKE \'%'. $login .'%\') OR'. + ' (p.destinos LIKE \'%'. $login .'%\')'); + + if (DB::isError($res)) { + return $res; + } + $res = $res->fetchRow(DB_FETCHMODE_ASSOC); + + return $res['id']; } } ?> \ No newline at end of file