chregu          Sat Nov 30 05:38:18 2002 EDT

  Modified files:              
    /php4/ext/domxml    php_domxml.c 
  Log:
  fixed big bad memory leak in xpath objects.
  
  
Index: php4/ext/domxml/php_domxml.c
diff -u php4/ext/domxml/php_domxml.c:1.224 php4/ext/domxml/php_domxml.c:1.225
--- php4/ext/domxml/php_domxml.c:1.224  Fri Nov 29 11:31:41 2002
+++ php4/ext/domxml/php_domxml.c        Sat Nov 30 05:38:17 2002
@@ -16,7 +16,7 @@
    +----------------------------------------------------------------------+
  */
 
-/* $Id: php_domxml.c,v 1.224 2002/11/29 16:31:41 chregu Exp $ */
+/* $Id: php_domxml.c,v 1.225 2002/11/30 10:38:17 chregu Exp $ */
 
 /* TODO
  * - Support Notation Nodes
@@ -698,19 +698,6 @@
                xmlXPathFreeContext(ctx);
        }
 }
-
-static void php_free_xpath_object(zend_rsrc_list_entry *rsrc TSRMLS_DC)
-{
-       xmlXPathObjectPtr obj = (xmlXPathObjectPtr) rsrc->ptr;
-
-       if (obj) {
-               if (obj->user) {
-                       zval *wrapper = obj->user;
-                       zval_ptr_dtor(&wrapper);
-               }
-               xmlXPathFreeObject(obj);
-       }
-}
 #endif
 
 static void php_free_xml_parser(zend_rsrc_list_entry *rsrc TSRMLS_DC)
@@ -843,79 +830,12 @@
        return obj;
 }
 
-
-static void xpath_object_set_data(void *obj, zval *wrapper)
-{
-/*
-       char tmp[20];
-       sprintf(tmp, "%08X", obj);
-       fprintf(stderr, "Adding %s to hash\n", tmp);
-*/
-       ((xmlXPathObjectPtr) obj)->user = wrapper;
-}
-
-
-static zval *xpath_object_get_data(void *obj)
-{
-/*
-       char tmp[20];
-       sprintf(tmp, "%08X", obj);
-       fprintf(stderr, "Trying getting %s from hash ...", tmp);
-       if(((xmlXPathObjectPtr) obj)->user)
-               fprintf(stderr, " found\n");
-       else
-               fprintf(stderr, " not found\n");
-*/
-       return ((zval *) (((xmlXPathObjectPtr) obj)->user));
-}
-
-
-static void php_xpath_set_object(zval *wrapper, void *obj, int rsrc_type)
-{
-       zval *handle, *addr;
-
-       MAKE_STD_ZVAL(handle);
-       Z_TYPE_P(handle) = IS_LONG;
-       Z_LVAL_P(handle) = zend_list_insert(obj, rsrc_type);
-
-       MAKE_STD_ZVAL(addr);
-       Z_TYPE_P(addr) = IS_LONG;
-       Z_LVAL_P(addr) = (int) obj;
-
-       zend_hash_index_update(Z_OBJPROP_P(wrapper), 0, &handle, sizeof(zval *), NULL);
-       zend_hash_index_update(Z_OBJPROP_P(wrapper), 1, &addr, sizeof(zval *), NULL);
-       zval_add_ref(&wrapper);
-       xpath_object_set_data(obj, wrapper);
-}
-
 static zval *php_xpathobject_new(xmlXPathObjectPtr obj, int *found TSRMLS_DC)
 {
        zval *wrapper;
 
-               *found = 0;
-
-       if (!obj) {
-               MAKE_STD_ZVAL(wrapper);
-               ZVAL_NULL(wrapper);
-               return wrapper;
-       }
-
-       if ((wrapper = (zval *) xpath_object_get_data((void *) obj))) {
-               zval_add_ref(&wrapper);
-               *found = 1;
-               return wrapper;
-       }
-
        MAKE_STD_ZVAL(wrapper);
        object_init_ex(wrapper, xpathobject_class_entry);
-
-/*
-       rsrc_type = le_xpathobjectp;
-       php_xpath_set_object(wrapper, (void *) obj, rsrc_type);
-*/
-
-       php_xpath_set_object(wrapper, (void *) obj, le_xpathobjectp);
-
        return (wrapper);
 }
 
@@ -1575,7 +1495,7 @@
 
 #if defined(LIBXML_XPATH_ENABLED)
        le_xpathctxp = zend_register_list_destructors_ex(php_free_xpath_context, NULL, 
"xpathcontext", module_number);
-       le_xpathobjectp = zend_register_list_destructors_ex(php_free_xpath_object, 
NULL, "xpathobject", module_number);
+       le_xpathobjectp = zend_register_list_destructors_ex(NULL, NULL, "xpathobject", 
+module_number);
 #endif
 
 /*     le_domxmlnsp = register_list_destructors(NULL, NULL); */
@@ -4853,6 +4773,7 @@
                        break;
        }
 
+       xmlXPathFreeObject(xpathobjp);
        *return_value = *rv;
        FREE_ZVAL(rv);
 }



-- 
PHP CVS Mailing List (http://www.php.net/)
To unsubscribe, visit: http://www.php.net/unsub.php

Reply via email to