PDF rausgenommen

msd2/myoos/includes/functions/function_server.php

@@ -0,0 +1,239 @@
+<?php
+/* ----------------------------------------------------------------------
+
+   MyOOS [Shopsystem]
+   https://www.oos-shop.de
+
+   Copyright (c) 2003 - 2019 by the MyOOS Development Team.
+   ----------------------------------------------------------------------
+   Based on:
+
+   File: xarServer.php 1.62 03/10/28 19:11:18+01:00 mikespub
+   ----------------------------------------------------------------------
+   Released under the GNU General Public License
+   ---------------------------------------------------------------------- */
+
+  /**
+   * HTTP Protocol Server/Request/Response utilities
+   *
+   * @package server
+   * @copyright (C) 2002 by the Xaraya Development Team.
+   * @license GPL <http://www.gnu.org/licenses/gpl.html>
+   * @link http://www.xaraya.com
+   * @author Marco Canini <marco@xaraya.com>
+   */
+
+  /** ensure this file is being included by a parent file */
+  defined( 'OOS_VALID_MOD' ) OR die( 'Direct Access to this location is not allowed.' );
+
+  /**
+   * Gets a server variable
+   *
+   * Returns the value of $name server variable.
+   * Accepted values for $name are exactly the ones described by the
+   * {@link http://www.php.net/manual/en/reserved.variables.html#reserved.variables.server PHP manual}.
+   * If the server variable doesn't exist void is returned.
+   *
+   * Last Editor: Author: r23
+   * @author  Marco Canini <marco@xaraya.com>, Michel Dalle
+   * @access  public
+   * @param   name string the name of the variable
+   * @return  mixed value of the variable
+   */
+   function oos_server_get_var($sKey) {
+     if (isset($_SERVER[$sKey])) {
+       return $_SERVER[$sKey];
+     }
+     if (isset($_ENV[$sKey])) {
+       return $_ENV[$sKey];
+     }
+
+     if ($val = getenv($sKey)) {
+       return $val;
+     }
+     return; // we found nothing here
+   }
+
+
+  /**
+   * Has a server variable
+   *
+   * @author  r23 <info@r23.de>
+   * @access  public
+   * @param   string
+   * @return  mixed
+   */
+   function oos_server_has_var($sKey) {
+     if (isset($_SERVER[$sKey])) {
+       return TRUE;
+     }
+     return (bool)getenv($sKey);
+   }
+
+
+  /**
+   * Gets the host name
+   *
+   * Returns the server host name fetched from HTTP headers when possible.
+   * The host name is in the canonical form (host + : + port) when the port is different than 80.
+   * 
+   * Last Editor: Author: r23
+   * @author Marco Canini <marco@xaraya.com>
+   * @access public
+   * @return string HTTP host name
+   */
+   function oos_server_get_host() {
+     $sServer = oos_server_get_var('HTTP_HOST');
+     if (empty($sServer)) {
+       // HTTP_HOST is reliable only for HTTP 1.1
+       $sServer = oos_server_get_var('SERVER_NAME');
+       $port = oos_server_get_var('SERVER_PORT');
+       if ($port != '80') $sServer .= ":$port";
+     }
+     return $sServer;
+   }
+
+
+  /**
+   * Gets the current protocol
+   *
+   * Returns the HTTP protocol used by current connection, it could be 'http' or 'https'.
+   *
+   * Last Editor: Author: r23
+   * @author Marco Canini <marco@xaraya.com>
+   * @access public
+   * @return string current HTTP protocol
+   */
+   function oos_server_get_protocol() {
+     $sProtocol = 'http';
+       if (strtolower(oos_server_has_var('HTTPS')) == 'on'
+         || oos_server_has_var('SSL_PROTOCOL')) {
+         $sProtocol = 'https';
+       }
+
+     return $sProtocol . '://';
+   }
+
+
+  /**
+   * Get base URI for oos
+   *
+   * @access public
+   * @return string base URI for oos
+   */
+   function oos_server_get_base_uri() {
+
+    // Get the name of this URI
+    $sPath = oos_server_get_var('REQUEST_URI');
+
+    if (empty($sPath)) {
+      // REQUEST_URI was empty or pointed to a path
+      // adapted patch from Chris van de Steeg for IIS
+      // Try SCRIPT_NAME
+      $sPath = oos_server_get_var('SCRIPT_NAME');
+      if (empty($sPath)) {
+        // No luck there either
+        // Try looking at PATH_INFO
+        $sPath = oos_server_get_var('PATH_INFO');
+      }
+    }
+
+    $sPath = preg_replace('/[#\?].*/', '', $sPath);
+
+    $sPath = preg_replace('/\.php\/.*$/', '', $sPath);
+    if (substr($sPath, -1, 1) == '/') {
+      $sPath .= 'dummy';
+    }
+    $sPath = dirname($sPath);
+
+    if (preg_match('!^[/\\\]*$!', $sPath)) {
+      $sPath = '';
+    }
+
+    return $sPath;
+  }
+
+
+  /**
+   * get base URL for OOS
+   *
+   * @access public
+   * @return string base URL for OOS
+   */
+   function oos_server_get_base_url() {
+     static $sBaseurl = null;
+
+     if (isset($sBaseurl))  return $sBaseurl;
+
+     $sServer = oos_server_get_host();
+     $sProtocol = oos_server_get_protocol();
+     $sPath = oos_server_get_base_uri();
+
+     $sBaseurl = trim($sProtocol . $sServer . $sPath . '/');
+     return $sBaseurl;
+  }
+
+
+ /**
+  * get top level domain
+  *
+  * @copyright (C) 2003 by osCommerce.
+  * @license GPL <http://www.gnu.org/licenses/gpl.html>
+  * @link http://www.oscommerce.com
+  * @access public
+  * @param $sUrl
+  * @return  mixed
+  */
+  function oos_server_get_top_level_domain($sUrl) {
+    if (strpos($sUrl, '://')) {
+      $sUrl = parse_url($sUrl);
+      $sUrl = $sUrl['host'];
+    }
+
+    $aDomain = explode('.', $sUrl);
+    $nDomainSize = count($aDomain);
+
+    if ($nDomainSize > 1) {
+      if (is_numeric($aDomain[$nDomainSize-2]) && is_numeric($aDomain[$nDomainSize-1])) {
+        return FALSE;
+      } else {
+        return $aDomain[$nDomainSize-2] . '.' . $aDomain[$nDomainSize-1];
+      }
+    } else {
+      return FALSE;
+    }
+  }
+
+
+ /**
+  * get client ip
+  *
+  * @copyright (C) 2003 by osCommerce.
+  * @license GPL <http://www.gnu.org/licenses/gpl.html>
+  * @link http://www.oscommerce.com
+  * @access public
+  * @return string client ip
+  */
+  function oos_server_get_remote() {
+    if (isset($_SERVER)) {
+      if (isset($_SERVER['HTTP_X_FORWARDED_FOR'])) {
+        $ip = $_SERVER['HTTP_X_FORWARDED_FOR'];
+      } elseif (isset($_SERVER['HTTP_CLIENT_IP'])) {
+        $ip = $_SERVER['HTTP_CLIENT_IP'];
+      } else {
+        $ip = $_SERVER['REMOTE_ADDR'];
+      }
+    } else {
+      if (getenv('HTTP_X_FORWARDED_FOR')) {
+        $ip = getenv('HTTP_X_FORWARDED_FOR');
+      } elseif (getenv('HTTP_CLIENT_IP')) {
+        $ip = getenv('HTTP_CLIENT_IP');
+      } else {
+        $ip = getenv('REMOTE_ADDR');
+      }
+    }
+
+    return $ip;
+  }
+
+