source: mypx/kernel/time_event.h

/*
 *  TOPPERS/ASP Kernel
 *      Toyohashi Open Platform for Embedded Real-Time Systems/
 *      Advanced Standard Profile Kernel
 * 
 *  Copyright (C) 2000-2003 by Embedded and Real-Time Systems Laboratory
 *                              Toyohashi Univ. of Technology, JAPAN
 *  Copyright (C) 2005-2010 by Embedded and Real-Time Systems Laboratory
 *              Graduate School of Information Science, Nagoya Univ., JAPAN
 * 
 *  Ÿåµ­Ãøºîž¢ŒÔ€Ï¡€°Ê²Œ€Î(1)¡Á(4)€ÎŸò·ï€òËþ€¿€¹Ÿì¹ç€ËžÂ€ê¡€ËÜ¥œ¥Õ¥È¥Š¥§
 *  ¥¢¡ÊËÜ¥œ¥Õ¥È¥Š¥§¥¢€ò²þÊÑ€·€¿€â€Î€òŽÞ€à¡¥°Ê²ŒÆ±€ž¡Ë€ò»ÈÍÑ¡ŠÊ£Àœ¡Š²þ
 *  ÊÑ¡ŠºÆÇÛÉۡʰʲŒ¡€ÍøÍрȞƀ֡ˀ¹€ë€³€È€ò̵œþ€ÇµöÂú€¹€ë¡¥
 *  (1) ËÜ¥œ¥Õ¥È¥Š¥§¥¢€ò¥œ¡Œ¥¹¥³¡Œ¥É€Î·Á€ÇÍøÍÑ€¹€ëŸì¹ç€Ë€Ï¡€Ÿåµ­€ÎÃøºî
 *      ž¢ÉœŒš¡€€³€ÎÍøÍÑŸò·ï€ª€è€Ó²Œµ­€Î̵ÊÝŸÚµ¬Äꀬ¡€€œ€Î€Þ€Þ€Î·Á€Ç¥œ¡Œ
 *      ¥¹¥³¡Œ¥ÉÃæ€ËŽÞ€Þ€ì€Æ€€€ë€³€È¡¥
 *  (2) ËÜ¥œ¥Õ¥È¥Š¥§¥¢€ò¡€¥é¥€¥Ö¥é¥ê·ÁŒ°€Ê€É¡€ÂŸ€Î¥œ¥Õ¥È¥Š¥§¥¢³«È¯€Ë»È
 *      Íрǀ­€ë·Á€ÇºÆÇÛÉÛ€¹€ëŸì¹ç€Ë€Ï¡€ºÆÇÛÉÛ€ËÈŒ€Š¥É¥­¥å¥á¥ó¥È¡ÊÍøÍÑ
 *      ŒÔ¥Þ¥Ë¥å¥¢¥ë€Ê€É¡Ë€Ë¡€Ÿåµ­€ÎÃøºîž¢ÉœŒš¡€€³€ÎÍøÍÑŸò·ï€ª€è€Ó²Œµ­
 *      €Î̵ÊÝŸÚµ¬Äê€ò·ÇºÜ€¹€ë€³€È¡¥
 *  (3) ËÜ¥œ¥Õ¥È¥Š¥§¥¢€ò¡€µ¡Žï€ËÁȀ߹þ€à€Ê€É¡€ÂŸ€Î¥œ¥Õ¥È¥Š¥§¥¢³«È¯€Ë»È
 *      Íрǀ­€Ê€€·Á€ÇºÆÇÛÉÛ€¹€ëŸì¹ç€Ë€Ï¡€Œ¡€Î€€€º€ì€«€ÎŸò·ï€òËþ€¿€¹€³
 *      €È¡¥
 *    (a) ºÆÇÛÉÛ€ËÈŒ€Š¥É¥­¥å¥á¥ó¥È¡ÊÍøÍьԥޥ˥奢¥ë€Ê€É¡Ë€Ë¡€Ÿåµ­€ÎÃø
 *        ºîž¢ÉœŒš¡€€³€ÎÍøÍÑŸò·ï€ª€è€Ó²Œµ­€Î̵ÊÝŸÚµ¬Äê€ò·ÇºÜ€¹€ë€³€È¡¥
 *    (b) ºÆÇÛÉۀηÁÂÖ€ò¡€ÊÌ€ËÄê€á€ëÊýË¡€Ë€è€Ã€Æ¡€TOPPERS¥×¥í¥ž¥§¥¯¥È€Ë
 *        Êó¹ð€¹€ë€³€È¡¥
 *  (4) ËÜ¥œ¥Õ¥È¥Š¥§¥¢€ÎÍøÍрˀè€êÄŸÀÜŪ€Þ€¿€ÏŽÖÀÜŪ€ËÀž€ž€ë€€€«€Ê€ë»
 *      ³²€«€é€â¡€Ÿåµ­Ãøºîž¢ŒÔ€ª€è€ÓTOPPERS¥×¥í¥ž¥§¥¯¥È€òÌÈÀÕ€¹€ë€³€È¡¥
 *      €Þ€¿¡€ËÜ¥œ¥Õ¥È¥Š¥§¥¢€Î¥æ¡Œ¥¶€Þ€¿€Ï¥š¥ó¥É¥æ¡Œ¥¶€«€é€Î€€€«€Ê€ëÍý
 *      ͳ€ËŽð€Å€¯ÀÁµá€«€é€â¡€Ÿåµ­Ãøºîž¢ŒÔ€ª€è€ÓTOPPERS¥×¥í¥ž¥§¥¯¥È€ò
 *      ÌÈÀÕ€¹€ë€³€È¡¥
 * 
 *  ËÜ¥œ¥Õ¥È¥Š¥§¥¢€Ï¡€ÌµÊÝŸÚ€ÇÄ󶡀µ€ì€Æ€€€ë€â€Î€Ç€¢€ë¡¥Ÿåµ­Ãøºîž¢ŒÔ€ª
 *  €è€ÓTOPPERS¥×¥í¥ž¥§¥¯¥È€Ï¡€ËÜ¥œ¥Õ¥È¥Š¥§¥¢€ËŽØ€·€Æ¡€ÆÃÄê€Î»ÈÍÑÌÜŪ
 *  €ËÂЀ¹€ëŬ¹çÀ­€âŽÞ€á€Æ¡€€€€«€Ê€ëÊÝŸÚ€â¹Ô€ï€Ê€€¡¥€Þ€¿¡€ËÜ¥œ¥Õ¥È¥Š¥§
 *  ¥¢€ÎÍøÍрˀè€êÄŸÀÜŪ€Þ€¿€ÏŽÖÀÜŪ€ËÀž€ž€¿€€€«€Ê€ë»³²€ËŽØ€·€Æ€â¡€€œ
 *  €ÎÀÕÇ€€òÉé€ï€Ê€€¡¥
 * 
 *  $Id$
 */

