1 : /*
2 : +----------------------------------------------------------------------+
3 : | PHP Version 5 |
4 : +----------------------------------------------------------------------+
5 : | Copyright (c) 1997-2009 The PHP Group |
6 : +----------------------------------------------------------------------+
7 : | This source file is subject to version 3.01 of the PHP license, |
8 : | that is bundled with this package in the file LICENSE, and is |
9 : | available through the world-wide-web at the following url: |
10 : | http://www.php.net/license/3_01.txt |
11 : | If you did not receive a copy of the PHP license and are unable to |
12 : | obtain it through the world-wide-web, please send a note to |
13 : | license@php.net so we can mail you a copy immediately. |
14 : +----------------------------------------------------------------------+
15 : | Authors: Rasmus Lerdorf <rasmus@php.net> |
16 : | Jim Winstead <jimw@php.net> |
17 : | Hartmut Holzgraefe <hholzgra@php.net> |
18 : | Wez Furlong <wez@thebrainroom.com> |
19 : | Sara Golemon <pollita@php.net> |
20 : +----------------------------------------------------------------------+
21 : */
22 : /* $Id: http_fopen_wrapper.c 290803 2009-11-16 10:36:27Z felipe $ */
23 :
24 : #include "php.h"
25 : #include "php_globals.h"
26 : #include "php_streams.h"
27 : #include "php_network.h"
28 : #include "php_ini.h"
29 : #include "ext/standard/basic_functions.h"
30 : #include "ext/standard/php_smart_str.h"
31 :
32 : #include <stdio.h>
33 : #include <stdlib.h>
34 : #include <errno.h>
35 : #include <sys/types.h>
36 : #include <sys/stat.h>
37 : #include <fcntl.h>
38 :
39 : #ifdef PHP_WIN32
40 : #define O_RDONLY _O_RDONLY
41 : #include "win32/param.h"
42 : #else
43 : #include <sys/param.h>
44 : #endif
45 :
46 : #include "php_standard.h"
47 :
48 : #include <sys/types.h>
49 : #if HAVE_SYS_SOCKET_H
50 : #include <sys/socket.h>
51 : #endif
52 :
53 : #ifdef PHP_WIN32
54 : #include <winsock2.h>
55 : #elif defined(NETWARE) && defined(USE_WINSOCK)
56 : #include <novsock2.h>
57 : #else
58 : #include <netinet/in.h>
59 : #include <netdb.h>
60 : #if HAVE_ARPA_INET_H
61 : #include <arpa/inet.h>
62 : #endif
63 : #endif
64 :
65 : #if defined(PHP_WIN32) || defined(__riscos__) || defined(NETWARE)
66 : #undef AF_UNIX
67 : #endif
68 :
69 : #if defined(AF_UNIX)
70 : #include <sys/un.h>
71 : #endif
72 :
73 : #include "php_fopen_wrappers.h"
74 :
75 : #define HTTP_HEADER_BLOCK_SIZE 1024
76 : #define PHP_URL_REDIRECT_MAX 20
77 : #define HTTP_HEADER_USER_AGENT 1
78 : #define HTTP_HEADER_HOST 2
79 : #define HTTP_HEADER_AUTH 4
80 : #define HTTP_HEADER_FROM 8
81 : #define HTTP_HEADER_CONTENT_LENGTH 16
82 : #define HTTP_HEADER_TYPE 32
83 :
84 : #define HTTP_WRAPPER_HEADER_INIT 1
85 : #define HTTP_WRAPPER_REDIRECTED 2
86 :
87 : php_stream *php_stream_url_wrap_http_ex(php_stream_wrapper *wrapper, char *path, char *mode, int options, char **opened_path, php_stream_context *context, int redirect_max, int flags STREAMS_DC TSRMLS_DC) /* {{{ */
88 0 : {
89 0 : php_stream *stream = NULL;
90 0 : php_url *resource = NULL;
91 : int use_ssl;
92 0 : int use_proxy = 0;
93 0 : char *scratch = NULL;
94 0 : char *tmp = NULL;
95 0 : char *ua_str = NULL;
96 0 : zval **ua_zval = NULL, **tmpzval = NULL;
97 0 : int scratch_len = 0;
98 0 : int body = 0;
99 : char location[HTTP_HEADER_BLOCK_SIZE];
100 0 : zval *response_header = NULL;
101 0 : int reqok = 0;
102 0 : char *http_header_line = NULL;
103 : char tmp_line[128];
104 0 : size_t chunk_size = 0, file_size = 0;
105 0 : int eol_detect = 0;
106 0 : char *transport_string, *errstr = NULL;
107 0 : int transport_len, have_header = 0, request_fulluri = 0, ignore_errors = 0;
108 0 : char *protocol_version = NULL;
109 0 : int protocol_version_len = 3; /* Default: "1.0" */
110 : struct timeval timeout;
111 0 : char *user_headers = NULL;
112 0 : int header_init = ((flags & HTTP_WRAPPER_HEADER_INIT) != 0);
113 0 : int redirected = ((flags & HTTP_WRAPPER_REDIRECTED) != 0);
114 0 : php_stream_filter *transfer_encoding = NULL;
115 :
116 0 : tmp_line[0] = '\0';
117 :
118 0 : if (redirect_max < 1) {
119 0 : php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "Redirection limit reached, aborting");
120 0 : return NULL;
121 : }
122 :
123 0 : resource = php_url_parse(path);
124 0 : if (resource == NULL) {
125 0 : return NULL;
126 : }
127 :
128 0 : if (strncasecmp(resource->scheme, "http", sizeof("http")) && strncasecmp(resource->scheme, "https", sizeof("https"))) {
129 0 : if (!context ||
130 : php_stream_context_get_option(context, wrapper->wops->label, "proxy", &tmpzval) == FAILURE ||
131 : Z_TYPE_PP(tmpzval) != IS_STRING ||
132 : Z_STRLEN_PP(tmpzval) <= 0) {
133 0 : php_url_free(resource);
134 0 : return php_stream_open_wrapper_ex(path, mode, ENFORCE_SAFE_MODE | REPORT_ERRORS, NULL, context);
135 : }
136 : /* Called from a non-http wrapper with http proxying requested (i.e. ftp) */
137 0 : request_fulluri = 1;
138 0 : use_ssl = 0;
139 0 : use_proxy = 1;
140 :
141 0 : transport_len = Z_STRLEN_PP(tmpzval);
142 0 : transport_string = estrndup(Z_STRVAL_PP(tmpzval), Z_STRLEN_PP(tmpzval));
143 : } else {
144 : /* Normal http request (possibly with proxy) */
145 :
146 0 : if (strpbrk(mode, "awx+")) {
147 0 : php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "HTTP wrapper does not support writeable connections");
148 0 : php_url_free(resource);
149 0 : return NULL;
150 : }
151 :
152 0 : use_ssl = resource->scheme && (strlen(resource->scheme) > 4) && resource->scheme[4] == 's';
153 : /* choose default ports */
154 0 : if (use_ssl && resource->port == 0)
155 0 : resource->port = 443;
156 0 : else if (resource->port == 0)
157 0 : resource->port = 80;
158 :
159 0 : if (context &&
160 : php_stream_context_get_option(context, wrapper->wops->label, "proxy", &tmpzval) == SUCCESS &&
161 : Z_TYPE_PP(tmpzval) == IS_STRING &&
162 : Z_STRLEN_PP(tmpzval) > 0) {
163 0 : use_proxy = 1;
164 0 : transport_len = Z_STRLEN_PP(tmpzval);
165 0 : transport_string = estrndup(Z_STRVAL_PP(tmpzval), Z_STRLEN_PP(tmpzval));
166 : } else {
167 0 : transport_len = spprintf(&transport_string, 0, "%s://%s:%d", use_ssl ? "ssl" : "tcp", resource->host, resource->port);
168 : }
169 : }
170 :
171 0 : if (context && php_stream_context_get_option(context, wrapper->wops->label, "timeout", &tmpzval) == SUCCESS) {
172 0 : SEPARATE_ZVAL(tmpzval);
173 0 : convert_to_double_ex(tmpzval);
174 0 : timeout.tv_sec = (time_t) Z_DVAL_PP(tmpzval);
175 0 : timeout.tv_usec = (size_t) ((Z_DVAL_PP(tmpzval) - timeout.tv_sec) * 1000000);
176 : } else {
177 0 : timeout.tv_sec = FG(default_socket_timeout);
178 0 : timeout.tv_usec = 0;
179 : }
180 :
181 0 : stream = php_stream_xport_create(transport_string, transport_len, options,
182 : STREAM_XPORT_CLIENT | STREAM_XPORT_CONNECT,
183 : NULL, &timeout, context, &errstr, NULL);
184 :
185 0 : if (stream) {
186 0 : php_stream_set_option(stream, PHP_STREAM_OPTION_READ_TIMEOUT, 0, &timeout);
187 : }
188 :
189 0 : if (errstr) {
190 0 : php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "%s", errstr);
191 0 : efree(errstr);
192 0 : errstr = NULL;
193 : }
194 :
195 0 : efree(transport_string);
196 :
197 0 : if (stream && use_proxy && use_ssl) {
198 0 : smart_str header = {0};
199 :
200 0 : smart_str_appendl(&header, "CONNECT ", sizeof("CONNECT ")-1);
201 0 : smart_str_appends(&header, resource->host);
202 0 : smart_str_appendc(&header, ':');
203 0 : smart_str_append_unsigned(&header, resource->port);
204 0 : smart_str_appendl(&header, " HTTP/1.0\r\n\r\n", sizeof(" HTTP/1.0\r\n\r\n")-1);
205 0 : if (php_stream_write(stream, header.c, header.len) != header.len) {
206 0 : php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "Cannot connect to HTTPS server through proxy");
207 0 : php_stream_close(stream);
208 0 : stream = NULL;
209 : }
210 0 : smart_str_free(&header);
211 :
212 0 : if (stream) {
213 : char header_line[HTTP_HEADER_BLOCK_SIZE];
214 :
215 : /* get response header */
216 0 : while (php_stream_gets(stream, header_line, HTTP_HEADER_BLOCK_SIZE-1) != NULL) {
217 0 : if (header_line[0] == '\n' ||
218 : header_line[0] == '\r' ||
219 : header_line[0] == '\0') {
220 : break;
221 : }
222 : }
223 : }
224 :
225 : /* enable SSL transport layer */
226 0 : if (stream) {
227 0 : if (php_stream_xport_crypto_setup(stream, STREAM_CRYPTO_METHOD_SSLv23_CLIENT, NULL TSRMLS_CC) < 0 ||
228 : php_stream_xport_crypto_enable(stream, 1 TSRMLS_CC) < 0) {
229 0 : php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "Cannot connect to HTTPS server through proxy");
230 0 : php_stream_close(stream);
231 0 : stream = NULL;
232 : }
233 : }
234 : }
235 :
236 0 : if (stream == NULL)
237 0 : goto out;
238 :
239 : /* avoid buffering issues while reading header */
240 0 : if (options & STREAM_WILL_CAST)
241 0 : chunk_size = php_stream_set_chunk_size(stream, 1);
242 :
243 : /* avoid problems with auto-detecting when reading the headers -> the headers
244 : * are always in canonical \r\n format */
245 0 : eol_detect = stream->flags & (PHP_STREAM_FLAG_DETECT_EOL | PHP_STREAM_FLAG_EOL_MAC);
246 0 : stream->flags &= ~(PHP_STREAM_FLAG_DETECT_EOL | PHP_STREAM_FLAG_EOL_MAC);
247 :
248 0 : php_stream_context_set(stream, context);
249 :
250 0 : php_stream_notify_info(context, PHP_STREAM_NOTIFY_CONNECT, NULL, 0);
251 :
252 0 : if (header_init && context && php_stream_context_get_option(context, "http", "max_redirects", &tmpzval) == SUCCESS) {
253 0 : SEPARATE_ZVAL(tmpzval);
254 0 : convert_to_long_ex(tmpzval);
255 0 : redirect_max = Z_LVAL_PP(tmpzval);
256 : }
257 :
258 0 : if (context && php_stream_context_get_option(context, "http", "method", &tmpzval) == SUCCESS) {
259 0 : if (Z_TYPE_PP(tmpzval) == IS_STRING && Z_STRLEN_PP(tmpzval) > 0) {
260 : /* As per the RFC, automatically redirected requests MUST NOT use other methods than
261 : * GET and HEAD unless it can be confirmed by the user */
262 0 : if (!redirected
263 : || (Z_STRLEN_PP(tmpzval) == 3 && memcmp("GET", Z_STRVAL_PP(tmpzval), 3) == 0)
264 : || (Z_STRLEN_PP(tmpzval) == 4 && memcmp("HEAD",Z_STRVAL_PP(tmpzval), 4) == 0)
265 : ) {
266 0 : scratch_len = strlen(path) + 29 + Z_STRLEN_PP(tmpzval);
267 0 : scratch = emalloc(scratch_len);
268 0 : strlcpy(scratch, Z_STRVAL_PP(tmpzval), Z_STRLEN_PP(tmpzval) + 1);
269 0 : strcat(scratch, " ");
270 : }
271 : }
272 : }
273 :
274 0 : if (context && php_stream_context_get_option(context, "http", "protocol_version", &tmpzval) == SUCCESS) {
275 0 : SEPARATE_ZVAL(tmpzval);
276 0 : convert_to_double_ex(tmpzval);
277 0 : protocol_version_len = spprintf(&protocol_version, 0, "%.1F", Z_DVAL_PP(tmpzval));
278 : }
279 :
280 0 : if (!scratch) {
281 0 : scratch_len = strlen(path) + 29 + protocol_version_len;
282 0 : scratch = emalloc(scratch_len);
283 0 : strcpy(scratch, "GET ");
284 : }
285 :
286 : /* Should we send the entire path in the request line, default to no. */
287 0 : if (!request_fulluri &&
288 : context &&
289 : php_stream_context_get_option(context, "http", "request_fulluri", &tmpzval) == SUCCESS) {
290 0 : zval tmp = **tmpzval;
291 :
292 0 : zval_copy_ctor(&tmp);
293 0 : convert_to_boolean(&tmp);
294 0 : request_fulluri = Z_BVAL(tmp) ? 1 : 0;
295 0 : zval_dtor(&tmp);
296 : }
297 :
298 0 : if (request_fulluri) {
299 : /* Ask for everything */
300 0 : strcat(scratch, path);
301 : } else {
302 : /* Send the traditional /path/to/file?query_string */
303 :
304 : /* file */
305 0 : if (resource->path && *resource->path) {
306 0 : strlcat(scratch, resource->path, scratch_len);
307 : } else {
308 0 : strlcat(scratch, "/", scratch_len);
309 : }
310 :
311 : /* query string */
312 0 : if (resource->query) {
313 0 : strlcat(scratch, "?", scratch_len);
314 0 : strlcat(scratch, resource->query, scratch_len);
315 : }
316 : }
317 :
318 : /* protocol version we are speaking */
319 0 : if (protocol_version) {
320 0 : strlcat(scratch, " HTTP/", scratch_len);
321 0 : strlcat(scratch, protocol_version, scratch_len);
322 0 : strlcat(scratch, "\r\n", scratch_len);
323 0 : efree(protocol_version);
324 0 : protocol_version = NULL;
325 : } else {
326 0 : strlcat(scratch, " HTTP/1.0\r\n", scratch_len);
327 : }
328 :
329 : /* send it */
330 0 : php_stream_write(stream, scratch, strlen(scratch));
331 :
332 0 : if (context && php_stream_context_get_option(context, "http", "header", &tmpzval) == SUCCESS) {
333 0 : tmp = NULL;
334 :
335 0 : if (Z_TYPE_PP(tmpzval) == IS_ARRAY) {
336 : HashPosition pos;
337 0 : zval **tmpheader = NULL;
338 0 : smart_str tmpstr = {0};
339 :
340 0 : for (zend_hash_internal_pointer_reset_ex(Z_ARRVAL_PP(tmpzval), &pos);
341 0 : SUCCESS == zend_hash_get_current_data_ex(Z_ARRVAL_PP(tmpzval), (void *)&tmpheader, &pos);
342 : zend_hash_move_forward_ex(Z_ARRVAL_PP(tmpzval), &pos)
343 0 : ) {
344 0 : if (Z_TYPE_PP(tmpheader) == IS_STRING) {
345 0 : smart_str_appendl(&tmpstr, Z_STRVAL_PP(tmpheader), Z_STRLEN_PP(tmpheader));
346 0 : smart_str_appendl(&tmpstr, "\r\n", sizeof("\r\n") - 1);
347 : }
348 : }
349 0 : smart_str_0(&tmpstr);
350 : /* Remove newlines and spaces from start and end. there's at least one extra \r\n at the end that needs to go. */
351 0 : if (tmpstr.c) {
352 0 : tmp = php_trim(tmpstr.c, strlen(tmpstr.c), NULL, 0, NULL, 3 TSRMLS_CC);
353 0 : smart_str_free(&tmpstr);
354 : }
355 : }
356 0 : if (Z_TYPE_PP(tmpzval) == IS_STRING && Z_STRLEN_PP(tmpzval)) {
357 : /* Remove newlines and spaces from start and end php_trim will estrndup() */
358 0 : tmp = php_trim(Z_STRVAL_PP(tmpzval), Z_STRLEN_PP(tmpzval), NULL, 0, NULL, 3 TSRMLS_CC);
359 : }
360 0 : if (tmp && strlen(tmp) > 0) {
361 0 : if (!header_init) { /* Remove post headers for redirects */
362 0 : int l = strlen(tmp);
363 0 : char *s, *s2, *tmp_c = estrdup(tmp);
364 :
365 0 : php_strtolower(tmp_c, l);
366 0 : if ((s = strstr(tmp_c, "content-length:"))) {
367 0 : if ((s2 = memchr(s, '\n', tmp_c + l - s))) {
368 0 : int b = tmp_c + l - 1 - s2;
369 0 : memmove(tmp, tmp + (s2 + 1 - tmp_c), b);
370 0 : memmove(tmp_c, s2 + 1, b);
371 :
372 : } else {
373 0 : tmp[s - tmp_c] = *s = '\0';
374 : }
375 0 : l = strlen(tmp_c);
376 : }
377 0 : if ((s = strstr(tmp_c, "content-type:"))) {
378 0 : if ((s2 = memchr(s, '\n', tmp_c + l - s))) {
379 0 : memmove(tmp, tmp + (s2 + 1 - tmp_c), tmp_c + l - 1 - s2);
380 : } else {
381 0 : tmp[s - tmp_c] = '\0';
382 : }
383 : }
384 0 : efree(tmp_c);
385 0 : tmp_c = php_trim(tmp, strlen(tmp), NULL, 0, NULL, 3 TSRMLS_CC);
386 0 : efree(tmp);
387 0 : tmp = tmp_c;
388 : }
389 :
390 0 : user_headers = estrdup(tmp);
391 :
392 : /* Make lowercase for easy comparison against 'standard' headers */
393 0 : php_strtolower(tmp, strlen(tmp));
394 0 : if (strstr(tmp, "user-agent:")) {
395 0 : have_header |= HTTP_HEADER_USER_AGENT;
396 : }
397 0 : if (strstr(tmp, "host:")) {
398 0 : have_header |= HTTP_HEADER_HOST;
399 : }
400 0 : if (strstr(tmp, "from:")) {
401 0 : have_header |= HTTP_HEADER_FROM;
402 : }
403 0 : if (strstr(tmp, "authorization:")) {
404 0 : have_header |= HTTP_HEADER_AUTH;
405 : }
406 0 : if (strstr(tmp, "content-length:")) {
407 0 : have_header |= HTTP_HEADER_CONTENT_LENGTH;
408 : }
409 0 : if (strstr(tmp, "content-type:")) {
410 0 : have_header |= HTTP_HEADER_TYPE;
411 : }
412 : }
413 0 : if (tmp) {
414 0 : efree(tmp);
415 : }
416 : }
417 :
418 : /* auth header if it was specified */
419 0 : if (((have_header & HTTP_HEADER_AUTH) == 0) && resource->user && resource->pass) {
420 : /* decode the strings first */
421 0 : php_url_decode(resource->user, strlen(resource->user));
422 0 : php_url_decode(resource->pass, strlen(resource->pass));
423 :
424 : /* scratch is large enough, since it was made large enough for the whole URL */
425 0 : strcpy(scratch, resource->user);
426 0 : strcat(scratch, ":");
427 0 : strcat(scratch, resource->pass);
428 :
429 0 : tmp = (char*)php_base64_encode((unsigned char*)scratch, strlen(scratch), NULL);
430 :
431 0 : if (snprintf(scratch, scratch_len, "Authorization: Basic %s\r\n", tmp) > 0) {
432 0 : php_stream_write(stream, scratch, strlen(scratch));
433 0 : php_stream_notify_info(context, PHP_STREAM_NOTIFY_AUTH_REQUIRED, NULL, 0);
434 : }
435 :
436 0 : efree(tmp);
437 0 : tmp = NULL;
438 : }
439 :
440 : /* if the user has configured who they are, send a From: line */
441 0 : if (((have_header & HTTP_HEADER_FROM) == 0) && cfg_get_string("from", &tmp) == SUCCESS) {
442 0 : if (snprintf(scratch, scratch_len, "From: %s\r\n", tmp) > 0)
443 0 : php_stream_write(stream, scratch, strlen(scratch));
444 : }
445 :
446 : /* Send Host: header so name-based virtual hosts work */
447 0 : if ((have_header & HTTP_HEADER_HOST) == 0) {
448 0 : if ((use_ssl && resource->port != 443 && resource->port != 0) ||
449 : (!use_ssl && resource->port != 80 && resource->port != 0)) {
450 0 : if (snprintf(scratch, scratch_len, "Host: %s:%i\r\n", resource->host, resource->port) > 0)
451 0 : php_stream_write(stream, scratch, strlen(scratch));
452 : } else {
453 0 : if (snprintf(scratch, scratch_len, "Host: %s\r\n", resource->host) > 0) {
454 0 : php_stream_write(stream, scratch, strlen(scratch));
455 : }
456 : }
457 : }
458 :
459 0 : if (context &&
460 : php_stream_context_get_option(context, "http", "user_agent", &ua_zval) == SUCCESS &&
461 : Z_TYPE_PP(ua_zval) == IS_STRING) {
462 0 : ua_str = Z_STRVAL_PP(ua_zval);
463 0 : } else if (FG(user_agent)) {
464 0 : ua_str = FG(user_agent);
465 : }
466 :
467 0 : if (((have_header & HTTP_HEADER_USER_AGENT) == 0) && ua_str) {
468 : #define _UA_HEADER "User-Agent: %s\r\n"
469 : char *ua;
470 : size_t ua_len;
471 :
472 0 : ua_len = sizeof(_UA_HEADER) + strlen(ua_str);
473 :
474 : /* ensure the header is only sent if user_agent is not blank */
475 0 : if (ua_len > sizeof(_UA_HEADER)) {
476 0 : ua = emalloc(ua_len + 1);
477 0 : if ((ua_len = slprintf(ua, ua_len, _UA_HEADER, ua_str)) > 0) {
478 0 : ua[ua_len] = 0;
479 0 : php_stream_write(stream, ua, ua_len);
480 : } else {
481 0 : php_error_docref(NULL TSRMLS_CC, E_WARNING, "Cannot construct User-agent header");
482 : }
483 :
484 0 : if (ua) {
485 0 : efree(ua);
486 : }
487 : }
488 : }
489 :
490 0 : if (user_headers) {
491 : /* A bit weird, but some servers require that Content-Length be sent prior to Content-Type for POST
492 : * see bug #44603 for details. Since Content-Type maybe part of user's headers we need to do this check first.
493 : */
494 0 : if (
495 : header_init &&
496 : context &&
497 : !(have_header & HTTP_HEADER_CONTENT_LENGTH) &&
498 : php_stream_context_get_option(context, "http", "content", &tmpzval) == SUCCESS &&
499 : Z_TYPE_PP(tmpzval) == IS_STRING && Z_STRLEN_PP(tmpzval) > 0
500 : ) {
501 0 : scratch_len = slprintf(scratch, scratch_len, "Content-Length: %d\r\n", Z_STRLEN_PP(tmpzval));
502 0 : php_stream_write(stream, scratch, scratch_len);
503 0 : have_header |= HTTP_HEADER_CONTENT_LENGTH;
504 : }
505 :
506 0 : php_stream_write(stream, user_headers, strlen(user_headers));
507 0 : php_stream_write(stream, "\r\n", sizeof("\r\n")-1);
508 0 : efree(user_headers);
509 : }
510 :
511 : /* Request content, such as for POST requests */
512 0 : if (header_init && context &&
513 : php_stream_context_get_option(context, "http", "content", &tmpzval) == SUCCESS &&
514 : Z_TYPE_PP(tmpzval) == IS_STRING && Z_STRLEN_PP(tmpzval) > 0) {
515 0 : if (!(have_header & HTTP_HEADER_CONTENT_LENGTH)) {
516 0 : scratch_len = slprintf(scratch, scratch_len, "Content-Length: %d\r\n", Z_STRLEN_PP(tmpzval));
517 0 : php_stream_write(stream, scratch, scratch_len);
518 : }
519 0 : if (!(have_header & HTTP_HEADER_TYPE)) {
520 0 : php_stream_write(stream, "Content-Type: application/x-www-form-urlencoded\r\n",
521 : sizeof("Content-Type: application/x-www-form-urlencoded\r\n") - 1);
522 0 : php_error_docref(NULL TSRMLS_CC, E_NOTICE, "Content-type not specified assuming application/x-www-form-urlencoded");
523 : }
524 0 : php_stream_write(stream, "\r\n", sizeof("\r\n")-1);
525 0 : php_stream_write(stream, Z_STRVAL_PP(tmpzval), Z_STRLEN_PP(tmpzval));
526 0 : php_stream_write(stream, "\r\n\r\n", sizeof("\r\n\r\n")-1);
527 : } else {
528 0 : php_stream_write(stream, "\r\n", sizeof("\r\n")-1);
529 : }
530 :
531 0 : location[0] = '\0';
532 :
533 0 : if (!EG(active_symbol_table)) {
534 0 : zend_rebuild_symbol_table(TSRMLS_C);
535 : }
536 :
537 0 : if (header_init) {
538 : zval *tmp;
539 0 : MAKE_STD_ZVAL(tmp);
540 0 : array_init(tmp);
541 0 : ZEND_SET_SYMBOL(EG(active_symbol_table), "http_response_header", tmp);
542 : }
543 :
544 : {
545 : zval **rh;
546 0 : zend_hash_find(EG(active_symbol_table), "http_response_header", sizeof("http_response_header"), (void **) &rh);
547 0 : response_header = *rh;
548 : }
549 :
550 0 : if (!php_stream_eof(stream)) {
551 : size_t tmp_line_len;
552 : /* get response header */
553 :
554 0 : if (php_stream_get_line(stream, tmp_line, sizeof(tmp_line) - 1, &tmp_line_len) != NULL) {
555 : zval *http_response;
556 : int response_code;
557 :
558 0 : if (tmp_line_len > 9) {
559 0 : response_code = atoi(tmp_line + 9);
560 : } else {
561 0 : response_code = 0;
562 : }
563 0 : if (context && SUCCESS==php_stream_context_get_option(context, "http", "ignore_errors", &tmpzval)) {
564 0 : ignore_errors = zend_is_true(*tmpzval);
565 : }
566 : /* when we request only the header, don't fail even on error codes */
567 0 : if ((options & STREAM_ONLY_GET_HEADERS) || ignore_errors) {
568 0 : reqok = 1;
569 : }
570 : /* all status codes in the 2xx range are defined by the specification as successful;
571 : * all status codes in the 3xx range are for redirection, and so also should never
572 : * fail */
573 0 : if (response_code >= 200 && response_code < 400) {
574 0 : reqok = 1;
575 : } else {
576 0 : switch(response_code) {
577 : case 403:
578 0 : php_stream_notify_error(context, PHP_STREAM_NOTIFY_AUTH_RESULT,
579 : tmp_line, response_code);
580 0 : break;
581 : default:
582 : /* safety net in the event tmp_line == NULL */
583 0 : if (!tmp_line_len) {
584 0 : tmp_line[0] = '\0';
585 : }
586 0 : php_stream_notify_error(context, PHP_STREAM_NOTIFY_FAILURE,
587 : tmp_line, response_code);
588 : }
589 : }
590 0 : if (tmp_line[tmp_line_len - 1] == '\n') {
591 0 : --tmp_line_len;
592 0 : if (tmp_line[tmp_line_len - 1] == '\r') {
593 0 : --tmp_line_len;
594 : }
595 : }
596 0 : MAKE_STD_ZVAL(http_response);
597 0 : ZVAL_STRINGL(http_response, tmp_line, tmp_line_len, 1);
598 0 : zend_hash_next_index_insert(Z_ARRVAL_P(response_header), &http_response, sizeof(zval *), NULL);
599 : }
600 : } else {
601 0 : php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "HTTP request failed, unexpected end of socket!");
602 0 : goto out;
603 : }
604 :
605 : /* read past HTTP headers */
606 :
607 0 : http_header_line = emalloc(HTTP_HEADER_BLOCK_SIZE);
608 :
609 0 : while (!body && !php_stream_eof(stream)) {
610 : size_t http_header_line_length;
611 0 : if (php_stream_get_line(stream, http_header_line, HTTP_HEADER_BLOCK_SIZE, &http_header_line_length) && *http_header_line != '\n' && *http_header_line != '\r') {
612 0 : char *e = http_header_line + http_header_line_length - 1;
613 0 : while (*e == '\n' || *e == '\r') {
614 0 : e--;
615 : }
616 0 : http_header_line_length = e - http_header_line + 1;
617 0 : http_header_line[http_header_line_length] = '\0';
618 :
619 0 : if (!strncasecmp(http_header_line, "Location: ", 10)) {
620 0 : strlcpy(location, http_header_line + 10, sizeof(location));
621 0 : } else if (!strncasecmp(http_header_line, "Content-Type: ", 14)) {
622 0 : php_stream_notify_info(context, PHP_STREAM_NOTIFY_MIME_TYPE_IS, http_header_line + 14, 0);
623 0 : } else if (!strncasecmp(http_header_line, "Content-Length: ", 16)) {
624 0 : file_size = atoi(http_header_line + 16);
625 0 : php_stream_notify_file_size(context, file_size, http_header_line, 0);
626 0 : } else if (!strncasecmp(http_header_line, "Transfer-Encoding: chunked", sizeof("Transfer-Encoding: chunked"))) {
627 :
628 : /* create filter to decode response body */
629 0 : if (!(options & STREAM_ONLY_GET_HEADERS)) {
630 0 : long decode = 1;
631 :
632 0 : if (context && php_stream_context_get_option(context, "http", "auto_decode", &tmpzval) == SUCCESS) {
633 0 : SEPARATE_ZVAL(tmpzval);
634 0 : convert_to_boolean(*tmpzval);
635 0 : decode = Z_LVAL_PP(tmpzval);
636 : }
637 0 : if (decode) {
638 0 : transfer_encoding = php_stream_filter_create("dechunk", NULL, php_stream_is_persistent(stream) TSRMLS_CC);
639 0 : if (transfer_encoding) {
640 : /* don't store transfer-encodeing header */
641 0 : continue;
642 : }
643 : }
644 : }
645 : }
646 :
647 0 : if (http_header_line[0] == '\0') {
648 0 : body = 1;
649 : } else {
650 : zval *http_header;
651 :
652 0 : MAKE_STD_ZVAL(http_header);
653 :
654 0 : ZVAL_STRINGL(http_header, http_header_line, http_header_line_length, 1);
655 :
656 0 : zend_hash_next_index_insert(Z_ARRVAL_P(response_header), &http_header, sizeof(zval *), NULL);
657 : }
658 : } else {
659 : break;
660 : }
661 : }
662 :
663 0 : if (!reqok || location[0] != '\0') {
664 0 : if (((options & STREAM_ONLY_GET_HEADERS) || ignore_errors) && redirect_max <= 1) {
665 0 : goto out;
666 : }
667 :
668 0 : if (location[0] != '\0')
669 0 : php_stream_notify_info(context, PHP_STREAM_NOTIFY_REDIRECTED, location, 0);
670 :
671 0 : if (context) { /* keep the context for the next try */
672 0 : zend_list_addref(context->rsrc_id);
673 : }
674 0 : php_stream_close(stream);
675 0 : stream = NULL;
676 :
677 0 : if (location[0] != '\0') {
678 :
679 : char new_path[HTTP_HEADER_BLOCK_SIZE];
680 : char loc_path[HTTP_HEADER_BLOCK_SIZE];
681 :
682 0 : *new_path='\0';
683 0 : if (strlen(location)<8 || (strncasecmp(location, "http://", sizeof("http://")-1) &&
684 : strncasecmp(location, "https://", sizeof("https://")-1) &&
685 : strncasecmp(location, "ftp://", sizeof("ftp://")-1) &&
686 : strncasecmp(location, "ftps://", sizeof("ftps://")-1)))
687 : {
688 0 : if (*location != '/') {
689 0 : if (*(location+1) != '\0' && resource->path) {
690 0 : char *s = strrchr(resource->path, '/');
691 0 : if (!s) {
692 0 : s = resource->path;
693 0 : if (!s[0]) {
694 0 : efree(s);
695 0 : s = resource->path = estrdup("/");
696 : } else {
697 0 : *s = '/';
698 : }
699 : }
700 0 : s[1] = '\0';
701 0 : if (resource->path && *(resource->path) == '/' && *(resource->path + 1) == '\0') {
702 0 : snprintf(loc_path, sizeof(loc_path) - 1, "%s%s", resource->path, location);
703 : } else {
704 0 : snprintf(loc_path, sizeof(loc_path) - 1, "%s/%s", resource->path, location);
705 : }
706 : } else {
707 0 : snprintf(loc_path, sizeof(loc_path) - 1, "/%s", location);
708 : }
709 : } else {
710 0 : strlcpy(loc_path, location, sizeof(loc_path));
711 : }
712 0 : if ((use_ssl && resource->port != 443) || (!use_ssl && resource->port != 80)) {
713 0 : snprintf(new_path, sizeof(new_path) - 1, "%s://%s:%d%s", resource->scheme, resource->host, resource->port, loc_path);
714 : } else {
715 0 : snprintf(new_path, sizeof(new_path) - 1, "%s://%s%s", resource->scheme, resource->host, loc_path);
716 : }
717 : } else {
718 0 : strlcpy(new_path, location, sizeof(new_path));
719 : }
720 :
721 0 : php_url_free(resource);
722 : /* check for invalid redirection URLs */
723 0 : if ((resource = php_url_parse(new_path)) == NULL) {
724 0 : php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "Invalid redirect URL! %s", new_path);
725 0 : goto out;
726 : }
727 :
728 : #define CHECK_FOR_CNTRL_CHARS(val) { \
729 : if (val) { \
730 : unsigned char *s, *e; \
731 : int l; \
732 : l = php_url_decode(val, strlen(val)); \
733 : s = (unsigned char*)val; e = s + l; \
734 : while (s < e) { \
735 : if (iscntrl(*s)) { \
736 : php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "Invalid redirect URL! %s", new_path); \
737 : goto out; \
738 : } \
739 : s++; \
740 : } \
741 : } \
742 : } \
743 : /* check for control characters in login, password & path */
744 0 : if (strncasecmp(new_path, "http://", sizeof("http://") - 1) || strncasecmp(new_path, "https://", sizeof("https://") - 1)) {
745 0 : CHECK_FOR_CNTRL_CHARS(resource->user)
746 0 : CHECK_FOR_CNTRL_CHARS(resource->pass)
747 0 : CHECK_FOR_CNTRL_CHARS(resource->path)
748 : }
749 0 : stream = php_stream_url_wrap_http_ex(wrapper, new_path, mode, options, opened_path, context, --redirect_max, HTTP_WRAPPER_REDIRECTED STREAMS_CC TSRMLS_CC);
750 : } else {
751 0 : php_stream_wrapper_log_error(wrapper, options TSRMLS_CC, "HTTP request failed! %s", tmp_line);
752 : }
753 : }
754 0 : out:
755 0 : if (protocol_version) {
756 0 : efree(protocol_version);
757 : }
758 :
759 0 : if (http_header_line) {
760 0 : efree(http_header_line);
761 : }
762 :
763 0 : if (scratch) {
764 0 : efree(scratch);
765 : }
766 :
767 0 : if (resource) {
768 0 : php_url_free(resource);
769 : }
770 :
771 0 : if (stream) {
772 0 : if (header_init) {
773 0 : zval_add_ref(&response_header);
774 0 : stream->wrapperdata = response_header;
775 : }
776 0 : php_stream_notify_progress_init(context, 0, file_size);
777 :
778 : /* Restore original chunk size now that we're done with headers */
779 0 : if (options & STREAM_WILL_CAST)
780 0 : php_stream_set_chunk_size(stream, chunk_size);
781 :
782 : /* restore the users auto-detect-line-endings setting */
783 0 : stream->flags |= eol_detect;
784 :
785 : /* as far as streams are concerned, we are now at the start of
786 : * the stream */
787 0 : stream->position = 0;
788 :
789 : /* restore mode */
790 0 : strlcpy(stream->mode, mode, sizeof(stream->mode));
791 :
792 0 : if (transfer_encoding) {
793 0 : php_stream_filter_append(&stream->readfilters, transfer_encoding);
794 : }
795 0 : } else if (transfer_encoding) {
796 0 : php_stream_filter_free(transfer_encoding TSRMLS_CC);
797 : }
798 :
799 0 : return stream;
800 : }
801 : /* }}} */
802 :
803 : php_stream *php_stream_url_wrap_http(php_stream_wrapper *wrapper, char *path, char *mode, int options, char **opened_path, php_stream_context *context STREAMS_DC TSRMLS_DC) /* {{{ */
804 0 : {
805 0 : return php_stream_url_wrap_http_ex(wrapper, path, mode, options, opened_path, context, PHP_URL_REDIRECT_MAX, HTTP_WRAPPER_HEADER_INIT STREAMS_CC TSRMLS_CC);
806 : }
807 : /* }}} */
808 :
809 : static int php_stream_http_stream_stat(php_stream_wrapper *wrapper, php_stream *stream, php_stream_statbuf *ssb TSRMLS_DC) /* {{{ */
810 0 : {
811 : /* one day, we could fill in the details based on Date: and Content-Length:
812 : * headers. For now, we return with a failure code to prevent the underlying
813 : * file's details from being used instead. */
814 0 : return -1;
815 : }
816 : /* }}} */
817 :
818 : static php_stream_wrapper_ops http_stream_wops = {
819 : php_stream_url_wrap_http,
820 : NULL, /* stream_close */
821 : php_stream_http_stream_stat,
822 : NULL, /* stat_url */
823 : NULL, /* opendir */
824 : "http",
825 : NULL, /* unlink */
826 : NULL, /* rename */
827 : NULL, /* mkdir */
828 : NULL /* rmdir */
829 : };
830 :
831 : PHPAPI php_stream_wrapper php_stream_http_wrapper = {
832 : &http_stream_wops,
833 : NULL,
834 : 1 /* is_url */
835 : };
836 :
837 : /*
838 : * Local variables:
839 : * tab-width: 4
840 : * c-basic-offset: 4
841 : * End:
842 : * vim600: sw=4 ts=4 fdm=marker
843 : * vim<600: sw=4 ts=4
844 : */
|
