Restore most features of core instructions.gtk4

1 files changed, 173 insertions, 523 deletions

diff --git a/src/arch/instructions/raw.c b/src/arch/instructions/raw.c
index 26282fa..87297f1 100644
--- a/src/arch/instructions/raw.c
+++ b/src/arch/instructions/raw.c
@@ -2,7 +2,7 @@
 /* Chrysalide - Outil d'analyse de fichiers binaires
  * raw.c - instructions pures vues de l'esprit
  *
- * Copyright (C) 2014-2020 Cyrille Bagard
+ * Copyright (C) 2014-2025 Cyrille Bagard
  *
  *  This file is part of Chrysalide.
  *
@@ -25,36 +25,19 @@
 
 
 #include <assert.h>
-#include <ctype.h>
 #include <string.h>
 
 
 #include <i18n.h>
 
 
-#include "../instruction-int.h"
+#include "raw-int.h"
 #include "../operands/immediate.h"
-#include "../operands/target.h"
-#include "../../core/columns.h"
+//#include "../operands/target.h" // FIXME
 
 
 
-/* ------------------------- INSTRUCTION INCONNUE / DONNEES ------------------------- */
-
-
-/* Définition générique d'une instruction brute d'architecture (instance) */
-struct _GRawInstruction
-{
-    GArchInstruction parent;                /* A laisser en premier        */
-
-};
-
-/* Définition générique d'une instruction brute d'architecture (classe) */
-struct _GRawInstructionClass
-{
-    GArchInstructionClass parent;           /* A laisser en premier        */
-
-};
+/* --------------------- INSTRUCTION AVEC JEU DE DONNEES BRUTES --------------------- */
 
 
 /* Initialise la classe des instructions brutes d'architecture. */
@@ -64,40 +47,26 @@ static void g_raw_instruction_class_init(GRawInstructionClass *);
 static void g_raw_instruction_init(GRawInstruction *);
 
 /* Supprime toutes les références externes. */
-static void g_raw_instruction_dispose(GRawInstruction *);
+static void g_raw_instruction_dispose(GObject *);
 
 /* Procède à la libération totale de la mémoire. */
-static void g_raw_instruction_finalize(GRawInstruction *);
-
-/* Indique l'encodage d'une instruction de façon détaillée. */
-static const char *g_raw_instruction_get_encoding(const GRawInstruction *);
-
-/* Fournit le nom humain de l'instruction manipulée. */
-static const char *g_raw_instruction_get_keyword(const GRawInstruction *);
+static void g_raw_instruction_finalize(GObject *);
 
 
 
-/* -------------------- CONSERVATION SUR DISQUE DES INSTRUCTIONS -------------------- */
+/* --------------------- IMPLEMENTATION DES FONCTIONS DE CLASSE --------------------- */
 
 
-/* Charge une instruction depuis une mémoire tampon. */
-static bool g_raw_instruction_unserialize(GRawInstruction *, GAsmStorage *, GBinFormat *, packed_buffer_t *);
-
-/* Sauvegarde une instruction dans une mémoire tampon. */
-static bool g_raw_instruction_serialize(GRawInstruction *, GAsmStorage *, packed_buffer_t *);
-
-
-
-/* ------------------------ OFFRE DE CAPACITES DE GENERATION ------------------------ */
-
+/* Indique l'encodage d'une instruction de façon détaillée. */
+static char *g_raw_instruction_get_encoding(const GArchInstruction *);
 
-/* Ajoute à un tampon GLib le contenu de l'instance spécifiée. */
-static void g_raw_instruction_print(GRawInstruction *, GBufferLine *, size_t, size_t, const GBinContent *);
+/* Fournit le nom humain de l'instruction manipulée. */
+static char *g_raw_instruction_get_keyword(const GArchInstruction *);
 
 
 
 /* ---------------------------------------------------------------------------------- */
-/*                           INSTRUCTION INCONNUE / DONNEES                           */
+/*                       INSTRUCTION AVEC JEU DE DONNEES BRUTES                       */
 /* ---------------------------------------------------------------------------------- */
 
 
@@ -124,18 +93,13 @@ static void g_raw_instruction_class_init(GRawInstructionClass *klass)
 
     object = G_OBJECT_CLASS(klass);
 
-    object->dispose = (GObjectFinalizeFunc/* ! */)g_raw_instruction_dispose;
-    object->finalize = (GObjectFinalizeFunc)g_raw_instruction_finalize;
+    object->dispose = g_raw_instruction_dispose;
+    object->finalize = g_raw_instruction_finalize;
 
     instr = G_ARCH_INSTRUCTION_CLASS(klass);
 