/*
 *              ¥¿¥€¥à¥€¥Ù¥ó¥ÈŽÉÍý¥â¥ž¥å¡Œ¥ë
 */

#ifndef TOPPERS_TIME_EVENT_H
#define TOPPERS_TIME_EVENT_H

/*
 *  ¥€¥Ù¥ó¥ÈȯÀž»þ¹ï€Î¥Ç¡Œ¥¿·¿€ÎÄêµÁ
 *
 *  EVTTIM€Ï¡€RELTIM€È€·€Æ»ØÄê€Ç€­€ëÈÏ°Ï€è€ê€â¹­€€ÈÏ°Ï€òÉœžœ€Ç€­€ëɬÍ×
 *  €¬€¢€ë¡¥ŠÌITRON4.0»ÅÍ̀Υ¹¥¿¥ó¥À¡Œ¥É¥×¥í¥Õ¥¡¥€¥ë€Ç€Ï¡€RELTIM€¬16¥Ó¥Ã
 *  ¥È°ÊŸå€Ç€Ê€±€ì€Ð€Ê€é€Ê€€€¿€á¡€EVTTIM€Ï17¥Ó¥Ã¥È°ÊŸå€Ç€¢€ë€³€È€¬É¬Í×
 *  €Ç€¢€ë¡¥€œ€Î€¿€á¡€16¥Ó¥Ã¥È€Ë€Ê€ëŸì¹ç€¬€¢€ëuint_t€Ç€Ï€Ê€¯¡€ulong_t€Ë
 *  ÄêµÁ€·€Æ€€€ë¡¥
 */
typedef ulong_t EVTTIM;

/* 
 *  ¥¿¥€¥à¥€¥Ù¥ó¥È¥Ö¥í¥Ã¥¯€Î¥Ç¡Œ¥¿·¿€ÎÄêµÁ
 */
