utils/tex2rtf/src/tex2any.cpp

   1 /////////////////////////////////////////////////////////////////////////////
   2 // Name:        tex2any.cpp
   3 // Purpose:     Utilities for Latex conversion.
   4 // Author:      Julian Smart
   5 // Modified by:
   6 // Created:     01/01/99
   7 // RCS-ID:      $Id$
   8 // Copyright:   (c) Julian Smart
   9 // Licence:     wxWindows licence
  10 /////////////////////////////////////////////////////////////////////////////
  11
  12 #ifdef __GNUG__
  13 #pragma implementation
  14 #endif
  15
  16 // For compilers that support precompilation, includes "wx.h".
  17 #include "wx/wxprec.h"
  18
  19 #ifdef __BORLANDC__
  20 #pragma hdrstop
  21 #endif
  22
  23 #ifndef WX_PRECOMP
  24 #include "wx/wx.h"
  25 #endif
  26
  27 #include <ctype.h>
  28 #include "tex2any.h"
  29 #include <stdlib.h>
  30 #include <time.h>
  31
  32 /*
  33  * Variables accessible from clients
  34  *
  35  */
  36
  37 TexChunk *      DocumentTitle = NULL;
  38 TexChunk *      DocumentAuthor = NULL;
  39 TexChunk *      DocumentDate = NULL;
  40
  41 // Header/footers/pagestyle
  42 TexChunk *      LeftHeaderEven = NULL;
  43 TexChunk *      LeftFooterEven = NULL;
  44 TexChunk *      CentreHeaderEven = NULL;
  45 TexChunk *      CentreFooterEven = NULL;
  46 TexChunk *      RightHeaderEven = NULL;
  47 TexChunk *      RightFooterEven = NULL;
  48 TexChunk *      LeftHeaderOdd = NULL;
  49 TexChunk *      LeftFooterOdd = NULL;
  50 TexChunk *      CentreHeaderOdd = NULL;
  51 TexChunk *      CentreFooterOdd = NULL;
  52 TexChunk *      RightHeaderOdd = NULL;
  53 TexChunk *      RightFooterOdd = NULL;
  54 char *          PageStyle = copystring("plain");
  55
  56 int             DocumentStyle = LATEX_REPORT;
  57 int             MinorDocumentStyle = 0;
  58 wxPathList      TexPathList;
  59 char *          BibliographyStyleString = copystring("plain");
  60 char *          DocumentStyleString = copystring("report");
  61 char *          MinorDocumentStyleString = NULL;
  62 int             ParSkip = 0;
  63 int             ParIndent = 0;
  64
  65 int             normalFont = 10;
  66 int             smallFont = 8;
  67 int             tinyFont = 6;
  68 int             largeFont1 = 12;
  69 int             LargeFont2 = 14;
  70 int             LARGEFont3 = 18;
  71 int             hugeFont1 = 20;
  72 int             HugeFont2 = 24;
  73 int             HUGEFont3 = 28;
  74
  75 // All of these tokens MUST be found on a line by themselves (no other
  76 // text) and must start at the first character of the line, or tex2rtf
  77 // will fail to process them correctly (a limitation of tex2rtf, not TeX)
  78 wxString syntaxTokens[] =
  79 { "\\begin{verbatim}",
  80   "\\begin{toocomplex}",
  81   "\\end{verbatim}",
  82   "\\end{toocomplex}",
  83   "\\verb",
  84   "\\begin{comment}",
  85   "\\end{comment}",
  86   "\\verbatiminput",
  87 //  "\\par",
  88   "\\input",
  89   "\\helpinput",
  90   "\\include",
  91   wxEmptyString
  92 };
  93
  94
  95 /*
  96  * USER-ADJUSTABLE SETTINGS
  97  *
  98  */
  99
 100 // Section font sizes
 101 int             chapterFont =    12; // LARGEFont3;
 102 int             sectionFont =    12; // LargeFont2;
 103 int             subsectionFont = 12; // largeFont1;
 104 int             titleFont = LARGEFont3;
 105 int             authorFont = LargeFont2;
 106 int             mirrorMargins = TRUE;
 107 bool            winHelp = FALSE;  // Output in Windows Help format if TRUE, linear otherwise
 108 bool            isInteractive = FALSE;
 109 bool            runTwice = FALSE;
 110 int             convertMode = TEX_RTF;
 111 bool            checkCurleyBraces = FALSE;
 112 bool            checkSyntax = FALSE;
 113 bool            headerRule = FALSE;
 114 bool            footerRule = FALSE;
 115 bool            compatibilityMode = FALSE; // If TRUE, maximum Latex compatibility
 116                                 // (Quality of RTF generation deteriorate)
 117 bool            generateHPJ; // Generate WinHelp Help Project file
 118 char            *winHelpTitle = NULL; // Windows Help title
 119 int             defaultTableColumnWidth = 2000;
 120
 121 int             labelIndentTab = 18;  // From left indent to item label (points)
 122 int             itemIndentTab = 40;   // From left indent to item (points)
 123
 124 bool            useUpButton = TRUE;
 125 int             htmlBrowseButtons = HTML_BUTTONS_TEXT;
 126
 127 bool            truncateFilenames = FALSE; // Truncate for DOS
 128 int             winHelpVersion = 3; // WinHelp Version (3 for Windows 3.1, 4 for Win95)
 129 bool            winHelpContents = FALSE; // Generate .cnt file for WinHelp 4
 130 bool            htmlIndex = FALSE; // Generate .htx file for HTML
 131 bool            htmlFrameContents = FALSE; // Use frames for HTML contents page
 132 bool            useHeadingStyles = TRUE; // Insert \s1, s2 etc.
 133 bool            useWord = TRUE; // Insert proper Word table of contents, etc etc
 134 int             contentsDepth = 4; // Depth of Word table of contents
 135 bool            indexSubsections = TRUE; // Index subsections in linear RTF
 136 // Linear RTF method of including bitmaps. Can be "includepicture", "hex"
 137 char            *bitmapMethod = copystring("includepicture");
 138 bool            upperCaseNames = FALSE;
 139 // HTML background and text colours
 140 char            *backgroundImageString = NULL;
 141 char            *backgroundColourString = copystring("255;255;255");
 142 char            *textColourString = NULL;
 143 char            *linkColourString = NULL;
 144 char            *followedLinkColourString = NULL;
 145 bool            combineSubSections = FALSE;
 146 bool            htmlWorkshopFiles = FALSE;
 147
 148 extern int passNumber;
 149
 150 extern wxHashTable TexReferences;
 151
 152 /*
 153  * International support
 154  */
 155
 156 // Names to help with internationalisation
 157 char *ContentsNameString = copystring("Contents");
 158 char *AbstractNameString = copystring("Abstract");
 159 char *GlossaryNameString = copystring("Glossary");
 160 char *ReferencesNameString = copystring("References");
 161 char *FiguresNameString = copystring("List of Figures");
 162 char *TablesNameString = copystring("List of Tables");
 163 char *FigureNameString = copystring("Figure");
 164 char *TableNameString = copystring("Table");
 165 char *IndexNameString = copystring("Index");
 166 char *ChapterNameString = copystring("chapter");
 167 char *SectionNameString = copystring("section");
 168 char *SubsectionNameString = copystring("subsection");
 169 char *SubsubsectionNameString = copystring("subsubsection");
 170 char *UpNameString = copystring("Up");
 171
 172 /*
 173  * Section numbering
 174  *
 175  */
 176
 177 int             chapterNo = 0;
 178 int             sectionNo = 0;
 179 int             subsectionNo = 0;
 180 int             subsubsectionNo = 0;
 181 int             figureNo = 0;
 182 int             tableNo = 0;
 183
 184 /*
 185  * Other variables
 186  *
 187  */
 188
 189 FILE *CurrentOutput1 = NULL;
 190 FILE *CurrentOutput2 = NULL;
 191 FILE *Inputs[15];
 192 int LineNumbers[15];
 193 char *FileNames[15];
 194 int CurrentInputIndex = 0;
 195
 196 char *TexFileRoot = NULL;
 197 char *TexBibName = NULL;         // Bibliography output file name
 198 char *TexTmpBibName = NULL;      // Temporary bibliography output file name
 199 bool isSync = FALSE;             // If TRUE, should not yield to other processes.
 200 bool stopRunning = FALSE;        // If TRUE, should abort.
 201
 202 static int currentColumn = 0;
 203 char *currentArgData = NULL;
 204 bool haveArgData = FALSE; // If TRUE, we're simulating the data.
 205 TexChunk *currentArgument = NULL;
 206 TexChunk *nextChunk = NULL;
 207 bool isArgOptional = FALSE;
 208 int noArgs = 0;
 209
 210 TexChunk *TopLevel = NULL;
 211 // wxList MacroDefs(wxKEY_STRING);
 212 wxHashTable MacroDefs(wxKEY_STRING);
 213 wxStringList IgnorableInputFiles; // Ignorable \input files, e.g. psbox.tex
 214 char *BigBuffer = NULL;  // For reading in large chunks of text
 215 TexMacroDef *SoloBlockDef = NULL;
 216 TexMacroDef *VerbatimMacroDef = NULL;
 217
 218 #define IncrementLineNumber() LineNumbers[CurrentInputIndex] ++
 219
 220
 221 TexRef::TexRef(char *label, char *file, char *section, char *sectionN)
 222 {
 223     refLabel = copystring(label);
 224     refFile = file ? copystring(file) : (char*) NULL;
 225     sectionNumber = section ? copystring(section) : copystring("??");
 226     sectionName = sectionN ? copystring(sectionN) : copystring("??");
 227 }
 228
 229 TexRef::~TexRef(void)
 230 {
 231     delete [] refLabel;      refLabel = NULL;
 232     delete [] refFile;       refFile = NULL;
 233     delete [] sectionNumber; sectionNumber = NULL;
 234     delete [] sectionName;   sectionName = NULL;
 235 }
 236
 237
 238 CustomMacro::~CustomMacro()
 239 {
 240     if (macroName)
 241         delete [] macroName;
 242     if (macroBody)
 243         delete [] macroBody;
 244 }
 245
 246 void TexOutput(char *s, bool ordinaryText)
 247 {
 248   int len = strlen(s);
 249
 250   // Update current column, but only if we're guaranteed to
 251   // be ordinary text (not mark-up stuff)
 252   int i;
 253   if (ordinaryText)
 254     for (i = 0; i < len; i++)
 255     {
 256       if (s[i] == 13 || s[i] == 10)
 257         currentColumn = 0;
 258       else
 259         currentColumn ++;
 260     }
 261
 262   if (CurrentOutput1)
 263     fprintf(CurrentOutput1, "%s", s);
 264   if (CurrentOutput2)
 265     fprintf(CurrentOutput2, "%s", s);
 266 }
 267
 268 /*
 269  * Try to find a Latex macro, in one of the following forms:
 270  * (1) \begin{} ... \end{}
 271  * (2) \macroname{arg1}...{argn}
 272  * (3) {\bf arg1}
 273  */
 274
 275 void ForbidWarning(TexMacroDef *def)
 276 {
 277   char buf[100];
 278   switch (def->forbidden)
 279   {
 280     case FORBID_WARN:
 281     {
 282       sprintf(buf, "Warning: it is recommended that command %s is not used.", def->name);
 283       OnInform(buf);
 284       break;
 285     }
 286     case FORBID_ABSOLUTELY:
 287     {
 288       sprintf(buf, "Error: command %s cannot be used and will lead to errors.", def->name);
 289       OnInform(buf);
 290       break;
 291     }
 292     default:
 293       break;
 294   }
 295 }
 296
 297 TexMacroDef *MatchMacro(char *buffer, int *pos, char **env, bool *parseToBrace)
 298 {
 299   *parseToBrace = TRUE;
 300   int i = (*pos);
 301   TexMacroDef *def = NULL;
 302   char macroBuf[40];
 303
 304   // First, try to find begin{thing}
 305   if (strncmp(buffer+i, "begin{", 6) == 0)
 306   {
 307     i += 6;
 308
 309     int j = i;
 310     while ((isalpha(buffer[j]) || buffer[j] == '*') && ((j - i) < 39))
 311     {
 312       macroBuf[j-i] = buffer[j];
 313       j ++;
 314     }
 315     macroBuf[j-i] = 0;
 316     def = (TexMacroDef *)MacroDefs.Get(macroBuf);
 317
 318     if (def)
 319     {
 320       *pos = j + 1;  // BUGBUG Should this be + 1???
 321       *env = def->name;
 322       ForbidWarning(def);
 323       return def;
 324     }
 325     else return NULL;
 326   }
 327
 328   // Failed, so try to find macro from definition list
 329   int j = i;
 330
 331   // First try getting a one-character macro, but ONLY
 332   // if these TWO characters are not both alphabetical (could
 333   // be a longer macro)
 334   if (!(isalpha(buffer[i]) && isalpha(buffer[i+1])))
 335   {
 336     macroBuf[0] = buffer[i];
 337     macroBuf[1] = 0;
 338
 339     def = (TexMacroDef *)MacroDefs.Get(macroBuf);
 340     if (def) j ++;
 341   }
 342
 343   if (!def)
 344   {
 345     while ((isalpha(buffer[j]) || buffer[j] == '*') && ((j - i) < 39))
 346     {
 347       macroBuf[j-i] = buffer[j];
 348       j ++;
 349     }
 350     macroBuf[j-i] = 0;
 351     def = (TexMacroDef *)MacroDefs.Get(macroBuf);
 352   }
 353
 354   if (def)
 355   {
 356     i = j;
 357
 358     // We want to check whether this is a space-consuming macro
 359     // (e.g. {\bf word})
 360     // No brace, e.g. \input thing.tex instead of \input{thing};
 361     // or a numeric argument, such as \parindent0pt
 362     if ((def->no_args > 0) && ((buffer[i] == 32) || (buffer[i] == '=') || (isdigit(buffer[i]))))
 363     {
 364       if ((buffer[i] == 32) || (buffer[i] == '='))
 365         i ++;
 366
 367       *parseToBrace = FALSE;
 368     }
 369     *pos = i;
 370     ForbidWarning(def);
 371     return def;
 372   }
 373   return NULL;
 374 }
 375
 376 void EatWhiteSpace(char *buffer, int *pos)
 377 {
 378   int len = strlen(buffer);
 379   int j = *pos;
 380   bool keepGoing = TRUE;
 381   bool moreLines = TRUE;
 382   while ((j < len) && keepGoing &&
 383          (buffer[j] == 10 || buffer[j] == 13 || buffer[j] == ' ' || buffer[j] == 9))
 384   {
 385     j ++;
 386     if (j >= len)
 387     {
 388       if (moreLines)
 389       {
 390         moreLines = read_a_line(buffer);
 391         len = strlen(buffer);
 392         j = 0;
 393       }
 394       else
 395         keepGoing = FALSE;
 396     }
 397   }
 398   *pos = j;
 399 }
 400
 401 bool FindEndEnvironment(char *buffer, int *pos, char *env)
 402 {
 403   int i = (*pos);
 404
 405   // Try to find end{thing}
 406   if ((strncmp(buffer+i, "end{", 4) == 0) &&
 407       (strncmp(buffer+i+4, env, strlen(env)) == 0))
 408   {
 409     *pos = i + 5 + strlen(env);
 410     return TRUE;
 411   }
 412   else return FALSE;
 413 }
 414
 415 bool readingVerbatim = FALSE;
 416 bool readInVerbatim = FALSE;  // Within a verbatim, but not nec. verbatiminput
 417
 418 // Switched this off because e.g. \verb${$ causes it to fail. There is no
 419 // detection of \verb yet.
 420 // #define CHECK_BRACES 1
 421
 422 unsigned long leftCurley = 0;
 423 unsigned long rightCurley = 0;
 424 static wxString currentFileName = "";
 425
 426 bool read_a_line(char *buf)
 427 {
 428   if (CurrentInputIndex < 0)
 429   {
 430     buf[0] = 0;
 431     return FALSE;
 432   }
 433
 434   int ch = -2;
 435   int bufIndex = 0;
 436   buf[0] = 0;
 437
 438   while (ch != EOF && ch != 10)
 439   {
 440     if (bufIndex >= MAX_LINE_BUFFER_SIZE)
 441     {
 442        wxString errBuf;
 443        errBuf.Printf("Line %lu of file %s is too long.  Lines can be no longer than %lu characters.  Truncated.",
 444            LineNumbers[CurrentInputIndex], (const char*) currentFileName.c_str(),MAX_LINE_BUFFER_SIZE);
 445        OnError((char *)errBuf.c_str());
 446        return FALSE;
 447     }
 448
 449     if (((bufIndex == 14) && (strncmp(buf, "\\end{verbatim}", 14) == 0)) ||
 450          ((bufIndex == 16) && (strncmp(buf, "\\end{toocomplex}", 16) == 0)))
 451       readInVerbatim = FALSE;
 452
 453     ch = getc(Inputs[CurrentInputIndex]);
 454
 455     if (checkCurleyBraces)
 456     {
 457         if (ch == '{' && !readInVerbatim)
 458            leftCurley++;
 459         if (ch == '}' && !readInVerbatim)
 460         {
 461            rightCurley++;
 462            if (rightCurley > leftCurley)
 463            {
 464                wxString errBuf;
 465                errBuf.Printf("An extra right Curley brace ('}') was detected at line %lu inside file %s",LineNumbers[CurrentInputIndex], (const char*) currentFileName.c_str());
 466                OnError((char *)errBuf.c_str());
 467
 468                // Reduce the count of right Curley braces, so the mismatched count
 469                // isn't reported on every line that has a '}' after the first mismatch
 470                rightCurley--;
 471            }
 472         }
 473     }
 474
 475     if (ch != EOF)
 476     {
 477       // Check for 2 consecutive newlines and replace with \par
 478       if (ch == 10 && !readInVerbatim)
 479       {
 480         int ch1 = getc(Inputs[CurrentInputIndex]);
 481         if ((ch1 == 10) || (ch1 == 13))
 482         {
 483           // Eliminate newline (10) following DOS linefeed
 484           if (ch1 == 13)
 485             ch1 = getc(Inputs[CurrentInputIndex]);
 486           buf[bufIndex] = 0;
 487           IncrementLineNumber();
 488 //          strcat(buf, "\\par\n");
 489 //          i += 6;
 490           if (bufIndex+5 >= MAX_LINE_BUFFER_SIZE)
 491           {
 492              wxString errBuf;
 493              errBuf.Printf("Line %lu of file %s is too long.  Lines can be no longer than %lu characters.  Truncated.",
 494                  LineNumbers[CurrentInputIndex], (const char*) currentFileName.c_str(),MAX_LINE_BUFFER_SIZE);
 495              OnError((char *)errBuf.c_str());
 496              return FALSE;
 497           }
 498           strcat(buf, "\\par");
 499           bufIndex += 5;
 500
 501         }
 502         else
 503         {
 504           ungetc(ch1, Inputs[CurrentInputIndex]);
 505           if (bufIndex >= MAX_LINE_BUFFER_SIZE)
 506           {
 507              wxString errBuf;
 508              errBuf.Printf("Line %lu of file %s is too long.  Lines can be no longer than %lu characters.  Truncated.",
 509                  LineNumbers[CurrentInputIndex], (const char*) currentFileName.c_str(),MAX_LINE_BUFFER_SIZE);
 510              OnError((char *)errBuf.c_str());
 511              return FALSE;
 512           }
 513
 514           buf[bufIndex] = ch;
 515           bufIndex ++;
 516         }
 517       }
 518       else
 519       {
 520
 521         // Convert embedded characters to RTF equivalents
 522         switch(ch)
 523         {
 524         case 0xf6: // ö
 525         case 0xe4: // ü
 526         case 0xfc: // ü
 527         case 0xd6: // Ö
 528         case 0xc4: // Ä
 529         case 0xdc: // Ü
 530                 if (bufIndex+5 >= MAX_LINE_BUFFER_SIZE)
 531                 {
 532                    wxString errBuf;
 533                    errBuf.Printf("Line %lu of file %s is too long.  Lines can be no longer than %lu characters.  Truncated.",
 534                        LineNumbers[CurrentInputIndex], (const char*) currentFileName.c_str(),MAX_LINE_BUFFER_SIZE);
 535                    OnError((char *)errBuf.c_str());
 536                    return FALSE;
 537                 }
 538                 buf[bufIndex++]='\\';
 539                 buf[bufIndex++]='"';
 540                 buf[bufIndex++]='{';
 541                 switch(ch)
 542                 {
 543                     case 0xf6:buf[bufIndex++]='o';break; // ö
 544                     case 0xe4:buf[bufIndex++]='a';break; // ä
 545                     case 0xfc:buf[bufIndex++]='u';break; // ü
 546                     case 0xd6:buf[bufIndex++]='O';break; // Ö
 547                     case 0xc4:buf[bufIndex++]='A';break; // Ä
 548                     case 0xdc:buf[bufIndex++]='U';break; // Ü
 549                 }
 550                 buf[bufIndex++]='}';
 551                 break;
 552         case 0xdf: // ß
 553             if (bufIndex+5 >= MAX_LINE_BUFFER_SIZE)
 554             {
 555               wxString errBuf;
 556               errBuf.Printf("Line %lu of file %s is too long.  Lines can be no longer than %lu characters.  Truncated.",
 557                   LineNumbers[CurrentInputIndex], (const char*) currentFileName.c_str(),MAX_LINE_BUFFER_SIZE);
 558               OnError((char *)errBuf.c_str());
 559               return FALSE;
 560             }
 561             buf[bufIndex++]='\\';
 562             buf[bufIndex++]='s';
 563             buf[bufIndex++]='s';
 564             buf[bufIndex++]='\\';
 565             buf[bufIndex++]='/';
 566             break;
 567         default:
 568             if (bufIndex >= MAX_LINE_BUFFER_SIZE)
 569             {
 570               wxString errBuf;
 571               errBuf.Printf("Line %lu of file %s is too long.  Lines can be no longer than %lu characters.  Truncated.",
 572                   LineNumbers[CurrentInputIndex], (const char*) currentFileName.c_str(),MAX_LINE_BUFFER_SIZE);
 573               OnError((char *)errBuf.c_str());
 574               return FALSE;
 575             }
 576             // If the current character read in is a '_', we need to check
 577             // whether there should be a '\' before it or not
 578             if (ch != '_')
 579             {
 580                 buf[bufIndex++] = ch;
 581                 break;
 582             }
 583
 584             if (readInVerbatim)
 585             {
 586                 // There should NOT be a '\' before the '_'
 587                 if ((bufIndex > 0 && (buf[bufIndex-1] == '\\')) && (buf[0] != '%'))
 588                 {
 589                    wxString errBuf;
 590                    errBuf.Printf("An underscore ('_') was detected at line %lu inside file %s that should NOT have a '\\' before it.",LineNumbers[CurrentInputIndex], (const char*) currentFileName.c_str());
 591                    OnError((char *)errBuf.c_str());
 592                 }
 593             }
 594             else
 595             {
 596                 // There should be a '\' before the '_'
 597                 if (bufIndex == 0)
 598                 {
 599                    wxString errBuf;
 600                    errBuf.Printf("An underscore ('_') was detected at line %lu inside file %s that may need a '\\' before it.",LineNumbers[CurrentInputIndex], (const char*) currentFileName.c_str());
 601                    OnError((char *)errBuf.c_str());
 602                 }
 603                 else if ((buf[bufIndex-1] != '\\') && (buf[0] != '%'))  // If it is a comment line, then no warnings
 604                 {
 605                    wxString errBuf;
 606                    errBuf.Printf("An underscore ('_') was detected at line %lu inside file %s that may need a '\\' before it.",LineNumbers[CurrentInputIndex], (const char*) currentFileName.c_str());
 607                    OnError((char *)errBuf.c_str());
 608                 }
 609             }
 610             buf[bufIndex++] = ch;
 611             break;
 612         }  // switch
 613       }  // else
 614     }
 615     else
 616     {
 617       buf[bufIndex] = 0;
 618       fclose(Inputs[CurrentInputIndex]);
 619       Inputs[CurrentInputIndex] = NULL;
 620       if (CurrentInputIndex > 0)
 621          ch = ' '; // No real end of file
 622       CurrentInputIndex --;
 623
 624       if (checkCurleyBraces)
 625       {
 626           if (leftCurley != rightCurley)
 627           {
 628             wxString errBuf;
 629             errBuf.Printf("Curley braces do not match inside file %s\n%lu opens, %lu closes", (const char*) currentFileName.c_str(),leftCurley,rightCurley);
 630             OnError((char *)errBuf.c_str());
 631           }
 632           leftCurley = 0;
 633           rightCurley = 0;
 634       }
 635
 636       if (readingVerbatim)
 637       {
 638         readingVerbatim = FALSE;
 639         readInVerbatim = FALSE;
 640         strcat(buf, "\\end{verbatim}\n");
 641         return FALSE;
 642       }
 643     }
 644     if (ch == 10)
 645       IncrementLineNumber();
 646   }
 647   buf[bufIndex] = 0;
 648
 649   // Strip out comment environment
 650   if (strncmp(buf, "\\begin{comment}", 15) == 0)
 651   {
 652     while (strncmp(buf, "\\end{comment}", 13) != 0)
 653       read_a_line(buf);
 654     return read_a_line(buf);
 655   }
 656   // Read a verbatim input file as if it were a verbatim environment
 657   else if (strncmp(buf, "\\verbatiminput", 14) == 0)
 658   {
 659     int wordLen = 14;
 660     char *fileName = buf + wordLen + 1;
 661
 662     int j = bufIndex - 1;
 663     buf[j] = 0;
 664
 665     // thing}\par -- eliminate the \par!
 666     if (strncmp((buf + strlen(buf)-5), "\\par", 4) == 0)
 667     {
 668       j -= 5;
 669       buf[j] = 0;
 670     }
 671
 672     if (buf[j-1] == '}')
 673         buf[j-1] = 0; // Ignore final brace
 674
 675     wxString actualFile = TexPathList.FindValidPath(fileName);
 676     currentFileName = actualFile;
 677     if (actualFile == "")
 678     {
 679       wxString errBuf;
 680       errBuf.Printf("Could not find file: %s",fileName);
 681       OnError((char *)errBuf.c_str());
 682     }
 683     else
 684     {
 685       wxString informStr;
 686       informStr.Printf("Processing: %s",actualFile.c_str());
 687       OnInform((char *)informStr.c_str());
 688       CurrentInputIndex ++;
 689
 690       Inputs[CurrentInputIndex] = fopen(actualFile, "r");
 691       LineNumbers[CurrentInputIndex] = 1;
 692       if (FileNames[CurrentInputIndex])
 693         delete[] FileNames[CurrentInputIndex];
 694       FileNames[CurrentInputIndex] = copystring(actualFile);
 695
 696       if (!Inputs[CurrentInputIndex])
 697       {
 698         CurrentInputIndex --;
 699         OnError("Could not open verbatiminput file.");
 700       }
 701       else
 702       {
 703         readingVerbatim = TRUE;
 704         readInVerbatim = TRUE;
 705         strcpy(buf, "\\begin{verbatim}\n");
 706         return FALSE;
 707       }
 708     }
 709     return FALSE;
 710   }
 711   else if (strncmp(buf, "\\input", 6) == 0 || strncmp(buf, "\\helpinput", 10) == 0 ||
 712       strncmp(buf, "\\include", 8) == 0)
 713   {
 714     int wordLen;
 715     if (strncmp(buf, "\\input", 6) == 0)
 716       wordLen = 6;
 717     else
 718     if (strncmp(buf, "\\include", 8) == 0)
 719       wordLen = 8;
 720     else
 721       wordLen = 10;
 722
 723     char *fileName = buf + wordLen + 1;
 724
 725     int j = bufIndex - 1;
 726     buf[j] = 0;
 727
 728     // \input{thing}\par -- eliminate the \par!
 729 //    if (strncmp((buf + strlen(buf)-5), "\\par", 4) == 0)
 730     if (strncmp((buf + strlen(buf)-4), "\\par", 4) == 0) // Bug fix 8/2/95 Ulrich Leodolter
 731     {
 732 //      j -= 5;
 733       j -= 4; // Ditto
 734       buf[j] = 0;
 735     }
 736
 737     if (buf[j-1] == '}')
 738         buf[j-1] = 0; // Ignore final brace
 739
 740     // Remove backslashes from name
 741     wxString fileNameStr(fileName);
 742     fileNameStr.Replace("\\", "");
 743
 744     // Ignore some types of input files (e.g. macro definition files)
 745     char *fileOnly = FileNameFromPath((char*) (const char*) fileNameStr);
 746     currentFileName = fileOnly;
 747     if (IgnorableInputFiles.Member(fileOnly))
 748       return read_a_line(buf);
 749
 750     wxString actualFile = TexPathList.FindValidPath(fileNameStr);
 751     if (actualFile == "")
 752     {
 753       char buf2[400];
 754       sprintf(buf2, "%s.tex", (const char*) fileNameStr);
 755       actualFile = TexPathList.FindValidPath(buf2);
 756     }
 757     currentFileName = actualFile;
 758
 759     if (actualFile == "")
 760     {
 761       wxString errBuf;
 762       errBuf.Printf("Could not find file: %s",fileName);
 763       OnError((char *)errBuf.c_str());
 764     }
 765     else
 766     {
 767       // Ensure that if this file includes another,
 768       // then we look in the same directory as this one.
 769       TexPathList.EnsureFileAccessible(actualFile);
 770
 771       wxString informStr;
 772       informStr.Printf("Processing: %s",actualFile.c_str());
 773       OnInform((char *)informStr.c_str());
 774       CurrentInputIndex ++;
 775
 776       Inputs[CurrentInputIndex] = fopen(actualFile, "r");
 777       LineNumbers[CurrentInputIndex] = 1;
 778       if (FileNames[CurrentInputIndex])
 779         delete[] FileNames[CurrentInputIndex];
 780       FileNames[CurrentInputIndex] = copystring(actualFile);
 781
 782       if (!Inputs[CurrentInputIndex])
 783       {
 784         wxString errBuf;
 785         errBuf.Printf("Could not open include file %s", (const char*) actualFile);
 786         CurrentInputIndex --;
 787         OnError((char *)errBuf.c_str());
 788       }
 789     }
 790     bool succ = read_a_line(buf);
 791     return succ;
 792   }
 793
 794   if (checkSyntax)
 795   {
 796       wxString bufStr = buf;
 797       int index = 0;
 798       size_t pos = 0;
 799       for (index=0; syntaxTokens[index] != wxEmptyString; index++)
 800       {
 801           pos = bufStr.find(syntaxTokens[index]);
 802           if (pos != wxString::npos && pos != 0)
 803           {
 804               size_t commentStart = bufStr.find("%");
 805               if (commentStart == wxString::npos || commentStart > pos)
 806               {
 807                   wxString errBuf;
 808                   if (syntaxTokens[index] == "\\verb")
 809                   {
 810                       errBuf.Printf("'%s$....$' was detected at line %lu inside file %s.  Please replace this form with \\tt{....}",
 811                                     syntaxTokens[index], LineNumbers[CurrentInputIndex], (const char*) currentFileName.c_str());
 812                   }
 813                   else
 814                   {
 815                       errBuf.Printf("'%s' was detected at line %lu inside file %s that is not the only text on the line, starting at column one.",
 816                                     syntaxTokens[index], LineNumbers[CurrentInputIndex], (const char*) currentFileName.c_str());
 817                   }
 818                   OnError((char *)errBuf.c_str());
 819               }
 820           }
 821       }
 822   }  // checkSyntax
 823
 824   if (strncmp(buf, "\\begin{verbatim}", 16) == 0 ||
 825       strncmp(buf, "\\begin{toocomplex}", 18) == 0)
 826     readInVerbatim = TRUE;
 827   else if (strncmp(buf, "\\end{verbatim}", 14) == 0 ||
 828            strncmp(buf, "\\end{toocomplex}", 16) == 0)
 829     readInVerbatim = FALSE;
 830
 831   if (checkCurleyBraces)
 832   {
 833       if (ch == EOF && leftCurley != rightCurley)
 834       {
 835         wxString errBuf;
 836         errBuf.Printf("Curley braces do not match inside file %s\n%lu opens, %lu closes", (const char*) currentFileName.c_str(),leftCurley,rightCurley);
 837         OnError((char *)errBuf.c_str());
 838       }
 839   }
 840
 841   return (ch == EOF);
 842 }  // read_a_line
 843
 844 /*
 845  * Parse newcommand
 846  *
 847  */
 848
 849 bool ParseNewCommand(char *buffer, int *pos)
 850 {
 851   if ((strncmp((buffer+(*pos)), "newcommand", 10) == 0) ||
 852       (strncmp((buffer+(*pos)), "renewcommand", 12) == 0))
 853   {
 854     if (strncmp((buffer+(*pos)), "newcommand", 10) == 0)
 855       *pos = *pos + 12;
 856     else
 857       *pos = *pos + 14;
 858
 859     char commandName[100];
 860     char commandValue[1000];
 861     int noArgs = 0;
 862     int i = 0;
 863     while (buffer[*pos] != '}' && (buffer[*pos] != 0))
 864     {
 865       commandName[i] = buffer[*pos];
 866       *pos += 1;
 867       i ++;
 868     }
 869     commandName[i] = 0;
 870     i = 0;
 871     *pos += 1;
 872     if (buffer[*pos] == '[')
 873     {
 874       *pos += 1;
 875       noArgs = (int)(buffer[*pos]) - 48;
 876       *pos += 2; // read past argument and '['
 877     }
 878     bool end = FALSE;
 879     int braceCount = 0;
 880     while (!end)
 881     {
 882       char ch = buffer[*pos];
 883       if (ch == '{')
 884         braceCount ++;
 885       else if (ch == '}')
 886       {
 887         braceCount --;
 888         if (braceCount == 0)
 889           end = TRUE;
 890       }
 891       else if (ch == 0)
 892       {
 893         if (!read_a_line(buffer))
 894           end = TRUE;
 895         *pos = 0;
 896         break;
 897       }
 898       commandValue[i] = ch;
 899       i ++;
 900       *pos += 1;
 901     }
 902     commandValue[i] = 0;
 903
 904     CustomMacro *macro = new CustomMacro(commandName, noArgs, NULL);
 905     if (strlen(commandValue) > 0)
 906       macro->macroBody = copystring(commandValue);
 907     if (!CustomMacroList.Find(commandName))
 908     {
 909       CustomMacroList.Append(commandName, macro);
 910       AddMacroDef(ltCUSTOM_MACRO, commandName, noArgs);
 911     }
 912     return TRUE;
 913   }
 914   else return FALSE;
 915 }
 916
 917 void MacroError(char *buffer)
 918 {
 919   wxString errBuf;
 920   char macroBuf[200];
 921   macroBuf[0] = '\\';
 922   int i = 1;
 923   char ch;
 924   while (((ch = buffer[i-1]) != '\n') && (ch != 0))
 925   {
 926     macroBuf[i] = ch;
 927     i ++;
 928   }
 929   macroBuf[i] = 0;
 930   if (i > 20)
 931     macroBuf[20] = 0;
 932
 933   errBuf.Printf("Could not find macro: %s at line %d, file %s",
 934              macroBuf, (int)(LineNumbers[CurrentInputIndex]-1), FileNames[CurrentInputIndex]);
 935   OnError((char *)errBuf.c_str());
 936 }
 937
 938 /*
 939  * Parse an argument.
 940  * 'environment' specifies the name of the macro IFF if we're looking for the end
 941  * of an environment, e.g. \end{itemize}. Otherwise it's NULL.
 942  * 'parseToBrace' is TRUE if the argument should extend to the next right brace,
 943  * e.g. in {\bf an argument} as opposed to \vskip 30pt
 944  *
 945  */
 946 int ParseArg(TexChunk *thisArg, wxList& children, char *buffer, int pos, char *environment, bool parseToBrace, TexChunk *customMacroArgs)
 947 {
 948   Tex2RTFYield();
 949   if (stopRunning) return pos;
 950
 951   bool eof = FALSE;
 952   BigBuffer[0] = 0;
 953   int buf_ptr = 0;
 954   int len;
 955
 956 /*
 957
 958   // Consume leading brace or square bracket, but ONLY if not following
 959   // a space, because this could be e.g. {\large {\bf thing}} where {\bf thing}
 960   // is the argument of \large AS WELL as being a block in its
 961   // own right.
 962   if (!environment)
 963   {
 964     if ((pos > 0) && (buffer[pos-1] != ' ') && buffer[pos] == '{')
 965       pos ++;
 966     else
 967
 968     if ((pos > 0) && (buffer[pos-1] != ' ') && (buffer[pos] == '[' || buffer[pos] == '('))
 969     {
 970       isOptional = TRUE;
 971       pos ++;
 972     }
 973     else if ((pos > 1) && (buffer[pos-1] != ' ') && (buffer[pos+1] == '[' || buffer[pos+1] == '('))
 974     {
 975       isOptional = TRUE;
 976       pos += 2;
 977     }
 978   }
 979 */
 980
 981   // If not parsing to brace, just read the next word
 982   // (e.g. \vskip 20pt)
 983   if (!parseToBrace)
 984   {
 985     int ch = buffer[pos];
 986     while (!eof && ch != 13 && ch != 32 && ch != 10 &&
 987            ch != 0 && ch != '{')
 988     {
 989       BigBuffer[buf_ptr] = ch;
 990       buf_ptr ++;
 991       pos ++;
 992       ch = buffer[pos];
 993     }
 994     if (buf_ptr > 0)
 995     {
 996       TexChunk *chunk = new TexChunk(CHUNK_TYPE_STRING);
 997       BigBuffer[buf_ptr] = 0;
 998       buf_ptr = 0;
 999       chunk->value = copystring(BigBuffer);
1000       children.Append((wxObject *)chunk);
1001     }
1002     return pos;
1003   }
1004
1005   while (!eof)
1006   {
1007     len = strlen(buffer);
1008     if (pos >= len)
1009     {
1010       if (customMacroArgs) return 0;
1011
1012       eof = read_a_line(buffer);
1013       pos = 0;
1014       len = strlen(buffer);
1015       // Check for verbatim (or toocomplex, which comes to the same thing)
1016       wxString bufStr = buffer;
1017 //      if (bufStr.find("\\begin{verbatim}") != wxString::npos ||
1018 //          bufStr.find("\\begin{toocomplex}") != wxString::npos)
1019       if (strncmp(buffer, "\\begin{verbatim}", 16) == 0 ||
1020           strncmp(buffer, "\\begin{toocomplex}", 18) == 0)
1021       {
1022         if (buf_ptr > 0)
1023         {
1024           TexChunk *chunk = new TexChunk(CHUNK_TYPE_STRING);
1025           BigBuffer[buf_ptr] = 0;
1026           buf_ptr = 0;
1027           chunk->value = copystring(BigBuffer);
1028           children.Append((wxObject *)chunk);
1029         }
1030         BigBuffer[0] = 0;
1031         buf_ptr = 0;
1032
1033         eof = read_a_line(buffer);
1034         while (!eof && (strncmp(buffer, "\\end{verbatim}", 14) != 0) &&
1035                        (strncmp(buffer, "\\end{toocomplex}", 16) != 0)
1036                )
1037         {
1038           strcat(BigBuffer, buffer);
1039           buf_ptr += strlen(buffer);
1040           eof = read_a_line(buffer);
1041         }
1042         eof = read_a_line(buffer);
1043         buf_ptr = 0;
1044
1045         TexChunk *chunk = new TexChunk(CHUNK_TYPE_MACRO, VerbatimMacroDef);
1046         chunk->no_args = 1;
1047         chunk->macroId = ltVERBATIM;
1048         TexChunk *arg = new TexChunk(CHUNK_TYPE_ARG, VerbatimMacroDef);
1049         arg->argn = 1;
1050         arg->macroId = ltVERBATIM;
1051         TexChunk *str = new TexChunk(CHUNK_TYPE_STRING);
1052         str->value = copystring(BigBuffer);
1053
1054         children.Append((wxObject *)chunk);
1055         chunk->children.Append((wxObject *)arg);
1056         arg->children.Append((wxObject *)str);
1057
1058         // Also want to include the following newline (is always a newline
1059         // after a verbatim): EXCEPT in HTML
1060         if (convertMode != TEX_HTML)
1061         {
1062           TexMacroDef *parDef = (TexMacroDef *)MacroDefs.Get("\\");
1063           TexChunk *parChunk = new TexChunk(CHUNK_TYPE_MACRO, parDef);
1064           parChunk->no_args = 0;
1065           parChunk->macroId = ltBACKSLASHCHAR;
1066           children.Append((wxObject *)parChunk);
1067         }
1068       }
1069     }
1070
1071     char ch = buffer[pos];
1072     // End of optional argument -- pretend it's right brace for simplicity
1073     if (thisArg->optional && (ch == ']'))
1074       ch = '}';
1075
1076     switch (ch)
1077     {
1078       case 0:
1079       case '}':  // End of argument
1080       {
1081         if (buf_ptr > 0)
1082         {
1083           TexChunk *chunk = new TexChunk(CHUNK_TYPE_STRING);
1084           BigBuffer[buf_ptr] = 0;
1085           buf_ptr = 0;
1086           chunk->value = copystring(BigBuffer);
1087           children.Append((wxObject *)chunk);
1088         }
1089         if (ch == '}') pos ++;
1090         return pos;
1091         break;
1092       }
1093       case '\\':
1094       {
1095         if (buf_ptr > 0)  // Finish off the string we've read so far
1096         {
1097           TexChunk *chunk = new TexChunk(CHUNK_TYPE_STRING);
1098           BigBuffer[buf_ptr] = 0;
1099           buf_ptr = 0;
1100           chunk->value = copystring(BigBuffer);
1101           children.Append((wxObject *)chunk);
1102         }
1103         pos ++;
1104
1105         // Try matching \end{environment}
1106         if (environment && FindEndEnvironment(buffer, &pos, environment))
1107         {
1108           // Eliminate newline after an \end{} if possible
1109           if (buffer[pos] == 13)
1110           {
1111             pos ++;
1112             if (buffer[pos] == 10)
1113               pos ++;
1114           }
1115           return pos;
1116         }
1117
1118         if (ParseNewCommand(buffer, &pos))
1119           break;
1120
1121         if (strncmp(buffer+pos, "special", 7) == 0)
1122         {
1123           pos += 7;
1124
1125           // Discard {
1126           pos ++;
1127           int noBraces = 1;
1128
1129           wxBuffer[0] = 0;
1130           int i = 0;
1131           bool end = FALSE;
1132           while (!end)
1133           {
1134             int ch = buffer[pos];
1135             if (ch == '}')
1136             {
1137               noBraces --;
1138               if (noBraces == 0)
1139               {
1140                 wxBuffer[i] = 0;
1141                 end = TRUE;
1142               }
1143               else
1144               {
1145                 wxBuffer[i] = '}';
1146                 i ++;
1147               }
1148               pos ++;
1149             }
1150             else if (ch == '{')
1151             {
1152               wxBuffer[i] = '{';
1153               i ++;
1154               pos ++;
1155             }
1156             else if (ch == '\\' && buffer[pos+1] == '}')
1157             {
1158               wxBuffer[i] = '}';
1159               pos += 2;
1160               i++;
1161             }
1162             else if (ch == '\\' && buffer[pos+1] == '{')
1163             {
1164               wxBuffer[i] = '{';
1165               pos += 2;
1166               i++;
1167             }
1168             else
1169             {
1170               wxBuffer[i] = ch;
1171               pos ++;
1172               i ++;
1173               if (ch == 0)
1174                 end = TRUE;
1175             }
1176           }
1177           TexChunk *chunk = new TexChunk(CHUNK_TYPE_MACRO);
1178           chunk->no_args = 1;
1179           chunk->macroId = ltSPECIAL;
1180           TexMacroDef *specialDef = (TexMacroDef *)MacroDefs.Get("special");
1181           chunk->def = specialDef;
1182           TexChunk *arg = new TexChunk(CHUNK_TYPE_ARG, specialDef);
1183           chunk->children.Append((wxObject *)arg);
1184           arg->argn = 1;
1185           arg->macroId = chunk->macroId;
1186
1187           // The value in the first argument.
1188           TexChunk *argValue = new TexChunk(CHUNK_TYPE_STRING);
1189           arg->children.Append((wxObject *)argValue);
1190           argValue->argn = 1;
1191           argValue->value = copystring(wxBuffer);
1192
1193           children.Append((wxObject *)chunk);
1194         }
1195         else if (strncmp(buffer+pos, "verb", 4) == 0)
1196         {
1197           pos += 4;
1198           if (buffer[pos] == '*')
1199             pos ++;
1200
1201           // Find the delimiter character
1202           int ch = buffer[pos];
1203           pos ++;
1204           // Now at start of verbatim text
1205           int j = pos;
1206           while ((buffer[pos] != ch) && buffer[pos] != 0)
1207             pos ++;
1208           char *val = new char[pos - j + 1];
1209           int i;
1210           for (i = j; i < pos; i++)
1211           {
1212             val[i-j] = buffer[i];
1213           }
1214           val[i-j] = 0;
1215
1216           pos ++;
1217
1218           TexChunk *chunk = new TexChunk(CHUNK_TYPE_MACRO);
1219           chunk->no_args = 1;
1220           chunk->macroId = ltVERB;
1221           TexMacroDef *verbDef = (TexMacroDef *)MacroDefs.Get("verb");
1222           chunk->def = verbDef;
1223           TexChunk *arg = new TexChunk(CHUNK_TYPE_ARG, verbDef);
1224           chunk->children.Append((wxObject *)arg);
1225           arg->argn = 1;
1226           arg->macroId = chunk->macroId;
1227
1228           // The value in the first argument.
1229           TexChunk *argValue = new TexChunk(CHUNK_TYPE_STRING);
1230           arg->children.Append((wxObject *)argValue);
1231           argValue->argn = 1;
1232           argValue->value = val;
1233
1234           children.Append((wxObject *)chunk);
1235         }
1236     else
1237     {
1238           char *env = NULL;
1239           bool tmpParseToBrace = TRUE;
1240           TexMacroDef *def = MatchMacro(buffer, &pos, &env, &tmpParseToBrace);
1241           if (def)
1242           {
1243           CustomMacro *customMacro = FindCustomMacro(def->name);
1244
1245           TexChunk *chunk = new TexChunk(CHUNK_TYPE_MACRO, def);
1246           chunk->no_args = def->no_args;
1247 //          chunk->name = copystring(def->name);
1248           chunk->macroId = def->macroId;
1249
1250           if  (!customMacro)
1251             children.Append((wxObject *)chunk);
1252
1253           // Eliminate newline after a \begin{} or a \\ if possible
1254           if (env || strcmp(def->name, "\\") == 0)
1255             if (buffer[pos] == 13)
1256             {
1257               pos ++;
1258               if (buffer[pos] == 10)
1259                 pos ++;
1260             }
1261
1262           pos = ParseMacroBody(def->name, chunk, chunk->no_args,
1263                      buffer, pos, env, tmpParseToBrace, customMacroArgs);
1264
1265           // If custom macro, parse the body substituting the above found args.
1266           if (customMacro)
1267           {
1268             if (customMacro->macroBody)
1269             {
1270               char macroBuf[300];
1271 //              strcpy(macroBuf, "{");
1272               strcpy(macroBuf, customMacro->macroBody);
1273               strcat(macroBuf, "}");
1274               ParseArg(thisArg, children, macroBuf, 0, NULL, TRUE, chunk);
1275             }
1276
1277 //            delete chunk; // Might delete children
1278           }
1279         }
1280         else
1281         {
1282           MacroError(buffer+pos);
1283         }
1284         }
1285         break;
1286       }
1287       // Parse constructs like {\bf thing} as if they were
1288       // \bf{thing}
1289       case '{':
1290       {
1291         pos ++;
1292         if (buffer[pos] == '\\')
1293         {
1294           if (buf_ptr > 0)
1295           {
1296             TexChunk *chunk = new TexChunk(CHUNK_TYPE_STRING);
1297             BigBuffer[buf_ptr] = 0;
1298             buf_ptr = 0;
1299             chunk->value = copystring(BigBuffer);
1300             children.Append((wxObject *)chunk);
1301           }
1302           pos ++;
1303
1304           char *env;
1305           bool tmpParseToBrace;
1306           TexMacroDef *def = MatchMacro(buffer, &pos, &env, &tmpParseToBrace);
1307           if (def)
1308           {
1309             CustomMacro *customMacro = FindCustomMacro(def->name);
1310
1311             TexChunk *chunk = new TexChunk(CHUNK_TYPE_MACRO, def);
1312             chunk->no_args = def->no_args;
1313 //            chunk->name = copystring(def->name);
1314             chunk->macroId = def->macroId;
1315             if (!customMacro)
1316               children.Append((wxObject *)chunk);
1317
1318             pos = ParseMacroBody(def->name, chunk, chunk->no_args,
1319                        buffer, pos, NULL, TRUE, customMacroArgs);
1320
1321             // If custom macro, parse the body substituting the above found args.
1322             if (customMacro)
1323             {
1324               if (customMacro->macroBody)
1325               {
1326                 char macroBuf[300];
1327 //                strcpy(macroBuf, "{");
1328                 strcpy(macroBuf, customMacro->macroBody);
1329                 strcat(macroBuf, "}");
1330                 ParseArg(thisArg, children, macroBuf, 0, NULL, TRUE, chunk);
1331               }
1332
1333 //            delete chunk; // Might delete children
1334         }
1335           }
1336           else
1337           {
1338             MacroError(buffer+pos);
1339           }
1340         }
1341         else
1342     {
1343          /*
1344           * If all else fails, we assume that we have
1345           * a pair of braces on their own, so return a `dummy' macro
1346           * definition with just one argument to parse.
1347           */
1348           if (!SoloBlockDef)
1349           {
1350             SoloBlockDef = new TexMacroDef(ltSOLO_BLOCK, "solo block", 1, FALSE);
1351           }
1352           // Save text so far
1353           if (buf_ptr > 0)
1354           {
1355             TexChunk *chunk1 = new TexChunk(CHUNK_TYPE_STRING);
1356             BigBuffer[buf_ptr] = 0;
1357             buf_ptr = 0;
1358             chunk1->value = copystring(BigBuffer);
1359             children.Append((wxObject *)chunk1);
1360           }
1361           TexChunk *chunk = new TexChunk(CHUNK_TYPE_MACRO, SoloBlockDef);
1362           chunk->no_args = SoloBlockDef->no_args;
1363 //          chunk->name = copystring(SoloBlockDef->name);
1364           chunk->macroId = SoloBlockDef->macroId;
1365           children.Append((wxObject *)chunk);
1366
1367           TexChunk *arg = new TexChunk(CHUNK_TYPE_ARG, SoloBlockDef);
1368
1369           chunk->children.Append((wxObject *)arg);
1370 //          arg->name = copystring(SoloBlockDef->name);
1371           arg->argn = 1;
1372           arg->macroId = chunk->macroId;
1373
1374           pos = ParseArg(arg, arg->children, buffer, pos, NULL, TRUE, customMacroArgs);
1375     }
1376         break;
1377       }
1378       case '$':
1379       {
1380         if (buf_ptr > 0)
1381         {
1382           TexChunk *chunk = new TexChunk(CHUNK_TYPE_STRING);
1383           BigBuffer[buf_ptr] = 0;
1384           buf_ptr = 0;
1385           chunk->value = copystring(BigBuffer);
1386           children.Append((wxObject *)chunk);
1387         }
1388
1389         pos ++;
1390
1391         if (buffer[pos] == '$')
1392         {
1393           TexChunk *chunk = new TexChunk(CHUNK_TYPE_MACRO);
1394           chunk->no_args = 0;
1395 //          chunk->name = copystring("$$");
1396           chunk->macroId = ltSPECIALDOUBLEDOLLAR;
1397           children.Append((wxObject *)chunk);
1398           pos ++;
1399         }
1400         else
1401         {
1402           TexChunk *chunk = new TexChunk(CHUNK_TYPE_MACRO);
1403           chunk->no_args = 0;
1404 //          chunk->name = copystring("_$");
1405           chunk->macroId = ltSPECIALDOLLAR;
1406           children.Append((wxObject *)chunk);
1407         }
1408         break;
1409       }
1410       case '~':
1411       {
1412         if (buf_ptr > 0)
1413         {
1414           TexChunk *chunk = new TexChunk(CHUNK_TYPE_STRING);
1415           BigBuffer[buf_ptr] = 0;
1416           buf_ptr = 0;
1417           chunk->value = copystring(BigBuffer);
1418           children.Append((wxObject *)chunk);
1419         }
1420
1421         pos ++;
1422         TexChunk *chunk = new TexChunk(CHUNK_TYPE_MACRO);
1423         chunk->no_args = 0;
1424 //        chunk->name = copystring("_~");
1425         chunk->macroId = ltSPECIALTILDE;
1426         children.Append((wxObject *)chunk);
1427         break;
1428       }
1429       case '#': // Either treat as a special TeX character or as a macro arg
1430       {
1431         if (buf_ptr > 0)
1432         {
1433           TexChunk *chunk = new TexChunk(CHUNK_TYPE_STRING);
1434           BigBuffer[buf_ptr] = 0;
1435           buf_ptr = 0;
1436           chunk->value = copystring(BigBuffer);
1437           children.Append((wxObject *)chunk);
1438         }
1439
1440         pos ++;
1441         if (!customMacroArgs)
1442         {
1443           TexChunk *chunk = new TexChunk(CHUNK_TYPE_MACRO);
1444           chunk->no_args = 0;
1445 //          chunk->name = copystring("_#");
1446           chunk->macroId = ltSPECIALHASH;
1447           children.Append((wxObject *)chunk);
1448         }
1449         else
1450         {
1451           if (isdigit(buffer[pos]))
1452           {
1453             int n = buffer[pos] - 48;
1454             pos ++;
1455             wxNode *node = customMacroArgs->children.Nth(n-1);
1456             if (node)
1457             {
1458               TexChunk *argChunk = (TexChunk *)node->Data();
1459               children.Append((wxObject *)new TexChunk(*argChunk));
1460             }
1461           }
1462         }
1463         break;
1464       }
1465       case '&':
1466       {
1467         // Remove white space before and after the ampersand,
1468         // since this is probably a table column separator with
1469         // some convenient -- but useless -- white space in the text.
1470         while ((buf_ptr > 0) && ((BigBuffer[buf_ptr-1] == ' ') || (BigBuffer[buf_ptr-1] == 9)))
1471           buf_ptr --;
1472
1473         if (buf_ptr > 0)
1474         {
1475           TexChunk *chunk = new TexChunk(CHUNK_TYPE_STRING);
1476           BigBuffer[buf_ptr] = 0;
1477           buf_ptr = 0;
1478           chunk->value = copystring(BigBuffer);
1479           children.Append((wxObject *)chunk);
1480         }
1481
1482         pos ++;
1483
1484         while (buffer[pos] == ' ' || buffer[pos] == 9)
1485           pos ++;
1486
1487         TexChunk *chunk = new TexChunk(CHUNK_TYPE_MACRO);
1488         chunk->no_args = 0;
1489 //        chunk->name = copystring("_&");
1490         chunk->macroId = ltSPECIALAMPERSAND;
1491         children.Append((wxObject *)chunk);
1492         break;
1493       }
1494       // Eliminate end-of-line comment
1495       case '%':
1496       {
1497         ch = buffer[pos];
1498         while (ch != 10 && ch != 13 && ch != 0)
1499         {
1500           pos ++;
1501           ch = buffer[pos];
1502         }
1503         if (buffer[pos] == 10 || buffer[pos] == 13)
1504         {
1505           pos ++;
1506           if (buffer[pos] == 10) pos ++; // Eliminate newline following DOS line feed
1507         }
1508         break;
1509       }
1510       // Eliminate tab
1511       case 9:
1512       {
1513         BigBuffer[buf_ptr] = ' ';
1514         BigBuffer[buf_ptr+1] = 0;
1515         buf_ptr ++;
1516         pos ++;
1517         break;
1518       }
1519       default:
1520       {
1521         BigBuffer[buf_ptr] = ch;
1522         BigBuffer[buf_ptr+1] = 0;
1523         buf_ptr ++;
1524         pos ++;
1525         break;
1526       }
1527     }
1528   }
1529   return pos;
1530 }
1531
1532 /*
1533  * Consume as many arguments as the macro definition specifies
1534  *
1535  */
1536
1537 int ParseMacroBody(char *macro_name, TexChunk *parent,
1538                    int no_args, char *buffer, int pos,
1539                    char *environment, bool parseToBrace,
1540                    TexChunk *customMacroArgs)
1541 {
1542   Tex2RTFYield();
1543   if (stopRunning) return pos;
1544
1545   // Check for a first optional argument
1546   if (buffer[pos] == ' ' && buffer[pos+1] == '[')
1547   {
1548     // Fool following code into thinking that this is definitely
1549     // an optional first argument. (If a space before a non-first argument,
1550     // [ is interpreted as a [, not an optional argument.)
1551     buffer[pos] = '!';
1552     pos ++;
1553     no_args ++;
1554   }
1555   else
1556     if (buffer[pos] == '[')
1557       no_args ++;
1558
1559   int maxArgs = 0;
1560
1561   int i;
1562   for (i = 0; i < no_args; i++)
1563   {
1564     maxArgs ++;
1565     TexChunk *arg = new TexChunk(CHUNK_TYPE_ARG, parent->def);
1566
1567     parent->children.Append((wxObject *)arg);
1568 //    arg->name = copystring(macro_name);
1569     arg->argn = maxArgs;
1570     arg->macroId = parent->macroId;
1571
1572     // To parse the first arg of a 2 arg \begin{thing}{arg} ... \end{thing}
1573     // have to fool parser into thinking this is a regular kind of block.
1574     char *actualEnv;
1575     if ((no_args == 2) && (i == 0))
1576       actualEnv = NULL;
1577     else
1578       actualEnv = environment;
1579
1580     bool isOptional = FALSE;
1581
1582     // Remove the first { of the argument so it doesn't get recognized as { ... }
1583 //    EatWhiteSpace(buffer, &pos);
1584     if (!actualEnv)
1585     {
1586       // The reason for these tests is to not consume braces that don't
1587       // belong to this macro.
1588       // E.g. {\bf {\small thing}}
1589       if ((pos > 0) && (buffer[pos-1] != ' ') && buffer[pos] == '{')
1590         pos ++;
1591       else
1592       if ((pos > 0) && (buffer[pos-1] != ' ') && (buffer[pos] == '['))
1593       {
1594         isOptional = TRUE;
1595         pos ++;
1596       }
1597       else if ((pos > 1) && (buffer[pos-1] != ' ') && (buffer[pos+1] == '['))
1598       {
1599         isOptional = TRUE;
1600         pos += 2;
1601       }
1602     }
1603     arg->optional = isOptional;
1604
1605     pos = ParseArg(arg, arg->children, buffer, pos, actualEnv, parseToBrace, customMacroArgs);
1606
1607     // If we've encountered an OPTIONAL argument, go another time around
1608     // the loop, because we've got more than we thought.
1609     // Hopefully optional args don't occur at the end of a macro use
1610     // or we might miss it.
1611     // Don't increment no of times round loop if the first optional arg
1612     // -- we already did it before the loop.
1613     if (arg->optional && (i > 0))
1614       i --;
1615   }
1616   parent->no_args = maxArgs;
1617
1618   // Tell each argument how many args there are (useful when processing an arg)
1619   wxNode *node = parent->children.First();
1620   while (node)
1621   {
1622     TexChunk *chunk = (TexChunk *)node->Data();
1623     chunk->no_args = maxArgs;
1624     node = node->Next();
1625   }
1626   return pos;
1627 }
1628
1629 bool TexLoadFile(char *filename)
1630 {
1631   static char *line_buffer;
1632   stopRunning = FALSE;
1633   strcpy(TexFileRoot, filename);
1634   StripExtension(TexFileRoot);
1635   sprintf(TexBibName, "%s.bb", TexFileRoot);
1636   sprintf(TexTmpBibName, "%s.bb1", TexFileRoot);
1637
1638   TexPathList.EnsureFileAccessible(filename);
1639
1640   if (line_buffer)
1641       delete line_buffer;
1642
1643   line_buffer = new char[MAX_LINE_BUFFER_SIZE];
1644
1645   Inputs[0] = fopen(filename, "r");
1646   LineNumbers[0] = 1;
1647   FileNames[0] = copystring(filename);
1648   if (Inputs[0])
1649   {
1650     read_a_line(line_buffer);
1651     ParseMacroBody("toplevel", TopLevel, 1, line_buffer, 0, NULL, TRUE);
1652     if (Inputs[0]) fclose(Inputs[0]);
1653     return TRUE;
1654   }
1655
1656   return FALSE;
1657 }
1658
1659 TexMacroDef::TexMacroDef(int the_id, char *the_name, int n, bool ig, bool forbidLevel)
1660 {
1661   name = copystring(the_name);
1662   no_args = n;
1663   ignore = ig;
1664   macroId = the_id;
1665   forbidden = forbidLevel;
1666 }
1667
1668 TexMacroDef::~TexMacroDef(void)
1669 {
1670   if (name) delete[] name;
1671 }
1672
1673 TexChunk::TexChunk(int the_type, TexMacroDef *the_def)
1674 {
1675   type = the_type;
1676   no_args = 0;
1677   argn = 0;
1678 //  name = NULL;
1679   def = the_def;
1680   macroId = 0;
1681   value = NULL;
1682   optional = FALSE;
1683 }
1684
1685 TexChunk::TexChunk(TexChunk& toCopy)
1686 {
1687   type = toCopy.type;
1688   no_args = toCopy.no_args;
1689   argn = toCopy.argn;
1690   macroId = toCopy.macroId;
1691
1692 //  if (toCopy.name)
1693 //    name = copystring(toCopy.name);
1694 //  else
1695 //    name = NULL;
1696   def = toCopy.def;
1697
1698   if (toCopy.value)
1699     value = copystring(toCopy.value);
1700   else
1701     value = NULL;
1702
1703   optional = toCopy.optional;
1704   wxNode *node = toCopy.children.First();
1705   while (node)
1706   {
1707     TexChunk *child = (TexChunk *)node->Data();
1708     children.Append((wxObject *)new TexChunk(*child));
1709     node = node->Next();
1710   }
1711 }
1712
1713 TexChunk::~TexChunk(void)
1714 {
1715 //  if (name) delete[] name;
1716   if (value) delete[] value;
1717   wxNode *node = children.First();
1718   while (node)
1719   {
1720     TexChunk *child = (TexChunk *)node->Data();
1721     delete child;
1722     wxNode *next = node->Next();
1723     delete node;
1724     node = next;
1725   }
1726 }
1727
1728 bool IsArgOptional(void)  // Is this argument an optional argument?
1729 {
1730   return isArgOptional;
1731 }
1732
1733 int GetNoArgs(void) // Number of args for this macro
1734 {
1735   return noArgs;
1736 }
1737
1738 /* Gets the text of a chunk on request (must be for small arguments
1739  * only!)
1740  *
1741  */
1742
1743 void GetArgData1(TexChunk *chunk)
1744 {
1745   switch (chunk->type)
1746   {
1747     case CHUNK_TYPE_MACRO:
1748     {
1749       TexMacroDef *def = chunk->def;
1750       if (def && def->ignore)
1751         return;
1752
1753       if (def && (strcmp(def->name, "solo block") != 0))
1754       {
1755         strcat(currentArgData, "\\");
1756         strcat(currentArgData, def->name);
1757       }
1758
1759       wxNode *node = chunk->children.First();
1760       while (node)
1761       {
1762         TexChunk *child_chunk = (TexChunk *)node->Data();
1763         strcat(currentArgData, "{");
1764         GetArgData1(child_chunk);
1765         strcat(currentArgData, "}");
1766         node = node->Next();
1767       }
1768       break;
1769     }
1770     case CHUNK_TYPE_ARG:
1771     {
1772       wxNode *node = chunk->children.First();
1773       while (node)
1774       {
1775         TexChunk *child_chunk = (TexChunk *)node->Data();
1776         GetArgData1(child_chunk);
1777         node = node->Next();
1778       }
1779       break;
1780     }
1781     case CHUNK_TYPE_STRING:
1782     {
1783       if (chunk->value)
1784         strcat(currentArgData, chunk->value);
1785       break;
1786     }
1787   }
1788 }
1789
1790 char *GetArgData(TexChunk *chunk)
1791 {
1792   currentArgData[0] = 0;
1793   GetArgData1(currentArgument);
1794   haveArgData = FALSE;
1795   return currentArgData;
1796 }
1797
1798 char *GetArgData(void)
1799 {
1800   if (!haveArgData)
1801   {
1802     currentArgData[0] = 0;
1803     GetArgData1(currentArgument);
1804   }
1805   return currentArgData;
1806 }
1807
1808 TexChunk *GetArgChunk(void)
1809 {
1810   return currentArgument;
1811 }
1812
1813 TexChunk *GetNextChunk(void)     // Look ahead to the next chunk
1814 {
1815   return nextChunk;
1816 }
1817
1818 TexChunk *GetTopLevelChunk(void)
1819 {
1820   return TopLevel;
1821 }
1822
1823 int GetCurrentColumn(void)
1824 {
1825   return currentColumn;
1826 }
1827
1828 /*
1829  * Traverses document calling functions to allow the client to
1830  * write out the appropriate stuff
1831  */
1832
1833
1834 void TraverseFromChunk(TexChunk *chunk, wxNode *thisNode, bool childrenOnly)
1835 {
1836   Tex2RTFYield();
1837   if (stopRunning) return;
1838
1839   switch (chunk->type)
1840   {
1841     case CHUNK_TYPE_MACRO:
1842     {
1843       TexMacroDef *def = chunk->def;
1844       if (def && def->ignore)
1845         return;
1846
1847       if (!childrenOnly)
1848         OnMacro(chunk->macroId, chunk->no_args, TRUE);
1849
1850       wxNode *node = chunk->children.First();
1851       while (node)
1852       {
1853         TexChunk *child_chunk = (TexChunk *)node->Data();
1854         TraverseFromChunk(child_chunk, node);
1855         node = node->Next();
1856       }
1857
1858       if (thisNode && thisNode->Next()) nextChunk = (TexChunk *)thisNode->Next()->Data();
1859
1860       if (!childrenOnly)
1861         OnMacro(chunk->macroId, chunk->no_args, FALSE);
1862       break;
1863     }
1864     case CHUNK_TYPE_ARG:
1865     {
1866       currentArgument = chunk;
1867
1868       isArgOptional = chunk->optional;
1869       noArgs = chunk->no_args;
1870
1871       // If OnArgument returns FALSE, don't output.
1872
1873       if (childrenOnly || OnArgument(chunk->macroId, chunk->argn, TRUE))
1874       {
1875         wxNode *node = chunk->children.First();
1876         while (node)
1877         {
1878           TexChunk *child_chunk = (TexChunk *)node->Data();
1879           TraverseFromChunk(child_chunk, node);
1880           node = node->Next();
1881         }
1882       }
1883
1884       currentArgument = chunk;
1885
1886       if (thisNode && thisNode->Next()) nextChunk = (TexChunk *)thisNode->Next()->Data();
1887
1888       isArgOptional = chunk->optional;
1889       noArgs = chunk->no_args;
1890
1891       if (!childrenOnly)
1892         (void)OnArgument(chunk->macroId, chunk->argn, FALSE);
1893       break;
1894     }
1895     case CHUNK_TYPE_STRING:
1896     {
1897       extern int issuedNewParagraph;
1898       extern int forbidResetPar;
1899       if (chunk->value && (forbidResetPar == 0))
1900       {
1901         // If non-whitespace text, we no longer have a new paragraph.
1902         if (issuedNewParagraph && !((chunk->value[0] == 10 || chunk->value[0] == 13 || chunk->value[0] == 32)
1903                                     && chunk->value[1] == 0))
1904           issuedNewParagraph = FALSE;
1905         TexOutput(chunk->value, TRUE);
1906       }
1907       break;
1908     }
1909   }
1910 }
1911
1912 void TraverseDocument(void)
1913 {
1914   TraverseFromChunk(TopLevel, NULL);
1915 }
1916
1917 void SetCurrentOutput(FILE *fd)
1918 {
1919   CurrentOutput1 = fd;
1920   CurrentOutput2 = NULL;
1921 }
1922
1923 void SetCurrentOutputs(FILE *fd1, FILE *fd2)
1924 {
1925   CurrentOutput1 = fd1;
1926   CurrentOutput2 = fd2;
1927 }
1928
1929 void AddMacroDef(int the_id, char *name, int n, bool ignore, bool forbid)
1930 {
1931   MacroDefs.Put(name, new TexMacroDef(the_id, name, n, ignore, forbid));
1932 }
1933
1934 void TexInitialize(int bufSize)
1935 {
1936   InitialiseColourTable();
1937 #ifdef __WXMSW__
1938   TexPathList.AddEnvList("TEXINPUT");
1939 #endif
1940 #ifdef __UNIX__
1941   TexPathList.AddEnvList("TEXINPUTS");
1942 #endif
1943   int i;
1944   for (i = 0; i < 15; i++)
1945   {
1946     Inputs[i] = NULL;
1947     LineNumbers[i] = 1;
1948     FileNames[i] = NULL;
1949   }
1950
1951   IgnorableInputFiles.Add("psbox.tex");
1952   BigBuffer = new char[(bufSize*1000)];
1953   currentArgData = new char[2000];
1954   TexFileRoot = new char[300];
1955   TexBibName = new char[300];
1956   TexTmpBibName = new char[300];
1957   AddMacroDef(ltTOPLEVEL, "toplevel", 1);
1958   TopLevel = new TexChunk(CHUNK_TYPE_MACRO);
1959 //  TopLevel->name = copystring("toplevel");
1960   TopLevel->macroId = ltTOPLEVEL;
1961   TopLevel->no_args = 1;
1962   VerbatimMacroDef = (TexMacroDef *)MacroDefs.Get("verbatim");
1963 }
1964
1965 void TexCleanUp(void)
1966 {
1967   int i;
1968   for (i = 0; i < 15; i++)
1969     Inputs[i] = NULL;
1970
1971   chapterNo = 0;
1972   sectionNo = 0;
1973   subsectionNo = 0;
1974   subsubsectionNo = 0;
1975   figureNo = 0;
1976
1977   CurrentOutput1 = NULL;
1978   CurrentOutput2 = NULL;
1979   CurrentInputIndex = 0;
1980   haveArgData = FALSE;
1981   noArgs = 0;
1982
1983   if (TopLevel)
1984     delete TopLevel;
1985   TopLevel = new TexChunk(CHUNK_TYPE_MACRO);
1986 //  TopLevel->name = copystring("toplevel");
1987   TopLevel->macroId = ltTOPLEVEL;
1988   TopLevel->no_args = 1;
1989
1990   DocumentTitle = NULL;
1991   DocumentAuthor = NULL;
1992   DocumentDate = NULL;
1993   DocumentStyle = LATEX_REPORT;
1994   MinorDocumentStyle = 0;
1995   BibliographyStyleString = copystring("plain");
1996   DocumentStyleString = copystring("report");
1997   MinorDocumentStyleString = NULL;
1998
1999   // gt - Changed this so if this is the final pass
2000   // then we DO want to remove these macros, so that
2001   // memory is not MASSIVELY leaked if the user
2002   // does not exit the program, but instead runs
2003   // the program again
2004   if ((passNumber == 1 && !runTwice) ||
2005       (passNumber == 2 && runTwice))
2006   {
2007 /* Don't want to remove custom macros after each pass.*/
2008       SetFontSizes(10);
2009       wxNode *node = CustomMacroList.First();
2010       while (node)
2011       {
2012         CustomMacro *macro = (CustomMacro *)node->Data();
2013         delete macro;
2014         delete node;
2015         node = CustomMacroList.First();
2016       }
2017   }
2018 /**/
2019   TexReferences.BeginFind();
2020   wxNode *node = TexReferences.Next();
2021   while (node)
2022   {
2023     TexRef *ref = (TexRef *)node->Data();
2024     delete ref;
2025     node = TexReferences.Next();
2026   }
2027   TexReferences.Clear();
2028
2029   node = BibList.First();
2030   while (node)
2031   {
2032     BibEntry *entry = (BibEntry *)node->Data();
2033     delete entry;
2034     delete node;
2035     node = BibList.First();
2036   }
2037   CitationList.Clear();
2038   ResetTopicCounter();
2039 }
2040
2041 // There is likely to be one set of macros used by all utilities.
2042 void DefineDefaultMacros(void)
2043 {
2044   // Put names which subsume other names at the TOP
2045   // so they get recognized first
2046
2047   AddMacroDef(ltACCENT_GRAVE,     "`", 1);
2048   AddMacroDef(ltACCENT_ACUTE,     "'", 1);
2049   AddMacroDef(ltACCENT_CARET,     "^", 1);
2050   AddMacroDef(ltACCENT_UMLAUT,    "\"", 1);
2051   AddMacroDef(ltACCENT_TILDE,     "~", 1);
2052   AddMacroDef(ltACCENT_DOT,       ".", 1);
2053   AddMacroDef(ltACCENT_CADILLA,   "c", 1);
2054   AddMacroDef(ltSMALLSPACE1,      ",", 0);
2055   AddMacroDef(ltSMALLSPACE2,      ";", 0);
2056
2057   AddMacroDef(ltABSTRACT,         "abstract", 1);
2058   AddMacroDef(ltADDCONTENTSLINE,  "addcontentsline", 3);
2059   AddMacroDef(ltADDTOCOUNTER,     "addtocounter", 2);
2060   AddMacroDef(ltALEPH,            "aleph", 0);
2061   AddMacroDef(ltALPHA,            "alpha", 0);
2062   AddMacroDef(ltALPH1,            "alph", 1);
2063   AddMacroDef(ltALPH2,            "Alph", 1);
2064   AddMacroDef(ltANGLE,            "angle", 0);
2065   AddMacroDef(ltAPPENDIX,         "appendix", 0);
2066   AddMacroDef(ltAPPROX,           "approx", 0);
2067   AddMacroDef(ltARABIC,           "arabic", 1);
2068   AddMacroDef(ltARRAY,            "array", 1);
2069   AddMacroDef(ltAST,              "ast", 0);
2070   AddMacroDef(ltASYMP,            "asymp", 0);
2071   AddMacroDef(ltAUTHOR,           "author", 1);
2072
2073   AddMacroDef(ltBACKGROUNDCOLOUR, "backgroundcolour", 1);
2074   AddMacroDef(ltBACKGROUNDIMAGE,  "backgroundimage", 1);
2075   AddMacroDef(ltBACKGROUND,       "background", 1);
2076   AddMacroDef(ltBACKSLASHRAW,     "backslashraw", 0);
2077   AddMacroDef(ltBACKSLASH,        "backslash", 0);
2078   AddMacroDef(ltBASELINESKIP,     "baselineskip", 1);
2079   AddMacroDef(ltBCOL,             "bcol", 2);
2080   AddMacroDef(ltBETA,             "beta", 0);
2081   AddMacroDef(ltBFSERIES,         "bfseries", 1);
2082   AddMacroDef(ltBF,               "bf", 1);
2083   AddMacroDef(ltBIBITEM,          "bibitem", 2);  // For convenience, bibitem has 2 args: label and item.
2084                               // The Latex syntax permits writing as 2 args.
2085   AddMacroDef(ltBIBLIOGRAPHYSTYLE,    "bibliographystyle", 1);
2086   AddMacroDef(ltBIBLIOGRAPHY,     "bibliography", 1);
2087   AddMacroDef(ltBIGTRIANGLEDOWN,  "bigtriangledown", 0);
2088   AddMacroDef(ltBOT,              "bot", 0);
2089   AddMacroDef(ltBOXIT,            "boxit", 1);
2090   AddMacroDef(ltBOX,              "box", 0);
2091   AddMacroDef(ltBRCLEAR,          "brclear", 0);
2092   AddMacroDef(ltBULLET,           "bullet", 0);
2093
2094   AddMacroDef(ltCAPTIONSTAR,      "caption*", 1);
2095   AddMacroDef(ltCAPTION,          "caption", 1);
2096   AddMacroDef(ltCAP,              "cap", 0);
2097   AddMacroDef(ltCDOTS,            "cdots", 0);
2098   AddMacroDef(ltCDOT,             "cdot", 0);
2099   AddMacroDef(ltCENTERLINE,       "centerline", 1);
2100   AddMacroDef(ltCENTERING,        "centering", 0);
2101   AddMacroDef(ltCENTER,           "center", 1);
2102   AddMacroDef(ltCEXTRACT,         "cextract", 0);
2103   AddMacroDef(ltCHAPTERHEADING,   "chapterheading", 1);
2104   AddMacroDef(ltCHAPTERSTAR,      "chapter*", 1);
2105   AddMacroDef(ltCHAPTER,          "chapter", 1);
2106   AddMacroDef(ltCHI,              "chi", 0);
2107   AddMacroDef(ltCINSERT,          "cinsert", 0);
2108   AddMacroDef(ltCIRC,             "circ", 0);
2109   AddMacroDef(ltCITE,             "cite", 1);
2110   AddMacroDef(ltCLASS,            "class", 1);
2111   AddMacroDef(ltCLEARDOUBLEPAGE,  "cleardoublepage", 0);
2112   AddMacroDef(ltCLEARPAGE,        "clearpage", 0);
2113   AddMacroDef(ltCLINE,            "cline", 1);
2114   AddMacroDef(ltCLIPSFUNC,        "clipsfunc", 3);
2115   AddMacroDef(ltCLUBSUIT,         "clubsuit", 0);
2116   AddMacroDef(ltCOLUMNSEP,        "columnsep", 1);
2117   AddMacroDef(ltCOMMENT,          "comment", 1, TRUE);
2118   AddMacroDef(ltCONG,             "cong", 0);
2119   AddMacroDef(ltCOPYRIGHT,        "copyright", 0);
2120   AddMacroDef(ltCPARAM,           "cparam", 2);
2121   AddMacroDef(ltCHEAD,            "chead", 1);
2122   AddMacroDef(ltCFOOT,            "cfoot", 1);
2123   AddMacroDef(ltCUP,              "cup", 0);
2124
2125   AddMacroDef(ltDASHV,            "dashv", 0);
2126   AddMacroDef(ltDATE,             "date", 1);
2127   AddMacroDef(ltDELTA,            "delta", 0);
2128   AddMacroDef(ltCAP_DELTA,        "Delta", 0);
2129   AddMacroDef(ltDEFINECOLOUR,     "definecolour", 4);
2130   AddMacroDef(ltDEFINECOLOR,      "definecolor", 4);
2131   AddMacroDef(ltDESCRIPTION,      "description", 1);
2132   AddMacroDef(ltDESTRUCT,         "destruct", 1);
2133   AddMacroDef(ltDIAMOND2,         "diamond2", 0);
2134   AddMacroDef(ltDIAMOND,          "diamond", 0);
2135   AddMacroDef(ltDIV,              "div", 0);
2136   AddMacroDef(ltDOCUMENTCLASS,    "documentclass", 1);
2137   AddMacroDef(ltDOCUMENTSTYLE,    "documentstyle", 1);
2138   AddMacroDef(ltDOCUMENT,         "document", 1);
2139   AddMacroDef(ltDOUBLESPACE,      "doublespace", 1);
2140   AddMacroDef(ltDOTEQ,            "doteq", 0);
2141   AddMacroDef(ltDOWNARROW,        "downarrow", 0);
2142   AddMacroDef(ltDOWNARROW2,       "Downarrow", 0);
2143
2144   AddMacroDef(ltEMPTYSET,         "emptyset", 0);
2145   AddMacroDef(ltEMPH,             "emph", 1);
2146   AddMacroDef(ltEM,               "em", 1);
2147   AddMacroDef(ltENUMERATE,        "enumerate", 1);
2148   AddMacroDef(ltEPSILON,          "epsilon", 0);
2149   AddMacroDef(ltEQUATION,         "equation", 1);
2150   AddMacroDef(ltEQUIV,            "equiv", 0);
2151   AddMacroDef(ltETA,              "eta", 0);
2152   AddMacroDef(ltEVENSIDEMARGIN,   "evensidemargin", 1);
2153   AddMacroDef(ltEXISTS,           "exists", 0);
2154
2155   AddMacroDef(ltFBOX,             "fbox", 1);
2156   AddMacroDef(ltFCOL,             "fcol", 2);
2157   AddMacroDef(ltFIGURE,           "figure", 1);
2158   AddMacroDef(ltFIGURESTAR,       "figure*", 1);
2159   AddMacroDef(ltFLUSHLEFT,        "flushleft", 1);
2160   AddMacroDef(ltFLUSHRIGHT,       "flushright", 1);
2161   AddMacroDef(ltFOLLOWEDLINKCOLOUR, "followedlinkcolour", 1);
2162   AddMacroDef(ltFOOTHEIGHT,       "footheight", 1);
2163   AddMacroDef(ltFOOTNOTEPOPUP,    "footnotepopup", 2);
2164   AddMacroDef(ltFOOTNOTE,         "footnote", 1);
2165   AddMacroDef(ltFOOTSKIP,         "footskip", 1);
2166   AddMacroDef(ltFORALL,           "forall", 0);
2167   AddMacroDef(ltFRAMEBOX,         "framebox", 1);
2168   AddMacroDef(ltFROWN,            "frown", 0);
2169   AddMacroDef(ltFUNCTIONSECTION,  "functionsection", 1);
2170   AddMacroDef(ltFUNC,             "func", 3);
2171   AddMacroDef(ltFOOTNOTESIZE,     "footnotesize", 0);
2172   AddMacroDef(ltFANCYPLAIN,       "fancyplain", 2);
2173
2174   AddMacroDef(ltGAMMA,            "gamma", 0);
2175   AddMacroDef(ltCAP_GAMMA,        "Gamma", 0);
2176   AddMacroDef(ltGEQ,              "geq", 0);
2177   AddMacroDef(ltGE,               "ge", 0);
2178   AddMacroDef(ltGG,               "gg", 0);
2179   AddMacroDef(ltGLOSSARY,         "glossary", 1);
2180   AddMacroDef(ltGLOSS,            "gloss", 1);
2181
2182   AddMacroDef(ltHEADHEIGHT,       "headheight", 1);
2183   AddMacroDef(ltHEARTSUIT,        "heartsuit", 0);
2184   AddMacroDef(ltHELPGLOSSARY,     "helpglossary", 1);
2185   AddMacroDef(ltHELPIGNORE,       "helpignore", 1, TRUE);
2186   AddMacroDef(ltHELPONLY,         "helponly", 1);
2187   AddMacroDef(ltHELPINPUT,        "helpinput", 1);
2188   AddMacroDef(ltHELPFONTFAMILY,   "helpfontfamily", 1);
2189   AddMacroDef(ltHELPFONTSIZE,     "helpfontsize", 1);
2190   AddMacroDef(ltHELPREFN,         "helprefn", 2);
2191   AddMacroDef(ltHELPREF,          "helpref", 2);
2192   AddMacroDef(ltHFILL,            "hfill", 0);
2193   AddMacroDef(ltHLINE,            "hline", 0);
2194   AddMacroDef(ltHRULE,            "hrule", 0);
2195   AddMacroDef(ltHSPACESTAR,       "hspace*", 1);
2196   AddMacroDef(ltHSPACE,           "hspace", 1);
2197   AddMacroDef(ltHSKIPSTAR,        "hskip*", 1);
2198   AddMacroDef(ltHSKIP,            "hskip", 1);
2199   AddMacroDef(lthuge,             "huge", 1);
2200   AddMacroDef(ltHuge,             "Huge", 1);
2201   AddMacroDef(ltHUGE,             "HUGE", 1);
2202   AddMacroDef(ltHTMLIGNORE,       "htmlignore", 1);
2203   AddMacroDef(ltHTMLONLY,         "htmlonly", 1);
2204
2205   AddMacroDef(ltIM,               "im", 0);
2206   AddMacroDef(ltINCLUDEONLY,      "includeonly", 1);
2207   AddMacroDef(ltINCLUDE,          "include", 1);
2208   AddMacroDef(ltINDENTED,         "indented", 2);
2209   AddMacroDef(ltINDEX,            "index", 1);
2210   AddMacroDef(ltINPUT,            "input", 1, TRUE);
2211   AddMacroDef(ltIOTA,             "iota", 0);
2212   AddMacroDef(ltITEMIZE,          "itemize", 1);
2213   AddMacroDef(ltITEM,             "item", 0);
2214   AddMacroDef(ltIMAGEMAP,         "imagemap", 3);
2215   AddMacroDef(ltIMAGEL,           "imagel", 2);
2216   AddMacroDef(ltIMAGER,           "imager", 2);
2217   AddMacroDef(ltIMAGE,            "image", 2);
2218   AddMacroDef(ltIN,               "in", 0);
2219   AddMacroDef(ltINFTY,            "infty", 0);
2220   AddMacroDef(ltITSHAPE,          "itshape", 1);
2221   AddMacroDef(ltIT,               "it", 1);
2222   AddMacroDef(ltITEMSEP,          "itemsep", 1);
2223   AddMacroDef(ltINSERTATLEVEL,    "insertatlevel", 2);
2224
2225   AddMacroDef(ltKAPPA,            "kappa", 0);
2226   AddMacroDef(ltKILL,             "kill", 0);
2227
2228   AddMacroDef(ltLABEL,            "label", 1);
2229   AddMacroDef(ltLAMBDA,           "lambda", 0);
2230   AddMacroDef(ltCAP_LAMBDA,       "Lambda", 0);
2231   AddMacroDef(ltlarge,            "large", 1);
2232   AddMacroDef(ltLarge,            "Large", 1);
2233   AddMacroDef(ltLARGE,            "LARGE", 1);
2234   AddMacroDef(ltLATEXIGNORE,      "latexignore", 1);
2235   AddMacroDef(ltLATEXONLY,        "latexonly", 1);
2236   AddMacroDef(ltLATEX,            "LaTeX", 0);
2237   AddMacroDef(ltLBOX,             "lbox", 1);
2238   AddMacroDef(ltLBRACERAW,        "lbraceraw", 0);
2239   AddMacroDef(ltLDOTS,            "ldots", 0);
2240   AddMacroDef(ltLEQ,              "leq", 0);
2241   AddMacroDef(ltLE,               "le", 0);
2242   AddMacroDef(ltLEFTARROW,        "leftarrow", 0);
2243   AddMacroDef(ltLEFTRIGHTARROW,   "leftrightarrow", 0);
2244   AddMacroDef(ltLEFTARROW2,       "Leftarrow", 0);
2245   AddMacroDef(ltLEFTRIGHTARROW2,  "Leftrightarrow", 0);
2246   AddMacroDef(ltLINEBREAK,        "linebreak", 0);
2247   AddMacroDef(ltLINKCOLOUR,       "linkcolour", 1);
2248   AddMacroDef(ltLISTOFFIGURES,    "listoffigures", 0);
2249   AddMacroDef(ltLISTOFTABLES,     "listoftables", 0);
2250   AddMacroDef(ltLHEAD,            "lhead", 1);
2251   AddMacroDef(ltLFOOT,            "lfoot", 1);
2252   AddMacroDef(ltLOWERCASE,        "lowercase", 1);
2253   AddMacroDef(ltLL,               "ll", 0);
2254
2255   AddMacroDef(ltMAKEGLOSSARY,     "makeglossary", 0);
2256   AddMacroDef(ltMAKEINDEX,        "makeindex", 0);
2257   AddMacroDef(ltMAKETITLE,        "maketitle", 0);
2258   AddMacroDef(ltMARKRIGHT,        "markright", 1);
2259   AddMacroDef(ltMARKBOTH,         "markboth", 2);
2260   AddMacroDef(ltMARGINPARWIDTH,   "marginparwidth", 1);
2261   AddMacroDef(ltMARGINPARSEP,     "marginparsep", 1);
2262   AddMacroDef(ltMARGINPARODD,     "marginparodd", 1);
2263   AddMacroDef(ltMARGINPAREVEN,    "marginpareven", 1);
2264   AddMacroDef(ltMARGINPAR,        "marginpar", 1);
2265   AddMacroDef(ltMBOX,             "mbox", 1);
2266   AddMacroDef(ltMDSERIES,         "mdseries", 1);
2267   AddMacroDef(ltMEMBERSECTION,    "membersection", 1);
2268   AddMacroDef(ltMEMBER,           "member", 2);
2269   AddMacroDef(ltMID,              "mid", 0);
2270   AddMacroDef(ltMODELS,           "models", 0);
2271   AddMacroDef(ltMP,               "mp", 0);
2272   AddMacroDef(ltMULTICOLUMN,      "multicolumn", 3);
2273   AddMacroDef(ltMU,               "mu", 0);
2274
2275   AddMacroDef(ltNABLA,            "nabla", 0);
2276   AddMacroDef(ltNEG,              "neg", 0);
2277   AddMacroDef(ltNEQ,              "neq", 0);
2278   AddMacroDef(ltNEWCOUNTER,       "newcounter", 1, FALSE, (bool)FORBID_ABSOLUTELY);
2279   AddMacroDef(ltNEWLINE,          "newline", 0);
2280   AddMacroDef(ltNEWPAGE,          "newpage", 0);
2281   AddMacroDef(ltNI,               "ni", 0);
2282   AddMacroDef(ltNOCITE,           "nocite", 1);
2283   AddMacroDef(ltNOINDENT,         "noindent", 0);
2284   AddMacroDef(ltNOLINEBREAK,      "nolinebreak", 0);
2285   AddMacroDef(ltNOPAGEBREAK,      "nopagebreak", 0);
2286   AddMacroDef(ltNORMALSIZE,       "normalsize", 1);
2287   AddMacroDef(ltNORMALBOX,        "normalbox", 1);
2288   AddMacroDef(ltNORMALBOXD,       "normalboxd", 1);
2289   AddMacroDef(ltNOTEQ,            "noteq", 0);
2290   AddMacroDef(ltNOTIN,            "notin", 0);
2291   AddMacroDef(ltNOTSUBSET,        "notsubset", 0);
2292   AddMacroDef(ltNU,               "nu", 0);
2293
2294   AddMacroDef(ltODDSIDEMARGIN,    "oddsidemargin", 1);
2295   AddMacroDef(ltOMEGA,            "omega", 0);
2296   AddMacroDef(ltCAP_OMEGA,        "Omega", 0);
2297   AddMacroDef(ltONECOLUMN,        "onecolumn", 0);
2298   AddMacroDef(ltOPLUS,            "oplus", 0);
2299   AddMacroDef(ltOSLASH,           "oslash", 0);
2300   AddMacroDef(ltOTIMES,           "otimes", 0);
2301
2302   AddMacroDef(ltPAGEBREAK,        "pagebreak", 0);
2303   AddMacroDef(ltPAGEREF,          "pageref", 1);
2304   AddMacroDef(ltPAGESTYLE,        "pagestyle", 1);
2305   AddMacroDef(ltPAGENUMBERING,    "pagenumbering", 1);
2306   AddMacroDef(ltPARAGRAPHSTAR,    "paragraph*", 1);
2307   AddMacroDef(ltPARAGRAPH,        "paragraph", 1);
2308   AddMacroDef(ltPARALLEL,         "parallel", 0);
2309   AddMacroDef(ltPARAM,            "param", 2);
2310   AddMacroDef(ltPARINDENT,        "parindent", 1);
2311   AddMacroDef(ltPARSKIP,          "parskip", 1);
2312   AddMacroDef(ltPARTIAL,          "partial", 0);
2313   AddMacroDef(ltPARTSTAR,         "part*", 1);
2314   AddMacroDef(ltPART,             "part", 1);
2315   AddMacroDef(ltPAR,              "par", 0);
2316   AddMacroDef(ltPERP,             "perp", 0);
2317   AddMacroDef(ltPHI,              "phi", 0);
2318   AddMacroDef(ltCAP_PHI,          "Phi", 0);
2319   AddMacroDef(ltPFUNC,            "pfunc", 3);
2320   AddMacroDef(ltPICTURE,          "picture", 1);
2321   AddMacroDef(ltPI,               "pi", 0);
2322   AddMacroDef(ltCAP_PI,           "Pi", 0);
2323   AddMacroDef(ltPM,               "pm", 0);
2324   AddMacroDef(ltPOPREFONLY,       "poprefonly", 1);
2325   AddMacroDef(ltPOPREF,           "popref", 2);
2326   AddMacroDef(ltPOUNDS,           "pounds", 0);
2327   AddMacroDef(ltPREC,             "prec", 0);
2328   AddMacroDef(ltPRECEQ,           "preceq", 0);
2329   AddMacroDef(ltPRINTINDEX,       "printindex", 0);
2330   AddMacroDef(ltPROPTO,           "propto", 0);
2331   AddMacroDef(ltPSBOXTO,          "psboxto", 1, FALSE, (bool)FORBID_ABSOLUTELY);
2332   AddMacroDef(ltPSBOX,            "psbox", 1, FALSE, (bool)FORBID_ABSOLUTELY);
2333   AddMacroDef(ltPSI,              "psi", 0);
2334   AddMacroDef(ltCAP_PSI,          "Psi", 0);
2335
2336   AddMacroDef(ltQUOTE,            "quote", 1);
2337   AddMacroDef(ltQUOTATION,        "quotation", 1);
2338
2339   AddMacroDef(ltRAGGEDBOTTOM,     "raggedbottom", 0);
2340   AddMacroDef(ltRAGGEDLEFT,       "raggedleft", 0);
2341   AddMacroDef(ltRAGGEDRIGHT,      "raggedright", 0);
2342   AddMacroDef(ltRBRACERAW,        "rbraceraw", 0);
2343   AddMacroDef(ltREF,              "ref", 1);
2344   AddMacroDef(ltREGISTERED,       "registered", 0);
2345   AddMacroDef(ltRE,               "we", 0);
2346   AddMacroDef(ltRHO,              "rho", 0);
2347   AddMacroDef(ltRIGHTARROW,       "rightarrow", 0);
2348   AddMacroDef(ltRIGHTARROW2,      "rightarrow2", 0);
2349   AddMacroDef(ltRMFAMILY,         "rmfamily", 1);
2350   AddMacroDef(ltRM,               "rm", 1);
2351   AddMacroDef(ltROMAN,            "roman", 1);
2352   AddMacroDef(ltROMAN2,           "Roman", 1);
2353 //  AddMacroDef(lt"row", 1);
2354   AddMacroDef(ltRTFSP,            "rtfsp", 0);
2355   AddMacroDef(ltRTFIGNORE,        "rtfignore", 1);
2356   AddMacroDef(ltRTFONLY,          "rtfonly", 1);
2357   AddMacroDef(ltRULEDROW,         "ruledrow", 1);
2358   AddMacroDef(ltDRULED,           "druled", 1);
2359   AddMacroDef(ltRULE,             "rule", 2);
2360   AddMacroDef(ltRHEAD,            "rhead", 1);
2361   AddMacroDef(ltRFOOT,            "rfoot", 1);
2362   AddMacroDef(ltROW,              "row", 1);
2363
2364   AddMacroDef(ltSCSHAPE,          "scshape", 1);
2365   AddMacroDef(ltSC,               "sc", 1);
2366   AddMacroDef(ltSECTIONHEADING,   "sectionheading", 1);
2367   AddMacroDef(ltSECTIONSTAR,      "section*", 1);
2368   AddMacroDef(ltSECTION,          "section", 1);
2369   AddMacroDef(ltSETCOUNTER,       "setcounter", 2);
2370   AddMacroDef(ltSFFAMILY,         "sffamily", 1);
2371   AddMacroDef(ltSF,               "sf", 1);
2372   AddMacroDef(ltSHARP,            "sharp", 0);
2373   AddMacroDef(ltSHORTCITE,        "shortcite", 1);
2374   AddMacroDef(ltSIGMA,            "sigma", 0);
2375   AddMacroDef(ltCAP_SIGMA,        "Sigma", 0);
2376   AddMacroDef(ltSIM,              "sim", 0);
2377   AddMacroDef(ltSIMEQ,            "simeq", 0);
2378   AddMacroDef(ltSINGLESPACE,      "singlespace", 1);
2379   AddMacroDef(ltSIZEDBOX,         "sizedbox", 2);
2380   AddMacroDef(ltSIZEDBOXD,        "sizedboxd", 2);
2381   AddMacroDef(ltSLOPPYPAR,        "sloppypar", 1);
2382   AddMacroDef(ltSLOPPY,           "sloppy", 0);
2383   AddMacroDef(ltSLSHAPE,          "slshape", 1);
2384   AddMacroDef(ltSL,               "sl", 1);
2385   AddMacroDef(ltSMALL,            "small", 1);
2386   AddMacroDef(ltSMILE,            "smile", 0);
2387   AddMacroDef(ltSS,               "ss", 0);
2388   AddMacroDef(ltSTAR,             "star", 0);
2389   AddMacroDef(ltSUBITEM,          "subitem", 0);
2390   AddMacroDef(ltSUBPARAGRAPHSTAR, "subparagraph*", 1);
2391   AddMacroDef(ltSUBPARAGRAPH,     "subparagraph", 1);
2392   AddMacroDef(ltSPECIAL,          "special", 1);
2393   AddMacroDef(ltSUBSECTIONSTAR,   "subsection*", 1);
2394   AddMacroDef(ltSUBSECTION,       "subsection", 1);
2395   AddMacroDef(ltSUBSETEQ,         "subseteq", 0);
2396   AddMacroDef(ltSUBSET,           "subset", 0);
2397   AddMacroDef(ltSUCC,             "succ", 0);
2398   AddMacroDef(ltSUCCEQ,           "succeq", 0);
2399   AddMacroDef(ltSUPSETEQ,         "supseteq", 0);
2400   AddMacroDef(ltSUPSET,           "supset", 0);
2401   AddMacroDef(ltSUBSUBSECTIONSTAR,"subsubsection*", 1);
2402   AddMacroDef(ltSUBSUBSECTION,    "subsubsection", 1);
2403   AddMacroDef(ltSUPERTABULAR,     "supertabular", 2, FALSE);
2404   AddMacroDef(ltSURD,             "surd", 0);
2405   AddMacroDef(ltSCRIPTSIZE,       "scriptsize", 1);
2406   AddMacroDef(ltSETHEADER,        "setheader", 6);
2407   AddMacroDef(ltSETFOOTER,        "setfooter", 6);
2408   AddMacroDef(ltSETHOTSPOTCOLOUR, "sethotspotcolour", 1);
2409   AddMacroDef(ltSETHOTSPOTCOLOR,  "sethotspotcolor", 1);
2410   AddMacroDef(ltSETHOTSPOTUNDERLINE, "sethotspotunderline", 1);
2411   AddMacroDef(ltSETTRANSPARENCY,  "settransparency", 1);
2412   AddMacroDef(ltSPADESUIT,        "spadesuit", 0);
2413
2414   AddMacroDef(ltTABBING,          "tabbing", 2);
2415   AddMacroDef(ltTABLEOFCONTENTS,  "tableofcontents", 0);
2416   AddMacroDef(ltTABLE,            "table", 1);
2417   AddMacroDef(ltTABULAR,          "tabular", 2, FALSE);
2418   AddMacroDef(ltTAB,              "tab", 0);
2419   AddMacroDef(ltTAU,              "tau", 0);
2420   AddMacroDef(ltTEXTRM,           "textrm", 1);
2421   AddMacroDef(ltTEXTSF,           "textsf", 1);
2422   AddMacroDef(ltTEXTTT,           "texttt", 1);
2423   AddMacroDef(ltTEXTBF,           "textbf", 1);
2424   AddMacroDef(ltTEXTIT,           "textit", 1);
2425   AddMacroDef(ltTEXTSL,           "textsl", 1);
2426   AddMacroDef(ltTEXTSC,           "textsc", 1);
2427   AddMacroDef(ltTEXTWIDTH,        "textwidth", 1);
2428   AddMacroDef(ltTEXTHEIGHT,       "textheight", 1);
2429   AddMacroDef(ltTEXTCOLOUR,       "textcolour", 1);
2430   AddMacroDef(ltTEX,              "TeX", 0);
2431   AddMacroDef(ltTHEBIBLIOGRAPHY,  "thebibliography", 2);
2432   AddMacroDef(ltTHETA,            "theta", 0);
2433   AddMacroDef(ltTIMES,            "times", 0);
2434   AddMacroDef(ltCAP_THETA,        "Theta", 0);
2435   AddMacroDef(ltTITLEPAGE,        "titlepage", 1);
2436   AddMacroDef(ltTITLE,            "title", 1);
2437   AddMacroDef(ltTINY,             "tiny", 1);
2438   AddMacroDef(ltTODAY,            "today", 0);
2439   AddMacroDef(ltTOPMARGIN,        "topmargin", 1);
2440   AddMacroDef(ltTOPSKIP,          "topskip", 1);
2441   AddMacroDef(ltTRIANGLE,         "triangle", 0);
2442   AddMacroDef(ltTTFAMILY,         "ttfamily", 1);
2443   AddMacroDef(ltTT,               "tt", 1);
2444   AddMacroDef(ltTYPEIN,           "typein", 1);
2445   AddMacroDef(ltTYPEOUT,          "typeout", 1);
2446   AddMacroDef(ltTWOCOLWIDTHA,     "twocolwidtha", 1);
2447   AddMacroDef(ltTWOCOLWIDTHB,     "twocolwidthb", 1);
2448   AddMacroDef(ltTWOCOLSPACING,    "twocolspacing", 1);
2449   AddMacroDef(ltTWOCOLITEMRULED,  "twocolitemruled", 2);
2450   AddMacroDef(ltTWOCOLITEM,       "twocolitem", 2);
2451   AddMacroDef(ltTWOCOLLIST,       "twocollist", 1);
2452   AddMacroDef(ltTWOCOLUMN,        "twocolumn", 0);
2453   AddMacroDef(ltTHEPAGE,          "thepage", 0);
2454   AddMacroDef(ltTHECHAPTER,       "thechapter", 0);
2455   AddMacroDef(ltTHESECTION,       "thesection", 0);
2456   AddMacroDef(ltTHISPAGESTYLE,    "thispagestyle", 1);
2457
2458   AddMacroDef(ltUNDERLINE,        "underline", 1);
2459   AddMacroDef(ltUPSILON,          "upsilon", 0);
2460   AddMacroDef(ltCAP_UPSILON,      "Upsilon", 0);
2461   AddMacroDef(ltUPARROW,          "uparrow", 0);
2462   AddMacroDef(ltUPARROW2,         "Uparrow", 0);
2463   AddMacroDef(ltUPPERCASE,        "uppercase", 1);
2464   AddMacroDef(ltUPSHAPE,          "upshape", 1);
2465   AddMacroDef(ltURLREF,           "urlref", 2);
2466   AddMacroDef(ltUSEPACKAGE,       "usepackage", 1);
2467
2468   AddMacroDef(ltVAREPSILON,       "varepsilon", 0);
2469   AddMacroDef(ltVARPHI,           "varphi", 0);
2470   AddMacroDef(ltVARPI,            "varpi", 0);
2471   AddMacroDef(ltVARRHO,           "varrho", 0);
2472   AddMacroDef(ltVARSIGMA,         "varsigma", 0);
2473   AddMacroDef(ltVARTHETA,         "vartheta", 0);
2474   AddMacroDef(ltVDOTS,            "vdots", 0);
2475   AddMacroDef(ltVEE,              "vee", 0);
2476   AddMacroDef(ltVERBATIMINPUT,    "verbatiminput", 1);
2477   AddMacroDef(ltVERBATIM,         "verbatim", 1);
2478   AddMacroDef(ltVERBSTAR,         "verb*", 1);
2479   AddMacroDef(ltVERB,             "verb", 1);
2480   AddMacroDef(ltVERSE,            "verse", 1);
2481   AddMacroDef(ltVFILL,            "vfill", 0);
2482   AddMacroDef(ltVLINE,            "vline", 0);
2483   AddMacroDef(ltVOID,             "void", 0);
2484   AddMacroDef(ltVDASH,            "vdash", 0);
2485   AddMacroDef(ltVRULE,            "vrule", 0);
2486   AddMacroDef(ltVSPACESTAR,       "vspace*", 1);
2487   AddMacroDef(ltVSKIPSTAR,        "vskip*", 1);
2488   AddMacroDef(ltVSPACE,           "vspace", 1);
2489   AddMacroDef(ltVSKIP,            "vskip", 1);
2490
2491   AddMacroDef(ltWEDGE,            "wedge", 0);
2492   AddMacroDef(ltWXCLIPS,          "wxclips", 0);
2493   AddMacroDef(ltWINHELPIGNORE,    "winhelpignore", 1);
2494   AddMacroDef(ltWINHELPONLY,      "winhelponly", 1);
2495   AddMacroDef(ltWP,               "wp", 0);
2496
2497   AddMacroDef(ltXI,               "xi", 0);
2498   AddMacroDef(ltCAP_XI,           "Xi", 0);
2499   AddMacroDef(ltXLPIGNORE,        "xlpignore", 1);
2500   AddMacroDef(ltXLPONLY,          "xlponly", 1);
2501
2502   AddMacroDef(ltZETA,             "zeta", 0);
2503
2504   AddMacroDef(ltSPACE,            " ", 0);
2505   AddMacroDef(ltBACKSLASHCHAR,    "\\", 0);
2506   AddMacroDef(ltPIPE,             "|", 0);
2507   AddMacroDef(ltFORWARDSLASH,     "/", 0);
2508   AddMacroDef(ltUNDERSCORE,       "_", 0);
2509   AddMacroDef(ltAMPERSAND,        "&", 0);
2510   AddMacroDef(ltPERCENT,          "%", 0);
2511   AddMacroDef(ltDOLLAR,           "$", 0);
2512   AddMacroDef(ltHASH,             "#", 0);
2513   AddMacroDef(ltLPARENTH,         "(", 0);
2514   AddMacroDef(ltRPARENTH,         ")", 0);
2515   AddMacroDef(ltLBRACE,           "{", 0);
2516   AddMacroDef(ltRBRACE,           "}", 0);
2517 //  AddMacroDef(ltEQUALS,           "=", 0);
2518   AddMacroDef(ltRANGLEBRA,        ">", 0);
2519   AddMacroDef(ltLANGLEBRA,        "<", 0);
2520   AddMacroDef(ltPLUS,             "+", 0);
2521   AddMacroDef(ltDASH,             "-", 0);
2522   AddMacroDef(ltAT_SYMBOL,        "@", 0);
2523 //  AddMacroDef(ltSINGLEQUOTE,      "'", 0);
2524 //  AddMacroDef(ltBACKQUOTE,        "`", 0);
2525 }
2526
2527 /*
2528  * Default behaviour, should be called by client if can't match locally.
2529  *
2530  */
2531
2532 // Called on start/end of macro examination
2533 void DefaultOnMacro(int macroId, int no_args, bool start)
2534 {
2535   switch (macroId)
2536   {
2537     // Default behaviour for abstract
2538     case ltABSTRACT:
2539     {
2540       if (start)
2541       {
2542         // Write the heading
2543         FakeCurrentSection(AbstractNameString);
2544         OnMacro(ltPAR, 0, TRUE);
2545         OnMacro(ltPAR, 0, FALSE);
2546       }
2547       else
2548       {
2549         if (DocumentStyle == LATEX_ARTICLE)
2550           sectionNo --;
2551         else
2552           chapterNo --;
2553       }
2554       break;
2555     }
2556
2557     // Default behaviour for glossary
2558     case ltHELPGLOSSARY:
2559     {
2560       if (start)
2561       {
2562         // Write the heading
2563         FakeCurrentSection(GlossaryNameString);
2564         OnMacro(ltPAR, 0, TRUE);
2565         OnMacro(ltPAR, 0, FALSE);
2566         if ((convertMode == TEX_RTF) && !winHelp)
2567         {
2568           OnMacro(ltPAR, 0, TRUE);
2569           OnMacro(ltPAR, 0, FALSE);
2570         }
2571       }
2572       break;
2573     }
2574     case ltSPECIALAMPERSAND:
2575       if (start)
2576         TexOutput("  ");
2577       break;
2578
2579     case ltCINSERT:
2580       if (start)
2581         TexOutput("<<", TRUE);
2582       break;
2583     case ltCEXTRACT:
2584       if (start)
2585         TexOutput(">>", TRUE);
2586       break;
2587     case ltDESTRUCT:
2588       if (start)
2589         TexOutput("~", TRUE);
2590       break;
2591     case ltTILDE:
2592       if (start)
2593         TexOutput("~", TRUE);
2594       break;
2595     case ltSPECIALTILDE:
2596       if (start)
2597         TexOutput(" ", TRUE);
2598       break;
2599     case ltUNDERSCORE:
2600       if (start)
2601         TexOutput("_", TRUE);
2602       break;
2603     case ltHASH:
2604       if (start)
2605         TexOutput("#", TRUE);
2606       break;
2607     case ltAMPERSAND:
2608       if (start)
2609         TexOutput("&", TRUE);
2610       break;
2611     case ltSPACE:
2612       if (start)
2613         TexOutput(" ", TRUE);
2614       break;
2615     case ltPIPE:
2616       if (start)
2617         TexOutput("|", TRUE);
2618       break;
2619     case ltPERCENT:
2620       if (start)
2621         TexOutput("%", TRUE);
2622       break;
2623     case ltDOLLAR:
2624       if (start)
2625         TexOutput("$", TRUE);
2626       break;
2627     case ltLPARENTH:
2628       if (start)
2629         TexOutput("", TRUE);
2630       break;
2631     case ltRPARENTH:
2632       if (start)
2633         TexOutput("", TRUE);
2634       break;
2635     case ltLBRACE:
2636       if (start)
2637         TexOutput("{", TRUE);
2638       break;
2639     case ltRBRACE:
2640       if (start)
2641         TexOutput("}", TRUE);
2642       break;
2643     case ltCOPYRIGHT:
2644       if (start)
2645         TexOutput("(c)", TRUE);
2646       break;
2647     case ltREGISTERED:
2648       if (start)
2649         TexOutput("(r)", TRUE);
2650       break;
2651     case ltBACKSLASH:
2652       if (start)
2653         TexOutput("\\", TRUE);
2654       break;
2655     case ltLDOTS:
2656     case ltCDOTS:
2657       if (start)
2658         TexOutput("...", TRUE);
2659       break;
2660     case ltVDOTS:
2661       if (start)
2662         TexOutput("|", TRUE);
2663       break;
2664     case ltLATEX:
2665       if (start)
2666         TexOutput("LaTeX", TRUE);
2667       break;
2668     case ltTEX:
2669       if (start)
2670         TexOutput("TeX", TRUE);
2671       break;
2672     case ltPOUNDS:
2673       if (start)
2674         TexOutput("£", TRUE);
2675       break;
2676     case ltSPECIALDOUBLEDOLLAR:  // Interpret as center
2677       OnMacro(ltCENTER, no_args, start);
2678       break;
2679     case ltEMPH:
2680     case ltTEXTSL:
2681     case ltSLSHAPE:
2682     case ltSL:
2683       OnMacro(ltIT, no_args, start);
2684       break;
2685     case ltPARAGRAPH:
2686     case ltPARAGRAPHSTAR:
2687     case ltSUBPARAGRAPH:
2688     case ltSUBPARAGRAPHSTAR:
2689       OnMacro(ltSUBSUBSECTION, no_args, start);
2690       break;
2691     case ltTODAY:
2692     {
2693       if (start)
2694       {
2695         time_t when;
2696         (void) time(&when);
2697         TexOutput(ctime(&when), TRUE);
2698       }
2699       break;
2700     }
2701     case ltNOINDENT:
2702       if (start)
2703         ParIndent = 0;
2704       break;
2705
2706     // Symbols
2707     case ltALPHA:
2708       if (start) TexOutput("alpha");
2709       break;
2710     case ltBETA:
2711       if (start) TexOutput("beta");
2712       break;
2713     case ltGAMMA:
2714       if (start) TexOutput("gamma");
2715       break;
2716     case ltDELTA:
2717       if (start) TexOutput("delta");
2718       break;
2719     case ltEPSILON:
2720     case ltVAREPSILON:
2721       if (start) TexOutput("epsilon");
2722       break;
2723     case ltZETA:
2724       if (start) TexOutput("zeta");
2725       break;
2726     case ltETA:
2727       if (start) TexOutput("eta");
2728       break;
2729     case ltTHETA:
2730     case ltVARTHETA:
2731       if (start) TexOutput("theta");
2732       break;
2733     case ltIOTA:
2734       if (start) TexOutput("iota");
2735       break;
2736     case ltKAPPA:
2737       if (start) TexOutput("kappa");
2738       break;
2739     case ltLAMBDA:
2740       if (start) TexOutput("lambda");
2741       break;
2742     case ltMU:
2743       if (start) TexOutput("mu");
2744       break;
2745     case ltNU:
2746       if (start) TexOutput("nu");
2747       break;
2748     case ltXI:
2749       if (start) TexOutput("xi");
2750       break;
2751     case ltPI:
2752     case ltVARPI:
2753       if (start) TexOutput("pi");
2754       break;
2755     case ltRHO:
2756     case ltVARRHO:
2757       if (start) TexOutput("rho");
2758       break;
2759     case ltSIGMA:
2760     case ltVARSIGMA:
2761       if (start) TexOutput("sigma");
2762       break;
2763     case ltTAU:
2764       if (start) TexOutput("tau");
2765       break;
2766     case ltUPSILON:
2767       if (start) TexOutput("upsilon");
2768       break;
2769     case ltPHI:
2770     case ltVARPHI:
2771       if (start) TexOutput("phi");
2772       break;
2773     case ltCHI:
2774       if (start) TexOutput("chi");
2775       break;
2776     case ltPSI:
2777       if (start) TexOutput("psi");
2778       break;
2779     case ltOMEGA:
2780       if (start) TexOutput("omega");
2781       break;
2782     case ltCAP_GAMMA:
2783       if (start) TexOutput("GAMMA");
2784       break;
2785     case ltCAP_DELTA:
2786       if (start) TexOutput("DELTA");
2787       break;
2788     case ltCAP_THETA:
2789       if (start) TexOutput("THETA");
2790       break;
2791     case ltCAP_LAMBDA:
2792       if (start) TexOutput("LAMBDA");
2793       break;
2794     case ltCAP_XI:
2795       if (start) TexOutput("XI");
2796       break;
2797     case ltCAP_PI:
2798       if (start) TexOutput("PI");
2799       break;
2800     case ltCAP_SIGMA:
2801       if (start) TexOutput("SIGMA");
2802       break;
2803     case ltCAP_UPSILON:
2804       if (start) TexOutput("UPSILON");
2805       break;
2806     case ltCAP_PHI:
2807       if (start) TexOutput("PHI");
2808       break;
2809     case ltCAP_PSI:
2810       if (start) TexOutput("PSI");
2811       break;
2812     case ltCAP_OMEGA:
2813       if (start) TexOutput("OMEGA");
2814       break;
2815
2816     // Binary operation symbols
2817     case ltLE:
2818     case ltLEQ:
2819       if (start) TexOutput("<=");
2820       break;
2821     case ltLL:
2822       if (start) TexOutput("<<");
2823       break;
2824     case ltSUBSET:
2825       if (start) TexOutput("SUBSET");
2826       break;
2827     case ltSUBSETEQ:
2828       if (start) TexOutput("SUBSETEQ");
2829       break;
2830     case ltIN:
2831       if (start) TexOutput("IN");
2832       break;
2833     case ltVDASH:
2834       if (start) TexOutput("VDASH");
2835       break;
2836     case ltMODELS:
2837       if (start) TexOutput("MODELS");
2838       break;
2839     case ltGE:
2840     case ltGEQ:
2841       if (start) TexOutput(">=");
2842       break;
2843     case ltGG:
2844       if (start) TexOutput(">>");
2845       break;
2846     case ltSUPSET:
2847       if (start) TexOutput("SUPSET");
2848       break;
2849     case ltSUPSETEQ:
2850       if (start) TexOutput("SUPSETEQ");
2851       break;
2852     case ltNI:
2853       if (start) TexOutput("NI");
2854       break;
2855     case ltDASHV:
2856       if (start) TexOutput("DASHV");
2857       break;
2858     case ltPERP:
2859       if (start) TexOutput("PERP");
2860       break;
2861     case ltNEQ:
2862       if (start) TexOutput("NEQ");
2863       break;
2864     case ltDOTEQ:
2865       if (start) TexOutput("DOTEQ");
2866       break;
2867     case ltAPPROX:
2868       if (start) TexOutput("APPROX");
2869       break;
2870     case ltCONG:
2871       if (start) TexOutput("CONG");
2872       break;
2873     case ltEQUIV:
2874       if (start) TexOutput("EQUIV");
2875       break;
2876     case ltPROPTO:
2877       if (start) TexOutput("PROPTO");
2878       break;
2879     case ltPREC:
2880       if (start) TexOutput("PREC");
2881       break;
2882     case ltPRECEQ:
2883       if (start) TexOutput("PRECEQ");
2884       break;
2885     case ltPARALLEL:
2886       if (start) TexOutput("|");
2887       break;
2888     case ltSIM:
2889       if (start) TexOutput("~");
2890       break;
2891     case ltSIMEQ:
2892       if (start) TexOutput("SIMEQ");
2893       break;
2894     case ltASYMP:
2895       if (start) TexOutput("ASYMP");
2896       break;
2897     case ltSMILE:
2898       if (start) TexOutput(":-)");
2899       break;
2900     case ltFROWN:
2901       if (start) TexOutput(":-(");
2902       break;
2903     case ltSUCC:
2904       if (start) TexOutput("SUCC");
2905       break;
2906     case ltSUCCEQ:
2907       if (start) TexOutput("SUCCEQ");
2908       break;
2909     case ltMID:
2910       if (start) TexOutput("|");
2911       break;
2912
2913     // Negated relation symbols
2914     case ltNOTEQ:
2915       if (start) TexOutput("!=");
2916       break;
2917     case ltNOTIN:
2918       if (start) TexOutput("NOTIN");
2919       break;
2920     case ltNOTSUBSET:
2921       if (start) TexOutput("NOTSUBSET");
2922       break;
2923
2924     // Arrows
2925     case ltLEFTARROW:
2926       if (start) TexOutput("<--");
2927       break;
2928     case ltLEFTARROW2:
2929       if (start) TexOutput("<==");
2930       break;
2931     case ltRIGHTARROW:
2932       if (start) TexOutput("-->");
2933       break;
2934     case ltRIGHTARROW2:
2935       if (start) TexOutput("==>");
2936       break;
2937     case ltLEFTRIGHTARROW:
2938       if (start) TexOutput("<-->");
2939       break;
2940     case ltLEFTRIGHTARROW2:
2941       if (start) TexOutput("<==>");
2942       break;
2943     case ltUPARROW:
2944       if (start) TexOutput("UPARROW");
2945       break;
2946     case ltUPARROW2:
2947       if (start) TexOutput("UPARROW2");
2948       break;
2949     case ltDOWNARROW:
2950       if (start) TexOutput("DOWNARROW");
2951       break;
2952     case ltDOWNARROW2:
2953       if (start) TexOutput("DOWNARROW2");
2954       break;
2955     // Miscellaneous symbols
2956     case ltALEPH:
2957       if (start) TexOutput("ALEPH");
2958       break;
2959     case ltWP:
2960       if (start) TexOutput("WP");
2961       break;
2962     case ltRE:
2963       if (start) TexOutput("RE");
2964       break;
2965     case ltIM:
2966       if (start) TexOutput("IM");
2967       break;
2968     case ltEMPTYSET:
2969       if (start) TexOutput("EMPTYSET");
2970       break;
2971     case ltNABLA:
2972       if (start) TexOutput("NABLA");
2973       break;
2974     case ltSURD:
2975       if (start) TexOutput("SURD");
2976       break;
2977     case ltPARTIAL:
2978       if (start) TexOutput("PARTIAL");
2979       break;
2980     case ltBOT:
2981       if (start) TexOutput("BOT");
2982       break;
2983     case ltFORALL:
2984       if (start) TexOutput("FORALL");
2985       break;
2986     case ltEXISTS:
2987       if (start) TexOutput("EXISTS");
2988       break;
2989     case ltNEG:
2990       if (start) TexOutput("NEG");
2991       break;
2992     case ltSHARP:
2993       if (start) TexOutput("SHARP");
2994       break;
2995     case ltANGLE:
2996       if (start) TexOutput("ANGLE");
2997       break;
2998     case ltTRIANGLE:
2999       if (start) TexOutput("TRIANGLE");
3000       break;
3001     case ltCLUBSUIT:
3002       if (start) TexOutput("CLUBSUIT");
3003       break;
3004     case ltDIAMONDSUIT:
3005       if (start) TexOutput("DIAMONDSUIT");
3006       break;
3007     case ltHEARTSUIT:
3008       if (start) TexOutput("HEARTSUIT");
3009       break;
3010     case ltSPADESUIT:
3011       if (start) TexOutput("SPADESUIT");
3012       break;
3013     case ltINFTY:
3014       if (start) TexOutput("INFTY");
3015       break;
3016     case ltPM:
3017       if (start) TexOutput("PM");
3018       break;
3019     case ltMP:
3020       if (start) TexOutput("MP");
3021       break;
3022     case ltTIMES:
3023       if (start) TexOutput("TIMES");
3024       break;
3025     case ltDIV:
3026       if (start) TexOutput("DIV");
3027       break;
3028     case ltCDOT:
3029       if (start) TexOutput("CDOT");
3030       break;
3031     case ltAST:
3032       if (start) TexOutput("AST");
3033       break;
3034     case ltSTAR:
3035       if (start) TexOutput("STAR");
3036       break;
3037     case ltCAP:
3038       if (start) TexOutput("CAP");
3039       break;
3040     case ltCUP:
3041       if (start) TexOutput("CUP");
3042       break;
3043     case ltVEE:
3044       if (start) TexOutput("VEE");
3045       break;
3046     case ltWEDGE:
3047       if (start) TexOutput("WEDGE");
3048       break;
3049     case ltCIRC:
3050       if (start) TexOutput("CIRC");
3051       break;
3052     case ltBULLET:
3053       if (start) TexOutput("BULLET");
3054       break;
3055     case ltDIAMOND:
3056       if (start) TexOutput("DIAMOND");
3057       break;
3058     case ltOSLASH:
3059       if (start) TexOutput("OSLASH");
3060       break;
3061     case ltBOX:
3062       if (start) TexOutput("BOX");
3063       break;
3064     case ltDIAMOND2:
3065       if (start) TexOutput("DIAMOND2");
3066       break;
3067     case ltBIGTRIANGLEDOWN:
3068       if (start) TexOutput("BIGTRIANGLEDOWN");
3069       break;
3070     case ltOPLUS:
3071       if (start) TexOutput("OPLUS");
3072       break;
3073     case ltOTIMES:
3074       if (start) TexOutput("OTIMES");
3075       break;
3076     case ltSS:
3077       if (start) TexOutput("s");
3078       break;
3079     case ltBACKSLASHRAW:
3080       if (start) TexOutput("\\");
3081       break;
3082     case ltLBRACERAW:
3083       if (start) TexOutput("{");
3084       break;
3085     case ltRBRACERAW:
3086       if (start) TexOutput("}");
3087       break;
3088     case ltSMALLSPACE1:
3089     case ltSMALLSPACE2:
3090       if (start) TexOutput(" ");
3091       break;
3092     default:
3093       break;
3094   }
3095 }
3096
3097 // Called on start/end of argument examination
3098 bool DefaultOnArgument(int macroId, int arg_no, bool start)
3099 {
3100   switch (macroId)
3101   {
3102     case ltREF:
3103     {
3104     if (arg_no == 1 && start)
3105     {
3106       char *refName = GetArgData();
3107       if (refName)
3108       {
3109         TexRef *texRef = FindReference(refName);
3110         if (texRef)
3111         {
3112           // Must strip the 'section' or 'chapter' or 'figure' text
3113           // from a normal 'ref' reference
3114           char buf[150];
3115           strcpy(buf, texRef->sectionNumber);
3116           int len = strlen(buf);
3117           int i = 0;
3118           if (strcmp(buf, "??") != 0)
3119           {
3120             while (i < len)
3121             {
3122               if (buf[i] == ' ')
3123               {
3124                 i ++;
3125                 break;
3126               }
3127               else i ++;
3128             }
3129           }
3130           TexOutput(texRef->sectionNumber + i, TRUE);
3131         }
3132         else
3133         {
3134           char buf[300];
3135           TexOutput("??", TRUE);
3136           sprintf(buf, "Warning: unresolved reference %s.", refName);
3137           OnInform(buf);
3138         }
3139       }
3140       else TexOutput("??", TRUE);
3141       return FALSE;
3142     }
3143     break;
3144     }
3145     case ltLABEL:
3146     {
3147       return FALSE;
3148       break;
3149     }
3150     case ltAUTHOR:
3151     {
3152       if (start && (arg_no == 1))
3153         DocumentAuthor = GetArgChunk();
3154       return FALSE;
3155       break;
3156     }
3157     case ltDATE:
3158     {
3159       if (start && (arg_no == 1))
3160         DocumentDate = GetArgChunk();
3161       return FALSE;
3162       break;
3163     }
3164     case ltTITLE:
3165     {
3166       if (start && (arg_no == 1))
3167         DocumentTitle = GetArgChunk();
3168       return FALSE;
3169       break;
3170     }
3171   case ltDOCUMENTCLASS:
3172   case ltDOCUMENTSTYLE:
3173   {
3174     if (start && !IsArgOptional())
3175     {
3176       DocumentStyleString = copystring(GetArgData());
3177       if (strncmp(DocumentStyleString, "art", 3) == 0)
3178         DocumentStyle = LATEX_ARTICLE;
3179       else if (strncmp(DocumentStyleString, "rep", 3) == 0)
3180         DocumentStyle = LATEX_REPORT;
3181       else if (strncmp(DocumentStyleString, "book", 4) == 0 ||
3182                strncmp(DocumentStyleString, "thesis", 6) == 0)
3183         DocumentStyle = LATEX_BOOK;
3184       else if (strncmp(DocumentStyleString, "letter", 6) == 0)
3185         DocumentStyle = LATEX_LETTER;
3186       else if (strncmp(DocumentStyleString, "slides", 6) == 0)
3187         DocumentStyle = LATEX_SLIDES;
3188
3189       if (StringMatch("10", DocumentStyleString))
3190         SetFontSizes(10);
3191       else if (StringMatch("11", DocumentStyleString))
3192         SetFontSizes(11);
3193       else if (StringMatch("12", DocumentStyleString))
3194         SetFontSizes(12);
3195
3196       OnMacro(ltHELPFONTSIZE, 1, TRUE);
3197       sprintf(currentArgData, "%d", normalFont);
3198       haveArgData = TRUE;
3199       OnArgument(ltHELPFONTSIZE, 1, TRUE);
3200       OnArgument(ltHELPFONTSIZE, 1, FALSE);
3201       haveArgData = FALSE;
3202       OnMacro(ltHELPFONTSIZE, 1, FALSE);
3203     }
3204     else if (start && IsArgOptional())
3205     {
3206       MinorDocumentStyleString = copystring(GetArgData());
3207
3208       if (StringMatch("10", MinorDocumentStyleString))
3209         SetFontSizes(10);
3210       else if (StringMatch("11", MinorDocumentStyleString))
3211         SetFontSizes(11);
3212       else if (StringMatch("12", MinorDocumentStyleString))
3213         SetFontSizes(12);
3214     }
3215     return FALSE;
3216     break;
3217   }
3218   case ltBIBLIOGRAPHYSTYLE:
3219   {
3220     if (start && !IsArgOptional())
3221       BibliographyStyleString = copystring(GetArgData());
3222     return FALSE;
3223     break;
3224   }
3225   case ltPAGESTYLE:
3226   {
3227     if (start && !IsArgOptional())
3228     {
3229       if (PageStyle) delete[] PageStyle;
3230       PageStyle = copystring(GetArgData());
3231     }
3232     return FALSE;
3233     break;
3234   }
3235 /*
3236   case ltLHEAD:
3237   {
3238     if (start && !IsArgOptional())
3239       LeftHeader = GetArgChunk();
3240     return FALSE;
3241     break;
3242   }
3243   case ltLFOOT:
3244   {
3245     if (start && !IsArgOptional())
3246       LeftFooter = GetArgChunk();
3247     return FALSE;
3248     break;
3249   }
3250   case ltCHEAD:
3251   {
3252     if (start && !IsArgOptional())
3253       CentreHeader = GetArgChunk();
3254     return FALSE;
3255     break;
3256   }
3257   case ltCFOOT:
3258   {
3259     if (start && !IsArgOptional())
3260       CentreFooter = GetArgChunk();
3261     return FALSE;
3262     break;
3263   }
3264   case ltRHEAD:
3265   {
3266     if (start && !IsArgOptional())
3267       RightHeader = GetArgChunk();
3268     return FALSE;
3269     break;
3270   }
3271   case ltRFOOT:
3272   {
3273     if (start && !IsArgOptional())
3274       RightFooter = GetArgChunk();
3275     return FALSE;
3276     break;
3277   }
3278 */
3279   case ltCITE:
3280   case ltSHORTCITE:
3281   {
3282     if (start && !IsArgOptional())
3283     {
3284       char *citeKeys = GetArgData();
3285       int pos = 0;
3286       char *citeKey = ParseMultifieldString(citeKeys, &pos);
3287       while (citeKey)
3288       {
3289         AddCitation(citeKey);
3290         TexRef *ref = FindReference(citeKey);
3291         if (ref)
3292         {
3293           TexOutput(ref->sectionNumber, TRUE);
3294           if (strcmp(ref->sectionNumber, "??") == 0)
3295           {
3296             char buf[300];
3297             sprintf(buf, "Warning: unresolved citation %s.", citeKey);
3298             OnInform(buf);
3299           }
3300         }
3301         citeKey = ParseMultifieldString(citeKeys, &pos);
3302         if (citeKey)
3303         {
3304           TexOutput(", ", TRUE);
3305         }
3306       }
3307       return FALSE;
3308     }
3309     break;
3310   }
3311   case ltNOCITE:
3312   {
3313     if (start && !IsArgOptional())
3314     {
3315       char *citeKey = GetArgData();
3316       AddCitation(citeKey);
3317       return FALSE;
3318     }
3319     break;
3320   }
3321   case ltHELPFONTSIZE:
3322   {
3323     if (start)
3324     {
3325       char *data = GetArgData();
3326       if (strcmp(data, "10") == 0)
3327         SetFontSizes(10);
3328       else if (strcmp(data, "11") == 0)
3329         SetFontSizes(11);
3330       else if (strcmp(data, "12") == 0)
3331         SetFontSizes(12);
3332       return FALSE;
3333     }
3334     break;
3335   }
3336   case ltPAGEREF:
3337   {
3338     if (start)
3339     {
3340       TexOutput(" ??", TRUE);
3341       return FALSE;
3342     }
3343     break;
3344   }
3345   case ltPARSKIP:
3346   {
3347     if (start && arg_no == 1)
3348     {
3349       char *data = GetArgData();
3350       ParSkip = ParseUnitArgument(data);
3351       return FALSE;
3352     }
3353     break;
3354   }
3355   case ltPARINDENT:
3356   {
3357     if (start && arg_no == 1)
3358     {
3359       char *data = GetArgData();
3360       ParIndent = ParseUnitArgument(data);
3361       return FALSE;
3362     }
3363     break;
3364   }
3365   case ltSL:
3366   {
3367     return OnArgument(ltIT, arg_no, start);
3368     break;
3369   }
3370   case ltSPECIALDOUBLEDOLLAR:
3371   {
3372     return OnArgument(ltCENTER, arg_no, start);
3373     break;
3374   }
3375   case ltPARAGRAPH:
3376   case ltPARAGRAPHSTAR:
3377   case ltSUBPARAGRAPH:
3378   case ltSUBPARAGRAPHSTAR:
3379   {
3380     return OnArgument(ltSUBSUBSECTION, arg_no, start);
3381     break;
3382   }
3383   case ltTYPEOUT:
3384   {
3385     if (start)
3386       OnInform(GetArgData());
3387     break;
3388   }
3389   case ltFOOTNOTE:
3390   {
3391     if (start)
3392       TexOutput(" (", TRUE);
3393     else
3394       TexOutput(")", TRUE);
3395     break;
3396   }
3397   case ltBIBLIOGRAPHY:
3398   {
3399     if (start)
3400     {
3401       FILE *fd;
3402       int ch;
3403       char smallBuf[2];
3404       smallBuf[1] = 0;
3405       if ((fd = fopen(TexBibName, "r")))
3406       {
3407         ch = getc(fd);
3408         smallBuf[0] = ch;
3409         while (ch != EOF)
3410         {
3411           TexOutput(smallBuf);
3412           ch = getc(fd);
3413           smallBuf[0] = ch;
3414         }
3415         fclose(fd);
3416       }
3417       else
3418       {
3419         OnInform("Run Tex2RTF again to include bibliography.");
3420       }
3421
3422       // Read in the .bib file, resolve all known references, write out the RTF.
3423       char *allFiles = GetArgData();
3424       int pos = 0;
3425       char *bibFile = ParseMultifieldString(allFiles, &pos);
3426       while (bibFile)
3427       {
3428         char fileBuf[300];
3429         strcpy(fileBuf, bibFile);
3430         wxString actualFile = TexPathList.FindValidPath(fileBuf);
3431         if (actualFile == "")
3432         {
3433           strcat(fileBuf, ".bib");
3434           actualFile = TexPathList.FindValidPath(fileBuf);
3435         }
3436         if (actualFile != "")
3437         {
3438           if (!ReadBib((char*) (const char*) actualFile))
3439           {
3440             wxString errBuf;
3441             errBuf.Printf(".bib file %s not found or malformed", (const char*) actualFile);
3442             OnError((char *)errBuf.c_str());
3443           }
3444         }
3445         else
3446         {
3447           wxString errBuf;
3448           errBuf.Printf(".bib file %s not found", fileBuf);
3449           OnError((char *)errBuf.c_str());
3450         }
3451         bibFile = ParseMultifieldString(allFiles, &pos);
3452       }
3453
3454       ResolveBibReferences();
3455
3456       // Write it a new bib section in the appropriate format.
3457       FILE *save1 = CurrentOutput1;
3458       FILE *save2 = CurrentOutput2;
3459       FILE *Biblio = fopen(TexTmpBibName, "w");
3460       SetCurrentOutput(Biblio);
3461       OutputBib();
3462       fclose(Biblio);
3463       if (wxFileExists(TexTmpBibName))
3464       {
3465         if (wxFileExists(TexBibName)) wxRemoveFile(TexBibName);
3466         wxRenameFile(TexTmpBibName, TexBibName);
3467       }
3468       SetCurrentOutputs(save1, save2);
3469       return FALSE;
3470     }
3471     break;
3472   }
3473   case ltMULTICOLUMN:
3474   {
3475     if (start && (arg_no == 3))
3476       return TRUE;
3477     else
3478       return FALSE;
3479     break;
3480   }
3481   case ltSCSHAPE:
3482   case ltTEXTSC:
3483   case ltSC:
3484   {
3485     if (start && (arg_no == 1))
3486     {
3487       char *s = GetArgData();
3488       if (s)
3489       {
3490         char *s1 = copystring(s);
3491         int i;
3492         for (i = 0; i < (int)strlen(s); i++)
3493           s1[i] = toupper(s[i]);
3494         TexOutput(s1);
3495         delete[] s1;
3496         return FALSE;
3497       }
3498       else return TRUE;
3499
3500     }
3501     return TRUE;
3502     break;
3503   }
3504   case ltLOWERCASE:
3505   {
3506     if (start && (arg_no == 1))
3507     {
3508       char *s = GetArgData();
3509       if (s)
3510       {
3511         char *s1 = copystring(s);
3512         int i;
3513         for (i = 0; i < (int)strlen(s); i++)
3514           s1[i] = tolower(s[i]);
3515         TexOutput(s1);
3516         delete[] s1;
3517         return FALSE;
3518       }
3519       else return TRUE;
3520
3521     }
3522     return TRUE;
3523     break;
3524   }
3525   case ltUPPERCASE:
3526   {
3527     if (start && (arg_no == 1))
3528     {
3529       char *s = GetArgData();
3530       if (s)
3531       {
3532         char *s1 = copystring(s);
3533         int i;
3534         for (i = 0; i < (int)strlen(s); i++)
3535           s1[i] = toupper(s[i]);
3536         TexOutput(s1);
3537         delete[] s1;
3538         return FALSE;
3539       }
3540       else return TRUE;
3541
3542     }
3543     return TRUE;
3544     break;
3545   }
3546   case ltPOPREF:  // Ignore second argument by default
3547   {
3548     if (start && (arg_no == 1))
3549       return TRUE;
3550     else
3551       return FALSE;
3552     break;
3553   }
3554   case ltTWOCOLUMN:
3555     return TRUE;
3556     break;
3557   case ltXLPIGNORE:
3558     return ((convertMode == TEX_XLP) ? FALSE : TRUE);
3559     break;
3560   case ltXLPONLY:
3561     return ((convertMode != TEX_XLP) ? FALSE : TRUE);
3562     break;
3563   case ltHTMLIGNORE:
3564     return ((convertMode == TEX_HTML) ? FALSE : TRUE);
3565     break;
3566   case ltHTMLONLY:
3567     return ((convertMode != TEX_HTML) ? FALSE : TRUE);
3568     break;
3569   case ltRTFIGNORE:
3570     return (((convertMode == TEX_RTF) && !winHelp) ? FALSE : TRUE);
3571     break;
3572   case ltRTFONLY:
3573     return (!((convertMode == TEX_RTF) && !winHelp) ? FALSE : TRUE);
3574     break;
3575   case ltWINHELPIGNORE:
3576     return (winHelp ? FALSE : TRUE);
3577     break;
3578   case ltWINHELPONLY:
3579     return (!winHelp ? FALSE : TRUE);
3580     break;
3581   case ltLATEXIGNORE:
3582     return TRUE;
3583     break;
3584   case ltLATEXONLY:
3585     return FALSE;
3586     break;
3587   case ltCLINE:
3588   case ltARABIC:
3589   case ltALPH1:
3590   case ltALPH2:
3591   case ltROMAN:
3592   case ltROMAN2:
3593   case ltSETCOUNTER:
3594   case ltADDTOCOUNTER:
3595   case ltADDCONTENTSLINE:
3596   case ltNEWCOUNTER:
3597   case ltTEXTWIDTH:
3598   case ltTEXTHEIGHT:
3599   case ltBASELINESKIP:
3600   case ltVSPACESTAR:
3601   case ltHSPACESTAR:
3602   case ltVSPACE:
3603   case ltHSPACE:
3604   case ltVSKIPSTAR:
3605   case ltHSKIPSTAR:
3606   case ltVSKIP:
3607   case ltHSKIP:
3608   case ltPAGENUMBERING:
3609   case ltTHEPAGE:
3610   case ltTHECHAPTER:
3611   case ltTHESECTION:
3612   case ltITEMSEP:
3613   case ltFANCYPLAIN:
3614   case ltCHEAD:
3615   case ltRHEAD:
3616   case ltLHEAD:
3617   case ltCFOOT:
3618   case ltRFOOT:
3619   case ltLFOOT:
3620   case ltTHISPAGESTYLE:
3621   case ltMARKRIGHT:
3622   case ltMARKBOTH:
3623   case ltEVENSIDEMARGIN:
3624   case ltODDSIDEMARGIN:
3625   case ltMARGINPAR:
3626   case ltMARGINPARWIDTH:
3627   case ltMARGINPARSEP:
3628   case ltMARGINPAREVEN:
3629   case ltMARGINPARODD:
3630   case ltTWOCOLWIDTHA:
3631   case ltTWOCOLWIDTHB:
3632   case ltTWOCOLSPACING:
3633   case ltSETHEADER:
3634   case ltSETFOOTER:
3635   case ltINDEX:
3636   case ltITEM:
3637   case ltBCOL:
3638   case ltFCOL:
3639   case ltSETHOTSPOTCOLOUR:
3640   case ltSETHOTSPOTCOLOR:
3641   case ltSETHOTSPOTUNDERLINE:
3642   case ltSETTRANSPARENCY:
3643   case ltUSEPACKAGE:
3644   case ltBACKGROUND:
3645   case ltBACKGROUNDCOLOUR:
3646   case ltBACKGROUNDIMAGE:
3647   case ltLINKCOLOUR:
3648   case ltFOLLOWEDLINKCOLOUR:
3649   case ltTEXTCOLOUR:
3650   case ltIMAGE:
3651   case ltIMAGEMAP:
3652   case ltIMAGEL:
3653   case ltIMAGER:
3654   case ltPOPREFONLY:
3655   case ltINSERTATLEVEL:
3656     return FALSE;
3657     break;
3658   case ltTABULAR:
3659   case ltSUPERTABULAR:
3660   {
3661     if (arg_no == 2)
3662       return TRUE;
3663     else return FALSE;
3664     break;
3665   }
3666   case ltINDENTED:
3667   {
3668     if (arg_no == 2) return TRUE;
3669     else return FALSE;
3670     break;
3671   }
3672   case ltSIZEDBOX:
3673   case ltSIZEDBOXD:
3674   {
3675     if (arg_no == 2) return TRUE;
3676     else return FALSE;
3677     break;
3678   }
3679   case ltDEFINECOLOUR:
3680   case ltDEFINECOLOR:
3681   {
3682     static int redVal = 0;
3683     static int greenVal = 0;
3684     static int blueVal = 0;
3685     static char *colourName = NULL;
3686     if (start)
3687     {
3688       switch (arg_no)
3689       {
3690         case 1:
3691         {
3692           if (colourName) delete[] colourName;
3693           colourName = copystring(GetArgData());
3694           break;
3695         }
3696         case 2:
3697         {
3698           redVal = atoi(GetArgData());
3699           break;
3700         }
3701         case 3:
3702         {
3703           greenVal = atoi(GetArgData());
3704           break;
3705         }
3706         case 4:
3707         {
3708           blueVal = atoi(GetArgData());
3709           AddColour(colourName, redVal, greenVal, blueVal);
3710           break;
3711         }
3712         default:
3713           break;
3714       }
3715     }
3716     return FALSE;
3717     break;
3718   }
3719   case ltFIGURE:
3720   case ltFIGURESTAR:
3721   case ltNORMALBOX:
3722   case ltNORMALBOXD:
3723   default:
3724   {
3725     if (IsArgOptional())
3726       return FALSE;
3727     else
3728       return TRUE;
3729     break;
3730   }
3731   }
3732   return TRUE;
3733 }
3734