* Copyright (C) 1998-2005 A.J. van Os; Released under GNU GPL

/*
* prop8.c
* Copyright (C) 1998-2005 A.J. van Os; Released under GNU GPL
*
* Description:
* Read the property information from a MS Word 8, 9,10 or 11 file
*
* Word 8 is better known as Word 97 or as Word 98 for Mac
* Word 9 is better known as Word 2000 or as Word 2001 for Mac
* Word 10 is better known as Word 2002 or as Word XP
* Word 11 is better known as Word 2003
*/

#include <stdlib.h>
#include <string.h>
#include "antiword.h"

#define DEFAULT_LISTCHAR 0x002e /* A full stop */

/*
* iGet8InfoLength - the length of the information for Word 8/9/10/11 files
*/
static int
iGet8InfoLength(int iByteNbr, const UCHAR *aucGrpprl)
{
int iTmp, iDel, iAdd;
USHORT usOpCode;

usOpCode = usGetWord(iByteNbr, aucGrpprl);

switch (usOpCode & 0xe000) {
case 0x0000: case 0x2000:
return 3;
case 0x4000: case 0x8000: case 0xa000:
return 4;
case 0xe000:
return 5;
case 0x6000:
return 6;
case 0xc000:
iTmp = (int)ucGetByte(iByteNbr + 2, aucGrpprl);
if (usOpCode == 0xc615 && iTmp == 255) {
iDel = (int)ucGetByte(iByteNbr + 3, aucGrpprl);
iAdd = (int)ucGetByte(
iByteNbr + 4 + iDel * 4, aucGrpprl);
iTmp = 2 + iDel * 4 + iAdd * 3;
}
return 3 + iTmp;
default:
DBG_HEX(usOpCode);
DBG_FIXME();
return 1;
}
} /* end of iGet8InfoLength */

/*
* aucFillInfoBuffer - fill the information buffer
*
* Returns the information buffer when successful, otherwise NULL
*/
static UCHAR *
aucFillInfoBuffer(FILE *pFile, const pps_type *pTable,
const ULONG *aulBBD, size_t tBBDLen,
const ULONG *aulSBD, size_t tSBDLen,
ULONG ulBeginInfo, size_t tInfoLen)
{
const ULONG *aulBlockDepot;
UCHAR *aucBuffer;
size_t tBlockDepotLen, tBlockSize;

fail(pFile == NULL || pTable == NULL);
fail(aulBBD == NULL || aulSBD == NULL);
fail(tInfoLen == 0);

NO_DBG_DEC(pTable->ulSB);
NO_DBG_HEX(pTable->ulSize);
if (pTable->ulSize == 0) {
DBG_MSG("No information");
return NULL;
}

if (pTable->ulSize < MIN_SIZE_FOR_BBD_USE) {
/* Use the Small Block Depot */
aulBlockDepot = aulSBD;
tBlockDepotLen = tSBDLen;
tBlockSize = SMALL_BLOCK_SIZE;
} else {
/* Use the Big Block Depot */
aulBlockDepot = aulBBD;
tBlockDepotLen = tBBDLen;
tBlockSize = BIG_BLOCK_SIZE;
}
aucBuffer = xmalloc(tInfoLen);
if (!bReadBuffer(pFile, pTable->ulSB,
aulBlockDepot, tBlockDepotLen, tBlockSize,
aucBuffer, ulBeginInfo, tInfoLen)) {
aucBuffer = xfree(aucBuffer);
return NULL;
}
return aucBuffer;
} /* end of aucFillInfoBuffer */

/*
* Build the lists with Document Property Information for Word 8/9/10/11 files
*/
void
vGet8DopInfo(FILE *pFile, const pps_type *pTable,
const ULONG *aulBBD, size_t tBBDLen,
const ULONG *aulSBD, size_t tSBDLen,
const UCHAR *aucHeader)
{
document_block_type tDocument;
UCHAR *aucBuffer;
ULONG ulBeginDocpInfo, ulTmp;
size_t tDocpInfoLen;
USHORT usTmp;

fail(pFile == NULL || pTable == NULL || aucHeader == NULL);
fail(aulBBD == NULL || aulSBD == NULL);

ulBeginDocpInfo = ulGetLong(0x192, aucHeader); /* fcDop */
NO_DBG_HEX(ulBeginSectInfo);
tDocpInfoLen = (size_t)ulGetLong(0x196, aucHeader); /* lcbDop */
NO_DBG_DEC(tSectInfoLen);
if (tDocpInfoLen < 28) {
DBG_MSG("No Document information");
return;
}

aucBuffer = aucFillInfoBuffer(pFile, pTable,
aulBBD, tBBDLen, aulSBD, tSBDLen,
ulBeginDocpInfo, tDocpInfoLen);
if (aucBuffer == NULL) {
return;
}

usTmp = usGetWord(0x00, aucBuffer);
tDocument.ucHdrFtrSpecification = (UCHAR)(usTmp >> 8); /* grpfIhdt */
tDocument.usDefaultTabWidth = usGetWord(0x0a, aucBuffer); /* dxaTab */
ulTmp = ulGetLong(0x14, aucBuffer); /* dttmCreated */
tDocument.tCreateDate = tConvertDTTM(ulTmp);
ulTmp = ulGetLong(0x18, aucBuffer); /* dttmRevised */
tDocument.tRevisedDate = tConvertDTTM(ulTmp);
vCreateDocumentInfoList(&tDocument);

aucBuffer = xfree(aucBuffer);
} /* end of vGet8DopInfo */

/*
* Fill the section information block with information
* from a Word 8/9/10/11 file.
*/
static void
vGet8SectionInfo(const UCHAR *aucGrpprl, size_t tBytes,
section_block_type *pSection)
{
UINT uiIndex;
int iFodoOff, iInfoLen, iSize, iTmp;
USHORT usCcol;
UCHAR ucTmp;

fail(aucGrpprl == NULL || pSection == NULL);

iFodoOff = 0;
while (tBytes >= (size_t)iFodoOff + 2) {
iInfoLen = 0;
switch (usGetWord(iFodoOff, aucGrpprl)) {
case 0x3009: /* bkc */
ucTmp = ucGetByte(iFodoOff + 2, aucGrpprl);
DBG_DEC(ucTmp);
pSection->bNewPage = ucTmp != 0 && ucTmp != 1;
break;
case 0x3014: /* grpfIhdt */
pSection->ucHdrFtrSpecification =
ucGetByte(iFodoOff + 2, aucGrpprl);
break;
case 0x500b: /* ccolM1 */
usCcol = 1 + usGetWord(iFodoOff + 2, aucGrpprl);
DBG_DEC(usCcol);
break;
case 0xd202: /* olstAnm */
iSize = (int)ucGetByte(iFodoOff + 2, aucGrpprl);
DBG_DEC_C(iSize != 212, iSize);
for (uiIndex = 0, iTmp = iFodoOff + 3;
uiIndex < 9 && iTmp < iFodoOff + 3 + iSize - 15;
uiIndex++, iTmp += 16) {
pSection->aucNFC[uiIndex] =
ucGetByte(iTmp, aucGrpprl);
DBG_DEC(pSection->aucNFC[uiIndex]);
ucTmp = ucGetByte(iTmp + 3, aucGrpprl);
DBG_HEX(ucTmp);
if ((ucTmp & BIT(2)) != 0) {
pSection->usNeedPrevLvl |=
(USHORT)BIT(uiIndex);
}
if ((ucTmp & BIT(3)) != 0) {
pSection->usHangingIndent |=
(USHORT)BIT(uiIndex);
}
}
DBG_HEX(pSection->usNeedPrevLvl);
DBG_HEX(pSection->usHangingIndent);
break;
default:
break;
}
if (iInfoLen <= 0) {
iInfoLen = iGet8InfoLength(iFodoOff, aucGrpprl);
fail(iInfoLen <= 0);
}
iFodoOff += iInfoLen;
}
} /* end of vGet8SectionInfo */

