1

/*

     2

 *  matiec - a compiler for the programming languages defined in IEC 61131-3

     3

 *

     4

 *  Copyright (C) 2009-2011  Mario de Sousa (msousa@fe.up.pt)

     5

 *  Copyright (C) 2007-2011  Laurent Bessard and Edouard Tisserant

     6

 *

     7

 *  This program is free software: you can redistribute it and/or modify

     8

 *  it under the terms of the GNU General Public License as published by

     9

 *  the Free Software Foundation, either version 3 of the License, or

    10

 *  (at your option) any later version.

    11

 *

    12

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

    13

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

    14

 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

    15

 *  GNU General Public License for more details.

    16

 *

    17

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

    18

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

    19

 *

    20

 *

    21

 * This code is made available on the understanding that it will not be

    22

 * used in safety-critical situations without a full and competent review.

    23

 *

    24

 *

    25

 * Simple PLC run cycle test implementation - prints every located at each cycle

    26

 *

    27

 */

    28

    29

#include "iec_std_lib.h"

    30

#include <stdio.h>

    31

    32

#define __print_BOOL(name) printf("  %s = (BOOL) %s\n",#name, name?"TRUE":"FALSE");

    33

#define __print_SINT(name) printf("  %s = (SINT) %d\n",#name, name);

    34

#define __print_INT(name) printf("  %s = (INT) %d\n",#name, name);

    35

#define __print_DINT(name) printf("  %s = (DINT) %d\n",#name, name);

    36

#define __print_LINT(name) printf("  %s = (LINT) %d\n",#name, name);

    37

#define __print_USINT(name) printf("  %s = (USINT) %u\n",#name, name);

    38

#define __print_UINT(name) printf("  %s = (UINT) %u\n",#name, name);

    39

#define __print_UDINT(name) printf("  %s = (UDINT) %u\n",#name, name);

    40

#define __print_ULINT(name) printf("  %s = (ULINT) %lu\n",#name, name);

    41

#define __print_REAL(name) printf("  %s = (REAL) %f\n",#name, (double)name);

    42

#define __print_LREAL(name) printf("  %s = (LREAL) %f\n",#name, (double)name);

    43

#define __print_TIME(name) {STRING __tmp = __time_to_string(name);__tmp.body[__tmp.len] = 0; printf("  %s = (TIME) %*s\n",#name, __tmp.len, &__tmp.body);}

    44

#define __print_DATE(name) {STRING __tmp = __date_to_string(name);__tmp.body[__tmp.len] = 0; printf("  %s = (DATE) %*s\n",#name, __tmp.len, &__tmp.body);}

    45

#define __print_TOD(name) {STRING __tmp = __tod_to_string(name);__tmp.body[__tmp.len] = 0; printf("  %s = (TOD) %*s\n",#name, __tmp.len, &__tmp.body);}

    46

#define __print_DT(name) {STRING __tmp = __dt_to_string(name);__tmp.body[__tmp.len] = 0; printf("  %s = (DT) %*s\n",#name, __tmp.len, &__tmp.body);}

    47

#define __print_STRING(name) printf("  %s = (STRING) {%d, \"%*s\"}\n",#name, name->len, name->len, &name->body);

    48

#define __print_BYTE(name) printf("  %s = (BYTE) 0x%2.2x\n",#name, name);

    49

#define __print_WORD(name) printf("  %s = (WORD) 0x%4.4x\n",#name, name);

    50

#define __print_DWORD(name) printf("  %s = (DWORD) 0x%8.8x\n",#name, name);

    51

#define __print_LWORD(name) printf("  %s = (LWORD) 0x%16.16lx\n",#name, name);

    52

/*

    53

 * Functions and variables provied by generated C softPLC

    54

 **/ 

    55

void config_run__(int tick);

    56

void config_init__(void);

    57

    58

/*

    59

 *  Functions and variables to export to generated C softPLC

    60

 **/

    61

    62

TIME __CURRENT_TIME;

    63

    64

#define __LOCATED_VAR(type, name, ...) type __##name;

    65

#include "LOCATED_VARIABLES.h"

    66

#undef __LOCATED_VAR

    67

#define __LOCATED_VAR(type, name, ...) type* name = &__##name;

    68

#include "LOCATED_VARIABLES.h"

    69

#undef __LOCATED_VAR

    70

    71

static int tick = 0;

    72

    73

void run()

    74

{

    75

    printf("Tick %d\n",tick);

    76

    config_run__(tick++);

    77

    printf("  Located variables : \n");

    78

#define __LOCATED_VAR(type, name,...) __print_##type(name);

    79

#include "LOCATED_VARIABLES.h"

    80

#undef __LOCATED_VAR

    81

}

    82