-    instr->get_encoding = (get_instruction_encoding_fc)g_raw_instruction_get_encoding;
-    instr->get_keyword = (get_instruction_keyword_fc)g_raw_instruction_get_keyword;
-
-    instr->unserialize = (unserialize_instruction_fc)g_raw_instruction_unserialize;
-    instr->serialize = (serialize_instruction_fc)g_raw_instruction_serialize;
-
-    instr->print = (print_instruction_fc)g_raw_instruction_print;
+    instr->get_encoding = g_raw_instruction_get_encoding;
+    instr->get_keyword = g_raw_instruction_get_keyword;
 
 }
 
@@ -160,7 +124,7 @@ static void g_raw_instruction_init(GRawInstruction *instr)
 
 /******************************************************************************
 *                                                                             *
-*  Paramètres  : instr = instance d'objet GLib à traiter.                     *
+*  Paramètres  : object = instance d'objet GLib à traiter.                    *
 *                                                                             *
 *  Description : Supprime toutes les références externes.                     *
 *                                                                             *
@@ -170,16 +134,16 @@ static void g_raw_instruction_init(GRawInstruction *instr)
 *                                                                             *
 ******************************************************************************/
 
-static void g_raw_instruction_dispose(GRawInstruction *instr)
+static void g_raw_instruction_dispose(GObject *object)
 {
-    G_OBJECT_CLASS(g_raw_instruction_parent_class)->dispose(G_OBJECT(instr));
+    G_OBJECT_CLASS(g_raw_instruction_parent_class)->dispose(object);
 
 }
 
 
 /******************************************************************************
 *                                                                             *
-*  Paramètres  : instr = instance d'objet GLib à traiter.                     *
+*  Paramètres  : object = instance d'objet GLib à traiter.                    *
 *                                                                             *
 *  Description : Procède à la libération totale de la mémoire.                *
 *                                                                             *
@@ -189,16 +153,17 @@ static void g_raw_instruction_dispose(GRawInstruction *instr)
 *                                                                             *
 ******************************************************************************/
 
-static void g_raw_instruction_finalize(GRawInstruction *instr)
+static void g_raw_instruction_finalize(GObject *object)
 {
-    G_OBJECT_CLASS(g_raw_instruction_parent_class)->finalize(G_OBJECT(instr));
+    G_OBJECT_CLASS(g_raw_instruction_parent_class)->finalize(object);
 
 }
 
 
 /******************************************************************************
 *                                                                             *
-*  Paramètres  : addr  = position à associer à l'instruction.                 *
+*  Paramètres  : area  = portion de binaire incluant l'instruction.           *
+*                addr  = adresse virtuelle et/ou position physique.           *
 *                size  = taille de l'opérande souhaitée.                      *
 *                value = valeur sur x bits à venir récupérer.                 *
 *                                                                             *
@@ -210,127 +175,106 @@ static void g_raw_instruction_finalize(GRawInstruction *instr)
 *                                                                             *
 ******************************************************************************/
 
-GArchInstruction *g_raw_instruction_new_from_value(const vmpa2t *addr, MemoryDataSize size, uint64_t value)
+GArchInstruction *g_raw_instruction_new_from_value(GBinaryPortion *area, const vmpa2t *addr, MemoryDataSize size, uint64_t value)
 {
     GArchInstruction *result;               /* Instruction à retourner     */
-    GArchOperand *operand;                  /* Octet non décodé à afficher */
-    mrange_t range;                         /* Couverture de l'instruction */
 
     result = g_object_new(G_TYPE_RAW_INSTRUCTION, NULL);
 
-    operand = g_imm_operand_new_from_value(size, value);
-    if (operand == NULL) goto error;
+    if (!g_raw_instruction_create_value(G_RAW_INSTRUCTION(result), area, addr, size, value))
+        g_clear_object(&result);
+
+    return result;
+
+}
+
+
+/******************************************************************************
+*                                                                             *
+*  Paramètres  : instr   = instance à initialiser pleinement.                 *
+*                area    = portion de binaire incluant l'instruction.         *
+*                addr    = adresse virtuelle et/ou position physique.         *
+*                size    = taille de chacun des éléments à représenter.       *
+*                value = valeur sur x bits à venir récupérer.                 *
+*                                                                             *
+*  Description : Met en place une instruction de type 'db/dw/etc' simple.     *
+*                                                                             *
+*  Retour      : Bilan de l'opération.                                        *
+*                                                                             *
+*  Remarques   : -                                                            *
+*                                                                             *
+******************************************************************************/
+
+bool g_raw_instruction_create_value(GRawInstruction *instr, GBinaryPortion *area, const vmpa2t *addr, MemoryDataSize size, uint64_t value)
+{
+    bool result;                            /* Bilan à retourner           */
+    GArchOperand *operand;                  /* Octet non décodé à afficher */
+    uint16_t length;                        /* Taille de l'instruction     */
+
+    result = false;
+
+    operand = g_immediate_operand_new_from_value(size, value);
+    if (operand == NULL) goto exit;
 
     g_arch_operand_set_flag(operand, IOF_ZERO_PADDING_BY_DEFAULT | IOF_ZERO_PADDING);
 
-    g_arch_instruction_attach_extra_operand(result, operand);
+    g_thick_object_lock(G_THICK_OBJECT(instr));
+
+    g_arch_instruction_attach_operand(G_ARCH_INSTRUCTION(instr), operand);
+    unref_object(operand);
+
+    g_thick_object_unlock(G_THICK_OBJECT(instr));
 
     switch (size)
     {
         case MDS_8_BITS_UNSIGNED:
         case MDS_8_BITS_SIGNED:
-            init_mrange(&range, addr, 1);
+            length = 1;
             break;
 
         case MDS_16_BITS_UNSIGNED:
         case MDS_16_BITS_SIGNED:
-            init_mrange(&range, addr, 2);
+            length = 2;
             break;
 
         case MDS_32_BITS_UNSIGNED:
         case MDS_32_BITS_SIGNED:
-            init_mrange(&range, addr, 4);
+            length = 4;
             break;
 
         case MDS_64_BITS_UNSIGNED:
         case MDS_64_BITS_SIGNED:
-            init_mrange(&range, addr, 8);
+            length = 8;
             break;
 
         default:
             assert(false);
-            goto error;
+            goto exit;
             break;
 
     }
 
-    g_arch_instruction_set_range(result, &range);
+    g_arch_instruction_compute_range(G_ARCH_INSTRUCTION(instr), area, addr, length);
 
-    return result;
-
- error:
-
-    g_object_unref(G_OBJECT(result));
-
-    return NULL;
-
-}
+    result = true;
 