/*
* Build the lists with Section Property Information for Word 8/9/10/11 files
*/
void
vGet8SepInfo(FILE *pFile, const pps_info_type *pPPS,
const ULONG *aulBBD, size_t tBBDLen,
const ULONG *aulSBD, size_t tSBDLen,
const UCHAR *aucHeader)
{
section_block_type tSection;
ULONG *aulSectPage, *aulCharPos;
UCHAR *aucBuffer, *aucFpage;
ULONG ulBeginOfText, ulTextOffset, ulBeginSectInfo;
size_t tSectInfoLen, tIndex, tOffset, tLen, tBytes;
UCHAR aucTmp[2];

fail(pFile == NULL || pPPS == NULL || aucHeader == NULL);
fail(aulBBD == NULL || aulSBD == NULL);

ulBeginOfText = ulGetLong(0x18, aucHeader); /* fcMin */
NO_DBG_HEX(ulBeginOfText);
ulBeginSectInfo = ulGetLong(0xca, aucHeader); /* fcPlcfsed */
NO_DBG_HEX(ulBeginSectInfo);
tSectInfoLen = (size_t)ulGetLong(0xce, aucHeader); /* lcbPlcfsed */
NO_DBG_DEC(tSectInfoLen);
if (tSectInfoLen < 4) {
DBG_DEC(tSectInfoLen);
return;
}

aucBuffer = aucFillInfoBuffer(pFile, &pPPS->tTable,
aulBBD, tBBDLen, aulSBD, tSBDLen,
ulBeginSectInfo, tSectInfoLen);
if (aucBuffer == NULL) {
return;
}
NO_DBG_PRINT_BLOCK(aucBuffer, tSectInfoLen);

/* Read the Section Descriptors */
tLen = (tSectInfoLen - 4) / 16;
/* Save the section offsets */
aulCharPos = xcalloc(tLen, sizeof(ULONG));
for (tIndex = 0, tOffset = 0;
tIndex < tLen;
tIndex++, tOffset += 4) {
ulTextOffset = ulGetLong(tOffset, aucBuffer);
NO_DBG_HEX(ulTextOffset);
aulCharPos[tIndex] = ulBeginOfText + ulTextOffset;
NO_DBG_HEX(aulCharPos[tIndex]);
}
/* Save the Sepx offsets */
aulSectPage = xcalloc(tLen, sizeof(ULONG));
for (tIndex = 0, tOffset = (tLen + 1) * 4;
tIndex < tLen;
tIndex++, tOffset += 12) {
aulSectPage[tIndex] = ulGetLong(tOffset + 2, aucBuffer);
NO_DBG_HEX(aulSectPage[tIndex]); /* fcSepx */
}
aucBuffer = xfree(aucBuffer);

/* Read the Section Properties */
for (tIndex = 0; tIndex < tLen; tIndex++) {
if (aulSectPage[tIndex] == FC_INVALID) {
vDefault2SectionInfoList(aulCharPos[tIndex]);
continue;
}
/* Get the number of bytes to read */
if (!bReadBuffer(pFile, pPPS->tWordDocument.ulSB,
aulBBD, tBBDLen, BIG_BLOCK_SIZE,
aucTmp, aulSectPage[tIndex], 2)) {
continue;
}
tBytes = 2 + (size_t)usGetWord(0, aucTmp);
NO_DBG_DEC(tBytes);
/* Read the bytes */
aucFpage = xmalloc(tBytes);
if (!bReadBuffer(pFile, pPPS->tWordDocument.ulSB,
aulBBD, tBBDLen, BIG_BLOCK_SIZE,
aucFpage, aulSectPage[tIndex], tBytes)) {
aucFpage = xfree(aucFpage);
continue;
}
NO_DBG_PRINT_BLOCK(aucFpage, tBytes);
/* Process the bytes */
vGetDefaultSection(&tSection);
vGet8SectionInfo(aucFpage + 2, tBytes - 2, &tSection);
vAdd2SectionInfoList(&tSection, aulCharPos[tIndex]);
aucFpage = xfree(aucFpage);
}
aulCharPos = xfree(aulCharPos);
aulSectPage = xfree(aulSectPage);
} /* end of vGet8SepInfo */

/*
* Build the list with Header/Footer Information for Word 8/9/10/11 files
*/
void
vGet8HdrFtrInfo(FILE *pFile, const pps_type *pTable,
const ULONG *aulBBD, size_t tBBDLen,
const ULONG *aulSBD, size_t tSBDLen,
const UCHAR *aucHeader)
{
ULONG *aulCharPos;
UCHAR *aucBuffer;
ULONG ulHdrFtrOffset, ulBeginHdrFtrInfo;
size_t tHdrFtrInfoLen, tIndex, tOffset, tLen;

fail(pFile == NULL || pTable == NULL || aucHeader == NULL);
fail(aulBBD == NULL || aulSBD == NULL);

ulBeginHdrFtrInfo = ulGetLong(0xf2, aucHeader); /* fcPlcfhdd */
NO_DBG_HEX(ulBeginHdrFtrInfo);
tHdrFtrInfoLen = (size_t)ulGetLong(0xf6, aucHeader); /* lcbPlcfhdd */
NO_DBG_DEC(tHdrFtrInfoLen);
if (tHdrFtrInfoLen < 8) {
DBG_DEC_C(tHdrFtrInfoLen != 0, tHdrFtrInfoLen);
return;
}

aucBuffer = aucFillInfoBuffer(pFile, pTable,
aulBBD, tBBDLen, aulSBD, tSBDLen,
ulBeginHdrFtrInfo, tHdrFtrInfoLen);
if (aucBuffer == NULL) {
return;
}
NO_DBG_PRINT_BLOCK(aucBuffer, tHdrFtrInfoLen);

tLen = tHdrFtrInfoLen / 4 - 1;
DBG_DEC_C(tLen % 12 != 1 && tLen % 12 != 7, tLen);
/* Save the header/footer offsets */
aulCharPos = xcalloc(tLen, sizeof(ULONG));
for (tIndex = 0, tOffset = 0;
tIndex < tLen;
tIndex++, tOffset += 4) {
ulHdrFtrOffset = ulGetLong(tOffset, aucBuffer);
NO_DBG_HEX(ulHdrFtrOffset);
aulCharPos[tIndex] = ulHdrFtrOffset2CharPos(ulHdrFtrOffset);
NO_DBG_HEX(aulCharPos[tIndex]);
}
vCreat8HdrFtrInfoList(aulCharPos, tLen);
/* Clean up and leave */
aulCharPos = xfree(aulCharPos);
aucBuffer = xfree(aucBuffer);
} /* end of vGet8HdrFtrInfo */