typedef void    (*CBACK)(void *);       /* ¥³¡Œ¥ë¥Ð¥Ã¥¯ŽØ¿ô€Î·¿ */

typedef struct time_event_block {
        uint_t  index;                  /* ¥¿¥€¥à¥€¥Ù¥ó¥È¥Ò¡Œ¥×Ãæ€Ç€Î°ÌÃÖ */
        CBACK   callback;               /* ¥³¡Œ¥ë¥Ð¥Ã¥¯ŽØ¿ô */
        void    *arg;                   /* ¥³¡Œ¥ë¥Ð¥Ã¥¯ŽØ¿ô€ØÅÏ€¹°ú¿ô */
} TMEVTB;

/*
 *  ¥¿¥€¥à¥€¥Ù¥ó¥È¥Ò¡Œ¥×Ãæ€Î¥Î¡Œ¥É€Î¥Ç¡Œ¥¿·¿€ÎÄêµÁ
 */
typedef struct time_event_node {
        EVTTIM  time;                   /* ¥€¥Ù¥ó¥ÈȯÀž»þ¹ï */
        TMEVTB  *p_tmevtb;              /* Âбþ€¹€ë¥¿¥€¥à¥€¥Ù¥ó¥È¥Ö¥í¥Ã¥¯ */
} TMEVTN;

/*
 *  ¥¿¥€¥à¥€¥Ù¥ó¥È¥Ò¡Œ¥×¡Êkernel_cfg.c¡Ë
 */
extern TMEVTN   tmevt_heap[];

/*
 *  žœºß€Î¥·¥¹¥Æ¥à»þ¹ï¡Êñ°Ì: 1¥ß¥êÉáË
 *
 *  ¥·¥¹¥Æ¥àµ¯Æ°»þ€Ë0€ËœéŽü²œ€µ€ì¡€°Ê¹ß¡€¥¿¥€¥à¥Æ¥£¥Ã¥¯€¬¶¡µë€µ€ì€ëÅÙ€Ë
 *  ñĎ€ËÁý²Ã€¹€ë¡¥
 */
extern EVTTIM   current_time;

/*
 *  ¥¿¥€¥à¥€¥Ù¥ó¥È¥Ò¡Œ¥×Ãæ€ÇÍ­žú€ÊºÇŸ®€Î¥·¥¹¥Æ¥à»þ¹ï¡Êñ°Ì: 1¥ß¥êÉáË
 */
extern EVTTIM   min_time;

/*
 *  Œ¡€Î¥¿¥€¥à¥Æ¥£¥Ã¥¯€Î¥·¥¹¥Æ¥à»þ¹ï¡Êñ°Ì: 1¥ß¥êÉáË
 */
extern EVTTIM   next_time;

/*
 *  ¥·¥¹¥Æ¥à»þ¹ïÀÑ»»ÍÑÊÑ¿ô¡Êñ°Ì: 1/TIC_DENO¥ß¥êÉáË
 *
 *  Œ¡€Î¥¿¥€¥à¥Æ¥£¥Ã¥¯€Î¥·¥¹¥Æ¥à»þ¹ï€Î²Œ°Ì·å€òŒš€¹¡ÊŸå°Ì·å€Ïnext_time¡Ë¡¥
 *  TIC_DENO€¬1€Î»þ€Ï¡€²Œ°Ì·å€ÏŸï€Ë0€Ç€¢€ë€¿€á¡€€³€ÎÊÑ¿ô€ÏɬÍ׀ʀ€¡¥
 */
#if TIC_DENO != 1U
extern uint_t   next_subtime;
#endif /* TIC_DENO != 1U */

/*
 *  ÁêÂлþŽÖ€ÎŽðœà»þ¹ï¡Êñ°Ì: 1¥ß¥êÉáË
 *
 *  Œ¡€Î¥¿¥€¥à¥Æ¥£¥Ã¥¯€Î¥·¥¹¥Æ¥à»þ¹ï€òÀÚ€êŸå€²€¿»þ¹ï¡¥TIC_DENO€¬1€Î»þ
 *  €Ï¡€next_time€Ë°ìÃ×€¹€ë¡¥
 */
#if TIC_DENO == 1U
#define base_time       (next_time)
#else /* TIC_DENO == 1U */
#define base_time       (next_time + (next_subtime > 0U ? 1U : 0U))
#endif /* TIC_DENO == 1U */

