function getAttachments($id, $path)
 {
     $parts = imap_fetchstructure($this->mailbox, $id);
     $attachments = array();
     //FIXME if we do an is_array() here it breaks howver if we don't
     //we get foreach errors
     foreach ($parts->parts as $key => $value) {
         $encoding = $parts->parts[$key]->encoding;
         if ($parts->parts[$key]->ifdparameters) {
             $filename = $parts->parts[$key]->dparameters[0]->value;
             $message = imap_fetchbody($this->mailbox, $id, $key + 1);
             switch ($encoding) {
                 case 0:
                     $message = imap_8bit($message);
                 case 1:
                     $message = imap_8bit($message);
                 case 2:
                     $message = imap_binary($message);
                 case 3:
                     $message = imap_base64($message);
                 case 4:
                     $message = quoted_printable_decode($message);
                 case 5:
                 default:
                     $message = $message;
             }
             $fp = fopen($path . $filename, "w");
             fwrite($fp, $message);
             fclose($fp);
             $attachments[] = $filename;
         }
     }
     return $attachments;
 }
Exemple #2
0
function mime_header_many($array)
{
    $return = "";
    if (!empty($array[0][0])) {
        for ($j = 0; $j <= count($array) - 1; $j++) {
            $return2 = "";
            for ($i = 0; $i <= count($array[$j]) - 1; $i++) {
                if ($i == count($array[$j]) - 1) {
                    if (count($array[$j]) == 1) {
                        $return2 .= "<" . $array[$j][$i] . ">";
                    } else {
                        $return2 = str_replace(" ", "_", "=?UTF-8?Q?" . imap_8bit($return2) . "?=") . " <" . $array[$j][$i] . ">";
                    }
                    if ($j < count($array) - 1) {
                        $return2 .= ", ";
                    }
                } else {
                    $return2 .= $array[$j][$i] . " ";
                }
            }
            $return .= $return2;
        }
    }
    return $return;
}
function email($e_mail, $subject, $message, $headers)
 {
  // add headers for utf-8 message
  $headers .= "\r\n";
  $headers .= 'From: ijgc-online.com <*****@*****.**>' . "\r\n";
  $headers .= "MIME-Version: 1.0\r\n";
  $headers .= "Content-type: text/plain; charset=utf-8\r\n";
  $headers .= "Content-Transfer-Encoding: quoted-printable\r\n";

  // encode subject
  //=?UTF-8?Q?encoded_text?=

  // work a round: for subject with wordwrap
  // not fixed, no possibility to have one in a single char
  $subject = wordwrap($subject, 25, "\n", FALSE);
  $subject = explode("\n", $subject);
  array_walk($subject, imap8bit);
  $subject = implode("\r\n ", $subject);
  $subject = "=?UTF-8?Q?".$subject."?=";

  // encode e-mail message
  $message = imap_8bit($message);

  return(mail("$e_mail", "$subject", "$message", "$headers"));
 }
 function encodeHeader($_string, $_encoding = 'q')
 {
     switch ($_encoding) {
         case "q":
             if (!preg_match("/[€-ÿ]/", $_string)) {
                 // nothing to quote, only 7 bit ascii
                 return $_string;
             }
             $string = imap_8bit($_string);
             $stringParts = explode("=\r\n", $string);
             while (list($key, $value) = each($stringParts)) {
                 if (!empty($retString)) {
                     $retString .= " ";
                 }
                 $value = str_replace(" ", "_", $value);
                 // imap_8bit does not convert "?"
                 // it does not need, but it should
                 $value = str_replace("?", "=3F", $value);
                 $retString .= "=?" . strtoupper($this->displayCharset) . "?Q?" . $value . "?=";
             }
             #exit;
             return $retString;
             break;
         default:
             return $_string;
     }
 }
 function headerQuotedPrintableEncode($string, $encoding = 'UTF-8')
 {
     $string = str_replace(" ", "_", trim($string));
     // We need to delete "=\r\n" produced by imap_8bit() and replace '?'
     $string = str_replace("?", "=3F", str_replace("=\r\n", "", imap_8bit($string)));
     // Now we split by \r\n - i'm not sure about how many chars (header name counts or not?)
     $string = chunk_split($string, 73);
     // We also have to remove last unneeded \r\n :
     $string = substr($string, 0, strlen($string) - 2);
     // replace newlines with encoding text "=?UTF ..."
     $string = str_replace("\r\n", "?=" . HEAD_CRLF . " =?" . $encoding . "?Q?", $string);
     return '=?' . $encoding . '?Q?' . $string . '?=';
 }
Exemple #6
0
function email_encode($String = '', $Caracteres = 'ISO-8859-1')
{
    // Quoted-printed (Q)
    if (function_exists('quoted_printable_encode')) {
        $String = quoted_printable_encode($String);
        $RT = '=?' . $Caracteres . '?Q?' . $String . '?=';
    } else {
        // IMAP 8bit (Q)
        if (function_exists('imap_8bit')) {
            $String = imap_8bit($String);
            $RT = '=?' . $Caracteres . '?Q?' . $String . '?=';
        } else {
            $String = base64_encode($String);
            $RT = '=?' . $Caracteres . '?B?' . $String . '?=';
        }
    }
    return $RT;
}
function getdecodevalue($message,$coding) {
		switch($coding) {
			case 0:
			case 1:
				$message = imap_8bit($message);
				break;
			case 2:
				$message = imap_binary($message);
				break;
			case 3:
			case 5:
				$message=imap_base64($message);
				break;
			case 4:
				$message = imap_qprint($message);
				break;
		}
		return $message;
	}
 function decode($encoding, $text)
 {
     switch ($encoding) {
         case 1:
             $text = imap_8bit($text);
             break;
         case 2:
             $text = imap_binary($text);
             break;
         case 3:
             $text = imap_base64($text);
             break;
         case 4:
             $text = imap_qprint($text);
             break;
         case 5:
         default:
             $text = $text;
     }
     return $text;
 }
