/* * WINE RTF file reader * * Portions Copyright 2004 Mike McCormack for CodeWeavers * * This library is free software; you can redistribute it and/or * modify it under the terms of the GNU Lesser General Public * License as published by the Free Software Foundation; either * version 2.1 of the License, or (at your option) any later version. * * This library is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU * Lesser General Public License for more details. * * You should have received a copy of the GNU Lesser General Public * License along with this library; if not, write to the Free Software * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA */ /* * Derived from RTF Tools by Paul DuBois (dubois@primate.wisc.edu) * Homepage: http://www.snake.net/software/RTF/ * Original license follows: */ /* * reader.c - RTF file reader. Release 1.10. * * .... * * Author: Paul DuBois dubois@primate.wisc.edu * * This software may be redistributed without restriction and used for * any purpose whatsoever. */ #include #include #include #include #include #include #include "windef.h" #include "winbase.h" #include "wine/debug.h" #include "editor.h" #include "rtf.h" WINE_DEFAULT_DEBUG_CHANNEL(richedit); extern HANDLE me_heap; static int _RTFGetChar(RTF_Info *); static void _RTFGetToken (RTF_Info *); static void _RTFGetToken2 (RTF_Info *); static int GetChar (RTF_Info *); static void ReadFontTbl (RTF_Info *); static void ReadColorTbl (RTF_Info *); static void ReadStyleSheet (RTF_Info *); static void ReadInfoGroup (RTF_Info *); static void ReadPictGroup (RTF_Info *); static void ReadObjGroup (RTF_Info *); static void LookupInit (void); static void Lookup (RTF_Info *, char *); static int Hash (char*); static void CharAttr(RTF_Info *info); static void CharSet(RTF_Info *info); static void DocAttr(RTF_Info *info); static void RTFFlushCPOutputBuffer(RTF_Info *info); static void RTFPutCodePageChar(RTF_Info *info, int c); /* ---------------------------------------------------------------------- */ /* * Memory allocation routines */ /* * Return pointer to block of size bytes, or NULL if there's * not enough memory available. */ static inline void *RTFAlloc(int size) { return HeapAlloc(me_heap, 0, size); } static inline void * RTFReAlloc(void *ptr, int size) { return HeapReAlloc(me_heap, 0, ptr, size); } /* * Saves a string on the heap and returns a pointer to it. */ static inline char *RTFStrSave(char *s) { char *p; p = RTFAlloc (lstrlenA(s) + 1); if (p == NULL) return NULL; return lstrcpyA (p, s); } static inline void RTFFree(void *p) { HeapFree(me_heap, 0, p); } /* ---------------------------------------------------------------------- */ int _RTFGetChar(RTF_Info *info) { int ch; ME_InStream *stream = info->stream; TRACE("\n"); if (stream->dwSize <= stream->dwUsed) { ME_StreamInFill(stream); /* if error, it's EOF */ if (stream->editstream->dwError) return EOF; /* if no bytes read, it's EOF */ if (stream->dwSize == 0) return EOF; } ch = stream->buffer[stream->dwUsed++]; if (!ch) return EOF; return ch; } void RTFSetEditStream(RTF_Info *info, ME_InStream *stream) { TRACE("\n"); info->stream = stream; } static void RTFDestroyAttrs(RTF_Info *info) { RTFColor *cp; RTFFont *fp; RTFStyle *sp; RTFStyleElt *eltList, *ep; while (info->fontList) { fp = info->fontList->rtfNextFont; RTFFree (info->fontList->rtfFName); RTFFree (info->fontList); info->fontList = fp; } while (info->colorList) { cp = info->colorList->rtfNextColor; RTFFree (info->colorList); info->colorList = cp; } while (info->styleList) { sp = info->styleList->rtfNextStyle; eltList = info->styleList->rtfSSEList; while (eltList) { ep = eltList->rtfNextSE; RTFFree (eltList->rtfSEText); RTFFree (eltList); eltList = ep; } RTFFree (info->styleList->rtfSName); RTFFree (info->styleList); info->styleList = sp; } } void RTFDestroy(RTF_Info *info) { if (info->rtfTextBuf) { RTFFree(info->rtfTextBuf); RTFFree(info->pushedTextBuf); } RTFDestroyAttrs(info); RTFFree(info->cpOutputBuffer); } /* * Initialize the reader. This may be called multiple times, * to read multiple files. The only thing not reset is the input * stream; that must be done with RTFSetStream(). */ void RTFInit(RTF_Info *info) { int i; TRACE("\n"); if (info->rtfTextBuf == NULL) /* initialize the text buffers */ { info->rtfTextBuf = RTFAlloc (rtfBufSiz); info->pushedTextBuf = RTFAlloc (rtfBufSiz); if (info->rtfTextBuf == NULL || info->pushedTextBuf == NULL) RTFPanic (info,"Cannot allocate text buffers."); info->rtfTextBuf[0] = info->pushedTextBuf[0] = '\0'; } RTFFree (info->inputName); RTFFree (info->outputName); info->inputName = info->outputName = NULL; /* initialize lookup table */ LookupInit (); for (i = 0; i < rtfMaxClass; i++) RTFSetClassCallback (info, i, NULL); for (i = 0; i < rtfMaxDestination; i++) RTFSetDestinationCallback (info, i, NULL); /* install built-in destination readers */ RTFSetDestinationCallback (info, rtfFontTbl, ReadFontTbl); RTFSetDestinationCallback (info, rtfColorTbl, ReadColorTbl); RTFSetDestinationCallback (info, rtfStyleSheet, ReadStyleSheet); RTFSetDestinationCallback (info, rtfInfo, ReadInfoGroup); RTFSetDestinationCallback (info, rtfPict, ReadPictGroup); RTFSetDestinationCallback (info, rtfObject, ReadObjGroup); RTFSetReadHook (info, NULL); /* dump old lists if necessary */ RTFDestroyAttrs(info); info->ansiCodePage = 1252; /* Latin-1; actually unused */ info->unicodeLength = 1; /* \uc1 is the default */ info->codePage = info->ansiCodePage; info->defFont = 0; info->rtfClass = -1; info->pushedClass = -1; info->pushedChar = EOF; info->rtfLineNum = 0; info->rtfLinePos = 0; info->prevChar = EOF; info->bumpLine = 0; info->dwCPOutputCount = 0; if (!info->cpOutputBuffer) { info->dwMaxCPOutputCount = 0x1000; info->cpOutputBuffer = RTFAlloc(info->dwMaxCPOutputCount); } } /* * Set or get the input or output file name. These are never guaranteed * to be accurate, only insofar as the calling program makes them so. */ void RTFSetInputName(RTF_Info *info, char *name) { TRACE("\n"); info->inputName = RTFStrSave (name); if (info->inputName == NULL) RTFPanic (info,"RTFSetInputName: out of memory"); } char *RTFGetInputName(RTF_Info *info) { return (info->inputName); } void RTFSetOutputName(RTF_Info *info, char *name) { TRACE("\n"); info->outputName = RTFStrSave (name); if (info->outputName == NULL) RTFPanic (info, "RTFSetOutputName: out of memory"); } char *RTFGetOutputName(RTF_Info *info) { return (info->outputName); } /* ---------------------------------------------------------------------- */ /* * Callback table manipulation routines */ /* * Install or return a writer callback for a token class */ void RTFSetClassCallback(RTF_Info *info, int class, RTFFuncPtr callback) { if (class >= 0 && class < rtfMaxClass) info->ccb[class] = callback; } RTFFuncPtr RTFGetClassCallback(RTF_Info *info, int class) { if (class >= 0 && class < rtfMaxClass) return info->ccb[class]; return NULL; } /* * Install or return a writer callback for a destination type */ void RTFSetDestinationCallback(RTF_Info *info, int dest, RTFFuncPtr callback) { if (dest >= 0 && dest < rtfMaxDestination) info->dcb[dest] = callback; } RTFFuncPtr RTFGetDestinationCallback(RTF_Info *info, int dest) { if (dest >= 0 && dest < rtfMaxDestination) return info->dcb[dest]; return NULL; } /* ---------------------------------------------------------------------- */ /* * Token reading routines */ /* * Read the input stream, invoking the writer's callbacks * where appropriate. */ void RTFRead(RTF_Info *info) { while (RTFGetToken (info) != rtfEOF) RTFRouteToken (info); } /* * Route a token. If it's a destination for which a reader is * installed, process the destination internally, otherwise * pass the token to the writer's class callback. */ void RTFRouteToken(RTF_Info *info) { RTFFuncPtr p; TRACE("\n"); if (info->rtfClass < 0 || info->rtfClass >= rtfMaxClass) /* watchdog */ { RTFPanic (info,"Unknown class %d: %s (reader malfunction)", info->rtfClass, info->rtfTextBuf); } if (RTFCheckCM (info, rtfControl, rtfDestination)) { /* invoke destination-specific callback if there is one */ p = RTFGetDestinationCallback (info, info->rtfMinor); if (p != NULL) { (*p) (info); return; } } /* invoke class callback if there is one */ p = RTFGetClassCallback (info, info->rtfClass); if (p != NULL) (*p) (info); } /* * Skip to the end of the current group. When this returns, * writers that maintain a state stack may want to call their * state unstacker; global vars will still be set to the group's * closing brace. */ void RTFSkipGroup(RTF_Info *info) { int level = 1; TRACE("\n"); while (RTFGetToken (info) != rtfEOF) { if (info->rtfClass == rtfGroup) { if (info->rtfMajor == rtfBeginGroup) ++level; else if (info->rtfMajor == rtfEndGroup) { if (--level < 1) break; /* end of initial group */ } } } } /* * Read one token. Call the read hook if there is one. The * token class is the return value. Returns rtfEOF when there * are no more tokens. */ int RTFGetToken(RTF_Info *info) { RTFFuncPtr p; TRACE("\n"); /* don't try to return anything once EOF is reached */ if (info->rtfClass == rtfEOF) { return rtfEOF; } for (;;) { _RTFGetToken (info); p = RTFGetReadHook (info); if (p != NULL) (*p) (info); /* give read hook a look at token */ /* Silently discard newlines, carriage returns, nulls. */ if (!(info->rtfClass == rtfText && info->rtfFormat != SF_TEXT && (info->rtfMajor == '\r' || info->rtfMajor == '\n' || info->rtfMajor == '\0'))) break; } return (info->rtfClass); } /* * Install or return a token reader hook. */ void RTFSetReadHook(RTF_Info *info, RTFFuncPtr f) { info->readHook = f; } RTFFuncPtr RTFGetReadHook(RTF_Info *info) { return (info->readHook); } void RTFUngetToken(RTF_Info *info) { TRACE("\n"); if (info->pushedClass >= 0) /* there's already an ungotten token */ RTFPanic (info,"cannot unget two tokens"); if (info->rtfClass < 0) RTFPanic (info,"no token to unget"); info->pushedClass = info->rtfClass; info->pushedMajor = info->rtfMajor; info->pushedMinor = info->rtfMinor; info->pushedParam = info->rtfParam; lstrcpyA (info->pushedTextBuf, info->rtfTextBuf); } int RTFPeekToken(RTF_Info *info) { _RTFGetToken (info); RTFUngetToken (info); return (info->rtfClass); } static void _RTFGetToken(RTF_Info *info) { TRACE("\n"); if (info->rtfFormat == SF_TEXT) { info->rtfMajor = GetChar (info); info->rtfMinor = 0; info->rtfParam = rtfNoParam; info->rtfTextBuf[info->rtfTextLen = 0] = '\0'; if (info->rtfMajor == EOF) info->rtfClass = rtfEOF; else info->rtfClass = rtfText; return; } /* first check for pushed token from RTFUngetToken() */ if (info->pushedClass >= 0) { info->rtfClass = info->pushedClass; info->rtfMajor = info->pushedMajor; info->rtfMinor = info->pushedMinor; info->rtfParam = info->pushedParam; lstrcpyA (info->rtfTextBuf, info->pushedTextBuf); info->rtfTextLen = lstrlenA(info->rtfTextBuf); info->pushedClass = -1; return; } /* * Beyond this point, no token is ever seen twice, which is * important, e.g., for making sure no "}" pops the font stack twice. */ _RTFGetToken2 (info); } int RTFCharSetToCodePage(RTF_Info *info, int charset) { switch (charset) { case ANSI_CHARSET: return 1252; case DEFAULT_CHARSET: return CP_ACP; case SYMBOL_CHARSET: return CP_SYMBOL; case MAC_CHARSET: return CP_MACCP; case SHIFTJIS_CHARSET: return 932; case HANGEUL_CHARSET: return 949; case JOHAB_CHARSET: return 1361; case GB2312_CHARSET: return 936; case CHINESEBIG5_CHARSET: return 950; case GREEK_CHARSET: return 1253; case TURKISH_CHARSET: return 1254; case VIETNAMESE_CHARSET: return 1258; case HEBREW_CHARSET: return 1255; case ARABIC_CHARSET: return 1256; case BALTIC_CHARSET: return 1257; case RUSSIAN_CHARSET: return 1251; case THAI_CHARSET: return 874; case EASTEUROPE_CHARSET: return 1250; case OEM_CHARSET: return CP_OEMCP; default: { CHARSETINFO csi; DWORD n = charset; /* FIXME: TranslateCharsetInfo does not work as good as it * should, so let's use it only when all else fails */ if (!TranslateCharsetInfo(&n, &csi, TCI_SRCCHARSET)) RTFMsg(info, "%s: unknown charset %u\n", __FUNCTION__, charset); else return csi.ciACP; } } return 0; } /* this shouldn't be called anywhere but from _RTFGetToken() */ static void _RTFGetToken2(RTF_Info *info) { int sign; int c; TRACE("\n"); /* initialize token vars */ info->rtfClass = rtfUnknown; info->rtfParam = rtfNoParam; info->rtfTextBuf[info->rtfTextLen = 0] = '\0'; /* get first character, which may be a pushback from previous token */ if (info->pushedChar != EOF) { c = info->pushedChar; info->rtfTextBuf[info->rtfTextLen++] = c; info->rtfTextBuf[info->rtfTextLen] = '\0'; info->pushedChar = EOF; } else if ((c = GetChar (info)) == EOF) { info->rtfClass = rtfEOF; return; } if (c == '{') { info->rtfClass = rtfGroup; info->rtfMajor = rtfBeginGroup; return; } if (c == '}') { info->rtfClass = rtfGroup; info->rtfMajor = rtfEndGroup; return; } if (c != '\\') { /* * Two possibilities here: * 1) ASCII 9, effectively like \tab control symbol * 2) literal text char */ if (c == '\t') /* ASCII 9 */ { info->rtfClass = rtfControl; info->rtfMajor = rtfSpecialChar; info->rtfMinor = rtfTab; } else { info->rtfClass = rtfText; info->rtfMajor = c; } return; } if ((c = GetChar (info)) == EOF) { /* early eof, whoops (class is rtfUnknown) */ return; } if (!isalpha (c)) { /* * Three possibilities here: * 1) hex encoded text char, e.g., \'d5, \'d3 * 2) special escaped text char, e.g., \{, \} * 3) control symbol, e.g., \_, \-, \|, \<10> */ if (c == '\'') /* hex char */ { int c2; if ((c = GetChar (info)) != EOF && (c2 = GetChar (info)) != EOF) { /* should do isxdigit check! */ info->rtfClass = rtfText; info->rtfMajor = RTFCharToHex (c) * 16 + RTFCharToHex (c2); return; } /* early eof, whoops (class is rtfUnknown) */ return; } /* escaped char */ /*if (index (":{}\\", c) != (char *) NULL)*/ /* escaped char */ if (c == ':' || c == '{' || c == '}' || c == '\\') { info->rtfClass = rtfText; info->rtfMajor = c; return; } /* control symbol */ Lookup (info, info->rtfTextBuf); /* sets class, major, minor */ return; } /* control word */ while (isalpha (c)) { if ((c = GetChar (info)) == EOF) break; } /* * At this point, the control word is all collected, so the * major/minor numbers are determined before the parameter * (if any) is scanned. There will be one too many characters * in the buffer, though, so fix up before and restore after * looking up. */ if (c != EOF) info->rtfTextBuf[info->rtfTextLen-1] = '\0'; Lookup (info, info->rtfTextBuf); /* sets class, major, minor */ if (c != EOF) info->rtfTextBuf[info->rtfTextLen-1] = c; /* * Should be looking at first digit of parameter if there * is one, unless it's negative. In that case, next char * is '-', so need to gobble next char, and remember sign. */ sign = 1; if (c == '-') { sign = -1; c = GetChar (info); } if (c != EOF && isdigit (c)) { info->rtfParam = 0; while (isdigit (c)) /* gobble parameter */ { info->rtfParam = info->rtfParam * 10 + c - '0'; if ((c = GetChar (info)) == EOF) break; } info->rtfParam *= sign; } /* * If control symbol delimiter was a blank, gobble it. * Otherwise the character is first char of next token, so * push it back for next call. In either case, delete the * delimiter from the token buffer. */ if (c != EOF) { if (c != ' ') info->pushedChar = c; info->rtfTextBuf[--info->rtfTextLen] = '\0'; } } /* * Read the next character from the input. This handles setting the * current line and position-within-line variables. Those variable are * set correctly whether lines end with CR, LF, or CRLF (the last being * the tricky case). * * bumpLine indicates whether the line number should be incremented on * the *next* input character. */ static int GetChar(RTF_Info *info) { int c; int oldBumpLine; TRACE("\n"); if ((c = _RTFGetChar(info)) != EOF) { info->rtfTextBuf[info->rtfTextLen++] = c; info->rtfTextBuf[info->rtfTextLen] = '\0'; } if (info->prevChar == EOF) info->bumpLine = 1; oldBumpLine = info->bumpLine; /* non-zero if prev char was line ending */ info->bumpLine = 0; if (c == '\r') info->bumpLine = 1; else if (c == '\n') { info->bumpLine = 1; if (info->prevChar == '\r') /* oops, previous \r wasn't */ oldBumpLine = 0; /* really a line ending */ } ++info->rtfLinePos; if (oldBumpLine) /* were we supposed to increment the */ { /* line count on this char? */ ++info->rtfLineNum; info->rtfLinePos = 1; } info->prevChar = c; return (c); } /* * Synthesize a token by setting the global variables to the * values supplied. Typically this is followed with a call * to RTFRouteToken(). * * If a param value other than rtfNoParam is passed, it becomes * part of the token text. */ void RTFSetToken(RTF_Info *info, int class, int major, int minor, int param, const char *text) { TRACE("\n"); info->rtfClass = class; info->rtfMajor = major; info->rtfMinor = minor; info->rtfParam = param; if (param == rtfNoParam) lstrcpyA(info->rtfTextBuf, text); else sprintf (info->rtfTextBuf, "%s%d", text, param); info->rtfTextLen = lstrlenA (info->rtfTextBuf); } /* ---------------------------------------------------------------------- */ /* * Special destination readers. They gobble the destination so the * writer doesn't have to deal with them. That's wrong for any * translator that wants to process any of these itself. In that * case, these readers should be overridden by installing a different * destination callback. * * NOTE: The last token read by each of these reader will be the * destination's terminating '}', which will then be the current token. * That '}' token is passed to RTFRouteToken() - the writer has already * seen the '{' that began the destination group, and may have pushed a * state; it also needs to know at the end of the group that a state * should be popped. * * It's important that rtf.h and the control token lookup table list * as many symbols as possible, because these destination readers * unfortunately make strict assumptions about the input they expect, * and a token of class rtfUnknown will throw them off easily. */ /* * Read { \fonttbl ... } destination. Old font tables don't have * braces around each table entry; try to adjust for that. */ static void ReadFontTbl(RTF_Info *info) { RTFFont *fp = NULL; char buf[rtfBufSiz], *bp; int old = -1; const char *fn = "ReadFontTbl"; TRACE("\n"); for (;;) { RTFGetToken (info); if (info->rtfClass == rtfEOF) break; if (RTFCheckCM (info, rtfGroup, rtfEndGroup)) break; if (old < 0) /* first entry - determine tbl type */ { if (RTFCheckCMM (info, rtfControl, rtfCharAttr, rtfFontNum)) old = 1; /* no brace */ else if (RTFCheckCM (info, rtfGroup, rtfBeginGroup)) old = 0; /* brace */ else /* can't tell! */ RTFPanic (info, "%s: Cannot determine format", fn); } if (old == 0) /* need to find "{" here */ { if (!RTFCheckCM (info, rtfGroup, rtfBeginGroup)) RTFPanic (info, "%s: missing \"{\"", fn); RTFGetToken (info); /* yes, skip to next token */ if (info->rtfClass == rtfEOF) break; } fp = New (RTFFont); if (fp == NULL) RTFPanic (info, "%s: cannot allocate font entry", fn); fp->rtfNextFont = info->fontList; info->fontList = fp; fp->rtfFName = NULL; fp->rtfFAltName = NULL; fp->rtfFNum = -1; fp->rtfFFamily = 0; fp->rtfFCharSet = DEFAULT_CHARSET; /* 1 */ fp->rtfFPitch = 0; fp->rtfFType = 0; fp->rtfFCodePage = CP_ACP; while (info->rtfClass != rtfEOF && !RTFCheckCM (info, rtfText, ';') && !RTFCheckCM (info, rtfGroup, rtfEndGroup)) { if (info->rtfClass == rtfControl) { switch (info->rtfMajor) { default: /* ignore token but announce it */ RTFMsg (info,"%s: unknown token \"%s\"\n", fn, info->rtfTextBuf); break; case rtfFontFamily: fp->rtfFFamily = info->rtfMinor; break; case rtfCharAttr: switch (info->rtfMinor) { default: break; /* ignore unknown? */ case rtfFontNum: fp->rtfFNum = info->rtfParam; break; } break; case rtfFontAttr: switch (info->rtfMinor) { default: break; /* ignore unknown? */ case rtfFontCharSet: fp->rtfFCharSet = info->rtfParam; if (!fp->rtfFCodePage) fp->rtfFCodePage = RTFCharSetToCodePage(info, info->rtfParam); break; case rtfFontPitch: fp->rtfFPitch = info->rtfParam; break; case rtfFontCodePage: fp->rtfFCodePage = info->rtfParam; break; case rtfFTypeNil: case rtfFTypeTrueType: fp->rtfFType = info->rtfParam; break; } break; } } else if (RTFCheckCM (info, rtfGroup, rtfBeginGroup)) /* dest */ { RTFSkipGroup (info); /* ignore for now */ } else if (info->rtfClass == rtfText) /* font name */ { bp = buf; while (info->rtfClass == rtfText && !RTFCheckCM (info, rtfText, ';')) { *bp++ = info->rtfMajor; RTFGetToken (info); } /* FIX: in some cases the isn't finished with a semi-column */ if(RTFCheckCM (info, rtfGroup, rtfEndGroup)) { RTFUngetToken (info); } *bp = '\0'; fp->rtfFName = RTFStrSave (buf); if (fp->rtfFName == NULL) RTFPanic (info, "%s: cannot allocate font name", fn); /* already have next token; don't read one */ /* at bottom of loop */ continue; } else { /* ignore token but announce it */ RTFMsg (info, "%s: unknown token \"%s\"\n", fn,info->rtfTextBuf); } RTFGetToken (info); if (info->rtfClass == rtfEOF) break; } if (info->rtfClass == rtfEOF) break; if (old == 0) /* need to see "}" here */ { RTFGetToken (info); if (!RTFCheckCM (info, rtfGroup, rtfEndGroup)) RTFPanic (info, "%s: missing \"}\"", fn); if (info->rtfClass == rtfEOF) break; } /* Apply the real properties of the default font */ if (fp->rtfFNum == info->defFont) { if (info->ansiCodePage != CP_UTF8) info->codePage = fp->rtfFCodePage; TRACE("default font codepage %d\n", info->codePage); } } if (fp->rtfFNum == -1) RTFPanic (info,"%s: missing font number", fn); /* * Could check other pieces of structure here, too, I suppose. */ RTFRouteToken (info); /* feed "}" back to router */ /* Set default font */ info->rtfClass = rtfControl; info->rtfMajor = rtfCharAttr; info->rtfMinor = rtfFontNum; info->rtfParam = info->defFont; lstrcpyA(info->rtfTextBuf, "f"); RTFUngetToken(info); } /* * The color table entries have color values of -1 if * the default color should be used for the entry (only * a semi-colon is given in the definition, no color values). * There will be a problem if a partial entry (1 or 2 but * not 3 color values) is given. The possibility is ignored * here. */ static void ReadColorTbl(RTF_Info *info) { RTFColor *cp; int cnum = 0; const char *fn = "ReadColorTbl"; TRACE("\n"); for (;;) { RTFGetToken (info); if (info->rtfClass == rtfEOF) break; if (RTFCheckCM (info, rtfGroup, rtfEndGroup)) break; cp = New (RTFColor); if (cp == NULL) RTFPanic (info,"%s: cannot allocate color entry", fn); cp->rtfCNum = cnum++; cp->rtfCRed = cp->rtfCGreen = cp->rtfCBlue = -1; cp->rtfNextColor = info->colorList; info->colorList = cp; while (RTFCheckCM (info, rtfControl, rtfColorName)) { switch (info->rtfMinor) { case rtfRed: cp->rtfCRed = info->rtfParam; break; case rtfGreen: cp->rtfCGreen = info->rtfParam; break; case rtfBlue: cp->rtfCBlue = info->rtfParam; break; } RTFGetToken (info); } if (info->rtfClass == rtfEOF) break; if (!RTFCheckCM (info, rtfText, ';')) RTFPanic (info,"%s: malformed entry", fn); } RTFRouteToken (info); /* feed "}" back to router */ } /* * The "Normal" style definition doesn't contain any style number, * all others do. Normal style is given style rtfNormalStyleNum. */ static void ReadStyleSheet(RTF_Info *info) { RTFStyle *sp; RTFStyleElt *sep, *sepLast; char buf[rtfBufSiz], *bp; const char *fn = "ReadStyleSheet"; int real_style; TRACE("\n"); for (;;) { RTFGetToken (info); if (info->rtfClass == rtfEOF) break; if (RTFCheckCM (info, rtfGroup, rtfEndGroup)) break; sp = New (RTFStyle); if (sp == NULL) RTFPanic (info,"%s: cannot allocate stylesheet entry", fn); sp->rtfSName = NULL; sp->rtfSNum = -1; sp->rtfSType = rtfParStyle; sp->rtfSAdditive = 0; sp->rtfSBasedOn = rtfNoStyleNum; sp->rtfSNextPar = -1; sp->rtfSSEList = sepLast = NULL; sp->rtfNextStyle = info->styleList; sp->rtfExpanding = 0; info->styleList = sp; if (!RTFCheckCM (info, rtfGroup, rtfBeginGroup)) RTFPanic (info,"%s: missing \"{\"", fn); real_style = TRUE; for (;;) { RTFGetToken (info); if (info->rtfClass == rtfEOF || RTFCheckCM (info, rtfText, ';')) break; if (info->rtfClass == rtfControl) { if (RTFCheckMM (info, rtfSpecialChar, rtfOptDest)) { RTFGetToken(info); RTFPanic(info, "%s: skipping optional destination", fn); RTFSkipGroup(info); info->rtfClass = rtfGroup; info->rtfMajor = rtfEndGroup; real_style = FALSE; break; /* ignore "\*" */ } if (RTFCheckMM (info, rtfParAttr, rtfStyleNum)) { sp->rtfSNum = info->rtfParam; sp->rtfSType = rtfParStyle; continue; } if (RTFCheckMM (info, rtfCharAttr, rtfCharStyleNum)) { sp->rtfSNum = info->rtfParam; sp->rtfSType = rtfCharStyle; continue; } if (RTFCheckMM (info, rtfSectAttr, rtfSectStyleNum)) { sp->rtfSNum = info->rtfParam; sp->rtfSType = rtfSectStyle; continue; } if (RTFCheckMM (info, rtfStyleAttr, rtfBasedOn)) { sp->rtfSBasedOn = info->rtfParam; continue; } if (RTFCheckMM (info, rtfStyleAttr, rtfAdditive)) { sp->rtfSAdditive = 1; continue; } if (RTFCheckMM (info, rtfStyleAttr, rtfNext)) { sp->rtfSNextPar = info->rtfParam; continue; } sep = New (RTFStyleElt); if (sep == NULL) RTFPanic (info,"%s: cannot allocate style element", fn); sep->rtfSEClass = info->rtfClass; sep->rtfSEMajor = info->rtfMajor; sep->rtfSEMinor = info->rtfMinor; sep->rtfSEParam = info->rtfParam; sep->rtfSEText = RTFStrSave (info->rtfTextBuf); if (sep->rtfSEText == NULL) RTFPanic (info,"%s: cannot allocate style element text", fn); if (sepLast == NULL) sp->rtfSSEList = sep; /* first element */ else /* add to end */ sepLast->rtfNextSE = sep; sep->rtfNextSE = NULL; sepLast = sep; } else if (RTFCheckCM (info, rtfGroup, rtfBeginGroup)) { /* * This passes over "{\*\keycode ... }, among * other things. A temporary (perhaps) hack. */ RTFPanic(info, "%s: skipping begin", fn); RTFSkipGroup (info); continue; } else if (info->rtfClass == rtfText) /* style name */ { bp = buf; while (info->rtfClass == rtfText) { if (info->rtfMajor == ';') { /* put back for "for" loop */ RTFUngetToken (info); break; } *bp++ = info->rtfMajor; RTFGetToken (info); } *bp = '\0'; sp->rtfSName = RTFStrSave (buf); if (sp->rtfSName == NULL) RTFPanic (info, "%s: cannot allocate style name", fn); } else /* unrecognized */ { /* ignore token but announce it */ RTFMsg (info, "%s: unknown token \"%s\"\n", fn, info->rtfTextBuf); } } if (real_style) { RTFGetToken (info); if (!RTFCheckCM (info, rtfGroup, rtfEndGroup)) RTFPanic (info, "%s: missing \"}\"", fn); /* * Check over the style structure. A name is a must. * If no style number was specified, check whether it's the * Normal style (in which case it's given style number * rtfNormalStyleNum). Note that some "normal" style names * just begin with "Normal" and can have other stuff following, * e.g., "Normal,Times 10 point". Ugh. * * Some German RTF writers use "Standard" instead of "Normal". */ if (sp->rtfSName == NULL) RTFPanic (info,"%s: missing style name", fn); if (sp->rtfSNum < 0) { if (strncmp (buf, "Normal", 6) != 0 && strncmp (buf, "Standard", 8) != 0) RTFPanic (info,"%s: missing style number", fn); sp->rtfSNum = rtfNormalStyleNum; } if (sp->rtfSNextPar == -1) /* if \snext not given, */ sp->rtfSNextPar = sp->rtfSNum; /* next is itself */ } /* otherwise we're just dealing with fake end group from skipped group */ } RTFRouteToken (info); /* feed "}" back to router */ } static void ReadInfoGroup(RTF_Info *info) { RTFSkipGroup (info); RTFRouteToken (info); /* feed "}" back to router */ } static void ReadPictGroup(RTF_Info *info) { RTFSkipGroup (info); RTFRouteToken (info); /* feed "}" back to router */ } static void ReadObjGroup(RTF_Info *info) { RTFSkipGroup (info); RTFRouteToken (info); /* feed "}" back to router */ } /* ---------------------------------------------------------------------- */ /* * Routines to return pieces of stylesheet, or font or color tables. * References to style 0 are mapped onto the Normal style. */ RTFStyle *RTFGetStyle(RTF_Info *info, int num) { RTFStyle *s; if (num == -1) return (info->styleList); for (s = info->styleList; s != NULL; s = s->rtfNextStyle) { if (s->rtfSNum == num) break; } return (s); /* NULL if not found */ } RTFFont *RTFGetFont(RTF_Info *info, int num) { RTFFont *f; if (num == -1) return (info->fontList); for (f = info->fontList; f != NULL; f = f->rtfNextFont) { if (f->rtfFNum == num) break; } return (f); /* NULL if not found */ } RTFColor *RTFGetColor(RTF_Info *info, int num) { RTFColor *c; if (num == -1) return (info->colorList); for (c = info->colorList; c != NULL; c = c->rtfNextColor) { if (c->rtfCNum == num) break; } return (c); /* NULL if not found */ } /* ---------------------------------------------------------------------- */ /* * Expand style n, if there is such a style. */ void RTFExpandStyle(RTF_Info *info, int n) { RTFStyle *s; RTFStyleElt *se; TRACE("\n"); if (n == -1) return; s = RTFGetStyle (info, n); if (s == NULL) return; if (s->rtfExpanding != 0) RTFPanic (info,"Style expansion loop, style %d", n); s->rtfExpanding = 1; /* set expansion flag for loop detection */ /* * Expand "based-on" style (unless it's the same as the current * style -- Normal style usually gives itself as its own based-on * style). Based-on style expansion is done by synthesizing * the token that the writer needs to see in order to trigger * another style expansion, and feeding to token back through * the router so the writer sees it. */ if (n != s->rtfSBasedOn) { RTFSetToken (info, rtfControl, rtfParAttr, rtfStyleNum, s->rtfSBasedOn, "\\s"); RTFRouteToken (info); } /* * Now route the tokens unique to this style. RTFSetToken() * isn't used because it would add the param value to the end * of the token text, which already has it in. */ for (se = s->rtfSSEList; se != NULL; se = se->rtfNextSE) { info->rtfClass = se->rtfSEClass; info->rtfMajor = se->rtfSEMajor; info->rtfMinor = se->rtfSEMinor; info->rtfParam = se->rtfSEParam; lstrcpyA (info->rtfTextBuf, se->rtfSEText); info->rtfTextLen = lstrlenA (info->rtfTextBuf); RTFRouteToken (info); } s->rtfExpanding = 0; /* done - clear expansion flag */ } /* ---------------------------------------------------------------------- */ /* * Control symbol lookup routines */ typedef struct RTFKey RTFKey; struct RTFKey { int rtfKMajor; /* major number */ int rtfKMinor; /* minor number */ const char *rtfKStr; /* symbol name */ int rtfKHash; /* symbol name hash value */ }; /* * A minor number of -1 means the token has no minor number * (all valid minor numbers are >= 0). */ static RTFKey rtfKey[] = { /* * Special characters */ { rtfSpecialChar, rtfIIntVersion, "vern", 0 }, { rtfSpecialChar, rtfICreateTime, "creatim", 0 }, { rtfSpecialChar, rtfIRevisionTime, "revtim", 0 }, { rtfSpecialChar, rtfIPrintTime, "printim", 0 }, { rtfSpecialChar, rtfIBackupTime, "buptim", 0 }, { rtfSpecialChar, rtfIEditTime, "edmins", 0 }, { rtfSpecialChar, rtfIYear, "yr", 0 }, { rtfSpecialChar, rtfIMonth, "mo", 0 }, { rtfSpecialChar, rtfIDay, "dy", 0 }, { rtfSpecialChar, rtfIHour, "hr", 0 }, { rtfSpecialChar, rtfIMinute, "min", 0 }, { rtfSpecialChar, rtfISecond, "sec", 0 }, { rtfSpecialChar, rtfINPages, "nofpages", 0 }, { rtfSpecialChar, rtfINWords, "nofwords", 0 }, { rtfSpecialChar, rtfINChars, "nofchars", 0 }, { rtfSpecialChar, rtfIIntID, "id", 0 }, { rtfSpecialChar, rtfCurHeadDate, "chdate", 0 }, { rtfSpecialChar, rtfCurHeadDateLong, "chdpl", 0 }, { rtfSpecialChar, rtfCurHeadDateAbbrev, "chdpa", 0 }, { rtfSpecialChar, rtfCurHeadTime, "chtime", 0 }, { rtfSpecialChar, rtfCurHeadPage, "chpgn", 0 }, { rtfSpecialChar, rtfSectNum, "sectnum", 0 }, { rtfSpecialChar, rtfCurFNote, "chftn", 0 }, { rtfSpecialChar, rtfCurAnnotRef, "chatn", 0 }, { rtfSpecialChar, rtfFNoteSep, "chftnsep", 0 }, { rtfSpecialChar, rtfFNoteCont, "chftnsepc", 0 }, { rtfSpecialChar, rtfCell, "cell", 0 }, { rtfSpecialChar, rtfRow, "row", 0 }, { rtfSpecialChar, rtfPar, "par", 0 }, /* newline and carriage return are synonyms for */ /* \par when they are preceded by a \ character */ { rtfSpecialChar, rtfPar, "\n", 0 }, { rtfSpecialChar, rtfPar, "\r", 0 }, { rtfSpecialChar, rtfSect, "sect", 0 }, { rtfSpecialChar, rtfPage, "page", 0 }, { rtfSpecialChar, rtfColumn, "column", 0 }, { rtfSpecialChar, rtfLine, "line", 0 }, { rtfSpecialChar, rtfSoftPage, "softpage", 0 }, { rtfSpecialChar, rtfSoftColumn, "softcol", 0 }, { rtfSpecialChar, rtfSoftLine, "softline", 0 }, { rtfSpecialChar, rtfSoftLineHt, "softlheight", 0 }, { rtfSpecialChar, rtfTab, "tab", 0 }, { rtfSpecialChar, rtfEmDash, "emdash", 0 }, { rtfSpecialChar, rtfEnDash, "endash", 0 }, { rtfSpecialChar, rtfEmSpace, "emspace", 0 }, { rtfSpecialChar, rtfEnSpace, "enspace", 0 }, { rtfSpecialChar, rtfBullet, "bullet", 0 }, { rtfSpecialChar, rtfLQuote, "lquote", 0 }, { rtfSpecialChar, rtfRQuote, "rquote", 0 }, { rtfSpecialChar, rtfLDblQuote, "ldblquote", 0 }, { rtfSpecialChar, rtfRDblQuote, "rdblquote", 0 }, { rtfSpecialChar, rtfFormula, "|", 0 }, { rtfSpecialChar, rtfNoBrkSpace, "~", 0 }, { rtfSpecialChar, rtfNoReqHyphen, "-", 0 }, { rtfSpecialChar, rtfNoBrkHyphen, "_", 0 }, { rtfSpecialChar, rtfOptDest, "*", 0 }, { rtfSpecialChar, rtfLTRMark, "ltrmark", 0 }, { rtfSpecialChar, rtfRTLMark, "rtlmark", 0 }, { rtfSpecialChar, rtfNoWidthJoiner, "zwj", 0 }, { rtfSpecialChar, rtfNoWidthNonJoiner, "zwnj", 0 }, /* is this valid? */ { rtfSpecialChar, rtfCurHeadPict, "chpict", 0 }, { rtfSpecialChar, rtfUnicode, "u", 0 }, /* * Character formatting attributes */ { rtfCharAttr, rtfPlain, "plain", 0 }, { rtfCharAttr, rtfBold, "b", 0 }, { rtfCharAttr, rtfAllCaps, "caps", 0 }, { rtfCharAttr, rtfDeleted, "deleted", 0 }, { rtfCharAttr, rtfSubScript, "dn", 0 }, { rtfCharAttr, rtfSubScrShrink, "sub", 0 }, { rtfCharAttr, rtfNoSuperSub, "nosupersub", 0 }, { rtfCharAttr, rtfExpand, "expnd", 0 }, { rtfCharAttr, rtfExpandTwips, "expndtw", 0 }, { rtfCharAttr, rtfKerning, "kerning", 0 }, { rtfCharAttr, rtfFontNum, "f", 0 }, { rtfCharAttr, rtfFontSize, "fs", 0 }, { rtfCharAttr, rtfItalic, "i", 0 }, { rtfCharAttr, rtfOutline, "outl", 0 }, { rtfCharAttr, rtfRevised, "revised", 0 }, { rtfCharAttr, rtfRevAuthor, "revauth", 0 }, { rtfCharAttr, rtfRevDTTM, "revdttm", 0 }, { rtfCharAttr, rtfSmallCaps, "scaps", 0 }, { rtfCharAttr, rtfShadow, "shad", 0 }, { rtfCharAttr, rtfStrikeThru, "strike", 0 }, { rtfCharAttr, rtfUnderline, "ul", 0 }, { rtfCharAttr, rtfDotUnderline, "uld", 0 }, { rtfCharAttr, rtfDbUnderline, "uldb", 0 }, { rtfCharAttr, rtfNoUnderline, "ulnone", 0 }, { rtfCharAttr, rtfWordUnderline, "ulw", 0 }, { rtfCharAttr, rtfSuperScript, "up", 0 }, { rtfCharAttr, rtfSuperScrShrink, "super", 0 }, { rtfCharAttr, rtfInvisible, "v", 0 }, { rtfCharAttr, rtfForeColor, "cf", 0 }, { rtfCharAttr, rtfBackColor, "cb", 0 }, { rtfCharAttr, rtfRTLChar, "rtlch", 0 }, { rtfCharAttr, rtfLTRChar, "ltrch", 0 }, { rtfCharAttr, rtfCharStyleNum, "cs", 0 }, { rtfCharAttr, rtfCharCharSet, "cchs", 0 }, { rtfCharAttr, rtfLanguage, "lang", 0 }, /* this has disappeared from spec 1.2 */ { rtfCharAttr, rtfGray, "gray", 0 }, { rtfCharAttr, rtfUnicodeLength, "uc", 0 }, /* * Paragraph formatting attributes */ { rtfParAttr, rtfParDef, "pard", 0 }, { rtfParAttr, rtfStyleNum, "s", 0 }, { rtfParAttr, rtfHyphenate, "hyphpar", 0 }, { rtfParAttr, rtfInTable, "intbl", 0 }, { rtfParAttr, rtfKeep, "keep", 0 }, { rtfParAttr, rtfNoWidowControl, "nowidctlpar", 0 }, { rtfParAttr, rtfKeepNext, "keepn", 0 }, { rtfParAttr, rtfOutlineLevel, "level", 0 }, { rtfParAttr, rtfNoLineNum, "noline", 0 }, { rtfParAttr, rtfPBBefore, "pagebb", 0 }, { rtfParAttr, rtfSideBySide, "sbys", 0 }, { rtfParAttr, rtfQuadLeft, "ql", 0 }, { rtfParAttr, rtfQuadRight, "qr", 0 }, { rtfParAttr, rtfQuadJust, "qj", 0 }, { rtfParAttr, rtfQuadCenter, "qc", 0 }, { rtfParAttr, rtfFirstIndent, "fi", 0 }, { rtfParAttr, rtfLeftIndent, "li", 0 }, { rtfParAttr, rtfRightIndent, "ri", 0 }, { rtfParAttr, rtfSpaceBefore, "sb", 0 }, { rtfParAttr, rtfSpaceAfter, "sa", 0 }, { rtfParAttr, rtfSpaceBetween, "sl", 0 }, { rtfParAttr, rtfSpaceMultiply, "slmult", 0 }, { rtfParAttr, rtfSubDocument, "subdocument", 0 }, { rtfParAttr, rtfRTLPar, "rtlpar", 0 }, { rtfParAttr, rtfLTRPar, "ltrpar", 0 }, { rtfParAttr, rtfTabPos, "tx", 0 }, /* * FrameMaker writes \tql (to mean left-justified tab, apparently) * although it's not in the spec. It's also redundant, since lj * tabs are the default. */ { rtfParAttr, rtfTabLeft, "tql", 0 }, { rtfParAttr, rtfTabRight, "tqr", 0 }, { rtfParAttr, rtfTabCenter, "tqc", 0 }, { rtfParAttr, rtfTabDecimal, "tqdec", 0 }, { rtfParAttr, rtfTabBar, "tb", 0 }, { rtfParAttr, rtfLeaderDot, "tldot", 0 }, { rtfParAttr, rtfLeaderHyphen, "tlhyph", 0 }, { rtfParAttr, rtfLeaderUnder, "tlul", 0 }, { rtfParAttr, rtfLeaderThick, "tlth", 0 }, { rtfParAttr, rtfLeaderEqual, "tleq", 0 }, { rtfParAttr, rtfParLevel, "pnlvl", 0 }, { rtfParAttr, rtfParBullet, "pnlvlblt", 0 }, { rtfParAttr, rtfParSimple, "pnlvlbody", 0 }, { rtfParAttr, rtfParNumCont, "pnlvlcont", 0 }, { rtfParAttr, rtfParNumOnce, "pnnumonce", 0 }, { rtfParAttr, rtfParNumAcross, "pnacross", 0 }, { rtfParAttr, rtfParHangIndent, "pnhang", 0 }, { rtfParAttr, rtfParNumRestart, "pnrestart", 0 }, { rtfParAttr, rtfParNumCardinal, "pncard", 0 }, { rtfParAttr, rtfParNumDecimal, "pndec", 0 }, { rtfParAttr, rtfParNumULetter, "pnucltr", 0 }, { rtfParAttr, rtfParNumURoman, "pnucrm", 0 }, { rtfParAttr, rtfParNumLLetter, "pnlcltr", 0 }, { rtfParAttr, rtfParNumLRoman, "pnlcrm", 0 }, { rtfParAttr, rtfParNumOrdinal, "pnord", 0 }, { rtfParAttr, rtfParNumOrdinalText, "pnordt", 0 }, { rtfParAttr, rtfParNumBold, "pnb", 0 }, { rtfParAttr, rtfParNumItalic, "pni", 0 }, { rtfParAttr, rtfParNumAllCaps, "pncaps", 0 }, { rtfParAttr, rtfParNumSmallCaps, "pnscaps", 0 }, { rtfParAttr, rtfParNumUnder, "pnul", 0 }, { rtfParAttr, rtfParNumDotUnder, "pnuld", 0 }, { rtfParAttr, rtfParNumDbUnder, "pnuldb", 0 }, { rtfParAttr, rtfParNumNoUnder, "pnulnone", 0 }, { rtfParAttr, rtfParNumWordUnder, "pnulw", 0 }, { rtfParAttr, rtfParNumStrikethru, "pnstrike", 0 }, { rtfParAttr, rtfParNumForeColor, "pncf", 0 }, { rtfParAttr, rtfParNumFont, "pnf", 0 }, { rtfParAttr, rtfParNumFontSize, "pnfs", 0 }, { rtfParAttr, rtfParNumIndent, "pnindent", 0 }, { rtfParAttr, rtfParNumSpacing, "pnsp", 0 }, { rtfParAttr, rtfParNumInclPrev, "pnprev", 0 }, { rtfParAttr, rtfParNumCenter, "pnqc", 0 }, { rtfParAttr, rtfParNumLeft, "pnql", 0 }, { rtfParAttr, rtfParNumRight, "pnqr", 0 }, { rtfParAttr, rtfParNumStartAt, "pnstart", 0 }, { rtfParAttr, rtfBorderTop, "brdrt", 0 }, { rtfParAttr, rtfBorderBottom, "brdrb", 0 }, { rtfParAttr, rtfBorderLeft, "brdrl", 0 }, { rtfParAttr, rtfBorderRight, "brdrr", 0 }, { rtfParAttr, rtfBorderBetween, "brdrbtw", 0 }, { rtfParAttr, rtfBorderBar, "brdrbar", 0 }, { rtfParAttr, rtfBorderBox, "box", 0 }, { rtfParAttr, rtfBorderSingle, "brdrs", 0 }, { rtfParAttr, rtfBorderThick, "brdrth", 0 }, { rtfParAttr, rtfBorderShadow, "brdrsh", 0 }, { rtfParAttr, rtfBorderDouble, "brdrdb", 0 }, { rtfParAttr, rtfBorderDot, "brdrdot", 0 }, { rtfParAttr, rtfBorderDot, "brdrdash", 0 }, { rtfParAttr, rtfBorderHair, "brdrhair", 0 }, { rtfParAttr, rtfBorderWidth, "brdrw", 0 }, { rtfParAttr, rtfBorderColor, "brdrcf", 0 }, { rtfParAttr, rtfBorderSpace, "brsp", 0 }, { rtfParAttr, rtfShading, "shading", 0 }, { rtfParAttr, rtfBgPatH, "bghoriz", 0 }, { rtfParAttr, rtfBgPatV, "bgvert", 0 }, { rtfParAttr, rtfFwdDiagBgPat, "bgfdiag", 0 }, { rtfParAttr, rtfBwdDiagBgPat, "bgbdiag", 0 }, { rtfParAttr, rtfHatchBgPat, "bgcross", 0 }, { rtfParAttr, rtfDiagHatchBgPat, "bgdcross", 0 }, { rtfParAttr, rtfDarkBgPatH, "bgdkhoriz", 0 }, { rtfParAttr, rtfDarkBgPatV, "bgdkvert", 0 }, { rtfParAttr, rtfFwdDarkBgPat, "bgdkfdiag", 0 }, { rtfParAttr, rtfBwdDarkBgPat, "bgdkbdiag", 0 }, { rtfParAttr, rtfDarkHatchBgPat, "bgdkcross", 0 }, { rtfParAttr, rtfDarkDiagHatchBgPat, "bgdkdcross", 0 }, { rtfParAttr, rtfBgPatLineColor, "cfpat", 0 }, { rtfParAttr, rtfBgPatColor, "cbpat", 0 }, /* * Section formatting attributes */ { rtfSectAttr, rtfSectDef, "sectd", 0 }, { rtfSectAttr, rtfENoteHere, "endnhere", 0 }, { rtfSectAttr, rtfPrtBinFirst, "binfsxn", 0 }, { rtfSectAttr, rtfPrtBin, "binsxn", 0 }, { rtfSectAttr, rtfSectStyleNum, "ds", 0 }, { rtfSectAttr, rtfNoBreak, "sbknone", 0 }, { rtfSectAttr, rtfColBreak, "sbkcol", 0 }, { rtfSectAttr, rtfPageBreak, "sbkpage", 0 }, { rtfSectAttr, rtfEvenBreak, "sbkeven", 0 }, { rtfSectAttr, rtfOddBreak, "sbkodd", 0 }, { rtfSectAttr, rtfColumns, "cols", 0 }, { rtfSectAttr, rtfColumnSpace, "colsx", 0 }, { rtfSectAttr, rtfColumnNumber, "colno", 0 }, { rtfSectAttr, rtfColumnSpRight, "colsr", 0 }, { rtfSectAttr, rtfColumnWidth, "colw", 0 }, { rtfSectAttr, rtfColumnLine, "linebetcol", 0 }, { rtfSectAttr, rtfLineModulus, "linemod", 0 }, { rtfSectAttr, rtfLineDist, "linex", 0 }, { rtfSectAttr, rtfLineStarts, "linestarts", 0 }, { rtfSectAttr, rtfLineRestart, "linerestart", 0 }, { rtfSectAttr, rtfLineRestartPg, "lineppage", 0 }, { rtfSectAttr, rtfLineCont, "linecont", 0 }, { rtfSectAttr, rtfSectPageWid, "pgwsxn", 0 }, { rtfSectAttr, rtfSectPageHt, "pghsxn", 0 }, { rtfSectAttr, rtfSectMarginLeft, "marglsxn", 0 }, { rtfSectAttr, rtfSectMarginRight, "margrsxn", 0 }, { rtfSectAttr, rtfSectMarginTop, "margtsxn", 0 }, { rtfSectAttr, rtfSectMarginBottom, "margbsxn", 0 }, { rtfSectAttr, rtfSectMarginGutter, "guttersxn", 0 }, { rtfSectAttr, rtfSectLandscape, "lndscpsxn", 0 }, { rtfSectAttr, rtfTitleSpecial, "titlepg", 0 }, { rtfSectAttr, rtfHeaderY, "headery", 0 }, { rtfSectAttr, rtfFooterY, "footery", 0 }, { rtfSectAttr, rtfPageStarts, "pgnstarts", 0 }, { rtfSectAttr, rtfPageCont, "pgncont", 0 }, { rtfSectAttr, rtfPageRestart, "pgnrestart", 0 }, { rtfSectAttr, rtfPageNumRight, "pgnx", 0 }, { rtfSectAttr, rtfPageNumTop, "pgny", 0 }, { rtfSectAttr, rtfPageDecimal, "pgndec", 0 }, { rtfSectAttr, rtfPageURoman, "pgnucrm", 0 }, { rtfSectAttr, rtfPageLRoman, "pgnlcrm", 0 }, { rtfSectAttr, rtfPageULetter, "pgnucltr", 0 }, { rtfSectAttr, rtfPageLLetter, "pgnlcltr", 0 }, { rtfSectAttr, rtfPageNumHyphSep, "pgnhnsh", 0 }, { rtfSectAttr, rtfPageNumSpaceSep, "pgnhnsp", 0 }, { rtfSectAttr, rtfPageNumColonSep, "pgnhnsc", 0 }, { rtfSectAttr, rtfPageNumEmdashSep, "pgnhnsm", 0 }, { rtfSectAttr, rtfPageNumEndashSep, "pgnhnsn", 0 }, { rtfSectAttr, rtfTopVAlign, "vertalt", 0 }, /* misspelled as "vertal" in specification 1.0 */ { rtfSectAttr, rtfBottomVAlign, "vertalb", 0 }, { rtfSectAttr, rtfCenterVAlign, "vertalc", 0 }, { rtfSectAttr, rtfJustVAlign, "vertalj", 0 }, { rtfSectAttr, rtfRTLSect, "rtlsect", 0 }, { rtfSectAttr, rtfLTRSect, "ltrsect", 0 }, /* I've seen these in an old spec, but not in real files... */ /*rtfSectAttr, rtfNoBreak, "nobreak", 0,*/ /*rtfSectAttr, rtfColBreak, "colbreak", 0,*/ /*rtfSectAttr, rtfPageBreak, "pagebreak", 0,*/ /*rtfSectAttr, rtfEvenBreak, "evenbreak", 0,*/ /*rtfSectAttr, rtfOddBreak, "oddbreak", 0,*/ /* * Document formatting attributes */ { rtfDocAttr, rtfDefTab, "deftab", 0 }, { rtfDocAttr, rtfHyphHotZone, "hyphhotz", 0 }, { rtfDocAttr, rtfHyphConsecLines, "hyphconsec", 0 }, { rtfDocAttr, rtfHyphCaps, "hyphcaps", 0 }, { rtfDocAttr, rtfHyphAuto, "hyphauto", 0 }, { rtfDocAttr, rtfLineStart, "linestart", 0 }, { rtfDocAttr, rtfFracWidth, "fracwidth", 0 }, /* \makeback was given in old version of spec, it's now */ /* listed as \makebackup */ { rtfDocAttr, rtfMakeBackup, "makeback", 0 }, { rtfDocAttr, rtfMakeBackup, "makebackup", 0 }, { rtfDocAttr, rtfRTFDefault, "defformat", 0 }, { rtfDocAttr, rtfPSOverlay, "psover", 0 }, { rtfDocAttr, rtfDocTemplate, "doctemp", 0 }, { rtfDocAttr, rtfDefLanguage, "deflang", 0 }, { rtfDocAttr, rtfFENoteType, "fet", 0 }, { rtfDocAttr, rtfFNoteEndSect, "endnotes", 0 }, { rtfDocAttr, rtfFNoteEndDoc, "enddoc", 0 }, { rtfDocAttr, rtfFNoteText, "ftntj", 0 }, { rtfDocAttr, rtfFNoteBottom, "ftnbj", 0 }, { rtfDocAttr, rtfENoteEndSect, "aendnotes", 0 }, { rtfDocAttr, rtfENoteEndDoc, "aenddoc", 0 }, { rtfDocAttr, rtfENoteText, "aftntj", 0 }, { rtfDocAttr, rtfENoteBottom, "aftnbj", 0 }, { rtfDocAttr, rtfFNoteStart, "ftnstart", 0 }, { rtfDocAttr, rtfENoteStart, "aftnstart", 0 }, { rtfDocAttr, rtfFNoteRestartPage, "ftnrstpg", 0 }, { rtfDocAttr, rtfFNoteRestart, "ftnrestart", 0 }, { rtfDocAttr, rtfFNoteRestartCont, "ftnrstcont", 0 }, { rtfDocAttr, rtfENoteRestart, "aftnrestart", 0 }, { rtfDocAttr, rtfENoteRestartCont, "aftnrstcont", 0 }, { rtfDocAttr, rtfFNoteNumArabic, "ftnnar", 0 }, { rtfDocAttr, rtfFNoteNumLLetter, "ftnnalc", 0 }, { rtfDocAttr, rtfFNoteNumULetter, "ftnnauc", 0 }, { rtfDocAttr, rtfFNoteNumLRoman, "ftnnrlc", 0 }, { rtfDocAttr, rtfFNoteNumURoman, "ftnnruc", 0 }, { rtfDocAttr, rtfFNoteNumChicago, "ftnnchi", 0 }, { rtfDocAttr, rtfENoteNumArabic, "aftnnar", 0 }, { rtfDocAttr, rtfENoteNumLLetter, "aftnnalc", 0 }, { rtfDocAttr, rtfENoteNumULetter, "aftnnauc", 0 }, { rtfDocAttr, rtfENoteNumLRoman, "aftnnrlc", 0 }, { rtfDocAttr, rtfENoteNumURoman, "aftnnruc", 0 }, { rtfDocAttr, rtfENoteNumChicago, "aftnnchi", 0 }, { rtfDocAttr, rtfPaperWidth, "paperw", 0 }, { rtfDocAttr, rtfPaperHeight, "paperh", 0 }, { rtfDocAttr, rtfPaperSize, "psz", 0 }, { rtfDocAttr, rtfLeftMargin, "margl", 0 }, { rtfDocAttr, rtfRightMargin, "margr", 0 }, { rtfDocAttr, rtfTopMargin, "margt", 0 }, { rtfDocAttr, rtfBottomMargin, "margb", 0 }, { rtfDocAttr, rtfFacingPage, "facingp", 0 }, { rtfDocAttr, rtfGutterWid, "gutter", 0 }, { rtfDocAttr, rtfMirrorMargin, "margmirror", 0 }, { rtfDocAttr, rtfLandscape, "landscape", 0 }, { rtfDocAttr, rtfPageStart, "pgnstart", 0 }, { rtfDocAttr, rtfWidowCtrl, "widowctrl", 0 }, { rtfDocAttr, rtfLinkStyles, "linkstyles", 0 }, { rtfDocAttr, rtfNoAutoTabIndent, "notabind", 0 }, { rtfDocAttr, rtfWrapSpaces, "wraptrsp", 0 }, { rtfDocAttr, rtfPrintColorsBlack, "prcolbl", 0 }, { rtfDocAttr, rtfNoExtraSpaceRL, "noextrasprl", 0 }, { rtfDocAttr, rtfNoColumnBalance, "nocolbal", 0 }, { rtfDocAttr, rtfCvtMailMergeQuote, "cvmme", 0 }, { rtfDocAttr, rtfSuppressTopSpace, "sprstsp", 0 }, { rtfDocAttr, rtfSuppressPreParSpace, "sprsspbf", 0 }, { rtfDocAttr, rtfCombineTblBorders, "otblrul", 0 }, { rtfDocAttr, rtfTranspMetafiles, "transmf", 0 }, { rtfDocAttr, rtfSwapBorders, "swpbdr", 0 }, { rtfDocAttr, rtfShowHardBreaks, "brkfrm", 0 }, { rtfDocAttr, rtfFormProtected, "formprot", 0 }, { rtfDocAttr, rtfAllProtected, "allprot", 0 }, { rtfDocAttr, rtfFormShading, "formshade", 0 }, { rtfDocAttr, rtfFormDisplay, "formdisp", 0 }, { rtfDocAttr, rtfPrintData, "printdata", 0 }, { rtfDocAttr, rtfRevProtected, "revprot", 0 }, { rtfDocAttr, rtfRevisions, "revisions", 0 }, { rtfDocAttr, rtfRevDisplay, "revprop", 0 }, { rtfDocAttr, rtfRevBar, "revbar", 0 }, { rtfDocAttr, rtfAnnotProtected, "annotprot", 0 }, { rtfDocAttr, rtfRTLDoc, "rtldoc", 0 }, { rtfDocAttr, rtfLTRDoc, "ltrdoc", 0 }, { rtfDocAttr, rtfAnsiCodePage, "ansicpg", 0 }, { rtfDocAttr, rtfUTF8RTF, "urtf", 0 }, /* * Style attributes */ { rtfStyleAttr, rtfAdditive, "additive", 0 }, { rtfStyleAttr, rtfBasedOn, "sbasedon", 0 }, { rtfStyleAttr, rtfNext, "snext", 0 }, /* * Picture attributes */ { rtfPictAttr, rtfMacQD, "macpict", 0 }, { rtfPictAttr, rtfPMMetafile, "pmmetafile", 0 }, { rtfPictAttr, rtfWinMetafile, "wmetafile", 0 }, { rtfPictAttr, rtfDevIndBitmap, "dibitmap", 0 }, { rtfPictAttr, rtfWinBitmap, "wbitmap", 0 }, { rtfPictAttr, rtfPixelBits, "wbmbitspixel", 0 }, { rtfPictAttr, rtfBitmapPlanes, "wbmplanes", 0 }, { rtfPictAttr, rtfBitmapWid, "wbmwidthbytes", 0 }, { rtfPictAttr, rtfPicWid, "picw", 0 }, { rtfPictAttr, rtfPicHt, "pich", 0 }, { rtfPictAttr, rtfPicGoalWid, "picwgoal", 0 }, { rtfPictAttr, rtfPicGoalHt, "pichgoal", 0 }, /* these two aren't in the spec, but some writers emit them */ { rtfPictAttr, rtfPicGoalWid, "picwGoal", 0 }, { rtfPictAttr, rtfPicGoalHt, "pichGoal", 0 }, { rtfPictAttr, rtfPicScaleX, "picscalex", 0 }, { rtfPictAttr, rtfPicScaleY, "picscaley", 0 }, { rtfPictAttr, rtfPicScaled, "picscaled", 0 }, { rtfPictAttr, rtfPicCropTop, "piccropt", 0 }, { rtfPictAttr, rtfPicCropBottom, "piccropb", 0 }, { rtfPictAttr, rtfPicCropLeft, "piccropl", 0 }, { rtfPictAttr, rtfPicCropRight, "piccropr", 0 }, { rtfPictAttr, rtfPicMFHasBitmap, "picbmp", 0 }, { rtfPictAttr, rtfPicMFBitsPerPixel, "picbpp", 0 }, { rtfPictAttr, rtfPicBinary, "bin", 0 }, /* * NeXT graphic attributes */ { rtfNeXTGrAttr, rtfNeXTGWidth, "width", 0 }, { rtfNeXTGrAttr, rtfNeXTGHeight, "height", 0 }, /* * Destinations */ { rtfDestination, rtfFontTbl, "fonttbl", 0 }, { rtfDestination, rtfFontAltName, "falt", 0 }, { rtfDestination, rtfEmbeddedFont, "fonteb", 0 }, { rtfDestination, rtfFontFile, "fontfile", 0 }, { rtfDestination, rtfFileTbl, "filetbl", 0 }, { rtfDestination, rtfFileInfo, "file", 0 }, { rtfDestination, rtfColorTbl, "colortbl", 0 }, { rtfDestination, rtfStyleSheet, "stylesheet", 0 }, { rtfDestination, rtfKeyCode, "keycode", 0 }, { rtfDestination, rtfRevisionTbl, "revtbl", 0 }, { rtfDestination, rtfGenerator, "generator", 0 }, { rtfDestination, rtfInfo, "info", 0 }, { rtfDestination, rtfITitle, "title", 0 }, { rtfDestination, rtfISubject, "subject", 0 }, { rtfDestination, rtfIAuthor, "author", 0 }, { rtfDestination, rtfIOperator, "operator", 0 }, { rtfDestination, rtfIKeywords, "keywords", 0 }, { rtfDestination, rtfIComment, "comment", 0 }, { rtfDestination, rtfIVersion, "version", 0 }, { rtfDestination, rtfIDoccomm, "doccomm", 0 }, /* \verscomm may not exist -- was seen in earlier spec version */ { rtfDestination, rtfIVerscomm, "verscomm", 0 }, { rtfDestination, rtfNextFile, "nextfile", 0 }, { rtfDestination, rtfTemplate, "template", 0 }, { rtfDestination, rtfFNSep, "ftnsep", 0 }, { rtfDestination, rtfFNContSep, "ftnsepc", 0 }, { rtfDestination, rtfFNContNotice, "ftncn", 0 }, { rtfDestination, rtfENSep, "aftnsep", 0 }, { rtfDestination, rtfENContSep, "aftnsepc", 0 }, { rtfDestination, rtfENContNotice, "aftncn", 0 }, { rtfDestination, rtfPageNumLevel, "pgnhn", 0 }, { rtfDestination, rtfParNumLevelStyle, "pnseclvl", 0 }, { rtfDestination, rtfHeader, "header", 0 }, { rtfDestination, rtfFooter, "footer", 0 }, { rtfDestination, rtfHeaderLeft, "headerl", 0 }, { rtfDestination, rtfHeaderRight, "headerr", 0 }, { rtfDestination, rtfHeaderFirst, "headerf", 0 }, { rtfDestination, rtfFooterLeft, "footerl", 0 }, { rtfDestination, rtfFooterRight, "footerr", 0 }, { rtfDestination, rtfFooterFirst, "footerf", 0 }, { rtfDestination, rtfParNumText, "pntext", 0 }, { rtfDestination, rtfParNumbering, "pn", 0 }, { rtfDestination, rtfParNumTextAfter, "pntexta", 0 }, { rtfDestination, rtfParNumTextBefore, "pntextb", 0 }, { rtfDestination, rtfBookmarkStart, "bkmkstart", 0 }, { rtfDestination, rtfBookmarkEnd, "bkmkend", 0 }, { rtfDestination, rtfPict, "pict", 0 }, { rtfDestination, rtfObject, "object", 0 }, { rtfDestination, rtfObjClass, "objclass", 0 }, { rtfDestination, rtfObjName, "objname", 0 }, { rtfObjAttr, rtfObjTime, "objtime", 0 }, { rtfDestination, rtfObjData, "objdata", 0 }, { rtfDestination, rtfObjAlias, "objalias", 0 }, { rtfDestination, rtfObjSection, "objsect", 0 }, /* objitem and objtopic aren't documented in the spec! */ { rtfDestination, rtfObjItem, "objitem", 0 }, { rtfDestination, rtfObjTopic, "objtopic", 0 }, { rtfDestination, rtfObjResult, "result", 0 }, { rtfDestination, rtfDrawObject, "do", 0 }, { rtfDestination, rtfFootnote, "footnote", 0 }, { rtfDestination, rtfAnnotRefStart, "atrfstart", 0 }, { rtfDestination, rtfAnnotRefEnd, "atrfend", 0 }, { rtfDestination, rtfAnnotID, "atnid", 0 }, { rtfDestination, rtfAnnotAuthor, "atnauthor", 0 }, { rtfDestination, rtfAnnotation, "annotation", 0 }, { rtfDestination, rtfAnnotRef, "atnref", 0 }, { rtfDestination, rtfAnnotTime, "atntime", 0 }, { rtfDestination, rtfAnnotIcon, "atnicn", 0 }, { rtfDestination, rtfField, "field", 0 }, { rtfDestination, rtfFieldInst, "fldinst", 0 }, { rtfDestination, rtfFieldResult, "fldrslt", 0 }, { rtfDestination, rtfDataField, "datafield", 0 }, { rtfDestination, rtfIndex, "xe", 0 }, { rtfDestination, rtfIndexText, "txe", 0 }, { rtfDestination, rtfIndexRange, "rxe", 0 }, { rtfDestination, rtfTOC, "tc", 0 }, { rtfDestination, rtfNeXTGraphic, "NeXTGraphic", 0 }, /* * Font families */ { rtfFontFamily, rtfFFNil, "fnil", 0 }, { rtfFontFamily, rtfFFRoman, "froman", 0 }, { rtfFontFamily, rtfFFSwiss, "fswiss", 0 }, { rtfFontFamily, rtfFFModern, "fmodern", 0 }, { rtfFontFamily, rtfFFScript, "fscript", 0 }, { rtfFontFamily, rtfFFDecor, "fdecor", 0 }, { rtfFontFamily, rtfFFTech, "ftech", 0 }, { rtfFontFamily, rtfFFBidirectional, "fbidi", 0 }, /* * Font attributes */ { rtfFontAttr, rtfFontCharSet, "fcharset", 0 }, { rtfFontAttr, rtfFontPitch, "fprq", 0 }, { rtfFontAttr, rtfFontCodePage, "cpg", 0 }, { rtfFontAttr, rtfFTypeNil, "ftnil", 0 }, { rtfFontAttr, rtfFTypeTrueType, "fttruetype", 0 }, /* * File table attributes */ { rtfFileAttr, rtfFileNum, "fid", 0 }, { rtfFileAttr, rtfFileRelPath, "frelative", 0 }, { rtfFileAttr, rtfFileOSNum, "fosnum", 0 }, /* * File sources */ { rtfFileSource, rtfSrcMacintosh, "fvalidmac", 0 }, { rtfFileSource, rtfSrcDOS, "fvaliddos", 0 }, { rtfFileSource, rtfSrcNTFS, "fvalidntfs", 0 }, { rtfFileSource, rtfSrcHPFS, "fvalidhpfs", 0 }, { rtfFileSource, rtfSrcNetwork, "fnetwork", 0 }, /* * Color names */ { rtfColorName, rtfRed, "red", 0 }, { rtfColorName, rtfGreen, "green", 0 }, { rtfColorName, rtfBlue, "blue", 0 }, /* * Charset names */ { rtfCharSet, rtfMacCharSet, "mac", 0 }, { rtfCharSet, rtfAnsiCharSet, "ansi", 0 }, { rtfCharSet, rtfPcCharSet, "pc", 0 }, { rtfCharSet, rtfPcaCharSet, "pca", 0 }, /* * Table attributes */ { rtfTblAttr, rtfRowDef, "trowd", 0 }, { rtfTblAttr, rtfRowGapH, "trgaph", 0 }, { rtfTblAttr, rtfCellPos, "cellx", 0 }, { rtfTblAttr, rtfMergeRngFirst, "clmgf", 0 }, { rtfTblAttr, rtfMergePrevious, "clmrg", 0 }, { rtfTblAttr, rtfRowLeft, "trql", 0 }, { rtfTblAttr, rtfRowRight, "trqr", 0 }, { rtfTblAttr, rtfRowCenter, "trqc", 0 }, { rtfTblAttr, rtfRowLeftEdge, "trleft", 0 }, { rtfTblAttr, rtfRowHt, "trrh", 0 }, { rtfTblAttr, rtfRowHeader, "trhdr", 0 }, { rtfTblAttr, rtfRowKeep, "trkeep", 0 }, { rtfTblAttr, rtfRTLRow, "rtlrow", 0 }, { rtfTblAttr, rtfLTRRow, "ltrrow", 0 }, { rtfTblAttr, rtfRowBordTop, "trbrdrt", 0 }, { rtfTblAttr, rtfRowBordLeft, "trbrdrl", 0 }, { rtfTblAttr, rtfRowBordBottom, "trbrdrb", 0 }, { rtfTblAttr, rtfRowBordRight, "trbrdrr", 0 }, { rtfTblAttr, rtfRowBordHoriz, "trbrdrh", 0 }, { rtfTblAttr, rtfRowBordVert, "trbrdrv", 0 }, { rtfTblAttr, rtfCellBordBottom, "clbrdrb", 0 }, { rtfTblAttr, rtfCellBordTop, "clbrdrt", 0 }, { rtfTblAttr, rtfCellBordLeft, "clbrdrl", 0 }, { rtfTblAttr, rtfCellBordRight, "clbrdrr", 0 }, { rtfTblAttr, rtfCellShading, "clshdng", 0 }, { rtfTblAttr, rtfCellBgPatH, "clbghoriz", 0 }, { rtfTblAttr, rtfCellBgPatV, "clbgvert", 0 }, { rtfTblAttr, rtfCellFwdDiagBgPat, "clbgfdiag", 0 }, { rtfTblAttr, rtfCellBwdDiagBgPat, "clbgbdiag", 0 }, { rtfTblAttr, rtfCellHatchBgPat, "clbgcross", 0 }, { rtfTblAttr, rtfCellDiagHatchBgPat, "clbgdcross", 0 }, /* * The spec lists "clbgdkhor", but the corresponding non-cell * control is "bgdkhoriz". At any rate Macintosh Word seems * to accept both "clbgdkhor" and "clbgdkhoriz". */ { rtfTblAttr, rtfCellDarkBgPatH, "clbgdkhoriz", 0 }, { rtfTblAttr, rtfCellDarkBgPatH, "clbgdkhor", 0 }, { rtfTblAttr, rtfCellDarkBgPatV, "clbgdkvert", 0 }, { rtfTblAttr, rtfCellFwdDarkBgPat, "clbgdkfdiag", 0 }, { rtfTblAttr, rtfCellBwdDarkBgPat, "clbgdkbdiag", 0 }, { rtfTblAttr, rtfCellDarkHatchBgPat, "clbgdkcross", 0 }, { rtfTblAttr, rtfCellDarkDiagHatchBgPat, "clbgdkdcross", 0 }, { rtfTblAttr, rtfCellBgPatLineColor, "clcfpat", 0 }, { rtfTblAttr, rtfCellBgPatColor, "clcbpat", 0 }, /* * Field attributes */ { rtfFieldAttr, rtfFieldDirty, "flddirty", 0 }, { rtfFieldAttr, rtfFieldEdited, "fldedit", 0 }, { rtfFieldAttr, rtfFieldLocked, "fldlock", 0 }, { rtfFieldAttr, rtfFieldPrivate, "fldpriv", 0 }, { rtfFieldAttr, rtfFieldAlt, "fldalt", 0 }, /* * Positioning attributes */ { rtfPosAttr, rtfAbsWid, "absw", 0 }, { rtfPosAttr, rtfAbsHt, "absh", 0 }, { rtfPosAttr, rtfRPosMargH, "phmrg", 0 }, { rtfPosAttr, rtfRPosPageH, "phpg", 0 }, { rtfPosAttr, rtfRPosColH, "phcol", 0 }, { rtfPosAttr, rtfPosX, "posx", 0 }, { rtfPosAttr, rtfPosNegX, "posnegx", 0 }, { rtfPosAttr, rtfPosXCenter, "posxc", 0 }, { rtfPosAttr, rtfPosXInside, "posxi", 0 }, { rtfPosAttr, rtfPosXOutSide, "posxo", 0 }, { rtfPosAttr, rtfPosXRight, "posxr", 0 }, { rtfPosAttr, rtfPosXLeft, "posxl", 0 }, { rtfPosAttr, rtfRPosMargV, "pvmrg", 0 }, { rtfPosAttr, rtfRPosPageV, "pvpg", 0 }, { rtfPosAttr, rtfRPosParaV, "pvpara", 0 }, { rtfPosAttr, rtfPosY, "posy", 0 }, { rtfPosAttr, rtfPosNegY, "posnegy", 0 }, { rtfPosAttr, rtfPosYInline, "posyil", 0 }, { rtfPosAttr, rtfPosYTop, "posyt", 0 }, { rtfPosAttr, rtfPosYCenter, "posyc", 0 }, { rtfPosAttr, rtfPosYBottom, "posyb", 0 }, { rtfPosAttr, rtfNoWrap, "nowrap", 0 }, { rtfPosAttr, rtfDistFromTextAll, "dxfrtext", 0 }, { rtfPosAttr, rtfDistFromTextX, "dfrmtxtx", 0 }, { rtfPosAttr, rtfDistFromTextY, "dfrmtxty", 0 }, /* \dyfrtext no longer exists in spec 1.2, apparently */ /* replaced by \dfrmtextx and \dfrmtexty. */ { rtfPosAttr, rtfTextDistY, "dyfrtext", 0 }, { rtfPosAttr, rtfDropCapLines, "dropcapli", 0 }, { rtfPosAttr, rtfDropCapType, "dropcapt", 0 }, /* * Object controls */ { rtfObjAttr, rtfObjEmb, "objemb", 0 }, { rtfObjAttr, rtfObjLink, "objlink", 0 }, { rtfObjAttr, rtfObjAutoLink, "objautlink", 0 }, { rtfObjAttr, rtfObjSubscriber, "objsub", 0 }, { rtfObjAttr, rtfObjPublisher, "objpub", 0 }, { rtfObjAttr, rtfObjICEmb, "objicemb", 0 }, { rtfObjAttr, rtfObjLinkSelf, "linkself", 0 }, { rtfObjAttr, rtfObjLock, "objupdate", 0 }, { rtfObjAttr, rtfObjUpdate, "objlock", 0 }, { rtfObjAttr, rtfObjHt, "objh", 0 }, { rtfObjAttr, rtfObjWid, "objw", 0 }, { rtfObjAttr, rtfObjSetSize, "objsetsize", 0 }, { rtfObjAttr, rtfObjAlign, "objalign", 0 }, { rtfObjAttr, rtfObjTransposeY, "objtransy", 0 }, { rtfObjAttr, rtfObjCropTop, "objcropt", 0 }, { rtfObjAttr, rtfObjCropBottom, "objcropb", 0 }, { rtfObjAttr, rtfObjCropLeft, "objcropl", 0 }, { rtfObjAttr, rtfObjCropRight, "objcropr", 0 }, { rtfObjAttr, rtfObjScaleX, "objscalex", 0 }, { rtfObjAttr, rtfObjScaleY, "objscaley", 0 }, { rtfObjAttr, rtfObjResRTF, "rsltrtf", 0 }, { rtfObjAttr, rtfObjResPict, "rsltpict", 0 }, { rtfObjAttr, rtfObjResBitmap, "rsltbmp", 0 }, { rtfObjAttr, rtfObjResText, "rslttxt", 0 }, { rtfObjAttr, rtfObjResMerge, "rsltmerge", 0 }, { rtfObjAttr, rtfObjBookmarkPubObj, "bkmkpub", 0 }, { rtfObjAttr, rtfObjPubAutoUpdate, "pubauto", 0 }, /* * Associated character formatting attributes */ { rtfACharAttr, rtfACBold, "ab", 0 }, { rtfACharAttr, rtfACAllCaps, "caps", 0 }, { rtfACharAttr, rtfACForeColor, "acf", 0 }, { rtfACharAttr, rtfACSubScript, "adn", 0 }, { rtfACharAttr, rtfACExpand, "aexpnd", 0 }, { rtfACharAttr, rtfACFontNum, "af", 0 }, { rtfACharAttr, rtfACFontSize, "afs", 0 }, { rtfACharAttr, rtfACItalic, "ai", 0 }, { rtfACharAttr, rtfACLanguage, "alang", 0 }, { rtfACharAttr, rtfACOutline, "aoutl", 0 }, { rtfACharAttr, rtfACSmallCaps, "ascaps", 0 }, { rtfACharAttr, rtfACShadow, "ashad", 0 }, { rtfACharAttr, rtfACStrikeThru, "astrike", 0 }, { rtfACharAttr, rtfACUnderline, "aul", 0 }, { rtfACharAttr, rtfACDotUnderline, "auld", 0 }, { rtfACharAttr, rtfACDbUnderline, "auldb", 0 }, { rtfACharAttr, rtfACNoUnderline, "aulnone", 0 }, { rtfACharAttr, rtfACWordUnderline, "aulw", 0 }, { rtfACharAttr, rtfACSuperScript, "aup", 0 }, /* * Footnote attributes */ { rtfFNoteAttr, rtfFNAlt, "ftnalt", 0 }, /* * Key code attributes */ { rtfKeyCodeAttr, rtfAltKey, "alt", 0 }, { rtfKeyCodeAttr, rtfShiftKey, "shift", 0 }, { rtfKeyCodeAttr, rtfControlKey, "ctrl", 0 }, { rtfKeyCodeAttr, rtfFunctionKey, "fn", 0 }, /* * Bookmark attributes */ { rtfBookmarkAttr, rtfBookmarkFirstCol, "bkmkcolf", 0 }, { rtfBookmarkAttr, rtfBookmarkLastCol, "bkmkcoll", 0 }, /* * Index entry attributes */ { rtfIndexAttr, rtfIndexNumber, "xef", 0 }, { rtfIndexAttr, rtfIndexBold, "bxe", 0 }, { rtfIndexAttr, rtfIndexItalic, "ixe", 0 }, /* * Table of contents attributes */ { rtfTOCAttr, rtfTOCType, "tcf", 0 }, { rtfTOCAttr, rtfTOCLevel, "tcl", 0 }, /* * Drawing object attributes */ { rtfDrawAttr, rtfDrawLock, "dolock", 0 }, { rtfDrawAttr, rtfDrawPageRelX, "doxpage", 0 }, { rtfDrawAttr, rtfDrawColumnRelX, "dobxcolumn", 0 }, { rtfDrawAttr, rtfDrawMarginRelX, "dobxmargin", 0 }, { rtfDrawAttr, rtfDrawPageRelY, "dobypage", 0 }, { rtfDrawAttr, rtfDrawColumnRelY, "dobycolumn", 0 }, { rtfDrawAttr, rtfDrawMarginRelY, "dobymargin", 0 }, { rtfDrawAttr, rtfDrawHeight, "dobhgt", 0 }, { rtfDrawAttr, rtfDrawBeginGroup, "dpgroup", 0 }, { rtfDrawAttr, rtfDrawGroupCount, "dpcount", 0 }, { rtfDrawAttr, rtfDrawEndGroup, "dpendgroup", 0 }, { rtfDrawAttr, rtfDrawArc, "dparc", 0 }, { rtfDrawAttr, rtfDrawCallout, "dpcallout", 0 }, { rtfDrawAttr, rtfDrawEllipse, "dpellipse", 0 }, { rtfDrawAttr, rtfDrawLine, "dpline", 0 }, { rtfDrawAttr, rtfDrawPolygon, "dppolygon", 0 }, { rtfDrawAttr, rtfDrawPolyLine, "dppolyline", 0 }, { rtfDrawAttr, rtfDrawRect, "dprect", 0 }, { rtfDrawAttr, rtfDrawTextBox, "dptxbx", 0 }, { rtfDrawAttr, rtfDrawOffsetX, "dpx", 0 }, { rtfDrawAttr, rtfDrawSizeX, "dpxsize", 0 }, { rtfDrawAttr, rtfDrawOffsetY, "dpy", 0 }, { rtfDrawAttr, rtfDrawSizeY, "dpysize", 0 }, { rtfDrawAttr, rtfCOAngle, "dpcoa", 0 }, { rtfDrawAttr, rtfCOAccentBar, "dpcoaccent", 0 }, { rtfDrawAttr, rtfCOBestFit, "dpcobestfit", 0 }, { rtfDrawAttr, rtfCOBorder, "dpcoborder", 0 }, { rtfDrawAttr, rtfCOAttachAbsDist, "dpcodabs", 0 }, { rtfDrawAttr, rtfCOAttachBottom, "dpcodbottom", 0 }, { rtfDrawAttr, rtfCOAttachCenter, "dpcodcenter", 0 }, { rtfDrawAttr, rtfCOAttachTop, "dpcodtop", 0 }, { rtfDrawAttr, rtfCOLength, "dpcolength", 0 }, { rtfDrawAttr, rtfCONegXQuadrant, "dpcominusx", 0 }, { rtfDrawAttr, rtfCONegYQuadrant, "dpcominusy", 0 }, { rtfDrawAttr, rtfCOOffset, "dpcooffset", 0 }, { rtfDrawAttr, rtfCOAttachSmart, "dpcosmarta", 0 }, { rtfDrawAttr, rtfCODoubleLine, "dpcotdouble", 0 }, { rtfDrawAttr, rtfCORightAngle, "dpcotright", 0 }, { rtfDrawAttr, rtfCOSingleLine, "dpcotsingle", 0 }, { rtfDrawAttr, rtfCOTripleLine, "dpcottriple", 0 }, { rtfDrawAttr, rtfDrawTextBoxMargin, "dptxbxmar", 0 }, { rtfDrawAttr, rtfDrawTextBoxText, "dptxbxtext", 0 }, { rtfDrawAttr, rtfDrawRoundRect, "dproundr", 0 }, { rtfDrawAttr, rtfDrawPointX, "dpptx", 0 }, { rtfDrawAttr, rtfDrawPointY, "dppty", 0 }, { rtfDrawAttr, rtfDrawPolyCount, "dppolycount", 0 }, { rtfDrawAttr, rtfDrawArcFlipX, "dparcflipx", 0 }, { rtfDrawAttr, rtfDrawArcFlipY, "dparcflipy", 0 }, { rtfDrawAttr, rtfDrawLineBlue, "dplinecob", 0 }, { rtfDrawAttr, rtfDrawLineGreen, "dplinecog", 0 }, { rtfDrawAttr, rtfDrawLineRed, "dplinecor", 0 }, { rtfDrawAttr, rtfDrawLinePalette, "dplinepal", 0 }, { rtfDrawAttr, rtfDrawLineDashDot, "dplinedado", 0 }, { rtfDrawAttr, rtfDrawLineDashDotDot, "dplinedadodo", 0 }, { rtfDrawAttr, rtfDrawLineDash, "dplinedash", 0 }, { rtfDrawAttr, rtfDrawLineDot, "dplinedot", 0 }, { rtfDrawAttr, rtfDrawLineGray, "dplinegray", 0 }, { rtfDrawAttr, rtfDrawLineHollow, "dplinehollow", 0 }, { rtfDrawAttr, rtfDrawLineSolid, "dplinesolid", 0 }, { rtfDrawAttr, rtfDrawLineWidth, "dplinew", 0 }, { rtfDrawAttr, rtfDrawHollowEndArrow, "dpaendhol", 0 }, { rtfDrawAttr, rtfDrawEndArrowLength, "dpaendl", 0 }, { rtfDrawAttr, rtfDrawSolidEndArrow, "dpaendsol", 0 }, { rtfDrawAttr, rtfDrawEndArrowWidth, "dpaendw", 0 }, { rtfDrawAttr, rtfDrawHollowStartArrow,"dpastarthol", 0 }, { rtfDrawAttr, rtfDrawStartArrowLength,"dpastartl", 0 }, { rtfDrawAttr, rtfDrawSolidStartArrow, "dpastartsol", 0 }, { rtfDrawAttr, rtfDrawStartArrowWidth, "dpastartw", 0 }, { rtfDrawAttr, rtfDrawBgFillBlue, "dpfillbgcb", 0 }, { rtfDrawAttr, rtfDrawBgFillGreen, "dpfillbgcg", 0 }, { rtfDrawAttr, rtfDrawBgFillRed, "dpfillbgcr", 0 }, { rtfDrawAttr, rtfDrawBgFillPalette, "dpfillbgpal", 0 }, { rtfDrawAttr, rtfDrawBgFillGray, "dpfillbggray", 0 }, { rtfDrawAttr, rtfDrawFgFillBlue, "dpfillfgcb", 0 }, { rtfDrawAttr, rtfDrawFgFillGreen, "dpfillfgcg", 0 }, { rtfDrawAttr, rtfDrawFgFillRed, "dpfillfgcr", 0 }, { rtfDrawAttr, rtfDrawFgFillPalette, "dpfillfgpal", 0 }, { rtfDrawAttr, rtfDrawFgFillGray, "dpfillfggray", 0 }, { rtfDrawAttr, rtfDrawFillPatIndex, "dpfillpat", 0 }, { rtfDrawAttr, rtfDrawShadow, "dpshadow", 0 }, { rtfDrawAttr, rtfDrawShadowXOffset, "dpshadx", 0 }, { rtfDrawAttr, rtfDrawShadowYOffset, "dpshady", 0 }, { rtfVersion, -1, "rtf", 0 }, { rtfDefFont, -1, "deff", 0 }, { 0, -1, (char *) NULL, 0 } }; #define RTF_KEY_COUNT (sizeof(rtfKey) / sizeof(RTFKey)) typedef struct tagRTFHashTableEntry { int count; RTFKey **value; } RTFHashTableEntry; static RTFHashTableEntry rtfHashTable[RTF_KEY_COUNT * 2]; /* * Initialize lookup table hash values. Only need to do this once. */ static void LookupInit(void) { static int inited = 0; RTFKey *rp; if (inited == 0) { memset(rtfHashTable, 0, RTF_KEY_COUNT * 2 * sizeof(*rtfHashTable)); for (rp = rtfKey; rp->rtfKStr != NULL; rp++) { int index; rp->rtfKHash = Hash ((char*)rp->rtfKStr); index = rp->rtfKHash % (RTF_KEY_COUNT * 2); if (!rtfHashTable[index].count) rtfHashTable[index].value = RTFAlloc(sizeof(RTFKey *)); else rtfHashTable[index].value = RTFReAlloc(rtfHashTable[index].value, sizeof(RTFKey *) * (rtfHashTable[index].count + 1)); rtfHashTable[index].value[rtfHashTable[index].count++] = rp; } ++inited; } } /* * Determine major and minor number of control token. If it's * not found, the class turns into rtfUnknown. */ static void Lookup(RTF_Info *info, char *s) { RTFKey *rp; int hash; RTFHashTableEntry *entry; int i; TRACE("\n"); ++s; /* skip over the leading \ character */ hash = Hash (s); entry = &rtfHashTable[hash % (RTF_KEY_COUNT * 2)]; for (i = 0; i < entry->count; i++) { rp = entry->value[i]; if (hash == rp->rtfKHash && strcmp (s, rp->rtfKStr) == 0) { info->rtfClass = rtfControl; info->rtfMajor = rp->rtfKMajor; info->rtfMinor = rp->rtfKMinor; return; } } info->rtfClass = rtfUnknown; } /* * Compute hash value of symbol */ static int Hash(char *s) { char c; int val = 0; while ((c = *s++) != '\0') val += c; return (val); } /* ---------------------------------------------------------------------- */ /* * Token comparison routines */ int RTFCheckCM(RTF_Info *info, int class, int major) { return (info->rtfClass == class && info->rtfMajor == major); } int RTFCheckCMM(RTF_Info *info, int class, int major, int minor) { return (info->rtfClass == class && info->rtfMajor == major && info->rtfMinor == minor); } int RTFCheckMM(RTF_Info *info, int major, int minor) { return (info->rtfMajor == major && info->rtfMinor == minor); } /* ---------------------------------------------------------------------- */ int RTFCharToHex(char c) { if (isupper (c)) c = tolower (c); if (isdigit (c)) return (c - '0'); /* '0'..'9' */ return (c - 'a' + 10); /* 'a'..'f' */ } int RTFHexToChar(int i) { if (i < 10) return (i + '0'); return (i - 10 + 'a'); } /* ---------------------------------------------------------------------- */ /* * Print message. * * Message should include linefeeds as necessary. */ void RTFMsg (RTF_Info *info, const char *fmt, ...) { char buf[rtfBufSiz]; va_list args; va_start (args,fmt); vsprintf (buf, fmt, args); va_end (args); MESSAGE( "%s", buf); } /* ---------------------------------------------------------------------- */ /* * Process termination. Print error message and exit. Also prints * current token, and current input line number and position within * line if any input has been read from the current file. (No input * has been read if prevChar is EOF). */ static void DefaultPanicProc(RTF_Info *info, char *s) { MESSAGE( "%s", s); /*exit (1);*/ } void RTFPanic(RTF_Info *info, const char *fmt, ...) { char buf[rtfBufSiz]; va_list args; va_start (args,fmt); vsprintf (buf, fmt, args); va_end (args); lstrcatA (buf, "\n"); if (info->prevChar != EOF && info->rtfTextBuf != NULL) { sprintf (buf + lstrlenA (buf), "Last token read was \"%s\" near line %ld, position %d.\n", info->rtfTextBuf, info->rtfLineNum, info->rtfLinePos); } DefaultPanicProc(info, buf); } /* ---------------------------------------------------------------------- */ /* * originally from RTF tools' text-writer.c * * text-writer -- RTF-to-text translation writer code. * * Read RTF input, write text of document (text extraction). */ static void TextClass (RTF_Info *info); static void ControlClass (RTF_Info *info); static void DefFont(RTF_Info *info); static void Destination (RTF_Info *info); static void SpecialChar (RTF_Info *info); static void RTFPutUnicodeChar (RTF_Info *info, int c); /* * Initialize the writer. */ void WriterInit (RTF_Info *info ) { } int BeginFile (RTF_Info *info ) { /* install class callbacks */ RTFSetClassCallback (info, rtfText, TextClass); RTFSetClassCallback (info, rtfControl, ControlClass); return (1); } /* * Write out a character. */ static void TextClass (RTF_Info *info) { RTFPutCodePageChar(info, info->rtfMajor); } static void ControlClass (RTF_Info *info) { TRACE("\n"); switch (info->rtfMajor) { case rtfCharAttr: CharAttr(info); break; case rtfCharSet: CharSet(info); break; case rtfDefFont: DefFont(info); break; case rtfDestination: Destination (info); break; case rtfDocAttr: DocAttr(info); break; case rtfSpecialChar: SpecialChar (info); break; } } static void CharAttr(RTF_Info *info) { RTFFont *font; switch (info->rtfMinor) { case rtfFontNum: font = RTFGetFont(info, info->rtfParam); if (font) { if (info->ansiCodePage != CP_UTF8) info->codePage = font->rtfFCodePage; TRACE("font %d codepage %d\n", info->rtfParam, info->codePage); } else RTFMsg(info, "unknown font %d\n", info->rtfParam); break; case rtfUnicodeLength: info->unicodeLength = info->rtfParam; break; } } static void CharSet(RTF_Info *info) { if (info->ansiCodePage == CP_UTF8) return; switch (info->rtfMinor) { case rtfAnsiCharSet: info->ansiCodePage = 1252; /* Latin-1 */ break; case rtfMacCharSet: info->ansiCodePage = 10000; /* MacRoman */ break; case rtfPcCharSet: info->ansiCodePage = 437; break; case rtfPcaCharSet: info->ansiCodePage = 850; break; } } /* * This function notices destinations that aren't explicitly handled * and skips to their ends. This keeps, for instance, picture * data from being considered as plain text. */ static void Destination (RTF_Info *info) { TRACE("\n"); if (!RTFGetDestinationCallback(info, info->rtfMinor)) RTFSkipGroup (info); } static void DefFont(RTF_Info *info) { TRACE("%d\n", info->rtfParam); info->defFont = info->rtfParam; } static void DocAttr(RTF_Info *info) { TRACE("minor %d, param %d\n", info->rtfMinor, info->rtfParam); switch (info->rtfMinor) { case rtfAnsiCodePage: info->codePage = info->ansiCodePage = info->rtfParam; break; case rtfUTF8RTF: info->codePage = info->ansiCodePage = CP_UTF8; break; } } static void SpecialChar (RTF_Info *info) { TRACE("\n"); switch (info->rtfMinor) { case rtfOptDest: /* the next token determines destination, if it's unknown, skip the group */ /* this way we filter out the garbage coming from unknown destinations */ RTFGetToken(info); if (info->rtfClass != rtfDestination) RTFSkipGroup(info); else RTFRouteToken(info); /* "\*" is ignored with known destinations */ break; case rtfUnicode: { int i; RTFPutUnicodeChar(info, info->rtfParam); /* After \u we must skip number of character tokens set by \ucN */ for (i = 0; i < info->unicodeLength; i++) { RTFGetToken(info); if (info->rtfClass != rtfText) { ERR("The token behind \\u is not text, but (%d,%d,%d)\n", info->rtfClass, info->rtfMajor, info->rtfMinor); RTFUngetToken(info); break; } } break; } case rtfPage: case rtfSect: case rtfRow: case rtfLine: case rtfPar: RTFPutUnicodeChar (info, '\n'); break; case rtfCell: RTFPutUnicodeChar (info, ' '); /* make sure cells are separated */ break; case rtfNoBrkSpace: RTFPutUnicodeChar (info, 0x00A0); break; case rtfTab: RTFPutUnicodeChar (info, '\t'); break; case rtfNoBrkHyphen: RTFPutUnicodeChar (info, 0x2011); break; case rtfBullet: RTFPutUnicodeChar (info, 0x2022); break; case rtfEmDash: RTFPutUnicodeChar (info, 0x2014); break; case rtfEnDash: RTFPutUnicodeChar (info, 0x2013); break; case rtfLQuote: RTFPutUnicodeChar (info, 0x2018); break; case rtfRQuote: RTFPutUnicodeChar (info, 0x2019); break; case rtfLDblQuote: RTFPutUnicodeChar (info, 0x201C); break; case rtfRDblQuote: RTFPutUnicodeChar (info, 0x201D); break; } } static void RTFFlushUnicodeOutputBuffer(RTF_Info *info) { if (info->dwOutputCount) { ME_InsertTextFromCursor(info->editor, 0, info->OutputBuffer, info->dwOutputCount, info->style); info->dwOutputCount = 0; } } static void RTFPutUnicodeString(RTF_Info *info, WCHAR *string, int length) { if (info->dwCPOutputCount) RTFFlushCPOutputBuffer(info); while (length) { int fit = min(length, sizeof(info->OutputBuffer) / sizeof(WCHAR) - info->dwOutputCount); memmove(info->OutputBuffer + info->dwOutputCount, string, fit * sizeof(WCHAR)); info->dwOutputCount += fit; if (fit == sizeof(info->OutputBuffer) / sizeof(WCHAR) - info->dwOutputCount) RTFFlushUnicodeOutputBuffer(info); length -= fit; string += fit; } } static void RTFFlushCPOutputBuffer(RTF_Info *info) { int bufferMax = info->dwCPOutputCount * 2 * sizeof(WCHAR); WCHAR *buffer = (WCHAR *)RTFAlloc(bufferMax); int length; length = MultiByteToWideChar(info->codePage, 0, info->cpOutputBuffer, info->dwCPOutputCount, buffer, bufferMax/sizeof(WCHAR)); info->dwCPOutputCount = 0; RTFPutUnicodeString(info, buffer, length); RTFFree((char *)buffer); } void RTFFlushOutputBuffer(RTF_Info *info) { if (info->dwCPOutputCount) RTFFlushCPOutputBuffer(info); RTFFlushUnicodeOutputBuffer(info); } static void RTFPutUnicodeChar(RTF_Info *info, int c) { if (info->dwCPOutputCount) RTFFlushCPOutputBuffer(info); if (info->dwOutputCount * sizeof(WCHAR) >= ( sizeof info->OutputBuffer - 1 ) ) RTFFlushUnicodeOutputBuffer( info ); info->OutputBuffer[info->dwOutputCount++] = c; } static void RTFPutCodePageChar(RTF_Info *info, int c) { /* Use dynamic buffer here because it's the best way to handle * MBCS codepages without having to worry about partial chars */ if (info->dwCPOutputCount >= info->dwMaxCPOutputCount) { info->dwMaxCPOutputCount *= 2; info->cpOutputBuffer = RTFReAlloc(info->cpOutputBuffer, info->dwMaxCPOutputCount); } info->cpOutputBuffer[info->dwCPOutputCount++] = c; }