admin/mlib
1
0 Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Update/fix bugs

Browse Source
This commit is contained in:
Patrick Pelissier committed 2019-05-18 11:17:13 +02:00
1 parent 3b2aad1b2e
commit 6c7ff1c723
2 files changed
+30 -30
Download Patch File Download Diff File Expand all files Collapse all files

No files matched your search

m-core.h
+23 -23
View File
@@ -2596,8 +2596,8 @@ typedef struct m_serial_read_interface_s {
m_serial_return_code_t (*read_map_value)(m_serial_read_t);
m_serial_return_code_t (*read_map_next)(m_serial_read_t); // Return M_SERIAL_OK_DONE when map is finished parsing.
m_serial_return_code_t (*read_tuple_start)(m_serial_read_t);
m_serial_return_code_t (*read_tuple_id)(m_serial_read_t, const char field_name[], const int max, int *); // Return M_SERIAL_OK_DONE when tuple is finished parsing.
m_serial_return_code_t (*read_variant_start)(m_serial_read_t, const char field_name[], const int max, int*);
m_serial_return_code_t (*read_tuple_id)(m_serial_read_t, const char *const field_name [], const int max, int *); // Return M_SERIAL_OK_DONE when tuple is finished parsing.
m_serial_return_code_t (*read_variant_start)(m_serial_read_t, const char *const field_name[], const int max, int*);
m_serial_return_code_t (*read_variant_end)(m_serial_read_t);
} m_serial_read_interface_t;
@@ -2622,38 +2622,38 @@ typedef struct m_serial_write_interface_s {
m_serial_return_code_t (*write_map_next)(m_serial_write_t);
m_serial_return_code_t (*write_map_end)(m_serial_write_t);
m_serial_return_code_t (*write_tuple_start)(m_serial_write_t);
m_serial_return_code_t (*write_tuple_id)(m_serial_write_t, const char field_name[], const int max, const int index);
m_serial_return_code_t (*write_tuple_id)(m_serial_write_t, const char * const field_name[], const int max, const int index);
m_serial_return_code_t (*write_tuple_end)(m_serial_write_t);
m_serial_return_code_t (*write_variant_start)(m_serial_write_t, const char field_name[], const int max, const int index);
m_serial_return_code_t (*write_variant_start)(m_serial_write_t, const char * const field_name[], const int max, const int index);
m_serial_return_code_t (*write_variant_end)(m_serial_write_t);
} m_serial_write_interface_t;
/* Convert a C default variale (bool, integer, float) to a Serialized data */
#define M_OUT_SERIAL_DEFAULT_ARG(serial, x) \
_Generic(((void)0,x), \
bool: (serial)->interface->write_boolean(serial, *M_AS_TYPE(bool *, &(x))), \
char: (serial)->interface->write_integer(serial, *M_AS_TYPE(char*,&(x))), \
signed char: (serial)->interface->write_integer(serial, *M_AS_TYPE(signed char*,&(x))), \
unsigned char: (serial)->interface->write_integer(serial, *M_AS_TYPE(unsigned char*,&(x))), \
signed short: (serial)->interface->write_integer(serial, *M_AS_TYPE(signed short*,&(x))), \
unsigned short: (serial)->interface->write_integer(serial, *M_AS_TYPE(unsigned short*,&(x))), \
signed int: (serial)->interface->write_integer(serial, *M_AS_TYPE(signed int*,&(x))), \
unsigned int: (serial)->interface->write_integer(serial, *M_AS_TYPE(unsigned int*,&(x))), \
long int: (serial)->interface->write_integer(serial, *M_AS_TYPE(long*,&(x))), \
unsigned long int: (serial)->interface->write_integer(serial, *M_AS_TYPE(unsigned long*,&(x))), \
long long int: (serial)->interface->write_integer(serial, *M_AS_TYPE(long long*,&(x))), \
unsigned long long int: (serial)->interface->write_integer(serial, *M_AS_TYPE(unsigned long long*,&(x))), \
float: (serial)->interface->write_float(serial, *M_AS_TYPE(float*,&(x))), \
double: (serial)->interface->write_float(serial, *M_AS_TYPE(double*,&(x))), \
long double: (serial)->interface->write_float(serial, *M_AS_TYPE(long double*,&(x))), \
const char *: (serial)->interface->write_string(serial, *M_AS_TYPE(const char **,&(x))), \
char *: (serial)->interface->write_string(serial, *M_AS_TYPE(char **,&(x))), \
_Generic(((void)0,(x)), \
bool: (serial)->interface->write_boolean(serial, M_AS_TYPE(bool, (x))), \
char: (serial)->interface->write_integer(serial, M_AS_TYPE(char,(x)), sizeof (x)), \
signed char: (serial)->interface->write_integer(serial, M_AS_TYPE(signed char,(x)), sizeof (x)), \
unsigned char: (serial)->interface->write_integer(serial, M_AS_TYPE(unsigned char,(x)), sizeof (x)), \
signed short: (serial)->interface->write_integer(serial, M_AS_TYPE(signed short,(x)), sizeof (x)), \
unsigned short: (serial)->interface->write_integer(serial, M_AS_TYPE(unsigned short,(x)), sizeof (x)), \
signed int: (serial)->interface->write_integer(serial, M_AS_TYPE(signed int,(x)), sizeof (x)), \
unsigned int: (serial)->interface->write_integer(serial, M_AS_TYPE(unsigned int,(x)), sizeof (x)), \
long int: (serial)->interface->write_integer(serial, M_AS_TYPE(long,(x)), sizeof (x)), \
unsigned long int: (serial)->interface->write_integer(serial, M_AS_TYPE(unsigned long,(x)), sizeof (x)), \
long long int: (serial)->interface->write_integer(serial, M_AS_TYPE(long long,(x)), sizeof (x)), \
unsigned long long int: (serial)->interface->write_integer(serial, M_AS_TYPE(unsigned long long,(x)), sizeof (x)), \
float: (serial)->interface->write_float(serial, M_AS_TYPE(float,(x)), sizeof (x)), \
double: (serial)->interface->write_float(serial, M_AS_TYPE(double,(x)), sizeof (x)), \
long double: (serial)->interface->write_float(serial, M_AS_TYPE(long double,(x)), sizeof (x)), \
const char *: (serial)->interface->write_string(serial, M_AS_TYPE(const char *,(x))), \
char *: (serial)->interface->write_string(serial, M_AS_TYPE(char *,(x))), \
const void *: M_SERIAL_FAIL /* unsupported */, \
void *: M_SERIAL_FAIL /* unsupported */)
/* Convert a Serialized data to a C default variale (bool, integer, float) */
#define M_IN_SERIAL_DEFAULT_ARG(xptr, serial) \
_Generic(((void)0,*xptr), \
_Generic(((void)0,*(xptr)), \
bool: (serial)->interface->read_boolean(serial, M_AS_TYPE(bool *, xptr)), \
char: m_core_in_serial_char(serial, M_AS_TYPE(char*,xptr)), \
signed char: m_core_in_serial_schar(serial, M_AS_TYPE(signed char*,xptr)), \
m-tuple.h
+7 -7
View File
@@ -414,20 +414,20 @@ namespace m_tuple {
static inline m_serial_return_code_t \
M_C(name, _out_serial)(m_serial_write_t f, \
M_C(name,_t) const el) { \
assert (f != NULL && el != NULL); \
int index = 0; \
assert (f != NULL && f->interface != NULL && el != NULL); \
const int field_max = M_NARGS(__VA_ARGS__); \
static const char *const field_name[] = \
{ M_MAP(TUPLE_STRINGIFY_NAME, __VA_ARGS__) }; \
{ M_REDUCE(TUPLE_STRINGIFY_NAME, M_ID, __VA_ARGS__) }; \
int index = 0; \
m_serial_return_code_t ret; \
ret = f->interface->write_tuple_start(f); \
M_MAP(TUPLE_DEFINE_OUT_SERIAL_FUNC , __VA_ARGS__) \
assert( index == field_max); \
ret |= f->interace->write_tuple_end(f); \
ret |= f->interface->write_tuple_end(f); \
return ret & M_SERIAL_FAIL; \
}
#define TUPLE_DEFINE_OUT_SERIAL_FUNC(a) \
f->serial->write_tuple_id(f, field_name, field_max, index); \
f->interface->write_tuple_id(f, field_name, field_max, index); \
TUPLE_CALL_OUT_SERIAL(a, f, el -> TUPLE_GET_FIELD a); \
index++; \
@@ -445,14 +445,14 @@ namespace m_tuple {
ret = f->interface->read_tuple_id(f, field_name, field_max, &index); \
if (ret == M_SERIAL_OK_CONTINUE) { \
switch (1+index) { \
M_MAP(TUPLE_DEFINE_IN_SERIAL_FUNC , __VA_ARGS__) \
M_MAP2(TUPLE_DEFINE_IN_SERIAL_FUNC , name, __VA_ARGS__) \
default: assert(0); \
} \
} \
} \
return ret; \
}
#define TUPLE_DEFINE_IN_SERIAL_FUNC(a) \
#define TUPLE_DEFINE_IN_SERIAL_FUNC(name, a) \
case M_C4(name, _, TUPLE_GET_FIELD a, _value): \
ret = TUPLE_CALL_IN_SERIAL(a, el -> TUPLE_GET_FIELD a, f); \
break; \