Gracefully recover from over quota error while sending a mail (#1145144):
[squirrelmail.git] / class / mime / Message.class.php
CommitLineData
19d470aa 1<?php
2
3/**
4 * Message.class.php
5 *
6c84ba1e 6 * Copyright (c) 2003-2005 The SquirrelMail Project Team
19d470aa 7 * Licensed under the GNU GPL. For full terms see the file COPYING.
8 *
2b646597 9 * This contains functions needed to handle mime messages.
19d470aa 10 *
883d9cd3 11 * @version $Id$
2b646597 12 * @package squirrelmail
19d470aa 13 */
14
2b646597 15/**
16 * The object that contains a message
17 *
18 * message is the object that contains messages. It is a recursive
19 * object in that through the $entities variable, it can contain
20 * more objects of type message. See documentation in mime.txt for
21 * a better description of how this works.
22 * @package squirrelmail
23 */
19d470aa 24class Message {
19d470aa 25 var $rfc822_header = '',
26 $mime_header = '',
27 $flags = '',
28 $type0='',
29 $type1='',
30 $entities = array(),
0b914738 31 $entity_id = '',
19d470aa 32 $parent_ent, $entity,
33 $parent = '', $decoded_body='',
34 $is_seen = 0, $is_answered = 0, $is_deleted = 0, $is_flagged = 0,
35 $is_mdnsent = 0,
36 $body_part = '',
37 $offset = 0, /* for fetching body parts out of raw messages */
38 $length = 0, /* for fetching body parts out of raw messages */
0b914738 39 $att_local_name = ''; /* location where the tempory attachment
40 is stored. For future usage in smtp.php */
19d470aa 41
42 function setEnt($ent) {
43 $this->entity_id= $ent;
44 }
45
46 function addEntity ($msg) {
19d470aa 47 $this->entities[] = $msg;
48 }
49
50 function getFilename() {
02474e43 51 $filename = '';
52 $header = $this->header;
53 if (is_object($header->disposition)) {
54 $filename = $header->disposition->getProperty('filename');
55 if (trim($filename) == '') {
56 $name = decodeHeader($header->disposition->getProperty('name'));
57 if (!trim($name)) {
58 $name = $header->getParameter('name');
59 if(!trim($name)) {
60 if (!trim( $header->id )) {
61 $filename = 'untitled-[' . $this->entity_id . ']' ;
62 } else {
63 $filename = 'cid: ' . $header->id;
64 }
65 } else {
66 $filename = $name;
67 }
68 } else {
69 $filename = $name;
70 }
71 }
72 } else {
73 $filename = $header->getParameter('filename');
74 if (!trim($filename)) {
75 $filename = $header->getParameter('name');
76 if (!trim($filename)) {
77 if (!trim( $header->id )) {
78 $filename = 'untitled-[' . $this->entity_id . ']' ;
79 } else {
80 $filename = 'cid: ' . $header->id;
81 }
82 }
83 }
84 }
85 return $filename;
19d470aa 86 }
87
88
89 function addRFC822Header($read) {
90 $header = new Rfc822Header();
91 $this->rfc822_header = $header->parseHeader($read);
92 }
93
94 function getEntity($ent) {
95 $cur_ent = $this->entity_id;
96 $msg = $this;
97 if (($cur_ent == '') || ($cur_ent == '0')) {
98 $cur_ent_a = array();
99 } else {
100 $cur_ent_a = explode('.', $this->entity_id);
101 }
102 $ent_a = explode('.', $ent);
91e0dccc 103
0a408606 104 for ($i = 0,$entCount = count($ent_a) - 1; $i < $entCount; ++$i) {
19d470aa 105 if (isset($cur_ent_a[$i]) && ($cur_ent_a[$i] != $ent_a[$i])) {
106 $msg = $msg->parent;
107 $cur_ent_a = explode('.', $msg->entity_id);
108 --$i;
109 } else if (!isset($cur_ent_a[$i])) {
110 if (isset($msg->entities[($ent_a[$i]-1)])) {
111 $msg = $msg->entities[($ent_a[$i]-1)];
112 } else {
113 $msg = $msg->entities[0];
114 }
115 }
116 if (($msg->type0 == 'message') && ($msg->type1 == 'rfc822')) {
117 /*this is a header for a message/rfc822 entity */
118 $msg = $msg->entities[0];
119 }
120 }
121
122 if (($msg->type0 == 'message') && ($msg->type1 == 'rfc822')) {
123 /*this is a header for a message/rfc822 entity */
124 $msg = $msg->entities[0];
125 }
126
0a408606 127 if (isset($msg->entities[($ent_a[$entCount])-1])) {
128 if (is_object($msg->entities[($ent_a[$entCount])-1])) {
129 $msg = $msg->entities[($ent_a[$entCount]-1)];
19d470aa 130 }
131 }
132
133 return $msg;
134 }
135
136 function setBody($s) {
137 $this->body_part = $s;
138 }
139
140 function clean_up() {
141 $msg = $this;
142 $msg->body_part = '';
143
144 foreach ($msg->entities as $m) {
145 $m->clean_up();
146 }
147 }
148
149 function getMailbox() {
150 $msg = $this;
151 while (is_object($msg->parent)) {
152 $msg = $msg->parent;
153 }
154 return $msg->mailbox;
155 }
156
19d470aa 157 /*
158 * Bodystructure parser, a recursive function for generating the
159 * entity-tree with all the mime-parts.
160 *
161 * It follows RFC2060 and stores all the described fields in the
162 * message object.
163 *
164 * Question/Bugs:
165 *
166 * Ask for me (Marc Groot Koerkamp, stekkel@users.sourceforge.net)
167 *
168 */
df627053 169 function parseStructure($read, &$i, $sub_msg = '') {
e3d6469a 170 $msg = Message::parseBodyStructure($read, $i, $sub_msg);
27dd7a0c 171 if($msg) $msg->setEntIds($msg,false,0);
e3d6469a 172 return $msg;
173 }
91e0dccc 174
e3d6469a 175 function setEntIds(&$msg,$init=false,$i=0) {
176 $iCnt = count($msg->entities);
0b914738 177 if ($init !==false) {
178 $iEntSub = $i+1;
91e0dccc 179 if ($msg->parent->type0 == 'message' &&
0b914738 180 $msg->parent->type1 == 'rfc822' &&
181 $msg->type0 == 'multipart') {
182 $iEntSub = '0';
183 }
184 if ($init) {
185 $msg->entity_id = "$init.$iEntSub";
186 } else {
187 $msg->entity_id = $iEntSub;
188 }
189 } else if ($iCnt) {
190 $msg->entity_id='0';
191 } else {
192 $msg->entity_id='1';
193 }
e3d6469a 194 for ($i=0;$i<$iCnt;++$i) {
91e0dccc 195 $msg->entities[$i]->parent =& $msg;
196 if (strrchr($msg->entity_id, '.') != '.0') {
0b914738 197 $msg->entities[$i]->setEntIds($msg->entities[$i],$msg->entity_id,$i);
198 } else {
199 $msg->entities[$i]->setEntIds($msg->entities[$i],$msg->parent->entity_id,$i);
200 }
201 }
e3d6469a 202 }
203
204 function parseBodyStructure($read, &$i, $sub_msg = '') {
19d470aa 205 $arg_no = 0;
206 $arg_a = array();
0b914738 207 if ($sub_msg) {
208 $message = $sub_msg;
209 } else {
210 $message = new Message();
211 }
91e0dccc 212
19d470aa 213 for ($cnt = strlen($read); $i < $cnt; ++$i) {
214 $char = strtoupper($read{$i});
215 switch ($char) {
216 case '(':
217 switch($arg_no) {
218 case 0:
219 if (!isset($msg)) {
220 $msg = new Message();
221 $hdr = new MessageHeader();
222 $hdr->type0 = 'text';
223 $hdr->type1 = 'plain';
224 $hdr->encoding = 'us-ascii';
19d470aa 225 } else {
226 $msg->header->type0 = 'multipart';
227 $msg->type0 = 'multipart';
228 while ($read{$i} == '(') {
055659ab 229 $msg->addEntity($msg->parseBodyStructure($read, $i, $msg));
19d470aa 230 }
231 }
232 break;
233 case 1:
234 /* multipart properties */
235 ++$i;
055659ab 236 $arg_a[] = $msg->parseProperties($read, $i);
19d470aa 237 ++$arg_no;
238 break;
239 case 2:
240 if (isset($msg->type0) && ($msg->type0 == 'multipart')) {
241 ++$i;
055659ab 242 $arg_a[] = $msg->parseDisposition($read, $i);
19d470aa 243 } else { /* properties */
055659ab 244 $arg_a[] = $msg->parseProperties($read, $i);
19d470aa 245 }
19d470aa 246 ++$arg_no;
247 break;
248 case 3:
249 if (isset($msg->type0) && ($msg->type0 == 'multipart')) {
250 ++$i;
055659ab 251 $arg_a[]= $msg->parseLanguage($read, $i);
19d470aa 252 }
253 case 7:
254 if (($arg_a[0] == 'message') && ($arg_a[1] == 'rfc822')) {
255 $msg->header->type0 = $arg_a[0];
256 $msg->header->type1 = $arg_a[1];
257 $msg->type0 = $arg_a[0];
258 $msg->type1 = $arg_a[1];
259 $rfc822_hdr = new Rfc822Header();
055659ab 260 $msg->rfc822_header = $msg->parseEnvelope($read, $i, $rfc822_hdr);
19d470aa 261 while (($i < $cnt) && ($read{$i} != '(')) {
262 ++$i;
263 }
055659ab 264 $msg->addEntity($msg->parseBodyStructure($read, $i,$msg));
19d470aa 265 }
266 break;
267 case 8:
268 ++$i;
055659ab 269 $arg_a[] = $msg->parseDisposition($read, $i);
19d470aa 270 ++$arg_no;
271 break;
272 case 9:
273 ++$i;
274 if (($arg_a[0] == 'text') || (($arg_a[0] == 'message') && ($arg_a[1] == 'rfc822'))) {
055659ab 275 $arg_a[] = $msg->parseDisposition($read, $i);
19d470aa 276 } else {
055659ab 277 $arg_a[] = $msg->parseLanguage($read, $i);
19d470aa 278 }
19d470aa 279 ++$arg_no;
280 break;
281 case 10:
282 if (($arg_a[0] == 'text') || (($arg_a[0] == 'message') && ($arg_a[1] == 'rfc822'))) {
283 ++$i;
055659ab 284 $arg_a[] = $msg->parseLanguage($read, $i);
19d470aa 285 } else {
055659ab 286 $i = $msg->parseParenthesis($read, $i);
19d470aa 287 $arg_a[] = ''; /* not yet described in rfc2060 */
288 }
289 ++$arg_no;
290 break;
291 default:
292 /* unknown argument, skip this part */
055659ab 293 $i = $msg->parseParenthesis($read, $i);
19d470aa 294 $arg_a[] = '';
295 ++$arg_no;
296 break;
297 } /* switch */
298 break;
299 case '"':
300 /* inside an entity -> start processing */
055659ab 301 $arg_s = $msg->parseQuote($read, $i);
19d470aa 302 ++$arg_no;
303 if ($arg_no < 3) {
304 $arg_s = strtolower($arg_s); /* type0 and type1 */
305 }
306 $arg_a[] = $arg_s;
307 break;
308 case 'n':
309 case 'N':
310 /* probably NIL argument */
27dd7a0c 311 $tmpnil = strtoupper(substr($read, $i, 4));
312 if ($tmpnil == 'NIL ' || $tmpnil == 'NIL)') {
19d470aa 313 $arg_a[] = '';
314 ++$arg_no;
315 $i += 2;
316 }
317 break;
318 case '{':
319 /* process the literal value */
055659ab 320 $arg_a[] = $msg->parseLiteral($read, $i);
19d470aa 321 ++$arg_no;
322 break;
91e0dccc 323 case '0':
19d470aa 324 case is_numeric($read{$i}):
325 /* process integers */
326 if ($read{$i} == ' ') { break; }
0b914738 327 ++$arg_no;
328 if (preg_match('/^([0-9]+).*/',substr($read,$i), $regs)) {
329 $i += strlen($regs[1])-1;
330 $arg_a[] = $regs[1];
331 } else {
332 $arg_a[] = 0;
333 }
19d470aa 334 break;
335 case ')':
336 $multipart = (isset($msg->type0) && ($msg->type0 == 'multipart'));
337 if (!$multipart) {
338 $shifted_args = (($arg_a[0] == 'text') || (($arg_a[0] == 'message') && ($arg_a[1] == 'rfc822')));
339 $hdr->type0 = $arg_a[0];
340 $hdr->type1 = $arg_a[1];
341
342 $msg->type0 = $arg_a[0];
343 $msg->type1 = $arg_a[1];
344 $arr = $arg_a[2];
345 if (is_array($arr)) {
346 $hdr->parameters = $arg_a[2];
347 }
348 $hdr->id = str_replace('<', '', str_replace('>', '', $arg_a[3]));
349 $hdr->description = $arg_a[4];
350 $hdr->encoding = strtolower($arg_a[5]);
351 $hdr->entity_id = $msg->entity_id;
352 $hdr->size = $arg_a[6];
353 if ($shifted_args) {
354 $hdr->lines = $arg_a[7];
355 $s = 1;
356 } else {
357 $s = 0;
358 }
359 $hdr->md5 = (isset($arg_a[7+$s]) ? $arg_a[7+$s] : $hdr->md5);
360 $hdr->disposition = (isset($arg_a[8+$s]) ? $arg_a[8+$s] : $hdr->disposition);
361 $hdr->language = (isset($arg_a[9+$s]) ? $arg_a[9+$s] : $hdr->language);
362 $msg->header = $hdr;
19d470aa 363 } else {
364 $hdr->type0 = 'multipart';
365 $hdr->type1 = $arg_a[0];
366 $msg->type0 = 'multipart';
367 $msg->type1 = $arg_a[0];
368 $hdr->parameters = (isset($arg_a[1]) ? $arg_a[1] : $hdr->parameters);
369 $hdr->disposition = (isset($arg_a[2]) ? $arg_a[2] : $hdr->disposition);
370 $hdr->language = (isset($arg_a[3]) ? $arg_a[3] : $hdr->language);
371 $msg->header = $hdr;
372 }
df627053 373 return $msg;
19d470aa 374 default: break;
375 } /* switch */
19d470aa 376 } /* for */
377 } /* parsestructure */
378
21a50099 379 function parseProperties($read, &$i) {
19d470aa 380 $properties = array();
381 $prop_name = '';
382
383 for (; $read{$i} != ')'; ++$i) {
384 $arg_s = '';
385 if ($read{$i} == '"') {
21a50099 386 $arg_s = $this->parseQuote($read, $i);
19d470aa 387 } else if ($read{$i} == '{') {
21a50099 388 $arg_s = $this->parseLiteral($read, $i);
19d470aa 389 }
390
391 if ($arg_s != '') {
392 if ($prop_name == '') {
393 $prop_name = strtolower($arg_s);
394 $properties[$prop_name] = '';
395 } else if ($prop_name != '') {
396 $properties[$prop_name] = $arg_s;
397 $prop_name = '';
398 }
399 }
400 }
21a50099 401 return $properties;
19d470aa 402 }
403
2bf8f74a 404 function parseEnvelope($read, &$i, $hdr) {
19d470aa 405 $arg_no = 0;
406 $arg_a = array();
3cb8baa6 407 ++$i;
19d470aa 408 for ($cnt = strlen($read); ($i < $cnt) && ($read{$i} != ')'); ++$i) {
19d470aa 409 $char = strtoupper($read{$i});
410 switch ($char) {
411 case '"':
21a50099 412 $arg_a[] = $this->parseQuote($read, $i);
19d470aa 413 ++$arg_no;
414 break;
415 case '{':
21a50099 416 $arg_a[] = $this->parseLiteral($read, $i);
0b914738 417 /* temp bugfix (SM 1.5 will have a working clean version)
418 too much work to implement that version right now */
419// --$i;
19d470aa 420 ++$arg_no;
421 break;
422 case 'N':
423 /* probably NIL argument */
424 if (strtoupper(substr($read, $i, 3)) == 'NIL') {
425 $arg_a[] = '';
426 ++$arg_no;
427 $i += 2;
428 }
429 break;
430 case '(':
431 /* Address structure (with group support)
432 * Note: Group support is useless on SMTP connections
433 * because the protocol doesn't support it
434 */
435 $addr_a = array();
436 $group = '';
437 $a=0;
438 for (; $i < $cnt && $read{$i} != ')'; ++$i) {
439 if ($read{$i} == '(') {
2bf8f74a 440 $addr = $this->parseAddress($read, $i);
19d470aa 441 if (($addr->host == '') && ($addr->mailbox != '')) {
442 /* start of group */
443 $group = $addr->mailbox;
444 $group_addr = $addr;
445 $j = $a;
446 } else if ($group && ($addr->host == '') && ($addr->mailbox == '')) {
447 /* end group */
448 if ($a == ($j+1)) { /* no group members */
449 $group_addr->group = $group;
450 $group_addr->mailbox = '';
451 $group_addr->personal = "$group: Undisclosed recipients;";
452 $addr_a[] = $group_addr;
453 $group ='';
454 }
455 } else {
456 $addr->group = $group;
457 $addr_a[] = $addr;
458 }
459 ++$a;
460 }
461 }
462 $arg_a[] = $addr_a;
463 break;
464 default: break;
465 }
466 }
467
468 if (count($arg_a) > 9) {
19d470aa 469 $d = strtr($arg_a[0], array(' ' => ' '));
470 $d = explode(' ', $d);
91e0dccc 471 if (!$arg_a[1]) $arg_a[1] = _("(no subject)");
19d470aa 472
8750d90e 473 $hdr->date = getTimeStamp($d); /* argument 1: date */
474 $hdr->subject = $arg_a[1]; /* argument 2: subject */
df0db9ce 475 $hdr->from = is_array($arg_a[2]) ? $arg_a[2][0] : ''; /* argument 3: from */
476 $hdr->sender = is_array($arg_a[3]) ? $arg_a[3][0] : ''; /* argument 4: sender */
477 $hdr->replyto = is_array($arg_a[4]) ? $arg_a[4][0] : ''; /* argument 5: reply-to */
19d470aa 478 $hdr->to = $arg_a[5]; /* argument 6: to */
479 $hdr->cc = $arg_a[6]; /* argument 7: cc */
480 $hdr->bcc = $arg_a[7]; /* argument 8: bcc */
481 $hdr->inreplyto = $arg_a[8]; /* argument 9: in-reply-to */
482 $hdr->message_id = $arg_a[9]; /* argument 10: message-id */
483 }
2bf8f74a 484 return $hdr;
19d470aa 485 }
486
21a50099 487 function parseLiteral($read, &$i) {
19d470aa 488 $lit_cnt = '';
0b914738 489 ++$i;
490 $iPos = strpos($read,'}',$i);
491 if ($iPos) {
492 $lit_cnt = substr($read, $i, $iPos - $i);
493 $i += strlen($lit_cnt) + 3; /* skip } + \r + \n */
494 /* Now read the literal */
495 $s = ($lit_cnt ? substr($read,$i,$lit_cnt): '');
496 $i += $lit_cnt;
497 /* temp bugfix (SM 1.5 will have a working clean version)
498 too much work to implement that version right now */
499 --$i;
500 } else { /* should never happen */
501 $i += 3; /* } + \r + \n */
502 $s = '';
503 }
5520fad8 504 return $s;
19d470aa 505 }
506
21a50099 507 function parseQuote($read, &$i) {
19d470aa 508 $s = '';
0b914738 509 $iPos = ++$i;
510 while (true) {
511 $iPos = strpos($read,'"',$iPos);
512 if (!$iPos) break;
513 if ($iPos && $read{$iPos -1} != '\\') {
514 $s = substr($read,$i,($iPos-$i));
515 $i = $iPos;
516 break;
517 }
518 ++$iPos;
519 if ($iPos > strlen($read)) {
520 break;
521 }
522 }
21a50099 523 return $s;
19d470aa 524 }
525
2bf8f74a 526 function parseAddress($read, &$i) {
19d470aa 527 $arg_a = array();
19d470aa 528 for (; $read{$i} != ')'; ++$i) {
529 $char = strtoupper($read{$i});
530 switch ($char) {
df627053 531 case '"': $arg_a[] = $this->parseQuote($read, $i); break;
532 case '{': $arg_a[] = $this->parseLiteral($read, $i); break;
19d470aa 533 case 'n':
534 case 'N':
535 if (strtoupper(substr($read, $i, 3)) == 'NIL') {
536 $arg_a[] = '';
537 $i += 2;
538 }
539 break;
540 default: break;
541 }
542 }
543
544 if (count($arg_a) == 4) {
545 $adr = new AddressStructure();
546 $adr->personal = $arg_a[0];
547 $adr->adl = $arg_a[1];
548 $adr->mailbox = $arg_a[2];
549 $adr->host = $arg_a[3];
550 } else {
551 $adr = '';
552 }
2bf8f74a 553 return $adr;
19d470aa 554 }
555
21a50099 556 function parseDisposition($read, &$i) {
19d470aa 557 $arg_a = array();
19d470aa 558 for (; $read{$i} != ')'; ++$i) {
559 switch ($read{$i}) {
21a50099 560 case '"': $arg_a[] = $this->parseQuote($read, $i); break;
561 case '{': $arg_a[] = $this->parseLiteral($read, $i); break;
562 case '(': $arg_a[] = $this->parseProperties($read, $i); break;
19d470aa 563 default: break;
564 }
565 }
566
567 if (isset($arg_a[0])) {
568 $disp = new Disposition($arg_a[0]);
569 if (isset($arg_a[1])) {
570 $disp->properties = $arg_a[1];
571 }
572 }
573
21a50099 574 return (is_object($disp) ? $disp : '');
19d470aa 575 }
576
21a50099 577 function parseLanguage($read, &$i) {
19d470aa 578 /* no idea how to process this one without examples */
579 $arg_a = array();
580
581 for (; $read{$i} != ')'; ++$i) {
582 switch ($read{$i}) {
21a50099 583 case '"': $arg_a[] = $this->parseQuote($read, $i); break;
584 case '{': $arg_a[] = $this->parseLiteral($read, $i); break;
585 case '(': $arg_a[] = $this->parseProperties($read, $i); break;
19d470aa 586 default: break;
587 }
588 }
589
590 if (isset($arg_a[0])) {
591 $lang = new Language($arg_a[0]);
592 if (isset($arg_a[1])) {
593 $lang->properties = $arg_a[1];
594 }
595 }
596
21a50099 597 return (is_object($lang) ? $lang : '');
19d470aa 598 }
599
600 function parseParenthesis($read, $i) {
601 for (; $read{$i} != ')'; ++$i) {
602 switch ($read{$i}) {
21a50099 603 case '"': $this->parseQuote($read, $i); break;
604 case '{': $this->parseLiteral($read, $i); break;
605 case '(': $this->parseProperties($read, $i); break;
19d470aa 606 default: break;
607 }
608 }
609 return $i;
610 }
611
612 /* Function to fill the message structure in case the */
613 /* bodystructure is not available NOT FINISHED YET */
614 function parseMessage($read, $type0, $type1) {
615 switch ($type0) {
616 case 'message':
617 $rfc822_header = true;
618 $mime_header = false;
619 break;
620 case 'multipart':
621 $rfc822_header = false;
622 $mime_header = true;
623 break;
624 default: return $read;
625 }
626
627 for ($i = 1; $i < $count; ++$i) {
628 $line = trim($body[$i]);
629 if (($mime_header || $rfc822_header) &&
630 (preg_match("/^.*boundary=\"?(.+(?=\")|.+).*/i", $line, $reg))) {
631 $bnd = $reg[1];
632 $bndreg = $bnd;
633 $bndreg = str_replace("\\", "\\\\", $bndreg);
634 $bndreg = str_replace("?", "\\?", $bndreg);
635 $bndreg = str_replace("+", "\\+", $bndreg);
636 $bndreg = str_replace(".", "\\.", $bndreg);
637 $bndreg = str_replace("/", "\\/", $bndreg);
638 $bndreg = str_replace("-", "\\-", $bndreg);
639 $bndreg = str_replace("(", "\\(", $bndreg);
640 $bndreg = str_replace(")", "\\)", $bndreg);
641 } else if ($rfc822_header && $line == '') {
642 $rfc822_header = false;
643 if ($msg->type0 == 'multipart') {
644 $mime_header = true;
645 }
646 }
647
648 if ((($line{0} == '-') || $rfc822_header) && isset($boundaries[0])) {
649 $cnt = count($boundaries)-1;
650 $bnd = $boundaries[$cnt]['bnd'];
651 $bndreg = $boundaries[$cnt]['bndreg'];
652
653 $regstr = '/^--'."($bndreg)".".*".'/';
654 if (preg_match($regstr, $line, $reg)) {
655 $bndlen = strlen($reg[1]);
656 $bndend = false;
657 if (strlen($line) > ($bndlen + 3)) {
658 if (($line{$bndlen+2} == '-') && ($line{$bndlen+3} == '-')) {
659 $bndend = true;
660 }
661 }
662 if ($bndend) {
663 /* calc offset and return $msg */
664 //$entStr = CalcEntity("$entStr", -1);
665 array_pop($boundaries);
666 $mime_header = true;
667 $bnd_end = true;
668 } else {
669 $mime_header = true;
670 $bnd_end = false;
671 //$entStr = CalcEntity("$entStr", 0);
672 ++$content_indx;
673 }
674 } else {
675 if ($header) { }
676 }
677 }
678 }
679 }
680
681 function findDisplayEntity($entity = array(), $alt_order = array('text/plain', 'text/html'), $strict=false) {
682 $found = false;
683 if ($this->type0 == 'multipart') {
684 if($this->type1 == 'alternative') {
685 $msg = $this->findAlternativeEntity($alt_order);
686 if (count($msg->entities) == 0) {
687 $entity[] = $msg->entity_id;
688 } else {
689 $entity = $msg->findDisplayEntity($entity, $alt_order, $strict);
690 }
691 $found = true;
692 } else if ($this->type1 == 'related') { /* RFC 2387 */
693 $msgs = $this->findRelatedEntity();
694 foreach ($msgs as $msg) {
695 if (count($msg->entities) == 0) {
696 $entity[] = $msg->entity_id;
697 } else {
698 $entity = $msg->findDisplayEntity($entity, $alt_order, $strict);
699 }
700 }
701 if (count($msgs) > 0) {
702 $found = true;
703 }
704 } else { /* Treat as multipart/mixed */
705 foreach ($this->entities as $ent) {
c102e0a7 706 if(!(is_object($ent->header->disposition) && strtolower($ent->header->disposition->name) == 'attachment') &&
0b914738 707 (!isset($ent->header->parameters['filename'])) &&
708 (!isset($ent->header->parameters['name'])) &&
19d470aa 709 (($ent->type0 != 'message') && ($ent->type1 != 'rfc822'))) {
710 $entity = $ent->findDisplayEntity($entity, $alt_order, $strict);
711 $found = true;
712 }
713 }
714 }
715 } else { /* If not multipart, then just compare with each entry from $alt_order */
716 $type = $this->type0.'/'.$this->type1;
0b914738 717// $alt_order[] = "message/rfc822";
19d470aa 718 foreach ($alt_order as $alt) {
719 if( ($alt == $type) && isset($this->entity_id) ) {
91e0dccc 720 if ((count($this->entities) == 0) &&
c102e0a7 721 (!isset($this->header->parameters['filename'])) &&
722 (!isset($this->header->parameters['name'])) &&
723 isset($this->header->disposition) && is_object($this->header->disposition) &&
724 !(is_object($this->header->disposition) && strtolower($this->header->disposition->name) == 'attachment')) {
19d470aa 725 $entity[] = $this->entity_id;
726 $found = true;
727 }
728 }
729 }
730 }
731 if(!$found) {
732 foreach ($this->entities as $ent) {
c102e0a7 733 if(!(is_object($ent->header->disposition) && strtolower($ent->header->disposition->name) == 'attachment') &&
19d470aa 734 (($ent->type0 != 'message') && ($ent->type1 != 'rfc822'))) {
735 $entity = $ent->findDisplayEntity($entity, $alt_order, $strict);
736 $found = true;
737 }
738 }
739 }
740 if(!$strict && !$found) {
741 if (($this->type0 == 'text') &&
742 in_array($this->type1, array('plain', 'html', 'message')) &&
743 isset($this->entity_id)) {
744 if (count($this->entities) == 0) {
c102e0a7 745 if (!is_object($this->header->disposition) || strtolower($this->header->disposition->name) != 'attachment') {
19d470aa 746 $entity[] = $this->entity_id;
747 }
748 }
749 }
750 }
19d470aa 751 return $entity;
752 }
753
754 function findAlternativeEntity($alt_order) {
755 /* If we are dealing with alternative parts then we */
756 /* choose the best viewable message supported by SM. */
757 $best_view = 0;
758 $entity = array();
759 foreach($this->entities as $ent) {
760 $type = $ent->header->type0 . '/' . $ent->header->type1;
761 if ($type == 'multipart/related') {
762 $type = $ent->header->getParameter('type');
0b914738 763 // Mozilla bug. Mozilla does not provide the parameter type.
764 if (!$type) $type = 'text/html';
19d470aa 765 }
766 $altCount = count($alt_order);
767 for ($j = $best_view; $j < $altCount; ++$j) {
768 if (($alt_order[$j] == $type) && ($j >= $best_view)) {
769 $best_view = $j;
770 $entity = $ent;
771 }
772 }
773 }
774
775 return $entity;
776 }
777
778 function findRelatedEntity() {
779 $msgs = array();
0b914738 780 $related_type = $this->header->getParameter('type');
781 // Mozilla bug. Mozilla does not provide the parameter type.
782 if (!$related_type) $related_type = 'text/html';
19d470aa 783 $entCount = count($this->entities);
784 for ($i = 0; $i < $entCount; ++$i) {
785 $type = $this->entities[$i]->header->type0.'/'.$this->entities[$i]->header->type1;
0b914738 786 if ($related_type == $type) {
19d470aa 787 $msgs[] = $this->entities[$i];
788 }
789 }
19d470aa 790 return $msgs;
791 }
792
793 function getAttachments($exclude_id=array(), $result = array()) {
e3d6469a 794/*
91e0dccc 795 if (($this->type0 == 'message') &&
0b914738 796 ($this->type1 == 'rfc822') &&
797 ($this->entity_id) ) {
19d470aa 798 $this = $this->entities[0];
799 }
e3d6469a 800*/
19d470aa 801 if (count($this->entities)) {
802 foreach ($this->entities as $entity) {
803 $exclude = false;
19d470aa 804 foreach ($exclude_id as $excl) {
805 if ($entity->entity_id === $excl) {
806 $exclude = true;
807 }
808 }
809
810 if (!$exclude) {
811 if (($entity->type0 == 'multipart') &&
812 ($entity->type1 != 'related')) {
813 $result = $entity->getAttachments($exclude_id, $result);
814 } else if ($entity->type0 != 'multipart') {
815 $result[] = $entity;
816 }
817 }
818 }
819 } else {
820 $exclude = false;
821 foreach ($exclude_id as $excl) {
822 $exclude = $exclude || ($this->entity_id == $excl);
823 }
824
825 if (!$exclude) {
826 $result[] = $this;
827 }
828 }
19d470aa 829 return $result;
830 }
91e0dccc 831
a56f52b9 832 function initAttachment($type, $name, $location) {
833 $attachment = new Message();
834 $mime_header = new MessageHeader();
835 $mime_header->setParameter('name', $name);
0b914738 836 $pos = strpos($type, '/');
837 if ($pos > 0) {
838 $mime_header->type0 = substr($type, 0, $pos);
839 $mime_header->type1 = substr($type, $pos+1);
840 } else {
841 $mime_header->type0 = $type;
842 }
843 $attachment->att_local_name = $location;
844 $disposition = new Disposition('attachment');
845 $disposition->properties['filename'] = $name;
846 $mime_header->disposition = $disposition;
847 $attachment->mime_header = $mime_header;
848 $this->entities[]=$attachment;
a56f52b9 849 }
19d470aa 850}
851
91e0dccc 852?>