1 files changed, 182 insertions, 0 deletions
diff --git a/plugin-loaders/c/pluma-plugin-loader-c.c b/plugin-loaders/c/pluma-plugin-loader-c.c
new file mode 100755
index 00000000..09f0cccd
--- /dev/null
+++ b/plugin-loaders/c/pluma-plugin-loader-c.c
@@ -0,0 +1,182 @@
+/*
+ * pluma-plugin-loader-c.c
+ * This file is part of pluma
+ *
+ * Copyright (C) 2008 - Jesse van den Kieboom
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, 
+ * Boston, MA 02111-1307, USA. 
+ */
+
+#include "pluma-plugin-loader-c.h"
+#include <pluma/pluma-object-module.h>
+
+#define PLUMA_PLUGIN_LOADER_C_GET_PRIVATE(object)(G_TYPE_INSTANCE_GET_PRIVATE((object), PLUMA_TYPE_PLUGIN_LOADER_C, PlumaPluginLoaderCPrivate))
+
+struct _PlumaPluginLoaderCPrivate
+{
+ GHashTable *loaded_plugins;
+};
+
+static void pluma_plugin_loader_iface_init (gpointer g_iface, gpointer iface_data);
+
+PLUMA_PLUGIN_LOADER_REGISTER_TYPE (PlumaPluginLoaderC, pluma_plugin_loader_c, G_TYPE_OBJECT, pluma_plugin_loader_iface_init);
+
+
+static const gchar *
+pluma_plugin_loader_iface_get_id (void)
+{
+ return "C";
+}
+
+static PlumaPlugin *
+pluma_plugin_loader_iface_load (PlumaPluginLoader *loader,
+ PlumaPluginInfo *info,
+ const gchar *path)
+{
+ PlumaPluginLoaderC *cloader = PLUMA_PLUGIN_LOADER_C (loader);
+ PlumaObjectModule *module;
+ const gchar *module_name;
+ PlumaPlugin *result;
+
+ module = (PlumaObjectModule *)g_hash_table_lookup (cloader->priv->loaded_plugins, info);
+ module_name = pluma_plugin_info_get_module_name (info);
+
+ if (module == NULL)
+ {
+ /* For now we force all modules to be resident */
+ module = pluma_object_module_new (module_name,
+ path,
+ "register_pluma_plugin",
+ TRUE);
+
+ /* Infos are available for all the lifetime of the loader.
+ * If this changes, we should use weak refs or something */
+
+ g_hash_table_insert (cloader->priv->loaded_plugins, info, module);
+ }
+
+ if (!g_type_module_use (G_TYPE_MODULE (module)))
+ {
+ g_warning ("Could not load plugin module: %s", pluma_plugin_info_get_name (info));
+
+ return NULL;
+ }
+
+ /* TODO: for now we force data-dir-name = module-name... if needed we can
+ * add a datadir field to the plugin descriptor file.
+ */
+ result = (PlumaPlugin *)pluma_object_module_new_object (module,
+ "install-dir", path,
+ "data-dir-name", module_name,
+ NULL);
+
+ if (!result)
+ {
+ g_warning ("Could not create plugin object: %s", pluma_plugin_info_get_name (info));
+ g_type_module_unuse (G_TYPE_MODULE (module));
+ 
+ return NULL;
+ }
+
+ g_type_module_unuse (G_TYPE_MODULE (module));
+ 
+ return result;
+}
+
+static void
+pluma_plugin_loader_iface_unload (PlumaPluginLoader *loader,
+ PlumaPluginInfo *info)
+{
+ //PlumaPluginLoaderC *cloader = PLUMA_PLUGIN_LOADER_C (loader);
+ 
+ /* this is a no-op, since the type module will be properly unused as
+ the last reference to the plugin dies. When the plugin is activated
+ again, the library will be reloaded */
+}
+
+static void
+pluma_plugin_loader_iface_init (gpointer g_iface, 
+ gpointer iface_data)
+{
+ PlumaPluginLoaderInterface *iface = (PlumaPluginLoaderInterface *)g_iface;
+ 
+ iface->get_id = pluma_plugin_loader_iface_get_id;
+ iface->load = pluma_plugin_loader_iface_load;
+ iface->unload = pluma_plugin_loader_iface_unload;
+}
+
+static void
+pluma_plugin_loader_c_finalize (GObject *object)
+{
+ PlumaPluginLoaderC *cloader = PLUMA_PLUGIN_LOADER_C (object);
+ GList *infos;
+ GList *item;
+
+ /* FIXME: this sanity check it's not efficient. Let's remove it
+ * once we are confident with the code */
+
+ infos = g_hash_table_get_keys (cloader->priv->loaded_plugins);
+ 
+ for (item = infos; item; item = item->next)
+ {
+ PlumaPluginInfo *info = (PlumaPluginInfo *)item->data;
+
+ if (pluma_plugin_info_is_active (info))
+ {
+ g_warning ("There are still C plugins loaded during destruction");
+ break;
+ }
+ }
+
+ g_list_free (infos); 
+
+ g_hash_table_destroy (cloader->priv->loaded_plugins);
+ 
+ G_OBJECT_CLASS (pluma_plugin_loader_c_parent_class)->finalize (object);
+}
+
+static void
+pluma_plugin_loader_c_class_init (PlumaPluginLoaderCClass *klass)
+{
+ GObjectClass *object_class = G_OBJECT_CLASS (klass);
+ 
+ object_class->finalize = pluma_plugin_loader_c_finalize;
+
+ g_type_class_add_private (object_class, sizeof (PlumaPluginLoaderCPrivate));
+}
+
+static void
+pluma_plugin_loader_c_class_finalize (PlumaPluginLoaderCClass *klass)
+{
+}
+
+static void
+pluma_plugin_loader_c_init (PlumaPluginLoaderC *self)
+{
+ self->priv = PLUMA_PLUGIN_LOADER_C_GET_PRIVATE (self);
+ 
+ /* loaded_plugins maps PlumaPluginInfo to a PlumaObjectModule */
+ self->priv->loaded_plugins = g_hash_table_new (g_direct_hash,
+ g_direct_equal);
+}
+
+PlumaPluginLoaderC *
+pluma_plugin_loader_c_new ()
+{
+ GObject *loader = g_object_new (PLUMA_TYPE_PLUGIN_LOADER_C, NULL);
+
+ return PLUMA_PLUGIN_LOADER_C (loader);
+}