thr_core.c

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

C
1,525
字号
<HTML><HEAD><TITLE>/home/asysweb/public_html/cortex/kernel/src/thr_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 * *      thr_core.c * * SYSTEM COMPONENT * *      Thread Management Component * * DESCRIPTION * *      This file contains all core services for for Thread *      Management Component * * SERVICES * * * SCCS HISTORY * *      @(#)thr_core.c  1.24, 02/01/00, 11:06:20 * * AUTHOR * *      Vadim N. Azarovsky * * CREATED * *      10-Apr-1998         by Vadim N. Azarovsky * * REVISION HISTORY * *      NAME                DATE                    REMARKS * **************************************************************************/</font><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="ass_defs.h.FIND-INC"><font color="blue">"ass_defs.h"</font></a><b><font color='DarkGreen'>#include</font></b> <a href="fmt_defs.h.FIND-INC"><font color="blue">"fmt_defs.h"</font></a><b><font color='DarkGreen'>#include</font></b> <a href="hwi_priv.h.FIND-INC"><font color="blue">"hwi_priv.h"</font></a><b><font color='DarkGreen'>#include</font></b> <a href="sys_defs.h.FIND-INC"><font color="blue">"sys_defs.h"</font></a><b><font color='DarkGreen'>#include</font></b> <a href="mem_defs.h.FIND-INC"><font color="blue">"mem_defs.h"</font></a><b><font color='DarkGreen'>#include</font></b> <a href="tck_priv.h.FIND-INC"><font color="blue">"tck_priv.h"</font></a><b><font color='DarkGreen'>#include</font></b> <a href="ext_priv.h.FIND-INC"><font color="blue">"ext_priv.h"</font></a><b><font color='DarkGreen'>#include</font></b> <a href="string.h.FIND-INC">&lt;<font color="blue">string.h</font>&gt;</a><font size="+1"><i>thrd_ID_t</i> <b><font color="azure1"><a name="thrd_Create1">thrd_Create1</a></font></b>(    <i>thrd_Entry1_t</i>   Entry_a,     <i>thrd_Attr_t</i>     *pAttr_a,     <i>crtx_Status_t</i>   *pStatus_a,    <i>crtx_Int_t</i>      ArgC_a,    <i>crtx_Void_t</i>     **ppArgV_a){</font><font color="#6920ac">/********************* *  LOCAL VARIABLES  * *********************/</font>    <font color="#6920ac">/* None */</font><font color="#6920ac">/********************* *  PROCEDURE LOGIC  * *********************/</font>    <b>return</b> <a href="#thrd_Create">thrd_Create</a>((<i>thrd_Entry4_t</i>)Entry_a, pAttr_a, pStatus_a,                        <a href="THRD_FLAG_ARGS_TYPE_1.FIND-DEF">THRD_FLAG_ARGS_TYPE_1</a>,                        (<i>thrd_Arg_t</i>)ArgC_a, (<i>thrd_Arg_t</i>)ppArgV_a);<font color="#6920ac">/************************ *  EXCEPTION HANDLING  * ************************/</font>    <font color="#6920ac">/* None */</font>}<font size="+1"><i>thrd_ID_t</i> <b><font color="azure1"><a name="thrd_Create2">thrd_Create2</a></font></b>(    <i>thrd_Entry2_t</i>   Entry_a,    <i>thrd_Attr_t</i>     *pAttr_a,    <i>crtx_Status_t</i>   *pStatus_a,    <i>crtx_Int_t</i>      ArgC_a,    <i>crtx_Void_t</i>     **ppArgV_a,    <i>crtx_Void_t</i>     **ppEnvV_a){</font><font color="#6920ac">/********************* *  LOCAL VARIABLES  * *********************/</font>    <font color="#6920ac">/* None */</font><font color="#6920ac">/********************* *  PROCEDURE LOGIC  * *********************/</font>    <b>return</b> <a href="#thrd_Create">thrd_Create</a>((<i>thrd_Entry4_t</i>)Entry_a, pAttr_a, pStatus_a,                        <a href="THRD_FLAG_ARGS_TYPE_2.FIND-DEF">THRD_FLAG_ARGS_TYPE_2</a>,                       (<i>thrd_Arg_t</i>)ArgC_a, (<i>thrd_Arg_t</i>)ppArgV_a,                        (<i>thrd_Arg_t</i>)ppEnvV_a);<font color="#6920ac">/************************ *  EXCEPTION HANDLING  * ************************/</font>    <font color="#6920ac">/* None */</font>}<font size="+1"><i>thrd_ID_t</i> <b><font color="azure1"><a name="thrd_Create3">thrd_Create3</a></font></b>(    <i>thrd_Entry3_t</i>   Entry_a,    <i>thrd_Attr_t</i>     *pAttr_a,     <i>crtx_Status_t</i>   *pStatus_a,    <i>crtx_Void_t</i>     **ppArgV_a,    <i>crtx_Int_t</i>      ArgC_a){</font><font color="#6920ac">/********************* *  LOCAL VARIABLES  * *********************/</font>    <font color="#6920ac">/* None */</font><font color="#6920ac">/********************* *  PROCEDURE LOGIC  * *********************/</font>    <b>return</b> <a href="#thrd_Create">thrd_Create</a>((<i>thrd_Entry4_t</i>)Entry_a, pAttr_a, pStatus_a,                        <a href="THRD_FLAG_ARGS_TYPE_3.FIND-DEF">THRD_FLAG_ARGS_TYPE_3</a>,                       (<i>thrd_Arg_t</i>)ppArgV_a, (<i>thrd_Arg_t</i>)ArgC_a);<font color="#6920ac">/************************ *  EXCEPTION HANDLING  * ************************/</font>    <font color="#6920ac">/* None */</font>}<font size="+1"><i>thrd_ID_t</i> <b><font color="azure1"><a name="thrd_Create4">thrd_Create4</a></font></b>(    <i>thrd_Entry4_t</i>   Entry_a,     <i>thrd_Attr_t</i>     *pAttr_a,     <i>crtx_Status_t</i>   *pStatus_a,    ...){</font><font color="#6920ac">/********************* *  LOCAL VARIABLES  * *********************/</font>    <i>thrd_ID_t</i>   ThreadID;    <i>va_list</i>     ArgVect;<font color="#6920ac">/********************* *  PROCEDURE LOGIC  * *********************/</font>    <a href="va_start.FIND-FUNC">va_start</a>(ArgVect, pStatus_a);    ThreadID = <a href="#thrd_CreateV">thrd_CreateV</a>(Entry_a, pAttr_a, pStatus_a,                             <a href="THRD_FLAG_ARGS_TYPE_4.FIND-DEF">THRD_FLAG_ARGS_TYPE_4</a>, ArgVect);    <a href="va_end.FIND-FUNC">va_end</a>(ArgVect);    <b>return</b> ThreadID;<font color="#6920ac">/************************ *  EXCEPTION HANDLING  * ************************/</font>    <font color="#6920ac">/* None */</font>}<font size="+1"><i>thrd_ID_t</i> <b><font color="azure1"><a name="thrd_Create">thrd_Create</a></font></b>(    <i>thrd_Entry4_t</i>   Entry_a,    <i>thrd_Attr_t</i>     *pAttr_a,     <i>crtx_Status_t</i>   *pStatus_a,    <i>crtx_Int_t</i>      ArgType_a,     ...){</font><font color="#6920ac">/********************* *  LOCAL VARIABLES  * *********************/</font>    <i>thrd_ID_t</i>   ThreadID;    <i>va_list</i>     ArgVect;<font color="#6920ac">/********************* *  PROCEDURE LOGIC  * *********************/</font>    <a href="va_start.FIND-FUNC">va_start</a>(ArgVect, ArgType_a);    ThreadID = <a href="#thrd_CreateV">thrd_CreateV</a>(Entry_a, pAttr_a, pStatus_a, ArgType_a, ArgVect);    <a href="va_end.FIND-FUNC">va_end</a>(ArgVect);    <b>return</b> ThreadID;<font color="#6920ac">/************************ *  EXCEPTION HANDLING  * ************************/</font>    <font color="#6920ac">/* None */</font>}<font size="+1"><i>thrd_ID_t</i> <b><font color="azure1"><a name="thrd_CreateV">thrd_CreateV</a></font></b>(    <i>thrd_Entry4_t</i>   Entry_a,    <i>thrd_Attr_t</i>     *pAttr_a,     <i>crtx_Status_t</i>   *pStatus_a,    <i>crtx_Int_t</i>      ArgType_a,     <i>va_list</i>         ArgVect_a){</font><font color="#6920ac">/********************* *  LOCAL VARIABLES  * *********************/</font>    <i>thrd_ID_t</i>       ThreadID;       <font color="#6920ac">/* thread id */</font>    <i>thrd_TCB_t</i>      *pTCB;          <font color="#6920ac">/* thread control block */</font>    <i>crtx_Status_t</i>   Status;         <font color="#6920ac">/* status code */</font>    <i>ilst_List_t</i>     *pList;         <font color="#6920ac">/* fre threads list */</font>    <i>thrd_State_t</i>    State;          <font color="#6920ac">/* thread state */</font>    <i>crtx_Int_t</i>      NrArgs;         <font color="#6920ac">/* number of argument */</font>    <i>crtx_Int_t</i>      i;              <font color="#6920ac">/* a counter */</font><font color="#6920ac">/********************* *  PROCEDURE LOGIC  * *********************/</font>    <b>if</b> (pAttr_a == <a href="CRTX_NULL.FIND-DEF">CRTX_NULL</a>)        pAttr_a = &amp;thrd_AttrDefault_g;    <font color="#6920ac">/* verify type of argiments */</font>    <b>if</b> ((ArgType_a != <a href="THRD_FLAG_ARGS_TYPE_1.FIND-DEF">THRD_FLAG_ARGS_TYPE_1</a>) &amp;&amp;        (ArgType_a != <a href="THRD_FLAG_ARGS_TYPE_2.FIND-DEF">THRD_FLAG_ARGS_TYPE_2</a>) &amp;&amp;        (ArgType_a != <a href="THRD_FLAG_ARGS_TYPE_3.FIND-DEF">THRD_FLAG_ARGS_TYPE_3</a>) &amp;&amp;        (ArgType_a != <a href="THRD_FLAG_ARGS_TYPE_4.FIND-DEF">THRD_FLAG_ARGS_TYPE_4</a>))    {        Status = <a href="THRD_ERR_INVALID_PARAMS.FIND-DEF">THRD_ERR_INVALID_PARAMS</a>;        <a href="CRTX_EXCEPTION.FIND-DEF">CRTX_EXCEPTION</a> ErrInvalidParams_Exc;    }    <font color="#6920ac">/* verify priority */</font>    <b>if</b> ((pAttr_a-&gt;Priority&lt;<a href="PRIO_MIN.FIND-DEF">PRIO_MIN</a>) || (pAttr_a-&gt;Priority&gt;<a href="PRIO_MAX.FIND-DEF">PRIO_MAX</a>))    {        Status = <a href="THRD_ERR_INVALID_PARAMS.FIND-DEF">THRD_ERR_INVALID_PARAMS</a>;        <a href="CRTX_EXCEPTION.FIND-DEF">CRTX_EXCEPTION</a> ErrInvalidParams_Exc;    }    <font color="#6920ac">/* verify thread entry */</font>    <b>if</b> (Entry_a == <a href="CRTX_NULL.FIND-DEF">CRTX_NULL</a>)    {        Status = <a href="THRD_ERR_INVALID_PARAMS.FIND-DEF">THRD_ERR_INVALID_PARAMS</a>;        <a href="CRTX_EXCEPTION.FIND-DEF">CRTX_EXCEPTION</a> ErrInvalidParams_Exc;    }    <font color="#6920ac">/* verify thread state */</font>    State = pAttr_a-&gt;State;    <b>if</b> (State == <a href="THRD_RUNNING.FIND-DEF">THRD_RUNNING</a>)        State = <a href="THRD_READY.FIND-DEF">THRD_READY</a>;    <b>if</b> ((State != <a href="THRD_READY.FIND-DEF">THRD_READY</a>) &amp;&amp; (State != <a href="THRD_DEFERRED.FIND-DEF">THRD_DEFERRED</a>))    {        Status = <a href="THRD_ERR_INVALID_PARAMS.FIND-DEF">THRD_ERR_INVALID_PARAMS</a>;        <a href="CRTX_EXCEPTION.FIND-DEF">CRTX_EXCEPTION</a> ErrInvalidParams_Exc;    }    <font color="#6920ac">/* verify scheduling policy */</font>    <b>if</b> ((pAttr_a-&gt;SchdPolicy != thrd_SchdRoundRobin) &amp;&amp;        (pAttr_a-&gt;SchdPolicy != thrd_SchdTimeSharing) &amp;&amp;        (pAttr_a-&gt;SchdPolicy != thrd_SchdTimeSlicingRR) &amp;&amp;        (pAttr_a-&gt;SchdPolicy != thrd_SchdOther))    {        Status = <a href="THRD_ERR_INVALID_PARAMS.FIND-DEF">THRD_ERR_INVALID_PARAMS</a>;        <a href="CRTX_EXCEPTION.FIND-DEF">CRTX_EXCEPTION</a> ErrInvalidParams_Exc;    }    <a href="rrlc_Lock.FIND-FUNC">rrlc_Lock</a>(&amp;thrd_Environ_g.Lock);    <font color="#6920ac">/* allocate TheadID for a new thread */</font>    pList = <a href="THRD_FREE_LIST.FIND-DEF">THRD_FREE_LIST</a>();    <b>if</b> (<a href="ilst_IsEmpty.FIND-FUNC">ilst_IsEmpty</a>(pList))    {

⌨️ 快捷键说明

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