/* $Id$ */
-/* datadesc_private - declarations visible only from within datadesc */
+/* datadesc - describing the data to exchange */
+
+/* module's private interface masked even to other parts of GRAS. */
/* Authors: Olivier Aumage, Martin Quinson */
/* Copyright (C) 2003, 2004 the GRAS posse. */
#include "gras_private.h"
#include "DataDesc/datadesc_interface.h"
+/**
+ * aligned:
+ *
+ * Align the data v on the boundary a.
+ */
#define aligned(v, a) (((v) + (a - 1)) & ~(a - 1))
extern gras_set_t *gras_datadesc_set_local;
+/*******************************************
+ * Descriptions of all known architectures *
+ *******************************************/
+
+#define gras_arch_count 1
+typedef enum {
+ gras_ddt_scalar_char = 0,
+ gras_ddt_scalar_short = 1,
+ gras_ddt_scalar_int = 2,
+ gras_ddt_scalar_long = 3,
+ gras_ddt_scalar_long_long = 4,
+
+ gras_ddt_scalar_pdata = 5,
+ gras_ddt_scalar_pfunc = 6,
+
+ gras_ddt_scalar_float = 7,
+ gras_ddt_scalar_double = 8
+} gras_ddt_scalar_type_t;
+
+typedef struct {
+ const char *name;
+
+ int endian;
+
+ int sizeof_scalars[9]; /* char,short,int,long,long_long,
+ pdata,pfunc,
+ float,double */
+} gras_arch_sizes_t;
+
+extern const gras_arch_sizes_t gras_arch_sizes[gras_arch_count];
+
+
/**********************************************************/
/* Actual definitions of the stuff in the type descriptor */
/**********************************************************/
typedef enum e_gras_datadesc_type_category {
e_gras_datadesc_type_cat_undefined = 0,
- e_gras_datadesc_type_cat_scalar,
- e_gras_datadesc_type_cat_struct,
- e_gras_datadesc_type_cat_union,
- e_gras_datadesc_type_cat_ref, /* ref to an uniq element */
- e_gras_datadesc_type_cat_array,
- e_gras_datadesc_type_cat_ignored,
+ e_gras_datadesc_type_cat_scalar = 1,
+ e_gras_datadesc_type_cat_struct = 2,
+ e_gras_datadesc_type_cat_union = 3,
+ e_gras_datadesc_type_cat_ref = 4, /* ref to an uniq element */
+ e_gras_datadesc_type_cat_array = 5,
+ e_gras_datadesc_type_cat_ignored = 6,
- e_gras_datadesc_type_cat_invalid
+ e_gras_datadesc_type_cat_invalid = 7
} gras_datadesc_type_category_t;
typedef struct s_gras_dd_cat_field {
char *name;
- long int offset; /* only for struct */
+ long int offset[gras_arch_count]; /* only for struct */
int code;
gras_datadesc_type_cb_void_t pre;
gras_datadesc_type_cb_void_t post;
} gras_dd_cat_field_t;
+
void gras_dd_cat_field_free(void *f);
/**
* Specific fields of a struct
*/
typedef struct s_gras_dd_cat_struct {
- gras_dynar_t *fields; /* elm type = gras_dd_cat_struct_field_t */
+ gras_dynar_t *fields; /* elm type = gras_dd_cat_field_t */
} gras_dd_cat_struct_t;
/**
* Specific fields of a union
*/
typedef struct s_gras_dd_cat_union {
- gras_datadesc_type_cb_int_t field_count;
- gras_dynar_t *fields; /* elm type = gras_dd_cat_union_field_t */
+ gras_datadesc_type_cb_int_t selector;
+ gras_dynar_t *fields; /* elm type = gras_dd_cat_field_t */
} gras_dd_cat_union_t;
/**
int code;
/* callback used to return the referenced type number */
- gras_datadesc_type_cb_int_t discriminant;
+ gras_datadesc_type_cb_int_t selector;
} gras_dd_cat_ref_t;
unsigned int name_len;
/* payload */
- long int size;
+ long int size[gras_arch_count];
- long int alignment;
- long int aligned_size;
+ long int alignment[gras_arch_count];
+ long int aligned_size[gras_arch_count];
enum e_gras_datadesc_type_category category_code;
union u_gras_datadesc_category category;
* Type creation functions *
***************************/
gras_error_t
-gras_ddt_new_scalar(const char *name,
- long int size,
- enum e_gras_dd_scalar_encoding encoding,
- gras_datadesc_type_cb_void_t cb,
- gras_datadesc_type_t **dst);
-gras_error_t
-gras_ddt_new_struct(const char *name,
- gras_datadesc_type_cb_void_t pre,
- gras_datadesc_type_cb_void_t post,
- gras_datadesc_type_t **dst);
-gras_error_t
-gras_ddt_new_struct_append(gras_datadesc_type_t *struct_type,
- const char *name,
- gras_datadesc_type_t *field_type,
- gras_datadesc_type_cb_void_t pre,
- gras_datadesc_type_cb_void_t post);
-gras_error_t
-gras_ddt_new_union(const char *name,
- gras_datadesc_type_cb_int_t field_count,
- gras_datadesc_type_cb_void_t post,
- gras_datadesc_type_t **dst);
-gras_error_t
-gras_ddt_new_union_append(gras_datadesc_type_t *union_type,
- const char *name,
- gras_datadesc_type_t *field_type,
- gras_datadesc_type_cb_void_t pre,
- gras_datadesc_type_cb_void_t post);
-gras_error_t
-gras_ddt_new_ref(const char *name,
- gras_datadesc_type_t *referenced_type,
- gras_datadesc_type_cb_int_t discriminant,
- gras_datadesc_type_cb_void_t post,
- gras_datadesc_type_t **dst);
-gras_error_t
-gras_ddt_new_array(const char *name,
- gras_datadesc_type_t *element_type,
- long int fixed_size,
- gras_datadesc_type_cb_int_t dynamic_size,
- gras_datadesc_type_cb_void_t post,
- gras_datadesc_type_t **dst);
-gras_error_t
-gras_ddt_new_ignored(const char *name,
- void *default_value,
- void_f_pvoid_t *free_func,
- long int size,
- long int alignment,
- gras_datadesc_type_cb_void_t post,
- gras_datadesc_type_t **dst);
-
-
+gras_datadesc_declare_scalar(const char *name,
+ gras_ddt_scalar_type_t type,
+ enum e_gras_dd_scalar_encoding encoding,
+ gras_datadesc_type_cb_void_t cb,
+ gras_datadesc_type_t **dst);
+
+/* Do not use it on a registered type ! */
+void gras_ddt_free(gras_datadesc_type_t **type);
+
+/****************************************************
+ * Callback persistant state constructor/destructor *
+ ****************************************************/
+gras_error_t
+gras_dd_cbps_new(gras_dd_cbps_t **dst);
+void
+gras_dd_cbps_free(gras_dd_cbps_t **state);
+
+/***************
+ * Convertions *
+ ***************/
+gras_error_t
+gras_dd_convert_elm(gras_datadesc_type_t *type,
+ int r_arch,
+ void *src, void *dst);
#endif /* GRAS_DATADESC_PRIVATE_H */