/* Chrysalide - Outil d'analyse de fichiers binaires
 * crc32.c - transormation en empreinte d'API crc32
 *
 * Copyright (C) 2023 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 "crc32.h"


#include <malloc.h>
#include <string.h>


#include <analysis/scan/patterns/modifier-int.h>




/* ----------------------- RECHERCHE D'UN MOTIF DE TEXTE BRUT ----------------------- */


/* Initialise la classe des transmissions en empreintes crc32. */
static void g_scan_crc32_modifier_class_init(GScanCrc32ModifierClass *klass);

/* Initialise une instance de transmission en empreinte crc32. */
static void g_scan_crc32_modifier_init(GScanCrc32Modifier *);

/* Supprime toutes les références externes. */
static void g_scan_crc32_modifier_dispose(GScanCrc32Modifier *);

/* Procède à la libération totale de la mémoire. */
static void g_scan_crc32_modifier_finalize(GScanCrc32Modifier *);



/* --------------------- IMPLEMENTATION DES FONCTIONS DE CLASSE --------------------- */


/* Fournit le nom d'appel d'un modificateur pour motif. */
static char *g_scan_crc32_modifier_get_name(const GScanCrc32Modifier *);

/* Calcule l'empreinte crc32 d'un motif de recherche. */
static uint32_t compute_crc32(const sized_binary_t *);

/* Transforme une séquence d'octets pour motif de recherche. */
static bool g_scan_crc32_modifier_transform(const GScanCrc32Modifier *, const sized_binary_t *, size_t, sized_binary_t **, size_t *);

/* Retrouve l'origine d'une correspondance à partir d'un indice. */
static char *g_scan_crc32_modifier_get_path(const GScanCrc32Modifier *, size_t *);



/* ---------------------------------------------------------------------------------- */
/*                         RECHERCHE D'UN MOTIF DE TEXTE BRUT                         */
/* ---------------------------------------------------------------------------------- */


/* Indique le type défini pour une transormation en encodage Crc32. */
G_DEFINE_TYPE(GScanCrc32Modifier, g_scan_crc32_modifier, G_TYPE_API_HASH_MODIFIER);


/******************************************************************************
*                                                                             *
*  Paramètres  : klass = classe à initialiser.                                *
*                                                                             *
*  Description : Initialise la classe des transmissions en empreintes crc32.  *
*                                                                             *
*  Retour      : -                                                            *
*                                                                             *
*  Remarques   : -                                                            *
*                                                                             *
******************************************************************************/

static void g_scan_crc32_modifier_class_init(GScanCrc32ModifierClass *klass)
{
    GObjectClass *object;                   /* Autre version de la classe  */
    GScanTokenModifierClass *modifier;      /* Version de classe parente   */

    object = G_OBJECT_CLASS(klass);

    object->dispose = (GObjectFinalizeFunc/* ! */)g_scan_crc32_modifier_dispose;
    object->finalize = (GObjectFinalizeFunc)g_scan_crc32_modifier_finalize;

    modifier = G_SCAN_TOKEN_MODIFIER_CLASS(klass);

    modifier->get_name = (get_scan_modifier_name_fc)g_scan_crc32_modifier_get_name;

    modifier->transform = (transform_scan_token_fc)g_scan_crc32_modifier_transform;
    modifier->get_path = (get_modifier_path)g_scan_crc32_modifier_get_path;

}


/******************************************************************************
*                                                                             *
*  Paramètres  : modifier = instance à initialiser.                           *
*                                                                             *
*  Description : Initialise une instance de transmission en empreinte crc32.  *
*                                                                             *
*  Retour      : -                                                            *
*                                                                             *
*  Remarques   : -                                                            *
*                                                                             *
******************************************************************************/

static void g_scan_crc32_modifier_init(GScanCrc32Modifier *modifier)
{

}


/******************************************************************************
*                                                                             *
*  Paramètres  : modifier = instance d'objet GLib à traiter.                  *
*                                                                             *
*  Description : Supprime toutes les références externes.                     *
*                                                                             *
*  Retour      : -                                                            *
*                                                                             *
*  Remarques   : -                                                            *
*                                                                             *
******************************************************************************/

static void g_scan_crc32_modifier_dispose(GScanCrc32Modifier *modifier)
{
    G_OBJECT_CLASS(g_scan_crc32_modifier_parent_class)->dispose(G_OBJECT(modifier));

}


/******************************************************************************
*                                                                             *
*  Paramètres  : modifier = instance d'objet GLib à traiter.                  *
*                                                                             *
*  Description : Procède à la libération totale de la mémoire.                *
*                                                                             *
*  Retour      : -                                                            *
*                                                                             *
*  Remarques   : -                                                            *
*                                                                             *
******************************************************************************/

