Defined the ELF support as plugin.

1 files changed, 425 insertions, 0 deletions

diff --git a/plugins/elf/section.c b/plugins/elf/section.c
new file mode 100644
index 0000000..556c0ed
--- /dev/null
+++ b/plugins/elf/section.c
@@ -0,0 +1,425 @@
+
+/* Chrysalide - Outil d'analyse de fichiers binaires
+ * section.h - prototypes pour la gestion des sections d'un ELF
+ *
+ * Copyright (C) 2008-2017 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 <http://www.gnu.org/licenses/>.
+ */
+
+
+#include "section.h"
+
+
+#include <malloc.h>
+#include <string.h>
+
+
+#include "elf-int.h"
+
+
+
+/******************************************************************************
+*                                                                             *
+*  Paramètres  : format  = description de l'exécutable à consulter.           *
+*                index   = indice de la section recherchée.                   *
+*                section = ensemble d'informations à faire remonter. [OUT]    *
+*                                                                             *
+*  Description : Recherche une section donnée au sein de binaire par indice.  *
+*                                                                             *
+*  Retour      : Bilan de l'opération.                                        *
+*                                                                             *
+*  Remarques   : -                                                            *
+*                                                                             *
+******************************************************************************/
+
+bool find_elf_section_by_index(const GElfFormat *format, uint16_t index, elf_shdr *section)
+{
+    phys_t offset;                          /* Emplacement à venir lire    */
+
+    if (index >= ELF_HDR(format, format->header, e_shnum)) return false;
+
+    offset = ELF_HDR(format, format->header, e_shoff)
+        + ELF_HDR(format, format->header, e_shentsize) * index;
+
+    return read_elf_section_header(format, offset, section);
+
+}
+
+
+/******************************************************************************
+*                                                                             *
+*  Paramètres  : format  = description de l'exécutable à consulter.           *
+*                name    = nom de la section recherchée.                      *
+*                section = ensemble d'informations à faire remonter. [OUT]    *
+*                                                                             *
+*  Description : Recherche une section donnée au sein de binaire par nom.     *
+*                                                                             *
+*  Retour      : Bilan de l'opération.                                        *
+*                                                                             *
+*  Remarques   : -                                                            *
+*                                                                             *
+******************************************************************************/
+
+bool find_elf_section_by_name(const GElfFormat *format, const char *name, elf_shdr *section)
+{
+    bool result;                            /* Bilan à faire remonter      */
+    elf_shdr strings;                       /* Section des descriptions    */
+    uint16_t i;                             /* Boucle de parcours          */
+    const char *secname;                    /* Nom d'une section analysée  */
+
+    if (!find_elf_section_by_index(format, ELF_HDR(format, format->header, e_shstrndx), &strings))
+        return false;
+
+    result = false;
+
+    for (i = 0; i < ELF_HDR(format, format->header, e_shnum) && !result; i++)
+    {
+        find_elf_section_by_index(format, i, section);
+
+        secname = extract_name_from_elf_string_section(format, &strings,
+                                                       ELF_SHDR(format, *section, sh_name));
+
+        if (secname != NULL)
+            result = (strcmp(name, secname) == 0);
+
+    }
+
+    return result;
+
+}
+
+
+/******************************************************************************
+*                                                                             *
+*  Paramètres  : format  = description de l'exécutable à consulter.           *
+*                addr    = adresse de la section recherchée. (32 bits)        *
+*                section = ensemble d'informations à faire remonter. [OUT]    *
+*                                                                             *
+*  Description : Recherche une section donnée au sein de binaire par type.    *
+*                                                                             *
+*  Retour      : Bilan de l'opération.                                        *
+*                                                                             *
+*  Remarques   : -                                                            *
+*                                                                             *
+******************************************************************************/
+
+bool find_elf_section_by_virtual_address(const GElfFormat *format, virt_t addr, elf_shdr *section)
+{
+    bool result;                            /* Bilan à faire remonter      */
+    uint16_t i;                             /* Boucle de parcours          */
+
+    result = false;
+
+    for (i = 0; i < ELF_HDR(format, format->header, e_shnum) && !result; i++)
+    {
+        find_elf_section_by_index(format, i, section);
+
+        result = (addr == ELF_SHDR(format, *section, sh_addr));
+
+    }
+
+    return result;
+
+}
+
+
+/******************************************************************************
+*                                                                             *
+*  Paramètres  : format   = description de l'exécutable à consulter.          *
+*                type     = type de la section recherchée.                    *
+*                sections = tableau d'informations à faire remonter. [OUT]    *
+*                count    = nombre d'éléments présents dans le tableau. [OUT] *
+*                                                                             *
+*  Description : Recherche une section donnée au sein de binaire par type.    *
+*                                                                             *
+*  Retour      : Bilan de l'opération.                                        *
+*                                                                             *
+*  Remarques   : -                                                            *
+*                                                                             *
+******************************************************************************/
+
+bool find_elf_sections_by_type(const GElfFormat *format, uint32_t type, elf_shdr **sections, size_t *count)
+{
+    uint16_t i;                             /* Boucle de parcours          */
+    elf_shdr section;                       /* Section à analyser          */
+
+    *sections = NULL;
+    *count = 0;
+
+    for (i = 0; i < ELF_HDR(format, format->header, e_shnum); i++)
+    {
+        find_elf_section_by_index(format, i, &section);
+
+        if (type == ELF_SHDR(format, section, sh_type))
+        {
+            *sections = (elf_shdr *)realloc(*sections, ++(*count) * sizeof(elf_shdr));
+            (*sections)[*count - 1] = section;
+        }
+
+    }
+
+    return (*count > 0);
+
+}
+
+
+/******************************************************************************
+*                                                                             *
+*  Paramètres  : format  = description de l'exécutable à consulter.           *
+*                section = section à consulter.                               *
+*                offset  = position de la section trouvée. [OUT]              *
+*                size    = taille de la section trouvée. [OUT]                *
+*                addr    = adresse virtuelle de la section trouvée. [OUT]     *
+*                                                                             *
+*  Description : Fournit les adresses et taille contenues dans une section.   *
+*                                                                             *
+*  Retour      : -                                                            *
+*                                                                             *
+*  Remarques   : -                                                            *
+*                                                                             *
+******************************************************************************/
+
+void get_elf_section_content(const GElfFormat *format, const elf_shdr *section, phys_t *offset, phys_t *size, virt_t *addr)
+{
+    *offset = ELF_SHDR(format, *section, sh_offset);
+    *size = ELF_SHDR(format, *section, sh_size);
+
+    if (addr != NULL)
+        *addr = ELF_SHDR(format, *section, sh_addr);
+
+}
+
+
+/******************************************************************************
+*                                                                             *
+*  Paramètres  : format  = description de l'exécutable à consulter.           *
+*                section = section à consulter.                               *
+*                range   = emplacement de la fonction à renseigner. [OUT]     *
+*                                                                             *
+*  Description : Fournit la localisation d'une section.                       *
+*                                                                             *
+*  Retour      : -                                                            *
+*                                                                             *
+*  Remarques   : -                                                            *
+*                                                                             *
+******************************************************************************/
+
+void get_elf_section_range(const GElfFormat *format, const elf_shdr *section, mrange_t *range)
+{
+    virt_t virt;                            /* Emplacement virtuel         */
+    vmpa2t tmp;                             /* Enregistrement intermédiaire*/
+
+    virt = ELF_SHDR(format, *section, sh_addr);
+
+    if (virt == 0)
+        virt = VMPA_NO_VIRTUAL;
+
+    init_vmpa(&tmp, ELF_SHDR(format, *section, sh_offset), virt);
+
+    init_mrange(range, &tmp, ELF_SHDR(format, *section, sh_size));
+
+}
+
+
+/******************************************************************************
+*                                                                             *
+*  Paramètres  : format  = description de l'exécutable à consulter.           *
+*                name    = nom de la section recherchée.                      *
+*                offset  = position de la section trouvée. [OUT]              *
+*                size    = taille de la section trouvée. [OUT]                *
+*                address = adresse virtuelle de la section trouvée. [OUT]     *
+*                                                                             *
+*  Description : Recherche une zone donnée au sein de binaire par nom.        *
+*                                                                             *
+*  Retour      : Bilan de l'opération.                                        *
+*                                                                             *
+*  Remarques   : -                                                            *
+*                                                                             *
+******************************************************************************/
+
+bool find_elf_section_content_by_name(const GElfFormat *format, const char *name, phys_t *offset, phys_t *size, virt_t *address)
+{
+    bool result;                            /* Bilan à retourner           */
+    elf_shdr section;                       /* Section trouvée ou non      */
+
+    result = find_elf_section_by_name(format, name, &section);
+
+    if (result)
+        get_elf_section_content(format, &section, offset, size, address);
+
+    return result;
+
+}
+
+
+/******************************************************************************
+*                                                                             *
+*  Paramètres  : format = description de l'exécutable à consulter.            *
+*                name   = nom de la section recherchée.                       *
+*                range  = emplacement de la fonction à renseigner. [OUT]      *
+*                                                                             *
+*  Description : Recherche une zone donnée au sein de binaire par nom.        *
+*                                                                             *
+*  Retour      : Bilan de l'opération.                                        *
+*                                                                             *
+*  Remarques   : -                                                            *
+*                                                                             *
+******************************************************************************/
+
+bool find_elf_section_range_by_name(const GElfFormat *format, const char *name, mrange_t *range)
+{
+    bool result;                            /* Bilan à retourner           */
+    elf_shdr section;                       /* Section trouvée ou non      */
+
+    result = find_elf_section_by_name(format, name, &section);
+
+    if (result)
+        get_elf_section_range(format, &section, range);
+
+    return result;
+
+}
+
+
+/******************************************************************************
+*                                                                             *
+*  Paramètres  : format  = description de l'exécutable à consulter.           *
+*                section = section contenant des chaînes terminées par '\0'.  *
+*                index   = indice du premier caractères à cerner.             *
+*                                                                             *
+*  Description : Identifie une chaîne de caractères dans une section adéquate.*
+*                                                                             *
+*  Retour      : Pointeur vers la chaîne recherchée ou NULL en cas d'échec.   *
+*                                                                             *
+*  Remarques   : -                                                            *
+*                                                                             *
+******************************************************************************/
+
+const char *extract_name_from_elf_string_section(const GElfFormat *format, const elf_shdr *section, off_t index)
+{
+    const char *result;                     /* Nom trouvé à renvoyer       */
+    phys_t last;                            /* Dernier '\0' possible       */
+    phys_t phys;                            /* Point de lecture physique   */
+    vmpa2t pos;                             /* Position de lecture         */
+    const GBinContent *content;             /* Contenu binaire à lire      */
+
+    last = ELF_SHDR(format, *section, sh_offset) + ELF_SHDR(format, *section, sh_size);
+
+    phys = ELF_SHDR(format, *section, sh_offset) + index;
+
+    if ((phys + 1) >= last)
+        return NULL;
+
+    init_vmpa(&pos, phys, VMPA_NO_VIRTUAL);
+
+    content = G_BIN_FORMAT(format)->content;
+
+    result = (const char *)g_binary_content_get_raw_access(content, &pos, 1);
+
+    if (result == NULL)
+        return NULL;
+
+    if ((phys + strlen(result)) > last)
+        return NULL;
+
+    return result;
+
+}
+
+
+/******************************************************************************
+*                                                                             *
+*  Paramètres  : format = description de l'exécutable à consulter.            *
+*                off    = position physique à retrouver.                      *
+*                pos    = position correspondante. [OUT]                      *
+*                                                                             *
+*  Description : Fournit l'emplacement correspondant à une position physique. *
+*                                                                             *
+*  Retour      : Bilan de l'opération.                                        *
+*                                                                             *
+*  Remarques   : -                                                            *
+*                                                                             *
+******************************************************************************/
+
+bool translate_offset_into_vmpa_using_elf_sections(const GElfFormat *format, phys_t off, vmpa2t *pos)
+{
+    bool result;                            /* Bilan à retourner           */
+    uint16_t i;                             /* Boucle de parcours          */
+    elf_shdr section;                       /* Section à analyser          */
+    virt_t addr;                            /* Adresse virtuelle calculée  */
+
+    result = false;
+
+    for (i = 0; i < ELF_HDR(format, format->header, e_shnum) && !result; i++)
+    {
+        find_elf_section_by_index(format, i, &section);
+
+        if (ELF_SHDR(format, section, sh_offset) <= off
+            && off < (ELF_SHDR(format, section, sh_offset) + ELF_SHDR(format, section, sh_size)))
+        {
+            addr = ELF_SHDR(format, section, sh_addr) + off - ELF_SHDR(format, section, sh_offset);
+            init_vmpa(pos, off, addr);
+            result = true;
+        }
+
+    }
+
+    return result;
+
+}
+
+
+/******************************************************************************
+*                                                                             *
+*  Paramètres  : format = description de l'exécutable à consulter.            *
+*                addr   = adresse virtuelle à retrouver.                      *
+*                pos    = position correspondante. [OUT]                      *
+*                                                                             *
+*  Description : Fournit l'emplacement correspondant à une adresse virtuelle. *
+*                                                                             *
+*  Retour      : Bilan de l'opération.                                        *
+*                                                                             *
+*  Remarques   : -                                                            *
+*                                                                             *
+******************************************************************************/
+
+bool translate_address_into_vmpa_using_elf_sections(const GElfFormat *format, virt_t addr, vmpa2t *pos)
+{
+    bool result;                            /* Bilan à retourner           */
+    uint16_t i;                             /* Boucle de parcours          */
+    elf_shdr section;                       /* Section à analyser          */
+    phys_t off;                             /* Position physique calculée  */
+
+    result = false;
+
+    for (i = 0; i < ELF_HDR(format, format->header, e_shnum) && !result; i++)
+    {
+        find_elf_section_by_index(format, i, &section);
+
+        if (ELF_SHDR(format, section, sh_addr) <= addr
+            && addr < (ELF_SHDR(format, section, sh_addr) + ELF_SHDR(format, section, sh_size)))
+        {
+            off = ELF_SHDR(format, section, sh_offset) + addr - ELF_SHDR(format, section, sh_addr);
+            init_vmpa(pos, off, addr);
+            result = true;
+        }
+
+    }
+
+    return result;
+
+}