Annotation of embedaddon/php/ext/simplexml/simplexml.c, revision 1.1.1.1
1.1 misho 1: /*
2: +----------------------------------------------------------------------+
3: | PHP Version 5 |
4: +----------------------------------------------------------------------+
5: | Copyright (c) 1997-2012 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: | Authors: Sterling Hughes <sterling@php.net> |
16: | Marcus Boerger <helly@php.net> |
17: | Rob Richards <rrichards@php.net> |
18: +----------------------------------------------------------------------+
19: */
20:
21: /* $Id: simplexml.c 321634 2012-01-01 13:15:04Z felipe $ */
22:
23: #ifdef HAVE_CONFIG_H
24: #include "config.h"
25: #endif
26:
27: #include "php.h"
28: #if HAVE_LIBXML && HAVE_SIMPLEXML
29:
30: #include "php_ini.h"
31: #include "ext/standard/info.h"
32: #include "ext/standard/php_string.h"
33: #include "php_simplexml.h"
34: #include "php_simplexml_exports.h"
35: #include "zend_exceptions.h"
36: #include "zend_interfaces.h"
37: #include "sxe.h"
38:
39: #define SXE_ELEMENT_BY_NAME 0
40:
41: zend_class_entry *sxe_class_entry = NULL;
42:
43: PHP_SXE_API zend_class_entry *sxe_get_element_class_entry() /* {{{ */
44: {
45: return sxe_class_entry;
46: }
47: /* }}} */
48:
49: #define SXE_ME(func, arg_info, flags) PHP_ME(simplexml_element, func, arg_info, flags)
50: #define SXE_MALIAS(func, alias, arg_info, flags) PHP_MALIAS(simplexml_element, func, alias, arg_info, flags)
51:
52: #define SXE_METHOD(func) PHP_METHOD(simplexml_element, func)
53:
54: static php_sxe_object* php_sxe_object_new(zend_class_entry *ce TSRMLS_DC);
55: static zend_object_value php_sxe_register_object(php_sxe_object * TSRMLS_DC);
56: static xmlNodePtr php_sxe_reset_iterator(php_sxe_object *sxe, int use_data TSRMLS_DC);
57: static xmlNodePtr php_sxe_iterator_fetch(php_sxe_object *sxe, xmlNodePtr node, int use_data TSRMLS_DC);
58: static zval *sxe_get_value(zval *z TSRMLS_DC);
59: static void php_sxe_iterator_dtor(zend_object_iterator *iter TSRMLS_DC);
60: static int php_sxe_iterator_valid(zend_object_iterator *iter TSRMLS_DC);
61: static void php_sxe_iterator_current_data(zend_object_iterator *iter, zval ***data TSRMLS_DC);
62: static int php_sxe_iterator_current_key(zend_object_iterator *iter, char **str_key, uint *str_key_len, ulong *int_key TSRMLS_DC);
63: static void php_sxe_iterator_move_forward(zend_object_iterator *iter TSRMLS_DC);
64: static void php_sxe_iterator_rewind(zend_object_iterator *iter TSRMLS_DC);
65:
66: /* {{{ _node_as_zval()
67: */
68: static void _node_as_zval(php_sxe_object *sxe, xmlNodePtr node, zval *value, SXE_ITER itertype, char *name, const xmlChar *nsprefix, int isprefix TSRMLS_DC)
69: {
70: php_sxe_object *subnode;
71:
72: subnode = php_sxe_object_new(sxe->zo.ce TSRMLS_CC);
73: subnode->document = sxe->document;
74: subnode->document->refcount++;
75: subnode->iter.type = itertype;
76: if (name) {
77: subnode->iter.name = xmlStrdup((xmlChar *)name);
78: }
79: if (nsprefix && *nsprefix) {
80: subnode->iter.nsprefix = xmlStrdup(nsprefix);
81: subnode->iter.isprefix = isprefix;
82: }
83:
84: php_libxml_increment_node_ptr((php_libxml_node_object *)subnode, node, NULL TSRMLS_CC);
85:
86: value->type = IS_OBJECT;
87: value->value.obj = php_sxe_register_object(subnode TSRMLS_CC);
88: }
89: /* }}} */
90:
91: #define APPEND_PREV_ELEMENT(__c, __v) \
92: if ((__c) == 1) { \
93: array_init(return_value); \
94: add_next_index_zval(return_value, __v); \
95: }
96:
97: #define APPEND_CUR_ELEMENT(__c, __v) \
98: if (++(__c) > 1) { \
99: add_next_index_zval(return_value, __v); \
100: }
101:
102: #define GET_NODE(__s, __n) { \
103: if ((__s)->node && (__s)->node->node) { \
104: __n = (__s)->node->node; \
105: } else { \
106: __n = NULL; \
107: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Node no longer exists"); \
108: } \
109: }
110:
111: static xmlNodePtr php_sxe_get_first_node(php_sxe_object *sxe, xmlNodePtr node TSRMLS_DC) /* {{{ */
112: {
113: php_sxe_object *intern;
114: xmlNodePtr retnode = NULL;
115:
116: if (sxe && sxe->iter.type != SXE_ITER_NONE) {
117: php_sxe_reset_iterator(sxe, 1 TSRMLS_CC);
118: if (sxe->iter.data) {
119: intern = (php_sxe_object *)zend_object_store_get_object(sxe->iter.data TSRMLS_CC);
120: GET_NODE(intern, retnode)
121: }
122: return retnode;
123: } else {
124: return node;
125: }
126: }
127: /* }}} */
128:
129: static inline int match_ns(php_sxe_object *sxe, xmlNodePtr node, xmlChar *name, int prefix) /* {{{ */
130: {
131: if (name == NULL && (node->ns == NULL || node->ns->prefix == NULL)) {
132: return 1;
133: }
134:
135: if (node->ns && !xmlStrcmp(prefix ? node->ns->prefix : node->ns->href, name)) {
136: return 1;
137: }
138:
139: return 0;
140: }
141: /* }}} */
142:
143: static xmlNodePtr sxe_get_element_by_offset(php_sxe_object *sxe, long offset, xmlNodePtr node, long *cnt) /* {{{ */
144: {
145: long nodendx = 0;
146:
147: if (sxe->iter.type == SXE_ITER_NONE) {
148: if (offset == 0) {
149: if (cnt) {
150: *cnt = 0;
151: }
152: return node;
153: } else {
154: return NULL;
155: }
156: }
157: while (node && nodendx <= offset) {
158: SKIP_TEXT(node)
159: if (node->type == XML_ELEMENT_NODE && match_ns(sxe, node, sxe->iter.nsprefix, sxe->iter.isprefix)) {
160: if (sxe->iter.type == SXE_ITER_CHILD || (
161: sxe->iter.type == SXE_ITER_ELEMENT && !xmlStrcmp(node->name, sxe->iter.name))) {
162: if (nodendx == offset) {
163: break;
164: }
165: nodendx++;
166: }
167: }
168: next_iter:
169: node = node->next;
170: }
171:
172: if (cnt) {
173: *cnt = nodendx;
174: }
175:
176: return node;
177: }
178: /* }}} */
179:
180: static xmlNodePtr sxe_find_element_by_name(php_sxe_object *sxe, xmlNodePtr node, xmlChar *name TSRMLS_DC) /* {{{ */
181: {
182: while (node) {
183: SKIP_TEXT(node)
184: if (node->type == XML_ELEMENT_NODE && match_ns(sxe, node, sxe->iter.nsprefix, sxe->iter.isprefix)) {
185: if (!xmlStrcmp(node->name, name)) {
186: return node;
187: }
188: }
189: next_iter:
190: node = node->next;
191: }
192: return NULL;
193: } /* }}} */
194:
195: static xmlNodePtr sxe_get_element_by_name(php_sxe_object *sxe, xmlNodePtr node, char **name, SXE_ITER *type TSRMLS_DC) /* {{{ */
196: {
197: int orgtype;
198: xmlNodePtr orgnode = node;
199: xmlNodePtr retnode = NULL;
200:
201: if (sxe->iter.type != SXE_ITER_ATTRLIST)
202: {
203: orgtype = sxe->iter.type;
204: if (sxe->iter.type == SXE_ITER_NONE) {
205: sxe->iter.type = SXE_ITER_CHILD;
206: }
207: node = php_sxe_get_first_node(sxe, node TSRMLS_CC);
208: sxe->iter.type = orgtype;
209: }
210:
211: if (sxe->iter.type == SXE_ITER_ELEMENT) {
212: orgnode = sxe_find_element_by_name(sxe, node, sxe->iter.name TSRMLS_CC);
213: if (!orgnode) {
214: return NULL;
215: }
216: node = orgnode->children;
217: }
218:
219: while (node) {
220: SKIP_TEXT(node)
221: if (node->type == XML_ELEMENT_NODE && match_ns(sxe, node, sxe->iter.nsprefix, sxe->iter.isprefix)) {
222: if (!xmlStrcmp(node->name, (xmlChar *)*name)) {
223: if (1||retnode)
224: {
225: *type = SXE_ITER_ELEMENT;
226: return orgnode;
227: }
228: retnode = node;
229: }
230: }
231: next_iter:
232: node = node->next;
233: }
234:
235: if (retnode)
236: {
237: *type = SXE_ITER_NONE;
238: *name = NULL;
239: return retnode;
240: }
241:
242: return NULL;
243: }
244: /* }}} */
245:
246: /* {{{ sxe_prop_dim_read()
247: */
248: static zval * sxe_prop_dim_read(zval *object, zval *member, zend_bool elements, zend_bool attribs, int type TSRMLS_DC)
249: {
250: zval *return_value;
251: php_sxe_object *sxe;
252: char *name;
253: xmlNodePtr node;
254: xmlAttrPtr attr = NULL;
255: zval tmp_zv;
256: int nodendx = 0;
257: int test = 0;
258:
259: sxe = php_sxe_fetch_object(object TSRMLS_CC);
260:
261: if (!member || Z_TYPE_P(member) == IS_LONG) {
262: if (sxe->iter.type != SXE_ITER_ATTRLIST) {
263: attribs = 0;
264: elements = 1;
265: } else if (!member) {
266: /* This happens when the user did: $sxe[]->foo = $value */
267: php_error_docref(NULL TSRMLS_CC, E_ERROR, "Cannot create unnamed attribute");
268: return NULL;
269: }
270: name = NULL;
271: } else {
272: if (Z_TYPE_P(member) != IS_STRING) {
273: tmp_zv = *member;
274: zval_copy_ctor(&tmp_zv);
275: member = &tmp_zv;
276: convert_to_string(member);
277: }
278: name = Z_STRVAL_P(member);
279: }
280:
281: GET_NODE(sxe, node);
282:
283: if (sxe->iter.type == SXE_ITER_ATTRLIST) {
284: attribs = 1;
285: elements = 0;
286: node = php_sxe_get_first_node(sxe, node TSRMLS_CC);
287: attr = (xmlAttrPtr)node;
288: test = sxe->iter.name != NULL;
289: } else if (sxe->iter.type != SXE_ITER_CHILD) {
290: node = php_sxe_get_first_node(sxe, node TSRMLS_CC);
291: attr = node ? node->properties : NULL;
292: test = 0;
293: if (!member && node && node->parent &&
294: node->parent->type == XML_DOCUMENT_NODE) {
295: /* This happens when the user did: $sxe[]->foo = $value */
296: php_error_docref(NULL TSRMLS_CC, E_ERROR, "Cannot create unnamed attribute");
297: return NULL;
298: }
299: }
300:
301: MAKE_STD_ZVAL(return_value);
302: ZVAL_NULL(return_value);
303:
304: if (node) {
305: if (attribs) {
306: if (Z_TYPE_P(member) != IS_LONG || sxe->iter.type == SXE_ITER_ATTRLIST) {
307: if (Z_TYPE_P(member) == IS_LONG) {
308: while (attr && nodendx <= Z_LVAL_P(member)) {
309: if ((!test || !xmlStrcmp(attr->name, sxe->iter.name)) && match_ns(sxe, (xmlNodePtr) attr, sxe->iter.nsprefix, sxe->iter.isprefix)) {
310: if (nodendx == Z_LVAL_P(member)) {
311: _node_as_zval(sxe, (xmlNodePtr) attr, return_value, SXE_ITER_NONE, NULL, sxe->iter.nsprefix, sxe->iter.isprefix TSRMLS_CC);
312: break;
313: }
314: nodendx++;
315: }
316: attr = attr->next;
317: }
318: } else {
319: while (attr) {
320: if ((!test || !xmlStrcmp(attr->name, sxe->iter.name)) && !xmlStrcmp(attr->name, (xmlChar *)name) && match_ns(sxe, (xmlNodePtr) attr, sxe->iter.nsprefix, sxe->iter.isprefix)) {
321: _node_as_zval(sxe, (xmlNodePtr) attr, return_value, SXE_ITER_NONE, NULL, sxe->iter.nsprefix, sxe->iter.isprefix TSRMLS_CC);
322: break;
323: }
324: attr = attr->next;
325: }
326: }
327: }
328: }
329:
330: if (elements) {
331: if (!sxe->node) {
332: php_libxml_increment_node_ptr((php_libxml_node_object *)sxe, node, NULL TSRMLS_CC);
333: }
334: if (!member || Z_TYPE_P(member) == IS_LONG) {
335: long cnt = 0;
336: xmlNodePtr mynode = node;
337:
338: if (sxe->iter.type == SXE_ITER_CHILD) {
339: node = php_sxe_get_first_node(sxe, node TSRMLS_CC);
340: }
341: if (sxe->iter.type == SXE_ITER_NONE) {
342: if (member && Z_LVAL_P(member) > 0) {
343: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Cannot add element %s number %ld when only 0 such elements exist", mynode->name, Z_LVAL_P(member));
344: }
345: } else if (member) {
346: node = sxe_get_element_by_offset(sxe, Z_LVAL_P(member), node, &cnt);
347: } else {
348: node = NULL;
349: }
350: if (node) {
351: _node_as_zval(sxe, node, return_value, SXE_ITER_NONE, NULL, sxe->iter.nsprefix, sxe->iter.isprefix TSRMLS_CC);
352: } else if (type == BP_VAR_W || type == BP_VAR_RW) {
353: if (member && cnt < Z_LVAL_P(member)) {
354: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Cannot add element %s number %ld when only %ld such elements exist", mynode->name, Z_LVAL_P(member), cnt);
355: }
356: node = xmlNewTextChild(mynode->parent, mynode->ns, mynode->name, NULL);
357: _node_as_zval(sxe, node, return_value, SXE_ITER_NONE, NULL, sxe->iter.nsprefix, sxe->iter.isprefix TSRMLS_CC);
358: }
359: } else {
360: #if SXE_ELEMENT_BY_NAME
361: int newtype;
362:
363: GET_NODE(sxe, node);
364: node = sxe_get_element_by_name(sxe, node, &name, &newtype TSRMLS_CC);
365: if (node) {
366: _node_as_zval(sxe, node, return_value, newtype, name, sxe->iter.nsprefix, sxe->iter.isprefix TSRMLS_CC);
367: }
368: #else
369: _node_as_zval(sxe, node, return_value, SXE_ITER_ELEMENT, name, sxe->iter.nsprefix, sxe->iter.isprefix TSRMLS_CC);
370: #endif
371: }
372: }
373: }
374:
375: Z_SET_REFCOUNT_P(return_value, 0);
376: Z_UNSET_ISREF_P(return_value);
377:
378: if (member == &tmp_zv) {
379: zval_dtor(&tmp_zv);
380: }
381: if (Z_TYPE_P(return_value) == IS_NULL) {
382: FREE_ZVAL(return_value);
383: return_value = &EG(uninitialized_zval);
384: }
385:
386: return return_value;
387: }
388: /* }}} */
389:
390: /* {{{ sxe_property_read()
391: */
392: static zval * sxe_property_read(zval *object, zval *member, int type TSRMLS_DC)
393: {
394: return sxe_prop_dim_read(object, member, 1, 0, type TSRMLS_CC);
395: }
396: /* }}} */
397:
398: /* {{{ sxe_dimension_read()
399: */
400: static zval * sxe_dimension_read(zval *object, zval *offset, int type TSRMLS_DC)
401: {
402: return sxe_prop_dim_read(object, offset, 0, 1, type TSRMLS_CC);
403: }
404: /* }}} */
405:
406: /* {{{ change_node_zval()
407: */
408: static void change_node_zval(xmlNodePtr node, zval *value TSRMLS_DC)
409: {
410: zval value_copy;
411: xmlChar *buffer;
412: int buffer_len;
413:
414: if (!value)
415: {
416: xmlNodeSetContentLen(node, (xmlChar *)"", 0);
417: return;
418: }
419: switch (Z_TYPE_P(value)) {
420: case IS_LONG:
421: case IS_BOOL:
422: case IS_DOUBLE:
423: case IS_NULL:
424: if (Z_REFCOUNT_P(value) > 1) {
425: value_copy = *value;
426: zval_copy_ctor(&value_copy);
427: value = &value_copy;
428: }
429: convert_to_string(value);
430: /* break missing intentionally */
431: case IS_STRING:
432: buffer = xmlEncodeEntitiesReentrant(node->doc, (xmlChar *)Z_STRVAL_P(value));
433: buffer_len = xmlStrlen(buffer);
434: /* check for NULL buffer in case of memory error in xmlEncodeEntitiesReentrant */
435: if (buffer) {
436: xmlNodeSetContentLen(node, buffer, buffer_len);
437: xmlFree(buffer);
438: }
439: if (value == &value_copy) {
440: zval_dtor(value);
441: }
442: break;
443: default:
444: php_error_docref(NULL TSRMLS_CC, E_WARNING, "It is not possible to assign complex types to nodes");
445: break;
446: }
447: }
448: /* }}} */
449:
450: /* {{{ sxe_property_write()
451: */
452: static int sxe_prop_dim_write(zval *object, zval *member, zval *value, zend_bool elements, zend_bool attribs, xmlNodePtr *pnewnode TSRMLS_DC)
453: {
454: php_sxe_object *sxe;
455: xmlNodePtr node;
456: xmlNodePtr newnode = NULL;
457: xmlNodePtr mynode;
458: xmlNodePtr tempnode;
459: xmlAttrPtr attr = NULL;
460: int counter = 0;
461: int is_attr = 0;
462: int nodendx = 0;
463: int test = 0;
464: int new_value = 0;
465: long cnt = 0;
466: int retval = SUCCESS;
467: zval tmp_zv, trim_zv, value_copy;
468:
469: sxe = php_sxe_fetch_object(object TSRMLS_CC);
470:
471: if (!member || Z_TYPE_P(member) == IS_LONG) {
472: if (sxe->iter.type != SXE_ITER_ATTRLIST) {
473: attribs = 0;
474: elements = 1;
475: } else if (!member) {
476: /* This happens when the user did: $sxe[] = $value
477: * and could also be E_PARSE, but we use this only during parsing
478: * and this is during runtime.
479: */
480: php_error_docref(NULL TSRMLS_CC, E_ERROR, "Cannot create unnamed attribute");
481: return FAILURE;
482: }
483: } else {
484: if (Z_TYPE_P(member) != IS_STRING) {
485: trim_zv = *member;
486: zval_copy_ctor(&trim_zv);
487: convert_to_string(&trim_zv);
488: php_trim(Z_STRVAL(trim_zv), Z_STRLEN(trim_zv), NULL, 0, &tmp_zv, 3 TSRMLS_CC);
489: zval_dtor(&trim_zv);
490: member = &tmp_zv;
491: }
492:
493: if (!Z_STRLEN_P(member)) {
494: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Cannot write or create unnamed %s", attribs ? "attribute" : "element");
495: if (member == &tmp_zv) {
496: zval_dtor(&tmp_zv);
497: }
498: return FAILURE;
499: }
500: }
501:
502: GET_NODE(sxe, node);
503:
504: if (sxe->iter.type == SXE_ITER_ATTRLIST) {
505: attribs = 1;
506: elements = 0;
507: node = php_sxe_get_first_node(sxe, node TSRMLS_CC);
508: attr = (xmlAttrPtr)node;
509: test = sxe->iter.name != NULL;
510: } else if (sxe->iter.type != SXE_ITER_CHILD) {
511: mynode = node;
512: node = php_sxe_get_first_node(sxe, node TSRMLS_CC);
513: attr = node ? node->properties : NULL;
514: test = 0;
515: if (!member && node && node->parent &&
516: node->parent->type == XML_DOCUMENT_NODE) {
517: /* This happens when the user did: $sxe[] = $value
518: * and could also be E_PARSE, but we use this only during parsing
519: * and this is during runtime.
520: */
521: php_error_docref(NULL TSRMLS_CC, E_ERROR, "Cannot create unnamed attribute");
522: return FAILURE;
523: }
524: if (attribs && !node && sxe->iter.type == SXE_ITER_ELEMENT) {
525: node = xmlNewChild(mynode, mynode->ns, sxe->iter.name, NULL);
526: attr = node->properties;
527: }
528: }
529:
530: mynode = node;
531:
532: if (value) {
533: switch (Z_TYPE_P(value)) {
534: case IS_LONG:
535: case IS_BOOL:
536: case IS_DOUBLE:
537: case IS_NULL:
538: if (Z_REFCOUNT_P(value) > 1) {
539: value_copy = *value;
540: zval_copy_ctor(&value_copy);
541: value = &value_copy;
542: }
543: convert_to_string(value);
544: break;
545: case IS_STRING:
546: break;
547: case IS_OBJECT:
548: if (Z_OBJCE_P(value) == sxe_class_entry) {
549: value = sxe_get_value(value TSRMLS_CC);
550: INIT_PZVAL(value);
551: new_value = 1;
552: break;
553: }
554: /* break is missing intentionally */
555: default:
556: if (member == &tmp_zv) {
557: zval_dtor(&tmp_zv);
558: }
559: zend_error(E_WARNING, "It is not yet possible to assign complex types to %s", attribs ? "attributes" : "properties");
560: return FAILURE;
561: }
562: }
563:
564: if (node) {
565: if (attribs) {
566: if (Z_TYPE_P(member) == IS_LONG) {
567: while (attr && nodendx <= Z_LVAL_P(member)) {
568: if ((!test || !xmlStrcmp(attr->name, sxe->iter.name)) && match_ns(sxe, (xmlNodePtr) attr, sxe->iter.nsprefix, sxe->iter.isprefix)) {
569: if (nodendx == Z_LVAL_P(member)) {
570: is_attr = 1;
571: ++counter;
572: break;
573: }
574: nodendx++;
575: }
576: attr = attr->next;
577: }
578: } else {
579: while (attr) {
580: if ((!test || !xmlStrcmp(attr->name, sxe->iter.name)) && !xmlStrcmp(attr->name, (xmlChar *)Z_STRVAL_P(member)) && match_ns(sxe, (xmlNodePtr) attr, sxe->iter.nsprefix, sxe->iter.isprefix)) {
581: is_attr = 1;
582: ++counter;
583: break;
584: }
585: attr = attr->next;
586: }
587: }
588:
589: }
590:
591: if (elements) {
592: if (!member || Z_TYPE_P(member) == IS_LONG) {
593: if (node->type == XML_ATTRIBUTE_NODE) {
594: php_error_docref(NULL TSRMLS_CC, E_ERROR, "Cannot create duplicate attribute");
595: return FAILURE;
596: }
597:
598: if (sxe->iter.type == SXE_ITER_NONE) {
599: newnode = node;
600: ++counter;
601: if (member && Z_LVAL_P(member) > 0) {
602: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Cannot add element %s number %ld when only 0 such elements exist", mynode->name, Z_LVAL_P(member));
603: retval = FAILURE;
604: }
605: } else if (member) {
606: newnode = sxe_get_element_by_offset(sxe, Z_LVAL_P(member), node, &cnt);
607: if (newnode) {
608: ++counter;
609: }
610: }
611: } else {
612: node = node->children;
613: while (node) {
614: SKIP_TEXT(node);
615:
616: if (!xmlStrcmp(node->name, (xmlChar *)Z_STRVAL_P(member))) {
617: newnode = node;
618: ++counter;
619: }
620:
621: next_iter:
622: node = node->next;
623: }
624: }
625: }
626:
627: if (counter == 1) {
628: if (is_attr) {
629: newnode = (xmlNodePtr) attr;
630: }
631: if (value) {
632: while ((tempnode = (xmlNodePtr) newnode->children)) {
633: xmlUnlinkNode(tempnode);
634: php_libxml_node_free_resource((xmlNodePtr) tempnode TSRMLS_CC);
635: }
636: change_node_zval(newnode, value TSRMLS_CC);
637: }
638: } else if (counter > 1) {
639: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Cannot assign to an array of nodes (duplicate subnodes or attr detected)");
640: retval = FAILURE;
641: } else if (elements) {
642: if (!node) {
643: if (!member || Z_TYPE_P(member) == IS_LONG) {
644: newnode = xmlNewTextChild(mynode->parent, mynode->ns, mynode->name, value ? (xmlChar *)Z_STRVAL_P(value) : NULL);
645: } else {
646: newnode = xmlNewTextChild(mynode, mynode->ns, (xmlChar *)Z_STRVAL_P(member), value ? (xmlChar *)Z_STRVAL_P(value) : NULL);
647: }
648: } else if (!member || Z_TYPE_P(member) == IS_LONG) {
649: if (member && cnt < Z_LVAL_P(member)) {
650: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Cannot add element %s number %ld when only %ld such elements exist", mynode->name, Z_LVAL_P(member), cnt);
651: retval = FAILURE;
652: }
653: newnode = xmlNewTextChild(mynode->parent, mynode->ns, mynode->name, value ? (xmlChar *)Z_STRVAL_P(value) : NULL);
654: }
655: } else if (attribs) {
656: if (Z_TYPE_P(member) == IS_LONG) {
657: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Cannot change attribute number %ld when only %d attributes exist", Z_LVAL_P(member), nodendx);
658: retval = FAILURE;
659: } else {
660: newnode = (xmlNodePtr)xmlNewProp(node, (xmlChar *)Z_STRVAL_P(member), value ? (xmlChar *)Z_STRVAL_P(value) : NULL);
661: }
662: }
663: }
664:
665: if (member == &tmp_zv) {
666: zval_dtor(&tmp_zv);
667: }
668: if (pnewnode) {
669: *pnewnode = newnode;
670: }
671: if (value && value == &value_copy) {
672: zval_dtor(value);
673: }
674: if (new_value) {
675: zval_ptr_dtor(&value);
676: }
677: return retval;
678: }
679: /* }}} */
680:
681: /* {{{ sxe_property_write()
682: */
683: static void sxe_property_write(zval *object, zval *member, zval *value TSRMLS_DC)
684: {
685: sxe_prop_dim_write(object, member, value, 1, 0, NULL TSRMLS_CC);
686: }
687: /* }}} */
688:
689: /* {{{ sxe_dimension_write()
690: */
691: static void sxe_dimension_write(zval *object, zval *offset, zval *value TSRMLS_DC)
692: {
693: sxe_prop_dim_write(object, offset, value, 0, 1, NULL TSRMLS_CC);
694: }
695: /* }}} */
696:
697: static zval** sxe_property_get_adr(zval *object, zval *member TSRMLS_DC) /* {{{ */
698: {
699: php_sxe_object *sxe;
700: xmlNodePtr node;
701: zval *return_value;
702: char *name;
703: SXE_ITER type;
704:
705: sxe = php_sxe_fetch_object(object TSRMLS_CC);
706:
707: GET_NODE(sxe, node);
708: convert_to_string(member);
709: name = Z_STRVAL_P(member);
710: node = sxe_get_element_by_name(sxe, node, &name, &type TSRMLS_CC);
711: if (node) {
712: return NULL;
713: }
714: if (sxe_prop_dim_write(object, member, NULL, 1, 0, &node TSRMLS_CC) != SUCCESS) {
715: return NULL;
716: }
717: type = SXE_ITER_NONE;
718: name = NULL;
719:
720: MAKE_STD_ZVAL(return_value);
721: _node_as_zval(sxe, node, return_value, type, name, sxe->iter.nsprefix, sxe->iter.isprefix TSRMLS_CC);
722:
723: sxe = php_sxe_fetch_object(return_value TSRMLS_CC);
724: if (sxe->tmp) {
725: zval_ptr_dtor(&sxe->tmp);
726: }
727: sxe->tmp = return_value;
728: Z_SET_ISREF_P(return_value);
729:
730: return &sxe->tmp;
731: }
732: /* }}} */
733:
734: /* {{{ sxe_prop_dim_exists()
735: */
736: static int sxe_prop_dim_exists(zval *object, zval *member, int check_empty, zend_bool elements, zend_bool attribs TSRMLS_DC)
737: {
738: php_sxe_object *sxe;
739: xmlNodePtr node;
740: xmlAttrPtr attr = NULL;
741: int exists = 0;
742: int test = 0;
743: zval tmp_zv;
744:
745: if (Z_TYPE_P(member) != IS_STRING && Z_TYPE_P(member) != IS_LONG) {
746: tmp_zv = *member;
747: zval_copy_ctor(&tmp_zv);
748: member = &tmp_zv;
749: convert_to_string(member);
750: }
751:
752: sxe = php_sxe_fetch_object(object TSRMLS_CC);
753:
754: GET_NODE(sxe, node);
755:
756: if (Z_TYPE_P(member) == IS_LONG) {
757: if (sxe->iter.type != SXE_ITER_ATTRLIST) {
758: attribs = 0;
759: elements = 1;
760: if (sxe->iter.type == SXE_ITER_CHILD) {
761: node = php_sxe_get_first_node(sxe, node TSRMLS_CC);
762: }
763: }
764: }
765:
766: if (sxe->iter.type == SXE_ITER_ATTRLIST) {
767: attribs = 1;
768: elements = 0;
769: node = php_sxe_get_first_node(sxe, node TSRMLS_CC);
770: attr = (xmlAttrPtr)node;
771: test = sxe->iter.name != NULL;
772: } else if (sxe->iter.type != SXE_ITER_CHILD) {
773: node = php_sxe_get_first_node(sxe, node TSRMLS_CC);
774: attr = node ? node->properties : NULL;
775: test = 0;
776: }
777:
778: if (node) {
779: if (attribs) {
780: if (Z_TYPE_P(member) == IS_LONG) {
781: int nodendx = 0;
782:
783: while (attr && nodendx <= Z_LVAL_P(member)) {
784: if ((!test || !xmlStrcmp(attr->name, sxe->iter.name)) && match_ns(sxe, (xmlNodePtr) attr, sxe->iter.nsprefix, sxe->iter.isprefix)) {
785: if (nodendx == Z_LVAL_P(member)) {
786: exists = 1;
787: break;
788: }
789: nodendx++;
790: }
791: attr = attr->next;
792: }
793: } else {
794: while (attr) {
795: if ((!test || !xmlStrcmp(attr->name, sxe->iter.name)) && !xmlStrcmp(attr->name, (xmlChar *)Z_STRVAL_P(member)) && match_ns(sxe, (xmlNodePtr) attr, sxe->iter.nsprefix, sxe->iter.isprefix)) {
796: exists = 1;
797: break;
798: }
799:
800: attr = attr->next;
801: }
802: }
803: if (exists && check_empty == 1 &&
804: (!attr->children || !attr->children->content || !attr->children->content[0] || !xmlStrcmp(attr->children->content, "0")) ) {
805: /* Attribute with no content in it's text node */
806: exists = 0;
807: }
808: }
809:
810: if (elements) {
811: if (Z_TYPE_P(member) == IS_LONG) {
812: if (sxe->iter.type == SXE_ITER_CHILD) {
813: node = php_sxe_get_first_node(sxe, node TSRMLS_CC);
814: }
815: node = sxe_get_element_by_offset(sxe, Z_LVAL_P(member), node, NULL);
816: }
817: else {
818: node = node->children;
819: while (node) {
820: xmlNodePtr nnext;
821: nnext = node->next;
822: if ((node->type == XML_ELEMENT_NODE) && !xmlStrcmp(node->name, (xmlChar *)Z_STRVAL_P(member))) {
823: break;
824: }
825: node = nnext;
826: }
827: }
828: if (node) {
829: exists = 1;
830: if (check_empty == 1 &&
831: (!node->children || (node->children->type == XML_TEXT_NODE && !node->children->next &&
832: (!node->children->content || !node->children->content[0] || !xmlStrcmp(node->children->content, "0")))) ) {
833: exists = 0;
834: }
835: }
836: }
837: }
838:
839: if (member == &tmp_zv) {
840: zval_dtor(&tmp_zv);
841: }
842:
843: return exists;
844: }
845: /* }}} */
846:
847: /* {{{ sxe_property_exists()
848: */
849: static int sxe_property_exists(zval *object, zval *member, int check_empty TSRMLS_DC)
850: {
851: return sxe_prop_dim_exists(object, member, check_empty, 1, 0 TSRMLS_CC);
852: }
853: /* }}} */
854:
855: /* {{{ sxe_property_exists()
856: */
857: static int sxe_dimension_exists(zval *object, zval *member, int check_empty TSRMLS_DC)
858: {
859: return sxe_prop_dim_exists(object, member, check_empty, 0, 1 TSRMLS_CC);
860: }
861: /* }}} */
862:
863: /* {{{ sxe_prop_dim_delete()
864: */
865: static void sxe_prop_dim_delete(zval *object, zval *member, zend_bool elements, zend_bool attribs TSRMLS_DC)
866: {
867: php_sxe_object *sxe;
868: xmlNodePtr node;
869: xmlNodePtr nnext;
870: xmlAttrPtr attr = NULL;
871: xmlAttrPtr anext;
872: zval tmp_zv;
873: int test = 0;
874:
875: if (Z_TYPE_P(member) != IS_STRING && Z_TYPE_P(member) != IS_LONG) {
876: tmp_zv = *member;
877: zval_copy_ctor(&tmp_zv);
878: member = &tmp_zv;
879: convert_to_string(member);
880: }
881:
882: sxe = php_sxe_fetch_object(object TSRMLS_CC);
883:
884: GET_NODE(sxe, node);
885:
886: if (Z_TYPE_P(member) == IS_LONG) {
887: if (sxe->iter.type != SXE_ITER_ATTRLIST) {
888: attribs = 0;
889: elements = 1;
890: if (sxe->iter.type == SXE_ITER_CHILD) {
891: node = php_sxe_get_first_node(sxe, node TSRMLS_CC);
892: }
893: }
894: }
895:
896: if (sxe->iter.type == SXE_ITER_ATTRLIST) {
897: attribs = 1;
898: elements = 0;
899: node = php_sxe_get_first_node(sxe, node TSRMLS_CC);
900: attr = (xmlAttrPtr)node;
901: test = sxe->iter.name != NULL;
902: } else if (sxe->iter.type != SXE_ITER_CHILD) {
903: node = php_sxe_get_first_node(sxe, node TSRMLS_CC);
904: attr = node ? node->properties : NULL;
905: test = 0;
906: }
907:
908: if (node) {
909: if (attribs) {
910: if (Z_TYPE_P(member) == IS_LONG) {
911: int nodendx = 0;
912:
913: while (attr && nodendx <= Z_LVAL_P(member)) {
914: if ((!test || !xmlStrcmp(attr->name, sxe->iter.name)) && match_ns(sxe, (xmlNodePtr) attr, sxe->iter.nsprefix, sxe->iter.isprefix)) {
915: if (nodendx == Z_LVAL_P(member)) {
916: xmlUnlinkNode((xmlNodePtr) attr);
917: php_libxml_node_free_resource((xmlNodePtr) attr TSRMLS_CC);
918: break;
919: }
920: nodendx++;
921: }
922: attr = attr->next;
923: }
924: } else {
925: while (attr) {
926: anext = attr->next;
927: if ((!test || !xmlStrcmp(attr->name, sxe->iter.name)) && !xmlStrcmp(attr->name, (xmlChar *)Z_STRVAL_P(member)) && match_ns(sxe, (xmlNodePtr) attr, sxe->iter.nsprefix, sxe->iter.isprefix)) {
928: xmlUnlinkNode((xmlNodePtr) attr);
929: php_libxml_node_free_resource((xmlNodePtr) attr TSRMLS_CC);
930: break;
931: }
932: attr = anext;
933: }
934: }
935: }
936:
937: if (elements) {
938: if (Z_TYPE_P(member) == IS_LONG) {
939: if (sxe->iter.type == SXE_ITER_CHILD) {
940: node = php_sxe_get_first_node(sxe, node TSRMLS_CC);
941: }
942: node = sxe_get_element_by_offset(sxe, Z_LVAL_P(member), node, NULL);
943: if (node) {
944: xmlUnlinkNode(node);
945: php_libxml_node_free_resource(node TSRMLS_CC);
946: }
947: } else {
948: node = node->children;
949: while (node) {
950: nnext = node->next;
951:
952: SKIP_TEXT(node);
953:
954: if (!xmlStrcmp(node->name, (xmlChar *)Z_STRVAL_P(member))) {
955: xmlUnlinkNode(node);
956: php_libxml_node_free_resource(node TSRMLS_CC);
957: }
958:
959: next_iter:
960: node = nnext;
961: }
962: }
963: }
964: }
965:
966: if (member == &tmp_zv) {
967: zval_dtor(&tmp_zv);
968: }
969: }
970: /* }}} */
971:
972: /* {{{ sxe_property_delete()
973: */
974: static void sxe_property_delete(zval *object, zval *member TSRMLS_DC)
975: {
976: sxe_prop_dim_delete(object, member, 1, 0 TSRMLS_CC);
977: }
978: /* }}} */
979:
980: /* {{{ sxe_dimension_unset()
981: */
982: static void sxe_dimension_delete(zval *object, zval *offset TSRMLS_DC)
983: {
984: sxe_prop_dim_delete(object, offset, 0, 1 TSRMLS_CC);
985: }
986: /* }}} */
987:
988: static inline char * sxe_xmlNodeListGetString(xmlDocPtr doc, xmlNodePtr list, int inLine) /* {{{ */
989: {
990: xmlChar *tmp = xmlNodeListGetString(doc, list, inLine);
991: char *res;
992:
993: if (tmp) {
994: res = estrdup((char*)tmp);
995: xmlFree(tmp);
996: } else {
997: res = STR_EMPTY_ALLOC();
998: }
999:
1000: return res;
1001: }
1002: /* }}} */
1003:
1004: /* {{{ _get_base_node_value()
1005: */
1006: static void _get_base_node_value(php_sxe_object *sxe_ref, xmlNodePtr node, zval **value, xmlChar *nsprefix, int isprefix TSRMLS_DC)
1007: {
1008: php_sxe_object *subnode;
1009: xmlChar *contents;
1010:
1011: MAKE_STD_ZVAL(*value);
1012:
1013: if (node->children && node->children->type == XML_TEXT_NODE && !xmlIsBlankNode(node->children)) {
1014: contents = xmlNodeListGetString(node->doc, node->children, 1);
1015: if (contents) {
1016: ZVAL_STRING(*value, (char *)contents, 1);
1017: xmlFree(contents);
1018: }
1019: } else {
1020: subnode = php_sxe_object_new(sxe_ref->zo.ce TSRMLS_CC);
1021: subnode->document = sxe_ref->document;
1022: subnode->document->refcount++;
1023: if (nsprefix && *nsprefix) {
1024: subnode->iter.nsprefix = xmlStrdup((xmlChar *)nsprefix);
1025: subnode->iter.isprefix = isprefix;
1026: }
1027: php_libxml_increment_node_ptr((php_libxml_node_object *)subnode, node, NULL TSRMLS_CC);
1028:
1029: (*value)->type = IS_OBJECT;
1030: (*value)->value.obj = php_sxe_register_object(subnode TSRMLS_CC);
1031: /*zval_add_ref(value);*/
1032: }
1033: }
1034: /* }}} */
1035:
1036: static void sxe_properties_add(HashTable *rv, char *name, int namelen, zval *value TSRMLS_DC) /* {{{ */
1037: {
1038: zval **data_ptr;
1039: zval *newptr;
1040: ulong h = zend_hash_func(name, namelen);
1041:
1042: if (zend_hash_quick_find(rv, name, namelen, h, (void **) &data_ptr) == SUCCESS) {
1043: if (Z_TYPE_PP(data_ptr) == IS_ARRAY) {
1044: zend_hash_next_index_insert(Z_ARRVAL_PP(data_ptr), &value, sizeof(zval *), NULL);
1045: } else {
1046: MAKE_STD_ZVAL(newptr);
1047: array_init(newptr);
1048:
1049: zval_add_ref(data_ptr);
1050: zend_hash_next_index_insert(Z_ARRVAL_P(newptr), data_ptr, sizeof(zval *), NULL);
1051: zend_hash_next_index_insert(Z_ARRVAL_P(newptr), &value, sizeof(zval *), NULL);
1052:
1053: zend_hash_quick_update(rv, name, namelen, h, &newptr, sizeof(zval *), NULL);
1054: }
1055: } else {
1056: zend_hash_quick_update(rv, name, namelen, h, &value, sizeof(zval *), NULL);
1057: }
1058: }
1059: /* }}} */
1060:
1061: static HashTable * sxe_get_prop_hash(zval *object, int is_debug TSRMLS_DC) /* {{{ */
1062: {
1063: zval *value;
1064: zval *zattr;
1065: HashTable *rv;
1066: php_sxe_object *sxe;
1067: char *name;
1068: xmlNodePtr node;
1069: xmlAttrPtr attr;
1070: int namelen;
1071: int test;
1072:
1073: sxe = php_sxe_fetch_object(object TSRMLS_CC);
1074:
1075: if (is_debug) {
1076: ALLOC_HASHTABLE(rv);
1077: zend_hash_init(rv, 0, NULL, ZVAL_PTR_DTOR, 0);
1078: }
1079: else if (sxe->properties) {
1080: if (GC_G(gc_active)) {
1081: return sxe->properties;
1082: }
1083: zend_hash_clean(sxe->properties);
1084: rv = sxe->properties;
1085: } else {
1086: if (GC_G(gc_active)) {
1087: return NULL;
1088: }
1089: ALLOC_HASHTABLE(rv);
1090: zend_hash_init(rv, 0, NULL, ZVAL_PTR_DTOR, 0);
1091: sxe->properties = rv;
1092: }
1093:
1094: GET_NODE(sxe, node);
1095: if (!node) {
1096: return rv;
1097: }
1098: if (is_debug || sxe->iter.type != SXE_ITER_CHILD) {
1099: if (sxe->iter.type == SXE_ITER_ELEMENT) {
1100: node = php_sxe_get_first_node(sxe, node TSRMLS_CC);
1101: }
1102: if (!node || node->type != XML_ENTITY_DECL) {
1103: attr = node ? (xmlAttrPtr)node->properties : NULL;
1104: zattr = NULL;
1105: test = sxe->iter.name && sxe->iter.type == SXE_ITER_ATTRLIST;
1106: while (attr) {
1107: if ((!test || !xmlStrcmp(attr->name, sxe->iter.name)) && match_ns(sxe, (xmlNodePtr)attr, sxe->iter.nsprefix, sxe->iter.isprefix)) {
1108: MAKE_STD_ZVAL(value);
1109: ZVAL_STRING(value, sxe_xmlNodeListGetString((xmlDocPtr) sxe->document->ptr, attr->children, 1), 0);
1110: namelen = xmlStrlen(attr->name) + 1;
1111: if (!zattr) {
1112: MAKE_STD_ZVAL(zattr);
1113: array_init(zattr);
1114: sxe_properties_add(rv, "@attributes", sizeof("@attributes"), zattr TSRMLS_CC);
1115: }
1116: add_assoc_zval_ex(zattr, (char*)attr->name, namelen, value);
1117: }
1118: attr = attr->next;
1119: }
1120: }
1121: }
1122:
1123: GET_NODE(sxe, node);
1124: node = php_sxe_get_first_node(sxe, node TSRMLS_CC);
1125: if (node && sxe->iter.type != SXE_ITER_ATTRLIST) {
1126: if (node->type == XML_ATTRIBUTE_NODE) {
1127: MAKE_STD_ZVAL(value);
1128: ZVAL_STRING(value, sxe_xmlNodeListGetString(node->doc, node->children, 1), 0);
1129: zend_hash_next_index_insert(rv, &value, sizeof(zval *), NULL);
1130: node = NULL;
1131: } else if (sxe->iter.type != SXE_ITER_CHILD) {
1132: node = node->children;
1133: }
1134:
1135: while (node) {
1136: if (node->children != NULL || node->prev != NULL || node->next != NULL) {
1137: SKIP_TEXT(node);
1138: } else {
1139: if (node->type == XML_TEXT_NODE) {
1140: const xmlChar *cur = node->content;
1141:
1142: if (*cur != 0) {
1143: MAKE_STD_ZVAL(value);
1144: ZVAL_STRING(value, sxe_xmlNodeListGetString(node->doc, node, 1), 0);
1145: zend_hash_next_index_insert(rv, &value, sizeof(zval *), NULL);
1146: }
1147: goto next_iter;
1148: }
1149: }
1150:
1151: if (node->type == XML_ELEMENT_NODE && (! match_ns(sxe, node, sxe->iter.nsprefix, sxe->iter.isprefix))) {
1152: goto next_iter;
1153: }
1154:
1155: name = (char *) node->name;
1156: if (!name) {
1157: goto next_iter;
1158: } else {
1159: namelen = xmlStrlen(node->name) + 1;
1160: }
1161:
1162: _get_base_node_value(sxe, node, &value, sxe->iter.nsprefix, sxe->iter.isprefix TSRMLS_CC);
1163:
1164: sxe_properties_add(rv, name, namelen, value TSRMLS_CC);
1165: next_iter:
1166: node = node->next;
1167: }
1168: }
1169:
1170: return rv;
1171: }
1172: /* }}} */
1173:
1174: static HashTable * sxe_get_properties(zval *object TSRMLS_DC) /* {{{ */
1175: {
1176: return sxe_get_prop_hash(object, 0 TSRMLS_CC);
1177: }
1178: /* }}} */
1179:
1180: static HashTable * sxe_get_debug_info(zval *object, int *is_temp TSRMLS_DC) /* {{{ */
1181: {
1182: *is_temp = 1;
1183: return sxe_get_prop_hash(object, 1 TSRMLS_CC);
1184: }
1185: /* }}} */
1186:
1187: static int sxe_objects_compare(zval *object1, zval *object2 TSRMLS_DC) /* {{{ */
1188: {
1189: php_sxe_object *sxe1;
1190: php_sxe_object *sxe2;
1191:
1192: sxe1 = php_sxe_fetch_object(object1 TSRMLS_CC);
1193: sxe2 = php_sxe_fetch_object(object2 TSRMLS_CC);
1194:
1195: if (sxe1->node == NULL) {
1196: if (sxe2->node) {
1197: return 1;
1198: } else if (sxe1->document->ptr == sxe2->document->ptr) {
1199: return 0;
1200: }
1201: } else {
1202: return !(sxe1->node == sxe2->node);
1203: }
1204: return 1;
1205: }
1206: /* }}} */
1207:
1208: /* {{{ proto array SimpleXMLElement::xpath(string path)
1209: Runs XPath query on the XML data */
1210: SXE_METHOD(xpath)
1211: {
1212: php_sxe_object *sxe;
1213: zval *value;
1214: char *query;
1215: int query_len;
1216: int i;
1217: int nsnbr = 0;
1218: xmlNsPtr *ns = NULL;
1219: xmlXPathObjectPtr retval;
1220: xmlNodeSetPtr result;
1221: xmlNodePtr nodeptr;
1222:
1223: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &query, &query_len) == FAILURE) {
1224: return;
1225: }
1226:
1227: sxe = php_sxe_fetch_object(getThis() TSRMLS_CC);
1228:
1229: if (sxe->iter.type == SXE_ITER_ATTRLIST) {
1230: return; /* attributes don't have attributes */
1231: }
1232:
1233: if (!sxe->xpath) {
1234: sxe->xpath = xmlXPathNewContext((xmlDocPtr) sxe->document->ptr);
1235: }
1236: if (!sxe->node) {
1237: php_libxml_increment_node_ptr((php_libxml_node_object *)sxe, xmlDocGetRootElement((xmlDocPtr) sxe->document->ptr), NULL TSRMLS_CC);
1238: }
1239:
1240: nodeptr = php_sxe_get_first_node(sxe, sxe->node->node TSRMLS_CC);
1241:
1242: sxe->xpath->node = nodeptr;
1243:
1244: ns = xmlGetNsList((xmlDocPtr) sxe->document->ptr, nodeptr);
1245: if (ns != NULL) {
1246: while (ns[nsnbr] != NULL) {
1247: nsnbr++;
1248: }
1249: }
1250:
1251: sxe->xpath->namespaces = ns;
1252: sxe->xpath->nsNr = nsnbr;
1253:
1254: retval = xmlXPathEval((xmlChar *)query, sxe->xpath);
1255: if (ns != NULL) {
1256: xmlFree(ns);
1257: sxe->xpath->namespaces = NULL;
1258: sxe->xpath->nsNr = 0;
1259: }
1260:
1261: if (!retval) {
1262: RETURN_FALSE;
1263: }
1264:
1265: result = retval->nodesetval;
1266:
1267: array_init(return_value);
1268:
1269: if (result != NULL) {
1270: for (i = 0; i < result->nodeNr; ++i) {
1271: nodeptr = result->nodeTab[i];
1272: if (nodeptr->type == XML_TEXT_NODE || nodeptr->type == XML_ELEMENT_NODE || nodeptr->type == XML_ATTRIBUTE_NODE) {
1273: MAKE_STD_ZVAL(value);
1274: /**
1275: * Detect the case where the last selector is text(), simplexml
1276: * always accesses the text() child by default, therefore we assign
1277: * to the parent node.
1278: */
1279: if (nodeptr->type == XML_TEXT_NODE) {
1280: _node_as_zval(sxe, nodeptr->parent, value, SXE_ITER_NONE, NULL, NULL, 0 TSRMLS_CC);
1281: } else if (nodeptr->type == XML_ATTRIBUTE_NODE) {
1282: _node_as_zval(sxe, nodeptr->parent, value, SXE_ITER_ATTRLIST, (char*)nodeptr->name, nodeptr->ns ? (xmlChar *)nodeptr->ns->href : NULL, 0 TSRMLS_CC);
1283: } else {
1284: _node_as_zval(sxe, nodeptr, value, SXE_ITER_NONE, NULL, NULL, 0 TSRMLS_CC);
1285: }
1286:
1287: add_next_index_zval(return_value, value);
1288: }
1289: }
1290: }
1291:
1292: xmlXPathFreeObject(retval);
1293: }
1294: /* }}} */
1295:
1296: /* {{{ proto bool SimpleXMLElement::registerXPathNamespace(string prefix, string ns)
1297: Creates a prefix/ns context for the next XPath query */
1298: SXE_METHOD(registerXPathNamespace)
1299: {
1300: php_sxe_object *sxe;
1301: int prefix_len, ns_uri_len;
1302: char *prefix, *ns_uri;
1303:
1304: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "ss", &prefix, &prefix_len, &ns_uri, &ns_uri_len) == FAILURE) {
1305: return;
1306: }
1307:
1308: sxe = php_sxe_fetch_object(getThis() TSRMLS_CC);
1309: if (!sxe->xpath) {
1310: sxe->xpath = xmlXPathNewContext((xmlDocPtr) sxe->document->ptr);
1311: }
1312:
1313: if (xmlXPathRegisterNs(sxe->xpath, (xmlChar *)prefix, (xmlChar *)ns_uri) != 0) {
1314: RETURN_FALSE
1315: }
1316: RETURN_TRUE;
1317: }
1318:
1319: /* }}} */
1320:
1321: /* {{{ proto string SimpleXMLElement::asXML([string filename])
1322: Return a well-formed XML string based on SimpleXML element */
1323: SXE_METHOD(asXML)
1324: {
1325: php_sxe_object *sxe;
1326: xmlNodePtr node;
1327: xmlOutputBufferPtr outbuf;
1328: xmlChar *strval;
1329: int strval_len;
1330: char *filename;
1331: int filename_len;
1332:
1333: if (ZEND_NUM_ARGS() > 1) {
1334: RETURN_FALSE;
1335: }
1336:
1337: if (ZEND_NUM_ARGS() == 1) {
1338: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s", &filename, &filename_len) == FAILURE) {
1339: RETURN_FALSE;
1340: }
1341:
1342: sxe = php_sxe_fetch_object(getThis() TSRMLS_CC);
1343: GET_NODE(sxe, node);
1344: node = php_sxe_get_first_node(sxe, node TSRMLS_CC);
1345:
1346: if (node) {
1347: if (node->parent && (XML_DOCUMENT_NODE == node->parent->type)) {
1348: int bytes;
1349: bytes = xmlSaveFile(filename, (xmlDocPtr) sxe->document->ptr);
1350: if (bytes == -1) {
1351: RETURN_FALSE;
1352: } else {
1353: RETURN_TRUE;
1354: }
1355: } else {
1356: outbuf = xmlOutputBufferCreateFilename(filename, NULL, 0);
1357:
1358: if (outbuf == NULL) {
1359: RETURN_FALSE;
1360: }
1361:
1362: xmlNodeDumpOutput(outbuf, (xmlDocPtr) sxe->document->ptr, node, 0, 0, NULL);
1363: xmlOutputBufferClose(outbuf);
1364: RETURN_TRUE;
1365: }
1366: } else {
1367: RETURN_FALSE;
1368: }
1369: }
1370:
1371: sxe = php_sxe_fetch_object(getThis() TSRMLS_CC);
1372: GET_NODE(sxe, node);
1373: node = php_sxe_get_first_node(sxe, node TSRMLS_CC);
1374:
1375: if (node) {
1376: if (node->parent && (XML_DOCUMENT_NODE == node->parent->type)) {
1377: xmlDocDumpMemoryEnc((xmlDocPtr) sxe->document->ptr, &strval, &strval_len, ((xmlDocPtr) sxe->document->ptr)->encoding);
1378: RETVAL_STRINGL((char *)strval, strval_len, 1);
1379: xmlFree(strval);
1380: } else {
1381: /* Should we be passing encoding information instead of NULL? */
1382: outbuf = xmlAllocOutputBuffer(NULL);
1383:
1384: if (outbuf == NULL) {
1385: RETURN_FALSE;
1386: }
1387:
1388: xmlNodeDumpOutput(outbuf, (xmlDocPtr) sxe->document->ptr, node, 0, 0, ((xmlDocPtr) sxe->document->ptr)->encoding);
1389: xmlOutputBufferFlush(outbuf);
1390: RETVAL_STRINGL((char *)outbuf->buffer->content, outbuf->buffer->use, 1);
1391: xmlOutputBufferClose(outbuf);
1392: }
1393: } else {
1394: RETVAL_FALSE;
1395: }
1396: }
1397: /* }}} */
1398:
1399: #define SXE_NS_PREFIX(ns) (ns->prefix ? (char*)ns->prefix : "")
1400:
1401: static inline void sxe_add_namespace_name(zval *return_value, xmlNsPtr ns) /* {{{ */
1402: {
1403: char *prefix = SXE_NS_PREFIX(ns);
1404: if (zend_hash_exists(Z_ARRVAL_P(return_value), prefix, strlen(prefix) + 1) == 0) {
1405: add_assoc_string(return_value, prefix, (char*)ns->href, 1);
1406: }
1407: }
1408: /* }}} */
1409:
1410: static void sxe_add_namespaces(php_sxe_object *sxe, xmlNodePtr node, zend_bool recursive, zval *return_value TSRMLS_DC) /* {{{ */
1411: {
1412: xmlAttrPtr attr;
1413:
1414: if (node->ns) {
1415: sxe_add_namespace_name(return_value, node->ns);
1416: }
1417:
1418: attr = node->properties;
1419: while (attr) {
1420: if (attr->ns) {
1421: sxe_add_namespace_name(return_value, attr->ns);
1422: }
1423: attr = attr->next;
1424: }
1425:
1426: if (recursive) {
1427: node = node->children;
1428: while (node) {
1429: if (node->type == XML_ELEMENT_NODE) {
1430: sxe_add_namespaces(sxe, node, recursive, return_value TSRMLS_CC);
1431: }
1432: node = node->next;
1433: }
1434: }
1435: } /* }}} */
1436:
1437: /* {{{ proto string SimpleXMLElement::getNamespaces([bool recursve])
1438: Return all namespaces in use */
1439: SXE_METHOD(getNamespaces)
1440: {
1441: zend_bool recursive = 0;
1442: php_sxe_object *sxe;
1443: xmlNodePtr node;
1444:
1445: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|b", &recursive) == FAILURE) {
1446: return;
1447: }
1448:
1449: array_init(return_value);
1450:
1451: sxe = php_sxe_fetch_object(getThis() TSRMLS_CC);
1452: GET_NODE(sxe, node);
1453: node = php_sxe_get_first_node(sxe, node TSRMLS_CC);
1454:
1455: if (node) {
1456: if (node->type == XML_ELEMENT_NODE) {
1457: sxe_add_namespaces(sxe, node, recursive, return_value TSRMLS_CC);
1458: } else if (node->type == XML_ATTRIBUTE_NODE && node->ns) {
1459: sxe_add_namespace_name(return_value, node->ns);
1460: }
1461: }
1462: }
1463: /* }}} */
1464:
1465: static void sxe_add_registered_namespaces(php_sxe_object *sxe, xmlNodePtr node, zend_bool recursive, zval *return_value TSRMLS_DC) /* {{{ */
1466: {
1467: xmlNsPtr ns;
1468:
1469: if (node->type == XML_ELEMENT_NODE) {
1470: ns = node->nsDef;
1471: while (ns != NULL) {
1472: sxe_add_namespace_name(return_value, ns);
1473: ns = ns->next;
1474: }
1475: if (recursive) {
1476: node = node->children;
1477: while (node) {
1478: sxe_add_registered_namespaces(sxe, node, recursive, return_value TSRMLS_CC);
1479: node = node->next;
1480: }
1481: }
1482: }
1483: }
1484: /* }}} */
1485:
1486: /* {{{ proto string SimpleXMLElement::getDocNamespaces([bool recursive])
1487: Return all namespaces registered with document */
1488: SXE_METHOD(getDocNamespaces)
1489: {
1490: zend_bool recursive = 0;
1491: php_sxe_object *sxe;
1492:
1493: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|b", &recursive) == FAILURE) {
1494: return;
1495: }
1496:
1497: array_init(return_value);
1498:
1499: sxe = php_sxe_fetch_object(getThis() TSRMLS_CC);
1500:
1501: sxe_add_registered_namespaces(sxe, xmlDocGetRootElement((xmlDocPtr)sxe->document->ptr), recursive, return_value TSRMLS_CC);
1502: }
1503: /* }}} */
1504:
1505: /* {{{ proto object SimpleXMLElement::children([string ns [, bool is_prefix]])
1506: Finds children of given node */
1507: SXE_METHOD(children)
1508: {
1509: php_sxe_object *sxe;
1510: char *nsprefix = NULL;
1511: int nsprefix_len = 0;
1512: xmlNodePtr node;
1513: zend_bool isprefix = 0;
1514:
1515: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|s!b", &nsprefix, &nsprefix_len, &isprefix) == FAILURE) {
1516: return;
1517: }
1518:
1519: sxe = php_sxe_fetch_object(getThis() TSRMLS_CC);
1520:
1521: if (sxe->iter.type == SXE_ITER_ATTRLIST) {
1522: return; /* attributes don't have attributes */
1523: }
1524:
1525: GET_NODE(sxe, node);
1526: node = php_sxe_get_first_node(sxe, node TSRMLS_CC);
1527:
1528: _node_as_zval(sxe, node, return_value, SXE_ITER_CHILD, NULL, (xmlChar *)nsprefix, isprefix TSRMLS_CC);
1529:
1530: }
1531: /* }}} */
1532:
1533: /* {{{ proto object SimpleXMLElement::getName()
1534: Finds children of given node */
1535: SXE_METHOD(getName)
1536: {
1537: php_sxe_object *sxe;
1538: xmlNodePtr node;
1539: int namelen;
1540:
1541: sxe = php_sxe_fetch_object(getThis() TSRMLS_CC);
1542:
1543: GET_NODE(sxe, node);
1544: node = php_sxe_get_first_node(sxe, node TSRMLS_CC);
1545: if (node) {
1546: namelen = xmlStrlen(node->name);
1547: RETURN_STRINGL((char*)node->name, namelen, 1);
1548: } else {
1549: RETURN_EMPTY_STRING();
1550: }
1551: }
1552: /* }}} */
1553:
1554: /* {{{ proto array SimpleXMLElement::attributes([string ns [, bool is_prefix]])
1555: Identifies an element's attributes */
1556: SXE_METHOD(attributes)
1557: {
1558: php_sxe_object *sxe;
1559: char *nsprefix = NULL;
1560: int nsprefix_len = 0;
1561: xmlNodePtr node;
1562: zend_bool isprefix = 0;
1563:
1564: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "|s!b", &nsprefix, &nsprefix_len, &isprefix) == FAILURE) {
1565: return;
1566: }
1567:
1568: sxe = php_sxe_fetch_object(getThis() TSRMLS_CC);
1569: GET_NODE(sxe, node);
1570:
1571: if (sxe->iter.type == SXE_ITER_ATTRLIST) {
1572: return; /* attributes don't have attributes */
1573: }
1574:
1575: node = php_sxe_get_first_node(sxe, node TSRMLS_CC);
1576:
1577: _node_as_zval(sxe, node, return_value, SXE_ITER_ATTRLIST, NULL, (xmlChar *)nsprefix, isprefix TSRMLS_CC);
1578: }
1579: /* }}} */
1580:
1581: /* {{{ proto void SimpleXMLElement::addChild(string qName [, string value [, string ns]])
1582: Add Element with optional namespace information */
1583: SXE_METHOD(addChild)
1584: {
1585: php_sxe_object *sxe;
1586: char *qname, *value = NULL, *nsuri = NULL;
1587: int qname_len, value_len = 0, nsuri_len = 0;
1588: xmlNodePtr node, newnode;
1589: xmlNsPtr nsptr = NULL;
1590: xmlChar *localname, *prefix = NULL;
1591:
1592: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s|s!s!",
1593: &qname, &qname_len, &value, &value_len, &nsuri, &nsuri_len) == FAILURE) {
1594: return;
1595: }
1596:
1597: if (qname_len == 0) {
1598: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Element name is required");
1599: return;
1600: }
1601:
1602: sxe = php_sxe_fetch_object(getThis() TSRMLS_CC);
1603: GET_NODE(sxe, node);
1604:
1605: if (sxe->iter.type == SXE_ITER_ATTRLIST) {
1606: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Cannot add element to attributes");
1607: return;
1608: }
1609:
1610: node = php_sxe_get_first_node(sxe, node TSRMLS_CC);
1611:
1612: if (node == NULL) {
1613: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Cannot add child. Parent is not a permanent member of the XML tree");
1614: return;
1615: }
1616:
1617: localname = xmlSplitQName2((xmlChar *)qname, &prefix);
1618: if (localname == NULL) {
1619: localname = xmlStrdup((xmlChar *)qname);
1620: }
1621:
1622: newnode = xmlNewChild(node, NULL, localname, (xmlChar *)value);
1623:
1624: if (nsuri != NULL) {
1625: if (nsuri_len == 0) {
1626: newnode->ns = NULL;
1627: nsptr = xmlNewNs(newnode, (xmlChar *)nsuri, prefix);
1628: } else {
1629: nsptr = xmlSearchNsByHref(node->doc, node, (xmlChar *)nsuri);
1630: if (nsptr == NULL) {
1631: nsptr = xmlNewNs(newnode, (xmlChar *)nsuri, prefix);
1632: }
1633: newnode->ns = nsptr;
1634: }
1635: }
1636:
1637: _node_as_zval(sxe, newnode, return_value, SXE_ITER_NONE, (char *)localname, prefix, 0 TSRMLS_CC);
1638:
1639: xmlFree(localname);
1640: if (prefix != NULL) {
1641: xmlFree(prefix);
1642: }
1643: }
1644: /* }}} */
1645:
1646: /* {{{ proto void SimpleXMLElement::addAttribute(string qName, string value [,string ns])
1647: Add Attribute with optional namespace information */
1648: SXE_METHOD(addAttribute)
1649: {
1650: php_sxe_object *sxe;
1651: char *qname, *value = NULL, *nsuri = NULL;
1652: int qname_len, value_len = 0, nsuri_len = 0;
1653: xmlNodePtr node;
1654: xmlAttrPtr attrp = NULL;
1655: xmlNsPtr nsptr = NULL;
1656: xmlChar *localname, *prefix = NULL;
1657:
1658: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "ss|s!",
1659: &qname, &qname_len, &value, &value_len, &nsuri, &nsuri_len) == FAILURE) {
1660: return;
1661: }
1662:
1663: if (qname_len == 0) {
1664: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Attribute name is required");
1665: return;
1666: }
1667:
1668: sxe = php_sxe_fetch_object(getThis() TSRMLS_CC);
1669: GET_NODE(sxe, node);
1670:
1671: node = php_sxe_get_first_node(sxe, node TSRMLS_CC);
1672:
1673: if (node && node->type != XML_ELEMENT_NODE) {
1674: node = node->parent;
1675: }
1676:
1677: if (node == NULL) {
1678: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Unable to locate parent Element");
1679: return;
1680: }
1681:
1682: localname = xmlSplitQName2((xmlChar *)qname, &prefix);
1683: if (localname == NULL) {
1684: if (nsuri_len > 0) {
1685: if (prefix != NULL) {
1686: xmlFree(prefix);
1687: }
1688: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Attribute requires prefix for namespace");
1689: return;
1690: }
1691: localname = xmlStrdup((xmlChar *)qname);
1692: }
1693:
1694: attrp = xmlHasNsProp(node, localname, (xmlChar *)nsuri);
1695: if (attrp != NULL && attrp->type != XML_ATTRIBUTE_DECL) {
1696: xmlFree(localname);
1697: if (prefix != NULL) {
1698: xmlFree(prefix);
1699: }
1700: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Attribute already exists");
1701: return;
1702: }
1703:
1704: if (nsuri != NULL) {
1705: nsptr = xmlSearchNsByHref(node->doc, node, (xmlChar *)nsuri);
1706: if (nsptr == NULL) {
1707: nsptr = xmlNewNs(node, (xmlChar *)nsuri, prefix);
1708: }
1709: }
1710:
1711: attrp = xmlNewNsProp(node, nsptr, localname, (xmlChar *)value);
1712:
1713: xmlFree(localname);
1714: if (prefix != NULL) {
1715: xmlFree(prefix);
1716: }
1717: }
1718: /* }}} */
1719:
1720: /* {{{ cast_object()
1721: */
1722: static int cast_object(zval *object, int type, char *contents TSRMLS_DC)
1723: {
1724: if (contents) {
1725: ZVAL_STRINGL(object, contents, strlen(contents), 1);
1726: } else {
1727: ZVAL_NULL(object);
1728: }
1729: Z_SET_REFCOUNT_P(object, 1);
1730: Z_UNSET_ISREF_P(object);
1731:
1732: switch (type) {
1733: case IS_STRING:
1734: convert_to_string(object);
1735: break;
1736: case IS_BOOL:
1737: convert_to_boolean(object);
1738: break;
1739: case IS_LONG:
1740: convert_to_long(object);
1741: break;
1742: case IS_DOUBLE:
1743: convert_to_double(object);
1744: break;
1745: default:
1746: return FAILURE;
1747: }
1748: return SUCCESS;
1749: }
1750: /* }}} */
1751:
1752: /* {{{ sxe_object_cast()
1753: */
1754: static int sxe_object_cast(zval *readobj, zval *writeobj, int type TSRMLS_DC)
1755: {
1756: php_sxe_object *sxe;
1757: xmlChar *contents = NULL;
1758: xmlNodePtr node;
1759: int rv;
1760: HashTable *prop_hash;
1761:
1762: sxe = php_sxe_fetch_object(readobj TSRMLS_CC);
1763:
1764: if (type == IS_BOOL) {
1765: node = php_sxe_get_first_node(sxe, NULL TSRMLS_CC);
1766: prop_hash = sxe_get_prop_hash(readobj, 1 TSRMLS_CC);
1767: INIT_PZVAL(writeobj);
1768: ZVAL_BOOL(writeobj, node != NULL || zend_hash_num_elements(prop_hash) > 0);
1769: zend_hash_destroy(prop_hash);
1770: efree(prop_hash);
1771: return SUCCESS;
1772: }
1773:
1774: if (sxe->iter.type != SXE_ITER_NONE) {
1775: node = php_sxe_get_first_node(sxe, NULL TSRMLS_CC);
1776: if (node) {
1777: contents = xmlNodeListGetString((xmlDocPtr) sxe->document->ptr, node->children, 1);
1778: }
1779: } else {
1780: if (!sxe->node) {
1781: if (sxe->document) {
1782: php_libxml_increment_node_ptr((php_libxml_node_object *)sxe, xmlDocGetRootElement((xmlDocPtr) sxe->document->ptr), NULL TSRMLS_CC);
1783: }
1784: }
1785:
1786: if (sxe->node && sxe->node->node) {
1787: if (sxe->node->node->children) {
1788: contents = xmlNodeListGetString((xmlDocPtr) sxe->document->ptr, sxe->node->node->children, 1);
1789: }
1790: }
1791: }
1792:
1793: if (readobj == writeobj) {
1794: INIT_PZVAL(writeobj);
1795: zval_dtor(readobj);
1796: }
1797:
1798: rv = cast_object(writeobj, type, (char *)contents TSRMLS_CC);
1799:
1800: if (contents) {
1801: xmlFree(contents);
1802: }
1803: return rv;
1804: }
1805: /* }}} */
1806:
1807: /* {{{ proto object SimpleXMLElement::__toString() U
1808: Returns the string content */
1809: SXE_METHOD(__toString)
1810: {
1811: zval *result;
1812:
1813: ALLOC_INIT_ZVAL(result);
1814:
1815: if (sxe_object_cast(getThis(), result, IS_STRING TSRMLS_CC) == SUCCESS) {
1816: RETURN_ZVAL(result, 1, 1);
1817: } else {
1818: zval_ptr_dtor(&result);
1819: RETURN_EMPTY_STRING();
1820: }
1821: }
1822: /* }}} */
1823:
1824: static int php_sxe_count_elements_helper(php_sxe_object *sxe, long *count TSRMLS_DC) /* {{{ */
1825: {
1826: xmlNodePtr node;
1827: zval *data;
1828:
1829: *count = 0;
1830:
1831: data = sxe->iter.data;
1832: sxe->iter.data = NULL;
1833:
1834: node = php_sxe_reset_iterator(sxe, 0 TSRMLS_CC);
1835:
1836: while (node)
1837: {
1838: (*count)++;
1839: node = php_sxe_iterator_fetch(sxe, node->next, 0 TSRMLS_CC);
1840: }
1841:
1842: if (sxe->iter.data) {
1843: zval_ptr_dtor(&sxe->iter.data);
1844: }
1845: sxe->iter.data = data;
1846:
1847: return SUCCESS;
1848: }
1849: /* }}} */
1850:
1851: static int sxe_count_elements(zval *object, long *count TSRMLS_DC) /* {{{ */
1852: {
1853: php_sxe_object *intern;
1854: intern = php_sxe_fetch_object(object TSRMLS_CC);
1855: if (intern->fptr_count) {
1856: zval *rv;
1857: zend_call_method_with_0_params(&object, intern->zo.ce, &intern->fptr_count, "count", &rv);
1858: if (rv) {
1859: if (intern->tmp) {
1860: zval_ptr_dtor(&intern->tmp);
1861: }
1862: MAKE_STD_ZVAL(intern->tmp);
1863: ZVAL_ZVAL(intern->tmp, rv, 1, 1);
1864: convert_to_long(intern->tmp);
1865: *count = (long) Z_LVAL_P(intern->tmp);
1866: return SUCCESS;
1867: }
1868: return FAILURE;
1869: }
1870: return php_sxe_count_elements_helper(intern, count TSRMLS_CC);
1871: }
1872: /* }}} */
1873:
1874: /* {{{ proto int SimpleXMLElement::count()
1875: Get number of child elements */
1876: SXE_METHOD(count)
1877: {
1878: long count = 0;
1879: php_sxe_object *sxe = php_sxe_fetch_object(getThis() TSRMLS_CC);
1880:
1881: if (zend_parse_parameters_none() == FAILURE) {
1882: return;
1883: }
1884:
1885: php_sxe_count_elements_helper(sxe, &count TSRMLS_CC);
1886:
1887: RETURN_LONG(count);
1888: }
1889: /* }}} */
1890:
1891: static zval *sxe_get_value(zval *z TSRMLS_DC) /* {{{ */
1892: {
1893: zval *retval;
1894:
1895: MAKE_STD_ZVAL(retval);
1896:
1897: if (sxe_object_cast(z, retval, IS_STRING TSRMLS_CC)==FAILURE) {
1898: zend_error(E_ERROR, "Unable to cast node to string");
1899: /* FIXME: Should not be fatal */
1900: }
1901:
1902: Z_SET_REFCOUNT_P(retval, 0);
1903: return retval;
1904: }
1905: /* }}} */
1906:
1907: static zend_object_handlers sxe_object_handlers = { /* {{{ */
1908: ZEND_OBJECTS_STORE_HANDLERS,
1909: sxe_property_read,
1910: sxe_property_write,
1911: sxe_dimension_read,
1912: sxe_dimension_write,
1913: sxe_property_get_adr,
1914: sxe_get_value, /* get */
1915: NULL,
1916: sxe_property_exists,
1917: sxe_property_delete,
1918: sxe_dimension_exists,
1919: sxe_dimension_delete,
1920: sxe_get_properties,
1921: NULL, /* zend_get_std_object_handlers()->get_method,*/
1922: NULL, /* zend_get_std_object_handlers()->call_method,*/
1923: NULL, /* zend_get_std_object_handlers()->get_constructor, */
1924: NULL, /* zend_get_std_object_handlers()->get_class_entry,*/
1925: NULL, /* zend_get_std_object_handlers()->get_class_name,*/
1926: sxe_objects_compare,
1927: sxe_object_cast,
1928: sxe_count_elements,
1929: sxe_get_debug_info
1930: };
1931: /* }}} */
1932:
1933: /* {{{ sxe_object_clone()
1934: */
1935: static void
1936: sxe_object_clone(void *object, void **clone_ptr TSRMLS_DC)
1937: {
1938: php_sxe_object *sxe = (php_sxe_object *) object;
1939: php_sxe_object *clone;
1940: xmlNodePtr nodep = NULL;
1941: xmlDocPtr docp = NULL;
1942:
1943: clone = php_sxe_object_new(sxe->zo.ce TSRMLS_CC);
1944: clone->document = sxe->document;
1945: if (clone->document) {
1946: clone->document->refcount++;
1947: docp = clone->document->ptr;
1948: }
1949:
1950: clone->iter.isprefix = sxe->iter.isprefix;
1951: if (sxe->iter.name != NULL) {
1952: clone->iter.name = xmlStrdup((xmlChar *)sxe->iter.name);
1953: }
1954: if (sxe->iter.nsprefix != NULL) {
1955: clone->iter.nsprefix = xmlStrdup((xmlChar *)sxe->iter.nsprefix);
1956: }
1957: clone->iter.type = sxe->iter.type;
1958:
1959: if (sxe->node) {
1960: nodep = xmlDocCopyNode(sxe->node->node, docp, 1);
1961: }
1962:
1963: php_libxml_increment_node_ptr((php_libxml_node_object *)clone, nodep, NULL TSRMLS_CC);
1964:
1965: *clone_ptr = (void *) clone;
1966: }
1967: /* }}} */
1968:
1969: /* {{{ sxe_object_dtor()
1970: */
1971: static void sxe_object_dtor(void *object, zend_object_handle handle TSRMLS_DC)
1972: {
1973: /* dtor required to cleanup iterator related data properly */
1974:
1975: php_sxe_object *sxe;
1976:
1977: sxe = (php_sxe_object *) object;
1978:
1979: if (sxe->iter.data) {
1980: zval_ptr_dtor(&sxe->iter.data);
1981: sxe->iter.data = NULL;
1982: }
1983:
1984: if (sxe->iter.name) {
1985: xmlFree(sxe->iter.name);
1986: sxe->iter.name = NULL;
1987: }
1988: if (sxe->iter.nsprefix) {
1989: xmlFree(sxe->iter.nsprefix);
1990: sxe->iter.nsprefix = NULL;
1991: }
1992: if (sxe->tmp) {
1993: zval_ptr_dtor(&sxe->tmp);
1994: sxe->tmp = NULL;
1995: }
1996: }
1997: /* }}} */
1998:
1999: /* {{{ sxe_object_free_storage()
2000: */
2001: static void sxe_object_free_storage(void *object TSRMLS_DC)
2002: {
2003: php_sxe_object *sxe;
2004:
2005: sxe = (php_sxe_object *) object;
2006:
2007: #if (PHP_MAJOR_VERSION == 5 && PHP_MINOR_VERSION == 1 && PHP_RELEASE_VERSION > 2) || (PHP_MAJOR_VERSION == 5 && PHP_MINOR_VERSION > 1) || (PHP_MAJOR_VERSION > 5)
2008: zend_object_std_dtor(&sxe->zo TSRMLS_CC);
2009: #else
2010: if (sxe->zo.guards) {
2011: zend_hash_destroy(sxe->zo.guards);
2012: FREE_HASHTABLE(sxe->zo.guards);
2013: }
2014:
2015: if (sxe->zo.properties) {
2016: zend_hash_destroy(sxe->zo.properties);
2017: FREE_HASHTABLE(sxe->zo.properties);
2018: }
2019: #endif
2020:
2021: php_libxml_node_decrement_resource((php_libxml_node_object *)sxe TSRMLS_CC);
2022:
2023: if (sxe->xpath) {
2024: xmlXPathFreeContext(sxe->xpath);
2025: }
2026:
2027: if (sxe->properties) {
2028: zend_hash_destroy(sxe->properties);
2029: FREE_HASHTABLE(sxe->properties);
2030: }
2031:
2032: efree(object);
2033: }
2034: /* }}} */
2035:
2036: /* {{{ php_sxe_object_new()
2037: */
2038: static php_sxe_object* php_sxe_object_new(zend_class_entry *ce TSRMLS_DC)
2039: {
2040: php_sxe_object *intern;
2041: zend_class_entry *parent = ce;
2042: int inherited = 0;
2043:
2044: intern = ecalloc(1, sizeof(php_sxe_object));
2045:
2046: intern->iter.type = SXE_ITER_NONE;
2047: intern->iter.nsprefix = NULL;
2048: intern->iter.name = NULL;
2049: intern->fptr_count = NULL;
2050:
2051: #if (PHP_MAJOR_VERSION == 5 && PHP_MINOR_VERSION == 1 && PHP_RELEASE_VERSION > 2) || (PHP_MAJOR_VERSION == 5 && PHP_MINOR_VERSION > 1) || (PHP_MAJOR_VERSION > 5)
2052: zend_object_std_init(&intern->zo, ce TSRMLS_CC);
2053: #else
2054: ALLOC_HASHTABLE(intern->zo.properties);
2055: zend_hash_init(intern->zo.properties, 0, NULL, ZVAL_PTR_DTOR, 0);
2056:
2057: intern->zo.ce = ce;
2058: intern->zo.guards = NULL;
2059: #endif
2060:
2061: while (parent) {
2062: if (parent == sxe_class_entry) {
2063: break;
2064: }
2065:
2066: parent = parent->parent;
2067: inherited = 1;
2068: }
2069:
2070: if (inherited) {
2071: zend_hash_find(&ce->function_table, "count", sizeof("count"),(void **) &intern->fptr_count);
2072: if (intern->fptr_count->common.scope == parent) {
2073: intern->fptr_count = NULL;
2074: }
2075: }
2076:
2077: return intern;
2078: }
2079: /* }}} */
2080:
2081: /* {{{ php_sxe_register_object
2082: */
2083: static zend_object_value
2084: php_sxe_register_object(php_sxe_object *intern TSRMLS_DC)
2085: {
2086: zend_object_value rv;
2087:
2088: rv.handle = zend_objects_store_put(intern, sxe_object_dtor, (zend_objects_free_object_storage_t)sxe_object_free_storage, sxe_object_clone TSRMLS_CC);
2089: rv.handlers = (zend_object_handlers *) &sxe_object_handlers;
2090:
2091: return rv;
2092: }
2093: /* }}} */
2094:
2095: /* {{{ sxe_object_new()
2096: */
2097: PHP_SXE_API zend_object_value
2098: sxe_object_new(zend_class_entry *ce TSRMLS_DC)
2099: {
2100: php_sxe_object *intern;
2101:
2102: intern = php_sxe_object_new(ce TSRMLS_CC);
2103: return php_sxe_register_object(intern TSRMLS_CC);
2104: }
2105: /* }}} */
2106:
2107: /* {{{ proto simplemxml_element simplexml_load_file(string filename [, string class_name [, int options [, string ns [, bool is_prefix]]]])
2108: Load a filename and return a simplexml_element object to allow for processing */
2109: PHP_FUNCTION(simplexml_load_file)
2110: {
2111: php_sxe_object *sxe;
2112: char *filename;
2113: int filename_len;
2114: xmlDocPtr docp;
2115: char *ns = NULL;
2116: int ns_len = 0;
2117: long options = 0;
2118: zend_class_entry *ce= sxe_class_entry;
2119: zend_bool isprefix = 0;
2120:
2121: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s|C!lsb", &filename, &filename_len, &ce, &options, &ns, &ns_len, &isprefix) == FAILURE) {
2122: return;
2123: }
2124:
2125: docp = xmlReadFile(filename, NULL, options);
2126:
2127: if (! docp) {
2128: RETURN_FALSE;
2129: }
2130:
2131: if (!ce) {
2132: ce = sxe_class_entry;
2133: }
2134: sxe = php_sxe_object_new(ce TSRMLS_CC);
2135: sxe->iter.nsprefix = ns_len ? xmlStrdup((xmlChar *)ns) : NULL;
2136: sxe->iter.isprefix = isprefix;
2137: php_libxml_increment_doc_ref((php_libxml_node_object *)sxe, docp TSRMLS_CC);
2138: php_libxml_increment_node_ptr((php_libxml_node_object *)sxe, xmlDocGetRootElement(docp), NULL TSRMLS_CC);
2139:
2140: return_value->type = IS_OBJECT;
2141: return_value->value.obj = php_sxe_register_object(sxe TSRMLS_CC);
2142: }
2143: /* }}} */
2144:
2145: /* {{{ proto simplemxml_element simplexml_load_string(string data [, string class_name [, int options [, string ns [, bool is_prefix]]]])
2146: Load a string and return a simplexml_element object to allow for processing */
2147: PHP_FUNCTION(simplexml_load_string)
2148: {
2149: php_sxe_object *sxe;
2150: char *data;
2151: int data_len;
2152: xmlDocPtr docp;
2153: char *ns = NULL;
2154: int ns_len = 0;
2155: long options = 0;
2156: zend_class_entry *ce= sxe_class_entry;
2157: zend_bool isprefix = 0;
2158:
2159: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s|C!lsb", &data, &data_len, &ce, &options, &ns, &ns_len, &isprefix) == FAILURE) {
2160: return;
2161: }
2162:
2163: docp = xmlReadMemory(data, data_len, NULL, NULL, options);
2164:
2165: if (! docp) {
2166: RETURN_FALSE;
2167: }
2168:
2169: if (!ce) {
2170: ce = sxe_class_entry;
2171: }
2172: sxe = php_sxe_object_new(ce TSRMLS_CC);
2173: sxe->iter.nsprefix = ns_len ? xmlStrdup((xmlChar *)ns) : NULL;
2174: sxe->iter.isprefix = isprefix;
2175: php_libxml_increment_doc_ref((php_libxml_node_object *)sxe, docp TSRMLS_CC);
2176: php_libxml_increment_node_ptr((php_libxml_node_object *)sxe, xmlDocGetRootElement(docp), NULL TSRMLS_CC);
2177:
2178: return_value->type = IS_OBJECT;
2179: return_value->value.obj = php_sxe_register_object(sxe TSRMLS_CC);
2180: }
2181: /* }}} */
2182:
2183: /* {{{ proto SimpleXMLElement::__construct(string data [, int options [, bool data_is_url [, string ns [, bool is_prefix]]]])
2184: SimpleXMLElement constructor */
2185: SXE_METHOD(__construct)
2186: {
2187: php_sxe_object *sxe = php_sxe_fetch_object(getThis() TSRMLS_CC);
2188: char *data, *ns = NULL;
2189: int data_len, ns_len = 0;
2190: xmlDocPtr docp;
2191: long options = 0;
2192: zend_bool is_url = 0, isprefix = 0;
2193: zend_error_handling error_handling;
2194:
2195: zend_replace_error_handling(EH_THROW, NULL, &error_handling TSRMLS_CC);
2196: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "s|lbsb", &data, &data_len, &options, &is_url, &ns, &ns_len, &isprefix) == FAILURE) {
2197: zend_restore_error_handling(&error_handling TSRMLS_CC);
2198: return;
2199: }
2200:
2201: zend_restore_error_handling(&error_handling TSRMLS_CC);
2202:
2203: docp = is_url ? xmlReadFile(data, NULL, options) : xmlReadMemory(data, data_len, NULL, NULL, options);
2204:
2205: if (!docp) {
2206: ((php_libxml_node_object *)sxe)->document = NULL;
2207: zend_throw_exception(zend_exception_get_default(TSRMLS_C), "String could not be parsed as XML", 0 TSRMLS_CC);
2208: return;
2209: }
2210:
2211: sxe->iter.nsprefix = ns_len ? xmlStrdup((xmlChar *)ns) : NULL;
2212: sxe->iter.isprefix = isprefix;
2213: php_libxml_increment_doc_ref((php_libxml_node_object *)sxe, docp TSRMLS_CC);
2214: php_libxml_increment_node_ptr((php_libxml_node_object *)sxe, xmlDocGetRootElement(docp), NULL TSRMLS_CC);
2215: }
2216: /* }}} */
2217:
2218: zend_object_iterator_funcs php_sxe_iterator_funcs = { /* {{{ */
2219: php_sxe_iterator_dtor,
2220: php_sxe_iterator_valid,
2221: php_sxe_iterator_current_data,
2222: php_sxe_iterator_current_key,
2223: php_sxe_iterator_move_forward,
2224: php_sxe_iterator_rewind,
2225: };
2226: /* }}} */
2227:
2228: static xmlNodePtr php_sxe_iterator_fetch(php_sxe_object *sxe, xmlNodePtr node, int use_data TSRMLS_DC) /* {{{ */
2229: {
2230: xmlChar *prefix = sxe->iter.nsprefix;
2231: int isprefix = sxe->iter.isprefix;
2232: int test_elem = sxe->iter.type == SXE_ITER_ELEMENT && sxe->iter.name;
2233: int test_attr = sxe->iter.type == SXE_ITER_ATTRLIST && sxe->iter.name;
2234:
2235: while (node) {
2236: SKIP_TEXT(node);
2237: if (sxe->iter.type != SXE_ITER_ATTRLIST && node->type == XML_ELEMENT_NODE) {
2238: if ((!test_elem || !xmlStrcmp(node->name, sxe->iter.name)) && match_ns(sxe, node, prefix, isprefix)) {
2239: break;
2240: }
2241: } else if (node->type == XML_ATTRIBUTE_NODE) {
2242: if ((!test_attr || !xmlStrcmp(node->name, sxe->iter.name)) && match_ns(sxe, node, prefix, isprefix)) {
2243: break;
2244: }
2245: }
2246: next_iter:
2247: node = node->next;
2248: }
2249:
2250: if (node && use_data) {
2251: ALLOC_INIT_ZVAL(sxe->iter.data);
2252: _node_as_zval(sxe, node, sxe->iter.data, SXE_ITER_NONE, NULL, prefix, isprefix TSRMLS_CC);
2253: }
2254:
2255: return node;
2256: }
2257: /* }}} */
2258:
2259: static xmlNodePtr php_sxe_reset_iterator(php_sxe_object *sxe, int use_data TSRMLS_DC) /* {{{ */
2260: {
2261: xmlNodePtr node;
2262:
2263: if (sxe->iter.data) {
2264: zval_ptr_dtor(&sxe->iter.data);
2265: sxe->iter.data = NULL;
2266: }
2267:
2268: GET_NODE(sxe, node)
2269:
2270: if (node) {
2271: switch (sxe->iter.type) {
2272: case SXE_ITER_ELEMENT:
2273: case SXE_ITER_CHILD:
2274: case SXE_ITER_NONE:
2275: node = node->children;
2276: break;
2277: case SXE_ITER_ATTRLIST:
2278: node = (xmlNodePtr) node->properties;
2279: }
2280: return php_sxe_iterator_fetch(sxe, node, use_data TSRMLS_CC);
2281: }
2282: return NULL;
2283: }
2284: /* }}} */
2285:
2286: zend_object_iterator *php_sxe_get_iterator(zend_class_entry *ce, zval *object, int by_ref TSRMLS_DC) /* {{{ */
2287: {
2288: php_sxe_iterator *iterator;
2289:
2290: if (by_ref) {
2291: zend_error(E_ERROR, "An iterator cannot be used with foreach by reference");
2292: }
2293: iterator = emalloc(sizeof(php_sxe_iterator));
2294:
2295: Z_ADDREF_P(object);
2296: iterator->intern.data = (void*)object;
2297: iterator->intern.funcs = &php_sxe_iterator_funcs;
2298: iterator->sxe = php_sxe_fetch_object(object TSRMLS_CC);
2299:
2300: return (zend_object_iterator*)iterator;
2301: }
2302: /* }}} */
2303:
2304: static void php_sxe_iterator_dtor(zend_object_iterator *iter TSRMLS_DC) /* {{{ */
2305: {
2306: php_sxe_iterator *iterator = (php_sxe_iterator *)iter;
2307:
2308: /* cleanup handled in sxe_object_dtor as we dont always have an iterator wrapper */
2309: if (iterator->intern.data) {
2310: zval_ptr_dtor((zval**)&iterator->intern.data);
2311: }
2312:
2313: efree(iterator);
2314: }
2315: /* }}} */
2316:
2317: static int php_sxe_iterator_valid(zend_object_iterator *iter TSRMLS_DC) /* {{{ */
2318: {
2319: php_sxe_iterator *iterator = (php_sxe_iterator *)iter;
2320:
2321: return iterator->sxe->iter.data ? SUCCESS : FAILURE;
2322: }
2323: /* }}} */
2324:
2325: static void php_sxe_iterator_current_data(zend_object_iterator *iter, zval ***data TSRMLS_DC) /* {{{ */
2326: {
2327: php_sxe_iterator *iterator = (php_sxe_iterator *)iter;
2328:
2329: *data = &iterator->sxe->iter.data;
2330: }
2331: /* }}} */
2332:
2333: static int php_sxe_iterator_current_key(zend_object_iterator *iter, char **str_key, uint *str_key_len, ulong *int_key TSRMLS_DC) /* {{{ */
2334: {
2335: zval *curobj;
2336: xmlNodePtr curnode = NULL;
2337: php_sxe_object *intern;
2338: int namelen;
2339:
2340: php_sxe_iterator *iterator = (php_sxe_iterator *)iter;
2341: curobj = iterator->sxe->iter.data;
2342:
2343: intern = (php_sxe_object *)zend_object_store_get_object(curobj TSRMLS_CC);
2344: if (intern != NULL && intern->node != NULL) {
2345: curnode = (xmlNodePtr)((php_libxml_node_ptr *)intern->node)->node;
2346: }
2347: if (!curnode) {
2348: return HASH_KEY_NON_EXISTANT;
2349: }
2350:
2351: namelen = xmlStrlen(curnode->name);
2352: *str_key = estrndup((char *)curnode->name, namelen);
2353: *str_key_len = namelen + 1;
2354: return HASH_KEY_IS_STRING;
2355:
2356: }
2357: /* }}} */
2358:
2359: PHP_SXE_API void php_sxe_move_forward_iterator(php_sxe_object *sxe TSRMLS_DC) /* {{{ */
2360: {
2361: xmlNodePtr node = NULL;
2362: php_sxe_object *intern;
2363:
2364: if (sxe->iter.data) {
2365: intern = (php_sxe_object *)zend_object_store_get_object(sxe->iter.data TSRMLS_CC);
2366: GET_NODE(intern, node)
2367: zval_ptr_dtor(&sxe->iter.data);
2368: sxe->iter.data = NULL;
2369: }
2370:
2371: if (node) {
2372: php_sxe_iterator_fetch(sxe, node->next, 1 TSRMLS_CC);
2373: }
2374: }
2375: /* }}} */
2376:
2377: static void php_sxe_iterator_move_forward(zend_object_iterator *iter TSRMLS_DC) /* {{{ */
2378: {
2379: php_sxe_iterator *iterator = (php_sxe_iterator *)iter;
2380: php_sxe_move_forward_iterator(iterator->sxe TSRMLS_CC);
2381: }
2382: /* }}} */
2383:
2384: static void php_sxe_iterator_rewind(zend_object_iterator *iter TSRMLS_DC) /* {{{ */
2385: {
2386: php_sxe_object *sxe;
2387:
2388: php_sxe_iterator *iterator = (php_sxe_iterator *)iter;
2389: sxe = iterator->sxe;
2390:
2391: php_sxe_reset_iterator(sxe, 1 TSRMLS_CC);
2392: }
2393: /* }}} */
2394:
2395: void *simplexml_export_node(zval *object TSRMLS_DC) /* {{{ */
2396: {
2397: php_sxe_object *sxe;
2398: xmlNodePtr node;
2399:
2400: sxe = php_sxe_fetch_object(object TSRMLS_CC);
2401: GET_NODE(sxe, node);
2402: return php_sxe_get_first_node(sxe, node TSRMLS_CC);
2403: }
2404: /* }}} */
2405:
2406: /* {{{ proto simplemxml_element simplexml_import_dom(domNode node [, string class_name])
2407: Get a simplexml_element object from dom to allow for processing */
2408: PHP_FUNCTION(simplexml_import_dom)
2409: {
2410: php_sxe_object *sxe;
2411: zval *node;
2412: php_libxml_node_object *object;
2413: xmlNodePtr nodep = NULL;
2414: zend_class_entry *ce= sxe_class_entry;
2415:
2416: if (zend_parse_parameters(ZEND_NUM_ARGS() TSRMLS_CC, "o|C!", &node, &ce) == FAILURE) {
2417: return;
2418: }
2419:
2420: object = (php_libxml_node_object *)zend_object_store_get_object(node TSRMLS_CC);
2421:
2422: nodep = php_libxml_import_node(node TSRMLS_CC);
2423:
2424: if (nodep) {
2425: if (nodep->doc == NULL) {
2426: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Imported Node must have associated Document");
2427: RETURN_NULL();
2428: }
2429: if (nodep->type == XML_DOCUMENT_NODE || nodep->type == XML_HTML_DOCUMENT_NODE) {
2430: nodep = xmlDocGetRootElement((xmlDocPtr) nodep);
2431: }
2432: }
2433:
2434: if (nodep && nodep->type == XML_ELEMENT_NODE) {
2435: if (!ce) {
2436: ce = sxe_class_entry;
2437: }
2438: sxe = php_sxe_object_new(ce TSRMLS_CC);
2439: sxe->document = object->document;
2440: php_libxml_increment_doc_ref((php_libxml_node_object *)sxe, nodep->doc TSRMLS_CC);
2441: php_libxml_increment_node_ptr((php_libxml_node_object *)sxe, nodep, NULL TSRMLS_CC);
2442:
2443: return_value->type = IS_OBJECT;
2444: return_value->value.obj = php_sxe_register_object(sxe TSRMLS_CC);
2445: } else {
2446: php_error_docref(NULL TSRMLS_CC, E_WARNING, "Invalid Nodetype to import");
2447: RETVAL_NULL();
2448: }
2449: }
2450: /* }}} */
2451:
2452: /* {{{ arginfo */
2453: ZEND_BEGIN_ARG_INFO_EX(arginfo_simplexml_load_file, 0, 0, 1)
2454: ZEND_ARG_INFO(0, filename)
2455: ZEND_ARG_INFO(0, class_name)
2456: ZEND_ARG_INFO(0, options)
2457: ZEND_ARG_INFO(0, ns)
2458: ZEND_ARG_INFO(0, is_prefix)
2459: ZEND_END_ARG_INFO()
2460:
2461: ZEND_BEGIN_ARG_INFO_EX(arginfo_simplexml_load_string, 0, 0, 1)
2462: ZEND_ARG_INFO(0, data)
2463: ZEND_ARG_INFO(0, class_name)
2464: ZEND_ARG_INFO(0, options)
2465: ZEND_ARG_INFO(0, ns)
2466: ZEND_ARG_INFO(0, is_prefix)
2467: ZEND_END_ARG_INFO()
2468:
2469: ZEND_BEGIN_ARG_INFO_EX(arginfo_simplexml_import_dom, 0, 0, 1)
2470: ZEND_ARG_INFO(0, node)
2471: ZEND_ARG_INFO(0, class_name)
2472: ZEND_END_ARG_INFO()
2473:
2474: ZEND_BEGIN_ARG_INFO_EX(arginfo_simplexmlelement_xpath, 0, 0, 1)
2475: ZEND_ARG_INFO(0, path)
2476: ZEND_END_ARG_INFO()
2477:
2478: ZEND_BEGIN_ARG_INFO_EX(arginfo_simplexmlelement_registerxpathnamespace, 0, 0, 2)
2479: ZEND_ARG_INFO(0, prefix)
2480: ZEND_ARG_INFO(0, ns)
2481: ZEND_END_ARG_INFO()
2482:
2483: ZEND_BEGIN_ARG_INFO_EX(arginfo_simplexmlelement_asxml, 0, 0, 0)
2484: ZEND_ARG_INFO(0, filename)
2485: ZEND_END_ARG_INFO()
2486:
2487: ZEND_BEGIN_ARG_INFO_EX(arginfo_simplexmlelement_getnamespaces, 0, 0, 0)
2488: ZEND_ARG_INFO(0, recursve)
2489: ZEND_END_ARG_INFO()
2490:
2491: ZEND_BEGIN_ARG_INFO_EX(arginfo_simplexmlelement_children, 0, 0, 0)
2492: ZEND_ARG_INFO(0, ns)
2493: ZEND_ARG_INFO(0, is_prefix)
2494: ZEND_END_ARG_INFO()
2495:
2496: ZEND_BEGIN_ARG_INFO_EX(arginfo_simplexmlelement__construct, 0, 0, 1)
2497: ZEND_ARG_INFO(0, data)
2498: ZEND_ARG_INFO(0, options)
2499: ZEND_ARG_INFO(0, data_is_url)
2500: ZEND_ARG_INFO(0, ns)
2501: ZEND_ARG_INFO(0, is_prefix)
2502: ZEND_END_ARG_INFO()
2503:
2504: ZEND_BEGIN_ARG_INFO(arginfo_simplexmlelement__void, 0)
2505: ZEND_END_ARG_INFO()
2506:
2507: ZEND_BEGIN_ARG_INFO_EX(arginfo_simplexmlelement_addchild, 0, 0, 1)
2508: ZEND_ARG_INFO(0, name)
2509: ZEND_ARG_INFO(0, value)
2510: ZEND_ARG_INFO(0, ns)
2511: ZEND_END_ARG_INFO()
2512: /* }}} */
2513:
2514: const zend_function_entry simplexml_functions[] = { /* {{{ */
2515: PHP_FE(simplexml_load_file, arginfo_simplexml_load_file)
2516: PHP_FE(simplexml_load_string, arginfo_simplexml_load_string)
2517: PHP_FE(simplexml_import_dom, arginfo_simplexml_import_dom)
2518: PHP_FE_END
2519: };
2520: /* }}} */
2521:
2522: static const zend_module_dep simplexml_deps[] = { /* {{{ */
2523: ZEND_MOD_REQUIRED("libxml")
2524: ZEND_MOD_REQUIRED("spl")
2525: ZEND_MOD_END
2526: };
2527: /* }}} */
2528:
2529: zend_module_entry simplexml_module_entry = { /* {{{ */
2530: STANDARD_MODULE_HEADER_EX, NULL,
2531: simplexml_deps,
2532: "SimpleXML",
2533: simplexml_functions,
2534: PHP_MINIT(simplexml),
2535: PHP_MSHUTDOWN(simplexml),
2536: NULL,
2537: NULL,
2538: PHP_MINFO(simplexml),
2539: "0.1",
2540: STANDARD_MODULE_PROPERTIES
2541: };
2542: /* }}} */
2543:
2544: #ifdef COMPILE_DL_SIMPLEXML
2545: ZEND_GET_MODULE(simplexml)
2546: #endif
2547:
2548: /* the method table */
2549: /* each method can have its own parameters and visibility */
2550: static const zend_function_entry sxe_functions[] = { /* {{{ */
2551: SXE_ME(__construct, arginfo_simplexmlelement__construct, ZEND_ACC_PUBLIC|ZEND_ACC_FINAL) /* must be called */
2552: SXE_ME(asXML, arginfo_simplexmlelement_asxml, ZEND_ACC_PUBLIC)
2553: SXE_MALIAS(saveXML, asXML, arginfo_simplexmlelement_asxml, ZEND_ACC_PUBLIC)
2554: SXE_ME(xpath, arginfo_simplexmlelement_xpath, ZEND_ACC_PUBLIC)
2555: SXE_ME(registerXPathNamespace, arginfo_simplexmlelement_registerxpathnamespace, ZEND_ACC_PUBLIC)
2556: SXE_ME(attributes, arginfo_simplexmlelement_children, ZEND_ACC_PUBLIC)
2557: SXE_ME(children, arginfo_simplexmlelement_children, ZEND_ACC_PUBLIC)
2558: SXE_ME(getNamespaces, arginfo_simplexmlelement_getnamespaces, ZEND_ACC_PUBLIC)
2559: SXE_ME(getDocNamespaces, arginfo_simplexmlelement_getnamespaces, ZEND_ACC_PUBLIC)
2560: SXE_ME(getName, arginfo_simplexmlelement__void, ZEND_ACC_PUBLIC)
2561: SXE_ME(addChild, arginfo_simplexmlelement_addchild, ZEND_ACC_PUBLIC)
2562: SXE_ME(addAttribute, arginfo_simplexmlelement_addchild, ZEND_ACC_PUBLIC)
2563: SXE_ME(__toString, arginfo_simplexmlelement__void, ZEND_ACC_PUBLIC)
2564: SXE_ME(count, arginfo_simplexmlelement__void, ZEND_ACC_PUBLIC)
2565: PHP_FE_END
2566: };
2567: /* }}} */
2568:
2569: /* {{{ PHP_MINIT_FUNCTION(simplexml)
2570: */
2571: PHP_MINIT_FUNCTION(simplexml)
2572: {
2573: zend_class_entry sxe;
2574:
2575: INIT_CLASS_ENTRY(sxe, "SimpleXMLElement", sxe_functions);
2576: sxe.create_object = sxe_object_new;
2577: sxe_class_entry = zend_register_internal_class(&sxe TSRMLS_CC);
2578: sxe_class_entry->get_iterator = php_sxe_get_iterator;
2579: sxe_class_entry->iterator_funcs.funcs = &php_sxe_iterator_funcs;
2580: zend_class_implements(sxe_class_entry TSRMLS_CC, 1, zend_ce_traversable);
2581: sxe_object_handlers.get_method = zend_get_std_object_handlers()->get_method;
2582: sxe_object_handlers.get_constructor = zend_get_std_object_handlers()->get_constructor;
2583: sxe_object_handlers.get_class_entry = zend_get_std_object_handlers()->get_class_entry;
2584: sxe_object_handlers.get_class_name = zend_get_std_object_handlers()->get_class_name;
2585: sxe_class_entry->serialize = zend_class_serialize_deny;
2586: sxe_class_entry->unserialize = zend_class_unserialize_deny;
2587:
2588: php_libxml_register_export(sxe_class_entry, simplexml_export_node);
2589:
2590: PHP_MINIT(sxe)(INIT_FUNC_ARGS_PASSTHRU);
2591:
2592: return SUCCESS;
2593: }
2594: /* }}} */
2595:
2596: /* {{{ PHP_MSHUTDOWN_FUNCTION(simplexml)
2597: */
2598: PHP_MSHUTDOWN_FUNCTION(simplexml)
2599: {
2600: sxe_class_entry = NULL;
2601: return SUCCESS;
2602: }
2603: /* }}} */
2604:
2605: /* {{{ PHP_MINFO_FUNCTION(simplexml)
2606: */
2607: PHP_MINFO_FUNCTION(simplexml)
2608: {
2609: php_info_print_table_start();
2610: php_info_print_table_header(2, "Simplexml support", "enabled");
2611: php_info_print_table_row(2, "Revision", "$Revision: 321634 $");
2612: php_info_print_table_row(2, "Schema support",
2613: #ifdef LIBXML_SCHEMAS_ENABLED
2614: "enabled");
2615: #else
2616: "not available");
2617: #endif
2618: php_info_print_table_end();
2619: }
2620: /* }}} */
2621:
2622: #endif
2623:
2624: /**
2625: * Local Variables:
2626: * c-basic-offset: 4
2627: * tab-width: 4
2628: * indent-tabs-mode: t
2629: * End:
2630: * vim600: fdm=marker
2631: * vim: noet sw=4 ts=4
2632: */
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>