/*
* Translate the rowinfo to a member of the row_info enumeration
*/
row_info_enum
eGet8RowInfo(int iFodo,
const UCHAR *aucGrpprl, int iBytes, row_block_type *pRow)
{
int iFodoOff, iInfoLen;
int iIndex, iSize, iCol;
int iPosCurr, iPosPrev;
USHORT usTmp;
BOOL bFound2416_0, bFound2416_1, bFound2417_0, bFound2417_1;
BOOL bFound244b_0, bFound244b_1, bFound244c_0, bFound244c_1;
BOOL bFoundd608;

fail(iFodo < 0 || aucGrpprl == NULL || pRow == NULL);

iFodoOff = 0;
bFound2416_0 = FALSE;
bFound2416_1 = FALSE;
bFound2417_0 = FALSE;
bFound2417_1 = FALSE;
bFound244b_0 = FALSE;
bFound244b_1 = FALSE;
bFound244c_0 = FALSE;
bFound244c_1 = FALSE;
bFoundd608 = FALSE;
while (iBytes >= iFodoOff + 2) {
iInfoLen = 0;
switch (usGetWord(iFodo + iFodoOff, aucGrpprl)) {
case 0x2416: /* fInTable */
if (odd(ucGetByte(iFodo + iFodoOff + 2, aucGrpprl))) {
bFound2416_1 = TRUE;
} else {
bFound2416_0 = TRUE;
}
break;
case 0x2417: /* fTtp */
if (odd(ucGetByte(iFodo + iFodoOff + 2, aucGrpprl))) {
bFound2417_1 = TRUE;
} else {
bFound2417_0 = TRUE;
}
break;
case 0x244b: /* sub-table fInTable */
if (odd(ucGetByte(iFodo + iFodoOff + 2, aucGrpprl))) {
bFound244b_1 = TRUE;
} else {
bFound244b_0 = TRUE;
}
break;
case 0x244c: /* sub-table fTtp */
if (odd(ucGetByte(iFodo + iFodoOff + 2, aucGrpprl))) {
bFound244c_1 = TRUE;
} else {
bFound244c_0 = TRUE;
}
break;
case 0x6424: /* brcTop */
usTmp = usGetWord(iFodo + iFodoOff + 2, aucGrpprl);
usTmp &= 0xff00;
NO_DBG_DEC(usTmp >> 8);
if (usTmp == 0) {
pRow->ucBorderInfo &= ~TABLE_BORDER_TOP;
} else {
pRow->ucBorderInfo |= TABLE_BORDER_TOP;
}
break;
case 0x6425: /* brcLeft */
usTmp = usGetWord(iFodo + iFodoOff + 2, aucGrpprl);
usTmp &= 0xff00;
NO_DBG_DEC(usTmp >> 8);
if (usTmp == 0) {
pRow->ucBorderInfo &= ~TABLE_BORDER_LEFT;
} else {
pRow->ucBorderInfo |= TABLE_BORDER_LEFT;
}
break;
case 0x6426: /* brcBottom */
usTmp = usGetWord(iFodo + iFodoOff + 2, aucGrpprl);
usTmp &= 0xff00;
NO_DBG_DEC(usTmp >> 8);
if (usTmp == 0) {
pRow->ucBorderInfo &= ~TABLE_BORDER_BOTTOM;
} else {
pRow->ucBorderInfo |= TABLE_BORDER_BOTTOM;
}
break;
case 0x6427: /* brcRight */
usTmp = usGetWord(iFodo + iFodoOff + 2, aucGrpprl);
usTmp &= 0xff00;
NO_DBG_DEC(usTmp >> 8);
if (usTmp == 0) {
pRow->ucBorderInfo &= ~TABLE_BORDER_RIGHT;
} else {
pRow->ucBorderInfo |= TABLE_BORDER_RIGHT;
}
break;
case 0xd606: /* cDefTable10 */
DBG_MSG("0xd606: sprmTDefTable10");
iSize = (int)usGetWord(iFodo + iFodoOff + 2, aucGrpprl);
DBG_DEC(iSize);
break;
case 0xd608: /* cDefTable */
iSize = (int)usGetWord(iFodo + iFodoOff + 2, aucGrpprl);
if (iSize < 6 || iBytes < iFodoOff + 8) {
DBG_DEC(iSize);
DBG_DEC(iFodoOff);
iInfoLen = 2;
break;
}
iCol = (int)ucGetByte(iFodo + iFodoOff + 4, aucGrpprl);
if (iCol < 1 ||
iBytes < iFodoOff + 4 + (iCol + 1) * 2) {
DBG_DEC(iCol);
DBG_DEC(iFodoOff);
iInfoLen = 2;
break;
}
if (iCol >= (int)elementsof(pRow->asColumnWidth)) {
DBG_DEC(iCol);
werr(1, "The number of columns is corrupt");
}
pRow->ucNumberOfColumns = (UCHAR)iCol;
iPosPrev = (int)(short)usGetWord(
iFodo + iFodoOff + 5,
aucGrpprl);
for (iIndex = 0; iIndex < iCol; iIndex++) {
iPosCurr = (int)(short)usGetWord(
iFodo + iFodoOff + 7 + iIndex * 2,
aucGrpprl);
pRow->asColumnWidth[iIndex] =
(short)(iPosCurr - iPosPrev);
iPosPrev = iPosCurr;
}
bFoundd608 = TRUE;
break;
default:
break;
}
if (iInfoLen <= 0) {
iInfoLen =
iGet8InfoLength(iFodo + iFodoOff, aucGrpprl);
fail(iInfoLen <= 0);
}
iFodoOff += iInfoLen;
}

if (bFound2417_1 && bFoundd608) {
return found_end_of_row;
}
if (bFound2417_0 && !bFoundd608) {
return found_not_end_of_row;
}
if (bFound2416_1 || bFound244b_1) {
return found_a_cell;
}
if (bFound2416_0 || bFound244b_0) {
return found_not_a_cell;
}
return found_nothing;
} /* end of eGet8RowInfo */

