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"
34 #define HTTP_BEGIN_ARGS(method, ret_ref, req_args) HTTP_BEGIN_ARGS_EX(HttpMessage, method, ret_ref, req_args)
35 #define HTTP_EMPTY_ARGS(method, ret_ref) HTTP_EMPTY_ARGS_EX(HttpMessage, method, ret_ref)
36 #define HTTP_MESSAGE_ME(method, visibility) PHP_ME(HttpMessage, method, HTTP_ARGS(HttpMessage, method), visibility)
38 HTTP_BEGIN_ARGS(__construct
, 0, 0)
39 HTTP_ARG_VAL(message
, 0)
42 HTTP_BEGIN_ARGS(fromString
, 1, 1)
43 HTTP_ARG_VAL(message
, 0)
46 HTTP_EMPTY_ARGS(getBody
, 0);
47 HTTP_EMPTY_ARGS(getHeaders
, 0);
48 HTTP_BEGIN_ARGS(setHeaders
, 0, 1)
49 HTTP_ARG_VAL(headers
, 0)
52 HTTP_BEGIN_ARGS(addHeaders
, 0, 1)
53 HTTP_ARG_VAL(headers
, 0)
54 HTTP_ARG_VAL(append
, 0)
57 HTTP_EMPTY_ARGS(getType
, 0);
58 HTTP_BEGIN_ARGS(setType
, 0, 1)
62 HTTP_EMPTY_ARGS(getResponseCode
, 0);
63 HTTP_BEGIN_ARGS(setResponseCode
, 0, 1)
64 HTTP_ARG_VAL(response_code
, 0)
67 HTTP_EMPTY_ARGS(getRequestMethod
, 0);
68 HTTP_BEGIN_ARGS(setRequestMethod
, 0, 1)
69 HTTP_ARG_VAL(request_method
, 0)
72 HTTP_EMPTY_ARGS(getRequestUri
, 0);
73 HTTP_BEGIN_ARGS(setRequestUri
, 0, 1)
77 HTTP_EMPTY_ARGS(getHttpVersion
, 0);
78 HTTP_BEGIN_ARGS(setHttpVersion
, 0, 1)
79 HTTP_ARG_VAL(http_version
, 0)
82 HTTP_EMPTY_ARGS(getParentMessage
, 1);
83 HTTP_EMPTY_ARGS(send
, 0);
84 HTTP_BEGIN_ARGS(toString
, 0, 0)
85 HTTP_ARG_VAL(include_parent
, 0)
88 #define http_message_object_declare_default_properties() _http_message_object_declare_default_properties(TSRMLS_C)
89 static inline void _http_message_object_declare_default_properties(TSRMLS_D
);
90 #define http_message_object_read_prop _http_message_object_read_prop
91 static zval
*_http_message_object_read_prop(zval
*object
, zval
*member
, int type TSRMLS_DC
);
92 #define http_message_object_write_prop _http_message_object_write_prop
93 static void _http_message_object_write_prop(zval
*object
, zval
*member
, zval
*value TSRMLS_DC
);
94 #define http_message_object_get_props _http_message_object_get_props
95 static HashTable
*_http_message_object_get_props(zval
*object TSRMLS_DC
);
96 #define http_message_object_clone_obj _http_message_object_clone_obj
97 static inline zend_object_value
_http_message_object_clone_obj(zval
*object TSRMLS_DC
);
99 zend_class_entry
*http_message_object_ce
;
100 zend_function_entry http_message_object_fe
[] = {
101 HTTP_MESSAGE_ME(__construct
, ZEND_ACC_PUBLIC
|ZEND_ACC_CTOR
)
102 HTTP_MESSAGE_ME(getBody
, ZEND_ACC_PUBLIC
)
103 HTTP_MESSAGE_ME(getHeaders
, ZEND_ACC_PUBLIC
)
104 HTTP_MESSAGE_ME(setHeaders
, ZEND_ACC_PUBLIC
)
105 HTTP_MESSAGE_ME(addHeaders
, ZEND_ACC_PUBLIC
)
106 HTTP_MESSAGE_ME(getType
, ZEND_ACC_PUBLIC
)
107 HTTP_MESSAGE_ME(setType
, ZEND_ACC_PUBLIC
)
108 HTTP_MESSAGE_ME(getResponseCode
, ZEND_ACC_PUBLIC
)
109 HTTP_MESSAGE_ME(setResponseCode
, ZEND_ACC_PUBLIC
)
110 HTTP_MESSAGE_ME(getRequestMethod
, ZEND_ACC_PUBLIC
)
111 HTTP_MESSAGE_ME(setRequestMethod
, ZEND_ACC_PUBLIC
)
112 HTTP_MESSAGE_ME(getRequestUri
, ZEND_ACC_PUBLIC
)
113 HTTP_MESSAGE_ME(setRequestUri
, ZEND_ACC_PUBLIC
)
114 HTTP_MESSAGE_ME(getHttpVersion
, ZEND_ACC_PUBLIC
)
115 HTTP_MESSAGE_ME(setHttpVersion
, ZEND_ACC_PUBLIC
)
116 HTTP_MESSAGE_ME(getParentMessage
, ZEND_ACC_PUBLIC
)
117 HTTP_MESSAGE_ME(send
, ZEND_ACC_PUBLIC
)
118 HTTP_MESSAGE_ME(toString
, ZEND_ACC_PUBLIC
)
120 ZEND_MALIAS(HttpMessage
, __toString
, toString
, HTTP_ARGS(HttpMessage
, toString
), ZEND_ACC_PUBLIC
)
122 HTTP_MESSAGE_ME(fromString
, ZEND_ACC_PUBLIC
|ZEND_ACC_STATIC
)
125 static zend_object_handlers http_message_object_handlers
;
127 void _http_message_object_init(INIT_FUNC_ARGS
)
129 HTTP_REGISTER_CLASS_EX(HttpMessage
, http_message_object
, NULL
, 0);
131 HTTP_LONG_CONSTANT("HTTP_MSG_NONE", HTTP_MSG_NONE
);
132 HTTP_LONG_CONSTANT("HTTP_MSG_REQUEST", HTTP_MSG_REQUEST
);
133 HTTP_LONG_CONSTANT("HTTP_MSG_RESPONSE", HTTP_MSG_RESPONSE
);
135 http_message_object_handlers
.clone_obj
= http_message_object_clone_obj
;
136 http_message_object_handlers
.read_property
= http_message_object_read_prop
;
137 http_message_object_handlers
.write_property
= http_message_object_write_prop
;
138 http_message_object_handlers
.get_properties
= http_message_object_get_props
;
141 zend_object_value
_http_message_object_new(zend_class_entry
*ce TSRMLS_DC
)
143 return http_message_object_new_ex(ce
, NULL
);
146 zend_object_value
_http_message_object_new_ex(zend_class_entry
*ce
, http_message
*msg TSRMLS_DC
)
148 zend_object_value ov
;
149 http_message_object
*o
;
151 o
= ecalloc(1, sizeof(http_message_object
));
154 o
->parent
.handle
= 0;
155 o
->parent
.handlers
= NULL
;
160 o
->parent
= http_message_object_from_msg(msg
->parent
);
164 ALLOC_HASHTABLE(OBJ_PROP(o
));
165 zend_hash_init(OBJ_PROP(o
), 0, NULL
, ZVAL_PTR_DTOR
, 0);
167 ov
.handle
= zend_objects_store_put(o
, (zend_objects_store_dtor_t
) zend_objects_destroy_object
, http_message_object_free
, NULL TSRMLS_CC
);
168 ov
.handlers
= &http_message_object_handlers
;
173 zend_object_value
_http_message_object_clone(zval
*this_ptr TSRMLS_DC
)
175 return http_message_object_clone_obj(this_ptr TSRMLS_CC
);
178 static inline void _http_message_object_declare_default_properties(TSRMLS_D
)
180 zend_class_entry
*ce
= http_message_object_ce
;
182 DCL_PROP(PROTECTED
, long, type
, HTTP_MSG_NONE
);
183 DCL_PROP(PROTECTED
, string
, body
, "");
184 DCL_PROP(PROTECTED
, string
, requestMethod
, "");
185 DCL_PROP(PROTECTED
, string
, requestUri
, "");
186 DCL_PROP(PROTECTED
, long, responseCode
, 0);
187 DCL_PROP_N(PROTECTED
, httpVersion
);
188 DCL_PROP_N(PROTECTED
, headers
);
189 DCL_PROP_N(PROTECTED
, parentMessage
);
192 void _http_message_object_free(zend_object
*object TSRMLS_DC
)
194 http_message_object
*o
= (http_message_object
*) object
;
197 zend_hash_destroy(OBJ_PROP(o
));
198 FREE_HASHTABLE(OBJ_PROP(o
));
201 http_message_dtor(o
->message
);
207 static inline zend_object_value
_http_message_object_clone_obj(zval
*this_ptr TSRMLS_DC
)
209 getObject(http_message_object
, obj
);
210 return http_message_object_from_msg(http_message_dup(obj
->message
));
213 static zval
*_http_message_object_read_prop(zval
*object
, zval
*member
, int type TSRMLS_DC
)
215 getObjectEx(http_message_object
, obj
, object
);
216 http_message
*msg
= obj
->message
;
220 ALLOC_ZVAL(return_value
);
221 return_value
->refcount
= 0;
223 if (!EG(scope
) || !instanceof_function(EG(scope
), obj
->zo
.ce TSRMLS_CC
)) {
224 zend_error(E_WARNING
, "Cannot access protected property %s::$%s", obj
->zo
.ce
->name
, Z_STRVAL_P(member
));
225 return EG(uninitialized_zval_ptr
);
228 switch (zend_get_hash_value(Z_STRVAL_P(member
), Z_STRLEN_P(member
) + 1))
230 case HTTP_MSG_PROPHASH_TYPE
:
231 RETVAL_LONG(msg
->type
);
234 case HTTP_MSG_PROPHASH_HTTP_VERSION
:
237 case HTTP_MSG_REQUEST
:
238 RETVAL_DOUBLE(msg
->info
.request
.http_version
);
241 case HTTP_MSG_RESPONSE
:
242 RETVAL_DOUBLE(msg
->info
.response
.http_version
);
252 case HTTP_MSG_PROPHASH_BODY
:
253 phpstr_fix(PHPSTR(msg
));
254 RETVAL_PHPSTR(PHPSTR(msg
), 0, 1);
257 case HTTP_MSG_PROPHASH_HEADERS
:
258 array_init(return_value
);
259 zend_hash_copy(Z_ARRVAL_P(return_value
), &msg
->hdrs
, (copy_ctor_func_t
) zval_add_ref
, NULL
, sizeof(zval
*));
262 case HTTP_MSG_PROPHASH_PARENT_MESSAGE
:
264 RETVAL_OBJVAL(obj
->parent
);
265 Z_TYPE_P(return_value
) = IS_OBJECT
;
266 return_value
->value
.obj
= obj
->parent
;
267 zend_objects_store_add_ref(return_value TSRMLS_CC
);
273 case HTTP_MSG_PROPHASH_REQUEST_METHOD
:
274 if (HTTP_MSG_TYPE(REQUEST
, msg
) && msg
->info
.request
.method
) {
275 RETVAL_STRING(msg
->info
.request
.method
, 1);
281 case HTTP_MSG_PROPHASH_REQUEST_URI
:
282 if (HTTP_MSG_TYPE(REQUEST
, msg
) && msg
->info
.request
.URI
) {
283 RETVAL_STRING(msg
->info
.request
.URI
, 1);
289 case HTTP_MSG_PROPHASH_RESPONSE_CODE
:
290 if (HTTP_MSG_TYPE(RESPONSE
, msg
)) {
291 RETVAL_LONG(msg
->info
.response
.code
);
305 static void _http_message_object_write_prop(zval
*object
, zval
*member
, zval
*value TSRMLS_DC
)
307 getObjectEx(http_message_object
, obj
, object
);
308 http_message
*msg
= obj
->message
;
310 if (!EG(scope
) || !instanceof_function(EG(scope
), obj
->zo
.ce TSRMLS_CC
)) {
311 zend_error(E_WARNING
, "Cannot access protected property %s::$%s", obj
->zo
.ce
->name
, Z_STRVAL_P(member
));
314 switch (zend_get_hash_value(Z_STRVAL_P(member
), Z_STRLEN_P(member
) + 1))
316 case HTTP_MSG_PROPHASH_TYPE
:
317 convert_to_long_ex(&value
);
318 if (Z_LVAL_P(value
) != msg
->type
) {
319 if (HTTP_MSG_TYPE(REQUEST
, msg
)) {
320 if (msg
->info
.request
.method
) {
321 efree(msg
->info
.request
.method
);
323 if (msg
->info
.request
.URI
) {
324 efree(msg
->info
.request
.URI
);
327 msg
->type
= Z_LVAL_P(value
);
328 if (HTTP_MSG_TYPE(REQUEST
, msg
)) {
329 msg
->info
.request
.method
= NULL
;
330 msg
->info
.request
.URI
= NULL
;
336 case HTTP_MSG_PROPHASH_HTTP_VERSION
:
337 convert_to_double_ex(&value
);
340 case HTTP_MSG_REQUEST
:
341 msg
->info
.request
.http_version
= Z_DVAL_P(value
);
344 case HTTP_MSG_RESPONSE
:
345 msg
->info
.response
.http_version
= Z_DVAL_P(value
);
350 case HTTP_MSG_PROPHASH_BODY
:
351 convert_to_string_ex(&value
);
352 phpstr_dtor(PHPSTR(msg
));
353 phpstr_from_string_ex(PHPSTR(msg
), Z_STRVAL_P(value
), Z_STRLEN_P(value
));
356 case HTTP_MSG_PROPHASH_HEADERS
:
357 convert_to_array_ex(&value
);
358 zend_hash_clean(&msg
->hdrs
);
359 zend_hash_copy(&msg
->hdrs
, Z_ARRVAL_P(value
), (copy_ctor_func_t
) zval_add_ref
, NULL
, sizeof(zval
*));
362 case HTTP_MSG_PROPHASH_PARENT_MESSAGE
:
365 tmp
.value
.obj
= obj
->parent
;
366 zend_objects_store_del_ref(&tmp TSRMLS_CC
);
368 zend_objects_store_add_ref(value TSRMLS_CC
);
369 obj
->parent
= value
->value
.obj
;
372 case HTTP_MSG_PROPHASH_REQUEST_METHOD
:
373 convert_to_string_ex(&value
);
374 if (HTTP_MSG_TYPE(REQUEST
, msg
)) {
375 if (msg
->info
.request
.method
) {
376 efree(msg
->info
.request
.method
);
378 msg
->info
.request
.method
= estrndup(Z_STRVAL_P(value
), Z_STRLEN_P(value
));
382 case HTTP_MSG_PROPHASH_REQUEST_URI
:
383 convert_to_string_ex(&value
);
384 if (HTTP_MSG_TYPE(REQUEST
, msg
)) {
385 if (msg
->info
.request
.URI
) {
386 efree(msg
->info
.request
.URI
);
388 msg
->info
.request
.URI
= estrndup(Z_STRVAL_P(value
), Z_STRLEN_P(value
));
392 case HTTP_MSG_PROPHASH_RESPONSE_CODE
:
393 convert_to_long_ex(&value
);
394 if (HTTP_MSG_TYPE(RESPONSE
, msg
)) {
395 msg
->info
.response
.code
= Z_LVAL_P(value
);
401 static HashTable
*_http_message_object_get_props(zval
*object TSRMLS_DC
)
404 getObjectEx(http_message_object
, obj
, object
);
405 http_message
*msg
= obj
->message
;
407 #define ASSOC_PROP(obj, ptype, name, val) \
412 Z_ARRVAL(array) = OBJ_PROP(obj); \
413 zend_mangle_property_name(&m_prop_name, &m_prop_len, "*", 1, name, lenof(name), 1); \
414 add_assoc_ ##ptype## _ex(&array, m_prop_name, sizeof(name)+4, val); \
416 #define ASSOC_STRING(obj, name, val) ASSOC_STRINGL(obj, name, val, strlen(val))
417 #define ASSOC_STRINGL(obj, name, val, len) \
422 Z_ARRVAL(array) = OBJ_PROP(obj); \
423 zend_mangle_property_name(&m_prop_name, &m_prop_len, "*", 1, name, lenof(name), 1); \
424 add_assoc_stringl_ex(&array, m_prop_name, sizeof(name)+4, val, len, 1); \
427 zend_hash_clean(OBJ_PROP(obj
));
429 ASSOC_PROP(obj
, long, "type", msg
->type
);
430 ASSOC_STRINGL(obj
, "body", PHPSTR_VAL(msg
), PHPSTR_LEN(msg
));
432 MAKE_STD_ZVAL(headers
);
435 zend_hash_copy(Z_ARRVAL_P(headers
), &msg
->hdrs
, (copy_ctor_func_t
) zval_add_ref
, NULL
, sizeof(zval
*));
436 ASSOC_PROP(obj
, zval
, "headers", headers
);
440 case HTTP_MSG_REQUEST
:
441 ASSOC_PROP(obj
, double, "httpVersion", msg
->info
.request
.http_version
);
442 ASSOC_PROP(obj
, long, "responseCode", 0);
443 ASSOC_STRING(obj
, "requestMethod", msg
->info
.request
.method
);
444 ASSOC_STRING(obj
, "requestUri", msg
->info
.request
.URI
);
447 case HTTP_MSG_RESPONSE
:
448 ASSOC_PROP(obj
, double, "httpVersion", msg
->info
.response
.http_version
);
449 ASSOC_PROP(obj
, long, "responseCode", msg
->info
.response
.code
);
450 ASSOC_STRING(obj
, "requestMethod", "");
451 ASSOC_STRING(obj
, "requestUri", "");
456 ASSOC_PROP(obj
, double, "httpVersion", 0.0);
457 ASSOC_PROP(obj
, long, "responseCode", 0);
458 ASSOC_STRING(obj
, "requestMethod", "");
459 ASSOC_STRING(obj
, "requestUri", "");
463 return OBJ_PROP(obj
);
466 /* ### USERLAND ### */
468 /* {{{ proto void HttpMessage::__construct([string message])
470 * Instantiate a new HttpMessage object.
472 PHP_METHOD(HttpMessage
, __construct
)
474 char *message
= NULL
;
476 getObject(http_message_object
, obj
);
479 if (SUCCESS
== zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|s", &message
, &length
) && message
&& length
) {
480 if (obj
->message
= http_message_parse(message
, length
)) {
481 if (obj
->message
->parent
) {
482 obj
->parent
= http_message_object_from_msg(obj
->message
->parent
);
485 } else if (!obj
->message
) {
486 obj
->message
= http_message_new();
492 /* {{{ proto static HttpMessage HttpMessage::fromString(string raw_message)
494 * Create an HttpMessage object from a string.
496 PHP_METHOD(HttpMessage
, fromString
)
500 http_message
*msg
= NULL
;
502 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s", &string
, &length
)) {
506 if (!(msg
= http_message_parse(string
, length
))) {
510 Z_TYPE_P(return_value
) = IS_OBJECT
;
511 return_value
->value
.obj
= http_message_object_from_msg(msg
);
515 /* {{{ proto string HttpMessage::getBody()
517 * Get the body of the parsed Message.
519 PHP_METHOD(HttpMessage
, getBody
)
524 getObject(http_message_object
, obj
);
525 RETURN_PHPSTR(&obj
->message
->body
, PHPSTR_FREE_NOT
, 1);
530 /* {{{ proto array HttpMessage::getHeaders()
532 * Get Message Headers.
534 PHP_METHOD(HttpMessage
, getHeaders
)
540 getObject(http_message_object
, obj
);
542 Z_ARRVAL(headers
) = &obj
->message
->hdrs
;
543 array_init(return_value
);
544 array_copy(&headers
, return_value
);
549 /* {{{ proto void HttpMessage::setHeaders(array headers)
553 PHP_METHOD(HttpMessage
, setHeaders
)
555 zval
*new_headers
, old_headers
;
556 getObject(http_message_object
, obj
);
558 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "a/", &new_headers
)) {
562 zend_hash_clean(&obj
->message
->hdrs
);
563 Z_ARRVAL(old_headers
) = &obj
->message
->hdrs
;
564 array_copy(new_headers
, &old_headers
);
568 /* {{{ proto void HttpMessage::addHeaders(array headers[, bool append = false])
570 * Add headers. If append is true, headers with the same name will be separated, else overwritten.
572 PHP_METHOD(HttpMessage
, addHeaders
)
574 zval old_headers
, *new_headers
;
575 zend_bool append
= 0;
576 getObject(http_message_object
, obj
);
578 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "a|b", &new_headers
, &append
)) {
582 Z_ARRVAL(old_headers
) = &obj
->message
->hdrs
;
584 array_append(new_headers
, &old_headers
);
586 array_merge(new_headers
, &old_headers
);
591 /* {{{ proto long HttpMessage::getType()
593 * Get Message Type. (HTTP_MSG_NONE|HTTP_MSG_REQUEST|HTTP_MSG_RESPONSE)
595 PHP_METHOD(HttpMessage
, getType
)
600 getObject(http_message_object
, obj
);
601 RETURN_LONG(obj
->message
->type
);
606 /* {{{ proto void HttpMessage::setType(long type)
608 * Set Message Type. (HTTP_MSG_NONE|HTTP_MSG_REQUEST|HTTP_MSG_RESPONSE)
610 PHP_METHOD(HttpMessage
, setType
)
613 getObject(http_message_object
, obj
);
615 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "l", &type
)) {
618 http_message_set_type(obj
->message
, type
);
622 /* {{{ proto long HttpMessage::getResponseCode()
624 * Get the Response Code of the Message.
626 PHP_METHOD(HttpMessage
, getResponseCode
)
631 getObject(http_message_object
, obj
);
633 if (!HTTP_MSG_TYPE(RESPONSE
, obj
->message
)) {
634 http_error(E_NOTICE
, HTTP_E_MSG
, "HttpMessage is not of type HTTP_MSG_RESPONSE");
638 RETURN_LONG(obj
->message
->info
.response
.code
);
643 /* {{{ proto bool HttpMessage::setResponseCode(long code)
645 * Set the response code of an HTTP Response Message.
646 * Returns false if the Message is not of type HTTP_MSG_RESPONSE,
647 * or if the response code is out of range (100-510).
649 PHP_METHOD(HttpMessage
, setResponseCode
)
652 getObject(http_message_object
, obj
);
654 if (!HTTP_MSG_TYPE(RESPONSE
, obj
->message
)) {
655 http_error(E_WARNING
, HTTP_E_MSG
, "HttpMessage is not of type HTTP_MSG_RESPONSE");
659 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "l", &code
)) {
662 if (code
< 100 || code
> 510) {
663 http_error_ex(E_WARNING
, HTTP_E_PARAM
, "Invalid response code (100-510): %ld", code
);
667 obj
->message
->info
.response
.code
= code
;
672 /* {{{ proto string HttpMessage::getRequestMethod()
674 * Get the Request Method of the Message.
675 * Returns false if the Message is not of type HTTP_MSG_REQUEST.
677 PHP_METHOD(HttpMessage
, getRequestMethod
)
682 getObject(http_message_object
, obj
);
684 if (!HTTP_MSG_TYPE(REQUEST
, obj
->message
)) {
685 http_error(E_NOTICE
, HTTP_E_MSG
, "HttpMessage is not of type HTTP_MSG_REQUEST");
689 RETURN_STRING(obj
->message
->info
.request
.method
, 1);
694 /* {{{ proto bool HttpMessage::setRequestMethod(string method)
696 * Set the Request Method of the HTTP Message.
697 * Returns false if the Message is not of type HTTP_MSG_REQUEST.
699 PHP_METHOD(HttpMessage
, setRequestMethod
)
703 getObject(http_message_object
, obj
);
705 if (!HTTP_MSG_TYPE(REQUEST
, obj
->message
)) {
706 http_error(E_WARNING
, HTTP_E_MSG
, "HttpMessage is not of type HTTP_MSG_REQUEST");
710 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s", &method
, &method_len
)) {
713 if (method_len
< 1) {
714 http_error(E_WARNING
, HTTP_E_PARAM
, "Cannot set HttpMessage::requestMethod to an empty string");
717 if (SUCCESS
!= http_check_method(method
)) {
718 http_error_ex(E_WARNING
, HTTP_E_PARAM
, "Unkown request method: %s", method
);
722 STR_SET(obj
->message
->info
.request
.method
, estrndup(method
, method_len
));
727 /* {{{ proto string HttpMessage::getRequestUri()
729 * Get the Request URI of the Message.
731 PHP_METHOD(HttpMessage
, getRequestUri
)
736 getObject(http_message_object
, obj
);
738 if (!HTTP_MSG_TYPE(REQUEST
, obj
->message
)) {
739 http_error(E_WARNING
, HTTP_E_MSG
, "HttpMessage is not of type HTTP_MSG_REQUEST");
743 RETURN_STRING(obj
->message
->info
.request
.URI
, 1);
748 /* {{{ proto bool HttpMessage::setRequestUri(string URI)
750 * Set the Request URI of the HTTP Message.
751 * Returns false if the Message is not of type HTTP_MSG_REQUEST,
752 * or if paramtere URI was empty.
754 PHP_METHOD(HttpMessage
, setRequestUri
)
758 getObject(http_message_object
, obj
);
760 if (!HTTP_MSG_TYPE(REQUEST
, obj
->message
)) {
761 http_error(E_WARNING
, HTTP_E_MSG
, "HttpMessage is not of type HTTP_MSG_REQUEST");
764 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "s", &URI
, &URIlen
)) {
768 http_error(E_WARNING
, HTTP_E_PARAM
, "Cannot set HttpMessage::requestUri to an empty string");
772 STR_SET(obj
->message
->info
.request
.URI
, estrndup(URI
, URIlen
));
777 /* {{{ proto string HttpMessage::getHttpVersion()
779 * Get the HTTP Protocol Version of the Message.
781 PHP_METHOD(HttpMessage
, getHttpVersion
)
788 getObject(http_message_object
, obj
);
790 switch (obj
->message
->type
)
792 case HTTP_MSG_RESPONSE
:
793 version
= obj
->message
->info
.response
.http_version
;
796 case HTTP_MSG_REQUEST
:
797 version
= obj
->message
->info
.request
.http_version
;
804 sprintf(ver
, "%1.1f", version
);
805 RETURN_STRINGL(ver
, 3, 1);
810 /* {{{ proto bool HttpMessage::setHttpVersion(string version)
812 * Set the HTTP Protocol version of the Message.
813 * Returns false if version is invalid (1.0 and 1.1).
815 PHP_METHOD(HttpMessage
, setHttpVersion
)
819 getObject(http_message_object
, obj
);
821 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "z/", &zv
)) {
825 if (HTTP_MSG_TYPE(NONE
, obj
->message
)) {
826 http_error(E_WARNING
, HTTP_E_MSG
, "Message is neither of type HTTP_MSG_RESPONSE nor HTTP_MSG_REQUEST");
830 convert_to_double(zv
);
831 sprintf(v
, "%1.1f", Z_DVAL_P(zv
));
832 if (strcmp(v
, "1.0") && strcmp(v
, "1.1")) {
833 http_error_ex(E_WARNING
, HTTP_E_PARAM
, "Invalid HTTP protocol version (1.0 or 1.1): %s", v
);
837 if (HTTP_MSG_TYPE(RESPONSE
, obj
->message
)) {
838 obj
->message
->info
.response
.http_version
= (float) Z_DVAL_P(zv
);
840 obj
->message
->info
.request
.http_version
= (float) Z_DVAL_P(zv
);
846 /* {{{ proto HttpMessage HttpMessage::getParentMessage()
848 * Get parent Message.
850 PHP_METHOD(HttpMessage
, getParentMessage
)
855 getObject(http_message_object
, obj
);
857 if (obj
->message
->parent
) {
858 RETVAL_OBJVAL(obj
->parent
);
866 /* {{{ proto bool HttpMessage::send()
868 * Send the Message according to its type as Response or Request.
870 PHP_METHOD(HttpMessage
, send
)
872 getObject(http_message_object
, obj
);
876 RETURN_SUCCESS(http_message_send(obj
->message
));
880 /* {{{ proto string HttpMessage::toString([bool include_parent = true])
882 * Get the string representation of the Message.
884 PHP_METHOD(HttpMessage
, toString
)
889 zend_bool include_parent
= 1;
890 getObject(http_message_object
, obj
);
892 if (SUCCESS
!= zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC
, "|b", &include_parent
)) {
896 if (include_parent
) {
897 http_message_serialize(obj
->message
, &string
, &length
);
899 http_message_tostring(obj
->message
, &string
, &length
);
901 RETURN_STRINGL(string
, length
, 0);
906 #endif /* ZEND_ENGINE_2 */
913 * vim600: noet sw=4 ts=4 fdm=marker
914 * vim<600: noet sw=4 ts=4