Built a linked list of disassembled instructions.

git-svn-id: svn://svn.gna.org/svn/chrysalide/trunk@186 abbe820e-26c8-41b2-8c08-b7b2b41f8b0a

5 files changed, 147 insertions, 0 deletions

diff --git a/src/analysis/binary.c b/src/analysis/binary.c
index f6f56c7..e004d4f 100644
--- a/src/analysis/binary.c
+++ b/src/analysis/binary.c
@@ -337,6 +337,7 @@ static void g_delayed_disassembly_process(GDelayedDisassembly *disass, GtkExtSta
 static GRenderingLine *disassemble_binary_parts(GDelayedDisassembly *disass, GBinRoutine **routines, size_t count, GtkExtStatusBar *statusbar, guint id)
 {
     GRenderingLine *result;                 /* Ligne de rendu à retourner  */
+    GArchInstruction *first;                /* Première instruction vue    */
     GArchProcessor *proc;                   /* Architecture du binaire     */
     GRenderingOptions *options;             /* Options de désassemblage    */
     bin_t *bin_data;                        /* Données binaires à lire     */
@@ -356,6 +357,8 @@ static GRenderingLine *disassemble_binary_parts(GDelayedDisassembly *disass, GBi
 
     result = NULL;
 
+    first = NULL;
+
     proc = get_arch_processor_from_format(g_openida_binary_get_format(disass->binary));
     options = g_openida_binary_get_options(disass->binary);
     bin_data = g_openida_binary_get_data(disass->binary, NULL);
@@ -392,6 +395,7 @@ static GRenderingLine *disassemble_binary_parts(GDelayedDisassembly *disass, GBi
 
             instr = g_arch_processor_decode_instruction(proc, &bin_data[start],
                                                         &pos, len, start, addr);
+            g_arch_instruction_add_to_list(&first, instr);
 
             line = g_code_line_new(addr, instr, options);
             g_rendering_line_add_to_lines(&result, line);
@@ -1305,8 +1309,38 @@ GRenderingLine *g_openida_binary_get_lines(const GOpenidaBinary *binary)
 }
 
 
+/******************************************************************************
+*                                                                             *
+*  Paramètres  : binary = élément binaire à consulter.                        *
+*                                                                             *
+*  Description : Fournit les instructions issues du désassemblage.            *
+*                                                                             *
+*  Retour      : Instructions issues du désassemblage.                        *
+*                                                                             *
+*  Remarques   : -                                                            *
+*                                                                             *
+******************************************************************************/
 
+GArchInstruction *g_openida_binary_get_instructions(const GOpenidaBinary *binary)
+{
+    GArchInstruction *result;               /* Liste à renvoyer            */
+    GRenderingLine *iter;                   /* Boucle de parcours          */
+
+    result = NULL;
+
+    for (iter = binary->lines;
+         iter != NULL;
+         iter = g_rendering_line_get_next_iter(binary->lines, iter, NULL))
+    {
+        if (!G_IS_CODE_LINE(iter)) break;
+    }
+
+    if (iter != NULL)
+        result = g_code_line_get_instruction(G_CODE_LINE(iter));
 
+    return result;
+
+}
 
 
 
diff --git a/src/analysis/binary.h b/src/analysis/binary.h
index 3869cae..da0bcf7 100644
--- a/src/analysis/binary.h
+++ b/src/analysis/binary.h
@@ -105,6 +105,9 @@ GRenderingLine **g_openida_binary_get_lines_root(const GOpenidaBinary *);
 /* Fournit les lignes de rendu issues du désassemblage. */
 GRenderingLine *g_openida_binary_get_lines(const GOpenidaBinary *);
 
+/* Fournit les instructions issues du désassemblage. */
+GArchInstruction *g_openida_binary_get_instructions(const GOpenidaBinary *);
+
 
 
 /* ------------------------------ ELEMENTS DE DEBOGAGE ------------------------------ */
diff --git a/src/arch/instruction-int.h b/src/arch/instruction-int.h
index 4ecb173..45a8b2d 100644
--- a/src/arch/instruction-int.h
+++ b/src/arch/instruction-int.h
@@ -28,6 +28,7 @@
 #include "archbase.h"
 #include "instruction.h"
 #include "../analysis/exporter-int.h"
+#include "../common/dllist.h"
 
 
 
@@ -46,6 +47,8 @@ struct _GArchInstruction
 {
     GContentExporter parent;                /* A laisser en premier        */
 
+    DL_LIST_ITEM(flow);                     /* Maillon de liste chaînée    */
+
     off_t offset;                           /* Position physique de départ */
     off_t length;                           /* Taille de l'instruction     */
 
@@ -69,5 +72,10 @@ struct _GArchInstructionClass
 };
 
 
+#define ainstr_list_next_iter(iter, head) dl_list_next_iter(iter, head, GArchInstruction, flow)
+#define ainstr_list_add_tail(new, head) dl_list_add_tail(new, head, GArchInstruction, flow)
+#define ainstr_list_for_each(pos, head) dl_list_for_each(pos, head, GArchInstruction, flow)
+
+
 
 #endif  /* _ARCH_INSTRUCTION_INT_H */
diff --git a/src/arch/instruction.c b/src/arch/instruction.c
index 3bbd15c..b642219 100644
--- a/src/arch/instruction.c
+++ b/src/arch/instruction.c
@@ -89,6 +89,8 @@ static void g_arch_instruction_init(GArchInstruction *instr)
     parent->add_text = (add_text_fc)g_arch_instruction_add_text;
     parent->export_buffer = (export_buffer_fc)g_arch_instruction_to_buffer;
 
+    DL_LIST_ITEM_INIT(&instr->flow);
+
 }
 
 
@@ -459,3 +461,89 @@ bool g_arch_instruction_is_return(const GArchInstruction *instr)
     return instr->is_return(instr);
 
 }
+
+
+
+/* ---------------------------------------------------------------------------------- */
+/*                      TRAITEMENT DES INSTRUCTIONS PAR ENSEMBLE                      */
+/* ---------------------------------------------------------------------------------- */
+
+
+/******************************************************************************
+*                                                                             *
+*  Paramètres  : list  = liste d'instructions à compléter, ou NULL.           *
+*                instr = nouvelle instruction à intégrer à l'ensemble.        *
+*                                                                             *
+*  Description : Ajoute une instruction à un ensemble existant.               *
+*                                                                             *
+*  Retour      : -                                                            *
+*                                                                             *
+*  Remarques   : -                                                            *
+*                                                                             *
+******************************************************************************/
+
+void g_arch_instruction_add_to_list(GArchInstruction **list, GArchInstruction *instr)
+{
+    ainstr_list_add_tail(instr, list);
+
+}
+
+
+/******************************************************************************
+*                                                                             *
+*  Paramètres  : list = liste d'instructions à consulter.                     *
+*              : iter = position actuelle dans la liste.                      *
+*                max  = adresse marquant la limite (exclue) du parcours.      *
+*                                                                             *
+*  Description : Fournit l'élement suivant un autre pour un parcours.         *
+*                                                                             *
+*  Retour      : Elément suivant ou NULL si aucun.                            *
+*                                                                             *
+*  Remarques   : -                                                            *
+*                                                                             *
+******************************************************************************/
+
+GArchInstruction *g_arch_instruction_get_next_iter(GArchInstruction *list, const GArchInstruction *iter, vmpa_t max)
+{
+    GArchInstruction *result;               /* Elément suivant à renvoyer  */
+
+    result = ainstr_list_next_iter(iter, list);
+
+    if (result != NULL && result->address >= max)
+        result = NULL;
+
+    return result;
+
+}
+
+
+/******************************************************************************
+*                                                                             *
+*  Paramètres  : list   = liste de lignes à parcourir.                        *
+*                addr   = position en mémoire ou physique à chercher.         *
+*                strict = définit la considération à porter à l'adresse.      *
+*                                                                             *
+*  Description : Recherche une instruction d'après son adresse.               *
+*                                                                             *
+*  Retour      : Instruction trouvée à l'adresse donnée, NULL si aucune.      *
+*                                                                             *
+*  Remarques   : -                                                            *
+*                                                                             *
+******************************************************************************/
+
+GArchInstruction *g_arch_instruction_find_by_address(GArchInstruction *list, vmpa_t addr, bool strict)
+{
+    GArchInstruction *result;               /* Trouvaille à retourner      */
+
+    ainstr_list_for_each(result, list)
+    {
+        if (strict && result->offset == addr) break;
+
+        else if (!strict && result->offset < addr
+                 && addr < (result->offset + result->length)) break;
+
+    }
+
+    return result;
+
+}
diff --git a/src/arch/instruction.h b/src/arch/instruction.h
index 2314a56..a9e2bd2 100644
--- a/src/arch/instruction.h
+++ b/src/arch/instruction.h
@@ -96,4 +96,18 @@ bool g_arch_instruction_is_return(const GArchInstruction *instr);
 
 
 
+/* -------------------- TRAITEMENT DES INSTRUCTIONS PAR ENSEMBLE -------------------- */
+
+
+/* Ajoute une instruction à un ensemble existant. */
+void g_arch_instruction_add_to_list(GArchInstruction **, GArchInstruction *);
+
+/* Fournit l'élement suivant un autre pour un parcours. */
+GArchInstruction *g_arch_instruction_get_next_iter(GArchInstruction *, const GArchInstruction *, vmpa_t);
+
+/* Recherche une instruction d'après son adresse. */
+GArchInstruction *g_arch_instruction_find_by_address(GArchInstruction *, vmpa_t, bool);
+
+
+
 #endif  /* _ARCH_INSTRUCTION_H */