knldbg.c

T-kernel 的extension源代码

/*
 *----------------------------------------------------------------------
 *    T-Kernel / Standard Extension
 *
 *    Copyright (C) 2006 by Ken Sakamura. All rights reserved.
 *    T-Kernel / Standard Extension is distributed 
 *      under the T-License for T-Kernel / Standard Extension.
 *----------------------------------------------------------------------
 *
 *    Version:   1.00.00
 *    Released by T-Engine Forum(http://www.t-engine.org) at 2006/8/11.
 *
 *----------------------------------------------------------------------
 */

/*
 *	knldbg.c (libtkse)
 *
 *	Call kernel debug support function
 */

#include <basic.h>
#include <sys/sysinfo.h>
#include <sys/knldbg.h>


/*
 * Set/refer to boot mode
 */
EXPORT UW SetBootMode( UW and, UW or )
{
	return (UW)KnlDebugFunc(KD_BootMode, (VW)and, (VW)or, (VW)0);
}

/*
 * Refer to operation mode
 */
EXPORT UW GetRunMode( void )
{
	return (UW)KnlDebugFunc(KD_RunMode, 0, 0, 0);
}

/*
 * Obtain debug mode
 */
EXPORT BOOL isDebugMode( void )
{
	return KnlDebugFunc(KD_DebugMode, 0, 0, 0);
}

/*
 * Obtain disk repair mode
 */
EXPORT BOOL isFsrcvMode( void )
{
	return (GetRunMode() & BM_FSRCV) != 0;
}

/*
 * Set disk repair mode
 */
EXPORT UW SetFsrcvMode( UW set )
{
	return SetBootMode(~BM_FSRCV, ( set != 0U )? BM_FSRCV: 0);
}

/*
 * Obtain basic operation mode
 */
EXPORT BOOL isBasicMode( void )
{
	return (GetRunMode() & BM_BASIC) != 0;
}