]> Pileus Git - grits/blob - src/grits-plugin.c
Add cube GtkGL example
[grits] / src / grits-plugin.c
1 /*
2  * Copyright (C) 2009-2011 Andy Spencer <andy753421@gmail.com>
3  *
4  * This program is free software: you can redistribute it and/or modify
5  * it under the terms of the GNU General Public License as published by
6  * the Free Software Foundation, either version 3 of the License, or
7  * (at your option) any later version.
8  *
9  * This program is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12  * GNU General Public License for more details.
13  *
14  * You should have received a copy of the GNU General Public License
15  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
16  */
17
18 /**
19  * SECTION:grits-plugin
20  * @short_description: Plugin support
21  *
22  * A plugin in grits is a GObject which implements the GritsPlugin interface.
23  * Additionally, each plugin is compiled to a separate shared object and loaded
24  * conditionally at runtime when the plugin is enabled. Each such shared object
25  * should define a GritsPluginConstructor() function named
26  * grits_plugin_NAME_new which will be called when loading the plugin.
27  *
28  * Almost all grits functionality is provided by a set of plugins. Each plugin
29  * can how however much it likes. The interface between plugins and the rest of
30  * grits is intentionally very thin. Since grits is the library, plugins must
31  * manually do everything. For instance, to draw something in the world, the
32  * plugin must add an object to the viewer. Likewise, plugins need to
33  * register callbacks on the viewer in order to receive updates, very little
34  * happens automagically.
35  *
36  * That being said, one thing that plugins do do automagically, is provide a
37  * configuration area.  Since the plugin doesn't know what application is is
38  * being loaded form, it is better for the application to ask the plugin for
39  * it's confirmation area, not the other way around.
40  */
41
42 #include <glib.h>
43 #include <gmodule.h>
44
45 #include <string.h>
46
47 #include "grits-plugin.h"
48
49 /********************
50  * Plugin interface *
51  ********************/
52 static void grits_plugin_base_init(gpointer g_class)
53 {
54         static gboolean is_initialized = FALSE;
55         if (!is_initialized) {
56                 /* add properties and signals to the interface here */
57                 is_initialized = TRUE;
58         }
59 }
60
61 GType grits_plugin_get_type()
62 {
63         static GType type = 0;
64         if (type == 0) {
65                 static const GTypeInfo info = {
66                         sizeof(GritsPluginInterface),
67                         grits_plugin_base_init,
68                         NULL,
69                 };
70                 type = g_type_register_static(G_TYPE_INTERFACE,
71                                 "GritsPlugin", &info, 0);
72         }
73         return type;
74 }
75
76 /**
77  * grits_plugin_get_name:
78  * @plugin: the plugin
79  *
80  * Get a short human readable name for a plugin, this is not necessarily the
81  * same as the name of the shared object.
82  *
83  * Returns: a short name for the plugin
84  */
85 const gchar *grits_plugin_get_name(GritsPlugin *plugin)
86 {
87         if (!GRITS_IS_PLUGIN(plugin))
88                 return NULL;
89         return GRITS_PLUGIN_GET_INTERFACE(plugin)->name;
90 }
91
92 /**
93  * grits_plugin_get_description:
94  * @plugin: the plugin
95  *
96  * Get a description of a plugin
97  *
98  * Returns: a description of the plugin
99  */
100 const gchar *grits_plugin_get_description(GritsPlugin *plugin)
101 {
102         if (!GRITS_IS_PLUGIN(plugin))
103                 return NULL;
104         return GRITS_PLUGIN_GET_INTERFACE(plugin)->description;
105 }
106
107 /**
108  * grits_plugin_get_config:
109  * @plugin: the plugin
110  *
111  * Each plugin can provide a configuration area. Applications using grits
112  * should display this configuration area to the user so they can modify the
113  * behavior of the plugin.
114  *
115  * Returns: a configuration widget for the plugin
116  */
117 GtkWidget *grits_plugin_get_config(GritsPlugin *plugin)
118 {
119         if (!GRITS_IS_PLUGIN(plugin))
120                 return NULL;
121         GritsPluginInterface *iface = GRITS_PLUGIN_GET_INTERFACE(plugin);
122         return iface->get_config ? iface->get_config(plugin) : NULL;
123 }
124
125
126 /***************
127  * Plugins API *
128  ***************/
129 typedef struct {
130         gchar       *name;
131         GritsPlugin *plugin;
132         GModule     *module;
133 } GritsPluginStore;
134
135 /**
136  * grits_plugins_new:
137  * @dir:   the directory to search for plugins in
138  * @prefs: a #GritsPrefs to save the state of plugins, or NULL
139  *
140  * Create a new plugin source. If @prefs is not %NULL, the state of the plugins
141  * will be saved when they are either enabled or disabled.
142  *
143  * Returns: the new plugin source
144  */
145 GritsPlugins *grits_plugins_new(const gchar *dir, GritsPrefs *prefs)
146 {
147         g_debug("GritsPlugins: new - dir=%s", dir);
148         GritsPlugins *plugins = g_new0(GritsPlugins, 1);
149         plugins->prefs = prefs;
150         if (dir)
151                 plugins->dir = g_strdup(dir);
152         return plugins;
153 }
154
155 static void grits_plugins_free_store(GritsPluginStore *store)
156 {
157         g_object_unref(store->plugin);
158         //g_module_close(store->module);
159         g_free(store->name);
160         g_free(store);
161 }
162
163 /**
164  * grits_plugins_free:
165  * @plugins: the #GritsPlugins to free
166  *
167  * Free data used by a plugin source
168  */
169 void grits_plugins_free(GritsPlugins *plugins)
170 {
171         g_debug("GritsPlugins: free");
172         for (GList *cur = plugins->plugins; cur; cur = cur->next) {
173                 GritsPluginStore *store = cur->data;
174                 g_debug("GritsPlugins: freeing %s refs=%d->%d", store->name,
175                         G_OBJECT(store->plugin)->ref_count,
176                         G_OBJECT(store->plugin)->ref_count-1);
177                 grits_plugins_free_store(store);
178         }
179         g_list_free(plugins->plugins);
180         if (plugins->dir)
181                 g_free(plugins->dir);
182         g_free(plugins);
183 }
184
185 /**
186  * grits_plugins_available:
187  * @plugins: the plugin source
188  *
189  * Search the plugin directory for shared objects which can be loaded as
190  * plugins.
191  *
192  * Returns: the list of available plugins
193  */
194 GList *grits_plugins_available(GritsPlugins *plugins)
195 {
196         g_debug("GritsPlugins: available");
197         GList *list = NULL;
198         gchar *dirs[] = {plugins->dir, PLUGINSDIR};
199         g_debug("pluginsdir=%s", PLUGINSDIR);
200         for (int i = 0; i<2; i++) {
201                 if (dirs[i] == NULL)
202                         continue;
203                 GDir *dir = g_dir_open(dirs[i], 0, NULL);
204                 if (dir == NULL)
205                         continue;
206                 g_debug("            checking %s", dirs[i]);
207                 const gchar *name;
208                 while ((name = g_dir_read_name(dir))) {
209                         if (g_pattern_match_simple("*." G_MODULE_SUFFIX, name)) {
210                                 gchar **parts = g_strsplit(name, ".", 2);
211                                 list = g_list_prepend(list, g_strdup(parts[0]));
212                                 g_strfreev(parts);
213                         }
214                 }
215                 g_dir_close(dir);
216         }
217         list = g_list_sort(list, (GCompareFunc)strcmp);
218         for (GList *cur = list; cur; cur = cur->next)
219                 while (cur->next && g_str_equal(cur->data,cur->next->data)) {
220                         GList *tmp = cur->next;
221                         list = g_list_remove_link(list, cur);
222                         cur = tmp;
223                 }
224         return list;
225 }
226
227 /**
228  * grits_plugins_load:
229  * @plugins: the plugins source
230  * @name:    the name of the plugin to load
231  * @viewer:  a #GritsViewer to pass to the plugins constructor
232  * @prefs:   a #GritsPrefs to pass to the plugins constructor
233  *
234  * @name should be the name of the shared object without the file extension.
235  * This is the same as what is returned by grits_plugins_available().
236  *
237  * When loading plugins, the @prefs argument is used, not the #GritsPrefs stored
238  * in @plugins.
239  *
240  * Returns: the new plugin
241  */
242 GritsPlugin *grits_plugins_load(GritsPlugins *plugins, const char *name,
243                 GritsViewer *viewer, GritsPrefs *prefs)
244 {
245         g_debug("GritsPlugins: load %s", name);
246         gchar *path = g_strdup_printf("%s/%s.%s", plugins->dir, name, G_MODULE_SUFFIX);
247         g_debug("GritsPlugins: load - trying %s", path);
248         if (!g_file_test(path, G_FILE_TEST_EXISTS)) {
249                 g_free(path);
250                 path = g_strdup_printf("%s/%s.%s", PLUGINSDIR, name, G_MODULE_SUFFIX);
251         }
252         g_debug("GritsPlugins: load - trying %s", path);
253         if (!g_file_test(path, G_FILE_TEST_EXISTS)) {
254                 g_warning("Module %s not found", name);
255                 g_free(path);
256                 return NULL;
257         }
258         GModule *module = g_module_open(path, G_MODULE_BIND_LAZY);
259         g_free(path);
260         if (module == NULL) {
261                 g_warning("Unable to load module %s: %s", name, g_module_error());
262                 return NULL;
263         }
264
265         gpointer constructor_ptr; // GCC 4.1 fix?
266         gchar *constructor_str = g_strconcat("grits_plugin_", name, "_new", NULL);
267         if (!g_module_symbol(module, constructor_str, &constructor_ptr)) {
268                 g_warning("Unable to load symbol %s from %s: %s",
269                                 constructor_str, name, g_module_error());
270                 g_module_close(module);
271                 g_free(constructor_str);
272                 return NULL;
273         }
274         g_free(constructor_str);
275         GritsPluginConstructor constructor = constructor_ptr;
276
277         GritsPluginStore *store = g_new0(GritsPluginStore, 1);
278         store->name = g_strdup(name);
279         store->plugin = constructor(viewer, prefs);
280         store->module = module;
281         plugins->plugins = g_list_prepend(plugins->plugins, store);
282         return store->plugin;
283 }
284
285 /**
286  * grits_plugins_enable:
287  * @plugins: the plugins source
288  * @name:    the name of the plugin to load
289  * @viewer:  a #GritsViewer to pass to the plugins constructor
290  * @prefs:   a #GritsPrefs to pass to the plugins constructor
291  *
292  * Load a plugin and save it's loaded/unloaded state in the #GritsPrefs stored in
293  * #plugins.
294  *
295  * See also: grits_plugins_load()
296  *
297  * Returns: the new plugin
298  */
299 GritsPlugin *grits_plugins_enable(GritsPlugins *plugins, const char *name,
300                 GritsViewer *viewer, GritsPrefs *prefs)
301 {
302         GritsPlugin *plugin = grits_plugins_load(plugins, name, viewer, prefs);
303         grits_prefs_set_boolean_v(plugins->prefs, "plugins", name, TRUE);
304         return plugin;
305 }
306
307 /**
308  * grits_plugins_load_enabled:
309  * @plugins: the plugins source
310  * @viewer:  a #GritsViewer to pass to the plugins constructor
311  * @prefs:   a #GritsPrefs to pass to the plugins constructor
312  *
313  * Load all enabled which have previously been enabled.
314  *
315  * See also: grits_plugins_load()
316  *
317  * Returns: a list of all loaded plugins
318  */
319 GList *grits_plugins_load_enabled(GritsPlugins *plugins,
320                 GritsViewer *viewer, GritsPrefs *prefs)
321 {
322         GList *loaded = NULL;
323         for (GList *cur = grits_plugins_available(plugins); cur; cur = cur->next) {
324                 gchar *name = cur->data;
325                 if (grits_prefs_get_boolean_v(plugins->prefs, "plugins", name, NULL)) {
326                         GritsPlugin *plugin = grits_plugins_load(plugins, name, viewer, prefs);
327                         loaded = g_list_prepend(loaded, plugin);
328                 }
329         }
330         return loaded;
331 }
332
333 /**
334  * grits_plugins_unload:
335  * @plugins: the plugins source
336  * @name:    the name of the plugin to unload
337  *
338  * Unload a plugin and free any associated data.
339  *
340  * Returns: %FALSE
341  */
342 gboolean grits_plugins_unload(GritsPlugins *plugins, const char *name)
343 {
344         g_debug("GritsPlugins: unload %s", name);
345         for (GList *cur = plugins->plugins; cur; cur = cur->next) {
346                 GritsPluginStore *store = cur->data;
347                 if (g_str_equal(store->name, name)) {
348                         plugins->plugins = g_list_delete_link(plugins->plugins, cur);
349                         grits_plugins_free_store(store);
350                         break;
351                 }
352         }
353         return FALSE;
354 }
355
356 /**
357  * grits_plugins_disable:
358  * @plugins: the plugins source
359  * @name:    the name of the plugin to unload
360  *
361  * Unload a plugin and save it's loaded/unloaded state in the #GritsPrefs stored
362  * in #plugins.
363  *
364  * See also: grits_plugins_unload()
365  *
366  * Returns: %FALSE
367  */
368 gboolean grits_plugins_disable(GritsPlugins *plugins, const char *name)
369 {
370         grits_prefs_set_boolean_v(plugins->prefs, "plugins", name, FALSE);
371         grits_plugins_unload(plugins, name);
372         return FALSE;
373 }
374
375 /**
376  * grits_plugins_foreach:
377  * @plugins:   the plugins source
378  * @callback:  a function to call on each plugin
379  * @user_data: user data to pass to the function
380  *
381  * Iterate over all plugins loaded by the plugins source
382  */
383 void grits_plugins_foreach(GritsPlugins *plugins, GCallback _callback, gpointer user_data)
384 {
385         g_debug("GritsPlugins: foreach");
386         if (plugins == NULL)
387                 return;
388         typedef void (*CBFunc)(GritsPlugin *, const gchar *, gpointer);
389         CBFunc callback = (CBFunc)_callback;
390         for (GList *cur = plugins->plugins; cur; cur = cur->next) {
391                 GritsPluginStore *store = cur->data;
392                 callback(store->plugin, store->name, user_data);
393         }
394 }