root/ext/dom/xpath.c

/* [<][>][^][v][top][bottom][index][help] */

DEFINITIONS

This source file includes following definitions.
  1. PHP_METHOD
  2. dom_xpath_document_read
  3. PHP_FUNCTION
  4. dom_xpath_iter
  5. php_xpath_eval
  6. PHP_FUNCTION
  7. PHP_FUNCTION

/*
   +----------------------------------------------------------------------+
   | PHP Version 5                                                        |
   +----------------------------------------------------------------------+
   | Copyright (c) 1997-2008 The PHP Group                                |
   +----------------------------------------------------------------------+
   | This source file is subject to version 3.01 of the PHP license,      |
   | that is bundled with this package in the file LICENSE, and is        |
   | available through the world-wide-web at the following url:           |
   | http://www.php.net/license/3_01.txt                                  |
   | If you did not receive a copy of the PHP license and are unable to   |
   | obtain it through the world-wide-web, please send a note to          |
   | license@php.net so we can mail you a copy immediately.               |
   +----------------------------------------------------------------------+
   | Authors: Christian Stocker <chregu@php.net>                          |
   |          Rob Richards <rrichards@php.net>                            |
   +----------------------------------------------------------------------+
*/

/* $Id: xpath.c,v 1.26.2.1.2.3 2008/01/29 15:55:29 sebastian Exp $ */

#ifdef HAVE_CONFIG_H
#include "config.h"
#endif

#include "php.h"
#if HAVE_LIBXML && HAVE_DOM
#include "php_dom.h"

#define PHP_DOM_XPATH_QUERY 0
#define PHP_DOM_XPATH_EVALUATE 1

/*
* class DOMXPath 
*/

#if defined(LIBXML_XPATH_ENABLED)

/* {{{ arginfo */
static
ZEND_BEGIN_ARG_INFO_EX(arginfo_dom_xpath_construct, 0, 0, 1)
        ZEND_ARG_OBJ_INFO(0, doc, DOMDocument, 0)
ZEND_END_ARG_INFO();

static
ZEND_BEGIN_ARG_INFO_EX(arginfo_dom_xpath_register_ns, 0, 0, 2)
        ZEND_ARG_INFO(0, prefix)
        ZEND_ARG_INFO(0, uri)
ZEND_END_ARG_INFO();

static
ZEND_BEGIN_ARG_INFO_EX(arginfo_dom_xpath_query, 0, 0, 1)
        ZEND_ARG_INFO(0, expr)
        ZEND_ARG_OBJ_INFO(0, context, DOMNode, 0)
ZEND_END_ARG_INFO();

static
ZEND_BEGIN_ARG_INFO_EX(arginfo_dom_xpath_evaluate, 0, 0, 1)
        ZEND_ARG_INFO(0, expr)
        ZEND_ARG_OBJ_INFO(0, context, DOMNode, 0)
ZEND_END_ARG_INFO();
/* }}} */

zend_function_entry php_dom_xpath_class_functions[] = {
        PHP_ME(domxpath, __construct, arginfo_dom_xpath_construct, ZEND_ACC_PUBLIC)
        PHP_FALIAS(registerNamespace, dom_xpath_register_ns, arginfo_dom_xpath_register_ns)
        PHP_FALIAS(query, dom_xpath_query, arginfo_dom_xpath_query)
        PHP_FALIAS(evaluate, dom_xpath_evaluate, arginfo_dom_xpath_evaluate)
        {NULL, NULL, NULL}
};

