2 +--------------------------------------------------------------------+
4 +--------------------------------------------------------------------+
5 | Redistribution and use in source and binary forms, with or without |
6 | modification, are permitted provided that the conditions mentioned |
7 | in the accompanying LICENSE file are met. |
8 +--------------------------------------------------------------------+
9 | Copyright (c) 2004-2014, Michael Wallner <mike@php.net> |
10 +--------------------------------------------------------------------+
13 #include "php_http_api.h"
15 ZEND_RESULT_CODE
php_http_header_parse(const char *header
, size_t length
, HashTable
*headers
, php_http_info_callback_t callback_func
, void **callback_data TSRMLS_DC
)
17 php_http_header_parser_t ctx
;
18 php_http_buffer_t buf
;
19 php_http_header_parser_state_t rs
;
21 if (!php_http_buffer_from_string_ex(&buf
, header
, length
)) {
22 php_error_docref(NULL TSRMLS_CC
, E_WARNING
, "Could not allocate buffer");
26 if (!php_http_header_parser_init(&ctx TSRMLS_CC
)) {
27 php_http_buffer_dtor(&buf
);
28 php_error_docref(NULL TSRMLS_CC
, E_WARNING
, "Could not initialize header parser");
32 rs
= php_http_header_parser_parse(&ctx
, &buf
, PHP_HTTP_HEADER_PARSER_CLEANUP
, headers
, callback_func
, callback_data
);
33 php_http_header_parser_dtor(&ctx
);
34 php_http_buffer_dtor(&buf
);
36 return rs
== PHP_HTTP_HEADER_PARSER_STATE_FAILURE
? FAILURE
: SUCCESS
;
39 void php_http_header_to_callback(HashTable
*headers
, zend_bool crlf
, php_http_pass_format_callback_t cb
, void *cb_arg TSRMLS_DC
)
41 HashPosition pos1
, pos2
;
42 php_http_array_hashkey_t key
= php_http_array_hashkey_init(0);
43 zval
**header
, **single_header
;
45 FOREACH_HASH_KEYVAL(pos1
, headers
, key
, header
) {
46 if (key
.type
== HASH_KEY_IS_STRING
) {
47 if (key
.len
== sizeof("Set-Cookie") && !strcasecmp(key
.str
, "Set-Cookie") && Z_TYPE_PP(header
) == IS_ARRAY
) {
48 FOREACH_VAL(pos2
, *header
, single_header
) {
49 if (Z_TYPE_PP(single_header
) == IS_ARRAY
) {
50 php_http_cookie_list_t
*cookie
= php_http_cookie_list_from_struct(NULL
, *single_header TSRMLS_CC
);
56 php_http_cookie_list_to_string(cookie
, &buf
, &len
);
57 cb(cb_arg
, crlf
? "Set-Cookie: %s" PHP_HTTP_CRLF
: "Set-Cookie: %s", buf
);
58 php_http_cookie_list_free(&cookie
);
62 zval
*strval
= php_http_header_value_to_string(*single_header TSRMLS_CC
);
64 cb(cb_arg
, crlf
? "Set-Cookie: %s" PHP_HTTP_CRLF
: "Set-Cookie: %s", Z_STRVAL_P(strval
));
65 zval_ptr_dtor(&strval
);
69 zval
*strval
= php_http_header_value_to_string(*header TSRMLS_CC
);
71 cb(cb_arg
, crlf
? "%s: %s" PHP_HTTP_CRLF
: "%s: %s", key
.str
, Z_STRVAL_P(strval
));
72 zval_ptr_dtor(&strval
);
78 void php_http_header_to_string(php_http_buffer_t
*str
, HashTable
*headers TSRMLS_DC
)
80 php_http_header_to_callback(headers
, 1, (php_http_pass_format_callback_t
) php_http_buffer_appendf
, str TSRMLS_CC
);
83 zval
*php_http_header_value_to_string(zval
*header TSRMLS_DC
)
87 if (Z_TYPE_P(header
) == IS_BOOL
) {
89 ZVAL_STRING(ret
, Z_BVAL_P(header
) ? "true" : "false", 1);
90 } else if (Z_TYPE_P(header
) == IS_ARRAY
) {
93 php_http_buffer_t str
;
95 php_http_buffer_init(&str
);
97 FOREACH_VAL(pos
,header
, val
) {
98 zval
*strval
= php_http_header_value_to_string(*val TSRMLS_CC
);
100 php_http_buffer_appendf(&str
, str
.used
? ", %s":"%s", Z_STRVAL_P(strval
));
101 zval_ptr_dtor(&strval
);
103 php_http_buffer_fix(&str
);
104 ZVAL_STRINGL(ret
, str
.data
, str
.used
, 0);
106 ret
= php_http_zsep(1, IS_STRING
, header
);
112 ZEND_BEGIN_ARG_INFO_EX(ai_HttpHeader___construct
, 0, 0, 0)
113 ZEND_ARG_INFO(0, name
)
114 ZEND_ARG_INFO(0, value
)
116 PHP_METHOD(HttpHeader
, __construct
)
118 char *name_str
= NULL
, *value_str
= NULL
;
119 int name_len
= 0, value_len
= 0;
121 php_http_expect(SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|s!s!", &name_str
, &name_len
, &value_str
, &value_len
), invalid_arg
, return);
123 if (name_str
&& name_len
) {
124 char *pretty_str
= estrndup(name_str
, name_len
);
125 zend_update_property_stringl(php_http_header_class_entry
, getThis(), ZEND_STRL("name"), php_http_pretty_key(pretty_str
, name_len
, 1, 1), name_len TSRMLS_CC
);
128 if (value_str
&& value_len
) {
129 zend_update_property_stringl(php_http_header_class_entry
, getThis(), ZEND_STRL("value"), value_str
, value_len TSRMLS_CC
);
133 ZEND_BEGIN_ARG_INFO_EX(ai_HttpHeader_serialize
, 0, 0, 0)
135 PHP_METHOD(HttpHeader
, serialize
)
137 if (SUCCESS
== zend_parse_parameters_none()) {
138 php_http_buffer_t buf
;
139 zval
*zname
, *zvalue
;
141 php_http_buffer_init(&buf
);
142 zname
= php_http_ztyp(IS_STRING
, zend_read_property(php_http_header_class_entry
, getThis(), ZEND_STRL("name"), 0 TSRMLS_CC
));
143 php_http_buffer_append(&buf
, Z_STRVAL_P(zname
), Z_STRLEN_P(zname
));
144 zval_ptr_dtor(&zname
);
145 zvalue
= php_http_ztyp(IS_STRING
, zend_read_property(php_http_header_class_entry
, getThis(), ZEND_STRL("value"), 0 TSRMLS_CC
));
146 if (Z_STRLEN_P(zvalue
)) {
147 php_http_buffer_appends(&buf
, ": ");
148 php_http_buffer_append(&buf
, Z_STRVAL_P(zvalue
), Z_STRLEN_P(zvalue
));
150 php_http_buffer_appends(&buf
, ":");
152 zval_ptr_dtor(&zvalue
);
154 RETURN_PHP_HTTP_BUFFER_VAL(&buf
);
156 RETURN_EMPTY_STRING();
159 ZEND_BEGIN_ARG_INFO_EX(ai_HttpHeader_unserialize
, 0, 0, 1)
160 ZEND_ARG_INFO(0, serialized
)
162 PHP_METHOD(HttpHeader
, unserialize
)
164 char *serialized_str
;
167 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s", &serialized_str
, &serialized_len
)) {
170 zend_hash_init(&ht
, 1, NULL
, ZVAL_PTR_DTOR
, 0);
171 if (SUCCESS
== php_http_header_parse(serialized_str
, serialized_len
, &ht
, NULL
, NULL TSRMLS_CC
)) {
172 if (zend_hash_num_elements(&ht
)) {
178 zend_hash_internal_pointer_reset(&ht
);
179 switch (zend_hash_get_current_key_ex(&ht
, &str
, &len
, &idx
, 0, NULL
)) {
180 case HASH_KEY_IS_STRING
:
181 zend_update_property_stringl(php_http_header_class_entry
, getThis(), ZEND_STRL("name"), str
, len
- 1 TSRMLS_CC
);
183 case HASH_KEY_IS_LONG
:
184 zend_update_property_long(php_http_header_class_entry
, getThis(), ZEND_STRL("name"), idx TSRMLS_CC
);
189 zend_hash_get_current_data(&ht
, (void *) &val
);
190 cpy
= php_http_zsep(1, IS_STRING
, *val
);
191 zend_update_property(php_http_header_class_entry
, getThis(), ZEND_STRL("value"), cpy TSRMLS_CC
);
195 zend_hash_destroy(&ht
);
200 ZEND_BEGIN_ARG_INFO_EX(ai_HttpHeader_match
, 0, 0, 1)
201 ZEND_ARG_INFO(0, value
)
202 ZEND_ARG_INFO(0, flags
)
204 PHP_METHOD(HttpHeader
, match
)
208 long flags
= PHP_HTTP_MATCH_LOOSE
;
211 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|sl", &val_str
, &val_len
, &flags
)) {
215 zvalue
= php_http_ztyp(IS_STRING
, zend_read_property(php_http_header_class_entry
, getThis(), ZEND_STRL("value"), 0 TSRMLS_CC
));
216 RETVAL_BOOL(php_http_match(Z_STRVAL_P(zvalue
), val_str
, flags
));
217 zval_ptr_dtor(&zvalue
);
220 ZEND_BEGIN_ARG_INFO_EX(ai_HttpHeader_negotiate
, 0, 0, 1)
221 ZEND_ARG_INFO(0, supported
)
222 ZEND_ARG_INFO(1, result
)
224 PHP_METHOD(HttpHeader
, negotiate
)
226 HashTable
*supported
, *rs
;
227 zval
*zname
, *zvalue
, *rs_array
= NULL
;
228 char *sep_str
= NULL
;
231 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "H|z", &supported
, &rs_array
)) {
236 array_init(rs_array
);
239 zname
= php_http_ztyp(IS_STRING
, zend_read_property(php_http_header_class_entry
, getThis(), ZEND_STRL("name"), 0 TSRMLS_CC
));
240 if (!strcasecmp(Z_STRVAL_P(zname
), "Accept")) {
243 } else if (!strcasecmp(Z_STRVAL_P(zname
), "Accept-Language")) {
247 zval_ptr_dtor(&zname
);
249 zvalue
= php_http_ztyp(IS_STRING
, zend_read_property(php_http_header_class_entry
, getThis(), ZEND_STRL("value"), 0 TSRMLS_CC
));
250 if ((rs
= php_http_negotiate(Z_STRVAL_P(zvalue
), Z_STRLEN_P(zvalue
), supported
, sep_str
, sep_len TSRMLS_CC
))) {
251 PHP_HTTP_DO_NEGOTIATE_HANDLE_RESULT(rs
, supported
, rs_array
);
253 PHP_HTTP_DO_NEGOTIATE_HANDLE_DEFAULT(supported
, rs_array
);
255 zval_ptr_dtor(&zvalue
);
258 ZEND_BEGIN_ARG_INFO_EX(ai_HttpHeader_getParams
, 0, 0, 0)
259 ZEND_ARG_INFO(0, param_sep
)
260 ZEND_ARG_INFO(0, arg_sep
)
261 ZEND_ARG_INFO(0, val_sep
)
262 ZEND_ARG_INFO(0, flags
)
264 PHP_METHOD(HttpHeader
, getParams
)
266 zval zctor
, *zparams_obj
, **zargs
= NULL
;
269 ZVAL_STRINGL(&zctor
, "__construct", lenof("__construct"), 0);
271 MAKE_STD_ZVAL(zparams_obj
);
272 object_init_ex(zparams_obj
, php_http_params_class_entry
);
274 zargs
= (zval
**) ecalloc(ZEND_NUM_ARGS()+1, sizeof(zval
*));
275 zargs
[0] = zend_read_property(Z_OBJCE_P(getThis()), getThis(), ZEND_STRL("value"), 0 TSRMLS_CC
);
276 if (ZEND_NUM_ARGS()) {
277 zend_get_parameters_array(ZEND_NUM_ARGS(), ZEND_NUM_ARGS(), &zargs
[1]);
280 if (SUCCESS
== call_user_function(NULL
, &zparams_obj
, &zctor
, return_value
, ZEND_NUM_ARGS()+1, zargs TSRMLS_CC
)) {
281 RETVAL_ZVAL(zparams_obj
, 0, 1);
289 ZEND_BEGIN_ARG_INFO_EX(ai_HttpHeader_parse
, 0, 0, 1)
290 ZEND_ARG_INFO(0, string
)
291 ZEND_ARG_INFO(0, header_class
)
293 PHP_METHOD(HttpHeader
, parse
)
297 zend_class_entry
*ce
= NULL
;
299 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s|C", &header_str
, &header_len
, &ce
)) {
300 array_init(return_value
);
302 if (SUCCESS
!= php_http_header_parse(header_str
, header_len
, Z_ARRVAL_P(return_value
), NULL
, NULL TSRMLS_CC
)) {
303 zval_dtor(return_value
);
306 if (ce
&& instanceof_function(ce
, php_http_header_class_entry TSRMLS_CC
)) {
308 php_http_array_hashkey_t key
= php_http_array_hashkey_init(0);
311 FOREACH_KEYVAL(pos
, return_value
, key
, val
) {
312 zval
*zho
, *zkey
, *zvalue
;
318 if (key
.type
== HASH_KEY_IS_LONG
) {
319 ZVAL_LONG(zkey
, key
.num
);
321 ZVAL_STRINGL(zkey
, key
.str
, key
.len
- 1, 1);
325 object_init_ex(zho
, ce
);
326 zend_call_method_with_2_params(&zho
, ce
, NULL
, "__construct", NULL
, zkey
, zvalue
);
328 if (key
.type
== HASH_KEY_IS_LONG
) {
329 zend_hash_index_update(Z_ARRVAL_P(return_value
), key
.num
, (void *) &zho
, sizeof(zval
*), NULL
);
331 zend_hash_update(Z_ARRVAL_P(return_value
), key
.str
, key
.len
, (void *) &zho
, sizeof(zval
*), NULL
);
334 zval_ptr_dtor(&zvalue
);
335 zval_ptr_dtor(&zkey
);
342 static zend_function_entry php_http_header_methods
[] = {
343 PHP_ME(HttpHeader
, __construct
, ai_HttpHeader___construct
, ZEND_ACC_PUBLIC
|ZEND_ACC_CTOR
)
344 PHP_ME(HttpHeader
, serialize
, ai_HttpHeader_serialize
, ZEND_ACC_PUBLIC
)
345 ZEND_MALIAS(HttpHeader
, __toString
, serialize
, ai_HttpHeader_serialize
, ZEND_ACC_PUBLIC
)
346 ZEND_MALIAS(HttpHeader
, toString
, serialize
, ai_HttpHeader_serialize
, ZEND_ACC_PUBLIC
)
347 PHP_ME(HttpHeader
, unserialize
, ai_HttpHeader_unserialize
, ZEND_ACC_PUBLIC
)
348 PHP_ME(HttpHeader
, match
, ai_HttpHeader_match
, ZEND_ACC_PUBLIC
)
349 PHP_ME(HttpHeader
, negotiate
, ai_HttpHeader_negotiate
, ZEND_ACC_PUBLIC
)
350 PHP_ME(HttpHeader
, getParams
, ai_HttpHeader_getParams
, ZEND_ACC_PUBLIC
)
351 PHP_ME(HttpHeader
, parse
, ai_HttpHeader_parse
, ZEND_ACC_PUBLIC
|ZEND_ACC_STATIC
)
355 zend_class_entry
*php_http_header_class_entry
;
357 PHP_MINIT_FUNCTION(http_header
)
359 zend_class_entry ce
= {0};
361 INIT_NS_CLASS_ENTRY(ce
, "http", "Header", php_http_header_methods
);
362 php_http_header_class_entry
= zend_register_internal_class(&ce TSRMLS_CC
);
363 zend_class_implements(php_http_header_class_entry TSRMLS_CC
, 1, zend_ce_serializable
);
364 zend_declare_class_constant_long(php_http_header_class_entry
, ZEND_STRL("MATCH_LOOSE"), PHP_HTTP_MATCH_LOOSE TSRMLS_CC
);
365 zend_declare_class_constant_long(php_http_header_class_entry
, ZEND_STRL("MATCH_CASE"), PHP_HTTP_MATCH_CASE TSRMLS_CC
);
366 zend_declare_class_constant_long(php_http_header_class_entry
, ZEND_STRL("MATCH_WORD"), PHP_HTTP_MATCH_WORD TSRMLS_CC
);
367 zend_declare_class_constant_long(php_http_header_class_entry
, ZEND_STRL("MATCH_FULL"), PHP_HTTP_MATCH_FULL TSRMLS_CC
);
368 zend_declare_class_constant_long(php_http_header_class_entry
, ZEND_STRL("MATCH_STRICT"), PHP_HTTP_MATCH_STRICT TSRMLS_CC
);
369 zend_declare_property_null(php_http_header_class_entry
, ZEND_STRL("name"), ZEND_ACC_PUBLIC TSRMLS_CC
);
370 zend_declare_property_null(php_http_header_class_entry
, ZEND_STRL("value"), ZEND_ACC_PUBLIC TSRMLS_CC
);
380 * vim600: noet sw=4 ts=4 fdm=marker
381 * vim<600: noet sw=4 ts=4