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             
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             
155             $mime->setTXTBody($parts[2]);
156             $mime->setHTMLBody($htmlbody);
157             
158             foreach($this->images as $cid=>$cdata) { 
159             
160                 $mime->addHTMLImage(
161                     $cdata['file'],
162                      $cdata['mimetype'],
163                      $cid.'.'.$cdata['ext'],
164                     true,
165                     $cdata['contentid']
166                 );
167             }
168             $parts[2] = $mime->get();
169             $parts[1] = $mime->headers($parts[1]);
170         
171         }
172         
173        // list($recipents,$headers,$body) = $parts;
174         return array(
175             'recipents' => $parts[0],
176             'headers' => $parts[1],
177             'body' => $parts[2]
178         );
179     }
180     function send()
181     {
182         
183         $email = $this->toData();
184         if (is_a($email, 'PEAR_Error')) {
185             return $email;
186         }
187         if ($this->debug) {
188             echo '<PRE>';echo htmlspecialchars(print_r($email,true));
189         }
190         ///$recipents = array($this->email);
191         $mailOptions = PEAR::getStaticProperty('Mail','options');
192         //print_R($mailOptions);exit;
193         $mail = Mail::factory("SMTP",$mailOptions);
194         $headers['Date'] = date('r'); 
195         if (PEAR::isError($mail)) {
196             return $mail;
197         } 
198         $rcpts = $this->rcpts == false ? $email['recipents'] : $this->rcpts;
199         
200         if (!empty($this->contents['bcc']) && is_array($this->contents['bcc'])) {
201             $rcpts =array_merge(is_array($rcpts) ? $rcpts : array($rcpts), $this->contents['bcc']);
202         }
203         
204         $oe = error_reporting(E_ALL & ~E_NOTICE & ~E_STRICT);
205         $ret = $mail->send($rcpts,$email['headers'],$email['body']);
206         error_reporting($oe);
207        
208         return $ret;
209     }
210     
211     function htmlbodytoCID($html)
212     {
213         $dom = new DOMDocument;
214         $dom->loadHTML($html);
215         $imgs= $dom->getElementsByTagName('img');
216         
217         foreach ($imgs as $i=>$img) {
218             $url  = $img->getAttribute('src');
219             $conv = $this->fetchImage($url);
220             $this->images[$conv['contentid']] = $conv;
221             
222             $img->setAttribute('src', 'cid:' . $conv['contentid']);
223             
224             
225         }
226         return $dom->saveHTML();
227         
228         
229         
230     }
231     function fetchImage($url)
232     {
233         
234         if ($url[0] == '/') {
235             $file = $this->page->rootDir . $url;
236             require_once 'File/MimeType.php';
237             $m  = new File_MimeType();
238             $mt = $m->fromFilename($file);
239             $ext = $m->toExt($mt); 
240             
241             return array(
242                     'mimetype' => $mt,
243                    'ext' => $ext,
244                    'contentid' => md5($file),
245                    'file' => $file
246             );
247             
248             
249             
250         }
251         
252         //print_R($url); exit;
253         
254         
255         if (preg_match('#^file:///#', $url)) {
256             $file = preg_replace('#^file://#', '', $url);
257             require_once 'File/MimeType.php';
258             $m  = new File_MimeType();
259             $mt = $m->fromFilename($file);
260             $ext = $m->toExt($mt); 
261             
262             return array(
263                     'mimetype' => $mt,
264                    'ext' => $ext,
265                    'contentid' => md5($file),
266                    'file' => $file
267             );
268             
269         }
270         
271         // CACHE???
272         // 2 files --- the info file.. and the actual file...
273         $cache = ini_get('session.save_path').'/Pman_Core_Mailer/' . md5($url);
274         if (file_exists($cache) and filemtime($cache) > strtotime('NOW - 1 WEEK')) {
275             $ret =  json_decode($cache);
276             $ret['file'] = $cache . '.data';
277             return $ret;
278         }
279         if (!file_exists(dirname($cache))) {
280             mkdir(dirname($cache),0666, true);
281         }
282         
283         require_once 'HTTP/Request.php';
284         $a = new HTTP_Request($url);
285         $a->sendRequest();
286         file_put_contents($cache .'.data', $a->getResponseBody());
287         
288         $mt = $a->getResponseHeader('Content-Type');
289         
290         require_once 'File/MimeType.php';
291         $m  = new File_MimeType();
292         $ext = $m->toExt($mt);
293         
294         $ret = array(
295             'mimetype' => $mt,
296             'ext' => $ext,
297             'contentid' => md5($url)
298             
299         );
300         
301         file_put_contents($cache, json_encode($ret));
302         $ret['file'] = $cache . '.data';
303         return $ret;
304     }  
305     
306     
307     
308 }