/*
* Fill the style information block with information
* from a Word 8/9/10/11 file.
*/
void
vGet8StyleInfo(int iFodo,
const UCHAR *aucGrpprl, int iBytes, style_block_type *pStyle)
{
list_block_type tList6;
const list_block_type *pList;
int iFodoOff, iInfoLen;
int iTmp, iDel, iAdd, iBefore;
USHORT usOpCode, usTmp;
short sTmp;

fail(iFodo < 0 || aucGrpprl == NULL || pStyle == NULL);

NO_DBG_DEC_C(pStyle->usListIndex != 0, pStyle->usIstd);
NO_DBG_DEC_C(pStyle->usListIndex != 0, pStyle->usListIndex);

(void)memset(&tList6, 0, sizeof(tList6));

iFodoOff = 0;
while (iBytes >= iFodoOff + 2) {
iInfoLen = 0;
usOpCode = usGetWord(iFodo + iFodoOff, aucGrpprl);
switch (usOpCode) {
case 0x2403: /* jc */
pStyle->ucAlignment = ucGetByte(
iFodo + iFodoOff + 2, aucGrpprl);
break;
case 0x260a: /* ilvl */
pStyle->ucListLevel =
ucGetByte(iFodo + iFodoOff + 2, aucGrpprl);
NO_DBG_DEC(pStyle->ucListLevel);
pStyle->ucNumLevel = pStyle->ucListLevel;
break;
case 0x4600: /* istd */
usTmp = usGetWord(iFodo + iFodoOff + 2, aucGrpprl);
NO_DBG_DEC(usTmp);
break;
case 0x460b: /* ilfo */
pStyle->usListIndex =
usGetWord(iFodo + iFodoOff + 2, aucGrpprl);
NO_DBG_DEC(pStyle->usListIndex);
break;
case 0x4610: /* Nest dxaLeft */
sTmp = (short)usGetWord(
iFodo + iFodoOff + 2, aucGrpprl);
pStyle->sLeftIndent += sTmp;
if (pStyle->sLeftIndent < 0) {
pStyle->sLeftIndent = 0;
}
DBG_DEC(sTmp);
DBG_DEC(pStyle->sLeftIndent);
break;
case 0xc60d: /* ChgTabsPapx */
case 0xc615: /* ChgTabs */
iTmp = (int)ucGetByte(iFodo + iFodoOff + 2, aucGrpprl);
if (iTmp < 2) {
iInfoLen = 1;
break;
}
NO_DBG_DEC(iTmp);
iDel = (int)ucGetByte(iFodo + iFodoOff + 3, aucGrpprl);
if (iTmp < 2 + 2 * iDel) {
iInfoLen = 1;
break;
}
NO_DBG_DEC(iDel);
iAdd = (int)ucGetByte(
iFodo + iFodoOff + 4 + 2 * iDel, aucGrpprl);
if (iTmp < 2 + 2 * iDel + 2 * iAdd) {
iInfoLen = 1;
break;
}
NO_DBG_DEC(iAdd);
break;
case 0x840e: /* dxaRight */
pStyle->sRightIndent = (short)usGetWord(
iFodo + iFodoOff + 2, aucGrpprl);
NO_DBG_DEC(pStyle->sRightIndent);
break;
case 0x840f: /* dxaLeft */
pStyle->sLeftIndent = (short)usGetWord(
iFodo + iFodoOff + 2, aucGrpprl);
NO_DBG_DEC(pStyle->sLeftIndent);
break;
case 0x8411: /* dxaLeft1 */
pStyle->sLeftIndent1 = (short)usGetWord(
iFodo + iFodoOff + 2, aucGrpprl);
NO_DBG_DEC(pStyle->sLeftIndent1);
break;
case 0xa413: /* dyaBefore */
pStyle->usBeforeIndent = usGetWord(
iFodo + iFodoOff + 2, aucGrpprl);
NO_DBG_DEC(pStyle->usBeforeIndent);
break;
case 0xa414: /* dyaAfter */
pStyle->usAfterIndent = usGetWord(
iFodo + iFodoOff + 2, aucGrpprl);
NO_DBG_DEC(pStyle->usAfterIndent);
break;
case 0xc63e: /* anld */
iTmp = (int)ucGetByte(
iFodo + iFodoOff + 2, aucGrpprl);
DBG_DEC_C(iTmp < 84, iTmp);
if (iTmp >= 1) {
tList6.ucNFC = ucGetByte(
iFodo + iFodoOff + 3, aucGrpprl);
}
if (tList6.ucNFC != LIST_BULLETS && iTmp >= 2) {
iBefore = (int)ucGetByte(
iFodo + iFodoOff + 4, aucGrpprl);
} else {
iBefore = 0;
}
if (iTmp >= 12) {
tList6.ulStartAt = (ULONG)usGetWord(
iFodo + iFodoOff + 13, aucGrpprl);
}
if (iTmp >= iBefore + 22) {
tList6.usListChar = usGetWord(
iFodo + iFodoOff + iBefore + 23,
aucGrpprl);
DBG_HEX(tList6.usListChar);
}
break;
default:
NO_DBG_HEX(usOpCode);
break;
}
if (iInfoLen <= 0) {
iInfoLen =
iGet8InfoLength(iFodo + iFodoOff, aucGrpprl);
fail(iInfoLen <= 0);
}
iFodoOff += iInfoLen;
}

if (pStyle->usListIndex == 2047) {
/* Old style list */
pStyle->usStartAt = (USHORT)tList6.ulStartAt;
pStyle->usListChar = tList6.usListChar;
pStyle->ucNFC = tList6.ucNFC;
} else {
/* New style list */
pList = pGetListInfo(pStyle->usListIndex, pStyle->ucListLevel);
if (pList != NULL) {
pStyle->bNoRestart = pList->bNoRestart;
fail(pList->ulStartAt > (ULONG)USHRT_MAX);
pStyle->usStartAt = (USHORT)pList->ulStartAt;
pStyle->usListChar = pList->usListChar;
pStyle->ucNFC = pList->ucNFC;
if (pStyle->sLeftIndent <= 0) {
pStyle->sLeftIndent = pList->sLeftIndent;
}
}
}
} /* end of vGet8StyleInfo */

/*
* Get the left indentation value from the style information block
*
* Returns the value when found, otherwise 0
*/
static short
sGetLeftIndent(const UCHAR *aucGrpprl, size_t tBytes)
{
int iOffset, iInfoLen;
USHORT usOpCode, usTmp;

fail(aucGrpprl == NULL);

iOffset = 0;
while (tBytes >= (size_t)iOffset + 4) {
usOpCode = usGetWord(iOffset, aucGrpprl);
if (usOpCode == 0x840f) { /* dxaLeft */
usTmp = usGetWord(iOffset + 2, aucGrpprl);
if (usTmp <= 0x7fff) {
NO_DBG_DEC(usTmp);
return (short)usTmp;
}
}
iInfoLen = iGet8InfoLength(iOffset, aucGrpprl);
fail(iInfoLen <= 0);
iOffset += iInfoLen;
}
return 0;
} /* end of sGetLeftIndent */

