support complex types in restrictions and extensions

diff --git a/ext/soap/php_encoding.c b/ext/soap/php_encoding.c
index 7fc61f7b6ae87ce87e259920188d930cf6375455..c15c51ae2ea88b9b603807a537cbbde30a1c62cc 100644 (file)
--- a/ext/soap/php_encoding.c
+++ b/ext/soap/php_encoding.c
@@ -319,6 +319,10 @@ xmlNodePtr master_to_xml(encodePtr encode, zval *data, int style, xmlNodePtr par
                        node = encode->to_xml_after(&encode->details, node, style);
                }
        }
+       if(!node) {
+               node = xmlNewNode(NULL,"BOGUS");
+               xmlAddChild(parent, node);
+       }
        return node;
 }
 
@@ -1536,6 +1540,7 @@ static xmlNodePtr to_xml_object(encodeTypePtr type, zval *data, int style, xmlNo
 
                        enc = sdlType->encode;
                        while (enc && enc->details.sdl_type &&
+                              enc->details.sdl_type->kind != XSD_TYPEKIND_COMPLEX &&
                               enc->details.sdl_type->kind != XSD_TYPEKIND_SIMPLE &&
                               enc->details.sdl_type->kind != XSD_TYPEKIND_LIST &&
                               enc->details.sdl_type->kind != XSD_TYPEKIND_UNION) {
@@ -1545,11 +1550,8 @@ static xmlNodePtr to_xml_object(encodeTypePtr type, zval *data, int style, xmlNo
                                zval *tmp = get_zval_property(data, "_" TSRMLS_CC);
                                if (tmp) {
                                        xmlParam = master_to_xml(enc, tmp, style, parent);
-                               } else if (prop == NULL) {
-                                       xmlParam = master_to_xml(enc, data, style, parent);
                                } else {
-                                       xmlParam = xmlNewNode(NULL,"BOGUS");
-                                       xmlAddChild(parent, xmlParam);
+                                       xmlParam = master_to_xml(enc, data, style, parent);
                                }
                        } else {
                                xmlParam = xmlNewNode(NULL,"BOGUS");
@@ -1558,6 +1560,7 @@ static xmlNodePtr to_xml_object(encodeTypePtr type, zval *data, int style, xmlNo
                } else if (sdlType->kind == XSD_TYPEKIND_EXTENSION &&
                           sdlType->encode && type != &sdlType->encode->details) {
                        if (sdlType->encode->details.sdl_type &&
+                           sdlType->encode->details.sdl_type->kind != XSD_TYPEKIND_COMPLEX &&
                            sdlType->encode->details.sdl_type->kind != XSD_TYPEKIND_SIMPLE &&
                            sdlType->encode->details.sdl_type->kind != XSD_TYPEKIND_LIST &&
                            sdlType->encode->details.sdl_type->kind != XSD_TYPEKIND_UNION) {
@@ -1567,12 +1570,9 @@ static xmlNodePtr to_xml_object(encodeTypePtr type, zval *data, int style, xmlNo
 
                                if (tmp) {
                                        xmlParam = master_to_xml(sdlType->encode, tmp, style, parent);
-                               } else if (prop == NULL) {
-                                       xmlParam = master_to_xml(sdlType->encode, data, style, parent);
                                } else {
-                                       xmlParam = xmlNewNode(NULL,"BOGUS");
-                                       xmlAddChild(parent, xmlParam);
-                               }
+                                       xmlParam = master_to_xml(sdlType->encode, data, style, parent);
+                               } 
                        }
                } else {
                        xmlParam = xmlNewNode(NULL,"BOGUS");