Exemple #9
0
 private function read()
 {
     $allMails = imap_search($this->conn, 'ALL');
     if ($allMails) {
         rsort($allMails);
         foreach ($allMails as $email_number) {
             $overview = imap_fetch_overview($this->conn, $email_number, 0);
             $structure = imap_fetchstructure($this->conn, $email_number);
             $body = '';
             if (isset($structure->parts) && is_array($structure->parts) && isset($structure->parts[1])) {
                 $part = $structure->parts[1];
                 $body = imap_fetchbody($this->conn, $email_number, 2);
                 if ($part->encoding == 3) {
                     $body = imap_base64($body);
                 } else {
                     if ($part->encoding == 1) {
                         $body = imap_8bit($body);
                     } else {
                         $body = imap_qprint($body);
                     }
                 }
             }
             $body = utf8_decode($body);
             $fromaddress = utf8_decode(imap_utf7_encode($overview[0]->from));
             $subject = mb_decode_mimeheader($overview[0]->subject);
             $date = utf8_decode(imap_utf8($overview[0]->date));
             $date = date('Y-m-d H:i:s', strtotime($date));
             $key = md5($fromaddress . $subject . $body);
             //save to MySQL
             $sql = "SELECT count(*) FROM EMAIL_INFORMATION WHERE IDMAIL = " . $this->id . " AND CHECKVERS = \"" . $key . "\"";
             $resul = $this->pdo->query($sql)->fetch();
             if ($resul[0] == 0) {
                 $this->pdo->prepare("INSERT INTO EMAIL_INFORMATION (IDMAIL,FROMADDRESS,SUBJECT,DATE,BODY,CHECKVERS) VALUES (?,?,?,?,?,?)");
                 $this->pdo->execute(array($this->id, $fromaddress, $subject, $date, $body, $key));
             }
         }
     }
 }
Exemple #10
0
 function build_message($part)
 {
     $message = $part['message'];
     $encoding = $part['encoding'];
     $charset = $part['charset'];
     switch ($encoding) {
         case 'base64':
             $message = chunk_split(base64_encode($message));
             break;
         case 'quoted-printable':
             $message = imap_8bit($message);
             break;
         default:
             break;
     }
     $val = 'Content-Type: ' . $part['ctype'] . ';';
     $val .= $part['charset'] ? ' charset=' . $part['charset'] : '';
     $val .= $part['name'] ? $this->crlf . "\tname=\"" . $part['name'] . '"' : '';
     $val .= $this->crlf . 'Content-Transfer-Encoding: ' . $encoding;
     $val .= $part['name'] ? $this->crlf . 'Content-Disposition: attachment;' . $this->crlf . "\tfilename=\"" . $part['name'] . "\"" : '';
     $val .= $this->crlf . $this->crlf . $message . $this->crlf;
     return $val;
 }
 function decode($text, $encoding)
 {
     switch ($encoding) {
         case 1:
             $text = imap_8bit($text);
             break;
         case 2:
             $text = imap_binary($text);
             break;
         case 3:
             // imap_base64 implies strict mode. If it refuses to decode the
             // data, then fallback to base64_decode in non-strict mode
             $text = ($conv = imap_base64($text)) ? $conv : base64_decode($text);
             break;
         case 4:
             $text = imap_qprint($text);
             break;
     }
     return $text;
 }
Exemple #12
0
 private function decodeString($string, $encoding)
 {
     switch ($encoding) {
         case self::ENC_7BIT:
             return $string;
         case self::ENC_8BIT:
             return quoted_printable_decode(imap_8bit($string));
         case self::ENC_BINARY:
             return imap_binary($string);
         case self::ENC_BASE64:
             return imap_base64($string);
         case self::ENC_QUOTED_PRINTABLE:
             return quoted_printable_decode($string);
         case self::ENC_OTHER:
             return $string;
         default:
             return $string;
     }
 }
 /**
  * Private function : Recursivly get attached documents
  *
  * @param $mid          message id
  * @param $path         temporary path
  * @param $maxsize      of document to be retrieved
  * @param $structure    of the message or part
  * @param $part         part for recursive
  *
  * Result is stored in $this->files
  **/
 function getRecursiveAttached($mid, $path, $maxsize, $structure, $part = "")
 {
     if ($structure->type == 1) {
         // multipart
         reset($structure->parts);
         while (list($index, $sub) = each($structure->parts)) {
             $this->getRecursiveAttached($mid, $path, $maxsize, $sub, $part ? $part . "." . ($index + 1) : $index + 1);
         }
     } else {
         $filename = '';
         if ($structure->ifdparameters) {
             // get filename of attachment if present
             // if there are any dparameters present in this part
             if (count($structure->dparameters) > 0) {
                 foreach ($structure->dparameters as $dparam) {
                     if (Toolbox::strtoupper($dparam->attribute) == 'NAME' || Toolbox::strtoupper($dparam->attribute) == 'FILENAME') {
                         $filename = $dparam->value;
                     }
                 }
             }
         }
         //if no filename found
         if (empty($filename) && $structure->ifparameters) {
             // if there are any parameters present in this part
             if (count($structure->parameters) > 0) {
                 foreach ($structure->parameters as $param) {
                     if (Toolbox::strtoupper($param->attribute) == 'NAME' || Toolbox::strtoupper($param->attribute) == 'FILENAME') {
                         $filename = $param->value;
                     }
                 }
             }
         }
         if (empty($filename) && $structure->type == 5 && $structure->subtype) {
             // Embeded image come without filename - generate trivial one
             $filename = "image_{$part}." . $structure->subtype;
         }
         // if no filename found, ignore this part
         if (empty($filename)) {
             return false;
         }
         //try to avoid conflict between inline image and attachment
         $i = 2;
         while (in_array($filename, $this->files)) {
             //replace filename with name_(num).EXT by name_(num+1).EXT
             $new_filename = preg_replace("/(.*)_([0-9])*(\\.[a-zA-Z0-9]*)\$/", "\$1_" . $i . "\$3", $filename);
             if ($new_filename !== $filename) {
                 $filename = $new_filename;
             } else {
                 //the previous regex didn't found _num pattern, so add it with this one
                 $filename = preg_replace("/(.*)(\\.[a-zA-Z0-9]*)\$/", "\$1_" . $i . "\$2", $filename);
             }
             $i++;
         }
         $filename = $this->decodeMimeString($filename);
         if ($structure->bytes > $maxsize) {
             $this->addtobody .= "\n\n" . sprintf(__('%1$s: %2$s'), __('Too large attached file'), sprintf(__('%1$s (%2$s)'), $filename, Toolbox::getSize($structure->bytes)));
             return false;
         }
         if (!Document::isValidDoc($filename)) {
             //TRANS: %1$s is the filename and %2$s its mime type
             $this->addtobody .= "\n\n" . sprintf(__('%1$s: %2$s'), __('Invalid attached file'), sprintf(__('%1$s (%2$s)'), $filename, $this->get_mime_type($structure)));
             return false;
         }
         if ($message = imap_fetchbody($this->marubox, $mid, $part)) {
             switch ($structure->encoding) {
                 case 1:
                     $message = imap_8bit($message);
                     break;
                 case 2:
                     $message = imap_binary($message);
                     break;
                 case 3:
                     $message = imap_base64($message);
                     break;
                 case 4:
                     $message = quoted_printable_decode($message);
                     break;
             }
             if (file_put_contents($path . $filename, $message)) {
                 $this->files[$filename] = $filename;
                 // If embeded image, we add a tag
                 if ($structure->type == 5 && $structure->subtype) {
                     end($this->files);
                     $tag = Rule::getUuid();
                     $this->tags[$filename] = $tag;
                     // Link file based on id
                     if (isset($structure->id)) {
                         $clean = array('<' => '', '>' => '');
                         $this->altfiles[strtr($structure->id, $clean)] = $filename;
                     }
                 }
             }
         }
         // fetchbody
     }
     // Single part
 }
