/* Chrysalide - Outil d'analyse de fichiers binaires * count.c - récupération de la taille du contenu scanné * * 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 . */ #include "count.h" #include "../item-int.h" #include "../exprs/arithmetic.h" #include "../exprs/literal.h" /* ---------------------- INTRODUCTION D'UNE NOUVELLE FONCTION ---------------------- */ /* Initialise la classe des décomptes d'ensemble homogène. */ static void g_scan_count_function_class_init(GScanCountFunctionClass *); /* Initialise une instance de décompte d'ensemble homogène. */ static void g_scan_count_function_init(GScanCountFunction *); /* Supprime toutes les références externes. */ static void g_scan_count_function_dispose(GScanCountFunction *); /* Procède à la libération totale de la mémoire. */ static void g_scan_count_function_finalize(GScanCountFunction *); /* --------------------- IMPLEMENTATION DES FONCTIONS DE CLASSE --------------------- */ /* Indique le nom associé à une expression d'évaluation. */ static char *g_scan_count_function_get_name(const GScanCountFunction *); /* Réduit une expression à une forme plus simple. */ static bool g_scan_count_function_run_call(GScanCountFunction *, GScanExpression **, size_t, GScanContext *, GScanScope *, GObject **); /* ---------------------------------------------------------------------------------- */ /* INTRODUCTION D'UNE NOUVELLE FONCTION */ /* ---------------------------------------------------------------------------------- */ /* Indique le type défini pour un décompte d'ensemble. */ G_DEFINE_TYPE(GScanCountFunction, g_scan_count_function, G_TYPE_SCAN_REGISTERED_ITEM); /****************************************************************************** * * * Paramètres : klass = classe à initialiser. * * * * Description : Initialise la classe des décomptes d'ensemble homogène. * * * * Retour : - * * * * Remarques : - * * * ******************************************************************************/ static void g_scan_count_function_class_init(GScanCountFunctionClass *klass) { GObjectClass *object; /* Autre version de la classe */ GScanRegisteredItemClass *registered; /* Version de classe parente */ object = G_OBJECT_CLASS(klass); object->dispose = (GObjectFinalizeFunc/* ! */)g_scan_count_function_dispose; object->finalize = (GObjectFinalizeFunc)g_scan_count_function_finalize; registered = G_SCAN_REGISTERED_ITEM_CLASS(klass); registered->get_name = (get_registered_item_name_fc)g_scan_count_function_get_name; registered->run_call = (run_registered_item_call_fc)g_scan_count_function_run_call; } /****************************************************************************** * * * Paramètres : func = instance à initialiser. * * * * Description : Initialise une instance de décompte d'ensemble homogène. * * * * Retour : - * * * * Remarques : - * * * ******************************************************************************/ static void g_scan_count_function_init(GScanCountFunction *func) { } /****************************************************************************** * * * Paramètres : func = instance d'objet GLib à traiter. * * * * Description : Supprime toutes les références externes. * * * * Retour : - * * * * Remarques : - * * * ******************************************************************************/ static void g_scan_count_function_dispose(GScanCountFunction *func) { G_OBJECT_CLASS(g_scan_count_function_parent_class)->dispose(G_OBJECT(func)); } /****************************************************************************** * * * Paramètres : func = instance d'objet GLib à traiter. * * * * Description : Procède à la libération totale de la mémoire. * * * * Retour : - * * * * Remarques : - * * * ******************************************************************************/ static void g_scan_count_function_finalize(GScanCountFunction *func) { G_OBJECT_CLASS(g_scan_count_function_parent_class)->finalize(G_OBJECT(func)); } /****************************************************************************** * * * Paramètres : - * * * * Description : Constitue une fonction de décompte d'éléments d'un ensemble. * * * * Retour : Fonction mise en place. * * * * Remarques : - * * * ******************************************************************************/ GScanRegisteredItem *g_scan_count_function_new(void) { GScanRegisteredItem *result; /* Structure à retourner */ result = g_object_new(G_TYPE_SCAN_COUNT_FUNCTION, NULL); return result; } /* ---------------------------------------------------------------------------------- */ /* IMPLEMENTATION DES FONCTIONS DE CLASSE */ /* ---------------------------------------------------------------------------------- */ /****************************************************************************** * * * Paramètres : item = élément d'appel à consulter. * * * * Description : Indique le nom associé à une expression d'évaluation. * * * * Retour : Désignation humaine de l'expression d'évaluation. * * * * Remarques : - * * * ******************************************************************************/ static char *g_scan_count_function_get_name(const GScanCountFunction *item) { char *result; /* Désignation à retourner */ result = strdup("count"); return result; } /****************************************************************************** * * * Paramètres : item = élément d'appel à consulter. * * args = liste d'éventuels arguments fournis. * * count = taille de cette liste. * * ctx = contexte de suivi de l'analyse courante. * * scope = portée courante des variables locales. * * out = zone d'enregistrement de la résolution opérée. [OUT] * * * * Description : Réduit une expression à une forme plus simple. * * * * Retour : Réduction correspondante, expression déjà réduite, ou NULL. * * * * Remarques : - * * * ******************************************************************************/ static bool g_scan_count_function_run_call(GScanCountFunction *item, GScanExpression **args, size_t count, GScanContext *ctx, GScanScope *scope, GObject **out) { bool result; /* Bilan à retourner */ size_t sum; /* Somme des décomptes */ size_t i; /* Boucle de parcours */ size_t value; /* Nouveau décompte */ result = (count > 0); if (result) { sum = 0; for (i = 0; i < count && result; i++) { result = g_scan_expression_count_items(args[i], ctx, &value); sum += value; } if (result) *out = G_OBJECT(g_scan_literal_expression_new(LVT_UNSIGNED_INTEGER, (unsigned long long []){ sum })); } return result; }