-
-/******************************************************************************
-*                                                                             *
-*  Paramètres  : content = flux de données à analyser.                        *
-*                addr    = position courante dans ce flux. [OUT]              *
-*                                                                             *
-*  Description : Crée une instruction de type 'db/dw/etc' pour un uleb128.    *
-*                                                                             *
-*  Retour      : Instruction mise en place.                                   *
-*                                                                             *
-*  Remarques   : -                                                            *
-*                                                                             *
-******************************************************************************/
-
-GArchInstruction *g_raw_instruction_new_uleb128(const GBinContent *content, vmpa2t *addr)
-{
-    GArchInstruction *result;               /* Instruction à retourner     */
-    vmpa2t start;                           /* Départ original de lecture  */
-    uleb128_t value;                        /* Valeur uleb128 à représenter*/
-    phys_t diff;                            /* Couverture de la lecture    */
-    MemoryDataSize leb_size;                /* Taille de la valeur         */
-    GArchOperand *operand;                  /* Octet non décodé à afficher */
-    mrange_t range;                         /* Couverture de l'instruction */
-
-    result = NULL;
-
-    copy_vmpa(&start, addr);
-
-    if (!g_binary_content_read_uleb128(content, addr, &value))
-        goto error;
-
-    diff = compute_vmpa_diff(&start, addr);
-
-    leb_size = MDS_FROM_BYTES(diff);
-    assert(leb_size != MDS_UNDEFINED);
-
-    result = g_object_new(G_TYPE_RAW_INSTRUCTION, NULL);
-
-    init_mrange(&range, &start, diff);
-    g_arch_instruction_set_range(result, &range);
-
-    operand = g_imm_operand_new_from_value(leb_size, (uint64_t)value);
-    if (operand == NULL) goto error;
-
-    g_arch_operand_set_flag(operand, IOF_ZERO_PADDING_BY_DEFAULT | IOF_ZERO_PADDING);
-
-    g_arch_instruction_attach_extra_operand(result, operand);
+ exit:
 
     return result;
 
- error:
-
-    g_clear_object(&result);
-
-    return NULL;
-
 }
 
 
 /******************************************************************************
 *                                                                             *
-*  Paramètres  : content = flux de données à analyser.                        *
-*                addr    = position courante dans ce flux. [OUT]              *
+*  Paramètres  : area    = portion de binaire incluant l'instruction.         *
+*                addr    = adresse virtuelle et/ou position physique.         *
+*                size    = taille de chacun des éléments à représenter.       *
+*                content = flux de données à analyser.                        *
+*                count   = nombre de ces éléments.                            *
+*                endian  = ordre des bits dans la source.                     *
 *                                                                             *
-*  Description : Crée une instruction de type 'db/dw/etc' pour un sleb128.    *
+*  Description : Crée une instruction de type 'db/dw/etc' étendue.            *
 *                                                                             *
 *  Retour      : Instruction mise en place.                                   *
 *                                                                             *
@@ -338,256 +282,174 @@ GArchInstruction *g_raw_instruction_new_uleb128(const GBinContent *content, vmpa
 *                                                                             *
 ******************************************************************************/
 
