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"
14 #include "php_variables.h"
16 PHP_RINIT_FUNCTION(http_env
)
18 PHP_HTTP_G
->env
.request
.time
= sapi_get_request_time(TSRMLS_C
);
20 /* populate form data on non-POST requests */
21 if (SG(request_info
).request_method
&& strcasecmp(SG(request_info
).request_method
, "POST") && SG(request_info
).content_type
&& *SG(request_info
).content_type
) {
22 uint ct_len
= strlen(SG(request_info
).content_type
);
23 char *ct_str
= estrndup(SG(request_info
).content_type
, ct_len
);
24 php_http_params_opts_t opts
;
27 php_http_params_opts_default_get(&opts
);
28 opts
.input
.str
= ct_str
;
29 opts
.input
.len
= ct_len
;
31 SG(request_info
).content_type_dup
= ct_str
;
33 ZEND_INIT_SYMTABLE(¶ms
);
34 if (php_http_params_parse(¶ms
, &opts TSRMLS_CC
)) {
40 if (HASH_KEY_IS_STRING
== zend_hash_get_current_key_ex(¶ms
, &key_str
, &key_len
, &key_num
, 0, NULL
)) {
41 sapi_post_entry
*post_entry
= NULL
;
43 if (SUCCESS
== zend_hash_find(&SG(known_post_content_types
), key_str
, key_len
, (void *) &post_entry
)) {
44 zval
*files
= PG(http_globals
)[TRACK_VARS_FILES
];
46 zend_is_auto_global(ZEND_STRL("_POST") TSRMLS_CC
);
49 SG(request_info
).post_entry
= post_entry
;
51 if (post_entry
->post_reader
) {
52 post_entry
->post_reader(TSRMLS_C
);
56 if (sapi_module
.default_post_reader
) {
57 sapi_module
.default_post_reader(TSRMLS_C
);
60 sapi_handle_post(PG(http_globals
)[TRACK_VARS_POST
] TSRMLS_CC
);
63 * the rfc1867 handler is an awkward buddy
65 if (files
!= PG(http_globals
)[TRACK_VARS_FILES
] && PG(http_globals
)[TRACK_VARS_FILES
]) {
66 Z_ADDREF_P(PG(http_globals
)[TRACK_VARS_FILES
]);
67 zend_hash_update(&EG(symbol_table
), "_FILES", sizeof("_FILES"), &PG(http_globals
)[TRACK_VARS_FILES
], sizeof(zval
*), NULL
);
69 zval_ptr_dtor(&files
);
74 zend_hash_destroy(¶ms
);
78 STR_SET(SG(request_info
).content_type_dup
, NULL
);
83 PHP_RSHUTDOWN_FUNCTION(http_env
)
85 if (PHP_HTTP_G
->env
.request
.headers
) {
86 zend_hash_destroy(PHP_HTTP_G
->env
.request
.headers
);
87 FREE_HASHTABLE(PHP_HTTP_G
->env
.request
.headers
);
88 PHP_HTTP_G
->env
.request
.headers
= NULL
;
90 if (PHP_HTTP_G
->env
.request
.body
) {
91 php_http_message_body_free(&PHP_HTTP_G
->env
.request
.body
);
94 if (PHP_HTTP_G
->env
.server_var
) {
95 zval_ptr_dtor(&PHP_HTTP_G
->env
.server_var
);
96 PHP_HTTP_G
->env
.server_var
= NULL
;
102 PHP_HTTP_API
void php_http_env_get_request_headers(HashTable
*headers TSRMLS_DC
)
104 php_http_array_hashkey_t key
= php_http_array_hashkey_init(0);
105 zval
**hsv
, **header
;
108 if (!PHP_HTTP_G
->env
.request
.headers
) {
109 ALLOC_HASHTABLE(PHP_HTTP_G
->env
.request
.headers
);
110 zend_hash_init(PHP_HTTP_G
->env
.request
.headers
, 0, NULL
, ZVAL_PTR_DTOR
, 0);
112 zend_is_auto_global("_SERVER", lenof("_SERVER") TSRMLS_CC
);
114 if (SUCCESS
== zend_hash_find(&EG(symbol_table
), "_SERVER", sizeof("_SERVER"), (void *) &hsv
) && Z_TYPE_PP(hsv
) == IS_ARRAY
) {
115 FOREACH_KEY(pos
, *hsv
, key
) {
116 if (key
.type
== HASH_KEY_IS_STRING
&& key
.len
> 6 && *key
.str
== 'H' && !strncmp(key
.str
, "HTTP_", 5)) {
118 key
.str
= php_http_pretty_key(estrndup(key
.str
+ 5, key
.len
- 1), key
.len
- 1, 1, 1);
120 zend_hash_get_current_data_ex(Z_ARRVAL_PP(hsv
), (void *) &header
, &pos
);
122 zend_symtable_update(PHP_HTTP_G
->env
.request
.headers
, key
.str
, key
.len
, (void *) header
, sizeof(zval
*), NULL
);
125 } else if (key
.type
== HASH_KEY_IS_STRING
&& key
.len
> 9 && *key
.str
== 'C' && !strncmp(key
.str
, "CONTENT_", 8)) {
126 key
.str
= php_http_pretty_key(estrndup(key
.str
, key
.len
- 1), key
.len
- 1, 1, 1);
128 zend_hash_get_current_data_ex(Z_ARRVAL_PP(hsv
), (void *) &header
, &pos
);
130 zend_symtable_update(PHP_HTTP_G
->env
.request
.headers
, key
.str
, key
.len
, (void *) header
, sizeof(zval
*), NULL
);
139 zend_hash_copy(headers
, PHP_HTTP_G
->env
.request
.headers
, (copy_ctor_func_t
) zval_add_ref
, NULL
, sizeof(zval
*));
143 PHP_HTTP_API
char *php_http_env_get_request_header(const char *name_str
, size_t name_len
, size_t *len TSRMLS_DC
)
146 char *val
= NULL
, *key
= php_http_pretty_key(estrndup(name_str
, name_len
), name_len
, 1, 1);
148 php_http_env_get_request_headers(NULL TSRMLS_CC
);
150 if (SUCCESS
== zend_symtable_find(PHP_HTTP_G
->env
.request
.headers
, key
, name_len
+ 1, (void *) &zvalue
)) {
151 zval
*zcopy
= php_http_ztyp(IS_STRING
, *zvalue
);
153 val
= estrndup(Z_STRVAL_P(zcopy
), Z_STRLEN_P(zcopy
));
155 *len
= Z_STRLEN_P(zcopy
);
157 zval_ptr_dtor(&zcopy
);
165 PHP_HTTP_API
int php_http_env_got_request_header(const char *name_str
, size_t name_len TSRMLS_DC
)
167 char *key
= php_http_pretty_key(estrndup(name_str
, name_len
), name_len
, 1, 1);
170 php_http_env_get_request_headers(NULL TSRMLS_CC
);
171 got
= zend_symtable_exists(PHP_HTTP_G
->env
.request
.headers
, key
, name_len
+ 1);
177 PHP_HTTP_API zval
*php_http_env_get_superglobal(const char *key
, size_t key_len TSRMLS_DC
)
181 zend_is_auto_global(key
, key_len TSRMLS_CC
);
183 if ((SUCCESS
!= zend_hash_find(&EG(symbol_table
), key
, key_len
+ 1, (void *) &hsv
)) || (Z_TYPE_PP(hsv
) != IS_ARRAY
)) {
190 PHP_HTTP_API zval
*php_http_env_get_server_var(const char *key
, size_t key_len
, zend_bool check TSRMLS_DC
)
195 /* if available, this is a lot faster than accessing $_SERVER */
196 if (sapi_module
.getenv
) {
197 if ((!(env
= sapi_module
.getenv((char *) key
, key_len TSRMLS_CC
))) || (check
&& !*env
)) {
200 if (PHP_HTTP_G
->env
.server_var
) {
201 zval_ptr_dtor(&PHP_HTTP_G
->env
.server_var
);
203 MAKE_STD_ZVAL(PHP_HTTP_G
->env
.server_var
);
204 ZVAL_STRING(PHP_HTTP_G
->env
.server_var
, env
, 1);
205 return PHP_HTTP_G
->env
.server_var
;
208 if (!(hsv
= php_http_env_get_superglobal(ZEND_STRL("_SERVER") TSRMLS_CC
))) {
211 if ((SUCCESS
!= zend_symtable_find(Z_ARRVAL_P(hsv
), key
, key_len
+ 1, (void *) &var
))) {
214 if (check
&& !((Z_TYPE_PP(var
) == IS_STRING
) && Z_STRVAL_PP(var
) && Z_STRLEN_PP(var
))) {
220 PHP_HTTP_API php_http_message_body_t
*php_http_env_get_request_body(TSRMLS_D
)
222 if (!PHP_HTTP_G
->env
.request
.body
) {
223 php_stream
*s
= NULL
;
225 if (SG(request_info
).post_data
|| SG(request_info
).raw_post_data
) {
226 if ((s
= php_stream_temp_new())) {
227 /* php://input does not support seek() */
228 if (SG(request_info
).raw_post_data
) {
229 php_stream_write(s
, SG(request_info
).raw_post_data
, SG(request_info
).raw_post_data_length
);
231 php_stream_write(s
, SG(request_info
).post_data
, SG(request_info
).post_data_length
);
233 php_stream_rewind(s
);
235 } else if (sapi_module
.read_post
&& !SG(read_post_bytes
)) {
236 if ((s
= php_stream_temp_new())) {
237 char *buf
= emalloc(4096);
240 while (0 < (len
= sapi_module
.read_post(buf
, 4096 TSRMLS_CC
))) {
241 SG(read_post_bytes
) += len
;
242 php_stream_write(s
, buf
, len
);
250 php_stream_rewind(s
);
253 PHP_HTTP_G
->env
.request
.body
= php_http_message_body_init(NULL
, s TSRMLS_CC
);
256 return PHP_HTTP_G
->env
.request
.body
;
259 PHP_HTTP_API php_http_range_status_t
php_http_env_get_request_ranges(HashTable
*ranges
, size_t length TSRMLS_DC
)
263 long begin
= -1, end
= -1, *ptr
;
265 if (!(range
= php_http_env_get_request_header(ZEND_STRL("Range"), NULL TSRMLS_CC
))) {
266 return PHP_HTTP_RANGE_NO
;
268 if (strncmp(range
, "bytes=", lenof("bytes="))) {
270 return PHP_HTTP_RANGE_NO
;
273 rp
= range
+ lenof("bytes=");
277 switch (c
= *(rp
++)) {
279 /* allow 000... - shall we? */
285 case '1': case '2': case '3':
286 case '4': case '5': case '6':
287 case '7': case '8': case '9':
289 * If the value of the pointer is already set (non-negative)
290 * then multiply its value by ten and add the current value,
291 * else initialise the pointers value with the current value
293 * This let us recognize empty fields when validating the
294 * ranges, i.e. a "-10" for begin and "12345" for the end
295 * was the following range request: "Range: bytes=0-12345";
296 * While a "-1" for begin and "12345" for the end would
297 * have been: "Range: bytes=-12345".
318 /* validate ranges */
326 return PHP_HTTP_RANGE_NO
;
334 if (length
<= (size_t) end
) {
345 if (end
== -1 || end
== -10) {
347 return PHP_HTTP_RANGE_ERR
;
349 begin
= length
- end
;
355 if (length
<= (size_t) begin
) {
357 return PHP_HTTP_RANGE_ERR
;
363 return PHP_HTTP_RANGE_ERR
;
372 if (length
<= (size_t) end
) {
374 } else if (end
< begin
) {
376 return PHP_HTTP_RANGE_ERR
;
384 MAKE_STD_ZVAL(zentry
);
386 add_index_long(zentry
, 0, begin
);
387 add_index_long(zentry
, 1, end
);
388 zend_hash_next_index_insert(ranges
, &zentry
, sizeof(zval
*), NULL
);
398 return PHP_HTTP_RANGE_NO
;
403 return PHP_HTTP_RANGE_OK
;
406 static void grab_headers(void *data
, void *arg TSRMLS_DC
)
408 php_http_buffer_appendl(PHP_HTTP_BUFFER(arg
), ((sapi_header_struct
*)data
)->header
);
409 php_http_buffer_appends(PHP_HTTP_BUFFER(arg
), PHP_HTTP_CRLF
);
412 PHP_HTTP_API STATUS
php_http_env_get_response_headers(HashTable
*headers_ht TSRMLS_DC
)
415 php_http_buffer_t headers
;
417 php_http_buffer_init(&headers
);
418 zend_llist_apply_with_argument(&SG(sapi_headers
).headers
, grab_headers
, &headers TSRMLS_CC
);
419 php_http_buffer_fix(&headers
);
421 status
= php_http_headers_parse(PHP_HTTP_BUFFER_VAL(&headers
), PHP_HTTP_BUFFER_LEN(&headers
), headers_ht
, NULL
, NULL TSRMLS_CC
);
422 php_http_buffer_dtor(&headers
);
427 PHP_HTTP_API
char *php_http_env_get_response_header(const char *name_str
, size_t name_len TSRMLS_DC
)
432 zend_hash_init(&headers
, 0, NULL
, ZVAL_PTR_DTOR
, 0);
433 if (SUCCESS
== php_http_env_get_response_headers(&headers TSRMLS_CC
)) {
435 char *key
= php_http_pretty_key(estrndup(name_str
, name_len
), name_len
, 1, 1);
437 if (SUCCESS
== zend_symtable_find(&headers
, key
, name_len
+ 1, (void *) &zvalue
)) {
438 zval
*zcopy
= php_http_ztyp(IS_STRING
, *zvalue
);
440 val
= estrndup(Z_STRVAL_P(zcopy
), Z_STRLEN_P(zcopy
));
441 zval_ptr_dtor(&zcopy
);
446 zend_hash_destroy(&headers
);
451 PHP_HTTP_API
long php_http_env_get_response_code(TSRMLS_D
)
453 long code
= SG(sapi_headers
).http_response_code
;
454 return code
? code
: 200;
457 PHP_HTTP_API STATUS
php_http_env_set_response_code(long http_code TSRMLS_DC
)
459 return sapi_header_op(SAPI_HEADER_SET_STATUS
, (void *) http_code TSRMLS_CC
);
462 PHP_HTTP_API STATUS
php_http_env_set_response_status_line(long code
, php_http_version_t
*v TSRMLS_DC
)
464 sapi_header_line h
= {NULL
, 0, 0};
467 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
));
468 ret
= sapi_header_op(SAPI_HEADER_REPLACE
, (void *) &h TSRMLS_CC
);
474 PHP_HTTP_API STATUS
php_http_env_set_response_protocol_version(php_http_version_t
*v TSRMLS_DC
)
476 return php_http_env_set_response_status_line(php_http_env_get_response_code(TSRMLS_C
), v TSRMLS_CC
);
479 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
)
481 sapi_header_line h
= {estrndup(header_str
, header_len
), header_len
, http_code
};
482 STATUS ret
= sapi_header_op(replace
? SAPI_HEADER_REPLACE
: SAPI_HEADER_ADD
, (void *) &h TSRMLS_CC
);
487 PHP_HTTP_API STATUS
php_http_env_set_response_header_format(long http_code
, zend_bool replace TSRMLS_DC
, const char *fmt
, ...)
490 STATUS ret
= FAILURE
;
491 sapi_header_line h
= {NULL
, 0, http_code
};
494 h
.line_len
= vspprintf(&h
.line
, 0, fmt
, args
);
499 ret
= sapi_header_op(replace
? SAPI_HEADER_REPLACE
: SAPI_HEADER_ADD
, (void *) &h TSRMLS_CC
);
506 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
)
509 sapi_header_line h
= {(char *) name_str
, name_len
, http_code
};
511 return sapi_header_op(SAPI_HEADER_DELETE
, (void *) &h TSRMLS_CC
);
514 if(Z_TYPE_P(value
) == IS_ARRAY
|| Z_TYPE_P(value
) == IS_OBJECT
) {
519 FOREACH_HASH_VAL(pos
, HASH_OF(value
), data_ptr
) {
520 if (SUCCESS
!= php_http_env_set_response_header_value(http_code
, name_str
, name_len
, *data_ptr
, first TSRMLS_CC
)) {
528 zval
*data
= php_http_ztyp(IS_STRING
, value
);
530 if (!Z_STRLEN_P(data
)) {
531 zval_ptr_dtor(&data
);
532 return php_http_env_set_response_header_value(http_code
, name_str
, name_len
, NULL
, replace TSRMLS_CC
);
537 if (name_len
> INT_MAX
) {
540 h
.response_code
= http_code
;
541 h
.line_len
= spprintf(&h
.line
, 0, "%.*s: %.*s", (int) name_len
, name_str
, Z_STRLEN_P(data
), Z_STRVAL_P(data
));
543 ret
= sapi_header_op(replace
? SAPI_HEADER_REPLACE
: SAPI_HEADER_ADD
, (void *) &h TSRMLS_CC
);
545 zval_ptr_dtor(&data
);
554 static PHP_HTTP_STRLIST(php_http_env_response_status
) =
555 PHP_HTTP_STRLIST_ITEM("Continue")
556 PHP_HTTP_STRLIST_ITEM("Switching Protocols")
557 PHP_HTTP_STRLIST_NEXT
558 PHP_HTTP_STRLIST_ITEM("OK")
559 PHP_HTTP_STRLIST_ITEM("Created")
560 PHP_HTTP_STRLIST_ITEM("Accepted")
561 PHP_HTTP_STRLIST_ITEM("Non-Authoritative Information")
562 PHP_HTTP_STRLIST_ITEM("No Content")
563 PHP_HTTP_STRLIST_ITEM("Reset Content")
564 PHP_HTTP_STRLIST_ITEM("Partial Content")
565 PHP_HTTP_STRLIST_NEXT
566 PHP_HTTP_STRLIST_ITEM("Multiple Choices")
567 PHP_HTTP_STRLIST_ITEM("Moved Permanently")
568 PHP_HTTP_STRLIST_ITEM("Found")
569 PHP_HTTP_STRLIST_ITEM("See Other")
570 PHP_HTTP_STRLIST_ITEM("Not Modified")
571 PHP_HTTP_STRLIST_ITEM("Use Proxy")
572 PHP_HTTP_STRLIST_ITEM("(Unused)")
573 PHP_HTTP_STRLIST_ITEM("Temporary Redirect")
574 PHP_HTTP_STRLIST_NEXT
575 PHP_HTTP_STRLIST_ITEM("Bad Request")
576 PHP_HTTP_STRLIST_ITEM("Unauthorized")
577 PHP_HTTP_STRLIST_ITEM("Payment Required")
578 PHP_HTTP_STRLIST_ITEM("Forbidden")
579 PHP_HTTP_STRLIST_ITEM("Not Found")
580 PHP_HTTP_STRLIST_ITEM("Method Not Allowed")
581 PHP_HTTP_STRLIST_ITEM("Not Acceptable")
582 PHP_HTTP_STRLIST_ITEM("Proxy Authentication Required")
583 PHP_HTTP_STRLIST_ITEM("Request Timeout")
584 PHP_HTTP_STRLIST_ITEM("Conflict")
585 PHP_HTTP_STRLIST_ITEM("Gone")
586 PHP_HTTP_STRLIST_ITEM("Length Required")
587 PHP_HTTP_STRLIST_ITEM("Precondition Failed")
588 PHP_HTTP_STRLIST_ITEM("Request Entity Too Large")
589 PHP_HTTP_STRLIST_ITEM("Request URI Too Long")
590 PHP_HTTP_STRLIST_ITEM("Unsupported Media Type")
591 PHP_HTTP_STRLIST_ITEM("Requested Range Not Satisfiable")
592 PHP_HTTP_STRLIST_ITEM("Expectation Failed")
593 PHP_HTTP_STRLIST_NEXT
594 PHP_HTTP_STRLIST_ITEM("Internal Server Error")
595 PHP_HTTP_STRLIST_ITEM("Not Implemented")
596 PHP_HTTP_STRLIST_ITEM("Bad Gateway")
597 PHP_HTTP_STRLIST_ITEM("Service Unavailable")
598 PHP_HTTP_STRLIST_ITEM("Gateway Timeout")
599 PHP_HTTP_STRLIST_ITEM("HTTP Version Not Supported")
600 PHP_HTTP_STRLIST_STOP
603 PHP_HTTP_API
const char *php_http_env_get_response_status_for_code(unsigned code
)
605 return php_http_strlist_find(php_http_env_response_status
, 100, code
);
608 zend_class_entry
*php_http_env_class_entry
;
610 #define PHP_HTTP_BEGIN_ARGS(method, req_args) PHP_HTTP_BEGIN_ARGS_EX(HttpEnv, method, 0, req_args)
611 #define PHP_HTTP_EMPTY_ARGS(method) PHP_HTTP_EMPTY_ARGS_EX(HttpEnv, method, 0)
612 #define PHP_HTTP_ENV_ME(method) PHP_ME(HttpEnv, method, PHP_HTTP_ARGS(HttpEnv, method), ZEND_ACC_PUBLIC|ZEND_ACC_STATIC)
614 PHP_HTTP_BEGIN_ARGS(getRequestHeader
, 0)
615 PHP_HTTP_ARG_VAL(header_name
, 0)
618 PHP_HTTP_BEGIN_ARGS(getRequestBody
, 0)
619 PHP_HTTP_ARG_VAL(body_class_name
, 0)
622 PHP_HTTP_BEGIN_ARGS(getResponseStatusForCode
, 1)
623 PHP_HTTP_ARG_VAL(code
, 0)
626 PHP_HTTP_BEGIN_ARGS(getResponseHeader
, 0)
627 PHP_HTTP_ARG_VAL(header_name
, 0)
630 PHP_HTTP_EMPTY_ARGS(getResponseCode
);
632 PHP_HTTP_BEGIN_ARGS(setResponseHeader
, 1)
633 PHP_HTTP_ARG_VAL(header_name
, 0)
634 PHP_HTTP_ARG_VAL(header_value
, 0)
635 PHP_HTTP_ARG_VAL(response_code
, 0)
636 PHP_HTTP_ARG_VAL(replace_header
, 0)
639 PHP_HTTP_BEGIN_ARGS(setResponseCode
, 1)
640 PHP_HTTP_ARG_VAL(code
, 0)
643 PHP_HTTP_BEGIN_ARGS(negotiateLanguage
, 1)
644 PHP_HTTP_ARG_VAL(supported
, 0)
645 PHP_HTTP_ARG_VAL(result_array
, 1)
648 PHP_HTTP_BEGIN_ARGS(negotiateContentType
, 1)
649 PHP_HTTP_ARG_VAL(supported
, 0)
650 PHP_HTTP_ARG_VAL(result_array
, 1)
653 PHP_HTTP_BEGIN_ARGS(negotiateCharset
, 1)
654 PHP_HTTP_ARG_VAL(supported
, 0)
655 PHP_HTTP_ARG_VAL(result_array
, 1)
658 PHP_HTTP_BEGIN_ARGS(negotiateEncoding
, 1)
659 PHP_HTTP_ARG_VAL(supported
, 0)
660 PHP_HTTP_ARG_VAL(result_array
, 1)
663 PHP_HTTP_BEGIN_ARGS(negotiate
, 2)
664 PHP_HTTP_ARG_VAL(value
, 0)
665 PHP_HTTP_ARG_VAL(supported
, 0)
666 PHP_HTTP_ARG_VAL(primary_type_separator
, 0)
667 PHP_HTTP_ARG_VAL(result_array
, 1)
670 PHP_HTTP_EMPTY_ARGS(statPersistentHandles
);
672 PHP_HTTP_BEGIN_ARGS(cleanPersistentHandles
, 0)
673 PHP_HTTP_ARG_VAL(name
, 0)
674 PHP_HTTP_ARG_VAL(ident
, 0)
677 zend_function_entry php_http_env_method_entry
[] = {
678 PHP_HTTP_ENV_ME(getRequestHeader
)
679 PHP_HTTP_ENV_ME(getRequestBody
)
681 PHP_HTTP_ENV_ME(getResponseStatusForCode
)
683 PHP_HTTP_ENV_ME(getResponseHeader
)
684 PHP_HTTP_ENV_ME(getResponseCode
)
685 PHP_HTTP_ENV_ME(setResponseHeader
)
686 PHP_HTTP_ENV_ME(setResponseCode
)
688 PHP_HTTP_ENV_ME(negotiateLanguage
)
689 PHP_HTTP_ENV_ME(negotiateContentType
)
690 PHP_HTTP_ENV_ME(negotiateEncoding
)
691 PHP_HTTP_ENV_ME(negotiateCharset
)
692 PHP_HTTP_ENV_ME(negotiate
)
694 PHP_HTTP_ENV_ME(statPersistentHandles
)
695 PHP_HTTP_ENV_ME(cleanPersistentHandles
)
700 PHP_METHOD(HttpEnv
, getRequestHeader
)
702 char *header_name_str
= NULL
;
703 int header_name_len
= 0;
705 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|s!", &header_name_str
, &header_name_len
)) {
706 if (header_name_str
&& header_name_len
) {
707 size_t header_length
;
708 char *header_value
= php_http_env_get_request_header(header_name_str
, header_name_len
, &header_length TSRMLS_CC
);
711 RETURN_STRINGL(header_value
, header_length
, 0);
715 array_init(return_value
);
716 php_http_env_get_request_headers(Z_ARRVAL_P(return_value
) TSRMLS_CC
);
723 PHP_METHOD(HttpEnv
, getRequestBody
)
725 with_error_handling(EH_THROW
, php_http_exception_class_entry
) {
726 zend_class_entry
*class_entry
= php_http_message_body_class_entry
;
728 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|C", &class_entry
)) {
729 zend_object_value ov
;
730 php_http_message_body_t
*body
= php_http_env_get_request_body(TSRMLS_C
);
732 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
)) {
733 RETVAL_OBJVAL(ov
, 0);
736 } end_error_handling();
739 PHP_METHOD(HttpEnv
, getResponseStatusForCode
)
743 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "l", &code
)) {
744 RETURN_STRING(php_http_env_get_response_status_for_code(code
), 1);
749 PHP_METHOD(HttpEnv
, getResponseHeader
)
751 char *header_name_str
= NULL
;
752 int header_name_len
= 0;
754 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|s!", &header_name_str
, &header_name_len
)) {
755 if (header_name_str
&& header_name_len
) {
756 char *header_value
= php_http_env_get_response_header(header_name_str
, header_name_len TSRMLS_CC
);
759 RETURN_STRING(header_value
, 0);
763 array_init(return_value
);
764 php_http_env_get_response_headers(Z_ARRVAL_P(return_value
) TSRMLS_CC
);
771 PHP_METHOD(HttpEnv
, getResponseCode
)
773 if (SUCCESS
== zend_parse_parameters_none()) {
774 RETURN_LONG(php_http_env_get_response_code(TSRMLS_C
));
779 PHP_METHOD(HttpEnv
, setResponseHeader
)
781 char *header_name_str
;
783 zval
*header_value
= NULL
;
785 zend_bool replace_header
= 1;
787 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s|z!lb", &header_name_str
, &header_name_len
, &header_value
, &code
, &replace_header
)) {
788 RETURN_SUCCESS(php_http_env_set_response_header_value(code
, header_name_str
, header_name_len
, header_value
, replace_header TSRMLS_CC
));
793 PHP_METHOD(HttpEnv
, setResponseCode
)
797 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "l", &code
)) {
798 RETURN_SUCCESS(php_http_env_set_response_code(code TSRMLS_CC
));
803 PHP_METHOD(HttpEnv
, negotiateLanguage
)
805 HashTable
*supported
;
806 zval
*rs_array
= NULL
;
808 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "H|z", &supported
, &rs_array
)) {
811 array_init(rs_array
);
814 PHP_HTTP_DO_NEGOTIATE(language
, supported
, rs_array
);
820 PHP_METHOD(HttpEnv
, negotiateCharset
)
822 HashTable
*supported
;
823 zval
*rs_array
= NULL
;
825 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "H|z", &supported
, &rs_array
)) {
828 array_init(rs_array
);
830 PHP_HTTP_DO_NEGOTIATE(charset
, supported
, rs_array
);
836 PHP_METHOD(HttpEnv
, negotiateEncoding
)
838 HashTable
*supported
;
839 zval
*rs_array
= NULL
;
841 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "H|z", &supported
, &rs_array
)) {
844 array_init(rs_array
);
846 PHP_HTTP_DO_NEGOTIATE(encoding
, supported
, rs_array
);
852 PHP_METHOD(HttpEnv
, negotiateContentType
)
854 HashTable
*supported
;
855 zval
*rs_array
= NULL
;
857 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "H|z", &supported
, &rs_array
)) {
860 array_init(rs_array
);
862 PHP_HTTP_DO_NEGOTIATE(content_type
, supported
, rs_array
);
868 PHP_METHOD(HttpEnv
, negotiate
)
870 HashTable
*supported
;
871 zval
*rs_array
= NULL
;
872 char *value_str
, *sep_str
= NULL
;
873 int value_len
, sep_len
= 0;
875 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "sH|s!z", &value_str
, &value_len
, &supported
, &sep_str
, &sep_len
, &rs_array
)) {
880 array_init(rs_array
);
883 if ((rs
= php_http_negotiate(value_str
, value_len
, supported
, sep_str
, sep_len TSRMLS_CC
))) {
884 PHP_HTTP_DO_NEGOTIATE_HANDLE_RESULT(rs
, supported
, rs_array
);
886 PHP_HTTP_DO_NEGOTIATE_HANDLE_DEFAULT(supported
, rs_array
);
893 PHP_METHOD(HttpEnv
, statPersistentHandles
)
895 if (SUCCESS
== zend_parse_parameters_none()) {
896 object_init(return_value
);
897 if (php_http_persistent_handle_statall(HASH_OF(return_value
) TSRMLS_CC
)) {
900 zval_dtor(return_value
);
905 PHP_METHOD(HttpEnv
, cleanPersistentHandles
)
907 char *name_str
= NULL
, *ident_str
= NULL
;
908 int name_len
= 0, ident_len
= 0;
910 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|s!s!", &name_str
, &name_len
, &ident_str
, &ident_len
)) {
911 php_http_persistent_handle_cleanup(name_str
, name_len
, ident_str
, ident_len TSRMLS_CC
);
915 PHP_MINIT_FUNCTION(http_env
)
917 PHP_HTTP_REGISTER_CLASS(http
, Env
, http_env
, NULL
, 0);
928 * vim600: noet sw=4 ts=4 fdm=marker
929 * vim<600: noet sw=4 ts=4