Exemple #14
0
 /**
  * Encode a string making it an encoded word as RFC2047 wants
  * @author "Emiliano 'AlberT' Gabrielli" <*****@*****.**>
  * @access private
  * 
  * @param string $str: the string to be encoded
  * @param int $offset: an optional offset to be counted for the first line
  * @return string the encoded string, made of N encoded words as the original lenght impose
  */
 function _wordEncode($str, $offset = 0)
 {
     if (!$this->canEncode) {
         return $addr;
     }
     $cs = $this->charset;
     $str = str_replace(array(' ', "=\r\n", '?'), array('_', '', '=3F'), trim(imap_8bit($str)));
     $enlen = strlen("=?{$cs}?Q??=");
     // -4 is to ensure we do not truncate a trailing encoded char
     $max_fst_line_len = 75 - $enlen - $offset - 2;
     if ($this->_strlen($str) <= $max_fst_line_len) {
         return "=?{$cs}?Q?{$str}?=";
     }
     if (FALSE !== $this->_strpos($str, '=', $max_fst_line_len - 3)) {
         $max_fst_line_len -= 3;
     }
     $fst_line = $this->_substr($str, 0, $max_fst_line_len);
     $str = $this->_substr($str, $max_fst_line_len);
     $str = chunk_split($str, 75 - $enlen, "\r\n");
     // remove last unneeded CRLF
     $str = $this->_substr($str, 0, -2);
     $arows = explode("\r\n", $str);
     //reattach the first line
     array_unshift($arows, $fst_line);
     return '=?' . $cs . '?Q?' . implode("?=\r\n =?{$cs}?Q?", $arows) . '?=';
 }
Exemple #15
0
 /**
  * Get Attached File from Mail
  *
  * @param int $mid message id
  * @param string $path attachment storage path
  *
  * @param string $separator list separator for attachment names
  *
  * @return string
  */
 public function getAttachment($mid, $path, $separator = ',')
 {
     if (!$this->getMailBox()) {
         return false;
     }
     $structure = imap_fetchstructure($this->getMailBox(), $mid);
     $attachments = "";
     if (property_exists($structure, 'parts') && $structure->parts) {
         foreach (array_keys($structure->parts) as $key) {
             $enc = $structure->parts[$key]->encoding;
             if ($structure->parts[$key]->ifdparameters) {
                 $name = $structure->parts[$key]->dparameters[0]->value;
                 $message = imap_fetchbody($this->getMailBox(), $mid, $key + 1);
                 switch ($enc) {
                     case 0:
                         $message = imap_8bit($message);
                         break;
                     case 1:
                         $message = imap_8bit($message);
                         break;
                     case 2:
                         $message = imap_binary($message);
                         break;
                     case 3:
                         $message = imap_base64($message);
                         break;
                     case 4:
                         $message = quoted_printable_decode($message);
                         break;
                 }
                 $fp = fopen($path . $name, "w");
                 fwrite($fp, $message);
                 fclose($fp);
                 $attachments .= $name . $separator;
             }
             // Support for embedded attachments starts here
             if (property_exists($structure->parts[$key], 'parts')) {
                 foreach (array_keys($structure->parts[$key]->parts) as $keyB) {
                     $enc = $structure->parts[$key]->parts[$keyB]->encoding;
                     if ($structure->parts[$key]->parts[$keyB]->ifdparameters) {
                         $name = $structure->parts[$key]->parts[$keyB]->dparameters[0]->value;
                         $partNum = $key + 1 . "." . ($keyB + 1);
                         $message = imap_fetchbody($this->getMailBox(), $mid, $partNum);
                         switch ($enc) {
                             case 0:
                                 $message = imap_8bit($message);
                                 break;
                             case 1:
                                 $message = imap_8bit($message);
                                 break;
                             case 2:
                                 $message = imap_binary($message);
                                 break;
                             case 3:
                                 $message = imap_base64($message);
                                 break;
                             case 4:
                                 $message = quoted_printable_decode($message);
                                 break;
                         }
                         $fp = fopen($path . $name, "w");
                         fwrite($fp, $message);
                         fclose($fp);
                         $attachments .= $name . $separator;
                     }
                 }
             }
         }
     }
     /** Catch embedded images  */
     $embedded = $this->getEmbeddedImages(array('mid' => $mid, 'path' => $path, 'separator' => $separator));
     if ($embedded) {
         $attachments = $attachments . $embedded;
     }
     $attachments = substr($attachments, 0, strlen($attachments) - strlen($separator));
     return $attachments;
 }
