1 files changed, 0 insertions, 432 deletions

diff --git a/ext/rpc/com/variant.c b/ext/rpc/com/variant.c
deleted file mode 100644
index 0b64388c7f..0000000000
--- a/ext/rpc/com/variant.c
+++ /dev/null
@@ -1,432 +0,0 @@
-/*
-   +----------------------------------------------------------------------+
-   | PHP version 4.0                                                      |
-   +----------------------------------------------------------------------+
-   | Copyright (c) 1997-2001 The PHP Group                                |
-   +----------------------------------------------------------------------+
-   | This source file is subject to version 2.02 of the PHP license,      |
-   | that is bundled with this package in the file LICENSE, and is        |
-   | available at through the world-wide-web at                           |
-   | http://www.php.net/license/2_02.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.               |
-   +----------------------------------------------------------------------+
-   | Author: Harald Radi <h.radi@nme.at>                                  |
-   +----------------------------------------------------------------------+
- */
-
-
-/*
- * This module maps the VARIANT datastructure into PHP so that it can be used to
- * pass values to COM and DOTNET Objects by reference and not only by value.
- *
- * harald
- */
-
-#ifdef PHP_WIN32
-
-#include "php.h"
-#include "php_ini.h"
-#include "php_VARIANT.h"
-#include "conversion.h"
-#include "ext/standard/info.h"
-
-#include <unknwn.h> 
-
-void php_VARIANT_call_function_handler(INTERNAL_FUNCTION_PARAMETERS, zend_property_reference *property_reference);
-pval php_VARIANT_get_property_handler(zend_property_reference *property_reference);
-static int do_VARIANT_propset(VARIANT *var_arg, pval *arg_property, pval *value);
-void php_register_VARIANT_class();
-static void php_variant_destructor(zend_rsrc_list_entry *rsrc);
-void php_register_VARIANT_class();
-
-static int le_variant;
-static int codepage;
-
-static zend_class_entry VARIANT_class_entry;
-
-function_entry VARIANT_functions[] = {
-	{NULL, NULL, NULL}
-};
-
-static PHP_MINFO_FUNCTION(VARIANT)
-{
-	php_info_print_table_start();
-	php_info_print_table_row(2, "VARIANT support", "enabled");
-	php_info_print_table_end();
-}
-
-zend_module_entry VARIANT_module_entry = {
-	"variant", VARIANT_functions, PHP_MINIT(VARIANT), PHP_MSHUTDOWN(VARIANT), NULL, NULL, PHP_MINFO(VARIANT), STANDARD_MODULE_PROPERTIES
-};
-
-PHP_MINIT_FUNCTION(VARIANT)
-{
-	le_variant = zend_register_list_destructors_ex(php_variant_destructor, NULL, "VARIANT", module_number);
-
-	/* variant datatypes */
-	REGISTER_LONG_CONSTANT("VT_NULL", VT_NULL, CONST_CS | CONST_PERSISTENT);
-	REGISTER_LONG_CONSTANT("VT_EMPTY", VT_EMPTY, CONST_CS | CONST_PERSISTENT);
-	REGISTER_LONG_CONSTANT("VT_UI1", VT_UI1, CONST_CS | CONST_PERSISTENT);
-	REGISTER_LONG_CONSTANT("VT_I2", VT_I2, CONST_CS | CONST_PERSISTENT);
-	REGISTER_LONG_CONSTANT("VT_I4", VT_I4, CONST_CS | CONST_PERSISTENT);
-	REGISTER_LONG_CONSTANT("VT_R4", VT_R4, CONST_CS | CONST_PERSISTENT);
-	REGISTER_LONG_CONSTANT("VT_R8", VT_R8, CONST_CS | CONST_PERSISTENT);
-	REGISTER_LONG_CONSTANT("VT_BOOL", VT_BOOL, CONST_CS | CONST_PERSISTENT);
-	REGISTER_LONG_CONSTANT("VT_ERROR", VT_ERROR, CONST_CS | CONST_PERSISTENT);
-	REGISTER_LONG_CONSTANT("VT_CY", VT_CY, CONST_CS | CONST_PERSISTENT);
-	REGISTER_LONG_CONSTANT("VT_DATE", VT_CY, CONST_CS | CONST_PERSISTENT);
-	REGISTER_LONG_CONSTANT("VT_BSTR", VT_BSTR, CONST_CS | CONST_PERSISTENT);
-	REGISTER_LONG_CONSTANT("VT_DECIMAL", VT_DECIMAL, CONST_CS | CONST_PERSISTENT);
-	REGISTER_LONG_CONSTANT("VT_UNKNOWN", VT_UNKNOWN, CONST_CS | CONST_PERSISTENT);
-	REGISTER_LONG_CONSTANT("VT_DISPATCH", VT_DISPATCH, CONST_CS | CONST_PERSISTENT);
-	REGISTER_LONG_CONSTANT("VT_VARIANT", VT_VARIANT, CONST_CS | CONST_PERSISTENT);
-	REGISTER_LONG_CONSTANT("VT_I1", VT_I1, CONST_CS | CONST_PERSISTENT);
-	REGISTER_LONG_CONSTANT("VT_UI2", VT_UI2, CONST_CS | CONST_PERSISTENT);
-	REGISTER_LONG_CONSTANT("VT_UI4", VT_UI4, CONST_CS | CONST_PERSISTENT);
-	REGISTER_LONG_CONSTANT("VT_INT", VT_INT, CONST_CS | CONST_PERSISTENT);
-	REGISTER_LONG_CONSTANT("VT_UINT", VT_UINT, CONST_CS | CONST_PERSISTENT);
-	REGISTER_LONG_CONSTANT("VT_ARRAY", VT_ARRAY, CONST_CS | CONST_PERSISTENT);
-	REGISTER_LONG_CONSTANT("VT_BYREF", VT_BYREF, CONST_CS | CONST_PERSISTENT);
-
-	/* codepages */
-	REGISTER_LONG_CONSTANT("CP_ACP", CP_ACP, CONST_CS | CONST_PERSISTENT);
-	REGISTER_LONG_CONSTANT("CP_MACCP", CP_MACCP, CONST_CS | CONST_PERSISTENT);
-	REGISTER_LONG_CONSTANT("CP_OEMCP", CP_OEMCP, CONST_CS | CONST_PERSISTENT);
-	REGISTER_LONG_CONSTANT("CP_SYMBOL", CP_SYMBOL, CONST_CS | CONST_PERSISTENT);
-	REGISTER_LONG_CONSTANT("CP_THREAD_ACP", CP_THREAD_ACP, CONST_CS | CONST_PERSISTENT);
-	REGISTER_LONG_CONSTANT("CP_UTF7", CP_UTF7, CONST_CS | CONST_PERSISTENT);
-	REGISTER_LONG_CONSTANT("CP_UTF8", CP_UTF8, CONST_CS | CONST_PERSISTENT);
-
-	php_register_VARIANT_class();
-	return SUCCESS;
-}
-
-PHP_MSHUTDOWN_FUNCTION(VARIANT)
-{
-	return SUCCESS;
-}
-
-void php_VARIANT_call_function_handler(INTERNAL_FUNCTION_PARAMETERS, zend_property_reference *property_reference)
-{
-	pval *object = property_reference->object;
-	zend_overloaded_element *function_name = (zend_overloaded_element *) property_reference->elements_list->tail->data;
-	VARIANT *pVar;
-
-	if((zend_llist_count(property_reference->elements_list)==1) && !strcmp(function_name->element.value.str.val, "variant"))
-	{
-		/* constructor */
-		pval *object_handle, *data, *type, *code_page;
-
-		pVar = emalloc(sizeof(VARIANT));
-		VariantInit(pVar);
-
-		switch(ZEND_NUM_ARGS())
-		{
-			case 0:
-				/* nothing to do */
-				break;
-			case 1:
-				getParameters(ht, 1, &data);
-				php_pval_to_variant(data, pVar, codepage);
-				codepage = CP_ACP;
-				break;
-			case 2:
-				getParameters(ht, 2, &data, &type);
-				php_pval_to_variant_ex(data, pVar, type, codepage);
-				codepage = CP_ACP;
-				break;
-			case 3:
-				getParameters(ht, 3, &data, &type, &code_page);
-				php_pval_to_variant_ex(data, pVar, type, codepage);
-				convert_to_long(code_page);
-				codepage = code_page->value.lval;
-				break;
-			default:
-				WRONG_PARAM_COUNT;
-				break;
-		}
-
-		return_value->type = IS_LONG;
-		return_value->value.lval = zend_list_insert(pVar, le_variant);
-
-		if(!zend_is_true(return_value))
-		{
-			var_reset(object);
-			return;
-		}
-
-		ALLOC_ZVAL(object_handle);
-		*object_handle = *return_value;
-		pval_copy_constructor(object_handle);
-		INIT_PZVAL(object_handle);
-		zend_hash_index_update(object->value.obj.properties, 0, &object_handle, sizeof(pval *), NULL);
-		pval_destructor(&function_name->element);
-	}
-}
-
-
-pval php_VARIANT_get_property_handler(zend_property_reference *property_reference)
-{
-	zend_overloaded_element *overloaded_property;
-	int type;
-
-	pval result, **var_handle, *object = property_reference->object;
-	VARIANT *var_arg;
-
-	/* fetch the VARIANT structure */
-	zend_hash_index_find(object->value.obj.properties, 0, (void **) &var_handle);
-	var_arg = zend_list_find((*var_handle)->value.lval, &type);
-
-	if(!var_arg || (type != le_variant))
-	{
-		var_reset(&result);
-	}
-	else
-	{
-		overloaded_property = (zend_overloaded_element *) property_reference->elements_list->head->data;
-		switch(overloaded_property->type)
-		{
-			case OE_IS_ARRAY:
-				var_reset(&result);
-				break;
-
-			case OE_IS_OBJECT:
-				if(!strcmp(overloaded_property->element.value.str.val, "value"))
-				{
-					php_variant_to_pval(var_arg, &result, 0, codepage);
-				}
-				else if(!strcmp(overloaded_property->element.value.str.val, "type"))
-				{
-					result.value.lval = var_arg->vt;
-					result.type = IS_LONG;
-				}
-				else
-				{
-					var_reset(&result);
-					php_error(E_WARNING, "Unknown member.");
-				}
-				break;
-			case OE_IS_METHOD:
-				var_reset(&result);
-				php_error(E_WARNING, "Unknown method.");
-				break;
-
-				pval_destructor(&overloaded_property->element);
-		}
-	}
-
-	return result;
-}
-
-int php_VARIANT_set_property_handler(zend_property_reference *property_reference, pval *value)
-{
-	zend_overloaded_element *overloaded_property;
-	int type;
-
-	pval **var_handle, *object = property_reference->object;
-	VARIANT *var_arg;
-
-	/* fetch the VARIANT structure */
-	zend_hash_index_find(object->value.obj.properties, 0, (void **) &var_handle);
-	var_arg = zend_list_find((*var_handle)->value.lval, &type);
-
-	if(!var_arg || (type != le_variant))
-		return FAILURE;
-
-	overloaded_property = (zend_overloaded_element *) property_reference->elements_list->head->data;
-	do_VARIANT_propset(var_arg, &overloaded_property->element, value);
-	pval_destructor(&overloaded_property->element);
-	return SUCCESS;
-}
-
-static int do_VARIANT_propset(VARIANT *var_arg, pval *arg_property, pval *value)
-{
-	pval type;
-
-	type.type = IS_STRING;
-
-	if(!strcmp(arg_property->value.str.val, "bVal"))
-	{
-		type.value.lval = VT_UI1;
-	}
-	else if(!strcmp(arg_property->value.str.val, "iVal"))
-	{
-		type.value.lval = VT_I2;
-	}
-	else if(!strcmp(arg_property->value.str.val, "lVal"))
-	{
-		type.value.lval = VT_I4;
-	}
-	else if(!strcmp(arg_property->value.str.val, "fltVal"))
-	{
-		type.value.lval = VT_R4;
-	}
-	else if(!strcmp(arg_property->value.str.val, "dblVal"))
-	{
-		type.value.lval = VT_R8;
-	}
-	else if(!strcmp(arg_property->value.str.val, "boolVal"))
-	{
-		type.value.lval = VT_BOOL;
-	}
-	else if(!strcmp(arg_property->value.str.val, "scode"))
-	{
-		type.value.lval = VT_ERROR;
-	}
-	else if(!strcmp(arg_property->value.str.val, "cyVal"))
-	{
-		type.value.lval = VT_CY;
-	}
-	else if(!strcmp(arg_property->value.str.val, "date"))
-	{
-		type.value.lval = VT_DATE;
-	}
-	else if(!strcmp(arg_property->value.str.val, "bstrVal"))
-	{
-		type.value.lval = VT_BSTR;
-	}
-	else if(!strcmp(arg_property->value.str.val, "pdecVal"))
-	{
-		type.value.lval = VT_DECIMAL|VT_BYREF;
-	}
-	else if(!strcmp(arg_property->value.str.val, "punkVal"))
-	{
-		type.value.lval = VT_UNKNOWN;
-	}
-	else if(!strcmp(arg_property->value.str.val, "pdispVal"))
-	{
-		type.value.lval = VT_DISPATCH;
-	}
-	else if(!strcmp(arg_property->value.str.val, "parray"))
-	{
-		type.value.lval = VT_ARRAY;
-	}
-	else if(!strcmp(arg_property->value.str.val, "pbVal"))
-	{
-		type.value.lval = VT_UI1|VT_BYREF;
-	}
-	else if(!strcmp(arg_property->value.str.val, "piVal"))
-	{
-		type.value.lval = VT_I2|VT_BYREF;
-	}
-	else if(!strcmp(arg_property->value.str.val, "plVal"))
-	{
-		type.value.lval = VT_I4|VT_BYREF;
-	}
-	else if(!strcmp(arg_property->value.str.val, "pfltVal"))
-	{
-		type.value.lval = VT_R4|VT_BYREF;
-	}
-	else if(!strcmp(arg_property->value.str.val, "pdblVal"))
-	{
-		type.value.lval = VT_R8|VT_BYREF;
-	}
-	else if(!strcmp(arg_property->value.str.val, "pboolVal"))
-	{
-		type.value.lval = VT_BOOL|VT_BYREF;
-	}
-	else if(!strcmp(arg_property->value.str.val, "pscode"))
-	{
-		type.value.lval = VT_ERROR|VT_BYREF;
-	}
-	else if(!strcmp(arg_property->value.str.val, "pcyVal"))
-	{
-		type.value.lval = VT_CY|VT_BYREF;
-	}
-	else if(!strcmp(arg_property->value.str.val, "pdate"))
-	{
-		type.value.lval = VT_DATE|VT_BYREF;
-	}
-	else if(!strcmp(arg_property->value.str.val, "pbstrVal"))
-	{
-		type.value.lval = VT_BSTR|VT_BYREF;
-	}
-	else if(!strcmp(arg_property->value.str.val, "ppunkVal"))
-	{
-		type.value.lval = VT_UNKNOWN|VT_BYREF;
-	}
-	else if(!strcmp(arg_property->value.str.val, "ppdispVal"))
-	{
-		type.value.lval = VT_DISPATCH|VT_BYREF;
-	}
-	else if(!strcmp(arg_property->value.str.val, "pparray"))
-	{
-		type.value.lval = VT_ARRAY|VT_BYREF;
-	}
-	else if(!strcmp(arg_property->value.str.val, "pvarVal"))
-	{
-		type.value.lval = VT_VARIANT|VT_BYREF;
-	}
-	else if(!strcmp(arg_property->value.str.val, "byref"))
-	{
-		type.value.lval = VT_BYREF;
-	}
-	else if(!strcmp(arg_property->value.str.val, "cVal"))
-	{
-		type.value.lval = VT_I1;
-	}
-	else if(!strcmp(arg_property->value.str.val, "uiVal"))
-	{
-		type.value.lval = VT_UI2;
-	}
-	else if(!strcmp(arg_property->value.str.val, "ulVal"))
-	{
-		type.value.lval = VT_UI4;
-	}
-	else if(!strcmp(arg_property->value.str.val, "intVal"))
-	{
-		type.value.lval = VT_INT;
-	}
-	else if(!strcmp(arg_property->value.str.val, "uintVal"))
-	{
-		type.value.lval = VT_UINT|VT_BYREF;
-	}
-	else if(!strcmp(arg_property->value.str.val, "pcVal"))
-	{
-		type.value.lval = VT_I1|VT_BYREF;
-	}
-	else if(!strcmp(arg_property->value.str.val, "puiVal"))
-	{
-		type.value.lval = VT_UI2|VT_BYREF;
-	}
-	else if(!strcmp(arg_property->value.str.val, "pulVal"))
-	{
-		type.value.lval = VT_UI4|VT_BYREF;
-	}
-	else if(!strcmp(arg_property->value.str.val, "pintVal"))
-	{
-		type.value.lval = VT_INT|VT_BYREF;
-	}
-	else if(!strcmp(arg_property->value.str.val, "puintVal"))
-	{
-		type.value.lval = VT_UINT|VT_BYREF;
-	}
-	else
-	{
-		php_error(E_WARNING, "Unknown member.");
-		return FAILURE;
-	}
-
-	php_pval_to_variant_ex(value, var_arg, &type, codepage);
-
-	return SUCCESS;
-}
-
-static void php_variant_destructor(zend_rsrc_list_entry *rsrc)
-{
-	efree(rsrc);
-}
-
-void php_register_VARIANT_class()
-{
-	INIT_OVERLOADED_CLASS_ENTRY(VARIANT_class_entry, "VARIANT", NULL,
-								php_VARIANT_call_function_handler,
-								php_VARIANT_get_property_handler,
-								php_VARIANT_set_property_handler);
-
-	zend_register_internal_class(&VARIANT_class_entry);
-}
-
-#endif /* PHP_WIN32 */