Rewrite the plugin system.

1 files changed, 150 insertions, 0 deletions

diff --git a/plugins/pychrysalide/helpers.c b/plugins/pychrysalide/helpers.c
index deed584..ea2f55d 100644
--- a/plugins/pychrysalide/helpers.c
+++ b/plugins/pychrysalide/helpers.c
@@ -216,6 +216,53 @@ bool has_python_method(PyObject *module, const char *method)
 *                                                                             *
 *  Paramètres  : target = propriétaire de la routine visée.                   *
 *                method = désignation de la fonction à appeler.               *
+*                                                                             *
+*  Description : Indique si une routine Python possède une implémentation.    *
+*                                                                             *
+*  Retour      : Bilan de l'analyse.                                          *
+*                                                                             *
+*  Remarques   : -                                                            *
+*                                                                             *
+******************************************************************************/
+
+bool has_python_implementation_method(PyObject *module, const char *method)
+{
+    bool result;                            /* Bilan à retourner           */
+    PyObject *func;                         /* Fonction visée              */
+    const PyMethodDef *def;                 /* Définition de la fonction   */
+
+    result = (PyObject_HasAttrString(module, method) == 1);
+
+    if (result)
+    {
+        func = PyObject_GetAttrString(module, method);
+        assert(func != NULL);
+
+        result = PyCallable_Check(func);
+
+        if (func->ob_type == &PyCFunction_Type)
+        {
+            def = ((PyCFunctionObject *)func)->m_ml;
+
+            assert(strcmp(def->ml_name, method) == 0);
+
+            result = (def->ml_meth != not_yet_implemented_method);
+
+        }
+
+        Py_DECREF(func);
+
+    }
+
+    return result;
+
+}
+
+
+/******************************************************************************
+*                                                                             *
+*  Paramètres  : target = propriétaire de la routine visée.                   *
+*                method = désignation de la fonction à appeler.               *
 *                args   = arguments à associer à l'opération.                 *
 *                                                                             *
 *  Description : Appelle une routine Python.                                  *
@@ -1403,6 +1450,109 @@ int convert_to_gdk_rgba(PyObject *arg, void *dst)
 
 
 
+/******************************************************************************
+*                                                                             *
+*  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 tableau de chaînes de caractères.      *
+*                                                                             *
+*  Retour      : Bilan de l'opération, voire indications supplémentaires.     *
+*                                                                             *
+*  Remarques   : -                                                            *
+*                                                                             *
+******************************************************************************/
+
+int convert_to_sequence_to_charp_array(PyObject *arg, void *dst)
+{
+    int result;                             /* Bilan à retourner           */
+    charp_array_t *array;                   /* Tableau à constituer        */
+    size_t i;                               /* Boucle de parcours          */
+    PyObject *value;                        /* Valeur brute d'un élément   */
+
+    array = (charp_array_t *)dst;
+
+    /* Nettoyage ? */
+    if (arg == NULL)
+    {
+        result = 1;
+        goto clean;
+    }
+
+    else
+    {
+        result = 0;
+
+        if (PySequence_Check(arg) != 1)
+            goto done;
+
+        array->length = PySequence_Length(arg);
+
+        array->values = calloc(array->length, sizeof(char *));
+
+        for (i = 0; i < array->length; i++)
+        {
+            value = PySequence_ITEM(arg, i);
+
+            if (!PyUnicode_Check(value))
+            {
+                Py_DECREF(value);
+                goto clean;
+            }
+
+            array->values[i] = strdup(PyUnicode_DATA(value));
+
+            Py_DECREF(value);
+
+        }
+
+        result = Py_CLEANUP_SUPPORTED;
+
+    }
+
+ done:
+
+    return result;
+
+ clean:
+
+    clean_charp_array(array);
+
+    return result;
+
+}
+
+
+/******************************************************************************
+*                                                                             *
+*  Paramètres  : array = tableau de chaînes de caractères à traiter.          *
+*                                                                             *
+*  Description : Libère de la mémoire un tableau de chaînes de caractères.    *
+*                                                                             *
+*  Retour      : -                                                            *
+*                                                                             *
+*  Remarques   : -                                                            *
+*                                                                             *
+******************************************************************************/
+
+void clean_charp_array(charp_array_t *array)
+{
+    size_t i;                               /* Boucle de parcours          */
+
+    for (i = 0; i < array->length; i++)
+        if (array->values[i] != NULL)
+            free(array->values[i]);
+
+    if (array->values != NULL)
+        free(array->values);
+
+    array->values = NULL;
+    array->length = 0;
+
+}
+
+
+
 /* ---------------------------------------------------------------------------------- */
 /*                         TRANSFERT DES VALEURS CONSTANTES                           */
 /* ---------------------------------------------------------------------------------- */