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 //YATTA LOG {{{
  31 function yatta_log ($texto) {
  32     GLOBAL $YATTA_SERVER;
  33     GLOBAL $FH;
  34     $linea = strftime("%b %e %H:%M:%S").' '.$YATTA_SERVER['name'].' '.
  35         $YATTA_SERVER['script'].'['.$YATTA_SERVER['pid'].']: '. $texto ."\n";
  36     fwrite($FH, $linea);
  37 }
  38 //}}}
  39
  40 //ABRO EL ARCHIVO DE LOG {{{
  41 //Como root:
  42 //# touch /var/log/apache/YATTA_Server.log
  43 //# chown root.www-data /var/log/apache/YATTA_Server.log
  44 //# chmod 660 /var/log/apache/YATTA_Server.log
  45 if (!($FH = fopen ("/var/log/apache/YATTA_Server.log", "a"))) {
  46      trigger_error("No se pudo abrir el archivo de log. Se detiene el script.", E_USER_ERROR);
  47 }
  48 //}}}
  49
  50 //REQUIRE ONCE {{{
  51 require_once 'DB.php';
  52 require_once 'PEAR.php';
  53 require_once 'YATTA/Controlador.php';
  54 require_once 'YATTA/Servidor.php';
  55 //}}}
  56
  57 //CREO UNA CONEXION MYSQL{{{
  58 $db =& DB::connect('mysql://intranet:intranet@bal747f/yatta', true);
  59 if (DB::isError($db)) {
  60      trigger_error($db->getMessage(), E_USER_ERROR);
  61 }
  62 //}}}
  63
  64 //CREO LOS OBJETOS NECESARIOS {{{
  65 $CONTROLADOR =& new YATTA_Controlador;
  66 $SERVIDOR =& new YATTA_Servidor;
  67 //}}}
  68
  69 //OBTENGO LOS DATOS DEL SERVER {{{
  70 $YATTA_SERVER['script'] = $argv[0];
  71 $YATTA_SERVER['pid'] = getmypid();
  72 $YATTA_SERVER['name'] = substr(file_get_contents('/etc/hostname'), 0, strpos
  73         (file_get_contents('/etc/hostname'), "\n"));
  74 $YATTA_SERVER['id'] = $SERVIDOR->obtenerId($db, $YATTA_SERVER['name']);
  75 if (PEAR::isError($YATTA_SERVER['id'])) {
  76      trigger_error('Error: ' . $YATTA_SERVER['id']->getMessage() . "\n", E_USER_ERROR);
  77 }
  78 yatta_log ('*************** Comienzo Ejecución ***************');
  79 yatta_log (' SCRIPT: ' . $YATTA_SERVER['script']);
  80 yatta_log (' PID: ' . $YATTA_SERVER['pid']);
  81 yatta_log (' SERVER NAME: ' . $YATTA_SERVER['name']);
  82 yatta_log (' SERVER ID: ' . $YATTA_SERVER['id']);
  83 yatta_log ('**************************************************');
  84 //}}}
  85
  86 //WHILEO LAS OPCIONES {{{
  87 while (1) {
  88
  89     //Busco un nuevo proceso {{{
  90     $proceso = $CONTROLADOR->obtenerNuevoProceso($db,
  91             $YATTA_SERVER['id']);
  92     yatta_log ('Se busca un nuevo proceso.');
  93     //}}}
  94
  95     //Si hay un proceso lo lanzo {{{
  96     if (@$proceso) {
  97
  98         yatta_log ('Hay un nuevo proceso. Se forkea');
  99         $pid = pcntl_fork();
 100
 101         //FORK ERROR {{{
 102         if ($pid == -1) {
 103             yatta_log('ERROR: No se pudo forkear.');
 104             $res = $CONTROLADOR->terminarProceso($db, $proceso['id'],
 105                     $YATTA_SERVER['id'], 3, 'No se pudo forkear el script.');
 106             if (PEAR::isError($res)) {
 107                 yatta_log('ERROR: YATTA_Controlador. '.$res->getMessage());
 108             }
 109         }
 110         //}}}
 111
 112         //FORK PADRE {{{
 113         elseif ($pid) {
 114             yatta_log ('Fork Padre.');
 115             //Espero a que termine el proceso.
 116             yatta_log ('Se espera a que termine el proceso en ejecución. Se'.
 117                     ' verificara si hay que abortar el proceso cada 5 segundo.');
 118             while (($wapid = pcntl_waitpid ($pid, $status, WNOHANG)) != $pid) {
 119                 if ($CONTROLADOR->abortar($db, $proceso['id'])) {
 120                     yatta_log ('Hay que abortar el proceso en ejecución.');
 121                     posix_kill($pid, 15); //SIGTERM
 122                     $CONTROLADOR->terminarProceso($db, $proceso['id'],
 123                             $YATTA_SERVER['id'], 4);
 124                     yatta_log ('Se aborto el proceso en ejecución.');
 125                 }
 126                 sleep(10);
 127             }
 128             yatta_log ('Fin fork Padre.');
 129         }
 130         //}}}
 131
 132         //FORK HIJO {{{
 133         else {
 134             yatta_log ('Fork Hijo.')
 135             require_once $proceso['script'];
 136
 137             yatta_log ('Se crea el proceso..');
 138             if (function_exists('create_process')) {
 139                 $SCRIPT =& create_process();
 140                 yatta_log ('Se instancio el proceso. Se ejecuta el metodo run.');
 141                 if (!method_exists($SCRIPT, 'run')) {
 142                     yatta_log ('No existe el metodo run en el proceso.');
 143                     require_once 'YATTA/Proceso.php';
 144                     $SCRIPT =& new YATTA_Proceso;
 145                     $SCRIPT->error = 'No existe el metodo run en'.
 146                         $proceso['script'];
 147                 }
 148                 else {
 149                     yatta_log ('Comienza la ejecución del proceso.');
 150                     $SCRIPT->run();
 151                     yatta_log ('Finaliza la ejecución del proceso.')
 152                 }
 153             }
 154             else {
 155                 require_once 'YATTA/Proceso.php';
 156                 $SCRIPT =& new YATTA_Proceso;
 157                 $SCRIPT->error = 'No existe la funcion create_process en'.
 158                     $proceso['script'];
 159             }
 160
 161             if (@$SCRIPT->error) {
 162                 $estado = 3;
 163             }
 164             else {
 165                 $estado = 2;
 166             }
 167             $CONROLADOR->terminarProceso($db, $proceso['id'],
 168                     $YATTA_SERVER['id'], $estado, @$SCRIPT->error,
 169                     @$SCRIPT->archivo, @$SCRIPT->notificar);
 170
 171             yatta_log ('Fin fork Hijo.');
 172         }
 173         //}}}
 174
 175     }
 176     // }}}
 177
 178     //No hay proceso {{{
 179     else {
 180         yatta_log ('No hay procesos asignados a este servidor.'.
 181                 ' En 60 segundos se buscara un nuevo proceso.');
 182         sleep(60);
 183     }
 184     //}}}
 185 }
 186 //}}}
 187
 188 //CIERRO EL ARCHIVO DE LOG {{{
 189 yatta_log ('*************** Finaliza Ejecución ***************');
 190 fclose ($FH);
 191 //}}}
 192 ?>