-GArchInstruction *g_raw_instruction_new_sleb128(const GBinContent *content, vmpa2t *addr)
+GArchInstruction *g_raw_instruction_new_array(GBinaryPortion *area, vmpa2t *addr, MemoryDataSize size, const GBinContent *content, size_t count, SourceEndian endian)
 {
     GArchInstruction *result;               /* Instruction à retourner     */
-    vmpa2t start;                           /* Départ original de lecture  */
-    uleb128_t value;                        /* Valeur uleb128 à représenter*/
-    phys_t diff;                            /* Couverture de la lecture    */
-    MemoryDataSize leb_size;                /* Taille de la valeur         */
-    GArchOperand *operand;                  /* Octet non décodé à afficher */
-    mrange_t range;                         /* Couverture de l'instruction */
-
-    result = NULL;
-
-    copy_vmpa(&start, addr);
-
-    if (!g_binary_content_read_uleb128(content, addr, &value))
-        goto error;
-
-    diff = compute_vmpa_diff(&start, addr);
-
-    leb_size = MDS_FROM_BYTES(diff) | MDS_SIGN;
-    assert(leb_size != MDS_SIGN);
 
     result = g_object_new(G_TYPE_RAW_INSTRUCTION, NULL);
 
-    init_mrange(&range, &start, diff);
-    g_arch_instruction_set_range(result, &range);
-
-    operand = g_imm_operand_new_from_value(leb_size, (uint64_t)value);
-    if (operand == NULL) goto error;
-
-    g_arch_operand_set_flag(operand, IOF_ZERO_PADDING_BY_DEFAULT | IOF_ZERO_PADDING);
-
-    g_arch_instruction_attach_extra_operand(result, operand);
+    if (!g_raw_instruction_create_array(G_RAW_INSTRUCTION(result), area, addr, size, content, count, endian))
+        g_clear_object(&result);
 
     return result;
 
- error:
-
-    g_clear_object(&result);
-
-    return NULL;
-
 }
 
 
 /******************************************************************************
 *                                                                             *
-*  Paramètres  : content = flux de données à analyser.                        *
+*  Paramètres  : instr   = instance à initialiser pleinement.                 *
+*                area    = portion de binaire incluant l'instruction.         *
+*                addr    = adresse virtuelle et/ou position physique.         *
 *                size    = taille de chacun des éléments à représenter.       *
+*                content = flux de données à analyser.                        *
 *                count   = nombre de ces éléments.                            *
-*                addr    = position courante dans ce flux. [OUT]              *
 *                endian  = ordre des bits dans la source.                     *
 *                                                                             *
-*  Description : Crée une instruction de type 'db/dw/etc' étendue.            *
+*  Description : Met en place une instruction de type 'db/dw/etc' étendue.    *
 *                                                                             *
-*  Retour      : Instruction mise en place.                                   *
+*  Retour      : Bilan de l'opération.                                        *
 *                                                                             *
 *  Remarques   : -                                                            *
 *                                                                             *
 ******************************************************************************/
 
-GArchInstruction *g_raw_instruction_new_array(const GBinContent *content, MemoryDataSize size, size_t count, vmpa2t *addr, SourceEndian endian)
+bool g_raw_instruction_create_array(GRawInstruction *instr, GBinaryPortion *area, vmpa2t *addr, MemoryDataSize size, const GBinContent *content, size_t count, SourceEndian endian)
 {
-    GArchInstruction *result;               /* Instruction à retourner     */
-    vmpa2t old;                             /* Sauvegarde de la position   */
+    bool result;                            /* Bilan à retourner           */
+    vmpa2t start;                           /* Sauvegarde de la position   */
     size_t i;                               /* Boucle de parcours          */
     GArchOperand *operand;                  /* Octet non décodé à afficher */
-    mrange_t range;                         /* Couverture de l'instruction */
+    phys_t diff;                            /* Décalage à appliquer        */
+
+    result = false;
 
     /* Par soucis de cohérence */
-    if (count == 0) return NULL;
+    if (count == 0)
+        goto exit;
 
-    result = g_object_new(G_TYPE_RAW_INSTRUCTION, NULL);
+    copy_vmpa(&start, addr);
 
-    copy_vmpa(&old, addr);
+    g_thick_object_lock(G_THICK_OBJECT(instr));
 
     for (i = 0; i < count; i++)
     {
-        operand = g_imm_operand_new_from_data(size, content, addr, endian);
-        if (operand == NULL) goto error;
+        operand = g_immediate_operand_new_from_data(size, content, addr, (bool []){ false /* unused */ }, endian);
+        if (operand == NULL) break;
 
         g_arch_operand_set_flag(operand, IOF_ZERO_PADDING_BY_DEFAULT | IOF_ZERO_PADDING);
 
-        g_arch_instruction_attach_extra_operand(result, operand);
+        g_arch_instruction_attach_operand(G_ARCH_INSTRUCTION(instr), operand);
+        unref_object(operand);
 
     }
 
-    init_mrange(&range, &old, compute_vmpa_diff(addr, &old));
+    g_thick_object_unlock(G_THICK_OBJECT(instr));
 
-    g_arch_instruction_set_range(result, &range);
+    if (i < count)
+        goto exit;
 
-    return result;
+    diff = compute_vmpa_diff(addr, &start);
+
+    g_arch_instruction_compute_range(G_ARCH_INSTRUCTION(instr), area, &start, diff);
 
- error:
+    result = true;
 
-    g_object_unref(G_OBJECT(result));
+ exit:
 
-    return NULL;
+    return result;
 
 }
 
 
 /******************************************************************************
 *                                                                             *
-*  Paramètres  : instr = instruction quelconque à consulter.                  *
+*  Paramètres  : instr      = instruction à traiter.                          *
+*                is_padding = nouveau statut à associer au contenu.           *
 *                                                                             *
-*  Description : Indique l'encodage d'une instruction de façon détaillée.     *
+*  Description : Marque l'instruction comme ne contenant que du bourrage.     *
 *                                                                             *
-*  Retour      : Description humaine de l'encodage utilisé.                   *
+*  Retour      : -                                                            *
 *                                                                             *
 *  Remarques   : -                                                            *
 *                                                                             *
 ******************************************************************************/
 
