/* Chrysalide - Outil d'analyse de fichiers binaires
* file.c - chargement de données binaires à partir d'un fichier
*
* Copyright (C) 2015-2019 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 .
*/
#include "file.h"
#include
#include
#include
#include
#include
#include
#include
#include "file-int.h"
#include "../db/misc/rlestr.h"
#include "../storage/serialize-int.h"
#include "../../core/logs.h"
/* -------------------------- ENSEMBLE DE DONNEES BINAIRES -------------------------- */
/* Initialise la classe des contenus de données binaires. */
static void g_file_content_class_init(GFileContentClass *);
/* Initialise une instance de contenu de données binaires. */
static void g_file_content_init(GFileContent *);
/* Supprime toutes les références externes. */
static void g_file_content_dispose(GFileContent *);
/* Procède à la libération totale de la mémoire. */
static void g_file_content_finalize(GFileContent *);
/* --------------------- IMPLEMENTATION DES FONCTIONS DE CLASSE --------------------- */
/* Fournit le nom associé au contenu binaire. */
static char *g_file_content_describe(const GFileContent *, bool);
/* Charge un contenu depuis une mémoire tampon. */
static bool g_file_content_load(GFileContent *, GObjectStorage *, packed_buffer_t *);
/* Sauvegarde un contenu dans une mémoire tampon. */
static bool g_file_content_store(const GFileContent *, GObjectStorage *, packed_buffer_t *);
/* ---------------------------------------------------------------------------------- */
/* ENSEMBLE DE DONNEES BINAIRES */
/* ---------------------------------------------------------------------------------- */
/* Indique le type défini par la GLib pour les contenus de données. */
G_DEFINE_TYPE(GFileContent, g_file_content, G_TYPE_MEMORY_CONTENT);
/******************************************************************************
* *
* Paramètres : klass = classe à initialiser. *
* *
* Description : Initialise la classe des contenus de données binaires. *
* *
* Retour : - *
* *
* Remarques : - *
* *
******************************************************************************/
static void g_file_content_class_init(GFileContentClass *klass)
{
GObjectClass *object; /* Autre version de la classe */
GBinContentClass *content; /* Version parente de la classe*/
object = G_OBJECT_CLASS(klass);
object->dispose = (GObjectFinalizeFunc/* ! */)g_file_content_dispose;
object->finalize = (GObjectFinalizeFunc)g_file_content_finalize;
content = G_BIN_CONTENT_CLASS(klass);
content->describe = (describe_content_fc)g_file_content_describe;
content->load = (load_content_cb)g_file_content_load;
content->store = (store_content_cb)g_file_content_store;
}
/******************************************************************************
* *
* Paramètres : content = instance à initialiser. *
* *
* Description : Initialise une instance de contenu de données binaires. *
* *
* Retour : - *
* *
* Remarques : - *
* *
******************************************************************************/
static void g_file_content_init(GFileContent *content)
{
content->filename = NULL;
content->fd = -1;
}
/******************************************************************************
* *
* Paramètres : content = instance d'objet GLib à traiter. *
* *
* Description : Supprime toutes les références externes. *
* *
* Retour : - *
* *
* Remarques : - *
* *
******************************************************************************/
static void g_file_content_dispose(GFileContent *content)
{
G_OBJECT_CLASS(g_file_content_parent_class)->dispose(G_OBJECT(content));
}
/******************************************************************************
* *
* Paramètres : content = instance d'objet GLib à traiter. *
* *
* Description : Procède à la libération totale de la mémoire. *
* *
* Retour : - *
* *
* Remarques : - *
* *
******************************************************************************/
static void g_file_content_finalize(GFileContent *content)
{
GMemoryContent *base; /* Structure parente */
free(content->filename);
if (content->fd != -1)
{
base = G_MEMORY_CONTENT(content);
munmap(base->data, base->length);
close(content->fd);
}
G_OBJECT_CLASS(g_file_content_parent_class)->finalize(G_OBJECT(content));
}
/******************************************************************************
* *
* Paramètres : filename = chemin d'accès au fichier à charger. *
* *
* Description : Charge en mémoire le contenu d'un fichier donné. *
* *
* Retour : Représentation de contenu à manipuler ou NULL en cas d'échec.*
* *
* Remarques : - *
* *
******************************************************************************/
GBinContent *g_file_content_new(const char *filename)
{
GBinContent *result; /* Structure à retourner */
result = g_object_new(G_TYPE_FILE_CONTENT, NULL);
if (!g_file_content_create(G_FILE_CONTENT(result), filename))
g_clear_object(&result);
return result;
}
/******************************************************************************
* *
* Paramètres : content = instance à initialiser pleinement. *
* filename = chemin d'accès au fichier à charger. *
* *
* Description : Met en place un contenu d'un fichier donné. *
* *
* Retour : Bilan de l'opération. *
* *
* Remarques : - *
* *
******************************************************************************/
bool g_file_content_create(GFileContent *content, const char *filename)
{
bool result; /* Bilan à retourner */
int fd; /* Descripteur du fichier */
struct stat info; /* Informations sur le fichier */
int ret; /* Bilan d'un appel */
void *data; /* Contenu brut du fichier */
GMemoryContent *base; /* Structure parente */
result = false;
/* Récupération des données */
fd = open(filename, O_RDONLY);
if (fd == -1)
{
LOG_ERROR_N("open");
goto file_error;
}
ret = fstat(fd, &info);
if (ret == -1)
{
close(fd);
LOG_ERROR_N("fstat");
goto file_error;
}
data = mmap(NULL, info.st_size, PROT_READ, MAP_PRIVATE, fd, 0);
if (data == MAP_FAILED)
{
close(fd);
LOG_ERROR_N("mmap");
goto file_error;
}
/* Constitution du contenu officiel */
content->filename = strdup(filename);
base = G_MEMORY_CONTENT(content);
base->data = data;
base->length = info.st_size;
result = true;
file_error:
return result;
}
/******************************************************************************
* *
* Paramètres : content = contenu binaire à venir consulter. *
* *
* Description : Fournit le nom de fichier associé au contenu binaire. *
* *
* Retour : Chemin d'accès au contenu binaire. *
* *
* Remarques : - *
* *
******************************************************************************/
const char *g_file_content_get_filename(const GFileContent *content)
{
char *result; /* Chemin d'accès à retourner */
result = content->filename;
return result;
}
/* ---------------------------------------------------------------------------------- */
/* IMPLEMENTATION DES FONCTIONS DE CLASSE */
/* ---------------------------------------------------------------------------------- */
/******************************************************************************
* *
* Paramètres : content = contenu binaire à consulter. *
* full = précise s'il s'agit d'une version longue ou non. *
* *
* Description : Fournit le nom associé au contenu binaire. *
* *
* Retour : Nom de fichier avec chemin absolu au besoin. *
* *
* Remarques : - *
* *
******************************************************************************/
static char *g_file_content_describe(const GFileContent *content, bool full)
{
char *result; /* Description à retourner */
char *tmp; /* Copie modifiable */
char *base; /* Description à recopier */
if (full)
result = strdup(content->filename);
else
{
tmp = strdup(content->filename);
base = basename(tmp);
result = strdup(base);
free(tmp);
}
return result;
}
/******************************************************************************
* *
* Paramètres : content = élément GLib à constuire. *
* storage = conservateur de données à manipuler ou NULL. *
* pbuf = zone tampon à lire. *
* *
* Description : Charge un contenu depuis une mémoire tampon. *
* *
* Retour : Bilan de l'opération. *
* *
* Remarques : - *
* *
******************************************************************************/
static bool g_file_content_load(GFileContent *content, GObjectStorage *storage, packed_buffer_t *pbuf)
{
bool result; /* Bilan à retourner */
GSerializableObjectIface *parent_iface; /* Interface du niveau parent */
rle_string str; /* Chaîne à charger */
parent_iface = g_type_interface_peek(g_file_content_parent_class, G_TYPE_SERIALIZABLE_OBJECT);
result = parent_iface->load(G_SERIALIZABLE_OBJECT(content), storage, pbuf);
setup_empty_rle_string(&str);
if (result)
result = unpack_rle_string(&str, pbuf);
if (result)
{
result = (get_rle_string(&str) != NULL);
if (result)
content->filename = strdup(get_rle_string(&str));
exit_rle_string(&str);
}
return result;
}
/******************************************************************************
* *
* Paramètres : content = élément GLib à consulter. *
* storage = conservateur de données à manipuler ou NULL. *
* pbuf = zone tampon à remplir. *
* *
* Description : Sauvegarde un contenu dans une mémoire tampon. *
* *
* Retour : Bilan de l'opération. *
* *
* Remarques : - *
* *
******************************************************************************/
static bool g_file_content_store(const GFileContent *content, GObjectStorage *storage, packed_buffer_t *pbuf)
{
bool result; /* Bilan à retourner */
GSerializableObjectIface *parent_iface; /* Interface du niveau parent */
rle_string str; /* Chaîne à conserver */
parent_iface = g_type_interface_peek(g_file_content_parent_class, G_TYPE_SERIALIZABLE_OBJECT);
result = parent_iface->store(G_SERIALIZABLE_OBJECT(content), storage, pbuf);
if (result)
{
init_static_rle_string(&str, content->filename);
result = pack_rle_string(&str, pbuf);
exit_rle_string(&str);
}
return result;
}