libgaim/plugins/mono/loader/mono.c

branch
cpw.khc.msnp14
changeset 20472
6a6d2ef151e6
parent 11996
858bd928831c
parent 14254
77edc7a6191a
child 20471
1966704b3e42
equal deleted inserted replaced
13912:463b4fa9f067 20472:6a6d2ef151e6
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)

mercurial