liblock.c

日本著名的的嵌入式实时操作系统T-Kernel的源码及用户手册。

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

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

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

LOCAL	FastMLock	LibLock;

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

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);
}