Exemple #16
0
if (in_array('pdf', $reportFormat)) {
    $report_html = $generate->generateReport(90, "HTML", false);
    ITS4YouReports::sshow($report_html);
    exit;
    $generate_pdf_filename = $tmpDir . generate_cool_url($generate->pdf_filename);
    $fileName = $rootDirectory . $tempFileName . $generate->pdf_filename . '.xls';
    if ($generate_pdf_filename != "" && file_exists($generate_pdf_filename)) {
        $fileName_arr = explode(".", $generate->pdf_filename);
        $fileName_arr[0] .= '_' . preg_replace('/[^a-zA-Z0-9_-\\s]/', '', $currentTime);
        $fileName = implode(".", $fileName_arr);
        $attachments[$fileName] = $generate_pdf_filename;
    }
}
if (in_array('xls', $reportFormat)) {
    $report_data = $generate->generateReport(90, "XLS", false);
    $ITS4YouReports_xls = "Reports4You_1_90.xls";
    $fileName_arr = explode(".", $ITS4YouReports_xls);
    $fileName_arr[0] .= '_' . preg_replace('/[^a-zA-Z0-9_-\\s]/', '', $currentTime);
    $fileName = implode(".", $fileName_arr);
    $fileName_path = $tmpDir . $ITS4YouReports_xls;
    $generate->writeReportToExcelFile($fileName_path, $report_data);
    $attachments[$fileName] = $fileName_path;
}
foreach ($attachments as $attachmentName => $path) {
    $vtigerMailer->AddAttachment($path, "=?ISO-8859-15?Q?" . imap_8bit(html_entity_decode($attachmentName, ENT_QUOTES, "UTF-8")) . "?=");
}
$send_result = $vtigerMailer->Send(true);
echo "SEND RESULT -> " . $send_result . "<br />";
foreach ($attachments as $attachmentName => $path) {
    unlink($path);
}
Exemple #17
0
 /**
  * Decode given string with encoding in current string and convert it to UTF-8 from part charset
  *
  * @param $string
  * @return string
  */
 private function decode($string)
 {
     if (!$string) {
         return $string;
     }
     //transfer encoding
     switch (strtolower($this->contentTransferEncoding)) {
         case "7bit":
             $decodedString = mb_convert_encoding($string, "UTF-8", "auto");
             break;
         case "8bit":
             $decodedString = imap_8bit($string);
             break;
         case "binary":
             $decodedString = imap_base64(imap_binary($string));
             break;
         case "base64":
             $decodedString = imap_base64($string);
             break;
         case "quoted-printable":
             $decodedString = imap_qprint($string);
             break;
         default:
             throw new \UnexpectedValueException('Cannot decode ' . $this->contentTransferEncoding);
     }
     //do not convert if string is attachment content
     if ($this->disposition == "attachment") {
         return $decodedString;
     }
     //charset encoding
     //TODO add different charsets
     $decodedString = quoted_printable_decode($decodedString);
     if (in_array($this->charset, ['windows-1250', 'koi8-r'])) {
         return iconv(strtoupper($this->charset), "UTF-8", $decodedString);
     } else {
         return mb_convert_encoding($decodedString, "UTF-8", strtoupper($this->charset));
     }
 }
Exemple #18
0
/**
 * Properly encode a mail header text for using with mail().
 *
 * @param   string  $text   the text to encode
 * @return  string          The encoded header
 */
function vexim_encode_header($text)
{
    if (function_exists('mb_encode_mimeheader')) {
        mb_internal_encoding('UTF-8');
        $text = mb_encode_mimeheader($text, 'UTF-8', 'Q');
    } elseif (function_exists('imap_8bit')) {
        $text = str_replace(" ", "_", imap_8bit(trim($text)));
        $text = str_replace("?", "=3F", $text);
        $text = str_replace("=\r\n", "?=\r\n =?UTF-8?Q?", $text);
        $text = "=?UTF-8?Q?" . $text . "?=";
    }
    // if both mb and imap are not available, simply return what was given.
    // this isn't standards-compliant, and the header will be displayed
    // incorrectly if it contains accented letters. Let's just hope it won't
    // be the case too often. :)
    return $text;
}
 public function DecodificaMensagem($Mensagem, $Codificacao)
 {
     switch ($Codificacao) {
         case 0:
         case 1:
             $Mensagem = imap_8bit($Mensagem);
             break;
         case 2:
             $Mensagem = imap_binary($Mensagem);
             break;
         case 3:
         case 5:
         case 6:
         case 7:
             $Mensagem = imap_base64($Mensagem);
             break;
         case 4:
             $Mensagem = imap_qprint($Mensagem);
             break;
     }
     return $Mensagem;
 }