/*
* Build the list with List Information for Word 8/9/10/11 files
*/
void
vGet8LstInfo(FILE *pFile, const pps_info_type *pPPS,
const ULONG *aulBBD, size_t tBBDLen,
const ULONG *aulSBD, size_t tSBDLen,
const UCHAR *aucHeader)
{
list_block_type tList;
const ULONG *aulBlockDepot;
UCHAR *aucLfoInfo, *aucLstfInfo, *aucPapx, *aucXString;
ULONG ulBeginLfoInfo, ulBeginLstfInfo, ulBeginLvlfInfo;
ULONG ulListID, ulStart;
size_t tBlockDepotLen, tBlockSize;
size_t tLfoInfoLen, tLstfInfoLen, tPapxLen, tXstLen, tOff;
size_t tLstfRecords, tStart, tIndex;
int iNums;
USHORT usIstd;
UCHAR ucTmp, ucListLevel, ucMaxLevel, ucChpxLen;
UCHAR aucLvlfInfo[28], aucXst[2];

fail(pFile == NULL || pPPS == NULL || aucHeader == NULL);
fail(aulBBD == NULL || aulSBD == NULL);

NO_DBG_DEC(pPPS->tTable.ulSB);
NO_DBG_HEX(pPPS->tTable.ulSize);
if (pPPS->tTable.ulSize == 0) {
DBG_MSG("No list information");
return;
}

if (pPPS->tTable.ulSize < MIN_SIZE_FOR_BBD_USE) {
/* Use the Small Block Depot */
aulBlockDepot = aulSBD;
tBlockDepotLen = tSBDLen;
tBlockSize = SMALL_BLOCK_SIZE;
} else {
/* Use the Big Block Depot */
aulBlockDepot = aulBBD;
tBlockDepotLen = tBBDLen;
tBlockSize = BIG_BLOCK_SIZE;
}

/* LFO (List Format Override) */
ulBeginLfoInfo = ulGetLong(0x2ea, aucHeader); /* fcPlfLfo */
DBG_HEX(ulBeginLfoInfo);
tLfoInfoLen = (size_t)ulGetLong(0x2ee, aucHeader); /* lcbPlfLfo */
DBG_DEC(tLfoInfoLen);
if (tLfoInfoLen == 0) {
DBG_MSG("No lists in this document");
return;
}

aucLfoInfo = xmalloc(tLfoInfoLen);
if (!bReadBuffer(pFile, pPPS->tTable.ulSB,
aulBlockDepot, tBlockDepotLen, tBlockSize,
aucLfoInfo, ulBeginLfoInfo, tLfoInfoLen)) {
aucLfoInfo = xfree(aucLfoInfo);
return;
}
NO_DBG_PRINT_BLOCK(aucLfoInfo, tLfoInfoLen);
vBuildLfoList(aucLfoInfo, tLfoInfoLen);
aucLfoInfo = xfree(aucLfoInfo);

/* LSTF (LiST data on File) */
ulBeginLstfInfo = ulGetLong(0x2e2, aucHeader); /* fcPlcfLst */
DBG_HEX(ulBeginLstfInfo);
tLstfInfoLen = (size_t)ulGetLong(0x2e6, aucHeader); /* lcbPlcfLst */
DBG_DEC(tLstfInfoLen);
if (tLstfInfoLen == 0) {
DBG_MSG("No list data on file");
return;
}

aucLstfInfo = xmalloc(tLstfInfoLen);
if (!bReadBuffer(pFile, pPPS->tTable.ulSB,
aulBlockDepot, tBlockDepotLen, tBlockSize,
aucLstfInfo, ulBeginLstfInfo, tLstfInfoLen)) {
aucLstfInfo = xfree(aucLstfInfo);
return;
}
NO_DBG_PRINT_BLOCK(aucLstfInfo, tLstfInfoLen);

tLstfRecords = (size_t)usGetWord(0, aucLstfInfo);
if (2 + tLstfRecords * 28 < tLstfInfoLen) {
DBG_DEC(2 + tLstfRecords * 28);
DBG_DEC(tLstfInfoLen);
aucLstfInfo = xfree(aucLstfInfo);
return;
}

/* LVLF (List leVeL on File) */
ulBeginLvlfInfo = ulBeginLstfInfo + tLstfInfoLen;
DBG_HEX(ulBeginLvlfInfo);

aucXString = NULL;
ulStart = ulBeginLvlfInfo;

for (tIndex = 0, tStart = 2;
tIndex < tLstfRecords;
tIndex++, tStart += 28) {
ulListID = ulGetLong(tStart, aucLstfInfo);
NO_DBG_HEX(ulListID);
ucTmp = ucGetByte(tStart + 26, aucLstfInfo);
ucMaxLevel = odd(ucTmp) ? 1 : 9;
for (ucListLevel = 0; ucListLevel < ucMaxLevel; ucListLevel++) {
fail(aucXString != NULL);
usIstd = usGetWord(
tStart + 8 + 2 * (size_t)ucListLevel,
aucLstfInfo);
DBG_DEC_C(usIstd != STI_NIL, usIstd);
NO_DBG_HEX(ulStart);
(void)memset(&tList, 0, sizeof(tList));
/* Read the lvlf (List leVeL on File) */
if (!bReadBuffer(pFile, pPPS->tTable.ulSB,
aulBlockDepot, tBlockDepotLen,
tBlockSize, aucLvlfInfo,
ulStart, sizeof(aucLvlfInfo))) {
aucLstfInfo = xfree(aucLstfInfo);
return;
}
NO_DBG_PRINT_BLOCK(aucLvlfInfo, sizeof(aucLvlfInfo));
if (bAllZero(aucLvlfInfo, sizeof(aucLvlfInfo))) {
tList.ulStartAt = 1;
tList.ucNFC = 0x00;
tList.bNoRestart = FALSE;
} else {
tList.ulStartAt = ulGetLong(0, aucLvlfInfo);
tList.ucNFC = ucGetByte(4, aucLvlfInfo);
ucTmp = ucGetByte(5, aucLvlfInfo);
tList.bNoRestart = (ucTmp & BIT(3)) != 0;
DBG_MSG_C((ucTmp & BIT(4)) != 0 &&
(ucTmp & BIT(6)) != 0, "Found one");
}
ulStart += sizeof(aucLvlfInfo);
tPapxLen = (size_t)ucGetByte(25, aucLvlfInfo);
if (tPapxLen != 0) {
aucPapx = xmalloc(tPapxLen);
/* Read the Papx */
if (!bReadBuffer(pFile, pPPS->tTable.ulSB,
aulBlockDepot, tBlockDepotLen,
tBlockSize, aucPapx,
ulStart, tPapxLen)) {
aucPapx = xfree(aucPapx);
aucLstfInfo = xfree(aucLstfInfo);
return;
}
NO_DBG_PRINT_BLOCK(aucPapx, tPapxLen);
tList.sLeftIndent =
sGetLeftIndent(aucPapx, tPapxLen);
aucPapx = xfree(aucPapx);
}
ulStart += tPapxLen;
ucChpxLen = ucGetByte(24, aucLvlfInfo);
ulStart += (ULONG)ucChpxLen;
/* Read the length of the XString */
if (!bReadBuffer(pFile, pPPS->tTable.ulSB,
aulBlockDepot, tBlockDepotLen,
tBlockSize, aucXst,
ulStart, sizeof(aucXst))) {
aucLstfInfo = xfree(aucLstfInfo);
return;
}
NO_DBG_PRINT_BLOCK(aucXst, sizeof(aucXst));
tXstLen = (size_t)usGetWord(0, aucXst);
ulStart += sizeof(aucXst);
if (tXstLen == 0) {
tList.usListChar = DEFAULT_LISTCHAR;
vAdd2ListInfoList(ulListID,
usIstd,
ucListLevel,
&tList);
continue;
}
tXstLen *= 2; /* Length in chars to length in bytes */
aucXString = xmalloc(tXstLen);
/* Read the XString */
if (!bReadBuffer(pFile, pPPS->tTable.ulSB,
aulBlockDepot, tBlockDepotLen,
tBlockSize, aucXString,
ulStart, tXstLen)) {
aucXString = xfree(aucXString);
aucLstfInfo = xfree(aucLstfInfo);
return;
}
NO_DBG_PRINT_BLOCK(aucXString, tXstLen);
tOff = 0;
for (iNums = 6; iNums < 15; iNums++) {
ucTmp = ucGetByte(iNums, aucLvlfInfo);
if (ucTmp == 0) {
break;
}
tOff = (size_t)ucTmp;
}
tOff *= 2; /* Offset in chars to offset in bytes */
NO_DBG_DEC(tOff);
if (tList.ucNFC == LIST_SPECIAL ||
tList.ucNFC == LIST_SPECIAL2 ||
tList.ucNFC == LIST_BULLETS) {
tList.usListChar = usGetWord(0, aucXString);
} else if (tOff != 0 && tOff < tXstLen) {
tList.usListChar = usGetWord(tOff, aucXString);
} else {
tList.usListChar = DEFAULT_LISTCHAR;
}
vAdd2ListInfoList(ulListID,
usIstd,
ucListLevel,
&tList);
ulStart += tXstLen;
aucXString = xfree(aucXString);
}
}
aucLstfInfo = xfree(aucLstfInfo);
} /* end of vGet8LstInfo */

