diff options
Diffstat (limited to 'src/analysis/types/proto.c')
-rw-r--r-- | src/analysis/types/proto.c | 441 |
1 files changed, 441 insertions, 0 deletions
diff --git a/src/analysis/types/proto.c b/src/analysis/types/proto.c new file mode 100644 index 0000000..362bd88 --- /dev/null +++ b/src/analysis/types/proto.c @@ -0,0 +1,441 @@ + +/* Chrysalide - Outil d'analyse de fichiers binaires + * proto.c - manipulation des prototypes + * + * Copyright (C) 2018 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 <http://www.gnu.org/licenses/>. + */ + + +#include "proto.h" + + +#include <assert.h> +#include <malloc.h> +#include <string.h> + + +#include "../type-int.h" +#include "../../common/extstr.h" + + + +/* Description de prototype (instance) */ +struct _GProtoType +{ + GDataType parent; /* A laisser en premier */ + + GDataType *ret_type; /* Type retourné */ + + GDataType **args; /* Sous-types associés */ + size_t count; /* Quantité de ces arguments */ + +}; + +/* Description de prototype (classe) */ +struct _GProtoTypeClass +{ + GDataTypeClass parent; /* A laisser en premier */ + +}; + + +/* Initialise la classe des prototypes. */ +static void g_proto_type_class_init(GProtoTypeClass *); + +/* Initialise l'instance d'un prototype. */ +static void g_proto_type_init(GProtoType *); + +/* Supprime toutes les références externes. */ +static void g_proto_type_dispose(GProtoType *); + +/* Procède à la libération totale de la mémoire. */ +static void g_proto_type_finalize(GProtoType *); + +/* Crée un copie d'un type existant. */ +static GDataType *g_proto_type_dup(const GProtoType *); + +/* Décrit le type fourni sous forme de caractères. */ +static char *g_proto_type_to_string(const GProtoType *, bool); + + + +/* Indique le type défini pour un prototype. */ +G_DEFINE_TYPE(GProtoType, g_proto_type, G_TYPE_DATA_TYPE); + + +/****************************************************************************** +* * +* Paramètres : klass = classe à initialiser. * +* * +* Description : Initialise la classe des prototypes. * +* * +* Retour : - * +* * +* Remarques : - * +* * +******************************************************************************/ + +static void g_proto_type_class_init(GProtoTypeClass *klass) +{ + GObjectClass *object; /* Autre version de la classe */ + GDataTypeClass *type; /* Version parente et basique */ + + object = G_OBJECT_CLASS(klass); + + object->dispose = (GObjectFinalizeFunc/* ! */)g_proto_type_dispose; + object->finalize = (GObjectFinalizeFunc)g_proto_type_finalize; + + type = G_DATA_TYPE_CLASS(klass); + + type->handle_ns = false; + + type->dup = (type_dup_fc)g_proto_type_dup; + type->to_string = (type_to_string_fc)g_proto_type_to_string; + +} + + +/****************************************************************************** +* * +* Paramètres : type = instance à initialiser. * +* * +* Description : Initialise l'instance d'un prototype. * +* * +* Retour : - * +* * +* Remarques : - * +* * +******************************************************************************/ + +static void g_proto_type_init(GProtoType *type) +{ + type->ret_type = NULL; + + type->args = NULL; + type->count = 0; + +} + + +/****************************************************************************** +* * +* Paramètres : type = instance d'objet GLib à traiter. * +* * +* Description : Supprime toutes les références externes. * +* * +* Retour : - * +* * +* Remarques : - * +* * +******************************************************************************/ + +static void g_proto_type_dispose(GProtoType *type) +{ + size_t i; /* Boucle de parcours */ + + if (type->ret_type != NULL) + g_object_unref(G_OBJECT(type->ret_type)); + + for (i = 0; i < type->count; i++) + g_object_unref(G_OBJECT(type->args[i])); + + G_OBJECT_CLASS(g_proto_type_parent_class)->dispose(G_OBJECT(type)); + +} + + +/****************************************************************************** +* * +* Paramètres : type = instance d'objet GLib à traiter. * +* * +* Description : Procède à la libération totale de la mémoire. * +* * +* Retour : - * +* * +* Remarques : - * +* * +******************************************************************************/ + +static void g_proto_type_finalize(GProtoType *type) +{ + if (type->args != NULL) + free(type->args); + + G_OBJECT_CLASS(g_proto_type_parent_class)->finalize(G_OBJECT(type)); + +} + + +/****************************************************************************** +* * +* Paramètres : - * +* * +* Description : Crée une représentation de prototype. * +* * +* Retour : Adresse de la structure mise en place. * +* * +* Remarques : - * +* * +******************************************************************************/ + +GDataType *g_proto_type_new(void) +{ + GProtoType *result; /* Structure à retourner */ + + result = g_object_new(G_TYPE_PROTO_TYPE, NULL); + + return G_DATA_TYPE(result); + +} + + +/****************************************************************************** +* * +* Paramètres : type = type à dupliquer. * +* * +* Description : Crée un copie d'un type existant. * +* * +* Retour : Nouvelle instance de type identique à celle fournie. * +* * +* Remarques : - * +* * +******************************************************************************/ + +static GDataType *g_proto_type_dup(const GProtoType *type) +{ + GProtoType *result; /* Copie à retourner */ + GDataType *ret_type; /* Type de retour */ + size_t i; /* Boucle de parcours */ + GDataType *arg; /* Argument copié */ + + result = G_PROTO_TYPE(g_proto_type_new()); + + if (type->ret_type != NULL) + { + ret_type = g_data_type_dup(type->ret_type); + g_proto_type_set_return_type(result, ret_type); + } + + for (i = 0; i < type->count; i++) + { + arg = g_data_type_dup(type->args[i]); + g_proto_type_add_arg(result, arg); + } + + return G_DATA_TYPE(result); + +} + + +/****************************************************************************** +* * +* Paramètres : type = type à convertir. * +* include = doit-on inclure les espaces de noms ? * +* * +* Description : Décrit le type fourni sous forme de caractères. * +* * +* Retour : Chaîne à libérer de la mémoire après usage. * +* * +* Remarques : - * +* * +******************************************************************************/ + +static char *g_proto_type_to_string(const GProtoType *type, bool include) +{ + char *result; /* Valeur à renvoyer */ + GDataType *base; /* Version d'instance parente */ + char *namespace; /* Groupe d'appartenance */ + size_t i; /* Boucle de parcours */ + char *arg; /* Argument à décrire */ + + if (type->ret_type != NULL) + { + result = g_data_type_to_string(type->ret_type, include); + if (result == NULL) goto exit; + + result = stradd(result, " "); + + } + else + result = NULL; + + result = stradd(result, "("); + + base = G_DATA_TYPE(type); + + if (include && base->namespace != NULL) + { + namespace = g_data_type_to_string(base->namespace, true); + if (namespace == NULL) goto error; + + result = stradd(result, namespace); + result = stradd(result, base->ns_sep); + + free(namespace); + + } + + result = stradd(result, "*) ("); + + for (i = 0; i < type->count; i++) + { + if (i > 0) result = stradd(result, ", "); + + arg = g_data_type_to_string(type->args[i], include); + if (arg == NULL) goto error; + + result = stradd(result, arg); + free(arg); + + } + + result = stradd(result, ")"); + + exit: + + return result; + + error: + + free(result); + + return NULL; + +} + + +/****************************************************************************** +* * +* Paramètres : type = type à mettre à jour. * +* ret = indication sur le type de retour. * +* * +* Description : Définit le type de retour d'un prototype. * +* * +* Retour : - * +* * +* Remarques : - * +* * +******************************************************************************/ + +void g_proto_type_set_return_type(GProtoType *type, GDataType *ret) +{ + if (type->ret_type != NULL) + g_object_unref(G_OBJECT(type->ret_type)); + + type->ret_type = ret; + +} + + +/****************************************************************************** +* * +* Paramètres : type = type à consulter. * +* * +* Description : Fournit le type de retour d'un prototype. * +* * +* Retour : Indication sur le type de retour en place. * +* * +* Remarques : - * +* * +******************************************************************************/ + +GDataType *g_proto_type_get_return_type(const GProtoType *type) +{ + GDataType *result; /* Type de retour à renvoyer */ + + result = type->ret_type; + + if (result != NULL) + g_object_ref(G_OBJECT(result)); + + return result; + +} + + +/****************************************************************************** +* * +* Paramètres : type = type à mettre à jour. * +* arg = nouvel argument à intégrer au prototype. * +* * +* Description : Ajoute un argument à un prototype. * +* * +* Retour : - * +* * +* Remarques : - * +* * +******************************************************************************/ + +void g_proto_type_add_arg(GProtoType *type, GDataType *arg) +{ + type->args = (GDataType **)realloc(type->args, ++type->count * sizeof(GDataType *)); + type->args[type->count - 1] = arg; + +} + + +/****************************************************************************** +* * +* Paramètres : type = type à consulter. * +* * +* Description : Indique le nombre d'arguments associés au prototype. * +* * +* Retour : Nombre de paramètres inclus dans le gabarit. * +* * +* Remarques : - * +* * +******************************************************************************/ + +size_t g_proto_type_count_args(const GProtoType *type) +{ + return type->count; + +} + + +/****************************************************************************** +* * +* Paramètres : type = type à consulter. * +* index = indice du type d'argument à retourner. * +* * +* Description : Fournit un argument donné du prototype. * +* * +* Retour : Type d'argument ou NULL si mauvais indice. * +* * +* Remarques : - * +* * +******************************************************************************/ + +GDataType *g_proto_type_get_arg(const GProtoType *type, size_t index) +{ + GDataType *result; /* Argument à retourner */ + + assert(index < type->count); + + if (index < type->count) + { + result = type->args[index]; + g_object_ref(G_OBJECT(result)); + } + + else + result = NULL; + + return result; + +} |