diff options
| -rw-r--r-- | plugins/dex/pool.c | 12 | ||||
| -rw-r--r-- | plugins/elf/strings.c | 13 | ||||
| -rw-r--r-- | plugins/pychrysalide/format/symbol.c | 3 | ||||
| -rw-r--r-- | plugins/readelf/strtab.c | 16 | ||||
| -rw-r--r-- | src/arch/target.c | 20 | ||||
| -rw-r--r-- | src/common/Makefile.am | 1 | ||||
| -rw-r--r-- | src/common/alloc.c | 60 | ||||
| -rw-r--r-- | src/common/alloc.h | 37 | ||||
| -rw-r--r-- | src/format/Makefile.am | 1 | ||||
| -rw-r--r-- | src/format/format.c | 91 | ||||
| -rw-r--r-- | src/format/format.h | 3 | ||||
| -rw-r--r-- | src/format/strsym.c | 474 | ||||
| -rw-r--r-- | src/format/strsym.h | 80 | ||||
| -rw-r--r-- | src/format/symbol.h | 5 | ||||
| -rw-r--r-- | src/gui/panels/strings.c | 16 |
15 files changed, 680 insertions, 152 deletions
diff --git a/plugins/dex/pool.c b/plugins/dex/pool.c index 75841df..d95f519 100644 --- a/plugins/dex/pool.c +++ b/plugins/dex/pool.c @@ -31,6 +31,7 @@ #include <i18n.h> #include <core/global.h> #include <core/nproc.h> +#include <format/strsym.h> #include <mangling/demangler.h> @@ -205,9 +206,8 @@ GBinSymbol *get_string_symbol_from_dex_pool(GDexFormat *format, uint32_t index) uint32_t count; /* Nombre d'éléments présents */ mrange_t range; /* Emplacement de la chaîne */ const char *string; /* Chaîne de caractères liée */ - GBinSymbol *new; /* Nouveau symbol créé */ GBinFormat *base; /* Autre version du format */ - char *label; /* Désignation de la chaîne */ + GBinSymbol *new; /* Nouveau symbol créé */ bool inserted; /* Bilan d'une insertion */ result = NULL; @@ -222,15 +222,11 @@ GBinSymbol *get_string_symbol_from_dex_pool(GDexFormat *format, uint32_t index) string = get_string_from_dex_pool(format, index, &range); if (string == NULL) goto gssfdp_error; - new = g_binary_symbol_new(&range, STP_RO_STRING); - base = G_BIN_FORMAT(format); - label = create_string_label(base, get_mrange_addr(&range), get_mrange_length(&range)); - - g_binary_symbol_set_alt_label(new, label); + new = g_string_symbol_new_read_only(base, &range, SET_MUTF_8); - free(label); + g_string_symbol_build_label(G_STR_SYMBOL(new), base); g_object_ref(G_OBJECT(new)); inserted = g_binary_format_add_symbol(base, new); diff --git a/plugins/elf/strings.c b/plugins/elf/strings.c index a14b389..4d6b5c8 100644 --- a/plugins/elf/strings.c +++ b/plugins/elf/strings.c @@ -36,6 +36,7 @@ #include <arch/raw.h> #include <core/global.h> #include <core/nproc.h> +#include <format/strsym.h> #include "elf-int.h" @@ -285,7 +286,6 @@ static bool do_elf_string_loading(GElfLoading *loading, GElfFormat *format, phys const mrange_t *range; /* Espace occupé par une chaîne*/ GBinSymbol *symbol; /* Symbole à intégrer */ bool cut; /* Coupure par étiquette ? */ - char *label; /* Désignation de la chaîne */ result = false; @@ -355,7 +355,7 @@ static bool do_elf_string_loading(GElfLoading *loading, GElfFormat *format, phys { range = g_arch_instruction_get_range(instr); - symbol = g_binary_symbol_new(range, STP_RO_STRING); + symbol = g_string_symbol_new_read_only(base, range, SET_GUESS); g_binary_format_add_symbol(base, symbol); /* Jointure avec la chaîne précédente ? */ @@ -366,14 +366,7 @@ static bool do_elf_string_loading(GElfLoading *loading, GElfFormat *format, phys cut = (data[*iter - offset - 1] == '\0'); if (cut) - { - label = create_string_label(base, get_mrange_addr(range), end - *iter); - - g_binary_symbol_set_alt_label(symbol, label); - - free(label); - - } + g_string_symbol_build_label(G_STR_SYMBOL(symbol), base); } diff --git a/plugins/pychrysalide/format/symbol.c b/plugins/pychrysalide/format/symbol.c index 7dcb0eb..d6298d4 100644 --- a/plugins/pychrysalide/format/symbol.c +++ b/plugins/pychrysalide/format/symbol.c @@ -342,13 +342,14 @@ static bool py_binary_symbol_define_constants(PyTypeObject *obj_type) result &= PyDict_AddIntMacro(obj_type, STP_CODE_LABEL); result &= PyDict_AddIntMacro(obj_type, STP_OBJECT); result &= PyDict_AddIntMacro(obj_type, STP_ENTRY_POINT); - result &= PyDict_AddIntMacro(obj_type, STP_STRING); result &= PyDict_AddIntMacro(obj_type, STP_RO_STRING); + result &= PyDict_AddIntMacro(obj_type, STP_DYN_STRING); result &= PyDict_AddIntMacro(obj_type, STP_COUNT); result &= PyDict_AddIntMacro(obj_type, SSS_INTERNAL); result &= PyDict_AddIntMacro(obj_type, SSS_EXPORTED); result &= PyDict_AddIntMacro(obj_type, SSS_IMPORTED); + result &= PyDict_AddIntMacro(obj_type, SSS_DYNAMIC); return result; diff --git a/plugins/readelf/strtab.c b/plugins/readelf/strtab.c index e8d0f45..3cbe353 100644 --- a/plugins/readelf/strtab.c +++ b/plugins/readelf/strtab.c @@ -29,6 +29,7 @@ #include <arch/raw.h> +#include <format/strsym.h> #include <plugins/elf/section.h> @@ -67,7 +68,6 @@ static void parse_elf_string_table(GElfFormat *format, GPreloadInfo *info, const bool inserted; /* Bilan d'une insertion */ const mrange_t *irange; /* Espace occupé par une chaîne*/ GBinSymbol *symbol; /* Symbole à intégrer */ - char *label; /* Désignation de la chaîne */ length = get_mrange_length(range); @@ -112,23 +112,13 @@ static void parse_elf_string_table(GElfFormat *format, GPreloadInfo *info, const { irange = g_arch_instruction_get_range(instr); - symbol = g_binary_symbol_new(irange, STP_RO_STRING); + symbol = g_string_symbol_new_read_only(base, irange, SET_GUESS); g_binary_format_add_symbol(base, symbol); /* Jointure avec la chaîne précédente ? */ if (cut) - { - copy_vmpa(&pos, get_mrange_addr(range)); - advance_vmpa(&pos, i); - - label = create_string_label(base, get_mrange_addr(irange), end - i); - - g_binary_symbol_set_alt_label(symbol, label); - - free(label); - - } + g_string_symbol_build_label(G_STR_SYMBOL(symbol), base); } diff --git a/src/arch/target.c b/src/arch/target.c index bdae746..a2e1f34 100644 --- a/src/arch/target.c +++ b/src/arch/target.c @@ -37,6 +37,7 @@ #include "../analysis/routine.h" #include "../common/extstr.h" #include "../format/format.h" +#include "../format/strsym.h" #include "../glibext/gbinarycursor.h" @@ -422,8 +423,8 @@ static char *g_target_operand_build_tooltip(const GTargetOperand *operand, const result = g_binary_routine_build_tooltip(G_BIN_ROUTINE(operand->symbol), binary); break; - case STP_STRING: case STP_RO_STRING: + case STP_DYN_STRING: srange = g_binary_symbol_get_range(operand->symbol); @@ -499,9 +500,10 @@ bool g_target_operand_resolve(GTargetOperand *operand, GBinFormat *format, bool { bool result; /* Bilan à retourner */ GBinSymbol *symbol; /* Facilités d'accès au symbole*/ - SymbolType stype; /* Type de symbole trouvé */ - const mrange_t *range; /* Couverture du symbole */ char *label; /* Désignation de la chaîne */ +#ifndef NDEBUG + const mrange_t *range; /* Couverture du symbole */ +#endif if (operand->symbol != NULL) g_object_unref(G_OBJECT(operand->symbol)); @@ -528,9 +530,7 @@ bool g_target_operand_resolve(GTargetOperand *operand, GBinFormat *format, bool { symbol = operand->symbol; - stype = g_binary_symbol_get_target_type(symbol); - - if (stype == STP_STRING || stype == STP_RO_STRING) + if (G_IS_STR_SYMBOL(symbol)) { label = g_binary_symbol_get_label(symbol); @@ -539,15 +539,13 @@ bool g_target_operand_resolve(GTargetOperand *operand, GBinFormat *format, bool else { +#ifndef NDEBUG range = g_binary_symbol_get_range(symbol); assert(cmp_vmpa(&operand->addr, get_mrange_addr(range)) == 0); +#endif - label = create_string_label(format, get_mrange_addr(range), get_mrange_length(range)); - - g_binary_symbol_set_alt_label(symbol, label); - - free(label); + g_string_symbol_build_label(G_STR_SYMBOL(symbol), format); } diff --git a/src/common/Makefile.am b/src/common/Makefile.am index 7a13aa8..3fabc73 100644 --- a/src/common/Makefile.am +++ b/src/common/Makefile.am @@ -2,6 +2,7 @@ noinst_LTLIBRARIES = libcommon.la libcommon_la_SOURCES = \ + alloc.h alloc.c \ array.h array.c \ asm.h asm.c \ bconst.h \ diff --git a/src/common/alloc.c b/src/common/alloc.c new file mode 100644 index 0000000..70f2f01 --- /dev/null +++ b/src/common/alloc.c @@ -0,0 +1,60 @@ + +/* Chrysalide - Outil d'analyse de fichiers binaires + * alloc.c - gestion particulière des allocations + * + * Copyright (C) 2018 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 <http://www.gnu.org/licenses/>. + */ + + +#include "alloc.h" + + +#include <malloc.h> + + + +/****************************************************************************** +* * +* Paramètres : ptr = pointeur à traiter. * +* allocated = taille actuellement allouée. [OUT] * +* needed = taille finale nécessaire. * +* * +* Description : Assure qu'une zone de mémoire allouée a la taille requise. * +* * +* Retour : Pointeur à utiliser avec assurance. * +* * +* Remarques : - * +* * +******************************************************************************/ + +void *ensure_allocation_size(void *ptr, size_t *allocated, size_t needed) +{ + void *result; /* Pointeur à renvoyer */ + + if (needed < *allocated) + result = ptr; + + else + { + *allocated = needed; + result = realloc(ptr, needed); + } + + return result; + +} diff --git a/src/common/alloc.h b/src/common/alloc.h new file mode 100644 index 0000000..5dd564e --- /dev/null +++ b/src/common/alloc.h @@ -0,0 +1,37 @@ + +/* Chrysalide - Outil d'analyse de fichiers binaires + * alloc.h - prototypes pour une gestion particulière des allocations + * + * Copyright (C) 2018 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 <http://www.gnu.org/licenses/>. + */ + + +#ifndef _COMMON_ALLOC_H +#define _COMMON_ALLOC_H + + +#include <sys/types.h> + + + +/* Assure qu'une zone de mémoire allouée a la taille requise. */ +void *ensure_allocation_size(void *, size_t *, size_t); + + + +#endif /* _COMMON_ALLOC_H */ diff --git a/src/format/Makefile.am b/src/format/Makefile.am index 504055d..8a47b82 100644 --- a/src/format/Makefile.am +++ b/src/format/Makefile.am @@ -12,6 +12,7 @@ libformat_la_SOURCES = \ format.h format.c \ preload-int.h \ preload.h preload.c \ + strsym.h strsym.c \ symiter.h symiter.c \ symbol-int.h \ symbol.h symbol.c diff --git a/src/format/format.c b/src/format/format.c index 449f0f0..91cca37 100644 --- a/src/format/format.c +++ b/src/format/format.c @@ -25,7 +25,6 @@ #include <assert.h> -#include <ctype.h> #include <malloc.h> #include <string.h> @@ -957,96 +956,6 @@ static void g_binary_format_delete_duplicated_symbols(GBinFormat *format) /****************************************************************************** * * * Paramètres : format = informations chargées à consulter. * -* addr = adresse liée à la chaîne à traiter. * -* length = taille de la chaîne à représenter. * -* * -* Description : Construit une désignation pour chaîne de caractères. * -* * -* Retour : Chaîne de caractères à libérer de la mémoire. * -* * -* Remarques : - * -* * -******************************************************************************/ - -char *create_string_label(GBinFormat *format, const vmpa2t *addr, size_t length) -{ - char *result; /* Nouvelle chaîne à retourner */ - vmpa2t pos; /* Tête de lecture modifiable */ - const bin_t *base; /* Contenu complet et original */ - unsigned int wc; /* Nombre de mots rencontrés */ - size_t iter; /* Tête d'écriture de recopie */ - size_t i; /* Boucle de parcours */ - bool empty; /* Base de l'étiquette vide ? */ - GBinSymbol *found; /* Symbole similaire trouvé */ - VMPA_BUFFER(last_sfx); /* Dernier suffixe à intégrer */ - - copy_vmpa(&pos, addr); - - base = g_binary_content_get_raw_access(format->content, &pos, length); - - if (base == NULL) - return NULL; - - result = (char *)calloc(length + 5 + VMPA_MAX_LEN + 1, sizeof(char)); - - wc = 0; - - iter = 0; - - for (i = 0; i < length; i++) - { - if (isalnum(base[i])) result[iter++] = tolower(base[i]); - - else if (iter > 0) - { - if (result[iter - 1] != '_') wc++; - - if (wc == 3) break; - - if (result[iter - 1] != '_') result[iter++] = '_'; - - } - - } - - /* Détermination du suffixe suffisant */ - - empty = (iter == 0); - - if (iter > 0 && result[iter - 1] != '_') result[iter++] = '_'; - - strcpy(&result[iter], "str"); - iter += 3; - - found = NULL; - - if (empty || g_binary_format_find_symbol_by_label(format, result, &found)) - { - if (found != NULL) - g_object_unref(G_OBJECT(found)); - - if (iter > 0 && result[iter - 1] != '_') result[iter++] = '_'; - - assert(has_phys_addr(addr) || has_virt_addr(addr)); - - /* TODO : use_phy_instead_of_virt */ - if (has_virt_addr(addr)) - vmpa2_virt_to_string(addr, MDS_UNDEFINED, last_sfx, NULL); - else - vmpa2_phys_to_string(addr, MDS_UNDEFINED, last_sfx, NULL); - - strcpy(&result[iter], last_sfx); - - } - - return result; - -} - - -/****************************************************************************** -* * -* Paramètres : format = informations chargées à consulter. * * label = étiquette à retrouver lors des recherches. * * symbol = éventuel symbole trouvé à déréfenrencer. [OUT] * * * diff --git a/src/format/format.h b/src/format/format.h index 372b3b0..a9152ba 100644 --- a/src/format/format.h +++ b/src/format/format.h @@ -132,9 +132,6 @@ bool g_binary_format_add_symbol(GBinFormat *, GBinSymbol *); /* Retire un symbole de la collection du format binaire. */ void g_binary_format_remove_symbol(GBinFormat *, GBinSymbol *); -/* Construit une désignation pour chaîne de caractères. */ -char *create_string_label(GBinFormat *, const vmpa2t *, size_t); - /* Recherche le symbole correspondant à une étiquette. */ bool g_binary_format_find_symbol_by_label(GBinFormat *, const char *, GBinSymbol **); diff --git a/src/format/strsym.c b/src/format/strsym.c new file mode 100644 index 0000000..b709b93 --- /dev/null +++ b/src/format/strsym.c @@ -0,0 +1,474 @@ + +/* Chrysalide - Outil d'analyse de fichiers binaires + * strsym.c - gestion des chaînes dans un binaire + * + * Copyright (C) 2018 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 <http://www.gnu.org/licenses/>. + */ + + +#include "strsym.h" + + +#include <assert.h> +#include <ctype.h> +#include <malloc.h> +#include <string.h> + + +#include "symbol-int.h" +#include "../common/alloc.h" + + + +/* ----------------------- VITRINE POUR CHAINES DE CARACTERES ----------------------- */ + + +/* Symbole pour chaîne de caractères (instance) */ +struct _GStrSymbol +{ + GBinSymbol parent; /* A laisser en premier */ + + StringEncodingType encoding; /* Encodage de la chaîne liée */ + + union + { + GBinContent *content; /* Conteneur d'origine */ + char *utf8; /* Données utilisables */ + + }; + + bool has_content; /* Choix dans l'union */ + +}; + +/* Symbole pour chaîne de caractères (classe) */ +struct _GStrSymbolClass +{ + GBinSymbolClass parent; /* A laisser en premier */ + +}; + + +/* Initialise la classe des chaînes de caractères. */ +static void g_string_symbol_class_init(GStrSymbolClass *); + +/* Initialise une instance de chaîne de caractères. */ +static void g_string_symbol_init(GStrSymbol *); + +/* Supprime toutes les références externes. */ +static void g_string_symbol_dispose(GStrSymbol *); + +/* Procède à la libération totale de la mémoire. */ +static void g_string_symbol_finalize(GStrSymbol *); + + + +/* ---------------------------------------------------------------------------------- */ +/* VITRINE POUR CHAINES DE CARACTERES */ +/* ---------------------------------------------------------------------------------- */ + + +/* Indique le type défini pour un symbole d'exécutable. */ +/* +G_DEFINE_TYPE_WITH_CODE(GStrSymbol, g_string_symbol, G_TYPE_OBJECT, + G_IMPLEMENT_INTERFACE(G_TYPE_LINE_GENERATOR, g_string_symbol_interface_init)); +*/ +G_DEFINE_TYPE(GStrSymbol, g_string_symbol, G_TYPE_BIN_SYMBOL); + + +/****************************************************************************** +* * +* Paramètres : klass = classe à initialiser. * +* * +* Description : Initialise la classe des chaînes de caractères. * +* * +* Retour : - * +* * +* Remarques : - * +* * +******************************************************************************/ + +static void g_string_symbol_class_init(GStrSymbolClass *klass) +{ + GObjectClass *object; /* Autre version de la classe */ + + object = G_OBJECT_CLASS(klass); + + object->dispose = (GObjectFinalizeFunc/* ! */)g_string_symbol_dispose; + object->finalize = (GObjectFinalizeFunc)g_string_symbol_finalize; + +} + + +/****************************************************************************** +* * +* Paramètres : symbol = instance à initialiser. * +* * +* Description : Initialise une instance de chaîne de caractères. * +* * +* Retour : - * +* * +* Remarques : - * +* * +******************************************************************************/ + +static void g_string_symbol_init(GStrSymbol *symbol) +{ + +} + + +/****************************************************************************** +* * +* Paramètres : symbol = instance d'objet GLib à traiter. * +* * +* Description : Supprime toutes les références externes. * +* * +* Retour : - * +* * +* Remarques : - * +* * +******************************************************************************/ + +static void g_string_symbol_dispose(GStrSymbol *symbol) +{ + if (symbol->has_content) + g_object_unref(G_OBJECT(symbol->content)); + + G_OBJECT_CLASS(g_string_symbol_parent_class)->dispose(G_OBJECT(symbol)); + +} + + +/****************************************************************************** +* * +* Paramètres : symbol = instance d'objet GLib à traiter. * +* * +* Description : Procède à la libération totale de la mémoire. * +* * +* Retour : - * +* * +* Remarques : - * +* * +******************************************************************************/ + +static void g_string_symbol_finalize(GStrSymbol *symbol) +{ + G_OBJECT_CLASS(g_string_symbol_parent_class)->finalize(G_OBJECT(symbol)); + +} + + +/****************************************************************************** +* * +* Paramètres : format = format binaire reconnu. * +* range = espace couvert par le nouveau symbole. * +* encoding = encodage de la chaîne de caractères à représenter.* +* * +* Description : Crée un nouveau symbole pour chaîne de caractères. * +* * +* Retour : Adresse de l'instance mise en place ou NULL en cas d'échec. * +* * +* Remarques : - * +* * +******************************************************************************/ + +GBinSymbol *g_string_symbol_new_read_only(GBinFormat *format, const mrange_t *range, StringEncodingType encoding) +{ + GStrSymbol *result; /* Nouveau symbole à renvoyer */ + GBinSymbol *parent; /* Type d'instance parent */ + vmpa2t pos; /* Tête de lecture modifiable */ + phys_t length; /* Taille de la chaîne */ + const char *base; /* Contenu complet et original */ + + result = g_object_new(G_TYPE_STR_SYMBOL, NULL); + + parent = G_BIN_SYMBOL(result); + + g_binary_symbol_set_range(parent, range); + g_binary_symbol_set_target_type(parent, STP_RO_STRING); + + result->encoding = encoding; + + result->content = g_binary_format_get_content(format); + result->has_content = true; + + switch (encoding) + { + case SET_ASCII: + break; + + case SET_UTF_8: + case SET_MUTF_8: + + copy_vmpa(&pos, get_mrange_addr(range)); + length = get_mrange_length(range); + + base = (const char *)g_binary_content_get_raw_access(result->content, &pos, length); + + if (!g_utf8_validate(base, -1, NULL)) + result->encoding = SET_ASCII; + + break; + + case SET_GUESS: + + copy_vmpa(&pos, get_mrange_addr(range)); + length = get_mrange_length(range); + + base = (const char *)g_binary_content_get_raw_access(result->content, &pos, length); + + if (g_str_is_ascii(base)) + result->encoding = SET_ASCII; + + else if (g_utf8_validate(base, -1, NULL)) + result->encoding = SET_UTF_8; + + else + result->encoding = SET_ASCII; + + break; + + } + + return G_BIN_SYMBOL(result); + +} + + +/****************************************************************************** +* * +* Paramètres : symbol = symbole à venir consulter. * +* * +* Description : Fournit l'encodage d'une chaîne de caractères. * +* * +* Retour : Type d'encodage utilisé. * +* * +* Remarques : - * +* * +******************************************************************************/ + +StringEncodingType g_string_symbol_get_encoding(const GStrSymbol *symbol) +{ + StringEncodingType result; /* Type à retourner */ + + result = symbol->encoding; + + return result; + +} + + +/****************************************************************************** +* * +* Paramètres : symbol = chaîne de caractères à consulter. * +* format = informations chargées à consulter. * +* * +* Description : Construit une désignation pour chaîne de caractères. * +* * +* Retour : Bilan de l'opération de mise en place. * +* * +* Remarques : - * +* * +******************************************************************************/ + +bool g_string_symbol_build_label(GStrSymbol *symbol, GBinFormat *format) +{ + const mrange_t *range; /* Couverture du symbole */ + vmpa2t pos; /* Tête de lecture modifiable */ + phys_t length; /* Taille de la chaîne */ + const char *base; /* Contenu complet et original */ + size_t allocated; /* Taille réservée */ + char *label; /* Etiquette à constituer */ + size_t cur; /* Point d'écriture courant */ + unsigned int wc; /* Nombre de mots rencontrés */ + size_t i; /* Boucle de parcours #1 */ + char *iter; /* Boucle de parcours #2 */ + gunichar c; /* Caractère unicode */ + gchar *converted; /* Caractère converti */ + glong size; /* Taille du caractère */ + bool empty; /* Base de l'étiquette vide ? */ + GBinSymbol *found; /* Symbole similaire trouvé */ + VMPA_BUFFER(last_sfx); /* Dernier suffixe à intégrer */ + + /* Base de décision */ + + range = g_binary_symbol_get_range(G_BIN_SYMBOL(symbol)); + + copy_vmpa(&pos, get_mrange_addr(range)); + + switch (g_binary_symbol_get_target_type(G_BIN_SYMBOL(symbol))) + { + case STP_RO_STRING: + length = get_mrange_length(range); + base = (const char *)g_binary_content_get_raw_access(symbol->content, &pos, length); + break; + + case STP_DYN_STRING: + base = symbol->utf8; + length = strlen((char *)base); + break; + + default: + assert(false); + base = NULL; + break; + + } + + if (base == NULL) + return false; + + /* Phase de constitution */ + + allocated = length + 5 + VMPA_MAX_LEN + 1; + label = (char *)malloc(allocated * sizeof(char)); + + cur = 0; + + wc = 0; + + /** + * Version simple et rapide. + */ + if (symbol->encoding == SET_ASCII || g_str_is_ascii(base)) + { + for (i = 0; i < length; i++) + { + if (isalnum(base[i])) label[cur++] = tolower(base[i]); + + else if (cur > 0) + { + if (label[cur - 1] != '_') wc++; + + if (wc == 3) break; + + if (label[cur - 1] != '_') label[cur++] = '_'; + + } + + } + + } + + /** + * Version complète. + */ + else + { + for (iter = g_utf8_offset_to_pointer(base, 0); + iter != NULL; + iter = g_utf8_find_next_char(iter, NULL)) + { + c = g_utf8_get_char_validated(iter, -1); + + /** + * Si le caractère n'est pas valide (chaîne chiffrée ?)... + */ + if (c == (gunichar)-1 || c == (gunichar)-2) + break; + + if (c == '\0') + break; + + else if (g_unichar_isalnum(c)) + { + c = g_unichar_tolower(c); + + converted = g_ucs4_to_utf8(&c, 1, NULL, &size, NULL); + + label = ensure_allocation_size(label, &allocated, cur + size); + + memcpy(label + cur, converted, size); + + g_free(converted); + + cur += size; + + } + + else if (cur > 0) + { + if (label[cur - 1] != '_') wc++; + + if (wc == 3) break; + + if (label[cur - 1] != '_') + { + label = ensure_allocation_size(label, &allocated, cur + 1); + label[cur++] = '_'; + } + + } + + } + + } + + empty = (cur == 0); + + if (!empty && label[cur - 1] != '_') + { + label = ensure_allocation_size(label, &allocated, cur + 1); + label[cur++] = '_'; + } + + label = ensure_allocation_size(label, &allocated, cur + 4); + + strcpy(label + cur, "str"); + cur += 3; + + /* Détermination du suffixe suffisant */ + + found = NULL; + + if (empty || g_binary_format_find_symbol_by_label(format, label, &found)) + { + if (found != NULL) + g_object_unref(G_OBJECT(found)); + + if (label[cur - 1] != '_') + { + label = ensure_allocation_size(label, &allocated, cur + 1); + label[cur++] = '_'; + } + + copy_vmpa(&pos, get_mrange_addr(range)); + + assert(has_phys_addr(&pos) || has_virt_addr(&pos)); + + if (has_virt_addr(&pos)) + vmpa2_virt_to_string(&pos, MDS_UNDEFINED, last_sfx, NULL); + else + vmpa2_phys_to_string(&pos, MDS_UNDEFINED, last_sfx, NULL); + + label = ensure_allocation_size(label, &allocated, cur + strlen(last_sfx) + 1); + + strcpy(label + cur, last_sfx); + + } + + /* Application */ + + g_binary_symbol_set_alt_label(G_BIN_SYMBOL(symbol), label); + + free(label); + + return true; + +} diff --git a/src/format/strsym.h b/src/format/strsym.h new file mode 100644 index 0000000..e827e6a --- /dev/null +++ b/src/format/strsym.h @@ -0,0 +1,80 @@ + +/* Chrysalide - Outil d'analyse de fichiers binaires + * strsym.h - prototypes pour la gestion des chaînes dans un binaire + * + * Copyright (C) 2018 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 <http://www.gnu.org/licenses/>. + */ + + +#ifndef _FORMAT_STRSYM_H +#define _FORMAT_STRSYM_H + + +#include <glib-object.h> + + +#include "format.h" +#include "symbol.h" + + + +/* ----------------------- VITRINE POUR CHAINES DE CARACTERES ----------------------- */ + + +/* Types de chaînes */ +typedef enum _StringEncodingType +{ + SET_ASCII, /* Format brut */ + SET_UTF_8, /* Format UTF-8 */ + SET_MUTF_8, /* Format UTF-8 modifié */ + + SET_GUESS, /* Détection automatique */ + +} StringEncodingType; + + +#define G_TYPE_STR_SYMBOL g_string_symbol_get_type() +#define G_STR_SYMBOL(obj) (G_TYPE_CHECK_INSTANCE_CAST((obj), g_string_symbol_get_type(), GStrSymbol)) +#define G_IS_STR_SYMBOL(obj) (G_TYPE_CHECK_INSTANCE_TYPE((obj), g_string_symbol_get_type())) +#define G_STR_SYMBOL_CLASS(klass) (G_TYPE_CHECK_CLASS_CAST((klass), G_TYPE_STR_SYMBOL, GStrSymbolClass)) +#define G_IS_STR_SYMBOL_CLASS(klass) (G_TYPE_CHECK_CLASS_TYPE((klass), G_TYPE_STR_SYMBOL)) +#define G_STR_SYMBOL_GET_CLASS(obj) (G_TYPE_INSTANCE_GET_CLASS((obj), G_TYPE_STR_SYMBOL, GStrSymbolClass)) + + +/*/* Symbole pour chaîne de caractères (instance) */ +typedef struct _GStrSymbol GStrSymbol; + +/* Symbole pour chaîne de caractères (classe) */ +typedef struct _GStrSymbolClass GStrSymbolClass; + + +/* Indique le type défini pour un symbole d'exécutable. */ +GType g_string_symbol_get_type(void); + +/* Crée un nouveau symbole pour chaîne de caractères. */ +GBinSymbol *g_string_symbol_new_read_only(GBinFormat *, const mrange_t *, StringEncodingType); + +/* Fournit l'encodage d'une chaîne de caractères. */ +StringEncodingType g_string_symbol_get_encoding(const GStrSymbol *); + +/* Construit une désignation pour chaîne de caractères. */ +bool g_string_symbol_build_label(GStrSymbol *, GBinFormat *); + + + +#endif /* _FORMAT_STRSYM_H */ diff --git a/src/format/symbol.h b/src/format/symbol.h index 13747d4..577a6a0 100644 --- a/src/format/symbol.h +++ b/src/format/symbol.h @@ -43,8 +43,8 @@ typedef enum _SymbolType STP_CODE_LABEL, /* Renvoi au sein de code */ STP_OBJECT, /* Objet quelconque */ STP_ENTRY_POINT, /* Morceau de code en entrée */ - STP_STRING, /* Chaîne de caractères */ - STP_RO_STRING, /* Chaîne de caractères */ + STP_RO_STRING, /* Chaîne d'origine */ + STP_DYN_STRING, /* Chaîne créée ex-nihilo */ STP_COUNT @@ -57,6 +57,7 @@ typedef enum _SymbolStatus SSS_INTERNAL, /* Visibilité nulle */ SSS_EXPORTED, /* Disponibilité extérieure */ SSS_IMPORTED, /* Besoin interne */ + SSS_DYNAMIC, /* Création durant l'analyse */ SSS_COUNT diff --git a/src/gui/panels/strings.c b/src/gui/panels/strings.c index 6e9324f..895a1b9 100644 --- a/src/gui/panels/strings.c +++ b/src/gui/panels/strings.c @@ -39,6 +39,7 @@ #include "../../core/params.h" #include "../../core/queue.h" #include "../../format/format.h" +#include "../../format/strsym.h" #include "../../format/symiter.h" #include "../../gtkext/easygtk.h" #include "../../gtkext/gtkdisplaypanel.h" @@ -766,7 +767,7 @@ static void reload_strings_for_new_list_view(const GStringsPanel *panel, GtkStat symbol != NULL; symbol = get_symbol_iterator_next(siter)) { - if (g_binary_symbol_get_target_type(symbol) != STP_RO_STRING) + if (!G_IS_STR_SYMBOL(symbol)) goto rsfnlv_next; range = g_binary_symbol_get_range(symbol); @@ -1378,21 +1379,10 @@ static bool is_string_name_matching(const strings_update_data *data, GtkTreeMode { bool result; /* Bilan à retourner */ GBinSymbol *symbol; /* Symbole manipulé */ -#ifndef NDEBUG - SymbolType type; /* Type associé au symbole */ -#endif char *label; /* Etiquette à analyser */ gtk_tree_model_get(model, iter, STC_SYMBOL, &symbol, -1); - assert(symbol != NULL); - -#ifndef NDEBUG - - type = g_binary_symbol_get_target_type(symbol); - - assert(type == STP_RO_STRING); - -#endif + assert(G_IS_STR_SYMBOL(symbol)); label = g_binary_symbol_get_label(symbol); |