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 static void set_option(zval
*options
, const char *name_str
, size_t name_len
, int type
, void *value_ptr
, size_t value_len TSRMLS_DC
)
17 if (Z_TYPE_P(options
) == IS_OBJECT
) {
21 zend_update_property_double(Z_OBJCE_P(options
), options
, name_str
, name_len
, *(double *)value_ptr TSRMLS_CC
);
24 zend_update_property_long(Z_OBJCE_P(options
), options
, name_str
, name_len
, *(long *)value_ptr TSRMLS_CC
);
27 zend_update_property_stringl(Z_OBJCE_P(options
), options
, name_str
, name_len
, value_ptr
, value_len TSRMLS_CC
);
31 zend_update_property(Z_OBJCE_P(options
), options
, name_str
, name_len
, value_ptr TSRMLS_CC
);
35 zend_update_property_null(Z_OBJCE_P(options
), options
, name_str
, name_len TSRMLS_CC
);
38 convert_to_array(options
);
42 add_assoc_double_ex(options
, name_str
, name_len
+ 1, *(double *)value_ptr
);
45 add_assoc_long_ex(options
, name_str
, name_len
+ 1, *(long *)value_ptr
);
48 char *value
= estrndup(value_ptr
, value_len
);
49 add_assoc_stringl_ex(options
, name_str
, name_len
+ 1, value
, value_len
, 0);
53 Z_ADDREF_P(value_ptr
);
54 add_assoc_zval_ex(options
, name_str
, name_len
+ 1, value_ptr
);
59 add_assoc_null_ex(options
, name_str
, name_len
+ 1);
63 static zval
*get_option(zval
*options
, const char *name_str
, size_t name_len TSRMLS_DC
)
67 if (Z_TYPE_P(options
) == IS_OBJECT
) {
68 val
= zend_read_property(Z_OBJCE_P(options
), options
, name_str
, name_len
, 0 TSRMLS_CC
);
70 if (SUCCESS
== zend_symtable_find(Z_ARRVAL_P(options
), name_str
, name_len
+ 1, (void *) &valptr
)) {
81 static php_http_message_body_t
*get_body(zval
*options TSRMLS_DC
)
84 php_http_message_body_t
*body
= NULL
;
86 if ((zbody
= get_option(options
, ZEND_STRL("body") TSRMLS_CC
))) {
87 if ((Z_TYPE_P(zbody
) == IS_OBJECT
) && instanceof_function(Z_OBJCE_P(zbody
), php_http_message_body_class_entry TSRMLS_CC
)) {
88 php_http_message_body_object_t
*body_obj
= zend_object_store_get_object(zbody TSRMLS_CC
);
90 body
= body_obj
->body
;
92 zval_ptr_dtor(&zbody
);
97 static php_http_message_t
*get_request(zval
*options TSRMLS_DC
)
100 php_http_message_t
*request
= NULL
;
102 if ((zrequest
= get_option(options
, ZEND_STRL("request") TSRMLS_CC
))) {
103 if (Z_TYPE_P(zrequest
) == IS_OBJECT
&& instanceof_function(Z_OBJCE_P(zrequest
), php_http_message_class_entry TSRMLS_CC
)) {
104 php_http_message_object_t
*request_obj
= zend_object_store_get_object(zrequest TSRMLS_CC
);
106 request
= request_obj
->message
;
108 zval_ptr_dtor(&zrequest
);
113 static void set_cookie(zval
*options
, zval
*zcookie_new TSRMLS_DC
)
117 php_http_array_hashkey_t key
= php_http_array_hashkey_init(0);
118 php_http_cookie_object_t
*obj
= zend_object_store_get_object(zcookie_new TSRMLS_CC
);
120 zcookies_set
= get_option(options
, ZEND_STRL("cookies") TSRMLS_CC
);
121 if (!zcookies_set
|| Z_TYPE_P(zcookies_set
) != IS_ARRAY
) {
123 zval_ptr_dtor(&zcookies_set
);
125 MAKE_STD_ZVAL(zcookies_set
);
126 array_init_size(zcookies_set
, zend_hash_num_elements(&obj
->list
->cookies
));
128 SEPARATE_ZVAL(&zcookies_set
);
131 FOREACH_HASH_KEY(pos
, &obj
->list
->cookies
, key
) {
132 Z_ADDREF_P(zcookie_new
);
133 if (key
.type
== HASH_KEY_IS_STRING
) {
134 add_assoc_zval_ex(zcookies_set
, key
.str
, key
.len
, zcookie_new
);
136 add_index_zval(zcookies_set
, key
.num
, zcookie_new
);
140 set_option(options
, ZEND_STRL("cookies"), IS_ARRAY
, zcookies_set
, 0 TSRMLS_CC
);
141 zval_ptr_dtor(&zcookies_set
);
144 php_http_cache_status_t
php_http_env_is_response_cached_by_etag(zval
*options
, const char *header_str
, size_t header_len
, php_http_message_t
*request TSRMLS_DC
)
146 php_http_cache_status_t ret
= PHP_HTTP_CACHE_NO
;
148 char *header
= NULL
, *etag
;
149 php_http_message_body_t
*body
;
153 if (!(body
= get_body(options TSRMLS_CC
))) {
157 if ((zetag
= get_option(options
, ZEND_STRL("etag") TSRMLS_CC
))) {
158 zval
*zetag_copy
= php_http_ztyp(IS_STRING
, zetag
);
159 zval_ptr_dtor(&zetag
);
163 if (zetag
&& Z_STRLEN_P(zetag
)) {
164 etag
= Z_STRVAL_P(zetag
);
165 } else if ((etag
= php_http_message_body_etag(body
))) {
166 set_option(options
, ZEND_STRL("etag"), IS_STRING
, etag
, strlen(etag
) TSRMLS_CC
);
171 zval_ptr_dtor(&zetag
);
174 if (etag
&& (header
= php_http_env_get_request_header(header_str
, header_len
, NULL
, request TSRMLS_CC
))) {
175 ret
= php_http_match(header
, etag
, PHP_HTTP_MATCH_WORD
) ? PHP_HTTP_CACHE_HIT
: PHP_HTTP_CACHE_MISS
;
186 php_http_cache_status_t
php_http_env_is_response_cached_by_last_modified(zval
*options
, const char *header_str
, size_t header_len
, php_http_message_t
*request TSRMLS_DC
)
188 php_http_cache_status_t ret
= PHP_HTTP_CACHE_NO
;
191 php_http_message_body_t
*body
;
194 if (!(body
= get_body(options TSRMLS_CC
))) {
198 if ((zlm
= get_option(options
, ZEND_STRL("lastModified") TSRMLS_CC
))) {
199 zval
*zlm_copy
= php_http_ztyp(IS_LONG
, zlm
);
204 if (zlm
&& Z_LVAL_P(zlm
) > 0) {
207 lm
= php_http_message_body_mtime(body
);
208 set_option(options
, ZEND_STRL("lastModified"), IS_LONG
, &lm
, 0 TSRMLS_CC
);
215 if ((header
= php_http_env_get_request_header(header_str
, header_len
, NULL
, request TSRMLS_CC
))) {
216 ums
= php_parse_date(header
, NULL
);
218 if (ums
> 0 && ums
>= lm
) {
219 ret
= PHP_HTTP_CACHE_HIT
;
221 ret
= PHP_HTTP_CACHE_MISS
;
229 static zend_bool
php_http_env_response_is_cacheable(php_http_env_response_t
*r
, php_http_message_t
*request
)
231 TSRMLS_FETCH_FROM_CTX(r
->ts
);
233 if (r
->ops
->get_status(r
) >= 400) {
237 if (php_http_env_got_request_header(ZEND_STRL("Authorization"), request TSRMLS_CC
)) {
241 if (-1 == php_http_select_str(php_http_env_get_request_method(request TSRMLS_CC
), 2, "HEAD", "GET")) {
248 static size_t output(void *context
, char *buf
, size_t len TSRMLS_DC
)
250 php_http_env_response_t
*r
= context
;
252 if (SUCCESS
!= r
->ops
->write(r
, buf
, len
)) {
256 /* we really only need to flush when throttling is enabled,
257 because we push the data as fast as possible anyway if not */
258 if (r
->throttle
.delay
>= PHP_HTTP_DIFFSEC
) {
260 php_http_sleep(r
->throttle
.delay
);
265 #define php_http_env_response_send_done(r) php_http_env_response_send_data((r), NULL, 0)
266 static STATUS
php_http_env_response_send_data(php_http_env_response_t
*r
, const char *buf
, size_t len
)
268 size_t chunks_sent
, chunk
= r
->throttle
.chunk
? r
->throttle
.chunk
: PHP_HTTP_SENDBUF_SIZE
;
269 TSRMLS_FETCH_FROM_CTX(r
->ts
);
271 if (r
->content
.encoder
) {
272 char *enc_str
= NULL
;
276 if (SUCCESS
!= php_http_encoding_stream_update(r
->content
.encoder
, buf
, len
, &enc_str
, &enc_len
)) {
280 if (SUCCESS
!= php_http_encoding_stream_finish(r
->content
.encoder
, &enc_str
, &enc_len
)) {
288 chunks_sent
= php_http_buffer_chunked_output(&r
->buffer
, enc_str
, enc_len
, buf
? chunk
: 0, output
, r TSRMLS_CC
);
291 chunks_sent
= php_http_buffer_chunked_output(&r
->buffer
, buf
, len
, buf
? chunk
: 0, output
, r TSRMLS_CC
);
294 return chunks_sent
!= (size_t) -1 ? SUCCESS
: FAILURE
;
297 php_http_env_response_t
*php_http_env_response_init(php_http_env_response_t
*r
, zval
*options
, php_http_env_response_ops_t
*ops
, void *init_arg TSRMLS_DC
)
302 r
= emalloc(sizeof(*r
));
304 memset(r
, 0, sizeof(*r
));
309 r
->ops
= php_http_env_response_get_sapi_ops();
312 r
->buffer
= php_http_buffer_init(NULL
);
315 r
->options
= options
;
317 TSRMLS_SET_CTX(r
->ts
);
319 if (r
->ops
->init
&& (SUCCESS
!= r
->ops
->init(r
, init_arg
))) {
321 php_http_env_response_free(&r
);
323 php_http_env_response_dtor(r
);
331 void php_http_env_response_dtor(php_http_env_response_t
*r
)
336 php_http_buffer_free(&r
->buffer
);
337 zval_ptr_dtor(&r
->options
);
338 PTR_FREE(r
->content
.type
);
339 PTR_FREE(r
->content
.encoding
);
340 if (r
->content
.encoder
) {
341 php_http_encoding_stream_free(&r
->content
.encoder
);
345 void php_http_env_response_free(php_http_env_response_t
**r
)
348 php_http_env_response_dtor(*r
);
354 static STATUS
php_http_env_response_send_head(php_http_env_response_t
*r
, php_http_message_t
*request
)
356 STATUS ret
= SUCCESS
;
357 zval
*zoption
, *options
= r
->options
;
358 TSRMLS_FETCH_FROM_CTX(r
->ts
);
364 if ((zoption
= get_option(options
, ZEND_STRL("headers") TSRMLS_CC
))) {
365 if (Z_TYPE_P(zoption
) == IS_ARRAY
) {
366 php_http_header_to_callback(Z_ARRVAL_P(zoption
), 0, (php_http_pass_format_callback_t
) r
->ops
->set_header
, r TSRMLS_CC
);
368 zval_ptr_dtor(&zoption
);
371 if (ret
!= SUCCESS
) {
375 if ((zoption
= get_option(options
, ZEND_STRL("responseCode") TSRMLS_CC
))) {
376 zval
*zoption_copy
= php_http_ztyp(IS_LONG
, zoption
);
378 zval_ptr_dtor(&zoption
);
379 if (Z_LVAL_P(zoption_copy
) > 0) {
380 ret
= r
->ops
->set_status(r
, Z_LVAL_P(zoption_copy
));
382 zval_ptr_dtor(&zoption_copy
);
385 if (ret
!= SUCCESS
) {
389 if ((zoption
= get_option(options
, ZEND_STRL("httpVersion") TSRMLS_CC
))) {
390 php_http_version_t v
;
391 zval
*zoption_copy
= php_http_ztyp(IS_STRING
, zoption
);
393 zval_ptr_dtor(&zoption
);
394 if (Z_STRLEN_P(zoption_copy
) && php_http_version_parse(&v
, Z_STRVAL_P(zoption_copy
) TSRMLS_CC
)) {
395 ret
= r
->ops
->set_protocol_version(r
, &v
);
396 php_http_version_dtor(&v
);
398 zval_ptr_dtor(&zoption_copy
);
401 if (ret
!= SUCCESS
) {
405 if ((zoption
= get_option(options
, ZEND_STRL("cookies") TSRMLS_CC
))) {
406 if (Z_TYPE_P(zoption
) == IS_ARRAY
) {
410 FOREACH_VAL(pos
, zoption
, zcookie
) {
411 if (Z_TYPE_PP(zcookie
) == IS_OBJECT
&& instanceof_function(Z_OBJCE_PP(zcookie
), php_http_cookie_class_entry TSRMLS_CC
)) {
412 php_http_cookie_object_t
*obj
= zend_object_store_get_object(*zcookie TSRMLS_CC
);
416 php_http_cookie_list_to_string(obj
->list
, &str
, &len
);
417 if (SUCCESS
!= (ret
= r
->ops
->add_header(r
, "Set-Cookie: %s", str
))) {
425 zval_ptr_dtor(&zoption
);
428 if (ret
!= SUCCESS
) {
432 if ((zoption
= get_option(options
, ZEND_STRL("contentType") TSRMLS_CC
))) {
433 zval
*zoption_copy
= php_http_ztyp(IS_STRING
, zoption
);
435 zval_ptr_dtor(&zoption
);
436 if (Z_STRLEN_P(zoption_copy
) && strchr(Z_STRVAL_P(zoption_copy
), '/')) {
437 if (SUCCESS
== (ret
= r
->ops
->set_header(r
, "Content-Type: %.*s", Z_STRLEN_P(zoption_copy
), Z_STRVAL_P(zoption_copy
)))) {
438 r
->content
.type
= estrndup(Z_STRVAL_P(zoption_copy
), Z_STRLEN_P(zoption_copy
));
441 zval_ptr_dtor(&zoption_copy
);
444 if (ret
!= SUCCESS
) {
448 if (r
->range
.status
== PHP_HTTP_RANGE_OK
) {
449 if (zend_hash_num_elements(&r
->range
.values
) == 1) {
450 zval
**range
, **begin
, **end
;
452 if ( 1 == php_http_array_list(&r
->range
.values TSRMLS_CC
, 1, &range
)
453 && 2 == php_http_array_list(Z_ARRVAL_PP(range
) TSRMLS_CC
, 2, &begin
, &end
)
455 if (SUCCESS
== (ret
= r
->ops
->set_status(r
, 206))) {
456 ret
= r
->ops
->set_header(r
, "Content-Range: bytes %ld-%ld/%zu", Z_LVAL_PP(begin
), Z_LVAL_PP(end
), r
->content
.length
);
459 /* this should never happen */
460 zend_hash_destroy(&r
->range
.values
);
464 php_http_boundary(r
->range
.boundary
, sizeof(r
->range
.boundary
) TSRMLS_CC
);
465 if (SUCCESS
== (ret
= r
->ops
->set_status(r
, 206))) {
466 ret
= r
->ops
->set_header(r
, "Content-Type: multipart/byteranges; boundary=%s", r
->range
.boundary
);
470 if ((zoption
= get_option(options
, ZEND_STRL("cacheControl") TSRMLS_CC
))) {
471 zval
*zoption_copy
= php_http_ztyp(IS_STRING
, zoption
);
473 zval_ptr_dtor(&zoption
);
474 if (Z_STRLEN_P(zoption_copy
)) {
475 ret
= r
->ops
->set_header(r
, "Cache-Control: %.*s", Z_STRLEN_P(zoption_copy
), Z_STRVAL_P(zoption_copy
));
477 zval_ptr_dtor(&zoption_copy
);
480 if (ret
!= SUCCESS
) {
484 if ((zoption
= get_option(options
, ZEND_STRL("contentDisposition") TSRMLS_CC
))) {
485 zval
*zoption_copy
= php_http_ztyp(IS_ARRAY
, zoption
);
486 php_http_buffer_t buf
;
488 php_http_buffer_init(&buf
);
489 if (php_http_params_to_string(&buf
, Z_ARRVAL_P(zoption_copy
), ZEND_STRL(","), ZEND_STRL(";"), ZEND_STRL("="), PHP_HTTP_PARAMS_DEFAULT TSRMLS_CC
)) {
491 ret
= r
->ops
->set_header(r
, "Content-Disposition: %.*s", buf
.used
, buf
.data
);
495 php_http_buffer_dtor(&buf
);
496 zval_ptr_dtor(&zoption_copy
);
497 zval_ptr_dtor(&zoption
);
500 if (ret
!= SUCCESS
) {
504 if ((zoption
= get_option(options
, ZEND_STRL("contentEncoding") TSRMLS_CC
))) {
505 zval
*zoption_copy
= php_http_ztyp(IS_LONG
, zoption
);
507 HashTable
*result
= NULL
;
509 zval_ptr_dtor(&zoption
);
510 switch (Z_LVAL_P(zoption_copy
)) {
511 case PHP_HTTP_CONTENT_ENCODING_GZIP
:
512 INIT_PZVAL(&zsupported
);
513 array_init(&zsupported
);
514 add_next_index_stringl(&zsupported
, ZEND_STRL("none"), 1);
515 add_next_index_stringl(&zsupported
, ZEND_STRL("gzip"), 1);
516 add_next_index_stringl(&zsupported
, ZEND_STRL("deflate"), 1);
518 if ((result
= php_http_negotiate_encoding(Z_ARRVAL(zsupported
), request TSRMLS_CC
))) {
519 char *key_str
= NULL
;
522 zend_hash_internal_pointer_reset(result
);
523 if (HASH_KEY_IS_STRING
== zend_hash_get_current_key_ex(result
, &key_str
, &key_len
, NULL
, 0, NULL
)) {
524 if (!strcmp(key_str
, "gzip")) {
525 if (!(r
->content
.encoder
= php_http_encoding_stream_init(NULL
, php_http_encoding_stream_get_deflate_ops(), PHP_HTTP_DEFLATE_TYPE_GZIP TSRMLS_CC
))) {
527 } else if (SUCCESS
== (ret
= r
->ops
->set_header(r
, "Content-Encoding: gzip"))) {
528 r
->content
.encoding
= estrndup(key_str
, key_len
- 1);
530 } else if (!strcmp(key_str
, "deflate")) {
531 if (!(r
->content
.encoder
= php_http_encoding_stream_init(NULL
, php_http_encoding_stream_get_deflate_ops(), PHP_HTTP_DEFLATE_TYPE_ZLIB TSRMLS_CC
))) {
533 } else if (SUCCESS
== (ret
= r
->ops
->set_header(r
, "Content-Encoding: deflate"))) {
534 r
->content
.encoding
= estrndup(key_str
, key_len
- 1);
537 ret
= r
->ops
->del_header(r
, ZEND_STRL("Content-Encoding"));
540 if (SUCCESS
== ret
) {
541 ret
= r
->ops
->add_header(r
, "Vary: Accept-Encoding");
545 zend_hash_destroy(result
);
546 FREE_HASHTABLE(result
);
549 zval_dtor(&zsupported
);
552 case PHP_HTTP_CONTENT_ENCODING_NONE
:
554 ret
= r
->ops
->del_header(r
, ZEND_STRL("Content-Encoding"));
557 zval_ptr_dtor(&zoption_copy
);
560 if (SUCCESS
!= ret
) {
564 if (php_http_env_response_is_cacheable(r
, request
)) {
565 switch (php_http_env_is_response_cached_by_etag(options
, ZEND_STRL("If-None-Match"), request TSRMLS_CC
)) {
566 case PHP_HTTP_CACHE_MISS
:
569 case PHP_HTTP_CACHE_NO
:
570 if (PHP_HTTP_CACHE_HIT
!= php_http_env_is_response_cached_by_last_modified(options
, ZEND_STRL("If-Modified-Since"), request TSRMLS_CC
)) {
575 case PHP_HTTP_CACHE_HIT
:
576 ret
= r
->ops
->set_status(r
, 304);
581 if ((zoption
= get_option(options
, ZEND_STRL("etag") TSRMLS_CC
))) {
582 zval
*zoption_copy
= php_http_ztyp(IS_STRING
, zoption
);
584 zval_ptr_dtor(&zoption
);
585 if (*Z_STRVAL_P(zoption_copy
) != '"' && strncmp(Z_STRVAL_P(zoption_copy
), "W/\"", 3)) {
586 ret
= r
->ops
->set_header(r
, "ETag: \"%s\"", Z_STRVAL_P(zoption_copy
));
588 ret
= r
->ops
->set_header(r
, "ETag: %s", Z_STRVAL_P(zoption_copy
));
590 zval_ptr_dtor(&zoption_copy
);
592 if ((zoption
= get_option(options
, ZEND_STRL("lastModified") TSRMLS_CC
))) {
593 zval
*zoption_copy
= php_http_ztyp(IS_LONG
, zoption
);
595 zval_ptr_dtor(&zoption
);
596 if (Z_LVAL_P(zoption_copy
)) {
597 char *date
= php_format_date(ZEND_STRL(PHP_HTTP_DATE_FORMAT
), Z_LVAL_P(zoption_copy
), 0 TSRMLS_CC
);
599 ret
= r
->ops
->set_header(r
, "Last-Modified: %s", date
);
603 zval_ptr_dtor(&zoption_copy
);
611 static STATUS
php_http_env_response_send_body(php_http_env_response_t
*r
)
613 STATUS ret
= SUCCESS
;
615 php_http_message_body_t
*body
;
616 TSRMLS_FETCH_FROM_CTX(r
->ts
);
622 if ((body
= get_body(r
->options TSRMLS_CC
))) {
623 if ((zoption
= get_option(r
->options
, ZEND_STRL("throttleDelay") TSRMLS_CC
))) {
624 if (Z_TYPE_P(zoption
) == IS_DOUBLE
) {
625 r
->throttle
.delay
= Z_DVAL_P(zoption
);
627 zval_ptr_dtor(&zoption
);
629 if ((zoption
= get_option(r
->options
, ZEND_STRL("throttleChunk") TSRMLS_CC
))) {
630 if (Z_TYPE_P(zoption
) == IS_LONG
) {
631 r
->throttle
.chunk
= Z_LVAL_P(zoption
);
633 zval_ptr_dtor(&zoption
);
636 if (r
->range
.status
== PHP_HTTP_RANGE_OK
) {
637 if (zend_hash_num_elements(&r
->range
.values
) == 1) {
639 zval
**range
, **begin
, **end
;
641 if ( 1 == php_http_array_list(&r
->range
.values TSRMLS_CC
, 1, &range
)
642 && 2 == php_http_array_list(Z_ARRVAL_PP(range
) TSRMLS_CC
, 2, &begin
, &end
)
645 ret
= php_http_message_body_to_callback(body
, (php_http_pass_callback_t
) php_http_env_response_send_data
, r
, Z_LVAL_PP(begin
), Z_LVAL_PP(end
) - Z_LVAL_PP(begin
) + 1);
646 if (ret
== SUCCESS
) {
647 ret
= php_http_env_response_send_done(r
);
649 zend_hash_destroy(&r
->range
.values
);
651 /* this should never happen */
652 zend_hash_destroy(&r
->range
.values
);
653 r
->ops
->set_status(r
, 500);
658 /* send multipart/byte-ranges message */
662 FOREACH_HASH_VAL(pos
, &r
->range
.values
, chunk
) {
665 if (2 == php_http_array_list(Z_ARRVAL_PP(chunk
) TSRMLS_CC
, 2, &begin
, &end
)) {
666 php_http_buffer_appendf(r
->buffer
,
669 "Content-Type: %s" PHP_HTTP_CRLF
670 "Content-Range: bytes %ld-%ld/%zu" PHP_HTTP_CRLF PHP_HTTP_CRLF
,
673 r
->content
.type
? r
->content
.type
: "application/octet-stream",
678 ret
= php_http_message_body_to_callback(body
, (php_http_pass_callback_t
) php_http_env_response_send_data
, r
, Z_LVAL_PP(begin
), Z_LVAL_PP(end
) - Z_LVAL_PP(begin
) + 1);
682 if (ret
== SUCCESS
) {
683 php_http_buffer_appendf(r
->buffer
, PHP_HTTP_CRLF
"--%s--", r
->range
.boundary
);
684 ret
= php_http_env_response_send_done(r
);
686 zend_hash_destroy(&r
->range
.values
);
690 ret
= php_http_message_body_to_callback(body
, (php_http_pass_callback_t
) php_http_env_response_send_data
, r
, 0, 0);
691 if (ret
== SUCCESS
) {
692 ret
= php_http_env_response_send_done(r
);
699 STATUS
php_http_env_response_send(php_http_env_response_t
*r
)
701 php_http_message_t
*request
;
702 php_http_message_body_t
*body
;
703 TSRMLS_FETCH_FROM_CTX(r
->ts
);
705 request
= get_request(r
->options TSRMLS_CC
);
707 /* check for ranges */
708 if ((body
= get_body(r
->options TSRMLS_CC
))) {
709 r
->content
.length
= php_http_message_body_size(body
);
711 if (SUCCESS
!= r
->ops
->set_header(r
, "Accept-Ranges: bytes")) {
714 zend_hash_init(&r
->range
.values
, 0, NULL
, ZVAL_PTR_DTOR
, 0);
715 r
->range
.status
= php_http_env_get_request_ranges(&r
->range
.values
, r
->content
.length
, request TSRMLS_CC
);
717 switch (r
->range
.status
) {
718 case PHP_HTTP_RANGE_NO
:
719 zend_hash_destroy(&r
->range
.values
);
722 case PHP_HTTP_RANGE_ERR
:
723 if (php_http_env_got_request_header(ZEND_STRL("If-Range"), request TSRMLS_CC
)) {
724 r
->range
.status
= PHP_HTTP_RANGE_NO
;
725 zend_hash_destroy(&r
->range
.values
);
728 zend_hash_destroy(&r
->range
.values
);
729 if (SUCCESS
!= r
->ops
->set_status(r
, 416)) {
732 if (SUCCESS
!= r
->ops
->set_header(r
, "Content-Range: bytes */%zu", r
->content
.length
)) {
738 case PHP_HTTP_RANGE_OK
:
739 if (PHP_HTTP_CACHE_MISS
== php_http_env_is_response_cached_by_etag(r
->options
, ZEND_STRL("If-Range"), request TSRMLS_CC
)
740 || PHP_HTTP_CACHE_MISS
== php_http_env_is_response_cached_by_last_modified(r
->options
, ZEND_STRL("If-Range"), request TSRMLS_CC
)
742 r
->range
.status
= PHP_HTTP_RANGE_NO
;
743 zend_hash_destroy(&r
->range
.values
);
746 if (PHP_HTTP_CACHE_MISS
== php_http_env_is_response_cached_by_etag(r
->options
, ZEND_STRL("If-Match"), request TSRMLS_CC
)
747 || PHP_HTTP_CACHE_MISS
== php_http_env_is_response_cached_by_last_modified(r
->options
, ZEND_STRL("If-Unmodified-Since"), request TSRMLS_CC
)
748 || PHP_HTTP_CACHE_MISS
== php_http_env_is_response_cached_by_last_modified(r
->options
, ZEND_STRL("Unless-Modified-Since"), request TSRMLS_CC
)
751 zend_hash_destroy(&r
->range
.values
);
752 if (SUCCESS
!= r
->ops
->set_status(r
, 412)) {
763 if (SUCCESS
!= php_http_env_response_send_head(r
, request
)) {
764 php_error_docref(NULL TSRMLS_CC
, E_WARNING
, "Failed to send response headers");
768 if (SUCCESS
!= php_http_env_response_send_body(r
)) {
769 php_error_docref(NULL TSRMLS_CC
, E_WARNING
, "Failed to send response body");
773 if (SUCCESS
!= r
->ops
->finish(r
)) {
774 php_error_docref(NULL TSRMLS_CC
, E_WARNING
, "Failed to finish response");
781 static long php_http_env_response_sapi_get_status(php_http_env_response_t
*r
)
783 TSRMLS_FETCH_FROM_CTX(r
->ts
);
785 return php_http_env_get_response_code(TSRMLS_C
);
787 static STATUS
php_http_env_response_sapi_set_status(php_http_env_response_t
*r
, long http_code
)
789 TSRMLS_FETCH_FROM_CTX(r
->ts
);
791 return php_http_env_set_response_code(http_code TSRMLS_CC
);
793 static STATUS
php_http_env_response_sapi_set_protocol_version(php_http_env_response_t
*r
, php_http_version_t
*v
)
795 TSRMLS_FETCH_FROM_CTX(r
->ts
);
797 return php_http_env_set_response_protocol_version(v TSRMLS_CC
);
799 static STATUS
php_http_env_response_sapi_set_header(php_http_env_response_t
*r
, const char *fmt
, ...)
803 TSRMLS_FETCH_FROM_CTX(r
->ts
);
806 ret
= php_http_env_set_response_header_va(0, 1, fmt
, args TSRMLS_CC
);
811 static STATUS
php_http_env_response_sapi_add_header(php_http_env_response_t
*r
, const char *fmt
, ...)
815 TSRMLS_FETCH_FROM_CTX(r
->ts
);
818 ret
= php_http_env_set_response_header_va(0, 0, fmt
, args TSRMLS_CC
);
823 static STATUS
php_http_env_response_sapi_del_header(php_http_env_response_t
*r
, const char *header_str
, size_t header_len
)
825 TSRMLS_FETCH_FROM_CTX(r
->ts
);
827 return php_http_env_set_response_header_value(0, header_str
, header_len
, NULL
, 1 TSRMLS_CC
);
829 static STATUS
php_http_env_response_sapi_write(php_http_env_response_t
*r
, const char *data_str
, size_t data_len
)
831 TSRMLS_FETCH_FROM_CTX(r
->ts
);
833 if (0 < PHPWRITE(data_str
, data_len
)) {
838 static STATUS
php_http_env_response_sapi_flush(php_http_env_response_t
*r
)
840 TSRMLS_FETCH_FROM_CTX(r
->ts
);
842 #if PHP_VERSION_ID >= 50400
843 if (php_output_get_level(TSRMLS_C
)) {
844 php_output_flush_all(TSRMLS_C
);
846 if (!(php_output_get_status(TSRMLS_C
) & PHP_OUTPUT_IMPLICITFLUSH
)) {
847 sapi_flush(TSRMLS_C
);
850 php_end_ob_buffer(1, 1 TSRMLS_CC
);
851 sapi_flush(TSRMLS_C
);
856 static STATUS
php_http_env_response_sapi_finish(php_http_env_response_t
*r
)
861 static php_http_env_response_ops_t php_http_env_response_sapi_ops
= {
864 php_http_env_response_sapi_get_status
,
865 php_http_env_response_sapi_set_status
,
866 php_http_env_response_sapi_set_protocol_version
,
867 php_http_env_response_sapi_set_header
,
868 php_http_env_response_sapi_add_header
,
869 php_http_env_response_sapi_del_header
,
870 php_http_env_response_sapi_write
,
871 php_http_env_response_sapi_flush
,
872 php_http_env_response_sapi_finish
875 php_http_env_response_ops_t
*php_http_env_response_get_sapi_ops(void)
877 return &php_http_env_response_sapi_ops
;
880 typedef struct php_http_env_response_stream_ctx
{
882 php_http_version_t version
;
889 } php_http_env_response_stream_ctx_t
;
891 static STATUS
php_http_env_response_stream_init(php_http_env_response_t
*r
, void *init_arg
)
893 php_http_env_response_stream_ctx_t
*ctx
;
894 TSRMLS_FETCH_FROM_CTX(r
->ts
);
896 ctx
= ecalloc(1, sizeof(*ctx
));
898 ctx
->stream
= init_arg
;
899 if (SUCCESS
!= zend_list_addref(ctx
->stream
->rsrc_id
)) {
903 zend_hash_init(&ctx
->header
, 0, NULL
, ZVAL_PTR_DTOR
, 0);
904 php_http_version_init(&ctx
->version
, 1, 1 TSRMLS_CC
);
905 ctx
->status_code
= 200;
911 static void php_http_env_response_stream_dtor(php_http_env_response_t
*r
)
913 php_http_env_response_stream_ctx_t
*ctx
= r
->ctx
;
914 TSRMLS_FETCH_FROM_CTX(r
->ts
);
916 zend_hash_destroy(&ctx
->header
);
917 zend_list_delete(ctx
->stream
->rsrc_id
);
921 static void php_http_env_response_stream_header(php_http_env_response_stream_ctx_t
*ctx
, HashTable
*header TSRMLS_DC
)
926 FOREACH_HASH_VAL(pos
, header
, val
) {
927 if (Z_TYPE_PP(val
) == IS_ARRAY
) {
928 php_http_env_response_stream_header(ctx
, Z_ARRVAL_PP(val
) TSRMLS_CC
);
930 zval
*tmp
= php_http_ztyp(IS_STRING
, *val
);
932 php_stream_write(ctx
->stream
, Z_STRVAL_P(tmp
), Z_STRLEN_P(tmp
));
933 php_stream_write_string(ctx
->stream
, PHP_HTTP_CRLF
);
938 static STATUS
php_http_env_response_stream_start(php_http_env_response_stream_ctx_t
*ctx TSRMLS_DC
)
940 if (ctx
->started
|| ctx
->finished
) {
944 php_stream_printf(ctx
->stream TSRMLS_CC
, "HTTP/%u.%u %ld %s" PHP_HTTP_CRLF
, ctx
->version
.major
, ctx
->version
.minor
, ctx
->status_code
, php_http_env_get_response_status_for_code(ctx
->status_code
));
945 php_http_env_response_stream_header(ctx
, &ctx
->header TSRMLS_CC
);
946 php_stream_write_string(ctx
->stream
, PHP_HTTP_CRLF
);
950 static long php_http_env_response_stream_get_status(php_http_env_response_t
*r
)
952 php_http_env_response_stream_ctx_t
*ctx
= r
->ctx
;
954 return ctx
->status_code
;
956 static STATUS
php_http_env_response_stream_set_status(php_http_env_response_t
*r
, long http_code
)
958 php_http_env_response_stream_ctx_t
*stream_ctx
= r
->ctx
;
960 if (stream_ctx
->started
|| stream_ctx
->finished
) {
964 stream_ctx
->status_code
= http_code
;
968 static STATUS
php_http_env_response_stream_set_protocol_version(php_http_env_response_t
*r
, php_http_version_t
*v
)
970 php_http_env_response_stream_ctx_t
*stream_ctx
= r
->ctx
;
972 if (stream_ctx
->started
|| stream_ctx
->finished
) {
976 memcpy(&stream_ctx
->version
, v
, sizeof(stream_ctx
->version
));
980 static STATUS
php_http_env_response_stream_set_header_ex(php_http_env_response_t
*r
, zend_bool replace
, const char *fmt
, va_list argv
)
982 php_http_env_response_stream_ctx_t
*stream_ctx
= r
->ctx
;
983 char *header_end
, *header_str
= NULL
;
984 size_t header_len
= 0;
985 zval
*zheader
, **zheader_ptr
;
987 if (stream_ctx
->started
|| stream_ctx
->finished
) {
991 header_len
= vspprintf(&header_str
, 0, fmt
, argv
);
993 if (!(header_end
= strchr(header_str
, ':'))) {
1000 if (!replace
&& (SUCCESS
== zend_hash_find(&stream_ctx
->header
, header_str
, header_end
- header_str
+ 1, (void *) &zheader_ptr
))) {
1001 convert_to_array(*zheader_ptr
);
1003 return add_next_index_stringl(*zheader_ptr
, header_str
, header_len
, 0);
1005 MAKE_STD_ZVAL(zheader
);
1006 ZVAL_STRINGL(zheader
, header_str
, header_len
, 0);
1008 if (SUCCESS
!= zend_hash_update(&stream_ctx
->header
, header_str
, header_end
- header_str
+ 1, (void *) &zheader
, sizeof(zval
*), NULL
)) {
1009 zval_ptr_dtor(&zheader
);
1017 static STATUS
php_http_env_response_stream_set_header(php_http_env_response_t
*r
, const char *fmt
, ...)
1022 va_start(argv
, fmt
);
1023 ret
= php_http_env_response_stream_set_header_ex(r
, 1, fmt
, argv
);
1028 static STATUS
php_http_env_response_stream_add_header(php_http_env_response_t
*r
, const char *fmt
, ...)
1033 va_start(argv
, fmt
);
1034 ret
= php_http_env_response_stream_set_header_ex(r
, 0, fmt
, argv
);
1039 static STATUS
php_http_env_response_stream_del_header(php_http_env_response_t
*r
, const char *header_str
, size_t header_len
)
1041 php_http_env_response_stream_ctx_t
*stream_ctx
= r
->ctx
;
1043 if (stream_ctx
->started
|| stream_ctx
->finished
) {
1047 zend_hash_del(&stream_ctx
->header
, header_str
, header_len
+ 1);
1050 static STATUS
php_http_env_response_stream_write(php_http_env_response_t
*r
, const char *data_str
, size_t data_len
)
1052 php_http_env_response_stream_ctx_t
*stream_ctx
= r
->ctx
;
1053 TSRMLS_FETCH_FROM_CTX(r
->ts
);
1055 if (stream_ctx
->finished
) {
1058 if (!stream_ctx
->started
) {
1059 if (SUCCESS
!= php_http_env_response_stream_start(stream_ctx TSRMLS_CC
)) {
1064 if (data_len
!= php_stream_write(stream_ctx
->stream
, data_str
, data_len
)) {
1070 static STATUS
php_http_env_response_stream_flush(php_http_env_response_t
*r
)
1072 php_http_env_response_stream_ctx_t
*stream_ctx
= r
->ctx
;
1073 TSRMLS_FETCH_FROM_CTX(r
->ts
);
1075 if (stream_ctx
->finished
) {
1078 if (!stream_ctx
->started
) {
1079 if (SUCCESS
!= php_http_env_response_stream_start(stream_ctx TSRMLS_CC
)) {
1084 return php_stream_flush(stream_ctx
->stream
);
1086 static STATUS
php_http_env_response_stream_finish(php_http_env_response_t
*r
)
1088 php_http_env_response_stream_ctx_t
*stream_ctx
= r
->ctx
;
1089 TSRMLS_FETCH_FROM_CTX(r
->ts
);
1091 if (stream_ctx
->finished
) {
1094 if (!stream_ctx
->started
) {
1095 if (SUCCESS
!= php_http_env_response_stream_start(stream_ctx TSRMLS_CC
)) {
1100 stream_ctx
->finished
= 1;
1105 static php_http_env_response_ops_t php_http_env_response_stream_ops
= {
1106 php_http_env_response_stream_init
,
1107 php_http_env_response_stream_dtor
,
1108 php_http_env_response_stream_get_status
,
1109 php_http_env_response_stream_set_status
,
1110 php_http_env_response_stream_set_protocol_version
,
1111 php_http_env_response_stream_set_header
,
1112 php_http_env_response_stream_add_header
,
1113 php_http_env_response_stream_del_header
,
1114 php_http_env_response_stream_write
,
1115 php_http_env_response_stream_flush
,
1116 php_http_env_response_stream_finish
1119 php_http_env_response_ops_t
*php_http_env_response_get_stream_ops(void)
1121 return &php_http_env_response_stream_ops
;
1124 #define PHP_HTTP_ENV_RESPONSE_OBJECT_INIT(obj) \
1126 if (!obj->message) { \
1127 obj->message = php_http_message_init_env(NULL, PHP_HTTP_RESPONSE TSRMLS_CC); \
1131 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnvResponse___construct
, 0, 0, 0)
1132 ZEND_END_ARG_INFO();
1133 static PHP_METHOD(HttpEnvResponse
, __construct
)
1135 php_http_message_object_t
*obj
;
1137 php_http_expect(SUCCESS
== zend_parse_parameters_none(), invalid_arg
, return);
1139 obj
= zend_object_store_get_object(getThis() TSRMLS_CC
);
1141 php_http_expect(obj
->message
= php_http_message_init_env(obj
->message
, PHP_HTTP_RESPONSE TSRMLS_CC
), unexpected_val
, return);
1144 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnvResponse___invoke
, 0, 0, 1)
1145 ZEND_ARG_INFO(0, ob_string
)
1146 ZEND_ARG_INFO(0, ob_flags
)
1147 ZEND_END_ARG_INFO();
1148 static PHP_METHOD(HttpEnvResponse
, __invoke
)
1154 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s|l", &ob_str
, &ob_len
, &ob_flags
)) {
1155 php_http_message_object_t
*obj
= zend_object_store_get_object(getThis() TSRMLS_CC
);
1157 PHP_HTTP_ENV_RESPONSE_OBJECT_INIT(obj
);
1159 php_http_message_object_init_body_object(obj
);
1160 php_http_message_body_append(obj
->message
->body
, ob_str
, ob_len
);
1161 #if PHP_VERSION_ID >= 50400
1164 RETURN_EMPTY_STRING();
1169 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnvResponse_setEnvRequest
, 0, 0, 1)
1170 ZEND_ARG_OBJ_INFO(0, env_request
, http
\\Message
, 1)
1171 ZEND_END_ARG_INFO();
1172 static PHP_METHOD(HttpEnvResponse
, setEnvRequest
)
1174 zval
*env_req
= NULL
;
1176 php_http_expect(SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|O", &env_req
, php_http_message_class_entry
), invalid_arg
, return);
1178 set_option(getThis(), ZEND_STRL("request"), IS_OBJECT
, env_req
, 0 TSRMLS_CC
);
1179 RETVAL_ZVAL(getThis(), 1, 0);
1182 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnvResponse_setContentType
, 0, 0, 1)
1183 ZEND_ARG_INFO(0, content_type
)
1184 ZEND_END_ARG_INFO();
1185 static PHP_METHOD(HttpEnvResponse
, setContentType
)
1187 char *ct_str
= NULL
;
1190 php_http_expect(SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s!", &ct_str
, &ct_len
), invalid_arg
, return);
1192 set_option(getThis(), ZEND_STRL("contentType"), IS_STRING
, ct_str
, ct_len TSRMLS_CC
);
1193 RETVAL_ZVAL(getThis(), 1, 0);
1196 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnvResponse_setContentDisposition
, 0, 0, 1)
1197 ZEND_ARG_ARRAY_INFO(0, disposition_params
, 1)
1198 ZEND_END_ARG_INFO();
1199 static PHP_METHOD(HttpEnvResponse
, setContentDisposition
)
1203 php_http_expect(SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "a", &zdisposition
), invalid_arg
, return);
1205 zend_update_property(Z_OBJCE_P(getThis()), getThis(), ZEND_STRL("contentDisposition"), zdisposition TSRMLS_CC
);
1206 RETVAL_ZVAL(getThis(), 1, 0);
1209 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnvResponse_setContentEncoding
, 0, 0, 1)
1210 ZEND_ARG_INFO(0, content_encoding
)
1211 ZEND_END_ARG_INFO();
1212 static PHP_METHOD(HttpEnvResponse
, setContentEncoding
)
1216 php_http_expect(SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "l", &ce
), invalid_arg
, return);
1218 set_option(getThis(), ZEND_STRL("contentEncoding"), IS_LONG
, &ce
, 0 TSRMLS_CC
);
1219 RETVAL_ZVAL(getThis(), 1, 0);
1222 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnvResponse_setCacheControl
, 0, 0, 1)
1223 ZEND_ARG_INFO(0, cache_control
)
1224 ZEND_END_ARG_INFO();
1225 static PHP_METHOD(HttpEnvResponse
, setCacheControl
)
1227 char *cc_str
= NULL
;
1230 php_http_expect(SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s!", &cc_str
, &cc_len
), invalid_arg
, return);
1232 set_option(getThis(), ZEND_STRL("cacheControl"), IS_STRING
, cc_str
, cc_len TSRMLS_CC
);
1233 RETVAL_ZVAL(getThis(), 1, 0);
1236 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnvResponse_setLastModified
, 0, 0, 1)
1237 ZEND_ARG_INFO(0, last_modified
)
1238 ZEND_END_ARG_INFO();
1239 static PHP_METHOD(HttpEnvResponse
, setLastModified
)
1243 php_http_expect(SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "l", &last_modified
), invalid_arg
, return);
1245 set_option(getThis(), ZEND_STRL("lastModified"), IS_LONG
, &last_modified
, 0 TSRMLS_CC
);
1246 RETVAL_ZVAL(getThis(), 1, 0);
1249 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnvResponse_isCachedByLastModified
, 0, 0, 0)
1250 ZEND_ARG_INFO(0, header_name
)
1251 ZEND_END_ARG_INFO();
1252 static PHP_METHOD(HttpEnvResponse
, isCachedByLastModified
)
1254 char *header_name_str
= NULL
;
1255 int header_name_len
= 0;
1257 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|s!", &header_name_str
, &header_name_len
)) {
1258 if (!header_name_str
|| !header_name_len
) {
1259 header_name_str
= "If-Modified-Since";
1260 header_name_len
= lenof("If-Modified-Since");
1263 RETURN_LONG(php_http_env_is_response_cached_by_last_modified(getThis(), header_name_str
, header_name_len
, get_request(getThis() TSRMLS_CC
) TSRMLS_CC
));
1267 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnvResponse_setEtag
, 0, 0, 1)
1268 ZEND_ARG_INFO(0, etag
)
1269 ZEND_END_ARG_INFO();
1270 static PHP_METHOD(HttpEnvResponse
, setEtag
)
1272 char *etag_str
= NULL
;
1275 php_http_expect(SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s!", &etag_str
, &etag_len
), invalid_arg
, return);
1277 set_option(getThis(), ZEND_STRL("etag"), IS_STRING
, etag_str
, etag_len TSRMLS_CC
);
1278 RETVAL_ZVAL(getThis(), 1, 0);
1281 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnvResponse_isCachedByEtag
, 0, 0, 0)
1282 ZEND_ARG_INFO(0, header_name
)
1283 ZEND_END_ARG_INFO();
1284 static PHP_METHOD(HttpEnvResponse
, isCachedByEtag
)
1286 char *header_name_str
= NULL
;
1287 int header_name_len
= 0;
1289 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|s!", &header_name_str
, &header_name_len
)) {
1290 if (!header_name_str
|| !header_name_len
) {
1291 header_name_str
= "If-None-Match";
1292 header_name_len
= lenof("If-None-Match");
1294 RETURN_LONG(php_http_env_is_response_cached_by_etag(getThis(), header_name_str
, header_name_len
, get_request(getThis() TSRMLS_CC
) TSRMLS_CC
));
1298 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnvResponse_setThrottleRate
, 0, 0, 1)
1299 ZEND_ARG_INFO(0, chunk_size
)
1300 ZEND_ARG_INFO(0, delay
)
1301 ZEND_END_ARG_INFO();
1302 static PHP_METHOD(HttpEnvResponse
, setThrottleRate
)
1307 php_http_expect(SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "l|d", &chunk_size
, &delay
), invalid_arg
, return);
1309 set_option(getThis(), ZEND_STRL("throttleDelay"), IS_DOUBLE
, &delay
, 0 TSRMLS_CC
);
1310 set_option(getThis(), ZEND_STRL("throttleChunk"), IS_LONG
, &chunk_size
, 0 TSRMLS_CC
);
1311 RETVAL_ZVAL(getThis(), 1, 0);
1314 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnvResponse_setCookie
, 0, 0, 1)
1315 ZEND_ARG_INFO(0, cookie
)
1316 ZEND_END_ARG_INFO();
1317 static PHP_METHOD(HttpEnvResponse
, setCookie
)
1320 zend_error_handling zeh
;
1321 php_http_cookie_list_t
*list
= NULL
;
1323 php_http_expect(SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "z", &zcookie_new
), invalid_arg
, return);
1325 zend_replace_error_handling(EH_THROW
, php_http_exception_unexpected_val_class_entry
, &zeh TSRMLS_CC
);
1326 switch (Z_TYPE_P(zcookie_new
)) {
1328 if (instanceof_function(Z_OBJCE_P(zcookie_new
), php_http_cookie_class_entry TSRMLS_CC
)) {
1329 Z_ADDREF_P(zcookie_new
);
1334 list
= php_http_cookie_list_from_struct(NULL
, zcookie_new TSRMLS_CC
);
1335 MAKE_STD_ZVAL(zcookie_new
);
1336 ZVAL_OBJVAL(zcookie_new
, php_http_cookie_object_new_ex(php_http_cookie_class_entry
, list
, NULL TSRMLS_CC
), 0);
1340 zcookie_new
= php_http_ztyp(IS_STRING
, zcookie_new
);
1341 list
= php_http_cookie_list_parse(NULL
, Z_STRVAL_P(zcookie_new
), Z_STRLEN_P(zcookie_new
), 0, NULL TSRMLS_CC
);
1342 zval_ptr_dtor(&zcookie_new
);
1343 MAKE_STD_ZVAL(zcookie_new
);
1344 ZVAL_OBJVAL(zcookie_new
, php_http_cookie_object_new_ex(php_http_cookie_class_entry
, list
, NULL TSRMLS_CC
), 0);
1346 zend_restore_error_handling(&zeh TSRMLS_CC
);
1348 set_cookie(getThis(), zcookie_new TSRMLS_CC
);
1349 zval_ptr_dtor(&zcookie_new
);
1351 RETVAL_ZVAL(getThis(), 1, 0);
1354 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnvResponse_send
, 0, 0, 0)
1355 ZEND_ARG_INFO(0, stream
)
1356 ZEND_END_ARG_INFO();
1357 static PHP_METHOD(HttpEnvResponse
, send
)
1359 zval
*zstream
= NULL
;
1360 php_stream
*s
= NULL
;
1362 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|r", &zstream
)) {
1363 /* first flush the output layer to avoid conflicting headers and output;
1364 * also, ob_start($thisEnvResponse) might have been called */
1365 #if PHP_VERSION_ID >= 50400
1366 php_output_end_all(TSRMLS_C
);
1368 php_end_ob_buffers(1 TSRMLS_CC
);
1371 php_http_env_response_t
*r
;
1373 php_stream_from_zval(s
, &zstream
);
1374 r
= php_http_env_response_init(NULL
, getThis(), php_http_env_response_get_stream_ops(), s TSRMLS_CC
);
1379 RETVAL_BOOL(SUCCESS
== php_http_env_response_send(r
));
1380 php_http_env_response_free(&r
);
1382 php_http_env_response_t r
;
1384 if (!php_http_env_response_init(&r
, getThis(), NULL
, NULL TSRMLS_CC
)) {
1388 RETVAL_BOOL(SUCCESS
== php_http_env_response_send(&r
));
1389 php_http_env_response_dtor(&r
);
1394 static zend_function_entry php_http_env_response_methods
[] = {
1395 PHP_ME(HttpEnvResponse
, __construct
, ai_HttpEnvResponse___construct
, ZEND_ACC_PUBLIC
|ZEND_ACC_CTOR
)
1396 PHP_ME(HttpEnvResponse
, __invoke
, ai_HttpEnvResponse___invoke
, ZEND_ACC_PUBLIC
)
1397 PHP_ME(HttpEnvResponse
, setEnvRequest
, ai_HttpEnvResponse_setEnvRequest
, ZEND_ACC_PUBLIC
)
1398 PHP_ME(HttpEnvResponse
, setCookie
, ai_HttpEnvResponse_setCookie
, ZEND_ACC_PUBLIC
)
1399 PHP_ME(HttpEnvResponse
, setContentType
, ai_HttpEnvResponse_setContentType
, ZEND_ACC_PUBLIC
)
1400 PHP_ME(HttpEnvResponse
, setContentDisposition
, ai_HttpEnvResponse_setContentDisposition
, ZEND_ACC_PUBLIC
)
1401 PHP_ME(HttpEnvResponse
, setContentEncoding
, ai_HttpEnvResponse_setContentEncoding
, ZEND_ACC_PUBLIC
)
1402 PHP_ME(HttpEnvResponse
, setCacheControl
, ai_HttpEnvResponse_setCacheControl
, ZEND_ACC_PUBLIC
)
1403 PHP_ME(HttpEnvResponse
, setLastModified
, ai_HttpEnvResponse_setLastModified
, ZEND_ACC_PUBLIC
)
1404 PHP_ME(HttpEnvResponse
, isCachedByLastModified
, ai_HttpEnvResponse_isCachedByLastModified
, ZEND_ACC_PUBLIC
)
1405 PHP_ME(HttpEnvResponse
, setEtag
, ai_HttpEnvResponse_setEtag
, ZEND_ACC_PUBLIC
)
1406 PHP_ME(HttpEnvResponse
, isCachedByEtag
, ai_HttpEnvResponse_isCachedByEtag
, ZEND_ACC_PUBLIC
)
1407 PHP_ME(HttpEnvResponse
, setThrottleRate
, ai_HttpEnvResponse_setThrottleRate
, ZEND_ACC_PUBLIC
)
1408 PHP_ME(HttpEnvResponse
, send
, ai_HttpEnvResponse_send
, ZEND_ACC_PUBLIC
)
1409 EMPTY_FUNCTION_ENTRY
1412 zend_class_entry
*php_http_env_response_class_entry
;
1414 PHP_MINIT_FUNCTION(http_env_response
)
1416 zend_class_entry ce
= {0};
1418 INIT_NS_CLASS_ENTRY(ce
, "http\\Env", "Response", php_http_env_response_methods
);
1419 php_http_env_response_class_entry
= zend_register_internal_class_ex(&ce
, php_http_message_class_entry
, NULL TSRMLS_CC
);
1421 zend_declare_class_constant_long(php_http_env_response_class_entry
, ZEND_STRL("CONTENT_ENCODING_NONE"), PHP_HTTP_CONTENT_ENCODING_NONE TSRMLS_CC
);
1422 zend_declare_class_constant_long(php_http_env_response_class_entry
, ZEND_STRL("CONTENT_ENCODING_GZIP"), PHP_HTTP_CONTENT_ENCODING_GZIP TSRMLS_CC
);
1424 zend_declare_class_constant_long(php_http_env_response_class_entry
, ZEND_STRL("CACHE_NO"), PHP_HTTP_CACHE_NO TSRMLS_CC
);
1425 zend_declare_class_constant_long(php_http_env_response_class_entry
, ZEND_STRL("CACHE_HIT"), PHP_HTTP_CACHE_HIT TSRMLS_CC
);
1426 zend_declare_class_constant_long(php_http_env_response_class_entry
, ZEND_STRL("CACHE_MISS"), PHP_HTTP_CACHE_MISS TSRMLS_CC
);
1428 zend_declare_property_null(php_http_env_response_class_entry
, ZEND_STRL("request"), ZEND_ACC_PROTECTED TSRMLS_CC
);
1429 zend_declare_property_null(php_http_env_response_class_entry
, ZEND_STRL("cookies"), ZEND_ACC_PROTECTED TSRMLS_CC
);
1430 zend_declare_property_null(php_http_env_response_class_entry
, ZEND_STRL("contentType"), ZEND_ACC_PROTECTED TSRMLS_CC
);
1431 zend_declare_property_null(php_http_env_response_class_entry
, ZEND_STRL("contentDisposition"), ZEND_ACC_PROTECTED TSRMLS_CC
);
1432 zend_declare_property_null(php_http_env_response_class_entry
, ZEND_STRL("contentEncoding"), ZEND_ACC_PROTECTED TSRMLS_CC
);
1433 zend_declare_property_null(php_http_env_response_class_entry
, ZEND_STRL("cacheControl"), ZEND_ACC_PROTECTED TSRMLS_CC
);
1434 zend_declare_property_null(php_http_env_response_class_entry
, ZEND_STRL("etag"), ZEND_ACC_PROTECTED TSRMLS_CC
);
1435 zend_declare_property_null(php_http_env_response_class_entry
, ZEND_STRL("lastModified"), ZEND_ACC_PROTECTED TSRMLS_CC
);
1436 zend_declare_property_null(php_http_env_response_class_entry
, ZEND_STRL("throttleDelay"), ZEND_ACC_PROTECTED TSRMLS_CC
);
1437 zend_declare_property_null(php_http_env_response_class_entry
, ZEND_STRL("throttleChunk"), ZEND_ACC_PROTECTED TSRMLS_CC
);
1448 * vim600: noet sw=4 ts=4 fdm=marker
1449 * vim<600: noet sw=4 ts=4