/*
* Build the lists with Paragraph Information for Word 8/9/10/11 files
*/
void
vGet8PapInfo(FILE *pFile, const pps_info_type *pPPS,
const ULONG *aulBBD, size_t tBBDLen,
const ULONG *aulSBD, size_t tSBDLen,
const UCHAR *aucHeader)
{
row_block_type tRow;
style_block_type tStyle;
ULONG *aulParfPage;
UCHAR *aucBuffer;
ULONG ulCharPos, ulCharPosFirst, ulCharPosLast;
ULONG ulBeginParfInfo;
size_t tParfInfoLen, tOffset, tLen;
int iIndex, iIndex2, iRun, iFodo, iLen;
row_info_enum eRowInfo;
USHORT usIstd;
UCHAR aucFpage[BIG_BLOCK_SIZE];

fail(pFile == NULL || pPPS == NULL || aucHeader == NULL);
fail(aulBBD == NULL || aulSBD == NULL);

ulBeginParfInfo = ulGetLong(0x102, aucHeader); /* fcPlcfbtePapx */
NO_DBG_HEX(ulBeginParfInfo);
tParfInfoLen = (size_t)ulGetLong(0x106, aucHeader); /* lcbPlcfbtePapx */
NO_DBG_DEC(tParfInfoLen);
if (tParfInfoLen < 4) {
DBG_DEC(tParfInfoLen);
return;
}

aucBuffer = aucFillInfoBuffer(pFile, &pPPS->tTable,
aulBBD, tBBDLen, aulSBD, tSBDLen,
ulBeginParfInfo, tParfInfoLen);
if (aucBuffer == NULL) {
return;
}
NO_DBG_PRINT_BLOCK(aucBuffer, tParfInfoLen);

tLen = (tParfInfoLen / 4 - 1) / 2;
aulParfPage = xcalloc(tLen, sizeof(ULONG));
for (iIndex = 0, tOffset = (tLen + 1) * 4;
iIndex < (int)tLen;
iIndex++, tOffset += 4) {
aulParfPage[iIndex] = ulGetLong(tOffset, aucBuffer);
NO_DBG_DEC(aulParfPage[iIndex]);
}
DBG_HEX(ulGetLong(0, aucBuffer));
aucBuffer = xfree(aucBuffer);
NO_DBG_PRINT_BLOCK(aucHeader, HEADER_SIZE);

(void)memset(&tRow, 0, sizeof(tRow));
ulCharPosFirst = CP_INVALID;
for (iIndex = 0; iIndex < (int)tLen; iIndex++) {
fail(aulParfPage[iIndex] > ULONG_MAX / BIG_BLOCK_SIZE);
if (!bReadBuffer(pFile, pPPS->tWordDocument.ulSB,
aulBBD, tBBDLen, BIG_BLOCK_SIZE,
aucFpage,
aulParfPage[iIndex] * BIG_BLOCK_SIZE,
BIG_BLOCK_SIZE)) {
break;
}
NO_DBG_PRINT_BLOCK(aucFpage, BIG_BLOCK_SIZE);
iRun = (int)ucGetByte(0x1ff, aucFpage);
NO_DBG_DEC(iRun);
for (iIndex2 = 0; iIndex2 < iRun; iIndex2++) {
NO_DBG_HEX(ulGetLong(iIndex2 * 4, aucFpage));
iFodo = 2 * (int)ucGetByte(
(iRun + 1) * 4 + iIndex2 * 13, aucFpage);
if (iFodo <= 0) {
continue;
}

iLen = 2 * (int)ucGetByte(iFodo, aucFpage);
if (iLen == 0) {
iFodo++;
iLen = 2 * (int)ucGetByte(iFodo, aucFpage);
}

usIstd = usGetWord(iFodo + 1, aucFpage);
vFillStyleFromStylesheet(usIstd, &tStyle);
vGet8StyleInfo(iFodo, aucFpage + 3, iLen - 3, &tStyle);
ulCharPos = ulGetLong(iIndex2 * 4, aucFpage);
NO_DBG_HEX(ulCharPos);
tStyle.ulFileOffset = ulCharPos2FileOffsetX(
ulCharPos, &tStyle.eListID);
vAdd2StyleInfoList(&tStyle);

eRowInfo = eGet8RowInfo(iFodo,
aucFpage + 3, iLen - 3, &tRow);
switch (eRowInfo) {
case found_a_cell:
if (ulCharPosFirst != CP_INVALID) {
break;
}
ulCharPosFirst = ulGetLong(
iIndex2 * 4, aucFpage);
NO_DBG_HEX(ulCharPosFirst);
tRow.ulCharPosStart = ulCharPosFirst;
tRow.ulFileOffsetStart =
ulCharPos2FileOffset(ulCharPosFirst);
NO_DBG_HEX_C(
tRow.ulFileOffsetStart == FC_INVALID,
ulCharPosFirst);
break;
case found_end_of_row:
ulCharPosLast = ulGetLong(
iIndex2 * 4, aucFpage);
NO_DBG_HEX(ulCharPosLast);
tRow.ulCharPosEnd = ulCharPosLast;
tRow.ulFileOffsetEnd =
ulCharPos2FileOffset(ulCharPosLast);
NO_DBG_HEX_C(tRow.ulFileOffsetEnd == FC_INVALID,
ulCharPosLast);
vAdd2RowInfoList(&tRow);
(void)memset(&tRow, 0, sizeof(tRow));
ulCharPosFirst = CP_INVALID;
break;
case found_nothing:
break;
default:
DBG_DEC(eRowInfo);
break;
}
}
}
aulParfPage = xfree(aulParfPage);
} /* end of vGet8PapInfo */

