evn_core.c

来自「澳洲人写的Cortex,包括uC_IP协议栈」· C语言 代码 · 共 429 行 · 第 1/2 页

C
429
字号
<HTML><HEAD><TITLE>/home/asysweb/public_html/cortex/kernel/src/evn_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 * *      evn_core.c * * SYSTEM COMPONENT * *      Event Flags Component * * DESCRIPTION * *      This file contains the core services for Event Flags *      Component. * * SERVICES * *      evnt_Create         create/initialise event flags *      evnt_Delete         destroy event flags *      evnt_Set            set event flags *      evnt_Clr            clear event flags  *      evnt_Wait           wait for events *      evnt_Try            poll events * * SCCS HISTORY * *      @(#)evn_core.c  1.4, 01/25/99, 00:32:20 * * AUTHOR * *      Vadim N. Azarovsky * * CREATED * *      13-Jun-1998         by Vadim N. Azarovsky * * REVISION HISTORY * *      NAME                DATE                    REMARKS * **************************************************************************/</font><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><b><font color='DarkGreen'>#include</font></b> <a href="evn_priv.h.FIND-INC"><font color="blue">"evn_priv.h"</font></a><font color="#6920ac">/* create/initialise events */</font><font size="+1"><i>evnt_Events_t</i> *<b><font color="azure1"><a name="evnt_Create">evnt_Create</a></font></b>(    <i>evnt_Events_t</i>   *pEvents_a,     <i>evnt_Mask_t</i>     InitMask_a,    <i>evnt_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 = &amp;evnt_AttrDefault_g;    <b>if</b> (pEvents_a == <a href="CRTX_NULL.FIND-DEF">CRTX_NULL</a>)    {        pEvents_a = (<i>evnt_Events_t</i>*)<a href="dmem_Alloc.FIND-FUNC">dmem_Alloc</a>(pAttr_a-&gt;Segment,                                               <i>sizeof</i>(<i>evnt_Events_t</i>),                                               <i>sizeof</i>(<i>crtx_Unsigned_t</i>));        <b>if</b> ((<i>crtx_Void_t</i>*)pEvents_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;        }        pEvents_a-&gt;ObjFlags = <a href="EVNT_FLAG_INIT.FIND-DEF">EVNT_FLAG_INIT</a> | <a href="EVNT_FLAG_EVENTS_ALLOC.FIND-DEF">EVNT_FLAG_EVENTS_ALLOC</a>;    }    <b>else</b>    {        pEvents_a-&gt;ObjFlags = <a href="EVNT_FLAG_INIT.FIND-DEF">EVNT_FLAG_INIT</a>;    }    <font color="#6920ac">/* initialise events */</font>    <a href="EVNT_SET_SUSP_POLICY.FIND-DEF">EVNT_SET_SUSP_POLICY</a>(pEvents_a, pAttr_a);    pEvents_a-&gt;Flags   = InitMask_a;    pEvents_a-&gt;Segment = pAttr_a-&gt;Segment;    <a href="RQUE_INIT_QUEUE.FIND-DEF">RQUE_INIT_QUEUE</a>(&amp;pEvents_a-&gt;WaitingList);    <b><font color='DarkGreen'>#if</font></b><font color="maroon"> ENVI_CRTX_ERR_CHECK_LEVEL &gt; 0</font>    <a href="EVNT_SET_EVENTS_ID.FIND-DEF">EVNT_SET_EVENTS_ID</a>(pEvents_a);<b><font color='DarkGreen'>#endif</font></b><font color="maroon"> <font color="#6920ac">/* ENVI_CRTX_ERR_CHECK_LEVEL &gt; 0 */</font></font>    <b>return</b> pEvents_a;<font color="#6920ac">/************************ *  EXCEPTION HANDLING  * ************************/</font><font color="blue">MemAllocError_Exc:</font>        <font color="#6920ac">/* memory allocation error */</font>    <b>return</b> <a href="CRTX_NULL.FIND-DEF">CRTX_NULL</a>;}<font color="#6920ac">/* destroy events */</font><font size="+1"><i>crtx_Void_t</i> <b><font color="azure1"><a name="evnt_Delete">evnt_Delete</a></font></b>(    <i>evnt_Events_t</i>   *pEvents_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>(pEvents_a)<b><font color='DarkGreen'>#if</font></b><font color="maroon"> ENVI_CRTX_ERR_CHECK_LEVEL &gt; 0</font>    <a href="CRTX_ASSERT.FIND-DEF">CRTX_ASSERT</a>(<a href="EVNT_CHECK_EVENTS_ID.FIND-DEF">EVNT_CHECK_EVENTS_ID</a>(pEvents_a))<b><font color='DarkGreen'>#endif</font></b><font color="maroon"> <font color="#6920ac">/* ENVI_CRTX_ERR_CHECK_LEVEL &gt; 0 */</font></font>    <b>if</b> (pEvents_a-&gt;ObjFlags &amp; <a href="EVNT_FLAG_EVENTS_ALLOC.FIND-DEF">EVNT_FLAG_EVENTS_ALLOC</a>)    {        <font color="#6920ac">/* release internaly allocated control block */</font>        <a href="dmem_Free.FIND-FUNC">dmem_Free</a>(pEvents_a-&gt;Segment, (<i>crtx_Void_t</i>*)pEvents_a,                  <i>sizeof</i>(<i>evnt_Events_t</i>));    }    <b>else</b>    {        pEvents_a-&gt;ObjFlags = <a href="EVNT_FLAG_INIT.FIND-DEF">EVNT_FLAG_INIT</a>;<b><font color='DarkGreen'>#if</font></b><font color="maroon"> ENVI_CRTX_ERR_CHECK_LEVEL &gt; 0</font>        <a href="CRTX_SET_NO_ID.FIND-DEF">CRTX_SET_NO_ID</a>(pEvents_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 &gt; 0 */</font></font>    }    <b>return</b>;<font color="#6920ac">/************************ *  EXCEPTION HANDLING  * ************************/</font>    <font color="#6920ac">/* None */</font>}<font color="#6920ac">/* Set event flags */</font><font size="+1"><i>evnt_Mask_t</i> <b><font color="azure1"><a name="evnt_Set">evnt_Set</a></font></b>(    <i>evnt_Events_t</i>   *pEvents_a,     <i>evnt_Mask_t</i>     SetMask_a){</font><font color="#6920ac">/********************* *  LOCAL VARIABLES  * *********************/</font>    <a href="CRTX_REG_1.FIND-DEF">CRTX_REG_1</a> <i>evnt_Mask_t</i>          OldMask;    <a href="CRTX_REG_2.FIND-DEF">CRTX_REG_2</a> <i>evnt_SuspendBlock_t</i>  *pSuspendBlock;    <a href="CRTX_REG_3.FIND-DEF">CRTX_REG_3</a> <i>evnt_Mask_t</i>          RcvdMask;    <a href="CRTX_REG_4.FIND-DEF">CRTX_REG_4</a> <i>rque_Node_t</i>          *pNode;    <i>hrdi_GlobalIntrCookie_t</i>         GlobalIntrCookie;    <i>rque_Cursor_t</i>                   Cursor;<font color="#6920ac">/********************* *  PROCEDURE LOGIC  * *********************/</font>    <a href="CRTX_ASSERT.FIND-DEF">CRTX_ASSERT</a>(pEvents_a)<b><font color='DarkGreen'>#if</font></b><font color="maroon"> ENVI_CRTX_ERR_CHECK_LEVEL &gt; 0</font>    <a href="CRTX_ASSERT.FIND-DEF">CRTX_ASSERT</a>(<a href="EVNT_CHECK_EVENTS_ID.FIND-DEF">EVNT_CHECK_EVENTS_ID</a>(pEvents_a))<b><font color='DarkGreen'>#endif</font></b><font color="maroon"> <font color="#6920ac">/* ENVI_CRTX_ERR_CHECK_LEVEL &gt; 0 */</font></font>    GlobalIntrCookie = <a href="hrdi_GlobalIntrDisable.FIND-FUNC">hrdi_GlobalIntrDisable</a>();    OldMask = pEvents_a-&gt;Flags;    pEvents_a-&gt;Flags |= SetMask_a;    <a href="hrdi_GlobalIntrEnable.FIND-FUNC">hrdi_GlobalIntrEnable</a>(GlobalIntrCookie);    <b>if</b> ((SetMask_a &amp; ~OldMask) &amp;&amp; (!<a href="RQUE_IS_EMPTY.FIND-DEF">RQUE_IS_EMPTY</a>(&amp;pEvents_a-&gt;WaitingList)))    {        <font color="#6920ac">/* there are thread waiting for events */</font>        <a href="thrd_Protect.FIND-FUNC">thrd_Protect</a>();        <a href="rque_CursorInit.FIND-FUNC">rque_CursorInit</a>(&amp;pEvents_a-&gt;WaitingList, &amp;Cursor);        <b>while</b> ((pNode = <a href="rque_CursorNext.FIND-FUNC">rque_CursorNext</a>(&amp;Cursor)) != <a href="CRTX_NULL.FIND-DEF">CRTX_NULL</a>)        {            pSuspendBlock =                 (<i>evnt_SuspendBlock_t</i>*)<a href="RQUE_GET_NODE_ARG.FIND-DEF">RQUE_GET_NODE_ARG</a>(pNode);            <a href="CRTX_ASSERT.FIND-DEF">CRTX_ASSERT</a>(pSuspendBlock)<b><font color='DarkGreen'>#if</font></b><font color="maroon"> ENVI_CRTX_ERR_CHECK_LEVEL&gt;0</font>            <a href="CRTX_ASSERT.FIND-DEF">CRTX_ASSERT</a>(<a href="EVNT_CHECK_SUSPEND_BLOCK_ID.FIND-DEF">EVNT_CHECK_SUSPEND_BLOCK_ID</a>(pSuspendBlock))            <a href="CRTX_ASSERT.FIND-DEF">CRTX_ASSERT</a>(<a href="EVNT_CHECK_EVENTS_REF.FIND-DEF">EVNT_CHECK_EVENTS_REF</a>(pSuspendBlock,pEvents_a))<b><font color='DarkGreen'>#endif</font></b><font color="maroon"> <font color="#6920ac">/* ENVI_CRTX_ERR_CHECK_LEVEL&gt;0 */</font></font>            RcvdMask = pEvents_a-&gt;Flags &amp; pSuspendBlock-&gt;EventMask;

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?