X-Git-Url: https://git.m6w6.name/?a=blobdiff_plain;f=php_http_header_parser.c;fp=php_http_header_parser.c;h=e7fc886cefb5d5a3bb95f18d92f5215d719f1a24;hb=87db9817d428282792c8146d9c2ae9748ebf6f1e;hp=0000000000000000000000000000000000000000;hpb=7a5c865f6faf8b1b6c91735e9d3b040449ea74ba;p=m6w6%2Fext-http

diff --git a/php_http_header_parser.c b/php_http_header_parser.c
new file mode 100644
index 0000000..e7fc886
--- /dev/null
+++ b/php_http_header_parser.c
@@ -0,0 +1,256 @@
+/*
+    +--------------------------------------------------------------------+
+    | PECL :: http                                                       |
+    +--------------------------------------------------------------------+
+    | Redistribution and use in source and binary forms, with or without |
+    | modification, are permitted provided that the conditions mentioned |
+    | in the accompanying LICENSE file are met.                          |
+    +--------------------------------------------------------------------+
+    | Copyright (c) 2004-2013, Michael Wallner <mike@php.net>            |
+    +--------------------------------------------------------------------+
+*/
+
+#include "php_http_api.h"
+
+typedef struct php_http_header_parser_state_spec {
+	php_http_header_parser_state_t state;
+	unsigned need_data:1;
+} php_http_header_parser_state_spec_t;
+
+static const php_http_header_parser_state_spec_t php_http_header_parser_states[] = {
+		{PHP_HTTP_HEADER_PARSER_STATE_START,		1},
+		{PHP_HTTP_HEADER_PARSER_STATE_KEY,			1},
+		{PHP_HTTP_HEADER_PARSER_STATE_VALUE,		1},
+		{PHP_HTTP_HEADER_PARSER_STATE_VALUE_EX,		1},
+		{PHP_HTTP_HEADER_PARSER_STATE_HEADER_DONE,	0},
+		{PHP_HTTP_HEADER_PARSER_STATE_DONE,			0}
+};
+
+php_http_header_parser_t *php_http_header_parser_init(php_http_header_parser_t *parser TSRMLS_DC)
+{
+	if (!parser) {
+		parser = emalloc(sizeof(*parser));
+	}
+	memset(parser, 0, sizeof(*parser));
+
+	TSRMLS_SET_CTX(parser->ts);
+
+	return parser;
+}
+
+php_http_header_parser_state_t php_http_header_parser_state_push(php_http_header_parser_t *parser, unsigned argc, ...)
+{
+	va_list va_args;
+	unsigned i;
+	php_http_header_parser_state_t state = 0;
+
+	va_start(va_args, argc);
+	for (i = 0; i < argc; ++i) {
+		state = va_arg(va_args, php_http_header_parser_state_t);
+		zend_stack_push(&parser->stack, &state, sizeof(state));
+	}
+	va_end(va_args);
+
+	return state;
+}
+
+php_http_header_parser_state_t php_http_header_parser_state_is(php_http_header_parser_t *parser)
+{
+	php_http_header_parser_state_t *state;
+
+	if (SUCCESS == zend_stack_top(&parser->stack, (void *) &state)) {
+		return *state;
+	}
+	return PHP_HTTP_HEADER_PARSER_STATE_START;
+}
+
+php_http_header_parser_state_t php_http_header_parser_state_pop(php_http_header_parser_t *parser)
+{
+	php_http_header_parser_state_t state, *state_ptr;
+	if (SUCCESS == zend_stack_top(&parser->stack, (void *) &state_ptr)) {
+		state = *state_ptr;
+		zend_stack_del_top(&parser->stack);
+		return state;
+	}
+	return PHP_HTTP_HEADER_PARSER_STATE_START;
+}
+
+void php_http_header_parser_dtor(php_http_header_parser_t *parser)
+{
+	zend_stack_destroy(&parser->stack);
+	php_http_info_dtor(&parser->info);
+	STR_FREE(parser->_key.str);
+	STR_FREE(parser->_val.str);
+}
+
+void php_http_header_parser_free(php_http_header_parser_t **parser)
+{
+	if (*parser) {
+		php_http_header_parser_dtor(*parser);
+		efree(*parser);
+		*parser = NULL;
+	}
+}
+
+STATUS php_http_header_parser_parse(php_http_header_parser_t *parser, php_http_buffer_t *buffer, unsigned flags, HashTable *headers, php_http_info_callback_t callback_func, void *callback_arg)
+{
+	TSRMLS_FETCH_FROM_CTX(parser->ts);
+
+	while (buffer->used || !php_http_header_parser_states[php_http_header_parser_state_is(parser)].need_data) {
+#if 0
+		const char *state[] = {"START", "KEY", "VALUE", "HEADER_DONE", "DONE"};
+		fprintf(stderr, "#HP: %s (avail:%zu, num:%d)\n", php_http_header_parser_state_is(parser) < 0 ? "FAILURE" : state[php_http_header_parser_state_is(parser)], buffer->used, headers?zend_hash_num_elements(headers):0);
+		_dpf(0, buffer->data, buffer->used);
+#endif
+		switch (php_http_header_parser_state_pop(parser)) {
+			case PHP_HTTP_HEADER_PARSER_STATE_FAILURE:
+				return php_http_header_parser_state_push(parser, 1, PHP_HTTP_HEADER_PARSER_STATE_FAILURE);
+
+			case PHP_HTTP_HEADER_PARSER_STATE_START: {
+				char *ptr = buffer->data;
+
+				while (ptr - buffer->data < buffer->used && PHP_HTTP_IS_CTYPE(space, *ptr)) {
+					++ptr;
+				}
+
+				php_http_buffer_cut(buffer, 0, ptr - buffer->data);
+				php_http_header_parser_state_push(parser, 1, PHP_HTTP_HEADER_PARSER_STATE_KEY);
+				break;
+			}
+
+			case PHP_HTTP_HEADER_PARSER_STATE_KEY: {
+				const char *colon, *eol_str = NULL;
+				int eol_len = 0;
+
+				if (buffer->data == (eol_str = php_http_locate_bin_eol(buffer->data, buffer->used, &eol_len))) {
+					/* end of headers */
+					php_http_buffer_cut(buffer, 0, eol_len);
+					php_http_header_parser_state_push(parser, 1, PHP_HTTP_HEADER_PARSER_STATE_DONE);
+				} else if (php_http_info_parse(&parser->info, php_http_buffer_fix(buffer)->data TSRMLS_CC)) {
+					/* new message starting with request/response line */
+					if (callback_func) {
+						callback_func(callback_arg, &headers, &parser->info TSRMLS_CC);
+					}
+					php_http_info_dtor(&parser->info);
+					php_http_buffer_cut(buffer, 0, eol_str + eol_len - buffer->data);
+					php_http_header_parser_state_push(parser, 1, PHP_HTTP_HEADER_PARSER_STATE_HEADER_DONE);
+				} else if ((colon = memchr(buffer->data, ':', buffer->used)) && (!eol_str || eol_str > colon)) {
+					/* header: string */
+					parser->_key.str = estrndup(buffer->data, parser->_key.len = colon - buffer->data);
+					while (PHP_HTTP_IS_CTYPE(space, *++colon) && *colon != '\n' && *colon != '\r');
+					php_http_buffer_cut(buffer, 0, colon - buffer->data);
+					php_http_header_parser_state_push(parser, 1, PHP_HTTP_HEADER_PARSER_STATE_VALUE);
+				} else {
+					/* neither reqeust/response line nor header: string */
+					return php_http_header_parser_state_push(parser, 1, PHP_HTTP_HEADER_PARSER_STATE_FAILURE);
+				}
+				break;
+			}
+
+			case PHP_HTTP_HEADER_PARSER_STATE_VALUE: {
+				const char *eol_str;
+				int eol_len;
+
+#define SET_ADD_VAL(slen, eol_len) \
+	do { \
+		const char *ptr = buffer->data; \
+		size_t len = slen; \
+		 \
+		while (len > 0 && PHP_HTTP_IS_CTYPE(space, *ptr)) { \
+			++ptr; \
+			--len; \
+		} \
+		while (len > 0 && PHP_HTTP_IS_CTYPE(space, ptr[len - 1])) { \
+			--len; \
+		} \
+		 \
+		if (len > 0) { \
+			if (parser->_val.str) { \
+				parser->_val.str = erealloc(parser->_val.str, parser->_val.len + len + 2); \
+				parser->_val.str[parser->_val.len++] = ' '; \
+				memcpy(&parser->_val.str[parser->_val.len], ptr, len); \
+				parser->_val.len += len; \
+				parser->_val.str[parser->_val.len] = '\0'; \
+			} else { \
+				parser->_val.len = len; \
+				parser->_val.str = estrndup(ptr, len); \
+			} \
+		} \
+		php_http_buffer_cut(buffer, 0, slen + eol_len); \
+	} while (0)
+
+				if ((eol_str = php_http_locate_bin_eol(buffer->data, buffer->used, &eol_len))) {
+					SET_ADD_VAL(eol_str - buffer->data, eol_len);
+
+					if (buffer->used) {
+						if (*buffer->data != '\t' && *buffer->data != ' ') {
+							php_http_header_parser_state_push(parser, 1, PHP_HTTP_HEADER_PARSER_STATE_HEADER_DONE);
+							break;
+						} else {
+							php_http_header_parser_state_push(parser, 1, PHP_HTTP_HEADER_PARSER_STATE_VALUE);
+							break;
+						}
+					}
+				}
+
+				if (flags & PHP_HTTP_HEADER_PARSER_CLEANUP) {
+					if (buffer->used) {
+						SET_ADD_VAL(buffer->used, 0);
+					}
+					php_http_header_parser_state_push(parser, 1, PHP_HTTP_HEADER_PARSER_STATE_HEADER_DONE);
+				} else {
+					return php_http_header_parser_state_push(parser, 1, PHP_HTTP_HEADER_PARSER_STATE_VALUE_EX);
+				}
+				break;
+			}
+
+			case PHP_HTTP_HEADER_PARSER_STATE_VALUE_EX:
+				if (*buffer->data == ' ' || *buffer->data == '\t') {
+					php_http_header_parser_state_push(parser, 1, PHP_HTTP_HEADER_PARSER_STATE_VALUE);
+				} else {
+					php_http_header_parser_state_push(parser, 1, PHP_HTTP_HEADER_PARSER_STATE_HEADER_DONE);
+				}
+				break;
+
+			case PHP_HTTP_HEADER_PARSER_STATE_HEADER_DONE:
+				if (parser->_key.str && parser->_val.str) {
+					zval array, **exist;
+
+					if (!headers && callback_func) {
+						callback_func(callback_arg, &headers, NULL TSRMLS_CC);
+					}
+
+					INIT_PZVAL_ARRAY(&array, headers);
+					php_http_pretty_key(parser->_key.str, parser->_key.len, 1, 1);
+					if (SUCCESS == zend_symtable_find(headers, parser->_key.str, parser->_key.len + 1, (void *) &exist)) {
+						convert_to_array(*exist);
+						add_next_index_stringl(*exist, parser->_val.str, parser->_val.len, 0);
+					} else {
+						add_assoc_stringl_ex(&array, parser->_key.str, parser->_key.len + 1, parser->_val.str, parser->_val.len, 0);
+					}
+					parser->_val.str = NULL;
+				}
+
+				STR_SET(parser->_key.str, NULL);
+				STR_SET(parser->_val.str, NULL);
+
+				php_http_header_parser_state_push(parser, 1, PHP_HTTP_HEADER_PARSER_STATE_KEY);
+				break;
+
+			case PHP_HTTP_HEADER_PARSER_STATE_DONE:
+				return PHP_HTTP_HEADER_PARSER_STATE_DONE;
+		}
+	}
+
+	return php_http_header_parser_state_is(parser);
+}
+
+/*
+ * Local variables:
+ * tab-width: 4
+ * c-basic-offset: 4
+ * End:
+ * vim600: noet sw=4 ts=4 fdm=marker
+ * vim<600: noet sw=4 ts=4
+ */
+