Armadilloフォーラム

#include <stdio.h>
#include <stdlib.h>
#include <sys/time.h>
#include <signal.h>
#include <errno.h>
#include <fcntl.h>
#include <time.h>
#include <string.h>
#include <ctype.h>
 
struct tm tim;        //時刻（インターバルタイマでセット）
struct tm tim_b;    //通常処理用
int old_sec;
 
/*-------------------------------------------------------------------*/
/*　　日時読み出し                                                */
/*-------------------------------------------------------------------*/
struct tm *localtime_t(void) {
    int    n=0;
    do {
    tim_b = tim;
    n++;
    } while((tim_b.tm_min!=tim.tm_min)||(tim_b.tm_sec!=tim.tm_sec));
    return &tim_b;
}
 
/*-------------------------------------------------------------------*/
/*　　インターバルタイマ                                                */
/*-------------------------------------------------------------------*/
void SignalHandler(int signum)
{
    ((void)signum);        //unusedのためのダミー
 
    time_t    t=time(NULL);
    printf("INT localtime start\n");
    tim = *localtime(&t);
    printf("INT localtime end\n");
 
    if (old_sec!=tim.tm_sec){
        printf("timer:%u sec\n", tim.tm_sec);
        old_sec = tim.tm_sec;
    }
}
 
/*-------------------------------------------------------------------*/
/*   インターバルタイマー初期化                                                     */
/*-------------------------------------------------------------------*/
int intr_init() {
    struct itimerval timer;
    struct sigaction action;
    memset(&action, 0, sizeof(action));
 
    /* set signal handler */
    action.sa_handler = SignalHandler;
    action.sa_flags = SA_RESTART;
    sigemptyset(&action.sa_mask);
    if(sigaction(SIGALRM, &action, NULL) < 0){
        perror("sigaction error");
        exit(1);
    }
 
    timer.it_value.tv_sec = 0;
    timer.it_value.tv_usec = 10000;
    timer.it_interval.tv_sec = 0;
    timer.it_interval.tv_usec = 10000;        //10,000uS=10mS
    if(setitimer(ITIMER_REAL, &timer, NULL) < 0){
        perror("setitimer error");
        exit(1);
    }
    return (0);
}
 
/*-------------------------------------------------------------------*/
/* メイン処理                                                        */
/*-------------------------------------------------------------------*/
int main() {
int    fd_wdt;
int    ret;
int    val=1;
char    dev_wdt[]="/dev/watchdog";
time_t    starttime;
struct    tm *startlocal;
struct    timespec req, rem;
 
    printf("program start\n");
 
    intr_init();        // インターバルタイマー初期化
 
    do {
 
        starttime = time(NULL);        // 時刻取得
        printf("localtime start\n");
//        startlocal = localtime(&starttime);    // 時刻変換
        startlocal = localtime_t();    // 時刻変換
        printf("localtime end\n");
 
        fd_wdt = open(dev_wdt,O_WRONLY);        //wdt 60s
        ret=write(fd_wdt,"!",1);
        close(fd_wdt);
 
        req.tv_sec = 0;
        req.tv_nsec = 10000000;        //wait 10msec
        rem.tv_sec = 0;
        rem.tv_nsec = 0;
 
        while (nanosleep(&req, &rem)){
            if(errno==EINTR){
                req.tv_sec = rem.tv_sec;
                req.tv_nsec = rem.tv_nsec;
            }
        }
 
    } while(val==1);
 
    fd_wdt = open(dev_wdt,O_WRONLY);    //wdt end
    ret=write(fd_wdt,"V",1);
    close(fd_wdt);
    printf("program end\n");    //end
}