Notify.php
[Pman.Core] / Notify.php
1 <?php
2 require_once 'Pman.php';
3
4 /**
5  * notification script runner
6  *
7  * This does not actualy send stuf out, it only starts the NotifySend/{id}
8  * which does the actuall notifcations.
9  *
10  * It manages a pool of notifiers.
11  * 
12  * 
13  */
14
15
16 class Pman_Core_Notify extends Pman
17 {
18     
19     static $cli_desc = "Runs the notification queue (usually from cron)
20                         Normally used to sends out emails to anyone in the notification list.
21     
22                         /etc/cron.d/pman-core-notify
23                         * *  * * *     www-data     /usr/bin/php /home/gitlive/web.mtrack/admin.php  Core/Notify > /dev/null
24     
25 ";
26     
27     static $cli_opts = array(
28         'debug' => array(
29             'desc' => 'Turn on debugging (see DataObjects debugLevel )',
30             'default' => 0,
31             'short' => 'v',
32             'min' => 1,
33             'max' => 1,
34             
35         ),
36         'list' => array(
37             'desc' => 'List message to send, do not send them..',
38             'default' => 0,
39             'short' => 'l',
40             'min' => 0,
41             'max' => 0,
42             
43         ),
44         'old' => array(
45             'desc' => 'Show old messages..',
46             'default' => 0,
47             'short' => 'o',
48             'min' => 0,
49             'max' => 0,
50             
51         ),
52         'force' => array(
53             'desc' => 'Force redelivery, even if it has been sent before or not queued...',
54             'default' => 0,
55             'short' => 'f',
56             'min' => 0,
57             'max' => 0,
58         ),
59         'generate' => array(
60             'desc' => 'Generate notifications for a table, eg. cash_invoice',
61             'default' => '',
62             'short' => 'g',
63             'min' => 0,
64             'max' => 1,
65         ),
66          'limit' => array(
67             'desc' => 'Limit search for no. to send to ',
68             'default' => 50,
69             'short' => 'L',
70             'min' => 0,
71             'max' => 999,
72         ),
73         'dryrun' => array(
74             'desc' => 'Dry run - do not send.',
75             'default' => 0,
76             'short' => 'D',
77             'min' => 0,
78             'max' => 0,
79         ),
80         'poolsize' => array(
81             'desc' => 'Pool size',
82             'default' => 10,
83             'short' => 'P',
84             'min' => 0,
85             'max' => 100,
86         ),
87     );
88     
89     var $max_pool_size = 10;
90     
91     var $table = 'core_notify';
92     var $target = 'Core/NotifySend';
93     var $evtype = ''; // any notification...
94                     // this script should only handle EMAIL notifications..
95     var $force = false;
96     function getAuth()
97     {
98         $ff = HTML_FlexyFramework::get();
99         if (!$ff->cli) {
100             die("access denied");
101         }
102         HTML_FlexyFramework::ensureSingle(__FILE__, $this);
103         return true;
104         
105     }
106     
107     var $pool = array();
108     
109     function get($r,$opts)    
110     {
111         if ($opts['debug']) {
112             DB_DataObject::debugLevel($opts['debug']);
113             print_r($opts);
114         }
115         $this->opts = $opts;
116         if (!empty($opts['poolsize'])) {
117             $this->max_pool_size = $opts['poolsize'];
118         }
119         
120         if (empty($opts['limit'])) {
121             $opts['limit'] = '1000';
122         }
123         //date_default_timezone_set('UTC');
124        // phpinfo();exit;
125         $showold = !empty($opts['old']);
126         if (!empty($opts['old'])) {
127             $opts['list'] = 1; // force listing..
128         }
129         
130         $this->force = empty($opts['force']) ? 0 : 1;
131      
132         if (!empty($opts['send-to'])) {
133             $this->send_to = $opts['send-to'];
134         }
135      
136         
137         $w = DB_DataObject::factory('core_notify_recur');
138         if (is_a($w, 'DB_DataObject')) {
139             $w->generateNotifications();
140         }
141         if (!empty($opts['generate'])) {
142             $w = DB_DataObject::factory($opts['generate']);
143             if (is_a($w, 'DB_DataObject')) {
144                 $w->generateNotifications();
145             }
146             exit;
147             
148             
149         }
150      
151         //DB_DataObject::debugLevel(1);
152         $w = DB_DataObject::factory($this->table);
153         
154         if (!$showold) {
155             
156             // standard
157             
158             //$w->whereAdd('act_when > sent'); // eg.. sent is not valid..
159             $w->whereAdd("sent < '1970-01-01'"); // eg.. sent is not valid..
160             
161             $w->whereAdd('act_start > NOW() - INTERVAL 14 DAY'); // ignore the ones stuck in the queue
162             if (!$this->force) {
163                 $w->whereAdd('act_when < NOW()'); // eg.. not if future..
164             }
165     
166             $w->orderBy('act_when ASC'); // oldest first.
167             
168             echo "QUEUE is {$w->count()}\n";
169             
170             $w->limit($opts['limit']); // we can run 1000 ...
171         } else {
172             $w->orderBy('act_when DESC'); // latest first
173             $w->limit($opts['limit']); // we can run 1000 ...
174         }
175         if (!empty($this->evtype)) {
176             $w->evtype = $this->evtype;
177         }
178         
179         $w->autoJoin();
180         
181         
182         $ar = $w->fetchAll();
183         
184         if (!empty($opts['list'])) {
185             if (empty($ar)) {
186                 die("Nothing in Queue\n");
187             }
188             foreach($ar as $w) {
189                 $o = $w->object();
190                 
191                 
192                 echo "$w->id : $w->person_id_email email    : ".
193                         $o->toEventString()."    ". $w->status() . "\n";
194             }
195             exit;
196         }
197         
198         //echo "BATCH SIZE: ".  count($ar) . "\n";
199         $pushed = array();
200         while (true) {
201             
202             
203             echo "BATCH SIZE: ".  count($ar) . "\n";
204             
205             if (empty($ar)) {
206                 if (empty($pushed)) {
207                     break;
208                 }
209                 $ar = $pushed;
210                 $pushed = array();
211                 break;
212             }
213             
214             
215             $p = array_shift($ar);
216             if (!$this->poolfree()) {
217                 array_unshift($ar,$p); /// put it back on..
218                 sleep(3);
219                 continue;
220             }
221             if ($this->poolHasDomain($p->person_id_email)) {
222                 
223                 $pushed[] = $p;
224                 
225                 
226                 //sleep(3);
227                 continue;
228             }
229             
230             
231             $this->run($p->id,$p->person_id_email);
232             
233             
234             
235         }
236         
237         // we should have a time limit here...
238         while(count($this->pool)) {
239             $this->poolfree();
240              sleep(3);
241         }
242         
243         die("DONE\n");
244     }
245     
246     function run($id, $email, $cmdOpts="")
247     {
248        // phpinfo();exit;
249         $tn = tempnam(ini_get('session.save_path'),'stdout') . '.stdout';
250         $descriptorspec = array(
251             0 => array("pipe", 'r'),  // stdin is a pipe that the child will read from
252             1 => array("file", $tn, 'w'),  // stdout is a pipe that the child will write to
253             2 => array("pipe", "w") // stderr is a file to write to
254          );
255         $php = $_SERVER["_"];
256         $sn =  $_SERVER["SCRIPT_NAME"];
257         
258         $cwd = $sn[0] == '/' ? dirname($sn) : dirname(realpath(getcwd() . '/'. $sn)); // same as run on.. (so script should end up being same relatively..)
259         $app = $cwd . '/' . basename($_SERVER["SCRIPT_NAME"]) . '  ' . $this->target . '/'. $id;
260         if ($this->force) {
261             $app .= ' -f';
262         }
263         if (!empty($this->send_to)) {
264             $app .= ' --sent-to='.escapeshellarg($this->send_to);
265         }
266         $cmd = 'exec ' . $php . ' ' . $app . ' ' . $cmdOpts; //. ' &';
267         
268        
269         $pipe = array();
270         echo "call proc_open $cmd\n";
271         
272         
273         if (!empty($this->opts['dryrun'])) {
274             echo "DRY RUN\n";
275             return;
276         }
277         
278         $p = proc_open($cmd, $descriptorspec, $pipes, $cwd );
279         $info =  proc_get_status($p);
280         $this->pool[] = array(
281                 'proc' => $p,
282                 'pid' => $info['pid'],
283                 'out' => $tn,
284                 'cmd' => $cmd,
285                 'email' => $email,
286                 'pipes' => $pipes,
287                 'started' => time()
288             
289                 
290         );
291         echo "RUN ({$info['pid']}) $cmd  \n";
292     }
293     
294     function poolfree()
295     {
296         $pool = array();
297         clearstatcache();
298         $maxruntime = 2 * 60; // 2 minutes.. ?? should be long enoguh
299         
300         foreach($this->pool as $p) {
301              
302             //echo "CHECK PID: " . $p['pid'] . "\n";
303             $info =  proc_get_status($p['proc']);
304             //var_dump($info);
305             
306             // update if necessday.
307             if ($info['pid'] && $p['pid'] != $info['pid']) {
308                 echo "CHANING PID FROM " . $p['pid']  .  "  TO ". $info['pid']. "\n";
309                 $p['pid'] = $info['pid'];
310             }
311             
312             //echo @file_get_contents('/proc/'. $p['pid'] .'/cmdline') . "\n";
313             
314             if ($info['running']) {
315             
316                 //if (file_exists('/proc/'.$p['pid'])) {
317                 $runtime = time() - $p['started'];
318                 //echo "RUNTIME ({$p['pid']}): $runtime\n";
319                 if ($runtime > $maxruntime) {
320                     
321                     proc_terminate($p['proc'], 9);
322                     //fclose($p['pipes'][1]);
323                     fclose($p['pipes'][0]);
324                     fclose($p['pipes'][2]);
325                     echo "\nTERMINATING: ({$p['pid']}) " . $p['cmd'] . " : " . file_get_contents($p['out']) . "\n";
326                     @unlink($p['out']);
327                     
328                     continue;
329                 }
330                 
331                 $pool[] = $p;
332                 continue;
333             }
334             fclose($p['pipes'][0]);
335             fclose($p['pipes'][2]);
336             //echo "CLOSING: ({$p['pid']}) " . $p['cmd'] . " : " . file_get_contents($p['out']) . "\n";
337             //fclose($p['pipes'][1]);
338             
339             proc_close($p['proc']);
340             
341             
342             //clearstatcache();
343             //if (file_exists('/proc/'.$p['pid'])) {
344             //    $pool[] = $p;
345             //    continue;
346             //}
347             echo "\nENDED: ({$p['pid']}) " .  $p['cmd'] . " : " . file_get_contents($p['out']) . "\n";
348             @unlink($p['out']);
349             //unlink($p['out']);
350         }
351         echo "POOL SIZE: ". count($pool) ."\n";
352         $this->pool = $pool;
353         if (count($pool) < $this->max_pool_size) {
354             return true;
355         }
356         return false;
357         
358     }
359     /**
360      * see if pool is already trying to deliver to this domain.?
361      * -- if so it get's pushed to the end of the queue.
362      *
363      */
364     function poolHasDomain($email)
365     {
366         $dom = strtolower(array_pop(explode('@',$email)));
367         foreach($this->pool as $p) {
368             $mdom = strtolower(array_pop(explode('@',$p['email'])));
369             if ($mdom == $dom) {
370                 return true;
371             }
372         }
373         return false;
374         
375     }
376
377     function output()
378     {
379         die("Done\n");
380     }
381 }