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