1

/*

     2

 * Copyright (C) 2007-2011: Edouard TISSERANT and Laurent BESSARD

     3

 *

     4

 * See COPYING and COPYING.LESSER files for copyright details.

     5

 *

     6

 * This library is free software; you can redistribute it and/or

     7

 * modify it under the terms of the GNU Lesser General Public

     8

 * License as published by the Free Software Foundation; either

     9

 * version 3 of the License, or (at your option) any later version.

    10

 *

    11

 * This library is distributed in the hope that it will be useful,

    12

 * but WITHOUT ANY WARRANTY; without even the implied warranty of

    13

 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU

    14

 * Lesser General Public License for more details.

    15

 * 

    16

 * You should have received a copy of the GNU Lesser General Public License 

    17

 * along with this library. If not, see <http://www.gnu.org/licenses/>.

    18

 *

    19

 */

    20

    21

#ifndef IEC_TYPES_ALL_H

    22

#define IEC_TYPES_ALL_H

    23

    24

    25

/* Macro that expand to subtypes */

    26

#define __ANY(DO)                 __ANY_DERIVED(DO) __ANY_ELEMENTARY(DO)

    27

#define __ANY_DERIVED(DO)

    28

#define __ANY_ELEMENTARY(DO)      __ANY_MAGNITUDE(DO) __ANY_BIT(DO) __ANY_STRING(DO) __ANY_DATE(DO)

    29

#define __ANY_MAGNITUDE(DO)       __ANY_NUM(DO) DO(TIME)

    30

#define __ANY_BIT(DO)             __ANY_NBIT(DO) DO(BOOL)

    31

#define __ANY_NBIT(DO)            DO(BYTE) DO(WORD) DO(DWORD) DO(LWORD)

    32

#define __ANY_STRING(DO)          DO(STRING)

    33

#define __ANY_DATE(DO)            DO(DATE) DO(TOD) DO(DT)

    34

#define __ANY_NUM(DO)             __ANY_REAL(DO) __ANY_INT(DO)

    35

#define __ANY_REAL(DO)            DO(REAL) DO(LREAL)

    36

#define __ANY_INT(DO)             __ANY_SINT(DO) __ANY_UINT(DO)

    37

#define __ANY_SINT(DO)            DO(SINT) DO(INT) DO(DINT) DO(LINT)

    38

#define __ANY_UINT(DO)            DO(USINT) DO(UINT) DO(UDINT) DO(ULINT)

    39

    40

    41

/* Macro that expand to subtypes */

    42

#define __ANY_1(DO,P1)            __ANY_DERIVED_1(DO,P1) __ANY_ELEMENTARY_1(DO,P1)

    43

#define __ANY_DERIVED_1(DO,P1)

    44

#define __ANY_ELEMENTARY_1(DO,P1) __ANY_MAGNITUDE_1(DO,P1) __ANY_BIT_1(DO,P1) __ANY_STRING_1(DO,P1) __ANY_DATE_1(DO,P1)

    45

#define __ANY_MAGNITUDE_1(DO,P1)  __ANY_NUM_1(DO,P1) DO(TIME,P1)

    46

#define __ANY_BIT_1(DO,P1)        __ANY_NBIT_1(DO,P1) DO(BOOL,P1)

    47

#define __ANY_NBIT_1(DO,P1)       DO(BYTE,P1) DO(WORD,P1) DO(DWORD,P1) DO(LWORD,P1)

    48

#define __ANY_STRING_1(DO,P1)     DO(STRING,P1)

    49

#define __ANY_DATE_1(DO,P1)       DO(DATE,P1) DO(TOD,P1) DO(DT,P1)

    50

#define __ANY_NUM_1(DO,P1)        __ANY_REAL_1(DO,P1) __ANY_INT_1(DO,P1)

    51

#define __ANY_REAL_1(DO,P1)       DO(REAL,P1) DO(LREAL,P1)

    52

#define __ANY_INT_1(DO,P1)        __ANY_SINT_1(DO,P1) __ANY_UINT_1(DO,P1)

    53

#define __ANY_SINT_1(DO,P1)       DO(SINT,P1) DO(INT,P1) DO(DINT,P1) DO(LINT,P1)

    54

#define __ANY_UINT_1(DO,P1)       DO(USINT,P1) DO(UINT,P1) DO(UDINT,P1) DO(ULINT,P1)

    55

    56

    57

    58

/*********************/

    59

/*  IEC Types defs   */

    60

/*********************/

    61

    62

/* Include non windows.h clashing typedefs */

    63

