script/servidores/YATTA_Server.php

   1 #!/usr/bin/php4 -qC
   2 <?php /* vim: set binary expandtab tabstop=4 shiftwidth=4 textwidth=80 foldmethod=marker:
   3 -------------------------------------------------------------------------------
   4                              Ministerio de Economía
   5                                     YATTA!
   6 -------------------------------------------------------------------------------
   7 This file is part of YATTA!.
   8
   9 YATTA! is free software; you can redistribute it and/or modify it under
  10 the terms of the GNU General Public License as published by the Free
  11 Software Foundation; either version 2 of the License, or (at your option)
  12 any later version.
  13
  14 YATTA! is distributed in the hope that it will be useful, but WITHOUT
  15 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
  16 FOR A PARTICULAR PURPOSE. See the GNU General Public License for more details.
  17
  18 You should have received a copy of the GNU General Public License; if not,
  19 write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330,
  20 Boston, MA  02111-1307  USA
  21 -------------------------------------------------------------------------------
  22 Creado: jue ene  8 16:53:47 ART 2004
  23 Autor:  Martin Marrese <mmarre@mecon.gov.ar>
  24 -------------------------------------------------------------------------------
  25 $Id$
  26 -----------------------------------------------------------------------------*/
  27
  28 //XXX LANZAR ESTE SCRIPT CON NICE -19
  29
  30 //TODO No mantener abierto el archivo de log durante toda la ejecucion, porque
  31 //se afecta con el logrotate. Ver de capturar alguna señal por esto.
  32
  33 //TODO Ver si es conveniente que la conexion al mysql esta abierta desde el
  34 //principio. Hay problemas con eso?
  35
  36 //TODO Que el logueo sea selectivo segun un parametro en el archivo de
  37 //configuracion (tipo modo histerico, normal, tranquilo, nada)
  38
  39 //YATTA LOG {{{
  40 function yatta_log ($texto) {
  41     GLOBAL $YATTA_SERVER;
  42     GLOBAL $FH;
  43     $linea = strftime("%b %e %H:%M:%S").' '.$YATTA_SERVER['name'].' '.
  44         $YATTA_SERVER['script'].'['.$YATTA_SERVER['pid'].']: '. $texto ."\n";
  45     fwrite($FH, $linea);
  46 }
  47 //}}}
  48
  49 //LEO EL ARCHIVO DE CONFIGURACION {{{
  50 $CONF = parse_ini_file(dirname(__FILE__) . '/configuracion.ini', true);
  51 //}}}
  52
  53 //ABRO EL ARCHIVO DE LOG {{{
  54 //Como root:
  55 //# touch /var/log/apache/YATTA_Server.log
  56 //# chown root.www-data /var/log/apache/YATTA_Server.log
  57 //# chmod 660 /var/log/apache/YATTA_Server.log
  58 if (!($FH = fopen ($CONF['server']['log'], "a"))) {
  59      trigger_error("No se pudo abrir el archivo de log. Se detiene el script.", E_USER_ERROR);
  60 }
  61 //}}}
  62
  63 //REQUIRE ONCE {{{
  64 require_once 'PEAR.php';
  65 require_once 'YATTA/Controlador.php';
  66 require_once 'YATTA/Servidor.php';
  67 require_once 'YATTA/DB.php';
  68 //}}}
  69
  70 //CREO UNA CONEXION MYSQL{{{
  71 $db = YATTA_DB::connect($CONF['db']);
  72 if (DB::isError($db)) {
  73      trigger_error($db->getMessage(), E_USER_ERROR);
  74 }
  75 //}}}
  76
  77 //CREO LOS OBJETOS NECESARIOS {{{
  78 $CONTROLADOR =& new YATTA_Controlador;
  79 $SERVIDOR =& new YATTA_Servidor;
  80 //}}}
  81
  82 //OBTENGO LOS DATOS DEL SERVER {{{
  83 $YATTA_SERVER['script'] = $argv[0];
  84 $YATTA_SERVER['pid'] = getmypid();
  85 $YATTA_SERVER['name'] = substr(file_get_contents('/etc/hostname'), 0, strpos
  86         (file_get_contents('/etc/hostname'), "\n"));
  87 $YATTA_SERVER['id'] = $SERVIDOR->obtenerId($db, $YATTA_SERVER['name']);
  88 if (PEAR::isError($YATTA_SERVER['id'])) {
  89      trigger_error('Error: ' . $YATTA_SERVER['id']->getMessage() . "\n", E_USER_ERROR);
  90 }
  91 yatta_log ('*************** Comienzo Ejecución ***************');
  92 yatta_log (' SCRIPT: ' . $YATTA_SERVER['script']);
  93 yatta_log (' PID: ' . $YATTA_SERVER['pid']);
  94 yatta_log (' SERVER NAME: ' . $YATTA_SERVER['name']);
  95 yatta_log (' SERVER ID: ' . $YATTA_SERVER['id']);
  96 yatta_log ('**************************************************');
  97 //}}}
  98
  99 //WHILEO LAS OPCIONES {{{
 100 yatta_log ('Se busca un nuevo proceso.');
 101 while (1) {
 102
 103     //Busco un nuevo proceso {{{
 104     $proceso = $CONTROLADOR->obtenerNuevoProceso($db,
 105             $YATTA_SERVER['id']);
 106     //}}}
 107
 108     //Si hay un proceso lo lanzo {{{
 109     if (@$proceso) {
 110
 111         yatta_log ('Hay un nuevo proceso. Se forkea');
 112         $pid = pcntl_fork();
 113
 114         //FORK ERROR {{{
 115         if ($pid == -1) {
 116             yatta_log('ERROR: No se pudo forkear.');
 117             $res = $CONTROLADOR->terminarProceso($db, $proceso['id'],
 118                     $YATTA_SERVER['id'], 3, 'No se pudo forkear el script.');
 119             if (PEAR::isError($res)) {
 120                 yatta_log('ERROR: YATTA_Controlador. '.$res->getMessage());
 121             }
 122
 123         }
 124         //}}}
 125
 126         //FORK PADRE {{{
 127         elseif ($pid) {
 128             yatta_log ('Fork Padre.');
 129             //Espero a que termine el proceso.
 130             yatta_log ('Se espera a que termine el proceso en ejecución. '.
 131                     ' Verifica aborto en 5 segundos.');
 132
 133             //Pregunto si el hijo que se forkeo arriba termino, pero pido que no
 134             //corte la ejecucion (WNOHANG) para poder entrar en el while.
 135             //$res sera el pid del hijo, en este caso $res = $pid.
 136             while (!($res = pcntl_waitpid($pid, $status, WNOHANG))) {
 137                 if ($CONTROLADOR->abortar($db, $proceso['id'])) {
 138                     yatta_log ('Hay que abortar el proceso en ejecución.');
 139                     posix_kill($pid, 15); //SIGTERM
 140                     $CONTROLADOR->terminarProceso($db, $proceso['id'],
 141                             $YATTA_SERVER['id'], 4);
 142                     yatta_log ('Se aborto el proceso en ejecución.');
 143                 }
 144                 sleep(5);
 145             }
 146             yatta_log ('Fin fork Padre.');
 147         }
 148         //}}}
 149
 150         //FORK HIJO {{{
 151         else {
 152             yatta_log ('Fork Hijo.');
 153
 154             //Ejecuto el proceso si existe el archivo {{{
 155             if (is_readable($proceso['script'])) {
 156                 require_once $proceso['script'];
 157                 yatta_log ('Se llama a create_process.');
 158
 159                 //Llamo a la funcion create_process {{{
 160                 if (function_exists('create_process')) {
 161                     $SCRIPT =& create_process();
 162                     yatta_log ('Se instancio el proceso. Se ejecuta el metodo run.');
 163                     if (!method_exists($SCRIPT, 'run')) {
 164                         yatta_log ('No existe el metodo run en el proceso.');
 165                         require_once 'YATTA/Proceso.php';
 166                         $SCRIPT =& new YATTA_Proceso;
 167                         $SCRIPT->error = 'No existe el metodo run en'.
 168                             $proceso['script'];
 169                     }
 170                     else {
 171                         yatta_log ('Comienza la ejecución del proceso.');
 172                         $SCRIPT->run(unserialize($proceso['parametros']));
 173                         yatta_log ('Finaliza la ejecución del proceso.');
 174                     }
 175                 }
 176                 //}}}
 177
 178                 //No existe la funcion {{{
 179                 else {
 180                     require_once 'YATTA/Proceso.php';
 181                     $SCRIPT =& new YATTA_Proceso;
 182                     $SCRIPT->error = 'No existe la funcion create_process en'.
 183                         $proceso['script'];
 184                 }
 185                 //}}}
 186
 187                 //Finalizo el script {{{
 188                 if (@$SCRIPT->error) {
 189                     $estado = 3;
 190                 }
 191                 else {
 192                     $estado = 2;
 193                 }
 194                 $CONTROLADOR->terminarProceso($db, $proceso['id'],
 195                         $YATTA_SERVER['id'], $estado, @$SCRIPT->error,
 196                         @$SCRIPT->archivo, @$SCRIPT->notificar);
 197                 //}}}
 198
 199             }
 200             //}}}
 201
 202             //No existe el archivo {{{
 203             else {
 204                 yatta_log('No se puede alcanzar el archivo.');
 205                 $res = $CONTROLADOR->terminarProceso($db, $proceso['id'],
 206                         $YATTA_SERVER['id'], 3, 'No se puede alcanzar el archivo.');
 207             }
 208             //}}}
 209
 210             yatta_log ('Fin fork Hijo.');
 211             exit;
 212         }
 213         //}}}
 214
 215         unset($proceso);
 216     }
 217     // }}}
 218
 219     //No hay proceso {{{
 220     else {
 221         yatta_log ('No hay procesos asignados a este servidor.'.
 222                 ' En 60 segundos se buscara un nuevo proceso.');
 223         sleep(60);
 224     }
 225     //}}}
 226 }
 227 //}}}
 228
 229 //CIERRO EL ARCHIVO DE LOG {{{
 230 yatta_log ('*************** Finaliza Ejecución ***************');
 231 fclose ($FH);
 232 //}}}
 233 ?>