diff options
Diffstat (limited to 'src/analysis/types')
| -rw-r--r-- | src/analysis/types/array.c | 118 | ||||
| -rw-r--r-- | src/analysis/types/basic.c | 69 | ||||
| -rw-r--r-- | src/analysis/types/cse.c | 88 | ||||
| -rw-r--r-- | src/analysis/types/encaps.c | 87 | ||||
| -rw-r--r-- | src/analysis/types/expr.c | 81 | ||||
| -rw-r--r-- | src/analysis/types/literal.c | 81 | ||||
| -rw-r--r-- | src/analysis/types/override.c | 120 | ||||
| -rw-r--r-- | src/analysis/types/proto.c | 98 | ||||
| -rw-r--r-- | src/analysis/types/template.c | 107 |
9 files changed, 849 insertions, 0 deletions
diff --git a/src/analysis/types/array.c b/src/analysis/types/array.c index 5ea4179..b8321a2 100644 --- a/src/analysis/types/array.c +++ b/src/analysis/types/array.c @@ -72,6 +72,12 @@ static void g_array_type_dispose(GArrayType *); /* Procède à la libération totale de la mémoire. */ static void g_array_type_finalize(GArrayType *); +/* Charge un objet depuis une mémoire tampon. */ +static bool g_array_type_load(GArrayType *, GObjectStorage *, packed_buffer *); + +/* Sauvegarde un objet dans une mémoire tampon. */ +static bool g_array_type_store(const GArrayType *, GObjectStorage *, packed_buffer *); + /* Calcule une empreinte pour un type de données. */ static guint g_array_type_hash(const GArrayType *); @@ -111,6 +117,9 @@ static void g_array_type_class_init(GArrayTypeClass *klass) type = G_DATA_TYPE_CLASS(klass); + type->load = (type_load_fc)g_array_type_load; + type->store = (type_store_fc)g_array_type_store; + type->hash = (type_hash_fc)g_array_type_hash; type->dup = (type_dup_fc)g_array_type_dup; type->to_string = (type_to_string_fc)g_array_type_to_string; @@ -210,6 +219,115 @@ GDataType *g_array_type_new(GDataType *members) /****************************************************************************** * * +* Paramètres : type = type de données à constuire. * +* storage = conservateur de données à manipuler ou NULL. * +* pbuf = zone tampon à remplir. * +* * +* Description : Charge un objet depuis une mémoire tampon. * +* * +* Retour : Bilan de l'opération. * +* * +* Remarques : - * +* * +******************************************************************************/ + +static bool g_array_type_load(GArrayType *type, GObjectStorage *storage, packed_buffer *pbuf) +{ + bool result; /* Bilan à retourner */ + bool numbered; /* Choix de la dimension */ + leb128_t number; /* Valeur LEB128 à charger */ + uleb128_t value; /* Valeur ULEB128 à charger */ + + result = G_DATA_TYPE_CLASS(g_array_type_parent_class)->load(G_DATA_TYPE(type), storage, pbuf); + if (!result) goto exit; + + result = extract_packed_buffer(pbuf, &numbered, sizeof(uint8_t), false); + if (!result) goto exit; + + type->numbered = (numbered == 0x01); + + if (type->numbered) + { + result = unpack_leb128(&number, pbuf); + if (!result) goto exit; + + type->dim_number = number; + + } + else + { + result = unpack_uleb128(&value, pbuf); + if (!result) goto exit; + + type->dim_expr = calloc(value, sizeof(char)); + result = extract_packed_buffer(pbuf, type->dim_expr, value, false); + if (!result) goto exit; + + } + + result = g_serializable_object_load(G_SERIALIZABLE_OBJECT(type->members), storage, pbuf); + + exit: + + return result; + +} + + +/****************************************************************************** +* * +* Paramètres : type = type de données à consulter. * +* storage = conservateur de données à manipuler ou NULL. * +* pbuf = zone tampon à remplir. * +* * +* Description : Sauvegarde un objet dans une mémoire tampon. * +* * +* Retour : Bilan de l'opération. * +* * +* Remarques : - * +* * +******************************************************************************/ + +static bool g_array_type_store(const GArrayType *type, GObjectStorage *storage, packed_buffer *pbuf) +{ + bool result; /* Bilan à retourner */ + size_t len; /* Taille d'une chaîne */ + + result = G_DATA_TYPE_CLASS(g_array_type_parent_class)->store(G_DATA_TYPE(type), storage, pbuf); + if (!result) goto exit; + + result = extend_packed_buffer(pbuf, (uint8_t []){ type->numbered ? 0x01 : 0x00 }, sizeof(uint8_t), false); + if (!result) goto exit; + + if (type->numbered) + { + result = pack_leb128((leb128_t []){ type->dim_number }, pbuf); + if (!result) goto exit; + + } + else + { + len = strlen(type->dim_expr); + + result = pack_uleb128((uleb128_t []){ len }, pbuf); + if (!result) goto exit; + + result = extend_packed_buffer(pbuf, type->dim_expr, len, false); + if (!result) goto exit; + + } + + result = g_serializable_object_store(G_SERIALIZABLE_OBJECT(type->members), storage, pbuf); + + exit: + + return result; + +} + + +/****************************************************************************** +* * * Paramètres : type = type à consulter. * * * * Description : Calcule une empreinte pour un type de données. * diff --git a/src/analysis/types/basic.c b/src/analysis/types/basic.c index 038bfb0..3932ce4 100644 --- a/src/analysis/types/basic.c +++ b/src/analysis/types/basic.c @@ -61,6 +61,12 @@ static void g_basic_type_dispose(GBasicType *); /* Procède à la libération totale de la mémoire. */ static void g_basic_type_finalize(GBasicType *); +/* Charge un objet depuis une mémoire tampon. */ +static bool g_basic_type_load(GBasicType *, GObjectStorage *, packed_buffer *); + +/* Sauvegarde un objet dans une mémoire tampon. */ +static bool g_basic_type_store(const GBasicType *, GObjectStorage *, packed_buffer *); + /* Calcule une empreinte pour un type de données. */ static guint g_basic_type_hash(const GBasicType *); @@ -100,6 +106,9 @@ static void g_basic_type_class_init(GBasicTypeClass *klass) type = G_DATA_TYPE_CLASS(klass); + type->load = (type_load_fc)g_basic_type_load; + type->store = (type_store_fc)g_basic_type_store; + type->hash = (type_hash_fc)g_basic_type_hash; type->dup = (type_dup_fc)g_basic_type_dup; type->to_string = (type_to_string_fc)g_basic_type_to_string; @@ -191,6 +200,66 @@ GDataType *g_basic_type_new(BaseType type) /****************************************************************************** * * +* Paramètres : type = type de données à constuire. * +* storage = conservateur de données à manipuler ou NULL. * +* pbuf = zone tampon à remplir. * +* * +* Description : Charge un objet depuis une mémoire tampon. * +* * +* Retour : Bilan de l'opération. * +* * +* Remarques : - * +* * +******************************************************************************/ + +static bool g_basic_type_load(GBasicType *type, GObjectStorage *storage, packed_buffer *pbuf) +{ + bool result; /* Bilan à retourner */ + uleb128_t value; /* Valeur ULEB128 à charger */ + + result = G_DATA_TYPE_CLASS(g_basic_type_parent_class)->load(G_DATA_TYPE(type), storage, pbuf); + + if (result) + result = unpack_uleb128(&value, pbuf); + + if (result) + type->type = value; + + return result; + +} + + +/****************************************************************************** +* * +* Paramètres : type = type de données à consulter. * +* storage = conservateur de données à manipuler ou NULL. * +* pbuf = zone tampon à remplir. * +* * +* Description : Sauvegarde un objet dans une mémoire tampon. * +* * +* Retour : Bilan de l'opération. * +* * +* Remarques : - * +* * +******************************************************************************/ + +static bool g_basic_type_store(const GBasicType *type, GObjectStorage *storage, packed_buffer *pbuf) +{ + bool result; /* Bilan à retourner */ + + result = G_DATA_TYPE_CLASS(g_basic_type_parent_class)->store(G_DATA_TYPE(type), storage, pbuf); + + if (result) + result = pack_uleb128((uleb128_t []){ type->type }, pbuf); + + return result; + +} + + +/****************************************************************************** +* * * Paramètres : type = type à consulter. * * * * Description : Calcule une empreinte pour un type de données. * diff --git a/src/analysis/types/cse.c b/src/analysis/types/cse.c index c79ea72..78db252 100644 --- a/src/analysis/types/cse.c +++ b/src/analysis/types/cse.c @@ -62,6 +62,12 @@ static void g_class_enum_type_dispose(GClassEnumType *); /* Procède à la libération totale de la mémoire. */ static void g_class_enum_type_finalize(GClassEnumType *); +/* Charge un objet depuis une mémoire tampon. */ +static bool g_class_enum_type_load(GClassEnumType *, GObjectStorage *, packed_buffer *); + +/* Sauvegarde un objet dans une mémoire tampon. */ +static bool g_class_enum_type_store(const GClassEnumType *, GObjectStorage *, packed_buffer *); + /* Calcule une empreinte pour un type de données. */ static guint g_class_enum_type_hash(const GClassEnumType *); @@ -101,6 +107,9 @@ static void g_class_enum_type_class_init(GClassEnumTypeClass *klass) type = G_DATA_TYPE_CLASS(klass); + type->load = (type_load_fc)g_class_enum_type_load; + type->store = (type_store_fc)g_class_enum_type_store; + type->hash = (type_hash_fc)g_class_enum_type_hash; type->dup = (type_dup_fc)g_class_enum_type_dup; type->to_string = (type_to_string_fc)g_class_enum_type_to_string; @@ -198,6 +207,85 @@ GDataType *g_class_enum_type_new(ClassEnumKind kind, char *name) /****************************************************************************** * * +* Paramètres : type = type de données à constuire. * +* storage = conservateur de données à manipuler ou NULL. * +* pbuf = zone tampon à remplir. * +* * +* Description : Charge un objet depuis une mémoire tampon. * +* * +* Retour : Bilan de l'opération. * +* * +* Remarques : - * +* * +******************************************************************************/ + +static bool g_class_enum_type_load(GClassEnumType *type, GObjectStorage *storage, packed_buffer *pbuf) +{ + bool result; /* Bilan à retourner */ + uleb128_t value; /* Valeur ULEB128 à charger */ + + result = G_DATA_TYPE_CLASS(g_class_enum_type_parent_class)->load(G_DATA_TYPE(type), storage, pbuf); + if (!result) goto exit; + + result = unpack_uleb128(&value, pbuf); + if (!result) goto exit; + + type->kind = value; + + result = unpack_uleb128(&value, pbuf); + if (!result) goto exit; + + type->name = calloc(value, sizeof(char)); + result = extract_packed_buffer(pbuf, type->name, value, false); + + exit: + + return result; + +} + + +/****************************************************************************** +* * +* Paramètres : type = type de données à consulter. * +* storage = conservateur de données à manipuler ou NULL. * +* pbuf = zone tampon à remplir. * +* * +* Description : Sauvegarde un objet dans une mémoire tampon. * +* * +* Retour : Bilan de l'opération. * +* * +* Remarques : - * +* * +******************************************************************************/ + +static bool g_class_enum_type_store(const GClassEnumType *type, GObjectStorage *storage, packed_buffer *pbuf) +{ + bool result; /* Bilan à retourner */ + size_t len; /* Taille d'une chaîne */ + + result = G_DATA_TYPE_CLASS(g_class_enum_type_parent_class)->store(G_DATA_TYPE(type), storage, pbuf); + if (!result) goto exit; + + result = pack_uleb128((uleb128_t []){ g_class_enum_type_get_kind(type) }, pbuf); + if (!result) goto exit; + + len = strlen(type->name); + + result = pack_uleb128((uleb128_t []){ len }, pbuf); + if (!result) goto exit; + + result = extend_packed_buffer(pbuf, type->name, len, false); + + exit: + + return result; + +} + + +/****************************************************************************** +* * * Paramètres : type = type à consulter. * * * * Description : Calcule une empreinte pour un type de données. * diff --git a/src/analysis/types/encaps.c b/src/analysis/types/encaps.c index 8e2641f..bfb4e57 100644 --- a/src/analysis/types/encaps.c +++ b/src/analysis/types/encaps.c @@ -65,6 +65,12 @@ static void g_encapsulated_type_dispose(GEncapsulatedType *); /* Procède à la libération totale de la mémoire. */ static void g_encapsulated_type_finalize(GEncapsulatedType *); +/* Charge un objet depuis une mémoire tampon. */ +static bool g_encapsulated_type_load(GEncapsulatedType *, GObjectStorage *, packed_buffer *); + +/* Sauvegarde un objet dans une mémoire tampon. */ +static bool g_encapsulated_type_store(const GEncapsulatedType *, GObjectStorage *, packed_buffer *); + /* Calcule une empreinte pour un type de données. */ static guint g_encapsulated_type_hash(const GEncapsulatedType *); @@ -110,6 +116,9 @@ static void g_encapsulated_type_class_init(GEncapsulatedTypeClass *klass) type = G_DATA_TYPE_CLASS(klass); + type->load = (type_load_fc)g_encapsulated_type_load; + type->store = (type_store_fc)g_encapsulated_type_store; + type->hash = (type_hash_fc)g_encapsulated_type_hash; type->dup = (type_dup_fc)g_encapsulated_type_dup; type->to_string = (type_to_string_fc)g_encapsulated_type_to_string; @@ -212,6 +221,84 @@ GDataType *g_encapsulated_type_new(EncapsulationType type, GDataType *child) /****************************************************************************** * * +* Paramètres : type = type de données à constuire. * +* storage = conservateur de données à manipuler ou NULL. * +* pbuf = zone tampon à remplir. * +* * +* Description : Charge un objet depuis une mémoire tampon. * +* * +* Retour : Bilan de l'opération. * +* * +* Remarques : - * +* * +******************************************************************************/ + +static bool g_encapsulated_type_load(GEncapsulatedType *type, GObjectStorage *storage, packed_buffer *pbuf) +{ + bool result; /* Bilan à retourner */ + uleb128_t value; /* Valeur ULEB128 à charger */ + + result = G_DATA_TYPE_CLASS(g_encapsulated_type_parent_class)->load(G_DATA_TYPE(type), storage, pbuf); + if (!result) goto exit; + + result = unpack_uleb128(&value, pbuf); + if (!result) goto exit; + + type->type = value; + + result = g_serializable_object_load(G_SERIALIZABLE_OBJECT(type->child), storage, pbuf); + if (!result) goto exit; + + result = unpack_uleb128(&value, pbuf); + if (!result) goto exit; + + type->dimension = value; + + exit: + + return result; + +} + + +/****************************************************************************** +* * +* Paramètres : type = type de données à consulter. * +* storage = conservateur de données à manipuler ou NULL. * +* pbuf = zone tampon à remplir. * +* * +* Description : Sauvegarde un objet dans une mémoire tampon. * +* * +* Retour : Bilan de l'opération. * +* * +* Remarques : - * +* * +******************************************************************************/ + +static bool g_encapsulated_type_store(const GEncapsulatedType *type, GObjectStorage *storage, packed_buffer *pbuf) +{ + bool result; /* Bilan à retourner */ + + result = G_DATA_TYPE_CLASS(g_encapsulated_type_parent_class)->store(G_DATA_TYPE(type), storage, pbuf); + if (!result) goto exit; + + result = pack_uleb128((uleb128_t []){ g_encapsulated_type_get_etype(type) }, pbuf); + if (!result) goto exit; + + result = g_serializable_object_store(G_SERIALIZABLE_OBJECT(type->child), storage, pbuf); + if (!result) goto exit; + + result = pack_uleb128((uleb128_t []){ type->dimension }, pbuf); + + exit: + + return result; + +} + + +/****************************************************************************** +* * * Paramètres : type = type à consulter. * * * * Description : Calcule une empreinte pour un type de données. * diff --git a/src/analysis/types/expr.c b/src/analysis/types/expr.c index 1119ab6..a98e039 100644 --- a/src/analysis/types/expr.c +++ b/src/analysis/types/expr.c @@ -61,6 +61,12 @@ static void g_expr_type_dispose(GExprType *); /* Procède à la libération totale de la mémoire. */ static void g_expr_type_finalize(GExprType *); +/* Charge un objet depuis une mémoire tampon. */ +static bool g_expr_type_load(GExprType *, GObjectStorage *, packed_buffer *); + +/* Sauvegarde un objet dans une mémoire tampon. */ +static bool g_expr_type_store(const GExprType *, GObjectStorage *, packed_buffer *); + /* Calcule une empreinte pour un type de données. */ static guint g_expr_type_hash(const GExprType *); @@ -100,6 +106,9 @@ static void g_expr_type_class_init(GExprTypeClass *klass) type = G_DATA_TYPE_CLASS(klass); + type->load = (type_load_fc)g_expr_type_load; + type->store = (type_store_fc)g_expr_type_store; + type->hash = (type_hash_fc)g_expr_type_hash; type->dup = (type_dup_fc)g_expr_type_dup; type->to_string = (type_to_string_fc)g_expr_type_to_string; @@ -194,6 +203,78 @@ GDataType *g_expr_type_new(const char *value) /****************************************************************************** * * +* Paramètres : type = type de données à constuire. * +* storage = conservateur de données à manipuler ou NULL. * +* pbuf = zone tampon à remplir. * +* * +* Description : Charge un objet depuis une mémoire tampon. * +* * +* Retour : Bilan de l'opération. * +* * +* Remarques : - * +* * +******************************************************************************/ + +static bool g_expr_type_load(GExprType *type, GObjectStorage *storage, packed_buffer *pbuf) +{ + bool result; /* Bilan à retourner */ + uleb128_t value; /* Valeur ULEB128 à charger */ + + result = G_DATA_TYPE_CLASS(g_expr_type_parent_class)->load(G_DATA_TYPE(type), storage, pbuf); + if (!result) goto exit; + + result = unpack_uleb128(&value, pbuf); + if (!result) goto exit; + + type->value = calloc(value, sizeof(char)); + result = extract_packed_buffer(pbuf, type->value, value, false); + + exit: + + return result; + +} + + +/****************************************************************************** +* * +* Paramètres : type = type de données à consulter. * +* storage = conservateur de données à manipuler ou NULL. * +* pbuf = zone tampon à remplir. * +* * +* Description : Sauvegarde un objet dans une mémoire tampon. * +* * +* Retour : Bilan de l'opération. * +* * +* Remarques : - * +* * +******************************************************************************/ + +static bool g_expr_type_store(const GExprType *type, GObjectStorage *storage, packed_buffer *pbuf) +{ + bool result; /* Bilan à retourner */ + size_t len; /* Taille d'une chaîne */ + + result = G_DATA_TYPE_CLASS(g_expr_type_parent_class)->store(G_DATA_TYPE(type), storage, pbuf); + if (!result) goto exit; + + len = strlen(type->value); + + result = pack_uleb128((uleb128_t []){ len }, pbuf); + if (!result) goto exit; + + result = extend_packed_buffer(pbuf, type->value, len, false); + if (!result) goto exit; + + exit: + + return result; + +} + + +/****************************************************************************** +* * * Paramètres : type = type à consulter. * * * * Description : Calcule une empreinte pour un type de données. * diff --git a/src/analysis/types/literal.c b/src/analysis/types/literal.c index addab5a..2a4aa45 100644 --- a/src/analysis/types/literal.c +++ b/src/analysis/types/literal.c @@ -64,6 +64,12 @@ static void g_literal_type_dispose(GLiteralType *); /* Procède à la libération totale de la mémoire. */ static void g_literal_type_finalize(GLiteralType *); +/* Charge un objet depuis une mémoire tampon. */ +static bool g_literal_type_load(GLiteralType *, GObjectStorage *, packed_buffer *); + +/* Sauvegarde un objet dans une mémoire tampon. */ +static bool g_literal_type_store(const GLiteralType *, GObjectStorage *, packed_buffer *); + /* Calcule une empreinte pour un type de données. */ static guint g_literal_type_hash(const GLiteralType *); @@ -103,6 +109,9 @@ static void g_literal_type_class_init(GLiteralTypeClass *klass) type = G_DATA_TYPE_CLASS(klass); + type->load = (type_load_fc)g_literal_type_load; + type->store = (type_store_fc)g_literal_type_store; + type->hash = (type_hash_fc)g_literal_type_hash; type->dup = (type_dup_fc)g_literal_type_dup; type->to_string = (type_to_string_fc)g_literal_type_to_string; @@ -206,6 +215,78 @@ GDataType *g_literal_type_new(GDataType *orig, const literal_value *value) /****************************************************************************** * * +* Paramètres : type = type de données à constuire. * +* storage = conservateur de données à manipuler ou NULL. * +* pbuf = zone tampon à remplir. * +* * +* Description : Charge un objet depuis une mémoire tampon. * +* * +* Retour : Bilan de l'opération. * +* * +* Remarques : - * +* * +******************************************************************************/ + +static bool g_literal_type_load(GLiteralType *type, GObjectStorage *storage, packed_buffer *pbuf) +{ + bool result; /* Bilan à retourner */ + + result = G_DATA_TYPE_CLASS(g_literal_type_parent_class)->load(G_DATA_TYPE(type), storage, pbuf); + if (!result) goto exit; + + result = g_serializable_object_load(G_SERIALIZABLE_OBJECT(type->orig), storage, pbuf); + if (!result) goto exit; + + if (g_basic_type_get_base(G_BASIC_TYPE(type->orig)) == BTP_FLOAT) + result = extract_packed_buffer(pbuf, (uint64_t *)&type->value.float_val, sizeof(uint64_t), true); + else + result = extract_packed_buffer(pbuf, (uint32_t *)&type->value.int_val, sizeof(uint32_t), true); + + exit: + + return result; + +} + + +/****************************************************************************** +* * +* Paramètres : type = type de données à consulter. * +* storage = conservateur de données à manipuler ou NULL. * +* pbuf = zone tampon à remplir. * +* * +* Description : Sauvegarde un objet dans une mémoire tampon. * +* * +* Retour : Bilan de l'opération. * +* * +* Remarques : - * +* * +******************************************************************************/ + +static bool g_literal_type_store(const GLiteralType *type, GObjectStorage *storage, packed_buffer *pbuf) +{ + bool result; /* Bilan à retourner */ + + result = G_DATA_TYPE_CLASS(g_literal_type_parent_class)->store(G_DATA_TYPE(type), storage, pbuf); + if (!result) goto exit; + + result = g_serializable_object_store(G_SERIALIZABLE_OBJECT(type->orig), storage, pbuf); + if (!result) goto exit; + + if (g_basic_type_get_base(G_BASIC_TYPE(type->orig)) == BTP_FLOAT) + result = extend_packed_buffer(pbuf, (uint64_t []){ type->value.float_val }, sizeof(uint64_t), true); + else + result = extend_packed_buffer(pbuf, (uint32_t []){ type->value.int_val }, sizeof(uint32_t), true); + + exit: + + return result; + +} + + +/****************************************************************************** +* * * Paramètres : type = type à consulter. * * * * Description : Calcule une empreinte pour un type de données. * diff --git a/src/analysis/types/override.c b/src/analysis/types/override.c index 841f10c..2beb934 100644 --- a/src/analysis/types/override.c +++ b/src/analysis/types/override.c @@ -65,6 +65,12 @@ static void g_override_type_dispose(GOverrideType *); /* Procède à la libération totale de la mémoire. */ static void g_override_type_finalize(GOverrideType *); +/* Charge un objet depuis une mémoire tampon. */ +static bool g_override_type_load(GOverrideType *, GObjectStorage *, packed_buffer *); + +/* Sauvegarde un objet dans une mémoire tampon. */ +static bool g_override_type_store(const GOverrideType *, GObjectStorage *, packed_buffer *); + /* Calcule une empreinte pour un type de données. */ static guint g_override_type_hash(const GOverrideType *); @@ -104,6 +110,9 @@ static void g_override_type_class_init(GOverrideTypeClass *klass) type = G_DATA_TYPE_CLASS(klass); + type->load = (type_load_fc)g_override_type_load; + type->store = (type_store_fc)g_override_type_store; + type->hash = (type_hash_fc)g_override_type_hash; type->dup = (type_dup_fc)g_override_type_dup; type->to_string = (type_to_string_fc)g_override_type_to_string; @@ -233,6 +242,117 @@ GDataType *g_override_type_new_with_covariant(GDataType *base, const call_offset /****************************************************************************** * * +* Paramètres : type = type de données à constuire. * +* storage = conservateur de données à manipuler ou NULL. * +* pbuf = zone tampon à remplir. * +* * +* Description : Charge un objet depuis une mémoire tampon. * +* * +* Retour : Bilan de l'opération. * +* * +* Remarques : - * +* * +******************************************************************************/ + +static bool g_override_type_load(GOverrideType *type, GObjectStorage *storage, packed_buffer *pbuf) +{ + bool result; /* Bilan à retourner */ + size_t i; /* Boucle de parcours */ + call_offset_t *offset; /* Décalage à traiter */ + leb128_t value; /* Valeur à dépiler */ + bool status; /* Valeur booléenne */ + + result = G_DATA_TYPE_CLASS(g_override_type_parent_class)->load(G_DATA_TYPE(type), storage, pbuf); + if (!result) goto exit; + + result = g_serializable_object_load(G_SERIALIZABLE_OBJECT(type->base), storage, pbuf); + if (!result) goto exit; + + for (i = 0; i < 2; i++) + { + offset = &type->offsets[i]; + + result = unpack_leb128(&value, pbuf); + if (!result) goto exit; + + offset->values[0] = value; + + result = unpack_leb128(&value, pbuf); + if (!result) goto exit; + + offset->values[1] = value; + + result = extract_packed_buffer(pbuf, &status, sizeof(uint8_t), false); + if (!result) goto exit; + + offset->virtual = (status == 0x01); + + } + + result = extract_packed_buffer(pbuf, &status, sizeof(uint8_t), false); + if (!result) goto exit; + + type->with_covariant = (status == 0x01); + + exit: + + return result; + +} + + +/****************************************************************************** +* * +* Paramètres : type = type de données à consulter. * +* storage = conservateur de données à manipuler ou NULL. * +* pbuf = zone tampon à remplir. * +* * +* Description : Sauvegarde un objet dans une mémoire tampon. * +* * +* Retour : Bilan de l'opération. * +* * +* Remarques : - * +* * +******************************************************************************/ + +static bool g_override_type_store(const GOverrideType *type, GObjectStorage *storage, packed_buffer *pbuf) +{ + bool result; /* Bilan à retourner */ + size_t i; /* Boucle de parcours */ + const call_offset_t *offset; /* Décalage à traiter */ + + result = G_DATA_TYPE_CLASS(g_override_type_parent_class)->store(G_DATA_TYPE(type), storage, pbuf); + if (!result) goto exit; + + result = g_serializable_object_store(G_SERIALIZABLE_OBJECT(type->base), storage, pbuf); + if (!result) goto exit; + + for (i = 0; i < 2; i++) + { + offset = &type->offsets[i]; + + result = pack_leb128((leb128_t []){ offset->values[0] }, pbuf); + if (!result) goto exit; + + result = pack_leb128((leb128_t []){ offset->values[1] }, pbuf); + if (!result) goto exit; + + result = extend_packed_buffer(pbuf, (uint8_t []){ offset->virtual ? 0x01 : 0x00 }, sizeof(uint8_t), false); + if (!result) goto exit; + + } + + result = extend_packed_buffer(pbuf, (uint8_t []){ type->with_covariant ? 0x01 : 0x00 }, sizeof(uint8_t), false); + + exit: + + return result; + +} + + +/****************************************************************************** +* * * Paramètres : type = type à consulter. * * * * Description : Calcule une empreinte pour un type de données. * diff --git a/src/analysis/types/proto.c b/src/analysis/types/proto.c index 135c15a..aa096d8 100644 --- a/src/analysis/types/proto.c +++ b/src/analysis/types/proto.c @@ -66,6 +66,12 @@ static void g_proto_type_dispose(GProtoType *); /* Procède à la libération totale de la mémoire. */ static void g_proto_type_finalize(GProtoType *); +/* Charge un objet depuis une mémoire tampon. */ +static bool g_proto_type_load(GProtoType *, GObjectStorage *, packed_buffer *); + +/* Sauvegarde un objet dans une mémoire tampon. */ +static bool g_proto_type_store(const GProtoType *, GObjectStorage *, packed_buffer *); + /* Calcule une empreinte pour un type de données. */ static guint g_proto_type_hash(const GProtoType *); @@ -108,6 +114,9 @@ static void g_proto_type_class_init(GProtoTypeClass *klass) type = G_DATA_TYPE_CLASS(klass); + type->load = (type_load_fc)g_proto_type_load; + type->store = (type_store_fc)g_proto_type_store; + type->hash = (type_hash_fc)g_proto_type_hash; type->dup = (type_dup_fc)g_proto_type_dup; type->to_string = (type_to_string_fc)g_proto_type_to_string; @@ -213,6 +222,95 @@ GDataType *g_proto_type_new(void) /****************************************************************************** * * +* Paramètres : type = type de données à constuire. * +* storage = conservateur de données à manipuler ou NULL. * +* pbuf = zone tampon à remplir. * +* * +* Description : Charge un objet depuis une mémoire tampon. * +* * +* Retour : Bilan de l'opération. * +* * +* Remarques : - * +* * +******************************************************************************/ + +static bool g_proto_type_load(GProtoType *type, GObjectStorage *storage, packed_buffer *pbuf) +{ + bool result; /* Bilan à retourner */ + uleb128_t value; /* Valeur ULEB128 à charger */ + size_t i; /* Boucle de parcours */ + + result = G_DATA_TYPE_CLASS(g_proto_type_parent_class)->load(G_DATA_TYPE(type), storage, pbuf); + if (!result) goto exit; + + result = g_serializable_object_load(G_SERIALIZABLE_OBJECT(type->ret_type), storage, pbuf); + if (!result) goto exit; + + result = unpack_uleb128(&value, pbuf); + if (!result) goto exit; + + type->count = value; + + type->args = calloc(value, sizeof(GDataType *)); + + for (i = 0; i < type->count; i++) + { + result = g_serializable_object_load(G_SERIALIZABLE_OBJECT(type->args[i]), storage, pbuf); + if (!result) goto exit; + + } + + exit: + + return result; + +} + + +/****************************************************************************** +* * +* Paramètres : type = type de données à consulter. * +* storage = conservateur de données à manipuler ou NULL. * +* pbuf = zone tampon à remplir. * +* * +* Description : Sauvegarde un objet dans une mémoire tampon. * +* * +* Retour : Bilan de l'opération. * +* * +* Remarques : - * +* * +******************************************************************************/ + +static bool g_proto_type_store(const GProtoType *type, GObjectStorage *storage, packed_buffer *pbuf) +{ + bool result; /* Bilan à retourner */ + size_t i; /* Boucle de parcours */ + + result = G_DATA_TYPE_CLASS(g_proto_type_parent_class)->store(G_DATA_TYPE(type), storage, pbuf); + if (!result) goto exit; + + result = g_serializable_object_store(G_SERIALIZABLE_OBJECT(type->ret_type), storage, pbuf); + if (!result) goto exit; + + result = pack_uleb128((uleb128_t []){ type->count }, pbuf); + if (!result) goto exit; + + for (i = 0; i < type->count; i++) + { + result = g_serializable_object_store(G_SERIALIZABLE_OBJECT(type->args[i]), storage, pbuf); + if (!result) goto exit; + + } + + exit: + + return result; + +} + + +/****************************************************************************** +* * * Paramètres : type = type à consulter. * * * * Description : Calcule une empreinte pour un type de données. * diff --git a/src/analysis/types/template.c b/src/analysis/types/template.c index 3a58169..05f7a2f 100644 --- a/src/analysis/types/template.c +++ b/src/analysis/types/template.c @@ -66,6 +66,12 @@ static void g_template_type_dispose(GTemplateType *); /* Procède à la libération totale de la mémoire. */ static void g_template_type_finalize(GTemplateType *); +/* Charge un objet depuis une mémoire tampon. */ +static bool g_template_type_load(GTemplateType *, GObjectStorage *, packed_buffer *); + +/* Sauvegarde un objet dans une mémoire tampon. */ +static bool g_template_type_store(const GTemplateType *, GObjectStorage *, packed_buffer *); + /* Calcule une empreinte pour un type de données. */ static guint g_template_type_hash(const GTemplateType *); @@ -105,6 +111,9 @@ static void g_template_type_class_init(GTemplateTypeClass *klass) type = G_DATA_TYPE_CLASS(klass); + type->load = (type_load_fc)g_template_type_load; + type->store = (type_store_fc)g_template_type_store; + type->hash = (type_hash_fc)g_template_type_hash; type->dup = (type_dup_fc)g_template_type_dup; type->to_string = (type_to_string_fc)g_template_type_to_string; @@ -208,6 +217,104 @@ GDataType *g_template_type_new(void) /****************************************************************************** * * +* Paramètres : type = type de données à constuire. * +* storage = conservateur de données à manipuler ou NULL. * +* pbuf = zone tampon à remplir. * +* * +* Description : Charge un objet depuis une mémoire tampon. * +* * +* Retour : Bilan de l'opération. * +* * +* Remarques : - * +* * +******************************************************************************/ + +static bool g_template_type_load(GTemplateType *type, GObjectStorage *storage, packed_buffer *pbuf) +{ + bool result; /* Bilan à retourner */ + uleb128_t value; /* Valeur ULEB128 à charger */ + size_t i; /* Boucle de parcours */ + + result = G_DATA_TYPE_CLASS(g_template_type_parent_class)->load(G_DATA_TYPE(type), storage, pbuf); + if (!result) goto exit; + + result = unpack_uleb128(&value, pbuf); + if (!result) goto exit; + + type->name = calloc(value, sizeof(char)); + result = extract_packed_buffer(pbuf, type->name, value, false); + + result = unpack_uleb128(&value, pbuf); + if (!result) goto exit; + + type->count = value; + + type->params = calloc(value, sizeof(GDataType *)); + + for (i = 0; i < type->count; i++) + { + result = g_serializable_object_load(G_SERIALIZABLE_OBJECT(type->params[i]), storage, pbuf); + if (!result) goto exit; + + } + + exit: + + return result; + +} + + +/****************************************************************************** +* * +* Paramètres : type = type de données à consulter. * +* storage = conservateur de données à manipuler ou NULL. * +* pbuf = zone tampon à remplir. * +* * +* Description : Sauvegarde un objet dans une mémoire tampon. * +* * +* Retour : Bilan de l'opération. * +* * +* Remarques : - * +* * +******************************************************************************/ + +static bool g_template_type_store(const GTemplateType *type, GObjectStorage *storage, packed_buffer *pbuf) +{ + bool result; /* Bilan à retourner */ + size_t len; /* Taille d'une chaîne */ + size_t i; /* Boucle de parcours */ + + result = G_DATA_TYPE_CLASS(g_template_type_parent_class)->store(G_DATA_TYPE(type), storage, pbuf); + if (!result) goto exit; + + len = strlen(type->name); + + result = pack_uleb128((uleb128_t []){ len }, pbuf); + if (!result) goto exit; + + result = extend_packed_buffer(pbuf, type->name, len, false); + if (!result) goto exit; + + result = pack_uleb128((uleb128_t []){ type->count }, pbuf); + if (!result) goto exit; + + for (i = 0; i < type->count; i++) + { + result = g_serializable_object_store(G_SERIALIZABLE_OBJECT(type->params[i]), storage, pbuf); + if (!result) goto exit; + + } + + exit: + + return result; + +} + + +/****************************************************************************** +* * * Paramètres : type = type base sur des gabarits à modifier. * * * * Description : Indique la désignation principale du type. * |