From 5bb5fd49552a4baad0fb1e2994bfebbd88bdb119 Mon Sep 17 00:00:00 2001
From: till <till@208e9e7b-5314-0410-a742-e7e81cd9613c>
Date: Wed, 29 Aug 2007 10:45:17 +0000
Subject: # bugfix (#1484523) fixed rc_request_header function     * normalized
 input ($HEADER)     * also normalized the arrays     * returning "really"
 NULL now (without issueing a warning!)

git-svn-id: https://svn.roundcube.net/trunk@736 208e9e7b-5314-0410-a742-e7e81cd9613c
---
 roundcubemail/program/include/rcube_shared.inc | 27 ++++++++++++++++----------
 1 file changed, 17 insertions(+), 10 deletions(-)

diff --git a/roundcubemail/program/include/rcube_shared.inc b/roundcubemail/program/include/rcube_shared.inc
index eeca2b57a..a86a3c048 100644
--- a/roundcubemail/program/include/rcube_shared.inc
+++ b/roundcubemail/program/include/rcube_shared.inc
@@ -525,22 +525,29 @@ 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
+ * @access static
+ * @param  string $name Header name
+ * @return mixed  Header value or null if not available
  */
 function rc_request_header($name)
-{
-  if (function_exists('getallheaders'))
   {
+  if (function_exists('getallheaders'))
+    {
     $hdrs = getallheaders();
-    return $hdrs[$name];
-  }
+    $hdrs = array_change_key_case($hdrs, CASE_UPPER);
+    $key  = strtoupper($name);
+    }
   else
-  {
-    $key = "HTTP_" . strtoupper(strtr($name, "-", "_"));
-    return $_SERVER[$key];
+    {
+    $key  = 'HTTP_' . strtoupper(strtr($name, '-', '_'));
+    $hdrs = array_change_key_case($_SERVER[$key], CASE_UPPER);
+    }
+  if (isset($hdrs[$key]))
+    {
+    return $hdrs[$key];
+    }
+  return null;
   }
-}
 
 
 /**
-- 
cgit v1.2.3