PHP  
 PHP: Test and Code Coverage Analysis
downloads | QA | documentation | faq | getting help | mailing lists | reporting bugs | php.net sites | links | my php.net 
 

LCOV - code coverage report
Current view: top level - ext/wddx - wddx.c (source / functions) Hit Total Coverage
Test: PHP Code Coverage Lines: 503 546 92.1 %
Date: 2022-01-16 Functions: 32 32 100.0 %
Legend: Lines: hit not hit

          Line data    Source code
       1             : /*
       2             :    +----------------------------------------------------------------------+
       3             :    | PHP Version 7                                                        |
       4             :    +----------------------------------------------------------------------+
       5             :    | Copyright (c) 1997-2018 The PHP Group                                |
       6             :    +----------------------------------------------------------------------+
       7             :    | This source file is subject to version 3.01 of the PHP license,      |
       8             :    | that is bundled with this package in the file LICENSE, and is        |
       9             :    | available through the world-wide-web at the following url:           |
      10             :    | http://www.php.net/license/3_01.txt                                  |
      11             :    | If you did not receive a copy of the PHP license and are unable to   |
      12             :    | obtain it through the world-wide-web, please send a note to          |
      13             :    | license@php.net so we can mail you a copy immediately.               |
      14             :    +----------------------------------------------------------------------+
      15             :    | Author: Andrei Zmievski <andrei@php.net>                             |
      16             :    +----------------------------------------------------------------------+
      17             :  */
      18             : 
      19             : /* $Id$ */
      20             : 
      21             : #ifdef HAVE_CONFIG_H
      22             : #include "config.h"
      23             : #endif
      24             : 
      25             : #include "php.h"
      26             : 
      27             : #if HAVE_WDDX
      28             : 
      29             : #include "ext/xml/expat_compat.h"
      30             : #include "php_wddx.h"
      31             : #include "php_wddx_api.h"
      32             : 
      33             : #define PHP_XML_INTERNAL
      34             : #include "ext/xml/php_xml.h"
      35             : #include "ext/standard/php_incomplete_class.h"
      36             : #include "ext/standard/base64.h"
      37             : #include "ext/standard/info.h"
      38             : #include "zend_smart_str.h"
      39             : #include "ext/standard/html.h"
      40             : #include "ext/standard/php_string.h"
      41             : #include "ext/date/php_date.h"
      42             : #include "zend_globals.h"
      43             : 
      44             : #define WDDX_BUF_LEN                    256
      45             : #define PHP_CLASS_NAME_VAR              "php_class_name"
      46             : 
      47             : #define EL_ARRAY                                "array"
      48             : #define EL_BINARY                               "binary"
      49             : #define EL_BOOLEAN                              "boolean"
      50             : #define EL_CHAR                                 "char"
      51             : #define EL_CHAR_CODE                    "code"
      52             : #define EL_NULL                                 "null"
      53             : #define EL_NUMBER                               "number"
      54             : #define EL_PACKET                               "wddxPacket"
      55             : #define EL_STRING                               "string"
      56             : #define EL_STRUCT                               "struct"
      57             : #define EL_VALUE                                "value"
      58             : #define EL_VAR                                  "var"
      59             : #define EL_NAME                         "name"
      60             : #define EL_VERSION                              "version"
      61             : #define EL_RECORDSET                    "recordset"
      62             : #define EL_FIELD                                "field"
      63             : #define EL_DATETIME                             "dateTime"
      64             : 
      65             : #define php_wddx_deserialize(a,b) \
      66             :         php_wddx_deserialize_ex(Z_STRVAL_P(a), Z_STRLEN_P(a), (b))
      67             : 
      68             : #define SET_STACK_VARNAME                                                       \
      69             :                 if (stack->varname) {                                                \
      70             :                         ent.varname = estrdup(stack->varname);       \
      71             :                         efree(stack->varname);                                       \
      72             :                         stack->varname = NULL;                                       \
      73             :                 } else                                                                          \
      74             :                         ent.varname = NULL;                                             \
      75             : 
      76             : static int le_wddx;
      77             : 
      78             : typedef struct {
      79             :         zval data;
      80             :         enum {
      81             :                 ST_ARRAY,
      82             :                 ST_BOOLEAN,
      83             :                 ST_NULL,
      84             :                 ST_NUMBER,
      85             :                 ST_STRING,
      86             :                 ST_BINARY,
      87             :                 ST_STRUCT,
      88             :                 ST_RECORDSET,
      89             :                 ST_FIELD,
      90             :                 ST_DATETIME
      91             :         } type;
      92             :         char *varname;
      93             : } st_entry;
      94             : 
      95             : typedef struct {
      96             :         int top, max;
      97             :         char *varname;
      98             :         zend_bool done;
      99             :         void **elements;
     100             : } wddx_stack;
     101             : 
     102             : 
     103             : static void php_wddx_process_data(void *user_data, const XML_Char *s, int len);
     104             : 
     105             : /* {{{ arginfo */
     106             : ZEND_BEGIN_ARG_INFO_EX(arginfo_wddx_serialize_value, 0, 0, 1)
     107             :         ZEND_ARG_INFO(0, var)
     108             :         ZEND_ARG_INFO(0, comment)
     109             : ZEND_END_ARG_INFO()
     110             : 
     111             : ZEND_BEGIN_ARG_INFO_EX(arginfo_wddx_serialize_vars, 0, 0, 1)
     112             :         ZEND_ARG_VARIADIC_INFO(0, var_names)
     113             : ZEND_END_ARG_INFO()
     114             : 
     115             : ZEND_BEGIN_ARG_INFO_EX(arginfo_wddx_serialize_start, 0, 0, 0)
     116             :         ZEND_ARG_INFO(0, comment)
     117             : ZEND_END_ARG_INFO()
     118             : 
     119             : ZEND_BEGIN_ARG_INFO_EX(arginfo_wddx_packet_end, 0, 0, 1)
     120             :         ZEND_ARG_INFO(0, packet_id)
     121             : ZEND_END_ARG_INFO()
     122             : 
     123             : ZEND_BEGIN_ARG_INFO_EX(arginfo_wddx_add_vars, 0, 0, 2)
     124             :         ZEND_ARG_INFO(0, packet_id)
     125             :         ZEND_ARG_VARIADIC_INFO(0, var_names)
     126             : ZEND_END_ARG_INFO()
     127             : 
     128             : ZEND_BEGIN_ARG_INFO_EX(arginfo_wddx_deserialize, 0, 0, 1)
     129             :         ZEND_ARG_INFO(0, packet)
     130             : ZEND_END_ARG_INFO()
     131             : /* }}} */
     132             : 
     133             : /* {{{ wddx_functions[]
     134             :  */
     135             : const zend_function_entry wddx_functions[] = {
     136             :         PHP_FE(wddx_serialize_value, arginfo_wddx_serialize_value)
     137             :         PHP_FE(wddx_serialize_vars,     arginfo_wddx_serialize_vars)
     138             :         PHP_FE(wddx_packet_start,       arginfo_wddx_serialize_start)
     139             :         PHP_FE(wddx_packet_end,         arginfo_wddx_packet_end)
     140             :         PHP_FE(wddx_add_vars,           arginfo_wddx_add_vars)
     141             :         PHP_FE(wddx_deserialize,        arginfo_wddx_deserialize)
     142             :         PHP_FE_END
     143             : };
     144             : /* }}} */
     145             : 
     146             : PHP_MINIT_FUNCTION(wddx);
     147             : PHP_MINFO_FUNCTION(wddx);
     148             : 
     149             : /* {{{ dynamically loadable module stuff */
     150             : #ifdef COMPILE_DL_WDDX
     151             : ZEND_GET_MODULE(wddx)
     152             : #endif /* COMPILE_DL_WDDX */
     153             : /* }}} */
     154             : 
     155             : /* {{{ wddx_module_entry
     156             :  */
     157             : zend_module_entry wddx_module_entry = {
     158             :         STANDARD_MODULE_HEADER,
     159             :         "wddx",
     160             :         wddx_functions,
     161             :         PHP_MINIT(wddx),
     162             :         NULL,
     163             :         NULL,
     164             :         NULL,
     165             :         PHP_MINFO(wddx),
     166             :     PHP_WDDX_VERSION,
     167             :         STANDARD_MODULE_PROPERTIES
     168             : };
     169             : /* }}} */
     170             : 
     171             : /* {{{ wddx_stack_init
     172             :  */
     173         417 : static int wddx_stack_init(wddx_stack *stack)
     174             : {
     175         417 :         stack->top = 0;
     176         417 :         stack->elements = (void **) safe_emalloc(sizeof(void **), STACK_BLOCK_SIZE, 0);
     177         417 :         stack->max = STACK_BLOCK_SIZE;
     178         417 :         stack->varname = NULL;
     179         417 :         stack->done = 0;
     180             : 
     181         417 :         return SUCCESS;
     182             : }
     183             : /* }}} */
     184             : 
     185             : /* {{{ wddx_stack_push
     186             :  */
     187         503 : static int wddx_stack_push(wddx_stack *stack, void *element, int size)
     188             : {
     189         503 :         if (stack->top >= stack->max) {                /* we need to allocate more memory */
     190           0 :                 stack->elements = (void **) erealloc(stack->elements,
     191             :                                    (sizeof(void **) * (stack->max += STACK_BLOCK_SIZE)));
     192             :         }
     193         503 :         stack->elements[stack->top] = (void *) emalloc(size);
     194         503 :         memcpy(stack->elements[stack->top], element, size);
     195         503 :         return stack->top++;
     196             : }
     197             : /* }}} */
     198             : 
     199             : /* {{{ wddx_stack_top
     200             :  */
     201        1597 : static int wddx_stack_top(wddx_stack *stack, void **element)
     202             : {
     203        1597 :         if (stack->top > 0) {
     204        1597 :                 *element = stack->elements[stack->top - 1];
     205        1597 :                 return SUCCESS;
     206             :         } else {
     207           0 :                 *element = NULL;
     208           0 :                 return FAILURE;
     209             :         }
     210             : }
     211             : /* }}} */
     212             : 
     213             : /* {{{ wddx_stack_is_empty
     214             :  */
     215         730 : static int wddx_stack_is_empty(wddx_stack *stack)
     216             : {
     217         730 :         if (stack->top == 0) {
     218          87 :                 return 1;
     219             :         } else {
     220         643 :                 return 0;
     221             :         }
     222             : }
     223             : /* }}} */
     224             : 
     225             : /* {{{ wddx_stack_destroy
     226             :  */
     227         417 : static int wddx_stack_destroy(wddx_stack *stack)
     228             : {
     229             :         register int i;
     230             : 
     231         417 :         if (stack->elements) {
     232         835 :                 for (i = 0; i < stack->top; i++) {
     233         836 :                         if (Z_TYPE(((st_entry *)stack->elements[i])->data) != IS_UNDEF
     234         414 :                                         && ((st_entry *)stack->elements[i])->type != ST_FIELD)    {
     235         413 :                                 zval_ptr_dtor(&((st_entry *)stack->elements[i])->data);
     236             :                         }
     237         418 :                         if (((st_entry *)stack->elements[i])->varname) {
     238           0 :                                 efree(((st_entry *)stack->elements[i])->varname);
     239             :                         }
     240         418 :                         efree(stack->elements[i]);
     241             :                 }
     242         417 :                 efree(stack->elements);
     243             :         }
     244         417 :         if (stack->varname) {
     245           1 :                 efree(stack->varname);
     246             :         }
     247         417 :         return SUCCESS;
     248             : }
     249             : /* }}} */
     250             : 
     251             : /* {{{ release_wddx_packet_rsrc
     252             :  */
     253           1 : static void release_wddx_packet_rsrc(zend_resource *rsrc)
     254             : {
     255           1 :         smart_str *str = (smart_str *)rsrc->ptr;
     256             :         smart_str_free(str);
     257           1 :         efree(str);
     258           1 : }
     259             : /* }}} */
     260             : 
     261             : #include "ext/session/php_session.h"
     262             : 
     263             : #if HAVE_PHP_SESSION && !defined(COMPILE_DL_SESSION)
     264             : /* {{{ PS_SERIALIZER_ENCODE_FUNC
     265             :  */
     266           1 : PS_SERIALIZER_ENCODE_FUNC(wddx)
     267             : {
     268             :         wddx_packet *packet;
     269             :         zend_string *str;
     270             :         PS_ENCODE_VARS;
     271             : 
     272           1 :         packet = php_wddx_constructor();
     273             : 
     274           1 :         php_wddx_packet_start(packet, NULL, 0);
     275             :         php_wddx_add_chunk_static(packet, WDDX_STRUCT_S);
     276             : 
     277           3 :         PS_ENCODE_LOOP(
     278             :                 php_wddx_serialize_var(packet, struc, key);
     279             :         );
     280             : 
     281             :         php_wddx_add_chunk_static(packet, WDDX_STRUCT_E);
     282           1 :         php_wddx_packet_end(packet);
     283             :         smart_str_0(packet);
     284           2 :         str = zend_string_copy(packet->s);
     285           1 :         php_wddx_destructor(packet);
     286             : 
     287           1 :         return str;
     288             : }
     289             : /* }}} */
     290             : 
     291             : /* {{{ PS_SERIALIZER_DECODE_FUNC
     292             :  */
     293           5 : PS_SERIALIZER_DECODE_FUNC(wddx)
     294             : {
     295             :         zval retval;
     296             :         zval *ent;
     297             :         zend_string *key;
     298             :         zend_ulong idx;
     299             :         int ret;
     300             : 
     301           5 :         if (vallen == 0) {
     302           3 :                 return SUCCESS;
     303             :         }
     304             : 
     305           2 :         ZVAL_UNDEF(&retval);
     306           2 :         if ((ret = php_wddx_deserialize_ex(val, vallen, &retval)) == SUCCESS) {
     307           2 :                 if (Z_TYPE(retval) != IS_ARRAY) {
     308             :                         zval_dtor(&retval);
     309           1 :                         return FAILURE;
     310             :                 }
     311           5 :                 ZEND_HASH_FOREACH_KEY_VAL(Z_ARRVAL(retval), idx, key, ent) {
     312           2 :                         if (key == NULL) {
     313           0 :                                 key = zend_long_to_str(idx);
     314             :                         } else {
     315             :                                 zend_string_addref(key);
     316             :                         }
     317           2 :                         if (php_set_session_var(key, ent, NULL)) {
     318           2 :                                 if (Z_REFCOUNTED_P(ent)) Z_ADDREF_P(ent);
     319             :                         }
     320           2 :                         PS_ADD_VAR(key);
     321             :                         zend_string_release(key);
     322             :                 } ZEND_HASH_FOREACH_END();
     323             :         }
     324             : 
     325           1 :         zval_ptr_dtor(&retval);
     326             : 
     327           1 :         return ret;
     328             : }
     329             : /* }}} */
     330             : #endif
     331             : 
     332             : /* {{{ PHP_MINIT_FUNCTION
     333             :  */
     334       24801 : PHP_MINIT_FUNCTION(wddx)
     335             : {
     336       24801 :         le_wddx = zend_register_list_destructors_ex(release_wddx_packet_rsrc, NULL, "wddx", module_number);
     337             : 
     338             : #if HAVE_PHP_SESSION && !defined(COMPILE_DL_SESSION)
     339       24801 :         php_session_register_serializer("wddx",
     340             :                                                                         PS_SERIALIZER_ENCODE_NAME(wddx),
     341             :                                                                         PS_SERIALIZER_DECODE_NAME(wddx));
     342             : #endif
     343             : 
     344       24801 :         return SUCCESS;
     345             : }
     346             : /* }}} */
     347             : 
     348             : /* {{{ PHP_MINFO_FUNCTION
     349             :  */
     350         146 : PHP_MINFO_FUNCTION(wddx)
     351             : {
     352         146 :         php_info_print_table_start();
     353             : #if HAVE_PHP_SESSION && !defined(COMPILE_DL_SESSION)
     354         146 :         php_info_print_table_header(2, "WDDX Support", "enabled" );
     355         146 :         php_info_print_table_row(2, "WDDX Session Serializer", "enabled" );
     356             : #else
     357             :         php_info_print_table_row(2, "WDDX Support", "enabled" );
     358             : #endif
     359         146 :         php_info_print_table_end();
     360         146 : }
     361             : /* }}} */
     362             : 
     363             : /* {{{ php_wddx_packet_start
     364             :  */
     365         207 : void php_wddx_packet_start(wddx_packet *packet, char *comment, size_t comment_len)
     366             : {
     367             :         php_wddx_add_chunk_static(packet, WDDX_PACKET_S);
     368         207 :         if (comment) {
     369           4 :                 zend_string *escaped = php_escape_html_entities(
     370             :                         comment, comment_len, 0, ENT_QUOTES, NULL);
     371             : 
     372             :                 php_wddx_add_chunk_static(packet, WDDX_HEADER_S);
     373             :                 php_wddx_add_chunk_static(packet, WDDX_COMMENT_S);
     374           4 :                 php_wddx_add_chunk_ex(packet, ZSTR_VAL(escaped), ZSTR_LEN(escaped));
     375             :                 php_wddx_add_chunk_static(packet, WDDX_COMMENT_E);
     376             :                 php_wddx_add_chunk_static(packet, WDDX_HEADER_E);
     377             : 
     378             :                 zend_string_release(escaped);
     379             :         } else {
     380             :                 php_wddx_add_chunk_static(packet, WDDX_HEADER);
     381             :         }
     382             :         php_wddx_add_chunk_static(packet, WDDX_DATA_S);
     383         207 : }
     384             : /* }}} */
     385             : 
     386             : /* {{{ php_wddx_packet_end
     387             :  */
     388         207 : void php_wddx_packet_end(wddx_packet *packet)
     389             : {
     390             :         php_wddx_add_chunk_static(packet, WDDX_DATA_E);
     391             :         php_wddx_add_chunk_static(packet, WDDX_PACKET_E);
     392         207 : }
     393             : /* }}} */
     394             : 
     395             : #define FLUSH_BUF()                               \
     396             :         if (l > 0) {                                  \
     397             :                 php_wddx_add_chunk_ex(packet, buf, l);    \
     398             :                 l = 0;                                    \
     399             :         }
     400             : 
     401             : /* {{{ php_wddx_serialize_string
     402             :  */
     403         207 : static void php_wddx_serialize_string(wddx_packet *packet, zval *var)
     404             : {
     405             :         php_wddx_add_chunk_static(packet, WDDX_STRING_S);
     406             : 
     407         207 :         if (Z_STRLEN_P(var) > 0) {
     408         412 :                 zend_string *buf = php_escape_html_entities(
     409         412 :                         (unsigned char *) Z_STRVAL_P(var), Z_STRLEN_P(var), 0, ENT_QUOTES, NULL);
     410             : 
     411         206 :                 php_wddx_add_chunk_ex(packet, ZSTR_VAL(buf), ZSTR_LEN(buf));
     412             : 
     413             :                 zend_string_release(buf);
     414             :         }
     415             :         php_wddx_add_chunk_static(packet, WDDX_STRING_E);
     416         207 : }
     417             : /* }}} */
     418             : 
     419             : /* {{{ php_wddx_serialize_number
     420             :  */
     421           4 : static void php_wddx_serialize_number(wddx_packet *packet, zval *var)
     422             : {
     423             :         char tmp_buf[WDDX_BUF_LEN], *dec_point;
     424           4 :         zend_string *str = zval_get_string(var);
     425           4 :         snprintf(tmp_buf, sizeof(tmp_buf), WDDX_NUMBER, ZSTR_VAL(str));
     426             :         zend_string_release(str);
     427             : 
     428           4 :         dec_point = strchr(tmp_buf, ',');
     429           4 :         if (dec_point) {
     430           1 :                 *dec_point = '.';
     431             :         }
     432           4 :         php_wddx_add_chunk(packet, tmp_buf);
     433           4 : }
     434             : /* }}} */
     435             : 
     436             : /* {{{ php_wddx_serialize_boolean
     437             :  */
     438           5 : static void php_wddx_serialize_boolean(wddx_packet *packet, zval *var)
     439             : {
     440          10 :         php_wddx_add_chunk(packet, Z_TYPE_P(var) == IS_TRUE ? WDDX_BOOLEAN_TRUE : WDDX_BOOLEAN_FALSE);
     441           5 : }
     442             : /* }}} */
     443             : 
     444             : /* {{{ php_wddx_serialize_unset
     445             :  */
     446           3 : static void php_wddx_serialize_unset(wddx_packet *packet)
     447             : {
     448             :         php_wddx_add_chunk_static(packet, WDDX_NULL);
     449           3 : }
     450             : /* }}} */
     451             : 
     452             : /* {{{ php_wddx_serialize_object
     453             :  */
     454           3 : static void php_wddx_serialize_object(wddx_packet *packet, zval *obj)
     455             : {
     456             : /* OBJECTS_FIXME */
     457             :         zval *ent, fname, *varname;
     458             :         zval retval;
     459             :         zend_string *key;
     460             :         zend_ulong idx;
     461             :         char tmp_buf[WDDX_BUF_LEN];
     462             :         HashTable *objhash, *sleephash;
     463             :         zend_class_entry *ce;
     464           3 :         PHP_CLASS_ATTRIBUTES;
     465             : 
     466           6 :         PHP_SET_CLASS_ATTRIBUTES(obj);
     467           3 :         ce = Z_OBJCE_P(obj);
     468           3 :         if (!ce || ce->serialize || ce->unserialize) {
     469           1 :                 php_error_docref(NULL, E_WARNING, "Class %s can not be serialized", ZSTR_VAL(class_name));
     470             :                 PHP_CLEANUP_CLASS_ATTRIBUTES();
     471           1 :                 return;
     472             :         }
     473             : 
     474           4 :         ZVAL_STRING(&fname, "__sleep");
     475             :         /*
     476             :          * We try to call __sleep() method on object. It's supposed to return an
     477             :          * array of property names to be serialized.
     478             :          */
     479           2 :         if (call_user_function_ex(CG(function_table), obj, &fname, &retval, 0, 0, 1, NULL) == SUCCESS) {
     480           2 :                 if (!Z_ISUNDEF(retval) && (sleephash = HASH_OF(&retval))) {
     481             :                         php_wddx_add_chunk_static(packet, WDDX_STRUCT_S);
     482           1 :                         snprintf(tmp_buf, WDDX_BUF_LEN, WDDX_VAR_S, PHP_CLASS_NAME_VAR);
     483           1 :                         php_wddx_add_chunk(packet, tmp_buf);
     484             :                         php_wddx_add_chunk_static(packet, WDDX_STRING_S);
     485           1 :                         php_wddx_add_chunk_ex(packet, ZSTR_VAL(class_name), ZSTR_LEN(class_name));
     486             :                         php_wddx_add_chunk_static(packet, WDDX_STRING_E);
     487             :                         php_wddx_add_chunk_static(packet, WDDX_VAR_E);
     488             : 
     489           1 :                         objhash = Z_OBJPROP_P(obj);
     490             : 
     491           5 :                         ZEND_HASH_FOREACH_VAL(sleephash, varname) {
     492           2 :                                 if (Z_TYPE_P(varname) != IS_STRING) {
     493           0 :                                         php_error_docref(NULL, E_NOTICE, "__sleep should return an array only containing the names of instance-variables to serialize.");
     494           0 :                                         continue;
     495             :                                 }
     496             : 
     497           2 :                                 if ((ent = zend_hash_find(objhash, Z_STR_P(varname))) != NULL) {
     498           2 :                                         php_wddx_serialize_var(packet, ent, Z_STR_P(varname));
     499             :                                 }
     500             :                         } ZEND_HASH_FOREACH_END();
     501             : 
     502             :                         php_wddx_add_chunk_static(packet, WDDX_STRUCT_E);
     503             :                 }
     504             :         } else {
     505             :                 php_wddx_add_chunk_static(packet, WDDX_STRUCT_S);
     506           1 :                 snprintf(tmp_buf, WDDX_BUF_LEN, WDDX_VAR_S, PHP_CLASS_NAME_VAR);
     507           1 :                 php_wddx_add_chunk(packet, tmp_buf);
     508             :                 php_wddx_add_chunk_static(packet, WDDX_STRING_S);
     509           1 :                 php_wddx_add_chunk_ex(packet, ZSTR_VAL(class_name), ZSTR_LEN(class_name));
     510             :                 php_wddx_add_chunk_static(packet, WDDX_STRING_E);
     511             :                 php_wddx_add_chunk_static(packet, WDDX_VAR_E);
     512             : 
     513           1 :                 objhash = Z_OBJPROP_P(obj);
     514           3 :                 ZEND_HASH_FOREACH_KEY_VAL(objhash, idx, key, ent) {
     515           1 :                         if (ent == obj) {
     516           0 :                                 continue;
     517             :                         }
     518           1 :                         if (key) {
     519             :                                 const char *class_name, *prop_name;
     520             :                                 size_t prop_name_len;
     521             :                                 zend_string *tmp;
     522             : 
     523           1 :                                 zend_unmangle_property_name_ex(key, &class_name, &prop_name, &prop_name_len);
     524           2 :                                 tmp = zend_string_init(prop_name, prop_name_len, 0);
     525           1 :                                 php_wddx_serialize_var(packet, ent, tmp);
     526             :                                 zend_string_release(tmp);
     527             :                         } else {
     528           0 :                                 key = zend_long_to_str(idx);
     529           0 :                                 php_wddx_serialize_var(packet, ent, key);
     530             :                                 zend_string_release(key);
     531             :                         }
     532             :                 } ZEND_HASH_FOREACH_END();
     533             :                 php_wddx_add_chunk_static(packet, WDDX_STRUCT_E);
     534             :         }
     535             : 
     536             :         PHP_CLEANUP_CLASS_ATTRIBUTES();
     537             : 
     538           2 :         zval_ptr_dtor(&fname);
     539           2 :         zval_ptr_dtor(&retval);
     540             : }
     541             : /* }}} */
     542             : 
     543             : /* {{{ php_wddx_serialize_array
     544             :  */
     545           8 : static void php_wddx_serialize_array(wddx_packet *packet, zval *arr)
     546             : {
     547             :         zval *ent;
     548             :         zend_string *key;
     549           8 :         int is_struct = 0;
     550             :         zend_ulong idx;
     551             :         HashTable *target_hash;
     552             :         char tmp_buf[WDDX_BUF_LEN];
     553           8 :         zend_ulong ind = 0;
     554             : 
     555           8 :         target_hash = Z_ARRVAL_P(arr);
     556          21 :         ZEND_HASH_FOREACH_KEY(target_hash, idx, key) {
     557          10 :                 if (key) {
     558           7 :                         is_struct = 1;
     559           7 :                         break;
     560             :                 }
     561             : 
     562           3 :                 if (idx != ind) {
     563           0 :                         is_struct = 1;
     564           0 :                         break;
     565             :                 }
     566           3 :                 ind++;
     567             :         } ZEND_HASH_FOREACH_END();
     568             : 
     569           8 :         if (is_struct) {
     570             :                 php_wddx_add_chunk_static(packet, WDDX_STRUCT_S);
     571             :         } else {
     572           1 :                 snprintf(tmp_buf, sizeof(tmp_buf), WDDX_ARRAY_S, zend_hash_num_elements(target_hash));
     573           1 :                 php_wddx_add_chunk(packet, tmp_buf);
     574             :         }
     575             : 
     576          42 :         ZEND_HASH_FOREACH_KEY_VAL(target_hash, idx, key, ent) {
     577          17 :                 if (ent == arr) {
     578           0 :                         continue;
     579             :                 }
     580             : 
     581          17 :                 if (is_struct) {
     582          14 :                         if (key) {
     583          14 :                                 php_wddx_serialize_var(packet, ent, key);
     584             :                         } else {
     585           0 :                                 key = zend_long_to_str(idx);
     586           0 :                                 php_wddx_serialize_var(packet, ent, key);
     587             :                                 zend_string_release(key);
     588             :                         }
     589             :                 } else {
     590           3 :                         php_wddx_serialize_var(packet, ent, NULL);
     591             :                 }
     592             :         } ZEND_HASH_FOREACH_END();
     593             : 
     594           8 :         if (is_struct) {
     595             :                 php_wddx_add_chunk_static(packet, WDDX_STRUCT_E);
     596             :         } else {
     597             :                 php_wddx_add_chunk_static(packet, WDDX_ARRAY_E);
     598             :         }
     599           8 : }
     600             : /* }}} */
     601             : 
     602             : /* {{{ php_wddx_serialize_var
     603             :  */
     604         230 : void php_wddx_serialize_var(wddx_packet *packet, zval *var, zend_string *name)
     605             : {
     606             :         HashTable *ht;
     607             : 
     608         230 :         if (name) {
     609             :                 char *tmp_buf;
     610          26 :                 zend_string *name_esc = php_escape_html_entities((unsigned char *) ZSTR_VAL(name), ZSTR_LEN(name), 0, ENT_QUOTES, NULL);
     611          26 :                 tmp_buf = emalloc(ZSTR_LEN(name_esc) + sizeof(WDDX_VAR_S));
     612          26 :                 snprintf(tmp_buf, ZSTR_LEN(name_esc) + sizeof(WDDX_VAR_S), WDDX_VAR_S, ZSTR_VAL(name_esc));
     613          26 :                 php_wddx_add_chunk(packet, tmp_buf);
     614          26 :                 efree(tmp_buf);
     615             :                 zend_string_release(name_esc);
     616             :         }
     617             : 
     618         230 :         if (Z_TYPE_P(var) == IS_INDIRECT) {
     619           1 :                 var = Z_INDIRECT_P(var);
     620             :         }
     621         230 :         ZVAL_DEREF(var);
     622         230 :         switch (Z_TYPE_P(var)) {
     623         207 :                 case IS_STRING:
     624         207 :                         php_wddx_serialize_string(packet, var);
     625         207 :                         break;
     626             : 
     627           4 :                 case IS_LONG:
     628             :                 case IS_DOUBLE:
     629           4 :                         php_wddx_serialize_number(packet, var);
     630           4 :                         break;
     631             : 
     632           5 :                 case IS_TRUE:
     633             :                 case IS_FALSE:
     634           5 :                         php_wddx_serialize_boolean(packet, var);
     635           5 :                         break;
     636             : 
     637           3 :                 case IS_NULL:
     638           3 :                         php_wddx_serialize_unset(packet);
     639           3 :                         break;
     640             : 
     641           8 :                 case IS_ARRAY:
     642           8 :                         ht = Z_ARRVAL_P(var);
     643           8 :                         if (ht->u.v.nApplyCount > 1) {
     644           0 :                                 zend_throw_error(NULL, "WDDX doesn't support circular references");
     645           0 :                                 return;
     646             :                         }
     647           8 :                         if (ZEND_HASH_APPLY_PROTECTION(ht)) {
     648           8 :                                 ht->u.v.nApplyCount++;
     649             :                         }
     650           8 :                         php_wddx_serialize_array(packet, var);
     651           8 :                         if (ZEND_HASH_APPLY_PROTECTION(ht)) {
     652           8 :                                 ht->u.v.nApplyCount--;
     653             :                         }
     654           8 :                         break;
     655             : 
     656           3 :                 case IS_OBJECT:
     657           3 :                         ht = Z_OBJPROP_P(var);
     658           3 :                         if (ht->u.v.nApplyCount > 1) {
     659           0 :                                 zend_throw_error(NULL, "WDDX doesn't support circular references");
     660           0 :                                 return;
     661             :                         }
     662           3 :                         ht->u.v.nApplyCount++;
     663           3 :                         php_wddx_serialize_object(packet, var);
     664           3 :                         ht->u.v.nApplyCount--;
     665           3 :                         break;
     666             :         }
     667             : 
     668         230 :         if (name) {
     669             :                 php_wddx_add_chunk_static(packet, WDDX_VAR_E);
     670             :         }
     671             : }
     672             : /* }}} */
     673             : 
     674             : /* {{{ php_wddx_add_var
     675             :  */
     676          13 : static void php_wddx_add_var(wddx_packet *packet, zval *name_var)
     677             : {
     678             :         zval *val;
     679             :         HashTable *target_hash;
     680             : 
     681          13 :         if (Z_TYPE_P(name_var) == IS_STRING) {
     682           7 :                 zend_array *symbol_table = zend_rebuild_symbol_table();
     683           7 :                 if ((val = zend_hash_find(symbol_table, Z_STR_P(name_var))) != NULL) {
     684           7 :                         if (Z_TYPE_P(val) == IS_INDIRECT) {
     685           7 :                                 val = Z_INDIRECT_P(val);
     686             :                         }
     687           7 :                         php_wddx_serialize_var(packet, val, Z_STR_P(name_var));
     688             :                 }
     689           6 :         } else if (Z_TYPE_P(name_var) == IS_ARRAY || Z_TYPE_P(name_var) == IS_OBJECT)   {
     690           6 :                 int is_array = Z_TYPE_P(name_var) == IS_ARRAY;
     691             : 
     692           6 :                 target_hash = HASH_OF(name_var);
     693             : 
     694           6 :                 if (is_array && target_hash->u.v.nApplyCount > 1) {
     695           1 :                         php_error_docref(NULL, E_WARNING, "recursion detected");
     696           1 :                         return;
     697             :                 }
     698             : 
     699           5 :                 if (Z_IMMUTABLE_P(name_var)) {
     700           0 :                         ZEND_HASH_FOREACH_VAL(target_hash, val) {
     701           0 :                                 php_wddx_add_var(packet, val);
     702             :                         } ZEND_HASH_FOREACH_END();
     703             :                 } else {
     704          17 :                         ZEND_HASH_FOREACH_VAL(target_hash, val) {
     705           6 :                                 if (is_array) {
     706           6 :                                         target_hash->u.v.nApplyCount++;
     707             :                                 }
     708             : 
     709           6 :                                 ZVAL_DEREF(val);
     710           6 :                                 php_wddx_add_var(packet, val);
     711             : 
     712           6 :                                 if (is_array) {
     713           6 :                                         target_hash->u.v.nApplyCount--;
     714             :                                 }
     715             :                         } ZEND_HASH_FOREACH_END();
     716             :                 }
     717             :         }
     718             : }
     719             : /* }}} */
     720             : 
     721             : /* {{{ php_wddx_push_element
     722             :  */
     723        1807 : static void php_wddx_push_element(void *user_data, const XML_Char *name, const XML_Char **atts)
     724             : {
     725             :         st_entry ent;
     726        1807 :         wddx_stack *stack = (wddx_stack *)user_data;
     727        1807 :         if (!strcmp((char *)name, EL_PACKET)) {
     728             :                 int i;
     729             : 
     730        1246 :                 if (atts) for (i=0; atts[i]; i++) {
     731         830 :                         if (!strcmp((char *)atts[i], EL_VERSION)) {
     732             :                                 /* nothing for now */
     733             :                         }
     734             :                 }
     735        1391 :         } else if (!strcmp((char *)name, EL_STRING)) {
     736         411 :                 ent.type = ST_STRING;
     737         411 :                 SET_STACK_VARNAME;
     738             : 
     739         411 :                 ZVAL_STR(&ent.data, ZSTR_EMPTY_ALLOC());
     740         411 :                 wddx_stack_push((wddx_stack *)stack, &ent, sizeof(st_entry));
     741         980 :         } else if (!strcmp((char *)name, EL_BINARY)) {
     742           3 :                 ent.type = ST_BINARY;
     743           3 :                 SET_STACK_VARNAME;
     744             : 
     745           3 :                 ZVAL_STR(&ent.data, ZSTR_EMPTY_ALLOC());
     746           3 :                 wddx_stack_push((wddx_stack *)stack, &ent, sizeof(st_entry));
     747         977 :         } else if (!strcmp((char *)name, EL_CHAR)) {
     748             :                 int i;
     749             : 
     750           3 :                 if (atts) for (i = 0; atts[i]; i++) {
     751           2 :                         if (!strcmp((char *)atts[i], EL_CHAR_CODE) && atts[i+1] && atts[i+1][0]) {
     752             :                                 char tmp_buf[2];
     753             : 
     754           0 :                                 snprintf(tmp_buf, sizeof(tmp_buf), "%c", (char)strtol((char *)atts[i+1], NULL, 16));
     755           0 :                                 php_wddx_process_data(user_data, (XML_Char *) tmp_buf, strlen(tmp_buf));
     756           0 :                                 break;
     757             :                         }
     758             :                 }
     759         976 :         } else if (!strcmp((char *)name, EL_NUMBER)) {
     760          12 :                 ent.type = ST_NUMBER;
     761          12 :                 SET_STACK_VARNAME;
     762             : 
     763          12 :                 ZVAL_LONG(&ent.data, 0);
     764          12 :                 wddx_stack_push((wddx_stack *)stack, &ent, sizeof(st_entry));
     765         964 :         } else if (!strcmp((char *)name, EL_BOOLEAN)) {
     766             :                 int i;
     767             : 
     768          19 :                 ent.type = ST_BOOLEAN;
     769          19 :                 SET_STACK_VARNAME;
     770          21 :                 if (atts) for (i = 0; atts[i]; i++) {
     771          18 :                         if (!strcmp((char *)atts[i], EL_VALUE) && atts[i+1] && atts[i+1][0]) {
     772          16 :                                 ZVAL_TRUE(&ent.data);
     773          16 :                                 wddx_stack_push((wddx_stack *)stack, &ent, sizeof(st_entry));
     774          16 :                                 php_wddx_process_data(user_data, atts[i+1], strlen((char *)atts[i+1]));
     775          16 :                                 break;
     776             :                         }
     777             :                 } else {
     778           2 :                         ZVAL_FALSE(&ent.data);
     779           2 :                         wddx_stack_push((wddx_stack *)stack, &ent, sizeof(st_entry));
     780             :                 }
     781         945 :         } else if (!strcmp((char *)name, EL_NULL)) {
     782           5 :                 ent.type = ST_NULL;
     783           5 :                 SET_STACK_VARNAME;
     784             : 
     785           5 :                 ZVAL_NULL(&ent.data);
     786             : 
     787           5 :                 wddx_stack_push((wddx_stack *)stack, &ent, sizeof(st_entry));
     788         940 :         } else if (!strcmp((char *)name, EL_ARRAY)) {
     789          11 :                 ent.type = ST_ARRAY;
     790          11 :                 SET_STACK_VARNAME;
     791             : 
     792          11 :                 array_init(&ent.data);
     793          11 :                 wddx_stack_push((wddx_stack *)stack, &ent, sizeof(st_entry));
     794         929 :         } else if (!strcmp((char *)name, EL_STRUCT)) {
     795          28 :                 ent.type = ST_STRUCT;
     796          28 :                 SET_STACK_VARNAME;
     797          28 :                 array_init(&ent.data);
     798          28 :                 wddx_stack_push((wddx_stack *)stack, &ent, sizeof(st_entry));
     799         901 :         } else if (!strcmp((char *)name, EL_VAR)) {
     800             :                 int i;
     801             : 
     802          78 :                 if (atts) for (i = 0; atts[i]; i++) {
     803          75 :                         if (!strcmp((char *)atts[i], EL_NAME) && atts[i+1] && atts[i+1][0]) {
     804          71 :                                 if (stack->varname) efree(stack->varname);
     805          71 :                                 stack->varname = estrdup((char *)atts[i+1]);
     806          71 :                                 break;
     807             :                         }
     808             :                 }
     809         827 :         } else if (!strcmp((char *)name, EL_RECORDSET)) {
     810             :                 int i;
     811             : 
     812           4 :                 ent.type = ST_RECORDSET;
     813           4 :                 SET_STACK_VARNAME;
     814           4 :                 array_init(&ent.data);
     815             : 
     816          10 :                 if (atts) for (i = 0; atts[i]; i++) {
     817           9 :                         if (!strcmp((char *)atts[i], "fieldNames") && atts[i+1] && atts[i+1][0]) {
     818             :                                 zval tmp;
     819             :                                 char *key;
     820             :                                 const char *p1, *p2, *endp;
     821             : 
     822           3 :                                 i++;
     823           3 :                                 endp = (char *)atts[i] + strlen((char *)atts[i]);
     824           3 :                                 p1 = (char *)atts[i];
     825           7 :                                 while ((p2 = php_memnstr(p1, ",", sizeof(",")-1, endp)) != NULL) {
     826           1 :                                         key = estrndup(p1, p2 - p1);
     827           1 :                                         array_init(&tmp);
     828           1 :                                         add_assoc_zval_ex(&ent.data, key, p2 - p1, &tmp);
     829           1 :                                         p1 = p2 + sizeof(",")-1;
     830           1 :                                         efree(key);
     831             :                                 }
     832             : 
     833           3 :                                 if (p1 <= endp) {
     834           3 :                                         array_init(&tmp);
     835           3 :                                         add_assoc_zval_ex(&ent.data, p1, endp - p1, &tmp);
     836             :                                 }
     837             : 
     838           3 :                                 break;
     839             :                         }
     840             :                 }
     841             : 
     842           4 :                 wddx_stack_push((wddx_stack *)stack, &ent, sizeof(st_entry));
     843         823 :         } else if (!strcmp((char *)name, EL_FIELD)) {
     844             :                 int i;
     845             :                 st_entry ent;
     846             : 
     847           5 :                 ent.type = ST_FIELD;
     848           5 :                 ent.varname = NULL;
     849           5 :                 ZVAL_UNDEF(&ent.data);
     850             : 
     851           7 :                 if (atts) for (i = 0; atts[i]; i++) {
     852           6 :                         if (!strcmp((char *)atts[i], EL_NAME) && atts[i+1] && atts[i+1][0]) {
     853             :                                 st_entry *recordset;
     854             :                                 zval *field;
     855             : 
     856           8 :                                 if (wddx_stack_top(stack, (void**)&recordset) == SUCCESS &&
     857           8 :                                         recordset->type == ST_RECORDSET &&
     858           4 :                                         (field = zend_hash_str_find(Z_ARRVAL(recordset->data), (char*)atts[i+1], strlen((char *)atts[i+1]))) != NULL) {
     859           4 :                                         ZVAL_COPY_VALUE(&ent.data, field);
     860             :                                 }
     861             : 
     862           4 :                                 break;
     863             :                         }
     864             :                 }
     865             : 
     866           5 :                 wddx_stack_push((wddx_stack *)stack, &ent, sizeof(st_entry));
     867         818 :         } else if (!strcmp((char *)name, EL_DATETIME)) {
     868           6 :                 ent.type = ST_DATETIME;
     869           6 :                 SET_STACK_VARNAME;
     870             : 
     871           6 :                 ZVAL_LONG(&ent.data, 0);
     872           6 :                 wddx_stack_push((wddx_stack *)stack, &ent, sizeof(st_entry));
     873             :         }
     874        1807 : }
     875             : /* }}} */
     876             : 
     877             : /* {{{ php_wddx_pop_element
     878             :  */
     879        1793 : static void php_wddx_pop_element(void *user_data, const XML_Char *name)
     880             : {
     881             :         st_entry                        *ent1, *ent2;
     882        1793 :         wddx_stack                      *stack = (wddx_stack *)user_data;
     883             :         HashTable                       *target_hash;
     884             :         zend_class_entry        *pce;
     885             :         zval                            obj;
     886             : 
     887             : /* OBJECTS_FIXME */
     888        1793 :         if (stack->top == 0) {
     889         828 :                 return;
     890             :         }
     891             : 
     892        2347 :         if (!strcmp((char *)name, EL_STRING) || !strcmp((char *)name, EL_NUMBER) ||
     893        2845 :                 !strcmp((char *)name, EL_BOOLEAN) || !strcmp((char *)name, EL_NULL) ||
     894        2770 :                 !strcmp((char *)name, EL_ARRAY) || !strcmp((char *)name, EL_STRUCT) ||
     895        2697 :                 !strcmp((char *)name, EL_RECORDSET) || !strcmp((char *)name, EL_BINARY) ||
     896         896 :                 !strcmp((char *)name, EL_DATETIME)) {
     897         495 :                 wddx_stack_top(stack, (void**)&ent1);
     898             : 
     899         990 :                 if (Z_TYPE(ent1->data) == IS_UNDEF) {
     900          11 :                         if (stack->top > 1) {
     901           7 :                                 stack->top--;
     902           7 :                                 efree(ent1);
     903             :                         } else {
     904           4 :                                 stack->done = 1;
     905             :                         }
     906          11 :                         return;
     907             :                 }
     908             : 
     909         484 :                 if (!strcmp((char *)name, EL_BINARY)) {
     910           3 :                         zend_string *new_str = NULL;
     911             : 
     912           3 :                         if (ZSTR_EMPTY_ALLOC() != Z_STR(ent1->data)) {
     913           4 :                                 new_str = php_base64_decode(
     914           4 :                                         (unsigned char *)Z_STRVAL(ent1->data), Z_STRLEN(ent1->data));
     915             :                         }
     916             : 
     917           3 :                         zval_ptr_dtor(&ent1->data);
     918           3 :                         if (new_str) {
     919           2 :                                 ZVAL_STR(&ent1->data, new_str);
     920             :                         } else {
     921           1 :                                 ZVAL_EMPTY_STRING(&ent1->data);
     922             :                         }
     923             :                 }
     924             : 
     925             :                 /* Call __wakeup() method on the object. */
     926         968 :                 if (Z_TYPE(ent1->data) == IS_OBJECT) {
     927             :                         zval fname, retval;
     928             : 
     929           6 :                         ZVAL_STRING(&fname, "__wakeup");
     930             : 
     931           3 :                         call_user_function_ex(NULL, &ent1->data, &fname, &retval, 0, 0, 0, NULL);
     932             : 
     933           3 :                         zval_ptr_dtor(&fname);
     934           3 :                         zval_ptr_dtor(&retval);
     935             :                 }
     936             : 
     937         967 :                 if (stack->top > 1) {
     938          74 :                         stack->top--;
     939          74 :                         wddx_stack_top(stack, (void**)&ent2);
     940             : 
     941             :                         /* if non-existent field */
     942         148 :                         if (Z_ISUNDEF(ent2->data)) {
     943           1 :                                 zval_ptr_dtor(&ent1->data);
     944           1 :                                 efree(ent1);
     945           1 :                                 return;
     946             :                         }
     947             : 
     948         152 :                         if (Z_TYPE(ent2->data) == IS_ARRAY || Z_TYPE(ent2->data) == IS_OBJECT) {
     949         146 :                                 target_hash = HASH_OF(&ent2->data);
     950             : 
     951          71 :                                 if (ent1->varname) {
     952          63 :                                         if (!strcmp(ent1->varname, PHP_CLASS_NAME_VAR) &&
     953          28 :                                                 Z_TYPE(ent1->data) == IS_STRING && Z_STRLEN(ent1->data) &&
     954          24 :                                                 ent2->type == ST_STRUCT && Z_TYPE(ent2->data) == IS_ARRAY) {
     955           5 :                                                 zend_bool incomplete_class = 0;
     956             : 
     957           5 :                                                 zend_str_tolower(Z_STRVAL(ent1->data), Z_STRLEN(ent1->data));
     958           5 :                                                 zend_string_forget_hash_val(Z_STR(ent1->data));
     959          10 :                                                 if ((pce = zend_hash_find_ptr(EG(class_table), Z_STR(ent1->data))) == NULL) {
     960           0 :                                                         incomplete_class = 1;
     961           0 :                                                         pce = PHP_IC_ENTRY;
     962             :                                                 }
     963             : 
     964           5 :                                                 if (pce != PHP_IC_ENTRY && (pce->serialize || pce->unserialize)) {
     965           1 :                                                         zval_ptr_dtor(&ent2->data);
     966           1 :                                                         ZVAL_UNDEF(&ent2->data);
     967           1 :                                                         php_error_docref(NULL, E_WARNING, "Class %s can not be unserialized", Z_STRVAL(ent1->data));
     968             :                                                 } else {
     969             :                                                         /* Initialize target object */
     970           4 :                                                         if (object_init_ex(&obj, pce) != SUCCESS || EG(exception)) {
     971           1 :                                                                 zval_ptr_dtor(&ent2->data);
     972           1 :                                                                 ZVAL_UNDEF(&ent2->data);
     973           1 :                                                                 php_error_docref(NULL, E_WARNING, "Class %s can not be instantiated", Z_STRVAL(ent1->data));
     974             :                                                         } else {
     975             :                                                                 /* Merge current hashtable with object's default properties */
     976           3 :                                                                 zend_hash_merge(Z_OBJPROP(obj),
     977             :                                                                                                 Z_ARRVAL(ent2->data),
     978             :                                                                                                 zval_add_ref, 0);
     979             : 
     980           3 :                                                                 if (incomplete_class) {
     981           0 :                                                                         php_store_class_name(&obj, Z_STRVAL(ent1->data), Z_STRLEN(ent1->data));
     982             :                                                                 }
     983             : 
     984             :                                                                 /* Clean up old array entry */
     985           3 :                                                                 zval_ptr_dtor(&ent2->data);
     986             : 
     987             :                                                                 /* Set stack entry to point to the newly created object */
     988           3 :                                                                 ZVAL_COPY_VALUE(&ent2->data, &obj);
     989             :                                                         }
     990             :                                                 }
     991             : 
     992             :                                                 /* Clean up class name var entry */
     993           5 :                                                 zval_ptr_dtor(&ent1->data);
     994         102 :                                         } else if (Z_TYPE(ent2->data) == IS_OBJECT) {
     995           4 :                                                 zend_update_property(Z_OBJCE(ent2->data), &ent2->data, ent1->varname, strlen(ent1->varname), &ent1->data);
     996           4 :                                                 if Z_REFCOUNTED(ent1->data) Z_DELREF(ent1->data);
     997             :                                         } else {
     998          47 :                                                 zend_symtable_str_update(target_hash, ent1->varname, strlen(ent1->varname), &ent1->data);
     999             :                                         }
    1000          56 :                                         efree(ent1->varname);
    1001             :                                 } else  {
    1002          15 :                                         zend_hash_next_index_insert(target_hash, &ent1->data);
    1003             :                                 }
    1004             :                         }
    1005          73 :                         efree(ent1);
    1006             :                 } else {
    1007         410 :                         stack->done = 1;
    1008             :                 }
    1009         890 :         } else if (!strcmp((char *)name, EL_VAR) && stack->varname) {
    1010           5 :                 efree(stack->varname);
    1011           5 :                 stack->varname = NULL;
    1012         885 :         } else if (!strcmp((char *)name, EL_FIELD)) {
    1013             :                 st_entry *ent;
    1014           4 :                 wddx_stack_top(stack, (void **)&ent);
    1015           4 :                 efree(ent);
    1016           4 :                 stack->top--;
    1017             :         }
    1018             : }
    1019             : /* }}} */
    1020             : 
    1021             : /* {{{ php_wddx_process_data
    1022             :  */
    1023         730 : static void php_wddx_process_data(void *user_data, const XML_Char *s, int len)
    1024             : {
    1025             :         st_entry *ent;
    1026         730 :         wddx_stack *stack = (wddx_stack *)user_data;
    1027             : 
    1028        1373 :         if (!wddx_stack_is_empty(stack) && !stack->done) {
    1029         606 :                 wddx_stack_top(stack, (void**)&ent);
    1030         606 :                 switch (ent->type) {
    1031         412 :                         case ST_BINARY:
    1032             :                         case ST_STRING:
    1033         412 :                                 if (Z_STRLEN(ent->data) == 0) {
    1034         412 :                                         zval_ptr_dtor(&ent->data);
    1035         824 :                                         ZVAL_STRINGL(&ent->data, (char *)s, len);
    1036             :                                 } else {
    1037           0 :                                         Z_STR(ent->data) = zend_string_extend(Z_STR(ent->data), Z_STRLEN(ent->data) + len, 0);
    1038           0 :                                         memcpy(Z_STRVAL(ent->data) + Z_STRLEN(ent->data) - len, (char *)s, len);
    1039           0 :                                         Z_STRVAL(ent->data)[Z_STRLEN(ent->data)] = '\0';
    1040             :                                 }
    1041         412 :                                 break;
    1042          10 :                         case ST_NUMBER:
    1043          20 :                                 ZVAL_STRINGL(&ent->data, (char *)s, len);
    1044          10 :                                 convert_scalar_to_number(&ent->data);
    1045          10 :                                 break;
    1046             : 
    1047          20 :                         case ST_BOOLEAN:
    1048          20 :                                 if (!strcmp((char *)s, "true")) {
    1049           6 :                                         ZVAL_TRUE(&ent->data);
    1050          14 :                                 } else if (!strcmp((char *)s, "false")) {
    1051           1 :                                         ZVAL_FALSE(&ent->data);
    1052             :                                 } else {
    1053          13 :                                         zval_ptr_dtor(&ent->data);
    1054          13 :                                         if (ent->varname) {
    1055           3 :                                                 efree(ent->varname);
    1056           3 :                                                 ent->varname = NULL;
    1057             :                                         }
    1058          13 :                                         ZVAL_UNDEF(&ent->data);
    1059             :                                 }
    1060          20 :                                 break;
    1061             : 
    1062           7 :                         case ST_DATETIME: {
    1063             :                                 zend_string *str;
    1064             : 
    1065          14 :                                 if (Z_TYPE(ent->data) == IS_STRING) {
    1066           2 :                                         str = zend_string_safe_alloc(Z_STRLEN(ent->data), 1, len, 0);
    1067           1 :                                         memcpy(ZSTR_VAL(str), Z_STRVAL(ent->data), Z_STRLEN(ent->data));
    1068           1 :                                         memcpy(ZSTR_VAL(str) + Z_STRLEN(ent->data), s, len);
    1069           1 :                                         ZSTR_VAL(str)[ZSTR_LEN(str)] = '\0';
    1070           1 :                                         zval_dtor(&ent->data);
    1071             :                                 } else {
    1072          12 :                                         str = zend_string_init((char *)s, len, 0);
    1073             :                                 }
    1074             : 
    1075           7 :                                 ZVAL_LONG(&ent->data, php_parse_date(ZSTR_VAL(str), NULL));
    1076             :                                 /* date out of range < 1969 or > 2038 */
    1077           7 :                                 if (Z_LVAL(ent->data) == -1) {
    1078           3 :                                         ZVAL_STR_COPY(&ent->data, str);
    1079             :                                 }
    1080             : 
    1081             :                                 zend_string_release(str);
    1082             :                         }
    1083           7 :                                 break;
    1084             : 
    1085         157 :                         default:
    1086         157 :                                 break;
    1087             :                 }
    1088         124 :         }
    1089         730 : }
    1090             : /* }}} */
    1091             : 
    1092             : /* {{{ php_wddx_deserialize_ex
    1093             :  */
    1094         417 : int php_wddx_deserialize_ex(const char *value, size_t vallen, zval *return_value)
    1095             : {
    1096             :         wddx_stack stack;
    1097             :         XML_Parser parser;
    1098             :         st_entry *ent;
    1099             :         int retval;
    1100             : 
    1101         417 :         wddx_stack_init(&stack);
    1102         417 :         parser = XML_ParserCreate((XML_Char *) "UTF-8");
    1103             : 
    1104         417 :         XML_SetUserData(parser, &stack);
    1105         417 :         XML_SetElementHandler(parser, php_wddx_push_element, php_wddx_pop_element);
    1106         417 :         XML_SetCharacterDataHandler(parser, php_wddx_process_data);
    1107             : 
    1108             :         /* XXX value should be parsed in the loop to exhaust size_t */
    1109         417 :         XML_Parse(parser, (const XML_Char *) value, (int)vallen, 1);
    1110             : 
    1111         417 :         XML_ParserFree(parser);
    1112             : 
    1113         417 :         if (stack.top == 1) {
    1114         414 :                 wddx_stack_top(&stack, (void**)&ent);
    1115         828 :                 if (Z_ISUNDEF(ent->data)) {
    1116           4 :                         retval = FAILURE;
    1117             :                 } else {
    1118         410 :                         ZVAL_COPY(return_value, &ent->data);
    1119         410 :                         retval = SUCCESS;
    1120             :                 }
    1121             :         } else {
    1122           3 :                 retval = FAILURE;
    1123             :         }
    1124             : 
    1125         417 :         wddx_stack_destroy(&stack);
    1126             : 
    1127         417 :         return retval;
    1128             : }
    1129             : /* }}} */
    1130             : 
    1131             : /* {{{ proto string wddx_serialize_value(mixed var [, string comment])
    1132             :    Creates a new packet and serializes the given value */
    1133         201 : PHP_FUNCTION(wddx_serialize_value)
    1134             : {
    1135             :         zval *var;
    1136         201 :         char *comment = NULL;
    1137         201 :         size_t comment_len = 0;
    1138             :         wddx_packet *packet;
    1139             : 
    1140         201 :         if (zend_parse_parameters(ZEND_NUM_ARGS(), "z|s", &var, &comment, &comment_len) == FAILURE) {
    1141           0 :                 return;
    1142             :         }
    1143             : 
    1144         201 :         packet = php_wddx_constructor();
    1145             : 
    1146         201 :         php_wddx_packet_start(packet, comment, comment_len);
    1147         201 :         php_wddx_serialize_var(packet, var, NULL);
    1148         201 :         php_wddx_packet_end(packet);
    1149             :         smart_str_0(packet);
    1150             : 
    1151         201 :         RETVAL_STR_COPY(packet->s);
    1152         201 :         php_wddx_destructor(packet);
    1153             : }
    1154             : /* }}} */
    1155             : 
    1156             : /* {{{ proto string wddx_serialize_vars(mixed var_name [, mixed ...])
    1157             :    Creates a new packet and serializes given variables into a struct */
    1158           4 : PHP_FUNCTION(wddx_serialize_vars)
    1159             : {
    1160             :         int num_args, i;
    1161             :         wddx_packet *packet;
    1162           4 :         zval *args = NULL;
    1163             : 
    1164           4 :         if (zend_parse_parameters(ZEND_NUM_ARGS(), "+", &args, &num_args) == FAILURE) {
    1165           0 :                 return;
    1166             :         }
    1167             : 
    1168           4 :         packet = php_wddx_constructor();
    1169             : 
    1170           4 :         php_wddx_packet_start(packet, NULL, 0);
    1171             :         php_wddx_add_chunk_static(packet, WDDX_STRUCT_S);
    1172             : 
    1173           8 :         for (i=0; i<num_args; i++) {
    1174             :                 zval *arg;
    1175           8 :                 if (!Z_ISREF(args[i])) {
    1176           4 :                         arg = &args[i];
    1177             :                 } else {
    1178           0 :                         arg = Z_REFVAL(args[i]);
    1179             :                 }
    1180           6 :                 if (Z_TYPE_P(arg) != IS_ARRAY && Z_TYPE_P(arg) != IS_OBJECT) {
    1181           2 :                         convert_to_string_ex(arg);
    1182             :                 }
    1183           4 :                 php_wddx_add_var(packet, arg);
    1184             :         }
    1185             : 
    1186             :         php_wddx_add_chunk_static(packet, WDDX_STRUCT_E);
    1187           4 :         php_wddx_packet_end(packet);
    1188             :         smart_str_0(packet);
    1189             : 
    1190           4 :         RETVAL_STR_COPY(packet->s);
    1191           4 :         php_wddx_destructor(packet);
    1192             : }
    1193             : /* }}} */
    1194             : 
    1195             : /* {{{ php_wddx_constructor
    1196             :  */
    1197         207 : wddx_packet *php_wddx_constructor(void)
    1198             : {
    1199             :         smart_str *packet;
    1200             : 
    1201         207 :         packet = ecalloc(1, sizeof(smart_str));
    1202             : 
    1203         207 :         return packet;
    1204             : }
    1205             : /* }}} */
    1206             : 
    1207             : /* {{{ php_wddx_destructor
    1208             :  */
    1209         206 : void php_wddx_destructor(wddx_packet *packet)
    1210             : {
    1211             :         smart_str_free(packet);
    1212         206 :         efree(packet);
    1213         206 : }
    1214             : /* }}} */
    1215             : 
    1216             : /* {{{ proto resource wddx_packet_start([string comment])
    1217             :    Starts a WDDX packet with optional comment and returns the packet id */
    1218           1 : PHP_FUNCTION(wddx_packet_start)
    1219             : {
    1220           1 :         char *comment = NULL;
    1221           1 :         size_t comment_len = 0;
    1222             :         wddx_packet *packet;
    1223             : 
    1224           1 :         comment = NULL;
    1225             : 
    1226           1 :         if (zend_parse_parameters(ZEND_NUM_ARGS(), "|s", &comment, &comment_len) == FAILURE) {
    1227           0 :                 return;
    1228             :         }
    1229             : 
    1230           1 :         packet = php_wddx_constructor();
    1231             : 
    1232           1 :         php_wddx_packet_start(packet, comment, comment_len);
    1233             :         php_wddx_add_chunk_static(packet, WDDX_STRUCT_S);
    1234             : 
    1235           1 :         RETURN_RES(zend_register_resource(packet, le_wddx));
    1236             : }
    1237             : /* }}} */
    1238             : 
    1239             : /* {{{ proto string wddx_packet_end(resource packet_id)
    1240             :    Ends specified WDDX packet and returns the string containing the packet */
    1241           1 : PHP_FUNCTION(wddx_packet_end)
    1242             : {
    1243             :         zval *packet_id;
    1244           1 :         wddx_packet *packet = NULL;
    1245             : 
    1246           1 :         if (zend_parse_parameters(ZEND_NUM_ARGS(), "r", &packet_id) == FAILURE) {
    1247           0 :                 return;
    1248             :         }
    1249             : 
    1250           1 :         if ((packet = (wddx_packet *)zend_fetch_resource(Z_RES_P(packet_id), "WDDX packet ID", le_wddx)) == NULL) {
    1251           0 :                 RETURN_FALSE;
    1252             :         }
    1253             : 
    1254             :         php_wddx_add_chunk_static(packet, WDDX_STRUCT_E);
    1255             : 
    1256           1 :         php_wddx_packet_end(packet);
    1257             :         smart_str_0(packet);
    1258             : 
    1259           1 :         RETVAL_STR_COPY(packet->s);
    1260             : 
    1261           1 :         zend_list_close(Z_RES_P(packet_id));
    1262             : }
    1263             : /* }}} */
    1264             : 
    1265             : /* {{{ proto bool wddx_add_vars(resource packet_id,  mixed var_names [, mixed ...])
    1266             :    Serializes given variables and adds them to packet given by packet_id */
    1267           1 : PHP_FUNCTION(wddx_add_vars)
    1268             : {
    1269             :         int num_args, i;
    1270           1 :         zval *args = NULL;
    1271             :         zval *packet_id;
    1272           1 :         wddx_packet *packet = NULL;
    1273             : 
    1274           1 :         if (zend_parse_parameters(ZEND_NUM_ARGS(), "r+", &packet_id, &args, &num_args) == FAILURE) {
    1275           0 :                 return;
    1276             :         }
    1277             : 
    1278           1 :         if ((packet = (wddx_packet *)zend_fetch_resource(Z_RES_P(packet_id), "WDDX packet ID", le_wddx)) == NULL) {
    1279           0 :                 RETURN_FALSE;
    1280             :         }
    1281             : 
    1282           4 :         for (i=0; i<num_args; i++) {
    1283             :                 zval *arg;
    1284           6 :                 if (!Z_ISREF(args[i])) {
    1285           3 :                         arg = &args[i];
    1286             :                 } else {
    1287           0 :                         arg = Z_REFVAL(args[i]);
    1288             :                 }
    1289           5 :                 if (Z_TYPE_P(arg) != IS_ARRAY && Z_TYPE_P(arg) != IS_OBJECT) {
    1290           2 :                         convert_to_string_ex(arg);
    1291             :                 }
    1292           3 :                 php_wddx_add_var(packet, arg);
    1293             :         }
    1294             : 
    1295           1 :         RETURN_TRUE;
    1296             : }
    1297             : /* }}} */
    1298             : 
    1299             : /* {{{ proto mixed wddx_deserialize(mixed packet)
    1300             :    Deserializes given packet and returns a PHP value */
    1301         415 : PHP_FUNCTION(wddx_deserialize)
    1302             : {
    1303             :         zval *packet;
    1304         415 :         php_stream *stream = NULL;
    1305         415 :         zend_string *payload = NULL;
    1306             : 
    1307         415 :         if (zend_parse_parameters(ZEND_NUM_ARGS(), "z", &packet) == FAILURE) {
    1308           0 :                 return;
    1309             :         }
    1310             : 
    1311         830 :         if (Z_TYPE_P(packet) == IS_STRING) {
    1312         414 :                 payload = Z_STR_P(packet);
    1313           2 :         } else if (Z_TYPE_P(packet) == IS_RESOURCE) {
    1314           1 :                 php_stream_from_zval(stream, packet);
    1315           1 :                 if (stream) {
    1316           1 :                         payload = php_stream_copy_to_mem(stream, PHP_STREAM_COPY_ALL, 0);
    1317             :                 }
    1318             :         } else {
    1319           0 :                 php_error_docref(NULL, E_WARNING, "Expecting parameter 1 to be a string or a stream");
    1320           0 :                 return;
    1321             :         }
    1322             : 
    1323         415 :         if (payload == NULL) {
    1324           0 :                 return;
    1325             :         }
    1326             : 
    1327         415 :         php_wddx_deserialize_ex(ZSTR_VAL(payload), ZSTR_LEN(payload), return_value);
    1328             : 
    1329         415 :         if (stream) {
    1330           1 :                 efree(payload);
    1331             :         }
    1332             : }
    1333             : /* }}} */
    1334             : 
    1335             : #endif /* HAVE_LIBEXPAT */
    1336             : 
    1337             : /*
    1338             :  * Local variables:
    1339             :  * tab-width: 4
    1340             :  * c-basic-offset: 4
    1341             :  * End:
    1342             :  * vim600: sw=4 ts=4 fdm=marker
    1343             :  * vim<600: sw=4 ts=4
    1344             :  */

Generated by: LCOV version 1.10

Generated at Sun, 16 Jan 2022 08:19:25 +0000 (6 days ago)

Copyright © 2005-2022 The PHP Group
All rights reserved.