/* {{{ proto void DOMXPath::__construct(DOMDocument doc); */
PHP_METHOD(domxpath, __construct)
{
        zval *id, *doc;
        xmlDocPtr docp = NULL;
        dom_object *docobj, *intern;
        xmlXPathContextPtr ctx, oldctx;

        php_set_error_handling(EH_THROW, dom_domexception_class_entry TSRMLS_CC);
        if (zend_parse_method_parameters(ZEND_NUM_ARGS() TSRMLS_CC, getThis(), "OO", &id, dom_xpath_class_entry, &doc, dom_document_class_entry) == FAILURE) {
                php_std_error_handling();
                return;
        }

        php_std_error_handling();
        DOM_GET_OBJ(docp, doc, xmlDocPtr, docobj);

        ctx = xmlXPathNewContext(docp);
        if (ctx == NULL) {
                php_dom_throw_error(INVALID_STATE_ERR, 1 TSRMLS_CC);
                RETURN_FALSE;
        }

        intern = (dom_object *)zend_object_store_get_object(id TSRMLS_CC);
        if (intern != NULL) {
                oldctx = (xmlXPathContextPtr)intern->ptr;
                if (oldctx != NULL) {
                        php_libxml_decrement_doc_ref((php_libxml_node_object *)intern TSRMLS_CC);
                        xmlXPathFreeContext(oldctx);
                }
                intern->ptr = ctx;
                intern->document = docobj->document;
                php_libxml_increment_doc_ref((php_libxml_node_object *)intern, docp TSRMLS_CC);
        }
}
/* }}} end DOMXPath::__construct */

/* {{{ document DOMDocument*/
int dom_xpath_document_read(dom_object *obj, zval **retval TSRMLS_DC)
{
        xmlDoc *docp = NULL;
        xmlXPathContextPtr ctx;
        int ret;

        ctx = (xmlXPathContextPtr) obj->ptr;

        if (ctx) {
                docp = (xmlDocPtr) ctx->doc;
        }

        ALLOC_ZVAL(*retval);
        if (NULL == (*retval = php_dom_create_object((xmlNodePtr) docp, &ret, NULL, *retval, obj TSRMLS_CC))) {
                php_error_docref(NULL TSRMLS_CC, E_WARNING, "Cannot create required DOM object");
                return FAILURE;
        }
        return SUCCESS;
}

/* {{{ proto boolean dom_xpath_register_ns(string prefix, string uri); */
PHP_FUNCTION(dom_xpath_register_ns)
{
        zval *id;
        xmlXPathContextPtr ctxp;
        int prefix_len, ns_uri_len;
        dom_object *intern;
        unsigned char *prefix, *ns_uri;

        if (zend_parse_method_parameters(ZEND_NUM_ARGS() TSRMLS_CC, getThis(), "Oss", &id, dom_xpath_class_entry, &prefix, &prefix_len, &ns_uri, &ns_uri_len) == FAILURE) {
                return;
        }

        intern = (dom_object *)zend_object_store_get_object(id TSRMLS_CC);

        ctxp = (xmlXPathContextPtr) intern->ptr;
        if (ctxp == NULL) {
                php_error_docref(NULL TSRMLS_CC, E_WARNING, "Invalid XPath Context");
                RETURN_FALSE;
        }

        if (xmlXPathRegisterNs(ctxp, prefix, ns_uri) != 0) {
                RETURN_FALSE
        }
        RETURN_TRUE;
}

static void dom_xpath_iter(zval *baseobj, dom_object *intern)
{
        dom_nnodemap_object *mapptr;

        mapptr = (dom_nnodemap_object *)intern->ptr;
        mapptr->baseobjptr = baseobj;
        mapptr->nodetype = DOM_NODESET;

}

