/* Chrysalide - Outil d'analyse de fichiers binaires
* raw.c - instructions pures vues de l'esprit
*
* Copyright (C) 2014-2025 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 .
*/
#include "raw.h"
#include
#include
#include
#include "raw-int.h"
#include "../operands/immediate.h"
//#include "../operands/target.h" // FIXME
/* --------------------- INSTRUCTION AVEC JEU DE DONNEES BRUTES --------------------- */
/* Initialise la classe des instructions brutes d'architecture. */
static void g_raw_instruction_class_init(GRawInstructionClass *);
/* Initialise une instance d'instruction brute d'architecture. */
static void g_raw_instruction_init(GRawInstruction *);
/* Supprime toutes les références externes. */
static void g_raw_instruction_dispose(GObject *);
/* Procède à la libération totale de la mémoire. */
static void g_raw_instruction_finalize(GObject *);
/* --------------------- IMPLEMENTATION DES FONCTIONS DE CLASSE --------------------- */
/* Indique l'encodage d'une instruction de façon détaillée. */
static char *g_raw_instruction_get_encoding(const GArchInstruction *);
/* Fournit le nom humain de l'instruction manipulée. */
static char *g_raw_instruction_get_keyword(const GArchInstruction *);
/* ---------------------------------------------------------------------------------- */
/* INSTRUCTION AVEC JEU DE DONNEES BRUTES */
/* ---------------------------------------------------------------------------------- */
/* Indique le type défini pour une instruction inconnue d'architecture. */
G_DEFINE_TYPE(GRawInstruction, g_raw_instruction, G_TYPE_ARCH_INSTRUCTION);
/******************************************************************************
* *
* Paramètres : klass = classe à initialiser. *
* *
* Description : Initialise la classe des instructions brutes d'architecture. *
* *
* Retour : - *
* *
* Remarques : - *
* *
******************************************************************************/
static void g_raw_instruction_class_init(GRawInstructionClass *klass)
{
GObjectClass *object; /* Autre version de la classe */
GArchInstructionClass *instr; /* Encore une autre vision... */
object = G_OBJECT_CLASS(klass);
object->dispose = g_raw_instruction_dispose;
object->finalize = g_raw_instruction_finalize;
instr = G_ARCH_INSTRUCTION_CLASS(klass);
instr->get_encoding = g_raw_instruction_get_encoding;
instr->get_keyword = g_raw_instruction_get_keyword;
}
/******************************************************************************
* *
* Paramètres : instr = instance à initialiser. *
* *
* Description : Initialise une instance d'instruction brute d'architecture. *
* *
* Retour : - *
* *
* Remarques : - *
* *
******************************************************************************/
static void g_raw_instruction_init(GRawInstruction *instr)
{
}
/******************************************************************************
* *
* Paramètres : object = instance d'objet GLib à traiter. *
* *
* Description : Supprime toutes les références externes. *
* *
* Retour : - *
* *
* Remarques : - *
* *
******************************************************************************/
static void g_raw_instruction_dispose(GObject *object)
{
G_OBJECT_CLASS(g_raw_instruction_parent_class)->dispose(object);
}
/******************************************************************************
* *
* Paramètres : object = instance d'objet GLib à traiter. *
* *
* Description : Procède à la libération totale de la mémoire. *
* *
* Retour : - *
* *
* Remarques : - *
* *
******************************************************************************/
static void g_raw_instruction_finalize(GObject *object)
{
G_OBJECT_CLASS(g_raw_instruction_parent_class)->finalize(object);
}
/******************************************************************************
* *
* 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. *
* *
* Description : Crée une instruction de type 'db/dw/etc' simple. *
* *
* Retour : Instruction mise en place. *
* *
* Remarques : - *
* *
******************************************************************************/
GArchInstruction *g_raw_instruction_new_from_value(GBinaryPortion *area, const vmpa2t *addr, MemoryDataSize size, uint64_t value)
{
GArchInstruction *result; /* Instruction à retourner */
result = g_object_new(G_TYPE_RAW_INSTRUCTION, NULL);
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_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:
length = 1;
break;
case MDS_16_BITS_UNSIGNED:
case MDS_16_BITS_SIGNED:
length = 2;
break;
case MDS_32_BITS_UNSIGNED:
case MDS_32_BITS_SIGNED:
length = 4;
break;
case MDS_64_BITS_UNSIGNED:
case MDS_64_BITS_SIGNED:
length = 8;
break;
default:
assert(false);
goto exit;
break;
}
g_arch_instruction_compute_range(G_ARCH_INSTRUCTION(instr), area, addr, length);
result = true;
exit:
return result;
}
/******************************************************************************
* *
* 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' étendue. *
* *
* Retour : Instruction mise en place. *
* *
* Remarques : - *
* *
******************************************************************************/
GArchInstruction *g_raw_instruction_new_array(GBinaryPortion *area, vmpa2t *addr, MemoryDataSize size, const GBinContent *content, size_t count, SourceEndian endian)
{
GArchInstruction *result; /* Instruction à retourner */
result = g_object_new(G_TYPE_RAW_INSTRUCTION, NULL);
if (!g_raw_instruction_create_array(G_RAW_INSTRUCTION(result), area, addr, size, content, count, endian))
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. *
* content = flux de données à analyser. *
* count = nombre de ces éléments. *
* endian = ordre des bits dans la source. *
* *
* Description : Met en place une instruction de type 'db/dw/etc' étendue. *
* *
* Retour : Bilan de l'opération. *
* *
* Remarques : - *
* *
******************************************************************************/
bool g_raw_instruction_create_array(GRawInstruction *instr, GBinaryPortion *area, vmpa2t *addr, MemoryDataSize size, const GBinContent *content, size_t count, SourceEndian endian)
{
bool result; /* Bilan à retourner */
vmpa2t start; /* Sauvegarde de la position */
size_t i; /* Boucle de parcours */
GArchOperand *operand; /* Octet non décodé à afficher */
phys_t diff; /* Décalage à appliquer */
result = false;
/* Par soucis de cohérence */
if (count == 0)
goto exit;
copy_vmpa(&start, addr);
g_thick_object_lock(G_THICK_OBJECT(instr));
for (i = 0; i < count; i++)
{
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_operand(G_ARCH_INSTRUCTION(instr), operand);
unref_object(operand);
}
g_thick_object_unlock(G_THICK_OBJECT(instr));
if (i < count)
goto exit;
diff = compute_vmpa_diff(addr, &start);
g_arch_instruction_compute_range(G_ARCH_INSTRUCTION(instr), area, &start, diff);
result = true;
exit:
return result;
}
/******************************************************************************
* *
* 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);
}
/******************************************************************************
* *
* Paramètres : instr = instruction à traiter. *
* is_padding = nouveau statut à associer au contenu. *
* *
* Description : Indique si le contenu de l'instruction est du bourrage. *
* *
* Retour : Statut du contenu de l'instruction. *
* *
* Remarques : - *
* *
******************************************************************************/
bool g_raw_instruction_is_padding(const GRawInstruction *instr)
{
bool result; /* Indication à retourner */
result = g_arch_instruction_has_flag(G_ARCH_INSTRUCTION(instr), RIF_PADDING);
return result;
}
/******************************************************************************
* *
* 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 : - *
* *
******************************************************************************/
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);
}
/******************************************************************************
* *
* 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 : - *
* *
******************************************************************************/
bool g_raw_instruction_is_string(const GRawInstruction *instr)
{
bool result; /* Indication à retourner */
result = g_arch_instruction_has_flag(G_ARCH_INSTRUCTION(instr), RIF_STRING);
return result;
}
/* ---------------------------------------------------------------------------------- */
/* IMPLEMENTATION DES FONCTIONS DE CLASSE */
/* ---------------------------------------------------------------------------------- */
/******************************************************************************
* *
* Paramètres : instr = instruction quelconque à consulter. *
* *
* Description : Indique l'encodage d'une instruction de façon détaillée. *
* *
* Retour : Description humaine de l'encodage utilisé. *
* *
* Remarques : - *
* *
******************************************************************************/
static char *g_raw_instruction_get_encoding(const GArchInstruction *instr)
{
char *result; /* Description à retourner */
GRawInstruction *raw; /* Version spécialisée */
raw = G_RAW_INSTRUCTION(instr);
if (g_raw_instruction_is_string(raw))
result = strdup(_("String"));
else
result = strdup(_("Raw"));
return result;
}
/******************************************************************************
* *
* Paramètres : instr = instruction d'assemblage à consulter. *
* *
* Description : Fournit le nom humain de l'instruction manipulée. *
* *
* Retour : Mot clef de bas niveau. *
* *
* Remarques : - *
* *
******************************************************************************/
static char *g_raw_instruction_get_keyword(const GArchInstruction *instr)
{
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" };
g_thick_object_lock(G_THICK_OBJECT(instr));
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));
unref_object(operand);
g_thick_object_unlock(G_THICK_OBJECT(instr));
result = strdup(defines[MDS_RANGE(size)]);
return result;
}