summaryrefslogtreecommitdiffstats
path: root/3rdparty/Net_URL2/Net/URL2.php
diff options
context:
space:
mode:
Diffstat (limited to '3rdparty/Net_URL2/Net/URL2.php')
-rw-r--r--3rdparty/Net_URL2/Net/URL2.php1197
1 files changed, 0 insertions, 1197 deletions
diff --git a/3rdparty/Net_URL2/Net/URL2.php b/3rdparty/Net_URL2/Net/URL2.php
deleted file mode 100644
index e61119a16..000000000
--- a/3rdparty/Net_URL2/Net/URL2.php
+++ /dev/null
@@ -1,1197 +0,0 @@
-<?php
-/**
- * Net_URL2, a class representing a URL as per RFC 3986.
- *
- * PHP version 5
- *
- * LICENSE:
- *
- * Copyright (c) 2007-2009, Peytz & Co. A/S
- * All rights reserved.
- *
- * Redistribution and use in source and binary forms, with or without
- * modification, are permitted provided that the following conditions
- * are met:
- *
- * * Redistributions of source code must retain the above copyright
- * notice, this list of conditions and the following disclaimer.
- * * Redistributions in binary form must reproduce the above copyright
- * notice, this list of conditions and the following disclaimer in
- * the documentation and/or other materials provided with the distribution.
- * * Neither the name of the Net_URL2 nor the names of its contributors may
- * be used to endorse or promote products derived from this software
- * without specific prior written permission.
- *
- * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS
- * IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
- * THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
- * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR
- * CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
- * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
- * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
- * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY
- * OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
- * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
- * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
- *
- * @category Networking
- * @package Net_URL2
- * @author Christian Schmidt <schmidt@php.net>
- * @copyright 2007-2009 Peytz & Co. A/S
- * @license https://spdx.org/licenses/BSD-3-Clause BSD-3-Clause
- * @version CVS: $Id$
- * @link https://tools.ietf.org/html/rfc3986
- */
-
-/**
- * Represents a URL as per RFC 3986.
- *
- * @category Networking
- * @package Net_URL2
- * @author Christian Schmidt <schmidt@php.net>
- * @copyright 2007-2009 Peytz & Co. A/S
- * @license https://spdx.org/licenses/BSD-3-Clause BSD-3-Clause
- * @version Release: 2.0.7
- * @link https://pear.php.net/package/Net_URL2
- */
-class Net_URL2
-{
- /**
- * Do strict parsing in resolve() (see RFC 3986, section 5.2.2). Default
- * is true.
- */
- const OPTION_STRICT = 'strict';
-
- /**
- * Represent arrays in query using PHP's [] notation. Default is true.
- */
- const OPTION_USE_BRACKETS = 'use_brackets';
-
- /**
- * URL-encode query variable keys. Default is true.
- */
- const OPTION_ENCODE_KEYS = 'encode_keys';
-
- /**
- * Query variable separators when parsing the query string. Every character
- * is considered a separator. Default is "&".
- */
- const OPTION_SEPARATOR_INPUT = 'input_separator';
-
- /**
- * Query variable separator used when generating the query string. Default
- * is "&".
- */
- const OPTION_SEPARATOR_OUTPUT = 'output_separator';
-
- /**
- * Default options corresponds to how PHP handles $_GET.
- */
- private $_options = array(
- self::OPTION_STRICT => true,
- self::OPTION_USE_BRACKETS => true,
- self::OPTION_ENCODE_KEYS => true,
- self::OPTION_SEPARATOR_INPUT => '&',
- self::OPTION_SEPARATOR_OUTPUT => '&',
- );
-
- /**
- * @var string|bool
- */
- private $_scheme = false;
-
- /**
- * @var string|bool
- */
- private $_userinfo = false;
-
- /**
- * @var string|bool
- */
- private $_host = false;
-
- /**
- * @var string|bool
- */
- private $_port = false;
-
- /**
- * @var string
- */
- private $_path = '';
-
- /**
- * @var string|bool
- */
- private $_query = false;
-
- /**
- * @var string|bool
- */
- private $_fragment = false;
-
- /**
- * Constructor.
- *
- * @param string $url an absolute or relative URL
- * @param array $options an array of OPTION_xxx constants
- *
- * @uses self::parseUrl()
- */
- public function __construct($url, array $options = array())
- {
- foreach ($options as $optionName => $value) {
- if (array_key_exists($optionName, $this->_options)) {
- $this->_options[$optionName] = $value;
- }
- }
-
- $this->parseUrl($url);
- }
-
- /**
- * Magic Setter.
- *
- * This method will magically set the value of a private variable ($var)
- * with the value passed as the args
- *
- * @param string $var The private variable to set.
- * @param mixed $arg An argument of any type.
- *
- * @return void
- */
- public function __set($var, $arg)
- {
- $method = 'set' . $var;
- if (method_exists($this, $method)) {
- $this->$method($arg);
- }
- }
-
- /**
- * Magic Getter.
- *
- * This is the magic get method to retrieve the private variable
- * that was set by either __set() or it's setter...
- *
- * @param string $var The property name to retrieve.
- *
- * @return mixed $this->$var Either a boolean false if the
- * property is not set or the value
- * of the private property.
- */
- public function __get($var)
- {
- $method = 'get' . $var;
- if (method_exists($this, $method)) {
- return $this->$method();
- }
-
- return false;
- }
-
- /**
- * Returns the scheme, e.g. "http" or "urn", or false if there is no
- * scheme specified, i.e. if this is a relative URL.
- *
- * @return string|bool
- */
- public function getScheme()
- {
- return $this->_scheme;
- }
-
- /**
- * Sets the scheme, e.g. "http" or "urn". Specify false if there is no
- * scheme specified, i.e. if this is a relative URL.
- *
- * @param string|bool $scheme e.g. "http" or "urn", or false if there is no
- * scheme specified, i.e. if this is a relative
- * URL
- *
- * @return $this
- * @see getScheme
- */
- public function setScheme($scheme)
- {
- $this->_scheme = $scheme;
- return $this;
- }
-
- /**
- * Returns the user part of the userinfo part (the part preceding the first
- * ":"), or false if there is no userinfo part.
- *
- * @return string|bool
- */
- public function getUser()
- {
- return $this->_userinfo !== false
- ? preg_replace('(:.*$)', '', $this->_userinfo)
- : false;
- }
-
- /**
- * Returns the password part of the userinfo part (the part after the first
- * ":"), or false if there is no userinfo part (i.e. the URL does not
- * contain "@" in front of the hostname) or the userinfo part does not
- * contain ":".
- *
- * @return string|bool
- */
- public function getPassword()
- {
- return $this->_userinfo !== false
- ? substr(strstr($this->_userinfo, ':'), 1)
- : false;
- }
-
- /**
- * Returns the userinfo part, or false if there is none, i.e. if the
- * authority part does not contain "@".
- *
- * @return string|bool
- */
- public function getUserinfo()
- {
- return $this->_userinfo;
- }
-
- /**
- * Sets the userinfo part. If two arguments are passed, they are combined
- * in the userinfo part as username ":" password.
- *
- * @param string|bool $userinfo userinfo or username
- * @param string|bool $password optional password, or false
- *
- * @return $this
- */
- public function setUserinfo($userinfo, $password = false)
- {
- if ($password !== false) {
- $userinfo .= ':' . $password;
- }
-
- if ($userinfo !== false) {
- $userinfo = $this->_encodeData($userinfo);
- }
-
- $this->_userinfo = $userinfo;
- return $this;
- }
-
- /**
- * Returns the host part, or false if there is no authority part, e.g.
- * relative URLs.
- *
- * @return string|bool a hostname, an IP address, or false
- */
- public function getHost()
- {
- return $this->_host;
- }
-
- /**
- * Sets the host part. Specify false if there is no authority part, e.g.
- * relative URLs.
- *
- * @param string|bool $host a hostname, an IP address, or false
- *
- * @return $this
- */
- public function setHost($host)
- {
- $this->_host = $host;
- return $this;
- }
-
- /**
- * Returns the port number, or false if there is no port number specified,
- * i.e. if the default port is to be used.
- *
- * @return string|bool
- */
- public function getPort()
- {
- return $this->_port;
- }
-
- /**
- * Sets the port number. Specify false if there is no port number specified,
- * i.e. if the default port is to be used.
- *
- * @param string|bool $port a port number, or false
- *
- * @return $this
- */
- public function setPort($port)
- {
- $this->_port = $port;
- return $this;
- }
-
- /**
- * Returns the authority part, i.e. [ userinfo "@" ] host [ ":" port ], or
- * false if there is no authority.
- *
- * @return string|bool
- */
- public function getAuthority()
- {
- if (false === $this->_host) {
- return false;
- }
-
- $authority = '';
-
- if (strlen($this->_userinfo)) {
- $authority .= $this->_userinfo . '@';
- }
-
- $authority .= $this->_host;
-
- if ($this->_port !== false) {
- $authority .= ':' . $this->_port;
- }
-
- return $authority;
- }
-
- /**
- * Sets the authority part, i.e. [ userinfo "@" ] host [ ":" port ]. Specify
- * false if there is no authority.
- *
- * @param string|bool $authority a hostname or an IP address, possibly
- * with userinfo prefixed and port number
- * appended, e.g. "foo:bar@example.org:81".
- *
- * @return $this
- */
- public function setAuthority($authority)
- {
- $this->_userinfo = false;
- $this->_host = false;
- $this->_port = false;
-
- if (!preg_match('(^(([^\@]*)\@)?([^:]+)(:(\d*))?$)', $authority, $matches)) {
- return $this;
- }
-
- if ($matches[1]) {
- $this->_userinfo = $this->_encodeData($matches[2]);
- }
-
- $this->_host = $matches[3];
- if (isset($matches[5])) {
- $this->_port = $matches[5];
- }
- return $this;
- }
-
- /**
- * Returns the path part (possibly an empty string).
- *
- * @return string
- */
- public function getPath()
- {
- return $this->_path;
- }
-
- /**
- * Sets the path part (possibly an empty string).
- *
- * @param string $path a path
- *
- * @return $this
- */
- public function setPath($path)
- {
- $this->_path = $path;
- return $this;
- }
-
- /**
- * Returns the query string (excluding the leading "?"), or false if "?"
- * is not present in the URL.
- *
- * @return string|bool
- * @see getQueryVariables
- */
- public function getQuery()
- {
- return $this->_query;
- }
-
- /**
- * Sets the query string (excluding the leading "?"). Specify false if "?"
- * is not present in the URL.
- *
- * @param string|bool $query a query string, e.g. "foo=1&bar=2"
- *
- * @return $this
- * @see setQueryVariables
- */
- public function setQuery($query)
- {
- $this->_query = $query;
- return $this;
- }
-
- /**
- * Returns the fragment name, or false if "#" is not present in the URL.
- *
- * @return string|bool
- */
- public function getFragment()
- {
- return $this->_fragment;
- }
-
- /**
- * Sets the fragment name. Specify false if "#" is not present in the URL.
- *
- * @param string|bool $fragment a fragment excluding the leading "#", or
- * false
- *
- * @return $this
- */
- public function setFragment($fragment)
- {
- $this->_fragment = $fragment;
- return $this;
- }
-
- /**
- * Returns the query string like an array as the variables would appear in
- * $_GET in a PHP script. If the URL does not contain a "?", an empty array
- * is returned.
- *
- * @return array
- */
- public function getQueryVariables()
- {
- $separator = $this->getOption(self::OPTION_SEPARATOR_INPUT);
- $encodeKeys = $this->getOption(self::OPTION_ENCODE_KEYS);
- $useBrackets = $this->getOption(self::OPTION_USE_BRACKETS);
-
- $return = array();
-
- for ($part = strtok($this->_query, $separator);
- strlen($part);
- $part = strtok($separator)
- ) {
- list($key, $value) = explode('=', $part, 2) + array(1 => '');
-
- if ($encodeKeys) {
- $key = rawurldecode($key);
- }
- $value = rawurldecode($value);
-
- if ($useBrackets) {
- $return = $this->_queryArrayByKey($key, $value, $return);
- } else {
- if (isset($return[$key])) {
- $return[$key] = (array) $return[$key];
- $return[$key][] = $value;
- } else {
- $return[$key] = $value;
- }
- }
- }
-
- return $return;
- }
-
- /**
- * Parse a single query key=value pair into an existing php array
- *
- * @param string $key query-key
- * @param string $value query-value
- * @param array $array of existing query variables (if any)
- *
- * @return mixed
- */
- private function _queryArrayByKey($key, $value, array $array = array())
- {
- if (!strlen($key)) {
- return $array;
- }
-
- $offset = $this->_queryKeyBracketOffset($key);
- if ($offset === false) {
- $name = $key;
- } else {
- $name = substr($key, 0, $offset);
- }
-
- if (!strlen($name)) {
- return $array;
- }
-
- if (!$offset) {
- // named value
- $array[$name] = $value;
- } else {
- // array
- $brackets = substr($key, $offset);
- if (!isset($array[$name])) {
- $array[$name] = null;
- }
- $array[$name] = $this->_queryArrayByBrackets(
- $brackets, $value, $array[$name]
- );
- }
-
- return $array;
- }
-
- /**
- * Parse a key-buffer to place value in array
- *
- * @param string $buffer to consume all keys from
- * @param string $value to be set/add
- * @param array $array to traverse and set/add value in
- *
- * @throws Exception
- * @return array
- */
- private function _queryArrayByBrackets($buffer, $value, array $array = null)
- {
- $entry = &$array;
-
- for ($iteration = 0; strlen($buffer); $iteration++) {
- $open = $this->_queryKeyBracketOffset($buffer);
- if ($open !== 0) {
- // Opening bracket [ must exist at offset 0, if not, there is
- // no bracket to parse and the value dropped.
- // if this happens in the first iteration, this is flawed, see
- // as well the second exception below.
- if ($iteration) {
- break;
- }
- // @codeCoverageIgnoreStart
- throw new Exception(
- 'Net_URL2 Internal Error: '. __METHOD__ .'(): ' .
- 'Opening bracket [ must exist at offset 0'
- );
- // @codeCoverageIgnoreEnd
- }
-
- $close = strpos($buffer, ']', 1);
- if (!$close) {
- // this error condition should never be reached as this is a
- // private method and bracket pairs are checked beforehand.
- // See as well the first exception for the opening bracket.
- // @codeCoverageIgnoreStart
- throw new Exception(
- 'Net_URL2 Internal Error: '. __METHOD__ .'(): ' .
- 'Closing bracket ] must exist, not found'
- );
- // @codeCoverageIgnoreEnd
- }
-
- $index = substr($buffer, 1, $close - 1);
- if (strlen($index)) {
- $entry = &$entry[$index];
- } else {
- if (!is_array($entry)) {
- $entry = array();
- }
- $entry[] = &$new;
- $entry = &$new;
- unset($new);
- }
- $buffer = substr($buffer, $close + 1);
- }
-
- $entry = $value;
-
- return $array;
- }
-
- /**
- * Query-key has brackets ("...[]")
- *
- * @param string $key query-key
- *
- * @return bool|int offset of opening bracket, false if no brackets
- */
- private function _queryKeyBracketOffset($key)
- {
- if (false !== $open = strpos($key, '[')
- and false === strpos($key, ']', $open + 1)
- ) {
- $open = false;
- }
-
- return $open;
- }
-
- /**
- * Sets the query string to the specified variable in the query string.
- *
- * @param array $array (name => value) array
- *
- * @return $this
- */
- public function setQueryVariables(array $array)
- {
- if (!$array) {
- $this->_query = false;
- } else {
- $this->_query = $this->buildQuery(
- $array,
- $this->getOption(self::OPTION_SEPARATOR_OUTPUT)
- );
- }
- return $this;
- }
-
- /**
- * Sets the specified variable in the query string.
- *
- * @param string $name variable name
- * @param mixed $value variable value
- *
- * @return $this
- */
- public function setQueryVariable($name, $value)
- {
- $array = $this->getQueryVariables();
- $array[$name] = $value;
- $this->setQueryVariables($array);
- return $this;
- }
-
- /**
- * Removes the specified variable from the query string.
- *
- * @param string $name a query string variable, e.g. "foo" in "?foo=1"
- *
- * @return void
- */
- public function unsetQueryVariable($name)
- {
- $array = $this->getQueryVariables();
- unset($array[$name]);
- $this->setQueryVariables($array);
- }
-
- /**
- * Returns a string representation of this URL.
- *
- * @return string
- */
- public function getURL()
- {
- // See RFC 3986, section 5.3
- $url = '';
-
- if ($this->_scheme !== false) {
- $url .= $this->_scheme . ':';
- }
-
- $authority = $this->getAuthority();
- if ($authority === false && strtolower($this->_scheme) === 'file') {
- $authority = '';
- }
-
- $url .= $this->_buildAuthorityAndPath($authority, $this->_path);
-
- if ($this->_query !== false) {
- $url .= '?' . $this->_query;
- }
-
- if ($this->_fragment !== false) {
- $url .= '#' . $this->_fragment;
- }
-
- return $url;
- }
-
- /**
- * Put authority and path together, wrapping authority
- * into proper separators/terminators.
- *
- * @param string|bool $authority authority
- * @param string $path path
- *
- * @return string
- */
- private function _buildAuthorityAndPath($authority, $path)
- {
- if ($authority === false) {
- return $path;
- }
-
- $terminator = ($path !== '' && $path[0] !== '/') ? '/' : '';
-
- return '//' . $authority . $terminator . $path;
- }
-
- /**
- * Returns a string representation of this URL.
- *
- * @return string
- * @link https://php.net/language.oop5.magic#object.tostring
- */
- public function __toString()
- {
- return $this->getURL();
- }
-
- /**
- * Returns a normalized string representation of this URL. This is useful
- * for comparison of URLs.
- *
- * @return string
- */
- public function getNormalizedURL()
- {
- $url = clone $this;
- $url->normalize();
- return $url->getUrl();
- }
-
- /**
- * Normalizes the URL
- *
- * See RFC 3986, Section 6. Normalization and Comparison
- *
- * @link https://tools.ietf.org/html/rfc3986#section-6
- *
- * @return void
- */
- public function normalize()
- {
- // See RFC 3986, section 6
-
- // Scheme is case-insensitive
- if ($this->_scheme) {
- $this->_scheme = strtolower($this->_scheme);
- }
-
- // Hostname is case-insensitive
- if ($this->_host) {
- $this->_host = strtolower($this->_host);
- }
-
- // Remove default port number for known schemes (RFC 3986, section 6.2.3)
- if ('' === $this->_port
- || $this->_port
- && $this->_scheme
- && $this->_port == getservbyname($this->_scheme, 'tcp')
- ) {
- $this->_port = false;
- }
-
- // Normalize case of %XX percentage-encodings (RFC 3986, section 6.2.2.1)
- // Normalize percentage-encoded unreserved characters (section 6.2.2.2)
- list($this->_host, $this->_path)
- = $this->_normalize(array($this->_host, $this->_path));
-
- if ($this->_userinfo !== false) {
- $this->_userinfo = $this->_normalize($this->_userinfo);
- }
-
- // Path segment normalization (RFC 3986, section 6.2.2.3)
- $this->_path = self::removeDotSegments($this->_path);
-
- // Scheme based normalization (RFC 3986, section 6.2.3)
- if (false !== $this->_host && '' === $this->_path) {
- $this->_path = '/';
- }
-
- // path should start with '/' if there is authority (section 3.3.)
- if (strlen($this->getAuthority())
- && strlen($this->_path)
- && $this->_path[0] !== '/'
- ) {
- $this->_path = '/' . $this->_path;
- }
- }
-
- /**
- * Normalize case of %XX percentage-encodings (RFC 3986, section 6.2.2.1)
- * Normalize percentage-encoded unreserved characters (section 6.2.2.2)
- *
- * @param string|array $mixed string or array of strings to normalize
- *
- * @return string|array
- * @see normalize
- * @see _normalizeCallback()
- */
- private function _normalize($mixed)
- {
- return preg_replace_callback(
- '((?:%[0-9a-fA-Z]{2})+)', array($this, '_normalizeCallback'),
- $mixed
- );
- }
-
- /**
- * Callback for _normalize() of %XX percentage-encodings
- *
- * @param array $matches as by preg_replace_callback
- *
- * @return string
- * @see normalize
- * @see _normalize
- * @SuppressWarnings(PHPMD.UnusedPrivateMethod)
- */
- private function _normalizeCallback($matches)
- {
- return self::urlencode(urldecode($matches[0]));
- }
-
- /**
- * Returns whether this instance represents an absolute URL.
- *
- * @return bool
- */
- public function isAbsolute()
- {
- return (bool) $this->_scheme;
- }
-
- /**
- * Returns an Net_URL2 instance representing an absolute URL relative to
- * this URL.
- *
- * @param Net_URL2|string $reference relative URL
- *
- * @throws Exception
- * @return $this
- */
- public function resolve($reference)
- {
- if (!$reference instanceof Net_URL2) {
- $reference = new self($reference);
- }
- if (!$reference->_isFragmentOnly() && !$this->isAbsolute()) {
- throw new Exception(
- 'Base-URL must be absolute if reference is not fragment-only'
- );
- }
-
- // A non-strict parser may ignore a scheme in the reference if it is
- // identical to the base URI's scheme.
- if (!$this->getOption(self::OPTION_STRICT)
- && $reference->_scheme == $this->_scheme
- ) {
- $reference->_scheme = false;
- }
-
- $target = new self('');
- if ($reference->_scheme !== false) {
- $target->_scheme = $reference->_scheme;
- $target->setAuthority($reference->getAuthority());
- $target->_path = self::removeDotSegments($reference->_path);
- $target->_query = $reference->_query;
- } else {
- $authority = $reference->getAuthority();
- if ($authority !== false) {
- $target->setAuthority($authority);
- $target->_path = self::removeDotSegments($reference->_path);
- $target->_query = $reference->_query;
- } else {
- if ($reference->_path == '') {
- $target->_path = $this->_path;
- if ($reference->_query !== false) {
- $target->_query = $reference->_query;
- } else {
- $target->_query = $this->_query;
- }
- } else {
- if (substr($reference->_path, 0, 1) == '/') {
- $target->_path = self::removeDotSegments($reference->_path);
- } else {
- // Merge paths (RFC 3986, section 5.2.3)
- if ($this->_host !== false && $this->_path == '') {
- $target->_path = '/' . $reference->_path;
- } else {
- $i = strrpos($this->_path, '/');
- if ($i !== false) {
- $target->_path = substr($this->_path, 0, $i + 1);
- }
- $target->_path .= $reference->_path;
- }
- $target->_path = self::removeDotSegments($target->_path);
- }
- $target->_query = $reference->_query;
- }
- $target->setAuthority($this->getAuthority());
- }
- $target->_scheme = $this->_scheme;
- }
-
- $target->_fragment = $reference->_fragment;
-
- return $target;
- }
-
- /**
- * URL is fragment-only
- *
- * @SuppressWarnings(PHPMD.UnusedPrivateMethod)
- * @return bool
- */
- private function _isFragmentOnly()
- {
- return (
- $this->_fragment !== false
- && $this->_query === false
- && $this->_path === ''
- && $this->_port === false
- && $this->_host === false
- && $this->_userinfo === false
- && $this->_scheme === false
- );
- }
-
- /**
- * Removes dots as described in RFC 3986, section 5.2.4, e.g.
- * "/foo/../bar/baz" => "/bar/baz"
- *
- * @param string $path a path
- *
- * @return string a path
- */
- public static function removeDotSegments($path)
- {
- $path = (string) $path;
- $output = '';
-
- // Make sure not to be trapped in an infinite loop due to a bug in this
- // method
- $loopLimit = 256;
- $j = 0;
- while ('' !== $path && $j++ < $loopLimit) {
- if (substr($path, 0, 2) === './') {
- // Step 2.A
- $path = substr($path, 2);
- } elseif (substr($path, 0, 3) === '../') {
- // Step 2.A
- $path = substr($path, 3);
- } elseif (substr($path, 0, 3) === '/./' || $path === '/.') {
- // Step 2.B
- $path = '/' . substr($path, 3);
- } elseif (substr($path, 0, 4) === '/../' || $path === '/..') {
- // Step 2.C
- $path = '/' . substr($path, 4);
- $i = strrpos($output, '/');
- $output = $i === false ? '' : substr($output, 0, $i);
- } elseif ($path === '.' || $path === '..') {
- // Step 2.D
- $path = '';
- } else {
- // Step 2.E
- $i = strpos($path, '/', $path[0] === '/');
- if ($i === false) {
- $output .= $path;
- $path = '';
- break;
- }
- $output .= substr($path, 0, $i);
- $path = substr($path, $i);
- }
- }
-
- if ($path !== '') {
- $message = sprintf(
- 'Unable to remove dot segments; hit loop limit %d (left: %s)',
- $j, var_export($path, true)
- );
- trigger_error($message, E_USER_WARNING);
- }
-
- return $output;
- }
-
- /**
- * Percent-encodes all non-alphanumeric characters except these: _ . - ~
- * Similar to PHP's rawurlencode(), except that it also encodes ~ in PHP
- * 5.2.x and earlier.
- *
- * @param string $string string to encode
- *
- * @return string
- */
- public static function urlencode($string)
- {
- $encoded = rawurlencode($string);
-
- // This is only necessary in PHP < 5.3.
- $encoded = str_replace('%7E', '~', $encoded);
- return $encoded;
- }
-
- /**
- * Returns a Net_URL2 instance representing the canonical URL of the
- * currently executing PHP script.
- *
- * @throws Exception
- * @return string
- */
- public static function getCanonical()
- {
- if (!isset($_SERVER['REQUEST_METHOD'])) {
- // ALERT - no current URL
- throw new Exception('Script was not called through a webserver');
- }
-
- // Begin with a relative URL
- $url = new self($_SERVER['PHP_SELF']);
- $url->_scheme = isset($_SERVER['HTTPS']) ? 'https' : 'http';
- $url->_host = $_SERVER['SERVER_NAME'];
- $port = $_SERVER['SERVER_PORT'];
- if ($url->_scheme == 'http' && $port != 80
- || $url->_scheme == 'https' && $port != 443
- ) {
- $url->_port = $port;
- }
- return $url;
- }
-
- /**
- * Returns the URL used to retrieve the current request.
- *
- * @return string
- */
- public static function getRequestedURL()
- {
- return self::getRequested()->getUrl();
- }
-
- /**
- * Returns a Net_URL2 instance representing the URL used to retrieve the
- * current request.
- *
- * @throws Exception
- * @return $this
- */
- public static function getRequested()
- {
- if (!isset($_SERVER['REQUEST_METHOD'])) {
- // ALERT - no current URL
- throw new Exception('Script was not called through a webserver');
-