static void php_xpath_eval(INTERNAL_FUNCTION_PARAMETERS, int type) {
        zval *id, *retval, *context = NULL;
        xmlXPathContextPtr ctxp;
        xmlNodePtr nodep = NULL;
        xmlXPathObjectPtr xpathobjp;
        int expr_len, ret, nsnbr = 0, xpath_type;
        dom_object *intern, *nodeobj;
        char *expr;
        xmlDoc *docp = NULL;
        xmlNsPtr *ns;


        if (zend_parse_method_parameters(ZEND_NUM_ARGS() TSRMLS_CC, getThis(), "Os|O", &id, dom_xpath_class_entry, &expr, &expr_len, &context, dom_node_class_entry) == FAILURE) {
                return;
        }

        intern = (dom_object *)zend_object_store_get_object(id TSRMLS_CC);

        ctxp = (xmlXPathContextPtr) intern->ptr;
        if (ctxp == NULL) {
                php_error_docref(NULL TSRMLS_CC, E_WARNING, "Invalid XPath Context");
                RETURN_FALSE;
        }

        docp = (xmlDocPtr) ctxp->doc;
        if (docp == NULL) {
                php_error_docref(NULL TSRMLS_CC, E_WARNING, "Invalid XPath Document Pointer");
                RETURN_FALSE;
        }

        if (context != NULL) {
                DOM_GET_OBJ(nodep, context, xmlNodePtr, nodeobj);
        }

        if (!nodep) {
                nodep = xmlDocGetRootElement(docp);
        }

        if (nodep && docp != nodep->doc) {
                php_error_docref(NULL TSRMLS_CC, E_WARNING, "Node From Wrong Document");
                RETURN_FALSE;
        }

        ctxp->node = nodep;

        /* Register namespaces in the node */
        ns = xmlGetNsList(docp, nodep);

    if (ns != NULL) {
        while (ns[nsnbr] != NULL)
            nsnbr++;
    }


    ctxp->namespaces = ns;
    ctxp->nsNr = nsnbr;

        xpathobjp = xmlXPathEvalExpression(expr, ctxp);
        ctxp->node = NULL;

        if (ns != NULL) {
                xmlFree(ns);
                ctxp->namespaces = NULL;
                ctxp->nsNr = 0;
        }

        if (! xpathobjp) {
                RETURN_FALSE;
        }

        if (type == PHP_DOM_XPATH_QUERY) {
                xpath_type = XPATH_NODESET;
        } else {
                xpath_type = xpathobjp->type;
        }

        switch (xpath_type) {

                case  XPATH_NODESET:
                {
                        int i;
                        xmlNodeSetPtr nodesetp;

                        MAKE_STD_ZVAL(retval);
                        array_init(retval);

                        if (xpathobjp->type == XPATH_NODESET && NULL != (nodesetp = xpathobjp->nodesetval)) {

                                for (i = 0; i < nodesetp->nodeNr; i++) {
                                        xmlNodePtr node = nodesetp->nodeTab[i];
                                        zval *child;

                                        MAKE_STD_ZVAL(child);
                                        
                                        if (node->type == XML_NAMESPACE_DECL) {
                                                xmlNsPtr curns;
                                                xmlNodePtr nsparent;

                                                nsparent = node->_private;
                                                curns = xmlNewNs(NULL, node->name, NULL);
                                                if (node->children) {
                                                        curns->prefix = xmlStrdup((char *) node->children);
                                                }
                                                if (node->children) {
                                                        node = xmlNewDocNode(docp, NULL, (char *) node->children, node->name);
                                                } else {
                                                        node = xmlNewDocNode(docp, NULL, "xmlns", node->name);
                                                }
                                                node->type = XML_NAMESPACE_DECL;
                                                node->parent = nsparent;
                                                node->ns = curns;
                                        }
                                        child = php_dom_create_object(node, &ret, NULL, child, intern TSRMLS_CC);
                                        add_next_index_zval(retval, child);
                                }
                        }
                        php_dom_create_interator(return_value, DOM_NODELIST TSRMLS_CC);
                        intern = (dom_object *)zend_objects_get_address(return_value TSRMLS_CC);
                        dom_xpath_iter(retval, intern);
                        break;
                }

                case XPATH_BOOLEAN:
                        RETVAL_BOOL(xpathobjp->boolval);
                        break;

                case XPATH_NUMBER:
                        RETVAL_DOUBLE(xpathobjp->floatval)
                        break;

                case XPATH_STRING:
                        RETVAL_STRING(xpathobjp->stringval, 1);
                        break;

                default:
                        RETVAL_NULL();
                        break;
        }

        xmlXPathFreeObject(xpathobjp);
}

/* {{{ proto DOMNodeList dom_xpath_query(string expr [,DOMNode context]); */
PHP_FUNCTION(dom_xpath_query)
{
        php_xpath_eval(INTERNAL_FUNCTION_PARAM_PASSTHRU, PHP_DOM_XPATH_QUERY);
}
/* }}} end dom_xpath_query */

/* {{{ proto mixed dom_xpath_evaluate(string expr [,DOMNode context]); */
PHP_FUNCTION(dom_xpath_evaluate)
{
        php_xpath_eval(INTERNAL_FUNCTION_PARAM_PASSTHRU, PHP_DOM_XPATH_EVALUATE);
}
/* }}} end dom_xpath_evaluate */

#endif /* LIBXML_XPATH_ENABLED */

/* }}} */
#endif

/* [<][>][^][v][top][bottom][index][help] */