cpu_config.c

JAPAN RTOS TOPPERS/JSP kernel 1.4 PreRelease simulation environment JSP kernel Windows simulation

/*
 *  TOPPERS/JSP Kernel
 *      Toyohashi Open Platform for Embedded Real-Time Systems/
 *      Just Standard Profile Kernel
 * 
 *  Copyright (C) 2000-2003 by Embedded and Real-Time Systems Laboratory
 *                              Toyohashi Univ. of Technology, JAPAN
 * 
 *  忋婰挊嶌尃幰偼丆埲壓偺 (1)乣(4) 偺忦審偐丆Free Software Foundation 
 *  偵傛偭偰岞昞偝傟偰偄傞 GNU General Public License 偺 Version 2 偵婰
 *  弎偝傟偰偄傞忦審傪枮偨偡応崌偵尷傝丆杮僜僼僩僂僃傾乮杮僜僼僩僂僃傾
 *  傪夵曄偟偨傕偺傪娷傓丏埲壓摨偠乯傪巊梡丒暋惢丒夵曄丒嵞攝晍乮埲壓丆
 *  棙梡偲屇傇乯偡傞偙偲傪柍彏偱嫋戻偡傞丏
 *  (1) 杮僜僼僩僂僃傾傪僜乕僗僐乕僪偺宍偱棙梡偡傞応崌偵偼丆忋婰偺挊嶌
 *      尃昞帵丆偙偺棙梡忦審偍傛傃壓婰偺柍曐徹婯掕偑丆偦偺傑傑偺宍偱僜乕
 *      僗僐乕僪拞偵娷傑傟偰偄傞偙偲丏
 *  (2) 杮僜僼僩僂僃傾傪丆儔僀僽儔儕宍幃側偳丆懠偺僜僼僩僂僃傾奐敪偵巊
 *      梡偱偒傞宍偱嵞攝晍偡傞応崌偵偼丆嵞攝晍偵敽偆僪僉儏儊儞僩乮棙梡
 *      幰儅僯儏傾儖側偳乯偵丆忋婰偺挊嶌尃昞帵丆偙偺棙梡忦審偍傛傃壓婰
 *      偺柍曐徹婯掕傪宖嵹偡傞偙偲丏
 *  (3) 杮僜僼僩僂僃傾傪丆婡婍偵慻傒崬傓側偳丆懠偺僜僼僩僂僃傾奐敪偵巊
 *      梡偱偒側偄宍偱嵞攝晍偡傞応崌偵偼丆師偺偄偢傟偐偺忦審傪枮偨偡偙
 *      偲丏
 *    (a) 嵞攝晍偵敽偆僪僉儏儊儞僩乮棙梡幰儅僯儏傾儖側偳乯偵丆忋婰偺挊
 *        嶌尃昞帵丆偙偺棙梡忦審偍傛傃壓婰偺柍曐徹婯掕傪宖嵹偡傞偙偲丏
 *    (b) 嵞攝晍偺宍懺傪丆暿偵掕傔傞曽朄偵傛偭偰丆TOPPERS僾儘僕僃僋僩偵
 *        曬崘偡傞偙偲丏
 *  (4) 杮僜僼僩僂僃傾偺棙梡偵傛傝捈愙揑傑偨偼娫愙揑偵惗偠傞偄偐側傞懝
 *      奞偐傜傕丆忋婰挊嶌尃幰偍傛傃TOPPERS僾儘僕僃僋僩傪柶愑偡傞偙偲丏
 * 
 *  杮僜僼僩僂僃傾偼丆柍曐徹偱採嫙偝傟偰偄傞傕偺偱偁傞丏忋婰挊嶌尃幰偍
 *  傛傃TOPPERS僾儘僕僃僋僩偼丆杮僜僼僩僂僃傾偵娭偟偰丆偦偺揔梡壜擻惈傕
 *  娷傔偰丆偄偐側傞曐徹傕峴傢側偄丏傑偨丆杮僜僼僩僂僃傾偺棙梡偵傛傝捈
 *  愙揑傑偨偼娫愙揑偵惗偠偨偄偐側傞懝奞偵娭偟偰傕丆偦偺愑擟傪晧傢側偄丏
 * 
 *  @(#) $Id: cpu_config.c,v 1.11 2003/07/04 05:34:18 takayuki Exp $
 */


/*
 *	僾儘僙僢僒埶懚儌僕儏乕儖乮Windows梡乯
 */
#include "cpu_rename.h"

#include "sys_defs.h"
#include "jsp_kernel.h"
#include "check.h"
#include "task.h"
#include "hal_msg.h"
#include "vwindows.h"
#include "eventlog.h"

