From 3071d472057feb974bd5167d3a3ef9297b602b26 Mon Sep 17 00:00:00 2001
From: Cyrille Bagard <nocbos@gmail.com>
Date: Mon, 8 Feb 2021 00:18:18 +0100
Subject: Extended the Python API to list plugins.

---
 plugins/pychrysalide/plugins/constants.c |  47 ++++++++
 plugins/pychrysalide/plugins/constants.h |   3 +
 plugins/pychrysalide/plugins/module.c    | 201 ++++++++++++++++++++++++++++++-
 src/plugins/pglist.c                     |  43 ++++++-
 src/plugins/pglist.h                     |   7 +-
 5 files changed, 293 insertions(+), 8 deletions(-)

diff --git a/plugins/pychrysalide/plugins/constants.c b/plugins/pychrysalide/plugins/constants.c
index 9de044a..8791d91 100644
--- a/plugins/pychrysalide/plugins/constants.c
+++ b/plugins/pychrysalide/plugins/constants.c
@@ -98,3 +98,50 @@ bool define_plugin_module_constants(PyTypeObject *type)
     return result;
 
 }
+
+
+/******************************************************************************
+*                                                                             *
+*  Paramètres  : arg = argument quelconque à tenter de convertir.             *
+*                dst = destination des valeurs récupérées en cas de succès.   *
+*                                                                             *
+*  Description : Tente de convertir en constante PluginAction.                *
+*                                                                             *
+*  Retour      : Bilan de l'opération, voire indications supplémentaires.     *
+*                                                                             *
+*  Remarques   : -                                                            *
+*                                                                             *
+******************************************************************************/
+
+int convert_to_plugin_action(PyObject *arg, void *dst)
+{
+    int result;                             /* Bilan à retourner           */
+    unsigned long value;                    /* Valeur récupérée            */
+
+    result = PyObject_IsInstance(arg, (PyObject *)&PyLong_Type);
+
+    switch (result)
+    {
+        case -1:
+            /* L'exception est déjà fixée par Python */
+            result = 0;
+            break;
+
+        case 0:
+            PyErr_SetString(PyExc_TypeError, "unable to convert the provided argument to PluginAction");
+            break;
+
+        case 1:
+            value = PyLong_AsUnsignedLong(arg);
+            *((PluginAction *)dst) = value;
+            break;
+
+        default:
+            assert(false);
+            break;
+
+    }
+
+    return result;
+
+}
diff --git a/plugins/pychrysalide/plugins/constants.h b/plugins/pychrysalide/plugins/constants.h
index 71abcff..56612c9 100644
--- a/plugins/pychrysalide/plugins/constants.h
+++ b/plugins/pychrysalide/plugins/constants.h
@@ -33,6 +33,9 @@
 /* Définit les constantes relatives aux greffons Python. */
 bool define_plugin_module_constants(PyTypeObject *);
 
+/* Tente de convertir en constante PluginAction. */
+int convert_to_plugin_action(PyObject *, void *);
+
 
 
 #endif  /* _PLUGINS_PYCHRYSALIDE_PLUGINS_CONSTANTS_H */
diff --git a/plugins/pychrysalide/plugins/module.c b/plugins/pychrysalide/plugins/module.c
index c38caa3..1c7b326 100644
--- a/plugins/pychrysalide/plugins/module.c
+++ b/plugins/pychrysalide/plugins/module.c
@@ -26,13 +26,201 @@
 
 
 #include <assert.h>
+#include <malloc.h>
+#include <pygobject.h>
 
 
+#include <plugins/pglist.h>
+
+
+#include "constants.h"
 #include "plugin.h"
 #include "../helpers.h"
 
 
 
