Symbian3/Examples/guid-6013a680-57f9-415b-8851-c4fa63356636/misc_8c_source.html
changeset 10 d4524d6a4472
parent 9 59758314f811
child 11 5072524fcc79
--- a/Symbian3/Examples/guid-6013a680-57f9-415b-8851-c4fa63356636/misc_8c_source.html	Fri Jun 11 15:24:34 2010 +0100
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,910 +0,0 @@
-<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
-<html xmlns="http://www.w3.org/1999/xhtml">
-<head>
-<meta http-equiv="Content-Type" content="text/xhtml;charset=UTF-8"/>
-<title>TB9.2 Example Applications: examples/PIPS/antiword/src/misc.c Source File</title>
-<link href="tabs.css" rel="stylesheet" type="text/css"/>
-<link href="doxygen.css" rel="stylesheet" type="text/css"/>
-</head>
-<body>
-<!-- Generated by Doxygen 1.6.2 -->
-<h1>examples/PIPS/antiword/src/misc.c</h1><div class="fragment"><pre class="fragment"><a name="l00001"></a>00001 <span class="comment">/*</span>
-<a name="l00002"></a>00002 <span class="comment"> * misc.c</span>
-<a name="l00003"></a>00003 <span class="comment"> * Copyright (C) 1998-2005 A.J. van Os; Released under GNU GPL</span>
-<a name="l00004"></a>00004 <span class="comment"> *</span>
-<a name="l00005"></a>00005 <span class="comment"> * Description:</span>
-<a name="l00006"></a>00006 <span class="comment"> * Miscellaneous functions</span>
-<a name="l00007"></a>00007 <span class="comment"> */</span>
-<a name="l00008"></a>00008 
-<a name="l00009"></a>00009 <span class="preprocessor">#include &lt;stdio.h&gt;</span>
-<a name="l00010"></a>00010 <span class="preprocessor">#include &lt;stdlib.h&gt;</span>
-<a name="l00011"></a>00011 <span class="preprocessor">#include &lt;string.h&gt;</span>
-<a name="l00012"></a>00012 <span class="preprocessor">#include &lt;ctype.h&gt;</span>
-<a name="l00013"></a>00013 <span class="preprocessor">#include &lt;time.h&gt;</span>
-<a name="l00014"></a>00014 <span class="preprocessor">#if defined(__riscos)</span>
-<a name="l00015"></a>00015 <span class="preprocessor"></span><span class="preprocessor">#include &quot;DeskLib:SWI.h&quot;</span>
-<a name="l00016"></a>00016 <span class="preprocessor">#else</span>
-<a name="l00017"></a>00017 <span class="preprocessor"></span><span class="preprocessor">#include &lt;errno.h&gt;</span>
-<a name="l00018"></a>00018 <span class="preprocessor">#include &lt;sys/types.h&gt;</span>
-<a name="l00019"></a>00019 <span class="preprocessor">#include &lt;sys/stat.h&gt;</span>
-<a name="l00020"></a>00020 <span class="preprocessor">#endif </span><span class="comment">/* __riscos */</span>
-<a name="l00021"></a>00021 <span class="preprocessor">#if !defined(S_ISREG)</span>
-<a name="l00022"></a>00022 <span class="preprocessor"></span><span class="preprocessor">#define S_ISREG(x)      (((x) &amp; S_IFMT) == S_IFREG)</span>
-<a name="l00023"></a>00023 <span class="preprocessor"></span><span class="preprocessor">#endif </span><span class="comment">/* !S_ISREG */</span>
-<a name="l00024"></a>00024 <span class="preprocessor">#include &quot;antiword.h&quot;</span>
-<a name="l00025"></a>00025 <span class="preprocessor">#if defined(__vms)</span>
-<a name="l00026"></a>00026 <span class="preprocessor"></span><span class="preprocessor">#include &lt;unixlib.h&gt;</span>
-<a name="l00027"></a>00027 <span class="preprocessor">#endif</span>
-<a name="l00028"></a>00028 <span class="preprocessor"></span>
-<a name="l00029"></a>00029 <span class="preprocessor">#if !defined(__riscos)</span>
-<a name="l00030"></a>00030 <span class="preprocessor"></span><span class="comment">/*</span>
-<a name="l00031"></a>00031 <span class="comment"> * szGetHomeDirectory - get the name of the home directory</span>
-<a name="l00032"></a>00032 <span class="comment"> */</span>
-<a name="l00033"></a>00033 <span class="keyword">const</span> <span class="keywordtype">char</span> *
-<a name="l00034"></a>00034 szGetHomeDirectory(<span class="keywordtype">void</span>)
-<a name="l00035"></a>00035 {
-<a name="l00036"></a>00036         <span class="keyword">const</span> <span class="keywordtype">char</span>      *szHome;
-<a name="l00037"></a>00037 
-<a name="l00038"></a>00038 <span class="preprocessor">#if defined(__vms)</span>
-<a name="l00039"></a>00039 <span class="preprocessor"></span>        szHome = decc$translate_vms(getenv(<span class="stringliteral">&quot;HOME&quot;</span>));
-<a name="l00040"></a>00040 <span class="preprocessor">#elif defined(__Plan9__)</span>
-<a name="l00041"></a>00041 <span class="preprocessor"></span>        szHome = getenv(<span class="stringliteral">&quot;home&quot;</span>);
-<a name="l00042"></a>00042 <span class="preprocessor">#else</span>
-<a name="l00043"></a>00043 <span class="preprocessor"></span>        szHome = getenv(<span class="stringliteral">&quot;HOME&quot;</span>);
-<a name="l00044"></a>00044 <span class="preprocessor">#endif </span><span class="comment">/* __vms */</span>
-<a name="l00045"></a>00045 
-<a name="l00046"></a>00046         <span class="keywordflow">if</span> (szHome == NULL || szHome[0] == <span class="charliteral">&#39;\0&#39;</span>) {
-<a name="l00047"></a>00047 <span class="preprocessor">#if defined(N_PLAT_NLM)</span>
-<a name="l00048"></a>00048 <span class="preprocessor"></span>                szHome = <span class="stringliteral">&quot;SYS:&quot;</span>;
-<a name="l00049"></a>00049 <span class="preprocessor">#elif defined(__dos)</span>
-<a name="l00050"></a>00050 <span class="preprocessor"></span>                szHome = <span class="stringliteral">&quot;C:&quot;</span>;
-<a name="l00051"></a>00051 <span class="preprocessor">#else</span>
-<a name="l00052"></a>00052 <span class="preprocessor"></span>                werr(0, <span class="stringliteral">&quot;I can&#39;t find the name of your HOME directory&quot;</span>);
-<a name="l00053"></a>00053                 szHome = <span class="stringliteral">&quot;&quot;</span>;
-<a name="l00054"></a>00054 <span class="preprocessor">#endif </span><span class="comment">/* __dos */</span>
-<a name="l00055"></a>00055         }
-<a name="l00056"></a>00056         <span class="keywordflow">return</span> szHome;
-<a name="l00057"></a>00057 } <span class="comment">/* end of szGetHomeDirectory */</span>
-<a name="l00058"></a>00058 
-<a name="l00059"></a>00059 <span class="comment">/*</span>
-<a name="l00060"></a>00060 <span class="comment"> * szGetAntiwordDirectory - get the name of the Antiword directory</span>
-<a name="l00061"></a>00061 <span class="comment"> */</span>
-<a name="l00062"></a>00062 <span class="keyword">const</span> <span class="keywordtype">char</span> *
-<a name="l00063"></a>00063 szGetAntiwordDirectory(<span class="keywordtype">void</span>)
-<a name="l00064"></a>00064 {
-<a name="l00065"></a>00065 <span class="preprocessor">#if defined(__vms)</span>
-<a name="l00066"></a>00066 <span class="preprocessor"></span>        <span class="keywordflow">return</span> decc$translate_vms(getenv(<span class="stringliteral">&quot;ANTIWORDHOME&quot;</span>));
-<a name="l00067"></a>00067 <span class="preprocessor">#else</span>
-<a name="l00068"></a>00068 <span class="preprocessor"></span>        <span class="keywordflow">return</span> getenv(<span class="stringliteral">&quot;ANTIWORDHOME&quot;</span>);
-<a name="l00069"></a>00069 <span class="preprocessor">#endif </span><span class="comment">/* __vms */</span>
-<a name="l00070"></a>00070 } <span class="comment">/* end of szGetAntiwordDirectory */</span>
-<a name="l00071"></a>00071 <span class="preprocessor">#endif </span><span class="comment">/* !__riscos */</span>
-<a name="l00072"></a>00072 
-<a name="l00073"></a>00073 <span class="comment">/*</span>
-<a name="l00074"></a>00074 <span class="comment"> * Get the size of the specified file.</span>
-<a name="l00075"></a>00075 <span class="comment"> * Returns -1 if the file does not exist or is not a proper file.</span>
-<a name="l00076"></a>00076 <span class="comment"> */</span>
-<a name="l00077"></a>00077 <span class="keywordtype">long</span>
-<a name="l00078"></a>00078 lGetFilesize(<span class="keyword">const</span> <span class="keywordtype">char</span> *szFilename)
-<a name="l00079"></a>00079 {
-<a name="l00080"></a>00080 <span class="preprocessor">#if defined(__riscos)</span>
-<a name="l00081"></a>00081 <span class="preprocessor"></span>        os_error        *e;
-<a name="l00082"></a>00082         <span class="keywordtype">int</span>     iType, iSize;
-<a name="l00083"></a>00083 
-<a name="l00084"></a>00084         e = SWI(2, 5, SWI_OS_File | XOS_Bit,
-<a name="l00085"></a>00085                 17, szFilename,
-<a name="l00086"></a>00086                 &amp;iType, NULL, NULL, NULL, &amp;iSize);
-<a name="l00087"></a>00087         <span class="keywordflow">if</span> (e != NULL) {
-<a name="l00088"></a>00088                 werr(0, <span class="stringliteral">&quot;Get Filesize error %d: %s&quot;</span>,
-<a name="l00089"></a>00089                         e-&gt;errnum, e-&gt;errmess);
-<a name="l00090"></a>00090                 <span class="keywordflow">return</span> -1;
-<a name="l00091"></a>00091         }
-<a name="l00092"></a>00092         <span class="keywordflow">if</span> (iType != 1) {
-<a name="l00093"></a>00093                 <span class="comment">/* It&#39;s not a proper file or the file does not exist */</span>
-<a name="l00094"></a>00094                 <span class="keywordflow">return</span> -1;
-<a name="l00095"></a>00095         }
-<a name="l00096"></a>00096         <span class="keywordflow">return</span> (<span class="keywordtype">long</span>)iSize;
-<a name="l00097"></a>00097 <span class="preprocessor">#else</span>
-<a name="l00098"></a>00098 <span class="preprocessor"></span>        <span class="keyword">struct </span>stat     tBuffer;
-<a name="l00099"></a>00099 
-<a name="l00100"></a>00100         errno = 0;
-<a name="l00101"></a>00101         <span class="keywordflow">if</span> (stat(szFilename, &amp;tBuffer) != 0) {
-<a name="l00102"></a>00102                 werr(0, <span class="stringliteral">&quot;Get Filesize error %d&quot;</span>, errno);
-<a name="l00103"></a>00103                 <span class="keywordflow">return</span> -1;
-<a name="l00104"></a>00104         }
-<a name="l00105"></a>00105         <span class="keywordflow">if</span> (!S_ISREG(tBuffer.st_mode)) {
-<a name="l00106"></a>00106                 <span class="comment">/* It&#39;s not a regular file */</span>
-<a name="l00107"></a>00107                 <span class="keywordflow">return</span> -1;
-<a name="l00108"></a>00108         }
-<a name="l00109"></a>00109         <span class="keywordflow">return</span> (<span class="keywordtype">long</span>)tBuffer.st_size;
-<a name="l00110"></a>00110 <span class="preprocessor">#endif </span><span class="comment">/* __riscos */</span>
-<a name="l00111"></a>00111 } <span class="comment">/* end of lGetFilesize */</span>
-<a name="l00112"></a>00112 
-<a name="l00113"></a>00113 <span class="preprocessor">#if defined(DEBUG)</span>
-<a name="l00114"></a>00114 <span class="preprocessor"></span><span class="keywordtype">void</span>
-<a name="l00115"></a>00115 vPrintBlock(<span class="keyword">const</span> <span class="keywordtype">char</span>  *szFile, <span class="keywordtype">int</span> iLine,
-<a name="l00116"></a>00116                 <span class="keyword">const</span> UCHAR *aucBlock, <span class="keywordtype">size_t</span> tLength)
-<a name="l00117"></a>00117 {
-<a name="l00118"></a>00118         <span class="keywordtype">int</span> i, j;
-<a name="l00119"></a>00119 
-<a name="l00120"></a>00120         fail(szFile == NULL || iLine &lt; 0 || aucBlock == NULL);
-<a name="l00121"></a>00121 
-<a name="l00122"></a>00122         fprintf(stderr, <span class="stringliteral">&quot;%s[%3d]:\n&quot;</span>, szFile, iLine);
-<a name="l00123"></a>00123         <span class="keywordflow">for</span> (i = 0; i &lt; 32; i++) {
-<a name="l00124"></a>00124                 <span class="keywordflow">if</span> (16 * i &gt;= (<span class="keywordtype">int</span>)tLength) {
-<a name="l00125"></a>00125                         <span class="keywordflow">return</span>;
-<a name="l00126"></a>00126                 }
-<a name="l00127"></a>00127                 fprintf(stderr, <span class="stringliteral">&quot;%03x: &quot;</span>, (<span class="keywordtype">unsigned</span> <span class="keywordtype">int</span>)(16 * i));
-<a name="l00128"></a>00128                 <span class="keywordflow">for</span> (j = 0; j &lt; 16; j++) {
-<a name="l00129"></a>00129                         <span class="keywordflow">if</span> (16 * i + j &lt; (<span class="keywordtype">int</span>)tLength) {
-<a name="l00130"></a>00130                                 fprintf(stderr, <span class="stringliteral">&quot;%02x &quot;</span>,
-<a name="l00131"></a>00131                                         (<span class="keywordtype">unsigned</span> <span class="keywordtype">int</span>)aucBlock[16 * i + j]);
-<a name="l00132"></a>00132                         }
-<a name="l00133"></a>00133                 }
-<a name="l00134"></a>00134                 fprintf(stderr, <span class="stringliteral">&quot;\n&quot;</span>);
-<a name="l00135"></a>00135         }
-<a name="l00136"></a>00136 } <span class="comment">/* end of vPrintBlock */</span>
-<a name="l00137"></a>00137 
-<a name="l00138"></a>00138 <span class="keywordtype">void</span>
-<a name="l00139"></a>00139 vPrintUnicode(<span class="keyword">const</span> <span class="keywordtype">char</span> *szFile, <span class="keywordtype">int</span> iLine, <span class="keyword">const</span> UCHAR *aucUni, <span class="keywordtype">size_t</span> tLen)
-<a name="l00140"></a>00140 {
-<a name="l00141"></a>00141         <span class="keywordtype">char</span>    *szASCII;
-<a name="l00142"></a>00142 
-<a name="l00143"></a>00143         fail(tLen % 2 != 0);
-<a name="l00144"></a>00144 
-<a name="l00145"></a>00145         tLen /= 2;      <span class="comment">/* Length in bytes to length in characters */</span>
-<a name="l00146"></a>00146         szASCII = xmalloc(tLen + 1);
-<a name="l00147"></a>00147         (void)unincpy(szASCII, aucUni, tLen);
-<a name="l00148"></a>00148         szASCII[tLen] = <span class="charliteral">&#39;\0&#39;</span>;
-<a name="l00149"></a>00149         (void)fprintf(stderr, <span class="stringliteral">&quot;%s[%3d]: %.*s\n&quot;</span>,
-<a name="l00150"></a>00150                                 szFile, iLine, (<span class="keywordtype">int</span>)tLen, szASCII);
-<a name="l00151"></a>00151         szASCII = xfree(szASCII);
-<a name="l00152"></a>00152 } <span class="comment">/* end of vPrintUnicode */</span>
-<a name="l00153"></a>00153 
-<a name="l00154"></a>00154 BOOL
-<a name="l00155"></a>00155 bCheckDoubleLinkedList(output_type *pAnchor)
-<a name="l00156"></a>00156 {
-<a name="l00157"></a>00157         output_type     *pCurr, *pLast;
-<a name="l00158"></a>00158         <span class="keywordtype">int</span>             iInList;
-<a name="l00159"></a>00159 
-<a name="l00160"></a>00160         pLast = pAnchor;
-<a name="l00161"></a>00161         iInList = 0;
-<a name="l00162"></a>00162         <span class="keywordflow">for</span> (pCurr = pAnchor; pCurr != NULL; pCurr = pCurr-&gt;pNext) {
-<a name="l00163"></a>00163                 pLast = pCurr;
-<a name="l00164"></a>00164                 iInList++;
-<a name="l00165"></a>00165         }
-<a name="l00166"></a>00166         NO_DBG_DEC(iInList);
-<a name="l00167"></a>00167         <span class="keywordflow">for</span> (pCurr = pLast; pCurr != NULL; pCurr = pCurr-&gt;pPrev) {
-<a name="l00168"></a>00168                 pLast = pCurr;
-<a name="l00169"></a>00169                 iInList--;
-<a name="l00170"></a>00170         }
-<a name="l00171"></a>00171         DBG_DEC_C(iInList != 0, iInList);
-<a name="l00172"></a>00172         <span class="keywordflow">return</span> pAnchor == pLast &amp;&amp; iInList == 0;
-<a name="l00173"></a>00173 } <span class="comment">/* end of bCheckDoubleLinkedList */</span>
-<a name="l00174"></a>00174 <span class="preprocessor">#endif </span><span class="comment">/* DEBUG */</span>
-<a name="l00175"></a>00175 
-<a name="l00176"></a>00176 <span class="comment">/*</span>
-<a name="l00177"></a>00177 <span class="comment"> * bReadBytes</span>
-<a name="l00178"></a>00178 <span class="comment"> * This function reads the specified number of bytes from the specified file,</span>
-<a name="l00179"></a>00179 <span class="comment"> * starting from the specified offset.</span>
-<a name="l00180"></a>00180 <span class="comment"> * Returns TRUE when successfull, otherwise FALSE</span>
-<a name="l00181"></a>00181 <span class="comment"> */</span>
-<a name="l00182"></a>00182 BOOL
-<a name="l00183"></a>00183 bReadBytes(UCHAR *aucBytes, <span class="keywordtype">size_t</span> tMemb, ULONG ulOffset, FILE *pFile)
-<a name="l00184"></a>00184 {
-<a name="l00185"></a>00185         fail(aucBytes == NULL || pFile == NULL || ulOffset &gt; (ULONG)LONG_MAX);
-<a name="l00186"></a>00186 
-<a name="l00187"></a>00187         <span class="keywordflow">if</span> (ulOffset &gt; (ULONG)LONG_MAX) {
-<a name="l00188"></a>00188                 <span class="keywordflow">return</span> FALSE;
-<a name="l00189"></a>00189         }
-<a name="l00190"></a>00190         <span class="keywordflow">if</span> (fseek(pFile, (<span class="keywordtype">long</span>)ulOffset, SEEK_SET) != 0) {
-<a name="l00191"></a>00191                 <span class="keywordflow">return</span> FALSE;
-<a name="l00192"></a>00192         }
-<a name="l00193"></a>00193         <span class="keywordflow">if</span> (fread(aucBytes, <span class="keyword">sizeof</span>(UCHAR), tMemb, pFile) != tMemb) {
-<a name="l00194"></a>00194                 <span class="keywordflow">return</span> FALSE;
-<a name="l00195"></a>00195         }
-<a name="l00196"></a>00196         <span class="keywordflow">return</span> TRUE;
-<a name="l00197"></a>00197 } <span class="comment">/* end of bReadBytes */</span>
-<a name="l00198"></a>00198 
-<a name="l00199"></a>00199 <span class="comment">/*</span>
-<a name="l00200"></a>00200 <span class="comment"> * bReadBuffer</span>
-<a name="l00201"></a>00201 <span class="comment"> * This function fills the specified buffer with the specified number of bytes,</span>
-<a name="l00202"></a>00202 <span class="comment"> * starting at the specified offset within the Big/Small Block Depot.</span>
-<a name="l00203"></a>00203 <span class="comment"> *</span>
-<a name="l00204"></a>00204 <span class="comment"> * Returns TRUE when successful, otherwise FALSE</span>
-<a name="l00205"></a>00205 <span class="comment"> */</span>
-<a name="l00206"></a>00206 BOOL
-<a name="l00207"></a>00207 bReadBuffer(FILE *pFile, ULONG ulStartBlock,
-<a name="l00208"></a>00208         <span class="keyword">const</span> ULONG *aulBlockDepot, <span class="keywordtype">size_t</span> tBlockDepotLen, <span class="keywordtype">size_t</span> tBlockSize,
-<a name="l00209"></a>00209         UCHAR *aucBuffer, ULONG ulOffset, <span class="keywordtype">size_t</span> tToRead)
-<a name="l00210"></a>00210 {
-<a name="l00211"></a>00211         ULONG   ulBegin, ulIndex;
-<a name="l00212"></a>00212         <span class="keywordtype">size_t</span>  tLen;
-<a name="l00213"></a>00213 
-<a name="l00214"></a>00214         fail(pFile == NULL);
-<a name="l00215"></a>00215         fail(ulStartBlock &gt; MAX_BLOCKNUMBER &amp;&amp; ulStartBlock != END_OF_CHAIN);
-<a name="l00216"></a>00216         fail(aulBlockDepot == NULL);
-<a name="l00217"></a>00217         fail(tBlockSize != BIG_BLOCK_SIZE &amp;&amp; tBlockSize != SMALL_BLOCK_SIZE);
-<a name="l00218"></a>00218         fail(aucBuffer == NULL);
-<a name="l00219"></a>00219         fail(tToRead == 0);
-<a name="l00220"></a>00220 
-<a name="l00221"></a>00221         <span class="keywordflow">for</span> (ulIndex = ulStartBlock;
-<a name="l00222"></a>00222              ulIndex != END_OF_CHAIN &amp;&amp; tToRead != 0;
-<a name="l00223"></a>00223              ulIndex = aulBlockDepot[ulIndex]) {
-<a name="l00224"></a>00224                 <span class="keywordflow">if</span> (ulIndex &gt;= (ULONG)tBlockDepotLen) {
-<a name="l00225"></a>00225                         DBG_DEC(ulIndex);
-<a name="l00226"></a>00226                         DBG_DEC(tBlockDepotLen);
-<a name="l00227"></a>00227                         <span class="keywordflow">if</span> (tBlockSize &gt;= BIG_BLOCK_SIZE) {
-<a name="l00228"></a>00228                                 werr(1, <span class="stringliteral">&quot;The Big Block Depot is damaged&quot;</span>);
-<a name="l00229"></a>00229                         } <span class="keywordflow">else</span> {
-<a name="l00230"></a>00230                                 werr(1, <span class="stringliteral">&quot;The Small Block Depot is damaged&quot;</span>);
-<a name="l00231"></a>00231                         }
-<a name="l00232"></a>00232                 }
-<a name="l00233"></a>00233                 <span class="keywordflow">if</span> (ulOffset &gt;= (ULONG)tBlockSize) {
-<a name="l00234"></a>00234                         ulOffset -= tBlockSize;
-<a name="l00235"></a>00235                         <span class="keywordflow">continue</span>;
-<a name="l00236"></a>00236                 }
-<a name="l00237"></a>00237                 ulBegin = ulDepotOffset(ulIndex, tBlockSize) + ulOffset;
-<a name="l00238"></a>00238                 tLen = min(tBlockSize - (<span class="keywordtype">size_t</span>)ulOffset, tToRead);
-<a name="l00239"></a>00239                 ulOffset = 0;
-<a name="l00240"></a>00240                 <span class="keywordflow">if</span> (!bReadBytes(aucBuffer, tLen, ulBegin, pFile)) {
-<a name="l00241"></a>00241                         werr(0, <span class="stringliteral">&quot;Read big block 0x%lx not possible&quot;</span>, ulBegin);
-<a name="l00242"></a>00242                         <span class="keywordflow">return</span> FALSE;
-<a name="l00243"></a>00243                 }
-<a name="l00244"></a>00244                 aucBuffer += tLen;
-<a name="l00245"></a>00245                 tToRead -= tLen;
-<a name="l00246"></a>00246         }
-<a name="l00247"></a>00247         DBG_DEC_C(tToRead != 0, tToRead);
-<a name="l00248"></a>00248         <span class="keywordflow">return</span> tToRead == 0;
-<a name="l00249"></a>00249 } <span class="comment">/* end of bReadBuffer */</span>
-<a name="l00250"></a>00250 
-<a name="l00251"></a>00251 <span class="comment">/*</span>
-<a name="l00252"></a>00252 <span class="comment"> * Convert a Word colornumber into a true color for use in a drawfile</span>
-<a name="l00253"></a>00253 <span class="comment"> *</span>
-<a name="l00254"></a>00254 <span class="comment"> * Returns the true color</span>
-<a name="l00255"></a>00255 <span class="comment"> */</span>
-<a name="l00256"></a>00256 ULONG
-<a name="l00257"></a>00257 ulColor2Color(UCHAR ucFontColor)
-<a name="l00258"></a>00258 {
-<a name="l00259"></a>00259         <span class="keyword">static</span> <span class="keyword">const</span> ULONG      aulColorTable[] = {
-<a name="l00260"></a>00260                 <span class="comment">/*  0 */</span>        0x00000000UL,   <span class="comment">/* Automatic */</span>
-<a name="l00261"></a>00261                 <span class="comment">/*  1 */</span>        0x00000000UL,   <span class="comment">/* Black */</span>
-<a name="l00262"></a>00262                 <span class="comment">/*  2 */</span>        0xff000000UL,   <span class="comment">/* Blue */</span>
-<a name="l00263"></a>00263                 <span class="comment">/*  3 */</span>        0xffff0000UL,   <span class="comment">/* Turquoise */</span>
-<a name="l00264"></a>00264                 <span class="comment">/*  4 */</span>        0x00ff0000UL,   <span class="comment">/* Bright Green */</span>
-<a name="l00265"></a>00265                 <span class="comment">/*  5 */</span>        0xff00ff00UL,   <span class="comment">/* Pink */</span>
-<a name="l00266"></a>00266                 <span class="comment">/*  6 */</span>        0x0000ff00UL,   <span class="comment">/* Red */</span>
-<a name="l00267"></a>00267                 <span class="comment">/*  7 */</span>        0x00ffff00UL,   <span class="comment">/* Yellow */</span>
-<a name="l00268"></a>00268                 <span class="comment">/*  8 */</span>        0xffffff00UL,   <span class="comment">/* White */</span>
-<a name="l00269"></a>00269                 <span class="comment">/*  9 */</span>        0x80000000UL,   <span class="comment">/* Dark Blue */</span>
-<a name="l00270"></a>00270                 <span class="comment">/* 10 */</span>        0x80800000UL,   <span class="comment">/* Teal */</span>
-<a name="l00271"></a>00271                 <span class="comment">/* 11 */</span>        0x00800000UL,   <span class="comment">/* Green */</span>
-<a name="l00272"></a>00272                 <span class="comment">/* 12 */</span>        0x80008000UL,   <span class="comment">/* Violet */</span>
-<a name="l00273"></a>00273                 <span class="comment">/* 13 */</span>        0x00008000UL,   <span class="comment">/* Dark Red */</span>
-<a name="l00274"></a>00274                 <span class="comment">/* 14 */</span>        0x00808000UL,   <span class="comment">/* Dark Yellow */</span>
-<a name="l00275"></a>00275                 <span class="comment">/* 15 */</span>        0x80808000UL,   <span class="comment">/* Gray 50% */</span>
-<a name="l00276"></a>00276                 <span class="comment">/* 16 */</span>        0xc0c0c000UL,   <span class="comment">/* Gray 25% */</span>
-<a name="l00277"></a>00277         };
-<a name="l00278"></a>00278         <span class="keywordflow">if</span> ((<span class="keywordtype">size_t</span>)ucFontColor &gt;= elementsof(aulColorTable)) {
-<a name="l00279"></a>00279                 <span class="keywordflow">return</span> aulColorTable[0];
-<a name="l00280"></a>00280         }
-<a name="l00281"></a>00281         <span class="keywordflow">return</span> aulColorTable[(int)ucFontColor];
-<a name="l00282"></a>00282 } <span class="comment">/* end of ulColor2Color */</span>
-<a name="l00283"></a>00283 
-<a name="l00284"></a>00284 <span class="comment">/*</span>
-<a name="l00285"></a>00285 <span class="comment"> * iFindSplit - find a place to split the string</span>
-<a name="l00286"></a>00286 <span class="comment"> *</span>
-<a name="l00287"></a>00287 <span class="comment"> * returns the index of the split character or -1 if no split found.</span>
-<a name="l00288"></a>00288 <span class="comment"> */</span>
-<a name="l00289"></a>00289 <span class="keyword">static</span> <span class="keywordtype">int</span>
-<a name="l00290"></a>00290 iFindSplit(<span class="keyword">const</span> <span class="keywordtype">char</span> *szString, <span class="keywordtype">size_t</span> tStringLen)
-<a name="l00291"></a>00291 {
-<a name="l00292"></a>00292         <span class="keywordtype">size_t</span>  tSplit;
-<a name="l00293"></a>00293 
-<a name="l00294"></a>00294         <span class="keywordflow">if</span> (tStringLen == 0) {
-<a name="l00295"></a>00295                 <span class="keywordflow">return</span> -1;
-<a name="l00296"></a>00296         }
-<a name="l00297"></a>00297         tSplit = tStringLen - 1;
-<a name="l00298"></a>00298         <span class="keywordflow">while</span> (tSplit &gt;= 1) {
-<a name="l00299"></a>00299                 <span class="keywordflow">if</span> (szString[tSplit] == <span class="charliteral">&#39; &#39;</span> ||
-<a name="l00300"></a>00300                     (szString[tSplit] == <span class="charliteral">&#39;-&#39;</span> &amp;&amp; szString[tSplit - 1] != <span class="charliteral">&#39; &#39;</span>)) {
-<a name="l00301"></a>00301                         <span class="keywordflow">return</span> (<span class="keywordtype">int</span>)tSplit;
-<a name="l00302"></a>00302                 }
-<a name="l00303"></a>00303                 tSplit--;
-<a name="l00304"></a>00304         }
-<a name="l00305"></a>00305         <span class="keywordflow">return</span> -1;
-<a name="l00306"></a>00306 } <span class="comment">/* end of iFindSplit */</span>
-<a name="l00307"></a>00307 
-<a name="l00308"></a>00308 <span class="comment">/*</span>
-<a name="l00309"></a>00309 <span class="comment"> * pSplitList - split the specified list in a printable part and a leftover part</span>
-<a name="l00310"></a>00310 <span class="comment"> *</span>
-<a name="l00311"></a>00311 <span class="comment"> * returns the pointer to the leftover part</span>
-<a name="l00312"></a>00312 <span class="comment"> */</span>
-<a name="l00313"></a>00313 output_type *
-<a name="l00314"></a>00314 pSplitList(output_type *pAnchor)
-<a name="l00315"></a>00315 {
-<a name="l00316"></a>00316         output_type     *pCurr, *pLeftOver;
-<a name="l00317"></a>00317         <span class="keywordtype">int</span>             iIndex;
-<a name="l00318"></a>00318 
-<a name="l00319"></a>00319         fail(pAnchor == NULL);
-<a name="l00320"></a>00320 
-<a name="l00321"></a>00321         <span class="keywordflow">for</span> (pCurr = pAnchor; pCurr-&gt;pNext != NULL; pCurr = pCurr-&gt;pNext)
-<a name="l00322"></a>00322                 ;       <span class="comment">/* EMPTY */</span>
-<a name="l00323"></a>00323         iIndex = -1;
-<a name="l00324"></a>00324         <span class="keywordflow">for</span> (; pCurr != NULL; pCurr = pCurr-&gt;pPrev) {
-<a name="l00325"></a>00325                 iIndex = iFindSplit(pCurr-&gt;szStorage, pCurr-&gt;tNextFree);
-<a name="l00326"></a>00326                 <span class="keywordflow">if</span> (iIndex &gt;= 0) {
-<a name="l00327"></a>00327                         <span class="keywordflow">break</span>;
-<a name="l00328"></a>00328                 }
-<a name="l00329"></a>00329         }
-<a name="l00330"></a>00330 
-<a name="l00331"></a>00331         <span class="keywordflow">if</span> (pCurr == NULL || iIndex &lt; 0) {
-<a name="l00332"></a>00332                 <span class="comment">/* No split, no leftover */</span>
-<a name="l00333"></a>00333                 <span class="keywordflow">return</span> NULL;
-<a name="l00334"></a>00334         }
-<a name="l00335"></a>00335         <span class="comment">/* Split over the iIndex-th character */</span>
-<a name="l00336"></a>00336         NO_DBG_MSG(<span class="stringliteral">&quot;pLeftOver&quot;</span>);
-<a name="l00337"></a>00337         pLeftOver = xmalloc(<span class="keyword">sizeof</span>(*pLeftOver));
-<a name="l00338"></a>00338         fail(pCurr-&gt;tNextFree &lt; (<span class="keywordtype">size_t</span>)iIndex);
-<a name="l00339"></a>00339         pLeftOver-&gt;tStorageSize = pCurr-&gt;tNextFree - (size_t)iIndex;
-<a name="l00340"></a>00340         pLeftOver-&gt;szStorage = xmalloc(pLeftOver-&gt;tStorageSize);
-<a name="l00341"></a>00341         pLeftOver-&gt;tNextFree = pCurr-&gt;tNextFree - (size_t)iIndex - 1;
-<a name="l00342"></a>00342         (void)strncpy(pLeftOver-&gt;szStorage,
-<a name="l00343"></a>00343                 pCurr-&gt;szStorage + iIndex + 1, pLeftOver-&gt;tNextFree);
-<a name="l00344"></a>00344         pLeftOver-&gt;szStorage[pLeftOver-&gt;tNextFree] = <span class="charliteral">&#39;\0&#39;</span>;
-<a name="l00345"></a>00345         NO_DBG_MSG(pLeftOver-&gt;szStorage);
-<a name="l00346"></a>00346         pLeftOver-&gt;ucFontColor = pCurr-&gt;ucFontColor;
-<a name="l00347"></a>00347         pLeftOver-&gt;usFontStyle = pCurr-&gt;usFontStyle;
-<a name="l00348"></a>00348         pLeftOver-&gt;tFontRef = pCurr-&gt;tFontRef;
-<a name="l00349"></a>00349         pLeftOver-&gt;usFontSize = pCurr-&gt;usFontSize;
-<a name="l00350"></a>00350         pLeftOver-&gt;lStringWidth = lComputeStringWidth(
-<a name="l00351"></a>00351                                         pLeftOver-&gt;szStorage,
-<a name="l00352"></a>00352                                         pLeftOver-&gt;tNextFree,
-<a name="l00353"></a>00353                                         pLeftOver-&gt;tFontRef,
-<a name="l00354"></a>00354                                         pLeftOver-&gt;usFontSize);
-<a name="l00355"></a>00355         pLeftOver-&gt;pPrev = NULL;
-<a name="l00356"></a>00356         pLeftOver-&gt;pNext = pCurr-&gt;pNext;
-<a name="l00357"></a>00357         <span class="keywordflow">if</span> (pLeftOver-&gt;pNext != NULL) {
-<a name="l00358"></a>00358                 pLeftOver-&gt;pNext-&gt;pPrev = pLeftOver;
-<a name="l00359"></a>00359         }
-<a name="l00360"></a>00360         fail(!bCheckDoubleLinkedList(pLeftOver));
-<a name="l00361"></a>00361 
-<a name="l00362"></a>00362         NO_DBG_MSG(<span class="stringliteral">&quot;pAnchor&quot;</span>);
-<a name="l00363"></a>00363         NO_DBG_HEX(pCurr-&gt;szStorage[iIndex]);
-<a name="l00364"></a>00364         <span class="keywordflow">while</span> (iIndex &gt;= 0 &amp;&amp; isspace((<span class="keywordtype">int</span>)(UCHAR)pCurr-&gt;szStorage[iIndex])) {
-<a name="l00365"></a>00365                 iIndex--;
-<a name="l00366"></a>00366         }
-<a name="l00367"></a>00367         pCurr-&gt;tNextFree = (size_t)iIndex + 1;
-<a name="l00368"></a>00368         pCurr-&gt;szStorage[pCurr-&gt;tNextFree] = <span class="charliteral">&#39;\0&#39;</span>;
-<a name="l00369"></a>00369         NO_DBG_MSG(pCurr-&gt;szStorage);
-<a name="l00370"></a>00370         pCurr-&gt;lStringWidth = lComputeStringWidth(
-<a name="l00371"></a>00371                                         pCurr-&gt;szStorage,
-<a name="l00372"></a>00372                                         pCurr-&gt;tNextFree,
-<a name="l00373"></a>00373                                         pCurr-&gt;tFontRef,
-<a name="l00374"></a>00374                                         pCurr-&gt;usFontSize);
-<a name="l00375"></a>00375         pCurr-&gt;pNext = NULL;
-<a name="l00376"></a>00376         fail(!bCheckDoubleLinkedList(pAnchor));
-<a name="l00377"></a>00377 
-<a name="l00378"></a>00378         <span class="keywordflow">return</span> pLeftOver;
-<a name="l00379"></a>00379 } <span class="comment">/* end of pSplitList */</span>
-<a name="l00380"></a>00380 
-<a name="l00381"></a>00381 <span class="comment">/*</span>
-<a name="l00382"></a>00382 <span class="comment"> * tNumber2Roman - convert a number to Roman Numerals</span>
-<a name="l00383"></a>00383 <span class="comment"> *</span>
-<a name="l00384"></a>00384 <span class="comment"> * returns the number of characters written</span>
-<a name="l00385"></a>00385 <span class="comment"> */</span>
-<a name="l00386"></a>00386 <span class="keywordtype">size_t</span>
-<a name="l00387"></a>00387 tNumber2Roman(UINT uiNumber, BOOL bUpperCase, <span class="keywordtype">char</span> *szOutput)
-<a name="l00388"></a>00388 {
-<a name="l00389"></a>00389         <span class="keywordtype">char</span>    *outp, *p, *q;
-<a name="l00390"></a>00390         UINT    uiNextVal, uiValue;
-<a name="l00391"></a>00391 
-<a name="l00392"></a>00392         fail(szOutput == NULL);
-<a name="l00393"></a>00393 
-<a name="l00394"></a>00394         uiNumber %= 4000;       <span class="comment">/* Very high numbers can&#39;t be represented */</span>
-<a name="l00395"></a>00395         <span class="keywordflow">if</span> (uiNumber == 0) {
-<a name="l00396"></a>00396                 szOutput[0] = <span class="charliteral">&#39;\0&#39;</span>;
-<a name="l00397"></a>00397                 <span class="keywordflow">return</span> 0;
-<a name="l00398"></a>00398         }
-<a name="l00399"></a>00399 
-<a name="l00400"></a>00400         outp = szOutput;
-<a name="l00401"></a>00401         p = bUpperCase ? <span class="stringliteral">&quot;M\2D\5C\2L\5X\2V\5I&quot;</span> : <span class="stringliteral">&quot;m\2d\5c\2l\5x\2v\5i&quot;</span>;
-<a name="l00402"></a>00402         uiValue = 1000;
-<a name="l00403"></a>00403         <span class="keywordflow">for</span> (;;) {
-<a name="l00404"></a>00404                 <span class="keywordflow">while</span> (uiNumber &gt;= uiValue) {
-<a name="l00405"></a>00405                         *outp++ = *p;
-<a name="l00406"></a>00406                         uiNumber -= uiValue;
-<a name="l00407"></a>00407                 }
-<a name="l00408"></a>00408                 <span class="keywordflow">if</span> (uiNumber == 0) {
-<a name="l00409"></a>00409                         *outp = <span class="charliteral">&#39;\0&#39;</span>;
-<a name="l00410"></a>00410                         fail(outp &lt; szOutput);
-<a name="l00411"></a>00411                         <span class="keywordflow">return</span> (<span class="keywordtype">size_t</span>)(outp - szOutput);
-<a name="l00412"></a>00412                 }
-<a name="l00413"></a>00413                 q = p + 1;
-<a name="l00414"></a>00414                 uiNextVal = uiValue / (UINT)(UCHAR)*q;
-<a name="l00415"></a>00415                 <span class="keywordflow">if</span> ((<span class="keywordtype">int</span>)*q == 2) {             <span class="comment">/* magic */</span>
-<a name="l00416"></a>00416                         uiNextVal /= (UINT)(UCHAR)*(q += 2);
-<a name="l00417"></a>00417                 }
-<a name="l00418"></a>00418                 <span class="keywordflow">if</span> (uiNumber + uiNextVal &gt;= uiValue) {
-<a name="l00419"></a>00419                         *outp++ = *++q;
-<a name="l00420"></a>00420                         uiNumber += uiNextVal;
-<a name="l00421"></a>00421                 } <span class="keywordflow">else</span> {
-<a name="l00422"></a>00422                         p++;
-<a name="l00423"></a>00423                         uiValue /= (UINT)(UCHAR)(*p++);
-<a name="l00424"></a>00424                 }
-<a name="l00425"></a>00425         }
-<a name="l00426"></a>00426 } <span class="comment">/* end of tNumber2Roman */</span>
-<a name="l00427"></a>00427 
-<a name="l00428"></a>00428 <span class="comment">/*</span>
-<a name="l00429"></a>00429 <span class="comment"> * iNumber2Alpha - convert a number to alphabetic &quot;numbers&quot;</span>
-<a name="l00430"></a>00430 <span class="comment"> *</span>
-<a name="l00431"></a>00431 <span class="comment"> * returns the number of characters written</span>
-<a name="l00432"></a>00432 <span class="comment"> */</span>
-<a name="l00433"></a>00433 <span class="keywordtype">size_t</span>
-<a name="l00434"></a>00434 tNumber2Alpha(UINT uiNumber, BOOL bUpperCase, <span class="keywordtype">char</span> *szOutput)
-<a name="l00435"></a>00435 {
-<a name="l00436"></a>00436         <span class="keywordtype">char</span>    *outp;
-<a name="l00437"></a>00437         UINT    uiTmp;
-<a name="l00438"></a>00438 
-<a name="l00439"></a>00439         fail(szOutput == NULL);
-<a name="l00440"></a>00440 
-<a name="l00441"></a>00441         <span class="keywordflow">if</span> (uiNumber == 0) {
-<a name="l00442"></a>00442                 szOutput[0] = <span class="charliteral">&#39;\0&#39;</span>;
-<a name="l00443"></a>00443                 <span class="keywordflow">return</span> 0;
-<a name="l00444"></a>00444         }
-<a name="l00445"></a>00445 
-<a name="l00446"></a>00446         outp = szOutput;
-<a name="l00447"></a>00447         uiTmp = (UINT)(bUpperCase ? <span class="charliteral">&#39;A&#39;</span>: <span class="charliteral">&#39;a&#39;</span>);
-<a name="l00448"></a>00448         <span class="keywordflow">if</span> (uiNumber &lt;= 26) {
-<a name="l00449"></a>00449                 uiNumber -= 1;
-<a name="l00450"></a>00450                 *outp++ = (char)(uiTmp + uiNumber);
-<a name="l00451"></a>00451         } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (uiNumber &lt;= 26U + 26U*26U) {
-<a name="l00452"></a>00452                 uiNumber -= 26 + 1;
-<a name="l00453"></a>00453                 *outp++ = (char)(uiTmp + uiNumber / 26);
-<a name="l00454"></a>00454                 *outp++ = (char)(uiTmp + uiNumber % 26);
-<a name="l00455"></a>00455         } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (uiNumber &lt;= 26U + 26U*26U + 26U*26U*26U) {
-<a name="l00456"></a>00456                 uiNumber -= 26 + 26*26 + 1;
-<a name="l00457"></a>00457                 *outp++ = (char)(uiTmp + uiNumber / (26*26));
-<a name="l00458"></a>00458                 *outp++ = (char)(uiTmp + uiNumber / 26 % 26);
-<a name="l00459"></a>00459                 *outp++ = (char)(uiTmp + uiNumber % 26);
-<a name="l00460"></a>00460         }
-<a name="l00461"></a>00461         *outp = <span class="charliteral">&#39;\0&#39;</span>;
-<a name="l00462"></a>00462         fail(outp &lt; szOutput);
-<a name="l00463"></a>00463         <span class="keywordflow">return</span> (<span class="keywordtype">size_t</span>)(outp - szOutput);
-<a name="l00464"></a>00464 } <span class="comment">/* end of tNumber2Alpha */</span>
-<a name="l00465"></a>00465 
-<a name="l00466"></a>00466 <span class="comment">/*</span>
-<a name="l00467"></a>00467 <span class="comment"> * unincpy - copy a counted Unicode string to an single-byte string</span>
-<a name="l00468"></a>00468 <span class="comment"> */</span>
-<a name="l00469"></a>00469 <span class="keywordtype">char</span> *
-<a name="l00470"></a>00470 unincpy(<span class="keywordtype">char</span> *s1, <span class="keyword">const</span> UCHAR *s2, <span class="keywordtype">size_t</span> n)
-<a name="l00471"></a>00471 {
-<a name="l00472"></a>00472         <span class="keywordtype">char</span>    *pcDest;
-<a name="l00473"></a>00473         ULONG   ulChar;
-<a name="l00474"></a>00474         <span class="keywordtype">size_t</span>  tLen;
-<a name="l00475"></a>00475         USHORT  usUni;
-<a name="l00476"></a>00476 
-<a name="l00477"></a>00477         <span class="keywordflow">for</span> (pcDest = s1, tLen = 0; tLen &lt; n; pcDest++, tLen++) {
-<a name="l00478"></a>00478                 usUni = usGetWord(tLen * 2, s2);
-<a name="l00479"></a>00479                 <span class="keywordflow">if</span> (usUni == 0) {
-<a name="l00480"></a>00480                         <span class="keywordflow">break</span>;
-<a name="l00481"></a>00481                 }
-<a name="l00482"></a>00482                 ulChar = ulTranslateCharacters(usUni, 0, 8,
-<a name="l00483"></a>00483                                 conversion_unknown, encoding_neutral, FALSE);
-<a name="l00484"></a>00484                 <span class="keywordflow">if</span> (ulChar == IGNORE_CHARACTER) {
-<a name="l00485"></a>00485                         ulChar = (ULONG)<span class="charliteral">&#39;?&#39;</span>;
-<a name="l00486"></a>00486                 }
-<a name="l00487"></a>00487                 *pcDest = (char)ulChar;
-<a name="l00488"></a>00488         }
-<a name="l00489"></a>00489         <span class="keywordflow">for</span> (; tLen &lt; n; tLen++) {
-<a name="l00490"></a>00490                 *pcDest++ = <span class="charliteral">&#39;\0&#39;</span>;
-<a name="l00491"></a>00491         }
-<a name="l00492"></a>00492         <span class="keywordflow">return</span> s1;
-<a name="l00493"></a>00493 } <span class="comment">/* end of unincpy */</span>
-<a name="l00494"></a>00494 
-<a name="l00495"></a>00495 <span class="comment">/*</span>
-<a name="l00496"></a>00496 <span class="comment"> * unilen - calculate the length of a Unicode string</span>
-<a name="l00497"></a>00497 <span class="comment"> *</span>
-<a name="l00498"></a>00498 <span class="comment"> * returns the length in bytes</span>
-<a name="l00499"></a>00499 <span class="comment"> */</span>
-<a name="l00500"></a>00500 <span class="keywordtype">size_t</span>
-<a name="l00501"></a>00501 unilen(<span class="keyword">const</span> UCHAR *s)
-<a name="l00502"></a>00502 {
-<a name="l00503"></a>00503         <span class="keywordtype">size_t</span>  tLen;
-<a name="l00504"></a>00504         USHORT  usUni;
-<a name="l00505"></a>00505 
-<a name="l00506"></a>00506         tLen = 0;
-<a name="l00507"></a>00507         <span class="keywordflow">for</span> (;;) {
-<a name="l00508"></a>00508                 usUni = usGetWord(tLen, s);
-<a name="l00509"></a>00509                 <span class="keywordflow">if</span> (usUni == 0) {
-<a name="l00510"></a>00510                         <span class="keywordflow">return</span> tLen;
-<a name="l00511"></a>00511                 }
-<a name="l00512"></a>00512                 tLen += 2;
-<a name="l00513"></a>00513         }
-<a name="l00514"></a>00514 } <span class="comment">/* end of unilen */</span>
-<a name="l00515"></a>00515 
-<a name="l00516"></a>00516 <span class="comment">/*</span>
-<a name="l00517"></a>00517 <span class="comment"> * szBaseName - get the basename of the specified filename</span>
-<a name="l00518"></a>00518 <span class="comment"> */</span>
-<a name="l00519"></a>00519 <span class="keyword">const</span> <span class="keywordtype">char</span> *
-<a name="l00520"></a>00520 szBasename(<span class="keyword">const</span> <span class="keywordtype">char</span> *szFilename)
-<a name="l00521"></a>00521 {
-<a name="l00522"></a>00522         <span class="keyword">const</span> <span class="keywordtype">char</span>      *szTmp;
-<a name="l00523"></a>00523 
-<a name="l00524"></a>00524         fail(szFilename == NULL);
-<a name="l00525"></a>00525 
-<a name="l00526"></a>00526         <span class="keywordflow">if</span> (szFilename == NULL || szFilename[0] == <span class="charliteral">&#39;\0&#39;</span>) {
-<a name="l00527"></a>00527                 <span class="keywordflow">return</span> <span class="stringliteral">&quot;null&quot;</span>;
-<a name="l00528"></a>00528         }
-<a name="l00529"></a>00529 
-<a name="l00530"></a>00530         szTmp = strrchr(szFilename, FILE_SEPARATOR[0]);
-<a name="l00531"></a>00531         <span class="keywordflow">if</span> (szTmp == NULL) {
-<a name="l00532"></a>00532                 <span class="keywordflow">return</span> szFilename;
-<a name="l00533"></a>00533         }
-<a name="l00534"></a>00534         <span class="keywordflow">return</span> ++szTmp;
-<a name="l00535"></a>00535 } <span class="comment">/* end of szBasename */</span>
-<a name="l00536"></a>00536 
-<a name="l00537"></a>00537 <span class="comment">/*</span>
-<a name="l00538"></a>00538 <span class="comment"> * lComputeLeading - compute the leading</span>
-<a name="l00539"></a>00539 <span class="comment"> *</span>
-<a name="l00540"></a>00540 <span class="comment"> * NOTE: the fontsize is specified in half points</span>
-<a name="l00541"></a>00541 <span class="comment"> *</span>
-<a name="l00542"></a>00542 <span class="comment"> * Returns the leading in drawunits</span>
-<a name="l00543"></a>00543 <span class="comment"> */</span>
-<a name="l00544"></a>00544 <span class="keywordtype">long</span>
-<a name="l00545"></a>00545 lComputeLeading(USHORT usFontSize)
-<a name="l00546"></a>00546 {
-<a name="l00547"></a>00547         <span class="keywordtype">long</span>    lLeading;
-<a name="l00548"></a>00548 
-<a name="l00549"></a>00549         lLeading = (long)usFontSize * 500L;
-<a name="l00550"></a>00550         <span class="keywordflow">if</span> (usFontSize &lt; 18) {          <span class="comment">/* Small text: 112% */</span>
-<a name="l00551"></a>00551                 lLeading *= 112;
-<a name="l00552"></a>00552         } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (usFontSize &lt; 28) {   <span class="comment">/* Normal text: 124% */</span>
-<a name="l00553"></a>00553                 lLeading *= 124;
-<a name="l00554"></a>00554         } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (usFontSize &lt; 48) {   <span class="comment">/* Small headlines: 104% */</span>
-<a name="l00555"></a>00555                 lLeading *= 104;
-<a name="l00556"></a>00556         } <span class="keywordflow">else</span> {                        <span class="comment">/* Large headlines: 100% */</span>
-<a name="l00557"></a>00557                 lLeading *= 100;
-<a name="l00558"></a>00558         }
-<a name="l00559"></a>00559         lLeading = lMilliPoints2DrawUnits(lLeading);
-<a name="l00560"></a>00560         lLeading += 50;
-<a name="l00561"></a>00561         lLeading /= 100;
-<a name="l00562"></a>00562         <span class="keywordflow">return</span> lLeading;
-<a name="l00563"></a>00563 } <span class="comment">/* end of lComputeLeading */</span>
-<a name="l00564"></a>00564 
-<a name="l00565"></a>00565 <span class="comment">/*</span>
-<a name="l00566"></a>00566 <span class="comment"> * Convert a UCS character to an UTF-8 string</span>
-<a name="l00567"></a>00567 <span class="comment"> *</span>
-<a name="l00568"></a>00568 <span class="comment"> * Returns the string length of the result</span>
-<a name="l00569"></a>00569 <span class="comment"> */</span>
-<a name="l00570"></a>00570 <span class="keywordtype">size_t</span>
-<a name="l00571"></a>00571 tUcs2Utf8(ULONG ulChar, <span class="keywordtype">char</span> *szResult, <span class="keywordtype">size_t</span> tMaxResultLen)
-<a name="l00572"></a>00572 {
-<a name="l00573"></a>00573         <span class="keywordflow">if</span> (szResult == NULL || tMaxResultLen == 0) {
-<a name="l00574"></a>00574                 <span class="keywordflow">return</span> 0;
-<a name="l00575"></a>00575         }
-<a name="l00576"></a>00576 
-<a name="l00577"></a>00577         <span class="keywordflow">if</span> (ulChar &lt; 0x80 &amp;&amp; tMaxResultLen &gt;= 2) {
-<a name="l00578"></a>00578                 szResult[0] = (char)ulChar;
-<a name="l00579"></a>00579                 szResult[1] = <span class="charliteral">&#39;\0&#39;</span>;
-<a name="l00580"></a>00580                 <span class="keywordflow">return</span> 1;
-<a name="l00581"></a>00581         }
-<a name="l00582"></a>00582         <span class="keywordflow">if</span> (ulChar &lt; 0x800 &amp;&amp; tMaxResultLen &gt;= 3) {
-<a name="l00583"></a>00583                 szResult[0] = (char)(0xc0 | ulChar &gt;&gt; 6);
-<a name="l00584"></a>00584                 szResult[1] = (char)(0x80 | (ulChar &amp; 0x3f));
-<a name="l00585"></a>00585                 szResult[2] = <span class="charliteral">&#39;\0&#39;</span>;
-<a name="l00586"></a>00586                 <span class="keywordflow">return</span> 2;
-<a name="l00587"></a>00587         }
-<a name="l00588"></a>00588         <span class="keywordflow">if</span> (ulChar &lt; 0x10000 &amp;&amp; tMaxResultLen &gt;= 4) {
-<a name="l00589"></a>00589                 szResult[0] = (char)(0xe0 | ulChar &gt;&gt; 12);
-<a name="l00590"></a>00590                 szResult[1] = (char)(0x80 | (ulChar &gt;&gt; 6 &amp; 0x3f));
-<a name="l00591"></a>00591                 szResult[2] = (char)(0x80 | (ulChar &amp; 0x3f));
-<a name="l00592"></a>00592                 szResult[3] = <span class="charliteral">&#39;\0&#39;</span>;
-<a name="l00593"></a>00593                 <span class="keywordflow">return</span> 3;
-<a name="l00594"></a>00594         }
-<a name="l00595"></a>00595         <span class="keywordflow">if</span> (ulChar &lt; 0x200000 &amp;&amp; tMaxResultLen &gt;= 5) {
-<a name="l00596"></a>00596                 szResult[0] = (char)(0xf0 | ulChar &gt;&gt; 18);
-<a name="l00597"></a>00597                 szResult[1] = (char)(0x80 | (ulChar &gt;&gt; 12 &amp; 0x3f));
-<a name="l00598"></a>00598                 szResult[2] = (char)(0x80 | (ulChar &gt;&gt; 6 &amp; 0x3f));
-<a name="l00599"></a>00599                 szResult[3] = (char)(0x80 | (ulChar &amp; 0x3f));
-<a name="l00600"></a>00600                 szResult[4] = <span class="charliteral">&#39;\0&#39;</span>;
-<a name="l00601"></a>00601                 <span class="keywordflow">return</span> 4;
-<a name="l00602"></a>00602         }
-<a name="l00603"></a>00603         szResult[0] = <span class="charliteral">&#39;\0&#39;</span>;
-<a name="l00604"></a>00604         <span class="keywordflow">return</span> 0;
-<a name="l00605"></a>00605 } <span class="comment">/* end of tUcs2Utf8 */</span>
-<a name="l00606"></a>00606 
-<a name="l00607"></a>00607 <span class="comment">/*</span>
-<a name="l00608"></a>00608 <span class="comment"> * vGetBulletValue - get the bullet value for the conversing type and encoding</span>
-<a name="l00609"></a>00609 <span class="comment"> */</span>
-<a name="l00610"></a>00610 <span class="keywordtype">void</span>
-<a name="l00611"></a>00611 vGetBulletValue(conversion_type eConversionType, encoding_type eEncoding,
-<a name="l00612"></a>00612         <span class="keywordtype">char</span> *szResult, <span class="keywordtype">size_t</span> tMaxResultLen)
-<a name="l00613"></a>00613 {
-<a name="l00614"></a>00614         fail(szResult == NULL);
-<a name="l00615"></a>00615         fail(tMaxResultLen &lt; 2);
-<a name="l00616"></a>00616 
-<a name="l00617"></a>00617         <span class="keywordflow">if</span> (eEncoding == encoding_utf_8) {
-<a name="l00618"></a>00618                 (void)tUcs2Utf8(UNICODE_BULLET, szResult, tMaxResultLen);
-<a name="l00619"></a>00619         } <span class="keywordflow">else</span> {
-<a name="l00620"></a>00620                 szResult[0] = (char)ucGetBulletCharacter(eConversionType,
-<a name="l00621"></a>00621                                                         eEncoding);
-<a name="l00622"></a>00622                 szResult[1] = <span class="charliteral">&#39;\0&#39;</span>;
-<a name="l00623"></a>00623         }
-<a name="l00624"></a>00624 } <span class="comment">/* end of vGetBulletValue */</span>
-<a name="l00625"></a>00625 
-<a name="l00626"></a>00626 <span class="comment">/*</span>
-<a name="l00627"></a>00627 <span class="comment"> * bAllZero - are all bytes zero?</span>
-<a name="l00628"></a>00628 <span class="comment"> */</span>
-<a name="l00629"></a>00629 BOOL
-<a name="l00630"></a>00630 bAllZero(<span class="keyword">const</span> UCHAR *aucBytes, <span class="keywordtype">size_t</span> tLength)
-<a name="l00631"></a>00631 {
-<a name="l00632"></a>00632         <span class="keywordtype">size_t</span>  tIndex;
-<a name="l00633"></a>00633 
-<a name="l00634"></a>00634         <span class="keywordflow">if</span> (aucBytes == NULL || tLength == 0) {
-<a name="l00635"></a>00635                 <span class="keywordflow">return</span> TRUE;
-<a name="l00636"></a>00636         }
-<a name="l00637"></a>00637 
-<a name="l00638"></a>00638         <span class="keywordflow">for</span> (tIndex = 0; tIndex &lt; tLength; tIndex++) {
-<a name="l00639"></a>00639                 <span class="keywordflow">if</span> (aucBytes[tIndex] != 0) {
-<a name="l00640"></a>00640                         <span class="keywordflow">return</span> FALSE;
-<a name="l00641"></a>00641                 }
-<a name="l00642"></a>00642         }
-<a name="l00643"></a>00643         <span class="keywordflow">return</span> TRUE;
-<a name="l00644"></a>00644 } <span class="comment">/* end of bAllZero */</span>
-<a name="l00645"></a>00645 
-<a name="l00646"></a>00646 <span class="preprocessor">#if !defined(__riscos)</span>
-<a name="l00647"></a>00647 <span class="preprocessor"></span><span class="comment">/*</span>
-<a name="l00648"></a>00648 <span class="comment"> * GetCodesetFromLocale - get the codeset from the current locale</span>
-<a name="l00649"></a>00649 <span class="comment"> *</span>
-<a name="l00650"></a>00650 <span class="comment"> * Original version: Copyright (C) 1999  Bruno Haible</span>
-<a name="l00651"></a>00651 <span class="comment"> * Syntax:</span>
-<a name="l00652"></a>00652 <span class="comment"> * language[_territory][.codeset][@modifier][+special][,[sponsor][_revision]]</span>
-<a name="l00653"></a>00653 <span class="comment"> *</span>
-<a name="l00654"></a>00654 <span class="comment"> * Returns TRUE when sucessful, otherwise FALSE</span>
-<a name="l00655"></a>00655 <span class="comment"> */</span>
-<a name="l00656"></a>00656 <span class="keyword">static</span> BOOL
-<a name="l00657"></a>00657 bGetCodesetFromLocale(<span class="keywordtype">char</span> *szCodeset, <span class="keywordtype">size_t</span> tMaxCodesetLength, BOOL *pbEuro)
-<a name="l00658"></a>00658 {
-<a name="l00659"></a>00659 <span class="preprocessor">#if !defined(__dos)</span>
-<a name="l00660"></a>00660 <span class="preprocessor"></span>        <span class="keyword">const</span> <span class="keywordtype">char</span>      *szLocale;
-<a name="l00661"></a>00661         <span class="keyword">const</span> <span class="keywordtype">char</span>      *pcTmp;
-<a name="l00662"></a>00662         <span class="keywordtype">size_t</span>          tIndex;
-<a name="l00663"></a>00663         <span class="keywordtype">char</span>            szModifier[6];
-<a name="l00664"></a>00664 <span class="preprocessor">#endif </span><span class="comment">/* __dos */</span>
-<a name="l00665"></a>00665 
-<a name="l00666"></a>00666         <span class="keywordflow">if</span> (pbEuro != NULL) {
-<a name="l00667"></a>00667                 *pbEuro = FALSE;        <span class="comment">/* Until proven otherwise */</span>
-<a name="l00668"></a>00668         }
-<a name="l00669"></a>00669         <span class="keywordflow">if</span> (szCodeset == NULL || tMaxCodesetLength == 0) {
-<a name="l00670"></a>00670                 <span class="keywordflow">return</span> FALSE;
-<a name="l00671"></a>00671         }
-<a name="l00672"></a>00672 
-<a name="l00673"></a>00673 <span class="preprocessor">#if defined(__dos)</span>
-<a name="l00674"></a>00674 <span class="preprocessor"></span>        <span class="keywordflow">if</span> (tMaxCodesetLength &lt; 2 + <span class="keyword">sizeof</span>(<span class="keywordtype">int</span>) * 3 + 1) {
-<a name="l00675"></a>00675                 DBG_DEC(tMaxCodesetLength);
-<a name="l00676"></a>00676                 DBG_DEC(2 + <span class="keyword">sizeof</span>(<span class="keywordtype">int</span>) * 3 + 1);
-<a name="l00677"></a>00677                 <span class="keywordflow">return</span> FALSE;
-<a name="l00678"></a>00678         }
-<a name="l00679"></a>00679         <span class="comment">/* Get the active codepage from DOS */</span>
-<a name="l00680"></a>00680         sprintf(szCodeset, <span class="stringliteral">&quot;cp%d&quot;</span>, iGetCodepage());
-<a name="l00681"></a>00681         DBG_MSG(szCodeset);
-<a name="l00682"></a>00682 <span class="preprocessor">#else</span>
-<a name="l00683"></a>00683 <span class="preprocessor"></span>        <span class="comment">/* Get the locale from the environment */</span>
-<a name="l00684"></a>00684         szLocale = getenv(<span class="stringliteral">&quot;LC_ALL&quot;</span>);
-<a name="l00685"></a>00685         <span class="keywordflow">if</span> (szLocale == NULL || szLocale[0] == <span class="charliteral">&#39;\0&#39;</span>) {
-<a name="l00686"></a>00686                 szLocale = getenv(<span class="stringliteral">&quot;LC_CTYPE&quot;</span>);
-<a name="l00687"></a>00687                 <span class="keywordflow">if</span> (szLocale == NULL || szLocale[0] == <span class="charliteral">&#39;\0&#39;</span>) {
-<a name="l00688"></a>00688                         szLocale = getenv(<span class="stringliteral">&quot;LANG&quot;</span>);
-<a name="l00689"></a>00689                 }
-<a name="l00690"></a>00690         }
-<a name="l00691"></a>00691         <span class="keywordflow">if</span> (szLocale == NULL || szLocale[0] == <span class="charliteral">&#39;\0&#39;</span>) {
-<a name="l00692"></a>00692                 <span class="comment">/* No locale, so no codeset name and no modifier */</span>
-<a name="l00693"></a>00693                 <span class="keywordflow">return</span> FALSE;
-<a name="l00694"></a>00694         }
-<a name="l00695"></a>00695         DBG_MSG(szLocale);
-<a name="l00696"></a>00696         pcTmp = strchr(szLocale, <span class="charliteral">&#39;.&#39;</span>);
-<a name="l00697"></a>00697         <span class="keywordflow">if</span> (pcTmp == NULL) {
-<a name="l00698"></a>00698                 <span class="comment">/* No codeset name */</span>
-<a name="l00699"></a>00699                 szCodeset[0] = <span class="charliteral">&#39;\0&#39;</span>;
-<a name="l00700"></a>00700         } <span class="keywordflow">else</span> {
-<a name="l00701"></a>00701                 <span class="comment">/* Copy the codeset name */</span>
-<a name="l00702"></a>00702                 pcTmp++;
-<a name="l00703"></a>00703                 <span class="keywordflow">for</span> (tIndex = 0; tIndex &lt; tMaxCodesetLength; tIndex++) {
-<a name="l00704"></a>00704                         <span class="keywordflow">if</span> (*pcTmp == <span class="charliteral">&#39;@&#39;</span> || *pcTmp == <span class="charliteral">&#39;+&#39;</span> ||
-<a name="l00705"></a>00705                             *pcTmp == <span class="charliteral">&#39;,&#39;</span> || *pcTmp == <span class="charliteral">&#39;_&#39;</span> ||
-<a name="l00706"></a>00706                             *pcTmp == <span class="charliteral">&#39;\0&#39;</span>) {
-<a name="l00707"></a>00707                                 szCodeset[tIndex] = <span class="charliteral">&#39;\0&#39;</span>;
-<a name="l00708"></a>00708                                 <span class="keywordflow">break</span>;
-<a name="l00709"></a>00709                         }
-<a name="l00710"></a>00710                         szCodeset[tIndex] = *pcTmp;
-<a name="l00711"></a>00711                         pcTmp++;
-<a name="l00712"></a>00712                 }
-<a name="l00713"></a>00713                 szCodeset[tMaxCodesetLength - 1] = <span class="charliteral">&#39;\0&#39;</span>;
-<a name="l00714"></a>00714         }
-<a name="l00715"></a>00715         <span class="keywordflow">if</span> (pbEuro == NULL) {
-<a name="l00716"></a>00716                 <span class="comment">/* No need to get the modifier */</span>
-<a name="l00717"></a>00717                 <span class="keywordflow">return</span> TRUE;
-<a name="l00718"></a>00718         }
-<a name="l00719"></a>00719         pcTmp = strchr(szLocale, <span class="charliteral">&#39;@&#39;</span>);
-<a name="l00720"></a>00720         <span class="keywordflow">if</span> (pcTmp != NULL) {
-<a name="l00721"></a>00721                 <span class="comment">/* Copy the modifier */</span>
-<a name="l00722"></a>00722                 pcTmp++;
-<a name="l00723"></a>00723                 <span class="keywordflow">for</span> (tIndex = 0; tIndex &lt; <span class="keyword">sizeof</span>(szModifier); tIndex++) {
-<a name="l00724"></a>00724                         <span class="keywordflow">if</span> (*pcTmp == <span class="charliteral">&#39;+&#39;</span> || *pcTmp == <span class="charliteral">&#39;,&#39;</span> ||
-<a name="l00725"></a>00725                             *pcTmp == <span class="charliteral">&#39;_&#39;</span> || *pcTmp == <span class="charliteral">&#39;\0&#39;</span>) {
-<a name="l00726"></a>00726                                 szModifier[tIndex] = <span class="charliteral">&#39;\0&#39;</span>;
-<a name="l00727"></a>00727                                 <span class="keywordflow">break</span>;
-<a name="l00728"></a>00728                         }
-<a name="l00729"></a>00729                         szModifier[tIndex] = *pcTmp;
-<a name="l00730"></a>00730                         pcTmp++;
-<a name="l00731"></a>00731                 }
-<a name="l00732"></a>00732                 szModifier[<span class="keyword">sizeof</span>(szModifier) - 1] = <span class="charliteral">&#39;\0&#39;</span>;
-<a name="l00733"></a>00733                 *pbEuro = STRCEQ(szModifier, <span class="stringliteral">&quot;Euro&quot;</span>);
-<a name="l00734"></a>00734         }
-<a name="l00735"></a>00735 <span class="preprocessor">#endif </span><span class="comment">/* __dos */</span>
-<a name="l00736"></a>00736         <span class="keywordflow">return</span> TRUE;
-<a name="l00737"></a>00737 } <span class="comment">/* end of bGetCodesetFromLocale */</span>
-<a name="l00738"></a>00738 
-<a name="l00739"></a>00739 <span class="comment">/*</span>
-<a name="l00740"></a>00740 <span class="comment"> * GetNormalizedCodeset - get the normalized codeset from the current locale</span>
-<a name="l00741"></a>00741 <span class="comment"> *</span>
-<a name="l00742"></a>00742 <span class="comment"> * Returns TRUE when sucessful, otherwise FALSE</span>
-<a name="l00743"></a>00743 <span class="comment"> */</span>
-<a name="l00744"></a>00744 BOOL
-<a name="l00745"></a>00745 bGetNormalizedCodeset(<span class="keywordtype">char</span> *szCodeset, <span class="keywordtype">size_t</span> tMaxCodesetLength, BOOL *pbEuro)
-<a name="l00746"></a>00746 {
-<a name="l00747"></a>00747         BOOL    bOnlyDigits;
-<a name="l00748"></a>00748         <span class="keyword">const</span> <span class="keywordtype">char</span>      *pcSrc;
-<a name="l00749"></a>00749         <span class="keywordtype">char</span>    *pcDest;
-<a name="l00750"></a>00750         <span class="keywordtype">char</span>    *szTmp, *szCodesetNorm;
-<a name="l00751"></a>00751 
-<a name="l00752"></a>00752         <span class="keywordflow">if</span> (pbEuro != NULL) {
-<a name="l00753"></a>00753                 *pbEuro = FALSE;        <span class="comment">/* Until proven otherwise */</span>
-<a name="l00754"></a>00754         }
-<a name="l00755"></a>00755         <span class="keywordflow">if</span> (szCodeset == NULL || tMaxCodesetLength &lt; 4) {
-<a name="l00756"></a>00756                 <span class="keywordflow">return</span> FALSE;
-<a name="l00757"></a>00757         }
-<a name="l00758"></a>00758 
-<a name="l00759"></a>00759         <span class="comment">/* Get the codeset name */</span>
-<a name="l00760"></a>00760         szTmp = xmalloc(tMaxCodesetLength - 3);
-<a name="l00761"></a>00761         <span class="keywordflow">if</span> (!bGetCodesetFromLocale(szTmp, tMaxCodesetLength - 3, pbEuro)) {
-<a name="l00762"></a>00762                 szTmp = xfree(szTmp);
-<a name="l00763"></a>00763                 <span class="keywordflow">return</span> FALSE;
-<a name="l00764"></a>00764         }
-<a name="l00765"></a>00765         <span class="comment">/* Normalize the codeset name */</span>
-<a name="l00766"></a>00766         szCodesetNorm = xmalloc(tMaxCodesetLength - 3);
-<a name="l00767"></a>00767         bOnlyDigits = TRUE;
-<a name="l00768"></a>00768         pcDest = szCodesetNorm;
-<a name="l00769"></a>00769         <span class="keywordflow">for</span> (pcSrc = szTmp; *pcSrc != <span class="charliteral">&#39;\0&#39;</span>; pcSrc++) {
-<a name="l00770"></a>00770                 <span class="keywordflow">if</span> (isalnum(*pcSrc)) {
-<a name="l00771"></a>00771                         *pcDest = tolower(*pcSrc);
-<a name="l00772"></a>00772                         <span class="keywordflow">if</span> (!isdigit(*pcDest)) {
-<a name="l00773"></a>00773                                 bOnlyDigits = FALSE;
-<a name="l00774"></a>00774                         }
-<a name="l00775"></a>00775                         pcDest++;
-<a name="l00776"></a>00776                 }
-<a name="l00777"></a>00777         }
-<a name="l00778"></a>00778         *pcDest = <span class="charliteral">&#39;\0&#39;</span>;
-<a name="l00779"></a>00779         DBG_MSG(szCodesetNorm);
-<a name="l00780"></a>00780         <span class="comment">/* Add &quot;iso&quot; when szCodesetNorm contains all digits */</span>
-<a name="l00781"></a>00781         <span class="keywordflow">if</span> (bOnlyDigits &amp;&amp; szCodesetNorm[0] != <span class="charliteral">&#39;\0&#39;</span>) {
-<a name="l00782"></a>00782                 fail(strlen(szCodesetNorm) + 3 &gt;= tMaxCodesetLength);
-<a name="l00783"></a>00783                 sprintf(szCodeset, <span class="stringliteral">&quot;iso%s&quot;</span>, szCodesetNorm);
-<a name="l00784"></a>00784         } <span class="keywordflow">else</span> {
-<a name="l00785"></a>00785                 fail(strlen(szCodesetNorm) &gt;= tMaxCodesetLength);
-<a name="l00786"></a>00786                 strncpy(szCodeset, szCodesetNorm, pcDest - szCodesetNorm + 1);
-<a name="l00787"></a>00787                 szCodeset[tMaxCodesetLength - 1] = <span class="charliteral">&#39;\0&#39;</span>;
-<a name="l00788"></a>00788         }
-<a name="l00789"></a>00789         DBG_MSG(szCodeset);
-<a name="l00790"></a>00790         <span class="comment">/* Clean up and leave */</span>
-<a name="l00791"></a>00791         szCodesetNorm = xfree(szCodesetNorm);
-<a name="l00792"></a>00792         szTmp = xfree(szTmp);
-<a name="l00793"></a>00793         <span class="keywordflow">return</span> TRUE;
-<a name="l00794"></a>00794 } <span class="comment">/* end of bGetNormalizedCodeset */</span>
-<a name="l00795"></a>00795 
-<a name="l00796"></a>00796 <span class="comment">/*</span>
-<a name="l00797"></a>00797 <span class="comment"> * szGetDefaultMappingFile - get the default mapping file</span>
-<a name="l00798"></a>00798 <span class="comment"> *</span>
-<a name="l00799"></a>00799 <span class="comment"> * Returns the basename of the default mapping file</span>
-<a name="l00800"></a>00800 <span class="comment"> */</span>
-<a name="l00801"></a>00801 <span class="keyword">const</span> <span class="keywordtype">char</span> *
-<a name="l00802"></a>00802 szGetDefaultMappingFile(<span class="keywordtype">void</span>)
-<a name="l00803"></a>00803 {
-<a name="l00804"></a>00804         <span class="keyword">static</span> <span class="keyword">const</span> <span class="keyword">struct </span>{
-<a name="l00805"></a>00805                 <span class="keyword">const</span> <span class="keywordtype">char</span>      *szCodeset;
-<a name="l00806"></a>00806                 <span class="keyword">const</span> <span class="keywordtype">char</span>      *szMappingFile;
-<a name="l00807"></a>00807         } atMappingFile[] = {
-<a name="l00808"></a>00808                 { <span class="stringliteral">&quot;iso88591&quot;</span>,   MAPPING_FILE_8859_1 },
-<a name="l00809"></a>00809                 { <span class="stringliteral">&quot;iso88592&quot;</span>,   MAPPING_FILE_8859_2 },
-<a name="l00810"></a>00810                 { <span class="stringliteral">&quot;iso88593&quot;</span>,   <span class="stringliteral">&quot;8859-3.txt&quot;</span> },
-<a name="l00811"></a>00811                 { <span class="stringliteral">&quot;iso88594&quot;</span>,   <span class="stringliteral">&quot;8859-4.txt&quot;</span> },
-<a name="l00812"></a>00812                 { <span class="stringliteral">&quot;iso88595&quot;</span>,   <span class="stringliteral">&quot;8859-5.txt&quot;</span> },
-<a name="l00813"></a>00813                 { <span class="stringliteral">&quot;iso88596&quot;</span>,   MAPPING_FILE_8859_5 },
-<a name="l00814"></a>00814                 { <span class="stringliteral">&quot;iso88597&quot;</span>,   <span class="stringliteral">&quot;8859-7.txt&quot;</span> },
-<a name="l00815"></a>00815                 { <span class="stringliteral">&quot;iso88598&quot;</span>,   <span class="stringliteral">&quot;8859-8.txt&quot;</span> },
-<a name="l00816"></a>00816                 { <span class="stringliteral">&quot;iso88599&quot;</span>,   <span class="stringliteral">&quot;8859-9.txt&quot;</span> },
-<a name="l00817"></a>00817                 { <span class="stringliteral">&quot;iso885910&quot;</span>,  <span class="stringliteral">&quot;8859-10.txt&quot;</span> },
-<a name="l00818"></a>00818                 { <span class="stringliteral">&quot;iso885913&quot;</span>,  <span class="stringliteral">&quot;8859-13.txt&quot;</span> },
-<a name="l00819"></a>00819                 { <span class="stringliteral">&quot;iso885914&quot;</span>,  <span class="stringliteral">&quot;8859-14.txt&quot;</span> },
-<a name="l00820"></a>00820                 { <span class="stringliteral">&quot;iso885915&quot;</span>,  MAPPING_FILE_8859_15 },
-<a name="l00821"></a>00821                 { <span class="stringliteral">&quot;iso885916&quot;</span>,  <span class="stringliteral">&quot;8859-16.txt&quot;</span> },
-<a name="l00822"></a>00822                 { <span class="stringliteral">&quot;koi8r&quot;</span>,      MAPPING_FILE_KOI8_R },
-<a name="l00823"></a>00823                 { <span class="stringliteral">&quot;koi8u&quot;</span>,      MAPPING_FILE_KOI8_U },
-<a name="l00824"></a>00824                 { <span class="stringliteral">&quot;utf8&quot;</span>,       MAPPING_FILE_UTF_8 },
-<a name="l00825"></a>00825                 { <span class="stringliteral">&quot;cp437&quot;</span>,      MAPPING_FILE_CP437 },
-<a name="l00826"></a>00826                 { <span class="stringliteral">&quot;cp850&quot;</span>,      <span class="stringliteral">&quot;cp850.txt&quot;</span> },
-<a name="l00827"></a>00827                 { <span class="stringliteral">&quot;cp852&quot;</span>,      MAPPING_FILE_CP852 },
-<a name="l00828"></a>00828                 { <span class="stringliteral">&quot;cp862&quot;</span>,      <span class="stringliteral">&quot;cp862.txt&quot;</span> },
-<a name="l00829"></a>00829                 { <span class="stringliteral">&quot;cp864&quot;</span>,      <span class="stringliteral">&quot;cp864.txt&quot;</span> },
-<a name="l00830"></a>00830                 { <span class="stringliteral">&quot;cp866&quot;</span>,      MAPPING_FILE_CP866 },
-<a name="l00831"></a>00831                 { <span class="stringliteral">&quot;cp1250&quot;</span>,     MAPPING_FILE_CP1250 },
-<a name="l00832"></a>00832                 { <span class="stringliteral">&quot;cp1251&quot;</span>,     MAPPING_FILE_CP1251 },
-<a name="l00833"></a>00833                 { <span class="stringliteral">&quot;cp1252&quot;</span>,     <span class="stringliteral">&quot;cp1252.txt&quot;</span> },
-<a name="l00834"></a>00834         };
-<a name="l00835"></a>00835         <span class="keywordtype">size_t</span>  tIndex;
-<a name="l00836"></a>00836         BOOL    bEuro;
-<a name="l00837"></a>00837         <span class="keywordtype">char</span>    szCodeset[20];
-<a name="l00838"></a>00838 
-<a name="l00839"></a>00839         szCodeset[0] = <span class="charliteral">&#39;\0&#39;</span>;
-<a name="l00840"></a>00840         bEuro = FALSE;
-<a name="l00841"></a>00841         <span class="comment">/* Get the normalized codeset name */</span>
-<a name="l00842"></a>00842         <span class="keywordflow">if</span> (!bGetNormalizedCodeset(szCodeset, <span class="keyword">sizeof</span>(szCodeset), &amp;bEuro)) {
-<a name="l00843"></a>00843                 <span class="keywordflow">return</span> MAPPING_FILE_8859_1;
-<a name="l00844"></a>00844         }
-<a name="l00845"></a>00845         <span class="keywordflow">if</span> (szCodeset[0] == <span class="charliteral">&#39;\0&#39;</span>) {
-<a name="l00846"></a>00846                 <span class="keywordflow">if</span> (bEuro) {
-<a name="l00847"></a>00847                         <span class="comment">/* Default mapping file (with Euro sign) */</span>
-<a name="l00848"></a>00848                         <span class="keywordflow">return</span> MAPPING_FILE_8859_15;
-<a name="l00849"></a>00849                 } <span class="keywordflow">else</span> {
-<a name="l00850"></a>00850                         <span class="comment">/* Default mapping file (without Euro sign) */</span>
-<a name="l00851"></a>00851                         <span class="keywordflow">return</span> MAPPING_FILE_8859_1;
-<a name="l00852"></a>00852                 }
-<a name="l00853"></a>00853         }
-<a name="l00854"></a>00854         <span class="comment">/* Find the name in the table */</span>
-<a name="l00855"></a>00855         <span class="keywordflow">for</span> (tIndex = 0; tIndex &lt; elementsof(atMappingFile); tIndex++) {
-<a name="l00856"></a>00856                 <span class="keywordflow">if</span> (STREQ(atMappingFile[tIndex].szCodeset, szCodeset)) {
-<a name="l00857"></a>00857                         <span class="keywordflow">return</span> atMappingFile[tIndex].szMappingFile;
-<a name="l00858"></a>00858                 }
-<a name="l00859"></a>00859         }
-<a name="l00860"></a>00860         <span class="comment">/* Default default mapping file */</span>
-<a name="l00861"></a>00861 <span class="preprocessor">#if defined(__dos)</span>
-<a name="l00862"></a>00862 <span class="preprocessor"></span>        <span class="keywordflow">return</span> MAPPING_FILE_CP437;
-<a name="l00863"></a>00863 <span class="preprocessor">#else</span>
-<a name="l00864"></a>00864 <span class="preprocessor"></span>        <span class="keywordflow">return</span> MAPPING_FILE_8859_1;
-<a name="l00865"></a>00865 <span class="preprocessor">#endif </span><span class="comment">/* __dos */</span>
-<a name="l00866"></a>00866 } <span class="comment">/* end of szGetDefaultMappingFile */</span>
-<a name="l00867"></a>00867 <span class="preprocessor">#endif </span><span class="comment">/* !__riscos */</span>
-<a name="l00868"></a>00868 
-<a name="l00869"></a>00869 <span class="comment">/*</span>
-<a name="l00870"></a>00870 <span class="comment"> * tConvertDTTM - convert Windows Date and Time format</span>
-<a name="l00871"></a>00871 <span class="comment"> *</span>
-<a name="l00872"></a>00872 <span class="comment"> * returns Unix time_t or -1</span>
-<a name="l00873"></a>00873 <span class="comment"> */</span>
-<a name="l00874"></a>00874 time_t
-<a name="l00875"></a>00875 tConvertDTTM(ULONG ulDTTM)
-<a name="l00876"></a>00876 {
-<a name="l00877"></a>00877         <span class="keyword">struct </span>tm       tTime;
-<a name="l00878"></a>00878         time_t          tResult;
-<a name="l00879"></a>00879 
-<a name="l00880"></a>00880         <span class="keywordflow">if</span> (ulDTTM == 0) {
-<a name="l00881"></a>00881                 <span class="keywordflow">return</span> (time_t)-1;
-<a name="l00882"></a>00882         }
-<a name="l00883"></a>00883         memset(&amp;tTime, 0, <span class="keyword">sizeof</span>(tTime));
-<a name="l00884"></a>00884         tTime.tm_min = (int)(ulDTTM &amp; 0x0000003f);
-<a name="l00885"></a>00885         tTime.tm_hour = (int)((ulDTTM &amp; 0x000007c0) &gt;&gt; 6);
-<a name="l00886"></a>00886         tTime.tm_mday = (int)((ulDTTM &amp; 0x0000f800) &gt;&gt; 11);
-<a name="l00887"></a>00887         tTime.tm_mon = (int)((ulDTTM &amp; 0x000f0000) &gt;&gt; 16);
-<a name="l00888"></a>00888         tTime.tm_year = (int)((ulDTTM &amp; 0x1ff00000) &gt;&gt; 20);
-<a name="l00889"></a>00889         tTime.tm_isdst = -1;
-<a name="l00890"></a>00890         tTime.tm_mon--;         <span class="comment">/* From 01-12 to 00-11 */</span>
-<a name="l00891"></a>00891         tResult = mktime(&amp;tTime);
-<a name="l00892"></a>00892         NO_DBG_MSG(ctime(&amp;tResult));
-<a name="l00893"></a>00893         <span class="keywordflow">return</span> tResult;
-<a name="l00894"></a>00894 } <span class="comment">/* end of tConvertDTTM */</span>
-</pre></div></div>
-<hr size="1"/><address style="text-align: right;"><small>Generated by&nbsp;
-<a href="http://www.doxygen.org/index.html">
-<img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.6.2 </small></address>
-</body>
-</html>