volatile char CPUStatus = CPU_STAT_LOCK;	//CPU忬懺僼儔僌

/*
 *  僞僗僋僐儞僥僉僗僩偱偺妱崬傒儅僗僋
 */
#ifdef SUPPORT_CHG_IMS
unsigned int task_sigmask;
#endif /* SUPPORT_CHG_IMS */

/*
 *  僞僗僋僨傿僗僷僢僠儍
 *    僨傿僗僷僢僠儍杮懱偼start.c偵偁傞
 *    偙偙偱偼娗棟僗儗僢僪偵僨傿僗僷僢僠埶棅傪弌偡偩偗
 */
void
dispatch()
{
	LOG_DSP_ENTER_TSK(runtsk);
	HALDispatchRequest(0);	
}

/* 妱崬傒梡僨傿僗僷僢僠儍 (弌椡偡傞儘僌忣曬偺傒偑堎側傞) */
void
idispatch()
{
	LOG_DSP_ENTER_INT(runtsk);
	HALDispatchRequest(0);
}


/*
 *  尰嵼偺僐儞僥僉僗僩傪幪偰偰僨傿僗僷僢僠
 *    exit_and_dispatch 偼丆CPU儘僢僋忬懺偱屇傃弌偝側偗傟偽側傜側偄丏
 *
 *    尰嵼幚峴拞偺僞僗僋偺TCB傪巜掕偟偰攋婞埶棅丅攋婞屻帺摦揑偵僨傿僗僷僢僠儍傊丅
 */
void
exit_and_dispatch() 
{
	HALDestroyRequest(runtsk);
}


/*
 *  僾儘僙僢僒埶懚偺弶婜壔
 */

void
cpu_initialize()
{
	/*
	 *  妱崬傒僄儈儏儗乕僞偺弶婜壔
	 */
	ini_int();

	/*
	 * 嵟忋埵峔憿壔椺奜僴儞僪儔偺愝掕
	 */
	ini_exc();
}

/*
 *  僾儘僙僢僒埶懚偺廔椆張棟
 */
void
cpu_terminate()
{	HALQuitRequest();	}


/*
 * 僞僗僋婲摦儖乕僠儞
 *
 */

DWORD WINAPI
activate_r( LPVOID param)
{
	TCB * tcb = (TCB *)param;

	TlsAlloc();
	TlsSetValue(TLS_LOGMASK, 0);
	(*(void(*)(VP_INT))tcb->tinib->task)(tcb->tinib->exinf);
	ext_tsk();
	return 0;
}

/*
 *  atexit偱搊榐偝傟偨娭悢偺撉弌偟 (Windows偼壗傕偟側偄 -> CRT偵擟偣傞)
 */
void call_atexit(void)
{}


/*
 *   抳柦揑側幐攕偵懳偡傞懳張儖乕僠儞
 */
void FatalAssertion(int exp, LPCSTR format, ...)
{
	extern HANDLE PrimaryThreadHandle;
	extern HANDLE CurrentRunningThreadHandle;

	if(!exp)
	{
		va_list vl;
		char    buffer[1024];

			/* 僄儔乕偑婲偒偨尨場傪撍偒巭傔傞 */
		wsprintf(buffer, "Critical assertion fail occured !!\nGetLastError = 0x%08x\n\n", GetLastError());

			/* 僇乕僱儖偑摦偒弌偟偰偄偨傜... */		
		if(PrimaryThreadHandle != INVALID_HANDLE_VALUE)
		{
				/* 僇乕僱儖偺幚峴傪巭傔傞 */
			dis_int(0);
			if(CurrentRunningThreadHandle != INVALID_HANDLE_VALUE)
				SuspendThread(CurrentRunningThreadHandle);
			hw_timer_terminate();
		}

			/* 寈崘昞帵 */
		va_start(vl, format);
		wvsprintf(buffer + lstrlen(buffer), format, vl);
		MessageBox(PrimaryDialogHandle, buffer, "Assertion Failed", MB_OK|MB_ICONERROR);

			/* 僇乕僱儖掆巭 */
		HALQuitRequest();
	}
}

	/*
	 *   儘僌弌椡傪偳偆偡傞偐偺惂屼
	 */
void set_logcontrol(BOOL enable)
{
	BOOL result;
	result = TlsSetValue(TLS_LOGMASK, (LPVOID)(enable == TRUE ? 0 : 1));
	if(result == 0)
	{
		TlsAlloc();
		TlsSetValue(TLS_LOGMASK, (LPVOID)(enable == TRUE ? 0 : 1));
	}
}