sta_alm.c

itron

/* ------------------------------------------------------------------------ */
/*  Hyper Operating System V4  μITRON4.0慌屯 Real-Time OS                  */
/*    ITRONカ〖ネル アラ〖ムハンドラ                                        */
/*                                                                          */
/*                                  Copyright (C) 1998-2002 by Project HOS  */
/*                                  http://sourceforge.jp/projects/hos/     */
/* ------------------------------------------------------------------------ */


#include "knl_alm.h"



/* アラ〖ムハンドラの瓢侯倡幌 */
ER sta_alm(
		ID     almid,	/* 瓢侯倡幌滦据のアラ〖ムハンドラのID戎规 */
		RELTIM almtim)	/* アラ〖ムハンドラの弹瓢箕癸(陵滦箕粗) */
{
	const T_KERNEL_ALMCB_ROM *almcb_rom;
	T_KERNEL_ALMCB_RAM *almcb_ram;
	
	/* ID のチェック */
#ifdef HOS_ERCHK_E_ID
	if ( almid < KERNEL_TMIN_ALMID || almid > KERNEL_TMAX_ALMID )
	{
		return E_ID;
	}
#endif
	
	mknl_loc_sys();	/* システムのロック */
	
	almcb_ram = KERNEL_ALMID_TO_ALMCB_RAM(almid);
	
	/* オブジェクト赂哼チェック */
#ifdef HOS_ERCHK_E_NOEXS
	if ( almcb_ram == NULL )
	{
		mknl_unl_sys();		/* システムのロック豺近 */
		return E_NOEXS;
	}
#endif
	
	almcb_rom = almcb_ram->almcb_rom;
	
	/* タイマカウンタ肋年 */
	almcb_ram->lefttim = almtim;
	
	/* タイマリストに判峡 */
	kernel_add_tml((T_KERNEL_TIM *)almcb_ram);
	
	mknl_unl_sys();		/* システムのロック豺近 */

	return E_OK;
}


/* ------------------------------------------------------------------------ */
/*  Copyright (C) 1998-2002 by Project HOS                                  */
/* ------------------------------------------------------------------------ */