--- a/Symbian3/Examples/guid-6013a680-57f9-415b-8851-c4fa63356636/wordole_8c_source.html Fri Jun 11 15:24:34 2010 +0100
+++ /dev/null Thu Jan 01 00:00:00 1970 +0000
@@ -1,820 +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/wordole.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/wordole.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"> * wordole.c</span>
-<a name="l00003"></a>00003 <span class="comment"> * Copyright (C) 1998-2004 A.J. van Os; Released under 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"> * Deal with the OLE internals of a MS Word file</span>
-<a name="l00007"></a>00007 <span class="comment"> */</span>
-<a name="l00008"></a>00008
-<a name="l00009"></a>00009 <span class="preprocessor">#include <string.h></span>
-<a name="l00010"></a>00010 <span class="preprocessor">#include "antiword.h"</span>
-<a name="l00011"></a>00011
-<a name="l00012"></a>00012 <span class="comment">/* Private type for Property Set Storage entries */</span>
-<a name="l00013"></a>00013 <span class="keyword">typedef</span> <span class="keyword">struct </span>pps_entry_tag {
-<a name="l00014"></a>00014 ULONG ulNext;
-<a name="l00015"></a>00015 ULONG ulPrevious;
-<a name="l00016"></a>00016 ULONG ulDir;
-<a name="l00017"></a>00017 ULONG ulSB;
-<a name="l00018"></a>00018 ULONG ulSize;
-<a name="l00019"></a>00019 <span class="keywordtype">int</span> iLevel;
-<a name="l00020"></a>00020 <span class="keywordtype">char</span> szName[32];
-<a name="l00021"></a>00021 UCHAR ucType;
-<a name="l00022"></a>00022 } pps_entry_type;
-<a name="l00023"></a>00023
-<a name="l00024"></a>00024 <span class="comment">/* Show that a PPS number or index should not be used */</span>
-<a name="l00025"></a>00025 <span class="preprocessor">#define PPS_NUMBER_INVALID 0xffffffffUL</span>
-<a name="l00026"></a>00026 <span class="preprocessor"></span>
-<a name="l00027"></a>00027
-<a name="l00028"></a>00028 <span class="comment">/* Macro to make sure all such statements will be identical */</span>
-<a name="l00029"></a>00029 <span class="preprocessor">#define FREE_ALL() \</span>
-<a name="l00030"></a>00030 <span class="preprocessor"> do {\</span>
-<a name="l00031"></a>00031 <span class="preprocessor"> vDestroySmallBlockList();\</span>
-<a name="l00032"></a>00032 <span class="preprocessor"> aulRootList = xfree(aulRootList);\</span>
-<a name="l00033"></a>00033 <span class="preprocessor"> aulSbdList = xfree(aulSbdList);\</span>
-<a name="l00034"></a>00034 <span class="preprocessor"> aulBbdList = xfree(aulBbdList);\</span>
-<a name="l00035"></a>00035 <span class="preprocessor"> aulSBD = xfree(aulSBD);\</span>
-<a name="l00036"></a>00036 <span class="preprocessor"> aulBBD = xfree(aulBBD);\</span>
-<a name="l00037"></a>00037 <span class="preprocessor"> } while(0)</span>
-<a name="l00038"></a>00038 <span class="preprocessor"></span>
-<a name="l00039"></a>00039
-<a name="l00040"></a>00040 <span class="comment">/*</span>
-<a name="l00041"></a>00041 <span class="comment"> * ulReadLong - read four bytes from the given file and offset</span>
-<a name="l00042"></a>00042 <span class="comment"> */</span>
-<a name="l00043"></a>00043 <span class="keyword">static</span> ULONG
-<a name="l00044"></a>00044 ulReadLong(FILE *pFile, ULONG ulOffset)
-<a name="l00045"></a>00045 {
-<a name="l00046"></a>00046 UCHAR aucBytes[4];
-<a name="l00047"></a>00047
-<a name="l00048"></a>00048 fail(pFile == NULL);
-<a name="l00049"></a>00049
-<a name="l00050"></a>00050 <span class="keywordflow">if</span> (!bReadBytes(aucBytes, 4, ulOffset, pFile)) {
-<a name="l00051"></a>00051 werr(1, <span class="stringliteral">"Read long 0x%lx not possible"</span>, ulOffset);
-<a name="l00052"></a>00052 }
-<a name="l00053"></a>00053 <span class="keywordflow">return</span> ulGetLong(0, aucBytes);
-<a name="l00054"></a>00054 } <span class="comment">/* end of ulReadLong */</span>
-<a name="l00055"></a>00055
-<a name="l00056"></a>00056 <span class="comment">/*</span>
-<a name="l00057"></a>00057 <span class="comment"> * vName2String - turn the name into a proper string.</span>
-<a name="l00058"></a>00058 <span class="comment"> */</span>
-<a name="l00059"></a>00059 <span class="keyword">static</span> <span class="keywordtype">void</span>
-<a name="l00060"></a>00060 vName2String(<span class="keywordtype">char</span> *szName, <span class="keyword">const</span> UCHAR *aucBytes, <span class="keywordtype">size_t</span> tNameSize)
-<a name="l00061"></a>00061 {
-<a name="l00062"></a>00062 <span class="keywordtype">char</span> *pcChar;
-<a name="l00063"></a>00063 <span class="keywordtype">size_t</span> tIndex;
-<a name="l00064"></a>00064
-<a name="l00065"></a>00065 fail(aucBytes == NULL || szName == NULL);
-<a name="l00066"></a>00066
-<a name="l00067"></a>00067 <span class="keywordflow">if</span> (tNameSize < 2) {
-<a name="l00068"></a>00068 szName[0] = <span class="charliteral">'\0'</span>;
-<a name="l00069"></a>00069 <span class="keywordflow">return</span>;
-<a name="l00070"></a>00070 }
-<a name="l00071"></a>00071 <span class="keywordflow">for</span> (tIndex = 0, pcChar = szName;
-<a name="l00072"></a>00072 tIndex < 2 * tNameSize;
-<a name="l00073"></a>00073 tIndex += 2, pcChar++) {
-<a name="l00074"></a>00074 *pcChar = (char)aucBytes[tIndex];
-<a name="l00075"></a>00075 }
-<a name="l00076"></a>00076 szName[tNameSize - 1] = <span class="charliteral">'\0'</span>;
-<a name="l00077"></a>00077 } <span class="comment">/* end of vName2String */</span>
-<a name="l00078"></a>00078
-<a name="l00079"></a>00079 <span class="comment">/*</span>
-<a name="l00080"></a>00080 <span class="comment"> * tReadBlockIndices - read the Big/Small Block Depot indices</span>
-<a name="l00081"></a>00081 <span class="comment"> *</span>
-<a name="l00082"></a>00082 <span class="comment"> * Returns the number of indices read</span>
-<a name="l00083"></a>00083 <span class="comment"> */</span>
-<a name="l00084"></a>00084 <span class="keyword">static</span> <span class="keywordtype">size_t</span>
-<a name="l00085"></a>00085 tReadBlockIndices(FILE *pFile, ULONG *aulBlockDepot,
-<a name="l00086"></a>00086 <span class="keywordtype">size_t</span> tMaxRec, ULONG ulOffset)
-<a name="l00087"></a>00087 {
-<a name="l00088"></a>00088 <span class="keywordtype">size_t</span> tDone;
-<a name="l00089"></a>00089 <span class="keywordtype">int</span> iIndex;
-<a name="l00090"></a>00090 UCHAR aucBytes[BIG_BLOCK_SIZE];
-<a name="l00091"></a>00091
-<a name="l00092"></a>00092 fail(pFile == NULL || aulBlockDepot == NULL);
-<a name="l00093"></a>00093 fail(tMaxRec == 0);
-<a name="l00094"></a>00094
-<a name="l00095"></a>00095 <span class="comment">/* Read a big block with BBD or SBD indices */</span>
-<a name="l00096"></a>00096 <span class="keywordflow">if</span> (!bReadBytes(aucBytes, BIG_BLOCK_SIZE, ulOffset, pFile)) {
-<a name="l00097"></a>00097 werr(0, <span class="stringliteral">"Reading big block from 0x%lx is not possible"</span>,
-<a name="l00098"></a>00098 ulOffset);
-<a name="l00099"></a>00099 <span class="keywordflow">return</span> 0;
-<a name="l00100"></a>00100 }
-<a name="l00101"></a>00101 <span class="comment">/* Split the big block into indices, an index is four bytes */</span>
-<a name="l00102"></a>00102 tDone = min(tMaxRec, (<span class="keywordtype">size_t</span>)BIG_BLOCK_SIZE / 4);
-<a name="l00103"></a>00103 <span class="keywordflow">for</span> (iIndex = 0; iIndex < (int)tDone; iIndex++) {
-<a name="l00104"></a>00104 aulBlockDepot[iIndex] = ulGetLong(4 * iIndex, aucBytes);
-<a name="l00105"></a>00105 NO_DBG_DEC(aulBlockDepot[iIndex]);
-<a name="l00106"></a>00106 }
-<a name="l00107"></a>00107 <span class="keywordflow">return</span> tDone;
-<a name="l00108"></a>00108 } <span class="comment">/* end of tReadBlockIndices */</span>
-<a name="l00109"></a>00109
-<a name="l00110"></a>00110 <span class="comment">/*</span>
-<a name="l00111"></a>00111 <span class="comment"> * bGetBBD - get the Big Block Depot indices from the index-blocks</span>
-<a name="l00112"></a>00112 <span class="comment"> */</span>
-<a name="l00113"></a>00113 <span class="keyword">static</span> BOOL
-<a name="l00114"></a>00114 bGetBBD(FILE *pFile, <span class="keyword">const</span> ULONG *aulDepot, <span class="keywordtype">size_t</span> tDepotLen,
-<a name="l00115"></a>00115 ULONG *aulBBD, <span class="keywordtype">size_t</span> tBBDLen)
-<a name="l00116"></a>00116 {
-<a name="l00117"></a>00117 ULONG ulBegin;
-<a name="l00118"></a>00118 <span class="keywordtype">size_t</span> tToGo, tDone;
-<a name="l00119"></a>00119 <span class="keywordtype">int</span> iIndex;
-<a name="l00120"></a>00120
-<a name="l00121"></a>00121 fail(pFile == NULL || aulDepot == NULL || aulBBD == NULL);
-<a name="l00122"></a>00122
-<a name="l00123"></a>00123 DBG_MSG(<span class="stringliteral">"bGetBBD"</span>);
-<a name="l00124"></a>00124
-<a name="l00125"></a>00125 tToGo = tBBDLen;
-<a name="l00126"></a>00126 <span class="keywordflow">for</span> (iIndex = 0; iIndex < (int)tDepotLen && tToGo != 0; iIndex++) {
-<a name="l00127"></a>00127 ulBegin = (aulDepot[iIndex] + 1) * BIG_BLOCK_SIZE;
-<a name="l00128"></a>00128 NO_DBG_HEX(ulBegin);
-<a name="l00129"></a>00129 tDone = tReadBlockIndices(pFile, aulBBD, tToGo, ulBegin);
-<a name="l00130"></a>00130 fail(tDone > tToGo);
-<a name="l00131"></a>00131 <span class="keywordflow">if</span> (tDone == 0) {
-<a name="l00132"></a>00132 <span class="keywordflow">return</span> FALSE;
-<a name="l00133"></a>00133 }
-<a name="l00134"></a>00134 aulBBD += tDone;
-<a name="l00135"></a>00135 tToGo -= tDone;
-<a name="l00136"></a>00136 }
-<a name="l00137"></a>00137 <span class="keywordflow">return</span> tToGo == 0;
-<a name="l00138"></a>00138 } <span class="comment">/* end of bGetBBD */</span>
-<a name="l00139"></a>00139
-<a name="l00140"></a>00140 <span class="comment">/*</span>
-<a name="l00141"></a>00141 <span class="comment"> * bGetSBD - get the Small Block Depot indices from the index-blocks</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 bGetSBD(FILE *pFile, <span class="keyword">const</span> ULONG *aulDepot, <span class="keywordtype">size_t</span> tDepotLen,
-<a name="l00145"></a>00145 ULONG *aulSBD, <span class="keywordtype">size_t</span> tSBDLen)
-<a name="l00146"></a>00146 {
-<a name="l00147"></a>00147 ULONG ulBegin;
-<a name="l00148"></a>00148 <span class="keywordtype">size_t</span> tToGo, tDone;
-<a name="l00149"></a>00149 <span class="keywordtype">int</span> iIndex;
-<a name="l00150"></a>00150
-<a name="l00151"></a>00151 fail(pFile == NULL || aulDepot == NULL || aulSBD == NULL);
-<a name="l00152"></a>00152
-<a name="l00153"></a>00153 DBG_MSG(<span class="stringliteral">"bGetSBD"</span>);
-<a name="l00154"></a>00154
-<a name="l00155"></a>00155 tToGo = tSBDLen;
-<a name="l00156"></a>00156 <span class="keywordflow">for</span> (iIndex = 0; iIndex < (int)tDepotLen && tToGo != 0; iIndex++) {
-<a name="l00157"></a>00157 fail(aulDepot[iIndex] >= ULONG_MAX / BIG_BLOCK_SIZE);
-<a name="l00158"></a>00158 ulBegin = (aulDepot[iIndex] + 1) * BIG_BLOCK_SIZE;
-<a name="l00159"></a>00159 NO_DBG_HEX(ulBegin);
-<a name="l00160"></a>00160 tDone = tReadBlockIndices(pFile, aulSBD, tToGo, ulBegin);
-<a name="l00161"></a>00161 fail(tDone > tToGo);
-<a name="l00162"></a>00162 <span class="keywordflow">if</span> (tDone == 0) {
-<a name="l00163"></a>00163 <span class="keywordflow">return</span> FALSE;
-<a name="l00164"></a>00164 }
-<a name="l00165"></a>00165 aulSBD += tDone;
-<a name="l00166"></a>00166 tToGo -= tDone;
-<a name="l00167"></a>00167 }
-<a name="l00168"></a>00168 <span class="keywordflow">return</span> tToGo == 0;
-<a name="l00169"></a>00169 } <span class="comment">/* end of bGetSBD */</span>
-<a name="l00170"></a>00170
-<a name="l00171"></a>00171 <span class="comment">/*</span>
-<a name="l00172"></a>00172 <span class="comment"> * vComputePPSlevels - compute the levels of the Property Set Storage entries</span>
-<a name="l00173"></a>00173 <span class="comment"> */</span>
-<a name="l00174"></a>00174 <span class="keyword">static</span> <span class="keywordtype">void</span>
-<a name="l00175"></a>00175 vComputePPSlevels(pps_entry_type *atPPSlist, pps_entry_type *pNode,
-<a name="l00176"></a>00176 <span class="keywordtype">int</span> iLevel, <span class="keywordtype">int</span> iRecursionLevel)
-<a name="l00177"></a>00177 {
-<a name="l00178"></a>00178 fail(atPPSlist == NULL || pNode == NULL);
-<a name="l00179"></a>00179 fail(iLevel < 0 || iRecursionLevel < 0);
-<a name="l00180"></a>00180
-<a name="l00181"></a>00181 <span class="keywordflow">if</span> (iRecursionLevel > 25) {
-<a name="l00182"></a>00182 <span class="comment">/* This removes the possibility of an infinite recursion */</span>
-<a name="l00183"></a>00183 DBG_DEC(iRecursionLevel);
-<a name="l00184"></a>00184 <span class="keywordflow">return</span>;
-<a name="l00185"></a>00185 }
-<a name="l00186"></a>00186 <span class="keywordflow">if</span> (pNode->iLevel <= iLevel) {
-<a name="l00187"></a>00187 <span class="comment">/* Avoid entering a loop */</span>
-<a name="l00188"></a>00188 DBG_DEC(iLevel);
-<a name="l00189"></a>00189 DBG_DEC(pNode->iLevel);
-<a name="l00190"></a>00190 <span class="keywordflow">return</span>;
-<a name="l00191"></a>00191 }
-<a name="l00192"></a>00192
-<a name="l00193"></a>00193 pNode->iLevel = iLevel;
-<a name="l00194"></a>00194
-<a name="l00195"></a>00195 <span class="keywordflow">if</span> (pNode->ulDir != PPS_NUMBER_INVALID) {
-<a name="l00196"></a>00196 vComputePPSlevels(atPPSlist,
-<a name="l00197"></a>00197 &atPPSlist[pNode->ulDir],
-<a name="l00198"></a>00198 iLevel + 1,
-<a name="l00199"></a>00199 iRecursionLevel + 1);
-<a name="l00200"></a>00200 }
-<a name="l00201"></a>00201 <span class="keywordflow">if</span> (pNode->ulNext != PPS_NUMBER_INVALID) {
-<a name="l00202"></a>00202 vComputePPSlevels(atPPSlist,
-<a name="l00203"></a>00203 &atPPSlist[pNode->ulNext],
-<a name="l00204"></a>00204 iLevel,
-<a name="l00205"></a>00205 iRecursionLevel + 1);
-<a name="l00206"></a>00206 }
-<a name="l00207"></a>00207 <span class="keywordflow">if</span> (pNode->ulPrevious != PPS_NUMBER_INVALID) {
-<a name="l00208"></a>00208 vComputePPSlevels(atPPSlist,
-<a name="l00209"></a>00209 &atPPSlist[pNode->ulPrevious],
-<a name="l00210"></a>00210 iLevel,
-<a name="l00211"></a>00211 iRecursionLevel + 1);
-<a name="l00212"></a>00212 }
-<a name="l00213"></a>00213 } <span class="comment">/* end of vComputePPSlevels */</span>
-<a name="l00214"></a>00214
-<a name="l00215"></a>00215 <span class="comment">/*</span>
-<a name="l00216"></a>00216 <span class="comment"> * bGetPPS - search the Property Set Storage for three sets</span>
-<a name="l00217"></a>00217 <span class="comment"> *</span>
-<a name="l00218"></a>00218 <span class="comment"> * Return TRUE if the WordDocument PPS is found</span>
-<a name="l00219"></a>00219 <span class="comment"> */</span>
-<a name="l00220"></a>00220 <span class="keyword">static</span> BOOL
-<a name="l00221"></a>00221 bGetPPS(FILE *pFile,
-<a name="l00222"></a>00222 <span class="keyword">const</span> ULONG *aulRootList, <span class="keywordtype">size_t</span> tRootListLen, pps_info_type *pPPS)
-<a name="l00223"></a>00223 {
-<a name="l00224"></a>00224 pps_entry_type *atPPSlist;
-<a name="l00225"></a>00225 ULONG ulBegin, ulOffset, ulTmp;
-<a name="l00226"></a>00226 <span class="keywordtype">size_t</span> tNbrOfPPS, tNameSize;
-<a name="l00227"></a>00227 <span class="keywordtype">int</span> iIndex, iStartBlock, iRootIndex;
-<a name="l00228"></a>00228 BOOL bWord, bExcel;
-<a name="l00229"></a>00229 UCHAR aucBytes[PROPERTY_SET_STORAGE_SIZE];
-<a name="l00230"></a>00230
-<a name="l00231"></a>00231 fail(pFile == NULL || aulRootList == NULL || pPPS == NULL);
-<a name="l00232"></a>00232
-<a name="l00233"></a>00233 DBG_MSG(<span class="stringliteral">"bGetPPS"</span>);
-<a name="l00234"></a>00234
-<a name="l00235"></a>00235 NO_DBG_DEC(tRootListLen);
-<a name="l00236"></a>00236
-<a name="l00237"></a>00237 bWord = FALSE;
-<a name="l00238"></a>00238 bExcel = FALSE;
-<a name="l00239"></a>00239 (void)memset(pPPS, 0, <span class="keyword">sizeof</span>(*pPPS));
-<a name="l00240"></a>00240
-<a name="l00241"></a>00241 <span class="comment">/* Read and store all the Property Set Storage entries */</span>
-<a name="l00242"></a>00242
-<a name="l00243"></a>00243 tNbrOfPPS = tRootListLen * BIG_BLOCK_SIZE / PROPERTY_SET_STORAGE_SIZE;
-<a name="l00244"></a>00244 atPPSlist = xcalloc(tNbrOfPPS, <span class="keyword">sizeof</span>(pps_entry_type));
-<a name="l00245"></a>00245 iRootIndex = 0;
-<a name="l00246"></a>00246
-<a name="l00247"></a>00247 <span class="keywordflow">for</span> (iIndex = 0; iIndex < (int)tNbrOfPPS; iIndex++) {
-<a name="l00248"></a>00248 ulTmp = (ULONG)iIndex * PROPERTY_SET_STORAGE_SIZE;
-<a name="l00249"></a>00249 iStartBlock = (int)(ulTmp / BIG_BLOCK_SIZE);
-<a name="l00250"></a>00250 ulOffset = ulTmp % BIG_BLOCK_SIZE;
-<a name="l00251"></a>00251 ulBegin = (aulRootList[iStartBlock] + 1) * BIG_BLOCK_SIZE +
-<a name="l00252"></a>00252 ulOffset;
-<a name="l00253"></a>00253 NO_DBG_HEX(ulBegin);
-<a name="l00254"></a>00254 <span class="keywordflow">if</span> (!bReadBytes(aucBytes, PROPERTY_SET_STORAGE_SIZE,
-<a name="l00255"></a>00255 ulBegin, pFile)) {
-<a name="l00256"></a>00256 werr(0, <span class="stringliteral">"Reading PPS %d is not possible"</span>, iIndex);
-<a name="l00257"></a>00257 atPPSlist = xfree(atPPSlist);
-<a name="l00258"></a>00258 <span class="keywordflow">return</span> FALSE;
-<a name="l00259"></a>00259 }
-<a name="l00260"></a>00260 tNameSize = (size_t)usGetWord(0x40, aucBytes);
-<a name="l00261"></a>00261 tNameSize = (tNameSize + 1) / 2;
-<a name="l00262"></a>00262 vName2String(atPPSlist[iIndex].szName, aucBytes, tNameSize);
-<a name="l00263"></a>00263 atPPSlist[iIndex].ucType = ucGetByte(0x42, aucBytes);
-<a name="l00264"></a>00264 <span class="keywordflow">if</span> (atPPSlist[iIndex].ucType == 5) {
-<a name="l00265"></a>00265 iRootIndex = iIndex;
-<a name="l00266"></a>00266 }
-<a name="l00267"></a>00267 atPPSlist[iIndex].ulPrevious = ulGetLong(0x44, aucBytes);
-<a name="l00268"></a>00268 atPPSlist[iIndex].ulNext = ulGetLong(0x48, aucBytes);
-<a name="l00269"></a>00269 atPPSlist[iIndex].ulDir = ulGetLong(0x4c, aucBytes);
-<a name="l00270"></a>00270 atPPSlist[iIndex].ulSB = ulGetLong(0x74, aucBytes);
-<a name="l00271"></a>00271 atPPSlist[iIndex].ulSize = ulGetLong(0x78, aucBytes);
-<a name="l00272"></a>00272 atPPSlist[iIndex].iLevel = INT_MAX;
-<a name="l00273"></a>00273 <span class="keywordflow">if</span> ((atPPSlist[iIndex].ulPrevious >= (ULONG)tNbrOfPPS &&
-<a name="l00274"></a>00274 atPPSlist[iIndex].ulPrevious != PPS_NUMBER_INVALID) ||
-<a name="l00275"></a>00275 (atPPSlist[iIndex].ulNext >= (ULONG)tNbrOfPPS &&
-<a name="l00276"></a>00276 atPPSlist[iIndex].ulNext != PPS_NUMBER_INVALID) ||
-<a name="l00277"></a>00277 (atPPSlist[iIndex].ulDir >= (ULONG)tNbrOfPPS &&
-<a name="l00278"></a>00278 atPPSlist[iIndex].ulDir != PPS_NUMBER_INVALID)) {
-<a name="l00279"></a>00279 DBG_DEC(iIndex);
-<a name="l00280"></a>00280 DBG_DEC(atPPSlist[iIndex].ulPrevious);
-<a name="l00281"></a>00281 DBG_DEC(atPPSlist[iIndex].ulNext);
-<a name="l00282"></a>00282 DBG_DEC(atPPSlist[iIndex].ulDir);
-<a name="l00283"></a>00283 DBG_DEC(tNbrOfPPS);
-<a name="l00284"></a>00284 werr(0, <span class="stringliteral">"The Property Set Storage is damaged"</span>);
-<a name="l00285"></a>00285 atPPSlist = xfree(atPPSlist);
-<a name="l00286"></a>00286 <span class="keywordflow">return</span> FALSE;
-<a name="l00287"></a>00287 }
-<a name="l00288"></a>00288 }
-<a name="l00289"></a>00289
-<a name="l00290"></a>00290 <span class="preprocessor">#if 0 </span><span class="comment">/* defined(DEBUG) */</span>
-<a name="l00291"></a>00291 DBG_MSG(<span class="stringliteral">"Before"</span>);
-<a name="l00292"></a>00292 <span class="keywordflow">for</span> (iIndex = 0; iIndex < (int)tNbrOfPPS; iIndex++) {
-<a name="l00293"></a>00293 DBG_MSG(atPPSlist[iIndex].szName);
-<a name="l00294"></a>00294 DBG_HEX(atPPSlist[iIndex].ulDir);
-<a name="l00295"></a>00295 DBG_HEX(atPPSlist[iIndex].ulPrevious);
-<a name="l00296"></a>00296 DBG_HEX(atPPSlist[iIndex].ulNext);
-<a name="l00297"></a>00297 DBG_DEC(atPPSlist[iIndex].ulSB);
-<a name="l00298"></a>00298 DBG_HEX(atPPSlist[iIndex].ulSize);
-<a name="l00299"></a>00299 DBG_DEC(atPPSlist[iIndex].iLevel);
-<a name="l00300"></a>00300 }
-<a name="l00301"></a>00301 <span class="preprocessor">#endif </span><span class="comment">/* DEBUG */</span>
-<a name="l00302"></a>00302
-<a name="l00303"></a>00303 <span class="comment">/* Add level information to each entry */</span>
-<a name="l00304"></a>00304 vComputePPSlevels(atPPSlist, &atPPSlist[iRootIndex], 0, 0);
-<a name="l00305"></a>00305
-<a name="l00306"></a>00306 <span class="comment">/* Check the entries on level 1 for the required information */</span>
-<a name="l00307"></a>00307 NO_DBG_MSG(<span class="stringliteral">"After"</span>);
-<a name="l00308"></a>00308 <span class="keywordflow">for</span> (iIndex = 0; iIndex < (int)tNbrOfPPS; iIndex++) {
-<a name="l00309"></a>00309 <span class="preprocessor">#if 0 </span><span class="comment">/* defined(DEBUG) */</span>
-<a name="l00310"></a>00310 DBG_MSG(atPPSlist[iIndex].szName);
-<a name="l00311"></a>00311 DBG_HEX(atPPSlist[iIndex].ulDir);
-<a name="l00312"></a>00312 DBG_HEX(atPPSlist[iIndex].ulPrevious);
-<a name="l00313"></a>00313 DBG_HEX(atPPSlist[iIndex].ulNext);
-<a name="l00314"></a>00314 DBG_DEC(atPPSlist[iIndex].ulSB);
-<a name="l00315"></a>00315 DBG_HEX(atPPSlist[iIndex].ulSize);
-<a name="l00316"></a>00316 DBG_DEC(atPPSlist[iIndex].iLevel);
-<a name="l00317"></a>00317 <span class="preprocessor">#endif </span><span class="comment">/* DEBUG */</span>
-<a name="l00318"></a>00318 <span class="keywordflow">if</span> (atPPSlist[iIndex].iLevel != 1 ||
-<a name="l00319"></a>00319 atPPSlist[iIndex].ucType != 2 ||
-<a name="l00320"></a>00320 atPPSlist[iIndex].szName[0] == <span class="charliteral">'\0'</span> ||
-<a name="l00321"></a>00321 atPPSlist[iIndex].ulSize == 0) {
-<a name="l00322"></a>00322 <span class="comment">/* This entry can be ignored */</span>
-<a name="l00323"></a>00323 <span class="keywordflow">continue</span>;
-<a name="l00324"></a>00324 }
-<a name="l00325"></a>00325 <span class="keywordflow">if</span> (pPPS->tWordDocument.ulSize == 0 &&
-<a name="l00326"></a>00326 STREQ(atPPSlist[iIndex].szName, <span class="stringliteral">"WordDocument"</span>)) {
-<a name="l00327"></a>00327 pPPS->tWordDocument.ulSB = atPPSlist[iIndex].ulSB;
-<a name="l00328"></a>00328 pPPS->tWordDocument.ulSize = atPPSlist[iIndex].ulSize;
-<a name="l00329"></a>00329 bWord = TRUE;
-<a name="l00330"></a>00330 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (pPPS->tData.ulSize == 0 &&
-<a name="l00331"></a>00331 STREQ(atPPSlist[iIndex].szName, <span class="stringliteral">"Data"</span>)) {
-<a name="l00332"></a>00332 pPPS->tData.ulSB = atPPSlist[iIndex].ulSB;
-<a name="l00333"></a>00333 pPPS->tData.ulSize = atPPSlist[iIndex].ulSize;
-<a name="l00334"></a>00334 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (pPPS->t0Table.ulSize == 0 &&
-<a name="l00335"></a>00335 STREQ(atPPSlist[iIndex].szName, <span class="stringliteral">"0Table"</span>)) {
-<a name="l00336"></a>00336 pPPS->t0Table.ulSB = atPPSlist[iIndex].ulSB;
-<a name="l00337"></a>00337 pPPS->t0Table.ulSize = atPPSlist[iIndex].ulSize;
-<a name="l00338"></a>00338 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (pPPS->t1Table.ulSize == 0 &&
-<a name="l00339"></a>00339 STREQ(atPPSlist[iIndex].szName, <span class="stringliteral">"1Table"</span>)) {
-<a name="l00340"></a>00340 pPPS->t1Table.ulSB = atPPSlist[iIndex].ulSB;
-<a name="l00341"></a>00341 pPPS->t1Table.ulSize = atPPSlist[iIndex].ulSize;
-<a name="l00342"></a>00342 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (pPPS->tSummaryInfo.ulSize == 0 &&
-<a name="l00343"></a>00343 STREQ(atPPSlist[iIndex].szName,
-<a name="l00344"></a>00344 <span class="stringliteral">"\005SummaryInformation"</span>)) {
-<a name="l00345"></a>00345 pPPS->tSummaryInfo.ulSB = atPPSlist[iIndex].ulSB;
-<a name="l00346"></a>00346 pPPS->tSummaryInfo.ulSize = atPPSlist[iIndex].ulSize;
-<a name="l00347"></a>00347 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (pPPS->tDocSummaryInfo.ulSize == 0 &&
-<a name="l00348"></a>00348 STREQ(atPPSlist[iIndex].szName,
-<a name="l00349"></a>00349 <span class="stringliteral">"\005DocumentSummaryInformation"</span>)) {
-<a name="l00350"></a>00350 pPPS->tDocSummaryInfo.ulSB = atPPSlist[iIndex].ulSB;
-<a name="l00351"></a>00351 pPPS->tDocSummaryInfo.ulSize = atPPSlist[iIndex].ulSize;
-<a name="l00352"></a>00352 } <span class="keywordflow">else</span> <span class="keywordflow">if</span> (STREQ(atPPSlist[iIndex].szName, <span class="stringliteral">"Book"</span>) ||
-<a name="l00353"></a>00353 STREQ(atPPSlist[iIndex].szName, <span class="stringliteral">"Workbook"</span>)) {
-<a name="l00354"></a>00354 bExcel = TRUE;
-<a name="l00355"></a>00355 }
-<a name="l00356"></a>00356 }
-<a name="l00357"></a>00357
-<a name="l00358"></a>00358 <span class="comment">/* Free the space for the Property Set Storage entries */</span>
-<a name="l00359"></a>00359 atPPSlist = xfree(atPPSlist);
-<a name="l00360"></a>00360
-<a name="l00361"></a>00361 <span class="comment">/* Draw your conclusions */</span>
-<a name="l00362"></a>00362 <span class="keywordflow">if</span> (bWord) {
-<a name="l00363"></a>00363 <span class="keywordflow">return</span> TRUE;
-<a name="l00364"></a>00364 }
-<a name="l00365"></a>00365
-<a name="l00366"></a>00366 <span class="keywordflow">if</span> (bExcel) {
-<a name="l00367"></a>00367 werr(0, <span class="stringliteral">"Sorry, but this is an Excel spreadsheet"</span>);
-<a name="l00368"></a>00368 } <span class="keywordflow">else</span> {
-<a name="l00369"></a>00369 werr(0, <span class="stringliteral">"This OLE file does not contain a Word document"</span>);
-<a name="l00370"></a>00370 }
-<a name="l00371"></a>00371 <span class="keywordflow">return</span> FALSE;
-<a name="l00372"></a>00372 } <span class="comment">/* end of bGetPPS */</span>
-<a name="l00373"></a>00373
-<a name="l00374"></a>00374 <span class="comment">/*</span>
-<a name="l00375"></a>00375 <span class="comment"> * vGetBbdList - make a list of the places to find big blocks</span>
-<a name="l00376"></a>00376 <span class="comment"> */</span>
-<a name="l00377"></a>00377 <span class="keyword">static</span> <span class="keywordtype">void</span>
-<a name="l00378"></a>00378 vGetBbdList(FILE *pFile, <span class="keywordtype">int</span> iNbr, ULONG *aulBbdList, ULONG ulOffset)
-<a name="l00379"></a>00379 {
-<a name="l00380"></a>00380 <span class="keywordtype">int</span> iIndex;
-<a name="l00381"></a>00381
-<a name="l00382"></a>00382 fail(pFile == NULL);
-<a name="l00383"></a>00383 fail(iNbr > 127);
-<a name="l00384"></a>00384 fail(aulBbdList == NULL);
-<a name="l00385"></a>00385
-<a name="l00386"></a>00386 NO_DBG_DEC(iNbr);
-<a name="l00387"></a>00387 <span class="keywordflow">for</span> (iIndex = 0; iIndex < iNbr; iIndex++) {
-<a name="l00388"></a>00388 aulBbdList[iIndex] =
-<a name="l00389"></a>00389 ulReadLong(pFile, ulOffset + 4 * (ULONG)iIndex);
-<a name="l00390"></a>00390 NO_DBG_DEC(iIndex);
-<a name="l00391"></a>00391 NO_DBG_HEX(aulBbdList[iIndex]);
-<a name="l00392"></a>00392 }
-<a name="l00393"></a>00393 } <span class="comment">/* end of vGetBbdList */</span>
-<a name="l00394"></a>00394
-<a name="l00395"></a>00395 <span class="comment">/*</span>
-<a name="l00396"></a>00396 <span class="comment"> * bGetDocumentText - make a list of the text blocks of a Word document</span>
-<a name="l00397"></a>00397 <span class="comment"> *</span>
-<a name="l00398"></a>00398 <span class="comment"> * Return TRUE when succesful, otherwise FALSE</span>
-<a name="l00399"></a>00399 <span class="comment"> */</span>
-<a name="l00400"></a>00400 <span class="keyword">static</span> BOOL
-<a name="l00401"></a>00401 bGetDocumentText(FILE *pFile, <span class="keyword">const</span> pps_info_type *pPPS,
-<a name="l00402"></a>00402 <span class="keyword">const</span> ULONG *aulBBD, <span class="keywordtype">size_t</span> tBBDLen,
-<a name="l00403"></a>00403 <span class="keyword">const</span> ULONG *aulSBD, <span class="keywordtype">size_t</span> tSBDLen,
-<a name="l00404"></a>00404 <span class="keyword">const</span> UCHAR *aucHeader, <span class="keywordtype">int</span> iWordVersion)
-<a name="l00405"></a>00405 {
-<a name="l00406"></a>00406 ULONG ulBeginOfText;
-<a name="l00407"></a>00407 ULONG ulTextLen, ulFootnoteLen, ulEndnoteLen;
-<a name="l00408"></a>00408 ULONG ulHdrFtrLen, ulMacroLen, ulAnnotationLen;
-<a name="l00409"></a>00409 ULONG ulTextBoxLen, ulHdrTextBoxLen;
-<a name="l00410"></a>00410 UINT uiQuickSaves;
-<a name="l00411"></a>00411 BOOL bFarEastWord, bTemplate, bFastSaved, bEncrypted, bSuccess;
-<a name="l00412"></a>00412 USHORT usIdent, usDocStatus;
-<a name="l00413"></a>00413
-<a name="l00414"></a>00414 fail(pFile == NULL || pPPS == NULL);
-<a name="l00415"></a>00415 fail(aulBBD == NULL);
-<a name="l00416"></a>00416 fail(aulSBD == NULL);
-<a name="l00417"></a>00417
-<a name="l00418"></a>00418 DBG_MSG(<span class="stringliteral">"bGetDocumentText"</span>);
-<a name="l00419"></a>00419
-<a name="l00420"></a>00420 <span class="comment">/* Get the "magic number" from the header */</span>
-<a name="l00421"></a>00421 usIdent = usGetWord(0x00, aucHeader);
-<a name="l00422"></a>00422 DBG_HEX(usIdent);
-<a name="l00423"></a>00423 bFarEastWord = usIdent == 0x8098 || usIdent == 0x8099 ||
-<a name="l00424"></a>00424 usIdent == 0xa697 || usIdent == 0xa699;
-<a name="l00425"></a>00425 <span class="comment">/* Get the status flags from the header */</span>
-<a name="l00426"></a>00426 usDocStatus = usGetWord(0x0a, aucHeader);
-<a name="l00427"></a>00427 DBG_HEX(usDocStatus);
-<a name="l00428"></a>00428 bTemplate = (usDocStatus & BIT(0)) != 0;
-<a name="l00429"></a>00429 DBG_MSG_C(bTemplate, <span class="stringliteral">"This document is a Template"</span>);
-<a name="l00430"></a>00430 bFastSaved = (usDocStatus & BIT(2)) != 0;
-<a name="l00431"></a>00431 uiQuickSaves = (UINT)(usDocStatus & 0x00f0) >> 4;
-<a name="l00432"></a>00432 DBG_MSG_C(bFastSaved, <span class="stringliteral">"This document is Fast Saved"</span>);
-<a name="l00433"></a>00433 DBG_DEC_C(bFastSaved, uiQuickSaves);
-<a name="l00434"></a>00434 bEncrypted = (usDocStatus & BIT(8)) != 0;
-<a name="l00435"></a>00435 <span class="keywordflow">if</span> (bEncrypted) {
-<a name="l00436"></a>00436 werr(0, <span class="stringliteral">"Encrypted documents are not supported"</span>);
-<a name="l00437"></a>00437 <span class="keywordflow">return</span> FALSE;
-<a name="l00438"></a>00438 }
-<a name="l00439"></a>00439
-<a name="l00440"></a>00440 <span class="comment">/* Get length information */</span>
-<a name="l00441"></a>00441 ulBeginOfText = ulGetLong(0x18, aucHeader);
-<a name="l00442"></a>00442 DBG_HEX(ulBeginOfText);
-<a name="l00443"></a>00443 <span class="keywordflow">switch</span> (iWordVersion) {
-<a name="l00444"></a>00444 <span class="keywordflow">case</span> 6:
-<a name="l00445"></a>00445 <span class="keywordflow">case</span> 7:
-<a name="l00446"></a>00446 ulTextLen = ulGetLong(0x34, aucHeader);
-<a name="l00447"></a>00447 ulFootnoteLen = ulGetLong(0x38, aucHeader);
-<a name="l00448"></a>00448 ulHdrFtrLen = ulGetLong(0x3c, aucHeader);
-<a name="l00449"></a>00449 ulMacroLen = ulGetLong(0x40, aucHeader);
-<a name="l00450"></a>00450 ulAnnotationLen = ulGetLong(0x44, aucHeader);
-<a name="l00451"></a>00451 ulEndnoteLen = ulGetLong(0x48, aucHeader);
-<a name="l00452"></a>00452 ulTextBoxLen = ulGetLong(0x4c, aucHeader);
-<a name="l00453"></a>00453 ulHdrTextBoxLen = ulGetLong(0x50, aucHeader);
-<a name="l00454"></a>00454 <span class="keywordflow">break</span>;
-<a name="l00455"></a>00455 <span class="keywordflow">case</span> 8:
-<a name="l00456"></a>00456 ulTextLen = ulGetLong(0x4c, aucHeader);
-<a name="l00457"></a>00457 ulFootnoteLen = ulGetLong(0x50, aucHeader);
-<a name="l00458"></a>00458 ulHdrFtrLen = ulGetLong(0x54, aucHeader);
-<a name="l00459"></a>00459 ulMacroLen = ulGetLong(0x58, aucHeader);
-<a name="l00460"></a>00460 ulAnnotationLen = ulGetLong(0x5c, aucHeader);
-<a name="l00461"></a>00461 ulEndnoteLen = ulGetLong(0x60, aucHeader);
-<a name="l00462"></a>00462 ulTextBoxLen = ulGetLong(0x64, aucHeader);
-<a name="l00463"></a>00463 ulHdrTextBoxLen = ulGetLong(0x68, aucHeader);
-<a name="l00464"></a>00464 <span class="keywordflow">break</span>;
-<a name="l00465"></a>00465 <span class="keywordflow">default</span>:
-<a name="l00466"></a>00466 werr(0, <span class="stringliteral">"This version of Word is not supported"</span>);
-<a name="l00467"></a>00467 <span class="keywordflow">return</span> FALSE;
-<a name="l00468"></a>00468 }
-<a name="l00469"></a>00469 DBG_DEC(ulTextLen);
-<a name="l00470"></a>00470 DBG_DEC(ulFootnoteLen);
-<a name="l00471"></a>00471 DBG_DEC(ulHdrFtrLen);
-<a name="l00472"></a>00472 DBG_DEC(ulMacroLen);
-<a name="l00473"></a>00473 DBG_DEC(ulAnnotationLen);
-<a name="l00474"></a>00474 DBG_DEC(ulEndnoteLen);
-<a name="l00475"></a>00475 DBG_DEC(ulTextBoxLen);
-<a name="l00476"></a>00476 DBG_DEC(ulHdrTextBoxLen);
-<a name="l00477"></a>00477
-<a name="l00478"></a>00478 <span class="comment">/* Make a list of the text blocks */</span>
-<a name="l00479"></a>00479 <span class="keywordflow">switch</span> (iWordVersion) {
-<a name="l00480"></a>00480 <span class="keywordflow">case</span> 6:
-<a name="l00481"></a>00481 <span class="keywordflow">case</span> 7:
-<a name="l00482"></a>00482 <span class="keywordflow">if</span> (bFastSaved) {
-<a name="l00483"></a>00483 bSuccess = bGet6DocumentText(pFile,
-<a name="l00484"></a>00484 bFarEastWord,
-<a name="l00485"></a>00485 pPPS->tWordDocument.ulSB,
-<a name="l00486"></a>00486 aulBBD, tBBDLen,
-<a name="l00487"></a>00487 aucHeader);
-<a name="l00488"></a>00488 } <span class="keywordflow">else</span> {
-<a name="l00489"></a>00489 bSuccess = bAddTextBlocks(ulBeginOfText,
-<a name="l00490"></a>00490 ulTextLen +
-<a name="l00491"></a>00491 ulFootnoteLen +
-<a name="l00492"></a>00492 ulHdrFtrLen +
-<a name="l00493"></a>00493 ulMacroLen + ulAnnotationLen +
-<a name="l00494"></a>00494 ulEndnoteLen +
-<a name="l00495"></a>00495 ulTextBoxLen + ulHdrTextBoxLen,
-<a name="l00496"></a>00496 bFarEastWord,
-<a name="l00497"></a>00497 IGNORE_PROPMOD,
-<a name="l00498"></a>00498 pPPS->tWordDocument.ulSB,
-<a name="l00499"></a>00499 aulBBD, tBBDLen);
-<a name="l00500"></a>00500 }
-<a name="l00501"></a>00501 <span class="keywordflow">break</span>;
-<a name="l00502"></a>00502 <span class="keywordflow">case</span> 8:
-<a name="l00503"></a>00503 bSuccess = bGet8DocumentText(pFile,
-<a name="l00504"></a>00504 pPPS,
-<a name="l00505"></a>00505 aulBBD, tBBDLen, aulSBD, tSBDLen,
-<a name="l00506"></a>00506 aucHeader);
-<a name="l00507"></a>00507 <span class="keywordflow">break</span>;
-<a name="l00508"></a>00508 <span class="keywordflow">default</span>:
-<a name="l00509"></a>00509 werr(0, <span class="stringliteral">"This version of Word is not supported"</span>);
-<a name="l00510"></a>00510 bSuccess = FALSE;
-<a name="l00511"></a>00511 <span class="keywordflow">break</span>;
-<a name="l00512"></a>00512 }
-<a name="l00513"></a>00513
-<a name="l00514"></a>00514 <span class="keywordflow">if</span> (bSuccess) {
-<a name="l00515"></a>00515 vSplitBlockList(pFile,
-<a name="l00516"></a>00516 ulTextLen,
-<a name="l00517"></a>00517 ulFootnoteLen,
-<a name="l00518"></a>00518 ulHdrFtrLen,
-<a name="l00519"></a>00519 ulMacroLen,
-<a name="l00520"></a>00520 ulAnnotationLen,
-<a name="l00521"></a>00521 ulEndnoteLen,
-<a name="l00522"></a>00522 ulTextBoxLen,
-<a name="l00523"></a>00523 ulHdrTextBoxLen,
-<a name="l00524"></a>00524 !bFastSaved && iWordVersion == 8);
-<a name="l00525"></a>00525 } <span class="keywordflow">else</span> {
-<a name="l00526"></a>00526 vDestroyTextBlockList();
-<a name="l00527"></a>00527 werr(0, <span class="stringliteral">"I can't find the text of this document"</span>);
-<a name="l00528"></a>00528 }
-<a name="l00529"></a>00529 <span class="keywordflow">return</span> bSuccess;
-<a name="l00530"></a>00530 } <span class="comment">/* end of bGetDocumentText */</span>
-<a name="l00531"></a>00531
-<a name="l00532"></a>00532 <span class="comment">/*</span>
-<a name="l00533"></a>00533 <span class="comment"> * vGetDocumentData - make a list of the data blocks of a Word document</span>
-<a name="l00534"></a>00534 <span class="comment"> */</span>
-<a name="l00535"></a>00535 <span class="keyword">static</span> <span class="keywordtype">void</span>
-<a name="l00536"></a>00536 vGetDocumentData(FILE *pFile, <span class="keyword">const</span> pps_info_type *pPPS,
-<a name="l00537"></a>00537 <span class="keyword">const</span> ULONG *aulBBD, <span class="keywordtype">size_t</span> tBBDLen,
-<a name="l00538"></a>00538 <span class="keyword">const</span> UCHAR *aucHeader, <span class="keywordtype">int</span> iWordVersion)
-<a name="l00539"></a>00539 {
-<a name="l00540"></a>00540 options_type tOptions;
-<a name="l00541"></a>00541 ULONG ulBeginOfText;
-<a name="l00542"></a>00542 BOOL bFastSaved, bHasImages, bSuccess;
-<a name="l00543"></a>00543 USHORT usDocStatus;
-<a name="l00544"></a>00544
-<a name="l00545"></a>00545 fail(pFile == NULL);
-<a name="l00546"></a>00546 fail(pPPS == NULL);
-<a name="l00547"></a>00547 fail(aulBBD == NULL);
-<a name="l00548"></a>00548
-<a name="l00549"></a>00549 <span class="comment">/* Get the options */</span>
-<a name="l00550"></a>00550 vGetOptions(&tOptions);
-<a name="l00551"></a>00551
-<a name="l00552"></a>00552 <span class="comment">/* Get the status flags from the header */</span>
-<a name="l00553"></a>00553 usDocStatus = usGetWord(0x0a, aucHeader);
-<a name="l00554"></a>00554 DBG_HEX(usDocStatus);
-<a name="l00555"></a>00555 bFastSaved = (usDocStatus & BIT(2)) != 0;
-<a name="l00556"></a>00556 bHasImages = (usDocStatus & BIT(3)) != 0;
-<a name="l00557"></a>00557
-<a name="l00558"></a>00558 <span class="keywordflow">if</span> (!bHasImages ||
-<a name="l00559"></a>00559 tOptions.eConversionType == conversion_text ||
-<a name="l00560"></a>00560 tOptions.eConversionType == conversion_fmt_text ||
-<a name="l00561"></a>00561 tOptions.eConversionType == conversion_xml ||
-<a name="l00562"></a>00562 tOptions.eImageLevel == level_no_images) {
-<a name="l00563"></a>00563 <span class="comment">/*</span>
-<a name="l00564"></a>00564 <span class="comment"> * No images in the document or text-only output or</span>
-<a name="l00565"></a>00565 <span class="comment"> * no images wanted, so no data blocks will be needed</span>
-<a name="l00566"></a>00566 <span class="comment"> */</span>
-<a name="l00567"></a>00567 vDestroyDataBlockList();
-<a name="l00568"></a>00568 <span class="keywordflow">return</span>;
-<a name="l00569"></a>00569 }
-<a name="l00570"></a>00570
-<a name="l00571"></a>00571 <span class="comment">/* Get length information */</span>
-<a name="l00572"></a>00572 ulBeginOfText = ulGetLong(0x18, aucHeader);
-<a name="l00573"></a>00573 DBG_HEX(ulBeginOfText);
-<a name="l00574"></a>00574
-<a name="l00575"></a>00575 <span class="comment">/* Make a list of the data blocks */</span>
-<a name="l00576"></a>00576 <span class="keywordflow">switch</span> (iWordVersion) {
-<a name="l00577"></a>00577 <span class="keywordflow">case</span> 6:
-<a name="l00578"></a>00578 <span class="keywordflow">case</span> 7:
-<a name="l00579"></a>00579 <span class="comment">/*</span>
-<a name="l00580"></a>00580 <span class="comment"> * The data blocks are in the text stream. The text stream</span>
-<a name="l00581"></a>00581 <span class="comment"> * is in "fast saved" format or "normal saved" format</span>
-<a name="l00582"></a>00582 <span class="comment"> */</span>
-<a name="l00583"></a>00583 <span class="keywordflow">if</span> (bFastSaved) {
-<a name="l00584"></a>00584 bSuccess = bGet6DocumentData(pFile,
-<a name="l00585"></a>00585 pPPS->tWordDocument.ulSB,
-<a name="l00586"></a>00586 aulBBD, tBBDLen,
-<a name="l00587"></a>00587 aucHeader);
-<a name="l00588"></a>00588 } <span class="keywordflow">else</span> {
-<a name="l00589"></a>00589 bSuccess = bAddDataBlocks(ulBeginOfText,
-<a name="l00590"></a>00590 (ULONG)LONG_MAX,
-<a name="l00591"></a>00591 pPPS->tWordDocument.ulSB,
-<a name="l00592"></a>00592 aulBBD, tBBDLen);
-<a name="l00593"></a>00593 }
-<a name="l00594"></a>00594 <span class="keywordflow">break</span>;
-<a name="l00595"></a>00595 <span class="keywordflow">case</span> 8:
-<a name="l00596"></a>00596 <span class="comment">/*</span>
-<a name="l00597"></a>00597 <span class="comment"> * The data blocks are in the data stream. The data stream</span>
-<a name="l00598"></a>00598 <span class="comment"> * is always in "normal saved" format</span>
-<a name="l00599"></a>00599 <span class="comment"> */</span>
-<a name="l00600"></a>00600 bSuccess = bAddDataBlocks(0, (ULONG)LONG_MAX,
-<a name="l00601"></a>00601 pPPS->tData.ulSB, aulBBD, tBBDLen);
-<a name="l00602"></a>00602 <span class="keywordflow">break</span>;
-<a name="l00603"></a>00603 <span class="keywordflow">default</span>:
-<a name="l00604"></a>00604 werr(0, <span class="stringliteral">"This version of Word is not supported"</span>);
-<a name="l00605"></a>00605 bSuccess = FALSE;
-<a name="l00606"></a>00606 <span class="keywordflow">break</span>;
-<a name="l00607"></a>00607 }
-<a name="l00608"></a>00608
-<a name="l00609"></a>00609 <span class="keywordflow">if</span> (!bSuccess) {
-<a name="l00610"></a>00610 vDestroyDataBlockList();
-<a name="l00611"></a>00611 werr(0, <span class="stringliteral">"I can't find the data of this document"</span>);
-<a name="l00612"></a>00612 }
-<a name="l00613"></a>00613 } <span class="comment">/* end of vGetDocumentData */</span>
-<a name="l00614"></a>00614
-<a name="l00615"></a>00615 <span class="comment">/*</span>
-<a name="l00616"></a>00616 <span class="comment"> * iInitDocumentOLE - initialize an OLE document</span>
-<a name="l00617"></a>00617 <span class="comment"> *</span>
-<a name="l00618"></a>00618 <span class="comment"> * Returns the version of Word that made the document or -1</span>
-<a name="l00619"></a>00619 <span class="comment"> */</span>
-<a name="l00620"></a>00620 <span class="keywordtype">int</span>
-<a name="l00621"></a>00621 iInitDocumentOLE(FILE *pFile, <span class="keywordtype">long</span> lFilesize)
-<a name="l00622"></a>00622 {
-<a name="l00623"></a>00623 pps_info_type PPS_info;
-<a name="l00624"></a>00624 ULONG *aulBBD, *aulSBD;
-<a name="l00625"></a>00625 ULONG *aulRootList, *aulBbdList, *aulSbdList;
-<a name="l00626"></a>00626 ULONG ulBdbListStart, ulAdditionalBBDlist;
-<a name="l00627"></a>00627 ULONG ulRootStartblock, ulSbdStartblock, ulSBLstartblock;
-<a name="l00628"></a>00628 ULONG ulStart, ulTmp;
-<a name="l00629"></a>00629 <span class="keywordtype">long</span> lMaxBlock;
-<a name="l00630"></a>00630 <span class="keywordtype">size_t</span> tBBDLen, tSBDLen, tNumBbdBlocks, tRootListLen;
-<a name="l00631"></a>00631 <span class="keywordtype">int</span> iWordVersion, iIndex, iToGo;
-<a name="l00632"></a>00632 BOOL bSuccess;
-<a name="l00633"></a>00633 USHORT usIdent, usDocStatus;
-<a name="l00634"></a>00634 UCHAR aucHeader[HEADER_SIZE];
-<a name="l00635"></a>00635
-<a name="l00636"></a>00636 fail(pFile == NULL);
-<a name="l00637"></a>00637
-<a name="l00638"></a>00638 lMaxBlock = lFilesize / BIG_BLOCK_SIZE - 2;
-<a name="l00639"></a>00639 DBG_DEC(lMaxBlock);
-<a name="l00640"></a>00640 <span class="keywordflow">if</span> (lMaxBlock < 1) {
-<a name="l00641"></a>00641 <span class="keywordflow">return</span> -1;
-<a name="l00642"></a>00642 }
-<a name="l00643"></a>00643 tBBDLen = (size_t)(lMaxBlock + 1);
-<a name="l00644"></a>00644 tNumBbdBlocks = (size_t)ulReadLong(pFile, 0x2c);
-<a name="l00645"></a>00645 DBG_DEC(tNumBbdBlocks);
-<a name="l00646"></a>00646 ulRootStartblock = ulReadLong(pFile, 0x30);
-<a name="l00647"></a>00647 DBG_DEC(ulRootStartblock);
-<a name="l00648"></a>00648 ulSbdStartblock = ulReadLong(pFile, 0x3c);
-<a name="l00649"></a>00649 DBG_DEC(ulSbdStartblock);
-<a name="l00650"></a>00650 ulAdditionalBBDlist = ulReadLong(pFile, 0x44);
-<a name="l00651"></a>00651 DBG_HEX(ulAdditionalBBDlist);
-<a name="l00652"></a>00652 ulSBLstartblock = ulReadLong(pFile,
-<a name="l00653"></a>00653 (ulRootStartblock + 1) * BIG_BLOCK_SIZE + 0x74);
-<a name="l00654"></a>00654 DBG_DEC(ulSBLstartblock);
-<a name="l00655"></a>00655 tSBDLen = (size_t)(ulReadLong(pFile,
-<a name="l00656"></a>00656 (ulRootStartblock + 1) * BIG_BLOCK_SIZE + 0x78) /
-<a name="l00657"></a>00657 SMALL_BLOCK_SIZE);
-<a name="l00658"></a>00658 <span class="comment">/* All to be xcalloc-ed pointers to NULL */</span>
-<a name="l00659"></a>00659 aulRootList = NULL;
-<a name="l00660"></a>00660 aulSbdList = NULL;
-<a name="l00661"></a>00661 aulBbdList = NULL;
-<a name="l00662"></a>00662 aulSBD = NULL;
-<a name="l00663"></a>00663 aulBBD = NULL;
-<a name="l00664"></a>00664 <span class="comment">/* Big Block Depot */</span>
-<a name="l00665"></a>00665 aulBbdList = xcalloc(tNumBbdBlocks, <span class="keyword">sizeof</span>(ULONG));
-<a name="l00666"></a>00666 aulBBD = xcalloc(tBBDLen, <span class="keyword">sizeof</span>(ULONG));
-<a name="l00667"></a>00667 iToGo = (int)tNumBbdBlocks;
-<a name="l00668"></a>00668 vGetBbdList(pFile, min(iToGo, 109), aulBbdList, 0x4c);
-<a name="l00669"></a>00669 ulStart = 109;
-<a name="l00670"></a>00670 iToGo -= 109;
-<a name="l00671"></a>00671 <span class="keywordflow">while</span> (ulAdditionalBBDlist != END_OF_CHAIN && iToGo > 0) {
-<a name="l00672"></a>00672 ulBdbListStart = (ulAdditionalBBDlist + 1) * BIG_BLOCK_SIZE;
-<a name="l00673"></a>00673 vGetBbdList(pFile, min(iToGo, 127),
-<a name="l00674"></a>00674 aulBbdList + ulStart, ulBdbListStart);
-<a name="l00675"></a>00675 ulAdditionalBBDlist = ulReadLong(pFile,
-<a name="l00676"></a>00676 ulBdbListStart + 4 * 127);
-<a name="l00677"></a>00677 DBG_DEC(ulAdditionalBBDlist);
-<a name="l00678"></a>00678 DBG_HEX(ulAdditionalBBDlist);
-<a name="l00679"></a>00679 ulStart += 127;
-<a name="l00680"></a>00680 iToGo -= 127;
-<a name="l00681"></a>00681 }
-<a name="l00682"></a>00682 <span class="keywordflow">if</span> (!bGetBBD(pFile, aulBbdList, tNumBbdBlocks, aulBBD, tBBDLen)) {
-<a name="l00683"></a>00683 FREE_ALL();
-<a name="l00684"></a>00684 <span class="keywordflow">return</span> -1;
-<a name="l00685"></a>00685 }
-<a name="l00686"></a>00686 aulBbdList = xfree(aulBbdList);
-<a name="l00687"></a>00687 <span class="comment">/* Small Block Depot */</span>
-<a name="l00688"></a>00688 aulSbdList = xcalloc(tBBDLen, <span class="keyword">sizeof</span>(ULONG));
-<a name="l00689"></a>00689 aulSBD = xcalloc(tSBDLen, <span class="keyword">sizeof</span>(ULONG));
-<a name="l00690"></a>00690 <span class="keywordflow">for</span> (iIndex = 0, ulTmp = ulSbdStartblock;
-<a name="l00691"></a>00691 iIndex < (int)tBBDLen && ulTmp != END_OF_CHAIN;
-<a name="l00692"></a>00692 iIndex++, ulTmp = aulBBD[ulTmp]) {
-<a name="l00693"></a>00693 <span class="keywordflow">if</span> (ulTmp >= (ULONG)tBBDLen) {
-<a name="l00694"></a>00694 DBG_DEC(ulTmp);
-<a name="l00695"></a>00695 DBG_DEC(tBBDLen);
-<a name="l00696"></a>00696 werr(1, <span class="stringliteral">"The Big Block Depot is damaged"</span>);
-<a name="l00697"></a>00697 }
-<a name="l00698"></a>00698 aulSbdList[iIndex] = ulTmp;
-<a name="l00699"></a>00699 NO_DBG_HEX(aulSbdList[iIndex]);
-<a name="l00700"></a>00700 }
-<a name="l00701"></a>00701 <span class="keywordflow">if</span> (!bGetSBD(pFile, aulSbdList, tBBDLen, aulSBD, tSBDLen)) {
-<a name="l00702"></a>00702 FREE_ALL();
-<a name="l00703"></a>00703 <span class="keywordflow">return</span> -1;
-<a name="l00704"></a>00704 }
-<a name="l00705"></a>00705 aulSbdList = xfree(aulSbdList);
-<a name="l00706"></a>00706 <span class="comment">/* Root list */</span>
-<a name="l00707"></a>00707 <span class="keywordflow">for</span> (tRootListLen = 0, ulTmp = ulRootStartblock;
-<a name="l00708"></a>00708 tRootListLen < tBBDLen && ulTmp != END_OF_CHAIN;
-<a name="l00709"></a>00709 tRootListLen++, ulTmp = aulBBD[ulTmp]) {
-<a name="l00710"></a>00710 <span class="keywordflow">if</span> (ulTmp >= (ULONG)tBBDLen) {
-<a name="l00711"></a>00711 DBG_DEC(ulTmp);
-<a name="l00712"></a>00712 DBG_DEC(tBBDLen);
-<a name="l00713"></a>00713 werr(1, <span class="stringliteral">"The Big Block Depot is damaged"</span>);
-<a name="l00714"></a>00714 }
-<a name="l00715"></a>00715 }
-<a name="l00716"></a>00716 <span class="keywordflow">if</span> (tRootListLen == 0) {
-<a name="l00717"></a>00717 werr(0, <span class="stringliteral">"No Rootlist found"</span>);
-<a name="l00718"></a>00718 FREE_ALL();
-<a name="l00719"></a>00719 <span class="keywordflow">return</span> -1;
-<a name="l00720"></a>00720 }
-<a name="l00721"></a>00721 aulRootList = xcalloc(tRootListLen, <span class="keyword">sizeof</span>(ULONG));
-<a name="l00722"></a>00722 <span class="keywordflow">for</span> (iIndex = 0, ulTmp = ulRootStartblock;
-<a name="l00723"></a>00723 iIndex < (int)tBBDLen && ulTmp != END_OF_CHAIN;
-<a name="l00724"></a>00724 iIndex++, ulTmp = aulBBD[ulTmp]) {
-<a name="l00725"></a>00725 <span class="keywordflow">if</span> (ulTmp >= (ULONG)tBBDLen) {
-<a name="l00726"></a>00726 DBG_DEC(ulTmp);
-<a name="l00727"></a>00727 DBG_DEC(tBBDLen);
-<a name="l00728"></a>00728 werr(1, <span class="stringliteral">"The Big Block Depot is damaged"</span>);
-<a name="l00729"></a>00729 }
-<a name="l00730"></a>00730 aulRootList[iIndex] = ulTmp;
-<a name="l00731"></a>00731 NO_DBG_DEC(aulRootList[iIndex]);
-<a name="l00732"></a>00732 }
-<a name="l00733"></a>00733 fail(tRootListLen != (<span class="keywordtype">size_t</span>)iIndex);
-<a name="l00734"></a>00734 bSuccess = bGetPPS(pFile, aulRootList, tRootListLen, &PPS_info);
-<a name="l00735"></a>00735 aulRootList = xfree(aulRootList);
-<a name="l00736"></a>00736 <span class="keywordflow">if</span> (!bSuccess) {
-<a name="l00737"></a>00737 FREE_ALL();
-<a name="l00738"></a>00738 <span class="keywordflow">return</span> -1;
-<a name="l00739"></a>00739 }
-<a name="l00740"></a>00740 <span class="comment">/* Small block list */</span>
-<a name="l00741"></a>00741 <span class="keywordflow">if</span> (!bCreateSmallBlockList(ulSBLstartblock, aulBBD, tBBDLen)) {
-<a name="l00742"></a>00742 FREE_ALL();
-<a name="l00743"></a>00743 <span class="keywordflow">return</span> -1;
-<a name="l00744"></a>00744 }
-<a name="l00745"></a>00745
-<a name="l00746"></a>00746 <span class="keywordflow">if</span> (PPS_info.tWordDocument.ulSize < MIN_SIZE_FOR_BBD_USE) {
-<a name="l00747"></a>00747 DBG_DEC(PPS_info.tWordDocument.ulSize);
-<a name="l00748"></a>00748 FREE_ALL();
-<a name="l00749"></a>00749 werr(0, <span class="stringliteral">"I'm afraid the text stream of this file "</span>
-<a name="l00750"></a>00750 <span class="stringliteral">"is too small to handle."</span>);
-<a name="l00751"></a>00751 <span class="keywordflow">return</span> -1;
-<a name="l00752"></a>00752 }
-<a name="l00753"></a>00753 <span class="comment">/* Read the headerblock */</span>
-<a name="l00754"></a>00754 <span class="keywordflow">if</span> (!bReadBuffer(pFile, PPS_info.tWordDocument.ulSB,
-<a name="l00755"></a>00755 aulBBD, tBBDLen, BIG_BLOCK_SIZE,
-<a name="l00756"></a>00756 aucHeader, 0, HEADER_SIZE)) {
-<a name="l00757"></a>00757 FREE_ALL();
-<a name="l00758"></a>00758 <span class="keywordflow">return</span> -1;
-<a name="l00759"></a>00759 }
-<a name="l00760"></a>00760 usIdent = usGetWord(0x00, aucHeader);
-<a name="l00761"></a>00761 DBG_HEX(usIdent);
-<a name="l00762"></a>00762 fail(usIdent != 0x8098 && <span class="comment">/* Word 7 for oriental languages */</span>
-<a name="l00763"></a>00763 usIdent != 0x8099 && <span class="comment">/* Word 7 for oriental languages */</span>
-<a name="l00764"></a>00764 usIdent != 0xa5dc && <span class="comment">/* Word 6 & 7 */</span>
-<a name="l00765"></a>00765 usIdent != 0xa5ec && <span class="comment">/* Word 7 & 97 & 98 */</span>
-<a name="l00766"></a>00766 usIdent != 0xa697 && <span class="comment">/* Word 7 for oriental languages */</span>
-<a name="l00767"></a>00767 usIdent != 0xa699); <span class="comment">/* Word 7 for oriental languages */</span>
-<a name="l00768"></a>00768 iWordVersion = iGetVersionNumber(aucHeader);
-<a name="l00769"></a>00769 <span class="keywordflow">if</span> (iWordVersion < 6) {
-<a name="l00770"></a>00770 FREE_ALL();
-<a name="l00771"></a>00771 werr(0, <span class="stringliteral">"This file is from a version of Word before Word 6."</span>);
-<a name="l00772"></a>00772 <span class="keywordflow">return</span> -1;
-<a name="l00773"></a>00773 }
-<a name="l00774"></a>00774
-<a name="l00775"></a>00775 <span class="comment">/* Get the status flags from the header */</span>
-<a name="l00776"></a>00776 usDocStatus = usGetWord(0x0a, aucHeader);
-<a name="l00777"></a>00777 <span class="keywordflow">if</span> (usDocStatus & BIT(9)) {
-<a name="l00778"></a>00778 PPS_info.tTable = PPS_info.t1Table;
-<a name="l00779"></a>00779 } <span class="keywordflow">else</span> {
-<a name="l00780"></a>00780 PPS_info.tTable = PPS_info.t0Table;
-<a name="l00781"></a>00781 }
-<a name="l00782"></a>00782 <span class="comment">/* Clean the entries that should not be used */</span>
-<a name="l00783"></a>00783 memset(&PPS_info.t0Table, 0, <span class="keyword">sizeof</span>(PPS_info.t0Table));
-<a name="l00784"></a>00784 memset(&PPS_info.t1Table, 0, <span class="keyword">sizeof</span>(PPS_info.t1Table));
-<a name="l00785"></a>00785
-<a name="l00786"></a>00786 bSuccess = bGetDocumentText(pFile, &PPS_info,
-<a name="l00787"></a>00787 aulBBD, tBBDLen, aulSBD, tSBDLen,
-<a name="l00788"></a>00788 aucHeader, iWordVersion);
-<a name="l00789"></a>00789 <span class="keywordflow">if</span> (bSuccess) {
-<a name="l00790"></a>00790 vGetDocumentData(pFile, &PPS_info,
-<a name="l00791"></a>00791 aulBBD, tBBDLen, aucHeader, iWordVersion);
-<a name="l00792"></a>00792 vGetPropertyInfo(pFile, &PPS_info,
-<a name="l00793"></a>00793 aulBBD, tBBDLen, aulSBD, tSBDLen,
-<a name="l00794"></a>00794 aucHeader, iWordVersion);
-<a name="l00795"></a>00795 vSetDefaultTabWidth(pFile, &PPS_info,
-<a name="l00796"></a>00796 aulBBD, tBBDLen, aulSBD, tSBDLen,
-<a name="l00797"></a>00797 aucHeader, iWordVersion);
-<a name="l00798"></a>00798 vGetNotesInfo(pFile, &PPS_info,
-<a name="l00799"></a>00799 aulBBD, tBBDLen, aulSBD, tSBDLen,
-<a name="l00800"></a>00800 aucHeader, iWordVersion);
-<a name="l00801"></a>00801 }
-<a name="l00802"></a>00802 FREE_ALL();
-<a name="l00803"></a>00803 <span class="keywordflow">return</span> bSuccess ? iWordVersion : -1;
-<a name="l00804"></a>00804 } <span class="comment">/* end of iInitDocumentOLE */</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>