cvs: php4 /pear HTTP.php
| From: | Thomas V.V.Cox | Date: | Mon, 07 Jan 2002 00:11:12 +0000 |
| Subject: | cvs: php4 /pear HTTP.php | ||
| Groups: | php.pear.cvs | ||
| Request: | Send a blank email to pear-cvs+get-1859@lists.php.net to get a copy of this message | ||
cox Sun Jan 6 19:11:12 2002 EDT
Modified files:
/php4/pear HTTP.php
Log:
ws
Index: php4/pear/HTTP.php
diff -u php4/pear/HTTP.php:1.9 php4/pear/HTTP.php:1.10
--- php4/pear/HTTP.php:1.9 Tue Dec 18 09:13:43 2001
+++ php4/pear/HTTP.php Sun Jan 6 19:11:11 2002
@@ -17,7 +17,7 @@
// | |
// +----------------------------------------------------------------------+
//
-// $Id: HTTP.php,v 1.9 2001/12/18 14:13:43 mj Exp $
+// $Id: HTTP.php,v 1.10 2002/01/07 00:11:11 cox Exp $
//
// HTTP utility functions.
//
@@ -77,44 +77,44 @@
global $HTTP_SERVER_VARS;
/* If the client has sent an Accept-Language: header, see if
- * it contains a language we support.
- */
- if (isset($HTTP_SERVER_VARS['HTTP_ACCEPT_LANGUAGE'])) {
- $accepted = split(',[[:space:]]*', $HTTP_ACCEPT_LANGUAGE);
- for ($i = 0; $i < count($accepted); $i++) {
- if (eregi('^([a-z]+);[[:space:]]*q=([0-9\.]+)', $accepted[$i], &$arr)) {
- $q = (double)$arr[2];
- $l = $arr[1];
- } else {
- $q = 42;
- $l = $accepted[$i];
- }
-
- if (!empty($supported[$l]) && ($q > 0.0)) {
- if ($q == 42) {
- return $l;
- }
- $candidates[$l] = $q;
- }
- }
- if (isset($candidates)) {
- arsort($candidates);
- reset($candidates);
- return key($candidates);
- }
- }
-
- /* Check for a valid language code in the top-level domain of
- * the client's host address.
- */
- if (ereg("\.[^\.]+$", $HTTP_SERVER_VARS['REMOTE_HOST'], &$arr)) {
- $lang = strtolower($arr[1]);
- if (!empty($supported[$lang])) {
- return $lang;
- }
- }
+ * it contains a language we support.
+ */
+ if (isset($HTTP_SERVER_VARS['HTTP_ACCEPT_LANGUAGE'])) {
+ $accepted = split(',[[:space:]]*', $HTTP_ACCEPT_LANGUAGE);
+ for ($i = 0; $i < count($accepted); $i++) {
+ if (eregi('^([a-z]+);[[:space:]]*q=([0-9\.]+)', $accepted[$i],
&$arr)) {
+ $q = (double)$arr[2];
+ $l = $arr[1];
+ } else {
+ $q = 42;
+ $l = $accepted[$i];
+ }
+
+ if (!empty($supported[$l]) && ($q > 0.0)) {
+ if ($q == 42) {
+ return $l;
+ }
+ $candidates[$l] = $q;
+ }
+ }
+ if (isset($candidates)) {
+ arsort($candidates);
+ reset($candidates);
+ return key($candidates);
+ }
+ }
+
+ /* Check for a valid language code in the top-level domain of
+ * the client's host address.
+ */
+ if (ereg("\.[^\.]+$", $HTTP_SERVER_VARS['REMOTE_HOST'], &$arr)) {
+ $lang = strtolower($arr[1]);
+ if (!empty($supported[$lang])) {
+ return $lang;
+ }
+ }
- return $default;
+ return $default;
}
}
-?>
+?>
\ No newline at end of file