Week 23 contribution of PDK documentation content. See release notes for details. Fixes bugs Bug 2714, Bug 462.
<!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/fonts.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/fonts.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"> * fonts.c</span>
<a name="l00003"></a>00003 <span class="comment"> * Copyright (C) 1998-2004 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"> * Functions to deal with fonts (generic)</span>
<a name="l00007"></a>00007 <span class="comment"> */</span>
<a name="l00008"></a>00008
<a name="l00009"></a>00009 <span class="preprocessor">#include <ctype.h></span>
<a name="l00010"></a>00010 <span class="preprocessor">#include <string.h></span>
<a name="l00011"></a>00011 <span class="preprocessor">#include "antiword.h"</span>
<a name="l00012"></a>00012
<a name="l00013"></a>00013 <span class="comment">/* Maximum line length in the font file */</span>
<a name="l00014"></a>00014 <span class="preprocessor">#define FONT_LINE_LENGTH 81</span>
<a name="l00015"></a>00015 <span class="preprocessor"></span>
<a name="l00016"></a>00016 <span class="comment">/* Pitch */</span>
<a name="l00017"></a>00017 <span class="preprocessor">#define PITCH_UNKNOWN 0</span>
<a name="l00018"></a>00018 <span class="preprocessor"></span><span class="preprocessor">#define PITCH_FIXED 1</span>
<a name="l00019"></a>00019 <span class="preprocessor"></span><span class="preprocessor">#define PITCH_VARIABLE 2</span>
<a name="l00020"></a>00020 <span class="preprocessor"></span>
<a name="l00021"></a>00021 <span class="comment">/* Font Family */</span>
<a name="l00022"></a>00022 <span class="preprocessor">#define FAMILY_UNKNOWN 0</span>
<a name="l00023"></a>00023 <span class="preprocessor"></span><span class="preprocessor">#define FAMILY_ROMAN 1</span>
<a name="l00024"></a>00024 <span class="preprocessor"></span><span class="preprocessor">#define FAMILY_SWISS 2</span>
<a name="l00025"></a>00025 <span class="preprocessor"></span><span class="preprocessor">#define FAMILY_MODERN 3</span>
<a name="l00026"></a>00026 <span class="preprocessor"></span><span class="preprocessor">#define FAMILY_SCRIPT 4</span>
<a name="l00027"></a>00027 <span class="preprocessor"></span><span class="preprocessor">#define FAMILY_DECORATIVE 5</span>
<a name="l00028"></a>00028 <span class="preprocessor"></span>
<a name="l00029"></a>00029 <span class="comment">/* Font Translation Table */</span>
<a name="l00030"></a>00030 <span class="keyword">static</span> <span class="keywordtype">size_t</span> tFontTableRecords = 0;
<a name="l00031"></a>00031 <span class="keyword">static</span> font_table_type *pFontTable = NULL;
<a name="l00032"></a>00032
<a name="l00033"></a>00033 <span class="comment">/*</span>
<a name="l00034"></a>00034 <span class="comment"> * Find the given font in the font table</span>
<a name="l00035"></a>00035 <span class="comment"> *</span>
<a name="l00036"></a>00036 <span class="comment"> * returns the index into the FontTable, -1 if not found</span>
<a name="l00037"></a>00037 <span class="comment"> */</span>
<a name="l00038"></a>00038 <span class="keywordtype">int</span>
<a name="l00039"></a>00039 iGetFontByNumber(UCHAR ucWordFontNumber, USHORT usFontStyle)
<a name="l00040"></a>00040 {
<a name="l00041"></a>00041 <span class="keywordtype">int</span> iIndex;
<a name="l00042"></a>00042
<a name="l00043"></a>00043 <span class="keywordflow">for</span> (iIndex = 0; iIndex < (int)tFontTableRecords; iIndex++) {
<a name="l00044"></a>00044 <span class="keywordflow">if</span> (ucWordFontNumber == pFontTable[iIndex].ucWordFontNumber &&
<a name="l00045"></a>00045 usFontStyle == pFontTable[iIndex].usFontStyle &&
<a name="l00046"></a>00046 pFontTable[iIndex].szOurFontname[0] != <span class="charliteral">'\0'</span>) {
<a name="l00047"></a>00047 <span class="keywordflow">return</span> iIndex;
<a name="l00048"></a>00048 }
<a name="l00049"></a>00049 }
<a name="l00050"></a>00050 DBG_DEC(ucWordFontNumber);
<a name="l00051"></a>00051 DBG_HEX(usFontStyle);
<a name="l00052"></a>00052 <span class="keywordflow">return</span> -1;
<a name="l00053"></a>00053 } <span class="comment">/* end of iGetFontByNumber */</span>
<a name="l00054"></a>00054
<a name="l00055"></a>00055 <span class="comment">/*</span>
<a name="l00056"></a>00056 <span class="comment"> * szGetOurFontname - Get our font name</span>
<a name="l00057"></a>00057 <span class="comment"> *</span>
<a name="l00058"></a>00058 <span class="comment"> * return our font name from the given index, NULL if not found</span>
<a name="l00059"></a>00059 <span class="comment"> */</span>
<a name="l00060"></a>00060 <span class="keyword">const</span> <span class="keywordtype">char</span> *
<a name="l00061"></a>00061 szGetOurFontname(<span class="keywordtype">int</span> iIndex)
<a name="l00062"></a>00062 {
<a name="l00063"></a>00063 <span class="keywordflow">if</span> (iIndex < 0 || iIndex >= (<span class="keywordtype">int</span>)tFontTableRecords) {
<a name="l00064"></a>00064 <span class="keywordflow">return</span> NULL;
<a name="l00065"></a>00065 }
<a name="l00066"></a>00066 <span class="keywordflow">return</span> pFontTable[iIndex].szOurFontname;
<a name="l00067"></a>00067 } <span class="comment">/* end of szGetOurFontname */</span>
<a name="l00068"></a>00068
<a name="l00069"></a>00069 <span class="comment">/*</span>
<a name="l00070"></a>00070 <span class="comment"> * Find the given font in the font table</span>
<a name="l00071"></a>00071 <span class="comment"> *</span>
<a name="l00072"></a>00072 <span class="comment"> * returns the Word font number, -1 if not found</span>
<a name="l00073"></a>00073 <span class="comment"> */</span>
<a name="l00074"></a>00074 <span class="keywordtype">int</span>
<a name="l00075"></a>00075 iFontname2Fontnumber(<span class="keyword">const</span> <span class="keywordtype">char</span> *szOurFontname, USHORT usFontStyle)
<a name="l00076"></a>00076 {
<a name="l00077"></a>00077 <span class="keywordtype">int</span> iIndex;
<a name="l00078"></a>00078
<a name="l00079"></a>00079 <span class="keywordflow">for</span> (iIndex = 0; iIndex < (int)tFontTableRecords; iIndex++) {
<a name="l00080"></a>00080 <span class="keywordflow">if</span> (pFontTable[iIndex].usFontStyle == usFontStyle &&
<a name="l00081"></a>00081 STREQ(pFontTable[iIndex].szOurFontname, szOurFontname)) {
<a name="l00082"></a>00082 <span class="keywordflow">return</span> (<span class="keywordtype">int</span>)pFontTable[iIndex].ucWordFontNumber;
<a name="l00083"></a>00083 }
<a name="l00084"></a>00084 }
<a name="l00085"></a>00085 <span class="keywordflow">return</span> -1;
<a name="l00086"></a>00086 } <span class="comment">/* end of iFontname2Fontnumber */</span>
<a name="l00087"></a>00087
<a name="l00088"></a>00088 <span class="comment">/*</span>
<a name="l00089"></a>00089 <span class="comment"> * szGetDefaultFont - get the default font that matches the parameters</span>
<a name="l00090"></a>00090 <span class="comment"> */</span>
<a name="l00091"></a>00091 <span class="keyword">static</span> <span class="keyword">const</span> <span class="keywordtype">char</span> *
<a name="l00092"></a>00092 szGetDefaultFont(UCHAR ucFFN, <span class="keywordtype">int</span> iEmphasis)
<a name="l00093"></a>00093 {
<a name="l00094"></a>00094 UCHAR ucPrq, ucFf;
<a name="l00095"></a>00095
<a name="l00096"></a>00096 fail(iEmphasis < 0 || iEmphasis > 3);
<a name="l00097"></a>00097
<a name="l00098"></a>00098 ucPrq = ucFFN & 0x03;
<a name="l00099"></a>00099 ucFf = (ucFFN & 0x70) >> 4;
<a name="l00100"></a>00100 NO_DBG_DEC(ucPrq);
<a name="l00101"></a>00101 NO_DBG_DEC(ucFf);
<a name="l00102"></a>00102 <span class="keywordflow">if</span> (ucPrq == PITCH_FIXED) {
<a name="l00103"></a>00103 <span class="comment">/* Set to the default monospaced font */</span>
<a name="l00104"></a>00104 <span class="keywordflow">switch</span> (iEmphasis) {
<a name="l00105"></a>00105 <span class="keywordflow">case</span> 1: <span class="keywordflow">return</span> FONT_MONOSPACED_BOLD;
<a name="l00106"></a>00106 <span class="keywordflow">case</span> 2: <span class="keywordflow">return</span> FONT_MONOSPACED_ITALIC;
<a name="l00107"></a>00107 <span class="keywordflow">case</span> 3: <span class="keywordflow">return</span> FONT_MONOSPACED_BOLDITALIC;
<a name="l00108"></a>00108 <span class="keywordflow">default</span>: <span class="keywordflow">return</span> FONT_MONOSPACED_PLAIN;
<a name="l00109"></a>00109 }
<a name="l00110"></a>00110 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (ucFf == FAMILY_ROMAN) {
<a name="l00111"></a>00111 <span class="comment">/* Set to the default serif font */</span>
<a name="l00112"></a>00112 <span class="keywordflow">switch</span> (iEmphasis) {
<a name="l00113"></a>00113 <span class="keywordflow">case</span> 1: <span class="keywordflow">return</span> FONT_SERIF_BOLD;
<a name="l00114"></a>00114 <span class="keywordflow">case</span> 2: <span class="keywordflow">return</span> FONT_SERIF_ITALIC;
<a name="l00115"></a>00115 <span class="keywordflow">case</span> 3: <span class="keywordflow">return</span> FONT_SERIF_BOLDITALIC;
<a name="l00116"></a>00116 <span class="keywordflow">default</span>: <span class="keywordflow">return</span> FONT_SERIF_PLAIN;
<a name="l00117"></a>00117 }
<a name="l00118"></a>00118 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (ucFf == FAMILY_SWISS) {
<a name="l00119"></a>00119 <span class="comment">/* Set to the default sans serif font */</span>
<a name="l00120"></a>00120 <span class="keywordflow">switch</span> (iEmphasis) {
<a name="l00121"></a>00121 <span class="keywordflow">case</span> 1: <span class="keywordflow">return</span> FONT_SANS_SERIF_BOLD;
<a name="l00122"></a>00122 <span class="keywordflow">case</span> 2: <span class="keywordflow">return</span> FONT_SANS_SERIF_ITALIC;
<a name="l00123"></a>00123 <span class="keywordflow">case</span> 3: <span class="keywordflow">return</span> FONT_SANS_SERIF_BOLDITALIC;
<a name="l00124"></a>00124 <span class="keywordflow">default</span>: <span class="keywordflow">return</span> FONT_SANS_SERIF_PLAIN;
<a name="l00125"></a>00125 }
<a name="l00126"></a>00126 } <span class="keywordflow">else</span> {
<a name="l00127"></a>00127 <span class="comment">/* Set to the default default font */</span>
<a name="l00128"></a>00128 <span class="keywordflow">switch</span> (iEmphasis) {
<a name="l00129"></a>00129 <span class="keywordflow">case</span> 1: <span class="keywordflow">return</span> FONT_SERIF_BOLD;
<a name="l00130"></a>00130 <span class="keywordflow">case</span> 2: <span class="keywordflow">return</span> FONT_SERIF_ITALIC;
<a name="l00131"></a>00131 <span class="keywordflow">case</span> 3: <span class="keywordflow">return</span> FONT_SERIF_BOLDITALIC;
<a name="l00132"></a>00132 <span class="keywordflow">default</span>: <span class="keywordflow">return</span> FONT_SERIF_PLAIN;
<a name="l00133"></a>00133 }
<a name="l00134"></a>00134 }
<a name="l00135"></a>00135 } <span class="comment">/* end of szGetDefaultFont */</span>
<a name="l00136"></a>00136
<a name="l00137"></a>00137 <span class="comment">/*</span>
<a name="l00138"></a>00138 <span class="comment"> * See if the fontname from the Word file matches the fontname from the</span>
<a name="l00139"></a>00139 <span class="comment"> * font translation file.</span>
<a name="l00140"></a>00140 <span class="comment"> * If iBytesPerChar is one than aucWord is in ISO-8859-x (Word 2/6/7),</span>
<a name="l00141"></a>00141 <span class="comment"> * if iBytesPerChar is two than aucWord is in Unicode (Word 8/9/10).</span>
<a name="l00142"></a>00142 <span class="comment"> */</span>
<a name="l00143"></a>00143 <span class="keyword">static</span> BOOL
<a name="l00144"></a>00144 bFontEqual(<span class="keyword">const</span> UCHAR *aucWord, <span class="keyword">const</span> <span class="keywordtype">char</span> *szTable, <span class="keywordtype">int</span> iBytesPerChar)
<a name="l00145"></a>00145 {
<a name="l00146"></a>00146 <span class="keyword">const</span> UCHAR *pucTmp;
<a name="l00147"></a>00147 <span class="keyword">const</span> <span class="keywordtype">char</span> *pcTmp;
<a name="l00148"></a>00148
<a name="l00149"></a>00149 fail(aucWord == NULL || szTable == NULL);
<a name="l00150"></a>00150 fail(iBytesPerChar != 1 && iBytesPerChar != 2);
<a name="l00151"></a>00151
<a name="l00152"></a>00152 <span class="keywordflow">for</span> (pucTmp = aucWord, pcTmp = szTable;
<a name="l00153"></a>00153 *pucTmp != 0;
<a name="l00154"></a>00154 pucTmp += iBytesPerChar, pcTmp++) {
<a name="l00155"></a>00155 <span class="keywordflow">if</span> (ulToUpper((ULONG)*pucTmp) !=
<a name="l00156"></a>00156 ulToUpper((ULONG)(UCHAR)*pcTmp)) {
<a name="l00157"></a>00157 <span class="keywordflow">return</span> FALSE;
<a name="l00158"></a>00158 }
<a name="l00159"></a>00159 }
<a name="l00160"></a>00160 <span class="keywordflow">return</span> *pcTmp == <span class="charliteral">'\0'</span>;
<a name="l00161"></a>00161 } <span class="comment">/* end of bFontEqual */</span>
<a name="l00162"></a>00162
<a name="l00163"></a>00163 <span class="comment">/*</span>
<a name="l00164"></a>00164 <span class="comment"> * vFontname2Table - add fontnames to the font table</span>
<a name="l00165"></a>00165 <span class="comment"> */</span>
<a name="l00166"></a>00166 <span class="keyword">static</span> <span class="keywordtype">void</span>
<a name="l00167"></a>00167 vFontname2Table(<span class="keyword">const</span> UCHAR *aucFont, <span class="keyword">const</span> UCHAR *aucAltFont,
<a name="l00168"></a>00168 <span class="keywordtype">int</span> iBytesPerChar, <span class="keywordtype">int</span> iEmphasis, UCHAR ucFFN,
<a name="l00169"></a>00169 <span class="keyword">const</span> <span class="keywordtype">char</span> *szWordFont, <span class="keyword">const</span> <span class="keywordtype">char</span> *szOurFont,
<a name="l00170"></a>00170 font_table_type *pFontTableRecord)
<a name="l00171"></a>00171 {
<a name="l00172"></a>00172 BOOL bMatchFound;
<a name="l00173"></a>00173
<a name="l00174"></a>00174 fail(aucFont == NULL || aucFont[0] == 0);
<a name="l00175"></a>00175 fail(aucAltFont != NULL && aucAltFont[0] == 0);
<a name="l00176"></a>00176 fail(iBytesPerChar != 1 && iBytesPerChar != 2);
<a name="l00177"></a>00177 fail(iEmphasis < 0 || iEmphasis > 3);
<a name="l00178"></a>00178 fail(szWordFont == NULL || szWordFont[0] == <span class="charliteral">'\0'</span>);
<a name="l00179"></a>00179 fail(szOurFont == NULL || szOurFont[0] == <span class="charliteral">'\0'</span>);
<a name="l00180"></a>00180 fail(pFontTableRecord == NULL);
<a name="l00181"></a>00181
<a name="l00182"></a>00182 bMatchFound = bFontEqual(aucFont, szWordFont, iBytesPerChar);
<a name="l00183"></a>00183
<a name="l00184"></a>00184 <span class="keywordflow">if</span> (!bMatchFound && aucAltFont != NULL) {
<a name="l00185"></a>00185 bMatchFound = bFontEqual(aucAltFont, szWordFont, iBytesPerChar);
<a name="l00186"></a>00186 }
<a name="l00187"></a>00187
<a name="l00188"></a>00188 <span class="keywordflow">if</span> (!bMatchFound &&
<a name="l00189"></a>00189 pFontTableRecord->szWordFontname[0] == <span class="charliteral">'\0'</span> &&
<a name="l00190"></a>00190 szWordFont[0] == <span class="charliteral">'*'</span> &&
<a name="l00191"></a>00191 szWordFont[1] == <span class="charliteral">'\0'</span>) {
<a name="l00192"></a>00192 <span class="comment">/*</span>
<a name="l00193"></a>00193 <span class="comment"> * szWordFont contains a "*", so szOurFont will contain the</span>
<a name="l00194"></a>00194 <span class="comment"> * "default default" font. See if we can do better than that.</span>
<a name="l00195"></a>00195 <span class="comment"> */</span>
<a name="l00196"></a>00196 szOurFont = szGetDefaultFont(ucFFN, iEmphasis);
<a name="l00197"></a>00197 bMatchFound = TRUE;
<a name="l00198"></a>00198 }
<a name="l00199"></a>00199
<a name="l00200"></a>00200 <span class="keywordflow">if</span> (bMatchFound) {
<a name="l00201"></a>00201 <span class="keywordflow">switch</span> (iBytesPerChar) {
<a name="l00202"></a>00202 <span class="keywordflow">case</span> 1:
<a name="l00203"></a>00203 (void)strncpy(pFontTableRecord->szWordFontname,
<a name="l00204"></a>00204 (<span class="keyword">const</span> <span class="keywordtype">char</span> *)aucFont,
<a name="l00205"></a>00205 <span class="keyword">sizeof</span>(pFontTableRecord->szWordFontname) - 1);
<a name="l00206"></a>00206 <span class="keywordflow">break</span>;
<a name="l00207"></a>00207 <span class="keywordflow">case</span> 2:
<a name="l00208"></a>00208 (void)unincpy(pFontTableRecord->szWordFontname,
<a name="l00209"></a>00209 aucFont,
<a name="l00210"></a>00210 <span class="keyword">sizeof</span>(pFontTableRecord->szWordFontname) - 1);
<a name="l00211"></a>00211 <span class="keywordflow">break</span>;
<a name="l00212"></a>00212 <span class="keywordflow">default</span>:
<a name="l00213"></a>00213 DBG_FIXME();
<a name="l00214"></a>00214 pFontTableRecord->szWordFontname[0] = <span class="charliteral">'\0'</span>;
<a name="l00215"></a>00215 <span class="keywordflow">break</span>;
<a name="l00216"></a>00216 }
<a name="l00217"></a>00217 pFontTableRecord->szWordFontname[
<a name="l00218"></a>00218 <span class="keyword">sizeof</span>(pFontTableRecord->szWordFontname) - 1] = <span class="charliteral">'\0'</span>;
<a name="l00219"></a>00219 (void)strncpy(pFontTableRecord->szOurFontname, szOurFont,
<a name="l00220"></a>00220 <span class="keyword">sizeof</span>(pFontTableRecord->szOurFontname) - 1);
<a name="l00221"></a>00221 pFontTableRecord->szOurFontname[
<a name="l00222"></a>00222 <span class="keyword">sizeof</span>(pFontTableRecord->szOurFontname) - 1] = <span class="charliteral">'\0'</span>;
<a name="l00223"></a>00223 NO_DBG_MSG(pFontTableRecord->szWordFontname);
<a name="l00224"></a>00224 NO_DBG_MSG(pFontTableRecord->szOurFontname);
<a name="l00225"></a>00225 pFontTableRecord->ucFFN = ucFFN;
<a name="l00226"></a>00226 pFontTableRecord->ucEmphasis = (UCHAR)iEmphasis;
<a name="l00227"></a>00227 }
<a name="l00228"></a>00228 } <span class="comment">/* end of vFontname2Table */</span>
<a name="l00229"></a>00229
<a name="l00230"></a>00230 <span class="comment">/*</span>
<a name="l00231"></a>00231 <span class="comment"> * vCreateFontTable - Create and initialize the internal font table</span>
<a name="l00232"></a>00232 <span class="comment"> */</span>
<a name="l00233"></a>00233 <span class="keyword">static</span> <span class="keywordtype">void</span>
<a name="l00234"></a>00234 vCreateFontTable(<span class="keywordtype">void</span>)
<a name="l00235"></a>00235 {
<a name="l00236"></a>00236 font_table_type *pTmp;
<a name="l00237"></a>00237 <span class="keywordtype">int</span> iNbr;
<a name="l00238"></a>00238
<a name="l00239"></a>00239 <span class="keywordflow">if</span> (tFontTableRecords == 0) {
<a name="l00240"></a>00240 pFontTable = xfree(pFontTable);
<a name="l00241"></a>00241 <span class="keywordflow">return</span>;
<a name="l00242"></a>00242 }
<a name="l00243"></a>00243
<a name="l00244"></a>00244 <span class="comment">/* Create the font table */</span>
<a name="l00245"></a>00245 pFontTable = xcalloc(tFontTableRecords, <span class="keyword">sizeof</span>(*pFontTable));
<a name="l00246"></a>00246
<a name="l00247"></a>00247 <span class="comment">/* Initialize the font table */</span>
<a name="l00248"></a>00248 <span class="keywordflow">for</span> (iNbr = 0, pTmp = pFontTable;
<a name="l00249"></a>00249 pTmp < pFontTable + tFontTableRecords;
<a name="l00250"></a>00250 iNbr++, pTmp++) {
<a name="l00251"></a>00251 pTmp->ucWordFontNumber = (UCHAR)(iNbr / 4);
<a name="l00252"></a>00252 <span class="keywordflow">switch</span> (iNbr % 4) {
<a name="l00253"></a>00253 <span class="keywordflow">case</span> 0:
<a name="l00254"></a>00254 pTmp->usFontStyle = FONT_REGULAR;
<a name="l00255"></a>00255 <span class="keywordflow">break</span>;
<a name="l00256"></a>00256 <span class="keywordflow">case</span> 1:
<a name="l00257"></a>00257 pTmp->usFontStyle = FONT_BOLD;
<a name="l00258"></a>00258 <span class="keywordflow">break</span>;
<a name="l00259"></a>00259 <span class="keywordflow">case</span> 2:
<a name="l00260"></a>00260 pTmp->usFontStyle = FONT_ITALIC;
<a name="l00261"></a>00261 <span class="keywordflow">break</span>;
<a name="l00262"></a>00262 <span class="keywordflow">case</span> 3:
<a name="l00263"></a>00263 pTmp->usFontStyle = FONT_BOLD|FONT_ITALIC;
<a name="l00264"></a>00264 <span class="keywordflow">break</span>;
<a name="l00265"></a>00265 <span class="keywordflow">default</span>:
<a name="l00266"></a>00266 DBG_DEC(iNbr);
<a name="l00267"></a>00267 <span class="keywordflow">break</span>;
<a name="l00268"></a>00268 }
<a name="l00269"></a>00269 }
<a name="l00270"></a>00270 } <span class="comment">/* end of vCreateFontTable */</span>
<a name="l00271"></a>00271
<a name="l00272"></a>00272 <span class="comment">/*</span>
<a name="l00273"></a>00273 <span class="comment"> * vMinimizeFontTable - make the font table as small as possible</span>
<a name="l00274"></a>00274 <span class="comment"> */</span>
<a name="l00275"></a>00275 <span class="keyword">static</span> <span class="keywordtype">void</span>
<a name="l00276"></a>00276 vMinimizeFontTable(<span class="keywordtype">void</span>)
<a name="l00277"></a>00277 {
<a name="l00278"></a>00278 font_block_type tFontNext;
<a name="l00279"></a>00279 <span class="keyword">const</span> style_block_type *pStyle;
<a name="l00280"></a>00280 <span class="keyword">const</span> font_block_type *pFont;
<a name="l00281"></a>00281 font_table_type *pTmp;
<a name="l00282"></a>00282 <span class="keywordtype">int</span> iUnUsed;
<a name="l00283"></a>00283 BOOL bMustAddTableFont;
<a name="l00284"></a>00284
<a name="l00285"></a>00285 NO_DBG_MSG(<span class="stringliteral">"vMinimizeFontTable"</span>);
<a name="l00286"></a>00286
<a name="l00287"></a>00287 <span class="keywordflow">if</span> (tFontTableRecords == 0) {
<a name="l00288"></a>00288 pFontTable = xfree(pFontTable);
<a name="l00289"></a>00289 <span class="keywordflow">return</span>;
<a name="l00290"></a>00290 }
<a name="l00291"></a>00291
<a name="l00292"></a>00292 <span class="comment">/* See if we must add a font for our tables */</span>
<a name="l00293"></a>00293 bMustAddTableFont = TRUE;
<a name="l00294"></a>00294
<a name="l00295"></a>00295 <span class="preprocessor">#if 0</span>
<a name="l00296"></a>00296 <span class="preprocessor"></span> DBG_MSG(<span class="stringliteral">"Before"</span>);
<a name="l00297"></a>00297 DBG_DEC(tFontTableRecords);
<a name="l00298"></a>00298 <span class="keywordflow">for</span> (pTmp = pFontTable;
<a name="l00299"></a>00299 pTmp < pFontTable + tFontTableRecords;
<a name="l00300"></a>00300 pTmp++) {
<a name="l00301"></a>00301 DBG_DEC(pTmp->ucWordFontNumber);
<a name="l00302"></a>00302 DBG_HEX(pTmp->usFontStyle);
<a name="l00303"></a>00303 DBG_MSG(pTmp->szWordFontname);
<a name="l00304"></a>00304 DBG_MSG(pTmp->szOurFontname);
<a name="l00305"></a>00305 }
<a name="l00306"></a>00306 <span class="preprocessor">#endif </span><span class="comment">/* DEBUG */</span>
<a name="l00307"></a>00307
<a name="l00308"></a>00308 <span class="comment">/* See which fonts/styles we really need */</span>
<a name="l00309"></a>00309
<a name="l00310"></a>00310 <span class="comment">/* Default font/style is by definition in use */</span>
<a name="l00311"></a>00311 pFontTable[0].ucInUse = 1;
<a name="l00312"></a>00312
<a name="l00313"></a>00313 <span class="comment">/* Make InUse 1 for all the fonts/styles that WILL be used */</span>
<a name="l00314"></a>00314 pFont = NULL;
<a name="l00315"></a>00315 <span class="keywordflow">while</span>((pFont = pGetNextFontInfoListItem(pFont)) != NULL) {
<a name="l00316"></a>00316 pTmp = pFontTable + 4 * (int)pFont->ucFontNumber;
<a name="l00317"></a>00317 if (bIsBold(pFont->usFontStyle)) {
<a name="l00318"></a>00318 pTmp++;
<a name="l00319"></a>00319 }
<a name="l00320"></a>00320 <span class="keywordflow">if</span> (bIsItalic(pFont->usFontStyle)) {
<a name="l00321"></a>00321 pTmp += 2;
<a name="l00322"></a>00322 }
<a name="l00323"></a>00323 <span class="keywordflow">if</span> (pTmp >= pFontTable + tFontTableRecords) {
<a name="l00324"></a>00324 <span class="keywordflow">continue</span>;
<a name="l00325"></a>00325 }
<a name="l00326"></a>00326 <span class="keywordflow">if</span> (STREQ(pTmp->szOurFontname, TABLE_FONT)) {
<a name="l00327"></a>00327 <span class="comment">/* The table font is already present */</span>
<a name="l00328"></a>00328 bMustAddTableFont = FALSE;
<a name="l00329"></a>00329 }
<a name="l00330"></a>00330 pTmp->ucInUse = 1;
<a name="l00331"></a>00331 }
<a name="l00332"></a>00332
<a name="l00333"></a>00333 <span class="comment">/* Make InUse 1 for all the fonts/styles that MIGHT be used */</span>
<a name="l00334"></a>00334 pStyle = NULL;
<a name="l00335"></a>00335 <span class="keywordflow">while</span>((pStyle = pGetNextStyleInfoListItem(pStyle)) != NULL) {
<a name="l00336"></a>00336 vFillFontFromStylesheet(pStyle->usIstdNext, &tFontNext);
<a name="l00337"></a>00337 vCorrectFontValues(&tFontNext);
<a name="l00338"></a>00338 pTmp = pFontTable + 4 * (int)tFontNext.ucFontNumber;
<a name="l00339"></a>00339 if (bIsBold(tFontNext.usFontStyle)) {
<a name="l00340"></a>00340 pTmp++;
<a name="l00341"></a>00341 }
<a name="l00342"></a>00342 <span class="keywordflow">if</span> (bIsItalic(tFontNext.usFontStyle)) {
<a name="l00343"></a>00343 pTmp += 2;
<a name="l00344"></a>00344 }
<a name="l00345"></a>00345 <span class="keywordflow">if</span> (pTmp >= pFontTable + tFontTableRecords) {
<a name="l00346"></a>00346 <span class="keywordflow">continue</span>;
<a name="l00347"></a>00347 }
<a name="l00348"></a>00348 <span class="keywordflow">if</span> (STREQ(pTmp->szOurFontname, TABLE_FONT)) {
<a name="l00349"></a>00349 <span class="comment">/* The table font is already present */</span>
<a name="l00350"></a>00350 bMustAddTableFont = FALSE;
<a name="l00351"></a>00351 }
<a name="l00352"></a>00352 pTmp->ucInUse = 1;
<a name="l00353"></a>00353 }
<a name="l00354"></a>00354
<a name="l00355"></a>00355 <span class="comment">/* Remove the unused font entries from the font table */</span>
<a name="l00356"></a>00356 iUnUsed = 0;
<a name="l00357"></a>00357 <span class="keywordflow">for</span> (pTmp = pFontTable;
<a name="l00358"></a>00358 pTmp < pFontTable + tFontTableRecords;
<a name="l00359"></a>00359 pTmp++) {
<a name="l00360"></a>00360 <span class="keywordflow">if</span> (pTmp->ucInUse == 0) {
<a name="l00361"></a>00361 iUnUsed++;
<a name="l00362"></a>00362 <span class="keywordflow">continue</span>;
<a name="l00363"></a>00363 }
<a name="l00364"></a>00364 <span class="keywordflow">if</span> (iUnUsed > 0) {
<a name="l00365"></a>00365 fail(pTmp - iUnUsed <= pFontTable);
<a name="l00366"></a>00366 *(pTmp - iUnUsed) = *pTmp;
<a name="l00367"></a>00367 }
<a name="l00368"></a>00368 }
<a name="l00369"></a>00369 fail(iUnUsed < 0);
<a name="l00370"></a>00370 fail(tFontTableRecords <= (<span class="keywordtype">size_t</span>)iUnUsed);
<a name="l00371"></a>00371 tFontTableRecords -= (size_t)iUnUsed;
<a name="l00372"></a>00372
<a name="l00373"></a>00373 <span class="keywordflow">if</span> (bMustAddTableFont) {
<a name="l00374"></a>00374 pTmp = pFontTable + tFontTableRecords;
<a name="l00375"></a>00375 fail(pTmp <= pFontTable);
<a name="l00376"></a>00376 pTmp->ucWordFontNumber = (pTmp - 1)->ucWordFontNumber + 1;
<a name="l00377"></a>00377 pTmp->usFontStyle = FONT_REGULAR;
<a name="l00378"></a>00378 pTmp->ucInUse = 1;
<a name="l00379"></a>00379 strcpy(pTmp->szWordFontname, <span class="stringliteral">"Extra Table Font"</span>);
<a name="l00380"></a>00380 strcpy(pTmp->szOurFontname, TABLE_FONT);
<a name="l00381"></a>00381 tFontTableRecords++;
<a name="l00382"></a>00382 iUnUsed--;
<a name="l00383"></a>00383 }
<a name="l00384"></a>00384 <span class="keywordflow">if</span> (iUnUsed > 0) {
<a name="l00385"></a>00385 <span class="comment">/* Resize the font table */</span>
<a name="l00386"></a>00386 pFontTable = xrealloc(pFontTable,
<a name="l00387"></a>00387 tFontTableRecords * <span class="keyword">sizeof</span>(*pFontTable));
<a name="l00388"></a>00388 }
<a name="l00389"></a>00389 <span class="preprocessor">#if defined(DEBUG)</span>
<a name="l00390"></a>00390 <span class="preprocessor"></span> DBG_MSG(<span class="stringliteral">"After"</span>);
<a name="l00391"></a>00391 DBG_DEC(tFontTableRecords);
<a name="l00392"></a>00392 <span class="keywordflow">for</span> (pTmp = pFontTable;
<a name="l00393"></a>00393 pTmp < pFontTable + tFontTableRecords;
<a name="l00394"></a>00394 pTmp++) {
<a name="l00395"></a>00395 DBG_DEC(pTmp->ucWordFontNumber);
<a name="l00396"></a>00396 DBG_HEX(pTmp->usFontStyle);
<a name="l00397"></a>00397 DBG_MSG(pTmp->szWordFontname);
<a name="l00398"></a>00398 DBG_MSG(pTmp->szOurFontname);
<a name="l00399"></a>00399 }
<a name="l00400"></a>00400 <span class="preprocessor">#endif </span><span class="comment">/* DEBUG */</span>
<a name="l00401"></a>00401 } <span class="comment">/* end of vMinimizeFontTable */</span>
<a name="l00402"></a>00402
<a name="l00403"></a>00403 <span class="comment">/*</span>
<a name="l00404"></a>00404 <span class="comment"> * bReadFontFile - read and check a line from the font translation file</span>
<a name="l00405"></a>00405 <span class="comment"> *</span>
<a name="l00406"></a>00406 <span class="comment"> * returns TRUE when a correct line has been read, otherwise FALSE</span>
<a name="l00407"></a>00407 <span class="comment"> */</span>
<a name="l00408"></a>00408 <span class="keyword">static</span> BOOL
<a name="l00409"></a>00409 bReadFontFile(FILE *pFontTableFile, <span class="keywordtype">char</span> *szWordFont,
<a name="l00410"></a>00410 <span class="keywordtype">int</span> *piItalic, <span class="keywordtype">int</span> *piBold, <span class="keywordtype">char</span> *szOurFont, <span class="keywordtype">int</span> *piSpecial)
<a name="l00411"></a>00411 {
<a name="l00412"></a>00412 <span class="keywordtype">char</span> *pcTmp;
<a name="l00413"></a>00413 <span class="keywordtype">int</span> iFields;
<a name="l00414"></a>00414 <span class="keywordtype">char</span> szLine[FONT_LINE_LENGTH];
<a name="l00415"></a>00415
<a name="l00416"></a>00416 fail(szWordFont == NULL || szOurFont == NULL);
<a name="l00417"></a>00417 fail(piItalic == NULL || piBold == NULL || piSpecial == NULL);
<a name="l00418"></a>00418
<a name="l00419"></a>00419 <span class="keywordflow">while</span> (fgets(szLine, (<span class="keywordtype">int</span>)<span class="keyword">sizeof</span>(szLine), pFontTableFile) != NULL) {
<a name="l00420"></a>00420 <span class="keywordflow">if</span> (szLine[0] == <span class="charliteral">'#'</span> ||
<a name="l00421"></a>00421 szLine[0] == <span class="charliteral">'\n'</span> ||
<a name="l00422"></a>00422 szLine[0] == <span class="charliteral">'\r'</span>) {
<a name="l00423"></a>00423 <span class="keywordflow">continue</span>;
<a name="l00424"></a>00424 }
<a name="l00425"></a>00425 iFields = sscanf(szLine, <span class="stringliteral">"%[^,],%d,%d,%1s%[^,],%d"</span>,
<a name="l00426"></a>00426 szWordFont, piItalic, piBold,
<a name="l00427"></a>00427 &szOurFont[0], &szOurFont[1], piSpecial);
<a name="l00428"></a>00428 <span class="keywordflow">if</span> (iFields != 6) {
<a name="l00429"></a>00429 pcTmp = strchr(szLine, <span class="charliteral">'\r'</span>);
<a name="l00430"></a>00430 <span class="keywordflow">if</span> (pcTmp != NULL) {
<a name="l00431"></a>00431 *pcTmp = <span class="charliteral">'\0'</span>;
<a name="l00432"></a>00432 }
<a name="l00433"></a>00433 pcTmp = strchr(szLine, <span class="charliteral">'\n'</span>);
<a name="l00434"></a>00434 <span class="keywordflow">if</span> (pcTmp != NULL) {
<a name="l00435"></a>00435 *pcTmp = <span class="charliteral">'\0'</span>;
<a name="l00436"></a>00436 }
<a name="l00437"></a>00437 DBG_DEC(iFields);
<a name="l00438"></a>00438 werr(0, <span class="stringliteral">"Syntax error in: '%s'"</span>, szLine);
<a name="l00439"></a>00439 <span class="keywordflow">continue</span>;
<a name="l00440"></a>00440 }
<a name="l00441"></a>00441 <span class="keywordflow">if</span> (strlen(szWordFont) >=
<a name="l00442"></a>00442 <span class="keyword">sizeof</span>(pFontTable[0].szWordFontname)) {
<a name="l00443"></a>00443 werr(0, <span class="stringliteral">"Word fontname too long: '%s'"</span>, szWordFont);
<a name="l00444"></a>00444 <span class="keywordflow">continue</span>;
<a name="l00445"></a>00445 }
<a name="l00446"></a>00446 <span class="keywordflow">if</span> (strlen(szOurFont) >=
<a name="l00447"></a>00447 <span class="keyword">sizeof</span>(pFontTable[0].szOurFontname)) {
<a name="l00448"></a>00448 werr(0, <span class="stringliteral">"Local fontname too long: '%s'"</span>, szOurFont);
<a name="l00449"></a>00449 <span class="keywordflow">continue</span>;
<a name="l00450"></a>00450 }
<a name="l00451"></a>00451 <span class="comment">/* The current line passed all the tests */</span>
<a name="l00452"></a>00452 <span class="keywordflow">return</span> TRUE;
<a name="l00453"></a>00453 }
<a name="l00454"></a>00454 <span class="keywordflow">return</span> FALSE;
<a name="l00455"></a>00455 } <span class="comment">/* end of bReadFontFile */</span>
<a name="l00456"></a>00456
<a name="l00457"></a>00457 <span class="comment">/*</span>
<a name="l00458"></a>00458 <span class="comment"> * vCreate0FontTable - create a font table from Word for DOS</span>
<a name="l00459"></a>00459 <span class="comment"> */</span>
<a name="l00460"></a>00460 <span class="keywordtype">void</span>
<a name="l00461"></a>00461 vCreate0FontTable(<span class="keywordtype">void</span>)
<a name="l00462"></a>00462 {
<a name="l00463"></a>00463 FILE *pFontTableFile;
<a name="l00464"></a>00464 font_table_type *pTmp;
<a name="l00465"></a>00465 UCHAR *aucFont;
<a name="l00466"></a>00466 <span class="keywordtype">int</span> iBold, iItalic, iSpecial, iEmphasis, iFtc;
<a name="l00467"></a>00467 UCHAR ucPrq, ucFf, ucFFN;
<a name="l00468"></a>00468 <span class="keywordtype">char</span> szWordFont[FONT_LINE_LENGTH], szOurFont[FONT_LINE_LENGTH];
<a name="l00469"></a>00469
<a name="l00470"></a>00470 tFontTableRecords = 0;
<a name="l00471"></a>00471 pFontTable = xfree(pFontTable);
<a name="l00472"></a>00472
<a name="l00473"></a>00473 pFontTableFile = pOpenFontTableFile();
<a name="l00474"></a>00474 <span class="keywordflow">if</span> (pFontTableFile == NULL) {
<a name="l00475"></a>00475 <span class="comment">/* No translation table file, no translation table */</span>
<a name="l00476"></a>00476 <span class="keywordflow">return</span>;
<a name="l00477"></a>00477 }
<a name="l00478"></a>00478
<a name="l00479"></a>00479 <span class="comment">/* Get the maximum number of entries in the font table */</span>
<a name="l00480"></a>00480 tFontTableRecords = 64;
<a name="l00481"></a>00481 tFontTableRecords *= 4; <span class="comment">/* Plain, Bold, Italic and Bold/italic */</span>
<a name="l00482"></a>00482 tFontTableRecords++; <span class="comment">/* One extra for the table-font */</span>
<a name="l00483"></a>00483 vCreateFontTable();
<a name="l00484"></a>00484
<a name="l00485"></a>00485 <span class="comment">/* Read the font translation file */</span>
<a name="l00486"></a>00486 iItalic = 0;
<a name="l00487"></a>00487 iBold = 0;
<a name="l00488"></a>00488 iSpecial = 0;
<a name="l00489"></a>00489 <span class="keywordflow">while</span> (bReadFontFile(pFontTableFile, szWordFont,
<a name="l00490"></a>00490 &iItalic, &iBold, szOurFont, &iSpecial)) {
<a name="l00491"></a>00491 iEmphasis = 0;
<a name="l00492"></a>00492 <span class="keywordflow">if</span> (iBold != 0) {
<a name="l00493"></a>00493 iEmphasis++;
<a name="l00494"></a>00494 }
<a name="l00495"></a>00495 <span class="keywordflow">if</span> (iItalic != 0) {
<a name="l00496"></a>00496 iEmphasis += 2;
<a name="l00497"></a>00497 }
<a name="l00498"></a>00498 <span class="keywordflow">for</span> (iFtc = 0, pTmp = pFontTable + iEmphasis;
<a name="l00499"></a>00499 pTmp < pFontTable + tFontTableRecords;
<a name="l00500"></a>00500 iFtc++, pTmp += 4) {
<a name="l00501"></a>00501 <span class="keywordflow">if</span> (iFtc >= 16 && iFtc <= 55) {
<a name="l00502"></a>00502 ucPrq = PITCH_VARIABLE;
<a name="l00503"></a>00503 ucFf = FAMILY_ROMAN;
<a name="l00504"></a>00504 aucFont = (UCHAR *)<span class="stringliteral">"Times"</span>;
<a name="l00505"></a>00505 } <span class="keywordflow">else</span> {
<a name="l00506"></a>00506 ucPrq = PITCH_FIXED;
<a name="l00507"></a>00507 ucFf = FAMILY_MODERN;
<a name="l00508"></a>00508 aucFont = (UCHAR *)<span class="stringliteral">"Courier"</span>;
<a name="l00509"></a>00509 }
<a name="l00510"></a>00510 ucFFN = (ucFf << 4) | ucPrq;
<a name="l00511"></a>00511 vFontname2Table(aucFont, NULL, 1, iEmphasis,
<a name="l00512"></a>00512 ucFFN, szWordFont, szOurFont, pTmp);
<a name="l00513"></a>00513 }
<a name="l00514"></a>00514 }
<a name="l00515"></a>00515 (void)fclose(pFontTableFile);
<a name="l00516"></a>00516 vMinimizeFontTable();
<a name="l00517"></a>00517 } <span class="comment">/* end of vCreate0FontTable */</span>
<a name="l00518"></a>00518
<a name="l00519"></a>00519 <span class="comment">/*</span>
<a name="l00520"></a>00520 <span class="comment"> * vCreate2FontTable - create a font table from WinWord 1/2</span>
<a name="l00521"></a>00521 <span class="comment"> */</span>
<a name="l00522"></a>00522 <span class="keywordtype">void</span>
<a name="l00523"></a>00523 vCreate2FontTable(FILE *pFile, <span class="keywordtype">int</span> iWordVersion, <span class="keyword">const</span> UCHAR *aucHeader)
<a name="l00524"></a>00524 {
<a name="l00525"></a>00525 FILE *pFontTableFile;
<a name="l00526"></a>00526 font_table_type *pTmp;
<a name="l00527"></a>00527 UCHAR *aucFont;
<a name="l00528"></a>00528 UCHAR *aucBuffer;
<a name="l00529"></a>00529 ULONG ulBeginFontInfo;
<a name="l00530"></a>00530 <span class="keywordtype">size_t</span> tFontInfoLen;
<a name="l00531"></a>00531 <span class="keywordtype">int</span> iPos, iOff, iRecLen;
<a name="l00532"></a>00532 <span class="keywordtype">int</span> iBold, iItalic, iSpecial, iEmphasis;
<a name="l00533"></a>00533 UCHAR ucFFN;
<a name="l00534"></a>00534 <span class="keywordtype">char</span> szWordFont[FONT_LINE_LENGTH], szOurFont[FONT_LINE_LENGTH];
<a name="l00535"></a>00535
<a name="l00536"></a>00536 fail(pFile == NULL || aucHeader == NULL);
<a name="l00537"></a>00537 fail(iWordVersion != 1 && iWordVersion != 2);
<a name="l00538"></a>00538
<a name="l00539"></a>00539 tFontTableRecords = 0;
<a name="l00540"></a>00540 pFontTable = xfree(pFontTable);
<a name="l00541"></a>00541
<a name="l00542"></a>00542 pFontTableFile = pOpenFontTableFile();
<a name="l00543"></a>00543 <span class="keywordflow">if</span> (pFontTableFile == NULL) {
<a name="l00544"></a>00544 <span class="comment">/* No translation table file, no translation table */</span>
<a name="l00545"></a>00545 <span class="keywordflow">return</span>;
<a name="l00546"></a>00546 }
<a name="l00547"></a>00547
<a name="l00548"></a>00548 ulBeginFontInfo = ulGetLong(0xb2, aucHeader); <span class="comment">/* fcSttbfffn */</span>
<a name="l00549"></a>00549 DBG_HEX(ulBeginFontInfo);
<a name="l00550"></a>00550 tFontInfoLen = (size_t)usGetWord(0xb6, aucHeader); <span class="comment">/* cbSttbfffn */</span>
<a name="l00551"></a>00551 DBG_DEC(tFontInfoLen);
<a name="l00552"></a>00552
<a name="l00553"></a>00553 <span class="keywordflow">if</span> (ulBeginFontInfo > (ULONG)LONG_MAX || tFontInfoLen == 0) {
<a name="l00554"></a>00554 <span class="comment">/* Don't ask me why this is needed */</span>
<a name="l00555"></a>00555 DBG_HEX_C(tFontInfoLen != 0, ulBeginFontInfo);
<a name="l00556"></a>00556 (void)fclose(pFontTableFile);
<a name="l00557"></a>00557 <span class="keywordflow">return</span>;
<a name="l00558"></a>00558 }
<a name="l00559"></a>00559
<a name="l00560"></a>00560 aucBuffer = xmalloc(tFontInfoLen);
<a name="l00561"></a>00561 <span class="keywordflow">if</span> (!bReadBytes(aucBuffer, tFontInfoLen, ulBeginFontInfo, pFile)) {
<a name="l00562"></a>00562 aucBuffer = xfree(aucBuffer);
<a name="l00563"></a>00563 (void)fclose(pFontTableFile);
<a name="l00564"></a>00564 <span class="keywordflow">return</span>;
<a name="l00565"></a>00565 }
<a name="l00566"></a>00566 NO_DBG_PRINT_BLOCK(aucBuffer, tFontInfoLen);
<a name="l00567"></a>00567 DBG_DEC(usGetWord(0, aucBuffer));
<a name="l00568"></a>00568
<a name="l00569"></a>00569 <span class="comment">/* Compute the maximum number of entries in the font table */</span>
<a name="l00570"></a>00570 <span class="keywordflow">if</span> (iWordVersion == 1) {
<a name="l00571"></a>00571 fail(tFontInfoLen < 2);
<a name="l00572"></a>00572 <span class="comment">/* WinWord 1 has three implicit fonts */</span>
<a name="l00573"></a>00573 tFontTableRecords = 3;
<a name="l00574"></a>00574 iOff = 2;
<a name="l00575"></a>00575 } <span class="keywordflow">else</span> {
<a name="l00576"></a>00576 fail(tFontInfoLen < 6);
<a name="l00577"></a>00577 <span class="comment">/* WinWord 2 and up have no implicit fonts */</span>
<a name="l00578"></a>00578 tFontTableRecords = 0;
<a name="l00579"></a>00579 iOff = 3;
<a name="l00580"></a>00580 }
<a name="l00581"></a>00581 iPos = 2;
<a name="l00582"></a>00582 <span class="keywordflow">while</span> (iPos + iOff < (<span class="keywordtype">int</span>)tFontInfoLen) {
<a name="l00583"></a>00583 iRecLen = (int)ucGetByte(iPos, aucBuffer);
<a name="l00584"></a>00584 NO_DBG_DEC(iRecLen);
<a name="l00585"></a>00585 NO_DBG_MSG(aucBuffer + iPos + iOff);
<a name="l00586"></a>00586 iPos += iRecLen + 1;
<a name="l00587"></a>00587 tFontTableRecords++;
<a name="l00588"></a>00588 }
<a name="l00589"></a>00589 tFontTableRecords *= 4; <span class="comment">/* Plain, Bold, Italic and Bold/Italic */</span>
<a name="l00590"></a>00590 tFontTableRecords++; <span class="comment">/* One extra for the table-font */</span>
<a name="l00591"></a>00591 vCreateFontTable();
<a name="l00592"></a>00592
<a name="l00593"></a>00593 <span class="comment">/* Add the tree implicit fonts (in four variations) */</span>
<a name="l00594"></a>00594 <span class="keywordflow">if</span> (iWordVersion == 1) {
<a name="l00595"></a>00595 fail(tFontTableRecords < 13);
<a name="l00596"></a>00596 vFontname2Table((UCHAR *)<span class="stringliteral">"Tms Rmn"</span>, NULL, 1, 0,
<a name="l00597"></a>00597 (UCHAR)((FAMILY_ROMAN << 4) | PITCH_VARIABLE),
<a name="l00598"></a>00598 <span class="stringliteral">"*"</span>, <span class="stringliteral">"Times-Roman"</span>, pFontTable + 0);
<a name="l00599"></a>00599 vFontname2Table((UCHAR *)<span class="stringliteral">"Tms Rmn"</span>, NULL, 1, 1,
<a name="l00600"></a>00600 (UCHAR)((FAMILY_ROMAN << 4) | PITCH_VARIABLE),
<a name="l00601"></a>00601 <span class="stringliteral">"*"</span>, <span class="stringliteral">"Times-Bold"</span>, pFontTable + 1);
<a name="l00602"></a>00602 vFontname2Table((UCHAR *)<span class="stringliteral">"Tms Rmn"</span>, NULL, 1, 2,
<a name="l00603"></a>00603 (UCHAR)((FAMILY_ROMAN << 4) | PITCH_VARIABLE),
<a name="l00604"></a>00604 <span class="stringliteral">"*"</span>, <span class="stringliteral">"Times-Italic"</span>, pFontTable + 2);
<a name="l00605"></a>00605 vFontname2Table((UCHAR *)<span class="stringliteral">"Tms Rmn"</span>, NULL, 1, 3,
<a name="l00606"></a>00606 (UCHAR)((FAMILY_ROMAN << 4) | PITCH_VARIABLE),
<a name="l00607"></a>00607 <span class="stringliteral">"*"</span>, <span class="stringliteral">"Times-BoldItalic"</span>, pFontTable + 3);
<a name="l00608"></a>00608 vFontname2Table((UCHAR *)<span class="stringliteral">"Symbol"</span>, NULL, 1, 0,
<a name="l00609"></a>00609 (UCHAR)((FAMILY_ROMAN << 4) | PITCH_VARIABLE),
<a name="l00610"></a>00610 <span class="stringliteral">"*"</span>, <span class="stringliteral">"Times-Roman"</span>, pFontTable + 4);
<a name="l00611"></a>00611 vFontname2Table((UCHAR *)<span class="stringliteral">"Symbol"</span>, NULL, 1, 1,
<a name="l00612"></a>00612 (UCHAR)((FAMILY_ROMAN << 4) | PITCH_VARIABLE),
<a name="l00613"></a>00613 <span class="stringliteral">"*"</span>, <span class="stringliteral">"Times-Bold"</span>, pFontTable + 5);
<a name="l00614"></a>00614 vFontname2Table((UCHAR *)<span class="stringliteral">"Symbol"</span>, NULL, 1, 2,
<a name="l00615"></a>00615 (UCHAR)((FAMILY_ROMAN << 4) | PITCH_VARIABLE),
<a name="l00616"></a>00616 <span class="stringliteral">"*"</span>, <span class="stringliteral">"Times-Italic"</span>, pFontTable + 6);
<a name="l00617"></a>00617 vFontname2Table((UCHAR *)<span class="stringliteral">"Symbol"</span>, NULL, 1, 3,
<a name="l00618"></a>00618 (UCHAR)((FAMILY_ROMAN << 4) | PITCH_VARIABLE),
<a name="l00619"></a>00619 <span class="stringliteral">"*"</span>, <span class="stringliteral">"Times-BoldItalic"</span>, pFontTable + 7);
<a name="l00620"></a>00620 vFontname2Table((UCHAR *)<span class="stringliteral">"Helv"</span>, NULL, 1, 0,
<a name="l00621"></a>00621 (UCHAR)((FAMILY_SWISS << 4) | PITCH_VARIABLE),
<a name="l00622"></a>00622 <span class="stringliteral">"*"</span>, <span class="stringliteral">"Helvetica"</span>, pFontTable + 8);
<a name="l00623"></a>00623 vFontname2Table((UCHAR *)<span class="stringliteral">"Helv"</span>, NULL, 1, 1,
<a name="l00624"></a>00624 (UCHAR)((FAMILY_SWISS << 4) | PITCH_VARIABLE),
<a name="l00625"></a>00625 <span class="stringliteral">"*"</span>, <span class="stringliteral">"Helvetica-Bold"</span>, pFontTable + 9);
<a name="l00626"></a>00626 vFontname2Table((UCHAR *)<span class="stringliteral">"Helv"</span>, NULL, 1, 2,
<a name="l00627"></a>00627 (UCHAR)((FAMILY_SWISS << 4) | PITCH_VARIABLE),
<a name="l00628"></a>00628 <span class="stringliteral">"*"</span>, <span class="stringliteral">"Helvetica-Oblique"</span>, pFontTable + 10);
<a name="l00629"></a>00629 vFontname2Table((UCHAR *)<span class="stringliteral">"Helv"</span>, NULL, 1, 3,
<a name="l00630"></a>00630 (UCHAR)((FAMILY_SWISS << 4) | PITCH_VARIABLE),
<a name="l00631"></a>00631 <span class="stringliteral">"*"</span>, <span class="stringliteral">"Helvetica-BoldOblique"</span>, pFontTable + 11);
<a name="l00632"></a>00632 }
<a name="l00633"></a>00633
<a name="l00634"></a>00634 <span class="comment">/* Read the font translation file */</span>
<a name="l00635"></a>00635 iItalic = 0;
<a name="l00636"></a>00636 iBold = 0;
<a name="l00637"></a>00637 iSpecial = 0;
<a name="l00638"></a>00638 <span class="keywordflow">while</span> (bReadFontFile(pFontTableFile, szWordFont,
<a name="l00639"></a>00639 &iItalic, &iBold, szOurFont, &iSpecial)) {
<a name="l00640"></a>00640 iEmphasis = 0;
<a name="l00641"></a>00641 <span class="keywordflow">if</span> (iBold != 0) {
<a name="l00642"></a>00642 iEmphasis++;
<a name="l00643"></a>00643 }
<a name="l00644"></a>00644 <span class="keywordflow">if</span> (iItalic != 0) {
<a name="l00645"></a>00645 iEmphasis += 2;
<a name="l00646"></a>00646 }
<a name="l00647"></a>00647 pTmp = pFontTable + iEmphasis;
<a name="l00648"></a>00648 iPos = 2;
<a name="l00649"></a>00649 <span class="keywordflow">while</span> (iPos + iOff < (<span class="keywordtype">int</span>)tFontInfoLen) {
<a name="l00650"></a>00650 iRecLen = (int)ucGetByte(iPos, aucBuffer);
<a name="l00651"></a>00651 ucFFN = ucGetByte(iPos + 1, aucBuffer);
<a name="l00652"></a>00652 aucFont = aucBuffer + iPos + iOff;
<a name="l00653"></a>00653 vFontname2Table(aucFont, NULL, 1, iEmphasis,
<a name="l00654"></a>00654 ucFFN, szWordFont, szOurFont, pTmp);
<a name="l00655"></a>00655 pTmp += 4;
<a name="l00656"></a>00656 iPos += iRecLen + 1;
<a name="l00657"></a>00657 }
<a name="l00658"></a>00658 }
<a name="l00659"></a>00659 (void)fclose(pFontTableFile);
<a name="l00660"></a>00660 aucBuffer = xfree(aucBuffer);
<a name="l00661"></a>00661 vMinimizeFontTable();
<a name="l00662"></a>00662 } <span class="comment">/* end of vCreate2FontTable */</span>
<a name="l00663"></a>00663
<a name="l00664"></a>00664 <span class="comment">/*</span>
<a name="l00665"></a>00665 <span class="comment"> * vCreate6FontTable - create a font table from Word 6/7</span>
<a name="l00666"></a>00666 <span class="comment"> */</span>
<a name="l00667"></a>00667 <span class="keywordtype">void</span>
<a name="l00668"></a>00668 vCreate6FontTable(FILE *pFile, ULONG ulStartBlock,
<a name="l00669"></a>00669 <span class="keyword">const</span> ULONG *aulBBD, <span class="keywordtype">size_t</span> tBBDLen,
<a name="l00670"></a>00670 <span class="keyword">const</span> UCHAR *aucHeader)
<a name="l00671"></a>00671 {
<a name="l00672"></a>00672 FILE *pFontTableFile;
<a name="l00673"></a>00673 font_table_type *pTmp;
<a name="l00674"></a>00674 UCHAR *aucFont, *aucAltFont;
<a name="l00675"></a>00675 UCHAR *aucBuffer;
<a name="l00676"></a>00676 ULONG ulBeginFontInfo;
<a name="l00677"></a>00677 <span class="keywordtype">size_t</span> tFontInfoLen;
<a name="l00678"></a>00678 <span class="keywordtype">int</span> iPos, iRecLen, iOffsetAltName;
<a name="l00679"></a>00679 <span class="keywordtype">int</span> iBold, iItalic, iSpecial, iEmphasis;
<a name="l00680"></a>00680 UCHAR ucFFN;
<a name="l00681"></a>00681 <span class="keywordtype">char</span> szWordFont[FONT_LINE_LENGTH], szOurFont[FONT_LINE_LENGTH];
<a name="l00682"></a>00682
<a name="l00683"></a>00683 fail(pFile == NULL || aucHeader == NULL);
<a name="l00684"></a>00684 fail(ulStartBlock > MAX_BLOCKNUMBER && ulStartBlock != END_OF_CHAIN);
<a name="l00685"></a>00685 fail(aulBBD == NULL);
<a name="l00686"></a>00686
<a name="l00687"></a>00687 tFontTableRecords = 0;
<a name="l00688"></a>00688 pFontTable = xfree(pFontTable);
<a name="l00689"></a>00689
<a name="l00690"></a>00690 pFontTableFile = pOpenFontTableFile();
<a name="l00691"></a>00691 <span class="keywordflow">if</span> (pFontTableFile == NULL) {
<a name="l00692"></a>00692 <span class="comment">/* No translation table file, no translation table */</span>
<a name="l00693"></a>00693 <span class="keywordflow">return</span>;
<a name="l00694"></a>00694 }
<a name="l00695"></a>00695
<a name="l00696"></a>00696 ulBeginFontInfo = ulGetLong(0xd0, aucHeader); <span class="comment">/* fcSttbfffn */</span>
<a name="l00697"></a>00697 DBG_HEX(ulBeginFontInfo);
<a name="l00698"></a>00698 tFontInfoLen = (size_t)ulGetLong(0xd4, aucHeader); <span class="comment">/* lcbSttbfffn */</span>
<a name="l00699"></a>00699 DBG_DEC(tFontInfoLen);
<a name="l00700"></a>00700 fail(tFontInfoLen < 9);
<a name="l00701"></a>00701
<a name="l00702"></a>00702 aucBuffer = xmalloc(tFontInfoLen);
<a name="l00703"></a>00703 <span class="keywordflow">if</span> (!bReadBuffer(pFile, ulStartBlock,
<a name="l00704"></a>00704 aulBBD, tBBDLen, BIG_BLOCK_SIZE,
<a name="l00705"></a>00705 aucBuffer, ulBeginFontInfo, tFontInfoLen)) {
<a name="l00706"></a>00706 aucBuffer = xfree(aucBuffer);
<a name="l00707"></a>00707 (void)fclose(pFontTableFile);
<a name="l00708"></a>00708 <span class="keywordflow">return</span>;
<a name="l00709"></a>00709 }
<a name="l00710"></a>00710 DBG_DEC(usGetWord(0, aucBuffer));
<a name="l00711"></a>00711
<a name="l00712"></a>00712 <span class="comment">/* Compute the maximum number of entries in the font table */</span>
<a name="l00713"></a>00713 tFontTableRecords = 0;
<a name="l00714"></a>00714 iPos = 2;
<a name="l00715"></a>00715 <span class="keywordflow">while</span> (iPos + 6 < (<span class="keywordtype">int</span>)tFontInfoLen) {
<a name="l00716"></a>00716 iRecLen = (int)ucGetByte(iPos, aucBuffer);
<a name="l00717"></a>00717 NO_DBG_DEC(iRecLen);
<a name="l00718"></a>00718 iOffsetAltName = (int)ucGetByte(iPos + 5, aucBuffer);
<a name="l00719"></a>00719 NO_DBG_MSG(aucBuffer + iPos + 6);
<a name="l00720"></a>00720 NO_DBG_MSG_C(iOffsetAltName > 0,
<a name="l00721"></a>00721 aucBuffer + iPos + 6 + iOffsetAltName);
<a name="l00722"></a>00722 iPos += iRecLen + 1;
<a name="l00723"></a>00723 tFontTableRecords++;
<a name="l00724"></a>00724 }
<a name="l00725"></a>00725 tFontTableRecords *= 4; <span class="comment">/* Plain, Bold, Italic and Bold/italic */</span>
<a name="l00726"></a>00726 tFontTableRecords++; <span class="comment">/* One extra for the table-font */</span>
<a name="l00727"></a>00727 vCreateFontTable();
<a name="l00728"></a>00728
<a name="l00729"></a>00729 <span class="comment">/* Read the font translation file */</span>
<a name="l00730"></a>00730 iItalic = 0;
<a name="l00731"></a>00731 iBold = 0;
<a name="l00732"></a>00732 iSpecial = 0;
<a name="l00733"></a>00733 <span class="keywordflow">while</span> (bReadFontFile(pFontTableFile, szWordFont,
<a name="l00734"></a>00734 &iItalic, &iBold, szOurFont, &iSpecial)) {
<a name="l00735"></a>00735 iEmphasis = 0;
<a name="l00736"></a>00736 <span class="keywordflow">if</span> (iBold != 0) {
<a name="l00737"></a>00737 iEmphasis++;
<a name="l00738"></a>00738 }
<a name="l00739"></a>00739 <span class="keywordflow">if</span> (iItalic != 0) {
<a name="l00740"></a>00740 iEmphasis += 2;
<a name="l00741"></a>00741 }
<a name="l00742"></a>00742 pTmp = pFontTable + iEmphasis;
<a name="l00743"></a>00743 iPos = 2;
<a name="l00744"></a>00744 <span class="keywordflow">while</span> (iPos + 6 < (<span class="keywordtype">int</span>)tFontInfoLen) {
<a name="l00745"></a>00745 iRecLen = (int)ucGetByte(iPos, aucBuffer);
<a name="l00746"></a>00746 ucFFN = ucGetByte(iPos + 1, aucBuffer);
<a name="l00747"></a>00747 aucFont = aucBuffer + iPos + 6;
<a name="l00748"></a>00748 iOffsetAltName = (int)ucGetByte(iPos + 5, aucBuffer);
<a name="l00749"></a>00749 <span class="keywordflow">if</span> (iOffsetAltName <= 0) {
<a name="l00750"></a>00750 aucAltFont = NULL;
<a name="l00751"></a>00751 } <span class="keywordflow">else</span> {
<a name="l00752"></a>00752 aucAltFont = aucFont + iOffsetAltName;
<a name="l00753"></a>00753 NO_DBG_MSG(aucFont);
<a name="l00754"></a>00754 NO_DBG_MSG(aucAltFont);
<a name="l00755"></a>00755 }
<a name="l00756"></a>00756 vFontname2Table(aucFont, aucAltFont, 1, iEmphasis,
<a name="l00757"></a>00757 ucFFN, szWordFont, szOurFont, pTmp);
<a name="l00758"></a>00758 pTmp += 4;
<a name="l00759"></a>00759 iPos += iRecLen + 1;
<a name="l00760"></a>00760 }
<a name="l00761"></a>00761 }
<a name="l00762"></a>00762 (void)fclose(pFontTableFile);
<a name="l00763"></a>00763 aucBuffer = xfree(aucBuffer);
<a name="l00764"></a>00764 vMinimizeFontTable();
<a name="l00765"></a>00765 } <span class="comment">/* end of vCreate6FontTable */</span>
<a name="l00766"></a>00766
<a name="l00767"></a>00767 <span class="comment">/*</span>
<a name="l00768"></a>00768 <span class="comment"> * vCreate8FontTable - create a font table from Word 8/9/10</span>
<a name="l00769"></a>00769 <span class="comment"> */</span>
<a name="l00770"></a>00770 <span class="keywordtype">void</span>
<a name="l00771"></a>00771 vCreate8FontTable(FILE *pFile, <span class="keyword">const</span> pps_info_type *pPPS,
<a name="l00772"></a>00772 <span class="keyword">const</span> ULONG *aulBBD, <span class="keywordtype">size_t</span> tBBDLen,
<a name="l00773"></a>00773 <span class="keyword">const</span> ULONG *aulSBD, <span class="keywordtype">size_t</span> tSBDLen,
<a name="l00774"></a>00774 <span class="keyword">const</span> UCHAR *aucHeader)
<a name="l00775"></a>00775 {
<a name="l00776"></a>00776 FILE *pFontTableFile;
<a name="l00777"></a>00777 font_table_type *pTmp;
<a name="l00778"></a>00778 <span class="keyword">const</span> ULONG *aulBlockDepot;
<a name="l00779"></a>00779 UCHAR *aucFont, *aucAltFont;
<a name="l00780"></a>00780 UCHAR *aucBuffer;
<a name="l00781"></a>00781 ULONG ulBeginFontInfo;
<a name="l00782"></a>00782 <span class="keywordtype">size_t</span> tFontInfoLen, tBlockDepotLen, tBlockSize;
<a name="l00783"></a>00783 <span class="keywordtype">int</span> iPos, iRecLen, iOffsetAltName;
<a name="l00784"></a>00784 <span class="keywordtype">int</span> iBold, iItalic, iSpecial, iEmphasis;
<a name="l00785"></a>00785 UCHAR ucFFN;
<a name="l00786"></a>00786 <span class="keywordtype">char</span> szWordFont[FONT_LINE_LENGTH], szOurFont[FONT_LINE_LENGTH];
<a name="l00787"></a>00787
<a name="l00788"></a>00788 fail(pFile == NULL || pPPS == NULL || aucHeader == NULL);
<a name="l00789"></a>00789 fail(aulBBD == NULL || aulSBD == NULL);
<a name="l00790"></a>00790
<a name="l00791"></a>00791 tFontTableRecords = 0;
<a name="l00792"></a>00792 pFontTable = xfree(pFontTable);
<a name="l00793"></a>00793
<a name="l00794"></a>00794 pFontTableFile = pOpenFontTableFile();
<a name="l00795"></a>00795 <span class="keywordflow">if</span> (pFontTableFile == NULL) {
<a name="l00796"></a>00796 <span class="comment">/* No translation table file, no translation table */</span>
<a name="l00797"></a>00797 <span class="keywordflow">return</span>;
<a name="l00798"></a>00798 }
<a name="l00799"></a>00799
<a name="l00800"></a>00800 ulBeginFontInfo = ulGetLong(0x112, aucHeader); <span class="comment">/* fcSttbfffn */</span>
<a name="l00801"></a>00801 DBG_HEX(ulBeginFontInfo);
<a name="l00802"></a>00802 tFontInfoLen = (size_t)ulGetLong(0x116, aucHeader); <span class="comment">/* lcbSttbfffn */</span>
<a name="l00803"></a>00803 DBG_DEC(tFontInfoLen);
<a name="l00804"></a>00804 fail(tFontInfoLen < 46);
<a name="l00805"></a>00805
<a name="l00806"></a>00806 DBG_DEC(pPPS->tTable.ulSB);
<a name="l00807"></a>00807 DBG_HEX(pPPS->tTable.ulSize);
<a name="l00808"></a>00808 <span class="keywordflow">if</span> (pPPS->tTable.ulSize == 0) {
<a name="l00809"></a>00809 DBG_MSG(<span class="stringliteral">"No fontname table"</span>);
<a name="l00810"></a>00810 (void)fclose(pFontTableFile);
<a name="l00811"></a>00811 <span class="keywordflow">return</span>;
<a name="l00812"></a>00812 }
<a name="l00813"></a>00813
<a name="l00814"></a>00814 <span class="keywordflow">if</span> (pPPS->tTable.ulSize < MIN_SIZE_FOR_BBD_USE) {
<a name="l00815"></a>00815 <span class="comment">/* Use the Small Block Depot */</span>
<a name="l00816"></a>00816 aulBlockDepot = aulSBD;
<a name="l00817"></a>00817 tBlockDepotLen = tSBDLen;
<a name="l00818"></a>00818 tBlockSize = SMALL_BLOCK_SIZE;
<a name="l00819"></a>00819 } <span class="keywordflow">else</span> {
<a name="l00820"></a>00820 <span class="comment">/* Use the Big Block Depot */</span>
<a name="l00821"></a>00821 aulBlockDepot = aulBBD;
<a name="l00822"></a>00822 tBlockDepotLen = tBBDLen;
<a name="l00823"></a>00823 tBlockSize = BIG_BLOCK_SIZE;
<a name="l00824"></a>00824 }
<a name="l00825"></a>00825 aucBuffer = xmalloc(tFontInfoLen);
<a name="l00826"></a>00826 <span class="keywordflow">if</span> (!bReadBuffer(pFile, pPPS->tTable.ulSB,
<a name="l00827"></a>00827 aulBlockDepot, tBlockDepotLen, tBlockSize,
<a name="l00828"></a>00828 aucBuffer, ulBeginFontInfo, tFontInfoLen)) {
<a name="l00829"></a>00829 aucBuffer = xfree(aucBuffer);
<a name="l00830"></a>00830 (void)fclose(pFontTableFile);
<a name="l00831"></a>00831 <span class="keywordflow">return</span>;
<a name="l00832"></a>00832 }
<a name="l00833"></a>00833 NO_DBG_PRINT_BLOCK(aucBuffer, tFontInfoLen);
<a name="l00834"></a>00834
<a name="l00835"></a>00835 <span class="comment">/* Get the maximum number of entries in the font table */</span>
<a name="l00836"></a>00836 tFontTableRecords = (size_t)usGetWord(0, aucBuffer);
<a name="l00837"></a>00837 tFontTableRecords *= 4; <span class="comment">/* Plain, Bold, Italic and Bold/italic */</span>
<a name="l00838"></a>00838 tFontTableRecords++; <span class="comment">/* One extra for the table-font */</span>
<a name="l00839"></a>00839 vCreateFontTable();
<a name="l00840"></a>00840
<a name="l00841"></a>00841 <span class="comment">/* Read the font translation file */</span>
<a name="l00842"></a>00842 iItalic = 0;
<a name="l00843"></a>00843 iBold = 0;
<a name="l00844"></a>00844 iSpecial = 0;
<a name="l00845"></a>00845 <span class="keywordflow">while</span> (bReadFontFile(pFontTableFile, szWordFont,
<a name="l00846"></a>00846 &iItalic, &iBold, szOurFont, &iSpecial)) {
<a name="l00847"></a>00847 iEmphasis = 0;
<a name="l00848"></a>00848 <span class="keywordflow">if</span> (iBold != 0) {
<a name="l00849"></a>00849 iEmphasis++;
<a name="l00850"></a>00850 }
<a name="l00851"></a>00851 <span class="keywordflow">if</span> (iItalic != 0) {
<a name="l00852"></a>00852 iEmphasis += 2;
<a name="l00853"></a>00853 }
<a name="l00854"></a>00854 pTmp = pFontTable + iEmphasis;
<a name="l00855"></a>00855 iPos = 4;
<a name="l00856"></a>00856 <span class="keywordflow">while</span> (iPos + 40 < (<span class="keywordtype">int</span>)tFontInfoLen) {
<a name="l00857"></a>00857 iRecLen = (int)ucGetByte(iPos, aucBuffer);
<a name="l00858"></a>00858 ucFFN = ucGetByte(iPos + 1, aucBuffer);
<a name="l00859"></a>00859 aucFont = aucBuffer + iPos + 40;
<a name="l00860"></a>00860 iOffsetAltName = (int)unilen(aucFont);
<a name="l00861"></a>00861 <span class="keywordflow">if</span> (iPos + 40 + iOffsetAltName + 4 >= iRecLen) {
<a name="l00862"></a>00862 aucAltFont = NULL;
<a name="l00863"></a>00863 } <span class="keywordflow">else</span> {
<a name="l00864"></a>00864 aucAltFont = aucFont + iOffsetAltName + 2;
<a name="l00865"></a>00865 NO_DBG_UNICODE(aucFont);
<a name="l00866"></a>00866 NO_DBG_UNICODE(aucAltFont);
<a name="l00867"></a>00867 }
<a name="l00868"></a>00868 vFontname2Table(aucFont, aucAltFont, 2, iEmphasis,
<a name="l00869"></a>00869 ucFFN, szWordFont, szOurFont, pTmp);
<a name="l00870"></a>00870 pTmp += 4;
<a name="l00871"></a>00871 iPos += iRecLen + 1;
<a name="l00872"></a>00872 }
<a name="l00873"></a>00873 }
<a name="l00874"></a>00874 (void)fclose(pFontTableFile);
<a name="l00875"></a>00875 aucBuffer = xfree(aucBuffer);
<a name="l00876"></a>00876 vMinimizeFontTable();
<a name="l00877"></a>00877 } <span class="comment">/* end of vCreate8FontTable */</span>
<a name="l00878"></a>00878
<a name="l00879"></a>00879 <span class="comment">/*</span>
<a name="l00880"></a>00880 <span class="comment"> * Destroy the internal font table by freeing its memory</span>
<a name="l00881"></a>00881 <span class="comment"> */</span>
<a name="l00882"></a>00882 <span class="keywordtype">void</span>
<a name="l00883"></a>00883 vDestroyFontTable(<span class="keywordtype">void</span>)
<a name="l00884"></a>00884 {
<a name="l00885"></a>00885 DBG_MSG(<span class="stringliteral">"vDestroyFontTable"</span>);
<a name="l00886"></a>00886
<a name="l00887"></a>00887 tFontTableRecords = 0;
<a name="l00888"></a>00888 pFontTable = xfree(pFontTable);
<a name="l00889"></a>00889 } <span class="comment">/* end of vDestroyFontTable */</span>
<a name="l00890"></a>00890
<a name="l00891"></a>00891 <span class="comment">/*</span>
<a name="l00892"></a>00892 <span class="comment"> * pGetNextFontTableRecord</span>
<a name="l00893"></a>00893 <span class="comment"> *</span>
<a name="l00894"></a>00894 <span class="comment"> * returns the next record in the table or NULL if there is no next record</span>
<a name="l00895"></a>00895 <span class="comment"> */</span>
<a name="l00896"></a>00896 <span class="keyword">const</span> font_table_type *
<a name="l00897"></a>00897 pGetNextFontTableRecord(<span class="keyword">const</span> font_table_type *pRecordCurr)
<a name="l00898"></a>00898 {
<a name="l00899"></a>00899 <span class="keywordtype">size_t</span> tIndexCurr;
<a name="l00900"></a>00900
<a name="l00901"></a>00901 <span class="keywordflow">if</span> (pRecordCurr == NULL) {
<a name="l00902"></a>00902 <span class="comment">/* No current record, so start with the first one */</span>
<a name="l00903"></a>00903 <span class="keywordflow">return</span> &pFontTable[0];
<a name="l00904"></a>00904 }
<a name="l00905"></a>00905
<a name="l00906"></a>00906 <span class="keywordflow">if</span> (pRecordCurr < pFontTable ||
<a name="l00907"></a>00907 pRecordCurr >= pFontTable + tFontTableRecords) {
<a name="l00908"></a>00908 <span class="comment">/* Not a pointer in the array */</span>
<a name="l00909"></a>00909 DBG_HEX(pRecordCurr);
<a name="l00910"></a>00910 DBG_HEX(pFontTable);
<a name="l00911"></a>00911 <span class="keywordflow">return</span> NULL;
<a name="l00912"></a>00912 }
<a name="l00913"></a>00913
<a name="l00914"></a>00914 tIndexCurr = (size_t)(pRecordCurr - pFontTable);
<a name="l00915"></a>00915 <span class="keywordflow">if</span> (tIndexCurr + 1 < tFontTableRecords) {
<a name="l00916"></a>00916 <span class="comment">/* There is a next record, so return it */</span>
<a name="l00917"></a>00917 <span class="keywordflow">return</span> &pFontTable[tIndexCurr + 1];
<a name="l00918"></a>00918 }
<a name="l00919"></a>00919 <span class="comment">/* There is no next record */</span>
<a name="l00920"></a>00920 <span class="keywordflow">return</span> NULL;
<a name="l00921"></a>00921 } <span class="comment">/* end of pGetNextFontTableRecord */</span>
<a name="l00922"></a>00922
<a name="l00923"></a>00923 <span class="comment">/*</span>
<a name="l00924"></a>00924 <span class="comment"> * tGetFontTableLength</span>
<a name="l00925"></a>00925 <span class="comment"> *</span>
<a name="l00926"></a>00926 <span class="comment"> * returns the number of records in the internal font table</span>
<a name="l00927"></a>00927 <span class="comment"> */</span>
<a name="l00928"></a>00928 <span class="keywordtype">size_t</span>
<a name="l00929"></a>00929 tGetFontTableLength(<span class="keywordtype">void</span>)
<a name="l00930"></a>00930 {
<a name="l00931"></a>00931 <span class="keywordflow">return</span> tFontTableRecords;
<a name="l00932"></a>00932 } <span class="comment">/* end of tGetFontTableLength */</span>
<a name="l00933"></a>00933
<a name="l00934"></a>00934 <span class="preprocessor">#if !defined(__riscos)</span>
<a name="l00935"></a>00935 <span class="preprocessor"></span><span class="comment">/*</span>
<a name="l00936"></a>00936 <span class="comment"> * vCorrect4PDF - only include PDF default fonts</span>
<a name="l00937"></a>00937 <span class="comment"> */</span>
<a name="l00938"></a>00938 <span class="keyword">static</span> <span class="keywordtype">void</span>
<a name="l00939"></a>00939 vCorrect4PDF(<span class="keywordtype">void</span>)
<a name="l00940"></a>00940 {
<a name="l00941"></a>00941 font_table_type *pTmp;
<a name="l00942"></a>00942 <span class="keyword">const</span> <span class="keywordtype">char</span> *szOurFont;
<a name="l00943"></a>00943
<a name="l00944"></a>00944 <span class="keywordflow">for</span> (pTmp = pFontTable; pTmp < pFontTable + tFontTableRecords; pTmp++) {
<a name="l00945"></a>00945 <span class="keywordflow">if</span> (STRCEQ(pTmp->szOurFontname, FONT_MONOSPACED_PLAIN) ||
<a name="l00946"></a>00946 STRCEQ(pTmp->szOurFontname, FONT_MONOSPACED_BOLD) ||
<a name="l00947"></a>00947 STRCEQ(pTmp->szOurFontname, FONT_MONOSPACED_ITALIC) ||
<a name="l00948"></a>00948 STRCEQ(pTmp->szOurFontname, FONT_MONOSPACED_BOLDITALIC) ||
<a name="l00949"></a>00949 STRCEQ(pTmp->szOurFontname, FONT_SERIF_PLAIN) ||
<a name="l00950"></a>00950 STRCEQ(pTmp->szOurFontname, FONT_SERIF_BOLD) ||
<a name="l00951"></a>00951 STRCEQ(pTmp->szOurFontname, FONT_SERIF_ITALIC) ||
<a name="l00952"></a>00952 STRCEQ(pTmp->szOurFontname, FONT_SERIF_BOLDITALIC) ||
<a name="l00953"></a>00953 STRCEQ(pTmp->szOurFontname, FONT_SANS_SERIF_PLAIN) ||
<a name="l00954"></a>00954 STRCEQ(pTmp->szOurFontname, FONT_SANS_SERIF_BOLD) ||
<a name="l00955"></a>00955 STRCEQ(pTmp->szOurFontname, FONT_SANS_SERIF_ITALIC) ||
<a name="l00956"></a>00956 STRCEQ(pTmp->szOurFontname, FONT_SANS_SERIF_BOLDITALIC)) {
<a name="l00957"></a>00957 <span class="comment">/* Already a default font */</span>
<a name="l00958"></a>00958 <span class="keywordflow">continue</span>;
<a name="l00959"></a>00959 }
<a name="l00960"></a>00960 szOurFont =
<a name="l00961"></a>00961 szGetDefaultFont(pTmp->ucFFN, (<span class="keywordtype">int</span>)pTmp->ucEmphasis);
<a name="l00962"></a>00962 (void)strncpy(pTmp->szOurFontname, szOurFont,
<a name="l00963"></a>00963 <span class="keyword">sizeof</span>(pTmp->szOurFontname) - 1);
<a name="l00964"></a>00964 pTmp->szOurFontname[<span class="keyword">sizeof</span>(pTmp->szOurFontname) - 1] = <span class="charliteral">'\0'</span>;
<a name="l00965"></a>00965 }
<a name="l00966"></a>00966 } <span class="comment">/* end of vCorrect4PDF */</span>
<a name="l00967"></a>00967
<a name="l00968"></a>00968 <span class="comment">/*</span>
<a name="l00969"></a>00969 <span class="comment"> * vCorrect4CyrPS - only include monospaced fonts</span>
<a name="l00970"></a>00970 <span class="comment"> */</span>
<a name="l00971"></a>00971 <span class="keyword">static</span> <span class="keywordtype">void</span>
<a name="l00972"></a>00972 vCorrect4CyrPS(<span class="keywordtype">void</span>)
<a name="l00973"></a>00973 {
<a name="l00974"></a>00974 font_table_type *pTmp;
<a name="l00975"></a>00975 <span class="keyword">const</span> <span class="keywordtype">char</span> *szOurFont;
<a name="l00976"></a>00976 UCHAR ucFFN;
<a name="l00977"></a>00977
<a name="l00978"></a>00978 ucFFN = (FAMILY_UNKNOWN << 4) | PITCH_FIXED;
<a name="l00979"></a>00979 <span class="keywordflow">for</span> (pTmp = pFontTable; pTmp < pFontTable + tFontTableRecords; pTmp++) {
<a name="l00980"></a>00980 szOurFont = szGetDefaultFont(ucFFN, (<span class="keywordtype">int</span>)pTmp->ucEmphasis);
<a name="l00981"></a>00981 (void)strncpy(pTmp->szOurFontname, szOurFont,
<a name="l00982"></a>00982 <span class="keyword">sizeof</span>(pTmp->szOurFontname) - 1);
<a name="l00983"></a>00983 pTmp->szOurFontname[<span class="keyword">sizeof</span>(pTmp->szOurFontname) - 1] = <span class="charliteral">'\0'</span>;
<a name="l00984"></a>00984 }
<a name="l00985"></a>00985 } <span class="comment">/* end of vCorrect4CyrPS */</span>
<a name="l00986"></a>00986 <span class="preprocessor">#endif </span><span class="comment">/* __riscos */</span>
<a name="l00987"></a>00987
<a name="l00988"></a>00988 <span class="comment">/*</span>
<a name="l00989"></a>00989 <span class="comment"> * vCorrectFontTable - correct the font table in special cases</span>
<a name="l00990"></a>00990 <span class="comment"> */</span>
<a name="l00991"></a>00991 <span class="keywordtype">void</span>
<a name="l00992"></a>00992 vCorrectFontTable(conversion_type eConversionType, encoding_type eEncoding)
<a name="l00993"></a>00993 {
<a name="l00994"></a>00994 <span class="preprocessor">#if !defined(__riscos)</span>
<a name="l00995"></a>00995 <span class="preprocessor"></span> <span class="keywordflow">if</span> (eConversionType == conversion_pdf) {
<a name="l00996"></a>00996 vCorrect4PDF();
<a name="l00997"></a>00997 }
<a name="l00998"></a>00998 <span class="keywordflow">if</span> (eConversionType == conversion_ps &&
<a name="l00999"></a>00999 eEncoding == encoding_cyrillic) {
<a name="l01000"></a>01000 vCorrect4CyrPS();
<a name="l01001"></a>01001 }
<a name="l01002"></a>01002 <span class="preprocessor">#endif </span><span class="comment">/* __riscos */</span>
<a name="l01003"></a>01003 } <span class="comment">/* end of vCorrectFontTable */</span>
<a name="l01004"></a>01004
<a name="l01005"></a>01005 <span class="comment">/*</span>
<a name="l01006"></a>01006 <span class="comment"> * lComputeSpaceWidth - compute the width of a space character</span>
<a name="l01007"></a>01007 <span class="comment"> *</span>
<a name="l01008"></a>01008 <span class="comment"> * Returns the space width in millipoints</span>
<a name="l01009"></a>01009 <span class="comment"> */</span>
<a name="l01010"></a>01010 <span class="keywordtype">long</span>
<a name="l01011"></a>01011 lComputeSpaceWidth(drawfile_fontref tFontRef, USHORT usFontSize)
<a name="l01012"></a>01012 {
<a name="l01013"></a>01013 <span class="keywordtype">char</span> szSpace[] = <span class="stringliteral">" "</span>;
<a name="l01014"></a>01014
<a name="l01015"></a>01015 fail(usFontSize < MIN_FONT_SIZE || usFontSize > MAX_FONT_SIZE);
<a name="l01016"></a>01016
<a name="l01017"></a>01017 <span class="keywordflow">return</span> lComputeStringWidth(szSpace, 1, tFontRef, usFontSize);
<a name="l01018"></a>01018 } <span class="comment">/* end of lComputeSpaceWidth */</span>
</pre></div></div>
<hr size="1"/><address style="text-align: right;"><small>Generated by
<a href="http://www.doxygen.org/index.html">
<img class="footer" src="doxygen.png" alt="doxygen"/></a> 1.6.2 </small></address>
</body>
</html>