/* Chrysalide - Outil d'analyse de fichiers binaires
* binportion.c - représentation graphique de portions de binaire
*
* Copyright (C) 2013 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 "gbinportion.h"
#include
#include
#include
#include
#include "../common/extstr.h"
/* ------------------------------- PORTION DE BINAIRE ------------------------------- */
/* Portion de données binaires quelconques (instance) */
struct _GBinPortion
{
GObject parent; /* A laisser en premier */
unsigned int level; /* Profondeur de la portion */
GBinPortion *container; /* Portion parente ou racine */
char *code; /* Code de la couleur de fond */
char *desc; /* Désignation humaine */
mrange_t range; /* Emplacement dans le code */
vmpa2t addr; /* Emplacement dans le code */ /* TODO : clean */
off_t size; /* Taille de la partie */ /* TODO : clean */
PortionAccessRights rights; /* Droits d'accès */
GBinPortion **sub_portions; /* Portions incluses */
size_t sub_count; /* Quantité d'inclusions */
#ifdef DEBUG
unsigned int valid; /* Instructions reconnues */
unsigned int db; /* Instructions non traduites */
#endif
};
/* Portion de données binaires quelconques (classe) */
struct _GBinPortionClass
{
GObjectClass parent; /* A laisser en premier */
};
/* Initialise la classe des blocs de données binaires. */
static void g_binary_portion_class_init(GBinPortionClass *);
/* Initialise une instance de bloc de données binaires. */
static void g_binary_portion_init(GBinPortion *);
/* Supprime toutes les références externes. */
static void g_binary_portion_dispose(GBinPortion *);
/* Procède à la libération totale de la mémoire. */
static void g_binary_portion_finalize(GBinPortion *);
/* Définit le niveau de profondeur pour une branche de portions. */
static void g_binary_portion_set_level(GBinPortion *, unsigned int);
/* Détermine l'aire d'une sous-portion. */
static bool g_binary_portion_compute_sub_area(GBinPortion *, GBinPortion *, const GdkRectangle *, GdkRectangle *);
/* ---------------------------------------------------------------------------------- */
/* PORTION DE BINAIRE */
/* ---------------------------------------------------------------------------------- */
/* Indique le type défini par la GLib pour les blocs de données. */
G_DEFINE_TYPE(GBinPortion, g_binary_portion, G_TYPE_OBJECT);
/******************************************************************************
* *
* Paramètres : klass = classe à initialiser. *
* *
* Description : Initialise la classe des blocs de données binaires. *
* *
* Retour : - *
* *
* Remarques : - *
* *
******************************************************************************/
static void g_binary_portion_class_init(GBinPortionClass *klass)
{
GObjectClass *object; /* Autre version de la classe */
object = G_OBJECT_CLASS(klass);
object->dispose = (GObjectFinalizeFunc/* ! */)g_binary_portion_dispose;
object->finalize = (GObjectFinalizeFunc)g_binary_portion_finalize;
}
/******************************************************************************
* *
* Paramètres : portion = instance à initialiser. *
* *
* Description : Initialise une instance de bloc de données binaires. *
* *
* Retour : - *
* *
* Remarques : - *
* *
******************************************************************************/
static void g_binary_portion_init(GBinPortion *portion)
{
portion->level = 0;
}
/******************************************************************************
* *
* Paramètres : portion = instance d'objet GLib à traiter. *
* *
* Description : Supprime toutes les références externes. *
* *
* Retour : - *
* *
* Remarques : - *
* *
******************************************************************************/
static void g_binary_portion_dispose(GBinPortion *portion)
{
size_t i; /* Boucle de parcours */
for (i = 0; i < portion->sub_count; i++)
g_object_unref(G_OBJECT(portion->sub_portions[i]));
G_OBJECT_CLASS(g_binary_portion_parent_class)->dispose(G_OBJECT(portion));
}
/******************************************************************************
* *
* Paramètres : portion = instance d'objet GLib à traiter. *
* *
* Description : Procède à la libération totale de la mémoire. *
* *
* Retour : - *
* *
* Remarques : - *
* *
******************************************************************************/
static void g_binary_portion_finalize(GBinPortion *portion)
{
free(portion->code);
if (portion->desc != NULL)
free(portion->desc);
if (portion->sub_portions != NULL)
free(portion->sub_portions);
G_OBJECT_CLASS(g_binary_portion_parent_class)->finalize(G_OBJECT(portion));
}
/******************************************************************************
* *
* Paramètres : code = désignation humaine de la couleur de fond. *
* *
* Description : Crée une description de partie de code vierge. *
* *
* Retour : - *
* *
* Remarques : - *
* *
******************************************************************************/
GBinPortion *g_binary_portion_new(const char *code)
{
GBinPortion *result; /* Structure à retourner */
result = g_object_new(G_TYPE_BIN_PORTION, NULL);
result->code = strdup(code);
return result;
}
/******************************************************************************
* *
* Paramètres : a = premières informations à consulter. *
* b = secondes informations à consulter. *
* *
* Description : Etablit la comparaison ascendante entre deux portions. *
* *
* Retour : Bilan : -1 (a < b), 0 (a == b) ou 1 (a > b). *
* *
* Remarques : - *
* *
******************************************************************************/
int g_binary_portion_compare(const GBinPortion **a, const GBinPortion **b)
{
int result; /* Bilan à retourner */
if ((*a)->level < (*b)->level)
result = -1;
else if ((*a)->level > (*b)->level)
result = 1;
else
result = cmp_mrange(&(*a)->range, &(*b)->range);
return result;
}
/******************************************************************************
* *
* Paramètres : portion = description de partie à mettre à jour. *
* desc = nom à donner à la partie. *
* *
* Description : Attribue une description humaine à une partie de code. *
* *
* Retour : - *
* *
* Remarques : - *
* *
******************************************************************************/
void g_binary_portion_set_desc(GBinPortion *portion, const char *desc)
{
if (portion->desc != NULL) free(portion->desc);
portion->desc = strdup(desc);
}
/******************************************************************************
* *
* Paramètres : portion = description de partie à consulter. *
* *
* Description : Fournit la description attribuée à une partie de code. *
* *
* Retour : Nom donné à la partie. *
* *
* Remarques : - *
* *
******************************************************************************/
const char *g_binary_portion_get_desc(const GBinPortion *portion)
{
return portion->desc;
}
/******************************************************************************
* *
* Paramètres : portion = description de partie à mettre à jour. *
* addr = emplacement de la section à conserver. *
* size = taille de la section à conserver. *
* *
* Description : Définit les valeurs utiles d'une partie de code binaire. *
* *
* Retour : - *
* *
* Remarques : - *
* *
******************************************************************************/
void g_binary_portion_set_values(GBinPortion *portion, const vmpa2t *addr, phys_t size)
{
copy_vmpa(&portion->addr, addr);
portion->size = size;
init_mrange(&portion->range, addr, size);
}
/******************************************************************************
* *
* Paramètres : portion = description de partie à mettre à jour. *
* *
* Description : Fournit l'emplacement d'une partie de code binaire. *
* *
* Retour : - *
* *
* Remarques : - *
* *
******************************************************************************/
const mrange_t *g_binary_portion_get_range(const GBinPortion *portion)
{
return &portion->range;
}
/******************************************************************************
* *
* Paramètres : portion = description de partie à mettre à jour. *
* rights = droits d'accès de la partie. *
* *
* Description : Définit les droits associés à une partie de code. *
* *
* Retour : - *
* *
* Remarques : - *
* *
******************************************************************************/
void g_binary_portion_set_rights(GBinPortion *portion, PortionAccessRights rights)
{
portion->rights = rights;
}
/******************************************************************************
* *
* Paramètres : portion = description de partie à consulter. *
* *
* Description : Fournit les droits associés à une partie de code. *
* *
* Retour : Droits d'accès de la partie. *
* *
* Remarques : - *
* *
******************************************************************************/
PortionAccessRights g_binary_portion_get_rights(const GBinPortion *portion)
{
return portion->rights;
}
/******************************************************************************
* *
* Paramètres : portion = description de partie à mettre à jour. *
* sub = portion à inclure dans la définition courante. *
* *
* Description : Procède à l'inclusion d'une portion dans une autre. *
* *
* Retour : - *
* *
* Remarques : - *
* *
******************************************************************************/
void g_binary_portion_include(GBinPortion *portion, GBinPortion *sub)
{
portion->sub_portions = (GBinPortion **)realloc(portion->sub_portions,
++portion->sub_count * sizeof(GBinPortion *));
portion->sub_portions[portion->sub_count - 1] = sub;
g_binary_portion_set_level(sub, portion->level + 1);
}
/******************************************************************************
* *
* Paramètres : portion = description de partie à mettre à jour. *
* level = niveau de profondeur à associer. *
* *
* Description : Définit le niveau de profondeur pour une branche de portions.*
* *
* Retour : - *
* *
* Remarques : - *
* *
******************************************************************************/
static void g_binary_portion_set_level(GBinPortion *portion, unsigned int level)
{
size_t i; /* Boucle de parcours */
portion->level = level;
for (i = 0; i < portion->sub_count; i++)
g_binary_portion_set_level(portion->sub_portions[i], level + 1);
}
/******************************************************************************
* *
* Paramètres : portion = description de partie à mettre à jour. *
* *
* Description : Indique le niveau de profondeur d'une portion donnée. *
* *
* Retour : Niveau de profondeur positif ou nul. *
* *
* Remarques : - *
* *
******************************************************************************/
unsigned int g_binary_portion_get_level(GBinPortion *portion)
{
return portion->level;
}
/******************************************************************************
* *
* Paramètres : portion = portion mère à consulter. *
* sub = portion fille à traiter. *
* area = étendue de représentation de la portion mère. *
* sub_area = étendue de représentation de la portion fille. *
* *
* Description : Détermine l'aire d'une sous-portion. *
* *
* Retour : true si la sous-surface a été calculée correctement. *
* *
* Remarques : - *
* *
******************************************************************************/
static bool g_binary_portion_compute_sub_area(GBinPortion *portion, GBinPortion *sub, const GdkRectangle *area, GdkRectangle *sub_area)
{
/* On saute les portions comme le segment GNU_STACK... */
if (sub->size == 0) return false;
sub_area->y = area->y;
sub_area->height = area->height;
sub_area->x = area->x + (get_phy_addr(&sub->addr) * area->width) / portion->size;
sub_area->width = (sub->size * area->width) / portion->size;
return true;
}
/******************************************************************************
* *
* Paramètres : portion = première portion amorçant la visite. *
* visitor = fonction à appeler à chaque étape de la descente. *
* data = adresse pointant vers des données de l'utilisateur.*
* *
* Description : Parcours un ensemble de portions binaires. *
* *
* Retour : true si la visite a été jusqu'à son terme, false sinon. *
* *
* Remarques : - *
* *
******************************************************************************/
bool g_binary_portion_visit(GBinPortion *portion, visit_portion_fc visitor, void *data)
{
bool result; /* Etat à retourner */
size_t i; /* Boucle de parcours */
result = visitor(portion, data);
for (i = 0; i < portion->sub_count && result; i++)
result = g_binary_portion_visit(portion->sub_portions[i], visitor, data);
return result;
}
/******************************************************************************
* *
* Paramètres : portion = description de partie à mettre à jour. *
* x = abscisse du point de recherche. *
* y = ordonnée du point de recherche. *
* area = étendue de portion mère, puis celle trouvée. [OUT] *
* *
* Description : Recherche la portion présente à un point donné. *
* *
* Retour : Portion trouvée à l'endroit indiqué. *
* *
* Remarques : - *
* *
******************************************************************************/
GBinPortion *g_binary_portion_find_at_pos(GBinPortion *portion, gint x, GdkRectangle *area)
{
GBinPortion *result; /* Portion à retourner */
size_t i; /* Boucle de parcours */
GBinPortion *sub; /* Portion incluse à traiter */
GdkRectangle sub_area; /* Etendue d'une sous-portion */
result = NULL;
for (i = 0; i < portion->sub_count && !result; i++)
{
sub = portion->sub_portions[i];
if (!g_binary_portion_compute_sub_area(portion, sub, area, &sub_area))
continue;
if (sub_area.x <= x && x < (sub_area.x + sub_area.width))
{
result = sub;
*area = sub_area;
}
}
if (result == NULL)
result = portion;
return result;
}
/******************************************************************************
* *
* Paramètres : portion = description de partie à mettre à jour. *
* addr = adresse du point de recherche. *
* area = étendue de portion mère, puis celle trouvée. [OUT] *
* *
* Description : Recherche la portion présente à une adresse donnée. *
* *
* Retour : Portion trouvée à l'endroit indiqué. *
* *
* Remarques : - *
* *
******************************************************************************/
GBinPortion *g_binary_portion_find_at_addr(GBinPortion *portion, const vmpa2t *addr, GdkRectangle *area)
{
GBinPortion *result; /* Portion à retourner */
size_t i; /* Boucle de parcours #1 */
GBinPortion *sub; /* Portion incluse à traiter */
GdkRectangle sub_area; /* Etendue d'une sous-portion */
size_t j; /* Boucle de parcours #2 */
result = NULL;
for (i = 0; i < portion->sub_count && result == NULL; i++)
{
sub = portion->sub_portions[i];
/* FIXME : cmp ? */
/* Portion non allouée en mémoire -> adresse nulle ; on écarte */
if (get_virt_addr(&sub->addr) == 0)
continue;
if (get_virt_addr(addr) < get_virt_addr(&sub->addr)
|| get_virt_addr(addr) >= (get_virt_addr(&sub->addr) + sub->size))
continue;
if (!g_binary_portion_compute_sub_area(portion, sub, area, &sub_area))
continue;
for (j = 0; j < sub->sub_count && !result; j++)
result = g_binary_portion_find_at_addr(sub->sub_portions[j], addr, &sub_area);
if (result == NULL)
{
result = sub;
*area = sub_area;
}
}
if (result == NULL)
result = portion;
return result;
}
/******************************************************************************
* *
* Paramètres : portion = description de partie à mettre à jour. *
* x = abscisse du point de recherche. *
* area = étendue de représentation de la portion mère. *
* addr = adresse correspondante. [OUT] *
* *
* Description : Fournit la position correspondant à une adresse donnée. *
* *
* Retour : Succès de la traduction. *
* *
* Remarques : - *
* *
******************************************************************************/
bool g_binary_portion_get_addr_from_pos(GBinPortion *portion, gint x, const GdkRectangle *area, vmpa2t *addr)
{
GdkRectangle owner_area; /* Aire de contenance */
GBinPortion *owner; /* Conteneur propriétaire */
owner_area = *area;
owner = g_binary_portion_find_at_pos(portion, x, &owner_area);
if (owner == NULL) return false;
copy_vmpa(addr, &owner->addr);
advance_vmpa(addr, (owner->size * (x - owner_area.x)) / owner_area.width);
return true;
}
/******************************************************************************
* *
* Paramètres : portion = description de partie à mettre à jour. *
* addr = adresse du point de recherche. *
* area = étendue de représentation de la portion mère. *
* x = position correspondante. [OUT] *
* *
* Description : Fournit l'adresse correspondant à une position donnée. *
* *
* Retour : Succès de la traduction. *
* *
* Remarques : - *
* *
******************************************************************************/
bool g_binary_portion_get_pos_from_addr(GBinPortion *portion, const vmpa2t *addr, const GdkRectangle *area, gint *x)
{
GdkRectangle owner_area; /* Aire de contenance */
GBinPortion *owner; /* Conteneur propriétaire */
off_t diff; /* Décallage à appliquer */
owner_area = *area;
owner = g_binary_portion_find_at_addr(portion, addr, &owner_area);
if (owner == NULL) return false;
diff = compute_vmpa_diff(addr, &owner->addr);
*x = owner_area.x + (diff * owner_area.width) / owner->size;
return true;
}
/******************************************************************************
* *
* Paramètres : portion = description de partie à consulter. *
* buffer = espace où placer ledit contenu. *
* msize = taille idéale des positions et adresses; *
* *
* Description : Insère dans un tampon une description de portion. *
* *
* Retour : - *
* *
* Remarques : - *
* *
******************************************************************************/
void g_binary_portion_print(const GBinPortion *portion, GCodeBuffer *buffer, MemoryDataSize msize)
{
mrange_t range; /* Couverture à fournir */
GBufferLine *line; /* Nouvelle ligne à éditer */
char rights[64]; /* Traduction en texte */
/* On ne traite pas les portions anonymes ! */
if (portion->desc == NULL) return;
init_mrange(&range, get_mrange_addr(&portion->range), 0);
line = g_code_buffer_append_new_line(buffer, &range);
g_buffer_line_fill_mrange(line, msize, msize);
g_buffer_line_add_flag(line, BLF_WIDTH_MANAGER);
/* Séparation */
line = g_code_buffer_append_new_line(buffer, &range);
g_buffer_line_fill_mrange(line, msize, msize);
g_buffer_line_start_merge_at(line, BLC_ASSEMBLY_HEAD);
g_buffer_line_insert_text(line, BLC_ASSEMBLY_HEAD,
"; ======================================================", 56, RTT_COMMENT);
/* Retour à la ligne */
line = g_code_buffer_append_new_line(buffer, &range);
g_buffer_line_fill_mrange(line, msize, msize);
g_buffer_line_start_merge_at(line, BLC_ASSEMBLY_HEAD);
g_buffer_line_insert_text(line, BLC_ASSEMBLY_HEAD, "; ", 2, RTT_COMMENT);
/* Description */
line = g_code_buffer_append_new_line(buffer, &range);
g_buffer_line_fill_mrange(line, msize, msize);
g_buffer_line_start_merge_at(line, BLC_ASSEMBLY_HEAD);
g_buffer_line_insert_text(line, BLC_ASSEMBLY_HEAD, "; ", 2, RTT_COMMENT);
g_buffer_line_insert_text(line, BLC_ASSEMBLY_HEAD, portion->desc, strlen(portion->desc), RTT_COMMENT);
snprintf(rights, sizeof(rights), " (%s%s%s%s)",
_("rights: "),
portion->rights & PAC_READ ? "r" : "-",
portion->rights & PAC_WRITE ? "w" : "-",
portion->rights & PAC_EXEC ? "x" : "-");
g_buffer_line_insert_text(line, BLC_ASSEMBLY_HEAD, rights, strlen(rights), RTT_COMMENT);
/* Retour à la ligne */
line = g_code_buffer_append_new_line(buffer, &range);
g_buffer_line_fill_mrange(line, msize, msize);
g_buffer_line_start_merge_at(line, BLC_ASSEMBLY_HEAD);
g_buffer_line_insert_text(line, BLC_ASSEMBLY_HEAD, "; ", 2, RTT_COMMENT);
line = g_code_buffer_append_new_line(buffer, &range);
g_buffer_line_fill_mrange(line, msize, msize);
}
/******************************************************************************
* *
* Paramètres : portion = description de partie à mettre à jour. *
* x = abscisse du point de recherche. *
* y = ordonnée du point de recherche. *
* area = étendue de représentation de la portion mère. *
* tooltip = astuce à compléter. [OUT] *
* *
* Description : Prépare une astuce concernant une portion pour son affichage.*
* *
* Retour : TRUE pour valider l'affichage. *
* *
* Remarques : - *
* *
******************************************************************************/
gboolean g_binary_portion_query_tooltip(GBinPortion *portion, gint x, gint y, const GdkRectangle *area, GtkTooltip *tooltip)
{
GBinPortion *selected; /* Portion à décrire ici */
char *markup; /* Description à construire */
GBinPortion *iter; /* Remontée hiérarchique */
char value[2 * VMPA_MAX_SIZE]; /* Traduction en texte */
selected = g_binary_portion_find_at_pos(portion, x, (GdkRectangle []) { *area });
/* Nom */
if (selected->desc != NULL)
{
markup = strdup("");
markup = stradd(markup, selected->desc);
markup = stradd(markup, "\n");
for (iter = selected->container; iter != NULL; iter = iter->container)
if (iter->desc != NULL)
{
markup = stradd(markup, selected->desc);
markup = stradd(markup, "\n");
}
markup = stradd(markup, "\n");
}
else markup = strdup("");
markup = stradd(markup, "taille : ");
snprintf(value, 2 * VMPA_MAX_SIZE, OFF_FMT, OFF_CAST(selected->size));
markup = stradd(markup, value);
markup = stradd(markup, "\n");
/* Localisation */
markup = stradd(markup, "");
markup = stradd(markup, _("Localisation"));
markup = stradd(markup, "\n");
markup = stradd(markup, _("physical: from "));
snprintf(value, 2 * VMPA_MAX_SIZE, OFF_FMT, OFF_CAST(get_phy_addr(&selected->addr)));
markup = stradd(markup, value);
markup = stradd(markup, _(" to "));
snprintf(value, 2 * VMPA_MAX_SIZE, OFF_FMT, OFF_CAST(get_phy_addr(&selected->addr) + selected->size));
markup = stradd(markup, value);
markup = stradd(markup, "\n");
markup = stradd(markup, _("memory: from "));
#if 0
snprintf(value, 2 * VMPA_MAX_SIZE, VMPA_FMT_LONG, VMPA_CAST(selected->addr));
markup = stradd(markup, value);
markup = stradd(markup, _(" to "));
snprintf(value, 2 * VMPA_MAX_SIZE, VMPA_FMT_LONG, VMPA_CAST(selected->addr + selected->size));
markup = stradd(markup, value);
#endif
markup = stradd(markup, "\n\n");
/* Droits d'accès */
markup = stradd(markup, "");
markup = stradd(markup, _("Rights"));
markup = stradd(markup, "\n");
snprintf(value, 2 * VMPA_MAX_SIZE, "%s%s%s",
selected->rights & PAC_READ ? "r" : "-",
selected->rights & PAC_WRITE ? "w" : "-",
selected->rights & PAC_EXEC ? "x" : "-");
markup = stradd(markup, value);
/* Impression finale */
gtk_tooltip_set_markup(tooltip, markup);
free(markup);
return TRUE;
}
/******************************************************************************
* *
* Paramètres : portion = description de partie à consulter. *
* cr = contexte graphique pour le dessin. *
* area = étendue mise à disposition. *
* *
* Description : Représente la portion sur une bande dédiée. *
* *
* Retour : - *
* *
* Remarques : - *
* *
******************************************************************************/
void g_binary_portion_draw(GBinPortion *portion, GtkStyleContext *context, cairo_t *cr, const GdkRectangle *area)
{
size_t i; /* Boucle de parcours */
GBinPortion *sub; /* Portion incluse à montrer */
GdkRectangle sub_area; /* Etendue d'une sous-portion */
/* Dessin de la portion courante */
//cairo_set_line_width(cr, 1.0);
cairo_set_antialias(cr, CAIRO_ANTIALIAS_NONE);
gtk_style_context_save(context);
gtk_style_context_add_class(context, portion->code);
gtk_render_background(context, cr, area->x, area->y, area->width, area->height);
gtk_render_frame(context, cr, area->x, area->y, area->width, area->height);
gtk_style_context_restore(context);
/* Dessin des portions incluses */
sub_area.y = area->y;
sub_area.height = area->height;
for (i = 0; i < portion->sub_count; i++)
{
sub = portion->sub_portions[i];
if (!g_binary_portion_compute_sub_area(portion, sub, area, &sub_area))
continue;
g_binary_portion_draw(sub, context, cr, &sub_area);
}
}