summaryrefslogtreecommitdiff
path: root/plugins/pychrysalide/helpers.c
diff options
context:
space:
mode:
Diffstat (limited to 'plugins/pychrysalide/helpers.c')
-rw-r--r--plugins/pychrysalide/helpers.c150
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 */
/* ---------------------------------------------------------------------------------- */