ILIAS  release_5-1 Revision 5.0.0-5477-g43f3e3fab5f
URINorm.php
Go to the documentation of this file.
1<?php
2
12require_once 'Auth/Yadis/Misc.php';
13
14// from appendix B of rfc 3986 (http://www.ietf.org/rfc/rfc3986.txt)
16{
17 return '&^(([^:/?#]+):)?(//([^/?#]*))?([^?#]*)(\?([^#]*))?(#(.*))?&';
18}
19
21{
22 return '/^([^@]*@)?([^:]*)(:.*)?/';
23}
24
26{
27 return '/%([0-9A-Fa-f]{2})/';
28}
29
30# gen-delims = ":" / "/" / "?" / "#" / "[" / "]" / "@"
31#
32# sub-delims = "!" / "$" / "&" / "'" / "(" / ")"
33# / "*" / "+" / "," / ";" / "="
34#
35# unreserved = ALPHA / DIGIT / "-" / "." / "_" / "~"
37{
38 return "/([^-A-Za-z0-9:\/\?#\[\]@\!\$&'\‍(\‍)\*\+,;=\._~\%])/";
39}
40
42{
43 $_unreserved = array();
44 for ($i = 0; $i < 256; $i++) {
45 $_unreserved[$i] = false;
46 }
47
48 for ($i = ord('A'); $i <= ord('Z'); $i++) {
49 $_unreserved[$i] = true;
50 }
51
52 for ($i = ord('0'); $i <= ord('9'); $i++) {
53 $_unreserved[$i] = true;
54 }
55
56 for ($i = ord('a'); $i <= ord('z'); $i++) {
57 $_unreserved[$i] = true;
58 }
59
60 $_unreserved[ord('-')] = true;
61 $_unreserved[ord('.')] = true;
62 $_unreserved[ord('_')] = true;
63 $_unreserved[ord('~')] = true;
64
65 return $_unreserved;
66}
67
69{
70 $parts = array();
71 foreach (array_merge(Auth_Yadis_getUCSChars(),
72 Auth_Yadis_getIPrivateChars()) as $pair) {
73 list($m, $n) = $pair;
74 $parts[] = sprintf("%s-%s", chr($m), chr($n));
75 }
76
77 return sprintf('[%s]', implode('', $parts));
78}
79
81{
82 $_unreserved = Auth_OpenID_getUnreserved();
83
84 $i = intval($mo[1], 16);
85 if ($_unreserved[$i]) {
86 return chr($i);
87 } else {
88 return strtoupper($mo[0]);
89 }
90
91 return $mo[0];
92}
93
95{
96 return chr(intval($mo[1], 16));
97}
98
100{
101 $result_segments = array();
102
103 while ($path) {
104 if (Auth_Yadis_startswith($path, '../')) {
105 $path = substr($path, 3);
106 } else if (Auth_Yadis_startswith($path, './')) {
107 $path = substr($path, 2);
108 } else if (Auth_Yadis_startswith($path, '/./')) {
109 $path = substr($path, 2);
110 } else if ($path == '/.') {
111 $path = '/';
112 } else if (Auth_Yadis_startswith($path, '/../')) {
113 $path = substr($path, 3);
114 if ($result_segments) {
115 array_pop($result_segments);
116 }
117 } else if ($path == '/..') {
118 $path = '/';
119 if ($result_segments) {
120 array_pop($result_segments);
121 }
122 } else if (($path == '..') ||
123 ($path == '.')) {
124 $path = '';
125 } else {
126 $i = 0;
127 if ($path[0] == '/') {
128 $i = 1;
129 }
130 $i = strpos($path, '/', $i);
131 if ($i === false) {
132 $i = strlen($path);
133 }
134 $result_segments[] = substr($path, 0, $i);
135 $path = substr($path, $i);
136 }
137 }
138
139 return implode('', $result_segments);
140}
141
143{
144 $uri_matches = array();
145 preg_match(Auth_OpenID_getURIPattern(), $uri, $uri_matches);
146
147 if (count($uri_matches) < 9) {
148 for ($i = count($uri_matches); $i <= 9; $i++) {
149 $uri_matches[] = '';
150 }
151 }
152
153 $illegal_matches = array();
155 $uri, $illegal_matches);
156 if ($illegal_matches) {
157 return null;
158 }
159
160 $scheme = $uri_matches[2];
161 if ($scheme) {
162 $scheme = strtolower($scheme);
163 }
164
165 $scheme = $uri_matches[2];
166 if ($scheme === '') {
167 // No scheme specified
168 return null;
169 }
170
171 $scheme = strtolower($scheme);
172 if (!in_array($scheme, array('http', 'https'))) {
173 // Not an absolute HTTP or HTTPS URI
174 return null;
175 }
176
177 $authority = $uri_matches[4];
178 if ($authority === '') {
179 // Not an absolute URI
180 return null;
181 }
182
183 $authority_matches = array();
185 $authority, $authority_matches);
186 if (count($authority_matches) === 0) {
187 // URI does not have a valid authority
188 return null;
189 }
190
191 if (count($authority_matches) < 4) {
192 for ($i = count($authority_matches); $i <= 4; $i++) {
193 $authority_matches[] = '';
194 }
195 }
196
197 list($_whole, $userinfo, $host, $port) = $authority_matches;
198
199 if ($userinfo === null) {
200 $userinfo = '';
201 }
202
203 if (strpos($host, '%') !== -1) {
204 $host = strtolower($host);
205 $host = preg_replace_callback(
207 'Auth_OpenID_pct_encoded_replace', $host);
208 // NO IDNA.
209 // $host = unicode($host, 'utf-8').encode('idna');
210 } else {
211 $host = strtolower($host);
212 }
213
214 if ($port) {
215 if (($port == ':') ||
216 ($scheme == 'http' && $port == ':80') ||
217 ($scheme == 'https' && $port == ':443')) {
218 $port = '';
219 }
220 } else {
221 $port = '';
222 }
223
224 $authority = $userinfo . $host . $port;
225
226 $path = $uri_matches[5];
227 $path = preg_replace_callback(
229 'Auth_OpenID_pct_encoded_replace_unreserved', $path);
230
232 if (!$path) {
233 $path = '/';
234 }
235
236 $query = $uri_matches[6];
237 if ($query === null) {
238 $query = '';
239 }
240
241 $fragment = $uri_matches[8];
242 if ($fragment === null) {
243 $fragment = '';
244 }
245
246 return $scheme . '://' . $authority . $path . $query . $fragment;
247}
248
249
Auth_Yadis_startswith($s, $stuff)
Definition: Misc.php:54
Auth_Yadis_getUCSChars()
Definition: Misc.php:12
Auth_Yadis_getIPrivateChars()
Definition: Misc.php:35
$n
Definition: RandomTest.php:80
Auth_OpenID_remove_dot_segments($path)
Definition: URINorm.php:99
Auth_OpenID_pct_encoded_replace($mo)
Definition: URINorm.php:94
Auth_OpenID_getEscapeRE()
Definition: URINorm.php:68
Auth_OpenID_getUnreserved()
Definition: URINorm.php:41
Auth_OpenID_getURIPattern()
Definition: URINorm.php:15
Auth_OpenID_getEncodedPattern()
Definition: URINorm.php:25
Auth_OpenID_getAuthorityPattern()
Definition: URINorm.php:20
Auth_OpenID_getURLIllegalCharRE()
Definition: URINorm.php:36
Auth_OpenID_pct_encoded_replace_unreserved($mo)
Definition: URINorm.php:80
Auth_OpenID_urinorm($uri)
Definition: URINorm.php:142
$path
Definition: index.php:22