1

#include <time.h>

     2

#include <signal.h>

     3

     4

#include "iec_std_lib.h"

     5

     6

/*

     7

 * Functions and variables provied by generated C softPLC

     8

 **/ 

     9

void config_run__(int tick);

    10

void config_init__(void);

    11

extern int common_ticktime__;

    12

    13

/*

    14

 *  Functions and variables to export to generated C softPLC

    15

 **/

    16

    17

TIME __CURRENT_TIME;

    18

    19

#define __LOCATED_VAR(type, name) type name;

    20

#include "LOCATED_VARIABLES.h"

    21

#undef __LOCATED_VAR

    22

    23

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

    24

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

    25

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

    26

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

    27

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

    28

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

    29

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

    30

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

    31

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

    32

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

    33

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

    34

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

    35

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

    36

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

    37

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

    38

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

    39

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

    40

#define print_WORD(name) printf("  %s = (WORD) 0x%d4.4\n",#name, name);

    41

#define print_DWORD(name) printf("  %s = (DWORD) 0x%d8.8\n",#name, name);

    42

#define print_LWORD(name) printf("  %s = (LWORD) 0x%d16.16\n",#name, name);

    43

    44

static int tick = 0;

    45

void timer_notify(sigval_t val)

    46

{

    47

    clock_gettime(CLOCK_REALTIME, &__CURRENT_TIME);

    48

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

    49

    config_run__(tick++);

    50

    printf("  Located variables : \n");

    51

#define __LOCATED_VAR(type, name) print_##type(name);

    52

#include "LOCATED_VARIABLES.h"

    53

#undef __LOCATED_VAR

    54

}

    55

    56

void catch_signal(int sig)

    57

{

    58

  signal(SIGTERM, catch_signal);

    59

  signal(SIGINT, catch_signal);

    60

  printf("Got Signal %d\n",sig);

    61

}

    62

    63

#define maxval(a,b) ((a>b)?a:b)

    64

int main(int argc,char **argv)

    65

{

    66

    timer_t timer;

    67

    struct sigevent sigev;

    68

    long tv_nsec = 1000000 * (maxval(common_ticktime__,1)%1000);

    69

    time_t tv_sec = common_ticktime__/1000;

    70

    struct itimerspec timerValues;

    71

    72

    memset (&sigev, 0, sizeof (struct sigevent));

    73

    memset (&timerValues, 0, sizeof (struct itimerspec));

    74

    sigev.sigev_value.sival_int = 0;

    75

    sigev.sigev_notify = SIGEV_THREAD;

    76

    sigev.sigev_notify_attributes = NULL;

    77

    sigev.sigev_notify_function = timer_notify;

    78

    timerValues.it_value.tv_sec = tv_sec;

    79

    timerValues.it_value.tv_nsec = tv_nsec;

    80

    timerValues.it_interval.tv_sec = tv_sec;

    81

    timerValues.it_interval.tv_nsec = tv_nsec;

    82

    83

    config_init__();

    84

    85

    timer_create (CLOCK_REALTIME, &sigev, &timer);

    86

    timer_settime (timer, 0, &timerValues, NULL);

    87

    88

    /* install signal handler for manual break */

    89

    signal(SIGTERM, catch_signal);

    90

    signal(SIGINT, catch_signal);

    91

    92

    pause();

    93

    94

    timer_delete (timer);

    95

    96

    return 0;

    97

}