+STATUS php_http_message_object_set_body(php_http_message_object_t *msg_obj, zval *zbody TSRMLS_DC)
+{
+ zval *tmp = NULL;
+ php_stream *s;
+ zend_object_value ov;
+ php_http_message_body_t *body;
+ php_http_message_body_object_t *body_obj;
+
+ switch (Z_TYPE_P(zbody)) {
+ case IS_RESOURCE:
+ php_stream_from_zval_no_verify(s, &zbody);
+ if (!s) {
+ php_http_error(HE_THROW, PHP_HTTP_E_CLIENT, "not a valid stream resource");
+ return FAILURE;
+ }
+
+ is_resource:
+
+ body = php_http_message_body_init(NULL, s TSRMLS_CC);
+ if (SUCCESS != php_http_new(&ov, php_http_message_body_get_class_entry(), (php_http_new_t) php_http_message_body_object_new_ex, NULL, body, NULL TSRMLS_CC)) {
+ php_http_message_body_free(&body);
+ return FAILURE;
+ }
+ MAKE_STD_ZVAL(tmp);
+ ZVAL_OBJVAL(tmp, ov, 0);
+ zbody = tmp;
+ break;
+
+ case IS_OBJECT:
+ if (instanceof_function(Z_OBJCE_P(zbody), php_http_message_body_get_class_entry() TSRMLS_CC)) {
+ Z_OBJ_ADDREF_P(zbody);
+ break;
+ }
+ /* no break */
+
+ default:
+ tmp = php_http_ztyp(IS_STRING, zbody);
+ s = php_stream_temp_new();
+ php_stream_write(s, Z_STRVAL_P(tmp), Z_STRLEN_P(tmp));
+ zval_ptr_dtor(&tmp);
+ tmp = NULL;
+ goto is_resource;
+
+ }
+
+ body_obj = zend_object_store_get_object(zbody TSRMLS_CC);
+
+ if (msg_obj->body.handle) {
+ zend_objects_store_del_ref_by_handle(msg_obj->body.handle TSRMLS_CC);
+ }
+ php_http_message_body_free(&msg_obj->message->body);
+
+ msg_obj->message->body = php_http_message_body_init(&body_obj->body, NULL TSRMLS_CC);
+ msg_obj->body = Z_OBJVAL_P(zbody);
+
+ return SUCCESS;
+}
+