Mercurial > pidgin3 / file diff

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/plugins/mono/loader/signal-glue.c	Fri Oct 14 05:00:17 2005 +0000
@@ -0,0 +1,122 @@
+#include "mono-glue.h"
+#include "mono-helper.h"
+#include "debug.h"
+#include "blist.h"
+#include "signals.h"
+#include "value.h"
+
+typedef struct {
+	MonoObject *func;
+	char *signal;
+	GaimValue **values;
+	GaimValue *ret_value;
+	int num_vals;
+} SignalData;
+
+static GaimCallback get_callback(SignalData *sig_data);
+
+static gpointer dispatch_callback(SignalData *sig_data, int num_vals, ...)
+{
+	MonoArray *array;
+	MonoObject *obj;
+	int i;
+	gpointer meth_args[1];
+	gpointer gaim_obj;
+	
+	va_list args;
+	
+	va_start(args, num_vals);
+	
+	array = mono_array_new(mono_loader_get_domain(), mono_get_object_class(), num_vals);
+	
+	for (i = 0; i < num_vals; i++) {
+		if (gaim_value_get_type(sig_data->values[i]) == GAIM_TYPE_SUBTYPE) {
+			gaim_obj = va_arg(args, gpointer);
+			obj = mono_loader_object_from_gaim_subtype(gaim_value_get_subtype(sig_data->values[i]), gaim_obj);
+			mono_array_set(array, MonoObject*, i, obj);
+		} else {
+			gaim_obj = va_arg(args, gpointer);
+			obj = mono_loader_object_from_gaim_type(gaim_value_get_type(sig_data->values[i]), gaim_obj);
+			mono_array_set(array, MonoObject*, i, obj);
+		}
+	}
+	
+	va_end(args);
+	
+	meth_args[0] = array;
+	
+	return mono_runtime_delegate_invoke(sig_data->func, meth_args, NULL);	
+}
+
+static void cb_void__pointer(void *arg1, void *data)
+{
+	dispatch_callback((SignalData*)data, ((SignalData*)data)->num_vals, arg1);
+	
+}
+
+int gaim_signal_connect_glue(MonoObject* h, MonoObject *plugin, MonoString *signal, MonoObject *func)
+{
+	char *sig;
+	void **instance = NULL;
+	SignalData *sig_data;
+		
+	sig = mono_string_to_utf8(signal);
+	gaim_debug(GAIM_DEBUG_INFO, "mono", "connecting signal: %s\n", sig);
+	
+	instance = (void*)mono_object_unbox(h);
+
+	sig_data = g_new0(SignalData, 1);
+	
+	sig_data->func = func;
+	sig_data->signal = sig;
+	
+	gaim_signal_get_values(*instance, sig, &sig_data->ret_value, &sig_data->num_vals, &sig_data->values);
+
+	return gaim_signal_connect(*instance, sig, (gpointer)mono_object_get_class(plugin), get_callback(sig_data), (gpointer)sig_data);
+}
+
+static int determine_index(GaimType type)
+{
+	switch (type) {
+		case GAIM_TYPE_SUBTYPE:
+		case GAIM_TYPE_STRING:
+		case GAIM_TYPE_OBJECT:
+		case GAIM_TYPE_POINTER:
+		case GAIM_TYPE_BOXED:
+			return 1;
+		break;
+		default:
+			return type;
+		break;
+	}
+}
+
+static gpointer callbacks[]= { 
+										NULL,
+										cb_void__pointer,
+									};
+
+static int callbacks_array_size = sizeof(callbacks) / sizeof(GaimCallback);
+	
+
+static GaimCallback get_callback(SignalData *sig_data)
+{
+	int i, index = 0;
+
+	if (sig_data->ret_value == NULL)
+		index = 0;
+	else
+		index = gaim_value_get_type(sig_data->ret_value);
+	
+	for (i = 0; i < sig_data->num_vals; i++) {
+		index += determine_index(gaim_value_get_type(sig_data->values[i]));
+	}
+	
+	if (index >= callbacks_array_size || callbacks[index] == NULL) {
+		gaim_debug(GAIM_DEBUG_ERROR, "mono", "couldn't find a callback function for signal: %s\n", sig_data->signal);
+		return NULL;
+	}
+	
+	gaim_debug(GAIM_DEBUG_MISC, "mono", "using callback at index: %d\n", index);
+	return GAIM_CALLBACK(callbacks[index]);
+}