/* Chrysalide - Outil d'analyse de fichiers binaires
* fill.c - prise en charge de l'instruction spéciale fill-array-data
*
* Copyright (C) 2011-2012 Cyrille Bagard
*
* This file is part of Chrysalide.
*
* OpenIDA 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.
*
* OpenIDA 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 .
*/
#include "fill.h"
#include
#include
#include "../instruction-int.h"
/* Définition générique d'une instruction d'architecture Dalvik (instance) */
struct _GDalvikFillInstr
{
GDalvikInstruction parent; /* A laisser en premier */
uint16_t array_width; /* Taille des éléments */
uint32_t array_size; /* Taille du tableau */
};
/* Définition générique d'une instruction d'architecture Dalvik (classe) */
struct _GDalvikFillInstrClass
{
GDalvikInstructionClass parent; /* A laisser en premier */
};
/* Initialise la classe générique des instructions. */
static void g_dalvik_fill_instr_class_init(GDalvikFillInstrClass *);
/* Initialise une instance d'opérande d'architecture. */
static void g_dalvik_fill_instr_init(GDalvikFillInstr *);
/* Supprime toutes les références externes. */
static void g_dalvik_fill_instr_dispose(GDalvikFillInstr *);
/* Procède à la libération totale de la mémoire. */
static void g_dalvik_fill_instr_finalize(GDalvikFillInstr *);
/* Ajoute à un tampon GLib le contenu de l'instance spécifiée. */
static void g_dalvik_fill_instr_print(GDalvikFillInstr *, GCodeBuffer *, MemoryDataSize, const bin_t *, AsmSyntax);
/* Indique le type défini pour une pseudo-instruction Dalvik de remplissage. */
G_DEFINE_TYPE(GDalvikFillInstr, g_dalvik_fill_instr, G_TYPE_DALVIK_INSTRUCTION);
/******************************************************************************
* *
* Paramètres : klass = classe à initialiser. *
* *
* Description : Initialise la classe générique des instructions. *
* *
* Retour : - *
* *
* Remarques : - *
* *
******************************************************************************/
static void g_dalvik_fill_instr_class_init(GDalvikFillInstrClass *klass)
{
GObjectClass *object; /* Autre version de la classe */
GArchInstructionClass *instr; /* Encore une autre vision... */
object = G_OBJECT_CLASS(klass);
object->dispose = (GObjectFinalizeFunc/* ! */)g_dalvik_fill_instr_dispose;
object->finalize = (GObjectFinalizeFunc)g_dalvik_fill_instr_finalize;
instr = G_ARCH_INSTRUCTION_CLASS(klass);
//instr->print = (print_instruction_fc)g_dalvik_fill_instr_print;
}
/******************************************************************************
* *
* Paramètres : instr = instance à initialiser. *
* *
* Description : Initialise une instance d'instruction d'architecture. *
* *
* Retour : - *
* *
* Remarques : - *
* *
******************************************************************************/
static void g_dalvik_fill_instr_init(GDalvikFillInstr *instr)
{
G_DALVIK_INSTRUCTION(instr)->keyword = "##fill-array##";
}
/******************************************************************************
* *
* Paramètres : instr = instance d'objet GLib à traiter. *
* *
* Description : Supprime toutes les références externes. *
* *
* Retour : - *
* *
* Remarques : - *
* *
******************************************************************************/
static void g_dalvik_fill_instr_dispose(GDalvikFillInstr *instr)
{
G_OBJECT_CLASS(g_dalvik_fill_instr_parent_class)->dispose(G_OBJECT(instr));
}
/******************************************************************************
* *
* Paramètres : instr = instance d'objet GLib à traiter. *
* *
* Description : Procède à la libération totale de la mémoire. *
* *
* Retour : - *
* *
* Remarques : - *
* *
******************************************************************************/
static void g_dalvik_fill_instr_finalize(GDalvikFillInstr *instr)
{
G_OBJECT_CLASS(g_dalvik_fill_instr_parent_class)->finalize(G_OBJECT(instr));
}
/******************************************************************************
* *
* Paramètres : ident = identifiant de l'instruction déjà lu. *
* content = flux de données à analyser. *
* pos = position courante dans ce flux. [OUT] *
* *
* Description : Crée une pesudo-instruction Dalvik de remplissage. *
* *
* Retour : Instruction mise en place. *
* *
* Remarques : - *
* *
******************************************************************************/
GArchInstruction *g_dalvik_fill_instr_new(uint16_t ident, const GBinContent *content, vmpa2t *pos)
{
GDalvikFillInstr *result; /* Structure à retourner */
phys_t consumed; /* Données consommées */
assert(ident == DPO_FILL_ARRAY_DATA);
result = g_object_new(G_TYPE_DALVIK_FILL_INSTR, NULL);
G_DALVIK_INSTRUCTION(result)->ptype = ident;
if (!g_binary_content_read_u16(content, pos, SRE_LITTLE, &result->array_width))
goto gdfin_bad;
if (!g_binary_content_read_u32(content, pos, SRE_LITTLE, &result->array_size))
goto gdfin_bad;
consumed = result->array_width * result->array_size;
if (!g_binary_content_seek(content, pos, consumed))
goto gdfin_bad;
g_arch_instruction_set_displayed_max_length(G_ARCH_INSTRUCTION(result), 8);
return G_ARCH_INSTRUCTION(result);
gdfin_bad:
g_object_unref(result);
return NULL;
}
/******************************************************************************
* *
* Paramètres : instr = instruction d'assemblage à représenter. *
* buffer = espace où placer ledit contenu. *
* syntax = type de représentation demandée. *
* *
* Description : Ajoute à un tampon GLib le contenu de l'instance spécifiée. *
* *
* Retour : - *
* *
* Remarques : - *
* *
******************************************************************************/
static void g_dalvik_fill_instr_print(GDalvikFillInstr *instr, GCodeBuffer *buffer, MemoryDataSize msize, const bin_t *content, AsmSyntax syntax)
{
GArchInstruction *base; /* Version basique de l'objet */
GBufferLine *line; /* Ligne de destination */
char address[VMPA_MAX_SIZE]; /* Adresse au format texte */
size_t len; /* Taille de l'élément inséré */
char *bin_code; /* Tampon du code binaire */
off_t i; /* Boucle de parcours */
const char *key; /* Mot clef principal */
size_t klen; /* Taille de ce mot clef */
base = G_ARCH_INSTRUCTION(instr);
line = NULL;
#if 0
line = g_code_buffer_append_new_line(buffer, base->address);
/* Adresse virtuelle ou physique */
len = vmpa_to_string(base->address, msize, address);
g_buffer_line_insert_text(line, BLC_PHYSICAL, address, len, RTT_RAW);
/* TODO ... */
/* Code brut */
bin_code = (char *)calloc(3 * 3 + 3, sizeof(char));
for (i = 0; i < 3; i++)
{
if ((i + 1) < 3)
snprintf(&bin_code[i * (2 + 1)], 4, "%02hhx ", content[base->offset + i]);
else
snprintf(&bin_code[i * (2 + 1)], 6, "%02hhx...", content[base->offset + i]);
}
g_buffer_line_insert_text(line, BLC_BINARY,
bin_code, 3 * 3 + 2, RTT_RAW_CODE);
free(bin_code);
#endif
/* Instruction proprement dite */
key = "";
klen = strlen(key);
g_buffer_line_insert_text(line, BLC_ASSEMBLY_HEAD, key, klen, RTT_INSTRUCTION);
}