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
;
886 php_stream_filter
*chunked_filter
;
887 php_http_message_t
*request
;
892 } php_http_env_response_stream_ctx_t
;
894 static STATUS
php_http_env_response_stream_init(php_http_env_response_t
*r
, void *init_arg
)
896 php_http_env_response_stream_ctx_t
*ctx
;
897 size_t buffer_size
= 0x1000;
898 TSRMLS_FETCH_FROM_CTX(r
->ts
);
900 ctx
= ecalloc(1, sizeof(*ctx
));
902 ctx
->stream
= init_arg
;
903 if (!ctx
->stream
|| SUCCESS
!= zend_list_addref(ctx
->stream
->rsrc_id
)) {
907 php_stream_set_option(ctx
->stream
, PHP_STREAM_OPTION_WRITE_BUFFER
, PHP_STREAM_BUFFER_FULL
, &buffer_size
);
908 zend_hash_init(&ctx
->header
, 0, NULL
, ZVAL_PTR_DTOR
, 0);
909 php_http_version_init(&ctx
->version
, 1, 1 TSRMLS_CC
);
910 ctx
->status_code
= 200;
912 ctx
->request
= get_request(r
->options TSRMLS_CC
);
914 /* there are some limitations regarding TE:chunked, see https://tools.ietf.org/html/rfc7230#section-3.3.1 */
915 if (ctx
->request
&& ctx
->request
->http
.version
.major
== 1 && ctx
->request
->http
.version
.minor
== 0) {
916 ctx
->version
.minor
= 0;
923 static void php_http_env_response_stream_dtor(php_http_env_response_t
*r
)
925 php_http_env_response_stream_ctx_t
*ctx
= r
->ctx
;
926 TSRMLS_FETCH_FROM_CTX(r
->ts
);
928 if (ctx
->chunked_filter
) {
929 php_stream_filter_free(ctx
->chunked_filter TSRMLS_CC
);
931 zend_hash_destroy(&ctx
->header
);
932 zend_list_delete(ctx
->stream
->rsrc_id
);
936 static void php_http_env_response_stream_header(php_http_env_response_stream_ctx_t
*ctx
, HashTable
*header
, php_http_buffer_t
*buf TSRMLS_DC
)
941 FOREACH_HASH_VAL(pos
, header
, val
) {
942 if (Z_TYPE_PP(val
) == IS_ARRAY
) {
943 php_http_env_response_stream_header(ctx
, Z_ARRVAL_PP(val
), buf TSRMLS_CC
);
945 zval
*tmp
= php_http_ztyp(IS_STRING
, *val
);
948 /* disable chunked transfer encoding if we've got an explicit content-length */
949 if (!strncasecmp(Z_STRVAL_P(tmp
), "Content-Length:", lenof("Content-Length:"))) {
953 php_http_buffer_append(buf
, Z_STRVAL_P(tmp
), Z_STRLEN_P(tmp
));
954 php_http_buffer_appends(buf
, PHP_HTTP_CRLF
);
959 static STATUS
php_http_env_response_stream_start(php_http_env_response_stream_ctx_t
*ctx TSRMLS_DC
)
961 php_http_buffer_t header_buf
;
963 if (ctx
->started
|| ctx
->finished
) {
967 php_http_buffer_init(&header_buf
);
968 php_http_buffer_appendf(&header_buf
, "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
));
970 /* there are some limitations regarding TE:chunked, see https://tools.ietf.org/html/rfc7230#section-3.3.1 */
971 if (ctx
->version
.major
== 1 && ctx
->version
.minor
== 0) {
973 } else if (ctx
->status_code
== 204 || ctx
->status_code
/100 == 1) {
975 } else if (ctx
->request
&& ctx
->status_code
/100 == 2 && !strcasecmp(ctx
->request
->http
.info
.request
.method
, "CONNECT")) {
979 php_http_env_response_stream_header(ctx
, &ctx
->header
, &header_buf TSRMLS_CC
);
981 /* enable chunked transfer encoding */
983 php_http_buffer_appends(&header_buf
, "Transfer-Encoding: chunked" PHP_HTTP_CRLF
);
985 php_http_buffer_appends(&header_buf
, PHP_HTTP_CRLF
);
987 if (header_buf
.used
== php_stream_write(ctx
->stream
, header_buf
.data
, header_buf
.used
)) {
990 php_http_buffer_dtor(&header_buf
);
991 php_stream_flush(ctx
->stream
);
994 ctx
->chunked_filter
= php_stream_filter_create("http.chunked_encode", NULL
, 0 TSRMLS_CC
);
995 php_stream_filter_append(&ctx
->stream
->writefilters
, ctx
->chunked_filter
);
998 return ctx
->started
? SUCCESS
: FAILURE
;
1000 static long php_http_env_response_stream_get_status(php_http_env_response_t
*r
)
1002 php_http_env_response_stream_ctx_t
*ctx
= r
->ctx
;
1004 return ctx
->status_code
;
1006 static STATUS
php_http_env_response_stream_set_status(php_http_env_response_t
*r
, long http_code
)
1008 php_http_env_response_stream_ctx_t
*stream_ctx
= r
->ctx
;
1010 if (stream_ctx
->started
|| stream_ctx
->finished
) {
1014 stream_ctx
->status_code
= http_code
;
1018 static STATUS
php_http_env_response_stream_set_protocol_version(php_http_env_response_t
*r
, php_http_version_t
*v
)
1020 php_http_env_response_stream_ctx_t
*stream_ctx
= r
->ctx
;
1022 if (stream_ctx
->started
|| stream_ctx
->finished
) {
1026 memcpy(&stream_ctx
->version
, v
, sizeof(stream_ctx
->version
));
1030 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
)
1032 php_http_env_response_stream_ctx_t
*stream_ctx
= r
->ctx
;
1033 char *header_end
, *header_str
= NULL
;
1034 size_t header_len
= 0;
1035 zval
*zheader
, **zheader_ptr
;
1037 if (stream_ctx
->started
|| stream_ctx
->finished
) {
1041 header_len
= vspprintf(&header_str
, 0, fmt
, argv
);
1043 if (!(header_end
= strchr(header_str
, ':'))) {
1050 if (!replace
&& (SUCCESS
== zend_hash_find(&stream_ctx
->header
, header_str
, header_end
- header_str
+ 1, (void *) &zheader_ptr
))) {
1051 convert_to_array(*zheader_ptr
);
1053 return add_next_index_stringl(*zheader_ptr
, header_str
, header_len
, 0);
1055 MAKE_STD_ZVAL(zheader
);
1056 ZVAL_STRINGL(zheader
, header_str
, header_len
, 0);
1058 if (SUCCESS
!= zend_hash_update(&stream_ctx
->header
, header_str
, header_end
- header_str
+ 1, (void *) &zheader
, sizeof(zval
*), NULL
)) {
1059 zval_ptr_dtor(&zheader
);
1067 static STATUS
php_http_env_response_stream_set_header(php_http_env_response_t
*r
, const char *fmt
, ...)
1072 va_start(argv
, fmt
);
1073 ret
= php_http_env_response_stream_set_header_ex(r
, 1, fmt
, argv
);
1078 static STATUS
php_http_env_response_stream_add_header(php_http_env_response_t
*r
, const char *fmt
, ...)
1083 va_start(argv
, fmt
);
1084 ret
= php_http_env_response_stream_set_header_ex(r
, 0, fmt
, argv
);
1089 static STATUS
php_http_env_response_stream_del_header(php_http_env_response_t
*r
, const char *header_str
, size_t header_len
)
1091 php_http_env_response_stream_ctx_t
*stream_ctx
= r
->ctx
;
1093 if (stream_ctx
->started
|| stream_ctx
->finished
) {
1097 zend_hash_del(&stream_ctx
->header
, header_str
, header_len
+ 1);
1100 static STATUS
php_http_env_response_stream_write(php_http_env_response_t
*r
, const char *data_str
, size_t data_len
)
1102 php_http_env_response_stream_ctx_t
*stream_ctx
= r
->ctx
;
1103 TSRMLS_FETCH_FROM_CTX(r
->ts
);
1105 if (stream_ctx
->finished
) {
1108 if (!stream_ctx
->started
) {
1109 if (SUCCESS
!= php_http_env_response_stream_start(stream_ctx TSRMLS_CC
)) {
1114 if (data_len
!= php_stream_write(stream_ctx
->stream
, data_str
, data_len
)) {
1120 static STATUS
php_http_env_response_stream_flush(php_http_env_response_t
*r
)
1122 php_http_env_response_stream_ctx_t
*stream_ctx
= r
->ctx
;
1123 TSRMLS_FETCH_FROM_CTX(r
->ts
);
1125 if (stream_ctx
->finished
) {
1128 if (!stream_ctx
->started
) {
1129 if (SUCCESS
!= php_http_env_response_stream_start(stream_ctx TSRMLS_CC
)) {
1134 return php_stream_flush(stream_ctx
->stream
);
1136 static STATUS
php_http_env_response_stream_finish(php_http_env_response_t
*r
)
1138 php_http_env_response_stream_ctx_t
*ctx
= r
->ctx
;
1139 TSRMLS_FETCH_FROM_CTX(r
->ts
);
1141 if (ctx
->finished
) {
1144 if (!ctx
->started
) {
1145 if (SUCCESS
!= php_http_env_response_stream_start(ctx TSRMLS_CC
)) {
1150 php_stream_flush(ctx
->stream
);
1151 if (ctx
->chunked
&& ctx
->chunked_filter
) {
1152 php_stream_filter_flush(ctx
->chunked_filter
, 1);
1153 ctx
->chunked_filter
= php_stream_filter_remove(ctx
->chunked_filter
, 1 TSRMLS_CC
);
1161 static php_http_env_response_ops_t php_http_env_response_stream_ops
= {
1162 php_http_env_response_stream_init
,
1163 php_http_env_response_stream_dtor
,
1164 php_http_env_response_stream_get_status
,
1165 php_http_env_response_stream_set_status
,
1166 php_http_env_response_stream_set_protocol_version
,
1167 php_http_env_response_stream_set_header
,
1168 php_http_env_response_stream_add_header
,
1169 php_http_env_response_stream_del_header
,
1170 php_http_env_response_stream_write
,
1171 php_http_env_response_stream_flush
,
1172 php_http_env_response_stream_finish
1175 php_http_env_response_ops_t
*php_http_env_response_get_stream_ops(void)
1177 return &php_http_env_response_stream_ops
;
1180 #define PHP_HTTP_ENV_RESPONSE_OBJECT_INIT(obj) \
1182 if (!obj->message) { \
1183 obj->message = php_http_message_init_env(NULL, PHP_HTTP_RESPONSE TSRMLS_CC); \
1187 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnvResponse___construct
, 0, 0, 0)
1188 ZEND_END_ARG_INFO();
1189 static PHP_METHOD(HttpEnvResponse
, __construct
)
1191 php_http_message_object_t
*obj
;
1193 php_http_expect(SUCCESS
== zend_parse_parameters_none(), invalid_arg
, return);
1195 obj
= zend_object_store_get_object(getThis() TSRMLS_CC
);
1197 php_http_expect(obj
->message
= php_http_message_init_env(obj
->message
, PHP_HTTP_RESPONSE TSRMLS_CC
), unexpected_val
, return);
1200 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnvResponse___invoke
, 0, 0, 1)
1201 ZEND_ARG_INFO(0, ob_string
)
1202 ZEND_ARG_INFO(0, ob_flags
)
1203 ZEND_END_ARG_INFO();
1204 static PHP_METHOD(HttpEnvResponse
, __invoke
)
1210 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s|l", &ob_str
, &ob_len
, &ob_flags
)) {
1211 php_http_message_object_t
*obj
= zend_object_store_get_object(getThis() TSRMLS_CC
);
1213 PHP_HTTP_ENV_RESPONSE_OBJECT_INIT(obj
);
1215 php_http_message_object_init_body_object(obj
);
1216 php_http_message_body_append(obj
->message
->body
, ob_str
, ob_len
);
1217 #if PHP_VERSION_ID >= 50400
1220 RETURN_EMPTY_STRING();
1225 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnvResponse_setEnvRequest
, 0, 0, 1)
1226 ZEND_ARG_OBJ_INFO(0, env_request
, http
\\Message
, 1)
1227 ZEND_END_ARG_INFO();
1228 static PHP_METHOD(HttpEnvResponse
, setEnvRequest
)
1230 zval
*env_req
= NULL
;
1232 php_http_expect(SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|O", &env_req
, php_http_message_class_entry
), invalid_arg
, return);
1234 set_option(getThis(), ZEND_STRL("request"), IS_OBJECT
, env_req
, 0 TSRMLS_CC
);
1235 RETVAL_ZVAL(getThis(), 1, 0);
1238 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnvResponse_setContentType
, 0, 0, 1)
1239 ZEND_ARG_INFO(0, content_type
)
1240 ZEND_END_ARG_INFO();
1241 static PHP_METHOD(HttpEnvResponse
, setContentType
)
1243 char *ct_str
= NULL
;
1246 php_http_expect(SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s!", &ct_str
, &ct_len
), invalid_arg
, return);
1248 set_option(getThis(), ZEND_STRL("contentType"), IS_STRING
, ct_str
, ct_len TSRMLS_CC
);
1249 RETVAL_ZVAL(getThis(), 1, 0);
1252 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnvResponse_setContentDisposition
, 0, 0, 1)
1253 ZEND_ARG_ARRAY_INFO(0, disposition_params
, 1)
1254 ZEND_END_ARG_INFO();
1255 static PHP_METHOD(HttpEnvResponse
, setContentDisposition
)
1259 php_http_expect(SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "a", &zdisposition
), invalid_arg
, return);
1261 zend_update_property(Z_OBJCE_P(getThis()), getThis(), ZEND_STRL("contentDisposition"), zdisposition TSRMLS_CC
);
1262 RETVAL_ZVAL(getThis(), 1, 0);
1265 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnvResponse_setContentEncoding
, 0, 0, 1)
1266 ZEND_ARG_INFO(0, content_encoding
)
1267 ZEND_END_ARG_INFO();
1268 static PHP_METHOD(HttpEnvResponse
, setContentEncoding
)
1272 php_http_expect(SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "l", &ce
), invalid_arg
, return);
1274 set_option(getThis(), ZEND_STRL("contentEncoding"), IS_LONG
, &ce
, 0 TSRMLS_CC
);
1275 RETVAL_ZVAL(getThis(), 1, 0);
1278 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnvResponse_setCacheControl
, 0, 0, 1)
1279 ZEND_ARG_INFO(0, cache_control
)
1280 ZEND_END_ARG_INFO();
1281 static PHP_METHOD(HttpEnvResponse
, setCacheControl
)
1283 char *cc_str
= NULL
;
1286 php_http_expect(SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s!", &cc_str
, &cc_len
), invalid_arg
, return);
1288 set_option(getThis(), ZEND_STRL("cacheControl"), IS_STRING
, cc_str
, cc_len TSRMLS_CC
);
1289 RETVAL_ZVAL(getThis(), 1, 0);
1292 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnvResponse_setLastModified
, 0, 0, 1)
1293 ZEND_ARG_INFO(0, last_modified
)
1294 ZEND_END_ARG_INFO();
1295 static PHP_METHOD(HttpEnvResponse
, setLastModified
)
1299 php_http_expect(SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "l", &last_modified
), invalid_arg
, return);
1301 set_option(getThis(), ZEND_STRL("lastModified"), IS_LONG
, &last_modified
, 0 TSRMLS_CC
);
1302 RETVAL_ZVAL(getThis(), 1, 0);
1305 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnvResponse_isCachedByLastModified
, 0, 0, 0)
1306 ZEND_ARG_INFO(0, header_name
)
1307 ZEND_END_ARG_INFO();
1308 static PHP_METHOD(HttpEnvResponse
, isCachedByLastModified
)
1310 char *header_name_str
= NULL
;
1311 int header_name_len
= 0;
1313 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|s!", &header_name_str
, &header_name_len
)) {
1314 if (!header_name_str
|| !header_name_len
) {
1315 header_name_str
= "If-Modified-Since";
1316 header_name_len
= lenof("If-Modified-Since");
1319 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
));
1323 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnvResponse_setEtag
, 0, 0, 1)
1324 ZEND_ARG_INFO(0, etag
)
1325 ZEND_END_ARG_INFO();
1326 static PHP_METHOD(HttpEnvResponse
, setEtag
)
1328 char *etag_str
= NULL
;
1331 php_http_expect(SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s!", &etag_str
, &etag_len
), invalid_arg
, return);
1333 set_option(getThis(), ZEND_STRL("etag"), IS_STRING
, etag_str
, etag_len TSRMLS_CC
);
1334 RETVAL_ZVAL(getThis(), 1, 0);
1337 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnvResponse_isCachedByEtag
, 0, 0, 0)
1338 ZEND_ARG_INFO(0, header_name
)
1339 ZEND_END_ARG_INFO();
1340 static PHP_METHOD(HttpEnvResponse
, isCachedByEtag
)
1342 char *header_name_str
= NULL
;
1343 int header_name_len
= 0;
1345 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|s!", &header_name_str
, &header_name_len
)) {
1346 if (!header_name_str
|| !header_name_len
) {
1347 header_name_str
= "If-None-Match";
1348 header_name_len
= lenof("If-None-Match");
1350 RETURN_LONG(php_http_env_is_response_cached_by_etag(getThis(), header_name_str
, header_name_len
, get_request(getThis() TSRMLS_CC
) TSRMLS_CC
));
1354 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnvResponse_setThrottleRate
, 0, 0, 1)
1355 ZEND_ARG_INFO(0, chunk_size
)
1356 ZEND_ARG_INFO(0, delay
)
1357 ZEND_END_ARG_INFO();
1358 static PHP_METHOD(HttpEnvResponse
, setThrottleRate
)
1363 php_http_expect(SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "l|d", &chunk_size
, &delay
), invalid_arg
, return);
1365 set_option(getThis(), ZEND_STRL("throttleDelay"), IS_DOUBLE
, &delay
, 0 TSRMLS_CC
);
1366 set_option(getThis(), ZEND_STRL("throttleChunk"), IS_LONG
, &chunk_size
, 0 TSRMLS_CC
);
1367 RETVAL_ZVAL(getThis(), 1, 0);
1370 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnvResponse_setCookie
, 0, 0, 1)
1371 ZEND_ARG_INFO(0, cookie
)
1372 ZEND_END_ARG_INFO();
1373 static PHP_METHOD(HttpEnvResponse
, setCookie
)
1376 zend_error_handling zeh
;
1377 php_http_cookie_list_t
*list
= NULL
;
1379 php_http_expect(SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "z", &zcookie_new
), invalid_arg
, return);
1381 zend_replace_error_handling(EH_THROW
, php_http_exception_unexpected_val_class_entry
, &zeh TSRMLS_CC
);
1382 switch (Z_TYPE_P(zcookie_new
)) {
1384 if (instanceof_function(Z_OBJCE_P(zcookie_new
), php_http_cookie_class_entry TSRMLS_CC
)) {
1385 Z_ADDREF_P(zcookie_new
);
1390 list
= php_http_cookie_list_from_struct(NULL
, zcookie_new TSRMLS_CC
);
1391 MAKE_STD_ZVAL(zcookie_new
);
1392 ZVAL_OBJVAL(zcookie_new
, php_http_cookie_object_new_ex(php_http_cookie_class_entry
, list
, NULL TSRMLS_CC
), 0);
1396 zcookie_new
= php_http_ztyp(IS_STRING
, zcookie_new
);
1397 list
= php_http_cookie_list_parse(NULL
, Z_STRVAL_P(zcookie_new
), Z_STRLEN_P(zcookie_new
), 0, NULL TSRMLS_CC
);
1398 zval_ptr_dtor(&zcookie_new
);
1399 MAKE_STD_ZVAL(zcookie_new
);
1400 ZVAL_OBJVAL(zcookie_new
, php_http_cookie_object_new_ex(php_http_cookie_class_entry
, list
, NULL TSRMLS_CC
), 0);
1402 zend_restore_error_handling(&zeh TSRMLS_CC
);
1404 set_cookie(getThis(), zcookie_new TSRMLS_CC
);
1405 zval_ptr_dtor(&zcookie_new
);
1407 RETVAL_ZVAL(getThis(), 1, 0);
1410 ZEND_BEGIN_ARG_INFO_EX(ai_HttpEnvResponse_send
, 0, 0, 0)
1411 ZEND_ARG_INFO(0, stream
)
1412 ZEND_END_ARG_INFO();
1413 static PHP_METHOD(HttpEnvResponse
, send
)
1415 zval
*zstream
= NULL
;
1416 php_stream
*s
= NULL
;
1418 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|r", &zstream
)) {
1419 /* first flush the output layer to avoid conflicting headers and output;
1420 * also, ob_start($thisEnvResponse) might have been called */
1421 #if PHP_VERSION_ID >= 50400
1422 php_output_end_all(TSRMLS_C
);
1424 php_end_ob_buffers(1 TSRMLS_CC
);
1428 php_http_env_response_t
*r
;
1430 php_stream_from_zval(s
, &zstream
);
1431 r
= php_http_env_response_init(NULL
, getThis(), php_http_env_response_get_stream_ops(), s TSRMLS_CC
);
1436 RETVAL_BOOL(SUCCESS
== php_http_env_response_send(r
));
1437 php_http_env_response_free(&r
);
1439 php_http_env_response_t r
;
1441 if (!php_http_env_response_init(&r
, getThis(), NULL
, NULL TSRMLS_CC
)) {
1445 RETVAL_BOOL(SUCCESS
== php_http_env_response_send(&r
));
1446 php_http_env_response_dtor(&r
);
1451 static zend_function_entry php_http_env_response_methods
[] = {
1452 PHP_ME(HttpEnvResponse
, __construct
, ai_HttpEnvResponse___construct
, ZEND_ACC_PUBLIC
|ZEND_ACC_CTOR
)
1453 PHP_ME(HttpEnvResponse
, __invoke
, ai_HttpEnvResponse___invoke
, ZEND_ACC_PUBLIC
)
1454 PHP_ME(HttpEnvResponse
, setEnvRequest
, ai_HttpEnvResponse_setEnvRequest
, ZEND_ACC_PUBLIC
)
1455 PHP_ME(HttpEnvResponse
, setCookie
, ai_HttpEnvResponse_setCookie
, ZEND_ACC_PUBLIC
)
1456 PHP_ME(HttpEnvResponse
, setContentType
, ai_HttpEnvResponse_setContentType
, ZEND_ACC_PUBLIC
)
1457 PHP_ME(HttpEnvResponse
, setContentDisposition
, ai_HttpEnvResponse_setContentDisposition
, ZEND_ACC_PUBLIC
)
1458 PHP_ME(HttpEnvResponse
, setContentEncoding
, ai_HttpEnvResponse_setContentEncoding
, ZEND_ACC_PUBLIC
)
1459 PHP_ME(HttpEnvResponse
, setCacheControl
, ai_HttpEnvResponse_setCacheControl
, ZEND_ACC_PUBLIC
)
1460 PHP_ME(HttpEnvResponse
, setLastModified
, ai_HttpEnvResponse_setLastModified
, ZEND_ACC_PUBLIC
)
1461 PHP_ME(HttpEnvResponse
, isCachedByLastModified
, ai_HttpEnvResponse_isCachedByLastModified
, ZEND_ACC_PUBLIC
)
1462 PHP_ME(HttpEnvResponse
, setEtag
, ai_HttpEnvResponse_setEtag
, ZEND_ACC_PUBLIC
)
1463 PHP_ME(HttpEnvResponse
, isCachedByEtag
, ai_HttpEnvResponse_isCachedByEtag
, ZEND_ACC_PUBLIC
)
1464 PHP_ME(HttpEnvResponse
, setThrottleRate
, ai_HttpEnvResponse_setThrottleRate
, ZEND_ACC_PUBLIC
)
1465 PHP_ME(HttpEnvResponse
, send
, ai_HttpEnvResponse_send
, ZEND_ACC_PUBLIC
)
1466 EMPTY_FUNCTION_ENTRY
1469 zend_class_entry
*php_http_env_response_class_entry
;
1471 PHP_MINIT_FUNCTION(http_env_response
)
1473 zend_class_entry ce
= {0};
1475 INIT_NS_CLASS_ENTRY(ce
, "http\\Env", "Response", php_http_env_response_methods
);
1476 php_http_env_response_class_entry
= zend_register_internal_class_ex(&ce
, php_http_message_class_entry
, NULL TSRMLS_CC
);
1478 zend_declare_class_constant_long(php_http_env_response_class_entry
, ZEND_STRL("CONTENT_ENCODING_NONE"), PHP_HTTP_CONTENT_ENCODING_NONE TSRMLS_CC
);
1479 zend_declare_class_constant_long(php_http_env_response_class_entry
, ZEND_STRL("CONTENT_ENCODING_GZIP"), PHP_HTTP_CONTENT_ENCODING_GZIP TSRMLS_CC
);
1481 zend_declare_class_constant_long(php_http_env_response_class_entry
, ZEND_STRL("CACHE_NO"), PHP_HTTP_CACHE_NO TSRMLS_CC
);
1482 zend_declare_class_constant_long(php_http_env_response_class_entry
, ZEND_STRL("CACHE_HIT"), PHP_HTTP_CACHE_HIT TSRMLS_CC
);
1483 zend_declare_class_constant_long(php_http_env_response_class_entry
, ZEND_STRL("CACHE_MISS"), PHP_HTTP_CACHE_MISS TSRMLS_CC
);
1485 zend_declare_property_null(php_http_env_response_class_entry
, ZEND_STRL("request"), ZEND_ACC_PROTECTED TSRMLS_CC
);
1486 zend_declare_property_null(php_http_env_response_class_entry
, ZEND_STRL("cookies"), ZEND_ACC_PROTECTED TSRMLS_CC
);
1487 zend_declare_property_null(php_http_env_response_class_entry
, ZEND_STRL("contentType"), ZEND_ACC_PROTECTED TSRMLS_CC
);
1488 zend_declare_property_null(php_http_env_response_class_entry
, ZEND_STRL("contentDisposition"), ZEND_ACC_PROTECTED TSRMLS_CC
);
1489 zend_declare_property_null(php_http_env_response_class_entry
, ZEND_STRL("contentEncoding"), ZEND_ACC_PROTECTED TSRMLS_CC
);
1490 zend_declare_property_null(php_http_env_response_class_entry
, ZEND_STRL("cacheControl"), ZEND_ACC_PROTECTED TSRMLS_CC
);
1491 zend_declare_property_null(php_http_env_response_class_entry
, ZEND_STRL("etag"), ZEND_ACC_PROTECTED TSRMLS_CC
);
1492 zend_declare_property_null(php_http_env_response_class_entry
, ZEND_STRL("lastModified"), ZEND_ACC_PROTECTED TSRMLS_CC
);
1493 zend_declare_property_null(php_http_env_response_class_entry
, ZEND_STRL("throttleDelay"), ZEND_ACC_PROTECTED TSRMLS_CC
);
1494 zend_declare_property_null(php_http_env_response_class_entry
, ZEND_STRL("throttleChunk"), ZEND_ACC_PROTECTED TSRMLS_CC
);
1505 * vim600: noet sw=4 ts=4 fdm=marker
1506 * vim<600: noet sw=4 ts=4