/*
* Fill the font information block with information
* from a Word 8/9/10/11 file.
*/
void
vGet8FontInfo(int iFodo, USHORT usIstd,
const UCHAR *aucGrpprl, int iBytes, font_block_type *pFont)
{
long lTmp;
int iFodoOff, iInfoLen;
USHORT usFtc0, usFtc1, usFtc2, usTmp;
UCHAR ucTmp;

fail(iFodo < 0 || aucGrpprl == NULL || pFont == NULL);

usFtc0 = USHRT_MAX;
usFtc1 = USHRT_MAX;
usFtc2 = USHRT_MAX;

iFodoOff = 0;
while (iBytes >= iFodoOff + 2) {
switch (usGetWord(iFodo + iFodoOff, aucGrpprl)) {
case 0x0800: /* fRMarkDel */
ucTmp = ucGetByte(iFodo + iFodoOff + 2, aucGrpprl);
if (ucTmp == 0) {
pFont->usFontStyle &= ~FONT_MARKDEL;
} else {
pFont->usFontStyle |= FONT_MARKDEL;
}
break;
case 0x0835: /* fBold */
ucTmp = ucGetByte(iFodo + iFodoOff + 2, aucGrpprl);
switch (ucTmp) {
case 0: /* Unset */
pFont->usFontStyle &= ~FONT_BOLD;
break;
case 1: /* Set */
pFont->usFontStyle |= FONT_BOLD;
break;
case 128: /* Unchanged */
break;
case 129: /* Negation */
pFont->usFontStyle ^= FONT_BOLD;
break;
default:
DBG_DEC(ucTmp);
DBG_FIXME();
break;
}
break;
case 0x0836: /* fItalic */
ucTmp = ucGetByte(iFodo + iFodoOff + 2, aucGrpprl);
switch (ucTmp) {
case 0: /* Unset */
pFont->usFontStyle &= ~FONT_ITALIC;
break;
case 1: /* Set */
pFont->usFontStyle |= FONT_ITALIC;
break;
case 128: /* Unchanged */
break;
case 129: /* Negation */
pFont->usFontStyle ^= FONT_ITALIC;
break;
default:
DBG_DEC(ucTmp);
DBG_FIXME();
break;
}
break;
case 0x0837: /* fStrike */
ucTmp = ucGetByte(iFodo + iFodoOff + 2, aucGrpprl);
switch (ucTmp) {
case 0: /* Unset */
pFont->usFontStyle &= ~FONT_STRIKE;
break;
case 1: /* Set */
pFont->usFontStyle |= FONT_STRIKE;
break;
case 128: /* Unchanged */
break;
case 129: /* Negation */
pFont->usFontStyle ^= FONT_STRIKE;
break;
default:
DBG_DEC(ucTmp);
DBG_FIXME();
break;
}
break;
case 0x083a: /* fSmallCaps */
ucTmp = ucGetByte(iFodo + iFodoOff + 2, aucGrpprl);
switch (ucTmp) {
case 0: /* Unset */
pFont->usFontStyle &= ~FONT_SMALL_CAPITALS;
break;
case 1: /* Set */
pFont->usFontStyle |= FONT_SMALL_CAPITALS;
break;
case 128: /* Unchanged */
break;
case 129: /* Negation */
pFont->usFontStyle ^= FONT_SMALL_CAPITALS;
break;
default:
DBG_DEC(ucTmp);
DBG_FIXME();
break;
}
break;
case 0x083b: /* fCaps */
ucTmp = ucGetByte(iFodo + iFodoOff + 2, aucGrpprl);
switch (ucTmp) {
case 0: /* Unset */
pFont->usFontStyle &= ~FONT_CAPITALS;
break;
case 1: /* Set */
pFont->usFontStyle |= FONT_CAPITALS;
break;
case 128: /* Unchanged */
break;
case 129: /* Negation */
pFont->usFontStyle ^= FONT_CAPITALS;
break;
default:
DBG_DEC(ucTmp);
DBG_FIXME();
break;
}
break;
case 0x083c: /* fVanish */
ucTmp = ucGetByte(iFodo + iFodoOff + 2, aucGrpprl);
switch (ucTmp) {
case 0: /* Unset */
pFont->usFontStyle &= ~FONT_HIDDEN;
break;
case 1: /* Set */
pFont->usFontStyle |= FONT_HIDDEN;
break;
case 128: /* Unchanged */
break;
case 129: /* Negation */
pFont->usFontStyle ^= FONT_HIDDEN;
break;
default:
DBG_DEC(ucTmp);
DBG_FIXME();
break;
}
break;
case 0x2a32: /* cDefault */
pFont->usFontStyle &= FONT_HIDDEN;
pFont->ucFontColor = FONT_COLOR_DEFAULT;
break;
case 0x2a33: /* cPlain */
DBG_MSG("2a33: cPlain");
vFillFontFromStylesheet(usIstd, pFont);
break;
case 0x2a3e: /* cKul */
ucTmp = ucGetByte(iFodo + iFodoOff + 2, aucGrpprl);
if (ucTmp == 0 || ucTmp == 5) {
pFont->usFontStyle &= ~FONT_UNDERLINE;
} else {
NO_DBG_MSG("Underline text");
pFont->usFontStyle |= FONT_UNDERLINE;
if (ucTmp == 6) {
DBG_MSG("Bold text");
pFont->usFontStyle |= FONT_BOLD;
}
}
break;
case 0x2a42: /* cIco */
pFont->ucFontColor =
ucGetByte(iFodo + iFodoOff + 2, aucGrpprl);
NO_DBG_DEC(pFont->ucFontColor);
break;
case 0x2a44: /* cHpsInc */
DBG_MSG("0x2a44: sprmCHpsInc");
ucTmp = ucGetByte(iFodo + iFodoOff + 2, aucGrpprl);
DBG_DEC(ucTmp);
break;
case 0x2a48: /* cIss */
ucTmp = ucGetByte(iFodo + iFodoOff + 2, aucGrpprl);
ucTmp &= 0x07;
if (ucTmp == 1) {
pFont->usFontStyle |= FONT_SUPERSCRIPT;
NO_DBG_MSG("Superscript");
} else if (ucTmp == 2) {
pFont->usFontStyle |= FONT_SUBSCRIPT;
NO_DBG_MSG("Subscript");
}
break;
case 0x4a30: /* cIstd */
usTmp = usGetWord(iFodo + iFodoOff + 2, aucGrpprl);
NO_DBG_DEC(usTmp);
break;
case 0x4a43: /* cHps */
pFont->usFontSize =
usGetWord(iFodo + iFodoOff + 2, aucGrpprl);
NO_DBG_DEC(pFont->usFontSize);
break;
case 0x4a4d: /* cHpsMul */
DBG_MSG("0x4a4d: sprmCHpsMul");
usTmp = usGetWord(iFodo + iFodoOff + 2, aucGrpprl);
DBG_DEC(usTmp);
break;
case 0x4a4f: /* cFtc0 */
usFtc0 = usGetWord(iFodo + iFodoOff + 2, aucGrpprl);
break;
case 0x4a50: /* cFtc1 */
usFtc1 = usGetWord(iFodo + iFodoOff + 2, aucGrpprl);
break;
case 0x4a51: /* cFtc2 */
usFtc2 = usGetWord(iFodo + iFodoOff + 2, aucGrpprl);
break;
case 0xca47: /* cMajority */
DBG_MSG("0xca47: sprmCMajority");
break;
case 0xca4a: /* cHpsInc1 */
usTmp = usGetWord(iFodo + iFodoOff + 2, aucGrpprl);
lTmp = (long)pFont->usFontSize + (long)usTmp;
if (lTmp < 8) {
pFont->usFontSize = 8;
} else if (lTmp > 32766) {
pFont->usFontSize = 32766;
} else {
pFont->usFontSize = (USHORT)lTmp;
}
break;
case 0xca4c: /* cMajority50 */
DBG_MSG("0xca4c: sprmCMajority50");
break;
case 0xea3f: /* cHps, cHpsPos */
ucTmp = ucGetByte(iFodo + iFodoOff + 2, aucGrpprl);
DBG_DEC(ucTmp);
if (ucTmp != 0) {
pFont->usFontSize = (USHORT)ucTmp;
}
ucTmp = ucGetByte(iFodo + iFodoOff + 3, aucGrpprl);
DBG_DEC(ucTmp);
break;
default:
break;
}
iInfoLen = iGet8InfoLength(iFodo + iFodoOff, aucGrpprl);
fail(iInfoLen <= 0);
iFodoOff += iInfoLen;
}

/* Combine the Ftc's to a FontNumber */
NO_DBG_DEC_C(usFtc0 != USHRT_MAX, usFtc0);
NO_DBG_DEC_C(usFtc2 != USHRT_MAX, usFtc2);
NO_DBG_DEC_C(usFtc1 != USHRT_MAX, usFtc1);
if (usFtc0 <= 0x7fff) {
if (usFtc0 <= (USHORT)UCHAR_MAX) {
pFont->ucFontNumber = (UCHAR)usFtc0;
} else {
DBG_DEC(usFtc0);
DBG_FIXME();
pFont->ucFontNumber = 0;
}
} else if (usFtc2 <= 0x7fff) {
if (usFtc2 <= (USHORT)UCHAR_MAX) {
pFont->ucFontNumber = (UCHAR)usFtc2;
} else {
DBG_DEC(usFtc2);
DBG_FIXME();
pFont->ucFontNumber = 0;
}
} else if (usFtc1 <= 0x7fff) {
if (usFtc1 <= (USHORT)UCHAR_MAX) {
pFont->ucFontNumber = (UCHAR)usFtc1;
} else {
DBG_DEC(usFtc1);
DBG_FIXME();
pFont->ucFontNumber = 0;
}
}
} /* end of vGet8FontInfo */

