Preparo todo para armar la rama estable.

[mecon/yatta.git] / script / servidores / YATTA_Server.php

diff --git a/script/servidores/YATTA_Server.php b/script/servidores/YATTA_Server.php
index 2f502c47da741fdbbc0ae2964772c993504db240..89da2ddd05da6f1d727a737924fdc569249ad7d3 100755 (executable)
--- a/script/servidores/YATTA_Server.php
+++ b/script/servidores/YATTA_Server.php
@@ -25,32 +25,65 @@ Autor:  Martin Marrese <mmarre@mecon.gov.ar>
 $Id$
 -----------------------------------------------------------------------------*/
 
 $Id$
 -----------------------------------------------------------------------------*/
 

+// TODO FIXME XXX
+// Hay problemas con el tiempo de ejecucion del script. No se puede cortar o
+// parar asi porque si, si esta ejecutando un proceso hay que esperar hasta que
+// este finalice, o hacer que todos manejen interrupciones.
+

 //XXX LANZAR ESTE SCRIPT CON NICE -19
 
 //XXX LANZAR ESTE SCRIPT CON NICE -19
 

-//YATTA LOG {{{
-function yatta_log ($texto) {
-    GLOBAL $YATTA_SERVER;
-    GLOBAL $FH;
-    $linea = strftime("%b %e %H:%M:%S").' '.$YATTA_SERVER['name'].' '.
-        $YATTA_SERVER['script'].'['.$YATTA_SERVER['pid'].']: '. $texto ."\n";
-    fwrite($FH, $linea);
-}
-//}}}
+//TODO Ver si es conveniente que la conexion al mysql esta abierta desde el
+//principio. Hay problemas con eso?

 
 

-//Leo el archivo de configuracion {{{
-$CONF = parse_ini_file(dirname(__FILE__) . '/configuracion.ini', true);
-//}}}
+define ('YATTA_LOG_DEBUG', 'debug');
+define ('YATTA_LOG_WARNING', 'warning');
+define ('YATTA_LOG_FATAL', 'fatal');

 
 

-//ABRO EL ARCHIVO DE LOG {{{
+//YATTA LOG {{{
+//Varia su forma de actuar segun el archivo de configuracion
+//
+//$texto - Texto a agregar al log
+//$modo - uno de debug, warning, fatal 
+//

 //Como root:
 //# touch /var/log/apache/YATTA_Server.log
 //# chown root.www-data /var/log/apache/YATTA_Server.log
 //# chmod 660 /var/log/apache/YATTA_Server.log
 //Como root:
 //# touch /var/log/apache/YATTA_Server.log
 //# chown root.www-data /var/log/apache/YATTA_Server.log
 //# chmod 660 /var/log/apache/YATTA_Server.log

-if (!($FH = fopen ($CONF['server']['log'], "a"))) {
-     trigger_error("No se pudo abrir el archivo de log. Se detiene el script.", E_USER_ERROR);
+function yatta_log ($texto, $modo = YATTA_LOG_FATAL) {
+    GLOBAL $YATTA_SERVER;
+    GLOBAL $CONF;
+
+    if (!($FH = fopen ($CONF['server']['log'], "a"))) {
+        trigger_error("No se pudo abrir el archivo de log.", E_USER_ERROR);
+    }
+    else {
+        $linea = strftime("%b %e %H:%M:%S").' '.$YATTA_SERVER['name'].' '.
+            $YATTA_SERVER['script'].'['.$YATTA_SERVER['pid'].']: '. $texto ."\n";
+
+        switch ($CONF['server']['modo_log']) {
+            case YATTA_LOG_FATAL:
+                if ($modo == YATTA_LOG_FATAL) {
+                    fwrite($FH, $linea);
+                }
+                break;
+            case YATTA_LOG_WARNING:
+                if (!($modo == YATTA_LOG_DEBUG)) {
+                    fwrite($FH, $linea);
+                }
+                break;
+            case YATTA_LOG_DEBUG:
+                fwrite($FH, $linea);
+                break;
+        }
+        fclose ($FH);
+    }

 }
 //}}}
 
 }
 //}}}
 

