6 * This file contains functions needed to handle mime messages.
8 * @copyright © 2003-2006 The SquirrelMail Project Team
9 * @license http://opensource.org/licenses/gpl-license.php GNU Public License
11 * @package squirrelmail
17 * The object that contains a message.
19 * message is the object that contains messages. It is a recursive object in
20 * that through the $entities variable, it can contain more objects of type
21 * message. See documentation in mime.txt for a better description of how this
23 * @package squirrelmail
32 var $rfc822_header = '';
34 * MessageHeader object
37 var $mime_header = '';
56 var $entities = array();
63 * Parent message part id
80 * Message \seen status
85 * Message \answered status
90 * Message \deleted status
95 * Message \flagged status
110 * Message part offset
111 * for fetching body parts out of raw messages
116 * Message part length
117 * for fetching body parts out of raw messages
122 * Local attachment filename location where the tempory attachment is
123 * stored. For use in delivery class.
126 var $att_local_name = '';
129 * @param string $ent entity id
131 function setEnt($ent) {
132 $this->entity_id
= $ent;
136 * Add nested message part
139 function addEntity ($msg) {
140 $this->entities
[] = $msg;
144 * Get file name used for mime part
145 * @return string file name
148 function getFilename() {
150 $header = $this->header
;
151 if (is_object($header->disposition
)) {
152 $filename = $header->disposition
->getProperty('filename');
153 if (trim($filename) == '') {
154 $name = decodeHeader($header->disposition
->getProperty('name'));
156 $name = $header->getParameter('name');
158 if (!trim( $header->id
)) {
159 $filename = 'untitled-[' . $this->entity_id
. ']' ;
161 $filename = 'cid: ' . $header->id
;
171 $filename = $header->getParameter('filename');
172 if (!trim($filename)) {
173 $filename = $header->getParameter('name');
174 if (!trim($filename)) {
175 if (!trim( $header->id
)) {
176 $filename = 'untitled-[' . $this->entity_id
. ']' ;
178 $filename = 'cid: ' . $header->id
;
187 * Add header object to message object.
188 * WARNING: Unfinished code. Don't expect it to work in older sm versions.
189 * @param mixed $read array or string with message headers
190 * @todo FIXME: rfc822header->parseHeader() does not return rfc822header object
192 function addRFC822Header($read) {
193 $header = new Rfc822Header();
194 $this->rfc822_header
= $header->parseHeader($read);
199 * @return mixed (object or string?)
201 function getEntity($ent) {
202 $cur_ent = $this->entity_id
;
204 if (($cur_ent == '') ||
($cur_ent == '0')) {
205 $cur_ent_a = array();
207 $cur_ent_a = explode('.', $this->entity_id
);
209 $ent_a = explode('.', $ent);
211 for ($i = 0,$entCount = count($ent_a) - 1; $i < $entCount; ++
$i) {
212 if (isset($cur_ent_a[$i]) && ($cur_ent_a[$i] != $ent_a[$i])) {
214 $cur_ent_a = explode('.', $msg->entity_id
);
216 } else if (!isset($cur_ent_a[$i])) {
217 if (isset($msg->entities
[($ent_a[$i]-1)])) {
218 $msg = $msg->entities
[($ent_a[$i]-1)];
220 $msg = $msg->entities
[0];
223 if (($msg->type0
== 'message') && ($msg->type1
== 'rfc822')) {
224 /*this is a header for a message/rfc822 entity */
225 $msg = $msg->entities
[0];
229 if (($msg->type0
== 'message') && ($msg->type1
== 'rfc822')) {
230 /*this is a header for a message/rfc822 entity */
231 $msg = $msg->entities
[0];
234 if (isset($msg->entities
[($ent_a[$entCount])-1])) {
235 if (is_object($msg->entities
[($ent_a[$entCount])-1])) {
236 $msg = $msg->entities
[($ent_a[$entCount]-1)];
245 * @param string $s message body
247 function setBody($s) {
248 $this->body_part
= $s;
252 * Clean message object
254 function clean_up() {
256 $msg->body_part
= '';
258 foreach ($msg->entities
as $m) {
266 function getMailbox() {
268 while (is_object($msg->parent
)) {
271 return $msg->mailbox
;
275 * Bodystructure parser, a recursive function for generating the
276 * entity-tree with all the mime-parts.
278 * It follows RFC2060 and stores all the described fields in the
283 * Ask for me (Marc Groot Koerkamp, stekkel@users.sourceforge.net)
284 * @param string $read
286 * @param mixed $sub_msg
287 * @return object Message object
288 * @todo define argument and return types
290 function parseStructure($read, &$i, $sub_msg = '') {
291 $msg = Message
::parseBodyStructure($read, $i, $sub_msg);
292 if($msg) $msg->setEntIds($msg,false,0);
303 function setEntIds(&$msg,$init=false,$i=0) {
304 $iCnt = count($msg->entities
);
305 if ($init !==false) {
307 if ($msg->parent
->type0
== 'message' &&
308 $msg->parent
->type1
== 'rfc822' &&
309 $msg->type0
== 'multipart') {
313 $msg->entity_id
= "$init.$iEntSub";
315 $msg->entity_id
= $iEntSub;
322 for ($i=0;$i<$iCnt;++
$i) {
323 $msg->entities
[$i]->parent
=& $msg;
324 if (strrchr($msg->entity_id
, '.') != '.0') {
325 $msg->entities
[$i]->setEntIds($msg->entities
[$i],$msg->entity_id
,$i);
327 $msg->entities
[$i]->setEntIds($msg->entities
[$i],$msg->parent
->entity_id
,$i);
333 * @param string $read
335 * @param mixed $sub_msg
336 * @return object Message object
338 * @since 1.4.0 (code was part of parseStructure() in 1.3.x)
340 function parseBodyStructure($read, &$i, $sub_msg = '') {
346 $message = new Message();
349 for ($cnt = strlen($read); $i < $cnt; ++
$i) {
350 $char = strtoupper($read{$i});
356 $msg = new Message();
357 $hdr = new MessageHeader();
358 $hdr->type0
= 'text';
359 $hdr->type1
= 'plain';
360 $hdr->encoding
= 'us-ascii';
362 $msg->header
->type0
= 'multipart';
363 $msg->type0
= 'multipart';
364 while ($read{$i} == '(') {
365 $msg->addEntity($msg->parseBodyStructure($read, $i, $msg));
370 /* multipart properties */
372 $arg_a[] = $msg->parseProperties($read, $i);
376 if (isset($msg->type0
) && ($msg->type0
== 'multipart')) {
378 $arg_a[] = $msg->parseDisposition($read, $i);
379 } else { /* properties */
380 $arg_a[] = $msg->parseProperties($read, $i);
385 if (isset($msg->type0
) && ($msg->type0
== 'multipart')) {
387 $arg_a[]= $msg->parseLanguage($read, $i);
390 if (($arg_a[0] == 'message') && ($arg_a[1] == 'rfc822')) {
391 $msg->header
->type0
= $arg_a[0];
392 $msg->header
->type1
= $arg_a[1];
393 $msg->type0
= $arg_a[0];
394 $msg->type1
= $arg_a[1];
395 $rfc822_hdr = new Rfc822Header();
396 $msg->rfc822_header
= $msg->parseEnvelope($read, $i, $rfc822_hdr);
397 while (($i < $cnt) && ($read{$i} != '(')) {
400 $msg->addEntity($msg->parseBodyStructure($read, $i,$msg));
405 $arg_a[] = $msg->parseDisposition($read, $i);
410 if (($arg_a[0] == 'text') ||
(($arg_a[0] == 'message') && ($arg_a[1] == 'rfc822'))) {
411 $arg_a[] = $msg->parseDisposition($read, $i);
413 $arg_a[] = $msg->parseLanguage($read, $i);
418 if (($arg_a[0] == 'text') ||
(($arg_a[0] == 'message') && ($arg_a[1] == 'rfc822'))) {
420 $arg_a[] = $msg->parseLanguage($read, $i);
422 $i = $msg->parseParenthesis($read, $i);
423 $arg_a[] = ''; /* not yet described in rfc2060 */
428 /* unknown argument, skip this part */
429 $i = $msg->parseParenthesis($read, $i);
436 /* inside an entity -> start processing */
437 $arg_s = $msg->parseQuote($read, $i);
440 $arg_s = strtolower($arg_s); /* type0 and type1 */
446 /* probably NIL argument */
447 $tmpnil = strtoupper(substr($read, $i, 4));
448 if ($tmpnil == 'NIL ' ||
$tmpnil == 'NIL)') {
455 /* process the literal value */
456 $arg_a[] = $msg->parseLiteral($read, $i);
460 case is_numeric($read{$i}):
461 /* process integers */
462 if ($read{$i} == ' ') { break; }
464 if (preg_match('/^([0-9]+).*/',substr($read,$i), $regs)) {
465 $i +
= strlen($regs[1])-1;
472 $multipart = (isset($msg->type0
) && ($msg->type0
== 'multipart'));
474 $shifted_args = (($arg_a[0] == 'text') ||
(($arg_a[0] == 'message') && ($arg_a[1] == 'rfc822')));
475 $hdr->type0
= $arg_a[0];
476 $hdr->type1
= $arg_a[1];
478 $msg->type0
= $arg_a[0];
479 $msg->type1
= $arg_a[1];
481 if (is_array($arr)) {
482 $hdr->parameters
= $arg_a[2];
484 $hdr->id
= str_replace('<', '', str_replace('>', '', $arg_a[3]));
485 $hdr->description
= $arg_a[4];
486 $hdr->encoding
= strtolower($arg_a[5]);
487 $hdr->entity_id
= $msg->entity_id
;
488 $hdr->size
= $arg_a[6];
490 $hdr->lines
= $arg_a[7];
495 $hdr->md5
= (isset($arg_a[7+
$s]) ?
$arg_a[7+
$s] : $hdr->md5
);
496 $hdr->disposition
= (isset($arg_a[8+
$s]) ?
$arg_a[8+
$s] : $hdr->disposition
);
497 $hdr->language
= (isset($arg_a[9+
$s]) ?
$arg_a[9+
$s] : $hdr->language
);
500 $hdr->type0
= 'multipart';
501 $hdr->type1
= $arg_a[0];
502 $msg->type0
= 'multipart';
503 $msg->type1
= $arg_a[0];
504 $hdr->parameters
= (isset($arg_a[1]) ?
$arg_a[1] : $hdr->parameters
);
505 $hdr->disposition
= (isset($arg_a[2]) ?
$arg_a[2] : $hdr->disposition
);
506 $hdr->language
= (isset($arg_a[3]) ?
$arg_a[3] : $hdr->language
);
513 } /* parsestructure */
516 * @param string $read
520 function parseProperties($read, &$i) {
521 $properties = array();
524 for (; $read{$i} != ')'; ++
$i) {
526 if ($read{$i} == '"') {
527 $arg_s = $this->parseQuote($read, $i);
528 } else if ($read{$i} == '{') {
529 $arg_s = $this->parseLiteral($read, $i);
533 if ($prop_name == '') {
534 $prop_name = strtolower($arg_s);
535 $properties[$prop_name] = '';
536 } else if ($prop_name != '') {
537 $properties[$prop_name] = $arg_s;
546 * @param string $read
548 * @param object $hdr MessageHeader object
549 * @return object MessageHeader object
551 function parseEnvelope($read, &$i, $hdr) {
555 for ($cnt = strlen($read); ($i < $cnt) && ($read{$i} != ')'); ++
$i) {
556 $char = strtoupper($read{$i});
559 $arg_a[] = $this->parseQuote($read, $i);
563 $arg_a[] = $this->parseLiteral($read, $i);
564 /* temp bugfix (SM 1.5 will have a working clean version)
565 too much work to implement that version right now */
570 /* probably NIL argument */
571 if (strtoupper(substr($read, $i, 3)) == 'NIL') {
578 /* Address structure (with group support)
579 * Note: Group support is useless on SMTP connections
580 * because the protocol doesn't support it
585 for (; $i < $cnt && $read{$i} != ')'; ++
$i) {
586 if ($read{$i} == '(') {
587 $addr = $this->parseAddress($read, $i);
588 if (($addr->host
== '') && ($addr->mailbox
!= '')) {
590 $group = $addr->mailbox
;
593 } else if ($group && ($addr->host
== '') && ($addr->mailbox
== '')) {
595 if ($a == ($j+
1)) { /* no group members */
596 $group_addr->group
= $group;
597 $group_addr->mailbox
= '';
598 $group_addr->personal
= "$group: Undisclosed recipients;";
599 $addr_a[] = $group_addr;
603 $addr->group
= $group;
615 if (count($arg_a) > 9) {
616 $d = strtr($arg_a[0], array(' ' => ' '));
617 $d = explode(' ', $d);
618 if (!$arg_a[1]) $arg_a[1] = _("(no subject)");
620 $hdr->date
= getTimeStamp($d); /* argument 1: date */
621 $hdr->subject
= $arg_a[1]; /* argument 2: subject */
622 $hdr->from
= is_array($arg_a[2]) ?
$arg_a[2][0] : ''; /* argument 3: from */
623 $hdr->sender
= is_array($arg_a[3]) ?
$arg_a[3][0] : ''; /* argument 4: sender */
624 $hdr->replyto
= is_array($arg_a[4]) ?
$arg_a[4][0] : ''; /* argument 5: reply-to */
625 $hdr->to
= $arg_a[5]; /* argument 6: to */
626 $hdr->cc
= $arg_a[6]; /* argument 7: cc */
627 $hdr->bcc
= $arg_a[7]; /* argument 8: bcc */
628 $hdr->inreplyto
= $arg_a[8]; /* argument 9: in-reply-to */
629 $hdr->message_id
= $arg_a[9]; /* argument 10: message-id */
635 * @param string $read
640 function parseLiteral($read, &$i) {
643 $iPos = strpos($read,'}',$i);
645 $lit_cnt = substr($read, $i, $iPos - $i);
646 $i +
= strlen($lit_cnt) +
3; /* skip } + \r + \n */
647 /* Now read the literal */
648 $s = ($lit_cnt ?
substr($read,$i,$lit_cnt): '');
650 /* temp bugfix (SM 1.5 will have a working clean version)
651 too much work to implement that version right now */
653 } else { /* should never happen */
654 $i +
= 3; /* } + \r + \n */
661 * function parseQuote
663 * This extract the string value from a quoted string. After the end-quote
664 * character is found it returns the string. The offset $i when calling
665 * this function points to the first double quote. At the end it points to
666 * The ending quote. This function takes care of escaped double quotes.
669 * initial $i end position $i
671 * @param string $read
672 * @param integer $i offset in $read
673 * @return string string inbetween the double quotes
674 * @author Marc Groot Koerkamp
676 function parseQuote($read, &$i) {
681 $iPos = strpos($read,'"',$iPos);
683 if ($iPos && $read{$iPos -1} != '\\') {
684 $s = substr($read,$i,($iPos-$i));
687 } else if ($iPos > 1 && $read{$iPos -1} == '\\' && $read{$iPos-2} == '\\') {
688 // This is an unique situation where the fast detection of the string
689 // fails. If the quote string ends with \\ then we need to iterate
690 // through the entire string to make sure we detect the unexcaped
691 // double quotes correctly.
695 for ($j=$iPosStart,$iCnt=strlen($read);$j<$iCnt;++
$j) {
699 $bEscaped = !$bEscaped;
721 if ($iPos > strlen($read)) {
729 * @param string $read
731 * @return object AddressStructure object
733 function parseAddress($read, &$i) {
735 for (; $read{$i} != ')'; ++
$i) {
736 $char = strtoupper($read{$i});
738 case '"': $arg_a[] = $this->parseQuote($read, $i); break;
739 case '{': $arg_a[] = $this->parseLiteral($read, $i); break;
742 if (strtoupper(substr($read, $i, 3)) == 'NIL') {
751 if (count($arg_a) == 4) {
752 $adr = new AddressStructure();
753 $adr->personal
= $arg_a[0];
754 $adr->adl
= $arg_a[1];
755 $adr->mailbox
= $arg_a[2];
756 $adr->host
= $arg_a[3];
764 * @param string $read
766 * @param object Disposition object or empty string
768 function parseDisposition($read, &$i) {
770 for (; $read{$i} != ')'; ++
$i) {
772 case '"': $arg_a[] = $this->parseQuote($read, $i); break;
773 case '{': $arg_a[] = $this->parseLiteral($read, $i); break;
774 case '(': $arg_a[] = $this->parseProperties($read, $i); break;
779 if (isset($arg_a[0])) {
780 $disp = new Disposition($arg_a[0]);
781 if (isset($arg_a[1])) {
782 $disp->properties
= $arg_a[1];
785 return (is_object($disp) ?
$disp : '');
789 * @param string $read
791 * @return object Language object or empty string
793 function parseLanguage($read, &$i) {
794 /* no idea how to process this one without examples */
797 for (; $read{$i} != ')'; ++
$i) {
799 case '"': $arg_a[] = $this->parseQuote($read, $i); break;
800 case '{': $arg_a[] = $this->parseLiteral($read, $i); break;
801 case '(': $arg_a[] = $this->parseProperties($read, $i); break;
806 if (isset($arg_a[0])) {
807 $lang = new Language($arg_a[0]);
808 if (isset($arg_a[1])) {
809 $lang->properties
= $arg_a[1];
812 return (is_object($lang) ?
$lang : '');
816 * Parse message text enclosed in parenthesis
817 * @param string $read
821 function parseParenthesis($read, $i) {
822 for (; $read{$i} != ')'; ++
$i) {
824 case '"': $this->parseQuote($read, $i); break;
825 case '{': $this->parseLiteral($read, $i); break;
826 case '(': $this->parseProperties($read, $i); break;
834 * Function to fill the message structure in case the
835 * bodystructure is not available
837 * @param string $read
838 * @param string $type0 message part type
839 * @param string $type1 message part subtype
840 * @return string (only when type0 is not message or multipart)
842 function parseMessage($read, $type0, $type1) {
845 $rfc822_header = true;
846 $mime_header = false;
849 $rfc822_header = false;
852 default: return $read;
855 for ($i = 1; $i < $count; ++
$i) {
856 $line = trim($body[$i]);
857 if (($mime_header ||
$rfc822_header) &&
858 (preg_match("/^.*boundary=\"?(.+(?=\")|.+).*/i", $line, $reg))) {
861 $bndreg = str_replace("\\", "\\\\", $bndreg);
862 $bndreg = str_replace("?", "\\?", $bndreg);
863 $bndreg = str_replace("+", "\\+", $bndreg);
864 $bndreg = str_replace(".", "\\.", $bndreg);
865 $bndreg = str_replace("/", "\\/", $bndreg);
866 $bndreg = str_replace("-", "\\-", $bndreg);
867 $bndreg = str_replace("(", "\\(", $bndreg);
868 $bndreg = str_replace(")", "\\)", $bndreg);
869 } else if ($rfc822_header && $line == '') {
870 $rfc822_header = false;
871 if ($msg->type0
== 'multipart') {
876 if ((($line{0} == '-') ||
$rfc822_header) && isset($boundaries[0])) {
877 $cnt = count($boundaries)-1;
878 $bnd = $boundaries[$cnt]['bnd'];
879 $bndreg = $boundaries[$cnt]['bndreg'];
881 $regstr = '/^--'."($bndreg)".".*".'/';
882 if (preg_match($regstr, $line, $reg)) {
883 $bndlen = strlen($reg[1]);
885 if (strlen($line) > ($bndlen +
3)) {
886 if (($line{$bndlen+
2} == '-') && ($line{$bndlen+
3} == '-')) {
891 /* calc offset and return $msg */
892 //$entStr = CalcEntity("$entStr", -1);
893 array_pop($boundaries);
899 //$entStr = CalcEntity("$entStr", 0);
910 * @param array $entity
911 * @param array $alt_order
912 * @param boolean $strict
915 function findDisplayEntity($entity = array(), $alt_order = array('text/plain', 'text/html'), $strict=false) {
917 if ($this->type0
== 'multipart') {
918 if($this->type1
== 'alternative') {
919 $msg = $this->findAlternativeEntity($alt_order);
920 if (count($msg->entities
) == 0) {
921 $entity[] = $msg->entity_id
;
923 $entity = $msg->findDisplayEntity($entity, $alt_order, $strict);
926 } else if ($this->type1
== 'related') { /* RFC 2387 */
927 $msgs = $this->findRelatedEntity();
928 foreach ($msgs as $msg) {
929 if (count($msg->entities
) == 0) {
930 $entity[] = $msg->entity_id
;
932 $entity = $msg->findDisplayEntity($entity, $alt_order, $strict);
935 if (count($msgs) > 0) {
938 } else { /* Treat as multipart/mixed */
939 foreach ($this->entities
as $ent) {
940 if(!(is_object($ent->header
->disposition
) && strtolower($ent->header
->disposition
->name
) == 'attachment') &&
941 (!isset($ent->header
->parameters
['filename'])) &&
942 (!isset($ent->header
->parameters
['name'])) &&
943 (($ent->type0
!= 'message') && ($ent->type1
!= 'rfc822'))) {
944 $entity = $ent->findDisplayEntity($entity, $alt_order, $strict);
949 } else { /* If not multipart, then just compare with each entry from $alt_order */
950 $type = $this->type0
.'/'.$this->type1
;
951 // $alt_order[] = "message/rfc822";
952 foreach ($alt_order as $alt) {
953 if( ($alt == $type) && isset($this->entity_id
) ) {
954 if ((count($this->entities
) == 0) &&
955 (!isset($this->header
->parameters
['filename'])) &&
956 (!isset($this->header
->parameters
['name'])) &&
957 isset($this->header
->disposition
) && is_object($this->header
->disposition
) &&
958 !(is_object($this->header
->disposition
) && strtolower($this->header
->disposition
->name
) == 'attachment')) {
959 $entity[] = $this->entity_id
;
966 foreach ($this->entities
as $ent) {
967 if(!(is_object($ent->header
->disposition
) && strtolower($ent->header
->disposition
->name
) == 'attachment') &&
968 (($ent->type0
!= 'message') && ($ent->type1
!= 'rfc822'))) {
969 $entity = $ent->findDisplayEntity($entity, $alt_order, $strict);
974 if(!$strict && !$found) {
975 if (($this->type0
== 'text') &&
976 in_array($this->type1
, array('plain', 'html', 'message')) &&
977 isset($this->entity_id
)) {
978 if (count($this->entities
) == 0) {
979 if (!is_object($this->header
->disposition
) ||
strtolower($this->header
->disposition
->name
) != 'attachment') {
980 $entity[] = $this->entity_id
;
989 * @param array $alt_order
992 function findAlternativeEntity($alt_order) {
993 /* If we are dealing with alternative parts then we */
994 /* choose the best viewable message supported by SM. */
997 foreach($this->entities
as $ent) {
998 $type = $ent->header
->type0
. '/' . $ent->header
->type1
;
999 if ($type == 'multipart/related') {
1000 $type = $ent->header
->getParameter('type');
1001 // Mozilla bug. Mozilla does not provide the parameter type.
1002 if (!$type) $type = 'text/html';
1004 $altCount = count($alt_order);
1005 for ($j = $best_view; $j < $altCount; ++
$j) {
1006 if (($alt_order[$j] == $type) && ($j >= $best_view)) {
1018 function findRelatedEntity() {
1020 $related_type = $this->header
->getParameter('type');
1021 // Mozilla bug. Mozilla does not provide the parameter type.
1022 if (!$related_type) $related_type = 'text/html';
1023 $entCount = count($this->entities
);
1024 for ($i = 0; $i < $entCount; ++
$i) {
1025 $type = $this->entities
[$i]->header
->type0
.'/'.$this->entities
[$i]->header
->type1
;
1026 if ($related_type == $type) {
1027 $msgs[] = $this->entities
[$i];
1034 * @param array $exclude_id
1035 * @param array $result
1038 function getAttachments($exclude_id=array(), $result = array()) {
1040 if (($this->type0 == 'message') &&
1041 ($this->type1 == 'rfc822') &&
1042 ($this->entity_id) ) {
1043 $this = $this->entities[0];
1046 if (count($this->entities
)) {
1047 foreach ($this->entities
as $entity) {
1049 foreach ($exclude_id as $excl) {
1050 if ($entity->entity_id
=== $excl) {
1056 if (($entity->type0
== 'multipart') &&
1057 ($entity->type1
!= 'related')) {
1058 $result = $entity->getAttachments($exclude_id, $result);
1059 } else if ($entity->type0
!= 'multipart') {
1060 $result[] = $entity;
1066 foreach ($exclude_id as $excl) {
1067 $exclude = $exclude ||
($this->entity_id
== $excl);
1078 * Add attachment to message object
1079 * @param string $type attachment type
1080 * @param string $name attachment name
1081 * @param string $location path to attachment
1083 function initAttachment($type, $name, $location) {
1084 $attachment = new Message();
1085 $mime_header = new MessageHeader();
1086 $mime_header->setParameter('name', $name);
1087 // FIXME: duplicate code. see ContentType class
1088 $pos = strpos($type, '/');
1090 $mime_header->type0
= substr($type, 0, $pos);
1091 $mime_header->type1
= substr($type, $pos+
1);
1093 $mime_header->type0
= $type;
1095 $attachment->att_local_name
= $location;
1096 $disposition = new Disposition('attachment');
1097 $disposition->properties
['filename'] = $name;
1098 $mime_header->disposition
= $disposition;
1099 $attachment->mime_header
= $mime_header;
1100 $this->entities
[]=$attachment;
1104 * Delete all attachments from this object from disk.
1107 function purgeAttachments() {
1108 if ($this->att_local_name
&& file_exists($this->att_local_name
)) {
1109 unlink($this->att_local_name
);
1111 // recursively delete attachments from entities contained in this object
1112 for ($i=0, $entCount=count($this->entities
);$i< $entCount; ++
$i) {
1113 $this->entities
[$i]->purgeAttachments();