/*
* Fill the picture information block with information
* from a Word 8/9/10/11 file.
* Returns TRUE when successful, otherwise FALSE
*/
static BOOL
bGet8PicInfo(int iFodo,
const UCHAR *aucGrpprl, int iBytes, picture_block_type *pPicture)
{
ULONG ulTmp;
int iFodoOff, iInfoLen;
BOOL bFound;
UCHAR ucTmp;

fail(iFodo <= 0 || aucGrpprl == NULL || pPicture == NULL);

iFodoOff = 0;
bFound = FALSE;
while (iBytes >= iFodoOff + 2) {
switch (usGetWord(iFodo + iFodoOff, aucGrpprl)) {
#if 0
case 0x0806: /* fData */
ucTmp = ucGetByte(iFodo + iFodoOff + 2, aucGrpprl);
if (ucTmp == 0x01) {
/* Not a picture, but a form field */
return FALSE;
}
DBG_DEC_C(ucTmp != 0, ucTmp);
break;
#endif
case 0x080a: /* fOle2 */
ucTmp = ucGetByte(iFodo + iFodoOff + 2, aucGrpprl);
if (ucTmp == 0x01) {
/* Not a picture, but an OLE object */
return FALSE;
}
DBG_DEC_C(ucTmp != 0, ucTmp);
break;
case 0x680e: /* fcObj */
ulTmp = ulGetLong(iFodo + iFodoOff + 2, aucGrpprl);
DBG_HEX(ulTmp);
break;
case 0x6a03: /* fcPic */
pPicture->ulPictureOffset = ulGetLong(
iFodo + iFodoOff + 2, aucGrpprl);
bFound = TRUE;
break;
default:
break;
}
iInfoLen = iGet8InfoLength(iFodo + iFodoOff, aucGrpprl);
fail(iInfoLen <= 0);
iFodoOff += iInfoLen;
}
return bFound;
} /* end of bGet8PicInfo */

/*
* Build the lists with Character Information for Word 8/9/10/11 files
*/
void
vGet8ChrInfo(FILE *pFile, const pps_info_type *pPPS,
const ULONG *aulBBD, size_t tBBDLen,
const ULONG *aulSBD, size_t tSBDLen,
const UCHAR *aucHeader)
{
font_block_type tFont;
picture_block_type tPicture;
ULONG *aulCharPage;
UCHAR *aucBuffer;
ULONG ulFileOffset, ulCharPos, ulBeginCharInfo;
size_t tCharInfoLen, tOffset, tLen;
int iIndex, iIndex2, iRun, iFodo, iLen;
USHORT usIstd;
UCHAR aucFpage[BIG_BLOCK_SIZE];

fail(pFile == NULL || pPPS == NULL || aucHeader == NULL);
fail(aulBBD == NULL || aulSBD == NULL);

ulBeginCharInfo = ulGetLong(0xfa, aucHeader); /* fcPlcfbteChpx */
NO_DBG_HEX(ulBeginCharInfo);
tCharInfoLen = (size_t)ulGetLong(0xfe, aucHeader); /* lcbPlcfbteChpx */
NO_DBG_DEC(tCharInfoLen);
if (tCharInfoLen < 4) {
DBG_DEC(tCharInfoLen);
return;
}

aucBuffer = aucFillInfoBuffer(pFile, &pPPS->tTable,
aulBBD, tBBDLen, aulSBD, tSBDLen,
ulBeginCharInfo, tCharInfoLen);
if (aucBuffer == NULL) {
return;
}
NO_DBG_PRINT_BLOCK(aucBuffer, tCharInfoLen);

tLen = (tCharInfoLen / 4 - 1) / 2;
aulCharPage = xcalloc(tLen, sizeof(ULONG));
for (iIndex = 0, tOffset = (tLen + 1) * 4;
iIndex < (int)tLen;
iIndex++, tOffset += 4) {
aulCharPage[iIndex] = ulGetLong(tOffset, aucBuffer);
NO_DBG_DEC(aulCharPage[iIndex]);
}
DBG_HEX(ulGetLong(0, aucBuffer));
aucBuffer = xfree(aucBuffer);
NO_DBG_PRINT_BLOCK(aucHeader, HEADER_SIZE);

for (iIndex = 0; iIndex < (int)tLen; iIndex++) {
fail(aulCharPage[iIndex] > ULONG_MAX / BIG_BLOCK_SIZE);
if (!bReadBuffer(pFile, pPPS->tWordDocument.ulSB,
aulBBD, tBBDLen, BIG_BLOCK_SIZE,
aucFpage,
aulCharPage[iIndex] * BIG_BLOCK_SIZE,
BIG_BLOCK_SIZE)) {
break;
}
NO_DBG_PRINT_BLOCK(aucFpage, BIG_BLOCK_SIZE);
iRun = (int)ucGetByte(0x1ff, aucFpage);
NO_DBG_DEC(iRun);
for (iIndex2 = 0; iIndex2 < iRun; iIndex2++) {
ulCharPos = ulGetLong(iIndex2 * 4, aucFpage);
ulFileOffset = ulCharPos2FileOffset(ulCharPos);
iFodo = 2 * (int)ucGetByte(
(iRun + 1) * 4 + iIndex2, aucFpage);

iLen = (int)ucGetByte(iFodo, aucFpage);

usIstd = usGetIstd(ulFileOffset);
vFillFontFromStylesheet(usIstd, &tFont);
if (iFodo != 0) {
vGet8FontInfo(iFodo, usIstd,
aucFpage + 1, iLen - 1, &tFont);
}
tFont.ulFileOffset = ulFileOffset;
vAdd2FontInfoList(&tFont);

if (iFodo <= 0) {
continue;
}

(void)memset(&tPicture, 0, sizeof(tPicture));
if (bGet8PicInfo(iFodo, aucFpage + 1,
iLen - 1, &tPicture)) {
tPicture.ulFileOffset = ulFileOffset;
tPicture.ulFileOffsetPicture =
ulDataPos2FileOffset(
tPicture.ulPictureOffset);
vAdd2PictInfoList(&tPicture);
}
}
}
aulCharPage = xfree(aulCharPage);
} /* end of vGet8ChrInfo */