| |
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) |