+/* Fournit le greffon répondant à un nom donné. */
+static PyObject *py_plugins_get_plugin_by_name(PyObject *, PyObject *);
+
+/* Fournit la liste de l'ensemble des greffons. */
+static PyObject *py_plugins_get_all_plugins(PyObject *, PyObject *);
+
+/* Fournit les greffons offrant le service demandé. */
+static PyObject *py_plugins_get_all_plugins_for_action(PyObject *, PyObject *);
+
+
+
+/******************************************************************************
+*                                                                             *
+*  Paramètres  : self = NULL car méthode statique.                            *
+*                args = désignation du greffon recherché.                     *
+*                                                                             *
+*  Description : Fournit le greffon répondant à un nom donné.                 *
+*                                                                             *
+*  Retour      : Instance du greffon trouvé avec son indice, ou None si aucun.*
+*                                                                             *
+*  Remarques   : -                                                            *
+*                                                                             *
+******************************************************************************/
+
+static PyObject *py_plugins_get_plugin_by_name(PyObject *self, PyObject *args)
+{
+    PyObject *result;                       /* Valeur à retourner          */
+    const char *name;                       /* Désignation de greffon      */
+    int ret;                                /* Bilan de lecture des args.  */
+    size_t index;                           /* Indice de la trouvaille     */
+    GPluginModule *plugin;                  /* Greffon retrouvé ou NULL    */
+
+#define PY_PLUGINS_GET_PLUGIN_BY_NAME_METHOD PYTHON_METHOD_DEF  \
+(                                                               \
+     get_plugin_by_name, "name",                                \
+     METH_VARARGS, py_plugins,                                  \
+     "Find a given plugin from the list of loaded plugins.\n"   \
+     "\n"                                                       \
+     "The *name* string define the target to find.\n"           \
+     "\n"                                                       \
+     "The returned value is a tuple of the found"               \
+     " pychrysalide.plugins.PluginModule instance and its"      \
+     " value, or None in case of search failure."               \
+)
+
+    ret = PyArg_ParseTuple(args, "s", &name);
+    if (!ret) return NULL;
+
+    lock_plugin_list_for_reading();
+
+    plugin = get_plugin_by_name(name, &index);
+
+    unlock_plugin_list_for_reading();
+
+    if (plugin != NULL)
+    {
+        result = PyTuple_New(2);
+
+        PyTuple_SetItem(result, 0, pygobject_new(G_OBJECT(plugin)));
+        PyTuple_SetItem(result, 1, PyLong_FromSize_t(index));
+
+        g_object_unref(G_OBJECT(plugin));
+
+    }
+
+    else
+    {
+        result = Py_None;
+        Py_INCREF(result);
+    }
+
+    return result;
+
+}
+
+
+/******************************************************************************
+*                                                                             *
+*  Paramètres  : self = NULL car méthode statique.                            *
+*                args = non utilisé ici.                                      *
+*                                                                             *
+*  Description : Fournit la liste de l'ensemble des greffons.                 *
+*                                                                             *
+*  Retour      : Liste de tous les greffons chargés.                          *
+*                                                                             *
+*  Remarques   : -                                                            *
+*                                                                             *
+******************************************************************************/
+
+static PyObject *py_plugins_get_all_plugins(PyObject *self, PyObject *args)
+{
+    PyObject *result;                       /* Valeur à retourner          */
+    size_t count;                           /* Taille de la liste finale   */
+    GPluginModule **plugins;                /* Liste de greffons chargés   */
+    size_t i;                               /* Boucle de parcours          */
+
+#define PY_PLUGINS_GET_ALL_PLUGINS_METHOD PYTHON_METHOD_DEF     \
+(                                                               \
+     get_all_plugins, "/",                                      \
+     METH_NOARGS, py_plugins,                                   \
+     "Provide the list of all loaded plugins.\n"                \
+     "\n"                                                       \
+     "The returned value is a tuple of"                         \
+     " pychrysalide.plugins.PluginModule instances."            \
+)
+
+    plugins = get_all_plugins(&count);
+
+    result = PyTuple_New(count);
+
+    for (i = 0; i < count; i++)
+    {
+        PyTuple_SetItem(result, i, pygobject_new(G_OBJECT(plugins[i])));
+        g_object_unref(G_OBJECT(plugins[i]));
+    }
+
+    if (plugins != NULL)
+        free(plugins);
+
+    return result;
+
+}
+
+
+/******************************************************************************
+*                                                                             *
+*  Paramètres  : self = NULL car méthode statique.                            *
+*                args = fonctionnalité recherchée.                            *
+*                                                                             *
+*  Description : Fournit les greffons offrant le service demandé.             *
+*                                                                             *
+*  Retour      : Liste de greffons correspondants issue d'un tri interne.     *
+*                                                                             *
+*  Remarques   : -                                                            *
+*                                                                             *
+******************************************************************************/
+
+static PyObject *py_plugins_get_all_plugins_for_action(PyObject *self, PyObject *args)
+{
+    PyObject *result;                       /* Valeur à retourner          */
+    PluginAction action;                    /* Fonctionnalité recherchée   */
+    int ret;                                /* Bilan de lecture des args.  */
+
+    size_t count;                           /* Taille de la liste finale   */
+    GPluginModule **plugins;                /* Liste de greffons chargés   */
+    size_t i;                               /* Boucle de parcours          */
+
+#define PY_PLUGINS_GET_ALL_PLUGINS_FOR_ACTION_METHOD PYTHON_METHOD_DEF  \
+(                                                                       \
+     get_all_plugins_for_action, "action",                              \
+     METH_VARARGS, py_plugins,                                          \
+     "Provide the list of all loaded plugins suitable for a given"      \
+     " action.\n"                                                       \
+     "\n"                                                               \
+     "The *action* has to be one of the"                                \
+     " pychrysalide.plugins.PluginModule.PluginAction values.\n"        \
+     "\n"                                                               \
+     "The returned value is a tuple of"                                 \
+     " matching pychrysalide.plugins.PluginModule instances."           \
+)
+
+    ret = PyArg_ParseTuple(args, "O&", convert_to_plugin_action, &action);
+    if (!ret) return NULL;
+
+    plugins = get_all_plugins_for_action(action, &count);
+
+    result = PyTuple_New(count);
+
+    for (i = 0; i < count; i++)
+    {
+        PyTuple_SetItem(result, i, pygobject_new(G_OBJECT(plugins[i])));
+        g_object_unref(G_OBJECT(plugins[i]));
+    }
+
+    if (plugins != NULL)
+        free(plugins);
+
+    return result;
+
+}
+
+
 /******************************************************************************
 *                                                                             *
 *  Paramètres  : super = module dont la définition est à compléter.           *
@@ -52,11 +240,18 @@ bool add_plugins_module(PyObject *super)
 
 #define PYCHRYSALIDE_PLUGINS_DOC                                            \
     "This module provides features to deal with plugins: the definitions"   \
-    " required to build new Python plugins as well as functions to"         \
-    " interact with existing plugins.\n"                                    \
+    " required to build new Python plugins as well as the functions"        \
+    " suitable to interact with existing plugins.\n"                        \
     "\n"                                                                    \
     "The module is also the place for all plugins without another home."
 
+    static PyMethodDef py_plugins_methods[] = {
+        PY_PLUGINS_GET_PLUGIN_BY_NAME_METHOD,
+        PY_PLUGINS_GET_ALL_PLUGINS_METHOD,
+        PY_PLUGINS_GET_ALL_PLUGINS_FOR_ACTION_METHOD,
+        { NULL }
+    };
+
     static PyModuleDef py_chrysalide_plugins_module = {
 
         .m_base = PyModuleDef_HEAD_INIT,
@@ -66,6 +261,8 @@ bool add_plugins_module(PyObject *super)
 
         .m_size = -1,
 
+        .m_methods = py_plugins_methods
+
     };
 
     module = build_python_module(super, &py_chrysalide_plugins_module);
diff --git a/src/plugins/pglist.c b/src/plugins/pglist.c
index 18a2f3f..bbd2d36 100644
--- a/src/plugins/pglist.c
+++ b/src/plugins/pglist.c
@@ -499,7 +499,7 @@ void load_remaning_plugins(void)
 *  Paramètres  : name  = désignation du greffon recherché.                    *
 *                index = indice du greffon trouvé. [OUT]                      *
 *                                                                             *
-*  Description : Founit le greffon répondant à un nom donné.                  *
+*  Description : Fournit le greffon répondant à un nom donné.                 *
 *                                                                             *
 *  Retour      : Instance du greffon trouvé ou NULL si aucun.                 *
 *                                                                             *
@@ -548,10 +548,45 @@ GPluginModule *get_plugin_by_name(const char *name, size_t *index)
 
 /******************************************************************************
 *                                                                             *
+*  Paramètres  : count = nombre de greffons trouvés. [OUT]                    *
+*                                                                             *
+*  Description : Fournit la liste de l'ensemble des greffons.                 *
+*                                                                             *
+*  Retour      : Liste de tous les greffons chargés.                          *
+*                                                                             *
+*  Remarques   : -                                                            *
+*                                                                             *
+******************************************************************************/
+
+GPluginModule **get_all_plugins(size_t *count)
+{
+    GPluginModule **result;                 /* Liste à retourner           */
+    size_t i;                               /* Boucle de parcours          */
+
+    g_rw_lock_reader_lock(&_pg_lock);
+
+    result = malloc(_pg_count * sizeof(GPluginModule *));
+    *count = _pg_count;
+
+    for (i = 0; i < _pg_count; i++)
+    {
+        result[i] = _pg_list[i];
+        g_object_ref(G_OBJECT(_pg_list[i]));
+    }
+
+    g_rw_lock_reader_unlock(&_pg_lock);
+
+    return result;
+
+}
+
+
+/******************************************************************************
+*                                                                             *
 *  Paramètres  : action = fonctionnalité recherchée.                          *
 *                count  = nombre de greffons trouvés. [OUT]                   *
 *                                                                             *
-*  Description : Founit les greffons offrant le service demandé.              *
+*  Description : Fournit les greffons offrant le service demandé.             *
 *                                                                             *
 *  Retour      : Liste de greffons correspondants issue d'un tri interne.     *
 *                                                                             *
@@ -562,8 +597,8 @@ GPluginModule *get_plugin_by_name(const char *name, size_t *index)
 GPluginModule **get_all_plugins_for_action(PluginAction action, size_t *count)
 {
     GPluginModule **result;                 /* Liste à retourner           */
