DataObjects/Core_notify.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     var $debug          = false;
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 //            var_dump($htmlbody);exit;
112             $htmlbody = $this->htmlbodytoCID($htmlbody);
113             
114               
115         }
116         $tmp_opts['nonHTML'] = true;
117         // $tmp_opts['force'] = true;
118         $template = new HTML_Template_Flexy(  $tmp_opts );
119         
120         $template->compile('mail/'. $templateFile.'.txt');
121         
122         /* use variables from this object to ouput data. */
123         $mailtext = $template->bufferedOutputObject($content);
124         //print_r($mailtext);exit;
125        
126         
127         
128         //echo "<PRE>";print_R($mailtext);
129         
130         /* With the output try and send an email, using a few tricks in Mail_MimeDecode. */
131         require_once 'Mail/mimeDecode.php';
132         require_once 'Mail.php';
133         
134         $decoder = new Mail_mimeDecode($mailtext);
135         $parts = $decoder->getSendArray();
136         if (PEAR::isError($parts)) {
137             return $parts;
138             //echo "PROBLEM: {$parts->message}";
139             //exit;
140         } 
141         
142         
143         
144         
145         $parts[1]['Message-Id'] = '<' .   $content->msgid   .
146                                      '@' . $content->HTTP_HOST .'>';
147         
148         
149         
150         
151         if ($htmlbody !== false) {
152             require_once 'Mail/mime.php';
153             $mime = new Mail_mime(array('eol' => "\n",
154 //                                    'html_encoding' => 'base64',
155                                     'html_charset' => 'utf-8',
156                                     'text_charset' => 'utf-8',
157                                     'head_charset' => 'utf-8'
158                 ));
159             
160             $mime->setTXTBody($parts[2]);
161             $mime->setHTMLBody($htmlbody);
162 //            var_dump($mime);exit;
163             foreach($this->images as $cid=>$cdata) { 
164             
165                 $mime->addHTMLImage(
166                     $cdata['file'],
167                      $cdata['mimetype'],
168                      $cid.'.'.$cdata['ext'],
169                     true,
170                     $cdata['contentid']
171                 );
172             }
173             $parts[2] = $mime->get();
174             $parts[1] = $mime->headers($parts[1]);
175         
176         }
177         
178        // list($recipents,$headers,$body) = $parts;
179         return array(
180             'recipents' => $parts[0],
181             'headers' => $parts[1],
182             'body' => $parts[2]
183         );
184     }
185     function send()
186     {
187         
188         $email = $this->toData();
189         if (is_a($email, 'PEAR_Error')) {
190             return $email;
191         }
192         if ($this->debug) {
193             echo '<PRE>';echo htmlspecialchars(print_r($email,true));
194         }
195         ///$recipents = array($this->email);
196         $mailOptions = PEAR::getStaticProperty('Mail','options');
197         //print_R($mailOptions);exit;
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('<?xml encoding="UTF-8">' .$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             $ff = HTML_FlexyFramework::get();
241             $file = $ff->rootDir . $url;
242             require_once 'File/MimeType.php';
243             $m  = new File_MimeType();
244             $mt = $m->fromFilename($file);
245             $ext = $m->toExt($mt); 
246             
247             return array(
248                     'mimetype' => $mt,
249                    'ext' => $ext,
250                    'contentid' => md5($file),
251                    'file' => $file
252             );
253             
254             
255             
256         }
257         
258         //print_R($url); exit;
259         
260         
261         if (preg_match('#^file:///#', $url)) {
262             $file = preg_replace('#^file://#', '', $url);
263             require_once 'File/MimeType.php';
264             $m  = new File_MimeType();
265             $mt = $m->fromFilename($file);
266             $ext = $m->toExt($mt); 
267             
268             return array(
269                     'mimetype' => $mt,
270                    'ext' => $ext,
271                    'contentid' => md5($file),
272                    'file' => $file
273             );
274             
275         }
276         
277         // CACHE???
278         // 2 files --- the info file.. and the actual file...
279         // add user
280         // unix only...
281         $uinfo = posix_getpwuid( posix_getuid () ); 
282         $user = $uinfo['name']; 
283         
284         $cache = ini_get('session.save_path')."/Pman_Core_Mailer-{$user}/" . md5($url);
285         if (file_exists($cache) and filemtime($cache) > strtotime('NOW - 1 WEEK')) {
286             $ret =  json_decode($cache);
287             $ret['file'] = $cache . '.data';
288             return $ret;
289         }
290         if (!file_exists(dirname($cache))) {
291             mkdir(dirname($cache),0700, true);
292         }
293         
294         require_once 'HTTP/Request.php';
295         $a = new HTTP_Request($url);
296         $a->sendRequest();
297         file_put_contents($cache .'.data', $a->getResponseBody());
298         
299         $mt = $a->getResponseHeader('Content-Type');
300         
301         require_once 'File/MimeType.php';
302         $m  = new File_MimeType();
303         $ext = $m->toExt($mt);
304         
305         $ret = array(
306             'mimetype' => $mt,
307             'ext' => $ext,
308             'contentid' => md5($url)
309             
310         );
311         
312         file_put_contents($cache, json_encode($ret));
313         $ret['file'] = $cache . '.data';
314         return $ret;
315     }  
316     
317     
318     
319 }