fmt_core.c

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

C
571
字号
<HTML><HEAD><TITLE>/home/asysweb/public_html/cortex/kernel/src/fmt_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 * *      fmt_core.c * * SYSTEM COMPONENT * *      Formatted I/O * * DESCRIPTION * *      Core services for formatted I/O component * * SERVICES * *      frmt_Format *      frmt_Vformat * *      frmt_SetLenMods         - set length modifiers *      frmt_GetLenMods         - get length modifiers *      frmt_RegisterFmtSpec    - register format specifier *      frmt_UnregisterFmtSpec  - unregister format specifier *      frmt_FindFmtSpec        - find format specifier * * SCCS HISTORY * *      @(#)fmt_core.c  1.10, 03/06/00, 19:22:07 * * AUTHOR * *      Vadim N. Azarovsky * * CREATED * *      23-Mar-1997         by Vadim N. Azarovsky * * REVISION HISTORY * *      NAME                DATE                    REMARKS * **************************************************************************/</font><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="fmt_priv.h.FIND-INC"><font color="blue">"fmt_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="limits.h.FIND-INC">&lt;<font color="blue">limits.h</font>&gt;</a><b><font color='DarkGreen'>#include</font></b> <a href="string.h.FIND-INC">&lt;<font color="blue">string.h</font>&gt;</a><b><font color='DarkGreen'>#include</font></b> <a href="ctype.h.FIND-INC">&lt;<font color="blue">ctype.h</font>&gt;</a><font size="+1"><i>crtx_Int_t</i> <b><font color="azure1"><a name="frmt_Format">frmt_Format</a></font></b>(    <i>frmt_Put_t</i>   Put_a,     <font color="#6920ac">/* procedure to emit character */</font>    <i>crtx_Void_t</i>  *pEnv_a,   <font color="#6920ac">/* client supplied data for Put handler */</font>    <i>crtx_Char_t</i>  *pFmt_a,   <font color="#6920ac">/* output format string */</font>    ...                     <font color="#6920ac">/* output arguments */</font>){</font><font color="#6920ac">/********************* *  LOCAL VARIABLES  * *********************/</font>    <i>va_list</i>    Args;    <i>crtx_Int_t</i> n;<font color="#6920ac">/********************* *  PROCEDURE LOGIC  * *********************/</font>    <a href="CRTX_ASSERT.FIND-DEF">CRTX_ASSERT</a>(Put_a)    <a href="CRTX_ASSERT.FIND-DEF">CRTX_ASSERT</a>(pFmt_a)    <a href="va_start.FIND-FUNC">va_start</a>(Args, pFmt_a);    n = <a href="#frmt_Vformat">frmt_Vformat</a>(Put_a, pEnv_a, pFmt_a, Args);    <a href="va_end.FIND-FUNC">va_end</a>(Args);    <b>return</b> n;<font color="#6920ac">/************************ *  EXCEPTION HANDLING  * ************************/</font>    <font color="#6920ac">/* None */</font>}<font size="+1"><i>static</i> <i>int</i> <b><font color="azure1"><a name="frmt_SformatPut">frmt_SformatPut</a></font></b>(    <i>crtx_Char_t</i> Byte_a,      <font color="#6920ac">/* byte to write into buffer */</font>    <i>crtx_Void_t</i> *pEnv_a     <font color="#6920ac">/* private context */</font>){</font><font color="#6920ac">/********************* *  LOCAL VARIABLES  * *********************/</font>    <i>crtx_Char_t</i>      **ppStr;<font color="#6920ac">/********************* *  PROCEDURE LOGIC  * *********************/</font>    ppStr = (<i>crtx_Char_t</i> **)pEnv_a;    **ppStr = Byte_a;        (*ppStr)++;        <b>return</b>(Byte_a);<font color="#6920ac">/************************ *  EXCEPTION HANDLING  * ************************/</font>    <font color="#6920ac">/* None */</font>}<font size="+1"><i>crtx_Int_t</i> <b><font color="azure1"><a name="frmt_Sformat">frmt_Sformat</a></font></b>(    <i>crtx_Char_t</i>  *pStr_a,   <font color="#6920ac">/* output string to fill in */</font>    <i>crtx_Char_t</i>  *pFmt_a,   <font color="#6920ac">/* output format string */</font>    ...                     <font color="#6920ac">/* output arguments */</font>){</font><font color="#6920ac">/********************* *  LOCAL VARIABLES  * *********************/</font>    <i>va_list</i>       Args;    <i>crtx_Int_t</i>    n;<font color="#6920ac">/********************* *  PROCEDURE LOGIC  * *********************/</font>    <a href="CRTX_ASSERT.FIND-DEF">CRTX_ASSERT</a>(pStr_a)    <a href="CRTX_ASSERT.FIND-DEF">CRTX_ASSERT</a>(pFmt_a)    <a href="va_start.FIND-FUNC">va_start</a>(Args, pFmt_a);    n = <a href="#frmt_Vformat">frmt_Vformat</a>(frmt_SformatPut, (<i>crtx_Void_t</i> *)&amp;pStr_a, pFmt_a, Args);    <a href="va_end.FIND-FUNC">va_end</a>(Args);    pStr_a[0] = 0;    <b>return</b> n;<font color="#6920ac">/************************ *  EXCEPTION HANDLING  * ************************/</font>    <font color="#6920ac">/* None */</font>}<font size="+1"><i>crtx_Int_t</i> <b><font color="azure1"><a name="frmt_SVformat">frmt_SVformat</a></font></b>(    <i>crtx_Char_t</i>  *pStr_a,   <font color="#6920ac">/* output string to fill in */</font>    <i>crtx_Char_t</i>  *pFmt_a,   <font color="#6920ac">/* output format string */</font>    <i>va_list</i>      Args_a     <font color="#6920ac">/* output arguments list */</font>){</font><font color="#6920ac">/********************* *  LOCAL VARIABLES  * *********************/</font>    <i>crtx_Int_t</i>      n;<font color="#6920ac">/********************* *  PROCEDURE LOGIC  * *********************/</font>    <a href="CRTX_ASSERT.FIND-DEF">CRTX_ASSERT</a>(pStr_a)    <a href="CRTX_ASSERT.FIND-DEF">CRTX_ASSERT</a>(pFmt_a)    n = <a href="#frmt_Vformat">frmt_Vformat</a>(frmt_SformatPut, (<i>crtx_Void_t</i> *)&amp;pStr_a, pFmt_a, Args_a);    pStr_a[0] = 0;    <b>return</b> n;<font color="#6920ac">/************************ *  EXCEPTION HANDLING  * ************************/</font>    <font color="#6920ac">/* None */</font>}<font size="+1"><i>static</i> <i>int</i> <b><font color="azure1"><a name="frmt_SformatPut2">frmt_SformatPut2</a></font></b>(    <i>crtx_Char_t</i> Byte_a,      <font color="#6920ac">/* byte to write into buffer */</font>    <i>crtx_Void_t</i> *pEnv_a     <font color="#6920ac">/* private context */</font>){</font><font color="#6920ac">/********************* *  LOCAL VARIABLES  * *********************/</font>    <i>frmt_Buffer_t</i>   *pBuf;<font color="#6920ac">/********************* *  PROCEDURE LOGIC  * *********************/</font>    pBuf = (<i>frmt_Buffer_t</i>*)pEnv_a;    <b>if</b> (pBuf-&gt;pPtr &lt; pBuf-&gt;pBuf + pBuf-&gt;Size)    {        *pBuf-&gt;pPtr = Byte_a;        pBuf-&gt;pPtr++;    }    <b>return</b> Byte_a;    <font color="#6920ac">/************************ *  EXCEPTION HANDLING  * ************************/</font>    <font color="#6920ac">/* None */</font>}<font size="+1"><i>crtx_Int_t</i> <b><font color="azure1"><a name="frmt_Sformat2">frmt_Sformat2</a></font></b>(    <i>crtx_Char_t</i>  *pStr_a,   <font color="#6920ac">/* output string to fill in */</font>    <i>crtx_Int_t</i>   Size_a,    <font color="#6920ac">/* size of output string */</font>    <i>crtx_Char_t</i>  *pFmt_a,   <font color="#6920ac">/* output format string */</font>    ...                     <font color="#6920ac">/* output arguments */</font>){</font><font color="#6920ac">/********************* *  LOCAL VARIABLES  * *********************/</font>    <i>va_list</i>       Args;    <i>crtx_Int_t</i>    n;    <i>frmt_Buffer_t</i> Buffer;<font color="#6920ac">/********************* *  PROCEDURE LOGIC  * *********************/</font>    <a href="CRTX_ASSERT.FIND-DEF">CRTX_ASSERT</a>(pStr_a)    <a href="CRTX_ASSERT.FIND-DEF">CRTX_ASSERT</a>(pFmt_a)    <b>if</b> (Size_a &lt;=0) <b>return</b> 0;    Buffer.pBuf = Buffer.pPtr = pStr_a;    Buffer.Size = Size_a - 1;    <a href="va_start.FIND-FUNC">va_start</a>(Args, pFmt_a);    n = <a href="#frmt_Vformat">frmt_Vformat</a>(frmt_SformatPut2, (<i>crtx_Void_t</i>*)&amp;Buffer, pFmt_a, Args);    <a href="va_end.FIND-FUNC">va_end</a>(Args);    *Buffer.pPtr = 0;    <b>return</b> n;<font color="#6920ac">/************************ *  EXCEPTION HANDLING  * ************************/</font>    <font color="#6920ac">/* None */</font>}<font size="+1"><i>crtx_Int_t</i> <b><font color="azure1"><a name="frmt_SVformat2">frmt_SVformat2</a></font></b>(    <i>crtx_Char_t</i>  *pStr_a,   <font color="#6920ac">/* output string to fill in */</font>    <i>crtx_Int_t</i>   Size_a,    <font color="#6920ac">/* size of output string */</font>    <i>crtx_Char_t</i>  *pFmt_a,   <font color="#6920ac">/* output format string */</font>    <i>va_list</i>      Args_a     <font color="#6920ac">/* output arguments list */</font>){</font><font color="#6920ac">/*********************

⌨️ 快捷键说明

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