cvs: php4 /ext/wddx wddx.c

andrei Wed May 14 14:15:17 2003 EDT Modified files: /php4/ext/wddx wddx.c Log: MFB. @- Updated wddx_deserialize() to take an open stream as an argument. (Andrei) Index: php4/ext/wddx/wddx.c diff -u php4/ext/wddx/wddx.c:1.99 php4/ext/wddx/wddx.c:1.100 --- php4/ext/wddx/wddx.c:1.99 Fri Jan 24 17:58:46 2003 +++ php4/ext/wddx/wddx.c Wed May 14 14:15:17 2003 @@ -16,14 +16,15 @@ +----------------------------------------------------------------------+ */ -/* $Id: wddx.c,v 1.99 2003/01/24 22:58:46 iliaa Exp $ */ +/* $Id: wddx.c,v 1.100 2003/05/14 18:15:17 andrei Exp $ */ #include "php.h" -#include "php_wddx.h" #if HAVE_WDDX +#include "php_wddx.h" #include "php_wddx_api.h" + #define PHP_XML_INTERNAL #include "ext/xml/php_xml.h" #include "ext/standard/php_incomplete_class.h" @@ -1261,20 +1262,40 @@ } /* }}} */ -/* {{{ proto mixed wddx_deserialize(string packet) +/* {{{ proto mixed wddx_deserialize(mixed packet) Deserializes given packet and returns a PHP value */ PHP_FUNCTION(wddx_deserialize) { - char *packet; - int packet_len; + zval *packet; + char *payload; + int payload_len; + php_stream *stream = NULL; - if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &packet, &packet_len) == FAILURE) + if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "z", &packet) == FAILURE) return; - if (packet_len == 0) + if (Z_TYPE_P(packet) == IS_STRING) { + payload = Z_STRVAL_P(packet); + payload_len = Z_STRLEN_P(packet); + } + else if (Z_TYPE_P(packet) == IS_RESOURCE) { + stream = php_stream_from_zval(stream, &packet); + if (stream) { + payload_len = php_stream_copy_to_mem(stream, &payload, PHP_STREAM_COPY_ALL, 0 TSRMLS_CC); + } + } else { + php_error(E_WARNING, "%s() expects parameter 1 to be a string or a stream", + get_active_function_name()); return; + } + + if (payload_len == 0) + return; + + php_wddx_deserialize_ex(payload, payload_len, return_value); - php_wddx_deserialize_ex(packet, packet_len, return_value); + if (stream) + pefree(payload, 0); } /* }}} */