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