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 __SET_GLOBAL_##name(type value) {\

    12

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

    13

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

    14

	}

    15

#define __DECLARE_GLOBAL_LOCATION(type, location)\

    16

	extern type *location;

    17

#define __DECLARE_GLOBAL_LOCATED(type, resource, name)\

    18

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

    19

	static __IEC_##type##_p *GLOBAL__##name;

    20

#define __DECLARE_EXTERNAL(type, name)\

    21

	__IEC_##type##_p name;

    22

#define __DECLARE_LOCATED(type, name)\

    23

	__IEC_##type##_p name;

    24

    25

    26

// variable initialization macros

    27

#define __INIT_RETAIN(name, retained)\

    28

    name.flags |= retained?__IEC_RETAIN_FLAG:0;

    29

#define __INIT_VAR(name, initial, retained)\

    30

	name.value = initial;\

    31

	__INIT_RETAIN(name, retained)

    32

#define __INIT_GLOBAL(name, initial, retained)\

    33

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

    34

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

    35

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

    36

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

    37

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

    38

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

    39

	{extern __IEC_##type##_t *GLOBAL__##global;\

    40

	 name.value = &((*GLOBAL__##global).value);\

    41

     __INIT_RETAIN(name, retained)}

    42

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

    43

	{extern type *location;\

    44

	 name.value = location;\

    45

	 __INIT_RETAIN(name, retained)}

    46

#define __INIT_LOCATED_VALUE(name, initial)\

    47

	*(name.value) = initial;

    48

    49

    50

// variable getting macros

    51

#define __GET_VAR(name, ...)\

    52

	name.value __VA_ARGS__

    53

#define __GET_EXTERNAL(name, ...)\

    54

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

    55

#define __GET_LOCATED(name, ...)\

    56

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

    57

#define __GET_VAR_BY_REF(name, ...)\

    58

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

    59

#define __GET_EXTERNAL_BY_REF(name, ...)\

    60

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

    61

#define __GET_LOCATED_BY_REF(name, ...)\

    62

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

    63

    64

// variable setting macros

    65

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

    66

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

    67

#define __SET_EXTERNAL(global, name, new_value)\

    68

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

    69

		__SET_GLOBAL_##global(new_value)

    70

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

    71

	*(name.value) __VA_ARGS__ = new_value

    72

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

    73

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

    74

    75

#endif //__ACCESSOR_H