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 accomp395anying LICENSE file are met. |
8 +--------------------------------------------------------------------+
9 | Copyright (c) 2004-2011, Michael Wallner <mike@php.net> |
10 +--------------------------------------------------------------------+
13 #include "php_http_api.h"
15 PHP_RINIT_FUNCTION(http_env
)
17 PHP_HTTP_G
->env
.request
.time
= sapi_get_request_time(TSRMLS_C
);
22 PHP_RSHUTDOWN_FUNCTION(http_env
)
24 if (PHP_HTTP_G
->env
.request
.headers
) {
25 zend_hash_destroy(PHP_HTTP_G
->env
.request
.headers
);
26 FREE_HASHTABLE(PHP_HTTP_G
->env
.request
.headers
);
27 PHP_HTTP_G
->env
.request
.headers
= NULL
;
29 if (PHP_HTTP_G
->env
.request
.body
) {
30 php_http_message_body_free(&PHP_HTTP_G
->env
.request
.body
);
33 if (PHP_HTTP_G
->env
.server_var
) {
34 zval_ptr_dtor(&PHP_HTTP_G
->env
.server_var
);
35 PHP_HTTP_G
->env
.server_var
= NULL
;
41 PHP_HTTP_API
void php_http_env_get_request_headers(HashTable
*headers TSRMLS_DC
)
43 php_http_array_hashkey_t key
= php_http_array_hashkey_init(0);
47 if (!PHP_HTTP_G
->env
.request
.headers
) {
48 ALLOC_HASHTABLE(PHP_HTTP_G
->env
.request
.headers
);
49 zend_hash_init(PHP_HTTP_G
->env
.request
.headers
, 0, NULL
, ZVAL_PTR_DTOR
, 0);
51 zend_is_auto_global("_SERVER", lenof("_SERVER") TSRMLS_CC
);
53 if (SUCCESS
== zend_hash_find(&EG(symbol_table
), "_SERVER", sizeof("_SERVER"), (void *) &hsv
) && Z_TYPE_PP(hsv
) == IS_ARRAY
) {
54 FOREACH_KEY(pos
, *hsv
, key
) {
55 if (key
.type
== HASH_KEY_IS_STRING
&& key
.len
> 6 && !strncmp(key
.str
, "HTTP_", 5)) {
57 key
.str
= php_http_pretty_key(estrndup(key
.str
+ 5, key
.len
- 1), key
.len
- 1, 1, 1);
59 zend_hash_get_current_data_ex(Z_ARRVAL_PP(hsv
), (void *) &header
, &pos
);
61 zend_symtable_update(PHP_HTTP_G
->env
.request
.headers
, key
.str
, key
.len
, (void *) header
, sizeof(zval
*), NULL
);
70 zend_hash_copy(headers
, PHP_HTTP_G
->env
.request
.headers
, (copy_ctor_func_t
) zval_add_ref
, NULL
, sizeof(zval
*));
74 PHP_HTTP_API
char *php_http_env_get_request_header(const char *name_str
, size_t name_len
, size_t *len TSRMLS_DC
)
77 char *val
= NULL
, *key
= php_http_pretty_key(estrndup(name_str
, name_len
), name_len
, 1, 1);
79 php_http_env_get_request_headers(NULL TSRMLS_CC
);
81 if (SUCCESS
== zend_symtable_find(PHP_HTTP_G
->env
.request
.headers
, key
, name_len
+ 1, (void *) &zvalue
)) {
82 zval
*zcopy
= php_http_ztyp(IS_STRING
, *zvalue
);
84 val
= estrndup(Z_STRVAL_P(zcopy
), Z_STRLEN_P(zcopy
));
86 *len
= Z_STRLEN_P(zcopy
);
88 zval_ptr_dtor(&zcopy
);
96 PHP_HTTP_API
int php_http_env_got_request_header(const char *name_str
, size_t name_len TSRMLS_DC
)
98 char *key
= php_http_pretty_key(estrndup(name_str
, name_len
), name_len
, 1, 1);
101 php_http_env_get_request_headers(NULL TSRMLS_CC
);
102 got
= zend_symtable_exists(PHP_HTTP_G
->env
.request
.headers
, key
, name_len
+ 1);
108 PHP_HTTP_API zval
*php_http_env_get_superglobal(const char *key
, size_t key_len TSRMLS_DC
)
112 zend_is_auto_global(key
, key_len TSRMLS_CC
);
114 if ((SUCCESS
!= zend_hash_find(&EG(symbol_table
), key
, key_len
+ 1, (void *) &hsv
)) || (Z_TYPE_PP(hsv
) != IS_ARRAY
)) {
121 PHP_HTTP_API zval
*php_http_env_get_server_var(const char *key
, size_t key_len
, zend_bool check TSRMLS_DC
)
126 /* if available, this is a lot faster than accessing $_SERVER */
127 if (sapi_module
.getenv
) {
128 if ((!(env
= sapi_module
.getenv((char *) key
, key_len TSRMLS_CC
))) || (check
&& !*env
)) {
131 if (PHP_HTTP_G
->env
.server_var
) {
132 zval_ptr_dtor(&PHP_HTTP_G
->env
.server_var
);
134 MAKE_STD_ZVAL(PHP_HTTP_G
->env
.server_var
);
135 ZVAL_STRING(PHP_HTTP_G
->env
.server_var
, env
, 1);
136 return PHP_HTTP_G
->env
.server_var
;
139 if (!(hsv
= php_http_env_get_superglobal(ZEND_STRL("_SERVER") TSRMLS_CC
))) {
142 if ((SUCCESS
!= zend_symtable_find(Z_ARRVAL_P(hsv
), key
, key_len
+ 1, (void *) &var
))) {
145 if (check
&& !((Z_TYPE_PP(var
) == IS_STRING
) && Z_STRVAL_PP(var
) && Z_STRLEN_PP(var
))) {
151 PHP_HTTP_API php_http_message_body_t
*php_http_env_get_request_body(TSRMLS_D
)
153 if (!PHP_HTTP_G
->env
.request
.body
) {
154 php_stream
*s
= NULL
;
156 if (SG(request_info
).post_data
|| SG(request_info
).raw_post_data
) {
157 if ((s
= php_stream_temp_new())) {
158 /* php://input does not support seek() */
159 if (SG(request_info
).raw_post_data
) {
160 php_stream_write(s
, SG(request_info
).raw_post_data
, SG(request_info
).raw_post_data_length
);
162 php_stream_write(s
, SG(request_info
).post_data
, SG(request_info
).post_data_length
);
164 php_stream_rewind(s
);
166 } else if (sapi_module
.read_post
&& !SG(read_post_bytes
)) {
167 if ((s
= php_stream_temp_new())) {
168 char *buf
= emalloc(4096);
171 while (0 < (len
= sapi_module
.read_post(buf
, 4096 TSRMLS_CC
))) {
172 SG(read_post_bytes
) += len
;
173 php_stream_write(s
, buf
, len
);
181 php_stream_rewind(s
);
184 PHP_HTTP_G
->env
.request
.body
= php_http_message_body_init(NULL
, s TSRMLS_CC
);
187 return PHP_HTTP_G
->env
.request
.body
;
190 PHP_HTTP_API php_http_range_status_t
php_http_env_get_request_ranges(HashTable
*ranges
, size_t length TSRMLS_DC
)
194 long begin
= -1, end
= -1, *ptr
;
196 if (!(range
= php_http_env_get_request_header(ZEND_STRL("Range"), NULL TSRMLS_CC
))) {
197 return PHP_HTTP_RANGE_NO
;
199 if (strncmp(range
, "bytes=", lenof("bytes="))) {
201 return PHP_HTTP_RANGE_NO
;
204 rp
= range
+ lenof("bytes=");
208 switch (c
= *(rp
++)) {
210 /* allow 000... - shall we? */
216 case '1': case '2': case '3':
217 case '4': case '5': case '6':
218 case '7': case '8': case '9':
220 * If the value of the pointer is already set (non-negative)
221 * then multiply its value by ten and add the current value,
222 * else initialise the pointers value with the current value
224 * This let us recognize empty fields when validating the
225 * ranges, i.e. a "-10" for begin and "12345" for the end
226 * was the following range request: "Range: bytes=0-12345";
227 * While a "-1" for begin and "12345" for the end would
228 * have been: "Range: bytes=-12345".
249 /* validate ranges */
257 return PHP_HTTP_RANGE_NO
;
265 if (length
<= (size_t) end
) {
276 if (end
== -1 || end
== -10) {
278 return PHP_HTTP_RANGE_ERR
;
280 begin
= length
- end
;
286 if (length
<= (size_t) begin
) {
288 return PHP_HTTP_RANGE_ERR
;
294 return PHP_HTTP_RANGE_ERR
;
303 if (length
<= (size_t) end
) {
305 } else if (end
< begin
) {
307 return PHP_HTTP_RANGE_ERR
;
315 MAKE_STD_ZVAL(zentry
);
317 add_index_long(zentry
, 0, begin
);
318 add_index_long(zentry
, 1, end
);
319 zend_hash_next_index_insert(ranges
, &zentry
, sizeof(zval
*), NULL
);
329 return PHP_HTTP_RANGE_NO
;
334 return PHP_HTTP_RANGE_OK
;
337 static void grab_headers(void *data
, void *arg TSRMLS_DC
)
339 php_http_buffer_appendl(PHP_HTTP_BUFFER(arg
), ((sapi_header_struct
*)data
)->header
);
340 php_http_buffer_appends(PHP_HTTP_BUFFER(arg
), PHP_HTTP_CRLF
);
343 PHP_HTTP_API STATUS
php_http_env_get_response_headers(HashTable
*headers_ht TSRMLS_DC
)
346 php_http_buffer_t headers
;
348 php_http_buffer_init(&headers
);
349 zend_llist_apply_with_argument(&SG(sapi_headers
).headers
, grab_headers
, &headers TSRMLS_CC
);
350 php_http_buffer_fix(&headers
);
352 status
= php_http_headers_parse(PHP_HTTP_BUFFER_VAL(&headers
), PHP_HTTP_BUFFER_LEN(&headers
), headers_ht
, NULL
, NULL TSRMLS_CC
);
353 php_http_buffer_dtor(&headers
);
358 PHP_HTTP_API
char *php_http_env_get_response_header(const char *name_str
, size_t name_len TSRMLS_DC
)
363 zend_hash_init(&headers
, 0, NULL
, NULL
, 0);
364 if (SUCCESS
== php_http_env_get_response_headers(&headers TSRMLS_CC
)) {
366 char *key
= php_http_pretty_key(estrndup(name_str
, name_len
), name_len
, 1, 1);
368 if (SUCCESS
== zend_symtable_find(&headers
, key
, name_len
+ 1, (void *) &zvalue
)) {
369 zval
*zcopy
= php_http_ztyp(IS_STRING
, *zvalue
);
371 val
= estrndup(Z_STRVAL_P(zcopy
), Z_STRLEN_P(zcopy
));
372 zval_ptr_dtor(&zcopy
);
377 zend_hash_destroy(&headers
);
382 PHP_HTTP_API
long php_http_env_get_response_code(TSRMLS_D
)
384 long code
= SG(sapi_headers
).http_response_code
;
385 return code
? code
: 200;
388 PHP_HTTP_API STATUS
php_http_env_set_response_code(long http_code TSRMLS_DC
)
390 return sapi_header_op(SAPI_HEADER_SET_STATUS
, (void *) http_code TSRMLS_CC
);
393 PHP_HTTP_API STATUS
php_http_env_set_response_status_line(long code
, php_http_version_t
*v TSRMLS_DC
)
395 sapi_header_line h
= {NULL
, 0, 0};
398 h
.line_len
= spprintf(&h
.line
, 0, "HTTP/%u.%u %ld %s", v
->major
, v
->minor
, code
, php_http_env_get_response_status_for_code(code
));
399 ret
= sapi_header_op(SAPI_HEADER_REPLACE
, (void *) &h TSRMLS_CC
);
405 PHP_HTTP_API STATUS
php_http_env_set_response_protocol_version(php_http_version_t
*v TSRMLS_DC
)
407 return php_http_env_set_response_status_line(php_http_env_get_response_code(TSRMLS_C
), v TSRMLS_CC
);
410 PHP_HTTP_API STATUS
php_http_env_set_response_header(long http_code
, const char *header_str
, size_t header_len
, zend_bool replace TSRMLS_DC
)
412 sapi_header_line h
= {estrndup(header_str
, header_len
), header_len
, http_code
};
413 STATUS ret
= sapi_header_op(replace
? SAPI_HEADER_REPLACE
: SAPI_HEADER_ADD
, (void *) &h TSRMLS_CC
);
418 PHP_HTTP_API STATUS
php_http_env_set_response_header_format(long http_code
, zend_bool replace TSRMLS_DC
, const char *fmt
, ...)
421 STATUS ret
= FAILURE
;
422 sapi_header_line h
= {NULL
, 0, http_code
};
425 h
.line_len
= vspprintf(&h
.line
, 0, fmt
, args
);
430 ret
= sapi_header_op(replace
? SAPI_HEADER_REPLACE
: SAPI_HEADER_ADD
, (void *) &h TSRMLS_CC
);
437 PHP_HTTP_API STATUS
php_http_env_set_response_header_value(long http_code
, const char *name_str
, size_t name_len
, zval
*value
, zend_bool replace TSRMLS_DC
)
440 sapi_header_line h
= {(char *) name_str
, name_len
, http_code
};
442 return sapi_header_op(SAPI_HEADER_DELETE
, (void *) &h TSRMLS_CC
);
445 if(Z_TYPE_P(value
) == IS_ARRAY
|| Z_TYPE_P(value
) == IS_OBJECT
) {
450 FOREACH_HASH_VAL(pos
, HASH_OF(value
), data_ptr
) {
451 if (SUCCESS
!= php_http_env_set_response_header_value(http_code
, name_str
, name_len
, *data_ptr
, first TSRMLS_CC
)) {
459 zval
*data
= php_http_ztyp(IS_STRING
, value
);
461 if (!Z_STRLEN_P(data
)) {
462 zval_ptr_dtor(&data
);
463 return php_http_env_set_response_header_value(http_code
, name_str
, name_len
, NULL
, replace TSRMLS_CC
);
468 if (name_len
> INT_MAX
) {
471 h
.response_code
= http_code
;
472 h
.line_len
= spprintf(&h
.line
, 0, "%.*s: %.*s", (int) name_len
, name_str
, Z_STRLEN_P(data
), Z_STRVAL_P(data
));
474 ret
= sapi_header_op(replace
? SAPI_HEADER_REPLACE
: SAPI_HEADER_ADD
, (void *) &h TSRMLS_CC
);
476 zval_ptr_dtor(&data
);
485 static PHP_HTTP_STRLIST(php_http_env_response_status
) =
486 PHP_HTTP_STRLIST_ITEM("Continue")
487 PHP_HTTP_STRLIST_ITEM("Switching Protocols")
488 PHP_HTTP_STRLIST_NEXT
489 PHP_HTTP_STRLIST_ITEM("OK")
490 PHP_HTTP_STRLIST_ITEM("Created")
491 PHP_HTTP_STRLIST_ITEM("Accepted")
492 PHP_HTTP_STRLIST_ITEM("Non-Authoritative Information")
493 PHP_HTTP_STRLIST_ITEM("No Content")
494 PHP_HTTP_STRLIST_ITEM("Reset Content")
495 PHP_HTTP_STRLIST_ITEM("Partial Content")
496 PHP_HTTP_STRLIST_NEXT
497 PHP_HTTP_STRLIST_ITEM("Multiple Choices")
498 PHP_HTTP_STRLIST_ITEM("Moved Permanently")
499 PHP_HTTP_STRLIST_ITEM("Found")
500 PHP_HTTP_STRLIST_ITEM("See Other")
501 PHP_HTTP_STRLIST_ITEM("Not Modified")
502 PHP_HTTP_STRLIST_ITEM("Use Proxy")
503 PHP_HTTP_STRLIST_ITEM("(Unused)")
504 PHP_HTTP_STRLIST_ITEM("Temporary Redirect")
505 PHP_HTTP_STRLIST_NEXT
506 PHP_HTTP_STRLIST_ITEM("Bad Request")
507 PHP_HTTP_STRLIST_ITEM("Unauthorized")
508 PHP_HTTP_STRLIST_ITEM("Payment Required")
509 PHP_HTTP_STRLIST_ITEM("Forbidden")
510 PHP_HTTP_STRLIST_ITEM("Not Found")
511 PHP_HTTP_STRLIST_ITEM("Method Not Allowed")
512 PHP_HTTP_STRLIST_ITEM("Not Acceptable")
513 PHP_HTTP_STRLIST_ITEM("Proxy Authentication Required")
514 PHP_HTTP_STRLIST_ITEM("Request Timeout")
515 PHP_HTTP_STRLIST_ITEM("Conflict")
516 PHP_HTTP_STRLIST_ITEM("Gone")
517 PHP_HTTP_STRLIST_ITEM("Length Required")
518 PHP_HTTP_STRLIST_ITEM("Precondition Failed")
519 PHP_HTTP_STRLIST_ITEM("Request Entity Too Large")
520 PHP_HTTP_STRLIST_ITEM("Request URI Too Long")
521 PHP_HTTP_STRLIST_ITEM("Unsupported Media Type")
522 PHP_HTTP_STRLIST_ITEM("Requested Range Not Satisfiable")
523 PHP_HTTP_STRLIST_ITEM("Expectation Failed")
524 PHP_HTTP_STRLIST_NEXT
525 PHP_HTTP_STRLIST_ITEM("Internal Server Error")
526 PHP_HTTP_STRLIST_ITEM("Not Implemented")
527 PHP_HTTP_STRLIST_ITEM("Bad Gateway")
528 PHP_HTTP_STRLIST_ITEM("Service Unavailable")
529 PHP_HTTP_STRLIST_ITEM("Gateway Timeout")
530 PHP_HTTP_STRLIST_ITEM("HTTP Version Not Supported")
531 PHP_HTTP_STRLIST_STOP
534 PHP_HTTP_API
const char *php_http_env_get_response_status_for_code(unsigned code
)
536 return php_http_strlist_find(php_http_env_response_status
, 100, code
);
539 zend_class_entry
*php_http_env_class_entry
;
541 #define PHP_HTTP_BEGIN_ARGS(method, req_args) PHP_HTTP_BEGIN_ARGS_EX(HttpEnv, method, 0, req_args)
542 #define PHP_HTTP_EMPTY_ARGS(method) PHP_HTTP_EMPTY_ARGS_EX(HttpEnv, method, 0)
543 #define PHP_HTTP_ENV_ME(method) PHP_ME(HttpEnv, method, PHP_HTTP_ARGS(HttpEnv, method), ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
545 PHP_HTTP_BEGIN_ARGS(getRequestHeader
, 0)
546 PHP_HTTP_ARG_VAL(header_name
, 0)
549 PHP_HTTP_BEGIN_ARGS(getRequestBody
, 0)
550 PHP_HTTP_ARG_VAL(body_class_name
, 0)
553 PHP_HTTP_BEGIN_ARGS(getResponseStatusForCode
, 1)
554 PHP_HTTP_ARG_VAL(code
, 0)
557 PHP_HTTP_BEGIN_ARGS(getResponseHeader
, 0)
558 PHP_HTTP_ARG_VAL(header_name
, 0)
561 PHP_HTTP_EMPTY_ARGS(getResponseCode
);
563 PHP_HTTP_BEGIN_ARGS(setResponseHeader
, 1)
564 PHP_HTTP_ARG_VAL(header_name
, 0)
565 PHP_HTTP_ARG_VAL(header_value
, 0)
566 PHP_HTTP_ARG_VAL(response_code
, 0)
567 PHP_HTTP_ARG_VAL(replace_header
, 0)
570 PHP_HTTP_BEGIN_ARGS(setResponseCode
, 1)
571 PHP_HTTP_ARG_VAL(code
, 0)
574 PHP_HTTP_BEGIN_ARGS(negotiateLanguage
, 1)
575 PHP_HTTP_ARG_VAL(supported
, 0)
576 PHP_HTTP_ARG_VAL(result_array
, 1)
579 PHP_HTTP_BEGIN_ARGS(negotiateContentType
, 1)
580 PHP_HTTP_ARG_VAL(supported
, 0)
581 PHP_HTTP_ARG_VAL(result_array
, 1)
584 PHP_HTTP_BEGIN_ARGS(negotiateCharset
, 1)
585 PHP_HTTP_ARG_VAL(supported
, 0)
586 PHP_HTTP_ARG_VAL(result_array
, 1)
589 PHP_HTTP_BEGIN_ARGS(negotiateEncoding
, 1)
590 PHP_HTTP_ARG_VAL(supported
, 0)
591 PHP_HTTP_ARG_VAL(result_array
, 1)
594 PHP_HTTP_BEGIN_ARGS(negotiate
, 2)
595 PHP_HTTP_ARG_VAL(value
, 0)
596 PHP_HTTP_ARG_VAL(supported
, 0)
597 PHP_HTTP_ARG_VAL(primary_type_separator
, 0)
598 PHP_HTTP_ARG_VAL(result_array
, 1)
601 PHP_HTTP_EMPTY_ARGS(statPersistentHandles
);
603 PHP_HTTP_BEGIN_ARGS(cleanPersistentHandles
, 0)
604 PHP_HTTP_ARG_VAL(name
, 0)
605 PHP_HTTP_ARG_VAL(ident
, 0)
608 zend_function_entry php_http_env_method_entry
[] = {
609 PHP_HTTP_ENV_ME(getRequestHeader
)
610 PHP_HTTP_ENV_ME(getRequestBody
)
612 PHP_HTTP_ENV_ME(getResponseStatusForCode
)
614 PHP_HTTP_ENV_ME(getResponseHeader
)
615 PHP_HTTP_ENV_ME(getResponseCode
)
616 PHP_HTTP_ENV_ME(setResponseHeader
)
617 PHP_HTTP_ENV_ME(setResponseCode
)
619 PHP_HTTP_ENV_ME(negotiateLanguage
)
620 PHP_HTTP_ENV_ME(negotiateContentType
)
621 PHP_HTTP_ENV_ME(negotiateEncoding
)
622 PHP_HTTP_ENV_ME(negotiateCharset
)
623 PHP_HTTP_ENV_ME(negotiate
)
625 PHP_HTTP_ENV_ME(statPersistentHandles
)
626 PHP_HTTP_ENV_ME(cleanPersistentHandles
)
631 PHP_METHOD(HttpEnv
, getRequestHeader
)
633 char *header_name_str
= NULL
;
634 int header_name_len
= 0;
636 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|s!", &header_name_str
, &header_name_len
)) {
637 if (header_name_str
&& header_name_len
) {
638 size_t header_length
;
639 char *header_value
= php_http_env_get_request_header(header_name_str
, header_name_len
, &header_length TSRMLS_CC
);
642 RETURN_STRINGL(header_value
, header_length
, 0);
646 array_init(return_value
);
647 php_http_env_get_request_headers(Z_ARRVAL_P(return_value
) TSRMLS_CC
);
654 PHP_METHOD(HttpEnv
, getRequestBody
)
656 with_error_handling(EH_THROW
, php_http_exception_class_entry
) {
657 zend_class_entry
*class_entry
= php_http_message_body_class_entry
;
659 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|C", &class_entry
)) {
660 zend_object_value ov
;
661 php_http_message_body_t
*body
= php_http_env_get_request_body(TSRMLS_C
);
663 if (SUCCESS
== php_http_new(&ov
, class_entry
, (php_http_new_t
) php_http_message_body_object_new_ex
, php_http_message_body_class_entry
, php_http_message_body_copy(body
, NULL
, 0), NULL TSRMLS_CC
)) {
664 RETURN_OBJVAL(ov
, 0);
667 } end_error_handling();
670 PHP_METHOD(HttpEnv
, getResponseStatusForCode
)
674 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "l", &code
)) {
675 RETURN_STRING(php_http_env_get_response_status_for_code(code
), 1);
680 PHP_METHOD(HttpEnv
, getResponseHeader
)
682 char *header_name_str
= NULL
;
683 int header_name_len
= 0;
685 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|s!", &header_name_str
, &header_name_len
)) {
686 if (header_name_str
&& header_name_len
) {
687 char *header_value
= php_http_env_get_response_header(header_name_str
, header_name_len TSRMLS_CC
);
690 RETURN_STRING(header_value
, 0);
694 array_init(return_value
);
695 php_http_env_get_response_headers(Z_ARRVAL_P(return_value
) TSRMLS_CC
);
702 PHP_METHOD(HttpEnv
, getResponseCode
)
704 if (SUCCESS
== zend_parse_parameters_none()) {
705 RETURN_LONG(php_http_env_get_response_code(TSRMLS_C
));
710 PHP_METHOD(HttpEnv
, setResponseHeader
)
712 char *header_name_str
;
714 zval
*header_value
= NULL
;
716 zend_bool replace_header
= 1;
718 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s|z!lb", &header_name_str
, &header_name_len
, &header_value
, &code
, &replace_header
)) {
719 RETURN_SUCCESS(php_http_env_set_response_header_value(code
, header_name_str
, header_name_len
, header_value
, replace_header TSRMLS_CC
));
724 PHP_METHOD(HttpEnv
, setResponseCode
)
728 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "l", &code
)) {
729 RETURN_SUCCESS(php_http_env_set_response_code(code TSRMLS_CC
));
734 PHP_METHOD(HttpEnv
, negotiateLanguage
)
736 HashTable
*supported
;
737 zval
*rs_array
= NULL
;
739 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "H|z", &supported
, &rs_array
)) {
742 array_init(rs_array
);
745 PHP_HTTP_DO_NEGOTIATE(language
, supported
, rs_array
);
751 PHP_METHOD(HttpEnv
, negotiateCharset
)
753 HashTable
*supported
;
754 zval
*rs_array
= NULL
;
756 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "H|z", &supported
, &rs_array
)) {
759 array_init(rs_array
);
761 PHP_HTTP_DO_NEGOTIATE(charset
, supported
, rs_array
);
767 PHP_METHOD(HttpEnv
, negotiateEncoding
)
769 HashTable
*supported
;
770 zval
*rs_array
= NULL
;
772 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "H|z", &supported
, &rs_array
)) {
775 array_init(rs_array
);
777 PHP_HTTP_DO_NEGOTIATE(encoding
, supported
, rs_array
);
783 PHP_METHOD(HttpEnv
, negotiateContentType
)
785 HashTable
*supported
;
786 zval
*rs_array
= NULL
;
788 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "H|z", &supported
, &rs_array
)) {
791 array_init(rs_array
);
793 PHP_HTTP_DO_NEGOTIATE(content_type
, supported
, rs_array
);
799 PHP_METHOD(HttpEnv
, negotiate
)
801 HashTable
*supported
;
802 zval
*rs_array
= NULL
;
803 char *value_str
, *sep_str
= NULL
;
804 int value_len
, sep_len
= 0;
806 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "sH|s!z", &value_str
, &value_len
, &supported
, &sep_str
, &sep_len
, &rs_array
)) {
811 array_init(rs_array
);
814 if ((rs
= php_http_negotiate(value_str
, value_len
, supported
, sep_str
, sep_len TSRMLS_CC
))) {
815 PHP_HTTP_DO_NEGOTIATE_HANDLE_RESULT(rs
, supported
, rs_array
);
817 PHP_HTTP_DO_NEGOTIATE_HANDLE_DEFAULT(supported
, rs_array
);
824 PHP_METHOD(HttpEnv
, statPersistentHandles
)
826 if (SUCCESS
== zend_parse_parameters_none()) {
827 object_init(return_value
);
828 if (php_http_persistent_handle_statall(HASH_OF(return_value
) TSRMLS_CC
)) {
831 zval_dtor(return_value
);
836 PHP_METHOD(HttpEnv
, cleanPersistentHandles
)
838 char *name_str
= NULL
, *ident_str
= NULL
;
839 int name_len
= 0, ident_len
= 0;
841 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|s!s!", &name_str
, &name_len
, &ident_str
, &ident_len
)) {
842 php_http_persistent_handle_cleanup(name_str
, name_len
, ident_str
, ident_len TSRMLS_CC
);
846 PHP_MINIT_FUNCTION(http_env
)
848 PHP_HTTP_REGISTER_CLASS(http
, Env
, http_env
, NULL
, 0);
859 * vim600: noet sw=4 ts=4 fdm=marker
860 * vim<600: noet sw=4 ts=4