/* OpenIDA - Outil d'analyse de fichiers binaires
 * binary.c - traitement des flots de code binaire
 *
 * Copyright (C) 2008 Cyrille Bagard
 *
 *  This file is part of OpenIDA.
 *
 *  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 <http://www.gnu.org/licenses/>.
 */


#include "binary.h"


#include <fcntl.h>
#include <unistd.h>
#include <sys/mman.h>
#include <sys/stat.h>
#include <sys/types.h>



#include "arch/processor.h"


#include "format/dbg_format.h"
#include "format/exe_format.h"


#include "format/elf/e_elf.h"
#include "format/dwarf/d_dwarf.h"



extern bool find_line_info(const uint8_t *content, off_t *size);


/* Charge en mémoire le contenu d'un fichier. */
uint8_t *map_binary_file(const char *, size_t *);





/******************************************************************************
*                                                                             *
*  Paramètres  : filename = nom du fichier à charger.                         *
*                length   = taille des données mises en mémoire. [OUT]        *
*                                                                             *
*  Description : Charge en mémoire le contenu d'un fichier.                   *
*                                                                             *
*  Retour      : Adresse du contenu binaire ou NULL en cas d'échec.           *
*                                                                             *
*  Remarques   : -                                                            *
*                                                                             *
******************************************************************************/

uint8_t *map_binary_file(const char *filename, size_t *length)
{
    uint8_t *result;                        /* Données à retourner         */
    int fd;                                 /* Fichier ouvert en lecture   */
    struct stat info;                       /* Informations sur le fichier */
    int ret;                                /* Bilan d'un appel            */

    fd = open(filename, 0, O_RDONLY);
    if (fd == -1)
    {
        perror("open()");
        return NULL;
    }

    ret = fstat(fd, &info);
    if (ret == -1)
    {
        perror("fstat()");
        close(fd);
        return NULL;
    }

    *length = info.st_size;

    result = (uint8_t *)mmap(NULL, *length, PROT_READ, MAP_PRIVATE, fd, 0);
    if (result == MAP_FAILED)
    {
        perror("mmap()");
        result = NULL;
    }

    ret = close(fd);
    if (ret == -1)
        perror("close()");

    return result;

}







void fill_snippet(GtkSnippet *snippet)
{
    off_t length;
    uint8_t *bin_data;
    int ret;

    exe_format *format;
    dbg_format *dformat;
    asm_processor *proc;
    asm_instr *instr;

    uint8_t *data = "\x66\xba\x0c\x00\x00\x00\x66\xb9\x28\x00\xee\x00\x66\xbb\x01\x00\x00\x00\x66\xb8\x04\x00\x00\x00\xcd\x80\x66\xbb\x00\x00\x00\x00\x66\xb8\x01\x00\x00\x00\xcd\x80\x48\x65\x6c\x6c\x6f\x20\x57\x6f\x72\x6c\x64\x0a";

    //uint8_t *data = "\x66\xbb\x00\x00\x00\x00\x66\xb8\x01\x00\x00\x00\xcd\x80\x90";

    off_t start;
    off_t pos;
    off_t len;

    char buffer[64];

    uint64_t base = 0;
    uint64_t offset = 0;

    proc = create_x86_processor();

    pos = 0;
    len = 0x28;



    bin_data = map_binary_file("/tmp/hello", &length);

    printf(" ~~ bin_data ~~ :: %p (%d)\n", bin_data, length);


    if (bin_data == NULL) return;


    format = load_elf(bin_data, length);
    dformat = load_dwarf(bin_data, length, format);

    find_exe_section(format, ".text", &pos, &len, &base);



    /*find_line_info(bin_data, &len);*/

    printf("Exiting...\n");
    exit(0);

    offset = base;


    gtk_snippet_set_processor(snippet, proc);


    gtk_snippet_add_line(snippet, offset, NULL, "Simple HelloWorld !");


#if 1

    start = pos;
    pos = 0;

    while (pos < len)
    {
        offset = base + pos;

        instr = decode_instruction(proc, &bin_data[start], &pos, len, offset);

        gtk_snippet_add_line(snippet, offset, instr, NULL);


    }


    ret = munmap(bin_data, length);


#else

    pos = 0;
    len = 0x28;


    while (pos < len)
    {
        offset = base + pos;

        instr = decode_instruction(proc, data, &pos, len, offset);

        gtk_snippet_add_line(snippet, offset, instr, NULL);


    }


    gtk_snippet_add_line(snippet, offset, NULL, "Simple HelloWorld !");

    pos = 0;
    while (pos < len)
    {
        offset = base + pos;

        instr = decode_instruction(proc, data, &pos, len, offset);

        gtk_snippet_add_line(snippet, offset, instr, NULL);


    }


    gtk_snippet_add_line(snippet, offset, NULL, "Simple HelloWorld !");

    pos = 0;
    while (pos < len)
    {
        offset = base + pos;

        instr = decode_instruction(proc, data, &pos, len, offset);

        gtk_snippet_add_line(snippet, offset, instr, NULL);


    }

#endif

    /*
    gtk_snippet_build_content(snippet);
    */


}