comparison plugins/mono/loader/mono.c @ 11952:565d2e437c04

[gaim-migrate @ 14243] Another patch attached to sf #1285501, from Eoin Coffey "the loader will now attempt to catch exceptions, so hopefully this will resolve some of the issues we were having." This looked fairly innocuous. committer: Tailor Script <[e-mail]>

11951:b6fa01513d76

#include "version.h"
#include "mono-helper.h"

#define MONO_PLUGIN_ID "core-mono"

/* This is where our code executes */
static MonoDomain *domain = NULL;

/******************************************************************************
 * Loader Stuff
 *****************************************************************************/
/* probes the given plugin to determine if its a plugin */
static gboolean probe_mono_plugin(GaimPlugin *plugin)

	GaimPluginInfo *info;
	GaimMonoPlugin *mplug;

	char *file = plugin->path;

	assm = mono_domain_assembly_open(domain, file);

	if (!assm) {
		return FALSE;
	} 

	if (!mplug->klass) {
		gaim_debug(GAIM_DEBUG_ERROR, "mono", "no plugin class in \'%s\'\n", file);
		return FALSE;
	}

	mplug->obj = mono_object_new(domain, mplug->klass);
	if (!mplug->obj) {
		gaim_debug(GAIM_DEBUG_ERROR, "mono", "obj not valid\n");
		return FALSE;
	}

	if (!(found_load && found_unload && found_destroy && found_info)) {
		gaim_debug(GAIM_DEBUG_ERROR, "mono", "did not find the required methods\n");
		return FALSE;
	}

	plugin_info = mono_runtime_invoke(info_method, mplug->obj, NULL, NULL);

	/* now that the methods are filled out we can populate
	   the info struct with all the needed info */

	info->name = mono_loader_get_prop_string(plugin_info, "Name");

	gaim_debug(GAIM_DEBUG_INFO, "mono", "Loading plugin\n");

	mplug = (GaimMonoPlugin*)plugin->info->extra_info;

	mono_runtime_invoke(mplug->load, mplug->obj, NULL, NULL);

	return TRUE;
}

/* Unloads a Mono Plugin by calling 'unload' in the class */

	mplug = (GaimMonoPlugin*)plugin->info->extra_info;

	gaim_signals_disconnect_by_handle((gpointer)mplug->klass);

	mono_runtime_invoke(mplug->unload, mplug->obj, NULL, NULL);

	return TRUE;
}

/* Destroys a Mono Plugin by calling 'destroy' in the class,
   and cleaning up all the malloced memory */
static void destroy_mono_plugin(GaimPlugin *plugin)
{
	GaimMonoPlugin *mplug;

	gaim_debug(GAIM_DEBUG_INFO, "mono", "Destroying plugin\n");

	mplug = (GaimMonoPlugin*)plugin->info->extra_info;

	mono_runtime_invoke(mplug->destroy, mplug->obj, NULL, NULL);

	if (plugin->info) {
		g_free(plugin->info->name);
		g_free(plugin->info->version);
		g_free(plugin->info->summary);

/******************************************************************************
 * Plugin Stuff
 *****************************************************************************/
static void plugin_destroy(GaimPlugin *plugin)
{
	mono_jit_cleanup(domain);
}

static GaimPluginLoaderInfo loader_info =
{
	NULL,

	&loader_info,
	NULL,
	NULL
};

/* Creates the domain to execute in, and setups our CS Gaim API (note:
   in the future the 'mono_add_internal_call' will be spread through out
   the source to whatever module is exposing the API; this function will
   simply call helper functions to do so) */
static void init_plugin(GaimPlugin *plugin)
{
	domain = mono_jit_init("gaim");

	mono_loader_set_domain(domain);

	mono_loader_init_internal_calls();

11952:565d2e437c04

#include "version.h"
#include "mono-helper.h"

#define MONO_PLUGIN_ID "core-mono"

/******************************************************************************
 * Loader Stuff
 *****************************************************************************/
/* probes the given plugin to determine if its a plugin */
static gboolean probe_mono_plugin(GaimPlugin *plugin)

	GaimPluginInfo *info;
	GaimMonoPlugin *mplug;

	char *file = plugin->path;

	assm = mono_domain_assembly_open(mono_loader_get_domain(), file);

	if (!assm) {
		return FALSE;
	} 

	if (!mplug->klass) {
		gaim_debug(GAIM_DEBUG_ERROR, "mono", "no plugin class in \'%s\'\n", file);
		return FALSE;
	}

	mplug->obj = mono_object_new(mono_loader_get_domain(), mplug->klass);
	if (!mplug->obj) {
		gaim_debug(GAIM_DEBUG_ERROR, "mono", "obj not valid\n");
		return FALSE;
	}

	if (!(found_load && found_unload && found_destroy && found_info)) {
		gaim_debug(GAIM_DEBUG_ERROR, "mono", "did not find the required methods\n");
		return FALSE;
	}

	plugin_info = mono_loader_invoke(info_method, mplug->obj, NULL);

	/* now that the methods are filled out we can populate
	   the info struct with all the needed info */

	info->name = mono_loader_get_prop_string(plugin_info, "Name");

	gaim_debug(GAIM_DEBUG_INFO, "mono", "Loading plugin\n");

	mplug = (GaimMonoPlugin*)plugin->info->extra_info;

	mono_loader_invoke(mplug->load, mplug->obj, NULL);

	return TRUE;
}

/* Unloads a Mono Plugin by calling 'unload' in the class */

	mplug = (GaimMonoPlugin*)plugin->info->extra_info;

	gaim_signals_disconnect_by_handle((gpointer)mplug->klass);

	mono_loader_invoke(mplug->unload, mplug->obj, NULL);

	return TRUE;
}

static void destroy_mono_plugin(GaimPlugin *plugin)
{
	GaimMonoPlugin *mplug;

	gaim_debug(GAIM_DEBUG_INFO, "mono", "Destroying plugin\n");

	mplug = (GaimMonoPlugin*)plugin->info->extra_info;

	mono_loader_invoke(mplug->destroy, mplug->obj, NULL);

	if (plugin->info) {
		g_free(plugin->info->name);
		g_free(plugin->info->version);
		g_free(plugin->info->summary);

/******************************************************************************
 * Plugin Stuff
 *****************************************************************************/
static void plugin_destroy(GaimPlugin *plugin)
{
	mono_jit_cleanup(mono_loader_get_domain());
}

static GaimPluginLoaderInfo loader_info =
{
	NULL,

	&loader_info,
	NULL,
	NULL
};

static void init_plugin(GaimPlugin *plugin)
{
	MonoDomain *domain = mono_jit_init("gaim");

	mono_loader_set_domain(domain);

	mono_loader_init_internal_calls();