uzume_prototype/kernel/kernel/time_manage.c

   1 /*
   2  *  TOPPERS/JSP Kernel
   3  *      Toyohashi Open Platform for Embedded Real-Time Systems/
   4  *      Just Standard Profile Kernel
   5  *
   6  *  Copyright (C) 2000-2003 by Embedded and Real-Time Systems Laboratory
   7  *                              Toyohashi Univ. of Technology, JAPAN
   8  *
   9  *  上記著作権者は，以下の (1)〜(4) の条件か，Free Software Foundation
  10  *  によって公表されている GNU General Public License の Version 2 に記
  11  *  述されている条件を満たす場合に限り，本ソフトウェア（本ソフトウェア
  12  *  を改変したものを含む．以下同じ）を使用・複製・改変・再配布（以下，
  13  *  利用と呼ぶ）することを無償で許諾する．
  14  *  (1) 本ソフトウェアをソースコードの形で利用する場合には，上記の著作
  15  *      権表示，この利用条件および下記の無保証規定が，そのままの形でソー
  16  *      スコード中に含まれていること．
  17  *  (2) 本ソフトウェアを，ライブラリ形式など，他のソフトウェア開発に使
  18  *      用できる形で再配布する場合には，再配布に伴うドキュメント（利用
  19  *      者マニュアルなど）に，上記の著作権表示，この利用条件および下記
  20  *      の無保証規定を掲載すること．
  21  *  (3) 本ソフトウェアを，機器に組み込むなど，他のソフトウェア開発に使
  22  *      用できない形で再配布する場合には，次のいずれかの条件を満たすこ
  23  *      と．
  24  *    (a) 再配布に伴うドキュメント（利用者マニュアルなど）に，上記の著
  25  *        作権表示，この利用条件および下記の無保証規定を掲載すること．
  26  *    (b) 再配布の形態を，別に定める方法によって，TOPPERSプロジェクトに
  27  *        報告すること．
  28  *  (4) 本ソフトウェアの利用により直接的または間接的に生じるいかなる損
  29  *      害からも，上記著作権者およびTOPPERSプロジェクトを免責すること．
  30  *
  31  *  本ソフトウェアは，無保証で提供されているものである．上記著作権者お
  32  *  よびTOPPERSプロジェクトは，本ソフトウェアに関して，その適用可能性も
  33  *  含めて，いかなる保証も行わない．また，本ソフトウェアの利用により直
  34  *  接的または間接的に生じたいかなる損害に関しても，その責任を負わない．
  35  *
  36  *  @(#) $Id: time_manage.c,v 1.1 2009/01/31 05:27:37 suikan Exp $
  37  */
  38
  39 /*
  40  *  システム時刻管理機能
  41  */
  42
  43 #include "jsp_kernel.h"
  44 #include "check.h"
  45 #include "time_event.h"
  46
  47 /*
  48  *  システム時刻の設定
  49  */
  50 #ifdef __set_tim
  51
  52 SYSCALL ER
  53 set_tim(const SYSTIM *p_systim)
  54 {
  55     ER  ercd;
  56
  57     LOG_SET_TIM_ENTER(p_systim);
  58     CHECK_TSKCTX_UNL();
  59
  60     t_lock_cpu();
  61     systim_offset = *p_systim - current_time;
  62     ercd = E_OK;
  63     t_unlock_cpu();
  64
  65     exit:
  66     LOG_SET_TIM_LEAVE(ercd);
  67     return(ercd);
  68 }
  69
  70 #endif /* __set_tim */
  71
  72 /*
  73  *  システム時刻の参照
  74  */
  75 #ifdef __get_tim
  76
  77 SYSCALL ER
  78 get_tim(SYSTIM *p_systim)
  79 {
  80     ER  ercd;
  81
  82     LOG_GET_TIM_ENTER(p_systim);
  83     CHECK_TSKCTX_UNL();
  84
  85     t_lock_cpu();
  86     *p_systim = systim_offset + current_time;
  87     ercd = E_OK;
  88     t_unlock_cpu();
  89
  90     exit:
  91     LOG_GET_TIM_LEAVE(ercd, *p_systim);
  92     return(ercd);
  93 }
  94
  95 #endif /* __get_tim */
  96
  97 /*
  98  *  性能評価用システム時刻の参照
  99  */
 100 #ifdef __vxget_tim
 101 #ifdef SUPPORT_VXGET_TIM
 102 #include <hw_timer.h>
 103
 104 SYSCALL ER
 105 vxget_tim(SYSUTIM *p_sysutim)
 106 {
 107     SYSUTIM utime;
 108     SYSTIM  time;
 109 #if TIC_DENO != 1
 110     INT subtime;
 111 #endif /* TIC_DENO != 1 */
 112     CLOCK   clock;
 113     BOOL    ireq;
 114     BOOL    locked;
 115     ER  ercd;
 116
 117     LOG_VXGET_TIM_ENTER(p_sysutim);
 118     CHECK_TSKCTX();
 119
 120     locked = sense_lock();
 121     if (!(locked)) {
 122         t_lock_cpu();
 123     }
 124     time = systim_offset + next_time;
 125 #if TIC_DENO != 1
 126     subtime = (INT) next_subtime;
 127 #endif /* TIC_DENO != 1 */
 128     clock = hw_timer_get_current();
 129     ireq = hw_timer_fetch_interrupt();
 130     if (!(locked)) {
 131         t_unlock_cpu();
 132     }
 133
 134     utime = ((SYSUTIM) time) * 1000;
 135 #if TIC_DENO != 1
 136     utime += subtime * 1000 / TIC_DENO;
 137 #endif /* TIC_DENO != 1 */
 138     if (!(ireq && !(BEFORE_IREQ(clock)))) {
 139         utime -= TIC_NUME * 1000 / TIC_DENO;
 140     }
 141     utime += TO_USEC(clock);
 142     *p_sysutim = utime;
 143     ercd = E_OK;
 144
 145     exit:
 146     LOG_VXGET_TIM_LEAVE(ercd, *p_sysutim);
 147     return(ercd);
 148 }
 149
 150 #endif /* SUPPORT_VXGET_TIM */
 151 #endif /* __vxget_tim */