-    const plugin_interface *pg_iface;       /* Informations à consulter    */
     size_t i;                               /* Boucle de parcours #1       */
+    const plugin_interface *pg_iface;       /* Informations à consulter    */
     size_t j;                               /* Boucle de parcours #2       */
 
     result = NULL;
@@ -579,7 +614,7 @@ GPluginModule **get_all_plugins_for_action(PluginAction action, size_t *count)
         {
             if (pg_iface->actions[j] == action)
             {
-                result = (GPluginModule **)realloc(result, ++(*count) * sizeof(GPluginModule *));
+                result = realloc(result, ++(*count) * sizeof(GPluginModule *));
 
                 result[*count - 1] = _pg_list[i];
                 g_object_ref(G_OBJECT(_pg_list[i]));
diff --git a/src/plugins/pglist.h b/src/plugins/pglist.h
index a380844..e0aec3f 100644
--- a/src/plugins/pglist.h
+++ b/src/plugins/pglist.h
@@ -56,10 +56,13 @@ void register_plugin(GPluginModule *);
 /* Charge tous les greffons restant à charger. */
 void load_remaning_plugins(void);
 
-/* Founit le greffon répondant à un nom donné. */
+/* Fournit le greffon répondant à un nom donné. */
 GPluginModule *get_plugin_by_name(const char *, size_t *);
 
-/* Founit less greffons offrant le service demandé. */
+/* Fournit la liste de l'ensemble des greffons. */
+GPluginModule **get_all_plugins(size_t *);
+
+/* Fournit les greffons offrant le service demandé. */
 GPluginModule **get_all_plugins_for_action(PluginAction, size_t *);
 
 
-- 
cgit v0.11.2-87-g4458