| 1 /* |
|
| 2 * Mono Plugin Loader |
|
| 3 * |
|
| 4 * -- Thanks to the perl plugin loader for all the great tips ;-) |
|
| 5 * |
|
| 6 * Eoin Coffey |
|
| 7 */ |
|
| 8 |
|
| 9 #ifdef HAVE_CONFIG_H |
|
| 10 # include <config.h> |
|
| 11 #endif |
|
| 12 |
|
| 13 #include "internal.h" |
|
| 14 #include "debug.h" |
|
| 15 #include "plugin.h" |
|
| 16 #include "version.h" |
|
| 17 #include "mono-helper.h" |
|
| 18 |
|
| 19 #define MONO_PLUGIN_ID "core-mono" |
|
| 20 |
|
| 21 /****************************************************************************** |
|
| 22 * Loader Stuff |
|
| 23 *****************************************************************************/ |
|
| 24 /* probes the given plugin to determine if its a plugin */ |
|
| 25 static gboolean probe_mono_plugin(GaimPlugin *plugin) |
|
| 26 { |
|
| 27 MonoAssembly *assm; |
|
| 28 MonoMethod *m = NULL; |
|
| 29 MonoMethod *info_method = NULL; |
|
| 30 MonoObject *plugin_info; |
|
| 31 gboolean found_load = FALSE, found_unload = FALSE, found_destroy = FALSE, found_info = FALSE; |
|
| 32 gpointer iter = NULL; |
|
| 33 |
|
| 34 GaimPluginInfo *info; |
|
| 35 GaimMonoPlugin *mplug; |
|
| 36 |
|
| 37 char *file = plugin->path; |
|
| 38 |
|
| 39 assm = mono_domain_assembly_open(ml_get_domain(), file); |
|
| 40 |
|
| 41 if (!assm) { |
|
| 42 return FALSE; |
|
| 43 } |
|
| 44 |
|
| 45 gaim_debug(GAIM_DEBUG_INFO, "mono", "Probing plugin\n"); |
|
| 46 |
|
| 47 if (ml_is_api_dll(mono_assembly_get_image(assm))) { |
|
| 48 gaim_debug(GAIM_DEBUG_INFO, "mono", "Found our GaimAPI.dll\n"); |
|
| 49 return FALSE; |
|
| 50 } |
|
| 51 |
|
| 52 info = g_new0(GaimPluginInfo, 1); |
|
| 53 mplug = g_new0(GaimMonoPlugin, 1); |
|
| 54 |
|
| 55 mplug->signal_data = NULL; |
|
| 56 |
|
| 57 mplug->assm = assm; |
|
| 58 |
|
| 59 mplug->klass = ml_find_plugin_class(mono_assembly_get_image(mplug->assm)); |
|
| 60 if (!mplug->klass) { |
|
| 61 gaim_debug(GAIM_DEBUG_ERROR, "mono", "no plugin class in \'%s\'\n", file); |
|
| 62 return FALSE; |
|
| 63 } |
|
| 64 |
|
| 65 mplug->obj = mono_object_new(ml_get_domain(), mplug->klass); |
|
| 66 if (!mplug->obj) { |
|
| 67 gaim_debug(GAIM_DEBUG_ERROR, "mono", "obj not valid\n"); |
|
| 68 return FALSE; |
|
| 69 } |
|
| 70 |
|
| 71 mono_runtime_object_init(mplug->obj); |
|
| 72 |
|
| 73 while ((m = mono_class_get_methods(mplug->klass, &iter))) { |
|
| 74 if (strcmp(mono_method_get_name(m), "Load") == 0) { |
|
| 75 mplug->load = m; |
|
| 76 found_load = TRUE; |
|
| 77 } else if (strcmp(mono_method_get_name(m), "Unload") == 0) { |
|
| 78 mplug->unload = m; |
|
| 79 found_unload = TRUE; |
|
| 80 } else if (strcmp(mono_method_get_name(m), "Destroy") == 0) { |
|
| 81 mplug->destroy = m; |
|
| 82 found_destroy = TRUE; |
|
| 83 } else if (strcmp(mono_method_get_name(m), "Info") == 0) { |
|
| 84 info_method = m; |
|
| 85 found_info = TRUE; |
|
| 86 } |
|
| 87 } |
|
| 88 |
|
| 89 if (!(found_load && found_unload && found_destroy && found_info)) { |
|
| 90 gaim_debug(GAIM_DEBUG_ERROR, "mono", "did not find the required methods\n"); |
|
| 91 return FALSE; |
|
| 92 } |
|
| 93 |
|
| 94 plugin_info = ml_invoke(info_method, mplug->obj, NULL); |
|
| 95 |
|
| 96 /* now that the methods are filled out we can populate |
|
| 97 the info struct with all the needed info */ |
|
| 98 |
|
| 99 info->name = ml_get_prop_string(plugin_info, "Name"); |
|
| 100 info->version = ml_get_prop_string(plugin_info, "Version"); |
|
| 101 info->summary = ml_get_prop_string(plugin_info, "Summary"); |
|
| 102 info->description = ml_get_prop_string(plugin_info, "Description"); |
|
| 103 info->author = ml_get_prop_string(plugin_info, "Author"); |
|
| 104 info->homepage = ml_get_prop_string(plugin_info, "Homepage"); |
|
| 105 |
|
| 106 info->magic = GAIM_PLUGIN_MAGIC; |
|
| 107 info->major_version = GAIM_MAJOR_VERSION; |
|
| 108 info->minor_version = GAIM_MINOR_VERSION; |
|
| 109 info->type = GAIM_PLUGIN_STANDARD; |
|
| 110 |
|
| 111 /* this plugin depends on us; duh */ |
|
| 112 info->dependencies = g_list_append(info->dependencies, MONO_PLUGIN_ID); |
|
| 113 mplug->plugin = plugin; |
|
| 114 |
|
| 115 plugin->info = info; |
|
| 116 info->extra_info = mplug; |
|
| 117 |
|
| 118 ml_add_plugin(mplug); |
|
| 119 |
|
| 120 return gaim_plugin_register(plugin); |
|
| 121 } |
|
| 122 |
|
| 123 /* Loads a Mono Plugin by calling 'load' in the class */ |
|
| 124 static gboolean load_mono_plugin(GaimPlugin *plugin) |
|
| 125 { |
|
| 126 GaimMonoPlugin *mplug; |
|
| 127 |
|
| 128 gaim_debug(GAIM_DEBUG_INFO, "mono", "Loading plugin\n"); |
|
| 129 |
|
| 130 mplug = (GaimMonoPlugin*)plugin->info->extra_info; |
|
| 131 |
|
| 132 ml_invoke(mplug->load, mplug->obj, NULL); |
|
| 133 |
|
| 134 return TRUE; |
|
| 135 } |
|
| 136 |
|
| 137 /* Unloads a Mono Plugin by calling 'unload' in the class */ |
|
| 138 static gboolean unload_mono_plugin(GaimPlugin *plugin) |
|
| 139 { |
|
| 140 GaimMonoPlugin *mplug; |
|
| 141 |
|
| 142 gaim_debug(GAIM_DEBUG_INFO, "mono", "Unloading plugin\n"); |
|
| 143 |
|
| 144 mplug = (GaimMonoPlugin*)plugin->info->extra_info; |
|
| 145 |
|
| 146 gaim_signals_disconnect_by_handle((gpointer)mplug->klass); |
|
| 147 g_list_foreach(mplug->signal_data, (GFunc)g_free, NULL); |
|
| 148 g_list_free(mplug->signal_data); |
|
| 149 mplug->signal_data = NULL; |
|
| 150 |
|
| 151 ml_invoke(mplug->unload, mplug->obj, NULL); |
|
| 152 |
|
| 153 return TRUE; |
|
| 154 } |
|
| 155 |
|
| 156 static void destroy_mono_plugin(GaimPlugin *plugin) |
|
| 157 { |
|
| 158 GaimMonoPlugin *mplug; |
|
| 159 |
|
| 160 gaim_debug(GAIM_DEBUG_INFO, "mono", "Destroying plugin\n"); |
|
| 161 |
|
| 162 mplug = (GaimMonoPlugin*)plugin->info->extra_info; |
|
| 163 |
|
| 164 ml_invoke(mplug->destroy, mplug->obj, NULL); |
|
| 165 |
|
| 166 if (plugin->info) { |
|
| 167 g_free(plugin->info->name); |
|
| 168 g_free(plugin->info->version); |
|
| 169 g_free(plugin->info->summary); |
|
| 170 g_free(plugin->info->description); |
|
| 171 g_free(plugin->info->author); |
|
| 172 g_free(plugin->info->homepage); |
|
| 173 } |
|
| 174 |
|
| 175 if (mplug) { |
|
| 176 if (mplug->assm) { |
|
| 177 mono_assembly_close(mplug->assm); |
|
| 178 } |
|
| 179 |
|
| 180 g_free(mplug); |
|
| 181 mplug = NULL; |
|
| 182 } |
|
| 183 } |
|
| 184 |
|
| 185 /****************************************************************************** |
|
| 186 * Plugin Stuff |
|
| 187 *****************************************************************************/ |
|
| 188 static void plugin_destroy(GaimPlugin *plugin) |
|
| 189 { |
|
| 190 ml_uninit(); |
|
| 191 } |
|
| 192 |
|
| 193 static GaimPluginLoaderInfo loader_info = |
|
| 194 { |
|
| 195 NULL, |
|
| 196 probe_mono_plugin, |
|
| 197 load_mono_plugin, |
|
| 198 unload_mono_plugin, |
|
| 199 destroy_mono_plugin |
|
| 200 }; |
|
| 201 |
|
| 202 static GaimPluginInfo info = |
|
| 203 { |
|
| 204 GAIM_PLUGIN_MAGIC, |
|
| 205 GAIM_MAJOR_VERSION, |
|
| 206 GAIM_MINOR_VERSION, |
|
| 207 GAIM_PLUGIN_LOADER, |
|
| 208 NULL, |
|
| 209 0, |
|
| 210 NULL, |
|
| 211 GAIM_PRIORITY_DEFAULT, |
|
| 212 MONO_PLUGIN_ID, |
|
| 213 N_("Mono Plugin Loader"), |
|
| 214 VERSION, |
|
| 215 N_("Loads .NET plugins with Mono."), |
|
| 216 N_("Loads .NET plugins with Mono."), |
|
| 217 "Eoin Coffey <ecoffey@simla.colostate.edu>", |
|
| 218 GAIM_WEBSITE, |
|
| 219 NULL, |
|
| 220 NULL, |
|
| 221 plugin_destroy, |
|
| 222 NULL, |
|
| 223 &loader_info, |
|
| 224 NULL, |
|
| 225 NULL |
|
| 226 }; |
|
| 227 |
|
| 228 static void init_plugin(GaimPlugin *plugin) |
|
| 229 { |
|
| 230 ml_init(); |
|
| 231 |
|
| 232 loader_info.exts = g_list_append(loader_info.exts, "dll"); |
|
| 233 } |
|
| 234 |
|
| 235 GAIM_INIT_PLUGIN(mono, init_plugin, info) |
|