/* Chrysalide - Outil d'analyse de fichiers binaires * expr.c - définition d'une expression servant aux conditions de correspondance * * Copyright (C) 2022 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 "expr.h" #include "expr-int.h" /* ----------------------- BASES D'OBJET POUR LE SYSTEME GLIB ----------------------- */ /* Initialise la classe des expressions de validation. */ static void g_scan_expression_class_init(GScanExpressionClass *); /* Initialise une instance d'expression de validation. */ static void g_scan_expression_init(GScanExpression *); /* Procède à l'initialisation de l'interface de comparaison. */ static void g_scan_expression_cmp_interface_init(GComparableItemInterface *); /* Supprime toutes les références externes. */ static void g_scan_expression_dispose(GScanExpression *); /* Procède à la libération totale de la mémoire. */ static void g_scan_expression_finalize(GScanExpression *); /* ----------------------- INTERFACE OFFRANT DES COMPARAISONS ----------------------- */ /* Réalise une comparaison entre objets selon un critère précis. */ static bool g_scan_expression_compare_rich(const GScanExpression *, const GScanExpression *, RichCmpOperation, bool *); /* ---------------------------------------------------------------------------------- */ /* BASES D'OBJET POUR LE SYSTEME GLIB */ /* ---------------------------------------------------------------------------------- */ /* Indique le type défini pour une expression de validation. */ G_DEFINE_TYPE_WITH_CODE(GScanExpression, g_scan_expression, G_TYPE_OBJECT, G_IMPLEMENT_INTERFACE(G_TYPE_COMPARABLE_ITEM, g_scan_expression_cmp_interface_init)); /****************************************************************************** * * * Paramètres : klass = classe à initialiser. * * * * Description : Initialise la classe des expressions de validation. * * * * Retour : - * * * * Remarques : - * * * ******************************************************************************/ static void g_scan_expression_class_init(GScanExpressionClass *klass) { GObjectClass *object; /* Autre version de la classe */ object = G_OBJECT_CLASS(klass); object->dispose = (GObjectFinalizeFunc/* ! */)g_scan_expression_dispose; object->finalize = (GObjectFinalizeFunc)g_scan_expression_finalize; } /****************************************************************************** * * * Paramètres : expr = instance à initialiser. * * * * Description : Initialise une instance d'expression de validation. * * * * Retour : - * * * * Remarques : - * * * ******************************************************************************/ static void g_scan_expression_init(GScanExpression *expr) { } /****************************************************************************** * * * Paramètres : iface = interface GLib à initialiser. * * * * Description : Procède à l'initialisation de l'interface de comparaison. * * * * Retour : - * * * * Remarques : - * * * ******************************************************************************/ static void g_scan_expression_cmp_interface_init(GComparableItemInterface *iface) { iface->cmp_rich = (compare_rich_fc)g_scan_expression_compare_rich; } /****************************************************************************** * * * Paramètres : expr = instance d'objet GLib à traiter. * * * * Description : Supprime toutes les références externes. * * * * Retour : - * * * * Remarques : - * * * ******************************************************************************/ static void g_scan_expression_dispose(GScanExpression *expr) { G_OBJECT_CLASS(g_scan_expression_parent_class)->dispose(G_OBJECT(expr)); } /****************************************************************************** * * * Paramètres : expr = instance d'objet GLib à traiter. * * * * Description : Procède à la libération totale de la mémoire. * * * * Retour : - * * * * Remarques : - * * * ******************************************************************************/ static void g_scan_expression_finalize(GScanExpression *expr) { G_OBJECT_CLASS(g_scan_expression_parent_class)->finalize(G_OBJECT(expr)); } /****************************************************************************** * * * Paramètres : expr = instance à initialiser pleinement. * * vtype = type de valeur associée par l'expression. * * * * Description : Met en place une expression d'évaluation pour analyse. * * * * Retour : Bilan de l'opération. * * * * Remarques : - * * * ******************************************************************************/ bool g_scan_expression_create(GScanExpression *expr, ExprValueType vtype) { bool result; /* Bilan à retourner */ result = true; expr->value_type = vtype; return result; } /****************************************************************************** * * * Paramètres : expr = expression à consulter. * * * * Description : Indique le type de valeur portée par une expression. * * * * Retour : Type de valeur associée à l'expression. * * * * Remarques : - * * * ******************************************************************************/ ExprValueType g_scan_expression_get_value_type(const GScanExpression *expr) { ExprValueType result; /* Type à retourner */ result = expr->value_type; return result; } /****************************************************************************** * * * Paramètres : expr = expression à consulter. * * * * Description : Vérifie la validité d'une expression. * * * * Retour : Validation de l'usage de l'expression. * * * * Remarques : - * * * ******************************************************************************/ bool g_scan_expression_check_validity(const GScanExpression *expr) { bool result; /* Bilan à retourner */ GScanExpressionClass *class; /* Classe à activer */ class = G_SCAN_EXPRESSION_GET_CLASS(expr); result = class->check(expr); return result; } /****************************************************************************** * * * Paramètres : expr = expression à copier. * * * * Description : Reproduit une expression en place dans une nouvelle instance.* * * * Retour : Nouvelle instance d'expression. * * * * Remarques : - * * * ******************************************************************************/ GScanExpression *g_scan_expression_duplicate(const GScanExpression *expr) { GScanExpression *result; /* Instance copiée à retourner */ GScanExpressionClass *class; /* Classe à activer */ class = G_SCAN_EXPRESSION_GET_CLASS(expr); result = class->dup(expr); return result; } /****************************************************************************** * * * Paramètres : expr = expression à consulter. * * ctx = contexte de suivi de l'analyse courante. * * final = indique une ultime conversion dans le cycle en cours.* * * * Description : Réduit une expression à une forme plus simple. * * * * Retour : Réduction correspondante, expression déjà réduite, ou NULL. * * * * Remarques : - * * * ******************************************************************************/ GScanExpression *g_scan_expression_reduce(GScanExpression *expr, GScanContext *ctx, bool final) { GScanExpression *result; /* Instance à renvoyer */ GScanExpressionClass *class; /* Classe à activer */ class = G_SCAN_EXPRESSION_GET_CLASS(expr); result = class->reduce(expr, ctx, final); return result; } /* ---------------------------------------------------------------------------------- */ /* INTERFACE OFFRANT DES COMPARAISONS */ /* ---------------------------------------------------------------------------------- */ /****************************************************************************** * * * Paramètres : item = premier objet à cnsulter pour une comparaison. * * other = second objet à cnsulter pour une comparaison. * * op = opération de comparaison à réaliser. * * status = bilan des opérations de comparaison. [OUT] * * * * Description : Réalise une comparaison entre objets selon un critère précis.* * * * Retour : true si la comparaison a pu être effectuée, false sinon. * * * * Remarques : - * * * ******************************************************************************/ static bool g_scan_expression_compare_rich(const GScanExpression *item, const GScanExpression *other, RichCmpOperation op, bool *status) { bool result; /* Etat à retourner */ GScanExpressionClass *class; /* Classe à activer */ class = G_SCAN_EXPRESSION_GET_CLASS(item); if (class->cmp_rich != NULL) result = class->cmp_rich(item, other, op, status); else result = false; return result; }