summaryrefslogtreecommitdiff
path: root/ext/standard/http_fopen_wrapper.c
diff options
context:
space:
mode:
Diffstat (limited to 'ext/standard/http_fopen_wrapper.c')
-rw-r--r--ext/standard/http_fopen_wrapper.c255
1 files changed, 254 insertions, 1 deletions
diff --git a/ext/standard/http_fopen_wrapper.c b/ext/standard/http_fopen_wrapper.c
index 24e546bb60..41ee9d7d54 100644
--- a/ext/standard/http_fopen_wrapper.c
+++ b/ext/standard/http_fopen_wrapper.c
@@ -15,12 +15,14 @@
| Authors: Rasmus Lerdorf <rasmus@php.net> |
| Jim Winstead <jimw@php.net> |
| Hartmut Holzgraefe <hholzgra@php.net> |
+ | Wez Furlong <wez@thebrainroom.com> |
+----------------------------------------------------------------------+
*/
/* $Id$ */
#include "php.h"
#include "php_globals.h"
+#include "php_streams.h"
#include "php_network.h"
#include <stdio.h>
@@ -66,7 +68,256 @@
#include "php_fopen_wrappers.h"
-#define HTTP_HEADER_BLOCK_SIZE 128
+#define HTTP_HEADER_BLOCK_SIZE 1024
+
+#if HAVE_PHP_STREAM
+
+php_stream * php_stream_url_wrap_http(char * path, char * mode, int options, char ** opened_path TSRMLS_DC)
+{
+ php_stream * stream = NULL;
+ php_url * resource = NULL;
+ int use_ssl;
+ char * scratch = NULL;
+ char * tmp = NULL;
+ int scratch_len = 0;
+ int body = 0;
+ char location[HTTP_HEADER_BLOCK_SIZE];
+ zval * response_header = NULL;
+ int reqok = 0;
+ char * http_header_line = NULL;
+ char tmp_line[128];
+
+ resource = php_url_parse(path);
+ if (resource == NULL)
+ return NULL;
+
+ use_ssl = resource->scheme && resource->scheme[4] == 's';
+
+ /* choose default ports */
+ if (use_ssl && resource->port == 0)
+ resource->port = 443;
+ else if (resource->port == 0)
+ resource->port = 80;
+
+ stream = php_stream_sock_open_host(resource->host, resource->port, SOCK_STREAM, 0, 0);
+ if (stream == NULL)
+ goto out;
+
+#if HAVE_OPENSSL_EXT
+ if (use_ssl) {
+ if (php_stream_sock_ssl_activate(stream, 1) == FAILURE) {
+ if (options & REPORT_ERRORS) {
+ zend_error(E_WARNING, "Unable to activate SSL mode");
+ }
+ php_stream_close(stream);
+ stream = NULL;
+ goto out;
+ }
+ }
+#endif
+
+ scratch_len = strlen(path) + 32;
+ scratch = emalloc(scratch_len);
+
+ strcpy(scratch, "GET ");
+
+ /* file */
+ if (resource->path && *resource->path)
+ strlcat(scratch, resource->path, scratch_len);
+ else
+ strlcat(scratch, "/", scratch_len);
+
+ /* query string */
+ if (resource->query) {
+ strlcat(scratch, "?", scratch_len);
+ strlcat(scratch, resource->query, scratch_len);
+ }
+
+ /* protocol version we are speaking */
+ strlcat(scratch, " HTTP/1.0\r\n", scratch_len);
+
+ /* send it */
+ php_stream_write(stream, scratch, strlen(scratch));
+
+ /* authz header if it was specified */
+ if (resource->user && resource->pass) {
+ /* scratch is large enough, since it was made large enough for the whole URL */
+ strcpy(scratch, resource->user);
+ strcat(scratch, ":");
+ strcat(scratch, resource->pass);
+
+ tmp = php_base64_encode((unsigned char*)scratch, strlen(scratch), NULL);
+
+ if (snprintf(scratch, scratch_len, "Authorization: Basic %s\r\n", tmp) > 0)
+ php_stream_write(stream, scratch, strlen(scratch));
+
+ efree(tmp);
+ tmp = NULL;
+ }
+
+ /* if the user has configured who they are, send a From: line */
+ if (cfg_get_string("from", &tmp) == SUCCESS) {
+ if (snprintf(scratch, scratch_len, "From: %s\r\n", tmp) > 0)
+ php_stream_write(stream, scratch, strlen(scratch));
+ }
+
+ /* Send Host: header so name-based virtual hosts work */
+ if ((use_ssl && resource->port != 443) || (!use_ssl && resource->port != 80)) {
+ if (snprintf(scratch, scratch_len, "Host: %s:%i\r\n", resource->host, resource->port) > 0)
+ php_stream_write(stream, scratch, strlen(scratch));
+ }
+ else if (snprintf(scratch, scratch_len, "Host: %s\r\n", resource->host) > 0)
+ php_stream_write(stream, scratch, strlen(scratch));
+
+ php_stream_write_string(stream, "User-Agent: PHP/" PHP_VERSION "\r\n\r\n");
+
+ location[0] = '\0';
+
+ MAKE_STD_ZVAL(response_header);
+ array_init(response_header);
+
+ if (!php_stream_eof(stream)) {
+ /* get response header */
+
+ if (php_stream_gets(stream, tmp_line, sizeof(tmp_line)-1) != NULL) {
+ zval * http_response;
+
+ MAKE_STD_ZVAL(http_response);
+ if (strncmp(tmp_line + 8, " 200 ", 5) == 0)
+ reqok = 1;
+ Z_STRLEN_P(http_response) = strlen(tmp_line);
+ Z_STRVAL_P(http_response) = estrndup(tmp_line, Z_STRLEN_P(http_response));
+ if (Z_STRVAL_P(http_response)[Z_STRLEN_P(http_response)-1]=='\n') {
+ Z_STRVAL_P(http_response)[Z_STRLEN_P(http_response)-1]=0;
+ Z_STRLEN_P(http_response)--;
+ if (Z_STRVAL_P(http_response)[Z_STRLEN_P(http_response)-1]=='\r') {
+ Z_STRVAL_P(http_response)[Z_STRLEN_P(http_response)-1]=0;
+ Z_STRLEN_P(http_response)--;
+ }
+ }
+ Z_TYPE_P(http_response) = IS_STRING;
+ zend_hash_next_index_insert(Z_ARRVAL_P(response_header), &http_response, sizeof(zval *), NULL);
+ }
+ }
+
+ /* read past HTTP headers */
+
+ http_header_line = emalloc(HTTP_HEADER_BLOCK_SIZE);
+
+ while (!body && !php_stream_eof(stream)) {
+
+ if (php_stream_gets(stream, http_header_line, HTTP_HEADER_BLOCK_SIZE-1) != NULL) {
+ char * p;
+ int found_eol = 0;
+ int http_header_line_length;
+
+ http_header_line[HTTP_HEADER_BLOCK_SIZE-1] = '\0';
+ p = http_header_line;
+ while(*p) {
+ while(*p == '\n' || *p == '\r') {
+ *p = '\0';
+ p--;
+ found_eol = 1;
+ }
+ if (found_eol)
+ break;
+ p++;
+ }
+ http_header_line_length = p-http_header_line+1;
+
+ if (!strncasecmp(http_header_line, "Location: ", 10))
+ strlcpy(location, http_header_line + 10, sizeof(location));
+
+ if (http_header_line[0] == '\0')
+ body = 1;
+ else {
+ zval * http_header;
+
+ MAKE_STD_ZVAL(http_header);
+
+ ZVAL_STRINGL(http_header, http_header_line, http_header_line_length, 1);
+
+ zend_hash_next_index_insert(Z_ARRVAL_P(response_header), &http_header, sizeof(zval *), NULL);
+ }
+ }
+ else
+ break;
+ }
+
+ if (!reqok) {
+ php_stream_close(stream);
+ stream = NULL;
+
+ if (location[0] != '\0') {
+
+ zval *entry, **entryp;
+ char new_path[HTTP_HEADER_BLOCK_SIZE];
+
+ *new_path='\0';
+ if (strlen(location)<8 || (strncasecmp(location, "http://", 7) && strncasecmp(location, "https://", 8))) {
+ strcpy(new_path, resource->scheme);
+ strlcat(new_path, resource->host, sizeof(new_path));
+ if ((use_ssl && resource->port != 443) || (!use_ssl && resource->port != 80)) {
+ snprintf(new_path+strlen(new_path), sizeof(new_path)-strlen(new_path)-1, ":%d", resource->port);
+ }
+ if (*location != '/') {
+ php_dirname(resource->path, strlen(resource->path));
+ snprintf (new_path+strlen(new_path), sizeof(new_path)-strlen(new_path)-1, "%s/", resource->path);
+ }
+ strlcat(new_path, location, sizeof(new_path));
+ }
+ else {
+ strlcpy(new_path, location, sizeof(new_path));
+ }
+ stream = php_stream_url_wrap_http(new_path, mode, options, opened_path TSRMLS_CC);
+ if (stream->wrapperdata) {
+ entryp = &entry;
+ MAKE_STD_ZVAL(entry);
+ ZVAL_EMPTY_STRING(entry);
+ zend_hash_next_index_insert(Z_ARRVAL_P(response_header), entryp, sizeof(zval *), NULL);
+ zend_hash_internal_pointer_reset(Z_ARRVAL_P(stream->wrapperdata));
+ while (zend_hash_get_current_data(Z_ARRVAL_P(stream->wrapperdata), (void **)&entryp) == SUCCESS) {
+ zval_add_ref(entryp);
+ zend_hash_next_index_insert(Z_ARRVAL_P(response_header), entryp, sizeof(zval *), NULL);
+ zend_hash_move_forward(Z_ARRVAL_P(stream->wrapperdata));
+ }
+ zval_dtor(stream->wrapperdata);
+ FREE_ZVAL(stream->wrapperdata);
+ }
+ }
+ else if (options & REPORT_ERRORS)
+ zend_error(E_WARNING, "HTTP request failed! %s", tmp_line);
+ }
+out:
+ if (http_header_line)
+ efree(http_header_line);
+ if (scratch)
+ efree(scratch);
+ php_url_free(resource);
+
+ if (stream)
+ stream->wrapperdata = response_header;
+
+ if (response_header) {
+ zval * sym;
+ MAKE_STD_ZVAL(sym);
+ *sym = *response_header;
+ zval_copy_ctor(sym);
+ ZEND_SET_SYMBOL(EG(active_symbol_table), "http_response_header", sym);
+ }
+
+
+ return stream;
+}
+
+php_stream_wrapper php_stream_http_wrapper = {
+ php_stream_url_wrap_http,
+ NULL
+};
+
+#else
+
+
/* {{{ php_fopen_url_wrap_http
*/
@@ -322,6 +573,8 @@ FILE *php_fopen_url_wrap_http(const char *path, char *mode, int options, int *is
}
/* }}} */
+#endif
+
/*
* Local variables:
* tab-width: 4
View Lorry Controller Status