acre_tsk.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_tsk.h"


/* タスクの栏喇(ID戎规极瓢充烧け) */
ER_ID acre_tsk(
		const T_CTSK *pk_ctsk)	/* タスク栏喇攫鼠を掐れたパケットへのポインタ */
{
	ID tskid;
	ER ercd;

	mknl_loc_sys();	/* システムのロック */

	/* 鄂きIDの浮瑚 */
	for ( tskid = KERNEL_TMAX_TSKID; tskid >= KERNEL_TMIN_TSKID; tskid-- )
	{
		if ( KERNEL_TSKID_TO_TCB_RAM(tskid) == NULL )
		{
			break;
		}
	}
	if ( tskid < KERNEL_TMIN_TSKID )
	{
		mknl_unl_sys();		/* システムのロック豺近 */
		return E_NOID;		/* ID戎规稍颅 */
	}
	
	/* タスクの栏喇 */
	ercd = kernel_cre_tsk(tskid, pk_ctsk);

	mknl_unl_sys();	/* システムのロック豺近 */

	if ( ercd != E_OK )
	{
		return (ER_ID)ercd;	/* エラ〖券栏 */
	}

	return (ER_ID)tskid;		/* 喇根 */
}


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