ref: 3579757291db68f8e17a376476454996b7961bd7
dir: /sys/src/cmd/aux/antiword/xml.c/
/* * xml.c * Copyright (C) 2002-2005 A.J. van Os; Released under GNU GPL * * Description: * Functions to deal with the XML/DocBook format * */ #include <string.h> #include "antiword.h" #define vAddEndTagsUntil1(p,t) vAddEndTagsUntil2(p,t,TAG_NOTAG) #if defined(DEBUG) #define vStackTrace() __vStackTrace(__LINE__) #else #define vStackTrace() /* EMPTY */ #endif /* DEBUG */ /* The character set */ static encoding_type eEncoding = encoding_neutral; /* Word version */ static int iWordVersion = -1; /* Special treatment for files from Word 4/5/6 on an Apple Macintosh */ static BOOL bOldMacFile = FALSE; /* Text is emphasised */ static BOOL bEmphasisOpen = FALSE; /* Text is superscript */ static BOOL bSuperscriptOpen = FALSE; /* Text is subscript */ static BOOL bSubscriptOpen = FALSE; /* Title is open */ static BOOL bTitleOpen = FALSE; /* Table is open */ static BOOL bTableOpen = FALSE; /* Footnote is open */ static BOOL bFootnoteOpen = FALSE; /* Current paragraph level */ static UINT uiParagraphLevel = 0; /* Current list level */ static UINT uiListLevel = 0; /* Current list level is still empty */ static BOOL bEmptyListLevel = TRUE; /* Current header level */ static USHORT usHeaderLevelCurrent = 0; /* Current header level is still empty */ static BOOL bEmptyHeaderLevel = TRUE; /* Number of columns in the current table */ static int iTableColumnsCurrent = 0; /* Footnote number */ static UINT uiFootnoteNumber = 0; /* Constants for the stack */ #define INITIAL_STACK_SIZE 10 #if defined(DEBUG) #define EXTENSION_STACK_SIZE 2 #else #define EXTENSION_STACK_SIZE 10 #endif /* DEBUG */ /* Variables for the stack */ static UCHAR *aucStack = NULL; static size_t tStacksize = 0; static size_t tStackNextFree = 0; /* Constants for the tags */ #define TAG_NOTAG (UCHAR)0 #define TAG_AUTHOR (UCHAR)1 #define TAG_BEGINPAGE (UCHAR)2 #define TAG_BOOK (UCHAR)3 #define TAG_BOOKINFO (UCHAR)4 #define TAG_CHAPTER (UCHAR)5 #define TAG_COLSPEC (UCHAR)6 #define TAG_CORPNAME (UCHAR)7 #define TAG_DATE (UCHAR)8 #define TAG_EMPHASIS (UCHAR)9 #define TAG_ENTRY (UCHAR)10 #define TAG_FILENAME (UCHAR)11 #define TAG_FOOTNOTE (UCHAR)12 #define TAG_INFORMALTABLE (UCHAR)13 #define TAG_ITEMIZEDLIST (UCHAR)14 #define TAG_LISTITEM (UCHAR)15 #define TAG_ORDEREDLIST (UCHAR)16 #define TAG_PARA (UCHAR)17 #define TAG_ROW (UCHAR)18 #define TAG_SECT1 (UCHAR)19 #define TAG_SECT2 (UCHAR)20 #define TAG_SECT3 (UCHAR)21 #define TAG_SECT4 (UCHAR)22 #define TAG_SECT5 (UCHAR)23 #define TAG_SUBSCRIPT (UCHAR)24 #define TAG_SUBTITLE (UCHAR)25 #define TAG_SUPERSCRIPT (UCHAR)26 #define TAG_SURNAME (UCHAR)27 #define TAG_TBODY (UCHAR)28 #define TAG_TGROUP (UCHAR)29 #define TAG_TITLE (UCHAR)30 typedef struct docbooktags_tag { UCHAR ucTagnumber; char szTagname[15]; BOOL bAddNewlineStart; BOOL bAddNewlineEnd; } docbooktags_type; static const docbooktags_type atDocBookTags[] = { { TAG_NOTAG, "!ERROR!", TRUE, TRUE }, { TAG_AUTHOR, "author", TRUE, TRUE }, { TAG_BEGINPAGE, "beginpage", TRUE, TRUE }, { TAG_BOOK, "book", TRUE, TRUE }, { TAG_BOOKINFO, "bookinfo", TRUE, TRUE }, { TAG_CHAPTER, "chapter", TRUE, TRUE }, { TAG_COLSPEC, "colspec", TRUE, TRUE }, { TAG_CORPNAME, "corpname", FALSE, FALSE }, { TAG_DATE, "date", FALSE, FALSE }, { TAG_EMPHASIS, "emphasis", FALSE, FALSE }, { TAG_ENTRY, "entry", TRUE, TRUE }, { TAG_FILENAME, "filename", FALSE, FALSE }, { TAG_FOOTNOTE, "footnote", FALSE, FALSE }, { TAG_INFORMALTABLE, "informaltable",TRUE, TRUE }, { TAG_ITEMIZEDLIST, "itemizedlist", TRUE, TRUE }, { TAG_LISTITEM, "listitem", TRUE, TRUE }, { TAG_ORDEREDLIST, "orderedlist", TRUE, TRUE }, { TAG_PARA, "para", TRUE, TRUE }, { TAG_ROW, "row", TRUE, TRUE }, { TAG_SECT1, "sect1", TRUE, TRUE }, { TAG_SECT2, "sect2", TRUE, TRUE }, { TAG_SECT3, "sect3", TRUE, TRUE }, { TAG_SECT4, "sect4", TRUE, TRUE }, { TAG_SECT5, "sect5", TRUE, TRUE }, { TAG_SUBSCRIPT, "subscript", FALSE, FALSE }, { TAG_SUBTITLE, "subtitle", FALSE, FALSE }, { TAG_SUPERSCRIPT, "superscript", FALSE, FALSE }, { TAG_SURNAME, "surname", FALSE, FALSE }, { TAG_TBODY, "tbody", TRUE, TRUE }, { TAG_TGROUP, "tgroup", TRUE, TRUE }, { TAG_TITLE, "title", FALSE, FALSE }, }; static void vAddStartTag(diagram_type *, UCHAR, const char *); static void vAddEndTag(diagram_type *, UCHAR); static void vAddCombinedTag(diagram_type *, UCHAR, const char *); static void vPrintChar(diagram_type *, char); #if defined(DEBUG) /* * vCheckTagTable - check the tag table */ static void vCheckTagTable(void) { size_t tIndex; for (tIndex = 0; tIndex < elementsof(atDocBookTags); tIndex++) { if (tIndex != (size_t)atDocBookTags[tIndex].ucTagnumber) { DBG_DEC(tIndex); werr(1, "Array atDocBookTags is broken"); } } } /* end of vCheckTagTable */ /* * __vStackTrace - show a stack trace */ static void __vStackTrace(int iLine) { int iIndex; fprintf(stderr, "%s[%3d]:\n", __FILE__, iLine); if (tStackNextFree == 0) { fprintf(stderr, "The stack is empty\n"); return; } for (iIndex = (int)tStackNextFree - 1; iIndex >= 0; iIndex--) { fprintf(stderr, "%2d: %2d: '%s'\n", iIndex, (int)atDocBookTags[(UINT)aucStack[iIndex]].ucTagnumber, atDocBookTags[(UINT)aucStack[iIndex]].szTagname); } } /* end of __vStackTrace */ #endif /* DEBUG */ /* * vPushStack - push a tag onto the stack */ static void vPushStack(UCHAR ucTag) { fail(tStackNextFree > tStacksize); if (tStackNextFree == tStacksize) { /* The stack is full; enlarge the stack */ tStacksize += EXTENSION_STACK_SIZE; aucStack = xrealloc(aucStack, tStacksize * sizeof(UCHAR)); DBG_DEC(tStacksize); } fail(tStackNextFree >= tStacksize); aucStack[tStackNextFree++] = ucTag; } /* end of vPushStack */ /* * vPopStack - pop a tag from the stack */ static UCHAR ucPopStack(void) { DBG_DEC_C(tStackNextFree > tStacksize, tStackNextFree); DBG_DEC_C(tStackNextFree > tStacksize, tStacksize); fail(tStackNextFree > tStacksize); fail(tStackNextFree == 0); if (tStackNextFree == 0) { werr(1, "The stack is empty, unable to continue"); return TAG_NOTAG; } return aucStack[--tStackNextFree]; } /* end of ucPopStack */ /* * vReadStack - read a tag from the top of the stack */ static UCHAR ucReadStack(void) { DBG_DEC_C(tStackNextFree > tStacksize, tStackNextFree); DBG_DEC_C(tStackNextFree > tStacksize, tStacksize); fail(tStackNextFree > tStacksize); if (tStackNextFree == 0) { /* The stack is empty */ return TAG_NOTAG; } return aucStack[tStackNextFree - 1]; } /* end of ucReadStack */ /* * vPrintLevel - print the tag level */ static void vPrintLevel(FILE *pOutFile) { size_t tIndex; fail(pOutFile == NULL); for (tIndex = 0; tIndex < tStackNextFree; tIndex++) { (void)putc(' ', pOutFile); } } /* end of vPrintLevel */ /* * vPrintFootnote - print a footnote */ static void vPrintFootnote(diagram_type *pDiag, UINT uiFootnoteIndex) { const char *szText, *pcTmp; BOOL bSuScript; UCHAR ucTopTag; TRACE_MSG("vPrintFootnote"); szText = szGetFootnootText(uiFootnoteIndex); if (szText == NULL) { szText = ""; } /* Remove the subscript/superscript (if any) */ ucTopTag = ucReadStack(); bSuScript = ucTopTag == TAG_SUBSCRIPT || ucTopTag == TAG_SUPERSCRIPT; if (bSuScript) { vAddEndTag(pDiag, ucTopTag); } /* Start a footnote */ vAddStartTag(pDiag, TAG_FOOTNOTE, NULL); vAddStartTag(pDiag, TAG_PARA, NULL); /* Print a footnote */ for (pcTmp = szText; *pcTmp != '\0'; pcTmp++) { if (*pcTmp == PAR_END) { if (*(pcTmp + 1) != PAR_END && *(pcTmp + 1) != '\0') { /* PAR_END is not empty and not last */ vAddEndTag(pDiag, TAG_PARA); vAddStartTag(pDiag, TAG_PARA, NULL); } } else { vPrintChar(pDiag, *pcTmp); } } /* End a footnote */ vAddEndTag(pDiag, TAG_PARA); vAddEndTag(pDiag, TAG_FOOTNOTE); /* Repair the subscript/superscript (if any) */ if (bSuScript) { vAddStartTag(pDiag, ucTopTag, NULL); } } /* end of vPrintFootnote */ /* * vPrintChar - print a character with XML encoding */ static void vPrintChar(diagram_type *pDiag, char cChar) { fail(pDiag == NULL); fail(pDiag->pOutFile == NULL); switch (cChar) { case FOOTNOTE_OR_ENDNOTE: uiFootnoteNumber++; vPrintFootnote(pDiag, uiFootnoteNumber - 1); break; case '<': fprintf(pDiag->pOutFile, "%s", "<"); break; case '>': fprintf(pDiag->pOutFile, "%s", ">"); break; case '&': fprintf(pDiag->pOutFile, "%s", "&"); break; default: (void)putc(cChar, pDiag->pOutFile); break; } } /* end of vPrintChar */ /* * vPrintSpecialChar - convert and print a character */ static void vPrintSpecialChar(diagram_type *pDiag, USHORT usChar) { ULONG ulChar; size_t tLen, tIndex; char szResult[4]; fail(pDiag == NULL); fail(pDiag->pOutFile == NULL); fail(iWordVersion < 0); fail(eEncoding == encoding_neutral); ulChar = ulTranslateCharacters(usChar, 0, iWordVersion, conversion_xml, eEncoding, bOldMacFile); tLen = tUcs2Utf8(ulChar, szResult, sizeof(szResult)); if (tLen == 1) { vPrintChar(pDiag, szResult[0]); } else { for (tIndex = 0; tIndex < tLen; tIndex++) { (void)putc(szResult[tIndex], pDiag->pOutFile); } } } /* end of vPrintSpecialChar */ /* * vPrintSpecialString - convert and print a string */ static void vPrintSpecialString(diagram_type *pDiag, const char *szString) { int iIndex; USHORT usChar; fail(pDiag == NULL); fail(pDiag->pOutFile == NULL); fail(szString == NULL); for (iIndex = 0; szString[iIndex] != '\0'; iIndex++) { usChar = (USHORT)(UCHAR)szString[iIndex]; vPrintSpecialChar(pDiag, usChar); } } /* end of vPrintSpecialString */ /* * vAddStartTag - add the specified start tag to the file */ static void vAddStartTag(diagram_type *pDiag, UCHAR ucTag, const char *szAttribute) { fail(pDiag == NULL); fail(pDiag->pOutFile == NULL); fail((size_t)ucTag >= elementsof(atDocBookTags)); if (atDocBookTags[(UINT)ucTag].bAddNewlineStart) { fprintf(pDiag->pOutFile, "\n"); vPrintLevel(pDiag->pOutFile); } if (szAttribute == NULL || szAttribute[0] == '\0') { fprintf(pDiag->pOutFile, "<%s>", atDocBookTags[(UINT)ucTag].szTagname); } else { fprintf(pDiag->pOutFile, "<%s %s>", atDocBookTags[(UINT)ucTag].szTagname, szAttribute); } if (atDocBookTags[(UINT)ucTag].bAddNewlineEnd) { fprintf(pDiag->pOutFile, "\n"); pDiag->lXleft = 0; } vPushStack(ucTag); /* Set global variables */ switch (ucTag) { case TAG_CHAPTER: usHeaderLevelCurrent = 1; bEmptyHeaderLevel = TRUE; break; case TAG_SECT1: usHeaderLevelCurrent = 2; bEmptyHeaderLevel = TRUE; break; case TAG_SECT2: usHeaderLevelCurrent = 3; bEmptyHeaderLevel = TRUE; break; case TAG_SECT3: usHeaderLevelCurrent = 4; bEmptyHeaderLevel = TRUE; break; case TAG_SECT4: usHeaderLevelCurrent = 5; bEmptyHeaderLevel = TRUE; break; case TAG_SECT5: usHeaderLevelCurrent = 6; bEmptyHeaderLevel = TRUE; break; case TAG_TITLE: fail(uiParagraphLevel != 0); bTitleOpen = TRUE; break; case TAG_FOOTNOTE: bFootnoteOpen = TRUE; break; case TAG_PARA: fail(bTitleOpen && !bFootnoteOpen); uiParagraphLevel++; bEmptyHeaderLevel = FALSE; break; case TAG_EMPHASIS: bEmphasisOpen = TRUE; break; case TAG_ITEMIZEDLIST: case TAG_ORDEREDLIST: uiListLevel++; bEmptyListLevel = TRUE; bEmptyHeaderLevel = FALSE; break; case TAG_LISTITEM: bEmptyListLevel = FALSE; break; case TAG_SUPERSCRIPT: bSuperscriptOpen = TRUE; break; case TAG_SUBSCRIPT: bSubscriptOpen = TRUE; break; case TAG_INFORMALTABLE: bTableOpen = TRUE; bEmptyHeaderLevel = FALSE; break; default: break; } } /* end of vAddStartTag */ /* * vAddEndTag - add the specified end tag to the file */ static void vAddEndTag(diagram_type *pDiag, UCHAR ucTag) { UCHAR ucTopTag; fail(pDiag == NULL); fail(pDiag->pOutFile == NULL); fail((size_t)ucTag >= elementsof(atDocBookTags)); #if defined(DEBUG) ucTopTag = ucReadStack(); if (ucTag != ucTopTag) { DBG_DEC(ucTag); DBG_MSG(atDocBookTags[(UINT)ucTag].szTagname); vStackTrace(); } #endif /* DEBUG */ ucTopTag = ucPopStack(); fail((size_t)ucTopTag >= elementsof(atDocBookTags)); if (ucTag != ucTopTag) { DBG_DEC(ucTag); DBG_DEC(ucTopTag); DBG_FIXME(); werr(1, "Impossible tag sequence, unable to continue"); } if (atDocBookTags[(UINT)ucTag].bAddNewlineEnd) { fprintf(pDiag->pOutFile, "\n"); vPrintLevel(pDiag->pOutFile); } fprintf(pDiag->pOutFile, "</%s>", atDocBookTags[(UINT)ucTag].szTagname); if (atDocBookTags[(UINT)ucTag].bAddNewlineStart) { fprintf(pDiag->pOutFile, "\n"); pDiag->lXleft = 0; } /* Set global variables */ switch (ucTag) { case TAG_CHAPTER: usHeaderLevelCurrent = 0; break; case TAG_SECT1: usHeaderLevelCurrent = 1; break; case TAG_SECT2: usHeaderLevelCurrent = 2; break; case TAG_SECT3: usHeaderLevelCurrent = 3; break; case TAG_SECT4: usHeaderLevelCurrent = 4; break; case TAG_SECT5: usHeaderLevelCurrent = 5; break; case TAG_TITLE: bTitleOpen = FALSE; break; case TAG_FOOTNOTE: bFootnoteOpen = FALSE; break; case TAG_PARA: uiParagraphLevel--; break; case TAG_EMPHASIS: bEmphasisOpen = FALSE; break; case TAG_SUPERSCRIPT: bSuperscriptOpen = FALSE; break; case TAG_ITEMIZEDLIST: case TAG_ORDEREDLIST: uiListLevel--; break; case TAG_SUBSCRIPT: bSubscriptOpen = FALSE; break; case TAG_INFORMALTABLE: bTableOpen = FALSE; iTableColumnsCurrent = 0; break; default: break; } } /* end of vAddEndTag */ /* * vAddEndTagOptional - add the specified end tag to the file if needed */ static void vAddEndTagOptional(diagram_type *pDiag, UCHAR ucTag) { UCHAR ucTopTag; ucTopTag = ucReadStack(); if (ucTag == ucTopTag) { vAddEndTag(pDiag, ucTag); } } /* end of vAddEndTagOptional */ /* * vAddCombinedTag - add the specified start and end tag to the file */ static void vAddCombinedTag(diagram_type *pDiag, UCHAR ucTag, const char *szAttribute) { fail(pDiag == NULL); fail(pDiag->pOutFile == NULL); fail((size_t)ucTag >= elementsof(atDocBookTags)); if (atDocBookTags[(UINT)ucTag].bAddNewlineStart) { fprintf(pDiag->pOutFile, "\n"); vPrintLevel(pDiag->pOutFile); } if (szAttribute == NULL || szAttribute[0] == '\0') { fprintf(pDiag->pOutFile, "<%s/>", atDocBookTags[(UINT)ucTag].szTagname); } else { fprintf(pDiag->pOutFile, "<%s %s/>", atDocBookTags[(UINT)ucTag].szTagname, szAttribute); } if (atDocBookTags[(UINT)ucTag].bAddNewlineStart) { fprintf(pDiag->pOutFile, "\n"); pDiag->lXleft = 0; } } /* end of vAddCombinedTag */ /* * vAddEndTagsUntil2 - add end tags until one the specified tags is seen */ static void vAddEndTagsUntil2(diagram_type *pDiag, UCHAR ucTag1, UCHAR ucTag2) { UCHAR ucTopTag; do { ucTopTag = ucReadStack(); switch (ucTopTag) { case TAG_CHAPTER: case TAG_SECT1: case TAG_SECT2: case TAG_SECT3: case TAG_SECT4: case TAG_SECT5: if (bEmptyHeaderLevel) { /* * An empty chapter is legal in Word, * but not in DocBook. */ vAddCombinedTag(pDiag, TAG_PARA, NULL); bEmptyHeaderLevel = FALSE; } break; case TAG_ITEMIZEDLIST: case TAG_ORDEREDLIST: if (bEmptyListLevel) { /* * A list without items is legal in Word, * but not in DocBook. (Nor are empty items) */ vAddStartTag(pDiag, TAG_LISTITEM, NULL); vAddCombinedTag(pDiag, TAG_PARA, NULL); vAddEndTag(pDiag, TAG_LISTITEM); bEmptyListLevel = FALSE; } break; default: break; } vAddEndTag(pDiag, ucTopTag); } while (ucTopTag != ucTag1 && ucTopTag != ucTag2); } /* end of vAddEndTagsUntil2 */ /* * vCreateBookIntro - create title and bookinfo */ void vCreateBookIntro(diagram_type *pDiag, int iVersion) { const char *szTitle, *szSubject, *szAuthor; const char *szLastSaveDtm, *szCompany; const char *szLanguage; char szTmp[13]; fail(pDiag == NULL); fail(pDiag->pOutFile == NULL); fail(iVersion < 0); fail(eEncoding == encoding_neutral); iWordVersion = iVersion; bOldMacFile = bIsOldMacFile(); szTitle = szGetTitle(); szSubject = szGetSubject(); szAuthor = szGetAuthor(); szLastSaveDtm = szGetLastSaveDtm(); szCompany = szGetCompany(); /* Start Book */ szLanguage = szGetLanguage(); if (szLanguage != NULL) { DBG_MSG(szLanguage); sprintf(szTmp, "lang='%.5s'", szLanguage); szLanguage = szTmp; } vAddStartTag(pDiag, TAG_BOOK, szLanguage); /* Book title */ if (szTitle != NULL && szTitle[0] != '\0') { vAddStartTag(pDiag, TAG_TITLE, NULL); vPrintSpecialString(pDiag, szTitle); vAddEndTag(pDiag, TAG_TITLE); } /* Bookinfo */ if ((szTitle != NULL && szTitle[0] != '\0') || (szSubject != NULL && szSubject[0] != '\0') || (szAuthor != NULL && szAuthor[0] != '\0') || (szLastSaveDtm != NULL && szLastSaveDtm[0] != '\0') || (szCompany != NULL && szCompany[0] != '\0')) { vAddStartTag(pDiag, TAG_BOOKINFO, NULL); if (szTitle != NULL && szTitle[0] != '\0') { vAddStartTag(pDiag, TAG_TITLE, NULL); vPrintSpecialString(pDiag, szTitle); vAddEndTag(pDiag, TAG_TITLE); } if (szSubject != NULL && szSubject[0] != '\0') { vAddStartTag(pDiag, TAG_SUBTITLE, NULL); vPrintSpecialString(pDiag, szSubject); vAddEndTag(pDiag, TAG_SUBTITLE); } if (szAuthor != NULL && szAuthor[0] != '\0') { vAddStartTag(pDiag, TAG_AUTHOR, NULL); vAddStartTag(pDiag, TAG_SURNAME, NULL); vPrintSpecialString(pDiag, szAuthor); vAddEndTag(pDiag, TAG_SURNAME); vAddEndTag(pDiag, TAG_AUTHOR); } if (szLastSaveDtm != NULL && szLastSaveDtm[0] != '\0') { vAddStartTag(pDiag, TAG_DATE, NULL); vPrintSpecialString(pDiag, szLastSaveDtm); vAddEndTag(pDiag, TAG_DATE); } if (szCompany != NULL && szCompany[0] != '\0') { vAddStartTag(pDiag, TAG_CORPNAME, NULL); vPrintSpecialString(pDiag, szCompany); vAddEndTag(pDiag, TAG_CORPNAME); } vAddEndTag(pDiag, TAG_BOOKINFO); } } /* end of vCreateBookIntro */ /* * vPrologueXML - perform the XML initialization */ void vPrologueXML(diagram_type *pDiag, const options_type *pOptions) { fail(pDiag == NULL); fail(pDiag->pOutFile == NULL); fail(pOptions == NULL); #if defined(DEBUG) vCheckTagTable(); #endif /* DEBUG */ /* Set global variables to their start values */ eEncoding = pOptions->eEncoding; bEmphasisOpen = FALSE; bSuperscriptOpen = FALSE; bSubscriptOpen = FALSE; bTitleOpen = FALSE; bTableOpen = FALSE; bFootnoteOpen = FALSE; uiParagraphLevel = 0; uiListLevel = 0; bEmptyListLevel = TRUE; usHeaderLevelCurrent = 0; bEmptyHeaderLevel = TRUE; iTableColumnsCurrent = 0; uiFootnoteNumber = 0; pDiag->lXleft = 0; pDiag->lYtop = 0; /* Create an empty stack */ tStacksize = INITIAL_STACK_SIZE; aucStack = xcalloc(tStacksize, sizeof(UCHAR)); tStackNextFree = 0; } /* end of vPrologueXML */ /* * vEpilogueXML - clean up after everything is done */ void vEpilogueXML(diagram_type *pDiag) { vStackTrace(); vAddEndTagsUntil1(pDiag, TAG_BOOK); vStackTrace(); /* Destroy the stack */ fail(tStackNextFree != 0); tStacksize = 0; aucStack = xfree(aucStack); tStackNextFree = 0; } /* end of vEpilogueXML */ /* * vPrintXML - print a XML string */ static void vPrintXML(diagram_type *pDiag, const char *szString, size_t tStringLength, USHORT usFontstyle) { const char *szAttr; int iCount; size_t tNextFree; BOOL bNotReady, bEmphasisNew, bSuperscriptNew, bSubscriptNew; UCHAR ucTopTag, aucStorage[3]; fail(szString == NULL); if (szString == NULL || szString[0] == '\0' || tStringLength == 0) { return; } if (tStringLength == 1 && szString[0] == FOOTNOTE_OR_ENDNOTE) { /* Don't do anything special for just a single footnote */ bEmphasisNew = FALSE; bSuperscriptNew = FALSE; bSubscriptNew = FALSE; } else { /* Situation normal */ bEmphasisNew = bIsBold(usFontstyle) || bIsItalic(usFontstyle) || bIsUnderline(usFontstyle) || bIsStrike(usFontstyle); bSuperscriptNew = bIsSuperscript(usFontstyle); bSubscriptNew = bIsSubscript(usFontstyle); } /* End what has to be ended (or more to keep the stack happy) */ tNextFree = 0; bNotReady = TRUE; do { ucTopTag = ucReadStack(); switch (ucTopTag) { case TAG_EMPHASIS: fail(!bEmphasisOpen); if (bEmphasisNew) { aucStorage[tNextFree++] = ucTopTag; } vAddEndTag(pDiag, ucTopTag); break; case TAG_SUPERSCRIPT: fail(!bSuperscriptOpen); if (bSuperscriptNew) { aucStorage[tNextFree++] = ucTopTag; } vAddEndTag(pDiag, ucTopTag); break; case TAG_SUBSCRIPT: fail(!bSubscriptOpen); if (bSubscriptNew) { aucStorage[tNextFree++] = ucTopTag; } vAddEndTag(pDiag, ucTopTag); break; default: bNotReady = FALSE; break; } fail(tNextFree > elementsof(aucStorage)); fail(bNotReady && tNextFree == elementsof(aucStorage)); } while (bNotReady); /* Just te make sure */ vStartOfParagraphXML(pDiag, 1); /* Restart to keep the stack happy */ for (iCount = (int)tNextFree - 1; iCount > 0; iCount--) { vAddStartTag(pDiag, aucStorage[iCount], NULL); } /* Start what has to be started */ if (bEmphasisNew && !bEmphasisOpen) { if (bIsBold(usFontstyle)) { szAttr = "role='bold'"; } else if (bIsItalic(usFontstyle)) { szAttr = NULL; } else if (bIsUnderline(usFontstyle)) { szAttr = "role='underline'"; } else if (bIsStrike(usFontstyle)) { szAttr = "role='strikethrough'"; } else { szAttr = NULL; } vAddStartTag(pDiag, TAG_EMPHASIS, szAttr); } if (bSuperscriptNew && !bSuperscriptOpen) { vAddStartTag(pDiag, TAG_SUPERSCRIPT, NULL); } if (bSubscriptNew && !bSubscriptOpen) { vAddStartTag(pDiag, TAG_SUBSCRIPT, NULL); } /* The print the string */ for (iCount = 0; iCount < (int)tStringLength; iCount++) { vPrintChar(pDiag, szString[iCount]); } } /* end of vPrintXML */ /* * vMove2NextLineXML - move to the next line */ void vMove2NextLineXML(diagram_type *pDiag) { fail(pDiag == NULL); /* if (uiParagraphLevel != 0) { We need something like HTML's <BR> tag } */ } /* end of vMove2NextLineXML */ /* * vSubstringXML - put a sub string into a diagram */ void vSubstringXML(diagram_type *pDiag, const char *szString, size_t tStringLength, long lStringWidth, USHORT usFontstyle) { fail(pDiag == NULL || szString == NULL); fail(pDiag->pOutFile == NULL); fail(pDiag->lXleft < 0); fail(tStringLength != strlen(szString)); if (szString[0] == '\0' || tStringLength == 0) { return; } vPrintXML(pDiag, szString, tStringLength, usFontstyle); pDiag->lXleft += lStringWidth; } /* end of vSubstringXML */ /* * Create an start of a paragraph * Only works on paragraph level one, because Word doesn't allow paragraphs * in paragraphs. Other paragraph levels result from DocBooks special needs. */ void vStartOfParagraphXML(diagram_type *pDiag, UINT uiMaxLevel) { fail(pDiag == NULL); if (uiParagraphLevel >= uiMaxLevel || bTitleOpen) { /* In Word a title is just a paragraph */ return; } if (uiListLevel != 0 && bEmptyListLevel) { /* No paragraphs in a list before the first listitem */ return; } if (usHeaderLevelCurrent == 0) { /* No paragraphs without an open header */ vAddStartTag(pDiag, TAG_CHAPTER, NULL); /* Dummy title */ vAddCombinedTag(pDiag, TAG_TITLE, NULL); } vAddStartTag(pDiag, TAG_PARA, NULL); } /* end of vStartOfParagraphXML */ /* * Create an end of a paragraph * Only for paragraph level one and for titles */ void vEndOfParagraphXML(diagram_type *pDiag, UINT uiMaxLevel) { UCHAR ucTopTag; fail(pDiag == NULL); if (uiParagraphLevel > uiMaxLevel) { DBG_DEC(uiParagraphLevel); return; } for(;;) { ucTopTag = ucReadStack(); switch (ucTopTag) { case TAG_EMPHASIS: fail(!bEmphasisOpen); vAddEndTag(pDiag, TAG_EMPHASIS); break; case TAG_SUPERSCRIPT: fail(!bSuperscriptOpen); vAddEndTag(pDiag, TAG_SUPERSCRIPT); break; case TAG_SUBSCRIPT: fail(!bSubscriptOpen); vAddEndTag(pDiag, TAG_SUBSCRIPT); break; case TAG_TITLE: fail(!bTitleOpen); vAddEndTag(pDiag, TAG_TITLE); return; case TAG_PARA: fail(uiParagraphLevel == 0); vAddEndTag(pDiag, TAG_PARA); return; case TAG_TBODY: case TAG_TGROUP: case TAG_INFORMALTABLE: fail(!bTableOpen); vAddEndTag(pDiag, ucTopTag); break; case TAG_NOTAG: DBG_FIXME(); werr(1, "Impossible tag sequence, unable to continue"); break; default: DBG_DEC(ucTopTag); DBG_MSG_C((size_t)ucTopTag < elementsof(atDocBookTags), atDocBookTags[(UINT)ucTopTag].szTagname); return; } } } /* end of vEndOfParagraphXML */ /* * Create an end of a page */ void vEndOfPageXML(diagram_type *pDiag) { if (bTableOpen || usHeaderLevelCurrent == 0) { /* No beginpage in a table or outside a chapter */ return; } if (bTitleOpen) { /* A beginpage is not allowed when in a title */ /* So start a new paragraph */ vEndOfParagraphXML(pDiag, UINT_MAX); vStartOfParagraphXML(pDiag, UINT_MAX); return; } vAddCombinedTag(pDiag, TAG_BEGINPAGE, NULL); } /* end of vEndOfPageXML */ /* * vCloseHeaderLevels - close the specified header levels */ static void vCloseHeaderLevels(diagram_type *pDiag, USHORT usIstd) { BOOL bNotReady; UCHAR ucTopTag; DBG_MSG("vCloseHeaderLevels"); DBG_DEC(usIstd); DBG_DEC(usHeaderLevelCurrent); vStackTrace(); bNotReady = TRUE; do { ucTopTag = ucReadStack(); switch (ucTopTag) { case TAG_TITLE: case TAG_PARA: vAddEndTag(pDiag, ucTopTag); break; default: bNotReady = FALSE; break; } } while (bNotReady); vStackTrace(); while (usHeaderLevelCurrent >= usIstd) { if (bEmptyHeaderLevel) { vAddCombinedTag(pDiag, TAG_PARA, NULL); bEmptyHeaderLevel = FALSE; } switch (usHeaderLevelCurrent) { case 1: vAddEndTag(pDiag, TAG_CHAPTER); break; case 2: vAddEndTag(pDiag, TAG_SECT1); break; case 3: vAddEndTag(pDiag, TAG_SECT2); break; case 4: vAddEndTag(pDiag, TAG_SECT3); break; case 5: vAddEndTag(pDiag, TAG_SECT4); break; case 6: vAddEndTag(pDiag, TAG_SECT5); break; default: DBG_DEC(usHeaderLevelCurrent); DBG_FIXME(); return; } } DBG_DEC(usHeaderLevelCurrent); vStackTrace(); } /* end of vCloseHeaderLevels */ /* * vSetHeadersXML - set the headers */ void vSetHeadersXML(diagram_type *pDiag, USHORT usIstd) { fail(pDiag == NULL); if (usIstd == 0 || usIstd > 6) { DBG_DEC_C(usIstd != 0 && usIstd <= 9, usIstd); return; } DBG_DEC(usIstd); if (bTableOpen || uiListLevel != 0) { /* No headers when you're in a table or in a list */ return; } /* Close levels */ vCloseHeaderLevels(pDiag, usIstd); DBG_DEC(usHeaderLevelCurrent); /* Open levels */ while (usHeaderLevelCurrent < usIstd) { switch (usHeaderLevelCurrent) { case 0: vAddStartTag(pDiag, TAG_CHAPTER, NULL); break; case 1: vAddStartTag(pDiag, TAG_SECT1, NULL); break; case 2: vAddStartTag(pDiag, TAG_SECT2, NULL); break; case 3: vAddStartTag(pDiag, TAG_SECT3, NULL); break; case 4: vAddStartTag(pDiag, TAG_SECT4, NULL); break; case 5: vAddStartTag(pDiag, TAG_SECT5, NULL); break; default: DBG_DEC(usHeaderLevelCurrent); DBG_FIXME(); return; } fail(usIstd == 0); /* The next paragraph should be a title */ if (usHeaderLevelCurrent < usIstd) { /* This chapter level is not in the Word document */ vAddCombinedTag(pDiag, TAG_TITLE, NULL); } else { vAddStartTag(pDiag, TAG_TITLE, NULL); } } } /* end of vSetHeadersXML */ /* * Create a start of a list */ void vStartOfListXML(diagram_type *pDiag, UCHAR ucNFC, BOOL bIsEndOfTable) { const char *szAttr; UCHAR ucTag; fail(pDiag == NULL); if (bIsEndOfTable) { /* FIXME: until a list in a table is allowed */ vEndOfTableXML(pDiag); } if (bTableOpen) { /* FIXME: a list in a table should be allowed */ return; } if (usHeaderLevelCurrent == 0) { /* No list without an open header */ vAddStartTag(pDiag, TAG_CHAPTER, NULL); /* Dummy title */ vAddCombinedTag(pDiag, TAG_TITLE, NULL); } switch (ucNFC) { case LIST_ARABIC_NUM: case LIST_ORDINAL_NUM: case LIST_NUMBER_TXT: case LIST_ORDINAL_TXT: case LIST_OUTLINE_NUM: ucTag = TAG_ORDEREDLIST; szAttr = "numeration='arabic'"; break; case LIST_UPPER_ROMAN: ucTag = TAG_ORDEREDLIST; szAttr = "numeration='upperroman'"; break; case LIST_LOWER_ROMAN: ucTag = TAG_ORDEREDLIST; szAttr = "numeration='lowerroman'"; break; case LIST_UPPER_ALPHA: ucTag = TAG_ORDEREDLIST; szAttr = "numeration='upperalpha'"; break; case LIST_LOWER_ALPHA: ucTag = TAG_ORDEREDLIST; szAttr = "numeration='loweralpha'"; break; case LIST_SPECIAL: case LIST_SPECIAL2: case LIST_BULLETS: ucTag = TAG_ITEMIZEDLIST; szAttr = "mark='bullet'"; break; default: ucTag = TAG_ORDEREDLIST; szAttr = "numeration='arabic'"; DBG_HEX(ucNFC); DBG_FIXME(); break; } vAddStartTag(pDiag, ucTag, szAttr); } /* end of vStartOfListXML */ /* * Create an end of a list */ void vEndOfListXML(diagram_type *pDiag) { fail(pDiag == NULL); if (bTableOpen) { /* FIXME: a list in a table should be allowed */ return; } if (uiListLevel != 0) { vStackTrace(); vAddEndTagsUntil2(pDiag, TAG_ITEMIZEDLIST, TAG_ORDEREDLIST); vStackTrace(); } } /* end of vEndOfListXML */ /* * Create a start of a list item */ void vStartOfListItemXML(diagram_type *pDiag, BOOL bNoMarks) { const char *szAttr; UCHAR ucTopTag; fail(pDiag == NULL); if (bTableOpen) { /* FIXME: a list in a table should be allowed */ return; } ucTopTag = ucReadStack(); if (ucTopTag != TAG_ITEMIZEDLIST && ucTopTag != TAG_ORDEREDLIST) { /* Must end a previous list item first */ vAddEndTagsUntil1(pDiag, TAG_LISTITEM); } DBG_DEC_C(ucReadStack() != TAG_ITEMIZEDLIST && ucReadStack() != TAG_ORDEREDLIST, ucReadStack()); /* Start a new list item */ szAttr = bNoMarks ? "override='none'" : NULL; vAddStartTag(pDiag, TAG_LISTITEM, szAttr); /* Start a new paragraph (independant of level) */ vAddStartTag(pDiag, TAG_PARA, NULL); } /* end of vStartOfListItemXML */ /* * Create a start of a table */ static void vStartOfTable(diagram_type *pDiag, UCHAR ucBorderInfo) { const char *szFrame; BOOL bNotReady; UCHAR ucTopTag; char cColSep, cRowSep; char szAttr[40]; fail(pDiag == NULL); /* Close elements that cannot contain a table */ bNotReady = TRUE; do { ucTopTag = ucReadStack(); switch (ucTopTag) { case TAG_TITLE: fail(!bTitleOpen); vAddEndTag(pDiag, TAG_TITLE); break; case TAG_EMPHASIS: fail(!bEmphasisOpen); vAddEndTag(pDiag, TAG_EMPHASIS); break; case TAG_SUPERSCRIPT: fail(!bSuperscriptOpen); vAddEndTag(pDiag, TAG_SUPERSCRIPT); break; case TAG_SUBSCRIPT: fail(!bSubscriptOpen); vAddEndTag(pDiag, TAG_SUBSCRIPT); break; default: bNotReady = FALSE; break; } } while (bNotReady); /* Create table attributes */ switch (ucBorderInfo) { case TABLE_BORDER_TOP: szFrame = "top"; break; case TABLE_BORDER_LEFT|TABLE_BORDER_RIGHT: szFrame = "sides"; break; case TABLE_BORDER_TOP|TABLE_BORDER_BOTTOM: szFrame = "topbot"; break; case TABLE_BORDER_BOTTOM: szFrame = "bottom"; break; case TABLE_BORDER_TOP|TABLE_BORDER_LEFT| TABLE_BORDER_BOTTOM|TABLE_BORDER_RIGHT: szFrame = "all"; break; default: szFrame = "none"; break; } cColSep = bIsTableBorderLeft(ucBorderInfo) || bIsTableBorderRight(ucBorderInfo) ? '1' : '0'; cRowSep = bIsTableBorderTop(ucBorderInfo) || bIsTableBorderBottom(ucBorderInfo) ? '1' : '0'; sprintf(szAttr, "frame='%.6s' colsep='%c' rowsep='%c'", szFrame, cColSep, cRowSep); if (usHeaderLevelCurrent == 0) { /* No table without an open header */ vAddStartTag(pDiag, TAG_CHAPTER, NULL); /* Dummy title */ vAddCombinedTag(pDiag, TAG_TITLE, NULL); } vAddStartTag(pDiag, TAG_INFORMALTABLE, szAttr); } /* end of vStartOfTable */ /* * Create a start of a table group */ static void vStartOfTableGroup(diagram_type *pDiag, int iNbrOfColumns, const short *asColumnWidth) { double dWidth; int iIndex; char szCols[6 + 3 * sizeof(int) + 1 + 1]; char szColWidth[10 + 3 * sizeof(short) + 3 + 3 + 1]; fail(iNbrOfColumns < 1); fail(asColumnWidth == NULL); sprintf(szCols, "cols='%d'", iNbrOfColumns); vAddStartTag(pDiag, TAG_TGROUP, szCols); for (iIndex= 0; iIndex < iNbrOfColumns; iIndex++) { fail(asColumnWidth[iIndex] < 0); dWidth = dTwips2Points(asColumnWidth[iIndex]); if (dWidth <= 1.0) { strcpy(szColWidth, "colwidth='1.00pt'"); } else { sprintf(szColWidth, "colwidth='%.2fpt'", dWidth); } vAddCombinedTag(pDiag, TAG_COLSPEC, szColWidth); } } /* end of vStartOfTableGroup */ /* * Create an end of a table */ void vEndOfTableXML(diagram_type *pDiag) { fail(pDiag == NULL); if (bTableOpen) { vAddEndTag(pDiag, TAG_TBODY); vAddEndTag(pDiag, TAG_TGROUP); vAddEndTag(pDiag, TAG_INFORMALTABLE); } } /* end of vEndOfTableXML */ /* * Add a table row */ void vAddTableRowXML(diagram_type *pDiag, char **aszColTxt, int iNbrOfColumns, const short *asColumnWidth, UCHAR ucBorderInfo) { size_t tCount, tStringLength; int iIndex; fail(pDiag == NULL); fail(pDiag->pOutFile == NULL); fail(aszColTxt == NULL); fail(iNbrOfColumns < 1); fail(asColumnWidth == NULL); if (iNbrOfColumns != iTableColumnsCurrent) { /* A new number of columns */ /* End the old table body and table group (if they exist) */ vAddEndTagOptional(pDiag, TAG_TBODY); vAddEndTagOptional(pDiag, TAG_TGROUP); if (!bTableOpen) { /* No table yet. Start a new table */ vStartOfTable(pDiag, ucBorderInfo); } /* Start a new table group and a new table body */ vStartOfTableGroup(pDiag, iNbrOfColumns, asColumnWidth); vAddStartTag(pDiag, TAG_TBODY, NULL); iTableColumnsCurrent = iNbrOfColumns; } /* Add the table row */ vAddStartTag(pDiag, TAG_ROW, NULL); for (iIndex = 0; iIndex < iNbrOfColumns; iIndex++) { /* Add a table cell */ fail(aszColTxt[iIndex] == NULL); vAddStartTag(pDiag, TAG_ENTRY, NULL); tStringLength = strlen(aszColTxt[iIndex]); for (tCount = 0; tCount < tStringLength; tCount++) { vPrintChar(pDiag, aszColTxt[iIndex][tCount]); } vAddEndTag(pDiag, TAG_ENTRY); } vAddEndTag(pDiag, TAG_ROW); } /* end of vAddTableRowXML */