$msg = $res[0];
$msg->setEnt('0');
if (count($flags)) {
- foreach ($flags as $flag) {
- $char = strtoupper($flag{1});
- switch ($char) {
- case 'S':
- if (strtolower($flag) == '\\seen') {
- $msg->is_seen = true;
- }
- break;
- case 'A':
- if (strtolower($flag) == '\\answered') {
- $msg->is_answered = true;
- }
- break;
- case 'D':
- if (strtolower($flag) == '\\deleted') {
- $msg->is_deleted = true;
- }
- break;
- case 'F':
- if (strtolower($flag) == '\\flagged') {
- $msg->is_flagged = true;
- }
- break;
- case 'M':
- if (strtolower($flag) == '$mdnsent') {
- $msg->is_mdnsent = true;
- }
- break;
- default:
- break;
- }
- }
+ foreach ($flags as $flag) {
+ $char = strtoupper($flag{1});
+ switch ($char) {
+ case 'S':
+ if (strtolower($flag) == '\\seen') {
+ $msg->is_seen = true;
+ }
+ break;
+ case 'A':
+ if (strtolower($flag) == '\\answered') {
+ $msg->is_answered = true;
+ }
+ break;
+ case 'D':
+ if (strtolower($flag) == '\\deleted') {
+ $msg->is_deleted = true;
+ }
+ break;
+ case 'F':
+ if (strtolower($flag) == '\\flagged') {
+ $msg->is_flagged = true;
+ }
+ break;
+ case 'M':
+ if (strtolower($flag) == '$mdnsent') {
+ $msg->is_mdnsent = true;
+ }
+ break;
+ default:
+ break;
+ }
+ }
}
-// listEntities($msg);
+ // listEntities($msg);
return( $msg );
}
// Don't kill the connection if the browser is over a dialup
// and it would take over 30 seconds to download it.
- // don\8e´t call set_time_limit in safe mode.
+ // don´t call set_time_limit in safe mode.
if (!ini_get("safe_mode")) {
set_time_limit(0);
}
/* -[ END MIME DECODING ]----------------------------------------------------------- */
-/* findDisplayEntity
- * Checks to see if $message contains content of type $type0/$type1
- * returns the first entity number it finds of that type, or NULL if
- * none is found. Takes optional argument $start to allow the caller
- * to continue where they left off
- */
-function findDisplayEntity($message, $type0, $type1, $start=0) {
- if ($message) {
- for ($i = $start;isset($message->entities[$i]); $i++) {
- $entity = $message->entities[$i];
- if ($entity->type0 == $type0 && $entity->type1 == $type1) {
- return $i;
- }
- }
- }
- return NULL;
-}
-
// This is here for debugging purposese. It will print out a list
// of all the entity IDs that are in the $message object.
$body_message = getEntity($message, $ent_num);
if (($body_message->header->type0 == 'text') ||
($body_message->header->type0 == 'rfc822')) {
- $body = mime_fetch_body ($imap_stream, $id, $ent_num);
+ $body = mime_fetch_body ($imap_stream, $id, $ent_num);
$body = decodeBody($body, $body_message->header->encoding);
$hookResults = do_hook("message_body", $body);
$body = $hookResults[1];
// If there are other types that shouldn't be formatted, add
// them here
+
if ($body_message->header->type1 == 'html') {
- $body = charset_decode_japanese($body);
if ( $show_html_default <> 1 ) {
+ $entity_conv = array(' ' => ' ',
+ '>' => '>',
+ '<' => '<');
$body = strip_tags( $body );
- translateText($body, $wrap_at,
- $body_message->header->getParameter['charset']);
+ $body = strtr($body, $entity_conv);
+ $body = trim($body);
+ translateText($body, $wrap_at,
+ $body_message->header->getParameter('charset'));
} else {
$body = magicHTML( $body, $id, $message, $mailbox );
}
} else {
translateText($body, $wrap_at,
- $body_message->header->getParameter('charset'));
+ $body_message->header->getParameter('charset'));
}
if ($has_unsafe_images) {
function formatAttachments($message, $exclude_id, $mailbox, $id) {
- global $where, $what;
- global $startMessage, $color;
+ global $where, $what, $startMessage, $color;
static $ShownHTML = 0;
$att_ar = $message->getAttachments($exclude_id);
/** this function decodes the body depending on the encoding type. **/
function decodeBody($body, $encoding) {
+ global $languages, $squirrelmail_language;
- $body = str_replace("\r\n", "\n", $body);
- $encoding = strtolower($encoding);
-
- global $show_html_default;
-
- if ($encoding == 'quoted-printable' ||
- $encoding == 'quoted_printable') {
- $body = quoted_printable_decode($body);
-
- while (ereg("=\n", $body))
- $body = ereg_replace ("=\n", "", $body);
-
- } else if ($encoding == 'base64') {
- $body = base64_decode($body);
- }
-
- // All other encodings are returned raw.
- return $body;
+ $body = str_replace("\r\n", "\n", $body);
+ $encoding = strtolower($encoding);
+
+ global $show_html_default;
+
+ if ($encoding == 'quoted-printable' ||
+ $encoding == 'quoted_printable') {
+ $body = quoted_printable_decode($body);
+
+ while (ereg("=\n", $body)) {
+ $body = ereg_replace ("=\n", '', $body);
+ }
+
+ } else if ($encoding == 'base64') {
+ $body = base64_decode($body);
+ }
+
+ if (isset($languages[$squirrelmail_language]['XTRA_CODE']) &&
+ function_exists($languages[$squirrelmail_language]['XTRA_CODE'])) {
+ $body = $languages[$squirrelmail_language]['XTRA_CODE']('decode', $body);
+ }
+
+ // All other encodings are returned raw.
+ return( $body );
}
/*
* Patched by Christian Schmidt <christian@ostenfeld.dk> 23/03/2002
*/
function decodeHeader ($string, $utfencode=true) {
- global $squirrelmail_language;
+ global $languages, $squirrelmail_language;
if (is_array($string)) {
$string = implode("\n", $string);
}
- if ($squirrelmail_language == 'ja_JP' && function_exists('mb_convert_encoding')) {
- $string = str_replace("\t", "", $string);
- if (eregi('=\\?([^?]+)\\?(q|b)\\?([^?]+)\\?=', $string))
- $string = mb_decode_mimeheader($string);
- return @mb_convert_encoding($string, 'EUC-JP', 'AUTO');
+ if (isset($languages[$squirrelmail_language]['XTRA_CODE']) &&
+ function_exists($languages[$squirrelmail_language]['XTRA_CODE'])) {
+ $string = $languages[$squirrelmail_language]['XTRA_CODE']('decodeheader', $string);
}
$i = 0;
* be encoded.
*/
function encodeHeader ($string) {
- global $default_charset, $squirrelmail_language;
+ global $default_charset, $languages, $squirrelmail_language;
- if ($squirrelmail_language == 'ja_JP' && function_exists('mb_encode_mimeheader')) {
- return mb_encode_mimeheader($string);
+ if (isset($languages[$squirrelmail_language]['XTRA_CODE']) &&
+ function_exists($languages[$squirrelmail_language]['XTRA_CODE'])) {
+ return $languages[$squirrelmail_language]['XTRA_CODE']('encodeheader', $string);
}
// Encode only if the string contains 8-bit characters or =?
if ( $message->entities[$i]->header->type0 == 'multipart') {
$ret = find_ent_id( $id, $message->entities[$i] );
} else {
- if ( strcasecmp( $message->entities[$i]->header->id, $id ) == 0 )
- $ret = $message->entities[$i]->entity_id;
+ if ( strcasecmp( $message->entities[$i]->header->id, $id ) == 0 ) {
+ if (sq_check_save_extension($message->entities[$i])) {
+ $ret = $message->entities[$i]->entity_id;
+ } else {
+ $ret = '';
+ }
+ }
}
}
return( $ret );
}
+function sq_check_save_extension($message) {
+ $filename = $message->getFilename();
+ $ext = substr($filename, strrpos($filename,'.')+1);
+ $save_extensions = array('jpg','jpeg','gif','png','bmp');
+ return (in_array($ext, $save_extensions));
+}
+
+
/**
** HTMLFILTER ROUTINES
*/
* @return a string with the final tag representation.
*/
function sq_tagprint($tagname, $attary, $tagtype){
- $me = "sq_tagprint";
+
+ $me = 'sq_tagprint';
+
if ($tagtype == 2){
$fulltag = '</' . $tagname . '>';
} else {
$fulltag .= ' ' . join(" ", $atts);
}
if ($tagtype == 3){
- $fulltag .= " /";
+ $fulltag .= ' /';
}
- $fulltag .= ">";
+ $fulltag .= '>';
}
return $fulltag;
}
* non-whitespace char is located.
*/
function sq_skipspace($body, $offset){
- $me = "sq_skipspace";
+ $me = 'sq_skipspace';
preg_match("/^(\s*)/s", substr($body, $offset), $matches);
if (sizeof($matches{1})){
$count = strlen($matches{1});
* strlen($body) if needle wasn't found.
*/
function sq_findnxstr($body, $offset, $needle){
- $me = "sq_findnxstr";
+ $me = 'sq_findnxstr';
$pos = strpos($body, $needle, $offset);
if ($pos === FALSE){
$pos = strlen($body);
* - string with whatever it is we matched
*/
function sq_findnxreg($body, $offset, $reg){
- $me = "sq_findnxreg";
+ $me = 'sq_findnxreg';
$matches = Array();
$retarr = Array();
preg_match("%^(.*?)($reg)%s", substr($body, $offset), $matches);
* first three members will be false, if the tag is invalid.
*/
function sq_getnxtag($body, $offset){
- $me = "sq_getnxtag";
+ $me = 'sq_getnxtag';
if ($offset > strlen($body)){
return false;
}
*/
$tagtype = false;
switch (substr($body, $pos, 1)){
- case "/":
+ case '/':
$tagtype = 2;
$pos++;
break;
- case "!":
+ case '!':
/**
* A comment or an SGML declaration.
*/
* Whatever else we find there indicates an invalid tag.
*/
switch ($match){
- case "/":
+ case '/':
/**
* This is an xhtml-style tag with a closing / at the
* end, like so: <img src="blah"/>. Check if it's followed
$retary = Array(false, false, false, $lt, $gt);
return $retary;
}
- case ">":
+ case '>':
return Array($tagname, false, $tagtype, $lt, $pos);
break;
default:
* anything else means the attribute is invalid.
*/
switch($match){
- case "/":
+ case '/':
/**
* This is an xhtml-style tag with a closing / at the
* end, like so: <img src="blah"/>. Check if it's followed
$retary = Array(false, false, false, $lt, $gt);
return $retary;
}
- case ">":
+ case '>':
$attary{$attname} = '"yes"';
return Array($tagname, $attary, $tagtype, $lt, $pos);
break;
* @return Translated value.
*/
function sq_deent($attvalue){
- $me="sq_deent";
+ $me = 'sq_deent';
/**
* See if we have to run the checks first. All entities must start
* with "&".
$id,
$mailbox
){
- $me = "sq_fixatts";
+ $me = 'sq_fixatts';
while (list($attname, $attvalue) = each($attary)){
/**
* See if this attribute should be removed.
*/
function sq_fixstyle($message, $id, $content){
global $view_unsafe_images;
- $me = "sq_fixstyle";
+ $me = 'sq_fixstyle';
/**
* First look for general BODY style declaration, which would be
* like so:
$quotchar = substr($cidurl, 0, 1);
$cidurl = str_replace($quotchar, "", $cidurl);
$cidurl = substr(trim($cidurl), 4);
- $httpurl = $quotchar . "../src/download.php?absolute_dl=true&" .
- "passed_id=$id&mailbox=" . urlencode($mailbox) .
- "&ent_id=" . find_ent_id($cidurl, $message) . $quotchar;
+ $linkurl = find_ent_id($cidurl, $message);
+ /* in case of non-save cid links $httpurl should be replaced by a sort of
+ unsave link image */
+ $httpurl = '';
+ if ($linkurl) {
+ $httpurl = $quotchar . "../src/download.php?absolute_dl=true&" .
+ "passed_id=$id&mailbox=" . urlencode($mailbox) .
+ "&ent_id=" . $linkurl . $quotchar;
+ }
return $httpurl;
}
* @return a modified array of attributes to be set for <div>
*/
function sq_body2div($attary){
- $me = "sq_body2div";
- $divattary = Array("class"=>"'bodyclass'");
- $bgcolor="#ffffff";
- $text="#000000";
- $styledef="";
+ $me = 'sq_body2div';
+ $divattary = Array( 'class' => "'bodyclass'" );
+ $bgcolor = '#ffffff';
+ $text = '#000000';
+ $styledef = '';
if (is_array($attary) && sizeof($attary) > 0){
foreach ($attary as $attname=>$attvalue){
$quotchar = substr($attvalue, 0, 1);
$attvalue = str_replace($quotchar, "", $attvalue);
switch ($attname){
- case "background":
+ case 'background':
$styledef .= "background-image: url('$attvalue'); ";
break;
- case "bgcolor":
+ case 'bgcolor':
$styledef .= "background-color: $attvalue; ";
break;
- case "text":
+ case 'text':
$styledef .= "color: $attvalue; ";
}
}
$id,
$mailbox
){
- $me = "sq_sanitize";
+ $me = 'sq_sanitize';
/**
* Normalize rm_tags and rm_tags_with_content.
*/
return $trusted;
}
-?>
+?>
\ No newline at end of file
projects / squirrelmail.git / blobdiff