rrl_core.c
来自「澳洲人写的Cortex,包括uC_IP协议栈」· C语言 代码 · 共 387 行 · 第 1/2 页
C
387 行
<HTML><HEAD><TITLE>/home/asysweb/public_html/cortex/kernel/src/rrl_core.c</TITLE></HEAD><BODY><pre><font color="#6920ac">/*************************************************************************/</font><font color="#6920ac">/* */</font><font color="#6920ac">/* Copyright (c) 1997-1999 Australian Real Time Embedded Systems */</font><font color="#6920ac">/* */</font><font color="#6920ac">/* PROPRIETARY RIGHTS of Australian Real Time Embedded Systems */</font><font color="#6920ac">/* are involved in the subject matter of this material. All reproduction,*/</font><font color="#6920ac">/* manufacturing, use, and sales rights pertaining to this subject matter*/</font><font color="#6920ac">/* are governed by the license agreement. The recipient of this software */</font><font color="#6920ac">/* implicitly accepts the terms of the license. */</font><font color="#6920ac">/* */</font><font color="#6920ac">/*************************************************************************/</font><font color="#6920ac">/************************************************************************** * * FILE NAME * * rrl_core.c * * SYSTEM COMPONENT * * Recursive Resource Lock Component * * DESCRIPTION * * This file contains the core services for The Recursive Resource Lock * Component. * * SERVICES * * rrlc_Create create/initialise recursive resource lock * rrlc_Delete destroy resource lock * rrlc_Lock obtain resource lock * rrlc_Try try to obtain resource lock * rrlc_Unlock relinquish lock * * SCCS HISTORY * * @(#)rrl_core.c 1.10, 01/25/99, 00:31:10 * * AUTHOR * * Vadim N. Azarovsky * * CREATED * * 28-Feb-1998 by Vadim N. Azarovsky * * REVISION HISTORY * * NAME DATE REMARKS * **************************************************************************/</font><b><font color='DarkGreen'>#include</font></b> <a href="rrl_priv.h.FIND-INC"><font color="blue">"rrl_priv.h"</font></a><b><font color='DarkGreen'>#include</font></b> <a href="ass_defs.h.FIND-INC"><font color="blue">"ass_defs.h"</font></a><b><font color='DarkGreen'>#include</font></b> <a href="swi_defs.h.FIND-INC"><font color="blue">"swi_defs.h"</font></a><b><font color='DarkGreen'>#include</font></b> <a href="hwi_defs.h.FIND-INC"><font color="blue">"hwi_defs.h"</font></a><b><font color='DarkGreen'>#include</font></b> <a href="thr_priv.h.FIND-INC"><font color="blue">"thr_priv.h"</font></a><font color="#6920ac">/* create/initialise recursive resource lock */</font><font size="+1"><i>rrlc_Lock_t</i> *<b><font color="azure1"><a name="rrlc_Create">rrlc_Create</a></font></b>( <i>rrlc_Lock_t</i> *pLock_a, <i>rrlc_Attr_t</i> *pAttr_a){</font><font color="#6920ac">/********************* * LOCAL VARIABLES * *********************/</font> <font color="#6920ac">/* None */</font><font color="#6920ac">/********************* * PROCEDURE LOGIC * *********************/</font> <b>if</b> (pAttr_a == <a href="CRTX_NULL.FIND-DEF">CRTX_NULL</a>) pAttr_a = &rrlc_AttrDefault_g; <b>if</b> (pLock_a == <a href="CRTX_NULL.FIND-DEF">CRTX_NULL</a>) { pLock_a = (<i>rrlc_Lock_t</i>*)<a href="dmem_Alloc.FIND-FUNC">dmem_Alloc</a>(pAttr_a->Segment, <i>sizeof</i>(<i>rrlc_Lock_t</i>), <i>sizeof</i>(<i>crtx_Unsigned_t</i>)); <b>if</b> ((<i>crtx_Void_t</i>*)pLock_a == (<i>crtx_Void_t</i>*)<a href="DMEM_ILLEGAL.FIND-DEF">DMEM_ILLEGAL</a>) { <font color="#6920ac">/* memory allocation error */</font> <a href="CRTX_EXCEPTION.FIND-DEF">CRTX_EXCEPTION</a> MemAllocError_Exc; } pLock_a->Flags = <a href="RRLC_FLAG_INIT.FIND-DEF">RRLC_FLAG_INIT</a> | <a href="RRLC_FLAG_LOCK_ALLOC.FIND-DEF">RRLC_FLAG_LOCK_ALLOC</a>; } <b>else</b> { pLock_a->Flags = <a href="RRLC_FLAG_INIT.FIND-DEF">RRLC_FLAG_INIT</a>; } <font color="#6920ac">/* initialise lock */</font> <a href="RRLC_SET_SUSP_POLICY.FIND-DEF">RRLC_SET_SUSP_POLICY</a>(pLock_a, pAttr_a); pLock_a->LockCounter = -1; pLock_a->EntryCounter = 0; pLock_a->Owner = <a href="THRD_ILLEGAL_ID.FIND-DEF">THRD_ILLEGAL_ID</a>; pLock_a->Waiting = 0; pLock_a->Segment = pAttr_a->Segment; <a href="RQUE_INIT_QUEUE.FIND-DEF">RQUE_INIT_QUEUE</a>(&pLock_a->WaitingList); <b><font color='DarkGreen'>#if</font></b><font color="maroon"> ENVI_CRTX_ERR_CHECK_LEVEL > 0</font> <a href="RRLC_SET_LOCK_ID.FIND-DEF">RRLC_SET_LOCK_ID</a>(pLock_a);<b><font color='DarkGreen'>#endif</font></b><font color="maroon"> <font color="#6920ac">/* ENVI_CRTX_ERR_CHECK_LEVEL > 0 */</font></font> <b>return</b> pLock_a;<font color="#6920ac">/************************ * EXCEPTION HANDLING * ************************/</font><font color="blue">MemAllocError_Exc:</font> <font color="#6920ac">/* memory allocation error exception */</font> <b>return</b> <a href="CRTX_NULL.FIND-DEF">CRTX_NULL</a>;}<font color="#6920ac">/* destroy resource lock */</font><font size="+1"><i>crtx_Void_t</i> <b><font color="azure1"><a name="rrlc_Delete">rrlc_Delete</a></font></b>( <i>rrlc_Lock_t</i> *pLock_a){</font><font color="#6920ac">/********************* * LOCAL VARIABLES * *********************/</font> <font color="#6920ac">/* None */</font><font color="#6920ac">/********************* * PROCEDURE LOGIC * *********************/</font> <a href="CRTX_ASSERT.FIND-DEF">CRTX_ASSERT</a>(pLock_a) <b>if</b> (pLock_a->Flags & <a href="RRLC_FLAG_LOCK_ALLOC.FIND-DEF">RRLC_FLAG_LOCK_ALLOC</a>) { <font color="#6920ac">/* release internaly allocated control block */</font> <a href="dmem_Free.FIND-FUNC">dmem_Free</a>(pLock_a->Segment, (<i>crtx_Void_t</i>*)pLock_a, <i>sizeof</i>(<i>rrlc_Lock_t</i>)); } <b>else</b> { pLock_a->Flags = <a href="RRLC_FLAG_INIT.FIND-DEF">RRLC_FLAG_INIT</a>;<b><font color='DarkGreen'>#if</font></b><font color="maroon"> ENVI_CRTX_ERR_CHECK_LEVEL > 0</font> <a href="CRTX_SET_NO_ID.FIND-DEF">CRTX_SET_NO_ID</a>(pLock_a); <font color="#6920ac">/* no id */</font><b><font color='DarkGreen'>#endif</font></b><font color="maroon"> <font color="#6920ac">/* ENVI_CRTX_ERR_CHECK_LEVEL > 0 */</font></font> } <b>return</b>;<font color="#6920ac">/************************ * EXCEPTION HANDLING * ************************/</font> <font color="#6920ac">/* None */</font>}<font color="#6920ac">/* obtain lock */</font><font size="+1"><i>crtx_Void_t</i> <b><font color="azure1"><a name="rrlc_Lock">rrlc_Lock</a></font></b>( <i>rrlc_Lock_t</i> *pLock_a){</font><font color="#6920ac">/********************* * LOCAL VARIABLES * *********************/</font> <a href="CRTX_REG_1.FIND-DEF">CRTX_REG_1</a> <i>rrlc_Lock_t</i> *pLock = pLock_a; <a href="CRTX_REG_2.FIND-DEF">CRTX_REG_2</a> <i>thrd_ID_t</i> Myself; <a href="CRTX_REG_2.FIND-DEF">CRTX_REG_2</a> <i>thrd_SuspendPolicy_t</i> SuspendPolicy;<b><font color='DarkGreen'>#if</font></b><font color="maroon"> ENVI_CRTX_ERR_CHECK_LEVEL > 0</font> <i>rrlc_SuspendBlock_t</i> SuspendBlock;<b><font color='DarkGreen'>#endif</font></b><font color="maroon"> <font color="#6920ac">/* ENVI_CRTX_ERR_CHECK_LEVEL > 0 */</font></font><font color="#6920ac">/********************* * PROCEDURE LOGIC * *********************/</font> <a href="CRTX_ASSERT.FIND-DEF">CRTX_ASSERT</a>(pLock_a)<b><font color='DarkGreen'>#if</font></b><font color="maroon"> ENVI_CRTX_ERR_CHECK_LEVEL > 0</font> <a href="CRTX_ASSERT.FIND-DEF">CRTX_ASSERT</a>(<a href="RRLC_CHECK_LOCK_ID.FIND-DEF">RRLC_CHECK_LOCK_ID</a>(pLock_a))<b><font color='DarkGreen'>#endif</font></b><font color="maroon"> <font color="#6920ac">/* ENVI_CRTX_ERR_CHECK_LEVEL > 0 */</font></font> <b>if</b> (<a href="hrdi_Inc.FIND-FUNC">hrdi_Inc</a>(&pLock->LockCounter) == 0) { <font color="#6920ac">/* if here lock is available. Grab it! */</font> pLock->EntryCounter = 1;⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?