|
@@ -21,121 +21,121 @@ class msg_header {
|
|
|
$cc = array(), $bcc = array(), $reply_to = '', $subject = '',
|
|
$cc = array(), $bcc = array(), $reply_to = '', $subject = '',
|
|
|
$id = 0, $mailbox = '', $description = '', $filename = '',
|
|
$id = 0, $mailbox = '', $description = '', $filename = '',
|
|
|
$entity_id = 0, $message_id = 0, $name = '', $priority = 3, $type = '',
|
|
$entity_id = 0, $message_id = 0, $name = '', $priority = 3, $type = '',
|
|
|
- $disposition = '', $md5='', $language='',$dnt = '', $xmailer = '';
|
|
|
|
|
-
|
|
|
|
|
|
|
+ $disposition = '', $md5='', $language='',$dnt = '', $xmailer = '';
|
|
|
|
|
+
|
|
|
/*
|
|
/*
|
|
|
* returns addres_list of supplied argument
|
|
* returns addres_list of supplied argument
|
|
|
* arguments: array('to', 'from', ...) or just a string like 'to'.
|
|
* arguments: array('to', 'from', ...) or just a string like 'to'.
|
|
|
* result: string: address1, addres2, ....
|
|
* result: string: address1, addres2, ....
|
|
|
- */
|
|
|
|
|
-
|
|
|
|
|
|
|
+ */
|
|
|
|
|
+
|
|
|
function setVar($var, $value) {
|
|
function setVar($var, $value) {
|
|
|
$this->{$var} = $value;
|
|
$this->{$var} = $value;
|
|
|
}
|
|
}
|
|
|
- /*
|
|
|
|
|
- * function to get the addres strings out of the header.
|
|
|
|
|
- * Arguments: string or array of strings !
|
|
|
|
|
- * example1: header->getAddr_s('to').
|
|
|
|
|
- * example2: header->getAddr_s(array('to','cc','bcc'))
|
|
|
|
|
- */
|
|
|
|
|
|
|
+ /*
|
|
|
|
|
+ * function to get the addres strings out of the header.
|
|
|
|
|
+ * Arguments: string or array of strings !
|
|
|
|
|
+ * example1: header->getAddr_s('to').
|
|
|
|
|
+ * example2: header->getAddr_s(array('to','cc','bcc'))
|
|
|
|
|
+ */
|
|
|
function getAddr_s($arr) {
|
|
function getAddr_s($arr) {
|
|
|
- if (is_array($arr)) {
|
|
|
|
|
- $s = '';
|
|
|
|
|
- foreach($arr as $arg ) {
|
|
|
|
|
- $result = $this->getAddr_s($arg);
|
|
|
|
|
- if ($result) {
|
|
|
|
|
- $s .= ', ' . $result;
|
|
|
|
|
- }
|
|
|
|
|
- }
|
|
|
|
|
- if ($s) $s = substr($s,2);
|
|
|
|
|
- return $s;
|
|
|
|
|
- } else {
|
|
|
|
|
- $s = '';
|
|
|
|
|
- eval('$addr = $this->'.$arr.';') ;
|
|
|
|
|
- if (is_array($addr)) {
|
|
|
|
|
- foreach ($addr as $addr_o) {
|
|
|
|
|
- if (is_object($addr_o)) {
|
|
|
|
|
- $s .= $addr_o->getAddress() . ', ';
|
|
|
|
|
- }
|
|
|
|
|
- }
|
|
|
|
|
- $s = substr($s,0,-2);
|
|
|
|
|
- } else {
|
|
|
|
|
- if (is_object($addr)) {
|
|
|
|
|
- $s .= $addr->getAddress();
|
|
|
|
|
- }
|
|
|
|
|
- }
|
|
|
|
|
- return $s;
|
|
|
|
|
- }
|
|
|
|
|
|
|
+ if (is_array($arr)) {
|
|
|
|
|
+ $s = '';
|
|
|
|
|
+ foreach($arr as $arg ) {
|
|
|
|
|
+ $result = $this->getAddr_s($arg);
|
|
|
|
|
+ if ($result) {
|
|
|
|
|
+ $s .= ', ' . $result;
|
|
|
|
|
+ }
|
|
|
|
|
+ }
|
|
|
|
|
+ if ($s) $s = substr($s,2);
|
|
|
|
|
+ return $s;
|
|
|
|
|
+ } else {
|
|
|
|
|
+ $s = '';
|
|
|
|
|
+ eval('$addr = $this->'.$arr.';') ;
|
|
|
|
|
+ if (is_array($addr)) {
|
|
|
|
|
+ foreach ($addr as $addr_o) {
|
|
|
|
|
+ if (is_object($addr_o)) {
|
|
|
|
|
+ $s .= $addr_o->getAddress() . ', ';
|
|
|
|
|
+ }
|
|
|
|
|
+ }
|
|
|
|
|
+ $s = substr($s,0,-2);
|
|
|
|
|
+ } else {
|
|
|
|
|
+ if (is_object($addr)) {
|
|
|
|
|
+ $s .= $addr->getAddress();
|
|
|
|
|
+ }
|
|
|
|
|
+ }
|
|
|
|
|
+ return $s;
|
|
|
|
|
+ }
|
|
|
}
|
|
}
|
|
|
-
|
|
|
|
|
|
|
+
|
|
|
function getAddr_a($arg, $excl_arr=array(), $arr = array()) {
|
|
function getAddr_a($arg, $excl_arr=array(), $arr = array()) {
|
|
|
- if (is_array($arg)) {
|
|
|
|
|
- foreach($arg as $argument ) {
|
|
|
|
|
- $arr = $this->getAddr_a($argument, $excl_arr, $arr);
|
|
|
|
|
- }
|
|
|
|
|
- return $arr;
|
|
|
|
|
- } else {
|
|
|
|
|
- eval('$addr = $this->'.$arg.';') ;
|
|
|
|
|
- if (is_array($addr)) {
|
|
|
|
|
- foreach ($addr as $addr_o) {
|
|
|
|
|
- if (is_object($addr_o)) {
|
|
|
|
|
- if (isset($addr_o->host) && $addr_o->host !='') {
|
|
|
|
|
- $email = $addr_o->mailbox.'@'.$addr_o->host;
|
|
|
|
|
- } else {
|
|
|
|
|
- $email = $addr_o->mailbox;
|
|
|
|
|
- }
|
|
|
|
|
- $email = strtolower($email);
|
|
|
|
|
- if ($email && !isset($arr[$email]) && !isset($excl_arr[$email])) {
|
|
|
|
|
- $arr[$email] = $addr_o->personal;
|
|
|
|
|
- }
|
|
|
|
|
- }
|
|
|
|
|
- }
|
|
|
|
|
- } else {
|
|
|
|
|
- if (is_object($addr)) {
|
|
|
|
|
- if (isset($addr->host)) {
|
|
|
|
|
- $email = $addr->mailbox.'@'.$addr->host;
|
|
|
|
|
- } else {
|
|
|
|
|
- $email = $addr->mailbox;
|
|
|
|
|
- }
|
|
|
|
|
- $email = strtolower($email);
|
|
|
|
|
- if ($email && !isset($arr[$email]) && !isset($excl_arr[$email])) {
|
|
|
|
|
- $arr[$email] = $addr->personal;
|
|
|
|
|
- }
|
|
|
|
|
- }
|
|
|
|
|
- }
|
|
|
|
|
- return $arr;
|
|
|
|
|
- }
|
|
|
|
|
|
|
+ if (is_array($arg)) {
|
|
|
|
|
+ foreach($arg as $argument ) {
|
|
|
|
|
+ $arr = $this->getAddr_a($argument, $excl_arr, $arr);
|
|
|
|
|
+ }
|
|
|
|
|
+ return $arr;
|
|
|
|
|
+ } else {
|
|
|
|
|
+ eval('$addr = $this->'.$arg.';') ;
|
|
|
|
|
+ if (is_array($addr)) {
|
|
|
|
|
+ foreach ($addr as $addr_o) {
|
|
|
|
|
+ if (is_object($addr_o)) {
|
|
|
|
|
+ if (isset($addr_o->host) && $addr_o->host !='') {
|
|
|
|
|
+ $email = $addr_o->mailbox.'@'.$addr_o->host;
|
|
|
|
|
+ } else {
|
|
|
|
|
+ $email = $addr_o->mailbox;
|
|
|
|
|
+ }
|
|
|
|
|
+ $email = strtolower($email);
|
|
|
|
|
+ if ($email && !isset($arr[$email]) && !isset($excl_arr[$email])) {
|
|
|
|
|
+ $arr[$email] = $addr_o->personal;
|
|
|
|
|
+ }
|
|
|
|
|
+ }
|
|
|
|
|
+ }
|
|
|
|
|
+ } else {
|
|
|
|
|
+ if (is_object($addr)) {
|
|
|
|
|
+ if (isset($addr->host)) {
|
|
|
|
|
+ $email = $addr->mailbox.'@'.$addr->host;
|
|
|
|
|
+ } else {
|
|
|
|
|
+ $email = $addr->mailbox;
|
|
|
|
|
+ }
|
|
|
|
|
+ $email = strtolower($email);
|
|
|
|
|
+ if ($email && !isset($arr[$email]) && !isset($excl_arr[$email])) {
|
|
|
|
|
+ $arr[$email] = $addr->personal;
|
|
|
|
|
+ }
|
|
|
|
|
+ }
|
|
|
|
|
+ }
|
|
|
|
|
+ return $arr;
|
|
|
|
|
+ }
|
|
|
}
|
|
}
|
|
|
}
|
|
}
|
|
|
|
|
|
|
|
class address_structure {
|
|
class address_structure {
|
|
|
- var $personal = '', $adl = '', $mailbox = '', $host = '', $group = '';
|
|
|
|
|
|
|
+ var $personal = '', $adl = '', $mailbox = '', $host = '', $group = '';
|
|
|
|
|
|
|
|
- function getAddress($full=true) {
|
|
|
|
|
- if (is_object($this)) {
|
|
|
|
|
- if (isset($this->host) && $this->host !='') {
|
|
|
|
|
- $email = '<'.$this->mailbox.'@'.$this->host.'>';
|
|
|
|
|
- } else {
|
|
|
|
|
- $email = $this->mailbox;
|
|
|
|
|
- }
|
|
|
|
|
- if (trim($this->personal) !='') {
|
|
|
|
|
- if ($email) {
|
|
|
|
|
- $addr = '"' . $this->personal . '" ' .$email;
|
|
|
|
|
- } else {
|
|
|
|
|
- $addr = $this->personal;
|
|
|
|
|
- }
|
|
|
|
|
- $best_dpl = $this->personal;
|
|
|
|
|
- } else {
|
|
|
|
|
- $addr = $email;
|
|
|
|
|
- $best_dpl = $email;
|
|
|
|
|
- }
|
|
|
|
|
- if ($full) {
|
|
|
|
|
- return $addr;
|
|
|
|
|
- } else {
|
|
|
|
|
- return $best_dpl;
|
|
|
|
|
- }
|
|
|
|
|
- } else return '';
|
|
|
|
|
- }
|
|
|
|
|
|
|
+ function getAddress($full=true) {
|
|
|
|
|
+ if (is_object($this)) {
|
|
|
|
|
+ if (isset($this->host) && $this->host !='') {
|
|
|
|
|
+ $email = '<'.$this->mailbox.'@'.$this->host.'>';
|
|
|
|
|
+ } else {
|
|
|
|
|
+ $email = $this->mailbox;
|
|
|
|
|
+ }
|
|
|
|
|
+ if (trim($this->personal) !='') {
|
|
|
|
|
+ if ($email) {
|
|
|
|
|
+ $addr = '"' . $this->personal . '" ' .$email;
|
|
|
|
|
+ } else {
|
|
|
|
|
+ $addr = $this->personal;
|
|
|
|
|
+ }
|
|
|
|
|
+ $best_dpl = $this->personal;
|
|
|
|
|
+ } else {
|
|
|
|
|
+ $addr = $email;
|
|
|
|
|
+ $best_dpl = $email;
|
|
|
|
|
+ }
|
|
|
|
|
+ if ($full) {
|
|
|
|
|
+ return $addr;
|
|
|
|
|
+ } else {
|
|
|
|
|
+ return $best_dpl;
|
|
|
|
|
+ }
|
|
|
|
|
+ } else return '';
|
|
|
|
|
+ }
|
|
|
}
|
|
}
|
|
|
|
|
|
|
|
class message {
|
|
class message {
|
|
@@ -146,14 +146,14 @@ class message {
|
|
|
**/
|
|
**/
|
|
|
var $header = '', $entities = array(), $mailbox = 'INBOX', $id = 0,
|
|
var $header = '', $entities = array(), $mailbox = 'INBOX', $id = 0,
|
|
|
$envelope = '', $parent_ent, $entity, $type0='', $type1='',
|
|
$envelope = '', $parent_ent, $entity, $type0='', $type1='',
|
|
|
- $parent = '', $decoded_body='',
|
|
|
|
|
- $is_seen = 0, $is_answered = 0, $is_deleted = 0, $is_flagged = 0,
|
|
|
|
|
- $is_mdnsent = 0;
|
|
|
|
|
|
|
+ $parent = '', $decoded_body='',
|
|
|
|
|
+ $is_seen = 0, $is_answered = 0, $is_deleted = 0, $is_flagged = 0,
|
|
|
|
|
+ $is_mdnsent = 0;
|
|
|
|
|
|
|
|
function setEnt($ent) {
|
|
function setEnt($ent) {
|
|
|
$this->entity_id= $ent;
|
|
$this->entity_id= $ent;
|
|
|
}
|
|
}
|
|
|
-
|
|
|
|
|
|
|
+
|
|
|
function setBody($body) {
|
|
function setBody($body) {
|
|
|
$this->decoded_body = $body;
|
|
$this->decoded_body = $body;
|
|
|
}
|
|
}
|
|
@@ -163,47 +163,47 @@ class message {
|
|
|
}
|
|
}
|
|
|
|
|
|
|
|
function addRFC822Header($read) {
|
|
function addRFC822Header($read) {
|
|
|
- $header = new msg_header();
|
|
|
|
|
- $this->header = sqimap_parse_RFC822Header($read,$header);
|
|
|
|
|
|
|
+ $header = new msg_header();
|
|
|
|
|
+ $this->header = sqimap_parse_RFC822Header($read,$header);
|
|
|
}
|
|
}
|
|
|
|
|
|
|
|
function getEntity($ent) {
|
|
function getEntity($ent) {
|
|
|
$cur_ent = $this->entity_id;
|
|
$cur_ent = $this->entity_id;
|
|
|
- if ($cur_ent == '' || $cur_ent == '0') {
|
|
|
|
|
- $cur_ent_a = array();
|
|
|
|
|
- } else {
|
|
|
|
|
- $cur_ent_a = explode('.',$this->entity_id);
|
|
|
|
|
- }
|
|
|
|
|
- $ent_a = explode('.',$ent);
|
|
|
|
|
|
|
+ if ($cur_ent == '' || $cur_ent == '0') {
|
|
|
|
|
+ $cur_ent_a = array();
|
|
|
|
|
+ } else {
|
|
|
|
|
+ $cur_ent_a = explode('.',$this->entity_id);
|
|
|
|
|
+ }
|
|
|
|
|
+ $ent_a = explode('.',$ent);
|
|
|
|
|
|
|
|
- $cnt = count($ent_a);
|
|
|
|
|
- $msg = $this;
|
|
|
|
|
- for ($i=0;$i<$cnt -1;$i++) {
|
|
|
|
|
- if (isset($cur_ent_a[$i]) && $cur_ent_a[$i] != $ent_a[$i]) {
|
|
|
|
|
- $msg = $msg->parent;
|
|
|
|
|
- $cur_ent_a = explode('.',$msg->entity_id);
|
|
|
|
|
- $i--;
|
|
|
|
|
- } else if (!isset($cur_ent_a[$i])) {
|
|
|
|
|
- if (isset($msg->entities[($ent_a[$i]-1)])) {
|
|
|
|
|
- $msg = $msg->entities[($ent_a[$i]-1)];
|
|
|
|
|
- } else {
|
|
|
|
|
- $msg = $msg->entities[0];
|
|
|
|
|
- }
|
|
|
|
|
- }
|
|
|
|
|
- if ($msg->type0 == 'message') {
|
|
|
|
|
- /*this is a header for a message/rfc822 entity */
|
|
|
|
|
- $msg = $msg->entities[0];
|
|
|
|
|
- }
|
|
|
|
|
- }
|
|
|
|
|
- if ($msg->type0 == 'message') {
|
|
|
|
|
- /*this is a header for a message/rfc822 entity */
|
|
|
|
|
- $msg = $msg->entities[0];
|
|
|
|
|
- }
|
|
|
|
|
|
|
+ $cnt = count($ent_a);
|
|
|
|
|
+ $msg = $this;
|
|
|
|
|
+ for ($i=0;$i<$cnt -1;$i++) {
|
|
|
|
|
+ if (isset($cur_ent_a[$i]) && $cur_ent_a[$i] != $ent_a[$i]) {
|
|
|
|
|
+ $msg = $msg->parent;
|
|
|
|
|
+ $cur_ent_a = explode('.',$msg->entity_id);
|
|
|
|
|
+ $i--;
|
|
|
|
|
+ } else if (!isset($cur_ent_a[$i])) {
|
|
|
|
|
+ if (isset($msg->entities[($ent_a[$i]-1)])) {
|
|
|
|
|
+ $msg = $msg->entities[($ent_a[$i]-1)];
|
|
|
|
|
+ } else {
|
|
|
|
|
+ $msg = $msg->entities[0];
|
|
|
|
|
+ }
|
|
|
|
|
+ }
|
|
|
|
|
+ if ($msg->type0 == 'message') {
|
|
|
|
|
+ /*this is a header for a message/rfc822 entity */
|
|
|
|
|
+ $msg = $msg->entities[0];
|
|
|
|
|
+ }
|
|
|
|
|
+ }
|
|
|
|
|
+ if ($msg->type0 == 'message') {
|
|
|
|
|
+ /*this is a header for a message/rfc822 entity */
|
|
|
|
|
+ $msg = $msg->entities[0];
|
|
|
|
|
+ }
|
|
|
|
|
|
|
|
- if (isset($msg->entities[($ent_a[$cnt-1])-1])) {
|
|
|
|
|
- $msg = $msg->entities[($ent_a[$cnt-1]-1)];
|
|
|
|
|
|
|
+ if (isset($msg->entities[($ent_a[$cnt-1])-1])) {
|
|
|
|
|
+ $msg = $msg->entities[($ent_a[$cnt-1]-1)];
|
|
|
}
|
|
}
|
|
|
- return $msg;
|
|
|
|
|
|
|
+ return $msg;
|
|
|
}
|
|
}
|
|
|
/*
|
|
/*
|
|
|
* Bodystructure parser, a recursive function for generating the
|
|
* Bodystructure parser, a recursive function for generating the
|
|
@@ -218,474 +218,471 @@ class message {
|
|
|
*
|
|
*
|
|
|
*/
|
|
*/
|
|
|
function parseStructure($read, $i=0, $message = false) {
|
|
function parseStructure($read, $i=0, $message = false) {
|
|
|
- $arg_no = 0;
|
|
|
|
|
- $arg_a = array();
|
|
|
|
|
- $cnt = strlen($read);
|
|
|
|
|
- while ($i < $cnt) {
|
|
|
|
|
- $char = strtoupper($read{$i});
|
|
|
|
|
- switch ($char) {
|
|
|
|
|
- case '(':
|
|
|
|
|
- if ($arg_no == 0 ) {
|
|
|
|
|
- if (!isset($msg)) {
|
|
|
|
|
- $msg = new message();
|
|
|
|
|
- $hdr = new msg_header();
|
|
|
|
|
- $hdr->type0 = 'text';
|
|
|
|
|
- $hdr->type1 = 'plain';
|
|
|
|
|
- $hdr->encoding = 'us-ascii';
|
|
|
|
|
-
|
|
|
|
|
- if ($this->type0 == 'message' && $this->type1 == 'rfc822') {
|
|
|
|
|
- $msg->entity_id = $this->entity_id .'.0'; /* header of message/rfc822 */
|
|
|
|
|
- } else if (isset($this->entity_id) && $this->entity_id !='') {
|
|
|
|
|
- $ent_no = count($this->entities)+1;
|
|
|
|
|
- $par_ent = substr($this->entity_id,-2);
|
|
|
|
|
- if ($par_ent{0} == '.') {
|
|
|
|
|
- $par_ent = $par_ent{1};
|
|
|
|
|
- }
|
|
|
|
|
- if ($par_ent == '0') {
|
|
|
|
|
- $ent_no = count($this->entities)+1;
|
|
|
|
|
- if ($ent_no > 0) {
|
|
|
|
|
- $ent = substr($this->entity_id,0,strrpos($this->entity_id,'.'));
|
|
|
|
|
- if ($ent) {
|
|
|
|
|
- $ent = $ent . ".$ent_no";
|
|
|
|
|
- } else {
|
|
|
|
|
- $ent = $ent_no;
|
|
|
|
|
- }
|
|
|
|
|
- $msg->entity_id = $ent;
|
|
|
|
|
- } else {
|
|
|
|
|
- $msg->entity_id = $ent_no;
|
|
|
|
|
- }
|
|
|
|
|
- } else {
|
|
|
|
|
- $ent = $this->entity_id . ".$ent_no";
|
|
|
|
|
- $msg->entity_id = $ent;
|
|
|
|
|
- }
|
|
|
|
|
- } else {
|
|
|
|
|
- $msg->entity_id = '0';
|
|
|
|
|
- }
|
|
|
|
|
- } else {
|
|
|
|
|
- $msg->header->type0 = 'multipart';
|
|
|
|
|
- $msg->type0 = 'multipart';
|
|
|
|
|
- while ($read{$i} == '(') {
|
|
|
|
|
- $msg->addEntity($msg->parseStructure($read,&$i));
|
|
|
|
|
- }
|
|
|
|
|
- }
|
|
|
|
|
- } else {
|
|
|
|
|
- switch ($arg_no) {
|
|
|
|
|
- case 1:
|
|
|
|
|
- /* multipart properties */
|
|
|
|
|
- $i++;
|
|
|
|
|
- $arg_a[] = $this->parseProperties($read,&$i);
|
|
|
|
|
- $arg_no++;
|
|
|
|
|
- break;
|
|
|
|
|
- case 2:
|
|
|
|
|
- if (isset($msg->type0) && $msg->type0 == 'multipart') {
|
|
|
|
|
- $i++;
|
|
|
|
|
- $arg_a[]= $msg->parseDisposition($read,&$i);
|
|
|
|
|
- } else { /* properties */
|
|
|
|
|
- /* properties */
|
|
|
|
|
- $arg_a[] = $msg->parseProperties($read,&$i);
|
|
|
|
|
- }
|
|
|
|
|
- $arg_no++;
|
|
|
|
|
- break;
|
|
|
|
|
- case 7:
|
|
|
|
|
- if ($arg_a[0] == 'message' && $arg_a[1] == 'rfc822') {
|
|
|
|
|
-
|
|
|
|
|
- $msg->header->type0 = $arg_a[0];
|
|
|
|
|
- $msg->type0 = $arg_a[0];
|
|
|
|
|
|
|
+ $arg_no = 0;
|
|
|
|
|
+ $arg_a = array();
|
|
|
|
|
+ $cnt = strlen($read);
|
|
|
|
|
+ while ($i < $cnt) {
|
|
|
|
|
+ $char = strtoupper($read{$i});
|
|
|
|
|
+ switch ($char) {
|
|
|
|
|
+ case '(':
|
|
|
|
|
+ if ($arg_no == 0 ) {
|
|
|
|
|
+ if (!isset($msg)) {
|
|
|
|
|
+ $msg = new message();
|
|
|
|
|
+ $hdr = new msg_header();
|
|
|
|
|
+ $hdr->type0 = 'text';
|
|
|
|
|
+ $hdr->type1 = 'plain';
|
|
|
|
|
+ $hdr->encoding = 'us-ascii';
|
|
|
|
|
|
|
|
- $msg->header->type1 = $arg_a[1];
|
|
|
|
|
- $msg->type1 = $arg_a[1];
|
|
|
|
|
-
|
|
|
|
|
- $msg->parseEnvelope($read,&$i,&$hdr);
|
|
|
|
|
- $i++;
|
|
|
|
|
- while ($i < $cnt && $read{$i} != '(') {
|
|
|
|
|
- $i++;
|
|
|
|
|
- }
|
|
|
|
|
- $msg->addEntity($msg->parseStructure($read,&$i));
|
|
|
|
|
- }
|
|
|
|
|
- break;
|
|
|
|
|
- case 8:
|
|
|
|
|
- $i++;
|
|
|
|
|
- $arg_a[] = $msg->parseDisposition($read,&$i);
|
|
|
|
|
- $arg_no++;
|
|
|
|
|
- break;
|
|
|
|
|
- case 9:
|
|
|
|
|
- if ($arg_a[0] == 'text' ||
|
|
|
|
|
- ($arg_a[0] == 'message' && $arg_a[1] == 'rfc822')) {
|
|
|
|
|
- $i++;
|
|
|
|
|
- $arg_a[] = $msg->parseDisposition($read,&$i);
|
|
|
|
|
- } else {
|
|
|
|
|
- $arg_a[] = $msg->parseLanguage($read,&$i);
|
|
|
|
|
- }
|
|
|
|
|
- $arg_no++;
|
|
|
|
|
- break;
|
|
|
|
|
- case 10:
|
|
|
|
|
- if ($arg_a[0] == 'text' ||
|
|
|
|
|
- ($arg_a[0] == 'message' && $arg_a[1] == 'rfc822')) {
|
|
|
|
|
- $arg_a[] = $msg->parseLanguage($read,&$i);
|
|
|
|
|
- } else {
|
|
|
|
|
- $arg_a[] = ''; /* not yet desribed in rfc2060 */
|
|
|
|
|
- }
|
|
|
|
|
- $arg_no++;
|
|
|
|
|
- break;
|
|
|
|
|
- default:
|
|
|
|
|
- /* unknown argument, skip this part */
|
|
|
|
|
- $msg->parseParenthesis($read,&$i);
|
|
|
|
|
- $arg_a[] = '';
|
|
|
|
|
- $arg_no++;
|
|
|
|
|
- break;
|
|
|
|
|
- } /* switch */
|
|
|
|
|
- }
|
|
|
|
|
- break;
|
|
|
|
|
- case '"':
|
|
|
|
|
- /* inside an entity -> start processing */
|
|
|
|
|
- $debug = substr($read,$i,20);
|
|
|
|
|
- $arg_s = $msg->parseQuote($read,&$i);
|
|
|
|
|
- $arg_no++;
|
|
|
|
|
- if ($arg_no < 3) $arg_s = strtolower($arg_s); /* type0 and type1 */
|
|
|
|
|
- $arg_a[] = $arg_s;
|
|
|
|
|
- break;
|
|
|
|
|
- case 'N':
|
|
|
|
|
- /* probably NIL argument */
|
|
|
|
|
- if (strtolower(substr($read,$i,3)) == 'nil') {
|
|
|
|
|
- $arg_a[] = '';
|
|
|
|
|
- $arg_no++;
|
|
|
|
|
- $i = $i+2;
|
|
|
|
|
- }
|
|
|
|
|
- break;
|
|
|
|
|
- case '{':
|
|
|
|
|
- /* process the literal value */
|
|
|
|
|
- $arg_a[] = $msg->parseLiteral($read,&$i);
|
|
|
|
|
- $arg_no++;
|
|
|
|
|
- break;
|
|
|
|
|
- case (is_numeric($read{$i}) ):
|
|
|
|
|
- /* process integers */
|
|
|
|
|
- if ($read{$i} == ' ') break;
|
|
|
|
|
- $arg_s = $read{$i};;
|
|
|
|
|
- $i++;
|
|
|
|
|
- while (preg_match('/\d+/',$read{$i})) { // != ' ') {
|
|
|
|
|
- $arg_s .= $read{$i};
|
|
|
|
|
- $i++;
|
|
|
|
|
- }
|
|
|
|
|
- $arg_no++;
|
|
|
|
|
- $arg_a[] = $arg_s;
|
|
|
|
|
- break;
|
|
|
|
|
- case ')':
|
|
|
|
|
- if (isset($msg->type0) && $msg->type0 == 'multipart') {
|
|
|
|
|
- $multipart = true;
|
|
|
|
|
- } else {
|
|
|
|
|
- $multipart = false;
|
|
|
|
|
- }
|
|
|
|
|
- if (!$multipart) {
|
|
|
|
|
- if ($arg_a[0] == 'text' ||
|
|
|
|
|
- ($arg_a[0] == 'message' && $arg_a[1] == 'rfc822')) {
|
|
|
|
|
- $shifted_args = true;
|
|
|
|
|
- } else {
|
|
|
|
|
- $shifted_args = false;
|
|
|
|
|
- }
|
|
|
|
|
- $hdr->type0 = $arg_a[0];
|
|
|
|
|
- $hdr->type1 = $arg_a[1];
|
|
|
|
|
|
|
+ if ($this->type0 == 'message' && $this->type1 == 'rfc822') {
|
|
|
|
|
+ $msg->entity_id = $this->entity_id .'.0'; /* header of message/rfc822 */
|
|
|
|
|
+ } else if (isset($this->entity_id) && $this->entity_id !='') {
|
|
|
|
|
+ $ent_no = count($this->entities)+1;
|
|
|
|
|
+ $par_ent = substr($this->entity_id,-2);
|
|
|
|
|
+ if ($par_ent{0} == '.') {
|
|
|
|
|
+ $par_ent = $par_ent{1};
|
|
|
|
|
+ }
|
|
|
|
|
+ if ($par_ent == '0') {
|
|
|
|
|
+ $ent_no = count($this->entities)+1;
|
|
|
|
|
+ if ($ent_no > 0) {
|
|
|
|
|
+ $ent = substr($this->entity_id,0,strrpos($this->entity_id,'.'));
|
|
|
|
|
+ if ($ent) {
|
|
|
|
|
+ $ent = $ent . ".$ent_no";
|
|
|
|
|
+ } else {
|
|
|
|
|
+ $ent = $ent_no;
|
|
|
|
|
+ }
|
|
|
|
|
+ $msg->entity_id = $ent;
|
|
|
|
|
+ } else {
|
|
|
|
|
+ $msg->entity_id = $ent_no;
|
|
|
|
|
+ }
|
|
|
|
|
+ } else {
|
|
|
|
|
+ $ent = $this->entity_id . ".$ent_no";
|
|
|
|
|
+ $msg->entity_id = $ent;
|
|
|
|
|
+ }
|
|
|
|
|
+ } else {
|
|
|
|
|
+ $msg->entity_id = '0';
|
|
|
|
|
+ }
|
|
|
|
|
+ } else {
|
|
|
|
|
+ $msg->header->type0 = 'multipart';
|
|
|
|
|
+ $msg->type0 = 'multipart';
|
|
|
|
|
+ while ($read{$i} == '(') {
|
|
|
|
|
+ $msg->addEntity($msg->parseStructure($read,&$i));
|
|
|
|
|
+ }
|
|
|
|
|
+ }
|
|
|
|
|
+ } else {
|
|
|
|
|
+ switch ($arg_no) {
|
|
|
|
|
+ case 1:
|
|
|
|
|
+ /* multipart properties */
|
|
|
|
|
+ $i++;
|
|
|
|
|
+ $arg_a[] = $this->parseProperties($read,&$i);
|
|
|
|
|
+ $arg_no++;
|
|
|
|
|
+ break;
|
|
|
|
|
+ case 2:
|
|
|
|
|
+ if (isset($msg->type0) && $msg->type0 == 'multipart') {
|
|
|
|
|
+ $i++;
|
|
|
|
|
+ $arg_a[]= $msg->parseDisposition($read,&$i);
|
|
|
|
|
+ } else { /* properties */
|
|
|
|
|
+ /* properties */
|
|
|
|
|
+ $arg_a[] = $msg->parseProperties($read,&$i);
|
|
|
|
|
+ }
|
|
|
|
|
+ $arg_no++;
|
|
|
|
|
+ break;
|
|
|
|
|
+ case 7:
|
|
|
|
|
+ if ($arg_a[0] == 'message' && $arg_a[1] == 'rfc822') {
|
|
|
|
|
+ $msg->header->type0 = $arg_a[0];
|
|
|
|
|
+ $msg->type0 = $arg_a[0];
|
|
|
|
|
+ $msg->header->type1 = $arg_a[1];
|
|
|
|
|
+ $msg->type1 = $arg_a[1];
|
|
|
|
|
+ $msg->parseEnvelope($read,&$i,&$hdr);
|
|
|
|
|
+ $i++;
|
|
|
|
|
+ while ($i < $cnt && $read{$i} != '(') {
|
|
|
|
|
+ $i++;
|
|
|
|
|
+ }
|
|
|
|
|
+ $msg->addEntity($msg->parseStructure($read,&$i));
|
|
|
|
|
+ }
|
|
|
|
|
+ break;
|
|
|
|
|
+ case 8:
|
|
|
|
|
+ $i++;
|
|
|
|
|
+ $arg_a[] = $msg->parseDisposition($read,&$i);
|
|
|
|
|
+ $arg_no++;
|
|
|
|
|
+ break;
|
|
|
|
|
+ case 9:
|
|
|
|
|
+ if ($arg_a[0] == 'text' ||
|
|
|
|
|
+ ($arg_a[0] == 'message' && $arg_a[1] == 'rfc822')) {
|
|
|
|
|
+ $i++;
|
|
|
|
|
+ $arg_a[] = $msg->parseDisposition($read,&$i);
|
|
|
|
|
+ } else {
|
|
|
|
|
+ $arg_a[] = $msg->parseLanguage($read,&$i);
|
|
|
|
|
+ }
|
|
|
|
|
+ $arg_no++;
|
|
|
|
|
+ break;
|
|
|
|
|
+ case 10:
|
|
|
|
|
+ if ($arg_a[0] == 'text' ||
|
|
|
|
|
+ ($arg_a[0] == 'message' && $arg_a[1] == 'rfc822')) {
|
|
|
|
|
+ $arg_a[] = $msg->parseLanguage($read,&$i);
|
|
|
|
|
+ } else {
|
|
|
|
|
+ $arg_a[] = ''; /* not yet desribed in rfc2060 */
|
|
|
|
|
+ }
|
|
|
|
|
+ $arg_no++;
|
|
|
|
|
+ break;
|
|
|
|
|
+ default:
|
|
|
|
|
+ /* unknown argument, skip this part */
|
|
|
|
|
+ $msg->parseParenthesis($read,&$i);
|
|
|
|
|
+ $arg_a[] = '';
|
|
|
|
|
+ $arg_no++;
|
|
|
|
|
+ break;
|
|
|
|
|
+ } /* switch */
|
|
|
|
|
+ }
|
|
|
|
|
+ break;
|
|
|
|
|
+ case '"':
|
|
|
|
|
+ /* inside an entity -> start processing */
|
|
|
|
|
+ $debug = substr($read,$i,20);
|
|
|
|
|
+ $arg_s = $msg->parseQuote($read,&$i);
|
|
|
|
|
+ $arg_no++;
|
|
|
|
|
+ if ($arg_no < 3) $arg_s = strtolower($arg_s); /* type0 and type1 */
|
|
|
|
|
+ $arg_a[] = $arg_s;
|
|
|
|
|
+ break;
|
|
|
|
|
+ case 'N':
|
|
|
|
|
+ /* probably NIL argument */
|
|
|
|
|
+ if (strtolower(substr($read,$i,3)) == 'nil') {
|
|
|
|
|
+ $arg_a[] = '';
|
|
|
|
|
+ $arg_no++;
|
|
|
|
|
+ $i = $i+2;
|
|
|
|
|
+ }
|
|
|
|
|
+ break;
|
|
|
|
|
+ case '{':
|
|
|
|
|
+ /* process the literal value */
|
|
|
|
|
+ $arg_a[] = $msg->parseLiteral($read,&$i);
|
|
|
|
|
+ $arg_no++;
|
|
|
|
|
+ break;
|
|
|
|
|
+ case (is_numeric($read{$i}) ):
|
|
|
|
|
+ /* process integers */
|
|
|
|
|
+ if ($read{$i} == ' ') break;
|
|
|
|
|
+ $arg_s = $read{$i};;
|
|
|
|
|
+ $i++;
|
|
|
|
|
+ while (preg_match('/\d+/',$read{$i})) { /* != ' ') { */
|
|
|
|
|
+ $arg_s .= $read{$i};
|
|
|
|
|
+ $i++;
|
|
|
|
|
+ }
|
|
|
|
|
+ $arg_no++;
|
|
|
|
|
+ $arg_a[] = $arg_s;
|
|
|
|
|
+ break;
|
|
|
|
|
+ case ')':
|
|
|
|
|
+ if (isset($msg->type0) && $msg->type0 == 'multipart') {
|
|
|
|
|
+ $multipart = true;
|
|
|
|
|
+ } else {
|
|
|
|
|
+ $multipart = false;
|
|
|
|
|
+ }
|
|
|
|
|
+ if (!$multipart) {
|
|
|
|
|
+ if ($arg_a[0] == 'text' ||
|
|
|
|
|
+ ($arg_a[0] == 'message' && $arg_a[1] == 'rfc822')) {
|
|
|
|
|
+ $shifted_args = true;
|
|
|
|
|
+ } else {
|
|
|
|
|
+ $shifted_args = false;
|
|
|
|
|
+ }
|
|
|
|
|
+ $hdr->type0 = $arg_a[0];
|
|
|
|
|
+ $hdr->type1 = $arg_a[1];
|
|
|
|
|
|
|
|
- $msg->type0 = $arg_a[0];
|
|
|
|
|
- $msg->type1 = $arg_a[1];
|
|
|
|
|
|
|
+ $msg->type0 = $arg_a[0];
|
|
|
|
|
+ $msg->type1 = $arg_a[1];
|
|
|
|
|
|
|
|
- $arr = $arg_a[2];
|
|
|
|
|
- if (is_array($arr)) {
|
|
|
|
|
- foreach($arr as $name => $value) {
|
|
|
|
|
- $hdr->{$name} = $value;
|
|
|
|
|
- }
|
|
|
|
|
- }
|
|
|
|
|
- $hdr->id = str_replace( '<', '', str_replace( '>', '', $arg_a[3] ) );
|
|
|
|
|
- $hdr->description = $arg_a[4];
|
|
|
|
|
- $hdr->encoding = strtolower($arg_a[5]);
|
|
|
|
|
- $hdr->entity_id = $msg->entity_id;
|
|
|
|
|
- $hdr->size = $arg_a[6];
|
|
|
|
|
- if ($shifted_args) {
|
|
|
|
|
- $hdr->lines = $arg_a[7];
|
|
|
|
|
- if (isset($arg_a[8])) {
|
|
|
|
|
- $hdr->md5 = $arg_a[8];
|
|
|
|
|
- }
|
|
|
|
|
- if (isset($arg_a[9])) {
|
|
|
|
|
- $hdr->disposition = $arg_a[9];
|
|
|
|
|
- }
|
|
|
|
|
- if (isset($arg_a[10])) {
|
|
|
|
|
- $hdr->language = $arg_a[10];
|
|
|
|
|
- }
|
|
|
|
|
- } else {
|
|
|
|
|
- if (isset($arg_a[7])) {
|
|
|
|
|
- $hdr->md5 = $arg_a[7];
|
|
|
|
|
- }
|
|
|
|
|
- if (isset($arg_a[8])) {
|
|
|
|
|
- $hdr->disposition = $arg_a[8];
|
|
|
|
|
- }
|
|
|
|
|
- if (isset($arg_a[9])) {
|
|
|
|
|
- $hdr->language = $arg_a[9];
|
|
|
|
|
- }
|
|
|
|
|
- }
|
|
|
|
|
- $msg->header = $hdr;
|
|
|
|
|
- $arg_no = 0;
|
|
|
|
|
- $i++;
|
|
|
|
|
- if (substr($msg->entity_id,-2) == '.0' && $msg->type0 !='multipart') {
|
|
|
|
|
- $msg->entity_id++;
|
|
|
|
|
- }
|
|
|
|
|
- return $msg;
|
|
|
|
|
- } else {
|
|
|
|
|
- $hdr->type0 = 'multipart';
|
|
|
|
|
- $hdr->type1 = $arg_a[0];
|
|
|
|
|
|
|
+ $arr = $arg_a[2];
|
|
|
|
|
+ if (is_array($arr)) {
|
|
|
|
|
+ foreach($arr as $name => $value) {
|
|
|
|
|
+ $hdr->{$name} = $value;
|
|
|
|
|
+ }
|
|
|
|
|
+ }
|
|
|
|
|
+ $hdr->id = str_replace( '<', '', str_replace( '>', '', $arg_a[3] ) );
|
|
|
|
|
+ $hdr->description = $arg_a[4];
|
|
|
|
|
+ $hdr->encoding = strtolower($arg_a[5]);
|
|
|
|
|
+ $hdr->entity_id = $msg->entity_id;
|
|
|
|
|
+ $hdr->size = $arg_a[6];
|
|
|
|
|
+ if ($shifted_args) {
|
|
|
|
|
+ $hdr->lines = $arg_a[7];
|
|
|
|
|
+ if (isset($arg_a[8])) {
|
|
|
|
|
+ $hdr->md5 = $arg_a[8];
|
|
|
|
|
+ }
|
|
|
|
|
+ if (isset($arg_a[9])) {
|
|
|
|
|
+ $hdr->disposition = $arg_a[9];
|
|
|
|
|
+ }
|
|
|
|
|
+ if (isset($arg_a[10])) {
|
|
|
|
|
+ $hdr->language = $arg_a[10];
|
|
|
|
|
+ }
|
|
|
|
|
+ } else {
|
|
|
|
|
+ if (isset($arg_a[7])) {
|
|
|
|
|
+ $hdr->md5 = $arg_a[7];
|
|
|
|
|
+ }
|
|
|
|
|
+ if (isset($arg_a[8])) {
|
|
|
|
|
+ $hdr->disposition = $arg_a[8];
|
|
|
|
|
+ }
|
|
|
|
|
+ if (isset($arg_a[9])) {
|
|
|
|
|
+ $hdr->language = $arg_a[9];
|
|
|
|
|
+ }
|
|
|
|
|
+ }
|
|
|
|
|
+ $msg->header = $hdr;
|
|
|
|
|
+ $arg_no = 0;
|
|
|
|
|
+ $i++;
|
|
|
|
|
+ if (substr($msg->entity_id,-2) == '.0' && $msg->type0 !='multipart') {
|
|
|
|
|
+ $msg->entity_id++;
|
|
|
|
|
+ }
|
|
|
|
|
+ return $msg;
|
|
|
|
|
+ } else {
|
|
|
|
|
+ $hdr->type0 = 'multipart';
|
|
|
|
|
+ $hdr->type1 = $arg_a[0];
|
|
|
|
|
|
|
|
- $msg->type0 = 'multipart';
|
|
|
|
|
- $msg->type1 = $arg_a[0];
|
|
|
|
|
- if (isset($arg_a[1])) {
|
|
|
|
|
- $arr = $arg_a[1];
|
|
|
|
|
- if (is_array($arr)) {
|
|
|
|
|
- foreach($arr as $name => $value) {
|
|
|
|
|
- $hdr->{$name} = $value;
|
|
|
|
|
- }
|
|
|
|
|
- }
|
|
|
|
|
- }
|
|
|
|
|
- if (isset($arg_a[2])) {
|
|
|
|
|
- $hdr->disposition = $arg_a[2];
|
|
|
|
|
- }
|
|
|
|
|
- if (isset($arg_a[3])) {
|
|
|
|
|
- $hdr->language = $arg_a[3];
|
|
|
|
|
- }
|
|
|
|
|
- $msg->header = $hdr;
|
|
|
|
|
- return $msg;
|
|
|
|
|
- }
|
|
|
|
|
- default:
|
|
|
|
|
- break;
|
|
|
|
|
- } /* switch */
|
|
|
|
|
- $i++;
|
|
|
|
|
- } /* while */
|
|
|
|
|
|
|
+ $msg->type0 = 'multipart';
|
|
|
|
|
+ $msg->type1 = $arg_a[0];
|
|
|
|
|
+ if (isset($arg_a[1])) {
|
|
|
|
|
+ $arr = $arg_a[1];
|
|
|
|
|
+ if (is_array($arr)) {
|
|
|
|
|
+ foreach($arr as $name => $value) {
|
|
|
|
|
+ $hdr->{$name} = $value;
|
|
|
|
|
+ }
|
|
|
|
|
+ }
|
|
|
|
|
+ }
|
|
|
|
|
+ if (isset($arg_a[2])) {
|
|
|
|
|
+ $hdr->disposition = $arg_a[2];
|
|
|
|
|
+ }
|
|
|
|
|
+ if (isset($arg_a[3])) {
|
|
|
|
|
+ $hdr->language = $arg_a[3];
|
|
|
|
|
+ }
|
|
|
|
|
+ $msg->header = $hdr;
|
|
|
|
|
+ return $msg;
|
|
|
|
|
+ }
|
|
|
|
|
+ default:
|
|
|
|
|
+ break;
|
|
|
|
|
+ } /* switch */
|
|
|
|
|
+ $i++;
|
|
|
|
|
+ } /* while */
|
|
|
} /* parsestructure */
|
|
} /* parsestructure */
|
|
|
-
|
|
|
|
|
|
|
+
|
|
|
function parseProperties($read, $i) {
|
|
function parseProperties($read, $i) {
|
|
|
- $properties = array();
|
|
|
|
|
- $arg_s = '';
|
|
|
|
|
- $prop_name = '';
|
|
|
|
|
- while ($read{$i} != ')') {
|
|
|
|
|
- if ($read{$i} == '"') {
|
|
|
|
|
- $arg_s = $this->parseQuote($read,&$i);
|
|
|
|
|
- } else if ($read{$i} == '{') {
|
|
|
|
|
- $arg_s = $this->parseLiteral($read,&$i);
|
|
|
|
|
- }
|
|
|
|
|
- if ($prop_name == '' && $arg_s) {
|
|
|
|
|
- $prop_name = strtolower($arg_s);
|
|
|
|
|
- $properties[$prop_name] = '';
|
|
|
|
|
- $arg_s = '';
|
|
|
|
|
- } elseif ($prop_name != '' && $arg_s != '') {
|
|
|
|
|
- $properties[$prop_name] = $arg_s;
|
|
|
|
|
- $prop_name = '';
|
|
|
|
|
- $arg_s = '';
|
|
|
|
|
- }
|
|
|
|
|
- $i++;
|
|
|
|
|
- }
|
|
|
|
|
- return $properties;
|
|
|
|
|
|
|
+ $properties = array();
|
|
|
|
|
+ $arg_s = '';
|
|
|
|
|
+ $prop_name = '';
|
|
|
|
|
+ while ($read{$i} != ')') {
|
|
|
|
|
+ if ($read{$i} == '"') {
|
|
|
|
|
+ $arg_s = $this->parseQuote($read,&$i);
|
|
|
|
|
+ } else if ($read{$i} == '{') {
|
|
|
|
|
+ $arg_s = $this->parseLiteral($read,&$i);
|
|
|
|
|
+ }
|
|
|
|
|
+ if ($prop_name == '' && $arg_s) {
|
|
|
|
|
+ $prop_name = strtolower($arg_s);
|
|
|
|
|
+ $properties[$prop_name] = '';
|
|
|
|
|
+ $arg_s = '';
|
|
|
|
|
+ } elseif ($prop_name != '' && $arg_s != '') {
|
|
|
|
|
+ $properties[$prop_name] = $arg_s;
|
|
|
|
|
+ $prop_name = '';
|
|
|
|
|
+ $arg_s = '';
|
|
|
|
|
+ }
|
|
|
|
|
+ $i++;
|
|
|
|
|
+ }
|
|
|
|
|
+ return $properties;
|
|
|
}
|
|
}
|
|
|
|
|
|
|
|
function parseEnvelope($read, $i, $hdr) {
|
|
function parseEnvelope($read, $i, $hdr) {
|
|
|
$arg_no = 0;
|
|
$arg_no = 0;
|
|
|
- $arg_a = array();
|
|
|
|
|
- $cnt = strlen($read);
|
|
|
|
|
- while ($i< $cnt && $read{$i} != ')') {
|
|
|
|
|
- $i++;
|
|
|
|
|
- $char = strtoupper($read{$i});
|
|
|
|
|
- switch ($char) {
|
|
|
|
|
- case '"':
|
|
|
|
|
- $arg_a[] = $this->parseQuote($read,&$i);
|
|
|
|
|
- $arg_no++;
|
|
|
|
|
- break;
|
|
|
|
|
- case '{':
|
|
|
|
|
- $arg_a[] = $this->parseLiteral($read,&$i);
|
|
|
|
|
- $arg_no++;
|
|
|
|
|
- break;
|
|
|
|
|
- case 'N':
|
|
|
|
|
- /* probably NIL argument */
|
|
|
|
|
- if (strtolower(substr($read,$i,3)) == 'nil') {
|
|
|
|
|
- $arg_a[] = '';
|
|
|
|
|
- $arg_no++;
|
|
|
|
|
- $i = $i+2;
|
|
|
|
|
- }
|
|
|
|
|
- break;
|
|
|
|
|
- case '(':
|
|
|
|
|
- /* Address structure
|
|
|
|
|
- * With group support.
|
|
|
|
|
- * Note: Group support is useless on SMTP connections
|
|
|
|
|
- * because the protocol doesn't support it
|
|
|
|
|
- */
|
|
|
|
|
- $addr_a = array();
|
|
|
|
|
- $group = '';
|
|
|
|
|
- $a=0;
|
|
|
|
|
- while ($i < $cnt && $read{$i} != ')') {
|
|
|
|
|
- if ($read{$i} == '(') {
|
|
|
|
|
- $addr = $this->parseAddress($read,&$i);
|
|
|
|
|
- if ($addr->host == '' && $addr->mailbox != '') {
|
|
|
|
|
- /* start of group */
|
|
|
|
|
- $group = $addr->mailbox;
|
|
|
|
|
- $group_addr = $addr;
|
|
|
|
|
- $j = $a;
|
|
|
|
|
- } elseif ($group && $addr->host == '' && $addr->mailbox == '') {
|
|
|
|
|
- /* end group */
|
|
|
|
|
- if ($a == $j+1) { /* no group members */
|
|
|
|
|
- $group_addr->group = $group;
|
|
|
|
|
- $group_addr->mailbox = '';
|
|
|
|
|
- $group_addr->personal = "$group: Undisclosed recipients;";
|
|
|
|
|
- $addr_a[] = $group_addr;
|
|
|
|
|
- $group ='';
|
|
|
|
|
- }
|
|
|
|
|
- } else {
|
|
|
|
|
- $addr->group = $group;
|
|
|
|
|
- $addr_a[] = $addr;
|
|
|
|
|
- }
|
|
|
|
|
- $a++;
|
|
|
|
|
- }
|
|
|
|
|
- $i++;
|
|
|
|
|
- }
|
|
|
|
|
- $arg_a[] = $addr_a;
|
|
|
|
|
- break;
|
|
|
|
|
- default:
|
|
|
|
|
- break;
|
|
|
|
|
- }
|
|
|
|
|
- $i++;
|
|
|
|
|
- }
|
|
|
|
|
- if (count($arg_a) > 9) {
|
|
|
|
|
- /* argument 1: date */
|
|
|
|
|
|
|
+ $arg_a = array();
|
|
|
|
|
+ $cnt = strlen($read);
|
|
|
|
|
+ while ($i < $cnt && $read{$i} != ')') {
|
|
|
|
|
+ $i++;
|
|
|
|
|
+ $char = strtoupper($read{$i});
|
|
|
|
|
+ switch ($char) {
|
|
|
|
|
+ case '"':
|
|
|
|
|
+ $arg_a[] = $this->parseQuote($read,&$i);
|
|
|
|
|
+ $arg_no++;
|
|
|
|
|
+ break;
|
|
|
|
|
+ case '{':
|
|
|
|
|
+ $arg_a[] = $this->parseLiteral($read,&$i);
|
|
|
|
|
+ $arg_no++;
|
|
|
|
|
+ break;
|
|
|
|
|
+ case 'N':
|
|
|
|
|
+ /* probably NIL argument */
|
|
|
|
|
+ if (strtolower(substr($read,$i,3)) == 'nil') {
|
|
|
|
|
+ $arg_a[] = '';
|
|
|
|
|
+ $arg_no++;
|
|
|
|
|
+ $i = $i+2;
|
|
|
|
|
+ }
|
|
|
|
|
+ break;
|
|
|
|
|
+ case '(':
|
|
|
|
|
+ /* Address structure
|
|
|
|
|
+ * With group support.
|
|
|
|
|
+ * Note: Group support is useless on SMTP connections
|
|
|
|
|
+ * because the protocol doesn't support it
|
|
|
|
|
+ */
|
|
|
|
|
+ $addr_a = array();
|
|
|
|
|
+ $group = '';
|
|
|
|
|
+ $a=0;
|
|
|
|
|
+ while ($i < $cnt && $read{$i} != ')') {
|
|
|
|
|
+ if ($read{$i} == '(') {
|
|
|
|
|
+ $addr = $this->parseAddress($read,&$i);
|
|
|
|
|
+ if ($addr->host == '' && $addr->mailbox != '') {
|
|
|
|
|
+ /* start of group */
|
|
|
|
|
+ $group = $addr->mailbox;
|
|
|
|
|
+ $group_addr = $addr;
|
|
|
|
|
+ $j = $a;
|
|
|
|
|
+ } elseif ($group && $addr->host == '' && $addr->mailbox == '') {
|
|
|
|
|
+ /* end group */
|
|
|
|
|
+ if ($a == $j+1) { /* no group members */
|
|
|
|
|
+ $group_addr->group = $group;
|
|
|
|
|
+ $group_addr->mailbox = '';
|
|
|
|
|
+ $group_addr->personal = "$group: Undisclosed recipients;";
|
|
|
|
|
+ $addr_a[] = $group_addr;
|
|
|
|
|
+ $group ='';
|
|
|
|
|
+ }
|
|
|
|
|
+ } else {
|
|
|
|
|
+ $addr->group = $group;
|
|
|
|
|
+ $addr_a[] = $addr;
|
|
|
|
|
+ }
|
|
|
|
|
+ $a++;
|
|
|
|
|
+ }
|
|
|
|
|
+ $i++;
|
|
|
|
|
+ }
|
|
|
|
|
+ $arg_a[] = $addr_a;
|
|
|
|
|
+ break;
|
|
|
|
|
+ default:
|
|
|
|
|
+ break;
|
|
|
|
|
+ }
|
|
|
|
|
+ $i++;
|
|
|
|
|
+ }
|
|
|
|
|
+ if (count($arg_a) > 9) {
|
|
|
|
|
+ /* argument 1: date */
|
|
|
$d = strtr($arg_a[0], array(' ' => ' '));
|
|
$d = strtr($arg_a[0], array(' ' => ' '));
|
|
|
$d = explode(' ', $d);
|
|
$d = explode(' ', $d);
|
|
|
$hdr->date = getTimeStamp($d);
|
|
$hdr->date = getTimeStamp($d);
|
|
|
- /* argument 2: subject */
|
|
|
|
|
- if (!trim($arg_a[1])) {
|
|
|
|
|
- $arg_a[1]= _("(no subject)");
|
|
|
|
|
- }
|
|
|
|
|
- $hdr->subject = $arg_a[1];
|
|
|
|
|
- /* argument 3: from */
|
|
|
|
|
- $hdr->from = $arg_a[2][0];
|
|
|
|
|
- /* argument 4: sender */
|
|
|
|
|
- $hdr->sender = $arg_a[3][0];
|
|
|
|
|
- /* argument 5: reply-to */
|
|
|
|
|
- $hdr->replyto = $arg_a[4][0];
|
|
|
|
|
- /* argument 6: to */
|
|
|
|
|
- $hdr->to = $arg_a[5];
|
|
|
|
|
- /* argument 7: cc */
|
|
|
|
|
- $hdr->cc = $arg_a[6];
|
|
|
|
|
- /* argument 8: bcc */
|
|
|
|
|
- $hdr->bcc = $arg_a[7];
|
|
|
|
|
- /* argument 9: in-reply-to */
|
|
|
|
|
- $hdr->inreplyto = $arg_a[8];
|
|
|
|
|
- /* argument 10: message-id */
|
|
|
|
|
- $hdr->message_id = $arg_a[9];
|
|
|
|
|
- }
|
|
|
|
|
|
|
+ /* argument 2: subject */
|
|
|
|
|
+ if (!trim($arg_a[1])) {
|
|
|
|
|
+ $arg_a[1]= _("(no subject)");
|
|
|
|
|
+ }
|
|
|
|
|
+ $hdr->subject = $arg_a[1];
|
|
|
|
|
+ /* argument 3: from */
|
|
|
|
|
+ $hdr->from = $arg_a[2][0];
|
|
|
|
|
+ /* argument 4: sender */
|
|
|
|
|
+ $hdr->sender = $arg_a[3][0];
|
|
|
|
|
+ /* argument 5: reply-to */
|
|
|
|
|
+ $hdr->replyto = $arg_a[4][0];
|
|
|
|
|
+ /* argument 6: to */
|
|
|
|
|
+ $hdr->to = $arg_a[5];
|
|
|
|
|
+ /* argument 7: cc */
|
|
|
|
|
+ $hdr->cc = $arg_a[6];
|
|
|
|
|
+ /* argument 8: bcc */
|
|
|
|
|
+ $hdr->bcc = $arg_a[7];
|
|
|
|
|
+ /* argument 9: in-reply-to */
|
|
|
|
|
+ $hdr->inreplyto = $arg_a[8];
|
|
|
|
|
+ /* argument 10: message-id */
|
|
|
|
|
+ $hdr->message_id = $arg_a[9];
|
|
|
|
|
+ }
|
|
|
}
|
|
}
|
|
|
-
|
|
|
|
|
|
|
+
|
|
|
function parseLiteral($read, $i) {
|
|
function parseLiteral($read, $i) {
|
|
|
- $lit_cnt = '';
|
|
|
|
|
- $i++;
|
|
|
|
|
- while ($read{$i} != '}') {
|
|
|
|
|
- $lit_cnt .= $read{$i};
|
|
|
|
|
- $i++;
|
|
|
|
|
- }
|
|
|
|
|
- $lit_cnt +=2; /* add the { and } characters */
|
|
|
|
|
- $s = '';
|
|
|
|
|
- for ($j = 0; $j < $lit_cnt; $j++) {
|
|
|
|
|
- $i++;
|
|
|
|
|
- $s .= $read{$i};
|
|
|
|
|
- }
|
|
|
|
|
- return $s;
|
|
|
|
|
|
|
+ $lit_cnt = '';
|
|
|
|
|
+ $i++;
|
|
|
|
|
+ while ($read{$i} != '}') {
|
|
|
|
|
+ $lit_cnt .= $read{$i};
|
|
|
|
|
+ $i++;
|
|
|
|
|
+ }
|
|
|
|
|
+ $lit_cnt +=2; /* add the { and } characters */
|
|
|
|
|
+ $s = '';
|
|
|
|
|
+ for ($j = 0; $j < $lit_cnt; $j++) {
|
|
|
|
|
+ $i++;
|
|
|
|
|
+ $s .= $read{$i};
|
|
|
|
|
+ }
|
|
|
|
|
+ return $s;
|
|
|
}
|
|
}
|
|
|
-
|
|
|
|
|
|
|
+
|
|
|
function parseQuote($read, $i) {
|
|
function parseQuote($read, $i) {
|
|
|
- $i++;
|
|
|
|
|
- $s = '';
|
|
|
|
|
- $cnt = strlen($read);
|
|
|
|
|
- while ($i < $cnt && $read{$i} != '"') {
|
|
|
|
|
- if ($read{$i} == '\\') {
|
|
|
|
|
- $i++;
|
|
|
|
|
- }
|
|
|
|
|
- $s .= $read{$i};
|
|
|
|
|
- $i++;
|
|
|
|
|
- }
|
|
|
|
|
|
|
+ $i++;
|
|
|
|
|
+ $s = '';
|
|
|
|
|
+ $cnt = strlen($read);
|
|
|
|
|
+ while ($i < $cnt && $read{$i} != '"') {
|
|
|
|
|
+ if ($read{$i} == '\\') {
|
|
|
|
|
+ $i++;
|
|
|
|
|
+ }
|
|
|
|
|
+ $s .= $read{$i};
|
|
|
|
|
+ $i++;
|
|
|
|
|
+ }
|
|
|
return $s;
|
|
return $s;
|
|
|
}
|
|
}
|
|
|
-
|
|
|
|
|
|
|
+
|
|
|
function parseAddress($read, $i) {
|
|
function parseAddress($read, $i) {
|
|
|
- $arg_a = array();
|
|
|
|
|
|
|
+ $arg_a = array();
|
|
|
while ($read{$i} != ')') {
|
|
while ($read{$i} != ')') {
|
|
|
- $char = strtoupper($read{$i});
|
|
|
|
|
- switch ($char) {
|
|
|
|
|
- case '"':
|
|
|
|
|
- $arg_a[] = $this->parseQuote($read,&$i);
|
|
|
|
|
- break;
|
|
|
|
|
- case '{':
|
|
|
|
|
- $arg_a[] = $this->parseLiteral($read,&$i);
|
|
|
|
|
- break;
|
|
|
|
|
- case 'N':
|
|
|
|
|
- if (strtolower(substr($read,$i,3)) == 'nil') {
|
|
|
|
|
- $arg_a[] = '';
|
|
|
|
|
- $i = $i+2;
|
|
|
|
|
- }
|
|
|
|
|
- default:
|
|
|
|
|
- break;
|
|
|
|
|
- }
|
|
|
|
|
- $i++;
|
|
|
|
|
- }
|
|
|
|
|
- if (count($arg_a) == 4) {
|
|
|
|
|
- $adr = new address_structure();
|
|
|
|
|
- $adr->personal = $arg_a[0];
|
|
|
|
|
- $adr->adl = $arg_a[1];
|
|
|
|
|
- $adr->mailbox = $arg_a[2];
|
|
|
|
|
- $adr->host = $arg_a[3];
|
|
|
|
|
- } else $adr = '';
|
|
|
|
|
- return $adr;
|
|
|
|
|
|
|
+ $char = strtoupper($read{$i});
|
|
|
|
|
+ switch ($char) {
|
|
|
|
|
+ case '"':
|
|
|
|
|
+ $arg_a[] = $this->parseQuote($read,&$i);
|
|
|
|
|
+ break;
|
|
|
|
|
+ case '{':
|
|
|
|
|
+ $arg_a[] = $this->parseLiteral($read,&$i);
|
|
|
|
|
+ break;
|
|
|
|
|
+ case 'N':
|
|
|
|
|
+ if (strtolower(substr($read,$i,3)) == 'nil') {
|
|
|
|
|
+ $arg_a[] = '';
|
|
|
|
|
+ $i = $i+2;
|
|
|
|
|
+ }
|
|
|
|
|
+ default:
|
|
|
|
|
+ break;
|
|
|
|
|
+ }
|
|
|
|
|
+ $i++;
|
|
|
|
|
+ }
|
|
|
|
|
+ if (count($arg_a) == 4) {
|
|
|
|
|
+ $adr = new address_structure();
|
|
|
|
|
+ $adr->personal = $arg_a[0];
|
|
|
|
|
+ $adr->adl = $arg_a[1];
|
|
|
|
|
+ $adr->mailbox = $arg_a[2];
|
|
|
|
|
+ $adr->host = $arg_a[3];
|
|
|
|
|
+ } else $adr = '';
|
|
|
|
|
+ return $adr;
|
|
|
}
|
|
}
|
|
|
-
|
|
|
|
|
|
|
+
|
|
|
function parseDisposition($read,$i) {
|
|
function parseDisposition($read,$i) {
|
|
|
$arg_a = array();
|
|
$arg_a = array();
|
|
|
while ($read{$i} != ')') {
|
|
while ($read{$i} != ')') {
|
|
|
- switch ($read{$i}) {
|
|
|
|
|
- case '"':
|
|
|
|
|
- $arg_a[] = $this->parseQuote($read,&$i);
|
|
|
|
|
- break;
|
|
|
|
|
- case '{':
|
|
|
|
|
- $arg_a[] = $this->parseLiteral($read,&$i);
|
|
|
|
|
- break;
|
|
|
|
|
- case '(':
|
|
|
|
|
- $arg_a[] = $this->parseProperties($read,&$i);
|
|
|
|
|
- break;
|
|
|
|
|
- default:
|
|
|
|
|
- break;
|
|
|
|
|
- }
|
|
|
|
|
- $i++;
|
|
|
|
|
|
|
+ switch ($read{$i}) {
|
|
|
|
|
+ case '"':
|
|
|
|
|
+ $arg_a[] = $this->parseQuote($read,&$i);
|
|
|
|
|
+ break;
|
|
|
|
|
+ case '{':
|
|
|
|
|
+ $arg_a[] = $this->parseLiteral($read,&$i);
|
|
|
|
|
+ break;
|
|
|
|
|
+ case '(':
|
|
|
|
|
+ $arg_a[] = $this->parseProperties($read,&$i);
|
|
|
|
|
+ break;
|
|
|
|
|
+ default:
|
|
|
|
|
+ break;
|
|
|
|
|
+ }
|
|
|
|
|
+ $i++;
|
|
|
|
|
+ }
|
|
|
|
|
+ if (isset($arg_a[0])) {
|
|
|
|
|
+ $disp = new disposition($arg_a[0]);
|
|
|
|
|
+ if (isset($arg_a[1])) {
|
|
|
|
|
+ $disp->properties = $arg_a[1];
|
|
|
|
|
+ }
|
|
|
}
|
|
}
|
|
|
- if (isset($arg_a[0])) {
|
|
|
|
|
- $disp = new disposition($arg_a[0]);
|
|
|
|
|
- if (isset($arg_a[1])) {
|
|
|
|
|
- $disp->properties = $arg_a[1];
|
|
|
|
|
- }
|
|
|
|
|
- }
|
|
|
|
|
- if (is_object($disp)) return $disp;
|
|
|
|
|
|
|
+ if (is_object($disp)) return $disp;
|
|
|
}
|
|
}
|
|
|
-
|
|
|
|
|
|
|
+
|
|
|
function parseLanguage($read,&$i) {
|
|
function parseLanguage($read,&$i) {
|
|
|
- /* no idea how to process this one without examples */
|
|
|
|
|
- return '';
|
|
|
|
|
|
|
+ /* no idea how to process this one without examples */
|
|
|
|
|
+ return '';
|
|
|
}
|
|
}
|
|
|
-
|
|
|
|
|
|
|
+
|
|
|
function parseParenthesis($read,&$i) {
|
|
function parseParenthesis($read,&$i) {
|
|
|
while ($read{$i} != ')') {
|
|
while ($read{$i} != ')') {
|
|
|
- switch ($read{$i}) {
|
|
|
|
|
- case '"':
|
|
|
|
|
- $this->parseQuote($read,&$i);
|
|
|
|
|
- break;
|
|
|
|
|
- case '{':
|
|
|
|
|
- $this->parseLiteral($read,&$i);
|
|
|
|
|
- break;
|
|
|
|
|
- case '(':
|
|
|
|
|
- $this->parseParenthesis($read,&$i);
|
|
|
|
|
- break;
|
|
|
|
|
- default:
|
|
|
|
|
- break;
|
|
|
|
|
- }
|
|
|
|
|
- $i++;
|
|
|
|
|
- }
|
|
|
|
|
|
|
+ switch ($read{$i}) {
|
|
|
|
|
+ case '"':
|
|
|
|
|
+ $this->parseQuote($read,&$i);
|
|
|
|
|
+ break;
|
|
|
|
|
+ case '{':
|
|
|
|
|
+ $this->parseLiteral($read,&$i);
|
|
|
|
|
+ break;
|
|
|
|
|
+ case '(':
|
|
|
|
|
+ $this->parseParenthesis($read,&$i);
|
|
|
|
|
+ break;
|
|
|
|
|
+ default:
|
|
|
|
|
+ break;
|
|
|
|
|
+ }
|
|
|
|
|
+ $i++;
|
|
|
|
|
+ }
|
|
|
}
|
|
}
|
|
|
}
|
|
}
|
|
|
|
|
|
indiri69