summaryrefslogtreecommitdiff
path: root/src/decomp/instr
diff options
context:
space:
mode:
Diffstat (limited to 'src/decomp/instr')
-rw-r--r--src/decomp/instr/Makefile.am18
-rw-r--r--src/decomp/instr/ite.c339
-rw-r--r--src/decomp/instr/ite.h70
-rw-r--r--src/decomp/instr/keyword.c162
-rw-r--r--src/decomp/instr/keyword.h68
-rw-r--r--src/decomp/instr/switch.c380
-rw-r--r--src/decomp/instr/switch.h66
7 files changed, 0 insertions, 1103 deletions
diff --git a/src/decomp/instr/Makefile.am b/src/decomp/instr/Makefile.am
deleted file mode 100644
index 28f6e3f..0000000
--- a/src/decomp/instr/Makefile.am
+++ /dev/null
@@ -1,18 +0,0 @@
-
-noinst_LTLIBRARIES = libdecompinstr.la
-
-libdecompinstr_la_SOURCES = \
- ite.h ite.c \
- keyword.h keyword.c \
- switch.h switch.c
-
-libdecompinstr_la_LDFLAGS =
-
-libdecompinstr_la_LIBADD =
-
-
-AM_CPPFLAGS = $(LIBGTK_CFLAGS) $(LIBXML_CFLAGS)
-
-AM_CFLAGS = $(DEBUG_CFLAGS) $(WARNING_FLAGS) $(COMPLIANCE_FLAGS)
-
-SUBDIRS =
diff --git a/src/decomp/instr/ite.c b/src/decomp/instr/ite.c
deleted file mode 100644
index 6e98a77..0000000
--- a/src/decomp/instr/ite.c
+++ /dev/null
@@ -1,339 +0,0 @@
-
-/* Chrysalide - Outil d'analyse de fichiers binaires
- * ite.c - représentation des branchements conditionnels
- *
- * Copyright (C) 2010-2013 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 "ite.h"
-
-
-#include "../instruction-int.h"
-
-
-
-/* Définition d'un aiguillage du flux d'exécution (instance) */
-struct _GITEInstruction
-{
- GDecInstruction parent; /* A laisser en premier */
-
- GCondExpression *cond; /* Condition prise en compte */
-
- GDecInstruction *true_branch; /* Condition vérifiée */
- GDecInstruction *false_branch; /* Condition non vérifiée */
-
- union
- {
- vmpa_t addr; /* Adresse de saut */
- GDecExpression *expr; /* Expressions équivalentes */
-
- } if_true;
-
- union
- {
- vmpa_t addr; /* Adresse de saut */
- GDecExpression *expr; /* Expressions équivalentes */
-
- } if_false;
-
-};
-
-
-/* Définition d'un aiguillage du flux d'exécution (classe) */
-struct _GITEInstructionClass
-{
- GDecInstructionClass parent; /* A laisser en premier */
-
-};
-
-
-
-/* Initialise la classe des aiguillages de flux d'exécution. */
-static void g_ite_instruction_class_init(GITEInstructionClass *);
-
-/* Initialise une instance d'aiguillage du flux d'exécution. */
-static void g_ite_instruction_init(GITEInstruction *);
-
-/* Visite un ensemble hiérarchique d'instructions décompilées. */
-static bool g_ite_instruction_visit(GITEInstruction *, dec_instr_visitor_cb, DecInstrVisitFlags, void *);
-
-/* Remplace une instruction décompilée par une autre. */
-static bool g_ite_instruction_replace(GITEInstruction *, GDecInstruction *, GDecInstruction *);
-
-/* Imprime pour l'écran un version humaine d'une instruction. */
-static GBufferLine *g_ite_instruction_print(const GITEInstruction *, GCodeBuffer *, GBufferLine *, GLangOutput *);
-
-
-
-/* Indique le type défini pour un aiguillage du flux d'exécution. */
-G_DEFINE_TYPE(GITEInstruction, g_ite_instruction, G_TYPE_DEC_INSTRUCTION);
-
-
-/******************************************************************************
-* *
-* Paramètres : klass = classe à initialiser. *
-* *
-* Description : Initialise la classe des aiguillages de flux d'exécution. *
-* *
-* Retour : - *
-* *
-* Remarques : - *
-* *
-******************************************************************************/
-
-static void g_ite_instruction_class_init(GITEInstructionClass *klass)
-{
-
-}
-
-
-/******************************************************************************
-* *
-* Paramètres : instr = instance à initialiser. *
-* *
-* Description : Initialise une instance d'aiguillage du flux d'exécution. *
-* *
-* Retour : - *
-* *
-* Remarques : - *
-* *
-******************************************************************************/
-
-static void g_ite_instruction_init(GITEInstruction *instr)
-{
- GDecInstruction *base; /* Autre version de l'objet */
-
- base = G_DEC_INSTRUCTION(instr);
-
- base->visit = (dec_instr_visit_fc)g_ite_instruction_visit;
- base->replace = (dec_instr_replace_fc)g_ite_instruction_replace;
- base->print = (dec_instr_print_fc)g_ite_instruction_print;
-
-}
-
-
-/******************************************************************************
-* *
-* Paramètres : cond = expression fixant le choix de l'aiguillage. *
-* if_true = adresse du saut si la condition est vérifiée. *
-* if_true = adresse du saut si la condition n'est pas vérifiée.*
-* *
-* Description : Exprime un aiguillage du flux en fonction d'une condition. *
-* *
-* Retour : Expression mise en place. *
-* *
-* Remarques : - *
-* *
-******************************************************************************/
-
-GDecInstruction *g_ite_instruction_new(GCondExpression *cond, vmpa_t if_true, vmpa_t if_false)
-{
- GITEInstruction *result; /* Expression à retourner */
-
- result = g_object_new(G_TYPE_ITE_INSTRUCTION, NULL);
-
- result->cond = cond;
- result->if_true.addr = if_true;
- result->if_false.addr = if_false;
-
- return G_DEC_INSTRUCTION(result);
-
-}
-
-
-/******************************************************************************
-* *
-* Paramètres : instr = première instruction à venir visiter. *
-* callback = procédure à appeler à chaque instruction visitée. *
-* flags = moments des appels à réaliser en retour. *
-* data = données quelconques associées au visiteur. *
-* *
-* Description : Visite un ensemble hiérarchique d'instructions décompilées. *
-* *
-* Retour : true si le parcours a été jusqu'à son terme, false sinon. *
-* *
-* Remarques : - *
-* *
-******************************************************************************/
-
-static bool g_ite_instruction_visit(GITEInstruction *instr, dec_instr_visitor_cb callback, DecInstrVisitFlags flags, void *data)
-{
- bool result; /* Bilan à retourner */
-
- result = _g_dec_instruction_visit(G_DEC_INSTRUCTION(instr->cond), G_DEC_INSTRUCTION(instr),
- callback, flags, data);
-
- if (result)
- result = _g_dec_instruction_visit(instr->true_branch, G_DEC_INSTRUCTION(instr),
- callback, flags, data);
-
- if (result && instr->false_branch != NULL)
- result = _g_dec_instruction_visit(instr->false_branch, G_DEC_INSTRUCTION(instr),
- callback, flags, data);
-
- return result;
-
-}
-
-
-/******************************************************************************
-* *
-* Paramètres : instr = première instruction à venir ausculter. *
-* old = instruction décompilée à venir remplacer. *
-* new = instruction décompilée à utiliser dorénavant. *
-* *
-* Description : Remplace une instruction décompilée par une autre. *
-* *
-* Retour : true si un remplacement a été effectué, false sinon. *
-* *
-* Remarques : - *
-* *
-******************************************************************************/
-
-static bool g_ite_instruction_replace(GITEInstruction *instr, GDecInstruction *old, GDecInstruction *new)
-{
- bool result; /* Bilan à retourner */
-
- result = g_dec_instruction_replace(G_DEC_INSTRUCTION(instr->cond), old, new);
-
- result |= g_dec_instruction_replace(instr->true_branch, old, new);
-
- if (instr->false_branch != NULL)
- result |= g_dec_instruction_replace(instr->false_branch, old, new);
-
- return result;
-
-}
-
-
-/******************************************************************************
-* *
-* Paramètres : instr = instruction à transcrire en version humaine. *
-* buffer = tampon où doit se réaliser l'insertion. *
-* line = ligne d'impression prête à emploi ou NULL. *
-* output = langage de programmation de sortie. *
-* *
-* Description : Imprime pour l'écran un version humaine d'une instruction. *
-* *
-* Retour : - *
-* *
-* Remarques : - *
-* *
-******************************************************************************/
-
-static GBufferLine *g_ite_instruction_print(const GITEInstruction *instr, GCodeBuffer *buffer, GBufferLine *line, GLangOutput *output)
-{
- GBufferLine *result; /* Ligne à retourner */
-
- g_buffer_line_append_text(line, BLC_ASSEMBLY_HEAD, "if ", 3, RTT_KEY_WORD, NULL);
-
- result = g_dec_instruction_print(G_DEC_INSTRUCTION(instr->cond),
- buffer, line, output);
-
- result = g_dec_instruction_print(instr->true_branch, buffer, result, output);
-
- if (instr->false_branch != NULL)
- {
- g_buffer_line_append_text(result, BLC_ASSEMBLY_HEAD, "else", 4, RTT_KEY_WORD, NULL);
- result = g_dec_instruction_print(instr->false_branch, buffer, result, output);
- }
-
- return result;
-
-}
-
-
-/******************************************************************************
-* *
-* Paramètres : instr = instruction fixant le choix de l'aiguillage. *
-* *
-* Description : Fournit la condition régissant la suite de l'exécution. *
-* *
-* Retour : Condition mise en place. *
-* *
-* Remarques : - *
-* *
-******************************************************************************/
-
-GCondExpression *g_ite_instruction_get_condition(const GITEInstruction *instr)
-{
- return instr->cond;
-
-}
-
-
-/******************************************************************************
-* *
-* Paramètres : instr = expression fixant le choix de l'aiguillage. *
-* true_branch = instructions si la condition est vérifiée. *
-* false_branch = instructions si la cond. n'est pas vérifiée. *
-* *
-* Description : Détermine le corps des différentes branches possibles. *
-* *
-* Retour : - *
-* *
-* Remarques : - *
-* *
-******************************************************************************/
-
-void g_ite_instruction_set_branches(GITEInstruction *instr, GDecInstruction *true_branch, GDecInstruction *false_branch)
-{
- if (instr->true_branch != NULL) g_object_unref(G_OBJECT(instr->true_branch));
- if (instr->false_branch != NULL) g_object_unref(G_OBJECT(instr->false_branch));
-
- if (true_branch == NULL)
- {
- g_dec_expression_negate(G_DEC_EXPRESSION(instr->cond));
-
- instr->true_branch = false_branch;
- instr->false_branch = true_branch;
-
- }
- else
- {
- instr->true_branch = true_branch;
- instr->false_branch = false_branch;
- }
-
-}
-
-
-/******************************************************************************
-* *
-* Paramètres : instr = instruction fixant le choix de l'aiguillage. *
-* true_branch = instrs. si la condition est vérifiée. [OUT] *
-* false_branch = instrs. si la cond. n'est pas vérifiée. [OUT] *
-* *
-* Description : Fournit le corps des différentes branches possibles. *
-* *
-* Retour : - *
-* *
-* Remarques : - *
-* *
-******************************************************************************/
-
-void g_ite_instruction_get_branches(const GITEInstruction *instr, GDecInstruction **true_branch, GDecInstruction **false_branch)
-{
- if (true_branch != NULL)
- *true_branch = instr->true_branch;
-
- if (false_branch != NULL)
- *false_branch = instr->false_branch;
-
-}
diff --git a/src/decomp/instr/ite.h b/src/decomp/instr/ite.h
deleted file mode 100644
index f92663c..0000000
--- a/src/decomp/instr/ite.h
+++ /dev/null
@@ -1,70 +0,0 @@
-
-/* Chrysalide - Outil d'analyse de fichiers binaires
- * ite.h - prototypes pour la représentation des branchements conditionnels
- *
- * Copyright (C) 2010-2013 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 _DECOMP_INSTR_ITE_H
-#define _DECOMP_INSTR_ITE_H
-
-
-#include <glib-object.h>
-
-
-#include "../expression.h"
-#include "../instruction.h"
-#include "../expr/cond.h"
-
-
-
-#define G_TYPE_ITE_INSTRUCTION g_ite_instruction_get_type()
-#define G_ITE_INSTRUCTION(obj) (G_TYPE_CHECK_INSTANCE_CAST((obj), g_ite_instruction_get_type(), GITEInstruction))
-#define G_IS_ITE_INSTRUCTION(obj) (G_TYPE_CHECK_INSTANCE_TYPE((obj), g_ite_instruction_get_type()))
-#define G_ITE_INSTRUCTION_CLASS(klass) (G_TYPE_CHECK_CLASS_CAST((klass), G_TYPE_ITE_INSTRUCTION, GITEInstructionClass))
-#define G_IS_ITE_INSTRUCTION_CLASS(klass) (G_TYPE_CHECK_CLASS_TYPE((klass), G_TYPE_ITE_INSTRUCTION))
-#define G_ITE_INSTRUCTION_GET_CLASS(obj) (G_TYPE_INSTANCE_GET_CLASS((obj), G_TYPE_ITE_INSTRUCTION, GITEInstructionClass))
-
-
-
-/* Définition d'un aiguillage du flux d'exécution (instance) */
-typedef struct _GITEInstruction GITEInstruction;
-
-/* Définition d'un aiguillage du flux d'exécution (classe) */
-typedef struct _GITEInstructionClass GITEInstructionClass;
-
-
-/* Indique le type défini pour un aiguillage du flux d'exécution. */
-GType g_ite_instruction_get_type(void);
-
-/* Exprime un aiguillage du flux en fonction d'une condition. */
-GDecInstruction *g_ite_instruction_new(GCondExpression *, vmpa_t, vmpa_t);
-
-/* Fournit la condition régissant la suite de l'exécution. */
-GCondExpression *g_ite_instruction_get_condition(const GITEInstruction *);
-
-/* Détermine le corps des différentes branches possibles. */
-void g_ite_instruction_set_branches(GITEInstruction *, GDecInstruction *, GDecInstruction *);
-
-/* Fournit le corps des différentes branches possibles. */
-void g_ite_instruction_get_branches(const GITEInstruction *, GDecInstruction **, GDecInstruction **);
-
-
-
-#endif /* _DECOMP_INSTR_ITE_H */
diff --git a/src/decomp/instr/keyword.c b/src/decomp/instr/keyword.c
deleted file mode 100644
index ea4577d..0000000
--- a/src/decomp/instr/keyword.c
+++ /dev/null
@@ -1,162 +0,0 @@
-
-/* Chrysalide - Outil d'analyse de fichiers binaires
- * keyword.c - insertions de mots clefs de haut niveau
- *
- * Copyright (C) 2013 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 "keyword.h"
-
-
-#include "../instruction-int.h"
-
-
-
-/* Définition d'un mot clef de haut niveau (instance) */
-struct _GKeywordInstruction
-{
- GDecInstruction parent; /* A laisser en premier */
-
- DecompiledKeyWord keyword; /* Mot clef représenté */
-
-};
-
-
-/* Indique le type défini pour un mot clef de haut niveau. */
-struct _GKeywordInstructionClass
-{
- GDecInstructionClass parent; /* A laisser en premier */
-
-};
-
-
-
-/* Initialise la classe des mots clefs de haut niveau. */
-static void g_keyword_instruction_class_init(GKeywordInstructionClass *);
-
-/* Initialise une instance de mot clef de haut niveau. */
-static void g_keyword_instruction_init(GKeywordInstruction *);
-
-/* Imprime pour l'écran un version humaine d'une instruction. */
-static GBufferLine *g_keyword_instruction_print(const GKeywordInstruction *, GCodeBuffer *, GBufferLine *, GLangOutput *);
-
-
-
-/* Indique le type défini pour un mot clef de haut niveau. */
-G_DEFINE_TYPE(GKeywordInstruction, g_keyword_instruction, G_TYPE_DEC_INSTRUCTION);
-
-
-/******************************************************************************
-* *
-* Paramètres : klass = classe à initialiser. *
-* *
-* Description : Initialise la classe des mots clefs de haut niveau. *
-* *
-* Retour : - *
-* *
-* Remarques : - *
-* *
-******************************************************************************/
-
-static void g_keyword_instruction_class_init(GKeywordInstructionClass *klass)
-{
-
-}
-
-
-/******************************************************************************
-* *
-* Paramètres : instr = instance à initialiser. *
-* *
-* Description : Initialise une instance de mot clef de haut niveau. *
-* *
-* Retour : - *
-* *
-* Remarques : - *
-* *
-******************************************************************************/
-
-static void g_keyword_instruction_init(GKeywordInstruction *instr)
-{
- GDecInstruction *base; /* Autre version de l'objet */
-
- base = G_DEC_INSTRUCTION(instr);
-
- base->print = (dec_instr_print_fc)g_keyword_instruction_print;
-
-}
-
-
-/******************************************************************************
-* *
-* Paramètres : keyword = mot clef à représenter. *
-* *
-* Description : Crée un mot clef de haut niveau. *
-* *
-* Retour : Instruction mise en place. *
-* *
-* Remarques : - *
-* *
-******************************************************************************/
-
-GDecInstruction *g_keyword_instruction_new(DecompiledKeyWord keyword)
-{
- GKeywordInstruction *result; /* Expression à retourner */
-
- result = g_object_new(G_TYPE_KEYWORD_INSTRUCTION, NULL);
-
- result->keyword = keyword;
-
- return G_DEC_INSTRUCTION(result);
-
-}
-
-
-/******************************************************************************
-* *
-* Paramètres : instr = instruction à transcrire en version humaine. *
-* buffer = tampon où doit se réaliser l'insertion. *
-* line = ligne d'impression prête à emploi ou NULL. *
-* output = langage de programmation de sortie. *
-* *
-* Description : Imprime pour l'écran un version humaine d'une instruction. *
-* *
-* Retour : - *
-* *
-* Remarques : - *
-* *
-******************************************************************************/
-
-static GBufferLine *g_keyword_instruction_print(const GKeywordInstruction *instr, GCodeBuffer *buffer, GBufferLine *line, GLangOutput *output)
-{
- switch (instr->keyword)
- {
- case DKW_BREAK:
- g_buffer_line_append_text(line, BLC_ASSEMBLY_HEAD, "break", 5, RTT_KEY_WORD, NULL);
- break;
-
- case DKW_CONTINUE:
- g_buffer_line_append_text(line, BLC_ASSEMBLY_HEAD, "continue", 8, RTT_KEY_WORD, NULL);
- break;
-
- }
-
- return line;
-
-}
diff --git a/src/decomp/instr/keyword.h b/src/decomp/instr/keyword.h
deleted file mode 100644
index 4dfcc00..0000000
--- a/src/decomp/instr/keyword.h
+++ /dev/null
@@ -1,68 +0,0 @@
-
-/* Chrysalide - Outil d'analyse de fichiers binaires
- * keyword.h - prototypes pour les insertions de mots clefs de haut niveau
- *
- * Copyright (C) 2013 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 _DECOMP_INSTR_KEYWORD_H
-#define _DECOMP_INSTR_KEYWORD_H
-
-
-#include <glib-object.h>
-
-
-#include "../instruction.h"
-
-
-
-#define G_TYPE_KEYWORD_INSTRUCTION g_keyword_instruction_get_type()
-#define G_KEYWORD_INSTRUCTION(obj) (G_TYPE_CHECK_INSTANCE_CAST((obj), g_keyword_instruction_get_type(), GKeywordInstruction))
-#define G_IS_KEYWORD_INSTRUCTION(obj) (G_TYPE_CHECK_INSTANCE_TYPE((obj), g_keyword_instruction_get_type()))
-#define G_KEYWORD_INSTRUCTION_CLASS(klass) (G_TYPE_CHECK_CLASS_CAST((klass), G_TYPE_KEYWORD_INSTRUCTION, GKeywordInstructionClass))
-#define G_IS_KEYWORD_INSTRUCTION_CLASS(klass) (G_TYPE_CHECK_CLASS_TYPE((klass), G_TYPE_KEYWORD_INSTRUCTION))
-#define G_KEYWORD_INSTRUCTION_GET_CLASS(obj) (G_TYPE_INSTANCE_GET_CLASS((obj), G_TYPE_KEYWORD_INSTRUCTION, GKeywordInstructionClass))
-
-
-
-/* Type de mots clefs pris en charge */
-typedef enum _DecompiledKeyWord
-{
- DKW_BREAK, /* 'break' */
- DKW_CONTINUE, /* 'continue' */
-
-} DecompiledKeyWord;
-
-
-/* Définition d'un mot clef de haut niveau (instance) */
-typedef struct _GKeywordInstruction GKeywordInstruction;
-
-/* Définition d'un mot clef de haut niveau (classe) */
-typedef struct _GKeywordInstructionClass GKeywordInstructionClass;
-
-
-/* Indique le type défini pour un mot clef de haut niveau. */
-GType g_keyword_instruction_get_type(void);
-
-/* Crée un mot clef de haut niveau. */
-GDecInstruction *g_keyword_instruction_new(DecompiledKeyWord);
-
-
-
-#endif /* _DECOMP_INSTR_KEYWORD_H */
diff --git a/src/decomp/instr/switch.c b/src/decomp/instr/switch.c
deleted file mode 100644
index 468ca82..0000000
--- a/src/decomp/instr/switch.c
+++ /dev/null
@@ -1,380 +0,0 @@
-
-/* Chrysalide - Outil d'analyse de fichiers binaires
- * switch.c - décodage des aiguillages multiples du flot d'exécution
- *
- * Copyright (C) 2013 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 "switch.h"
-
-
-#include <malloc.h>
-#include <stdlib.h>
-
-
-#include "../instruction-int.h"
-
-
-
-/* Détails d'un cas */
-typedef struct _case_info
-{
- vmpa_t addr; /* Adresse des blocs associés */
-
- GDecExpression **values; /* Valeur d'embranchement */
- size_t values_count; /* Quantité de cas rassemblés */
-
- GDecInstruction *instrs; /* Instructions du cas */
-
-} case_info;
-
-
-/* Définition d'un aiguillage multiple du flux d'exécution (instance) */
-struct _GSwitchInstruction
-{
- GDecInstruction parent; /* A laisser en premier */
-
- GDecExpression *value; /* Valeur décidant du flot */
-
- case_info *cases; /* Embranchements présents */
- size_t cases_count; /* Nombre de cas de sélection */
-
- GDecInstruction *def_case; /* Instructions par défaut */
-
-};
-
-
-/* Définition d'un aiguillage multiple du flux d'exécution (classe) */
-struct _GSwitchInstructionClass
-{
- GDecInstructionClass parent; /* A laisser en premier */
-
-};
-
-
-
-/* Initialise la classe des aiguillages de flux d'exécution. */
-static void g_switch_instruction_class_init(GSwitchInstructionClass *);
-
-/* Initialise une instance d'aiguillage du flux d'exécution. */
-static void g_switch_instruction_init(GSwitchInstruction *);
-
-/* Visite un ensemble hiérarchique d'instructions décompilées. */
-static bool g_switch_instruction_visit(GSwitchInstruction *, dec_instr_visitor_cb, DecInstrVisitFlags, void *);
-
-/* Remplace une instruction décompilée par une autre. */
-static bool g_switch_instruction_replace(GSwitchInstruction *, GDecInstruction *, GDecInstruction *);
-
-/* Imprime pour l'écran un version humaine d'une instruction. */
-static GBufferLine *g_switch_instruction_print(const GSwitchInstruction *, GCodeBuffer *, GBufferLine *, GLangOutput *);
-
-
-
-/* Indique le type défini pour un aiguillage du flux d'exécution. */
-G_DEFINE_TYPE(GSwitchInstruction, g_switch_instruction, G_TYPE_DEC_INSTRUCTION);
-
-
-/******************************************************************************
-* *
-* Paramètres : klass = classe à initialiser. *
-* *
-* Description : Initialise la classe des aiguillages de flux d'exécution. *
-* *
-* Retour : - *
-* *
-* Remarques : - *
-* *
-******************************************************************************/
-
-static void g_switch_instruction_class_init(GSwitchInstructionClass *klass)
-{
-
-}
-
-
-/******************************************************************************
-* *
-* Paramètres : instr = instance à initialiser. *
-* *
-* Description : Initialise une instance d'aiguillage du flux d'exécution. *
-* *
-* Retour : - *
-* *
-* Remarques : - *
-* *
-******************************************************************************/
-
-static void g_switch_instruction_init(GSwitchInstruction *instr)
-{
- GDecInstruction *base; /* Autre version de l'objet */
-
- base = G_DEC_INSTRUCTION(instr);
-
- base->visit = (dec_instr_visit_fc)g_switch_instruction_visit;
- base->replace = (dec_instr_replace_fc)g_switch_instruction_replace;
- base->print = (dec_instr_print_fc)g_switch_instruction_print;
-
-}
-
-
-/******************************************************************************
-* *
-* Paramètres : value = valeur déterminant la voie à suivre. *
-* *
-* Description : Exprime un aiguillage multiple du flux selon une valeur. *
-* *
-* Retour : Instruction mise en place. *
-* *
-* Remarques : - *
-* *
-******************************************************************************/
-
-GDecInstruction *g_switch_instruction_new(GDecExpression *value)
-{
- GSwitchInstruction *result; /* Expression à retourner */
-
- result = g_object_new(G_TYPE_SWITCH_INSTRUCTION, NULL);
-
- result->value = value;
-
- return G_DEC_INSTRUCTION(result);
-
-}
-
-
-/******************************************************************************
-* *
-* Paramètres : instr = première instruction à venir visiter. *
-* callback = procédure à appeler à chaque instruction visitée. *
-* flags = moments des appels à réaliser en retour. *
-* data = données quelconques associées au visiteur. *
-* *
-* Description : Visite un ensemble hiérarchique d'instructions décompilées. *
-* *
-* Retour : true si le parcours a été jusqu'à son terme, false sinon. *
-* *
-* Remarques : - *
-* *
-******************************************************************************/
-
-static bool g_switch_instruction_visit(GSwitchInstruction *instr, dec_instr_visitor_cb callback, DecInstrVisitFlags flags, void *data)
-{
- bool result; /* Bilan à retourner */
- size_t i; /* Boucle de parcours */
-
- result = true;
-
- for (i = 0; i < instr->cases_count && result; i++)
- result = _g_dec_instruction_visit(instr->cases[i].instrs, G_DEC_INSTRUCTION(instr),
- callback, flags, data);
-
- if (result && instr->def_case != NULL)
- result = _g_dec_instruction_visit(instr->def_case, G_DEC_INSTRUCTION(instr),
- callback, flags, data);
-
- return result;
-
-}
-
-
-/******************************************************************************
-* *
-* Paramètres : instr = première instruction à venir ausculter. *
-* old = instruction décompilée à venir remplacer. *
-* new = instruction décompilée à utiliser dorénavant. *
-* *
-* Description : Remplace une instruction décompilée par une autre. *
-* *
-* Retour : true si un remplacement a été effectué, false sinon. *
-* *
-* Remarques : - *
-* *
-******************************************************************************/
-
-static bool g_switch_instruction_replace(GSwitchInstruction *instr, GDecInstruction *old, GDecInstruction *new)
-{
- bool result; /* Bilan à retourner */
- size_t i; /* Boucle de parcours */
-
- result = false;
-
- for (i = 0; i < instr->cases_count; i++)
- result |= g_dec_instruction_replace(instr->cases[i].instrs, old, new);
-
- if (instr->def_case != NULL)
- result |= g_dec_instruction_replace(instr->def_case, old, new);
-
- return result;
-
-}
-
-
-/******************************************************************************
-* *
-* Paramètres : instr = instruction à transcrire en version humaine. *
-* buffer = tampon où doit se réaliser l'insertion. *
-* line = ligne d'impression prête à emploi ou NULL. *
-* output = langage de programmation de sortie. *
-* *
-* Description : Imprime pour l'écran un version humaine d'une instruction. *
-* *
-* Retour : - *
-* *
-* Remarques : - *
-* *
-******************************************************************************/
-
-static GBufferLine *g_switch_instruction_print(const GSwitchInstruction *instr, GCodeBuffer *buffer, GBufferLine *line, GLangOutput *output)
-{
- GBufferLine *result; /* Ligne à retourner */
- size_t i; /* Boucle de parcours #1 */
- size_t j; /* Boucle de parcours #2 */
-
- g_buffer_line_append_text(line, BLC_ASSEMBLY_HEAD, "switch", 9, RTT_KEY_WORD, NULL);
-
- g_buffer_line_append_text(line, BLC_ASSEMBLY_HEAD, " ", 1, RTT_RAW, NULL);
- g_buffer_line_append_text(line, BLC_ASSEMBLY_HEAD, "(", 1, RTT_PUNCT, NULL);
-
- result = g_dec_instruction_print(G_DEC_INSTRUCTION(instr->value), buffer, line, output);
-
- g_buffer_line_append_text(result, BLC_ASSEMBLY_HEAD, ")", 1, RTT_PUNCT, NULL);
-
- g_buffer_line_append_text(result, BLC_ASSEMBLY_HEAD, " ", 1, RTT_RAW, NULL);
- g_buffer_line_append_text(result, BLC_ASSEMBLY_HEAD, "{", 1, RTT_HOOK, NULL);
-
- g_code_buffer_inc_indentation(buffer);
-
- /* Cas d'aiguillage définis */
-
- for (i = 0; i < instr->cases_count; i++)
- {
- for (j = 0; j < instr->cases[i].values_count; j++)
- {
- result = g_code_buffer_append_new_line_fixme(buffer);
-
- g_buffer_line_append_text(result, BLC_ASSEMBLY_HEAD, "case", 4, RTT_KEY_WORD, NULL);
- g_buffer_line_append_text(result, BLC_ASSEMBLY_HEAD, " ", 1, RTT_RAW, NULL);
-
- result = g_dec_instruction_print(G_DEC_INSTRUCTION(instr->cases[i].values[j])
- , buffer, result, output);
-
- g_buffer_line_append_text(result, BLC_ASSEMBLY_HEAD, ":", 1, RTT_PUNCT, NULL);
-
- }
-
- result = g_dec_instruction_print(instr->cases[i].instrs, buffer, result, output);
-
- }
-
- /* Cas par défaut */
-
- if (instr->def_case != NULL)
- {
- result = g_code_buffer_append_new_line_fixme(buffer);
-
- g_buffer_line_append_text(result, BLC_ASSEMBLY_HEAD, "default", 7, RTT_KEY_WORD, NULL);
- g_buffer_line_append_text(result, BLC_ASSEMBLY_HEAD, ":", 1, RTT_PUNCT, NULL);
-
- result = g_dec_instruction_print(instr->def_case, buffer, result, output);
-
- }
-
- /* Clôture */
-
- g_code_buffer_dec_indentation(buffer);
-
- result = g_code_buffer_append_new_line_fixme(buffer);
-
- g_buffer_line_append_text(result, BLC_ASSEMBLY_HEAD, "}", 1, RTT_HOOK, NULL);
-
- return result;
-
-}
-
-
-/******************************************************************************
-* *
-* Paramètres : instr = instruction à compléter avec un nouveau cas. *
-* value = valeur validant l'exécution des instructions. *
-* instrs = instructions associées au cas présenté. *
-* addr = adresse du bloc d'instructions. *
-* *
-* Description : Ajoute un cas d'exécution à l'aiguillage multiple. *
-* *
-* Retour : - *
-* *
-* Remarques : - *
-* *
-******************************************************************************/
-
-void g_switch_instruction_add_case(GSwitchInstruction *instr, GDecExpression *value, GDecInstruction *instrs, vmpa_t addr)
-{
- case_info *found; /* Cas similaires déjà intégrés*/
-
- found = (case_info *)bsearch(&addr, instr->cases, instr->cases_count, sizeof(case_info),
- (__compar_fn_t)compare_vmpa);
-
- if (found != NULL)
- {
- found->values = (GDecExpression **)realloc(found->values,
- found->values_count++ * sizeof(GDecExpression *));
-
- found->values[found->values_count - 1] = value;
-
- }
- else
- {
- instr->cases = (case_info *)realloc(instr->cases,
- ++instr->cases_count * sizeof(case_info));
-
- instr->cases[instr->cases_count - 1].addr = addr;
- instr->cases[instr->cases_count - 1].values = (GDecExpression **)malloc(sizeof(GDecExpression *));
- instr->cases[instr->cases_count - 1].values_count = 1;
- instr->cases[instr->cases_count - 1].instrs = instrs;
-
- instr->cases[instr->cases_count - 1].values[0] = value;
-
- qsort(instr->cases, instr->cases_count, sizeof(case_info), (__compar_fn_t)compare_vmpa);
-
- }
-
-}
-
-
-/******************************************************************************
-* *
-* Paramètres : instr = instruction à compléter avec un nouveau cas. *
-* instrs = instructions associées au cas présenté. *
-* *
-* Description : Ajoute un cas d'exécution par défaut à l'aiguillage multiple.*
-* *
-* Retour : - *
-* *
-* Remarques : - *
-* *
-******************************************************************************/
-
-void g_switch_instruction_set_default_case(GSwitchInstruction *instr, GDecInstruction *instrs)
-{
- if (instr->def_case != NULL)
- g_object_unref(G_OBJECT(instr->def_case));
-
- instr->def_case = instrs;
-
-}
diff --git a/src/decomp/instr/switch.h b/src/decomp/instr/switch.h
deleted file mode 100644
index 4fe1536..0000000
--- a/src/decomp/instr/switch.h
+++ /dev/null
@@ -1,66 +0,0 @@
-
-/* Chrysalide - Outil d'analyse de fichiers binaires
- * switch.h - prototypes pour les aiguillages multiples du flot d'exécution
- *
- * Copyright (C) 2013 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 _DECOMP_INSTR_SWITCH_H
-#define _DECOMP_INSTR_SWITCH_H
-
-
-#include <glib-object.h>
-
-
-#include "../expression.h"
-#include "../instruction.h"
-
-
-
-#define G_TYPE_SWITCH_INSTRUCTION g_switch_instruction_get_type()
-#define G_SWITCH_INSTRUCTION(obj) (G_TYPE_CHECK_INSTANCE_CAST((obj), g_switch_instruction_get_type(), GSwitchInstruction))
-#define G_IS_SWITCH_INSTRUCTION(obj) (G_TYPE_CHECK_INSTANCE_TYPE((obj), g_switch_instruction_get_type()))
-#define G_SWITCH_INSTRUCTION_CLASS(klass) (G_TYPE_CHECK_CLASS_CAST((klass), G_TYPE_SWITCH_INSTRUCTION, GSwitchInstructionClass))
-#define G_IS_SWITCH_INSTRUCTION_CLASS(klass) (G_TYPE_CHECK_CLASS_TYPE((klass), G_TYPE_SWITCH_INSTRUCTION))
-#define G_SWITCH_INSTRUCTION_GET_CLASS(obj) (G_TYPE_INSTANCE_GET_CLASS((obj), G_TYPE_SWITCH_INSTRUCTION, GSwitchInstructionClass))
-
-
-
-/* Définition d'un aiguillage multiple du flux d'exécution (instance) */
-typedef struct _GSwitchInstruction GSwitchInstruction;
-
-/* Définition d'un aiguillage multiple du flux d'exécution (classe) */
-typedef struct _GSwitchInstructionClass GSwitchInstructionClass;
-
-
-/* Indique le type défini pour un multiple aiguillage du flux d'exécution. */
-GType g_switch_instruction_get_type(void);
-
-/* Exprime un aiguillage multiple du flux selon une valeur. */
-GDecInstruction *g_switch_instruction_new(GDecExpression *);
-
-/* Ajoute un cas d'exécution à l'aiguillage multiple. */
-void g_switch_instruction_add_case(GSwitchInstruction *, GDecExpression *, GDecInstruction *, vmpa_t);
-
-/* Ajoute un cas d'exécution par défaut à l'aiguillage multiple. */
-void g_switch_instruction_set_default_case(GSwitchInstruction *, GDecInstruction *);
-
-
-
-#endif /* _DECOMP_INSTR_SWITCH_H */