/sapi/cli/php_cli_server.c
C | 2733 lines | 2361 code | 296 blank | 76 comment | 488 complexity | c3cbe5ceef94d383ec232d7395263716 MD5 | raw file
Possible License(s): BSD-2-Clause, BSD-3-Clause, MPL-2.0-no-copyleft-exception, LGPL-2.1
Large files files are truncated, but you can click here to view the full file
- /*
- +----------------------------------------------------------------------+
- | Copyright (c) The PHP Group |
- +----------------------------------------------------------------------+
- | This source file is subject to version 3.01 of the PHP license, |
- | that is bundled with this package in the file LICENSE, and is |
- | available through the world-wide-web at the following url: |
- | http://www.php.net/license/3_01.txt |
- | If you did not receive a copy of the PHP license and are unable to |
- | obtain it through the world-wide-web, please send a note to |
- | license@php.net so we can mail you a copy immediately. |
- +----------------------------------------------------------------------+
- | Author: Moriyoshi Koizumi <moriyoshi@php.net> |
- | Xinchen Hui <laruence@php.net> |
- +----------------------------------------------------------------------+
- */
- #include <stdio.h>
- #include <stdlib.h>
- #include <fcntl.h>
- #include <assert.h>
- #ifdef PHP_WIN32
- # include <process.h>
- # include <io.h>
- # include "win32/time.h"
- # include "win32/signal.h"
- # include "win32/php_registry.h"
- # include <sys/timeb.h>
- #else
- # include "php_config.h"
- #endif
- #ifdef __riscos__
- #include <unixlib/local.h>
- #endif
- #if HAVE_SYS_TIME_H
- #include <sys/time.h>
- #endif
- #if HAVE_UNISTD_H
- #include <unistd.h>
- #endif
- #include <signal.h>
- #include <locale.h>
- #if HAVE_DLFCN_H
- #include <dlfcn.h>
- #endif
- #include "SAPI.h"
- #include "php.h"
- #include "php_ini.h"
- #include "php_main.h"
- #include "php_globals.h"
- #include "php_variables.h"
- #include "zend_hash.h"
- #include "zend_modules.h"
- #include "fopen_wrappers.h"
- #include "http_status_codes.h"
- #include "zend_compile.h"
- #include "zend_execute.h"
- #include "zend_highlight.h"
- #include "zend_exceptions.h"
- #include "php_getopt.h"
- #ifndef PHP_WIN32
- # define php_select(m, r, w, e, t) select(m, r, w, e, t)
- # define SOCK_EINVAL EINVAL
- # define SOCK_EAGAIN EAGAIN
- # define SOCK_EINTR EINTR
- # define SOCK_EADDRINUSE EADDRINUSE
- #else
- # include "win32/select.h"
- # define SOCK_EINVAL WSAEINVAL
- # define SOCK_EAGAIN WSAEWOULDBLOCK
- # define SOCK_EINTR WSAEINTR
- # define SOCK_EADDRINUSE WSAEADDRINUSE
- #endif
- #include "ext/standard/file.h" /* for php_set_sock_blocking() :-( */
- #include "zend_smart_str.h"
- #include "ext/standard/html.h"
- #include "ext/standard/url.h" /* for php_raw_url_decode() */
- #include "ext/standard/php_string.h" /* for php_dirname() */
- #include "ext/date/php_date.h" /* for php_format_date() */
- #include "php_network.h"
- #include "php_http_parser.h"
- #include "php_cli_server.h"
- #include "mime_type_map.h"
- #include "php_cli_process_title.h"
- #define OUTPUT_NOT_CHECKED -1
- #define OUTPUT_IS_TTY 1
- #define OUTPUT_NOT_TTY 0
- #if HAVE_FORK
- # include <sys/wait.h>
- static pid_t php_cli_server_master;
- static pid_t *php_cli_server_workers;
- static zend_long php_cli_server_workers_max;
- #endif
- typedef struct php_cli_server_poller {
- fd_set rfds, wfds;
- struct {
- fd_set rfds, wfds;
- } active;
- php_socket_t max_fd;
- } php_cli_server_poller;
- typedef struct php_cli_server_request {
- enum php_http_method request_method;
- int protocol_version;
- char *request_uri;
- size_t request_uri_len;
- char *vpath;
- size_t vpath_len;
- char *path_translated;
- size_t path_translated_len;
- char *path_info;
- size_t path_info_len;
- char *query_string;
- size_t query_string_len;
- HashTable headers;
- HashTable headers_original_case;
- char *content;
- size_t content_len;
- const char *ext;
- size_t ext_len;
- zend_stat_t sb;
- } php_cli_server_request;
- typedef struct php_cli_server_chunk {
- struct php_cli_server_chunk *next;
- enum php_cli_server_chunk_type {
- PHP_CLI_SERVER_CHUNK_HEAP,
- PHP_CLI_SERVER_CHUNK_IMMORTAL
- } type;
- union {
- struct { void *block; char *p; size_t len; } heap;
- struct { const char *p; size_t len; } immortal;
- } data;
- } php_cli_server_chunk;
- typedef struct php_cli_server_buffer {
- php_cli_server_chunk *first;
- php_cli_server_chunk *last;
- } php_cli_server_buffer;
- typedef struct php_cli_server_content_sender {
- php_cli_server_buffer buffer;
- } php_cli_server_content_sender;
- typedef struct php_cli_server_client {
- struct php_cli_server *server;
- php_socket_t sock;
- struct sockaddr *addr;
- socklen_t addr_len;
- char *addr_str;
- size_t addr_str_len;
- php_http_parser parser;
- unsigned int request_read:1;
- char *current_header_name;
- size_t current_header_name_len;
- unsigned int current_header_name_allocated:1;
- char *current_header_value;
- size_t current_header_value_len;
- enum { HEADER_NONE=0, HEADER_FIELD, HEADER_VALUE } last_header_element;
- size_t post_read_offset;
- php_cli_server_request request;
- unsigned int content_sender_initialized:1;
- php_cli_server_content_sender content_sender;
- int file_fd;
- } php_cli_server_client;
- typedef struct php_cli_server {
- php_socket_t server_sock;
- php_cli_server_poller poller;
- int is_running;
- char *host;
- int port;
- int address_family;
- char *document_root;
- size_t document_root_len;
- char *router;
- size_t router_len;
- socklen_t socklen;
- HashTable clients;
- HashTable extension_mime_types;
- } php_cli_server;
- typedef struct php_cli_server_http_response_status_code_pair {
- int code;
- const char *str;
- } php_cli_server_http_response_status_code_pair;
- static php_cli_server_http_response_status_code_pair template_map[] = {
- { 400, "<h1>%s</h1><p>Your browser sent a request that this server could not understand.</p>" },
- { 404, "<h1>%s</h1><p>The requested resource <code class=\"url\">%s</code> was not found on this server.</p>" },
- { 500, "<h1>%s</h1><p>The server is temporarily unavailable.</p>" },
- { 501, "<h1>%s</h1><p>Request method not supported.</p>" }
- };
- #define PHP_CLI_SERVER_LOG_PROCESS 1
- #define PHP_CLI_SERVER_LOG_ERROR 2
- #define PHP_CLI_SERVER_LOG_MESSAGE 3
- static int php_cli_server_log_level = 3;
- #if HAVE_UNISTD_H
- static int php_cli_output_is_tty = OUTPUT_NOT_CHECKED;
- #endif
- static const char php_cli_server_request_error_unexpected_eof[] = "Unexpected EOF";
- static size_t php_cli_server_client_send_through(php_cli_server_client *client, const char *str, size_t str_len);
- static php_cli_server_chunk *php_cli_server_chunk_heap_new_self_contained(size_t len);
- static void php_cli_server_buffer_append(php_cli_server_buffer *buffer, php_cli_server_chunk *chunk);
- static void php_cli_server_logf(int type, const char *format, ...);
- static void php_cli_server_log_response(php_cli_server_client *client, int status, const char *message);
- ZEND_DECLARE_MODULE_GLOBALS(cli_server)
- /* {{{ static char php_cli_server_css[]
- * copied from ext/standard/info.c
- */
- static const char php_cli_server_css[] = "<style>\n" \
- "body { background-color: #fcfcfc; color: #333333; margin: 0; padding:0; }\n" \
- "h1 { font-size: 1.5em; font-weight: normal; background-color: #9999cc; min-height:2em; line-height:2em; border-bottom: 1px inset black; margin: 0; }\n" \
- "h1, p { padding-left: 10px; }\n" \
- "code.url { background-color: #eeeeee; font-family:monospace; padding:0 2px;}\n" \
- "</style>\n";
- /* }}} */
- #ifdef PHP_WIN32
- int php_cli_server_get_system_time(char *buf) {
- struct _timeb system_time;
- errno_t err;
- if (buf == NULL) {
- return -1;
- }
- _ftime(&system_time);
- err = ctime_s(buf, 52, &(system_time.time) );
- if (err) {
- return -1;
- }
- return 0;
- }
- #else
- int php_cli_server_get_system_time(char *buf) {
- struct timeval tv;
- struct tm tm;
- gettimeofday(&tv, NULL);
- /* TODO: should be checked for NULL tm/return value */
- php_localtime_r(&tv.tv_sec, &tm);
- php_asctime_r(&tm, buf);
- return 0;
- }
- #endif
- static void char_ptr_dtor_p(zval *zv) /* {{{ */
- {
- pefree(Z_PTR_P(zv), 1);
- } /* }}} */
- static char *get_last_error() /* {{{ */
- {
- return pestrdup(strerror(errno), 1);
- } /* }}} */
- static int status_comp(const void *a, const void *b) /* {{{ */
- {
- const http_response_status_code_pair *pa = (const http_response_status_code_pair *) a;
- const http_response_status_code_pair *pb = (const http_response_status_code_pair *) b;
- if (pa->code < pb->code) {
- return -1;
- } else if (pa->code > pb->code) {
- return 1;
- }
- return 0;
- } /* }}} */
- static const char *get_status_string(int code) /* {{{ */
- {
- http_response_status_code_pair needle = {code, NULL},
- *result = NULL;
- result = bsearch(&needle, http_status_map, http_status_map_len, sizeof(needle), status_comp);
- if (result) {
- return result->str;
- }
- /* Returning NULL would require complicating append_http_status_line() to
- * not segfault in that case, so let's just return a placeholder, since RFC
- * 2616 requires a reason phrase. This is basically what a lot of other Web
- * servers do in this case anyway. */
- return "Unknown Status Code";
- } /* }}} */
- static const char *get_template_string(int code) /* {{{ */
- {
- size_t e = (sizeof(template_map) / sizeof(php_cli_server_http_response_status_code_pair));
- size_t s = 0;
- while (e != s) {
- size_t c = MIN((e + s + 1) / 2, e - 1);
- int d = template_map[c].code;
- if (d > code) {
- e = c;
- } else if (d < code) {
- s = c;
- } else {
- return template_map[c].str;
- }
- }
- return NULL;
- } /* }}} */
- static void append_http_status_line(smart_str *buffer, int protocol_version, int response_code, int persistent) /* {{{ */
- {
- if (!response_code) {
- response_code = 200;
- }
- smart_str_appendl_ex(buffer, "HTTP", 4, persistent);
- smart_str_appendc_ex(buffer, '/', persistent);
- smart_str_append_long_ex(buffer, protocol_version / 100, persistent);
- smart_str_appendc_ex(buffer, '.', persistent);
- smart_str_append_long_ex(buffer, protocol_version % 100, persistent);
- smart_str_appendc_ex(buffer, ' ', persistent);
- smart_str_append_long_ex(buffer, response_code, persistent);
- smart_str_appendc_ex(buffer, ' ', persistent);
- smart_str_appends_ex(buffer, get_status_string(response_code), persistent);
- smart_str_appendl_ex(buffer, "\r\n", 2, persistent);
- } /* }}} */
- static void append_essential_headers(smart_str* buffer, php_cli_server_client *client, int persistent) /* {{{ */
- {
- char *val;
- struct timeval tv = {0};
- if (NULL != (val = zend_hash_str_find_ptr(&client->request.headers, "host", sizeof("host")-1))) {
- smart_str_appends_ex(buffer, "Host: ", persistent);
- smart_str_appends_ex(buffer, val, persistent);
- smart_str_appends_ex(buffer, "\r\n", persistent);
- }
- if (!gettimeofday(&tv, NULL)) {
- zend_string *dt = php_format_date("D, d M Y H:i:s", sizeof("D, d M Y H:i:s") - 1, tv.tv_sec, 0);
- smart_str_appends_ex(buffer, "Date: ", persistent);
- smart_str_appends_ex(buffer, dt->val, persistent);
- smart_str_appends_ex(buffer, " GMT\r\n", persistent);
- zend_string_release_ex(dt, 0);
- }
- smart_str_appendl_ex(buffer, "Connection: close\r\n", sizeof("Connection: close\r\n") - 1, persistent);
- } /* }}} */
- static const char *get_mime_type(const php_cli_server *server, const char *ext, size_t ext_len) /* {{{ */
- {
- return (const char*)zend_hash_str_find_ptr(&server->extension_mime_types, ext, ext_len);
- } /* }}} */
- PHP_FUNCTION(apache_request_headers) /* {{{ */
- {
- php_cli_server_client *client;
- HashTable *headers;
- zend_string *key;
- char *value;
- zval tmp;
- if (zend_parse_parameters_none() == FAILURE) {
- RETURN_THROWS();
- }
- client = SG(server_context);
- headers = &client->request.headers_original_case;
- array_init_size(return_value, zend_hash_num_elements(headers));
- ZEND_HASH_FOREACH_STR_KEY_PTR(headers, key, value) {
- ZVAL_STRING(&tmp, value);
- zend_symtable_update(Z_ARRVAL_P(return_value), key, &tmp);
- } ZEND_HASH_FOREACH_END();
- }
- /* }}} */
- static void add_response_header(sapi_header_struct *h, zval *return_value) /* {{{ */
- {
- char *s, *p;
- ptrdiff_t len;
- ALLOCA_FLAG(use_heap)
- if (h->header_len > 0) {
- p = strchr(h->header, ':');
- len = p - h->header;
- if (p && (len > 0)) {
- while (len > 0 && (h->header[len-1] == ' ' || h->header[len-1] == '\t')) {
- len--;
- }
- if (len) {
- s = do_alloca(len + 1, use_heap);
- memcpy(s, h->header, len);
- s[len] = 0;
- do {
- p++;
- } while (*p == ' ' || *p == '\t');
- add_assoc_stringl_ex(return_value, s, (uint32_t)len, p, h->header_len - (p - h->header));
- free_alloca(s, use_heap);
- }
- }
- }
- }
- /* }}} */
- PHP_FUNCTION(apache_response_headers) /* {{{ */
- {
- if (zend_parse_parameters_none() == FAILURE) {
- RETURN_THROWS();
- }
- array_init(return_value);
- zend_llist_apply_with_argument(&SG(sapi_headers).headers, (llist_apply_with_arg_func_t)add_response_header, return_value);
- }
- /* }}} */
- /* {{{ cli_server module
- */
- static void cli_server_init_globals(zend_cli_server_globals *cg)
- {
- cg->color = 0;
- }
- PHP_INI_BEGIN()
- STD_PHP_INI_BOOLEAN("cli_server.color", "0", PHP_INI_ALL, OnUpdateBool, color, zend_cli_server_globals, cli_server_globals)
- PHP_INI_END()
- static PHP_MINIT_FUNCTION(cli_server)
- {
- ZEND_INIT_MODULE_GLOBALS(cli_server, cli_server_init_globals, NULL);
- REGISTER_INI_ENTRIES();
- return SUCCESS;
- }
- static PHP_MSHUTDOWN_FUNCTION(cli_server)
- {
- UNREGISTER_INI_ENTRIES();
- return SUCCESS;
- }
- static PHP_MINFO_FUNCTION(cli_server)
- {
- DISPLAY_INI_ENTRIES();
- }
- zend_module_entry cli_server_module_entry = {
- STANDARD_MODULE_HEADER,
- "cli_server",
- NULL,
- PHP_MINIT(cli_server),
- PHP_MSHUTDOWN(cli_server),
- NULL,
- NULL,
- PHP_MINFO(cli_server),
- PHP_VERSION,
- STANDARD_MODULE_PROPERTIES
- };
- /* }}} */
- ZEND_BEGIN_ARG_INFO(arginfo_no_args, 0)
- ZEND_END_ARG_INFO()
- const zend_function_entry server_additional_functions[] = {
- PHP_FE(cli_set_process_title, arginfo_cli_set_process_title)
- PHP_FE(cli_get_process_title, arginfo_cli_get_process_title)
- PHP_FE(apache_request_headers, arginfo_no_args)
- PHP_FE(apache_response_headers, arginfo_no_args)
- PHP_FALIAS(getallheaders, apache_request_headers, arginfo_no_args)
- PHP_FE_END
- };
- static int sapi_cli_server_startup(sapi_module_struct *sapi_module) /* {{{ */
- {
- char *workers;
- if (php_module_startup(sapi_module, &cli_server_module_entry, 1) == FAILURE) {
- return FAILURE;
- }
- if ((workers = getenv("PHP_CLI_SERVER_WORKERS"))) {
- #ifndef SO_REUSEPORT
- fprintf(stderr, "platform does not support SO_REUSEPORT, cannot create workers\n");
- #elif HAVE_FORK
- ZEND_ATOL(php_cli_server_workers_max, workers);
- if (php_cli_server_workers_max > 1) {
- zend_long php_cli_server_worker;
- php_cli_server_workers = calloc(
- php_cli_server_workers_max, sizeof(pid_t));
- if (!php_cli_server_workers) {
- php_cli_server_workers_max = 1;
- return SUCCESS;
- }
- php_cli_server_master = getpid();
- for (php_cli_server_worker = 0;
- php_cli_server_worker < php_cli_server_workers_max;
- php_cli_server_worker++) {
- pid_t pid = fork();
- if (pid == FAILURE) {
- /* no more forks allowed, work with what we have ... */
- php_cli_server_workers_max =
- php_cli_server_worker + 1;
- return SUCCESS;
- } else if (pid == SUCCESS) {
- return SUCCESS;
- } else {
- php_cli_server_workers[
- php_cli_server_worker
- ] = pid;
- }
- }
- } else {
- fprintf(stderr, "number of workers must be larger than 1\n");
- }
- #else
- fprintf(stderr, "forking is not supported on this platform\n");
- #endif
- }
- return SUCCESS;
- } /* }}} */
- static size_t sapi_cli_server_ub_write(const char *str, size_t str_length) /* {{{ */
- {
- php_cli_server_client *client = SG(server_context);
- if (!client) {
- return 0;
- }
- return php_cli_server_client_send_through(client, str, str_length);
- } /* }}} */
- static void sapi_cli_server_flush(void *server_context) /* {{{ */
- {
- php_cli_server_client *client = server_context;
- if (!client) {
- return;
- }
- if (!ZEND_VALID_SOCKET(client->sock)) {
- php_handle_aborted_connection();
- return;
- }
- if (!SG(headers_sent)) {
- sapi_send_headers();
- SG(headers_sent) = 1;
- }
- } /* }}} */
- static int sapi_cli_server_discard_headers(sapi_headers_struct *sapi_headers) /* {{{ */{
- return SAPI_HEADER_SENT_SUCCESSFULLY;
- }
- /* }}} */
- static int sapi_cli_server_send_headers(sapi_headers_struct *sapi_headers) /* {{{ */
- {
- php_cli_server_client *client = SG(server_context);
- smart_str buffer = { 0 };
- sapi_header_struct *h;
- zend_llist_position pos;
- if (client == NULL || SG(request_info).no_headers) {
- return SAPI_HEADER_SENT_SUCCESSFULLY;
- }
- if (SG(sapi_headers).http_status_line) {
- smart_str_appends(&buffer, SG(sapi_headers).http_status_line);
- smart_str_appendl(&buffer, "\r\n", 2);
- } else {
- append_http_status_line(&buffer, client->request.protocol_version, SG(sapi_headers).http_response_code, 0);
- }
- append_essential_headers(&buffer, client, 0);
- h = (sapi_header_struct*)zend_llist_get_first_ex(&sapi_headers->headers, &pos);
- while (h) {
- if (h->header_len) {
- smart_str_appendl(&buffer, h->header, h->header_len);
- smart_str_appendl(&buffer, "\r\n", 2);
- }
- h = (sapi_header_struct*)zend_llist_get_next_ex(&sapi_headers->headers, &pos);
- }
- smart_str_appendl(&buffer, "\r\n", 2);
- php_cli_server_client_send_through(client, ZSTR_VAL(buffer.s), ZSTR_LEN(buffer.s));
- smart_str_free(&buffer);
- return SAPI_HEADER_SENT_SUCCESSFULLY;
- }
- /* }}} */
- static char *sapi_cli_server_read_cookies(void) /* {{{ */
- {
- php_cli_server_client *client = SG(server_context);
- char *val;
- if (NULL == (val = zend_hash_str_find_ptr(&client->request.headers, "cookie", sizeof("cookie")-1))) {
- return NULL;
- }
- return val;
- } /* }}} */
- static size_t sapi_cli_server_read_post(char *buf, size_t count_bytes) /* {{{ */
- {
- php_cli_server_client *client = SG(server_context);
- if (client->request.content) {
- size_t content_len = client->request.content_len;
- size_t nbytes_copied = MIN(client->post_read_offset + count_bytes, content_len) - client->post_read_offset;
- memmove(buf, client->request.content + client->post_read_offset, nbytes_copied);
- client->post_read_offset += nbytes_copied;
- return nbytes_copied;
- }
- return 0;
- } /* }}} */
- static void sapi_cli_server_register_variable(zval *track_vars_array, const char *key, const char *val) /* {{{ */
- {
- char *new_val = (char *)val;
- size_t new_val_len;
- if (NULL == val) {
- return;
- }
- if (sapi_module.input_filter(PARSE_SERVER, (char*)key, &new_val, strlen(val), &new_val_len)) {
- php_register_variable_safe((char *)key, new_val, new_val_len, track_vars_array);
- }
- } /* }}} */
- static int sapi_cli_server_register_entry_cb(char **entry, int num_args, va_list args, zend_hash_key *hash_key) /* {{{ */ {
- zval *track_vars_array = va_arg(args, zval *);
- if (hash_key->key) {
- char *real_key, *key;
- uint32_t i;
- key = estrndup(ZSTR_VAL(hash_key->key), ZSTR_LEN(hash_key->key));
- for(i=0; i<ZSTR_LEN(hash_key->key); i++) {
- if (key[i] == '-') {
- key[i] = '_';
- } else {
- key[i] = toupper(key[i]);
- }
- }
- spprintf(&real_key, 0, "%s_%s", "HTTP", key);
- if (strcmp(key, "CONTENT_TYPE") == 0 || strcmp(key, "CONTENT_LENGTH") == 0) {
- sapi_cli_server_register_variable(track_vars_array, key, *entry);
- }
- sapi_cli_server_register_variable(track_vars_array, real_key, *entry);
- efree(key);
- efree(real_key);
- }
- return ZEND_HASH_APPLY_KEEP;
- }
- /* }}} */
- static void sapi_cli_server_register_variables(zval *track_vars_array) /* {{{ */
- {
- php_cli_server_client *client = SG(server_context);
- sapi_cli_server_register_variable(track_vars_array, "DOCUMENT_ROOT", client->server->document_root);
- {
- char *tmp;
- if ((tmp = strrchr(client->addr_str, ':'))) {
- char addr[64], port[8];
- const char *addr_start = client->addr_str, *addr_end = tmp;
- if (addr_start[0] == '[') addr_start++;
- if (addr_end[-1] == ']') addr_end--;
- strncpy(port, tmp + 1, 8);
- port[7] = '\0';
- strncpy(addr, addr_start, addr_end - addr_start);
- addr[addr_end - addr_start] = '\0';
- sapi_cli_server_register_variable(track_vars_array, "REMOTE_ADDR", addr);
- sapi_cli_server_register_variable(track_vars_array, "REMOTE_PORT", port);
- } else {
- sapi_cli_server_register_variable(track_vars_array, "REMOTE_ADDR", client->addr_str);
- }
- }
- {
- char *tmp;
- spprintf(&tmp, 0, "PHP %s Development Server", PHP_VERSION);
- sapi_cli_server_register_variable(track_vars_array, "SERVER_SOFTWARE", tmp);
- efree(tmp);
- }
- {
- char *tmp;
- spprintf(&tmp, 0, "HTTP/%d.%d", client->request.protocol_version / 100, client->request.protocol_version % 100);
- sapi_cli_server_register_variable(track_vars_array, "SERVER_PROTOCOL", tmp);
- efree(tmp);
- }
- sapi_cli_server_register_variable(track_vars_array, "SERVER_NAME", client->server->host);
- {
- char *tmp;
- spprintf(&tmp, 0, "%i", client->server->port);
- sapi_cli_server_register_variable(track_vars_array, "SERVER_PORT", tmp);
- efree(tmp);
- }
- sapi_cli_server_register_variable(track_vars_array, "REQUEST_URI", client->request.request_uri);
- sapi_cli_server_register_variable(track_vars_array, "REQUEST_METHOD", SG(request_info).request_method);
- sapi_cli_server_register_variable(track_vars_array, "SCRIPT_NAME", client->request.vpath);
- if (SG(request_info).path_translated) {
- sapi_cli_server_register_variable(track_vars_array, "SCRIPT_FILENAME", SG(request_info).path_translated);
- } else if (client->server->router) {
- sapi_cli_server_register_variable(track_vars_array, "SCRIPT_FILENAME", client->server->router);
- }
- if (client->request.path_info) {
- sapi_cli_server_register_variable(track_vars_array, "PATH_INFO", client->request.path_info);
- }
- if (client->request.path_info_len) {
- char *tmp;
- spprintf(&tmp, 0, "%s%s", client->request.vpath, client->request.path_info);
- sapi_cli_server_register_variable(track_vars_array, "PHP_SELF", tmp);
- efree(tmp);
- } else {
- sapi_cli_server_register_variable(track_vars_array, "PHP_SELF", client->request.vpath);
- }
- if (client->request.query_string) {
- sapi_cli_server_register_variable(track_vars_array, "QUERY_STRING", client->request.query_string);
- }
- zend_hash_apply_with_arguments(&client->request.headers, (apply_func_args_t)sapi_cli_server_register_entry_cb, 1, track_vars_array);
- } /* }}} */
- static void sapi_cli_server_log_write(int type, char *msg) /* {{{ */
- {
- char buf[52];
- if (php_cli_server_log_level < type) {
- return;
- }
- if (php_cli_server_get_system_time(buf) != 0) {
- memmove(buf, "unknown time, can't be fetched", sizeof("unknown time, can't be fetched"));
- } else {
- size_t l = strlen(buf);
- if (l > 0) {
- buf[l - 1] = '\0';
- } else {
- memmove(buf, "unknown", sizeof("unknown"));
- }
- }
- #ifdef HAVE_FORK
- if (php_cli_server_workers_max > 1) {
- fprintf(stderr, "[%ld] [%s] %s\n", (long) getpid(), buf, msg);
- } else {
- fprintf(stderr, "[%s] %s\n", buf, msg);
- }
- #else
- fprintf(stderr, "[%s] %s\n", buf, msg);
- #endif
- } /* }}} */
- static void sapi_cli_server_log_message(char *msg, int syslog_type_int) /* {{{ */
- {
- sapi_cli_server_log_write(PHP_CLI_SERVER_LOG_MESSAGE, msg);
- } /* }}} */
- /* {{{ sapi_module_struct cli_server_sapi_module
- */
- sapi_module_struct cli_server_sapi_module = {
- "cli-server", /* name */
- "Built-in HTTP server", /* pretty name */
- sapi_cli_server_startup, /* startup */
- php_module_shutdown_wrapper, /* shutdown */
- NULL, /* activate */
- NULL, /* deactivate */
- sapi_cli_server_ub_write, /* unbuffered write */
- sapi_cli_server_flush, /* flush */
- NULL, /* get uid */
- NULL, /* getenv */
- php_error, /* error handler */
- NULL, /* header handler */
- sapi_cli_server_send_headers, /* send headers handler */
- NULL, /* send header handler */
- sapi_cli_server_read_post, /* read POST data */
- sapi_cli_server_read_cookies, /* read Cookies */
- sapi_cli_server_register_variables, /* register server variables */
- sapi_cli_server_log_message, /* Log message */
- NULL, /* Get request time */
- NULL, /* Child terminate */
- STANDARD_SAPI_MODULE_PROPERTIES
- }; /* }}} */
- static int php_cli_server_poller_ctor(php_cli_server_poller *poller) /* {{{ */
- {
- FD_ZERO(&poller->rfds);
- FD_ZERO(&poller->wfds);
- poller->max_fd = -1;
- return SUCCESS;
- } /* }}} */
- static void php_cli_server_poller_add(php_cli_server_poller *poller, int mode, php_socket_t fd) /* {{{ */
- {
- if (mode & POLLIN) {
- PHP_SAFE_FD_SET(fd, &poller->rfds);
- }
- if (mode & POLLOUT) {
- PHP_SAFE_FD_SET(fd, &poller->wfds);
- }
- if (fd > poller->max_fd) {
- poller->max_fd = fd;
- }
- } /* }}} */
- static void php_cli_server_poller_remove(php_cli_server_poller *poller, int mode, php_socket_t fd) /* {{{ */
- {
- if (mode & POLLIN) {
- PHP_SAFE_FD_CLR(fd, &poller->rfds);
- }
- if (mode & POLLOUT) {
- PHP_SAFE_FD_CLR(fd, &poller->wfds);
- }
- #ifndef PHP_WIN32
- if (fd == poller->max_fd) {
- while (fd > 0) {
- fd--;
- if (PHP_SAFE_FD_ISSET(fd, &poller->rfds) || PHP_SAFE_FD_ISSET(fd, &poller->wfds)) {
- break;
- }
- }
- poller->max_fd = fd;
- }
- #endif
- } /* }}} */
- static int php_cli_server_poller_poll(php_cli_server_poller *poller, struct timeval *tv) /* {{{ */
- {
- memmove(&poller->active.rfds, &poller->rfds, sizeof(poller->rfds));
- memmove(&poller->active.wfds, &poller->wfds, sizeof(poller->wfds));
- return php_select(poller->max_fd + 1, &poller->active.rfds, &poller->active.wfds, NULL, tv);
- } /* }}} */
- static int php_cli_server_poller_iter_on_active(php_cli_server_poller *poller, void *opaque, int(*callback)(void *, php_socket_t fd, int events)) /* {{{ */
- {
- int retval = SUCCESS;
- #ifdef PHP_WIN32
- struct socket_entry {
- SOCKET fd;
- int events;
- } entries[FD_SETSIZE * 2];
- size_t i;
- struct socket_entry *n = entries, *m;
- for (i = 0; i < poller->active.rfds.fd_count; i++) {
- n->events = POLLIN;
- n->fd = poller->active.rfds.fd_array[i];
- n++;
- }
- m = n;
- for (i = 0; i < poller->active.wfds.fd_count; i++) {
- struct socket_entry *e;
- SOCKET fd = poller->active.wfds.fd_array[i];
- for (e = entries; e < m; e++) {
- if (e->fd == fd) {
- e->events |= POLLOUT;
- }
- }
- if (e == m) {
- assert(n < entries + FD_SETSIZE * 2);
- n->events = POLLOUT;
- n->fd = fd;
- n++;
- }
- }
- {
- struct socket_entry *e = entries;
- for (; e < n; e++) {
- if (SUCCESS != callback(opaque, e->fd, e->events)) {
- retval = FAILURE;
- }
- }
- }
- #else
- php_socket_t fd;
- const php_socket_t max_fd = poller->max_fd;
- for (fd=0 ; fd<=max_fd ; fd++) {
- if (PHP_SAFE_FD_ISSET(fd, &poller->active.rfds)) {
- if (SUCCESS != callback(opaque, fd, POLLIN)) {
- retval = FAILURE;
- }
- }
- if (PHP_SAFE_FD_ISSET(fd, &poller->active.wfds)) {
- if (SUCCESS != callback(opaque, fd, POLLOUT)) {
- retval = FAILURE;
- }
- }
- }
- #endif
- return retval;
- } /* }}} */
- static size_t php_cli_server_chunk_size(const php_cli_server_chunk *chunk) /* {{{ */
- {
- switch (chunk->type) {
- case PHP_CLI_SERVER_CHUNK_HEAP:
- return chunk->data.heap.len;
- case PHP_CLI_SERVER_CHUNK_IMMORTAL:
- return chunk->data.immortal.len;
- }
- return 0;
- } /* }}} */
- static void php_cli_server_chunk_dtor(php_cli_server_chunk *chunk) /* {{{ */
- {
- switch (chunk->type) {
- case PHP_CLI_SERVER_CHUNK_HEAP:
- if (chunk->data.heap.block != chunk) {
- pefree(chunk->data.heap.block, 1);
- }
- break;
- case PHP_CLI_SERVER_CHUNK_IMMORTAL:
- break;
- }
- } /* }}} */
- static void php_cli_server_buffer_dtor(php_cli_server_buffer *buffer) /* {{{ */
- {
- php_cli_server_chunk *chunk, *next;
- for (chunk = buffer->first; chunk; chunk = next) {
- next = chunk->next;
- php_cli_server_chunk_dtor(chunk);
- pefree(chunk, 1);
- }
- } /* }}} */
- static void php_cli_server_buffer_ctor(php_cli_server_buffer *buffer) /* {{{ */
- {
- buffer->first = NULL;
- buffer->last = NULL;
- } /* }}} */
- static void php_cli_server_buffer_append(php_cli_server_buffer *buffer, php_cli_server_chunk *chunk) /* {{{ */
- {
- php_cli_server_chunk *last;
- for (last = chunk; last->next; last = last->next);
- if (!buffer->last) {
- buffer->first = chunk;
- } else {
- buffer->last->next = chunk;
- }
- buffer->last = last;
- } /* }}} */
- static void php_cli_server_buffer_prepend(php_cli_server_buffer *buffer, php_cli_server_chunk *chunk) /* {{{ */
- {
- php_cli_server_chunk *last;
- for (last = chunk; last->next; last = last->next);
- last->next = buffer->first;
- if (!buffer->last) {
- buffer->last = last;
- }
- buffer->first = chunk;
- } /* }}} */
- static size_t php_cli_server_buffer_size(const php_cli_server_buffer *buffer) /* {{{ */
- {
- php_cli_server_chunk *chunk;
- size_t retval = 0;
- for (chunk = buffer->first; chunk; chunk = chunk->next) {
- retval += php_cli_server_chunk_size(chunk);
- }
- return retval;
- } /* }}} */
- static php_cli_server_chunk *php_cli_server_chunk_immortal_new(const char *buf, size_t len) /* {{{ */
- {
- php_cli_server_chunk *chunk = pemalloc(sizeof(php_cli_server_chunk), 1);
- chunk->type = PHP_CLI_SERVER_CHUNK_IMMORTAL;
- chunk->next = NULL;
- chunk->data.immortal.p = buf;
- chunk->data.immortal.len = len;
- return chunk;
- } /* }}} */
- static php_cli_server_chunk *php_cli_server_chunk_heap_new(void *block, char *buf, size_t len) /* {{{ */
- {
- php_cli_server_chunk *chunk = pemalloc(sizeof(php_cli_server_chunk), 1);
- chunk->type = PHP_CLI_SERVER_CHUNK_HEAP;
- chunk->next = NULL;
- chunk->data.heap.block = block;
- chunk->data.heap.p = buf;
- chunk->data.heap.len = len;
- return chunk;
- } /* }}} */
- static php_cli_server_chunk *php_cli_server_chunk_heap_new_self_contained(size_t len) /* {{{ */
- {
- php_cli_server_chunk *chunk = pemalloc(sizeof(php_cli_server_chunk) + len, 1);
- chunk->type = PHP_CLI_SERVER_CHUNK_HEAP;
- chunk->next = NULL;
- chunk->data.heap.block = chunk;
- chunk->data.heap.p = (char *)(chunk + 1);
- chunk->data.heap.len = len;
- return chunk;
- } /* }}} */
- static void php_cli_server_content_sender_dtor(php_cli_server_content_sender *sender) /* {{{ */
- {
- php_cli_server_buffer_dtor(&sender->buffer);
- } /* }}} */
- static void php_cli_server_content_sender_ctor(php_cli_server_content_sender *sender) /* {{{ */
- {
- php_cli_server_buffer_ctor(&sender->buffer);
- } /* }}} */
- static int php_cli_server_content_sender_send(php_cli_server_content_sender *sender, php_socket_t fd, size_t *nbytes_sent_total) /* {{{ */
- {
- php_cli_server_chunk *chunk, *next;
- size_t _nbytes_sent_total = 0;
- for (chunk = sender->buffer.first; chunk; chunk = next) {
- #ifdef PHP_WIN32
- int nbytes_sent;
- #else
- ssize_t nbytes_sent;
- #endif
- next = chunk->next;
- switch (chunk->type) {
- case PHP_CLI_SERVER_CHUNK_HEAP:
- #ifdef PHP_WIN32
- nbytes_sent = send(fd, chunk->data.heap.p, (int)chunk->data.heap.len, 0);
- #else
- nbytes_sent = send(fd, chunk->data.heap.p, chunk->data.heap.len, 0);
- #endif
- if (nbytes_sent < 0) {
- *nbytes_sent_total = _nbytes_sent_total;
- return php_socket_errno();
- #ifdef PHP_WIN32
- } else if (nbytes_sent == chunk->data.heap.len) {
- #else
- } else if (nbytes_sent == (ssize_t)chunk->data.heap.len) {
- #endif
- php_cli_server_chunk_dtor(chunk);
- pefree(chunk, 1);
- sender->buffer.first = next;
- if (!next) {
- sender->buffer.last = NULL;
- }
- } else {
- chunk->data.heap.p += nbytes_sent;
- chunk->data.heap.len -= nbytes_sent;
- }
- _nbytes_sent_total += nbytes_sent;
- break;
- case PHP_CLI_SERVER_CHUNK_IMMORTAL:
- #ifdef PHP_WIN32
- nbytes_sent = send(fd, chunk->data.immortal.p, (int)chunk->data.immortal.len, 0);
- #else
- nbytes_sent = send(fd, chunk->data.immortal.p, chunk->data.immortal.len, 0);
- #endif
- if (nbytes_sent < 0) {
- *nbytes_sent_total = _nbytes_sent_total;
- return php_socket_errno();
- #ifdef PHP_WIN32
- } else if (nbytes_sent == chunk->data.immortal.len) {
- #else
- } else if (nbytes_sent == (ssize_t)chunk->data.immortal.len) {
- #endif
- php_cli_server_chunk_dtor(chunk);
- pefree(chunk, 1);
- sender->buffer.first = next;
- if (!next) {
- sender->buffer.last = NULL;
- }
- } else {
- chunk->data.immortal.p += nbytes_sent;
- chunk->data.immortal.len -= nbytes_sent;
- }
- _nbytes_sent_total += nbytes_sent;
- break;
- }
- }
- *nbytes_sent_total = _nbytes_sent_total;
- return 0;
- } /* }}} */
- static int php_cli_server_content_sender_pull(php_cli_server_content_sender *sender, int fd, size_t *nbytes_read) /* {{{ */
- {
- #ifdef PHP_WIN32
- int _nbytes_read;
- #else
- ssize_t _nbytes_read;
- #endif
- php_cli_server_chunk *chunk = php_cli_server_chunk_heap_new_self_contained(131072);
- #ifdef PHP_WIN32
- _nbytes_read = read(fd, chunk->data.heap.p, (unsigned int)chunk->data.heap.len);
- #else
- _nbytes_read = read(fd, chunk->data.heap.p, chunk->data.heap.len);
- #endif
- if (_nbytes_read < 0) {
- if (php_cli_server_log_level >= PHP_CLI_SERVER_LOG_ERROR) {
- char *errstr = get_last_error();
- php_cli_server_logf(PHP_CLI_SERVER_LOG_ERROR, "%s", errstr);
- pefree(errstr, 1);
- }
- php_cli_server_chunk_dtor(chunk);
- pefree(chunk, 1);
- return 1;
- }
- chunk->data.heap.len = _nbytes_read;
- php_cli_server_buffer_append(&sender->buffer, chunk);
- *nbytes_read = _nbytes_read;
- return 0;
- } /* }}} */
- #if HAVE_UNISTD_H
- static int php_cli_is_output_tty() /* {{{ */
- {
- if (php_cli_output_is_tty == OUTPUT_NOT_CHECKED) {
- php_cli_output_is_tty = isatty(STDOUT_FILENO);
- }
- return php_cli_output_is_tty;
- } /* }}} */
- #endif
- static void php_cli_server_log_response(php_cli_server_client *client, int status, const char *message) /* {{{ */
- {
- int color = 0, effective_status = status;
- char *basic_buf, *message_buf = "", *error_buf = "";
- zend_bool append_error_message = 0;
- if (PG(last_error_message)) {
- switch (PG(last_error_type)) {
- case E_ERROR:
- case E_CORE_ERROR:
- case E_COMPILE_ERROR:
- case E_USER_ERROR:
- case E_PARSE:
- if (status == 200) {
- /* the status code isn't changed by a fatal error, so fake it */
- effective_status = 500;
- }
- append_error_message = 1;
- break;
- }
- }
- #if HAVE_UNISTD_H
- if (CLI_SERVER_G(color) && php_cli_is_output_tty() == OUTPUT_IS_TTY) {
- if (effective_status >= 500) {
- /* server error: red */
- color = 1;
- } else if (effective_status >= 400) {
- /* client error: yellow */
- color = 3;
- } else if (effective_status >= 200) {
- /* success: green */
- color = 2;
- }
- }
- #endif
- /* basic */
- spprintf(&basic_buf, 0, "%s [%d]: %s %s", client->addr_str, status, SG(request_info).request_method, client->request.request_uri);
- if (!basic_buf) {
- return;
- }
- /* message */
- if (message) {
- spprintf(&message_buf, 0, " - %s", message);
- if (!message_buf) {
- efree(basic_buf);
- return;
- }
- }
- /* error */
- if (append_error_message) {
- spprintf(&error_buf, 0, " - %s in %s on line %d", PG(last_error_message), PG(last_error_file), PG(last_error_lineno));
- if (!error_buf) {
- efree(basic_buf);
- if (message) {
- efree(message_buf);
- }
- return;
- }
- }
- if (color) {
- php_cli_server_logf(PHP_CLI_SERVER_LOG_MESSAGE, "\x1b[3%dm%s%s%s\x1b[0m", color, basic_buf, message_buf, error_buf);
- } else {
- php_cli_server_logf(PHP_CLI_SERVER_LOG_MESSAGE, "%s%s%s", basic_buf, message_buf, error_buf);
- }
- efree(basic_buf);
- if (message) {
- efree(message_buf);
- }
- if (append_error_message) {
- efree(error_buf);
- }
- } /* }}} */
- static void php_cli_server_logf(int type, const char *format, ...) /* {{{ */
- {
- char *buf = NULL;
- va_list ap;
- if (php_cli_server_log_level < type) {
- return;
- }
- va_start(ap, format);
- vspprintf(&buf, 0, format, ap);
- va_end(ap);
- if (!buf) {
- return;
- }
- sapi_cli_server_log_write(type, buf);
- efree(buf);
- } /* }}} */
- static php_socket_t php_network_listen_socket(const char *host, int *port, int socktype, int *af, socklen_t *socklen, zend_string **errstr) /* {{{ */
- {
- php_socket_t retval = SOCK_ERR;
- int err = 0;
- struct sockaddr *sa = NULL, **p, **sal;
- int num_addrs = php_network_getaddresses(host, socktype, &sal, errstr);
- if (num_addrs == 0) {
- return -1;
- }
- for (p = sal; *p; p++) {
- if (sa) {
- pefree(sa, 1);
- sa = NULL;
- }
- retval = socket((*p)->sa_family, socktype, 0);
- if (retval == SOCK_ERR) {
- continue;
- }
- switch ((*p)->sa_family) {
- #if HAVE_GETADDRINFO && HAVE_IPV6
- case AF_INET6:
- sa = pemalloc(sizeof(struct sockaddr_in6), 1);
- *(struct sockaddr_in6 *)sa = *(struct sockaddr_in6 *)*p;
- ((struct sockaddr_in6 *)sa)->sin6_port = htons(*port);
- *socklen = sizeof(struct sockaddr_in6);
- break;
- #endif
- case AF_INET:
- sa = pemalloc(sizeof(struct sockaddr_in), 1);
- *(struct sockaddr_in *)sa = *(struct sockaddr_in *)*p;
- ((struct sockaddr_in *)sa)->sin_port = htons(*port);
- *socklen = sizeof(struct sockaddr_in);
- break;
- default:
- /* Unknown family */
- *socklen = 0;
- closesocket(retval);
- continue;
- }
- #ifdef SO_REUSEADDR
- {
- int val = 1;
- setsockopt(retval, SOL_SOCKET, SO_REUSEADDR, (char*)&val, sizeof(val));
- }
- #endif
- #if defined(HAVE_FORK) && defined(SO_REUSEPORT)
- if (php_cli_server_workers_max > 1) {
- int val = 1;
- setsockopt(retval, SOL_SOCKET, SO_REUSEPORT, (char*)&val, sizeof(val));
- }
- #endif
- if (bind(retval, sa, *socklen) == SOCK_CONN_ERR) {
- err = php_socket_errno();
- if (err == SOCK_EINVAL || err == SOCK_EADDRINUSE) {
- goto out;
- }
- closesocket(retval);
- retval = SOCK_ERR;
- continue;
- }
- err = 0;
- *af = sa->sa_family;
- if (*port == 0) {
- if (getsockname(retval, sa, socklen)) {
- err = php_socket_errno();
- goto out;
- }
- switch (sa->sa_family) {
- #if HAVE_GETADDRINFO && HAVE_IPV6
- case AF_INET6:
- *port = ntohs(((struct sockaddr_in6 *)sa)->sin6_port);
- break;
- #endif
- case AF_INET:
- *port = ntohs(((struct sockaddr_in *)sa)->sin_port);
- break;
- }
- }
- break;
- }
- if (retval == SOCK_ERR) {
- goto out;
- }
- if (listen(retval, SOMAXCONN)) {
- err = php_socket_errno();
- goto out;
- }
- out:
- if (sa) {
- pefree(sa, 1);
- }
- if (sal) {
- php_network_freeaddresses(sal);
- }
- if (err) {
- if (ZEND_VALID_SOCKET(retval)) {
- closesocket(retval);
- }
- if (errstr) {
- *errstr = php_socket_error_str(err);
- }
- return SOCK_ERR;
- }
- return retval;
- } /* }}} */
- static int php_cli_server_request_ctor(php_cli_server_request *req) /* {{{ */
- {
- req->protocol_version = 0;
- req->request_uri = NULL;
- req->request_uri_len = 0;
- req->vpath = NULL;
- req->vpath_len = 0;
- req->path_translated = NULL;
- req->path_translated_len = 0;
- req->path_info = NULL;
- req->path_info_len = 0;
- req->query_string = NULL;
- req->query_string_len = 0;
- zend_hash_init(&req->headers, 0, NULL, char_ptr_dtor_p, 1);
- zend_hash_init(&req->headers_original_case, 0, NULL, NULL, 1);
- req->content = NULL;
- req->content_len = 0;
- req->ext = NULL;
- req->ext_len = 0;
- return SUCCESS;
- } /* }}} */
- static void php_cli_server_request_dtor(php_cli_server_request *req) /* {{{ */
- {
- if (req->request_uri) {
- pefree(req->request_uri, 1);
- }
- if (req->vpath) {
- pefree(req->vpath, 1);
- }
- if (req->path_translated) {
- pefree(req->path_translated, 1);
- }
- if (req->path_info) {
- pefree(req->path_info, 1);
- }
- if (req->query_string) {
- pefree(req->query_string, 1);
- }
- zend_hash_destroy(&req->headers);
- zend_hash_destroy(&req->headers_original_case);
- if (req->content) {
- pefree(req->content, 1);
- }
- } /* }}} */
- static void php_cli_server_request_translate_vpath(php_cli_server_request *request, const char *document_root, size_t document_root_len) /* {{{ */
- {
- zend_stat_t sb;
- static const char *index_files[] = { "index.php", "index.html", NULL };
- char *buf = safe_pemalloc(1, request->vpath_len, 1 + document_root_len + 1 + sizeof("index.html"), 1);
- char *p = buf, *prev_path = NULL, *q, *vpath;
- size_t prev_path_len = 0;
- int is_static_file = 0;
- memmove(p, document_root, document_root_len);
- p += document_root_len;
- vpath = p;
- if (request->vpath_len > 0 && request->vpath[0] != '/') {
- *p++ = DEFAULT_SLASH;
- }
- q = request->vpath + request->vpath_len;
- while (q > request->vpath) {
- if (*q-- == '.') {
- is_static_file = 1;
- break;
- }
- }
- memmove(p, request->vpath, request->vpath_len);
- #ifdef PHP_WIN32
- q = p + request->vpath_len;
- do {
- if (*q == '/') {
- *q = '\\';
- }
- } while (q-- > p);
- #endif
- p += request->vpath_len;
- *p = '\0';
- q = p;
- while (q > buf) {
- if (!php_sys_stat(buf, &sb)) {
- if (sb.st_mode & S_IFDIR) {
- const char **file = index_files;
- if (q[-1] != DEFAULT_SLASH) {
- *q++ = DEFAULT_SLASH;
- }
- while (*file) {
- size_t l = strlen(*file);
- memmove(q, *file, l + 1);
- if (!php_sys_stat(buf, &sb) && (sb.st_mode & S_IFREG)) {
- q += l;
- break;
- }
- file++;
- }
- if (!*file || is_static_file) {
- if (prev_path) {
- pefree(prev_path, 1);
- }
- pefree(buf, 1);
- return;
- }
- }
- break; /* regular file */
- }
- if (prev_path) {
- pefree(prev_path, 1);
- *q = DEFAULT_SLASH;
- }
- while (q > buf && *(--q) != DEFAULT_SLASH);
- prev_path_len = p - q;
- prev_path = pestrndup(q, prev_path_len, 1);
- *q = '\0';
- }
- if (prev_path) {
- request->path_info_len = prev_path_len;
- #ifdef PHP_WIN32
- while (prev_path_len--) {
- if (prev_path[prev_path_len] == '\\') {
- prev_path[prev_path_len] = '/';
- }
- }
- #endif
- request->path_info = prev_path;
- pefree(request->vpath, 1);
- request->vpath = pestrndup(vpath, q - vpath, 1);
- request->vpath_len = q - vpath;
- request->path_translated = buf;
- request->path_translated_len = q - buf;
- } else {
- pefree(request->vpath, 1);
- request->vpath = pestrndup(vpath, q - vpath, 1);
- request->vpath_len = q - vpath;
- request->path_translated = buf;
- request->path_translated_len = q - buf;
- }
- #ifdef PHP_WIN32
- {
- uint32_t i = 0;
- for (;i<request->vpath_len;i++) {
- if (request->vpath[i] == '\\') {
- request->vpath[i] = '/';
- }
- }
- }
- #endif
- request->sb = sb;
- } /* }}} */
- static void normalize_vpath(char **retval, size_t *retval_len, const char *vpath, size_t vpath_len, int persistent) /* {{{ */
- {
- char *decoded_vpath = NULL;
- char *decoded_vpath_end;
- char *p;
- *retval = NULL;
- *retval_len = 0;
- decoded_vpath = pestrndup(vpath, vpath_len, persistent);
- if (!decoded_vpath) {
- return;
- }
- decoded_vpath_end = decoded_vpath + php_raw_url_decode(decoded_vpath, (int)vpath_len);
- #ifdef PHP_WIN32
- {
- char *p = decoded_vpath;
- do {
- if (*p == '\\') {
- *p = '/';
- }
- } while (*p++);
- }
- #endif
- p = decoded_vpath;
- if (p < decoded_vpath_end && *p == '/') {
- char *n = p;
- while (n < decoded_vpath_end && *n == '/') n++;
- memmove(++p, n, decoded_vpath_end - n);
- decoded_vpath_end -= n - p;
- }
- while (p < decoded_vpath_end) {
- char *n = p;
- while (n < decoded_vpath_end && *n != '/') n++;
- if (n - p == 2 && p[0] == '.' && p[1] == '.') {
- if (p > decoded_vpath) {
- --p;
- for (;;) {
- if (p == decoded_vpath) {
- if (*p == '/') {
- p++;
- }
- break;
- }
- if (*(--p) == '/') {
- p++;
- break;
- }
- }
- }
- while (n < decoded_vpath_end && *n == '/') n++;
- memmove(p, n, decoded_vpath_end - n);
- decoded_vpath_end -= n - p;
- } else if (n - p == 1 && p[0] == '.') {
- while (n < decoded_vpath_end && *n == '/') n++;
- memmove(p, n, decoded_vpath_end - n);
- decoded_vpath_end -= n - p;
- } else {
- if (n < decoded_vpath_end) {
- char *nn = n;
- while (nn < decoded_vpath_end && *nn == '/') nn++;
- p = n + 1;
- memmove(p, nn, decoded_vpath_end - nn);
- decoded_vpath_end -= nn - p;
- } else {
- p = n;
- }
- }
- }
- *decoded_vpath_end = '\0';
- *retval = decoded_vpath;
- *retval_len = decoded_vpath_end - decoded_vpath;
- } /* }}} */
- /* {{{ php_cli_server_client_read_request */
- static int php_cli_server_client_read_request_on_message_begin(php_http_parser *parser)
- {
- return 0;
- }
- static int php_cli_server_client_read_request_on_path(php_http_parser *parser, const char *at, size_t length)
- {
- php_cli_server_client *client = parser->data;
- {
- char *vpath;
- size_t vpath_len;
- normalize_vpath(&vpath, &vpath_len, at, length, 1);
- client->request.vpath = vpath;
- client->request.vpath_len = vpath_len;
- }
- return 0;
- }
- static int php_cli_server_client_read_request_on_query_string(php_http_parser *parser, const char *at, size_t length)
- {
- php_cli_server_client *client = parser->data;
- client->request.query_string = pestrndup(at, length, 1);
- client->request.query_string_len = length;
- return 0;
- }
- static int php_cli_server_client_read_request_on_url(php_http_parser *parser, const char *at, size_t length)
- {
- php_cli_server_client *client = parser->data;
- client->request.request_method = parser->method;
- client->request.request_uri = pestrndup(at, length, 1);
- client->request.request_uri_len = length;
- return 0;
- }
- static int php_cli_server_client_read_request_on_fragment(php_http_parser *parser, const char *at, size_t length)
- {
- return 0;
- }
- static void php_cli_server_client_save_header(php_cli_server_client *client)
- {
- /* strip off the colon */
- zend_string *orig_header_name = zend_string_init(client->current_header_name, client->current_header_name_len, 1);
- zend_string *lc_header_name = zend_string_alloc(client->current_header_name_len, 1);
- zend_str_tolower_copy(ZSTR_VAL(lc_header_name), client->current_header_name, client->current_header_name_len);
- GC_MAKE_PERSISTENT_LOCAL(orig_header_name);
- GC_MAKE_PERSISTENT_LOCAL(lc_header_name);
- zend_hash_add_ptr(&client->request.headers, lc_header_name, client->current_header_value);
- zend_hash_add_ptr(&client->request.headers_original_case, orig_header_name, client->current_header_value);
- zend_string_release_ex(lc_header_name, 1);
- zend_string_release_ex(orig_header_name, 1);
- if (client->current_header_name_allocated) {
- pefree(client->current_header_name, 1);
- client->current_header_name_allocated = 0;
- }
- client->current_header_name = NULL;
- client->current_header_name_len = 0;
- client->current_header_value = NULL;
- client->current_header_value_len = 0;
- }
- static int php_cli_server_client_read_request_on_header_field(php_http_parser *parser, const char *at, size_t length)
- {
- php_cli_server_client *client = parser->data;
- switch (client->last_header_element) {
- case HEADER_VALUE:
- php_cli_server_client_save_header(client);
- /* break missing intentionally */
- case HEADER_NONE:
- client->current_header_name = (char *)at;
- client->current_header_name_len = length;
- break;
- case HEADER_FIELD:
- if (client->current_header_name_allocated) {
- size_t new_length = client->current_header_name_len + length;
- client->current_header_name = perealloc(client->current_header_name, new_length + 1, 1);
- memcpy(client->current_header_name + client->current_header_name_len, at, length);
- client->current_header_name[new_length] = '\0';
- client->current_header_name_len = new_length;
- } else {
- size_t new_length = client->current_header_name_len + length;
- char* field = pemalloc(new_length + 1, 1);
- memcpy(field, client->current_header_name, client->current_header_name_len);
- memcpy(field + client->current_header_name_len, at, length);
- field[new_length] = '\0';
- client->current_header_name = field;
- client->current_header_name_len = new_length;
- client->current_header_name_allocated = 1;
- }
- break;
- }
- client->last_header_element = HEADER_FIELD;
- return 0;
- }
- static int php_cli_server_client_read_request_on_header_value(php_http_parser *parser, const char *at, size_t length)
- {
- php_cli_server_client *client = parser->data;
- switch (client->last_header_element) {
- case HEADER_FIELD:
- client->current_header_value = pestrndup(at, length, 1);
- client->current_header_value_len = length;
- break;
- case HEADER_VALUE:
- {
- size_t new_length = client->current_header_value_len + length;
- client->current_header_value = perealloc(client->current_header_value, new_length + 1, 1);
- memcpy(client->current_header_value + client->current_header_value_len, at, length);
- client->current_header_value[new_length] = '\0';
- client->current_header_value_len = new_length;
- }
- break;
- case HEADER_NONE:
- // can't happen
- assert(0);
- break;
- }
- client->last_header_element = HEADER_VALUE;
- return 0;
- }
- static int php_cli_server_client_read_request_on_headers_complete(php_http_parser *parser)
- {
- php_cli_server_client *client = parser->data;
- switch (client->last_header_element) {
- case HEADER_NONE:
- break;
- case HEADER_FIELD:
- client->current_header_value = pemalloc(1, 1);
- *client->current_header_value = '\0';
- client->current_header_value_len = 0;
- /* break missing intentionally */
- case HEADER_VALUE:
- php_cli_server_client_save_header(client);
- break;
- }
- client->last_header_element = HEADER_NONE;
- return 0;
- }
- static int php_cli_server_client_read_request_on_body(php_http_parser *parser, const char *at, size_t length)
- {
- php_cli_server_client *client = parser->data;
- if (!client->request.content) {
- client->request.content = pemalloc(parser->content_length, 1);
- client->request.content_len = 0;
- }
- client->request.content = perealloc(client->request.content, client->request.content_len + length, 1);
- memmove(client->request.content + client->request.content_len, at, length);
- client->request.content_len += length;
- return 0;
- }
- static int php_cli_server_client_read_request_on_message_complete(php_http_parser *parser)
- {
- php_cli_server_client *client = parser->data;
- client->request.protocol_version = parser->http_major * 100 + parser->http_minor;
- php_cli_server_request_translate_vpath(&client->request, client->server->document_root, client->server->document_root_len);
- {
- const char *vpath = client->request.vpath, *end = vpath + client->request.vpath_len, *p = end;
- client->request.ext = end;
- client->request.ext_len = 0;
- while (p > vpath) {
- --p;
- if (*p == '.') {
- ++p;
- client->request.ext = p;
- client->request.ext_len = end - p;
- break;
- }
- }
- }
- client->request_read = 1;
- return 0;
- }
- static int php_cli_server_client_read_request(php_cli_server_client *client, char **errstr)
- {
- char buf[16384];
- static const php_http_parser_settings settings = {
- php_cli_server_client_read_request_on_message_begin,
- php_cli_server_client_read_request_on_path,
- php_cli_server_client_read_request_on_query_string,
- php_cli_server_client_read_request_on_url,
- php_cli_server_client_read_request_on_fragment,
- php_cli_server_client_read_request_on_header_field,
- php_cli_server_client_read_request_on_header_value,
- php_cli_server_client_read_request_on_headers_complete,
- php_cli_server_client_read_request_on_body,
- php_cli_server_client_read_request_on_message_complete
- };
- size_t nbytes_consumed;
- int nbytes_read;
- if (client->request_read) {
- return 1;
- }
- nbytes_read = recv(client->sock, buf, sizeof(buf) - 1, 0);
- if (nbytes_read < 0) {
- int err = php_socket_errno…
Large files files are truncated, but you can click here to view the full file