liblock.c

来自「日本很有名的一个嵌入式RTOS」· C语言 代码 · 共 54 行

/*
 *----------------------------------------------------------------------
 *    T-Kernel
 *
 *    Copyright (C) 2004-2006 by Ken Sakamura. All rights reserved.
 *    T-Kernel is distributed under the T-License.
 *----------------------------------------------------------------------
 *
 *    Version:   1.02.01
 *    Released by T-Engine Forum(http://www.t-engine.org) at 2006/1/10.
 *
 *----------------------------------------------------------------------
 */

/*
 *	@(#)liblock.c (libtk)
 *
 *	Shared exclusive control lock in library 
 */

#include "libtk.h"
#include <sys/util.h>
#include <tk/util.h>

LOCAL	FastMLock	LibLock;

/* Set Object Name in .exinf for DEBUG */
#define OBJNAME_LIBLOCK		"lltk"	/* multi-lock object name for liblock */

EXPORT ER _init_liblock( void )
{
	return CreateMLock(&LibLock, OBJNAME_LIBLOCK);
}

EXPORT ER _lib_locktmo( W lockno, W tmo, BOOL ignore_mintr )
{
	return MLockTmo(&LibLock, lockno, tmo);
}

EXPORT ER _lib_lock( W lockno, BOOL ignore_mintr )
{
	return MLock(&LibLock, lockno);
}

EXPORT void _lib_unlock( W lockno )
{
	MUnlock(&LibLock, lockno);
}

EXPORT void _delete_liblock( void )
{
	DeleteMLock(&LibLock);
}