DataObjects/Core_watch.php
[Pman.Core] / Mailer.php
1 <?php
2
3 /**
4  *
5  *  code that used to be in Pman (sendTemplate / emailTemplate)
6  * 
7  *  template is in template directory subfolder 'mail'
8  *   
9  *  eg. use 'welcome' as template -> this will use templates/mail/welcome.txt
10  *  if you also have templates/mail/welcome.body.html - then that will be used as 
11  *     the html body
12  * 
13  *
14  *  usage:
15  *
16  *
17  *  $x= new Pman_Core_Mailer($opts)
18  *
19  *  $opts[
20        page => 
21        contents
22        template
23        replaceImages => true|false,
24        rcpts => array()   // override recipients..
25     ]
26  *
27  *  recipents is gathered from the resulting template
28  *   -- eg.
29  *    To: <a>,<b>,<c>
30  * 
31  * 
32  *  if the file     '
33  * 
34  * 
35  *  $x->asData(); // returns data needed for notify?? - notify should really
36  *                  // just use this to pass around later..
37  *
38  *  $x->send();
39  *
40  */
41
42 class Pman_Core_Mailer {
43     
44     var $page           = false; /* usually a html_flexyframework_page */
45     var $contents       = false; /* object or array */
46     var $template       = false; /* string */
47     var $replaceImages  = false; /* boolean */
48     var $rcpts   = false;
49     var $templateDir = false;
50     
51     var $images         = array(); // generated list of cid images for sending
52     
53     
54     function Pman_Core_Mailer($args) {
55         foreach($args as $k=>$v) {
56             // a bit trusting..
57             $this->$k =  $v;
58         }
59     }
60      
61     /**
62      * ---------------- Global Tools ---------------   
63      */
64     
65     function toData()
66     {
67     
68         $templateFile = $this->template;
69         $args = $this->contents;
70         
71         $content  = clone($this->page);
72         
73         foreach((array)$args as $k=>$v) {
74             $content->$k = $v;
75         }
76         
77         $content->msgid = empty($content->msgid ) ? md5(time() . rand()) : $content->msgid ;
78         
79         $ff = HTML_FlexyFramework::get();
80         $http_host = isset($_SERVER["HTTP_HOST"]) ? $_SERVER["HTTP_HOST"] : 'pman.HTTP_HOST.not.set';
81         if (isset($ff->Pman['HTTP_HOST'])) {
82             $http_host  = $ff->Pman['HTTP_HOST'];
83         }
84         
85         
86         $content->HTTP_HOST = $http_host;
87         
88         
89         
90         // this should be done by having multiple template sources...!!!
91         
92         require_once 'HTML/Template/Flexy.php';
93         
94         $tmp_opts = array();
95         if (!empty($this->templateDir)) {
96             $tmp_opts['templateDir'] = $this->templateDir;
97         }
98         
99         
100         $htmlbody = false;
101         $htmltemplate = new HTML_Template_Flexy( $tmp_opts );
102
103         if (is_string($htmltemplate->resolvePath('mail/'.$templateFile.'.body.html')) ) {
104             // then we have a multi-part email...
105             
106             
107             $htmltemplate->compile('mail/'. $templateFile.'.body.html');
108             $htmlbody =  $htmltemplate->bufferedOutputObject($content);
109             
110             // for the html body, we may want to convert the attachments to images.
111             
112             $htmlbody = $this->htmlbodytoCID($htmlbody);
113             
114               
115         }
116         
117         $tmp_opts['nonHTML'] = true;
118         
119         $template = new HTML_Template_Flexy(  $tmp_opts );
120         
121         $template->compile('mail/'. $templateFile.'.txt');
122         
123         /* use variables from this object to ouput data. */
124         $mailtext = $template->bufferedOutputObject($content);
125         
126         
127         
128         
129         
130         
131         
132         
133         
134         
135         //echo "<PRE>";print_R($mailtext);
136         
137         /* With the output try and send an email, using a few tricks in Mail_MimeDecode. */
138         require_once 'Mail/mimeDecode.php';
139         require_once 'Mail.php';
140         
141         $decoder = new Mail_mimeDecode($mailtext);
142         $parts = $decoder->getSendArray();
143         if (PEAR::isError($parts)) {
144             return $parts;
145             //echo "PROBLEM: {$parts->message}";
146             //exit;
147         } 
148         
149         
150         
151         
152         $parts[1]['Message-Id'] = '<' .   $content->msgid   .
153                                      '@' . $content->HTTP_HOST .'>';
154         
155         
156         
157         
158         if ($htmlbody !== false) {
159             require_once 'Mail/mime.php';
160             $mime = new Mail_mime(array('eol' => "\n"));
161             
162             $mime->setTXTBody($parts[2]);
163             $mime->setHTMLBody($htmlbody);
164             
165             foreach($this->images as $cid=>$cdata) { 
166             
167                 $mime->addHTMLImage(
168                     $cdata['file'],
169                      $cdata['mimetype'],
170                      $cid.'.'.$cdata['ext'],
171                     true,
172                     $cdata['contentid']
173                 );
174             }
175             $parts[2] = $mime->get();
176             $parts[1] = $mime->headers($parts[1]);
177         
178         }
179         
180         
181         
182        // list($recipents,$headers,$body) = $parts;
183         return array(
184             'recipents' => $parts[0],
185             'headers' => $parts[1],
186             'body' => $parts[2]
187         );
188     }
189     function send()
190     {
191         
192         $email = $this->toData();
193         if (is_a($email, 'PEAR_Error')) {
194             return $email;
195         }
196         ///$recipents = array($this->email);
197         $mailOptions = PEAR::getStaticProperty('Mail','options');
198         $mail = Mail::factory("SMTP",$mailOptions);
199         $headers['Date'] = date('r'); 
200         if (PEAR::isError($mail)) {
201             return $mail;
202         } 
203         $rcpts = $this->rcpts == false ? $email['recipents'] : $this->rcpts;
204         
205         if (!empty($this->contents['bcc']) && is_array($this->contents['bcc'])) {
206             $rcpts =array_merge(is_array($rcpts) ? $rcpts : array($rcpts), $this->contents['bcc']);
207         }
208         
209         $oe = error_reporting(E_ALL & ~E_NOTICE & ~E_STRICT);
210         $ret = $mail->send($rcpts,$email['headers'],$email['body']);
211         error_reporting($oe);
212        
213         return $ret;
214     }
215     
216     function htmlbodytoCID($html)
217     {
218         $dom = new DOMDocument;
219         $dom->loadHTML($html);
220         $imgs= $dom->getElementsByTagName('img');
221         
222         foreach ($imgs as $i=>$img) {
223             $url  = $img->getAttribute('src');
224             $conv = $this->fetchImage($url);
225             $this->images[$conv['contentid']] = $conv;
226             
227             $img->setAttribute('src', 'cid:' . $conv['contentid']);
228             
229             
230         }
231         return $dom->saveHTML();
232         
233         
234         
235     }
236     function fetchImage($url)
237     {
238         
239         if ($url[0] == '/') {
240             $file = $this->page->rootDir . $url;
241             require_once 'File/MimeType.php';
242             $m  = new File_MimeType();
243             $mt = $m->fromFilename($file);
244             $ext = $m->toExt($mt); 
245             
246             return array(
247                     'mimetype' => $mt,
248                    'ext' => $ext,
249                    'contentid' => md5($file),
250                    'file' => $file
251             );
252             
253             
254             
255         }
256         
257         //print_R($url); exit;
258         
259         
260         if (preg_match('#^file:///#', $url)) {
261             $file = preg_replace('#^file://#', '', $url);
262             require_once 'File/MimeType.php';
263             $m  = new File_MimeType();
264             $mt = $m->fromFilename($file);
265             $ext = $m->toExt($mt); 
266             
267             return array(
268                     'mimetype' => $mt,
269                    'ext' => $ext,
270                    'contentid' => md5($file),
271                    'file' => $file
272             );
273             
274         }
275         
276         // CACHE???
277         // 2 files --- the info file.. and the actual file...
278         $cache = ini_get('session.save_path').'/Pman_Core_Mailer/' . md5($url);
279         if (file_exists($cache) and filemtime($cache) > strtotime('NOW - 1 WEEK')) {
280             $ret =  json_decode($cache);
281             $ret['file'] = $cache . '.data';
282             return $ret;
283         }
284         if (!file_exists(dirname($cache))) {
285             mkdir(dirname($cache),0666, true);
286         }
287         
288         require_once 'HTTP/Request.php';
289         $a = new HTTP_Request($url);
290         $a->sendRequest();
291         file_put_contents($cache .'.data', $a->getResponseBody());
292         
293         $mt = $a->getResponseHeader('Content-Type');
294         
295         require_once 'File/MimeType.php';
296         $m  = new File_MimeType();
297         $ext = $m->toExt($mt);
298         
299         $ret = array(
300             'mimetype' => $mt,
301             'ext' => $ext,
302             'contentid' => md5($url)
303             
304         );
305         
306         file_put_contents($cache, json_encode($ret));
307         $ret['file'] = $cache . '.data';
308         return $ret;
309     }  
310     
311     
312     
313 }