Exemple #20
0
 function qp_encode($text)
 {
     if (function_exists('quoted_printable_encode')) {
         return quoted_printable_encode($text);
     } elseif (function_exists('imap_8bit')) {
         return imap_8bit($text);
     } else {
         $arrEncodeSupport = mb_list_encodings();
         if (array_search('Quoted-Printable', $arrEncodeSupport) != FALSE) {
             return mb_convert_encoding($text, 'Quoted-Printable', "JIS");
         } else {
             $crlf = "\r\n";
             $text = trim($text);
             $lines = preg_split("/(\r\n|\n|\r)/s", $text);
             $out = '';
             $temp = '';
             foreach ($lines as $line) {
                 for ($j = 0; $j < strlen($line); $j++) {
                     $char = substr($line, $j, 1);
                     $ascii = ord($char);
                     if ($ascii < 32 || $ascii == 61 || $ascii > 126) {
                         $char = '=' . strtoupper(dechex($ascii));
                     }
                     if (strlen($temp) + strlen($char) >= 76) {
                         $out .= $temp . '=' . $crlf;
                         $temp = '';
                     }
                     $temp .= $char;
                 }
             }
             $out .= $temp;
             return trim($out);
         }
     }
 }
Exemple #21
0
 private function mimeHeaderEncode($text, $encoding = "utf-8")
 {
     return "=?{$encoding}?Q?" . imap_8bit($text) . "?=";
 }
 function convert_specialchar($input)
 {
     $temp_input = $input;
     $temp_input = imap_8bit($temp_input);
     $patterns[0] = '/ /';
     $replacements[0] = ' ';
     $temp_input = preg_replace($patterns, $replacements, $temp_input);
     return $temp_input;
 }
Exemple #23
0
 /**
  * Prep Quoted Printable
  *
  * Prepares string for Quoted-Printable Content-Transfer-Encoding
  * Refer to RFC 2045 http://www.ietf.org/rfc/rfc2045.txt
  *
  * @param	string
  * @return	string
  */
 protected function _prep_quoted_printable($str)
 {
     // ASCII code numbers for "safe" characters that can always be
     // used literally, without encoding, as described in RFC 2049.
     // http://www.ietf.org/rfc/rfc2049.txt
     static $ascii_safe_chars = array(39, 40, 41, 43, 44, 45, 46, 47, 58, 61, 63, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122);
     // We are intentionally wrapping so mail servers will encode characters
     // properly and MUAs will behave, so {unwrap} must go!
     $str = str_replace(array('{unwrap}', '{/unwrap}'), '', $str);
     // RFC 2045 specifies CRLF as "\r\n".
     // However, many developers choose to override that and violate
     // the RFC rules due to (apparently) a bug in MS Exchange,
     // which only works with "\n".
     if ($this->crlf === "\r\n") {
         if (is_php('5.3')) {
             return quoted_printable_encode($str);
         } elseif (function_exists('imap_8bit')) {
             return imap_8bit($str);
         }
     }
     // Reduce multiple spaces & remove nulls
     $str = preg_replace(array('| +|', '/\\x00+/'), array(' ', ''), $str);
     // Standardize newlines
     if (strpos($str, "\r") !== FALSE) {
         $str = str_replace(array("\r\n", "\r"), "\n", $str);
     }
     $escape = '=';
     $output = '';
     foreach (explode("\n", $str) as $line) {
         $length = strlen($line);
         $temp = '';
         // Loop through each character in the line to add soft-wrap
         // characters at the end of a line " =\r\n" and add the newly
         // processed line(s) to the output (see comment on $crlf class property)
         for ($i = 0; $i < $length; $i++) {
             // Grab the next character
             $char = $line[$i];
             $ascii = ord($char);
             // Convert spaces and tabs but only if it's the end of the line
             if ($ascii === 32 or $ascii === 9) {
                 if ($i === $length - 1) {
                     $char = $escape . sprintf('%02s', dechex($ascii));
                 }
             } elseif ($ascii === 61) {
                 $char = $escape . strtoupper(sprintf('%02s', dechex($ascii)));
                 // =3D
             } elseif (!in_array($ascii, $ascii_safe_chars, TRUE)) {
                 $char = $escape . strtoupper(sprintf('%02s', dechex($ascii)));
             }
             // If we're at the character limit, add the line to the output,
             // reset our temp variable, and keep on chuggin'
             if (strlen($temp) + strlen($char) >= 76) {
                 $output .= $temp . $escape . $this->crlf;
                 $temp = '';
             }
             // Add the character to our temporary line
             $temp .= $char;
         }
         // Add our completed line to the output
         $output .= $temp . $this->crlf;
     }
     // get rid of extra CRLF tacked onto the end
     return substr($output, 0, strlen($this->crlf) * -1);
 }