static void g_scan_crc32_modifier_finalize(GScanCrc32Modifier *modifier)
{
    G_OBJECT_CLASS(g_scan_crc32_modifier_parent_class)->finalize(G_OBJECT(modifier));

}


/******************************************************************************
*                                                                             *
*  Paramètres  : -                                                            *
*                                                                             *
*  Description : Construit un modificateur livrant des empreintes crc32.      *
*                                                                             *
*  Retour      : Mécanisme mis en place.                                      *
*                                                                             *
*  Remarques   : -                                                            *
*                                                                             *
******************************************************************************/

GScanTokenModifier *g_scan_crc32_modifier_new(void)
{
    GScanTokenModifier *result;                    /* Structure à retourner       */

    result = g_object_new(G_TYPE_SCAN_CRC32_MODIFIER, NULL);

    return result;

}



/* ---------------------------------------------------------------------------------- */
/*                       IMPLEMENTATION DES FONCTIONS DE CLASSE                       */
/* ---------------------------------------------------------------------------------- */


/******************************************************************************
*                                                                             *
*  Paramètres  : modifier = modificateur à consulter.                         *
*                                                                             *
*  Description : Fournit le nom d'appel d'un modificateur pour motif.         *
*                                                                             *
*  Retour      : Désignation humaine.                                         *
*                                                                             *
*  Remarques   : -                                                            *
*                                                                             *
******************************************************************************/

static char *g_scan_crc32_modifier_get_name(const GScanCrc32Modifier *modifier)
{
    char *result;                           /* Désignation à retourner     */

    result = strdup("crc32");

    return result;

}


/******************************************************************************
*                                                                             *
*  Paramètres  : src = séquence d'octets à traiter.                           *
*                                                                             *
*  Description : Calcule l'empreinte crc32 d'un motif de recherche.           *
*                                                                             *
*  Retour      : Valeur entière de l'empreinte déterminée.                    *
*                                                                             *
*  Remarques   : -                                                            *
*                                                                             *
******************************************************************************/

static uint32_t compute_crc32(const sized_binary_t *src)
{
    uint32_t result;                        /* Valeur à retourner          */
    size_t i;                               /* Boucle de parcours #1       */
    size_t k;                               /* Boucle de parcours #2       */

    result = 0xffffffff;

    for (i = 0; i < src->len; i++)
    {
        result ^= src->data[i];

        for (k = 0; k < 8; k++)
            result = result & 1 ? (result >> 1) ^ 0xedb88320 : result >> 1;

    }

    result = ~result;

    return result;

}


/******************************************************************************
*                                                                             *
*  Paramètres  : modifier = modificateur à solliciter.                        *
*                src      = séquences d'octets à traiter.                     *
*                scount   = quantité de ces séquences.                        *
*                dest     = nouvelle(s) séquence(s) d'octets obtenue(s) [OUT] *
*                dcount   = quantité de ces séquences.                        *
*                                                                             *
*  Description : Transforme une séquence d'octets pour motif de recherche.    *
*                                                                             *
*  Retour      : Bilan de l'opération : succès ou échec.                      *
*                                                                             *
*  Remarques   : -                                                            *
*                                                                             *
******************************************************************************/

static bool g_scan_crc32_modifier_transform(const GScanCrc32Modifier *modifier, const sized_binary_t *src, size_t scount, sized_binary_t **dest, size_t *dcount)
{
    bool result;                            /* Bilan d'opération à renvoyer*/
    sized_binary_t *binary;                 /* Raccourci vers le stockage  */
    size_t i;                               /* Boucle de parcours #1       */
    const sized_binary_t *_src;             /* Source courante             */
    uint32_t hash;                          /* Valeur d'empreinte calculée */

    result = true;

    *dcount = scount;
    *dest = calloc(*dcount, sizeof(sized_binary_t));

    binary = &(*dest)[0];

    for (i = 0; i < scount; i++, binary++)
    {
        _src = src + i;

        hash = compute_crc32(_src);

        binary->data = malloc(sizeof(hash) * sizeof(bin_t));
        binary->len = sizeof(hash);

        memcpy(binary->data, &hash, sizeof(hash));

    }

    return result;

}


/******************************************************************************
*                                                                             *
*  Paramètres  : modifier = modificateur à consulter.                         *
*                index    = indice de la combinaison ciblée. [OUT]            *
*                                                                             *
*  Description : Retrouve l'origine d'une correspondance à partir d'un indice.*
*                                                                             *
*  Retour      : Version humainement lisible de la combinaison.               *
*                                                                             *
*  Remarques   : -                                                            *
*                                                                             *
******************************************************************************/

static char *g_scan_crc32_modifier_get_path(const GScanCrc32Modifier *modifier, size_t *index)
{
    char *result;                           /* Combinaison à retourner     */

    if (*index > 0)
    {
        result = NULL;
        (*index)--;
    }

    else
        result = strdup("crc32");

    return result;

}