/*
 *  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-2015 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: target_timer.c 301 2015-01-07 04:57:01Z ertl-ishikawa $
 */

/*
 *  タイマドライバ（BlueNinja用）
 */

#include "kernel_impl.h"
#include "time_event.h"
#include <sil.h>
#include "target_timer.h"
#include "tz1000.h"

/*
 * =begin not implemented...
 * TODO: オーバランタイマは現状未サポート
 */
#ifdef TOPPERS_SUPPORT_OVRHDR

#include "overrun.h"

/*
 *	オーバランタイマの初期化処理
 *
 *	タイマを初期化する．
 */
void
target_ovrtimer_initialize(intptr_t exinf)
{
}

/*
 *	オーバランタイマの終了処理
 *
 *	タイマの動作を終了する．
 */
void
target_ovrtimer_terminate(intptr_t exinf)
{
}

/*
 *	オーバランタイマの起動処理
 *
 *	タイマを起動する．
 */
void
target_ovrtimer_start(OVRTIM ovrtim)
{
}

/*
 *	オーバランタイマの停止処理
 *
 *	タイマの動作を停止させる．
 */
OVRTIM
target_ovrtimer_stop(void)
{
}

/*
 *	オーバランタイマの残り時間の読出し
 */
OVRTIM
target_ovrtimer_get_current(void)
{
}

/*
 *	オーバランタイマ割込みハンドラ
 */
void
target_ovrtimer_handler(void)
{
	i_begin_int(INTNO_OVRTIMER);
    /*
     *  割込みハンドラの入り口で全割込みを禁止できず，
     *  割込みハンドラの入り口でオーバランタイマを停止する
     *  前に，オーバランタイマの割込みが入る可能性があるため，
     *  ここでもovrtimer_stopを呼出し，非依存部をオーバラン
     *  タイマ停止状態とする
     */
    ovrtimer_stop();

    /*
     * 割込み要求クリア
     */

	call_ovrhdr();
	i_end_int(INTNO_OVRTIMER);
}

#endif /* TOPPERS_SUPPORT_OVRHDR */
/*
 * =end not implemented...
 */

/*
 *  タイマの起動処理
 */
void
target_hrt_initialize(intptr_t exinf)
{
    /*
     * クロックソース
     *   CSMSEL_MAIN : PLL (48MHz)
     *   PSSEL_CD_PPIER0 : /2
     *   ... 24MHz
     */
    /* 初期設定 */
    /*
     *  TMR0 現在値タイマ
     *    32bit周期タイマ
     *    割込み禁止
     */
    Driver_TMR0.Initialize(0, 0);
    sil_wrw_mem(TMRCONTROL(TMR0_BASE), (TMRCONTROL_PERIOD | TMRCONTROL_32BIT));
    /* カウンタをセット */
    sil_wrw_mem(TMRLOAD(TMR0_BASE), MAX_HRTCNT_CLOCK);

    /*
     *  TMR1 タイムイベント割込みタイマ
     *    32bitワンショットタイマ
     *    割込み許可
     */
    Driver_TMR1.Initialize(0, 0);
    sil_wrw_mem(TMRCONTROL(TMR1_BASE), (TMRCONTROL_PERIOD |
                                        TMRCONTROL_INTENA |
                                        TMRCONTROL_32BIT  | 
                                        TMRCONTROL_ONESHOT));
    /* 割込み要求をクリア */
    sil_wrw_mem(TMRINTCLR(TMR1_BASE), 0x00000001);

    /* 現在値タイマスタート */
    sil_orw(TMRCONTROL(TMR0_BASE), TMRCONTROL_ENABLE);
}

/*
 *  タイマの停止処理
 */
void
target_hrt_terminate(intptr_t exinf)
{
    /* タイマを停止 */
    sil_andw(TMRCONTROL(TMR0_BASE), ~TMRCONTROL_ENABLE);
    sil_andw(TMRCONTROL(TMR1_BASE), ~TMRCONTROL_ENABLE);
    /* 割り込み要求をクリア */
    sil_wrw_mem(TMRINTCLR(TMR1_BASE), 0x00000001);
}

/*
 *  タイマ割込みハンドラ
 */
void
target_hrt_handler(void)
{
	i_begin_int(INTNO_TIMER);
    /* 割り込み要求をクリア */
    sil_wrw_mem(TMRINTCLR(TMR1_BASE), 0x00000001);
	signal_time();                    /* タイムティックの供給 */
	i_end_int(INTNO_TIMER);
}

/*
 *  高分解能タイマの現在のカウント値の読出し
 */
HRTCNT
target_hrt_get_current(void)
{
    HRTCNT current;

	current = MAX_HRTCNT_CLOCK - (HRTCNT)sil_rew_mem(TMRVALUE(TMR0_BASE));

    return (HRTCNT_USEC(current));
}

/*
 *  高分解能タイマへの割込みタイミングの設定
 *
 *  高分解能タイマを，hrtcntで指定した値カウントアップしたら割込みを発
 *  生させるように設定する．
 */
void
target_hrt_set_event(HRTCNT hrtcnt)
{
    /* タイマを停止 */
    sil_andw(TMRCONTROL(TMR1_BASE), ~TMRCONTROL_ENABLE);

    /* カウンタをセット */
    sil_wrw_mem(TMRLOAD(TMR1_BASE), HRTCNT_CLOCK(hrtcnt));

    /* 割込み要求をクリア */
    sil_wrw_mem(TMRINTCLR(TMR1_BASE), 0x00000001);

    /* タイムイベント割込みタイマスタート */
    sil_orw(TMRCONTROL(TMR1_BASE), TMRCONTROL_ENABLE);
}

/*
 *  高分解能タイマ割込みの要求
 */
void
target_hrt_raise_event(void)
{
    /* タイマを停止 */
    sil_andw(TMRCONTROL(TMR1_BASE), ~TMRCONTROL_ENABLE);

    /* カウンタをセット */
    sil_wrw_mem(TMRLOAD(TMR1_BASE), 1U);

    /* 割込み要求をクリア */
    sil_wrw_mem(TMRINTCLR(TMR1_BASE), 0x00000001);

    /* タイムイベント割込みタイマスタート */
    sil_orw(TMRCONTROL(TMR1_BASE), TMRCONTROL_ENABLE);
}