-static const char *g_raw_instruction_get_encoding(const GRawInstruction *instr)
+void g_raw_instruction_mark_as_padding(GRawInstruction *instr, bool is_padding)
 {
-    const char *result;                     /* Description à retourner     */
-
-    if (g_raw_instruction_is_string(instr))
-        result = _("String");
+    if (is_padding)
+        g_arch_instruction_set_flag(G_ARCH_INSTRUCTION(instr), RIF_PADDING);
     else
-        result = _("Raw");
-
-    return result;
+        g_arch_instruction_unset_flag(G_ARCH_INSTRUCTION(instr), RIF_PADDING);
 
 }
 
 
 /******************************************************************************
 *                                                                             *
-*  Paramètres  : instr = instruction d'assemblage à consulter.                *
+*  Paramètres  : instr      = instruction à traiter.                          *
+*                is_padding = nouveau statut à associer au contenu.           *
 *                                                                             *
-*  Description : Fournit le nom humain de l'instruction manipulée.            *
+*  Description : Indique si le contenu de l'instruction est du bourrage.      *
 *                                                                             *
-*  Retour      : Mot clef de bas niveau.                                      *
+*  Retour      : Statut du contenu de l'instruction.                          *
 *                                                                             *
 *  Remarques   : -                                                            *
 *                                                                             *
 ******************************************************************************/
 
-static const char *g_raw_instruction_get_keyword(const GRawInstruction *instr)
+bool g_raw_instruction_is_padding(const GRawInstruction *instr)
 {
-    GArchOperand *operand;                  /* Octet décodé à afficher     */
-    MemoryDataSize size;                    /* Taille de valeur associée   */
-
-    static char *defines[] = { "dn", "db", "dw", "dd", "dq" };
-
-    operand = g_arch_instruction_get_operand(G_ARCH_INSTRUCTION(instr), 0);
-
-    if (G_IS_TARGET_OPERAND(operand))
-        size = g_target_operand_get_size(G_TARGET_OPERAND(operand));
-    else
-        size = g_imm_operand_get_size(G_IMM_OPERAND(operand));
+    bool result;                            /* Indication à retourner      */
 
-    g_object_unref(G_OBJECT(operand));
+    result = g_arch_instruction_has_flag(G_ARCH_INSTRUCTION(instr), RIF_PADDING);
 
-    return defines[MDS_RANGE(size)];
+    return result;
 
 }
 
 
-
-/* ---------------------------------------------------------------------------------- */
-/*                      CONSERVATION SUR DISQUE DES INSTRUCTIONS                      */
-/* ---------------------------------------------------------------------------------- */
-
-
 /******************************************************************************
 *                                                                             *
-*  Paramètres  : instr   = instruction d'assemblage à consulter.              *
-*                storage = mécanisme de sauvegarde à manipuler.               *
-*                format  = format binaire chargé associé à l'architecture.    *
-*                pbuf    = zone tampon à remplir.                             *
+*  Paramètres  : instr     = instruction à traiter.                           *
+*                is_string = nouveau statut à associer au contenu.            *
 *                                                                             *
-*  Description : Charge une instruction depuis une mémoire tampon.            *
+*  Description : Marque l'instruction comme contenant une chaîne de texte.    *
 *                                                                             *
-*  Retour      : Bilan de l'opération.                                        *
+*  Retour      : -                                                            *
 *                                                                             *
 *  Remarques   : -                                                            *
 *                                                                             *
 ******************************************************************************/
 
