DataObjects/Core_watch.php
[Pman.Core] / NotifySend.php
1 <?php
2 require_once 'Pman.php';
3
4 /**
5  * notification script sender - designed to be run by the Notify script - with many children running
6  * in parallel.
7  *
8  * called with an id of a core_notify element
9  *
10  * uses core_notify - to find an event to object and person.
11  *
12  * uses Events table to log failures
13  * 
14  * 
15  * calls $object->toEmail($person,$last_send, $notify) to generate an email struct with
16  *  array (
17  *      headers =>
18  *      recipients =>
19  *      body =>
20  *  )
21  * 
22  * 
23  */
24
25
26 class Pman_Core_NotifySend extends Pman
27 {
28     static $cli_desc = "Send out single notification email (usually called from  Core/Notify)";
29     
30     static $cli_opts = array(
31         'debug' => array(
32             'desc' => 'Turn on debugging (see DataObjects debugLevel )',
33             'default' => 0,
34             'short' => 'v',
35             'min' => 0,
36             'max' => 0,
37             
38         ),
39         'DB_DataObject-debug' => array(
40             'desc' => 'Turn on debugging (see DataObjects debugLevel )',
41             'default' => 0,
42             'short' => 'd',
43             'min' => 1,
44             'max' => 1,
45             
46         ),
47         'force' => array(
48             'desc' => 'Force redelivery, even if it has been sent before or not queued...',
49             'default' => 0,
50             'short' => 'f',
51             'min' => 0,
52             'max' => 0,
53         ),
54         'send-to' => array(
55             'desc' => 'Send the message to this address, rather than the one listed.',
56             'default' => '',
57             'short' => 't',
58             'min' => 0,
59             'max' => 1,
60         )
61         
62         
63         
64     );
65     var $table = 'core_notify';
66     function getAuth()
67     {
68         $ff = HTML_FlexyFramework::get();
69         if (!$ff->cli) {
70             die("access denied");
71         }
72         //HTML_FlexyFramework::ensureSingle(__FILE__, $this);
73         return true;
74         
75     }
76    
77     function get($id,$opts)
78     {
79         if ($opts['DB_DataObject-debug']) {
80             DB_DataObject::debugLevel($opts['DB_DataObject-debug']);
81         }
82         //DB_DataObject::debugLevel(1);
83         //date_default_timezone_set('UTC');
84         // phpinfo();exit;
85         $force = empty($opts['force']) ? 0 : 1;
86         
87         $w = DB_DataObject::factory($this->table);
88         
89         if (!$w->get($id)) {
90             die("invalid id\n");
91         }
92         if (!$force && strtotime($w->act_when) < strtotime($w->sent)) {
93             
94             
95             die("send repeat to early\n");
96         }
97         if (!empty($opts['debug'])) {
98             print_r($w);
99         }
100         
101         $sent = (empty($w->sent) || preg_match('/^0000/', $w->sent)) ? false : true;
102         
103         if (!$force && (!empty($w->msgid) || $sent)) {
104             $ww = clone($w);
105             if (!$sent) { 
106                 $w->sent = $w->sqlValue("NOW()");
107                 $w->update($ww);
108             }    
109             die("message has been sent already.\n");
110         }
111         
112         $o = $w->object();
113         
114         if ($o === false)  {
115             
116             $ev = $this->addEvent('NOTIFY', $w,
117                             "Notification event cleared (underlying object does not exist)" );;
118             $ww = clone($w);
119             $w->sent = date('Y-m-d H:i:s');
120             $w->msgid = '';
121             $w->event_id = $ev->id;
122             $w->update($ww);
123             die(date('Y-m-d h:i:s ') . 
124                      "Notification event cleared (underlying object does not exist)" 
125                     ."\n");
126         }
127      
128         
129         
130         $p = $w->person();
131         
132         if (isset($p->active) && empty($p->active)) {
133             $ev = $this->addEvent('NOTIFY', $w,
134                             "Notification event cleared (not user not active any more)" );;
135             $ww = clone($w);
136             $w->sent = date('Y-m-d H:i:s');
137             $w->msgid = '';
138             $w->event_id = $ev->id;
139             $w->update($ww);
140             die(date('Y-m-d h:i:s ') . 
141                      "Notification event cleared (not user not active any more)" 
142                     ."\n");
143             die("message has been sent already.\n");
144         }
145         
146         
147         // let's work out the last notification sent to this user..
148         $l = DB_DataObject::factory($this->table);
149         $l->setFrom( array(
150                 'ontable' => $w->ontable,
151                 'onid' => $w->onid,
152                 'person_id' => $w->person_id,
153         ));        
154         $l->whereAdd('id != '. $w->id);
155         $l->orderBy('sent DESC');
156         $l->limit(1);
157         $ar = $l->fetchAll('sent');
158         $last = empty($ar) ? date('Y-m-d H:i:s', 0) : $ar[0];
159         
160         // find last event..
161         $ev = DB_DataObject::factory('Events');
162         $ev->on_id = $w->id;                           // int(11)
163         $ev->on_table = $this->table;
164         $ev->limit(1);
165         $ev->orderBy('event_when DESC');
166         $ar = $ev->fetchAll('event_when');
167         $last_event = empty($ar) ? 0 : $ar[0];
168         $next_try_min = 5;
169         if ($last_event) {
170             $next_try_min = floor((time() - strtotime($last_event)) / 60) * 2;
171         }
172         $next_try = $next_try_min . ' MINUTES';
173          
174         // this may modify $p->email. (it will not update it though)
175         $email =  $this->makeEmail($o, $p, $last, $w, $force);
176         
177         if ($email === true)  {
178             
179             $ev = $this->addEvent('NOTIFY', $w,
180                             "Notification event cleared (not required any more)" );;
181             $ww = clone($w);
182             $w->sent = date('Y-m-d H:i:s');
183             $w->msgid = '';
184             $w->event_id = $ev->id;
185             $w->update($ww);
186             die(date('Y-m-d h:i:s ') . 
187                      "Notification event cleared (not required any more)" 
188                     ."\n");
189         }
190      
191        
192         
193         if ($email === false || isset($email['error'])) {
194             // object returned 'false' - it does not know how to send it..
195             $ev = $this->addEvent('NOTIFY', $w, isset($email['error'])  ?
196                             $email['error'] : "INTERNAL ERROR  - We can not handle " . $w->ontable); 
197             $ww = clone($w);
198             $w->sent = date('Y-m-d H:i:s');
199             $w->msgid = '';
200             $w->event_id = $ev->id;
201             $w->update($ww);
202             die(date('Y-m-d h:i:s ') . 
203                     (isset($email['error'])  ?
204                             $email['error'] : "INTERNAL ERROR  - We can not handle " . $w->ontable)
205                     ."\n");
206         }
207         
208         
209         if (isset($email['later'])) {
210             $old = clone($w);
211             $w->act_when = $email['later'];
212             $w->update($old);
213             die(date('Y-m-d h:i:s ') . " Delivery postponed by email creator");
214         }
215         
216          
217         if (empty($email['headers']['Message-Id'])) {
218             $HOST = gethostname();
219             $email['headers']['Message-Id'] = "<{$this->table}-{$id}@{$HOST}>";
220             
221         }
222         //$p->email = 'alan@akbkhome.com'; //for testing..
223         //print_r($email);exit;
224         // should we fetch the watch that caused it.. - which should contain the method to call..
225         // --send-to=test@xxx.com
226        
227         if (!empty($email['send-to'])) {
228             $p->email = $email['send-to'];
229         }
230          if (!empty($opts['send-to'])) {
231             $p->email = $opts['send-to'];
232         }
233         // since some of them have spaces?!?!
234         $p->email = trim($p->email);
235         
236         
237         require_once 'Validate.php';
238         if (!Validate::email($p->email, true)) {
239             $ev = $this->addEvent('NOTIFY', $w, "INVALID ADDRESS: " . $p->email);
240             $ww = clone($w);
241             $w->sent = date('Y-m-d H:i:s');
242             $w->msgid = '';
243             $w->event_id = $ev->id;
244             $w->update($ww);
245             die(date('Y-m-d h:i:s ') . "INVALID ADDRESS: " . $p->email. "\n");
246             
247         }
248         
249         
250         $ff = HTML_FlexyFramework::get();
251         
252         
253         $dom = array_pop(explode('@', $p->email));
254         
255         $mxs = $this->mxs($dom);
256         $ww = clone($w);
257
258         // we might fail doing this...
259         // need to handle temporary failure..
260        
261         
262           // we try for 3 days..
263         $retry = 5;
264         if (strtotime($w->act_start) <  strtotime('NOW - 1 HOUR')) {
265             // older that 1 hour.
266             $retry = 15;
267         }
268         
269         if (strtotime($w->act_start) <  strtotime('NOW - 1 DAY')) {
270             // older that 1 day.
271             $retry = 60;
272         }
273         if (strtotime($w->act_start) <  strtotime('NOW - 2 DAY')) {
274             // older that 1 day.
275             $retry = 120;
276         }
277         
278         if ($mxs === false) {
279             // only retry for 2 day son the MX issue..
280             if ($retry < 120) {
281                 $this->addEvent('NOTIFY', $w, 'MX LOOKUP FAILED ' . $dom . ' ' . $res->toString());
282                 $w->act_when = date('Y-m-d H:i:s', strtotime('NOW + ' . $retry . ' MINUTES'));
283                 $w->update($ww);
284                 die(date('Y-m-d h:i:s') . " - GREYLISTED\n");
285             }
286             
287             $ev = $this->addEvent('NOTIFY', $w, "BAD ADDRESS - ". $p->email );
288             $w->sent = date('Y-m-d H:i:s');
289             $w->msgid = '';
290             $w->event_id = $ev->id;
291             $w->update($ww);
292             die(date('Y-m-d h:i:s') . " - FAILED -  BAD EMAIL - {$p->email} \n");
293             
294             
295         }
296         
297         
298         
299         
300         if (!$force && strtotime($w->act_start) <  strtotime('NOW - 14 DAY')) {
301             $ev = $this->addEvent('NOTIFY', $w, "BAD ADDRESS - ". $p->email );
302             $w->sent = date('Y-m-d H:i:s');
303             $w->msgid = '';
304             $w->event_id = $ev->id;
305             $w->update($ww);
306             die(date('Y-m-d h:i:s') . " - FAILED -  GAVE UP TO OLD - {$p->email} \n");
307         }
308         
309         
310         
311         $w->to_email = $p->email; 
312         //$this->addEvent('NOTIFY', $w, 'GREYLISTED ' . $p->email . ' ' . $res->toString());
313         $w->act_when = date('Y-m-d H:i:s', strtotime('NOW + ' . $retry . ' MINUTES'));
314         $w->update($ww);
315         
316         $ww = clone($w);   
317         
318         $fail = false;
319         require_once 'Mail.php';
320         
321         foreach($mxs as $dom) {
322             
323             
324             
325             if (!isset($ff->Mail['helo'])) {
326                 die("config Mail[helo] is not set");
327             }
328             
329             $this->debug("Trying SMTP: $dom / HELO {$ff->Mail['helo']}");
330             $mailer = Mail::factory('smtp', array(
331                     'host'    => $dom ,
332                     'localhost' => $ff->Mail['helo'],
333                     'timeout' => 15,
334                     'socket_options' =>  isset($ff->Mail['socket_options']) ? $ff->Mail['socket_options'] : null
335                   //  'debug' => true
336                 ));
337             $res = $mailer->send($p->email, $email['headers'], $email['body']);
338              
339             
340             if ($res === true) {
341                 // success....
342                 
343                 $ev = $this->addEvent('NOTIFYSENT', $w, "{$w->to_email} - {$email['headers']['Subject']}");
344                
345                 
346                 
347                 $w->sent = date('Y-m-d H:i:s');
348                 $w->msgid = $email['headers']['Message-Id'];
349                 $w->event_id = $ev->id; // sent ok.. - no need to record it..
350                 $w->update($ww);
351                 
352                 // enable cc in notify..
353                 if (!empty($email['headers']['Cc'])) {
354                     $mailer = Mail::factory('smtp', array(
355                        //'host'    => $dom ,
356                       //  'debug' => true
357                     ));
358                     $email['headers']['Subject'] = "(CC): " . $email['headers']['Subject'];
359                     $mailer->send($email['headers']['Cc'],
360                                   $email['headers'], $email['body']);
361                     
362                 }
363                 
364                 if (!empty($email['bcc'])) {
365                     $mailer = Mail::factory('smtp', array(
366                        //'host'    => $dom ,
367                       //  'debug' => true
368                     ));
369                     $email['headers']['Subject'] = "(CC): " . $email['headers']['Subject'];
370                     $mailer->send($email['bcc'],
371                                   $email['headers'], $email['body']);
372                     
373                 }
374                 
375                 
376                 die(date('Y-m-d h:i:s') . " - SENT\n");
377             }
378             // what type of error..
379             $code = empty($res->userinfo['smtpcode']) ? -1 : $res->userinfo['smtpcode'];
380             if (!empty($res->code) && $res->code == 10001) {
381                 // fake greylist if timed out.
382                 $code = 421;
383             }
384             
385             if ($code < 0) {
386                 $this->debug($res->message);
387                 continue; // try next mx... ??? should we wait??? - nope we did not even connect..
388             }
389             // give up after 2 days..
390             if (in_array($code, array( 421, 450, 451, 452))   && $next_try_min < (2*24*60)) {
391                 // try again later..
392                 // check last event for this item..
393                 $errmsg=  $fail ? ($res->userinfo['smtpcode'] . ': ' .$res->toString()) :  " - UNKNOWN ERROR";
394                 if (isset($res->userinfo['smtptext'])) {
395                     $errmsg=  $res->userinfo['smtpcode'] . ':' . $res->userinfo['smtptext'];
396                 }
397                 //print_r($res);
398                 $this->addEvent('NOTIFY', $w, 'GREYLISTED - ' . $errmsg);
399                 $w->act_when = date('Y-m-d H:i:s', strtotime('NOW + ' . $retry . ' MINUTES'));
400                 $w->update($ww);
401                 die(date('Y-m-d h:i:s') . " - GREYLISTED\n");
402             }
403             $fail = true;
404             break;
405         }
406         if ($fail || $next_try_min > (2*24*60)) {
407         // fail.. = log and give up..
408             $errmsg=  $fail ? ($res->userinfo['smtpcode'] . ': ' .$res->toString()) :  " - UNKNOWN ERROR";
409             if (isset($res->userinfo['smtptext'])) {
410                 $errmsg=  $res->userinfo['smtpcode'] . ':' . $res->userinfo['smtptext'];
411             }
412             
413             $ev = $this->addEvent('NOTIFY', $w, ($fail ? "FAILED - " : "RETRY TIME EXCEEDED - ") .
414                        $errmsg);
415             $w->sent = date('Y-m-d H:i:s');
416             $w->msgid = '';
417             $w->event_id = $ev->id;
418             $w->update($ww);
419             die(date('Y-m-d h:i:s') . ' - FAILED - '. ($fail ? $res->toString() : "RETRY TIME EXCEEDED\n"));
420         }
421         
422         // handle no host availalbe forever...
423         if (strtotime($w->act_start) < strtotime('NOW - 3 DAYS')) {
424             $ev = $this->addEvent('NOTIFY', $w, "RETRY TIME EXCEEDED - ". $p->email);
425             $w->sent = date('Y-m-d H:i:s');
426             $w->msgid = '';
427             $w->event_id = $ev->id;
428             $w->update($ww);
429             die(date('Y-m-d h:i:s') . " - FAILED - RETRY TIME EXCEEDED\n");
430             
431             
432         }
433         
434         
435         $this->addEvent('NOTIFY', $w, 'NO HOST CAN BE CONTACTED:' . $p->email);
436         $w->act_when = date('Y-m-d H:i:s', strtotime('NOW + 5 MINUTES'));
437         $w->update($ww);
438         die(date('Y-m-d h:i:s') ." - NO HOST AVAILABLE\n");
439
440         
441     }
442     function mxs($fqdn)
443     {
444         $mx_records = array();
445         $mx_weight = array();
446         $mxs = array();
447         if (!getmxrr($fqdn, $mx_records, $mx_weight)) {
448             if (!checkdnsrr($fqdn)) {
449                 return false;
450             }
451             return array($fqdn);
452         }
453         
454         asort($mx_weight,SORT_NUMERIC);
455         
456         foreach($mx_weight as $k => $weight) {
457             $mxs[] = $mx_records[$k];
458         }
459         return $mxs;
460     }
461     
462     /**
463      * wrapper to call object->toEmail()
464      *
465      * return
466      *   {
467         headers : {AssocArray},
468         body: {String}
469         
470         // optional..
471         error :  {String} // error message in log.
472         send-to: {String} // use to override rcpt
473          
474      }
475      **/
476     function makeEmail($object, $rcpt, $last_sent_date, $notify, $force =false)
477     {
478         $m = 'notify'. $notify->evtype;
479         //var_dump($m);
480         
481         if (!empty($notify->evtype) && method_exists($object,$m)) {
482             return $object->$m($rcpt, $last_sent_date, $notify, $force);
483         }
484                 
485         if (!method_exists($object, 'toEmail')) {
486             //var_Dump($object);
487             //exit;
488         }
489         return $object->toEmail($rcpt, $last_sent_date, $notify, $force);
490     }
491     
492     function debug($str)
493     {
494         if (empty($this->cli_args['debug'])) {
495             return;
496             
497         }
498         echo $str . "\n";
499     }
500     function output()
501     {
502         die("done\n");
503     }
504 }