2 +----------------------------------------------------------------------+
4 +----------------------------------------------------------------------+
5 | This source file is subject to version 3.0 of the PHP license, that |
6 | is bundled with this package in the file LICENSE, and is available |
7 | through the world-wide-web at http://www.php.net/license/3_0.txt. |
8 | If you did not receive a copy of the PHP license and are unable to |
9 | obtain it through the world-wide-web, please send a note to |
10 | license@php.net so we can mail you a copy immediately. |
11 +----------------------------------------------------------------------+
12 | Copyright (c) 2004-2005 Michael Wallner <mike@php.net> |
13 +----------------------------------------------------------------------+
27 #include "php_http_api.h"
28 #include "php_http_std_defs.h"
29 #include "php_http_message_object.h"
30 #include "php_http_exception_object.h"
32 #include "phpstr/phpstr.h"
35 ZEND_EXTERN_MODULE_GLOBALS(http
);
37 #define HTTP_BEGIN_ARGS(method, ret_ref, req_args) HTTP_BEGIN_ARGS_EX(HttpMessage, method, ret_ref, req_args)
38 #define HTTP_EMPTY_ARGS(method, ret_ref) HTTP_EMPTY_ARGS_EX(HttpMessage, method, ret_ref)
39 #define HTTP_MESSAGE_ME(method, visibility) PHP_ME(HttpMessage, method, HTTP_ARGS(HttpMessage, method), visibility)
41 HTTP_BEGIN_ARGS(__construct
, 0, 0)
42 HTTP_ARG_VAL(message
, 0)
45 HTTP_BEGIN_ARGS(fromString
, 1, 1)
46 HTTP_ARG_VAL(message
, 0)
49 HTTP_EMPTY_ARGS(getBody
, 0);
50 HTTP_BEGIN_ARGS(setBody
, 0, 1)
54 HTTP_EMPTY_ARGS(getHeaders
, 0);
55 HTTP_BEGIN_ARGS(setHeaders
, 0, 1)
56 HTTP_ARG_VAL(headers
, 0)
59 HTTP_BEGIN_ARGS(addHeaders
, 0, 1)
60 HTTP_ARG_VAL(headers
, 0)
61 HTTP_ARG_VAL(append
, 0)
64 HTTP_EMPTY_ARGS(getType
, 0);
65 HTTP_BEGIN_ARGS(setType
, 0, 1)
69 HTTP_EMPTY_ARGS(getResponseCode
, 0);
70 HTTP_BEGIN_ARGS(setResponseCode
, 0, 1)
71 HTTP_ARG_VAL(response_code
, 0)
74 HTTP_EMPTY_ARGS(getRequestMethod
, 0);
75 HTTP_BEGIN_ARGS(setRequestMethod
, 0, 1)
76 HTTP_ARG_VAL(request_method
, 0)
79 HTTP_EMPTY_ARGS(getRequestUri
, 0);
80 HTTP_BEGIN_ARGS(setRequestUri
, 0, 1)
84 HTTP_EMPTY_ARGS(getHttpVersion
, 0);
85 HTTP_BEGIN_ARGS(setHttpVersion
, 0, 1)
86 HTTP_ARG_VAL(http_version
, 0)
89 HTTP_EMPTY_ARGS(getParentMessage
, 1);
90 HTTP_EMPTY_ARGS(send
, 0);
91 HTTP_BEGIN_ARGS(toString
, 0, 0)
92 HTTP_ARG_VAL(include_parent
, 0)
95 #define http_message_object_declare_default_properties() _http_message_object_declare_default_properties(TSRMLS_C)
96 static inline void _http_message_object_declare_default_properties(TSRMLS_D
);
97 #define http_message_object_read_prop _http_message_object_read_prop
98 static zval
*_http_message_object_read_prop(zval
*object
, zval
*member
, int type TSRMLS_DC
);
99 #define http_message_object_write_prop _http_message_object_write_prop
100 static void _http_message_object_write_prop(zval
*object
, zval
*member
, zval
*value TSRMLS_DC
);
101 #define http_message_object_get_props _http_message_object_get_props
102 static HashTable
*_http_message_object_get_props(zval
*object TSRMLS_DC
);
103 #define http_message_object_clone_obj _http_message_object_clone_obj
104 static inline zend_object_value
_http_message_object_clone_obj(zval
*object TSRMLS_DC
);
106 zend_class_entry
*http_message_object_ce
;
107 zend_function_entry http_message_object_fe
[] = {
108 HTTP_MESSAGE_ME(__construct
, ZEND_ACC_PUBLIC
|ZEND_ACC_CTOR
)
109 HTTP_MESSAGE_ME(getBody
, ZEND_ACC_PUBLIC
)
110 HTTP_MESSAGE_ME(setBody
, ZEND_ACC_PUBLIC
)
111 HTTP_MESSAGE_ME(getHeaders
, ZEND_ACC_PUBLIC
)
112 HTTP_MESSAGE_ME(setHeaders
, ZEND_ACC_PUBLIC
)
113 HTTP_MESSAGE_ME(addHeaders
, ZEND_ACC_PUBLIC
)
114 HTTP_MESSAGE_ME(getType
, ZEND_ACC_PUBLIC
)
115 HTTP_MESSAGE_ME(setType
, ZEND_ACC_PUBLIC
)
116 HTTP_MESSAGE_ME(getResponseCode
, ZEND_ACC_PUBLIC
)
117 HTTP_MESSAGE_ME(setResponseCode
, ZEND_ACC_PUBLIC
)
118 HTTP_MESSAGE_ME(getRequestMethod
, ZEND_ACC_PUBLIC
)
119 HTTP_MESSAGE_ME(setRequestMethod
, ZEND_ACC_PUBLIC
)
120 HTTP_MESSAGE_ME(getRequestUri
, ZEND_ACC_PUBLIC
)
121 HTTP_MESSAGE_ME(setRequestUri
, ZEND_ACC_PUBLIC
)
122 HTTP_MESSAGE_ME(getHttpVersion
, ZEND_ACC_PUBLIC
)
123 HTTP_MESSAGE_ME(setHttpVersion
, ZEND_ACC_PUBLIC
)
124 HTTP_MESSAGE_ME(getParentMessage
, ZEND_ACC_PUBLIC
)
125 HTTP_MESSAGE_ME(send
, ZEND_ACC_PUBLIC
)
126 HTTP_MESSAGE_ME(toString
, ZEND_ACC_PUBLIC
)
128 ZEND_MALIAS(HttpMessage
, __toString
, toString
, HTTP_ARGS(HttpMessage
, toString
), ZEND_ACC_PUBLIC
)
130 HTTP_MESSAGE_ME(fromString
, ZEND_ACC_PUBLIC
|ZEND_ACC_STATIC
)
134 static zend_object_handlers http_message_object_handlers
;
136 void _http_message_object_init(INIT_FUNC_ARGS
)
138 HTTP_REGISTER_CLASS_EX(HttpMessage
, http_message_object
, NULL
, 0);
140 HTTP_LONG_CONSTANT("HTTP_MSG_NONE", HTTP_MSG_NONE
);
141 HTTP_LONG_CONSTANT("HTTP_MSG_REQUEST", HTTP_MSG_REQUEST
);
142 HTTP_LONG_CONSTANT("HTTP_MSG_RESPONSE", HTTP_MSG_RESPONSE
);
144 http_message_object_handlers
.clone_obj
= http_message_object_clone_obj
;
145 http_message_object_handlers
.read_property
= http_message_object_read_prop
;
146 http_message_object_handlers
.write_property
= http_message_object_write_prop
;
147 http_message_object_handlers
.get_properties
= http_message_object_get_props
;
148 http_message_object_handlers
.get_property_ptr_ptr
= NULL
;
151 zend_object_value
_http_message_object_new(zend_class_entry
*ce TSRMLS_DC
)
153 return http_message_object_new_ex(ce
, NULL
);
156 zend_object_value
_http_message_object_new_ex(zend_class_entry
*ce
, http_message
*msg TSRMLS_DC
)
158 zend_object_value ov
;
159 http_message_object
*o
;
161 o
= ecalloc(1, sizeof(http_message_object
));
167 o
->parent
= http_message_object_from_msg(msg
->parent
);
171 ALLOC_HASHTABLE(OBJ_PROP(o
));
172 zend_hash_init(OBJ_PROP(o
), 0, NULL
, ZVAL_PTR_DTOR
, 0);
174 ov
.handle
= putObject(http_message_object
, o
);
175 ov
.handlers
= &http_message_object_handlers
;
180 zend_object_value
_http_message_object_clone(zval
*this_ptr TSRMLS_DC
)
182 return http_message_object_clone_obj(this_ptr TSRMLS_CC
);
185 static inline void _http_message_object_declare_default_properties(TSRMLS_D
)
187 zend_class_entry
*ce
= http_message_object_ce
;
190 DCL_CONST(long, "TYPE_NONE", HTTP_MSG_NONE
);
191 DCL_CONST(long, "TYPE_REQUEST", HTTP_MSG_REQUEST
);
192 DCL_CONST(long, "TYPE_RESPONSE", HTTP_MSG_RESPONSE
);
195 DCL_PROP(PROTECTED
, long, type
, HTTP_MSG_NONE
);
196 DCL_PROP(PROTECTED
, string
, body
, "");
197 DCL_PROP(PROTECTED
, string
, requestMethod
, "");
198 DCL_PROP(PROTECTED
, string
, requestUri
, "");
199 DCL_PROP(PROTECTED
, long, responseCode
, 0);
200 DCL_PROP_N(PROTECTED
, httpVersion
);
201 DCL_PROP_N(PROTECTED
, headers
);
202 DCL_PROP_N(PROTECTED
, parentMessage
);
205 void _http_message_object_free(zend_object
*object TSRMLS_DC
)
207 http_message_object
*o
= (http_message_object
*) object
;
210 zend_hash_destroy(OBJ_PROP(o
));
211 FREE_HASHTABLE(OBJ_PROP(o
));
214 http_message_dtor(o
->message
);
220 static inline zend_object_value
_http_message_object_clone_obj(zval
*this_ptr TSRMLS_DC
)
222 getObject(http_message_object
, obj
);
223 return http_message_object_from_msg(http_message_dup(obj
->message
));
226 static zval
*_http_message_object_read_prop(zval
*object
, zval
*member
, int type TSRMLS_DC
)
228 getObjectEx(http_message_object
, obj
, object
);
229 http_message
*msg
= obj
->message
;
232 zend_hash_value h
= zend_get_hash_value(Z_STRVAL_P(member
), Z_STRLEN_P(member
)+1);
234 zend_property_info
*pinfo
= zend_get_property_info(obj
->zo
.ce
, member
, 1 TSRMLS_CC
);
236 if (!pinfo
|| ACC_PROP_PUBLIC(pinfo
->flags
)) {
237 return zend_get_std_object_handlers()->read_property(object
, member
, type TSRMLS_CC
);
241 return_value
= &EG(uninitialized_zval
);
242 return_value
->refcount
= 0;
243 return_value
->is_ref
= 0;
251 case HTTP_MSG_PROPHASH_TYPE
:
252 RETVAL_LONG(msg
->type
);
255 case HTTP_MSG_PROPHASH_HTTP_VERSION
:
256 RETVAL_DOUBLE(msg
->http
.version
);
259 case HTTP_MSG_PROPHASH_BODY
:
260 phpstr_fix(PHPSTR(msg
));
261 RETVAL_PHPSTR(PHPSTR(msg
), 0, 1);
264 case HTTP_MSG_PROPHASH_HEADERS
:
265 /* This is needed for situations like
266 * $this->headers['foo'] = 'bar';
268 if (type
== BP_VAR_W
) {
269 return_value
->refcount
= 1;
270 return_value
->is_ref
= 1;
271 Z_TYPE_P(return_value
) = IS_ARRAY
;
272 Z_ARRVAL_P(return_value
) = &msg
->hdrs
;
274 array_init(return_value
);
275 zend_hash_copy(Z_ARRVAL_P(return_value
), &msg
->hdrs
, (copy_ctor_func_t
) zval_add_ref
, NULL
, sizeof(zval
*));
279 case HTTP_MSG_PROPHASH_PARENT_MESSAGE
:
281 RETVAL_OBJVAL(obj
->parent
);
287 case HTTP_MSG_PROPHASH_REQUEST_METHOD
:
288 if (HTTP_MSG_TYPE(REQUEST
, msg
) && msg
->http
.info
.request
.method
) {
289 RETVAL_STRING(msg
->http
.info
.request
.method
, 1);
295 case HTTP_MSG_PROPHASH_REQUEST_URI
:
296 if (HTTP_MSG_TYPE(REQUEST
, msg
) && msg
->http
.info
.request
.URI
) {
297 RETVAL_STRING(msg
->http
.info
.request
.URI
, 1);
303 case HTTP_MSG_PROPHASH_RESPONSE_CODE
:
304 if (HTTP_MSG_TYPE(RESPONSE
, msg
)) {
305 RETVAL_LONG(msg
->http
.info
.response
.code
);
311 case HTTP_MSG_PROPHASH_RESPONSE_STATUS
:
312 if (HTTP_MSG_TYPE(RESPONSE
, msg
) && msg
->http
.info
.response
.status
) {
313 RETVAL_STRING(msg
->http
.info
.response
.status
, 1);
321 return zend_get_std_object_handlers()->read_property(object
, member
, type TSRMLS_CC
);
331 static void _http_message_object_write_prop(zval
*object
, zval
*member
, zval
*value TSRMLS_DC
)
333 getObjectEx(http_message_object
, obj
, object
);
334 http_message
*msg
= obj
->message
;
336 zend_hash_value h
= zend_get_hash_value(Z_STRVAL_P(member
), Z_STRLEN_P(member
) + 1);
338 zend_property_info
*pinfo
= zend_get_property_info(obj
->zo
.ce
, member
, 1 TSRMLS_CC
);
340 if (!pinfo
|| ACC_PROP_PUBLIC(pinfo
->flags
)) {
341 zend_get_std_object_handlers()->write_property(object
, member
, value TSRMLS_CC
);
352 case HTTP_MSG_PROPHASH_TYPE
:
353 convert_to_long_ex(&value
);
354 http_message_set_type(msg
, Z_LVAL_P(value
));
357 case HTTP_MSG_PROPHASH_HTTP_VERSION
:
358 convert_to_double_ex(&value
);
359 msg
->http
.version
= Z_DVAL_P(value
);
362 case HTTP_MSG_PROPHASH_BODY
:
363 convert_to_string_ex(&value
);
364 phpstr_dtor(PHPSTR(msg
));
365 phpstr_from_string_ex(PHPSTR(msg
), Z_STRVAL_P(value
), Z_STRLEN_P(value
));
368 case HTTP_MSG_PROPHASH_HEADERS
:
369 convert_to_array_ex(&value
);
370 zend_hash_clean(&msg
->hdrs
);
371 zend_hash_copy(&msg
->hdrs
, Z_ARRVAL_P(value
), (copy_ctor_func_t
) zval_add_ref
, NULL
, sizeof(zval
*));
374 case HTTP_MSG_PROPHASH_PARENT_MESSAGE
:
377 tmp
.value
.obj
= obj
->parent
;
378 zend_objects_store_del_ref(&tmp TSRMLS_CC
);
380 zend_objects_store_add_ref(value TSRMLS_CC
);
381 obj
->parent
= value
->value
.obj
;
384 case HTTP_MSG_PROPHASH_REQUEST_METHOD
:
385 if (HTTP_MSG_TYPE(REQUEST
, msg
)) {
386 convert_to_string_ex(&value
);
387 STR_SET(msg
->http
.info
.request
.method
, estrndup(Z_STRVAL_P(value
), Z_STRLEN_P(value
)));
391 case HTTP_MSG_PROPHASH_REQUEST_URI
:
392 if (HTTP_MSG_TYPE(REQUEST
, msg
)) {
393 convert_to_string_ex(&value
);
394 STR_SET(msg
->http
.info
.request
.URI
, estrndup(Z_STRVAL_P(value
), Z_STRLEN_P(value
)));
398 case HTTP_MSG_PROPHASH_RESPONSE_CODE
:
399 if (HTTP_MSG_TYPE(RESPONSE
, msg
)) {
400 convert_to_long_ex(&value
);
401 msg
->http
.info
.response
.code
= Z_LVAL_P(value
);
405 case HTTP_MSG_PROPHASH_RESPONSE_STATUS
:
406 if (HTTP_MSG_TYPE(RESPONSE
, msg
)) {
407 convert_to_string_ex(&value
);
408 STR_SET(msg
->http
.info
.response
.status
, estrndup(Z_STRVAL_P(value
), Z_STRLEN_P(value
)));
414 zend_get_std_object_handlers()->write_property(object
, member
, value TSRMLS_CC
);
420 static HashTable
*_http_message_object_get_props(zval
*object TSRMLS_DC
)
423 getObjectEx(http_message_object
, obj
, object
);
424 http_message
*msg
= obj
->message
;
425 HashTable
*props
= OBJ_PROP(obj
);
428 INIT_ZARR(array
, props
);
430 #define ASSOC_PROP(array, ptype, name, val) \
434 zend_mangle_property_name(&m_prop_name, &m_prop_len, "*", 1, name, lenof(name), 0); \
435 add_assoc_ ##ptype## _ex(&array, m_prop_name, sizeof(name)+4, val); \
436 efree(m_prop_name); \
438 #define ASSOC_STRING(array, name, val) ASSOC_STRINGL(array, name, val, strlen(val))
439 #define ASSOC_STRINGL(array, name, val, len) \
443 zend_mangle_property_name(&m_prop_name, &m_prop_len, "*", 1, name, lenof(name), 0); \
444 add_assoc_stringl_ex(&array, m_prop_name, sizeof(name)+4, val, len, 1); \
445 efree(m_prop_name); \
448 ASSOC_PROP(array
, long, "type", msg
->type
);
449 ASSOC_PROP(array
, double, "httpVersion", msg
->http
.version
);
453 case HTTP_MSG_REQUEST
:
454 ASSOC_PROP(array
, long, "responseCode", 0);
455 ASSOC_STRINGL(array
, "responseStatus", "", 0);
456 ASSOC_STRING(array
, "requestMethod", msg
->http
.info
.request
.method
);
457 ASSOC_STRING(array
, "requestUri", msg
->http
.info
.request
.URI
);
460 case HTTP_MSG_RESPONSE
:
461 ASSOC_PROP(array
, long, "responseCode", msg
->http
.info
.response
.code
);
462 ASSOC_STRING(array
, "responseStatus", msg
->http
.info
.response
.status
);
463 ASSOC_STRINGL(array
, "requestMethod", "", 0);
464 ASSOC_STRINGL(array
, "requestUri", "", 0);
469 ASSOC_PROP(array
, long, "responseCode", 0);
470 ASSOC_STRINGL(array
, "responseStatus", "", 0);
471 ASSOC_STRINGL(array
, "requestMethod", "", 0);
472 ASSOC_STRINGL(array
, "requestUri", "", 0);
476 MAKE_STD_ZVAL(headers
);
478 zend_hash_copy(Z_ARRVAL_P(headers
), &msg
->hdrs
, (copy_ctor_func_t
) zval_add_ref
, NULL
, sizeof(zval
*));
479 ASSOC_PROP(array
, zval
, "headers", headers
);
480 ASSOC_STRINGL(array
, "body", PHPSTR_VAL(msg
), PHPSTR_LEN(msg
));
482 return OBJ_PROP(obj
);
485 /* ### USERLAND ### */
487 /* {{{ proto void HttpMessage::__construct([string message])
489 * Instantiate a new HttpMessage object.
491 PHP_METHOD(HttpMessage
, __construct
)
493 char *message
= NULL
;
495 getObject(http_message_object
, obj
);
498 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|s", &message
, &length
) && message
&& length
) {
499 if (obj
->message
= http_message_parse(message
, length
)) {
500 if (obj
->message
->parent
) {
501 obj
->parent
= http_message_object_from_msg(obj
->message
->parent
);
504 } else if (!obj
->message
) {
505 obj
->message
= http_message_new();
511 /* {{{ proto static HttpMessage HttpMessage::fromString(string raw_message)
513 * Create an HttpMessage object from a string.
515 PHP_METHOD(HttpMessage
, fromString
)
519 http_message
*msg
= NULL
;
521 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s", &string
, &length
)) {
525 if (!(msg
= http_message_parse(string
, length
))) {
529 Z_TYPE_P(return_value
) = IS_OBJECT
;
530 return_value
->value
.obj
= http_message_object_from_msg(msg
);
534 /* {{{ proto string HttpMessage::getBody()
536 * Get the body of the parsed Message.
538 PHP_METHOD(HttpMessage
, getBody
)
543 getObject(http_message_object
, obj
);
544 RETURN_PHPSTR(&obj
->message
->body
, PHPSTR_FREE_NOT
, 1);
549 /* {{{ proto void HttpMessage::setBody(string body)
551 * Set the body of the HttpMessage.
552 * NOTE: Don't forget to update any headers accordingly.
554 PHP_METHOD(HttpMessage
, setBody
)
558 getObject(http_message_object
, obj
);
560 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s", &body
, &len
)) {
561 phpstr_dtor(PHPSTR(obj
->message
));
562 phpstr_from_string_ex(PHPSTR(obj
->message
), body
, len
);
567 /* {{{ proto array HttpMessage::getHeaders()
569 * Get Message Headers.
571 PHP_METHOD(HttpMessage
, getHeaders
)
577 getObject(http_message_object
, obj
);
579 INIT_ZARR(headers
, &obj
->message
->hdrs
);
580 array_init(return_value
);
581 array_copy(&headers
, return_value
);
586 /* {{{ proto void HttpMessage::setHeaders(array headers)
590 PHP_METHOD(HttpMessage
, setHeaders
)
592 zval
*new_headers
, old_headers
;
593 getObject(http_message_object
, obj
);
595 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "a/", &new_headers
)) {
599 zend_hash_clean(&obj
->message
->hdrs
);
600 INIT_ZARR(old_headers
, &obj
->message
->hdrs
);
601 array_copy(new_headers
, &old_headers
);
605 /* {{{ proto void HttpMessage::addHeaders(array headers[, bool append = false])
607 * Add headers. If append is true, headers with the same name will be separated, else overwritten.
609 PHP_METHOD(HttpMessage
, addHeaders
)
611 zval old_headers
, *new_headers
;
612 zend_bool append
= 0;
613 getObject(http_message_object
, obj
);
615 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "a|b", &new_headers
, &append
)) {
619 INIT_ZARR(old_headers
, &obj
->message
->hdrs
);
621 array_append(new_headers
, &old_headers
);
623 array_merge(new_headers
, &old_headers
);
628 /* {{{ proto long HttpMessage::getType()
630 * Get Message Type. (HTTP_MSG_NONE|HTTP_MSG_REQUEST|HTTP_MSG_RESPONSE)
632 PHP_METHOD(HttpMessage
, getType
)
637 getObject(http_message_object
, obj
);
638 RETURN_LONG(obj
->message
->type
);
643 /* {{{ proto void HttpMessage::setType(long type)
645 * Set Message Type. (HTTP_MSG_NONE|HTTP_MSG_REQUEST|HTTP_MSG_RESPONSE)
647 PHP_METHOD(HttpMessage
, setType
)
650 getObject(http_message_object
, obj
);
652 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "l", &type
)) {
655 http_message_set_type(obj
->message
, type
);
659 /* {{{ proto long HttpMessage::getResponseCode()
661 * Get the Response Code of the Message.
663 PHP_METHOD(HttpMessage
, getResponseCode
)
668 getObject(http_message_object
, obj
);
670 if (!HTTP_MSG_TYPE(RESPONSE
, obj
->message
)) {
671 http_error(HE_NOTICE
, HTTP_E_MESSAGE_TYPE
, "HttpMessage is not of type HTTP_MSG_RESPONSE");
675 RETURN_LONG(obj
->message
->http
.info
.response
.code
);
680 /* {{{ proto bool HttpMessage::setResponseCode(long code)
682 * Set the response code of an HTTP Response Message.
683 * Returns false if the Message is not of type HTTP_MSG_RESPONSE,
684 * or if the response code is out of range (100-510).
686 PHP_METHOD(HttpMessage
, setResponseCode
)
689 getObject(http_message_object
, obj
);
691 if (!HTTP_MSG_TYPE(RESPONSE
, obj
->message
)) {
692 http_error(HE_WARNING
, HTTP_E_MESSAGE_TYPE
, "HttpMessage is not of type HTTP_MSG_RESPONSE");
696 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "l", &code
)) {
699 if (code
< 100 || code
> 510) {
700 http_error_ex(HE_WARNING
, HTTP_E_INVALID_PARAM
, "Invalid response code (100-510): %ld", code
);
704 obj
->message
->http
.info
.response
.code
= code
;
709 /* {{{ proto string HttpMessage::getRequestMethod()
711 * Get the Request Method of the Message.
712 * Returns false if the Message is not of type HTTP_MSG_REQUEST.
714 PHP_METHOD(HttpMessage
, getRequestMethod
)
719 getObject(http_message_object
, obj
);
721 if (!HTTP_MSG_TYPE(REQUEST
, obj
->message
)) {
722 http_error(HE_NOTICE
, HTTP_E_MESSAGE_TYPE
, "HttpMessage is not of type HTTP_MSG_REQUEST");
726 RETURN_STRING(obj
->message
->http
.info
.request
.method
, 1);
731 /* {{{ proto bool HttpMessage::setRequestMethod(string method)
733 * Set the Request Method of the HTTP Message.
734 * Returns false if the Message is not of type HTTP_MSG_REQUEST.
736 PHP_METHOD(HttpMessage
, setRequestMethod
)
740 getObject(http_message_object
, obj
);
742 if (!HTTP_MSG_TYPE(REQUEST
, obj
->message
)) {
743 http_error(HE_WARNING
, HTTP_E_MESSAGE_TYPE
, "HttpMessage is not of type HTTP_MSG_REQUEST");
747 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s", &method
, &method_len
)) {
750 if (method_len
< 1) {
751 http_error(HE_WARNING
, HTTP_E_INVALID_PARAM
, "Cannot set HttpMessage::requestMethod to an empty string");
754 if (SUCCESS
!= http_check_method(method
)) {
755 http_error_ex(HE_WARNING
, HTTP_E_REQUEST_METHOD
, "Unkown request method: %s", method
);
759 STR_SET(obj
->message
->http
.info
.request
.method
, estrndup(method
, method_len
));
764 /* {{{ proto string HttpMessage::getRequestUri()
766 * Get the Request URI of the Message.
768 PHP_METHOD(HttpMessage
, getRequestUri
)
773 getObject(http_message_object
, obj
);
775 if (!HTTP_MSG_TYPE(REQUEST
, obj
->message
)) {
776 http_error(HE_WARNING
, HTTP_E_MESSAGE_TYPE
, "HttpMessage is not of type HTTP_MSG_REQUEST");
780 RETURN_STRING(obj
->message
->http
.info
.request
.URI
, 1);
785 /* {{{ proto bool HttpMessage::setRequestUri(string URI)
787 * Set the Request URI of the HTTP Message.
788 * Returns false if the Message is not of type HTTP_MSG_REQUEST,
789 * or if paramtere URI was empty.
791 PHP_METHOD(HttpMessage
, setRequestUri
)
795 getObject(http_message_object
, obj
);
797 if (!HTTP_MSG_TYPE(REQUEST
, obj
->message
)) {
798 http_error(HE_WARNING
, HTTP_E_MESSAGE_TYPE
, "HttpMessage is not of type HTTP_MSG_REQUEST");
801 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s", &URI
, &URIlen
)) {
805 http_error(HE_WARNING
, HTTP_E_INVALID_PARAM
, "Cannot set HttpMessage::requestUri to an empty string");
809 STR_SET(obj
->message
->http
.info
.request
.URI
, estrndup(URI
, URIlen
));
814 /* {{{ proto string HttpMessage::getHttpVersion()
816 * Get the HTTP Protocol Version of the Message.
818 PHP_METHOD(HttpMessage
, getHttpVersion
)
824 getObject(http_message_object
, obj
);
826 sprintf(ver
, "%1.1lf", obj
->message
->http
.version
);
827 RETURN_STRINGL(ver
, 3, 1);
832 /* {{{ proto bool HttpMessage::setHttpVersion(string version)
834 * Set the HTTP Protocol version of the Message.
835 * Returns false if version is invalid (1.0 and 1.1).
837 PHP_METHOD(HttpMessage
, setHttpVersion
)
841 getObject(http_message_object
, obj
);
843 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "z/", &zv
)) {
847 convert_to_double(zv
);
848 sprintf(v
, "%1.1lf", Z_DVAL_P(zv
));
849 if (strcmp(v
, "1.0") && strcmp(v
, "1.1")) {
850 http_error_ex(HE_WARNING
, HTTP_E_INVALID_PARAM
, "Invalid HTTP protocol version (1.0 or 1.1): %s", v
);
854 obj
->message
->http
.version
= Z_DVAL_P(zv
);
859 /* {{{ proto HttpMessage HttpMessage::getParentMessage()
861 * Get parent Message.
863 PHP_METHOD(HttpMessage
, getParentMessage
)
868 getObject(http_message_object
, obj
);
870 if (obj
->message
->parent
) {
871 RETVAL_OBJVAL(obj
->parent
);
879 /* {{{ proto bool HttpMessage::send()
881 * Send the Message according to its type as Response or Request.
883 PHP_METHOD(HttpMessage
, send
)
885 getObject(http_message_object
, obj
);
889 RETURN_SUCCESS(http_message_send(obj
->message
));
893 /* {{{ proto string HttpMessage::toString([bool include_parent = false])
895 * Get the string representation of the Message.
897 PHP_METHOD(HttpMessage
, toString
)
902 zend_bool include_parent
= 0;
903 getObject(http_message_object
, obj
);
905 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|b", &include_parent
)) {
909 if (include_parent
) {
910 http_message_serialize(obj
->message
, &string
, &length
);
912 http_message_tostring(obj
->message
, &string
, &length
);
914 RETURN_STRINGL(string
, length
, 0);
919 #endif /* ZEND_ENGINE_2 */
926 * vim600: noet sw=4 ts=4 fdm=marker
927 * vim<600: noet sw=4 ts=4