summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--configure.ac2
-rw-r--r--plugins/pychrysalide/analysis/Makefile.am9
-rw-r--r--plugins/pychrysalide/analysis/module.c3
-rw-r--r--plugins/pychrysalide/analysis/storage/Makefile.am27
-rw-r--r--plugins/pychrysalide/analysis/storage/cache.c359
-rw-r--r--plugins/pychrysalide/analysis/storage/cache.h45
-rw-r--r--plugins/pychrysalide/analysis/storage/container.c455
-rw-r--r--plugins/pychrysalide/analysis/storage/container.h45
-rw-r--r--plugins/pychrysalide/analysis/storage/module.c115
-rw-r--r--plugins/pychrysalide/analysis/storage/module.h42
-rw-r--r--plugins/pychrysalide/analysis/storage/serialize.c513
-rw-r--r--plugins/pychrysalide/analysis/storage/serialize.h45
-rw-r--r--plugins/pychrysalide/analysis/storage/storage.c516
-rw-r--r--plugins/pychrysalide/analysis/storage/storage.h48
-rw-r--r--plugins/pychrysalide/analysis/storage/tpmem.c508
-rw-r--r--plugins/pychrysalide/analysis/storage/tpmem.h45
-rw-r--r--src/analysis/Makefile.am3
-rw-r--r--src/analysis/storage/Makefile.am30
-rw-r--r--src/analysis/storage/cache-int.h62
-rw-r--r--src/analysis/storage/cache.c334
-rw-r--r--src/analysis/storage/cache.h62
-rw-r--r--src/analysis/storage/container-int.h62
-rw-r--r--src/analysis/storage/container.c140
-rw-r--r--src/analysis/storage/container.h66
-rw-r--r--src/analysis/storage/serialize-int.h55
-rw-r--r--src/analysis/storage/serialize.c119
-rw-r--r--src/analysis/storage/serialize.h65
-rw-r--r--src/analysis/storage/storage-int.h66
-rw-r--r--src/analysis/storage/storage.c436
-rw-r--r--src/analysis/storage/storage.h70
-rw-r--r--src/analysis/storage/tpmem.c454
-rw-r--r--src/analysis/storage/tpmem.h70
32 files changed, 4866 insertions, 5 deletions
diff --git a/configure.ac b/configure.ac
index a78cf1b..09ba2c9 100644
--- a/configure.ac
+++ b/configure.ac
@@ -447,6 +447,7 @@ AC_CONFIG_FILES([Makefile
plugins/pychrysalide/analysis/db/Makefile
plugins/pychrysalide/analysis/db/items/Makefile
plugins/pychrysalide/analysis/disass/Makefile
+ plugins/pychrysalide/analysis/storage/Makefile
plugins/pychrysalide/analysis/types/Makefile
plugins/pychrysalide/arch/Makefile
plugins/pychrysalide/arch/instructions/Makefile
@@ -481,6 +482,7 @@ AC_CONFIG_FILES([Makefile
src/analysis/disass/Makefile
src/analysis/human/Makefile
src/analysis/human/asm/Makefile
+ src/analysis/storage/Makefile
src/analysis/types/Makefile
src/arch/Makefile
src/arch/instructions/Makefile
diff --git a/plugins/pychrysalide/analysis/Makefile.am b/plugins/pychrysalide/analysis/Makefile.am
index bb7bec6..d8c8bb1 100644
--- a/plugins/pychrysalide/analysis/Makefile.am
+++ b/plugins/pychrysalide/analysis/Makefile.am
@@ -15,10 +15,11 @@ libpychrysaanalysis_la_SOURCES = \
type.h type.c \
variable.h variable.c
-libpychrysaanalysis_la_LIBADD = \
+libpychrysaanalysis_la_LIBADD = \
contents/libpychrysaanalysiscontents.la \
- db/libpychrysaanalysisdb.la \
- disass/libpychrysaanalysisdisass.la \
+ db/libpychrysaanalysisdb.la \
+ disass/libpychrysaanalysisdisass.la \
+ storage/libpychrysaanalysisstorage.la \
types/libpychrysaanalysistypes.la
libpychrysaanalysis_la_LDFLAGS =
@@ -34,4 +35,4 @@ AM_CPPFLAGS = $(LIBGTK_CFLAGS) $(LIBXML_CFLAGS) $(LIBPYTHON_CFLAGS) $(LIBPYGOBJE
AM_CFLAGS = $(DEBUG_CFLAGS) $(WARNING_FLAGS) $(COMPLIANCE_FLAGS)
-SUBDIRS = contents db disass types
+SUBDIRS = contents db disass storage types
diff --git a/plugins/pychrysalide/analysis/module.c b/plugins/pychrysalide/analysis/module.c
index e82e32b..9632956 100644
--- a/plugins/pychrysalide/analysis/module.c
+++ b/plugins/pychrysalide/analysis/module.c
@@ -41,6 +41,7 @@
#include "contents/module.h"
#include "db/module.h"
#include "disass/module.h"
+#include "storage/module.h"
#include "types/module.h"
#include "../helpers.h"
@@ -85,6 +86,7 @@ bool add_analysis_module(PyObject *super)
if (result) result = add_analysis_contents_module(module);
if (result) result = add_analysis_db_module(module);
if (result) result = add_analysis_disass_module(module);
+ if (result) result = add_analysis_storage_module(module);
if (result) result = add_analysis_types_module(module);
if (!result)
@@ -129,6 +131,7 @@ bool populate_analysis_module(void)
if (result) result = populate_analysis_contents_module();
if (result) result = populate_analysis_db_module();
if (result) result = populate_analysis_disass_module();
+ if (result) result = populate_analysis_storage_module();
if (result) result = populate_analysis_types_module();
assert(result);
diff --git a/plugins/pychrysalide/analysis/storage/Makefile.am b/plugins/pychrysalide/analysis/storage/Makefile.am
new file mode 100644
index 0000000..863166d
--- /dev/null
+++ b/plugins/pychrysalide/analysis/storage/Makefile.am
@@ -0,0 +1,27 @@
+
+noinst_LTLIBRARIES = libpychrysaanalysisstorage.la
+
+libpychrysaanalysisstorage_la_SOURCES = \
+ cache.h cache.c \
+ container.h container.c \
+ module.h module.c \
+ serialize.h serialize.c \
+ storage.h storage.c \
+ tpmem.h tpmem.c
+
+libpychrysaanalysisstorage_la_LIBADD =
+
+libpychrysaanalysisstorage_la_LDFLAGS =
+
+
+devdir = $(includedir)/chrysalide-$(subdir)
+
+dev_HEADERS = $(libpychrysaanalysisstorage_la_SOURCES:%c=)
+
+
+AM_CPPFLAGS = $(LIBGTK_CFLAGS) $(LIBXML_CFLAGS) $(LIBPYTHON_CFLAGS) $(LIBPYGOBJECT_CFLAGS) \
+ -I$(top_srcdir)/src
+
+AM_CFLAGS = $(DEBUG_CFLAGS) $(WARNING_FLAGS) $(COMPLIANCE_FLAGS)
+
+SUBDIRS =
diff --git a/plugins/pychrysalide/analysis/storage/cache.c b/plugins/pychrysalide/analysis/storage/cache.c
new file mode 100644
index 0000000..9859623
--- /dev/null
+++ b/plugins/pychrysalide/analysis/storage/cache.c
@@ -0,0 +1,359 @@
+
+/* Chrysalide - Outil d'analyse de fichiers binaires
+ * cache.c - équivalent Python du fichier "analysis/storage/cache.c"
+ *
+ * Copyright (C) 2020 Cyrille Bagard
+ *
+ * This file is part of Chrysalide.
+ *
+ * Chrysalide 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 3 of the License, or
+ * (at your option) any later version.
+ *
+ * Chrysalide 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 "cache.h"
+
+
+#include <pygobject.h>
+
+
+#include <analysis/storage/cache-int.h>
+#include <plugins/dt.h>
+
+
+#include "container.h"
+#include "../loaded.h"
+#include "../../access.h"
+#include "../../helpers.h"
+
+
+
+/* ------------------------ GLUE POUR CREATION DEPUIS PYTHON ------------------------ */
+
+
+/* Accompagne la création d'une instance dérivée en Python. */
+static PyObject *py_object_cache_new(PyTypeObject *, PyObject *, PyObject *);
+
+/* Initialise une instance sur la base du dérivé de GObject. */
+static int py_object_cache_init(PyObject *, PyObject *, PyObject *);
+
+
+
+/* -------------------------- TAMPON POUR CODE DESASSEMBLE -------------------------- */
+
+
+/* Introduit un contenu dans un cache d'objets. */
+static PyObject *py_object_cache_add(PyObject *, PyObject *);
+
+
+
+/* ---------------------------------------------------------------------------------- */
+/* GLUE POUR CREATION DEPUIS PYTHON */
+/* ---------------------------------------------------------------------------------- */
+
+
+/******************************************************************************
+* *
+* Paramètres : type = type du nouvel objet à mettre en place. *
+* args = éventuelle liste d'arguments. *
+* kwds = éventuel dictionnaire de valeurs mises à disposition. *
+* *
+* Description : Accompagne la création d'une instance dérivée en Python. *
+* *
+* Retour : Nouvel objet Python mis en place ou NULL en cas d'échec. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static PyObject *py_object_cache_new(PyTypeObject *type, PyObject *args, PyObject *kwds)
+{
+ PyObject *result; /* Objet à retourner */
+ PyTypeObject *base; /* Type de base à dériver */
+ bool first_time; /* Evite les multiples passages*/
+ GType gtype; /* Nouveau type de processeur */
+ bool status; /* Bilan d'un enregistrement */
+
+ /* Validations diverses */
+
+ base = get_python_object_cache_type();
+
+ if (type == base)
+ goto simple_way;
+
+ /* Mise en place d'un type dédié */
+
+ first_time = (g_type_from_name(type->tp_name) == 0);
+
+ gtype = build_dynamic_type(G_TYPE_OBJECT_CACHE, type->tp_name, NULL, NULL, NULL);
+
+ if (first_time)
+ {
+ status = register_class_for_dynamic_pygobject(gtype, type, base);
+
+ if (!status)
+ {
+ result = NULL;
+ goto exit;
+ }
+
+ }
+
+ /* On crée, et on laisse ensuite la main à PyGObject_Type.tp_init() */
+
+ simple_way:
+
+ result = PyType_GenericNew(type, args, kwds);
+
+ exit:
+
+ return result;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : self = objet à initialiser (théoriquement). *
+* args = arguments fournis à l'appel. *
+* kwds = arguments de type key=val fournis. *
+* *
+* Description : Initialise une instance sur la base du dérivé de GObject. *
+* *
+* Retour : 0. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static int py_object_cache_init(PyObject *self, PyObject *args, PyObject *kwds)
+{
+ GLoadedContent *loaded; /* Contenu chargé et traité */
+ int ret; /* Bilan de lecture des args. */
+ GObjectCache *cache; /* Mécanismes natifs */
+
+#define OBJECT_CACHE_DOC \
+ "The ObjectCache object manages a cache built for reducing the" \
+ " overall memory footprint by releasing partial content of" \
+ " pychrysalide.analysis.storage.CacheContainer objects.\n" \
+ "\n" \
+ "Disassembled instructions are the typical objects targeted by" \
+ " this feature, through serialization.\n" \
+ "\n" \
+ "Instances can be created using the following constructor:\n" \
+ "\n" \
+ " ObjectCache(loaded)" \
+ "\n" \
+ "Where *loaded* is a pychrysalide.analysis.LoadedContent instance" \
+ " linked to the processed objects."
+
+ /* Récupération des paramètres */
+
+ ret = PyArg_ParseTuple(args, "O&", convert_to_loaded_content, &loaded);
+ if (!ret) return -1;
+
+ /* Initialisation d'un objet GLib */
+
+ ret = forward_pygobjet_init(self);
+ if (ret == -1) return -1;
+
+ /* Eléments de base */
+
+ cache = G_OBJECT_CACHE(pygobject_get(self));
+
+ if (!g_object_cache_open_for(cache, loaded))
+ return -1;
+
+ return 0;
+
+}
+
+
+
+/* ---------------------------------------------------------------------------------- */
+/* TAMPON POUR CODE DESASSEMBLE */
+/* ---------------------------------------------------------------------------------- */
+
+
+/******************************************************************************
+* *
+* Paramètres : self = classe représentant une mémorisation de types. *
+* args = arguments fournis à l'appel. *
+* *
+* Description : Introduit un contenu dans un cache d'objets. *
+* *
+* Retour : - *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static PyObject *py_object_cache_add(PyObject *self, PyObject *args)
+{
+ PyObject *result; /* Bilan à retourner */
+ GCacheContainer *container; /* Conteneur à intégrer */
+ int ret; /* Bilan de lecture des args. */
+ GObjectCache *cache; /* Cache en version native */
+
+#define OBJECT_CACHE_ADD_METHOD PYTHON_METHOD_DEF \
+( \
+ add, "$self, container, /", \
+ METH_VARARGS, py_object_cache, \
+ "Introduce a new content to the object cache system.\n" \
+ "\n" \
+ "The *container* object must implement the" \
+ " pychrysalide.analysis.storage.CacheContainer interface." \
+)
+
+ ret = PyArg_ParseTuple(args, "O&", convert_to_cache_container, &container);
+ if (!ret) return NULL;
+
+ cache = G_OBJECT_CACHE(pygobject_get(self));
+
+ g_object_cache_add(cache, container);
+
+ result = Py_None;
+ Py_INCREF(result);
+
+ return result;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : - *
+* *
+* Description : Fournit un accès à une définition de type à diffuser. *
+* *
+* Retour : Définition d'objet pour Python. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+PyTypeObject *get_python_object_cache_type(void)
+{
+ static PyMethodDef py_object_cache_methods[] = {
+ OBJECT_CACHE_ADD_METHOD,
+ { NULL }
+ };
+
+ static PyGetSetDef py_object_cache_getseters[] = {
+ { NULL }
+ };
+
+ static PyTypeObject py_object_cache_type = {
+
+ PyVarObject_HEAD_INIT(NULL, 0)
+
+ .tp_name = "pychrysalide.analysis.cache.ObjectCache",
+ .tp_basicsize = sizeof(PyGObject),
+
+ .tp_flags = Py_TPFLAGS_DEFAULT,
+
+ .tp_doc = OBJECT_CACHE_DOC,
+
+ .tp_methods = py_object_cache_methods,
+ .tp_getset = py_object_cache_getseters,
+
+ .tp_init = py_object_cache_init,
+ .tp_new = py_object_cache_new
+
+ };
+
+ return &py_object_cache_type;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : module = module dont la définition est à compléter. *
+* *
+* Description : Prend en charge l'objet 'pychrysalide....ObjectCache'. *
+* *
+* Retour : Bilan de l'opération. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+bool ensure_python_object_cache_is_registered(void)
+{
+ PyTypeObject *type; /* Type Python 'ObjectCache' */
+ PyObject *module; /* Module à recompléter */
+ PyObject *dict; /* Dictionnaire du module */
+
+ type = get_python_object_cache_type();
+
+ if (!PyType_HasFeature(type, Py_TPFLAGS_READY))
+ {
+ module = get_access_to_python_module("pychrysalide.analysis.storage");
+
+ dict = PyModule_GetDict(module);
+
+ if (!register_class_for_pygobject(dict, G_TYPE_OBJECT_CACHE, type, &PyGObject_Type))
+ return false;
+
+ }
+
+ return true;
+
+}
+
+
+/******************************************************************************
+* *
+* 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 cache d'objets. *
+* *
+* Retour : Bilan de l'opération, voire indications supplémentaires. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+int convert_to_object_cache(PyObject *arg, void *dst)
+{
+ int result; /* Bilan à retourner */
+
+ result = PyObject_IsInstance(arg, (PyObject *)get_python_object_cache_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 object cache");
+ break;
+
+ case 1:
+ *((GObjectCache **)dst) = G_OBJECT_CACHE(pygobject_get(arg));
+ break;
+
+ default:
+ assert(false);
+ break;
+
+ }
+
+ return result;
+
+}
diff --git a/plugins/pychrysalide/analysis/storage/cache.h b/plugins/pychrysalide/analysis/storage/cache.h
new file mode 100644
index 0000000..d9ef541
--- /dev/null
+++ b/plugins/pychrysalide/analysis/storage/cache.h
@@ -0,0 +1,45 @@
+
+/* Chrysalide - Outil d'analyse de fichiers binaires
+ * cache.h - prototypes pour l'équivalent Python du fichier "analysis/storage/cache.h"
+ *
+ * Copyright (C) 2020 Cyrille Bagard
+ *
+ * This file is part of Chrysalide.
+ *
+ * Chrysalide 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 3 of the License, or
+ * (at your option) any later version.
+ *
+ * Chrysalide 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
+ */
+
+
+#ifndef _PLUGINS_PYCHRYSALIDE_ANALYSIS_STORAGE_CACHE_H
+#define _PLUGINS_PYCHRYSALIDE_ANALYSIS_STORAGE_CACHE_H
+
+
+#include <Python.h>
+#include <stdbool.h>
+
+
+
+/* Fournit un accès à une définition de type à diffuser. */
+PyTypeObject *get_python_object_cache_type(void);
+
+/* Prend en charge l'objet 'pychrysalide.analysis.cache.ObjectCache'. */
+bool ensure_python_object_cache_is_registered(void);
+
+/* Tente de convertir en cache d'objets. */
+int convert_to_object_cache(PyObject *, void *);
+
+
+
+#endif /* _PLUGINS_PYCHRYSALIDE_ANALYSIS_STORAGE_CACHE_H */
diff --git a/plugins/pychrysalide/analysis/storage/container.c b/plugins/pychrysalide/analysis/storage/container.c
new file mode 100644
index 0000000..d32c689
--- /dev/null
+++ b/plugins/pychrysalide/analysis/storage/container.c
@@ -0,0 +1,455 @@
+
+/* Chrysalide - Outil d'analyse de fichiers binaires
+ * container.c - équivalent Python du fichier "analysis/storage/container.h"
+ *
+ * Copyright (C) 2020 Cyrille Bagard
+ *
+ * This file is part of Chrysalide.
+ *
+ * Chrysalide 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 3 of the License, or
+ * (at your option) any later version.
+ *
+ * Chrysalide 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 "container.h"
+
+
+#include <pygobject.h>
+
+
+#include <analysis/storage/container-int.h>
+
+
+#include "../../access.h"
+#include "../../helpers.h"
+
+
+
+/* ------------------------ GLUE POUR CREATION DEPUIS PYTHON ------------------------ */
+
+
+/* Procède à l'initialisation de l'interface de génération. */
+static void py_cache_container_interface_init(GCacheContainerIface *, gpointer *);
+
+/* Contrôle l'accès au contenu d'un conteneur. */
+static void py_cache_container_lock_unlock_wrapper(GCacheContainer *, bool);
+
+/* Indique si le contenu d'un conteneur peut être mis en cache. */
+static bool py_cache_container_can_store_wrapper(GCacheContainer *);
+
+
+
+/* ------------------------- CONNEXION AVEC L'API DE PYTHON ------------------------- */
+
+
+/* Contrôle l'accès au contenu d'un conteneur. */
+static bool py_cache_container_lock_unlock(PyObject *, PyObject *);
+
+/* Indique si le contenu d'un conteneur peut être mis en cache. */
+static bool py_cache_container_can_store(PyObject *, PyObject *);
+
+
+
+/* ---------------------------------------------------------------------------------- */
+/* GLUE POUR CREATION DEPUIS PYTHON */
+/* ---------------------------------------------------------------------------------- */
+
+
+/******************************************************************************
+* *
+* Paramètres : iface = interface GLib à initialiser. *
+* unused = adresse non utilisée ici. *
+* *
+* Description : Procède à l'initialisation de l'interface de génération. *
+* *
+* Retour : - *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static void py_cache_container_interface_init(GCacheContainerIface *iface, gpointer *unused)
+{
+
+#define CACHE_CONTAINER_DOC \
+ "CacheContainer defines an interface for objects with content allowed" \
+ " to get cached.\n" \
+ "\n" \
+ "A typical class declaration for a new implementation looks like:\n" \
+ "\n" \
+ " class NewImplem(GObject.Object, CacheContainer):\n" \
+ " ...\n" \
+ "\n" \
+ "The following methods have to be defined for new implementations:\n" \
+ "* pychrysalide.analysis.storage.CacheContainer._lock_unlock();\n" \
+ "* pychrysalide.analysis.storage.CacheContainer._can_store();\n"
+
+ iface->lock_unlock = py_cache_container_lock_unlock_wrapper;
+ iface->can_store = py_cache_container_can_store_wrapper;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : container = conteneur à manipuler. *
+* lock = indique une demande de verrou. *
+* *
+* Description : Contrôle l'accès au contenu d'un conteneur. *
+* *
+* Retour : - *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static void py_cache_container_lock_unlock_wrapper(GCacheContainer *container, bool lock)
+{
+ PyGILState_STATE gstate; /* Sauvegarde d'environnement */
+ PyObject *lock_obj; /* Objet Python à emmployer */
+ PyObject *args; /* Arguments pour l'appel */
+ PyObject *pyobj; /* Objet Python concerné */
+ PyObject *pyret; /* Bilan de consultation */
+
+#define CACHE_CONTAINER_LOCK_UNLOCK_WRAPPER PYTHON_WRAPPER_DEF \
+( \
+ _lock_unlock, "$self, lock, /", \
+ METH_VARARGS, \
+ "Abstract method used to lock or to unlock access to cache container" \
+ " internals.\n" \
+ "\n" \
+ "The content of such a cache can then be accessed safely, without the" \
+ " fear of race condition while processing.\n" \
+ "\n" \
+ "The *lock* argument is a boolean value indicating the state to" \
+ " achieve." \
+)
+
+ gstate = PyGILState_Ensure();
+
+ pyobj = pygobject_new(G_OBJECT(container));
+
+ if (has_python_method(pyobj, "_lock_unlock"))
+ {
+ lock_obj = lock ? Py_True : Py_False;
+ Py_INCREF(lock_obj);
+
+ args = PyTuple_New(1);
+ PyTuple_SetItem(args, 0, lock_obj);
+
+ pyret = run_python_method(pyobj, "_lock_unlock", args);
+
+ Py_XDECREF(pyret);
+
+ Py_DECREF(args);
+
+ }
+
+ Py_DECREF(pyobj);
+
+ PyGILState_Release(gstate);
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : container = conteneur à consulter. *
+* *
+* Description : Indique si le contenu d'un conteneur peut être mis en cache. *
+* *
+* Retour : Bilan de la consultation. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static bool py_cache_container_can_store_wrapper(GCacheContainer *container)
+{
+ bool result; /* Bilan à retourner */
+ PyGILState_STATE gstate; /* Sauvegarde d'environnement */
+ PyObject *pyobj; /* Objet Python concerné */
+ PyObject *pyret; /* Bilan de consultation */
+
+#define CACHE_CONTAINER_CAN_STORE_WRAPPER PYTHON_WRAPPER_DEF \
+( \
+ _can_store, "$self, /", \
+ METH_NOARGS, \
+ "Abstract method used to define if a container can cache its" \
+ " content.\n" \
+ "\n" \
+ "This kind of operation is not wished if the content is currently" \
+ " in use.\n" \
+ "\n" \
+ "The result is a boolean indicating the capacity of safely" \
+ " building a cache." \
+)
+
+ result = false;
+
+ gstate = PyGILState_Ensure();
+
+ pyobj = pygobject_new(G_OBJECT(container));
+
+ if (has_python_method(pyobj, "_can_store"))
+ {
+ pyret = run_python_method(pyobj, "_can_store", NULL);
+
+ result = (pyret == Py_True ? true : false);
+
+ Py_XDECREF(pyret);
+
+ }
+
+ Py_DECREF(pyobj);
+
+ PyGILState_Release(gstate);
+
+ return result;
+
+}
+
+
+
+/* ---------------------------------------------------------------------------------- */
+/* CONNEXION AVEC L'API DE PYTHON */
+/* ---------------------------------------------------------------------------------- */
+
+
+/******************************************************************************
+* *
+* Paramètres : self = classe représentant un générateur à manipuler. *
+* args = arguments fournis à l'appel. *
+* *
+* Description : Contrôle l'accès au contenu d'un conteneur. *
+* *
+* Retour : - *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static bool py_cache_container_lock_unlock(PyObject *self, PyObject *args)
+{
+ PyObject *result; /* Bilan à retourner */
+ int lock; /* Type de demande de verrou */
+ int ret; /* Bilan de lecture des args. */
+ GCacheContainer *object; /* Version native */
+
+#define CACHE_CONTAINER_LOCK_UNLOCK_METHOD PYTHON_METHOD_DEF \
+( \
+ lock_unlock, "$self, lock, /", \
+ METH_VARARGS, py_cache_container, \
+ "Lock or unlock access to cache container internals.\n" \
+ "\n" \
+ "The content of such a cache can then be accessed safely, without the" \
+ " fear of race condition while processing.\n" \
+ "\n" \
+ "The *lock* argument is a boolean value indicating the state to" \
+ " achieve." \
+)
+
+ ret = PyArg_ParseTuple(args, "p", &lock);
+ if (!ret) return NULL;
+
+ object = G_CACHE_CONTAINER(pygobject_get(self));
+
+ g_cache_container_lock_unlock(object, lock);
+
+ result = Py_None;
+ Py_INCREF(result);
+
+ return result;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : self = classe représentant un générateur à manipuler. *
+* args = arguments fournis à l'appel. *
+* *
+* Description : Indique si le contenu d'un conteneur peut être mis en cache. *
+* *
+* Retour : Bilan de la consultation. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static bool py_cache_container_can_store(PyObject *self, PyObject *args)
+{
+ PyObject *result; /* Bilan à retourner */
+ GCacheContainer *object; /* Version native */
+ bool status; /* Bilan de l'opération */
+
+#define CACHE_CONTAINER_CAN_STORE_METHOD PYTHON_METHOD_DEF \
+( \
+ can_store, "$self, /", \
+ METH_NOARGS, py_cache_container, \
+ "Define if a container can cache its content.\n" \
+ "\n" \
+ "This kind of operation is not wished if the content is currently" \
+ " in use.\n" \
+ "\n" \
+ "The result is a boolean indicating the capacity of safely" \
+ " building a cache." \
+)
+
+ object = G_CACHE_CONTAINER(pygobject_get(self));
+
+ status = g_cache_container_can_store(object);
+
+ result = status ? Py_True : Py_False;
+ Py_INCREF(result);
+
+ return result;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : - *
+* *
+* Description : Fournit un accès à une définition de type à diffuser. *
+* *
+* Retour : Définition d'objet pour Python. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+PyTypeObject *get_python_cache_container_type(void)
+{
+ static PyMethodDef py_cache_container_methods[] = {
+ CACHE_CONTAINER_LOCK_UNLOCK_WRAPPER,
+ CACHE_CONTAINER_CAN_STORE_WRAPPER,
+ CACHE_CONTAINER_LOCK_UNLOCK_METHOD,
+ CACHE_CONTAINER_CAN_STORE_METHOD,
+ { NULL }
+ };
+
+ static PyGetSetDef py_cache_container_getseters[] = {
+ { NULL }
+ };
+
+ static PyTypeObject py_cache_container_type = {
+
+ PyVarObject_HEAD_INIT(NULL, 0)
+
+ .tp_name = "pychrysalide.analysis.storage.CacheContainer",
+ .tp_basicsize = sizeof(PyObject),
+
+ .tp_flags = Py_TPFLAGS_DEFAULT | Py_TPFLAGS_BASETYPE,
+
+ .tp_doc = CACHE_CONTAINER_DOC,
+
+ .tp_methods = py_cache_container_methods,
+ .tp_getset = py_cache_container_getseters,
+
+ };
+
+ return &py_cache_container_type;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : module = module dont la définition est à compléter. *
+* *
+* Description : Prend en charge l'objet 'pychrysalide....CacheContainer'. *
+* *
+* Retour : Bilan de l'opération. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+bool ensure_python_cache_container_is_registered(void)
+{
+ PyTypeObject *type; /* Type Python 'CacheContainer'*/
+ PyObject *module; /* Module à recompléter */
+ PyObject *dict; /* Dictionnaire du module */
+
+ static GInterfaceInfo info = { /* Paramètres d'inscription */
+
+ .interface_init = (GInterfaceInitFunc)py_cache_container_interface_init,
+ .interface_finalize = NULL,
+ .interface_data = NULL,
+
+ };
+
+ type = get_python_cache_container_type();
+
+ if (!PyType_HasFeature(type, Py_TPFLAGS_READY))
+ {
+ module = get_access_to_python_module("pychrysalide.analysis.storage");
+
+ dict = PyModule_GetDict(module);
+
+ if (!register_interface_for_pygobject_2(dict, G_TYPE_CACHE_CONTAINER, type, &info))
+ return false;
+
+ }
+
+ return true;
+
+}
+
+
+/******************************************************************************
+* *
+* 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 conteneur d'objets entreposables. *
+* *
+* Retour : Bilan de l'opération, voire indications supplémentaires. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+int convert_to_cache_container(PyObject *arg, void *dst)
+{
+ int result; /* Bilan à retourner */
+
+ result = PyObject_IsInstance(arg, (PyObject *)get_python_cache_container_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 cache container");
+ break;
+
+ case 1:
+ *((GCacheContainer **)dst) = G_CACHE_CONTAINER(pygobject_get(arg));
+ break;
+
+ default:
+ assert(false);
+ break;
+
+ }
+
+ return result;
+
+}
diff --git a/plugins/pychrysalide/analysis/storage/container.h b/plugins/pychrysalide/analysis/storage/container.h
new file mode 100644
index 0000000..3960dd8
--- /dev/null
+++ b/plugins/pychrysalide/analysis/storage/container.h
@@ -0,0 +1,45 @@
+
+/* Chrysalide - Outil d'analyse de fichiers binaires
+ * container.h - prototypes pour l'équivalent Python du fichier "analysis/storage/container.h"
+ *
+ * Copyright (C) 2020 Cyrille Bagard
+ *
+ * This file is part of Chrysalide.
+ *
+ * Chrysalide 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 3 of the License, or
+ * (at your option) any later version.
+ *
+ * Chrysalide 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
+ */
+
+
+#ifndef _PLUGINS_PYCHRYSALIDE_ANALYSIS_STORAGE_CONTAINER_H
+#define _PLUGINS_PYCHRYSALIDE_ANALYSIS_STORAGE_CONTAINER_H
+
+
+#include <Python.h>
+#include <stdbool.h>
+
+
+
+/* Fournit un accès à une définition de type à diffuser. */
+PyTypeObject *get_python_cache_container_type(void);
+
+/* Prend en charge l'objet 'pychrysalide.analysis.storage.CacheContainer'. */
+bool ensure_python_cache_container_is_registered(void);
+
+/* Tente de convertir en conteneur d'objets entreposables. */
+int convert_to_cache_container(PyObject *, void *);
+
+
+
+#endif /* _PLUGINS_PYCHRYSALIDE_ANALYSIS_STORAGE_CONTAINER_H */
diff --git a/plugins/pychrysalide/analysis/storage/module.c b/plugins/pychrysalide/analysis/storage/module.c
new file mode 100644
index 0000000..d2ac397
--- /dev/null
+++ b/plugins/pychrysalide/analysis/storage/module.c
@@ -0,0 +1,115 @@
+
+/* Chrysalide - Outil d'analyse de fichiers binaires
+ * module.c - intégration du répertoire storage en tant que module
+ *
+ * Copyright (C) 2020 Cyrille Bagard
+ *
+ * This file is part of Chrysalide.
+ *
+ * Chrysalide 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 3 of the License, or
+ * (at your option) any later version.
+ *
+ * Chrysalide 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 "module.h"
+
+
+#include <assert.h>
+
+
+#include "cache.h"
+#include "container.h"
+#include "serialize.h"
+#include "storage.h"
+#include "tpmem.h"
+#include "../../helpers.h"
+
+
+
+/******************************************************************************
+* *
+* Paramètres : super = module dont la définition est à compléter. *
+* *
+* Description : Ajoute le module 'analysis.storage' à un module Python. *
+* *
+* Retour : Bilan de l'opération. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+bool add_analysis_storage_module(PyObject *super)
+{
+ bool result; /* Bilan à retourner */
+ PyObject *module; /* Sous-module mis en place */
+
+#define PYCHRYSALIDE_ANALYSIS_STORAGE_MODULE_DOC \
+ "This module gathers all the features relative to serialization.\n" \
+ "\n" \
+ "This serialization is used for object caching and disassembly" \
+ " results storage."
+
+ static PyModuleDef py_chrysalide_analysis_db_module = {
+
+ .m_base = PyModuleDef_HEAD_INIT,
+
+ .m_name = "pychrysalide.analysis.storage",
+ .m_doc = PYCHRYSALIDE_ANALYSIS_STORAGE_MODULE_DOC,
+
+ .m_size = -1,
+
+ };
+
+ module = build_python_module(super, &py_chrysalide_analysis_db_module);
+
+ result = (module != NULL);
+
+ if (!result)
+ Py_XDECREF(module);
+
+ return result;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : - *
+* *
+* Description : Intègre les objets du module 'analysis.storage'. *
+* *
+* Retour : Bilan de l'opération. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+bool populate_analysis_storage_module(void)
+{
+ bool result; /* Bilan à retourner */
+
+ result = true;
+
+ if (result) result = ensure_python_cache_container_is_registered();
+ if (result) result = ensure_python_serializable_object_is_registered();
+
+ if (result) result = ensure_python_object_cache_is_registered();
+ if (result) result = ensure_python_object_storage_is_registered();
+ if (result) result = ensure_python_type_memory_is_registered();
+
+ assert(result);
+
+ return result;
+
+}
diff --git a/plugins/pychrysalide/analysis/storage/module.h b/plugins/pychrysalide/analysis/storage/module.h
new file mode 100644
index 0000000..c2a0181
--- /dev/null
+++ b/plugins/pychrysalide/analysis/storage/module.h
@@ -0,0 +1,42 @@
+
+/* Chrysalide - Outil d'analyse de fichiers binaires
+ * module.h - prototypes pour l'intégration du répertoire storage en tant que module
+ *
+ * Copyright (C) 2020 Cyrille Bagard
+ *
+ * This file is part of Chrysalide.
+ *
+ * Chrysalide 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 3 of the License, or
+ * (at your option) any later version.
+ *
+ * Chrysalide 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
+ */
+
+
+#ifndef _PLUGINS_PYCHRYSALIDE_ANALYSIS_STORAGE_MODULE_H
+#define _PLUGINS_PYCHRYSALIDE_ANALYSIS_STORAGE_MODULE_H
+
+
+#include <Python.h>
+#include <stdbool.h>
+
+
+
+/* Ajoute le module 'analysis.storage' à un module Python. */
+bool add_analysis_storage_module(PyObject *);
+
+/* Intègre les objets du module 'analysis.storage'. */
+bool populate_analysis_storage_module(void);
+
+
+
+#endif /* _PLUGINS_PYCHRYSALIDE_ANALYSIS_STORAGE_MODULE_H */
diff --git a/plugins/pychrysalide/analysis/storage/serialize.c b/plugins/pychrysalide/analysis/storage/serialize.c
new file mode 100644
index 0000000..67e1256
--- /dev/null
+++ b/plugins/pychrysalide/analysis/storage/serialize.c
@@ -0,0 +1,513 @@
+
+/* Chrysalide - Outil d'analyse de fichiers binaires
+ * serialize.c - équivalent Python du fichier "analysis/storage/serialize.h"
+ *
+ * Copyright (C) 2020 Cyrille Bagard
+ *
+ * This file is part of Chrysalide.
+ *
+ * Chrysalide 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 3 of the License, or
+ * (at your option) any later version.
+ *
+ * Chrysalide 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 "serialize.h"
+
+
+#include <pygobject.h>
+
+
+#include <analysis/storage/serialize-int.h>
+
+
+#include "storage.h"
+#include "tpmem.h"
+#include "../../access.h"
+#include "../../helpers.h"
+#include "../../common/packed.h"
+
+
+
+/* ------------------------ GLUE POUR CREATION DEPUIS PYTHON ------------------------ */
+
+
+/* Procède à l'initialisation de l'interface de génération. */
+static void py_serializable_object_interface_init(GSerializableObjectIface *, gpointer *);
+
+/* Charge un objet depuis une mémoire tampon. */
+static bool py_serializable_object_load_wrapper(GSerializableObject *, GObjectStorage *, GTypeMemory *, packed_buffer *);
+
+/* Sauvegarde un objet dans une mémoire tampon. */
+static bool py_serializable_object_store_wrapper(const GSerializableObject *, GObjectStorage *, GTypeMemory *, packed_buffer *);
+
+
+
+/* ------------------------- CONNEXION AVEC L'API DE PYTHON ------------------------- */
+
+
+
+/* Charge un objet depuis une mémoire tampon. */
+static bool py_serializable_object_load(PyObject *, PyObject *);
+
+/* Sauvegarde un objet dans une mémoire tampon. */
+static bool py_serializable_object_store(PyObject *, PyObject *);
+
+
+
+/* ---------------------------------------------------------------------------------- */
+/* GLUE POUR CREATION DEPUIS PYTHON */
+/* ---------------------------------------------------------------------------------- */
+
+
+/******************************************************************************
+* *
+* Paramètres : iface = interface GLib à initialiser. *
+* unused = adresse non utilisée ici. *
+* *
+* Description : Procède à l'initialisation de l'interface de génération. *
+* *
+* Retour : - *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static void py_serializable_object_interface_init(GSerializableObjectIface *iface, gpointer *unused)
+{
+
+#define SERIALIZABLE_OBJECT_DOC \
+ "SerializableObject defines an interface used to store and load" \
+ " objects to and from a data buffer.\n" \
+ "\n" \
+ "A typical class declaration for a new implementation looks like:\n" \
+ "\n" \
+ " class NewImplem(GObject.Object, SerializableObject):\n" \
+ " ...\n" \
+ "\n" \
+ "The following methods have to be defined for new implementations:\n" \
+ "* pychrysalide.analysis.storage.SerializableObject._load();\n" \
+ "* pychrysalide.analysis.storage.SerializableObject._store();\n" \
+
+ iface->load = py_serializable_object_load_wrapper;
+ iface->store = py_serializable_object_store_wrapper;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : object = instruction d'assemblage à consulter. *
+* storage = conservateur de données à manipuler ou NULL. *
+* tpmem = mémoire des types d'objets à compléter. *
+* pbuf = zone tampon à remplir. *
+* *
+* Description : Charge un objet depuis une mémoire tampon. *
+* *
+* Retour : Bilan de l'opération. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static bool py_serializable_object_load_wrapper(GSerializableObject *object, GObjectStorage *storage, GTypeMemory *tpmem, packed_buffer *pbuf)
+{
+ bool result; /* Bilan à retourner */
+ PyGILState_STATE gstate; /* Sauvegarde d'environnement */
+ PyObject *storage_obj; /* Objet Python à emmployer */
+ PyObject *args; /* Arguments pour l'appel */
+ PyObject *pyobj; /* Objet Python concerné */
+ PyObject *pyret; /* Bilan de consultation */
+
+#define SERIALIZABLE_OBJECT_LOAD_WRAPPER PYTHON_WRAPPER_DEF \
+( \
+ _load, "$self, storage, tpmem, pbuf, /", \
+ METH_VARARGS, \
+ "Abstract method used to load an object definition from buffered data.\n" \
+ "\n" \
+ "The *storage* is a pychrysalide.analysis.storage.ObjectStorage instance" \
+ " provided to store inner objects, if relevant, or None. The *tpmem* object"\
+ " is a pychrysalide.analysis.storage.TypeMemory remembering all involved" \
+ " GLib types. The *pbuf* argument points to a" \
+ " pychrysalide.common.PackedBuffer object containing the data to process.\n"\
+ "\n" \
+ "The result is a boolean indicating the status of the operation." \
+)
+
+ result = false;
+
+ gstate = PyGILState_Ensure();
+
+ pyobj = pygobject_new(G_OBJECT(object));
+
+ if (has_python_method(pyobj, "_load"))
+ {
+ if (storage == NULL)
+ {
+ storage_obj = Py_None;
+ Py_INCREF(storage_obj);
+ }
+ else
+ storage_obj = pygobject_new(G_OBJECT(storage));
+
+ args = PyTuple_New(3);
+ PyTuple_SetItem(args, 0, storage_obj);
+ PyTuple_SetItem(args, 1, pygobject_new(G_OBJECT(tpmem)));
+ PyTuple_SetItem(args, 2, build_from_internal_packed_buffer(pbuf));
+
+ pyret = run_python_method(pyobj, "_load", args);
+
+ result = (pyret == Py_True ? true : false);
+
+ Py_XDECREF(pyret);
+
+ Py_DECREF(args);
+
+ }
+
+ Py_DECREF(pyobj);
+
+ PyGILState_Release(gstate);
+
+ return result;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : object = instruction d'assemblage à consulter. *
+* storage = conservateur de données à manipuler ou NULL. *
+* tpmem = mémoire des types d'objets à compléter. *
+* pbuf = zone tampon à remplir. *
+* *
+* Description : Sauvegarde un objet dans une mémoire tampon. *
+* *
+* Retour : Bilan de l'opération. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static bool py_serializable_object_store_wrapper(const GSerializableObject *object, GObjectStorage *storage, GTypeMemory *tpmem, packed_buffer *pbuf)
+{
+ bool result; /* Bilan à retourner */
+ PyGILState_STATE gstate; /* Sauvegarde d'environnement */
+ PyObject *storage_obj; /* Objet Python à emmployer */
+ PyObject *args; /* Arguments pour l'appel */
+ PyObject *pyobj; /* Objet Python concerné */
+ PyObject *pyret; /* Bilan de consultation */
+
+#define SERIALIZABLE_OBJECT_STORE_WRAPPER PYTHON_WRAPPER_DEF \
+( \
+ _store, "$self, storage, tpmem, pbuf, /", \
+ METH_VARARGS, \
+ "Abstract method used to store an object definition into buffered data.\n" \
+ "\n" \
+ "The *storage* is a pychrysalide.analysis.storage.ObjectStorage instance" \
+ " provided to store inner objects, if relevant, or None. The *tpmem* object"\
+ " is a pychrysalide.analysis.storage.TypeMemory remembering all involved" \
+ " GLib types. The *pbuf* argument points to a" \
+ " pychrysalide.common.PackedBuffer object containing the data to process.\n"\
+ "\n" \
+ "The result is a boolean indicating the status of the operation." \
+)
+
+ result = false;
+
+ gstate = PyGILState_Ensure();
+
+ pyobj = pygobject_new(G_OBJECT(object));
+
+ if (has_python_method(pyobj, "_store"))
+ {
+ if (storage == NULL)
+ {
+ storage_obj = Py_None;
+ Py_INCREF(storage_obj);
+ }
+ else
+ storage_obj = pygobject_new(G_OBJECT(storage));
+
+ args = PyTuple_New(3);
+ PyTuple_SetItem(args, 0, storage_obj);
+ PyTuple_SetItem(args, 1, pygobject_new(G_OBJECT(tpmem)));
+ PyTuple_SetItem(args, 2, build_from_internal_packed_buffer(pbuf));
+
+ pyret = run_python_method(pyobj, "_store", args);
+
+ result = (pyret == Py_True ? true : false);
+
+ Py_XDECREF(pyret);
+
+ Py_DECREF(args);
+
+ }
+
+ Py_DECREF(pyobj);
+
+ PyGILState_Release(gstate);
+
+ return result;
+
+}
+
+
+
+/* ---------------------------------------------------------------------------------- */
+/* CONNEXION AVEC L'API DE PYTHON */
+/* ---------------------------------------------------------------------------------- */
+
+
+/******************************************************************************
+* *
+* Paramètres : self = classe représentant un générateur à manipuler. *
+* args = arguments fournis à l'appel. *
+* *
+* Description : Charge un objet depuis une mémoire tampon. *
+* *
+* Retour : Bilan de l'opération. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static bool py_serializable_object_load(PyObject *self, PyObject *args)
+{
+ PyObject *result; /* Bilan à retourner */
+ GObjectStorage *storage; /* Conservateur à manipuler */
+ GTypeMemory *tpmem; /* Gestionnaire de types */
+ packed_buffer *pbuf; /* Tampon de données à employer*/
+ int ret; /* Bilan de lecture des args. */
+ GSerializableObject *object; /* Version native */
+ bool status; /* Bilan de l'opération */
+
+#define SERIALIZABLE_OBJECT_LOAD_METHOD PYTHON_METHOD_DEF \
+( \
+ load, "$self, storage, tpmem, pbuf, /", \
+ METH_VARARGS, py_serializable_object, \
+ "Load an object definition from buffered data.\n" \
+ "\n" \
+ "The *storage* is a pychrysalide.analysis.storage.ObjectStorage instance" \
+ " provided to store inner objects, if relevant, or None. The *tpmem* object"\
+ " is a pychrysalide.analysis.storage.TypeMemory remembering all involved" \
+ " GLib types. The *pbuf* argument points to a" \
+ " pychrysalide.common.PackedBuffer object containing the data to process.\n"\
+ "\n" \
+ "The result is a boolean indicating the status of the operation." \
+)
+
+ ret = PyArg_ParseTuple(args, "O&O&O&", convert_to_object_storage_or_none, &storage,
+ convert_to_type_memory, &tpmem, convert_to_packed_buffer, &pbuf);
+ if (!ret) return NULL;
+
+ object = G_SERIALIZABLE_OBJECT(pygobject_get(self));
+
+ status = g_serializable_object_load(object, storage, tpmem, pbuf);
+
+ result = status ? Py_True : Py_False;
+ Py_INCREF(result);
+
+ return result;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : self = classe représentant un générateur à manipuler. *
+* args = arguments fournis à l'appel. *
+* *
+* Description : Sauvegarde un objet dans une mémoire tampon. *
+* *
+* Retour : Bilan de l'opération. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static bool py_serializable_object_store(PyObject *self, PyObject *args)
+{
+ PyObject *result; /* Bilan à retourner */
+ GObjectStorage *storage; /* Conservateur à manipuler */
+ GTypeMemory *tpmem; /* Gestionnaire de types */
+ packed_buffer *pbuf; /* Tampon de données à employer*/
+ int ret; /* Bilan de lecture des args. */
+ GSerializableObject *object; /* Version native */
+ bool status; /* Bilan de l'opération */
+
+#define SERIALIZABLE_OBJECT_STORE_METHOD PYTHON_METHOD_DEF \
+( \
+ store, "$self, storage, tpmem, pbuf, /", \
+ METH_VARARGS, py_serializable_object, \
+ "Store an object definition into buffered data.\n" \
+ "\n" \
+ "The *storage* is a pychrysalide.analysis.storage.ObjectStorage instance" \
+ " provided to store inner objects, if relevant, or None. The *tpmem* object"\
+ " is a pychrysalide.analysis.storage.TypeMemory remembering all involved" \
+ " GLib types. The *pbuf* argument points to a" \
+ " pychrysalide.common.PackedBuffer object containing the data to process.\n"\
+ "\n" \
+ "The result is a boolean indicating the status of the operation." \
+)
+
+ ret = PyArg_ParseTuple(args, "O&O&O&", convert_to_object_storage_or_none, &storage,
+ convert_to_type_memory, &tpmem, convert_to_packed_buffer, &pbuf);
+ if (!ret) return NULL;
+
+ object = G_SERIALIZABLE_OBJECT(pygobject_get(self));
+
+ status = g_serializable_object_store(object, storage, tpmem, pbuf);
+
+ result = status ? Py_True : Py_False;
+ Py_INCREF(result);
+
+ return result;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : - *
+* *
+* Description : Fournit un accès à une définition de type à diffuser. *
+* *
+* Retour : Définition d'objet pour Python. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+PyTypeObject *get_python_serializable_object_type(void)
+{
+ static PyMethodDef py_serializable_object_methods[] = {
+ SERIALIZABLE_OBJECT_LOAD_WRAPPER,
+ SERIALIZABLE_OBJECT_STORE_WRAPPER,
+ SERIALIZABLE_OBJECT_LOAD_METHOD,
+ SERIALIZABLE_OBJECT_STORE_METHOD,
+ { NULL }
+ };
+
+ static PyGetSetDef py_serializable_object_getseters[] = {
+ { NULL }
+ };
+
+ static PyTypeObject py_serializable_object_type = {
+
+ PyVarObject_HEAD_INIT(NULL, 0)
+
+ .tp_name = "pychrysalide.analysis.storage.SerializableObject",
+ .tp_basicsize = sizeof(PyObject),
+
+ .tp_flags = Py_TPFLAGS_DEFAULT | Py_TPFLAGS_BASETYPE,
+
+ .tp_doc = SERIALIZABLE_OBJECT_DOC,
+
+ .tp_methods = py_serializable_object_methods,
+ .tp_getset = py_serializable_object_getseters,
+
+ };
+
+ return &py_serializable_object_type;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : module = module dont la définition est à compléter. *
+* *
+* Description : Prend en charge l'objet 'pychrysalide....SerializableObject'.*
+* *
+* Retour : Bilan de l'opération. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+bool ensure_python_serializable_object_is_registered(void)
+{
+ PyTypeObject *type; /* Type 'SerializableObject' */
+ PyObject *module; /* Module à recompléter */
+ PyObject *dict; /* Dictionnaire du module */
+
+ static GInterfaceInfo info = { /* Paramètres d'inscription */
+
+ .interface_init = (GInterfaceInitFunc)py_serializable_object_interface_init,
+ .interface_finalize = NULL,
+ .interface_data = NULL,
+
+ };
+
+ type = get_python_serializable_object_type();
+
+ if (!PyType_HasFeature(type, Py_TPFLAGS_READY))
+ {
+ module = get_access_to_python_module("pychrysalide.analysis.storage");
+
+ dict = PyModule_GetDict(module);
+
+ if (!register_interface_for_pygobject_2(dict, G_TYPE_SERIALIZABLE_OBJECT, type, &info))
+ return false;
+
+ }
+
+ return true;
+
+}
+
+
+/******************************************************************************
+* *
+* 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 objet adapté à une mise en cache. *
+* *
+* Retour : Bilan de l'opération, voire indications supplémentaires. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+int convert_to_serializable_object(PyObject *arg, void *dst)
+{
+ int result; /* Bilan à retourner */
+
+ result = PyObject_IsInstance(arg, (PyObject *)get_python_serializable_object_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 serializable object");
+ break;
+
+ case 1:
+ *((GSerializableObject **)dst) = G_SERIALIZABLE_OBJECT(pygobject_get(arg));
+ break;
+
+ default:
+ assert(false);
+ break;
+
+ }
+
+ return result;
+
+}
diff --git a/plugins/pychrysalide/analysis/storage/serialize.h b/plugins/pychrysalide/analysis/storage/serialize.h
new file mode 100644
index 0000000..7e831e5
--- /dev/null
+++ b/plugins/pychrysalide/analysis/storage/serialize.h
@@ -0,0 +1,45 @@
+
+/* Chrysalide - Outil d'analyse de fichiers binaires
+ * serialize.h - prototypes pour l'équivalent Python du fichier "analysis/storage/serialize.h"
+ *
+ * Copyright (C) 2020 Cyrille Bagard
+ *
+ * This file is part of Chrysalide.
+ *
+ * Chrysalide 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 3 of the License, or
+ * (at your option) any later version.
+ *
+ * Chrysalide 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
+ */
+
+
+#ifndef _PLUGINS_PYCHRYSALIDE_ANALYSIS_STORAGE_SERIALIZE_H
+#define _PLUGINS_PYCHRYSALIDE_ANALYSIS_STORAGE_SERIALIZE_H
+
+
+#include <Python.h>
+#include <stdbool.h>
+
+
+
+/* Fournit un accès à une définition de type à diffuser. */
+PyTypeObject *get_python_serializable_object_type(void);
+
+/* Prend en charge l'objet 'pychrysalide.analysis.storage.SerializableObject'. */
+bool ensure_python_serializable_object_is_registered(void);
+
+/* Tente de convertir en objet adapté à une mise en cache. */
+int convert_to_serializable_object(PyObject *, void *);
+
+
+
+#endif /* _PLUGINS_PYCHRYSALIDE_ANALYSIS_STORAGE_SERIALIZE_H */
diff --git a/plugins/pychrysalide/analysis/storage/storage.c b/plugins/pychrysalide/analysis/storage/storage.c
new file mode 100644
index 0000000..d8739e4
--- /dev/null
+++ b/plugins/pychrysalide/analysis/storage/storage.c
@@ -0,0 +1,516 @@
+
+/* Chrysalide - Outil d'analyse de fichiers binaires
+ * storage.c - équivalent Python du fichier "analysis/storage/storage.c"
+ *
+ * Copyright (C) 2020 Cyrille Bagard
+ *
+ * This file is part of Chrysalide.
+ *
+ * Chrysalide 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 3 of the License, or
+ * (at your option) any later version.
+ *
+ * Chrysalide 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 "storage.h"
+
+
+#include <pygobject.h>
+
+
+#include <analysis/storage/storage-int.h>
+#include <plugins/dt.h>
+
+
+#include "serialize.h"
+#include "../loaded.h"
+#include "../../access.h"
+#include "../../helpers.h"
+
+
+
+/* ------------------------ GLUE POUR CREATION DEPUIS PYTHON ------------------------ */
+
+
+/* Accompagne la création d'une instance dérivée en Python. */
+static PyObject *py_object_storage_new(PyTypeObject *, PyObject *, PyObject *);
+
+/* Initialise une instance sur la base du dérivé de GObject. */
+static int py_object_storage_init(PyObject *, PyObject *, PyObject *);
+
+
+
+/* -------------------------- TAMPON POUR CODE DESASSEMBLE -------------------------- */
+
+
+/* Ajoute le support d'un nouveau groupe d'objets construits. */
+static PyObject *py_object_storage_add_backend(PyObject *, PyObject *);
+
+/* Charge un objet à partir de données rassemblées. */
+static PyObject *py_object_storage_load_object(PyObject *, PyObject *);
+
+/* Sauvegarde un object sous forme de données rassemblées. */
+static PyObject *py_object_storage_store_object(PyObject *, PyObject *);
+
+
+
+/* ---------------------------------------------------------------------------------- */
+/* GLUE POUR CREATION DEPUIS PYTHON */
+/* ---------------------------------------------------------------------------------- */
+
+
+/******************************************************************************
+* *
+* Paramètres : type = type du nouvel objet à mettre en place. *
+* args = éventuelle liste d'arguments. *
+* kwds = éventuel dictionnaire de valeurs mises à disposition. *
+* *
+* Description : Accompagne la création d'une instance dérivée en Python. *
+* *
+* Retour : Nouvel objet Python mis en place ou NULL en cas d'échec. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static PyObject *py_object_storage_new(PyTypeObject *type, PyObject *args, PyObject *kwds)
+{
+ PyObject *result; /* Objet à retourner */
+ PyTypeObject *base; /* Type de base à dériver */
+ bool first_time; /* Evite les multiples passages*/
+ GType gtype; /* Nouveau type de processeur */
+ bool status; /* Bilan d'un enregistrement */
+
+ /* Validations diverses */
+
+ base = get_python_object_storage_type();
+
+ if (type == base)
+ goto simple_way;
+
+ /* Mise en place d'un type dédié */
+
+ first_time = (g_type_from_name(type->tp_name) == 0);
+
+ gtype = build_dynamic_type(G_TYPE_OBJECT_STORAGE, type->tp_name, NULL, NULL, NULL);
+
+ if (first_time)
+ {
+ status = register_class_for_dynamic_pygobject(gtype, type, base);
+
+ if (!status)
+ {
+ result = NULL;
+ goto exit;
+ }
+
+ }
+
+ /* On crée, et on laisse ensuite la main à PyGObject_Type.tp_init() */
+
+ simple_way:
+
+ result = PyType_GenericNew(type, args, kwds);
+
+ exit:
+
+ return result;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : self = objet à initialiser (théoriquement). *
+* args = arguments fournis à l'appel. *
+* kwds = arguments de type key=val fournis. *
+* *
+* Description : Initialise une instance sur la base du dérivé de GObject. *
+* *
+* Retour : 0. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static int py_object_storage_init(PyObject *self, PyObject *args, PyObject *kwds)
+{
+ GLoadedContent *loaded; /* Contenu chargé et traité */
+ int ret; /* Bilan de lecture des args. */
+ GObjectStorage *storage; /* Mécanismes natifs */
+
+#define OBJECT_STORAGE_DOC \
+ "The ObjectStorage object manages the generic storage of GLib" \
+ " objects through serialization.\n" \
+ "\n" \
+ "Instances can be created using the following constructor:\n" \
+ "\n" \
+ " ObjectStorage(loaded)" \
+ "\n" \
+ "Where *loaded* is a pychrysalide.analysis.LoadedContent instance" \
+ " linked to the objects which can apply for a storage process."
+
+ /* Récupération des paramètres */
+
+ ret = PyArg_ParseTuple(args, "O&", convert_to_loaded_content, &loaded);
+ if (!ret) return -1;
+
+ /* Initialisation d'un objet GLib */
+
+ ret = forward_pygobjet_init(self);
+ if (ret == -1) return -1;
+
+ /* Eléments de base */
+
+ storage = G_OBJECT_STORAGE(pygobject_get(self));
+
+ storage->loaded = loaded;
+ g_object_ref(G_OBJECT(loaded));
+
+ return 0;
+
+}
+
+
+
+/* ---------------------------------------------------------------------------------- */
+/* TAMPON POUR CODE DESASSEMBLE */
+/* ---------------------------------------------------------------------------------- */
+
+
+/******************************************************************************
+* *
+* Paramètres : self = classe représentant une mémorisation de types. *
+* args = arguments fournis à l'appel. *
+* *
+* Description : Ajoute le support d'un nouveau groupe d'objets construits. *
+* *
+* Retour : Bilan de l'opération. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static PyObject *py_object_storage_add_backend(PyObject *self, PyObject *args)
+{
+ PyObject *result; /* Bilan à retourner */
+ const char *name; /* Désignation de groupe */
+ const char *filename; /* Nom de fichier à associer */
+ int ret; /* Bilan de lecture des args. */
+ GObjectStorage *storage; /* Mécanismes natifs */
+ bool status; /* Bilan de l'opération */
+
+#define OBJECT_STORAGE_ADD_BACKEND_METHOD PYTHON_METHOD_DEF \
+( \
+ add_backend, "$self, name, /, filename", \
+ METH_VARARGS, py_object_storage, \
+ "Add storage support for a new kind of GLib objects.\n" \
+ "\n" \
+ "The *name* is a string label for the group of target objects" \
+ " and the optional *filename* points to a file used to load" \
+ " objects.\n" \
+ "\n" \
+ "The result is a boolean value indicating the status of" \
+ " the operation: True for success, False for failure." \
+)
+
+ filename = NULL;
+
+ ret = PyArg_ParseTuple(args, "s|s", &name, &filename);
+ if (!ret) return NULL;
+
+ storage = G_OBJECT_STORAGE(pygobject_get(self));
+
+ status = g_object_storage_add_backend(storage, name, filename);
+
+ result = status ? Py_True : Py_False;
+ Py_INCREF(result);
+
+ return result;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : self = classe représentant une mémorisation de types. *
+* args = arguments fournis à l'appel. *
+* *
+* Description : Charge un objet à partir de données rassemblées. *
+* *
+* Retour : Objet restauré en mémoire ou None en cas d'échec. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static PyObject *py_object_storage_load_object(PyObject *self, PyObject *args)
+{
+ PyObject *result; /* Bilan à retourner */
+ const char *name; /* Désignation de groupe */
+ unsigned long long pos; /* Emplacement des données */
+ int ret; /* Bilan de lecture des args. */
+ GObjectStorage *storage; /* Mécanismes natifs */
+ GSerializableObject *object; /* Objet reconstruit ou NULL */
+
+#define OBJECT_STORAGE_LOAD_OBJECT_METHOD PYTHON_METHOD_DEF \
+( \
+ load_object, "$self, name, pos, /", \
+ METH_VARARGS, py_object_storage, \
+ "Load an object from serialized data.\n" \
+ "\n" \
+ "The *name* is a string label for the group of target objects and" \
+ " *pos* is an offset into the data stream indicating the start of" \
+ " the data to unserialize.\n" \
+ "\n" \
+ "The result is a pychrysalide.analysis.storage.SerializableObject" \
+ " instancet in case of success, or None in case of failure." \
+)
+
+ ret = PyArg_ParseTuple(args, "sK", &name, &pos);
+ if (!ret) return NULL;
+
+ storage = G_OBJECT_STORAGE(pygobject_get(self));
+
+ object = g_object_storage_load_object(storage, name, pos);
+
+ if (object != NULL)
+ result = pygobject_new(G_OBJECT(object));
+ else
+ {
+ result = Py_None;
+ Py_INCREF(result);
+ }
+
+ return result;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : self = classe représentant une mémorisation de types. *
+* args = arguments fournis à l'appel. *
+* *
+* Description : Sauvegarde un object sous forme de données rassemblées. *
+* *
+* Retour : Bilan de l'opération. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static PyObject *py_object_storage_store_object(PyObject *self, PyObject *args)
+{
+ PyObject *result; /* Emplacement à retourner */
+ const char *name; /* Désignation de groupe */
+ GSerializableObject *object; /* Objet à traiter */
+ int ret; /* Bilan de lecture des args. */
+ GObjectStorage *storage; /* Mécanismes natifs */
+ off64_t pos; /* Emplacement d'enregistrement*/
+ bool status; /* Bilan de l'opération */
+
+#define OBJECT_STORAGE_STORE_OBJECT_METHOD PYTHON_METHOD_DEF \
+( \
+ store_object, "$self, name, object, /", \
+ METH_VARARGS, py_object_storage, \
+ "Save an object as serialized data.\n" \
+ "\n" \
+ "The *name* is a string label for the group of target objects" \
+ " and the processed *object* has to be a" \
+ " pychrysalide.analysis.storage.SerializableObject instance.\n" \
+ "\n" \
+ "The result is the position of the data for stored object," \
+ " provided as an integer offset, in case of success or None" \
+ " in case of failure." \
+)
+
+ ret = PyArg_ParseTuple(args, "sO&", &name, convert_to_serializable_object, &object);
+ if (!ret) return NULL;
+
+ storage = G_OBJECT_STORAGE(pygobject_get(self));
+
+ status = g_object_storage_store_object(storage, name, object, &pos);
+
+ if (status)
+ result = PyLong_FromUnsignedLongLong((unsigned long long)pos);
+ else
+ {
+ result = Py_None;
+ Py_INCREF(result);
+ }
+
+ return result;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : - *
+* *
+* Description : Fournit un accès à une définition de type à diffuser. *
+* *
+* Retour : Définition d'objet pour Python. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+PyTypeObject *get_python_object_storage_type(void)
+{
+ static PyMethodDef py_object_storage_methods[] = {
+ OBJECT_STORAGE_ADD_BACKEND_METHOD,
+ OBJECT_STORAGE_LOAD_OBJECT_METHOD,
+ OBJECT_STORAGE_STORE_OBJECT_METHOD,
+ { NULL }
+ };
+
+ static PyGetSetDef py_object_storage_getseters[] = {
+ { NULL }
+ };
+
+ static PyTypeObject py_object_storage_type = {
+
+ PyVarObject_HEAD_INIT(NULL, 0)
+
+ .tp_name = "pychrysalide.analysis.storage.ObjectStorage",
+ .tp_basicsize = sizeof(PyGObject),
+
+ .tp_flags = Py_TPFLAGS_DEFAULT,
+
+ .tp_doc = OBJECT_STORAGE_DOC,
+
+ .tp_methods = py_object_storage_methods,
+ .tp_getset = py_object_storage_getseters,
+
+ .tp_init = py_object_storage_init,
+ .tp_new = py_object_storage_new
+
+ };
+
+ return &py_object_storage_type;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : module = module dont la définition est à compléter. *
+* *
+* Description : Prend en charge l'objet 'pychrysalide....ObjectStorage'. *
+* *
+* Retour : Bilan de l'opération. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+bool ensure_python_object_storage_is_registered(void)
+{
+ PyTypeObject *type; /* Type Python 'ObjectStorage' */
+ PyObject *module; /* Module à recompléter */
+ PyObject *dict; /* Dictionnaire du module */
+
+ type = get_python_object_storage_type();
+
+ if (!PyType_HasFeature(type, Py_TPFLAGS_READY))
+ {
+ module = get_access_to_python_module("pychrysalide.analysis.storage");
+
+ dict = PyModule_GetDict(module);
+
+ if (!register_class_for_pygobject(dict, G_TYPE_OBJECT_STORAGE, type, &PyGObject_Type))
+ return false;
+
+ }
+
+ return true;
+
+}
+
+
+/******************************************************************************
+* *
+* 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 conservateur d'objets. *
+* *
+* Retour : Bilan de l'opération, voire indications supplémentaires. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+int convert_to_object_storage(PyObject *arg, void *dst)
+{
+ int result; /* Bilan à retourner */
+
+ result = PyObject_IsInstance(arg, (PyObject *)get_python_object_storage_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 object storage");
+ break;
+
+ case 1:
+ *((GObjectStorage **)dst) = G_OBJECT_STORAGE(pygobject_get(arg));
+ break;
+
+ default:
+ assert(false);
+ break;
+
+ }
+
+ 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 conservateur d'objets ou NULL. *
+* *
+* Retour : Bilan de l'opération, voire indications supplémentaires. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+int convert_to_object_storage_or_none(PyObject *arg, void *dst)
+{
+ int result; /* Bilan à retourner */
+
+ if (arg == Py_None)
+ {
+ *((GTypeMemory **)dst) = NULL;
+ result = 1;
+ }
+
+ else
+ result = convert_to_object_storage(arg, dst);
+
+ return result;
+
+}
diff --git a/plugins/pychrysalide/analysis/storage/storage.h b/plugins/pychrysalide/analysis/storage/storage.h
new file mode 100644
index 0000000..a0a2c18
--- /dev/null
+++ b/plugins/pychrysalide/analysis/storage/storage.h
@@ -0,0 +1,48 @@
+
+/* Chrysalide - Outil d'analyse de fichiers binaires
+ * storage.h - prototypes pour l'équivalent Python du fichier "analysis/storage/storage.h"
+ *
+ * Copyright (C) 2020 Cyrille Bagard
+ *
+ * This file is part of Chrysalide.
+ *
+ * Chrysalide 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 3 of the License, or
+ * (at your option) any later version.
+ *
+ * Chrysalide 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
+ */
+
+
+#ifndef _PLUGINS_PYCHRYSALIDE_ANALYSIS_STORAGE_STORAGE_H
+#define _PLUGINS_PYCHRYSALIDE_ANALYSIS_STORAGE_STORAGE_H
+
+
+#include <Python.h>
+#include <stdbool.h>
+
+
+
+/* Fournit un accès à une définition de type à diffuser. */
+PyTypeObject *get_python_object_storage_type(void);
+
+/* Prend en charge l'objet 'pychrysalide.analysis.storage.ObjectStorage'. */
+bool ensure_python_object_storage_is_registered(void);
+
+/* Tente de convertir en conservateur d'objets. */
+int convert_to_object_storage(PyObject *, void *);
+
+/* Tente de convertir en conservateur d'objets ou NULL. */
+int convert_to_object_storage_or_none(PyObject *, void *);
+
+
+
+#endif /* _PLUGINS_PYCHRYSALIDE_ANALYSIS_STORAGE_STORAGE_H */
diff --git a/plugins/pychrysalide/analysis/storage/tpmem.c b/plugins/pychrysalide/analysis/storage/tpmem.c
new file mode 100644
index 0000000..2cf659f
--- /dev/null
+++ b/plugins/pychrysalide/analysis/storage/tpmem.c
@@ -0,0 +1,508 @@
+
+/* Chrysalide - Outil d'analyse de fichiers binaires
+ * tpmem.c - équivalent Python du fichier "analysis/storage/tpmem.c"
+ *
+ * Copyright (C) 2020 Cyrille Bagard
+ *
+ * This file is part of Chrysalide.
+ *
+ * Chrysalide 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 3 of the License, or
+ * (at your option) any later version.
+ *
+ * Chrysalide 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 "tpmem.h"
+
+
+#include <pygobject.h>
+
+
+#include <analysis/storage/tpmem.h>
+#include <plugins/dt.h>
+
+
+#include "../../access.h"
+#include "../../helpers.h"
+#include "../../common/packed.h"
+
+
+
+/* ------------------------ GLUE POUR CREATION DEPUIS PYTHON ------------------------ */
+
+
+/* Accompagne la création d'une instance dérivée en Python. */
+static PyObject *py_type_memory_new(PyTypeObject *, PyObject *, PyObject *);
+
+/* Initialise une instance sur la base du dérivé de GObject. */
+static int py_type_memory_init(PyObject *, PyObject *, PyObject *);
+
+
+
+/* -------------------------- TAMPON POUR CODE DESASSEMBLE -------------------------- */
+
+
+/* Apprend tous les types mémorisés dans un flux. */
+static PyObject *py_type_memory_read_types(PyObject *, PyObject *);
+
+/* Crée une nouvelle instance d'objet à partir de son type. */
+static PyObject *py_type_memory_create_object(PyObject *, PyObject *);
+
+/* Sauvegarde le type d'un objet instancié. */
+static PyObject *py_type_memory_store_object_gtype(PyObject *, PyObject *);
+
+/* Enregistre tous les types mémorisés dans un flux. */
+static PyObject *py_type_memory_write_types(PyObject *, PyObject *);
+
+
+
+/* ---------------------------------------------------------------------------------- */
+/* GLUE POUR CREATION DEPUIS PYTHON */
+/* ---------------------------------------------------------------------------------- */
+
+
+/******************************************************************************
+* *
+* Paramètres : type = type du nouvel objet à mettre en place. *
+* args = éventuelle liste d'arguments. *
+* kwds = éventuel dictionnaire de valeurs mises à disposition. *
+* *
+* Description : Accompagne la création d'une instance dérivée en Python. *
+* *
+* Retour : Nouvel objet Python mis en place ou NULL en cas d'échec. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static PyObject *py_type_memory_new(PyTypeObject *type, PyObject *args, PyObject *kwds)
+{
+ PyObject *result; /* Objet à retourner */
+ PyTypeObject *base; /* Type de base à dériver */
+ bool first_time; /* Evite les multiples passages*/
+ GType gtype; /* Nouveau type de processeur */
+ bool status; /* Bilan d'un enregistrement */
+
+ /* Validations diverses */
+
+ base = get_python_type_memory_type();
+
+ if (type == base)
+ goto simple_way;
+
+ /* Mise en place d'un type dédié */
+
+ first_time = (g_type_from_name(type->tp_name) == 0);
+
+ gtype = build_dynamic_type(G_TYPE_TYPE_MEMORY, type->tp_name, NULL, NULL, NULL);
+
+ if (first_time)
+ {
+ status = register_class_for_dynamic_pygobject(gtype, type, base);
+
+ if (!status)
+ {
+ result = NULL;
+ goto exit;
+ }
+
+ }
+
+ /* On crée, et on laisse ensuite la main à PyGObject_Type.tp_init() */
+
+ simple_way:
+
+ result = PyType_GenericNew(type, args, kwds);
+
+ exit:
+
+ return result;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : self = objet à initialiser (théoriquement). *
+* args = arguments fournis à l'appel. *
+* kwds = arguments de type key=val fournis. *
+* *
+* Description : Initialise une instance sur la base du dérivé de GObject. *
+* *
+* Retour : 0. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static int py_type_memory_init(PyObject *self, PyObject *args, PyObject *kwds)
+{
+ int ret; /* Bilan de lecture des args. */
+
+#define TYPE_MEMORY_DOC \
+ "The TypeMemory remembers all the types of objects involved in" \
+ " a serialization process.\n" \
+ "\n" \
+ "Instances can be created using the following constructor:\n" \
+ "\n" \
+ " TypeMemory()" \
+
+ /* Initialisation d'un objet GLib */
+
+ ret = forward_pygobjet_init(self);
+ if (ret == -1) return -1;
+
+ return 0;
+
+}
+
+
+
+/* ---------------------------------------------------------------------------------- */
+/* TAMPON POUR CODE DESASSEMBLE */
+/* ---------------------------------------------------------------------------------- */
+
+
+/******************************************************************************
+* *
+* Paramètres : self = classe représentant une mémorisation de types. *
+* args = arguments fournis à l'appel. *
+* *
+* Description : Apprend tous les types mémorisés dans un flux. *
+* *
+* Retour : Bilan de l'opération. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static PyObject *py_type_memory_read_types(PyObject *self, PyObject *args)
+{
+ PyObject *result; /* Bilan à retourner */
+ int fd; /* Flux ouvert en lecture */
+ int ret; /* Bilan de lecture des args. */
+ GTypeMemory *tpmem; /* Mémorisation native */
+ bool status; /* Bilan de l'opération */
+
+#define TYPE_MEMORY_READ_TYPES_METHOD PYTHON_METHOD_DEF \
+( \
+ read_types, "$self, fd", \
+ METH_VARARGS, py_type_memory, \
+ "Read types from a stream.\n" \
+ "\n" \
+ "This operation is usually handled internally by the" \
+ " Chrysalide's core.\n" \
+ "\n" \
+ "The *fd* parameter is an integer representing a valid" \
+ " identifier for a file descriptor opened for reading." \
+ "\n" \
+ "The result is a boolean value indicating the status of" \
+ " the operation: True for success, False for failure." \
+)
+
+ ret = PyArg_ParseTuple(args, "i", &fd);
+ if (!ret) return NULL;
+
+ tpmem = G_TYPE_MEMORY(pygobject_get(self));
+
+ status = g_type_memory_read_types(tpmem, fd);
+
+ result = status ? Py_True : Py_False;
+ Py_INCREF(result);
+
+ return result;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : self = classe représentant une mémorisation de types. *
+* args = arguments fournis à l'appel. *
+* *
+* Description : Crée une nouvelle instance d'objet à partir de son type. *
+* *
+* Retour : Instance issue de l'opération ou NULL. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static PyObject *py_type_memory_create_object(PyObject *self, PyObject *args)
+{
+ PyObject *result; /* Instance à retourner */
+ packed_buffer *pbuf; /* Tampon à consulter */
+ int ret; /* Bilan de lecture des args. */
+ GTypeMemory *tpmem; /* Mémorisation native */
+ GObject *obj; /* Instance retournée */
+
+#define TYPE_MEMORY_CREATE_OBJECT_METHOD PYTHON_METHOD_DEF \
+( \
+ create_object, "$self, pbuf", \
+ METH_VARARGS, py_type_memory, \
+ "Create a new GLib object from serialized data.\n" \
+ "\n" \
+ "The *pbuf* parameter is a pychrysalide.common.PackedBuffer" \
+ " instance providing buffered data to read." \
+ "\n" \
+ "The result is a Python object linked to a native GLib" \
+ " object instance." \
+)
+
+ ret = PyArg_ParseTuple(args, "O&", convert_to_packed_buffer, &pbuf);
+ if (!ret) return NULL;
+
+ tpmem = G_TYPE_MEMORY(pygobject_get(self));
+
+ obj = g_type_memory_create_object(tpmem, pbuf);
+
+ result = pygobject_new(obj);
+
+ return result;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : self = classe représentant une mémorisation de types. *
+* args = arguments fournis à l'appel. *
+* *
+* Description : Sauvegarde le type d'un objet instancié. *
+* *
+* Retour : Bilan de l'opération. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static PyObject *py_type_memory_store_object_gtype(PyObject *self, PyObject *args)
+{
+ PyObject *result; /* Bilan à retourner */
+ GObject *obj; /* Instance à traiter */
+ packed_buffer *pbuf; /* Tampon à consulter */
+ int ret; /* Bilan de lecture des args. */
+ GTypeMemory *tpmem; /* Mémorisation native */
+ bool status; /* Bilan de l'opération */
+
+#define TYPE_MEMORY_STORE_OBJECT_GTYPE_METHOD PYTHON_METHOD_DEF \
+( \
+ store_object_gtype, "$self, obj, pbuf", \
+ METH_VARARGS, py_type_memory, \
+ "Create a new GLib object from serialized data.\n" \
+ "\n" \
+ "The *obj* parameter is the Python version of the GObject" \
+ " whose type is to process and the *pbuf* parameter is a" \
+ " pychrysalide.common.PackedBuffer instance providing buffered" \
+ " data to extend." \
+ "\n" \
+ "The result is a boolean value indicating the status of the" \
+ " operation: True for success, False for failure." \
+)
+
+ ret = PyArg_ParseTuple(args, "O!O&", PyGObject_Type, &obj, convert_to_packed_buffer, &pbuf);
+ if (!ret) return NULL;
+
+ tpmem = G_TYPE_MEMORY(pygobject_get(self));
+
+ status = g_type_memory_store_object_gtype(tpmem, obj, pbuf);
+
+ result = status ? Py_True : Py_False;
+ Py_INCREF(result);
+
+ return result;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : self = classe représentant une mémorisation de types. *
+* args = arguments fournis à l'appel. *
+* *
+* Description : Enregistre tous les types mémorisés dans un flux. *
+* *
+* Retour : Bilan de l'opération. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static PyObject *py_type_memory_write_types(PyObject *self, PyObject *args)
+{
+ PyObject *result; /* Bilan à retourner */
+ int fd; /* Flux ouvert en lecture */
+ int ret; /* Bilan de lecture des args. */
+ GTypeMemory *tpmem; /* Mémorisation native */
+ bool status; /* Bilan de l'opération */
+
+#define TYPE_MEMORY_WRITE_TYPES_METHOD PYTHON_METHOD_DEF \
+( \
+ write_types, "$self, fd", \
+ METH_VARARGS, py_type_memory, \
+ "Write types into a stream.\n" \
+ "\n" \
+ "This operation is usually handled internally by the" \
+ " Chrysalide's core.\n" \
+ "\n" \
+ "The *fd* parameter is an integer representing a valid" \
+ " identifier for a file descriptor opened for writing." \
+ "\n" \
+ "The result is a boolean value indicating the status of" \
+ " the operation: True for success, False for failure." \
+)
+
+ ret = PyArg_ParseTuple(args, "i", &fd);
+ if (!ret) return NULL;
+
+ tpmem = G_TYPE_MEMORY(pygobject_get(self));
+
+ status = g_type_memory_write_types(tpmem, fd);
+
+ result = status ? Py_True : Py_False;
+ Py_INCREF(result);
+
+ return result;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : - *
+* *
+* Description : Fournit un accès à une définition de type à diffuser. *
+* *
+* Retour : Définition d'objet pour Python. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+PyTypeObject *get_python_type_memory_type(void)
+{
+ static PyMethodDef py_type_memory_methods[] = {
+ TYPE_MEMORY_READ_TYPES_METHOD,
+ TYPE_MEMORY_CREATE_OBJECT_METHOD,
+ TYPE_MEMORY_STORE_OBJECT_GTYPE_METHOD,
+ TYPE_MEMORY_WRITE_TYPES_METHOD,
+ { NULL }
+ };
+
+ static PyGetSetDef py_type_memory_getseters[] = {
+ { NULL }
+ };
+
+ static PyTypeObject py_type_memory_type = {
+
+ PyVarObject_HEAD_INIT(NULL, 0)
+
+ .tp_name = "pychrysalide.analysis.storage.TypeMemory",
+ .tp_basicsize = sizeof(PyGObject),
+
+ .tp_flags = Py_TPFLAGS_DEFAULT,
+
+ .tp_doc = TYPE_MEMORY_DOC,
+
+ .tp_methods = py_type_memory_methods,
+ .tp_getset = py_type_memory_getseters,
+
+ .tp_init = py_type_memory_init,
+ .tp_new = py_type_memory_new
+
+ };
+
+ return &py_type_memory_type;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : module = module dont la définition est à compléter. *
+* *
+* Description : Prend en charge l'objet 'pychrysalide.analysis...TypeMemory'.*
+* *
+* Retour : Bilan de l'opération. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+bool ensure_python_type_memory_is_registered(void)
+{
+ PyTypeObject *type; /* Type Python 'BufferCache' */
+ PyObject *module; /* Module à recompléter */
+ PyObject *dict; /* Dictionnaire du module */
+
+ type = get_python_type_memory_type();
+
+ if (!PyType_HasFeature(type, Py_TPFLAGS_READY))
+ {
+ module = get_access_to_python_module("pychrysalide.analysis.storage");
+
+ dict = PyModule_GetDict(module);
+
+ if (!register_class_for_pygobject(dict, G_TYPE_TYPE_MEMORY, type, &PyGObject_Type))
+ return false;
+
+ }
+
+ return true;
+
+}
+
+
+/******************************************************************************
+* *
+* 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 mémorisation de types. *
+* *
+* Retour : Bilan de l'opération, voire indications supplémentaires. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+int convert_to_type_memory(PyObject *arg, void *dst)
+{
+ int result; /* Bilan à retourner */
+
+ result = PyObject_IsInstance(arg, (PyObject *)get_python_type_memory_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 buffer cache");
+ break;
+
+ case 1:
+ *((GTypeMemory **)dst) = G_TYPE_MEMORY(pygobject_get(arg));
+ break;
+
+ default:
+ assert(false);
+ break;
+
+ }
+
+ return result;
+
+}
diff --git a/plugins/pychrysalide/analysis/storage/tpmem.h b/plugins/pychrysalide/analysis/storage/tpmem.h
new file mode 100644
index 0000000..1085632
--- /dev/null
+++ b/plugins/pychrysalide/analysis/storage/tpmem.h
@@ -0,0 +1,45 @@
+
+/* Chrysalide - Outil d'analyse de fichiers binaires
+ * tpmem.h - prototypes pour l'équivalent Python du fichier "analysis/storage/tpmem.h"
+ *
+ * Copyright (C) 2020 Cyrille Bagard
+ *
+ * This file is part of Chrysalide.
+ *
+ * Chrysalide 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 3 of the License, or
+ * (at your option) any later version.
+ *
+ * Chrysalide 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
+ */
+
+
+#ifndef _PLUGINS_PYCHRYSALIDE_ANALYSIS_STORAGE_TPMEM_H
+#define _PLUGINS_PYCHRYSALIDE_ANALYSIS_STORAGE_TPMEM_H
+
+
+#include <Python.h>
+#include <stdbool.h>
+
+
+
+/* Fournit un accès à une définition de type à diffuser. */
+PyTypeObject *get_python_type_memory_type(void);
+
+/* Prend en charge l'objet 'pychrysalide.analysis.storage.TypeMemory'. */
+bool ensure_python_type_memory_is_registered(void);
+
+/* Tente de convertir en mémorisation de types. */
+int convert_to_type_memory(PyObject *, void *);
+
+
+
+#endif /* _PLUGINS_PYCHRYSALIDE_ANALYSIS_STORAGE_TPMEM_H */
diff --git a/src/analysis/Makefile.am b/src/analysis/Makefile.am
index c1fbc9f..00cc647 100644
--- a/src/analysis/Makefile.am
+++ b/src/analysis/Makefile.am
@@ -23,6 +23,7 @@ libanalysis_la_LIBADD = \
db/libanalysisdb.la \
disass/libanalysisdisass.la \
human/libanalysishuman.la \
+ storage/libanalysisstorage.la \
types/libanalysistypes.la
libanalysis_la_LDFLAGS =
@@ -37,4 +38,4 @@ AM_CPPFLAGS = $(LIBGTK_CFLAGS) $(LIBXML_CFLAGS)
AM_CFLAGS = $(DEBUG_CFLAGS) $(WARNING_FLAGS) $(COMPLIANCE_FLAGS)
-SUBDIRS = contents db disass human types
+SUBDIRS = contents db disass human storage types
diff --git a/src/analysis/storage/Makefile.am b/src/analysis/storage/Makefile.am
new file mode 100644
index 0000000..94f5041
--- /dev/null
+++ b/src/analysis/storage/Makefile.am
@@ -0,0 +1,30 @@
+
+noinst_LTLIBRARIES = libanalysisstorage.la
+
+
+libanalysisstorage_la_SOURCES = \
+ cache-int.h \
+ cache.h cache.c \
+ container-int.h \
+ container.h container.c \
+ serialize-int.h \
+ serialize.h serialize.c \
+ storage-int.h \
+ storage.h storage.c \
+ tpmem.h tpmem.c
+
+libanalysisstorage_la_LIBADD =
+
+libanalysisstorage_la_LDFLAGS = $(LIBSSL_LIBS)
+
+
+devdir = $(includedir)/chrysalide/$(subdir:src/%=%)
+
+dev_HEADERS = $(libanalysisstorage_la_SOURCES:%c=)
+
+
+AM_CPPFLAGS = $(LIBGTK_CFLAGS) $(LIBXML_CFLAGS) $(LIBARCHIVE_CFLAGS) $(LIBSQLITE_CFLAGS) $(LIBSSL_CFLAGS)
+
+AM_CFLAGS = $(DEBUG_CFLAGS) $(WARNING_FLAGS) $(COMPLIANCE_FLAGS)
+
+SUBDIRS =
diff --git a/src/analysis/storage/cache-int.h b/src/analysis/storage/cache-int.h
new file mode 100644
index 0000000..17be85d
--- /dev/null
+++ b/src/analysis/storage/cache-int.h
@@ -0,0 +1,62 @@
+
+/* Chrysalide - Outil d'analyse de fichiers binaires
+ * cache.h - prototypes internes pour la conservation hors mémoire d'objets choisis
+ *
+ * Copyright (C) 2020 Cyrille Bagard
+ *
+ * This file is part of Chrysalide.
+ *
+ * Chrysalide 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 3 of the License, or
+ * (at your option) any later version.
+ *
+ * Chrysalide 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 Foobar. If not, see <http://www.gnu.org/licenses/>.
+ */
+
+
+#ifndef _ANALYSIS_STORAGE_CACHE_INT_H
+#define _ANALYSIS_STORAGE_CACHE_INT_H
+
+
+#include "cache.h"
+
+
+
+/* Définition d'un cache d'objets entreposables (instance) */
+struct _GObjectCache
+{
+ GObject parent; /* A laisser en premier */
+
+ GLoadedContent *loaded; /* Contenu principal */
+
+ char *filename; /* Fichier local utilisé */
+ int fd; /* Descripteur du flux associé */
+
+ GCacheContainer **containers; /* Objets en sursis */
+ size_t count; /* Quantité de ces objets */
+ size_t free_ptr; /* Point d'enregistrement */
+ GMutex mutex; /* Contrôle d'accès à la liste */
+
+};
+
+/* Définition d'un cache d'objets entreposables (classe) */
+struct _GObjectCacheClass
+{
+ GObjectClass parent; /* A laisser en premier */
+
+};
+
+
+/* Associe un contenu à un cache d'objets. */
+bool g_object_cache_open_for(GObjectCache *, GLoadedContent *);
+
+
+
+#endif /* _ANALYSIS_STORAGE_CACHE_INT_H */
diff --git a/src/analysis/storage/cache.c b/src/analysis/storage/cache.c
new file mode 100644
index 0000000..3d0966b
--- /dev/null
+++ b/src/analysis/storage/cache.c
@@ -0,0 +1,334 @@
+
+/* Chrysalide - Outil d'analyse de fichiers binaires
+ * cache.c - conservation hors mémoire d'objets choisis
+ *
+ * Copyright (C) 2020 Cyrille Bagard
+ *
+ * This file is part of Chrysalide.
+ *
+ * Chrysalide 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 3 of the License, or
+ * (at your option) any later version.
+ *
+ * Chrysalide 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 Foobar. If not, see <http://www.gnu.org/licenses/>.
+ */
+
+
+#include "cache.h"
+
+
+#include <assert.h>
+#include <fcntl.h>
+#include <malloc.h>
+#include <unistd.h>
+
+
+#include "cache-int.h"
+#include "../../core/logs.h"
+
+
+
+/* Initialise la classe des caches d'objets entreposables. */
+static void g_object_cache_class_init(GObjectCacheClass *);
+
+/* Initialise une instance de cache d'objets entreposables. */
+static void g_object_cache_init(GObjectCache *);
+
+/* Supprime toutes les références externes. */
+static void g_object_cache_dispose(GObjectCache *);
+
+/* Procède à la libération totale de la mémoire. */
+static void g_object_cache_finalize(GObjectCache *);
+
+
+
+/* Indique le type défini pour un cache d'objets entreposables. */
+G_DEFINE_TYPE(GObjectCache, g_object_cache, G_TYPE_OBJECT);
+
+
+/******************************************************************************
+* *
+* Paramètres : klass = classe à initialiser. *
+* *
+* Description : Initialise la classe des caches d'objets entreposables. *
+* *
+* Retour : - *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static void g_object_cache_class_init(GObjectCacheClass *klass)
+{
+ GObjectClass *object; /* Autre version de la classe */
+
+ object = G_OBJECT_CLASS(klass);
+
+ object->dispose = (GObjectFinalizeFunc/* ! */)g_object_cache_dispose;
+ object->finalize = (GObjectFinalizeFunc)g_object_cache_finalize;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : cache = instance à initialiser. *
+* *
+* Description : Initialise une instance de cache d'objets entreposables. *
+* *
+* Retour : - *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static void g_object_cache_init(GObjectCache *cache)
+{
+ cache->loaded = NULL;
+
+ cache->filename = NULL;
+ cache->fd = -1;
+
+ cache->containers = NULL;
+ cache->count = 0;
+ cache->free_ptr = 0;
+ g_mutex_init(&cache->mutex);
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : cache = instance d'objet GLib à traiter. *
+* *
+* Description : Supprime toutes les références externes. *
+* *
+* Retour : - *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static void g_object_cache_dispose(GObjectCache *cache)
+{
+ size_t i; /* Boucle de parcours */
+
+ g_clear_object(&cache->loaded);
+
+ g_mutex_lock(&cache->mutex);
+
+ for (i = 0; i < cache->count; i++)
+ g_clear_object(&cache->containers[i]);
+
+ g_mutex_unlock(&cache->mutex);
+
+ g_mutex_clear(&cache->mutex);
+
+ G_OBJECT_CLASS(g_object_cache_parent_class)->dispose(G_OBJECT(cache));
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : cache = instance d'objet GLib à traiter. *
+* *
+* Description : Procède à la libération totale de la mémoire. *
+* *
+* Retour : - *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static void g_object_cache_finalize(GObjectCache *cache)
+{
+ int ret; /* Bilan d'un appel */
+
+ ret = access(cache->filename, W_OK);
+ if (ret == 0)
+ {
+ ret = unlink(cache->filename);
+ if (ret != 0) LOG_ERROR_N("unlink");
+ }
+
+ free(cache->filename);
+
+ if (cache->containers != NULL)
+ free(cache->containers);
+
+ G_OBJECT_CLASS(g_object_cache_parent_class)->finalize(G_OBJECT(cache));
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : loaded = contenu binaire à associer. *
+* *
+* Description : Crée le support d'un cache d'objets entreposables. *
+* *
+* Retour : Mécanismes mis en place. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+GObjectCache *g_object_cache_new(GLoadedContent *loaded)
+{
+ GObjectCache *result; /* Structure à retourner */
+
+ result = g_object_new(G_TYPE_OBJECT_CACHE, NULL);
+
+ if (!g_object_cache_open_for(result, loaded))
+ {
+ g_object_unref(G_OBJECT(result));
+ result = NULL;
+ }
+
+ return result;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : cache = cache d'objets à manipuler. *
+* loaded = contenu binaire à associer. *
+* *
+* Description : Associe un contenu à un cache d'objets. *
+* *
+* Retour : Bilan de l'opéation. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+bool g_object_cache_open_for(GObjectCache *cache, GLoadedContent *loaded)
+{
+ bool result; /* Bilan à retourner */
+ GBinContent *content; /* Contenu binaire traité */
+ const gchar *checksum; /* Empreinte de ce contenu */
+
+ result = (cache->loaded == NULL);
+ assert(result);
+
+ if (result) goto done;
+
+ cache->loaded = loaded;
+ g_object_ref(G_OBJECT(loaded));
+
+ /* Constitution du fichier de cache */
+
+ content = g_loaded_content_get_content(loaded);
+
+ checksum = g_binary_content_get_checksum(content);
+
+ asprintf(&cache->filename, "/dev/shm/%s.cache", checksum);
+
+ g_object_unref(G_OBJECT(content));
+
+ /* Ouverture dudit fichier */
+
+ cache->fd = open(cache->filename, O_CREAT | O_TRUNC | O_LARGEFILE, 0600);
+ if (cache->fd == -1)
+ {
+ LOG_ERROR_N("open");
+ result = false;
+ goto done;
+ }
+
+ /* Préparation du cache */
+
+ cache->count = 1000;
+
+ cache->containers = calloc(cache->count, sizeof(GCacheContainer *));
+
+ result = true;
+
+ done:
+
+ return result;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : cache = cache d'objets à manipuler. *
+* container = objet à placer dans le cache. *
+* *
+* Description : Introduit un contenu dans un cache d'objets. *
+* *
+* Retour : - *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+void g_object_cache_add(GObjectCache *cache, GCacheContainer *container)
+{
+ bool loop; /* Détection de trop-plein */
+ size_t i; /* Boucle de parcours */
+
+ /* Recherche d'un emplacement libre */
+
+ loop = false;
+
+ i = cache->free_ptr;
+
+ do
+ {
+ if (cache->containers[i] != NULL)
+ {
+ g_cache_container_lock_unlock(cache->containers[i], true);
+
+ if (g_cache_container_can_store(cache->containers[i]))
+ {
+ if (true) // TODO
+ g_clear_object(&cache->containers[i]);
+ }
+
+ g_cache_container_lock_unlock(cache->containers[i], false);
+
+ }
+
+ if (cache->containers[i] == NULL)
+ break;
+
+ i++;
+
+ if (i == cache->count)
+ i = 0;
+
+ loop = (i == cache->free_ptr);
+
+ } while (!loop);
+
+ if (loop)
+ {
+ log_simple_message(LMT_WARNING, _("Instruction cache is full!"));
+ goto exit;
+ }
+
+ /* Inscription à la liste des sursis */
+
+ cache->containers[i] = container;
+
+ cache->free_ptr = (i + 1);
+
+ if (cache->free_ptr == cache->count)
+ cache->free_ptr = 0;
+
+ exit:
+
+ ;
+
+}
diff --git a/src/analysis/storage/cache.h b/src/analysis/storage/cache.h
new file mode 100644
index 0000000..7f65c09
--- /dev/null
+++ b/src/analysis/storage/cache.h
@@ -0,0 +1,62 @@
+
+/* Chrysalide - Outil d'analyse de fichiers binaires
+ * cache.h - prototypes pour la conservation hors mémoire d'objets choisis
+ *
+ * Copyright (C) 2020 Cyrille Bagard
+ *
+ * This file is part of Chrysalide.
+ *
+ * Chrysalide 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 3 of the License, or
+ * (at your option) any later version.
+ *
+ * Chrysalide 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 Foobar. If not, see <http://www.gnu.org/licenses/>.
+ */
+
+
+#ifndef _ANALYSIS_STORAGE_CACHE_H
+#define _ANALYSIS_STORAGE_CACHE_H
+
+
+#include <glib-object.h>
+
+
+#include "container.h"
+#include "../loaded.h"
+
+
+
+#define G_TYPE_OBJECT_CACHE g_object_cache_get_type()
+#define G_OBJECT_CACHE(obj) (G_TYPE_CHECK_INSTANCE_CAST((obj), G_TYPE_OBJECT_CACHE, GObjectCache))
+#define G_IS_OBJECT_CACHE(obj) (G_TYPE_CHECK_INSTANCE_TYPE((obj), G_TYPE_OBJECT_CACHE))
+#define G_OBJECT_CACHE_CLASS(klass) (G_TYPE_CHECK_CLASS_CAST((klass), G_TYPE_OBJECT_CACHE, GObjectCacheClass))
+#define G_IS_OBJECT_CACHE_CLASS(klass) (G_TYPE_CHECK_CLASS_TYPE((klass), G_TYPE_OBJECT_CACHE))
+#define G_OBJECT_CACHE_GET_CLASS(obj) (G_TYPE_INSTANCE_GET_CLASS((obj), G_TYPE_OBJECT_CACHE, GObjectCacheClass))
+
+
+/* Définition d'un cache d'objets entreposables (instance) */
+typedef struct _GObjectCache GObjectCache;
+
+/* Définition d'un cache d'objets entreposables (classe) */
+typedef struct _GObjectCacheClass GObjectCacheClass;
+
+
+/* Indique le type défini pour un cache d'objets entreposables. */
+GType g_object_cache_get_type(void);
+
+/* Crée le support d'un cache d'objets entreposables. */
+GObjectCache *g_object_cache_new(GLoadedContent *);
+
+/* Introduit un contenu dans un cache d'objets. */
+void g_object_cache_add(GObjectCache *, GCacheContainer *);
+
+
+
+#endif /* _ANALYSIS_STORAGE_CACHE_H */
diff --git a/src/analysis/storage/container-int.h b/src/analysis/storage/container-int.h
new file mode 100644
index 0000000..19e77df
--- /dev/null
+++ b/src/analysis/storage/container-int.h
@@ -0,0 +1,62 @@
+
+/* Chrysalide - Outil d'analyse de fichiers binaires
+ * container-int.h - définitions internes propres aux conteneurs d'objets entreposables dans un cache
+ *
+ * Copyright (C) 2020 Cyrille Bagard
+ *
+ * This file is part of Chrysalide.
+ *
+ * Chrysalide 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 3 of the License, or
+ * (at your option) any later version.
+ *
+ * Chrysalide 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 Chrysalide. If not, see <http://www.gnu.org/licenses/>.
+ */
+
+
+#ifndef _ANALYSIS_STORAGE_CONTAINER_INT_H
+#define _ANALYSIS_STORAGE_CONTAINER_INT_H
+
+
+#include "container.h"
+
+
+
+/* Contrôle l'accès au contenu d'un conteneur. */
+typedef void (* lock_unlock_container_cb) (GCacheContainer *, bool);
+
+/* Détermine si le conteneur a ses accès verrouillés. */
+#ifndef NDEBUG
+typedef bool (* is_locked_container_cb) (GCacheContainer *);
+#endif
+
+/* Indique si le contenu d'un conteneur peut être mis en cache. */
+typedef bool (* can_store_container_cb) (GCacheContainer *);
+
+/* Intermédiaire pour un conteneur d'objets entreposables (interface) */
+struct _GCacheContainerIface
+{
+ GTypeInterface base_iface; /* A laisser en premier */
+
+ lock_unlock_container_cb lock_unlock; /* Contrôle d'accès au contenu */
+#ifndef NDEBUG
+ is_locked_container_cb is_locked; /* Validation des verrous */
+#endif
+ can_store_container_cb can_store; /* Mise en cache possible ? */
+
+};
+
+
+/* Redéfinition */
+typedef GCacheContainerIface GCacheContainerInterface;
+
+
+
+#endif /* _ANALYSIS_STORAGE_CONTAINER_INT_H */
diff --git a/src/analysis/storage/container.c b/src/analysis/storage/container.c
new file mode 100644
index 0000000..60d6d74
--- /dev/null
+++ b/src/analysis/storage/container.c
@@ -0,0 +1,140 @@
+
+/* Chrysalide - Outil d'analyse de fichiers binaires
+ * container.c - conteneurs d'objets entreposables dans un cache
+ *
+ * Copyright (C) 2020 Cyrille Bagard
+ *
+ * This file is part of Chrysalide.
+ *
+ * Chrysalide 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 3 of the License, or
+ * (at your option) any later version.
+ *
+ * Chrysalide 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 Chrysalide. If not, see <http://www.gnu.org/licenses/>.
+ */
+
+
+#include "container.h"
+
+
+#include <assert.h>
+
+
+#include "container-int.h"
+
+
+
+/* Procède à l'initialisation de l'interface de conteneur. */
+static void g_cache_container_default_init(GCacheContainerInterface *);
+
+
+
+/* Détermine le type d'une interface pour un conteneur d'objets entreposables. */
+G_DEFINE_INTERFACE(GCacheContainer, g_cache_container, G_TYPE_OBJECT)
+
+
+/******************************************************************************
+* *
+* Paramètres : iface = interface GLib à initialiser. *
+* *
+* Description : Procède à l'initialisation de l'interface de conteneur. *
+* *
+* Retour : - *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static void g_cache_container_default_init(GCacheContainerInterface *iface)
+{
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : container = conteneur à manipuler. *
+* lock = indique une demande de verrou. *
+* *
+* Description : Contrôle l'accès au contenu d'un conteneur. *
+* *
+* Retour : - *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+void g_cache_container_lock_unlock(GCacheContainer *container, bool lock)
+{
+ GCacheContainerIface *iface; /* Interface utilisée */
+
+ assert(g_cache_container_is_locked(container));
+
+ iface = G_CACHE_CONTAINER_GET_IFACE(container);
+
+ iface->lock_unlock(container, lock);
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : container = conteneur à consulter. *
+* *
+* Description : Détermine si le conteneur a ses accès verrouillés. *
+* *
+* Retour : Bilan de la consultation. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+#ifndef NDEBUG
+bool g_cache_container_is_locked(GCacheContainer *container)
+{
+ bool result; /* Bilan à retourner */
+ GCacheContainerIface *iface; /* Interface utilisée */
+
+ iface = G_CACHE_CONTAINER_GET_IFACE(container);
+
+ result = iface->is_locked(container);
+
+ return result;
+
+}
+#endif
+
+
+/******************************************************************************
+* *
+* Paramètres : container = conteneur à consulter. *
+* *
+* Description : Indique si le contenu d'un conteneur peut être mis en cache. *
+* *
+* Retour : Bilan de la consultation. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+bool g_cache_container_can_store(GCacheContainer *container)
+{
+ bool result; /* Bilan à retourner */
+ GCacheContainerIface *iface; /* Interface utilisée */
+
+ assert(g_cache_container_is_locked(container));
+
+ iface = G_CACHE_CONTAINER_GET_IFACE(container);
+
+ result = iface->can_store(container);
+
+ return result;
+
+}
diff --git a/src/analysis/storage/container.h b/src/analysis/storage/container.h
new file mode 100644
index 0000000..b85793d
--- /dev/null
+++ b/src/analysis/storage/container.h
@@ -0,0 +1,66 @@
+
+/* Chrysalide - Outil d'analyse de fichiers binaires
+ * container.h - prototypes pour les conteneurs d'objets entreposables dans un cache
+ *
+ * Copyright (C) 2020 Cyrille Bagard
+ *
+ * This file is part of Chrysalide.
+ *
+ * Chrysalide 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 3 of the License, or
+ * (at your option) any later version.
+ *
+ * Chrysalide 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 Chrysalide. If not, see <http://www.gnu.org/licenses/>.
+ */
+
+
+#ifndef _ANALYSIS_STORAGE_CONTAINER_H
+#define _ANALYSIS_STORAGE_CONTAINER_H
+
+
+#include <glib-object.h>
+
+
+#include "../../common/packed.h"
+
+
+
+#define G_TYPE_CACHE_CONTAINER g_cache_container_get_type()
+#define G_CACHE_CONTAINER(obj) (G_TYPE_CHECK_INSTANCE_CAST((obj), G_TYPE_CACHE_CONTAINER, GCacheContainer))
+#define G_CACHE_CONTAINER_CLASS(vtable) (G_TYPE_CHECK_CLASS_CAST((vtable), G_TYPE_CACHE_CONTAINER, GCacheContainerIface))
+#define G_IS_CACHE_CONTAINER(obj) (G_TYPE_CHECK_INSTANCE_TYPE((obj), G_TYPE_CACHE_CONTAINER))
+#define G_IS_CACHE_CONTAINER_CLASS(vtable) (G_TYPE_CHECK_CLASS_TYPE((vtable), G_TYPE_CACHE_CONTAINER))
+#define G_CACHE_CONTAINER_GET_IFACE(inst) (G_TYPE_INSTANCE_GET_INTERFACE((inst), G_TYPE_CACHE_CONTAINER, GCacheContainerIface))
+
+
+/* Intermédiaire pour un conteneur d'objets entreposables (coquille vide) */
+typedef struct _GCacheContainer GCacheContainer;
+
+/* Intermédiaire pour un conteneur d'objets entreposables (interface) */
+typedef struct _GCacheContainerIface GCacheContainerIface;
+
+
+/* Détermine le type d'une interface pour un conteneur d'objets entreposables. */
+GType g_cache_container_get_type(void) G_GNUC_CONST;
+
+/* Contrôle l'accès au contenu d'un conteneur. */
+void g_cache_container_lock_unlock(GCacheContainer *, bool);
+
+/* Détermine si le conteneur a ses accès verrouillés. */
+#ifndef NDEBUG
+bool g_cache_container_is_locked(GCacheContainer *);
+#endif
+
+/* Indique si le contenu d'un conteneur peut être mis en cache. */
+bool g_cache_container_can_store(GCacheContainer *);
+
+
+
+#endif /* _ANALYSIS_STORAGE_CONTAINER_H */
diff --git a/src/analysis/storage/serialize-int.h b/src/analysis/storage/serialize-int.h
new file mode 100644
index 0000000..3a99b52
--- /dev/null
+++ b/src/analysis/storage/serialize-int.h
@@ -0,0 +1,55 @@
+
+/* Chrysalide - Outil d'analyse de fichiers binaires
+ * serialize-int.h - définitions internes propres aux objets entreposables dans un cache
+ *
+ * Copyright (C) 2020 Cyrille Bagard
+ *
+ * This file is part of Chrysalide.
+ *
+ * Chrysalide 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 3 of the License, or
+ * (at your option) any later version.
+ *
+ * Chrysalide 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 Chrysalide. If not, see <http://www.gnu.org/licenses/>.
+ */
+
+
+#ifndef _ANALYSIS_STORAGE_SERIALIZE_INT_H
+#define _ANALYSIS_STORAGE_SERIALIZE_INT_H
+
+
+#include "serialize.h"
+
+
+
+/* Charge un objet depuis une mémoire tampon. */
+typedef bool (* load_serializable_object_cb) (GSerializableObject *, GObjectStorage *, GTypeMemory *, packed_buffer *);
+
+/* Sauvegarde un objet dans une mémoire tampon. */
+typedef bool (* store_serializable_object_cb) (const GSerializableObject *, GObjectStorage *, GTypeMemory *, packed_buffer *);
+
+
+/* Intermédiaire pour la mise en cache d'objet (interface) */
+struct _GSerializableObjectIface
+{
+ GTypeInterface base_iface; /* A laisser en premier */
+
+ load_serializable_object_cb load; /* Chargement */
+ store_serializable_object_cb store; /* Enregistrement */
+
+};
+
+
+/* Redéfinition */
+typedef GSerializableObjectIface GSerializableObjectInterface;
+
+
+
+#endif /* _ANALYSIS_STORAGE_SERIALIZE_INT_H */
diff --git a/src/analysis/storage/serialize.c b/src/analysis/storage/serialize.c
new file mode 100644
index 0000000..6ed1eab
--- /dev/null
+++ b/src/analysis/storage/serialize.c
@@ -0,0 +1,119 @@
+
+/* Chrysalide - Outil d'analyse de fichiers binaires
+ * serialize.h - objets entreposables dans un cache
+ *
+ * Copyright (C) 2020 Cyrille Bagard
+ *
+ * This file is part of Chrysalide.
+ *
+ * Chrysalide 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 3 of the License, or
+ * (at your option) any later version.
+ *
+ * Chrysalide 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 Chrysalide. If not, see <http://www.gnu.org/licenses/>.
+ */
+
+
+#include "serialize.h"
+
+
+#include "serialize-int.h"
+
+
+
+/* Procède à l'initialisation de l'interface de mise en cache. */
+static void g_serializable_object_default_init(GSerializableObjectInterface *);
+
+
+
+/* Détermine le type d'une interface pour la mise en cache d'objet. */
+G_DEFINE_INTERFACE(GSerializableObject, g_serializable_object, G_TYPE_OBJECT)
+
+
+/******************************************************************************
+* *
+* Paramètres : iface = interface GLib à initialiser. *
+* *
+* Description : Procède à l'initialisation de l'interface de mise en cache. *
+* *
+* Retour : - *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static void g_serializable_object_default_init(GSerializableObjectInterface *iface)
+{
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : object = instruction d'assemblage à consulter. *
+* storage = conservateur de données à manipuler ou NULL. *
+* tpmem = mémoire des types d'objets à compléter. *
+* pbuf = zone tampon à remplir. *
+* *
+* Description : Charge un objet depuis une mémoire tampon. *
+* *
+* Retour : Bilan de l'opération. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+bool g_serializable_object_load(GSerializableObject *object, GObjectStorage *storage, GTypeMemory *tpmem, packed_buffer *pbuf)
+{
+ bool result; /* Bilan à retourner */
+ GSerializableObjectIface *iface; /* Interface utilisée */
+
+ iface = G_SERIALIZABLE_OBJECT_GET_IFACE(object);
+
+ result = iface->load(object, storage, tpmem, pbuf);
+
+ return result;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : object = instruction d'assemblage à consulter. *
+* storage = conservateur de données à manipuler ou NULL. *
+* tpmem = mémoire des types d'objets à compléter. *
+* pbuf = zone tampon à remplir. *
+* *
+* Description : Sauvegarde un objet dans une mémoire tampon. *
+* *
+* Retour : Bilan de l'opération. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+bool g_serializable_object_store(const GSerializableObject *object, GObjectStorage *storage, GTypeMemory *tpmem, packed_buffer *pbuf)
+{
+ bool result; /* Bilan à retourner */
+ GSerializableObjectIface *iface; /* Interface utilisée */
+
+ result = g_type_memory_store_object_gtype(tpmem, G_OBJECT(object), pbuf);
+
+ if (result)
+ {
+ iface = G_SERIALIZABLE_OBJECT_GET_IFACE(object);
+
+ result = iface->store(object, storage, tpmem, pbuf);
+
+ }
+
+ return result;
+
+}
diff --git a/src/analysis/storage/serialize.h b/src/analysis/storage/serialize.h
new file mode 100644
index 0000000..d248b65
--- /dev/null
+++ b/src/analysis/storage/serialize.h
@@ -0,0 +1,65 @@
+
+/* Chrysalide - Outil d'analyse de fichiers binaires
+ * serialize.h - prototypes pour les objets entreposables dans un cache
+ *
+ * Copyright (C) 2020 Cyrille Bagard
+ *
+ * This file is part of Chrysalide.
+ *
+ * Chrysalide 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 3 of the License, or
+ * (at your option) any later version.
+ *
+ * Chrysalide 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 Chrysalide. If not, see <http://www.gnu.org/licenses/>.
+ */
+
+
+#ifndef _ANALYSIS_STORAGE_SERIALIZE_H
+#define _ANALYSIS_STORAGE_SERIALIZE_H
+
+
+#include <glib-object.h>
+
+
+#include "tpmem.h"
+#include "../../common/packed.h"
+
+
+
+#define G_TYPE_SERIALIZABLE_OBJECT g_serializable_object_get_type()
+#define G_SERIALIZABLE_OBJECT(obj) (G_TYPE_CHECK_INSTANCE_CAST((obj), G_TYPE_SERIALIZABLE_OBJECT, GSerializableObject))
+#define G_SERIALIZABLE_OBJECT_CLASS(vtable) (G_TYPE_CHECK_CLASS_CAST((vtable), G_TYPE_SERIALIZABLE_OBJECT, GSerializableObjectIface))
+#define G_IS_SERIALIZABLE_OBJECT(obj) (G_TYPE_CHECK_INSTANCE_TYPE((obj), G_TYPE_SERIALIZABLE_OBJECT))
+#define G_IS_SERIALIZABLE_OBJECT_CLASS(vtable) (G_TYPE_CHECK_CLASS_TYPE((vtable), G_TYPE_SERIALIZABLE_OBJECT))
+#define G_SERIALIZABLE_OBJECT_GET_IFACE(inst) (G_TYPE_INSTANCE_GET_INTERFACE((inst), G_TYPE_SERIALIZABLE_OBJECT, GSerializableObjectIface))
+
+
+/* Intermédiaire pour la mise en cache d'objet (coquille vide) */
+typedef struct _GSerializableObject GSerializableObject;
+
+/* Intermédiaire pour la mise en cache d'objet (interface) */
+typedef struct _GSerializableObjectIface GSerializableObjectIface;
+
+
+/* Détermine le type d'une interface pour la mise en cache d'objet. */
+GType g_serializable_object_get_type(void) G_GNUC_CONST;
+
+/* storage.h : définition d'une conservation d'objets construits */
+typedef struct _GObjectStorage GObjectStorage;
+
+/* Charge un objet depuis une mémoire tampon. */
+bool g_serializable_object_load(GSerializableObject *, GObjectStorage *, GTypeMemory *, packed_buffer *);
+
+/* Sauvegarde un objet dans une mémoire tampon. */
+bool g_serializable_object_store(const GSerializableObject *, GObjectStorage *, GTypeMemory *, packed_buffer *);
+
+
+
+#endif /* _ANALYSIS_STORAGE_SERIALIZE_H */
diff --git a/src/analysis/storage/storage-int.h b/src/analysis/storage/storage-int.h
new file mode 100644
index 0000000..7e01cbc
--- /dev/null
+++ b/src/analysis/storage/storage-int.h
@@ -0,0 +1,66 @@
+
+/* Chrysalide - Outil d'analyse de fichiers binaires
+ * storage.h - prototypes internes pour la conservation sur disque d'objets construits
+ *
+ * Copyright (C) 2020 Cyrille Bagard
+ *
+ * This file is part of Chrysalide.
+ *
+ * Chrysalide 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 3 of the License, or
+ * (at your option) any later version.
+ *
+ * Chrysalide 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 Foobar. If not, see <http://www.gnu.org/licenses/>.
+ */
+
+
+#ifndef _ANALYSIS_STORAGE_STORAGE_INT_H
+#define _ANALYSIS_STORAGE_STORAGE_INT_H
+
+
+#include "storage.h"
+
+
+
+/* Gestion d'enregistrements spécifiques */
+typedef struct _storage_backend_t
+{
+ char *name; /* Désignation du groupe */
+
+ char *filename; /* Nom du fichier associé */
+ int fd; /* Flux d'accès correspondant */
+
+} storage_backend_t;
+
+/* Définition d'une conservation d'objets construits (instance) */
+struct _GObjectStorage
+{
+ GObject parent; /* A laisser en premier */
+
+ GTypeMemory *tpmem; /* Mémorisation de types */
+
+ GLoadedContent *loaded; /* Contenu principal */
+
+ storage_backend_t *backends; /* Gestionnaires existants */
+ size_t count; /* Quantité de gestionnaires */
+ GMutex mutex; /* Contrôle d'accès à la liste */
+
+};
+
+/* Définition d'une conservation d'objets construits (classe) */
+struct _GObjectStorageClass
+{
+ GObjectClass parent; /* A laisser en premier */
+
+};
+
+
+
+#endif /* _ANALYSIS_STORAGE_STORAGE_INT_H */
diff --git a/src/analysis/storage/storage.c b/src/analysis/storage/storage.c
new file mode 100644
index 0000000..d64a08e
--- /dev/null
+++ b/src/analysis/storage/storage.c
@@ -0,0 +1,436 @@
+
+/* Chrysalide - Outil d'analyse de fichiers binaires
+ * storage.c - conservation hors mémoire d'objets choisis
+ *
+ * Copyright (C) 2020 Cyrille Bagard
+ *
+ * This file is part of Chrysalide.
+ *
+ * Chrysalide 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 3 of the License, or
+ * (at your option) any later version.
+ *
+ * Chrysalide 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 Foobar. If not, see <http://www.gnu.org/licenses/>.
+ */
+
+
+#include "storage.h"
+
+
+#include <assert.h>
+#include <malloc.h>
+#include <string.h>
+#include <unistd.h>
+
+
+#include "storage-int.h"
+#include "../../core/logs.h"
+
+
+
+/* Initialise la classe des conservations d'objets en place. */
+static void g_object_storage_class_init(GObjectStorageClass *);
+
+/* Initialise une instance de conservation d'objets en place. */
+static void g_object_storage_init(GObjectStorage *);
+
+/* Supprime toutes les références externes. */
+static void g_object_storage_dispose(GObjectStorage *);
+
+/* Procède à la libération totale de la mémoire. */
+static void g_object_storage_finalize(GObjectStorage *);
+
+/* Retrouve l'encadrement pour un nouveau groupe d'objets. */
+static storage_backend_t *g_object_storage_find_backend(GObjectStorage *, const char *);
+
+
+
+/* Indique le type défini pour une conservation d'objets construits. */
+G_DEFINE_TYPE(GObjectStorage, g_object_storage, G_TYPE_OBJECT);
+
+
+/******************************************************************************
+* *
+* Paramètres : klass = classe à initialiser. *
+* *
+* Description : Initialise la classe des conservations d'objets en place. *
+* *
+* Retour : - *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static void g_object_storage_class_init(GObjectStorageClass *klass)
+{
+ GObjectClass *object; /* Autre version de la classe */
+
+ object = G_OBJECT_CLASS(klass);
+
+ object->dispose = (GObjectFinalizeFunc/* ! */)g_object_storage_dispose;
+ object->finalize = (GObjectFinalizeFunc)g_object_storage_finalize;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : storage = instance à initialiser. *
+* *
+* Description : Initialise une instance de conservation d'objets en place. *
+* *
+* Retour : - *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static void g_object_storage_init(GObjectStorage *storage)
+{
+ storage->tpmem = g_type_memory_new();
+
+ storage->loaded = NULL;
+
+ storage->backends = NULL;
+ storage->count = 0;
+ g_mutex_init(&storage->mutex);
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : storage = instance d'objet GLib à traiter. *
+* *
+* Description : Supprime toutes les références externes. *
+* *
+* Retour : - *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static void g_object_storage_dispose(GObjectStorage *storage)
+{
+ g_clear_object(&storage->tpmem);
+
+ g_clear_object(&storage->loaded);
+
+ G_OBJECT_CLASS(g_object_storage_parent_class)->dispose(G_OBJECT(storage));
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : storage = instance d'objet GLib à traiter. *
+* *
+* Description : Procède à la libération totale de la mémoire. *
+* *
+* Retour : - *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static void g_object_storage_finalize(GObjectStorage *storage)
+{
+ size_t i; /* Boucle de parcours */
+ storage_backend_t *backend; /* Gestionnaire à manipuler */
+ int ret; /* Bilan d'un appel */
+
+ g_mutex_lock(&storage->mutex);
+
+ for (i = 0; i < storage->count; i++)
+ {
+ backend = &storage->backends[i];
+
+ if (backend->fd != -1)
+ close(backend->fd);
+ else
+ assert(false);
+
+ ret = access(backend->filename, W_OK);
+ if (ret == 0)
+ {
+ ret = unlink(backend->filename);
+ if (ret != 0) LOG_ERROR_N("unlink");
+ }
+
+ free(backend->name);
+
+ free(backend->filename);
+
+ }
+
+ if (storage->backends != NULL)
+ free(storage->backends);
+
+ g_mutex_unlock(&storage->mutex);
+
+ g_mutex_clear(&storage->mutex);
+
+ G_OBJECT_CLASS(g_object_storage_parent_class)->finalize(G_OBJECT(storage));
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : loaded = contenu binaire à associer. *
+* *
+* Description : Crée le support d'une conservation d'objets en place. *
+* *
+* Retour : Mécanismes mis en place. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+GObjectStorage *g_object_storage_new(GLoadedContent *loaded)
+{
+ GObjectStorage *result; /* Structure à retourner */
+
+ result = g_object_new(G_TYPE_OBJECT_STORAGE, NULL);
+
+ result->loaded = loaded;
+ g_object_ref(G_OBJECT(loaded));
+
+ return result;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : storage = gestionnaire de conservations à compléter. *
+* name = désignation d'un nouveau groupe d'objets. *
+* *
+* Description : Retrouve l'encadrement pour un nouveau groupe d'objets. *
+* *
+* Retour : Informations liées à un groupe ou NULL en cas d'échec. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static storage_backend_t *g_object_storage_find_backend(GObjectStorage *storage, const char *name)
+{
+ storage_backend_t *result; /* Encadrement à retourner */
+ size_t i; /* Boucle de parcours */
+
+ assert(!g_mutex_trylock(&storage->mutex));
+
+ for (i = 0; i < storage->count; i++)
+ if (strcmp(storage->backends[i].name, name) == 0)
+ break;
+
+ if (i == storage->count)
+ result = NULL;
+ else
+ result = &storage->backends[i];
+
+ return result;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : storage = gestionnaire de conservations à compléter. *
+* name = désignation d'un nouveau groupe d'objets. *
+* filename = éventuel nom de fichier à utiliser ou NULL. *
+* *
+* Description : Ajoute le support d'un nouveau groupe d'objets construits. *
+* *
+* Retour : Bilan de l'opération. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+bool g_object_storage_add_backend(GObjectStorage *storage, const char *name, const char *filename)
+{
+ bool result; /* Bilan à retourner */
+ GBinContent *content; /* Contenu binaire traité */
+ const gchar *checksum; /* Empreinte de ce contenu */
+ char *prefix; /* Début de nom de fichier */
+ storage_backend_t backend; /* Informations à intégrer */
+
+ result = false;
+
+ g_mutex_lock(&storage->mutex);
+
+ if (g_object_storage_find_backend(storage, name) != NULL)
+ goto exit;
+
+ /* Préparatifs */
+
+ content = g_loaded_content_get_content(storage->loaded);
+
+ checksum = g_binary_content_get_checksum(content);
+
+ asprintf(&prefix, "%s-%s", checksum, name);
+
+ g_object_unref(G_OBJECT(content));
+
+ backend.fd = make_tmp_file(prefix, "cache", &backend.filename);
+
+ free(prefix);
+
+ if (backend.fd == -1)
+ goto exit;
+
+ /* Inscription en bonne et due forme */
+
+ backend.name = strdup(name);
+
+ storage->backends = realloc(storage->backends, ++storage->count * sizeof(storage_backend_t));
+
+ storage->backends[storage->count - 1] = backend;
+
+ exit:
+
+ g_mutex_unlock(&storage->mutex);
+
+ return result;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : storage = gestionnaire à manipuler. *
+* name = désignation d'un nouveau groupe d'objets. *
+* pos = tête de lecture avant écriture. *
+* *
+* Description : Charge un objet à partir de données rassemblées. *
+* *
+* Retour : Objet restauré en mémoire ou NULL en cas d'échec. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+GSerializableObject *g_object_storage_load_object(GObjectStorage *storage, const char *name, off64_t pos)
+{
+ GSerializableObject *result; /* Instance à retourner */
+ bool status; /* Bilan d'une opération */
+ storage_backend_t *backend; /* Informations à consulter */
+ packed_buffer pbuf; /* Tampon des données à lire */
+ off64_t new; /* Nouvelle position de lecture*/
+
+ result = NULL;
+
+ /* Chargement */
+
+ status = false;
+
+ g_mutex_lock(&storage->mutex);
+
+ backend = g_object_storage_find_backend(storage, name);
+
+ if (backend != NULL)
+ {
+ new = lseek64(backend->fd, pos, SEEK_SET);
+
+ if (new == pos)
+ {
+ reset_packed_buffer(&pbuf);
+ status = read_packed_buffer(&pbuf, backend->fd);
+ }
+
+ }
+
+ g_mutex_unlock(&storage->mutex);
+
+ if (!status)
+ goto exit;
+
+ /* Phase de conversion */
+
+ result = G_SERIALIZABLE_OBJECT(g_type_memory_create_object(storage->tpmem, &pbuf));
+
+ if (result)
+ {
+ status = g_serializable_object_load(result, storage, storage->tpmem, &pbuf);
+
+ if (!status)
+ g_clear_object(&result);
+
+ }
+
+ exit_packed_buffer(&pbuf);
+
+ exit:
+
+ return result;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : storage = gestionnaire à manipuler. *
+* name = désignation d'un nouveau groupe d'objets. *
+* pbuf = zone tampon à lire. *
+* pos = tête de lecture avant écriture, ou NULL. [OUT] *
+* *
+* Description : Sauvegarde un object sous forme de données rassemblées. *
+* *
+* Retour : Bilan de l'opération. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+bool g_object_storage_store_object(GObjectStorage *storage, const char *name, const GSerializableObject *object, off64_t *pos)
+{
+ bool result; /* Bilan à retourner */
+ packed_buffer pbuf; /* Tampon des données à écrire */
+ storage_backend_t *backend; /* Informations à consulter */
+ off64_t tmp; /* Conservation éphémère */
+
+ /* Phase de conversion */
+
+ init_packed_buffer(&pbuf);
+
+ result = g_serializable_object_store(object, storage, storage->tpmem, &pbuf);
+ if (!result) goto exit;
+
+ /* Enregistrement */
+
+ g_mutex_lock(&storage->mutex);
+
+ backend = g_object_storage_find_backend(storage, name);
+
+ if (backend != NULL)
+ {
+ if (pos == NULL)
+ pos = &tmp;
+
+ *pos = lseek64(backend->fd, 0, SEEK_CUR);
+
+ if (*pos != (off64_t)-1)
+ result = write_packed_buffer(&pbuf, backend->fd);
+
+ }
+
+ g_mutex_unlock(&storage->mutex);
+
+ /* Sortie propre */
+
+ exit:
+
+ exit_packed_buffer(&pbuf);
+
+ return result;
+
+}
diff --git a/src/analysis/storage/storage.h b/src/analysis/storage/storage.h
new file mode 100644
index 0000000..611e49e
--- /dev/null
+++ b/src/analysis/storage/storage.h
@@ -0,0 +1,70 @@
+
+/* Chrysalide - Outil d'analyse de fichiers binaires
+ * storage.h - prototypes pour la conservation sur disque d'objets construits
+ *
+ * Copyright (C) 2020 Cyrille Bagard
+ *
+ * This file is part of Chrysalide.
+ *
+ * Chrysalide 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 3 of the License, or
+ * (at your option) any later version.
+ *
+ * Chrysalide 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 Foobar. If not, see <http://www.gnu.org/licenses/>.
+ */
+
+
+#ifndef _ANALYSIS_STORAGE_STORAGE_H
+#define _ANALYSIS_STORAGE_STORAGE_H
+
+
+#include <glib-object.h>
+#include <stdbool.h>
+
+
+#include "serialize.h"
+#include "tpmem.h"
+#include "../loaded.h"
+
+
+
+#define G_TYPE_OBJECT_STORAGE g_object_storage_get_type()
+#define G_OBJECT_STORAGE(obj) (G_TYPE_CHECK_INSTANCE_CAST((obj), G_TYPE_OBJECT_STORAGE, GObjectStorage))
+#define G_IS_OBJECT_STORAGE(obj) (G_TYPE_CHECK_INSTANCE_TYPE((obj), G_TYPE_OBJECT_STORAGE))
+#define G_OBJECT_STORAGE_CLASS(klass) (G_TYPE_CHECK_CLASS_CAST((klass), G_TYPE_OBJECT_STORAGE, GObjectStorageClass))
+#define G_IS_OBJECT_STORAGE_CLASS(klass) (G_TYPE_CHECK_CLASS_TYPE((klass), G_TYPE_OBJECT_STORAGE))
+#define G_OBJECT_STORAGE_GET_CLASS(obj) (G_TYPE_INSTANCE_GET_CLASS((obj), G_TYPE_OBJECT_STORAGE, GObjectStorageClass))
+
+
+/* Définition d'une conservation d'objets construits (instance) */
+typedef struct _GObjectStorage GObjectStorage;
+
+/* Définition d'une conservation d'objets construits (classe) */
+typedef struct _GObjectStorageClass GObjectStorageClass;
+
+
+/* Indique le type défini pour une conservation d'objets construits. */
+GType g_object_storage_get_type(void);
+
+/* Crée le support d'une conservation d'objets en place. */
+GObjectStorage *g_object_storage_new(GLoadedContent *);
+
+/* Ajoute le support d'un nouveau groupe d'objets construits. */
+bool g_object_storage_add_backend(GObjectStorage *, const char *, const char *);
+
+/* Charge un objet à partir de données rassemblées. */
+GSerializableObject *g_object_storage_load_object(GObjectStorage *, const char *, off64_t);
+
+/* Sauvegarde un object sous forme de données rassemblées. */
+bool g_object_storage_store_object(GObjectStorage *, const char *, const GSerializableObject *, off64_t *);
+
+
+
+#endif /* _ANALYSIS_STORAGE_STORAGE_H */
diff --git a/src/analysis/storage/tpmem.c b/src/analysis/storage/tpmem.c
new file mode 100644
index 0000000..64f54d2
--- /dev/null
+++ b/src/analysis/storage/tpmem.c
@@ -0,0 +1,454 @@
+
+/* Chrysalide - Outil d'analyse de fichiers binaires
+ * tpmem.c - mémorisation des types d'objets mis en cache
+ *
+ * Copyright (C) 2020 Cyrille Bagard
+ *
+ * This file is part of Chrysalide.
+ *
+ * Chrysalide 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 3 of the License, or
+ * (at your option) any later version.
+ *
+ * Chrysalide 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 Foobar. If not, see <http://www.gnu.org/licenses/>.
+ */
+
+
+#include "tpmem.h"
+
+
+#include <assert.h>
+#include <stdint.h>
+
+
+#include "../../arch/operands/target.h"
+#include "../../core/logs.h"
+
+
+
+/* Conservation d'une référence sur un type */
+typedef struct _gtype_ref_info_t
+{
+ GType gtype; /* Type pour la GLib */
+ gpointer gclass; /* Lien vers sa classe */
+
+ /**
+ * La GLib n'est pas très claire sur la taille de GType :
+ *
+ * #if GLIB_SIZEOF_SIZE_T != GLIB_SIZEOF_LONG || !defined __cplusplus
+ * typedef gsize GType;
+ * #else // for historic reasons, C++ links against gulong GTypes
+ * typedef gulong GType;
+ * #endif
+ *
+ * Et :
+ *
+ * typedef unsigned $glib_size_type_define gsize;
+ *
+ * On prend donc le parti de conserver ces types sous forme de valeurs 64 bits
+ * lors des enregistrements.
+ */
+
+} gtype_ref_info_t;
+
+/* Définition d'une mémoire de types d'objets (instance) */
+struct _GTypeMemory
+{
+ GObject parent; /* A laisser en premier */
+
+ gtype_ref_info_t *gtypes; /* Types des objets reconnus */
+ uint64_t count; /* Quantité de ces objets */
+ GMutex mutex; /* Contrôle d'accès à la liste */
+
+};
+
+/* Définition d'une mémoire de types d'objets (classe) */
+struct _GTypeMemoryClass
+{
+ GObjectClass parent; /* A laisser en premier */
+
+};
+
+
+/* Initialise la classe des mémoires de types d'objets. */
+static void g_type_memory_class_init(GTypeMemoryClass *);
+
+/* Initialise une instance de mémoire de types d'objets. */
+static void g_type_memory_init(GTypeMemory *);
+
+/* Supprime toutes les références externes. */
+static void g_type_memory_dispose(GTypeMemory *);
+
+/* Procède à la libération totale de la mémoire. */
+static void g_type_memory_finalize(GTypeMemory *);
+
+
+
+/* Indique le type défini pour une mémoire de types d'objets. */
+G_DEFINE_TYPE(GTypeMemory, g_type_memory, G_TYPE_OBJECT);
+
+
+/******************************************************************************
+* *
+* Paramètres : klass = classe à initialiser. *
+* *
+* Description : Initialise la classe des mémoires de types d'objets. *
+* *
+* Retour : - *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static void g_type_memory_class_init(GTypeMemoryClass *klass)
+{
+ GObjectClass *object; /* Autre version de la classe */
+
+ object = G_OBJECT_CLASS(klass);
+
+ object->dispose = (GObjectFinalizeFunc/* ! */)g_type_memory_dispose;
+ object->finalize = (GObjectFinalizeFunc)g_type_memory_finalize;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : tpmem = instance à initialiser. *
+* *
+* Description : Initialise une instance de mémoire de types d'objets. *
+* *
+* Retour : - *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static void g_type_memory_init(GTypeMemory *tpmem)
+{
+ tpmem->gtypes = NULL;
+ tpmem->count = 0;
+ g_mutex_init(&tpmem->mutex);
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : tpmem = instance d'objet GLib à traiter. *
+* *
+* Description : Supprime toutes les références externes. *
+* *
+* Retour : - *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static void g_type_memory_dispose(GTypeMemory *tpmem)
+{
+ uint64_t i; /* Boucle de parcours */
+
+ g_mutex_lock(&tpmem->mutex);
+
+ for (i = 0; i < tpmem->count; i++)
+ if (tpmem->gtypes[i].gclass != NULL)
+ g_type_class_unref(tpmem->gtypes[i].gclass);
+
+ g_mutex_unlock(&tpmem->mutex);
+
+ g_mutex_clear(&tpmem->mutex);
+
+ G_OBJECT_CLASS(g_type_memory_parent_class)->dispose(G_OBJECT(tpmem));
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : tpmem = instance d'objet GLib à traiter. *
+* *
+* Description : Procède à la libération totale de la mémoire. *
+* *
+* Retour : - *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+static void g_type_memory_finalize(GTypeMemory *tpmem)
+{
+ if (tpmem->gtypes != NULL)
+ free(tpmem->gtypes);
+
+ G_OBJECT_CLASS(g_type_memory_parent_class)->finalize(G_OBJECT(tpmem));
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : - *
+* *
+* Description : Crée une mémoire pour types d'objets. *
+* *
+* Retour : Instance mise en place. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+GTypeMemory *g_type_memory_new(void)
+{
+ GTypeMemory *result; /* Structure à retourner */
+
+ result = g_object_new(G_TYPE_TYPE_MEMORY, NULL);
+
+ return result;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : tpmem = mémoire à compléter. *
+* fd = flux ouvert en lecture. *
+* *
+* Description : Apprend tous les types mémorisés dans un flux. *
+* *
+* Retour : Bilan de l'opération. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+bool g_type_memory_read_types(GTypeMemory *tpmem, int fd)
+{
+ bool result; /* Bilan à enregistrer */
+ packed_buffer pbuf; /* Tampon des données à écrire */
+ uint64_t i; /* Boucle de parcours */
+ unsigned char len; /* Taille d'un nom de type */
+ char *name; /* Désignation d'un type */
+
+ init_packed_buffer(&pbuf);
+
+ result = read_packed_buffer(&pbuf, fd);
+
+ if (result)
+ {
+ g_mutex_lock(&tpmem->mutex);
+
+ result = extract_packed_buffer(&pbuf, &tpmem->count, sizeof(uint64_t), true);
+
+ if (result)
+ {
+ assert(tpmem->gtypes == NULL);
+ tpmem->gtypes = calloc(tpmem->count, sizeof(gtype_ref_info_t));
+ }
+
+ for (i = 0; i < tpmem->count && result; i++)
+ {
+ result = extract_packed_buffer(&pbuf, &len, sizeof(unsigned char), false);
+
+ if (result)
+ {
+ name = malloc(len);
+
+ result = extract_packed_buffer(&pbuf, name, len, false);
+
+ if (result)
+ {
+ tpmem->gtypes[i].gtype = g_type_from_name(name);
+ result = (tpmem->gtypes[i].gtype != 0);
+
+ if (!result)
+ log_variadic_message(LMT_ERROR, "Unknown type: '%s'", name);
+
+ }
+
+ if (result)
+ tpmem->gtypes[i].gclass = g_type_class_ref(tpmem->gtypes[i].gtype);
+
+ free(name);
+
+ }
+
+ }
+
+ g_mutex_unlock(&tpmem->mutex);
+
+ }
+
+ exit_packed_buffer(&pbuf);
+
+ return result;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : tpmem = mémoire à manipuler. *
+* pbuf = zone tampon à venir lire. *
+* *
+* Description : Crée une nouvelle instance d'objet à partir de son type. *
+* *
+* Retour : Instance issue de l'opération ou NULL. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+GObject *g_type_memory_create_object(GTypeMemory *tpmem, packed_buffer *pbuf)
+{
+ GObject *result; /* Nouvelle instance à renvoyer*/
+ uint64_t index; /* Indice du point d'insertion */
+ bool status; /* Bilan d'une récupération */
+
+ result = NULL;
+
+ status = extract_packed_buffer(pbuf, &index, sizeof(uint64_t), true);
+
+ if (status)
+ {
+ g_mutex_lock(&tpmem->mutex);
+
+ if (index < tpmem->count)
+ result = g_object_new(tpmem->gtypes[index].gtype, NULL);
+
+ g_mutex_unlock(&tpmem->mutex);
+
+ }
+
+ return result;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : tpmem = mémoire à manipuler. *
+* obj = instance dont le type est à mémoriser. *
+* pbuf = zone tampon à remplir. *
+* *
+* Description : Sauvegarde le type d'un objet instancié. *
+* *
+* Retour : Bilan de l'opération. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+bool g_type_memory_store_object_gtype(GTypeMemory *tpmem, GObject *obj, packed_buffer *pbuf)
+{
+ bool result; /* Bilan à retourner */
+ GType gtype; /* Type à enregistrer */
+ uint64_t index; /* Indice du point d'insertion */
+
+ gtype = G_TYPE_FROM_INSTANCE(obj);
+
+ /**
+ * Pour quelques explications sur l'esquive suivante, se rapporter aux
+ * commentaires de g_target_operand_unserialize().
+ *
+ * Dans la situation présente, on ne doit pas enregistrer le type dans le tampon,
+ * car l'opérande va relancer l'opération entière (avec un opérande temporaire),
+ * ce qui conduirait à l'enregistrement de deux types successifs dans les données.
+ */
+
+ if (gtype == G_TYPE_TARGET_OPERAND)
+ result = true;
+
+ else
+ {
+ g_mutex_lock(&tpmem->mutex);
+
+ for (index = 0; index < tpmem->count; index++)
+ if (tpmem->gtypes[index].gtype == gtype)
+ break;
+
+ if (index == tpmem->count)
+ {
+ tpmem->gtypes = realloc(tpmem->gtypes, ++tpmem->count * sizeof(gtype_ref_info_t));
+
+ assert(tpmem->count > 0);
+
+ tpmem->gtypes[index].gtype = gtype;
+ tpmem->gtypes[index].gclass = g_type_class_ref(gtype);
+
+ }
+
+ g_mutex_unlock(&tpmem->mutex);
+
+ result = extend_packed_buffer(pbuf, &index, sizeof(uint64_t), true);
+
+ }
+
+ return result;
+
+}
+
+
+/******************************************************************************
+* *
+* Paramètres : tpmem = mémoire à consulter. *
+* fd = flux ouvert en écriture. *
+* *
+* Description : Enregistre tous les types mémorisés dans un flux. *
+* *
+* Retour : Bilan de l'opération. *
+* *
+* Remarques : - *
+* *
+******************************************************************************/
+
+bool g_type_memory_write_types(GTypeMemory *tpmem, int fd)
+{
+ bool result; /* Bilan à enregistrer */
+ packed_buffer pbuf; /* Tampon des données à écrire */
+ uint64_t i; /* Boucle de parcours */
+ const gchar *name; /* Désignation d'un type */
+ size_t len; /* Taille de ce nom */
+
+ init_packed_buffer(&pbuf);
+
+ g_mutex_lock(&tpmem->mutex);
+
+ result = extend_packed_buffer(&pbuf, &tpmem->count, sizeof(uint64_t), true);
+
+ for (i = 0; i < tpmem->count && result; i++)
+ {
+ name = g_type_name(tpmem->gtypes[i].gtype);
+ len = strlen(name) + 1;
+
+ if (len > (2 << (sizeof(unsigned char) * 8 - 1)))
+ {
+ log_variadic_message(LMT_ERROR, "Type name too long: '%s' (%zu bytes)", name, len);
+ result = false;
+ break;
+ }
+
+ result = extend_packed_buffer(&pbuf, (unsigned char []) { len }, sizeof(unsigned char), false);
+
+ if (result)
+ result = extend_packed_buffer(&pbuf, name, len, false);
+
+ }
+
+ if (result)
+ result = write_packed_buffer(&pbuf, fd);
+
+ g_mutex_unlock(&tpmem->mutex);
+
+ exit_packed_buffer(&pbuf);
+
+ return result;
+
+}
diff --git a/src/analysis/storage/tpmem.h b/src/analysis/storage/tpmem.h
new file mode 100644
index 0000000..4c82a1f
--- /dev/null
+++ b/src/analysis/storage/tpmem.h
@@ -0,0 +1,70 @@
+
+/* Chrysalide - Outil d'analyse de fichiers binaires
+ * tpmem.h - prototypes pour la mémorisation des types d'objets mis en cache
+ *
+ * Copyright (C) 2020 Cyrille Bagard
+ *
+ * This file is part of Chrysalide.
+ *
+ * Chrysalide 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 3 of the License, or
+ * (at your option) any later version.
+ *
+ * Chrysalide 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 Foobar. If not, see <http://www.gnu.org/licenses/>.
+ */
+
+
+#ifndef _ANALYSIS_STORAGE_TPMEM_H
+#define _ANALYSIS_STORAGE_TPMEM_H
+
+
+#include <glib-object.h>
+
+
+#include "../../common/packed.h"
+
+
+
+#define G_TYPE_TYPE_MEMORY g_type_memory_get_type()
+#define G_TYPE_MEMORY(obj) (G_TYPE_CHECK_INSTANCE_CAST((obj), G_TYPE_TYPE_MEMORY, GTypeMemory))
+#define G_IS_TYPE_MEMORY(obj) (G_TYPE_CHECK_INSTANCE_TYPE((obj), G_TYPE_TYPE_MEMORY))
+#define G_TYPE_MEMORY_CLASS(klass) (G_TYPE_CHECK_CLASS_CAST((klass), G_TYPE_TYPE_MEMORY, GTypeMemoryClass))
+#define G_IS_TYPE_MEMORY_CLASS(klass) (G_TYPE_CHECK_CLASS_TYPE((klass), G_TYPE_TYPE_MEMORY))
+#define G_TYPE_MEMORY_GET_CLASS(obj) (G_TYPE_INSTANCE_GET_CLASS((obj), G_TYPE_TYPE_MEMORY, GTypeMemoryClass))
+
+
+/* Définition d'une mémoire de types d'objets (instance) */
+typedef struct _GTypeMemory GTypeMemory;
+
+/* Définition d'une mémoire de types d'objets (classe) */
+typedef struct _GTypeMemoryClass GTypeMemoryClass;
+
+
+/* Indique le type défini pour une mémoire de types d'objets. */
+GType g_type_memory_get_type(void);
+
+/* Crée une mémoire pour types d'objets. */
+GTypeMemory *g_type_memory_new(void);
+
+/* Apprend tous les types mémorisés dans un flux. */
+bool g_type_memory_read_types(GTypeMemory *, int);
+
+/* Crée une nouvelle instance d'objet à partir de son type. */
+GObject *g_type_memory_create_object(GTypeMemory *, packed_buffer *);
+
+/* Sauvegarde le type d'un objet instancié. */
+bool g_type_memory_store_object_gtype(GTypeMemory *, GObject *, packed_buffer *);
+
+/* Enregistre tous les types mémorisés dans un flux. */
+bool g_type_memory_write_types(GTypeMemory *, int);
+
+
+
+#endif /* _ANALYSIS_STORAGE_TPMEM_H */