+//LEO EL ARCHIVO DE CONFIGURACION {{{
+$CONF = parse_ini_file(dirname(__FILE__) . '/configuracion.ini', true);
+//}}}
+

 //REQUIRE ONCE {{{
 require_once 'PEAR.php';
 require_once 'YATTA/Controlador.php';
 //REQUIRE ONCE {{{
 require_once 'PEAR.php';
 require_once 'YATTA/Controlador.php';


@@ -61,7 +94,9 @@ require_once 'YATTA/DB.php';
 //CREO UNA CONEXION MYSQL{{{
 $db = YATTA_DB::connect($CONF['db']);
 if (DB::isError($db)) {
 //CREO UNA CONEXION MYSQL{{{
 $db = YATTA_DB::connect($CONF['db']);
 if (DB::isError($db)) {

-     trigger_error($db->getMessage(), E_USER_ERROR);
+    yatta_log('Se produjo un error. '. $db->getMessage(), YATTA_LOG_FATAL);
+    yatta_log('Finaliza la ejecución debido a un error grave.');
+    exit;

 }
 //}}}
 
 }
 //}}}
 


@@ -77,39 +112,44 @@ $YATTA_SERVER['name'] = substr(file_get_contents('/etc/hostname'), 0, strpos
         (file_get_contents('/etc/hostname'), "\n"));
 $YATTA_SERVER['id'] = $SERVIDOR->obtenerId($db, $YATTA_SERVER['name']);
 if (PEAR::isError($YATTA_SERVER['id'])) {
         (file_get_contents('/etc/hostname'), "\n"));
 $YATTA_SERVER['id'] = $SERVIDOR->obtenerId($db, $YATTA_SERVER['name']);
 if (PEAR::isError($YATTA_SERVER['id'])) {

-     trigger_error('Error: ' . $YATTA_SERVER['id']->getMessage() . "\n", E_USER_ERROR);
+    yatta_log('Se produjo un error. '. $YATTA_SERVER['id']->getMessage(),
+            YATTA_LOG_FATAL);
+    yatta_log('Finaliza la ejecución debido a un error grave.');
+    exit;

 }
 yatta_log ('*************** Comienzo Ejecución ***************');
 }
 yatta_log ('*************** Comienzo Ejecución ***************');

-yatta_log (' SCRIPT: ' . $YATTA_SERVER['script']);
-yatta_log (' PID: ' . $YATTA_SERVER['pid']);
+yatta_log (' SCRIPT: '      . $YATTA_SERVER['script']);
+yatta_log (' PID: '         . $YATTA_SERVER['pid']);

 yatta_log (' SERVER NAME: ' . $YATTA_SERVER['name']);
 yatta_log (' SERVER NAME: ' . $YATTA_SERVER['name']);

-yatta_log (' SERVER ID: ' . $YATTA_SERVER['id']);
+yatta_log (' SERVER ID: '   . $YATTA_SERVER['id']);

 yatta_log ('**************************************************');
 //}}}
 
 //WHILEO LAS OPCIONES {{{
 yatta_log ('**************************************************');
 //}}}
 
 //WHILEO LAS OPCIONES {{{