#include "iec_types.h"

    64

    65

#define TRUE 1

    66

#define FALSE 0

    67

    68

#define __IEC_DEBUG_FLAG 0x01

    69

#define __IEC_FORCE_FLAG 0x02

    70

#define __IEC_RETAIN_FLAG 0x04

    71

#define __IEC_OUTPUT_FLAG 0x08

    72

    73

#define __DECLARE_IEC_TYPE(type)\

    74

typedef IEC_##type type;\

    75

\

    76

typedef struct {\

    77

  IEC_##type value;\

    78

  IEC_BYTE flags;\

    79

} __IEC_##type##_t;\

    80

\

    81

typedef struct {\

    82

  IEC_##type *value;\

    83

  IEC_BYTE flags;\

    84

  IEC_##type fvalue;\

    85

} __IEC_##type##_p;

    86

    87

#define __DECLARE_DERIVED_TYPE(type, base)\

    88

typedef base type;\

    89

typedef __IEC_##base##_t __IEC_##type##_t;

    90

    91

#define __DECLARE_COMPLEX_STRUCT(type)\

    92

typedef struct {\

    93

  type value;\

    94

  IEC_BYTE flags;\

    95

} __IEC_##type##_t;\

    96

\

    97

typedef struct {\

    98

  type *value;\

    99

  IEC_BYTE flags;\

   100

} __IEC_##type##_p;

   101

   102

#define __DECLARE_ENUMERATED_TYPE(type, ...)\

   103

typedef enum {\

   104

  __VA_ARGS__\

   105

} type;\

   106

__DECLARE_COMPLEX_STRUCT(type)

   107

   108

#define __DECLARE_ARRAY_TYPE(type, base, size)\

   109

typedef struct {\

   110

  base table size;\

   111

} type;\

   112

__DECLARE_COMPLEX_STRUCT(type)

   113

   114

#define __DECLARE_STRUCT_TYPE(type, elements)\

   115

typedef struct {\

   116

  elements\

   117

} type;\

   118

__DECLARE_COMPLEX_STRUCT(type)

   119

   120

/* Those typdefs clash with windows.h */

   121

/* i.e. this file cannot be included aside windows.h */

   122

__ANY(__DECLARE_IEC_TYPE)

   123

   124

typedef struct {

   125

  __IEC_BOOL_t state;     // current step state. 0 : inative, 1: active

   126

  BOOL prev_state;  // previous step state. 0 : inative, 1: active

   127

  TIME elapsed_time;  // time since step is active

   128

} STEP;

   129

   130

typedef struct {

   131

  BOOL stored;  // action storing state. 0 : not stored, 1: stored

   132

  BOOL state; // current action state. 0 : inative, 1: active

   133

  BOOL set;   // set have been requested (reset each time the body is evaluated)

   134

  BOOL reset; // reset have been requested (reset each time the body is evaluated)

   135

  TIME set_remaining_time;    // time before set will be requested

   136

  TIME reset_remaining_time;  // time before reset will be requested

   137

} ACTION;

   138

   139

/* Extra debug types for SFC */

   140

#define __ANY_SFC(DO) DO(STEP) DO(TRANSITION) DO(ACTION)

   141

   142

/* Enumerate native types */

   143

#define __decl_enum_type(TYPENAME) TYPENAME##_ENUM,

   144

#define __decl_enum_pointer(TYPENAME) TYPENAME##_P_ENUM,

   145

#define __decl_enum_output(TYPENAME) TYPENAME##_O_ENUM,

   146

typedef enum{

   147

  __ANY(__decl_enum_type)

   148

  __ANY(__decl_enum_pointer)

   149

  __ANY(__decl_enum_output)

   150

  /* SFC specific types are never external or global */

   151

  UNKNOWN_ENUM

   152

} __IEC_types_enum;

   153

   154

/* Get size of type from its number */

   155

#define __decl_size_case(TYPENAME) \

   156

	case TYPENAME##_ENUM:\

   157

	case TYPENAME##_O_ENUM:\

   158

	case TYPENAME##_P_ENUM:\

   159

		return sizeof(TYPENAME);

   160

static inline USINT __get_type_enum_size(__IEC_types_enum t){

   161

 switch(t){

   162

  __ANY(__decl_size_case)

   163

  /* size do not correspond to real struct.

   164

   * only a bool is used to represent state*/

   165

  default:

   166

	  return 0;

   167

 }

   168

 return 0;

   169

}

   170

   171

#endif /*IEC_TYPES_ALL_H*/