-static bool g_raw_instruction_unserialize(GRawInstruction *instr, GAsmStorage *storage, GBinFormat *format, packed_buffer_t *pbuf)
+void g_raw_instruction_mark_as_string(GRawInstruction *instr, bool is_string)
 {
-    bool result;                            /* Bilan à retourner           */
-    GArchInstructionClass *parent;          /* Classe parente à consulter  */
-    uint8_t boolean;                        /* Valeur booléenne            */
-
-    parent = G_ARCH_INSTRUCTION_CLASS(g_raw_instruction_parent_class);
-
-    result = parent->unserialize(G_ARCH_INSTRUCTION(instr), storage, format, pbuf);
-
-    if (result)
-    {
-        result = extract_packed_buffer(pbuf, &boolean, sizeof(uint8_t), false);
-
-        if (result)
-            g_raw_instruction_mark_as_padding(instr, (boolean == 1));
-
-    }
-
-    if (result)
-    {
-        result = extract_packed_buffer(pbuf, &boolean, sizeof(uint8_t), false);
-
-        if (result)
-            g_raw_instruction_mark_as_string(instr, (boolean == 1));
-
-    }
-
-    return result;
+    if (is_string)
+        g_arch_instruction_set_flag(G_ARCH_INSTRUCTION(instr), RIF_STRING);
+    else
+        g_arch_instruction_unset_flag(G_ARCH_INSTRUCTION(instr), RIF_STRING);
 
 }
 
 
 /******************************************************************************
 *                                                                             *
-*  Paramètres  : instr   = instruction d'assemblage à consulter.              *
-*                storage = mécanisme de sauvegarde à manipuler.               *
-*                pbuf    = zone tampon à remplir.                             *
+*  Paramètres  : instr     = instruction à traiter.                           *
+*                is_string = nouveau statut à associer au contenu.            *
 *                                                                             *
-*  Description : Sauvegarde une instruction dans une mémoire tampon.          *
+*  Description : Indique si le contenu de l'instruction est un texte.         *
 *                                                                             *
-*  Retour      : Bilan de l'opération.                                        *
+*  Retour      : Statut du contenu de l'instruction.                          *
 *                                                                             *
 *  Remarques   : -                                                            *
 *                                                                             *
 ******************************************************************************/
 
