MailinglistMessage.class.php File Reference

Definition of MailinglistMessage (and related) classes. More...

Go to the source code of this file.

Data Structures
class	MailinglistHeader
	class MailinglistHeader More...
class	MailinglistMessagePart
	MailinglistMessagePart A class to represent a piece of a email message. More...
class	MailinglistMessage
	Class defining the contents of an e-mail message. More...

Functions
	mailinglist_message_rfc2047 ($string)
	mailinglist_message_rfc2047() More...

Detailed Description

Definition of MailinglistMessage (and related) classes.

References: RFC5322 (which superceeds RFC822 and RFC2822) EMail Format RFC2045, RFC2046, RFC2047, RFC2048, RFC2049 MIME Format RFC6657 Update charset

Definition in file MailinglistMessage.class.php.

Function Documentation

mailinglist_message_rfc2047

(

$string

)

mailinglist_message_rfc2047()

do rfc2047 conversion on a string.

Parameters

string

the string to parse.

Returns

the string with rfc2047 conversions done.

Tries to be more general than just taking a single atom so can be used on things like the subject header.

Todo:

should insure that the string is bounded by atom boundries.

Definition at line 26 of file MailinglistMessage.class.php.

Referenced by MailinglistHeader\get_atom(), and MailinglistMessagePart\header().

                                                {

    if (is_array($string)) {
      $result = array();
      foreach ($string as $idx => $value) {
        $result[$idx] = mailinglist_message_rfc2047($value);
      }
    }
    else {
    // RFC 2047 Processing
    // Look for tokens like: =?charset?encoding?text?=
    //
      $result = "";
      while ($string) {
        $pos = strpos($string, '=?');
        if ($pos === FALSE) {
          $result .= $string;
          $string = "";
          break;
        }
        if ($pos > 0) {
          $result .= substr($string, 0, $pos);
          $string = substr($string, $pos);
        }
        $pos0 = strpos($string, '?=');
        if ($pos0 === FALSE) { // no end, so no more encoded-words
          $result .= $string;
          $string = "";
          break;
        }
        $pos1 = strpos($string, ' ');
        if ($pos1 !== FALSE AND $pos1 < $pos0) {
          $result .= substr($string, 0, 2);
          $string = substr($string, 2);
          continue;
        }
        $pos1 = strpos($string, "\t");
        if ($pos1 !== FALSE AND $pos1 < $pos0) {
          $result .= substr($string, 0, 2);
          $string = substr($string, 2);
          continue;
        }
        $pos1 = strpos($string, '?', 2);
        if ($pos1 >= $pos0) {
          // not enough ? in between
          $result .= substr($string, 0, 2);
          $string = substr($string, 2);
          continue;
        }
        $charset = substr($string, 2, $pos1-2);
        $pos2 = strpos($string, '?', $pos1+1);
        if ($pos2 >= $pos0) {
          // not enough ? in between
          $result .= substr($string, 0, 2);
          $string = substr($string, 2);
          continue;
        }
        $encoding = substr($string, $pos1+1, $pos2 - $pos1 - 1);
        $text = substr($string, $pos2+1, $pos0 - $pos2 -1);
        $string = substr($string, $pos0+2);
        switch (strtolower($encoding)) {
        case 'b':
          $text = base64_decode($text);
          break;
        case 'q':
          $text = quoted_printable_decode($text);
          break;
        default:
          // We don't know what to do, so just pass it on.
          $text = '=?' . $charset . '?' . $encoding . '?=';
          break;
        }
        $text = iconv($charset, 'UTF-8', $text);
        $result .= $text;
      }
    }
    return $result;
  }

Here is the caller graph for this function: