123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888 |
- /*
- * summary.c
- * Copyright (C) 2002-2005 A.J. van Os; Released under GNU GPL
- *
- * Description:
- * Read the summary information of a Word document
- */
- #include <time.h>
- #include <string.h>
- #include "antiword.h"
- #define P_HEADER_SZ 28
- #define P_SECTIONLIST_SZ 20
- #define P_LENGTH_SZ 4
- #define P_SECTION_MAX_SZ (2 * P_SECTIONLIST_SZ + P_LENGTH_SZ)
- #define P_SECTION_SZ(x) ((x) * P_SECTIONLIST_SZ + P_LENGTH_SZ)
- #define PID_TITLE 2
- #define PID_SUBJECT 3
- #define PID_AUTHOR 4
- #define PID_CREATE_DTM 12
- #define PID_LASTSAVE_DTM 13
- #define PID_APPNAME 18
- #define PIDD_MANAGER 14
- #define PIDD_COMPANY 15
- #define VT_LPSTR 30
- #define VT_FILETIME 64
- #define TIME_OFFSET_HI 0x019db1de
- #define TIME_OFFSET_LO 0xd53e8000
- static char *szTitle = NULL;
- static char *szSubject = NULL;
- static char *szAuthor = NULL;
- static time_t tCreateDtm = (time_t)-1;
- static time_t tLastSaveDtm= (time_t)-1;
- static char *szAppName = NULL;
- static char *szManager = NULL;
- static char *szCompany = NULL;
- static USHORT usLid = (USHORT)-1;
- /*
- * vDestroySummaryInfo - destroy the summary information
- */
- void
- vDestroySummaryInfo(void)
- {
- TRACE_MSG("vDestroySummaryInfo");
- szTitle = xfree(szTitle);
- szSubject = xfree(szSubject);
- szAuthor = xfree(szAuthor);
- tCreateDtm = (time_t)-1;
- tLastSaveDtm = (time_t)-1;
- szAppName = xfree(szAppName);
- szManager = xfree(szManager);
- szCompany = xfree(szCompany);
- usLid = (USHORT)-1;
- } /* end of vDestroySummaryInfo */
- /*
- * tConvertDosDate - convert DOS date format
- *
- * returns Unix time_t or -1
- */
- static time_t
- tConvertDosDate(const char *szDosDate)
- {
- struct tm tTime;
- const char *pcTmp;
- time_t tResult;
- memset(&tTime, 0, sizeof(tTime));
- pcTmp = szDosDate;
- /* Get the month */
- if (!isdigit(*pcTmp)) {
- return (time_t)-1;
- }
- tTime.tm_mon = (int)(*pcTmp - '0');
- pcTmp++;
- if (isdigit(*pcTmp)) {
- tTime.tm_mon *= 10;
- tTime.tm_mon += (int)(*pcTmp - '0');
- pcTmp++;
- }
- /* Get the first separater */
- if (isalnum(*pcTmp)) {
- return (time_t)-1;
- }
- pcTmp++;
- /* Get the day */
- if (!isdigit(*pcTmp)) {
- return (time_t)-1;
- }
- tTime.tm_mday = (int)(*pcTmp - '0');
- pcTmp++;
- if (isdigit(*pcTmp)) {
- tTime.tm_mday *= 10;
- tTime.tm_mday += (int)(*pcTmp - '0');
- pcTmp++;
- }
- /* Get the second separater */
- if (isalnum(*pcTmp)) {
- return (time_t)-1;
- }
- pcTmp++;
- /* Get the year */
- if (!isdigit(*pcTmp)) {
- return (time_t)-1;
- }
- tTime.tm_year = (int)(*pcTmp - '0');
- pcTmp++;
- if (isdigit(*pcTmp)) {
- tTime.tm_year *= 10;
- tTime.tm_year += (int)(*pcTmp - '0');
- pcTmp++;
- }
- /* Check the values */
- if (tTime.tm_mon == 0 || tTime.tm_mday == 0 || tTime.tm_mday > 31) {
- return (time_t)-1;
- }
- /* Correct the values */
- tTime.tm_mon--; /* From 01-12 to 00-11 */
- if (tTime.tm_year < 80) {
- tTime.tm_year += 100; /* 00 means 2000 is 100 */
- }
- tTime.tm_isdst = -1;
- tResult = mktime(&tTime);
- NO_DBG_MSG(ctime(&tResult));
- return tResult;
- } /* end of tConvertDosDate */
- /*
- * szLpstr - get a zero terminate string property
- */
- static char *
- szLpstr(ULONG ulOffset, const UCHAR *aucBuffer)
- {
- char *szStart, *szResult, *szTmp;
- size_t tSize;
- tSize = (size_t)ulGetLong(ulOffset + 4, aucBuffer);
- NO_DBG_DEC(tSize);
- if (tSize == 0) {
- return NULL;
- }
- /* Remove white space from the start of the string */
- szStart = (char *)aucBuffer + ulOffset + 8;
- NO_DBG_MSG(szStart);
- fail(strlen(szStart) >= tSize);
- while (isspace(*szStart)) {
- szStart++;
- }
- if (szStart[0] == '\0') {
- return NULL;
- }
- szResult = xstrdup(szStart);
- /* Remove white space from the end of the string */
- szTmp = szResult + strlen(szResult) - 1;
- while (isspace(*szTmp)) {
- *szTmp = '\0';
- szTmp--;
- }
- NO_DBG_MSG(szResult);
- return szResult;
- } /* end of szLpstr */
- /*
- * tFiletime - get a filetime property
- */
- static time_t
- tFiletime(ULONG ulOffset, const UCHAR *aucBuffer)
- {
- double dHi, dLo, dTmp;
- ULONG ulHi, ulLo;
- time_t tResult;
- ulLo = ulGetLong(ulOffset + 4, aucBuffer);
- ulHi = ulGetLong(ulOffset + 8, aucBuffer);
- NO_DBG_HEX(ulHi);
- NO_DBG_HEX(ulLo);
- /* Move the starting point from 01 Jan 1601 to 01 Jan 1970 */
- dHi = (double)ulHi - (double)TIME_OFFSET_HI;
- dLo = (double)ulLo - (double)TIME_OFFSET_LO;
- NO_DBG_FLT(dHi);
- NO_DBG_FLT(dLo);
- /* Combine the values and divide by 10^7 to get seconds */
- dTmp = dLo / 10000000.0; /* 10^7 */
- dTmp += dHi * 429.4967926; /* 2^32 / 10^7 */
- NO_DBG_FLT(dTmp);
- /* Make a time_t */
- if (dTmp - 0.5 < TIME_T_MIN || dTmp + 0.5 > TIME_T_MAX) {
- return (time_t)-1;
- }
- tResult = dTmp < 0.0 ? (time_t)(dTmp - 0.5) : (time_t)(dTmp + 0.5);
- NO_DBG_MSG(ctime(&tResult));
- return tResult;
- } /* end of tFiletime */
- /*
- * vAnalyseSummaryInfo - analyse the summary information
- */
- static void
- vAnalyseSummaryInfo(const UCHAR *aucBuffer)
- {
- ULONG ulOffset;
- size_t tIndex, tCount, tPropID, tPropType;
- tCount = (size_t)ulGetLong(4, aucBuffer);
- DBG_DEC(tCount);
- for (tIndex = 0; tIndex < tCount; tIndex++) {
- tPropID = (size_t)ulGetLong(8 + tIndex * 8, aucBuffer);
- ulOffset = ulGetLong(12 + tIndex * 8, aucBuffer);
- NO_DBG_DEC(tPropID);
- NO_DBG_HEX(ulOffset);
- tPropType = (size_t)ulGetLong(ulOffset, aucBuffer);
- NO_DBG_DEC(tPropType);
- switch (tPropID) {
- case PID_TITLE:
- if (tPropType == VT_LPSTR && szTitle == NULL) {
- szTitle = szLpstr(ulOffset, aucBuffer);
- }
- break;
- case PID_SUBJECT:
- if (tPropType == VT_LPSTR && szSubject == NULL) {
- szSubject = szLpstr(ulOffset, aucBuffer);
- }
- break;
- case PID_AUTHOR:
- if (tPropType == VT_LPSTR && szAuthor == NULL) {
- szAuthor = szLpstr(ulOffset, aucBuffer);
- }
- break;
- case PID_CREATE_DTM:
- if (tPropType == VT_FILETIME &&
- tCreateDtm == (time_t)-1) {
- tCreateDtm = tFiletime(ulOffset, aucBuffer);
- }
- break;
- case PID_LASTSAVE_DTM:
- if (tPropType == VT_FILETIME &&
- tLastSaveDtm == (time_t)-1) {
- tLastSaveDtm = tFiletime(ulOffset, aucBuffer);
- }
- break;
- case PID_APPNAME:
- if (tPropType == VT_LPSTR && szAppName == NULL) {
- szAppName = szLpstr(ulOffset, aucBuffer);
- }
- break;
- default:
- break;
- }
- }
- } /* end of vAnalyseSummaryInfo */
- /*
- * vAnalyseDocumentSummaryInfo - analyse the document summary information
- */
- static void
- vAnalyseDocumentSummaryInfo(const UCHAR *aucBuffer)
- {
- ULONG ulOffset;
- size_t tIndex, tCount, tPropID, tPropType;
- tCount = (size_t)ulGetLong(4, aucBuffer);
- DBG_DEC(tCount);
- for (tIndex = 0; tIndex < tCount; tIndex++) {
- tPropID = (size_t)ulGetLong(8 + tIndex * 8, aucBuffer);
- ulOffset = ulGetLong(12 + tIndex * 8, aucBuffer);
- NO_DBG_DEC(tPropID);
- NO_DBG_HEX(ulOffset);
- tPropType = (size_t)ulGetLong(ulOffset, aucBuffer);
- NO_DBG_DEC(tPropType);
- switch (tPropID) {
- case PIDD_MANAGER:
- if (tPropType == VT_LPSTR && szManager == NULL) {
- szManager = szLpstr(ulOffset, aucBuffer);
- }
- break;
- case PIDD_COMPANY:
- if (tPropType == VT_LPSTR && szCompany == NULL) {
- szCompany = szLpstr(ulOffset, aucBuffer);
- }
- break;
- default:
- break;
- }
- }
- } /* end of vAnalyseDocumentSummaryInfo */
- /*
- * pucAnalyseSummaryInfoHeader-
- */
- static UCHAR *
- pucAnalyseSummaryInfoHeader(FILE *pFile,
- ULONG ulStartBlock, ULONG ulSize,
- const ULONG *aulBBD, size_t tBBDLen,
- const ULONG *aulSBD, size_t tSBDLen)
- {
- const ULONG *aulBlockDepot;
- UCHAR *aucBuffer;
- size_t tBlockDepotLen, tBlockSize, tSectionCount, tLength;
- ULONG ulTmp, ulOffset;
- USHORT usLittleEndian, usEmpty, usOS, usVersion;
- UCHAR aucHdr[P_HEADER_SZ], aucSecLst[P_SECTION_MAX_SZ];
- if (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;
- }
- if (tBlockDepotLen == 0) {
- DBG_MSG("The Block Depot length is zero");
- return NULL;
- }
- /* Read the Summery Information header */
- if (!bReadBuffer(pFile, ulStartBlock,
- aulBlockDepot, tBlockDepotLen, tBlockSize,
- aucHdr, 0, P_HEADER_SZ)) {
- return NULL;
- }
- NO_DBG_PRINT_BLOCK(aucHdr, P_HEADER_SZ);
- /* Analyse the Summery Information header */
- usLittleEndian = usGetWord(0, aucHdr);
- if (usLittleEndian != 0xfffe) {
- DBG_HEX(usLittleEndian);
- DBG_MSG_C(usLittleEndian == 0xfeff, "Big endian");
- return NULL;
- }
- usEmpty = usGetWord(2, aucHdr);
- if (usEmpty != 0x0000) {
- DBG_DEC(usEmpty);
- return NULL;
- }
- ulTmp = ulGetLong(4, aucHdr);
- DBG_HEX(ulTmp);
- usOS = (USHORT)(ulTmp >> 16);
- usVersion = (USHORT)(ulTmp & 0xffff);
- switch (usOS) {
- case 0:
- DBG_MSG("Win16");
- DBG_HEX(usVersion);
- break;
- case 1:
- DBG_MSG("MacOS");
- DBG_HEX(usVersion);
- break;
- case 2:
- DBG_MSG("Win32");
- DBG_HEX(usVersion);
- break;
- default:
- DBG_DEC(usOS);
- DBG_HEX(usVersion);
- break;
- }
- tSectionCount = (size_t)ulGetLong(24, aucHdr);
- DBG_DEC_C(tSectionCount != 1 && tSectionCount != 2, tSectionCount);
- if (tSectionCount != 1 && tSectionCount != 2) {
- return NULL;
- }
- /* Read the Summery Information Section Lists */
- if (!bReadBuffer(pFile, ulStartBlock,
- aulBlockDepot, tBlockDepotLen, tBlockSize,
- aucSecLst, P_HEADER_SZ, P_SECTION_SZ(tSectionCount))) {
- return NULL;
- }
- NO_DBG_PRINT_BLOCK(aucSecLst, P_SECTION_SZ(tSectionCount));
- ulTmp = ulGetLong(0, aucSecLst);
- DBG_HEX(ulTmp);
- ulTmp = ulGetLong(4, aucSecLst);
- DBG_HEX(ulTmp);
- ulTmp = ulGetLong(8, aucSecLst);
- DBG_HEX(ulTmp);
- ulTmp = ulGetLong(12, aucSecLst);
- DBG_HEX(ulTmp);
- ulOffset = ulGetLong(16, aucSecLst);
- DBG_DEC_C(ulOffset != P_HEADER_SZ + P_SECTIONLIST_SZ &&
- ulOffset != P_HEADER_SZ + 2 * P_SECTIONLIST_SZ,
- ulOffset);
- fail(ulOffset != P_HEADER_SZ + P_SECTIONLIST_SZ &&
- ulOffset != P_HEADER_SZ + 2 * P_SECTIONLIST_SZ);
- tLength =
- (size_t)ulGetLong(tSectionCount * P_SECTIONLIST_SZ, aucSecLst);
- NO_DBG_HEX(tLength);
- fail(ulOffset + tLength > ulSize);
- /* Read the Summery Information */
- aucBuffer = xmalloc(tLength);
- if (!bReadBuffer(pFile, ulStartBlock,
- aulBlockDepot, tBlockDepotLen, tBlockSize,
- aucBuffer, ulOffset, tLength)) {
- aucBuffer = xfree(aucBuffer);
- return NULL;
- }
- NO_DBG_PRINT_BLOCK(aucBuffer, tLength);
- return aucBuffer;
- } /* end of pucAnalyseSummaryInfoHeader */
- /*
- * vSet0SummaryInfo - set summary information from a Word for DOS file
- */
- void
- vSet0SummaryInfo(FILE *pFile, const UCHAR *aucHeader)
- {
- UCHAR *aucBuffer;
- ULONG ulBeginSumdInfo, ulBeginNextBlock;
- size_t tLen;
- USHORT usCodepage, usOffset;
- TRACE_MSG("vSet0SummaryInfo");
- fail(pFile == NULL || aucHeader == NULL);
- /* First check the header */
- usCodepage = usGetWord(0x7e, aucHeader);
- DBG_DEC(usCodepage);
- switch (usCodepage) {
- case 850: usLid = 0x0809; break; /* Latin1 -> British English */
- case 862: usLid = 0x040d; break; /* Hebrew */
- case 866: usLid = 0x0419; break; /* Russian */
- case 0:
- case 437:
- default: usLid = 0x0409; break; /* ASCII -> American English */
- }
- /* Second check the summary information block */
- ulBeginSumdInfo = 128 * (ULONG)usGetWord(0x1c, aucHeader);
- DBG_HEX(ulBeginSumdInfo);
- ulBeginNextBlock = 128 * (ULONG)usGetWord(0x6a, aucHeader);
- DBG_HEX(ulBeginNextBlock);
- if (ulBeginSumdInfo >= ulBeginNextBlock || ulBeginNextBlock == 0) {
- /* There is no summary information block */
- return;
- }
- tLen = (size_t)(ulBeginNextBlock - ulBeginSumdInfo);
- aucBuffer = xmalloc(tLen);
- /* Read the summary information block */
- if (!bReadBytes(aucBuffer, tLen, ulBeginSumdInfo, pFile)) {
- return;
- }
- usOffset = usGetWord(0, aucBuffer);
- if (aucBuffer[usOffset] != 0) {
- NO_DBG_MSG(aucBuffer + usOffset);
- szTitle = xstrdup((char *)aucBuffer + usOffset);
- }
- usOffset = usGetWord(2, aucBuffer);
- if (aucBuffer[usOffset] != 0) {
- NO_DBG_MSG(aucBuffer + usOffset);
- szAuthor = xstrdup((char *)aucBuffer + usOffset);
- }
- usOffset = usGetWord(12, aucBuffer);
- if (aucBuffer[usOffset] != 0) {
- NO_DBG_STRN(aucBuffer + usOffset, 8);
- tLastSaveDtm = tConvertDosDate((char *)aucBuffer + usOffset);
- }
- usOffset = usGetWord(14, aucBuffer);
- if (aucBuffer[usOffset] != 0) {
- NO_DBG_STRN(aucBuffer + usOffset, 8);
- tCreateDtm = tConvertDosDate((char *)aucBuffer + usOffset);
- }
- aucBuffer = xfree(aucBuffer);
- } /* end of vSet0SummaryInfo */
- /*
- * vSet2SummaryInfo - set summary information from a WinWord 1/2 file
- */
- void
- vSet2SummaryInfo(FILE *pFile, int iWordVersion, const UCHAR *aucHeader)
- {
- UCHAR *aucBuffer;
- ULONG ulBeginSumdInfo, ulBeginDocpInfo, ulTmp;
- size_t tSumdInfoLen, tDocpInfoLen, tLen, tCounter, tStart;
- TRACE_MSG("vSet2SummaryInfo");
- fail(pFile == NULL || aucHeader == NULL);
- fail(iWordVersion != 1 && iWordVersion != 2);
- /* First check the header */
- usLid = usGetWord(0x06, aucHeader); /* Language IDentification */
- DBG_HEX(usLid);
- if (usLid < 999 && iWordVersion == 1) {
- switch (usLid) {
- case 1: usLid = 0x0409; break; /* American English */
- case 2: usLid = 0x0c0c; break; /* Canadian French */
- case 31: usLid = 0x0413; break; /* Dutch */
- case 33: usLid = 0x040c; break; /* French */
- case 34: usLid = 0x040a; break; /* Spanish */
- case 36: usLid = 0x040e; break; /* Hungarian */
- case 39: usLid = 0x0410; break; /* Italian */
- case 44: usLid = 0x0809; break; /* British English */
- case 45: usLid = 0x0406; break; /* Danish */
- case 46: usLid = 0x041f; break; /* Swedish */
- case 47: usLid = 0x0414; break; /* Norwegian */
- case 48: usLid = 0x0415; break; /* Polish */
- case 49: usLid = 0x0407; break; /* German */
- case 351: usLid = 0x0816; break; /* Portuguese */
- case 358: usLid = 0x040b; break; /* Finnish */
- default:
- DBG_DEC(usLid);
- DBG_FIXME();
- usLid = 0x0409; /* American English */
- break;
- }
- }
- if (iWordVersion != 2) {
- /* Unknown where to find the associated strings */
- return;
- }
- /* Second check the associated strings */
- ulBeginSumdInfo = ulGetLong(0x118, aucHeader); /* fcSttbfAssoc */
- DBG_HEX(ulBeginSumdInfo);
- tSumdInfoLen = (size_t)usGetWord(0x11c, aucHeader); /* cbSttbfAssoc */
- DBG_DEC(tSumdInfoLen);
- if (tSumdInfoLen == 0) {
- /* There is no summary information */
- return;
- }
- aucBuffer = xmalloc(tSumdInfoLen);
- if (!bReadBytes(aucBuffer, tSumdInfoLen, ulBeginSumdInfo, pFile)) {
- aucBuffer = xfree(aucBuffer);
- return;
- }
- NO_DBG_PRINT_BLOCK(aucBuffer, tSumdInfoLen);
- tLen = (size_t)ucGetByte(0, aucBuffer);
- DBG_DEC_C(tSumdInfoLen != tLen, tSumdInfoLen);
- DBG_DEC_C(tSumdInfoLen != tLen, tLen);
- tStart = 1;
- for (tCounter = 0; tCounter < 17; tCounter++) {
- if (tStart >= tSumdInfoLen) {
- break;
- }
- tLen = (size_t)ucGetByte(tStart, aucBuffer);
- if (tLen != 0) {
- NO_DBG_DEC(tCounter);
- NO_DBG_STRN(aucBuffer + tStart + 1, tLen);
- switch (tCounter) {
- case 3:
- szTitle = xmalloc(tLen + 1);
- strncpy(szTitle,
- (char *)aucBuffer + tStart + 1, tLen);
- szTitle[tLen] = '\0';
- break;
- case 4:
- szSubject = xmalloc(tLen + 1);
- strncpy(szSubject,
- (char *)aucBuffer + tStart + 1, tLen);
- szSubject[tLen] = '\0';
- break;
- case 7:
- szAuthor = xmalloc(tLen + 1);
- strncpy(szAuthor,
- (char *)aucBuffer + tStart + 1, tLen);
- szAuthor[tLen] = '\0';
- break;
- default:
- break;
- }
- }
- tStart += tLen + 1;
- }
- aucBuffer = xfree(aucBuffer);
- /* Third check the document properties */
- ulBeginDocpInfo = ulGetLong(0x112, aucHeader); /* fcDop */
- DBG_HEX(ulBeginDocpInfo);
- tDocpInfoLen = (size_t)usGetWord(0x116, aucHeader); /* cbDop */
- DBG_DEC(tDocpInfoLen);
- if (tDocpInfoLen < 12) {
- return;
- }
- aucBuffer = xmalloc(tDocpInfoLen);
- if (!bReadBytes(aucBuffer, tDocpInfoLen, ulBeginDocpInfo, pFile)) {
- aucBuffer = xfree(aucBuffer);
- return;
- }
- ulTmp = ulGetLong(0x14, aucBuffer); /* dttmCreated */
- tCreateDtm = tConvertDTTM(ulTmp);
- ulTmp = ulGetLong(0x18, aucBuffer); /* dttmRevised */
- tLastSaveDtm = tConvertDTTM(ulTmp);
- aucBuffer = xfree(aucBuffer);
- } /* end of vSet2SummaryInfo */
- /*
- * vSetSummaryInfoOLE - set summary information from a Word 6+ file
- */
- static void
- vSetSummaryInfoOLE(FILE *pFile, const pps_info_type *pPPS,
- const ULONG *aulBBD, size_t tBBDLen,
- const ULONG *aulSBD, size_t tSBDLen)
- {
- UCHAR *pucBuffer;
- fail(pFile == NULL || pPPS == NULL);
- fail(aulBBD == NULL || aulSBD == NULL);
- /* Summary Information */
- pucBuffer = pucAnalyseSummaryInfoHeader(pFile,
- pPPS->tSummaryInfo.ulSB, pPPS->tSummaryInfo.ulSize,
- aulBBD, tBBDLen, aulSBD, tSBDLen);
- if (pucBuffer != NULL) {
- vAnalyseSummaryInfo(pucBuffer);
- pucBuffer = xfree(pucBuffer);
- }
- /* Document Summary Information */
- pucBuffer = pucAnalyseSummaryInfoHeader(pFile,
- pPPS->tDocSummaryInfo.ulSB, pPPS->tDocSummaryInfo.ulSize,
- aulBBD, tBBDLen, aulSBD, tSBDLen);
- if (pucBuffer != NULL) {
- vAnalyseDocumentSummaryInfo(pucBuffer);
- pucBuffer = xfree(pucBuffer);
- }
- } /* end of vSetSummaryInfoOLE */
- /*
- * vSet6SummaryInfo - set summary information from a Word 6/7 file
- */
- void
- vSet6SummaryInfo(FILE *pFile, const pps_info_type *pPPS,
- const ULONG *aulBBD, size_t tBBDLen,
- const ULONG *aulSBD, size_t tSBDLen,
- const UCHAR *aucHeader)
- {
- TRACE_MSG("vSet6SummaryInfo");
- /* Header Information */
- usLid = usGetWord(0x06, aucHeader); /* Language IDentification */
- DBG_HEX(usLid);
- /* Summery Information */
- vSetSummaryInfoOLE(pFile, pPPS, aulBBD, tBBDLen, aulSBD, tSBDLen);
- } /* end of vSet6SummaryInfo */
- /*
- * vSet8SummaryInfo - set summary information a Word 8/9/10 file
- */
- void
- vSet8SummaryInfo(FILE *pFile, const pps_info_type *pPPS,
- const ULONG *aulBBD, size_t tBBDLen,
- const ULONG *aulSBD, size_t tSBDLen,
- const UCHAR *aucHeader)
- {
- USHORT usTmp;
- TRACE_MSG("vSet8SummaryInfo");
- /* Header Information */
- usTmp = usGetWord(0x0a, aucHeader);
- if (usTmp & BIT(14)) {
- /* Language IDentification Far East */
- usLid = usGetWord(0x3c, aucHeader);
- } else {
- /* Language IDentification */
- usLid = usGetWord(0x06, aucHeader);
- }
- DBG_HEX(usLid);
- /* Summery Information */
- vSetSummaryInfoOLE(pFile, pPPS, aulBBD, tBBDLen, aulSBD, tSBDLen);
- } /* end of vSet8SummaryInfo */
- /*
- * szGetTitle - get the title field
- */
- const char *
- szGetTitle(void)
- {
- return szTitle;
- } /* end of szGetTitle */
- /*
- * szGetSubject - get the subject field
- */
- const char *
- szGetSubject(void)
- {
- return szSubject;
- } /* end of szGetSubject */
- /*
- * szGetAuthor - get the author field
- */
- const char *
- szGetAuthor(void)
- {
- return szAuthor;
- } /* end of szGetAuthor */
- /*
- * szGetLastSaveDtm - get the last save date field
- */
- const char *
- szGetLastSaveDtm(void)
- {
- static char szTime[12];
- struct tm *pTime;
- if (tLastSaveDtm == (time_t)-1) {
- return NULL;
- }
- pTime = localtime(&tLastSaveDtm);
- if (pTime == NULL) {
- return NULL;
- }
- sprintf(szTime, "%04d-%02d-%02d",
- pTime->tm_year + 1900, pTime->tm_mon + 1, pTime->tm_mday);
- return szTime;
- } /* end of szGetLastSaveDtm */
- /*
- * szGetModDate - get the last save date field
- */
- const char *
- szGetModDate(void)
- {
- static char szTime[20];
- struct tm *pTime;
- if (tLastSaveDtm == (time_t)-1) {
- return NULL;
- }
- pTime = localtime(&tLastSaveDtm);
- if (pTime == NULL) {
- return NULL;
- }
- sprintf(szTime, "D:%04d%02d%02d%02d%02d",
- pTime->tm_year + 1900, pTime->tm_mon + 1, pTime->tm_mday,
- pTime->tm_hour, pTime->tm_min);
- return szTime;
- } /* end of szGetModDate */
- /*
- * szGetCreationDate - get the last save date field
- */
- const char *
- szGetCreationDate(void)
- {
- static char szTime[20];
- struct tm *pTime;
- if (tCreateDtm == (time_t)-1) {
- return NULL;
- }
- pTime = localtime(&tCreateDtm);
- if (pTime == NULL) {
- return NULL;
- }
- sprintf(szTime, "D:%04d%02d%02d%02d%02d",
- pTime->tm_year + 1900, pTime->tm_mon + 1, pTime->tm_mday,
- pTime->tm_hour, pTime->tm_min);
- return szTime;
- } /* end of szGetCreationDate */
- /*
- * szGetCompany - get the company field
- */
- const char *
- szGetCompany(void)
- {
- return szCompany;
- } /* end of szGetCompany */
- /*
- * szGetLanguage - get de language field
- */
- const char *
- szGetLanguage(void)
- {
- if (usLid == (USHORT)-1) {
- /* No Language IDentification */
- return NULL;
- }
- if (usLid < 999) {
- /* This is a Locale, not a Language IDentification */
- DBG_DEC(usLid);
- return NULL;
- }
- /* Exceptions to the general rule */
- switch (usLid) {
- case 0x0404: return "zh_TW"; /* Traditional Chinese */
- case 0x0804: return "zh_CN"; /* Simplified Chinese */
- case 0x0c04: return "zh_HK"; /* Hong Kong Chinese */
- case 0x1004: return "zh_SG"; /* Singapore Chinese */
- case 0x0807: return "de_CH"; /* Swiss German */
- case 0x0409: return "en_US"; /* American English */
- case 0x0809: return "en_GB"; /* British English */
- case 0x0c09: return "en_AU"; /* Australian English */
- case 0x080a: return "es_MX"; /* Mexican Spanish */
- case 0x080c: return "fr_BE"; /* Belgian French */
- case 0x0c0c: return "fr_CA"; /* Canadian French */
- case 0x100c: return "fr_CH"; /* Swiss French */
- case 0x0810: return "it_CH"; /* Swiss Italian */
- case 0x0813: return "nl_BE"; /* Belgian Dutch */
- case 0x0416: return "pt_BR"; /* Brazilian Portuguese */
- case 0x081a:
- case 0x0c1a: return "sr"; /* Serbian */
- case 0x081d: return "sv_FI"; /* Finland Swedish */
- default:
- break;
- }
- /* The general rule */
- switch (usLid & 0x00ff) {
- case 0x01: return "ar"; /* Arabic */
- case 0x02: return "bg"; /* Bulgarian */
- case 0x03: return "ca"; /* Catalan */
- case 0x04: return "zh"; /* Chinese */
- case 0x05: return "cs"; /* Czech */
- case 0x06: return "da"; /* Danish */
- case 0x07: return "de"; /* German */
- case 0x08: return "el"; /* Greek */
- case 0x09: return "en"; /* English */
- case 0x0a: return "es"; /* Spanish */
- case 0x0b: return "fi"; /* Finnish */
- case 0x0c: return "fr"; /* French */
- case 0x0d: return "he"; /* Hebrew */
- case 0x0e: return "hu"; /* Hungarian */
- case 0x0f: return "is"; /* Icelandic */
- case 0x10: return "it"; /* Italian */
- case 0x11: return "ja"; /* Japanese */
- case 0x12: return "ko"; /* Korean */
- case 0x13: return "nl"; /* Dutch */
- case 0x14: return "no"; /* Norwegian */
- case 0x15: return "pl"; /* Polish */
- case 0x16: return "pt"; /* Portuguese */
- case 0x17: return "rm"; /* Rhaeto-Romance */
- case 0x18: return "ro"; /* Romanian */
- case 0x19: return "ru"; /* Russian */
- case 0x1a: return "hr"; /* Croatian */
- case 0x1b: return "sk"; /* Slovak */
- case 0x1c: return "sq"; /* Albanian */
- case 0x1d: return "sv"; /* Swedish */
- case 0x1e: return "th"; /* Thai */
- case 0x1f: return "tr"; /* Turkish */
- case 0x20: return "ur"; /* Urdu */
- case 0x21: return "id"; /* Indonesian */
- case 0x22: return "uk"; /* Ukrainian */
- case 0x23: return "be"; /* Belarusian */
- case 0x24: return "sl"; /* Slovenian */
- case 0x25: return "et"; /* Estonian */
- case 0x26: return "lv"; /* Latvian */
- case 0x27: return "lt"; /* Lithuanian */
- case 0x29: return "fa"; /* Farsi */
- case 0x2a: return "vi"; /* Viet Nam */
- case 0x2b: return "hy"; /* Armenian */
- case 0x2c: return "az"; /* Azeri */
- case 0x2d: return "eu"; /* Basque */
- case 0x2f: return "mk"; /* Macedonian */
- case 0x36: return "af"; /* Afrikaans */
- case 0x37: return "ka"; /* Georgian */
- case 0x38: return "fo"; /* Faeroese */
- case 0x39: return "hi"; /* Hindi */
- case 0x3e: return "ms"; /* Malay */
- case 0x3f: return "kk"; /* Kazakh */
- default:
- DBG_HEX(usLid);
- DBG_FIXME();
- return NULL;
- }
- } /* end of szGetLanguage */
|