-static bool g_raw_instruction_serialize(GRawInstruction *instr, GAsmStorage *storage, packed_buffer_t *pbuf)
+bool g_raw_instruction_is_string(const GRawInstruction *instr)
 {
-    bool result;                            /* Bilan à retourner           */
-    GArchInstructionClass *parent;          /* Classe parente à consulter  */
-    uint8_t boolean;                        /* Valeur booléenne            */
-
-    parent = G_ARCH_INSTRUCTION_CLASS(g_raw_instruction_parent_class);
-
-    result = parent->serialize(G_ARCH_INSTRUCTION(instr), storage, pbuf);
-
-    if (result)
-    {
-        boolean = (g_raw_instruction_is_padding(instr) ? 1 : 0);
-        result = extend_packed_buffer(pbuf, &boolean, sizeof(uint8_t), false);
-    }
+    bool result;                            /* Indication à retourner      */
 
-    if (result)
-    {
-        boolean = (g_raw_instruction_is_string(instr) ? 1 : 0);
-        result = extend_packed_buffer(pbuf, &boolean, sizeof(uint8_t), false);
-    }
+    result = g_arch_instruction_has_flag(G_ARCH_INSTRUCTION(instr), RIF_STRING);
 
     return result;
 
@@ -596,285 +458,73 @@ static bool g_raw_instruction_serialize(GRawInstruction *instr, GAsmStorage *sto
 
 
 /* ---------------------------------------------------------------------------------- */
-/*                          OFFRE DE CAPACITES DE GENERATION                          */
+/*                       IMPLEMENTATION DES FONCTIONS DE CLASSE                       */
 /* ---------------------------------------------------------------------------------- */
 
 
 /******************************************************************************
 *                                                                             *
-*  Paramètres  : instr   = instruction d'assemblage à représenter.            *
-*                line    = ligne de rendu à compléter.                        *
-*                index   = indice de cette même ligne dans le tampon global.  *
-*                repeat  = indice d'utilisations successives du générateur.   *
-*                content = éventuel contenu binaire brut à imprimer.          *
+*  Paramètres  : instr = instruction quelconque à consulter.                  *
 *                                                                             *
-*  Description : Ajoute à un tampon GLib le contenu de l'instance spécifiée.  *
+*  Description : Indique l'encodage d'une instruction de façon détaillée.     *
 *                                                                             *
-*  Retour      : -                                                            *
+*  Retour      : Description humaine de l'encodage utilisé.                   *
 *                                                                             *
 *  Remarques   : -                                                            *
 *                                                                             *
 ******************************************************************************/
 
-static void g_raw_instruction_print(GRawInstruction *instr, GBufferLine *line, size_t index, size_t repeat, const GBinContent *content)
+static char *g_raw_instruction_get_encoding(const GArchInstruction *instr)
 {
-    GArchInstruction *base;                 /* Autre version de l'instance */
-    phys_t max_displayed_len;               /* Quantité de code affichée   */
-    const char *key;                        /* Mot clef principal          */
-    size_t klen;                            /* Taille de ce mot clef       */
-    char *string;                           /* Chaîne reconstituée         */
-    size_t iter;                            /* Tête d'écriture             */
-    bool first;                             /* Mémorise une énumération    */
-    size_t count;                           /* Nombre d'opérandes en place */
-    size_t i;                               /* Boucle de parcours          */
-    GArchOperand *op;                       /* Opérande à manipuler        */
-    GImmOperand *imm;                       /* Version opérande de valeur  */
-    char byte;                              /* Octet à afficher (ou pas)   */
-#ifndef NDEBUG
-    bool status;                            /* Bilan d'une récupération    */
-#endif
-
-    base = G_ARCH_INSTRUCTION(instr);
-
-    /* Localisation */
-
-    g_buffer_line_fill_phys(line, DLC_PHYSICAL, MDS_32_BITS_UNSIGNED, get_mrange_addr(&base->range));
-
-    g_buffer_line_fill_virt(line, DLC_VIRTUAL, MDS_32_BITS_UNSIGNED, get_mrange_addr(&base->range));
-
-    /* Contenu */
-
-    if (g_raw_instruction_is_padding(instr))
-        max_displayed_len = 0;
-
-    else if (g_raw_instruction_is_string(instr))
-        max_displayed_len = 1;
-
-    else
-    {
-        max_displayed_len = get_mrange_length(&base->range);
-        max_displayed_len /= g_arch_instruction_count_operands(base);
-    }
-
-    g_buffer_line_fill_content(line, DLC_BINARY, content, &base->range, max_displayed_len);
-
-    /* Zone du code d'assemblage */
+    char *result;                           /* Description à retourner     */
+    GRawInstruction *raw;                   /* Version spécialisée         */
 
-    key = g_arch_instruction_get_keyword(base);
-    klen = strlen(key);
-
-    g_buffer_line_append_text(line, DLC_ASSEMBLY_HEAD, key, klen, RTT_INSTRUCTION, NULL);
-
-    if (g_raw_instruction_is_padding(instr))
-        g_buffer_line_append_text(line, DLC_ASSEMBLY, "...", 3, RTT_RAW, NULL);
+    raw = G_RAW_INSTRUCTION(instr);
 
+    if (g_raw_instruction_is_string(raw))
+        result = strdup(_("String"));
     else
-    {
-        string = NULL;
-        iter = 0;
-
-        first = true;
-
-        g_arch_instruction_lock_operands(base);
-
-        count = _g_arch_instruction_count_operands(base);
-
-        for (i = 0; i < count; i++)
-        {
-            op = _g_arch_instruction_get_operand(base, i);
-
-            if (!G_IS_IMM_OPERAND(op))
-                goto grip_fallback;
-
-            imm = G_IMM_OPERAND(op);
-
-            if (g_imm_operand_get_size(imm) != MDS_8_BITS)
-                goto grip_fallback;
-
-            if (!g_raw_instruction_is_string(instr) && g_imm_operand_get_display(imm) != IOD_CHAR)
-                goto grip_fallback;
-
-#ifndef NDEBUG
-            status = g_imm_operand_get_value(imm, MDS_8_BITS, &byte);
-            assert(status);
-#else
-            g_imm_operand_get_value(imm, MDS_8_BITS, &byte);
-#endif
-
-            /* Si le caractère doit apparaître en hexadécimal... */
-
-            if (!isprint(byte))
-                goto grip_fallback;
-
-            /* Impression de l'octet */
-
-            if (string == NULL)
-            {
-                string = (char *)calloc(count + 3, sizeof(char));
-
-                strcpy(string, "\"");
-                iter = 1;
-
-            }
-
-            string[iter++] = byte;
-
-            g_object_unref(G_OBJECT(op));
-
-            continue;
-
- grip_fallback:
-
-            /* Si une chaîne précède */
-
-            if (string != NULL && iter > 1)
-            {
-                if (!first)
-                {
-                    g_buffer_line_append_text(line, DLC_ASSEMBLY, ",", 1, RTT_PUNCT, NULL);
-                    g_buffer_line_append_text(line, DLC_ASSEMBLY, " ", 1, RTT_RAW, NULL);
-                }
-                else
-                    first = false;
-
-                string[iter++] = '"';
-
-                g_buffer_line_append_text(line, DLC_ASSEMBLY, string, iter, RTT_STRING, NULL);
-
-                iter = 1;
-
-            }
-
-            /* Intégration en tant qu'opérande classique */
-
-            if (!first)
-            {
-                g_buffer_line_append_text(line, DLC_ASSEMBLY, ",", 1, RTT_PUNCT, NULL);
-                g_buffer_line_append_text(line, DLC_ASSEMBLY, " ", 1, RTT_RAW, NULL);
-            }
-            else
-                first = false;
-
-            g_arch_operand_print(op, line);
-
-            g_object_unref(G_OBJECT(op));
-
-        }
-
-        /* Si au final une chaîne traine encore */
-
-        if (string != NULL && iter > 1)
-        {
-            if (!first)
-            {
-                g_buffer_line_append_text(line, DLC_ASSEMBLY, ",", 1, RTT_PUNCT, NULL);
-                g_buffer_line_append_text(line, DLC_ASSEMBLY, " ", 1, RTT_RAW, NULL);
-            }
-
-            string[iter++] = '"';
-
-            g_buffer_line_append_text(line, DLC_ASSEMBLY, string, iter, RTT_STRING, NULL);
-
-        }
+        result = strdup(_("Raw"));
 
-        g_arch_instruction_unlock_operands(base);
-
-        if (string != NULL)
-            free(string);
-
-    }
-
-}
-
-
-/******************************************************************************
-*                                                                             *
-*  Paramètres  : instr      = instruction à traiter.                          *
-*                is_padding = nouveau statut à associer au contenu.           *
-*                                                                             *
-*  Description : Marque l'instruction comme ne contenant que du bourrage.     *
-*                                                                             *
-*  Retour      : -                                                            *
-*                                                                             *
-*  Remarques   : -                                                            *
-*                                                                             *
-******************************************************************************/
-
-void g_raw_instruction_mark_as_padding(GRawInstruction *instr, bool is_padding)
-{
-    if (is_padding)
-        g_arch_instruction_set_flag(G_ARCH_INSTRUCTION(instr), RIF_PADDING);
-    else
-        g_arch_instruction_unset_flag(G_ARCH_INSTRUCTION(instr), RIF_PADDING);
+    return result;
 
 }
 
 
 /******************************************************************************
 *                                                                             *
-*  Paramètres  : instr      = instruction à traiter.                          *
-*                is_padding = nouveau statut à associer au contenu.           *
+*  Paramètres  : instr = instruction d'assemblage à consulter.                *
 *                                                                             *
-*  Description : Indique si le contenu de l'instruction est du bourrage.      *
+*  Description : Fournit le nom humain de l'instruction manipulée.            *
 *                                                                             *
-*  Retour      : Statut du contenu de l'instruction.                          *
+*  Retour      : Mot clef de bas niveau.                                      *
 *                                                                             *
 *  Remarques   : -                                                            *
 *                                                                             *
 ******************************************************************************/
 
-bool g_raw_instruction_is_padding(const GRawInstruction *instr)
+static char *g_raw_instruction_get_keyword(const GArchInstruction *instr)
 {
-    bool result;                            /* Indication à retourner      */
-
-    result = g_arch_instruction_has_flag(G_ARCH_INSTRUCTION(instr), RIF_PADDING);
-
-    return result;
-
-}
+    char *result;                           /* Désignation à retourner     */
+    GArchOperand *operand;                  /* Octet décodé à afficher     */
+    MemoryDataSize size;                    /* Taille de valeur associée   */
 
+    static char *defines[] = { "dn", "db", "dw", "dd", "dq" };
 
-/******************************************************************************
-*                                                                             *
-*  Paramètres  : instr     = instruction à traiter.                           *
-*                is_string = nouveau statut à associer au contenu.            *
-*                                                                             *
-*  Description : Marque l'instruction comme contenant une chaîne de texte.    *
-*                                                                             *
-*  Retour      : -                                                            *
-*                                                                             *
-*  Remarques   : -                                                            *
-*                                                                             *
-******************************************************************************/
+    g_thick_object_lock(G_THICK_OBJECT(instr));
 
-void g_raw_instruction_mark_as_string(GRawInstruction *instr, bool is_string)
-{
-    if (is_string)
-        g_arch_instruction_set_flag(G_ARCH_INSTRUCTION(instr), RIF_STRING);
-    else
-        g_arch_instruction_unset_flag(G_ARCH_INSTRUCTION(instr), RIF_STRING);
-
-}
+    operand = g_arch_instruction_get_operand(instr, 0);
 
+    /*if (G_IS_TARGET_OPERAND(operand)) FIXME 
+        size = g_target_operand_get_size(G_TARGET_OPERAND(operand));
+        else*/
+        size = g_immediate_operand_get_size(G_IMMEDIATE_OPERAND(operand));
 
-/******************************************************************************
-*                                                                             *
-*  Paramètres  : instr     = instruction à traiter.                           *
-*                is_string = nouveau statut à associer au contenu.            *
-*                                                                             *
-*  Description : Indique si le contenu de l'instruction est un texte.         *
-*                                                                             *
-*  Retour      : Statut du contenu de l'instruction.                          *
-*                                                                             *
-*  Remarques   : -                                                            *
-*                                                                             *
-******************************************************************************/
+    unref_object(operand);
 
-bool g_raw_instruction_is_string(const GRawInstruction *instr)
-{
-    bool result;                            /* Indication à retourner      */
+    g_thick_object_unlock(G_THICK_OBJECT(instr));
 
-    result = g_arch_instruction_has_flag(G_ARCH_INSTRUCTION(instr), RIF_STRING);
+    result = strdup(defines[MDS_RANGE(size)]);
 
     return result;