Exemple #24
0
$emails = imap_search($inbox, 'SINCE ' . date('d-M-Y', strtotime("-1 day")));
rsort($emails);
$header = imap_check($inbox);
$range = $header->Nmsgs;
if ($emails) {
    foreach ($emails as $email_number) {
        $overview = imap_headerinfo($inbox, $email_number);
        $message = imap_fetchbody($inbox, $email_number, 2);
        $structure = imap_fetchstructure($inbox, $email_number);
        if (isset($structure->parts) && is_array($structure->parts) && isset($structure->parts[1])) {
            $part = $structure->parts[1];
            if ($part->encoding == 3) {
                $message = imap_base64($message);
            } else {
                if ($part->encoding == 1) {
                    $message = imap_8bit($message);
                } else {
                    $message = imap_qprint($message);
                }
            }
        }
        $output = "<div class='message-text'>";
        $output .= "<span><strong>From: </strong>" . imap_utf8($overview->fromaddress) . "</span><br />";
        $output .= "<span><strong>Subject: </strong>" . imap_utf8($overview->subject) . "</span><br />";
        $output .= "<span><strong>Date: </strong>" . $overview->date . "</span><br />";
        $output .= "<span><strong>Message: </strong>" . $message . "</span><br />";
        $output .= "</div>";
        echo $output;
    }
}
?>
Exemple #25
0
 /**
  * Prep Quoted Printable
  *
  * Prepares string for Quoted-Printable Content-Transfer-Encoding
  * Refer to RFC 2045 http://www.ietf.org/rfc/rfc2045.txt
  *
  * @param	string
  * @return	string
  */
 protected function _prep_quoted_printable($str)
 {
     // We are intentionally wrapping so mail servers will encode characters
     // properly and MUAs will behave, so {unwrap} must go!
     $str = str_replace(array('{unwrap}', '{/unwrap}'), '', $str);
     // RFC 2045 specifies CRLF as "\r\n".
     // However, many developers choose to override that and violate
     // the RFC rules due to (apparently) a bug in MS Exchange,
     // which only works with "\n".
     if ($this->crlf === "\r\n") {
         if (is_php('5.3')) {
             return quoted_printable_encode($str);
         } elseif (function_exists('imap_8bit')) {
             return imap_8bit($str);
         }
     }
     // Reduce multiple spaces & remove nulls
     $str = preg_replace(array('| +|', '/\\x00+/'), array(' ', ''), $str);
     // Standardize newlines
     if (strpos($str, "\r") !== FALSE) {
         $str = str_replace(array("\r\n", "\r"), "\n", $str);
     }
     $escape = '=';
     $output = '';
     foreach (explode("\n", $str) as $line) {
         $length = strlen($line);
         $temp = '';
         // Loop through each character in the line to add soft-wrap
         // characters at the end of a line " =\r\n" and add the newly
         // processed line(s) to the output (see comment on $crlf class property)
         for ($i = 0; $i < $length; $i++) {
             // Grab the next character
             $char = $line[$i];
             $ascii = ord($char);
             // Convert spaces and tabs but only if it's the end of the line
             if ($i === $length - 1 && ($ascii === 32 or $ascii === 9)) {
                 $char = $escape . sprintf('%02s', dechex($ascii));
             } elseif ($ascii === 61) {
                 $char = $escape . strtoupper(sprintf('%02s', dechex($ascii)));
                 // =3D
             }
             // If we're at the character limit, add the line to the output,
             // reset our temp variable, and keep on chuggin'
             if (strlen($temp) + strlen($char) >= 76) {
                 $output .= $temp . $escape . $this->crlf;
                 $temp = '';
             }
             // Add the character to our temporary line
             $temp .= $char;
         }
         // Add our completed line to the output
         $output .= $temp . $this->crlf;
     }
     // get rid of extra CRLF tacked onto the end
     return substr($output, 0, strlen($this->crlf) * -1);
 }
Exemple #26
0
 /**
  * get attach of the message
  *
  * @param string $msg_count
  * @param string $path
  * @return array
  */
 public function get_attach($msg_count, $path)
 {
     if (!$this->_connect) {
         return false;
     }
     $struckture = imap_fetchstructure($this->_connect, $msg_count);
     $ar = "";
     if ($struckture->parts) {
         foreach ($struckture->parts as $key => $value) {
             $enc = $struckture->parts[$key]->encoding;
             $subtype = $struckture->parts[$key]->subtype;
             $text_type = array("PLAIN", "HTML", "ALTERNATIVE");
             if (in_array($subtype, $text_type)) {
                 continue;
             }
             if ($struckture->parts[$key]->ifdparameters) {
                 $name = $this->mail_decode($struckture->parts[$key]->dparameters[0]->value);
                 $cid = $struckture->parts[$key]->id;
                 $cid = substr($cid, 1, strlen($cid) - 2);
                 $disposition = $struckture->parts[$key]->disposition;
                 if (empty($disposition)) {
                     $disposition = "INLINE";
                 }
                 $name = $cid . "_" . $disposition . "_" . $name;
                 $message = imap_fetchbody($this->_connect, $msg_count, $key + 1);
                 if ($enc == 0) {
                     $message = imap_8bit($message);
                 }
                 if ($enc == 1) {
                     $message = imap_8bit($message);
                 }
                 if ($enc == 2) {
                     $message = imap_binary($message);
                 }
                 if ($enc == 3) {
                     $message = imap_base64($message);
                 }
                 if ($enc == 4) {
                     $message = quoted_printable_decode($message);
                 }
                 if ($enc == 5) {
                     $message = $message;
                 }
                 $fp = fopen($path . urlencode($name), "w");
                 fwrite($fp, $message);
                 fclose($fp);
                 $ar = $ar . $name . ",";
             }
             if ($struckture->parts[$key]->ifparameters && $struckture->parts[$key]->ifdparameters == 0) {
                 if ($struckture->parts[$key]->parameters[0]->attribute == "NAME") {
                     $name = $this->mail_decode($struckture->parts[$key]->parameters[0]->value);
                 }
                 if ($struckture->parts[$key]->parameters[1]->attribute == "NAME") {
                     $name = $this->mail_decode($struckture->parts[$key]->parameters[1]->value);
                 }
                 $cid = $struckture->parts[$key]->id;
                 $cid = substr($cid, 1, strlen($cid) - 2);
                 $disposition = $struckture->parts[$key]->disposition;
                 if (empty($disposition)) {
                     $disposition = "INLINE";
                 }
                 $name = $cid . "_" . $disposition . "_" . $name;
                 $message = imap_fetchbody($this->_connect, $msg_count, $key + 1);
                 if ($enc == 0) {
                     $message = imap_8bit($message);
                 }
                 if ($enc == 1) {
                     $message = imap_8bit($message);
                 }
                 if ($enc == 2) {
                     $message = imap_binary($message);
                 }
                 if ($enc == 3) {
                     $message = imap_base64($message);
                 }
                 if ($enc == 4) {
                     $message = quoted_printable_decode($message);
                 }
                 if ($enc == 5) {
                     $message = $message;
                 }
                 $fp = fopen($path . urlencode($name), "w");
                 fwrite($fp, $message);
                 fclose($fp);
                 $ar = $ar . $name . ",";
             }
             if ($struckture->parts[$key]->parts) {
                 foreach ($struckture->parts[$key]->parts as $keyb => $valueb) {
                     $enc = $struckture->parts[$key]->parts[$keyb]->encoding;
                     if ($struckture->parts[$key]->parts[$keyb]->ifdparameters) {
                         $name = $this->mail_decode($struckture->parts[$key]->parts[$keyb]->dparameters[0]->value);
                         $id = $struckture->parts[$key]->parts[$keyb]->id;
                         $disposition = $struckture->parts[$key]->parts[$keyb]->disposition;
                         $name = $id . "_" . $disposition . "_" . $name;
                         $partnro = $key + 1 . "." . ($keyb + 1);
                         $message = imap_fetchbody($this->_connect, $msg_count, $partnro);
                         if ($enc == 0) {
                             $message = imap_8bit($message);
                         }
                         if ($enc == 1) {
                             $message = imap_8bit($message);
                         }
                         if ($enc == 2) {
                             $message = imap_binary($message);
                         }
                         if ($enc == 3) {
                             $message = imap_base64($message);
                         }
                         if ($enc == 4) {
                             $message = quoted_printable_decode($message);
                         }
                         if ($enc == 5) {
                             $message = $message;
                         }
                         $fp = fopen($path . urlencode($name), "w");
                         fwrite($fp, $message);
                         fclose($fp);
                         $ar = $ar . $name . ",";
                     }
                 }
             }
         }
     }
     $ar = substr($ar, 0, strlen($ar) - 1);
     return $ar;
 }
