1

#include <stdio.h>

     2

#include <sys/timeb.h>

     3

#include <time.h>

     4

#include <windows.h>

     5

     6

int localcount = 0;

     7

     8

struct _timeb timetmp;

     9

void PLC_GetTime(IEC_TIME *CURRENT_TIME)

    10

{

    11

	_ftime(&timetmp);

    12

    13

	(*CURRENT_TIME).tv_sec = timetmp.time;

    14

	(*CURRENT_TIME).tv_nsec = timetmp.millitm * 1000000;

    15

}

    16

    17

void PLC_timer_notify()

    18

{

    19

    PLC_GetTime(&__CURRENT_TIME);

    20

    __run();

    21

}

    22

    23

HANDLE PLC_timer = NULL;

    24

void PLC_SetTimer(long long next, long long period)

    25

{

    26

	LARGE_INTEGER liDueTime;		

    27

	/* arg 2 of SetWaitableTimer take 100 ns interval*/

    28

	liDueTime.QuadPart =  next / (-100);

    29

    30

	/*

    31

	printf("SetTimer(%lld,%lld)\n",next, period);

    32

	*/

    33

    34

	if (!SetWaitableTimer(PLC_timer, &liDueTime, common_ticktime__, NULL, NULL, 0))

    35

    {

    36

        printf("SetWaitableTimer failed (%d)\n", GetLastError());

    37

    }

    38

	if (WaitForSingleObject(PLC_timer, INFINITE) != WAIT_OBJECT_0)

    39

	{

    40

		printf("WaitForSingleObject failed (%d)\n", GetLastError());

    41

	}

    42

	PLC_timer_notify();

    43

}

    44

    45

int main(int argc,char **argv)

    46

{

    47

	/* Translate PLC's microseconds to Ttick nanoseconds */

    48

	Ttick = 1000000 * maxval(common_ticktime__,1);

    49

    50

	/* Create a waitable timer */

    51

    PLC_timer = CreateWaitableTimer(NULL, FALSE, "WaitableTimer");

    52

    if(NULL == PLC_timer)

    53

    {

    54

        printf("CreateWaitableTimer failed (%d)\n", GetLastError());

    55

        return 1;

    56

    }

    57

    58

    if( __init(argc,argv) == 0 )

    59

    {

    60

    	printf("Tick Time : %d ms\n", common_ticktime__);

    61

    	while(1)

    62

    	{

    63

    		// Set a timer

    64

    		PLC_SetTimer(Ttick,Ttick);

    65

    		if (kbhit())

    66

    		{

    67

    			printf("Finishing\n");

    68

    		    break;

    69

            }

    70

    	}

    71

    	PLC_SetTimer(0,0);

    72

    }

    73

    __cleanup();

    74

    CloseHandle(PLC_timer);

    75

    76

    return 0;

    77

}