/*
 *  ¥¿¥€¥à¥€¥Ù¥ó¥È¥Ò¡Œ¥×€ÎºÇžå€Î»ÈÍÑÎΰè€Î¥€¥ó¥Ç¥Ã¥¯¥¹
 *
 *  ¥¿¥€¥à¥€¥Ù¥ó¥È¥Ò¡Œ¥×€ËÅÐÏ¿€µ€ì€Æ€€€ë¥¿¥€¥à¥€¥Ù¥ó¥È€Î¿ô€Ë°ìÃ×€¹€ë¡¥
 */
extern uint_t   last_index;

/*
 *  ¥¿¥€¥à¥€¥Ù¥ó¥ÈŽÉÍý¥â¥ž¥å¡Œ¥ë€ÎœéŽü²œ
 */
extern void     initialize_tmevt(void);

/*
 *  ¥¿¥€¥à¥€¥Ù¥ó¥È€ÎÁÞÆþ°ÌÃÖ€Îõº÷
 */
extern uint_t   tmevt_up(uint_t index, EVTTIM time);
extern uint_t   tmevt_down(uint_t index, EVTTIM time);

/*
 *  ¥¿¥€¥à¥€¥Ù¥ó¥È¥Ò¡Œ¥×€Ø€ÎÅÐÏ¿€Èºïœü
 */
extern void     tmevtb_insert(TMEVTB *p_tmevtb, EVTTIM time);
extern void     tmevtb_delete(TMEVTB *p_tmevtb);

/*
 *  ¥¿¥€¥à¥€¥Ù¥ó¥È¥Ö¥í¥Ã¥¯€ÎÅÐÏ¿¡ÊÁêÂлþŽÖ»ØÄê¡Ë
 *
 *  time€Ç»ØÄꀷ€¿ÁêÂлþŽÖ€¬·Ð²á€·€¿žå€Ë¡€arg€ò°ú¿ô€È€·€Æcallback€¬žÆ
 *  €ÓœÐ€µ€ì€ë€è€Š€Ë¡€p_tmevtb€Ç»ØÄꀷ€¿¥¿¥€¥à¥€¥Ù¥ó¥È¥Ö¥í¥Ã¥¯€òÅÐÏ¿€¹
 *  €ë¡¥
 *  
 */
Inline void
tmevtb_enqueue(TMEVTB *p_tmevtb, RELTIM time, CBACK callback, void *arg)
{
        assert(time <= TMAX_RELTIM);

        p_tmevtb->callback = callback;
        p_tmevtb->arg = arg;
        tmevtb_insert(p_tmevtb, base_time + time);
}

/*
 *  ¥¿¥€¥à¥€¥Ù¥ó¥È¥Ö¥í¥Ã¥¯€ÎÅÐÏ¿¡Ê¥€¥Ù¥ó¥ÈȯÀž»þ¹ï»ØÄê¡Ë
 *
 *  time€Ç»ØÄꀷ€¿¥€¥Ù¥ó¥ÈȯÀž»þ¹ï€Ë¡€arg€ò°ú¿ô€È€·€Æcallback€¬žÆ€ÓœÐ
 *  €µ€ì€ë€è€Š€Ë¡€p_tmevtb€Ç»ØÄꀷ€¿¥¿¥€¥à¥€¥Ù¥ó¥È¥Ö¥í¥Ã¥¯€òÅÐÏ¿€¹€ë¡¥
 */
Inline void
tmevtb_enqueue_evttim(TMEVTB *p_tmevtb, EVTTIM time, CBACK callback, void *arg)
{
        p_tmevtb->callback = callback;
        p_tmevtb->arg = arg;
        tmevtb_insert(p_tmevtb, time);
}

/*
 *  ¥¿¥€¥à¥€¥Ù¥ó¥È¥Ö¥í¥Ã¥¯€ÎÅÐÏ¿²òœü
 */
Inline void
tmevtb_dequeue(TMEVTB *p_tmevtb)
{
        tmevtb_delete(p_tmevtb);
}

/*
 *  ¥¿¥€¥à¥€¥Ù¥ó¥È€Þ€Ç€Î»Ä€ê»þŽÖ€Î·×»»
 */
extern RELTIM   tmevt_lefttim(TMEVTB *p_tmevtb);

/*
 *  ¥¿¥€¥à¥Æ¥£¥Ã¥¯€Î¶¡µë
 */
extern void     signal_time(void);

#endif /* TOPPERS_TIME_EVENT_H */