Exemple #27
0
            if ($_POST['localpart'] == $_SESSION['localpart']) {
                $_SESSION['crypt'] = $cryptedpassword;
            }
        } else {
            header("Location: adminuser.php?failupdated={$_POST['localpart']}");
            die;
        }
    } else {
        header("Location: adminuser.php?badpass={$_POST['localpart']}");
        die;
    }
}
if (isset($_POST['vacation']) && is_string($_POST['vacation'])) {
    $vacation = trim($_POST['vacation']);
    if (function_exists('imap_8bit')) {
        $vacation = imap_8bit($vacation);
    }
} else {
    $vacation = '';
}
$query = "UPDATE users SET uid=:uid,\n     gid=:gid, smtp=:smtp, pop=:pop,\n     realname=:realname,\n     admin=:admin,\n     on_forward=:on_forward,\n     on_piped=:on_piped,\n     on_spamassassin=:on_spamassassin,\n     on_spambox=:on_spambox,\n     on_spamboxreport=:on_spamboxreport,\n     on_vacation=:on_vacation,\n     enabled=:enabled,\n     forward=:forward,\n     maxmsgsize=:maxmsgsize,\n     quota=:quota,\n     sa_tag=:sa_tag,\n     sa_refuse=:sa_refuse,\n     type=:type,\n     vacation=:vacation,\n     unseen=:unseen\n     WHERE user_id=:user_id";
$sth = $dbh->prepare($query);
$success = $sth->execute(array(':uid' => $_POST['uid'], ':gid' => $_POST['gid'], ':smtp' => $smtphomepath, ':pop' => $pophomepath, ':realname' => $_POST['realname'], ':admin' => $_POST['admin'], ':on_forward' => $_POST['on_forward'], ':on_piped' => $_POST['on_piped'], ':on_spamassassin' => $_POST['on_spamassassin'], ':on_spambox' => $_POST['on_spambox'], ':on_spamboxreport' => $_POST['on_spamboxreport'], ':on_vacation' => $_POST['on_vacation'], ':enabled' => $_POST['enabled'], ':forward' => $forwardaddr, ':maxmsgsize' => $_POST['maxmsgsize'], ':quota' => $_POST['quota'], ':sa_tag' => isset($_POST['sa_tag']) ? $_POST['sa_tag'] : 0, ':sa_refuse' => isset($_POST['sa_refuse']) ? $_POST['sa_refuse'] : 0, ':type' => $_POST['type'], ':vacation' => $vacation, ':unseen' => $_POST['unseen'], ':user_id' => $_POST['user_id']));
if ($success) {
    header("Location: adminuser.php?updated={$_POST['localpart']}");
} else {
    header("Location: adminuser.php?failupdated={$_POST['localpart']}");
}
?>
<!-- Layout and CSS tricks obtained from http://www.bluerobot.com/web/layouts/ -->
Exemple #28
0
 /**
  * 获取邮件附件
  * @param $mid 邮件id
  * @param $path 附件保存路径
  * @return string 返回附件名称
  */
 function GetAttach($mid, $path)
 {
     if (!$this->marubox) {
         return false;
     }
     $struckture = imap_fetchstructure($this->marubox, $mid);
     $ar = '';
     if ($struckture->parts) {
         foreach ($struckture->parts as $key => $value) {
             $enc = $struckture->parts[$key]->encoding;
             if ($struckture->parts[$key]->subtype == 'OCTET-STREAM') {
                 $imap_mime_header_decode = imap_mime_header_decode($struckture->parts[$key]->parameters[0]->value);
                 $name = $imap_mime_header_decode[0]->text;
                 $message = imap_fetchbody($this->marubox, $mid, $key + 1);
                 switch ($enc) {
                     case 0:
                         $message = imap_8bit($message);
                         break;
                     case 1:
                         $message = imap_8bit($message);
                         break;
                     case 2:
                         $message = imap_binary($message);
                         break;
                     case 3:
                         $message = imap_base64($message);
                         break;
                     case 4:
                         $message = quoted_printable_decode($message);
                         break;
                     case 5:
                         $message = $message;
                         break;
                 }
                 $file_name = time() . '_' . rand(100, 10000) . '_' . $name;
                 $fp = fopen($path . $file_name, "w");
                 fwrite($fp, $message);
                 fclose($fp);
                 $ar .= $file_name . ',';
             }
         }
     }
     // 返回附件名 [时间戳_随机数_原始名称]
     return trim($ar, ',');
 }
