summaryrefslogtreecommitdiff
path: root/program
diff options
context:
space:
mode:
Diffstat (limited to 'program')
-rw-r--r--program/include/main.inc24
-rw-r--r--program/include/rcube_shared.inc21
2 files changed, 30 insertions, 15 deletions
diff --git a/program/include/main.inc b/program/include/main.inc
index 9aa274f27..f938174d6 100644
--- a/program/include/main.inc
+++ b/program/include/main.inc
@@ -472,19 +472,11 @@ function rcmail_set_locale($lang)
static $s_mbstring_loaded = NULL;
// settings for mbstring module (by Tadashi Jokagi)
- if (is_null($s_mbstring_loaded) && ($s_mbstring_loaded = extension_loaded("mbstring")))
- {
- $MBSTRING = array();
- foreach (mb_list_encodings() as $charset)
- $MBSTRING[strtoupper($charset)] = strtoupper($charset);
-
- // add some alias charsets
- $MBSTRING['UTF-7'] = "UTF7-IMAP";
- $MBSTRING['WINDOWS-1257'] = "ISO-8859-13";
- }
- else if (is_null($s_mbstring_loaded))
+ if (is_null($s_mbstring_loaded))
+ $MBSTRING = $s_mbstring_loaded = extension_loaded("mbstring");
+ else
$MBSTRING = $s_mbstring_loaded = FALSE;
-
+
if ($MBSTRING)
mb_internal_encoding(RCMAIL_CHARSET);
@@ -1057,7 +1049,6 @@ function rcmail_message_cache_gc()
function rcube_charset_convert($str, $from, $to=NULL)
{
global $MBSTRING;
- static $mb_encodings;
$from = strtoupper($from);
$to = $to==NULL ? strtoupper(RCMAIL_CHARSET) : strtoupper($to);
@@ -1070,10 +1061,13 @@ function rcube_charset_convert($str, $from, $to=NULL)
return iconv($from, $to . "//IGNORE", $str);
// convert charset using mbstring module
- if ($MBSTRING && ($mbfrom = $MBSTRING[$from]) && ($mbto = $MBSTRING[$to]))
+ if ($MBSTRING)
{
+ $to = $to=="UTF-7" ? "UTF7-IMAP" : $to;
+ $from = $from=="UTF-7" ? "UTF7-IMAP": $from;
+
// return if convert succeeded
- if (($out = mb_convert_encoding($str, $mbto, $mbfrom)) != '')
+ if (($out = mb_convert_encoding($str, $to, $from)) != '')
return $out;
}
diff --git a/program/include/rcube_shared.inc b/program/include/rcube_shared.inc
index acf98c938..eeca2b57a 100644
--- a/program/include/rcube_shared.inc
+++ b/program/include/rcube_shared.inc
@@ -523,6 +523,27 @@ function rc_strrpos($haystack, $needle, $offset=0)
/**
+ * Read a specific HTTP request header
+ *
+ * @param string Header name
+ * @return string Header value or null if not available
+ */
+function rc_request_header($name)
+{
+ if (function_exists('getallheaders'))
+ {
+ $hdrs = getallheaders();
+ return $hdrs[$name];
+ }
+ else
+ {
+ $key = "HTTP_" . strtoupper(strtr($name, "-", "_"));
+ return $_SERVER[$key];
+ }
+}
+
+
+/**
* Replace the middle part of a string with ...
* if it is longer than the allowed length
*