+yatta_log ('Se busca un nuevo proceso.');

 while (1) {
    
     //Busco un nuevo proceso {{{
     $proceso = $CONTROLADOR->obtenerNuevoProceso($db,
             $YATTA_SERVER['id']);
 while (1) {
    
     //Busco un nuevo proceso {{{
     $proceso = $CONTROLADOR->obtenerNuevoProceso($db,
             $YATTA_SERVER['id']);

-    yatta_log ('Se busca un nuevo proceso.');

     //}}}
 
     //Si hay un proceso lo lanzo {{{
     if (@$proceso) {
         
     //}}}
 
     //Si hay un proceso lo lanzo {{{
     if (@$proceso) {
         

-        yatta_log ('Hay un nuevo proceso. Se forkea');
-//        $pid = pcntl_fork();
-        $pid = -1;
+        yatta_log ('Hay un nuevo proceso. Se forkea', YATTA_LOG_DEBUG);
+        $pid = pcntl_fork();

 
         //FORK ERROR {{{
         if ($pid == -1) {
 
         //FORK ERROR {{{
         if ($pid == -1) {

-            yatta_log('ERROR: No se pudo forkear.');
+            yatta_log('ERROR: No se pudo forkear.', YATTA_LOG_FATAL);

             $res = $CONTROLADOR->terminarProceso($db, $proceso['id'],
                     $YATTA_SERVER['id'], 3, 'No se pudo forkear el script.');
             if (PEAR::isError($res)) {
             $res = $CONTROLADOR->terminarProceso($db, $proceso['id'],
                     $YATTA_SERVER['id'], 3, 'No se pudo forkear el script.');
             if (PEAR::isError($res)) {

-                yatta_log('ERROR: YATTA_Controlador. '.$res->getMessage());
+                yatta_log('ERROR: YATTA_Controlador. '.$res->getMessage(),
+                        YATTA_LOG_FATAL);
+                yatta_log('Finaliza la ejecución debido a un error.', YATTA_LOG_FATAL);
+                exit;

             }
             
         }
             }
             
         }


@@ -117,88 +157,112 @@ while (1) {
 
         //FORK PADRE {{{
         elseif ($pid) {
 
         //FORK PADRE {{{
         elseif ($pid) {

-            yatta_log ('Fork Padre.');
+            yatta_log ('Fork Padre.', YATTA_LOG_DEBUG);

             //Espero a que termine el proceso.
             //Espero a que termine el proceso.

-            yatta_log ('Se espera a que termine el proceso en ejecución. Se'.
-                    ' verificara si hay que abortar el proceso cada 5 segundo.');
-            while (($wapid = pcntl_waitpid ($pid, $status, WNOHANG)) != $pid) {
+            yatta_log ('Se espera a que termine el proceso en ejecución. '.
+                    ' Verifica aborto en 5 segundos.', YATTA_LOG_DEBUG);
+
+            //Pregunto si el hijo que se forkeo arriba termino, pero pido que no
+            //corte la ejecucion (WNOHANG) para poder entrar en el while.
+            //$res sera el pid del hijo, en este caso $res = $pid.
+            while (!($res = pcntl_waitpid($pid, $status, WNOHANG))) {

                 if ($CONTROLADOR->abortar($db, $proceso['id'])) {
                 if ($CONTROLADOR->abortar($db, $proceso['id'])) {

-                    yatta_log ('Hay que abortar el proceso en ejecución.');
+                    yatta_log ('Hay que abortar el proceso en ejecución.',
+                            YATTA_LOG_WARNING);

                     posix_kill($pid, 15); //SIGTERM
                     $CONTROLADOR->terminarProceso($db, $proceso['id'],
                             $YATTA_SERVER['id'], 4);
                     posix_kill($pid, 15); //SIGTERM
                     $CONTROLADOR->terminarProceso($db, $proceso['id'],
                             $YATTA_SERVER['id'], 4);

-                    yatta_log ('Se aborto el proceso en ejecución.');
+                    yatta_log ('Se aborto el proceso en ejecución.',
+                            YATTA_LOG_WARNING);

                 }
                 }

-                sleep(10);
+                sleep(5);

             }
             }

-            yatta_log ('Fin fork Padre.');
+            yatta_log ('Fin fork Padre.', YATTA_LOG_DEBUG);

         }
         //}}}
 
         //FORK HIJO {{{
         else {
         }
         //}}}
 
         //FORK HIJO {{{
         else {

-            yatta_log ('Fork Hijo.');
+            yatta_log ('Fork Hijo.', YATTA_LOG_DEBUG);

 
 

+            //Ejecuto el proceso si existe el archivo {{{

             if (is_readable($proceso['script'])) {
                 require_once $proceso['script'];
             if (is_readable($proceso['script'])) {
                 require_once $proceso['script'];

-                yatta_log ('Se crea el proceso..');
+                yatta_log ('Se llama a create_process.', YATTA_LOG_DEBUG);
+                
+                //Llamo a la funcion create_process {{{

                 if (function_exists('create_process')) {
                     $SCRIPT =& create_process();
                 if (function_exists('create_process')) {
                     $SCRIPT =& create_process();

-                    yatta_log ('Se instancio el proceso. Se ejecuta el metodo run.');
+                    yatta_log ('Se instancio el proceso. Se ejecuta el metodo '.
+                            'run.', YATTA_LOG_DEBUG);

                     if (!method_exists($SCRIPT, 'run')) {
                     if (!method_exists($SCRIPT, 'run')) {

-                        yatta_log ('No existe el metodo run en el proceso.');
+                        yatta_log ('No existe el metodo run en el proceso.',
+                                YATTA_LOG_WARNING);

                         require_once 'YATTA/Proceso.php';
                         $SCRIPT =& new YATTA_Proceso;
                         $SCRIPT->error = 'No existe el metodo run en'. 
                             $proceso['script'];
                     }
                     else {
                         require_once 'YATTA/Proceso.php';
                         $SCRIPT =& new YATTA_Proceso;
                         $SCRIPT->error = 'No existe el metodo run en'. 
                             $proceso['script'];
                     }
                     else {

-                        yatta_log ('Comienza la ejecución del proceso.');
+                        yatta_log ('Comienza la ejecución del proceso.',
+                                YATTA_LOG_DEBUG);

                         $SCRIPT->run(unserialize($proceso['parametros']));
                         $SCRIPT->run(unserialize($proceso['parametros']));

-                        yatta_log ('Finaliza la ejecución del proceso.');
+                        yatta_log ('Finaliza la ejecución del proceso.',
+                                YATTA_LOG_DEBUG);

                     }
                 }
                     }
                 }

+                //}}}
+
+                //No existe la funcion {{{

                 else {
                     require_once 'YATTA/Proceso.php';
                     $SCRIPT =& new YATTA_Proceso;
                     $SCRIPT->error = 'No existe la funcion create_process en'.
                         $proceso['script'];
                 else {
                     require_once 'YATTA/Proceso.php';
                     $SCRIPT =& new YATTA_Proceso;
                     $SCRIPT->error = 'No existe la funcion create_process en'.
                         $proceso['script'];

+                    yatta_log($SCRIPT->error, YATTA_LOG_WARNING);

                 }
                 }

+                //}}}

 
 

+                //Finalizo el script {{{

                 if (@$SCRIPT->error) {
                     $estado = 3;
                 }
                 else {
                     $estado = 2;
                 }
                 if (@$SCRIPT->error) {
                     $estado = 3;
                 }
                 else {
                     $estado = 2;
                 }

-                $CONROLADOR->terminarProceso($db, $proceso['id'],
+                $CONTROLADOR->terminarProceso($db, $proceso['id'],

                         $YATTA_SERVER['id'], $estado, @$SCRIPT->error,
                         @$SCRIPT->archivo, @$SCRIPT->notificar);
                         $YATTA_SERVER['id'], $estado, @$SCRIPT->error,
                         @$SCRIPT->archivo, @$SCRIPT->notificar);

+                //}}}
+            

             }
             }

+            //}}}
+           
+            //No existe el archivo {{{

             else {
             else {

-                yatta_log('No se puede alcanzar el archivo.');
+                yatta_log('No se puede alcanzar el archivo '.
+                        $proceso['script'].'.', YATTA_LOG_WARNING);
+                $res = $CONTROLADOR->terminarProceso($db, $proceso['id'],
+                        $YATTA_SERVER['id'], 3, 'No se puede alcanzar el archivo.');

             }
             }

-           
+            //}}}

             
             

-            yatta_log ('Fin fork Hijo.');
+            yatta_log ('Fin fork Hijo.', YATTA_LOG_DEBUG);
+            exit;

         }
         //}}}
 
         }
         //}}}
 

+        unset($proceso);

     }
     // }}}
 
     //No hay proceso {{{
     else {
         yatta_log ('No hay procesos asignados a este servidor.'.
     }
     // }}}
 
     //No hay proceso {{{
     else {
         yatta_log ('No hay procesos asignados a este servidor.'.

-                ' En 60 segundos se buscara un nuevo proceso.');
+                ' En 60 segundos se buscara un nuevo proceso.', YATTA_LOG_DEBUG);

         sleep(60);
     }
     //}}}
 }
 //}}}
         sleep(60);
     }
     //}}}
 }
 //}}}

-
-//CIERRO EL ARCHIVO DE LOG {{{
-yatta_log ('*************** Finaliza Ejecución ***************');
-fclose ($FH);
-//}}}

 ?>
\ No newline at end of file
 ?>
\ No newline at end of file