function getEmailAttachments($inbox, $email_number, $structure)
{
    $attachments = array();
    // Tomar adjuntos de e-mail
    if (isset($structure->parts) && count($structure->parts)) {
        for ($i = 0; $i < count($structure->parts); $i++) {
            $is_attachment = false;
            $filename = "";
            $name = "";
            $attachment = "";
            if ($structure->parts[$i]->ifdparameters) {
                foreach ($structure->parts[$i]->dparameters as $object) {
                    if (strtolower($object->attribute) == 'name') {
                        $is_attachment = true;
                        $filename = $object->value;
                    }
                }
            }
            if ($structure->parts[$i]->ifparameters) {
                foreach ($structure->parts[$i]->parameters as $object) {
                    if (strtolower($object->attribute) == 'name') {
                        $is_attachment = true;
                        $filename = $object->value;
                    }
                }
            }
            if ($is_attachment) {
                $attachment = imap_fetchbody($inbox, $email_number, $i + 1);
                switch ($structure->parts[$i]->encoding) {
                    case 0:
                    case 1:
                        $attachment = imap_8bit($attachment);
                        break;
                    case 2:
                        $attachment = imap_binary($attachment);
                        break;
                    case 3:
                    case 5:
                        $attachment = imap_base64($attachment);
                        break;
                    case 4:
                        $attachment = imap_qprint($attachment);
                        break;
                }
                $attachments[$i] = array('is_attachment' => $is_attachment, 'filename' => $filename, 'name' => $name, 'attachment' => $attachment);
            }
        }
    }
    // Procesar adjuntos y formatear arreglo
    $tmpAttachments = array();
    foreach ($attachments as $attachment) {
        mb_internal_encoding('UTF-8');
        $attachment["filename"] = str_replace("_", " ", mb_decode_mimeheader($attachment["filename"]));
        $attachmentArray = array();
        $tmpFilenameArray = explode(".", $attachment["filename"]);
        $basename = $tmpFilenameArray[0];
        $extension = end($tmpFilenameArray);
        $attachmentArray["basename"] = $basename;
        switch (strtolower($extension)) {
            case 'xml':
                $attachmentArray["extension"] = "xml";
                $attachmentArray["attachment"] = $attachment["attachment"];
                $tmpAttachments[] = $attachmentArray;
                break;
            case 'zip':
                $zipArray = processZipFile($attachment["attachment"]);
                foreach ($zipArray as $zippedFile) {
                    $attachmentArray = array();
                    $attachmentArray["basename"] = $zippedFile["basename"];
                    $attachmentArray["extension"] = $zippedFile["extension"];
                    $attachmentArray["attachment"] = $zippedFile["attachment"];
                    $tmpAttachments[] = $attachmentArray;
                }
                break;
            default:
                $attachmentArray["extension"] = $extension;
                $attachmentArray["attachment"] = $attachment["attachment"];
                $tmpAttachments[] = $attachmentArray;
                break;
        }
    }
    // Armar arreglo final (juntar xml con su pdf respectivo)
    $returnArray = array();
    foreach ($tmpAttachments as $attachment) {
        $tmpArray = array();
        if (strtolower($attachment["extension"]) == "xml") {
            $tmpArray = array("xml_basename" => $attachment["basename"], "xml_extension" => $attachment["extension"], "xml_attachment" => $attachment["attachment"], "pdf_basename" => "", "pdf_extension" => "", "pdf_attachment" => "");
            foreach ($tmpAttachments as $pdfAttachment) {
                if ((strtolower($pdfAttachment["extension"]) == "pdf" || strtolower($pdfAttachment["extension"]) == "tiff") && $pdfAttachment["basename"] == $attachment["basename"]) {
                    $tmpArray["pdf_basename"] = $pdfAttachment["basename"];
                    $tmpArray["pdf_extension"] = $pdfAttachment["extension"];
                    $tmpArray["pdf_attachment"] = $pdfAttachment["attachment"];
                }
            }
            $returnArray[] = $tmpArray;
        }
    }
    return $returnArray;
}
Exemple #30
0
 /**
  * quoted_printable_encode()
  *
  * @link	http://php.net/quoted_printable_encode
  * @param	string	$str
  * @return	string
  */
 function quoted_printable_encode($str)
 {
     if (strlen($str) === 0) {
         return '';
     } elseif (in_array($type = gettype($str), array('array', 'object'), TRUE)) {
         if ($type === 'object' && method_exists($str, '__toString')) {
             $str = (string) $str;
         } else {
             trigger_error('quoted_printable_encode() expects parameter 1 to be string, ' . $type . ' given', E_USER_WARNING);
             return NULL;
         }
     }
     if (function_exists('imap_8bit')) {
         return imap_8bit($str);
     }
     $i = $lp = 0;
     $output = '';
     $hex = '0123456789ABCDEF';
     $length = extension_loaded('mbstring') && ini_get('mbstring.func_overload') ? mb_strlen($str, '8bit') : strlen($str);
     while ($length--) {
         if (($c = $str[$i++]) === "\r" && isset($str[$i]) && $str[$i] === "\n" && $length > 0) {
             $output .= "\r" . $str[$i++];
             $length--;
             $lp = 0;
             continue;
         }
         if (ctype_cntrl($c) or ord($c) === 0x7f or ord($c) & 0x80 or $c === '=' or $c === ' ' && isset($str[$i]) && $str[$i] === "\r") {
             if (($lp += 3) > 75 && ord($c) <= 0x7f or ord($c) > 0x7f && ord($c) <= 0xdf && $lp + 3 > 75 or ord($c) > 0xdf && ord($c) <= 0xef && $lp + 6 > 75 or ord($c) > 0xef && ord($c) <= 0xf4 && $lp + 9 > 75) {
                 $output .= "=\r\n";
                 $lp = 3;
             }
             $output .= '=' . $hex[ord($c) >> 4] . $hex[ord($c) & 0xf];
             continue;
         }
         if (++$lp > 75) {
             $output .= "=\r\n";
             $lp = 1;
         }
         $output .= $c;
     }
     return $output;
 }