/* 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. * * 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 . */ #include "gbinportion.h" #include #include #include #include #include #include "../common/extstr.h" #include "../common/sort.h" /* ------------------------------- PORTION DE BINAIRE ------------------------------- */ /* Portion de données binaires quelconques (instance) */ struct _GBinPortion { GObject parent; /* A laisser en premier */ char *code; /* Code de la couleur de fond */ char *desc; /* Désignation humaine */ mrange_t range; /* Emplacement dans le code */ PortionAccessRights rights; /* Droits d'accès */ GBinPortion **subs; /* Portions incluses */ size_t count; /* Quantité d'inclusions */ }; /* Portion de données binaires quelconques (classe) */ struct _GBinPortionClass { GObjectClass parent; /* A laisser en premier */ }; /* Initialise la classe des portions de données binaires. */ static void g_binary_portion_class_init(GBinPortionClass *); /* Initialise une instance de portion 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étermine l'aire d'une sous-portion. */ static bool g_binary_portion_compute_sub_area(const GBinPortion *, phys_t, const GdkRectangle *, GdkRectangle *); /* ------------------------ PARCOURS D'ENSEMBLES DE PORTIONS ------------------------ */ /* Détermine si une portion contient une adresse donnée. */ static bool g_portion_layer_contains_addr(const GBinPortion *, const vmpa2t *); /* ---------------------------------------------------------------------------------- */ /* PORTION DE BINAIRE */ /* ---------------------------------------------------------------------------------- */ /* Indique le type défini par la GLib pour les portions de données binaires. */ G_DEFINE_TYPE(GBinPortion, g_binary_portion, G_TYPE_OBJECT); /****************************************************************************** * * * Paramètres : klass = classe à initialiser. * * * * Description : Initialise la classe des portions 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 portion de données binaires. * * * * Retour : - * * * * Remarques : - * * * ******************************************************************************/ static void g_binary_portion_init(GBinPortion *portion) { } /****************************************************************************** * * * 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) { 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); G_OBJECT_CLASS(g_binary_portion_parent_class)->finalize(G_OBJECT(portion)); } /****************************************************************************** * * * Paramètres : code = désignation humaine de la couleur de fond. * * addr = emplacement de la section à conserver. * * size = taille de la section à conserver. * * * * Description : Crée une description de partie de code vierge. * * * * Retour : Instance mise en place. * * * * Remarques : - * * * ******************************************************************************/ GBinPortion *g_binary_portion_new(const char *code, const vmpa2t *addr, phys_t size) { GBinPortion *result; /* Structure à retourner */ result = g_object_new(G_TYPE_BIN_PORTION, NULL); result->code = strdup(code); init_mrange(&result->range, addr, size); 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 */ const vmpa2t *addr_a; /* Adresse de la portion 'a' */ const vmpa2t *addr_b; /* Adresse de la portion 'b' */ addr_a = get_mrange_addr(&(*a)->range); addr_b = get_mrange_addr(&(*b)->range); result = cmp_vmpa(addr_a, addr_b); 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. * * * * 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 à 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_prepare_new_line(buffer, &range); g_buffer_line_fill_mrange(line, msize, msize); g_buffer_line_add_flag(line, BLF_WIDTH_MANAGER); g_code_buffer_append_new_line(buffer, line); /* Séparation */ line = g_code_buffer_prepare_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_append_text(line, BLC_ASSEMBLY_HEAD, "; ======================================================", 56, RTT_COMMENT, NULL); g_code_buffer_append_new_line(buffer, line); /* Retour à la ligne */ line = g_code_buffer_prepare_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_append_text(line, BLC_ASSEMBLY_HEAD, "; ", 2, RTT_COMMENT, NULL); g_code_buffer_append_new_line(buffer, line); /* Description */ line = g_code_buffer_prepare_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_append_text(line, BLC_ASSEMBLY_HEAD, "; ", 2, RTT_COMMENT, NULL); g_buffer_line_append_text(line, BLC_ASSEMBLY_HEAD, portion->desc, strlen(portion->desc), RTT_COMMENT, NULL); 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_append_text(line, BLC_ASSEMBLY_HEAD, rights, strlen(rights), RTT_COMMENT, NULL); g_code_buffer_append_new_line(buffer, line); /* Retour à la ligne */ line = g_code_buffer_prepare_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_append_text(line, BLC_ASSEMBLY_HEAD, "; ", 2, RTT_COMMENT, NULL); g_code_buffer_append_new_line(buffer, line); line = g_code_buffer_prepare_new_line(buffer, &range); g_buffer_line_fill_mrange(line, msize, msize); g_code_buffer_append_new_line(buffer, line); } /****************************************************************************** * * * Paramètres : portion = description de partie à mettre à jour. * * tooltip = astuce à compléter. [OUT] * * * * Description : Prépare une astuce concernant une portion pour son affichage.* * * * Retour : - * * * * Remarques : - * * * ******************************************************************************/ void g_binary_portion_query_tooltip(GBinPortion *portion, GtkTooltip *tooltip) { char *markup; /* Description à construire */ VMPA_BUFFER(value); /* Traduction en texte */ /* Nom */ if (portion->desc != NULL) { markup = strdup(""); markup = stradd(markup, portion->desc); markup = stradd(markup, "\n"); markup = stradd(markup, "\n"); } else markup = strdup(""); markup = stradd(markup, "taille : "); mrange_length_to_string(&portion->range, MDS_UNDEFINED, value, NULL); 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 ")); mrange_phys_to_string(&portion->range, MDS_UNDEFINED, true, value, NULL); markup = stradd(markup, value); markup = stradd(markup, _(" to ")); mrange_phys_to_string(&portion->range, MDS_UNDEFINED, false, value, NULL); markup = stradd(markup, value); markup = stradd(markup, "\n"); markup = stradd(markup, _("memory: from ")); mrange_virt_to_string(&portion->range, MDS_UNDEFINED, true, value, NULL); markup = stradd(markup, value); markup = stradd(markup, _(" to ")); mrange_virt_to_string(&portion->range, MDS_UNDEFINED, false, value, NULL); markup = stradd(markup, value); 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", portion->rights & PAC_READ ? "r" : "-", portion->rights & PAC_WRITE ? "w" : "-", portion->rights & PAC_EXEC ? "x" : "-"); markup = stradd(markup, value); /* Impression finale */ gtk_tooltip_set_markup(tooltip, markup); free(markup); } /****************************************************************************** * * * Paramètres : portion = portion mère à consulter. * * full = taille totale de la couche parente. * * 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(const GBinPortion *portion, phys_t full, const GdkRectangle *area, GdkRectangle *sub_area) { phys_t length; /* Taille de la portion */ phys_t start; /* Position de départ */ length = get_mrange_length(&portion->range); /* On saute les portions comme le segment GNU_STACK... */ if (length == 0) return false; start = get_phy_addr(get_mrange_addr(&portion->range)); sub_area->y = area->y; sub_area->height = area->height; sub_area->x = area->x + (start * area->width) / full; sub_area->width = (length * area->width) / full; return true; } /****************************************************************************** * * * Paramètres : portion = description de partie à consulter. * * context = contexte graphique associé à la procédure. * * 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(const GBinPortion *portion, GtkStyleContext *context, cairo_t *cr, const GdkRectangle *area) { phys_t full; /* Espace total représenté */ 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_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 contenues */ full = get_mrange_length(&portion->range); for (i = 0; i < portion->count; i++) { sub = portion->subs[i]; if (!g_binary_portion_compute_sub_area(sub, full, area, &sub_area)) continue; g_binary_portion_draw(sub, context, cr, &sub_area); } } /****************************************************************************** * * * Paramètres : portion = portion principale à compléter. * * 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) { bool found; /* Zone d'accueil trouvée ? */ size_t best; /* Meilleur point d'insertion */ const mrange_t *prange; /* Emplacement de portion #1 */ const mrange_t *srange; /* Emplacement de portion #2 */ GBinPortion tmp; /* Sauvegarde temporaire */ found = bsearch_index(sub, portion->subs, portion->count, sizeof(GBinPortion *), (__compar_fn_t)g_binary_portion_compare, &best); if (!found) portion->subs = qinsert(portion->subs, &portion->count, sizeof(GBinPortion *), (__compar_fn_t)g_binary_portion_compare, &sub); else { /** * On prend ici en compte le genre de situations suivantes : * * [21] .bss NOBITS 00088240 07823c 0018c8 00 WA 0 0 8 * [22] __libc_freeres_ptrs NOBITS 00089b08 07823c 000018 00 WA 0 0 4 * [23] .comment PROGBITS 00000000 07823c 000022 01 MS 0 0 1 * * Pendant le désassemblage, la procédure n'aime pas trop les intersections * de zones mémoire. */ prange = g_binary_portion_get_range(portion->subs[best]); srange = g_binary_portion_get_range(sub); if (mrange_contains_mrange(prange, srange)) g_binary_portion_include(portion->subs[best], sub); else { assert(mrange_contains_mrange(srange, prange)); memcpy(&tmp, portion->subs[best], sizeof(GBinPortion)); memcpy(portion->subs[best], sub, sizeof(GBinPortion)); memcpy(sub, &tmp, sizeof(GBinPortion)); g_binary_portion_include(portion->subs[best], sub); } } } /****************************************************************************** * * * Paramètres : portion = première couche amorçant la visite. * * visitor = fonction à appeler à chaque étape de la descente. * * data = adresse pointant vers des données de l'utilisateur.* * * * Description : Parcourt 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 */ bool visit_portion(GBinPortion *p, GBinPortion *pp) { bool ret; /* Etat à retourner */ size_t i; /* Boucle de parcours */ if (p->count == 0) ret = visitor(p, pp, BPV_SHOW, data); else { ret = visitor(p, pp, BPV_ENTER, data); for (i = 0; i < p->count && ret; i++) ret = visit_portion(p->subs[i], p); if (ret) ret = visitor(p, pp, BPV_EXIT, data); } return ret; } result = visit_portion(portion, NULL); return result; } /* ---------------------------------------------------------------------------------- */ /* PARCOURS D'ENSEMBLES DE PORTIONS */ /* ---------------------------------------------------------------------------------- */ /****************************************************************************** * * * Paramètres : portion = couche de portions à parcourir pour les recherches.* * x = abscisse 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 */ phys_t full; /* Espace total représenté */ size_t i; /* Boucle de parcours */ GBinPortion *sub; /* Portion incluse à traiter */ GdkRectangle sub_area; /* Etendue d'une sous-portion */ result = NULL; full = get_mrange_length(&portion->range); for (i = 0; i < portion->count && result == NULL; i++) { sub = portion->subs[i]; if (!g_binary_portion_compute_sub_area(sub, full, area, &sub_area)) continue; if (sub_area.x <= x && x < (sub_area.x + sub_area.width)) { result = g_binary_portion_find_at_pos(sub, x, &sub_area); if (result != NULL) *area = sub_area; } } if (result == NULL) { result = portion; g_object_ref(G_OBJECT(result)); } return result; } /****************************************************************************** * * * Paramètres : portion = portion mère à consulter. * * addr = adresse du point de recherche. * * * * Description : Détermine si une portion contient une adresse donnée. * * * * Retour : true ou false selon le résultat. * * * * Remarques : - * * * ******************************************************************************/ static bool g_portion_layer_contains_addr(const GBinPortion *portion, const vmpa2t *addr) { bool result; /* Bilan à retourner */ result = false; /* Portion non allouée en mémoire -> adresse nulle ; on écarte */ if (get_virt_addr(get_mrange_addr(&portion->range)) == 0) goto not_found; result = mrange_contains_addr(&portion->range, addr); not_found: return result; } /****************************************************************************** * * * Paramètres : portion = couche de portions à parcourir pour les recherches.* * 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 */ phys_t full; /* Espace total représenté */ size_t i; /* Boucle de parcours #1 */ GBinPortion *sub; /* Portion incluse à traiter */ GdkRectangle sub_area; /* Etendue d'une sous-portion */ result = NULL; full = get_mrange_length(&portion->range); for (i = 0; i < portion->count && result == NULL; i++) { sub = portion->subs[i]; if (!g_portion_layer_contains_addr(sub, addr)) continue; if (!g_binary_portion_compute_sub_area(sub, full, area, &sub_area)) continue; result = g_binary_portion_find_at_addr(sub, addr, &sub_area); if (result != NULL) *area = sub_area; } if (result == NULL) { result = portion; g_object_ref(G_OBJECT(result)); } return result; } /****************************************************************************** * * * Paramètres : root = couche de portions à parcourir pour les recherches. * * 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 get_binary_portion_addr_from_pos(GBinPortion *root, 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(root, x, &owner_area); if (owner == NULL) return false; copy_vmpa(addr, get_mrange_addr(&owner->range)); advance_vmpa(addr, (get_mrange_length(&owner->range) * (x - owner_area.x)) / owner_area.width); g_object_unref(G_OBJECT(owner)); return true; } /****************************************************************************** * * * Paramètres : root = couche de portions à parcourir pour les recherches. * * 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 get_binary_portion_pos_from_addr(GBinPortion *root, const vmpa2t *addr, const GdkRectangle *area, gint *x) { GdkRectangle owner_area; /* Aire de contenance */ GBinPortion *owner; /* Conteneur propriétaire */ phys_t diff; /* Décallage à appliquer */ owner_area = *area; owner = g_binary_portion_find_at_addr(root, addr, &owner_area); if (owner == NULL) return false; diff = compute_vmpa_diff(addr, get_mrange_addr(&owner->range)); *x = owner_area.x + (diff * owner_area.width) / get_mrange_length(&owner->range); g_object_unref(G_OBJECT(owner)); return true; } /****************************************************************************** * * * Paramètres : layer = couche de portions à consulter. * * 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 query_tooltip_for_binary_portion(GBinPortion *root, gint x, gint y, const GdkRectangle *area, GtkTooltip *tooltip) { GBinPortion *selected; /* Portion à décrire ici */ selected = g_binary_portion_find_at_pos(root, x, (GdkRectangle []) { *area }); if (selected == NULL) return FALSE; g_binary_portion_query_tooltip(selected, tooltip); g_object_unref(G_OBJECT(selected)); return TRUE; }