1 #ifndef __ACCESSOR_H

     2 #define __ACCESSOR_H

     3 

     4 

     5 // variable declaration macros

     6 #define __DECLARE_VAR(type, name)\

     7 	__IEC_##type##_t name;

     8 #define __DECLARE_GLOBAL(type, resource, name)\

     9 	__IEC_##type##_t resource##__##name;\

    10 	static __IEC_##type##_t *GLOBAL__##name = &resource##__##name;\

    11 	void __INIT_GLOBAL_##name(type value) {\

    12 		(*GLOBAL__##name).value = value;\

    13 	}\

    14 	void __SET_GLOBAL_##name(type value) {\

    15 		if (!((*GLOBAL__##name).flags & __IEC_FORCE_FLAG))\

    16 			(*GLOBAL__##name).value = value;\

    17 	}\

    18 	type* __GET_GLOBAL_##name(void) {\

    19 		return &((*GLOBAL__##name).value);\

    20 	}

    21 #define __DECLARE_GLOBAL_LOCATION(type, location)\

    22 	extern type *location;

    23 #define __DECLARE_GLOBAL_LOCATED(type, resource, name)\

    24 	__IEC_##type##_p resource##__##name;\

    25 	static __IEC_##type##_p *GLOBAL__##name = &resource##__##name;\

    26 	void __INIT_GLOBAL_##name(type value) {\

    27 		*((*GLOBAL__##name).value) = value;\

    28 	}\

    29 	void __SET_GLOBAL_##name(type value) {\

    30 		if (!((*GLOBAL__##name).flags & __IEC_FORCE_FLAG))\

    31 			*((*GLOBAL__##name).value) = value;\

    32 	}\

    33 	type* __GET_GLOBAL_##name(void) {\

    34 		return (*GLOBAL__##name).value;\

    35 	}

    36 #define __DECLARE_EXTERNAL(type, name)\

    37 	__IEC_##type##_p name;

    38 #define __DECLARE_LOCATED(type, name)\

    39 	__IEC_##type##_p name;

    40 

    41 

    42 // variable initialization macros

    43 #define __INIT_RETAIN(name, retained)\

    44     name.flags |= retained?__IEC_RETAIN_FLAG:0;

    45 #define __INIT_VAR(name, initial, retained)\

    46 	name.value = initial;\

    47 	__INIT_RETAIN(name, retained)

    48 #define __INIT_GLOBAL(name, initial, retained)\

    49 	__INIT_GLOBAL_##name(initial);\

    50 	__INIT_RETAIN((*GLOBAL__##name), retained)

    51 #define __INIT_GLOBAL_LOCATED(resource, name, location, retained)\

    52 	resource##__##name.value = location;\

    53 	__INIT_RETAIN(resource##__##name, retained)

    54 #define __INIT_EXTERNAL(type, global, name, retained)\

    55 	name.value = __GET_GLOBAL_##global();\

    56     __INIT_RETAIN(name, retained)

    57 #define __INIT_LOCATED(type, location, name, retained)\

    58 	{extern type *location;\

    59 	 name.value = location;\

    60 	 __INIT_RETAIN(name, retained)}

    61 #define __INIT_LOCATED_VALUE(name, initial)\

    62 	*(name.value) = initial;

    63 

    64 

    65 // variable getting macros

    66 #define __GET_VAR(name, ...)\

    67 	name.value __VA_ARGS__

    68 #define __GET_EXTERNAL(name, ...)\

    69 	((name.flags & __IEC_FORCE_FLAG) ? name.fvalue __VA_ARGS__ : *(name.value) __VA_ARGS__)

    70 #define __GET_LOCATED(name, ...)\

    71 	((name.flags & __IEC_FORCE_FLAG) ? name.fvalue __VA_ARGS__ : *(name.value) __VA_ARGS__)

    72 #define __GET_VAR_BY_REF(name, ...)\

    73 	((name.flags & __IEC_FORCE_FLAG) ? &(name.fvalue __VA_ARGS__) : &(name.value __VA_ARGS__))

    74 #define __GET_EXTERNAL_BY_REF(name, ...)\

    75 	((name.flags & __IEC_FORCE_FLAG) ? &(name.fvalue __VA_ARGS__) : &(*(name.value) __VA_ARGS__))

    76 #define __GET_LOCATED_BY_REF(name, ...)\

    77 	((name.flags & __IEC_FORCE_FLAG) ? &(name.fvalue __VA_ARGS__) : &(*(name.value) __VA_ARGS__))

    78 

    79 // variable setting macros

    80 #define __SET_VAR(name, new_value, ...)\

    81 	if (!(name.flags & __IEC_FORCE_FLAG)) name.value __VA_ARGS__ = new_value

    82 #define __SET_EXTERNAL(global, name, new_value)\

    83 	if (!(name.flags & __IEC_FORCE_FLAG))\

    84 		__SET_GLOBAL_##global(new_value)

    85 #define __SET_COMPLEX_EXTERNAL(name, new_value, ...)\

    86 	*(name.value) __VA_ARGS__ = new_value

    87 #define __SET_LOCATED(name, new_value, ...)\

    88 	if (!(name.flags & __IEC_FORCE_FLAG)) *(name.value) __VA_ARGS__ = new_value

    89 

    90 #endif //__ACCESSOR_H