src/tex2lyx/Preamble.cpp

   1 /**
   2  * \file Preamble.cpp
   3  * This file is part of LyX, the document processor.
   4  * Licence details can be found in the file COPYING.
   5  *
   6  * \author André Pönitz
   7  * \author Uwe Stöhr
   8  *
   9  * Full author contact details are available in file CREDITS.
  10  */
  11
  12 // {[(
  13
  14 #include <config.h>
  15
  16 #include "Preamble.h"
  17 #include "tex2lyx.h"
  18
  19 #include "LayoutFile.h"
  20 #include "Layout.h"
  21 #include "Lexer.h"
  22 #include "TextClass.h"
  23
  24 #include "support/convert.h"
  25 #include "support/FileName.h"
  26 #include "support/filetools.h"
  27 #include "support/lstrings.h"
  28
  29 #include "support/regex.h"
  30
  31 #include <algorithm>
  32 #include <iostream>
  33
  34 using namespace std;
  35 using namespace lyx::support;
  36
  37
  38 namespace lyx {
  39
  40 // special columntypes
  41 extern map<char, int> special_columns;
  42
  43 Preamble preamble;
  44
  45 namespace {
  46
  47 //add this to known_languages when updating to lyxformat 266:
  48 // "armenian" (needs special handling since not supported by standard babel)
  49 //add these to known_languages when updating to lyxformat 268:
  50 //"chinese-simplified", "chinese-traditional", "japanese", "korean"
  51 // Both changes require first that support for non-babel languages (CJK,
  52 // armtex) is added.
  53 /**
  54  * known babel language names (including synonyms)
  55  * not in standard babel: arabic, arabtex, armenian, belarusian, serbian-latin, thai
  56  * not yet supported by LyX: kurmanji
  57  * please keep this in sync with known_coded_languages line by line!
  58  */
  59 const char * const known_languages[] = {"acadian", "afrikaans", "albanian",
  60 "american", "arabic", "arabtex", "austrian", "bahasa", "bahasai", "bahasam",
  61 "basque", "belarusian", "brazil", "brazilian", "breton", "british", "bulgarian",
  62 "canadian", "canadien", "catalan", "croatian", "czech", "danish", "dutch",
  63 "english", "esperanto", "estonian", "farsi", "finnish", "francais", "french",
  64 "frenchb", "frenchle", "frenchpro", "galician", "german", "germanb", "greek",
  65 "hebrew", "hungarian", "icelandic", "indon", "indonesian", "interlingua",
  66 "irish", "italian", "kazakh", "latin", "latvian", "lithuanian", "lowersorbian",
  67 "lsorbian", "magyar", "malay", "meyalu", "mongolian", "naustrian", "newzealand",
  68 "ngerman", "ngermanb", "norsk", "nynorsk", "polutonikogreek", "polish",
  69 "portuges", "portuguese", "romanian", "russian", "russianb", "samin",
  70 "scottish", "serbian", "serbian-latin", "slovak", "slovene", "spanish",
  71 "swedish", "thai", "turkish", "turkmen", "ukraineb", "ukrainian",
  72 "uppersorbian", "UKenglish", "USenglish", "usorbian", "vietnam", "welsh",
  73 0};
  74
  75 /**
  76  * the same as known_languages with .lyx names
  77  * please keep this in sync with known_languages line by line!
  78  */
  79 const char * const known_coded_languages[] = {"french", "afrikaans", "albanian",
  80 "american", "arabic_arabi", "arabic_arabtex", "austrian", "bahasa", "bahasa", "bahasam",
  81 "basque", "belarusian", "brazilian", "brazilian", "breton", "british", "bulgarian",
  82 "canadian", "canadien", "catalan", "croatian", "czech", "danish", "dutch",
  83 "english", "esperanto", "estonian", "farsi", "finnish", "french", "french",
  84 "french", "french", "french", "galician", "german", "german", "greek",
  85 "hebrew", "magyar", "icelandic", "bahasa", "bahasa", "interlingua",
  86 "irish", "italian", "kazakh", "latin", "latvian", "lithuanian", "lowersorbian",
  87 "lowersorbian", "magyar", "bahasam", "bahasam", "mongolian", "naustrian", "english",
  88 "ngerman", "ngerman", "norsk", "nynorsk", "polutonikogreek", "polish",
  89 "portuguese", "portuguese", "romanian", "russian", "russian", "samin",
  90 "scottish", "serbian", "serbian-latin", "slovak", "slovene", "spanish",
  91 "swedish", "thai", "turkish", "turkmen", "ukrainian", "ukrainian",
  92 "uppersorbian", "uppersorbian", "english", "english", "vietnamese", "welsh",
  93 0};
  94
  95 /// languages with english quotes (.lyx names)
  96 const char * const known_english_quotes_languages[] = {"american", "bahasa",
  97 "bahasam", "brazilian", "canadian", "chinese-simplified", "english",
  98 "esperanto", "hebrew", "irish", "korean", "portuguese", "scottish", "thai", 0};
  99
 100 /// languages with french quotes (.lyx names)
 101 const char * const known_french_quotes_languages[] = {"albanian",
 102 "arabic_arabi", "arabic_arabtex", "basque", "canadien", "catalan", "french",
 103 "galician", "greek", "italian", "norsk", "nynorsk", "polutonikogreek",
 104 "russian", "spanish", "spanish-mexico", "turkish", "turkmen", "ukrainian",
 105 "vietnamese", 0};
 106
 107 /// languages with german quotes (.lyx names)
 108 const char * const known_german_quotes_languages[] = {"austrian", "bulgarian",
 109 "czech", "german", "icelandic", "lithuanian", "lowersorbian", "naustrian",
 110 "ngerman", "serbian", "serbian-latin", "slovak", "slovene", "uppersorbian", 0};
 111
 112 /// languages with polish quotes (.lyx names)
 113 const char * const known_polish_quotes_languages[] = {"afrikaans", "croatian",
 114 "dutch", "estonian", "magyar", "polish", "romanian", 0};
 115
 116 /// languages with swedish quotes (.lyx names)
 117 const char * const known_swedish_quotes_languages[] = {"finnish",
 118 "swedish", 0};
 119
 120 /// known language packages from the times before babel
 121 const char * const known_old_language_packages[] = {"french", "frenchle",
 122 "frenchpro", "german", "ngerman", "pmfrench", 0};
 123
 124 char const * const known_fontsizes[] = { "10pt", "11pt", "12pt", 0 };
 125
 126 const char * const known_roman_fonts[] = { "ae", "beraserif", "bookman",
 127 "ccfonts", "chancery", "charter", "cmr", "fourier", "lmodern", "mathpazo",
 128 "mathptmx", "newcent", "utopia", 0};
 129
 130 const char * const known_sans_fonts[] = { "avant", "berasans", "cmbr", "cmss",
 131 "helvet", "lmss", 0};
 132
 133 const char * const known_typewriter_fonts[] = { "beramono", "cmtl", "cmtt",
 134 "courier", "lmtt", "luximono", "fourier", "lmodern", "mathpazo", "mathptmx",
 135 "newcent", 0};
 136
 137 const char * const known_paper_sizes[] = { "a0paper", "b0paper", "c0paper",
 138 "a1paper", "b1paper", "c1paper", "a2paper", "b2paper", "c2paper", "a3paper",
 139 "b3paper", "c3paper", "a4paper", "b4paper", "c4paper", "a5paper", "b5paper",
 140 "c5paper", "a6paper", "b6paper", "c6paper", "executivepaper", "legalpaper",
 141 "letterpaper", "b0j", "b1j", "b2j", "b3j", "b4j", "b5j", "b6j", 0};
 142
 143 const char * const known_class_paper_sizes[] = { "a4paper", "a5paper",
 144 "executivepaper", "legalpaper", "letterpaper", 0};
 145
 146 const char * const known_paper_margins[] = { "lmargin", "tmargin", "rmargin",
 147 "bmargin", "headheight", "headsep", "footskip", "columnsep", 0};
 148
 149 const char * const known_coded_paper_margins[] = { "leftmargin", "topmargin",
 150 "rightmargin", "bottommargin", "headheight", "headsep", "footskip",
 151 "columnsep", 0};
 152
 153 /// commands that can start an \if...\else...\endif sequence
 154 const char * const known_if_commands[] = {"if", "ifarydshln", "ifbraket",
 155 "ifcancel", "ifcolortbl", "ifeurosym", "ifmarginnote", "ifmmode", "ifpdf",
 156 "ifsidecap", "ifupgreek", 0};
 157
 158 const char * const known_basic_colors[] = {"blue", "black", "cyan", "green",
 159 "magenta", "red", "white", "yellow", 0};
 160
 161 const char * const known_basic_color_codes[] = {"#0000ff", "#000000", "#00ffff", "#00ff00",
 162 "#ff00ff", "#ff0000", "#ffffff", "#ffff00", 0};
 163
 164 /// conditional commands with three arguments like \@ifundefined{}{}{}
 165 const char * const known_if_3arg_commands[] = {"@ifundefined", "IfFileExists",
 166 0};
 167
 168 // codes used to remove packages that are loaded automatically by LyX.
 169 // Syntax: package_beg_sep<name>package_mid_sep<package loading code>package_end_sep
 170 const char package_beg_sep = '\001';
 171 const char package_mid_sep = '\002';
 172 const char package_end_sep = '\003';
 173
 174
 175 // returns true if at least one of the options in what has been found
 176 bool handle_opt(vector<string> & opts, char const * const * what, string & target)
 177 {
 178         if (opts.empty())
 179                 return false;
 180
 181         bool found = false;
 182         // the last language option is the document language (for babel and LyX)
 183         // the last size option is the document font size
 184         vector<string>::iterator it;
 185         vector<string>::iterator position = opts.begin();
 186         for (; *what; ++what) {
 187                 it = find(opts.begin(), opts.end(), *what);
 188                 if (it != opts.end()) {
 189                         if (it >= position) {
 190                                 found = true;
 191                                 target = *what;
 192                                 position = it;
 193                         }
 194                 }
 195         }
 196         return found;
 197 }
 198
 199
 200 void delete_opt(vector<string> & opts, char const * const * what)
 201 {
 202         if (opts.empty())
 203                 return;
 204
 205         // remove found options from the list
 206         // do this after handle_opt to avoid potential memory leaks
 207         vector<string>::iterator it;
 208         for (; *what; ++what) {
 209                 it = find(opts.begin(), opts.end(), *what);
 210                 if (it != opts.end())
 211                         opts.erase(it);
 212         }
 213 }
 214
 215
 216 /*!
 217  * Split a package options string (keyval format) into a vector.
 218  * Example input:
 219  *   authorformat=smallcaps,
 220  *   commabeforerest,
 221  *   titleformat=colonsep,
 222  *   bibformat={tabular,ibidem,numbered}
 223  */
 224 vector<string> split_options(string const & input)
 225 {
 226         vector<string> options;
 227         string option;
 228         Parser p(input);
 229         while (p.good()) {
 230                 Token const & t = p.get_token();
 231                 if (t.asInput() == ",") {
 232                         options.push_back(trimSpaceAndEol(option));
 233                         option.erase();
 234                 } else if (t.asInput() == "=") {
 235                         option += '=';
 236                         p.skip_spaces(true);
 237                         if (p.next_token().asInput() == "{")
 238                                 option += '{' + p.getArg('{', '}') + '}';
 239                 } else if (t.cat() != catSpace)
 240                         option += t.asInput();
 241         }
 242
 243         if (!option.empty())
 244                 options.push_back(trimSpaceAndEol(option));
 245
 246         return options;
 247 }
 248
 249
 250 /*!
 251  * Retrieve a keyval option "name={value with=sign}" named \p name from
 252  * \p options and return the value.
 253  * The found option is also removed from \p options.
 254  */
 255 string process_keyval_opt(vector<string> & options, string name)
 256 {
 257         for (size_t i = 0; i < options.size(); ++i) {
 258                 vector<string> option;
 259                 split(options[i], option, '=');
 260                 if (option.size() < 2)
 261                         continue;
 262                 if (option[0] == name) {
 263                         options.erase(options.begin() + i);
 264                         option.erase(option.begin());
 265                         return join(option, "=");
 266                 }
 267         }
 268         return "";
 269 }
 270
 271 } // anonymous namespace
 272
 273
 274 bool Preamble::indentParagraphs() const
 275 {
 276         return h_paragraph_separation == "indent";
 277 }
 278
 279
 280 bool Preamble::isPackageUsed(string const & package) const
 281 {
 282         return used_packages.find(package) != used_packages.end();
 283 }
 284
 285
 286 vector<string> Preamble::getPackageOptions(string const & package) const
 287 {
 288         map<string, vector<string> >::const_iterator it = used_packages.find(package);
 289         if (it != used_packages.end())
 290                 return it->second;
 291         return vector<string>();
 292 }
 293
 294
 295 void Preamble::registerAutomaticallyLoadedPackage(std::string const & package)
 296 {
 297         auto_packages.insert(package);
 298 }
 299
 300
 301 void Preamble::addModule(string const & module)
 302 {
 303         used_modules.push_back(module);
 304 }
 305
 306
 307 void Preamble::suppressDate(bool suppress)
 308 {
 309         if (suppress)
 310                 h_suppress_date = "true";
 311         else
 312                 h_suppress_date = "false";
 313 }
 314
 315
 316 void Preamble::add_package(string const & name, vector<string> & options)
 317 {
 318         // every package inherits the global options
 319         if (used_packages.find(name) == used_packages.end())
 320                 used_packages[name] = split_options(h_options);
 321
 322         vector<string> & v = used_packages[name];
 323         v.insert(v.end(), options.begin(), options.end());
 324         if (name == "jurabib") {
 325                 // Don't output the order argument (see the cite command
 326                 // handling code in text.cpp).
 327                 vector<string>::iterator end =
 328                         remove(options.begin(), options.end(), "natbiborder");
 329                 end = remove(options.begin(), end, "jurabiborder");
 330                 options.erase(end, options.end());
 331         }
 332 }
 333
 334
 335 namespace {
 336
 337 // Given is a string like "scaled=0.9", return 0.9 * 100
 338 string const scale_as_percentage(string const & scale)
 339 {
 340         string::size_type pos = scale.find('=');
 341         if (pos != string::npos) {
 342                 string value = scale.substr(pos + 1);
 343                 if (isStrDbl(value))
 344                         return convert<string>(100 * convert<double>(value));
 345         }
 346         // If the input string didn't match our expectations.
 347         // return the default value "100"
 348         return "100";
 349 }
 350
 351
 352 string remove_braces(string const & value)
 353 {
 354         if (value.empty())
 355                 return value;
 356         if (value[0] == '{' && value[value.length()-1] == '}')
 357                 return value.substr(1, value.length()-2);
 358         return value;
 359 }
 360
 361 } // anonymous namespace
 362
 363
 364 Preamble::Preamble() : one_language(true)
 365 {
 366         //h_backgroundcolor;
 367         //h_boxbgcolor;
 368         h_cite_engine             = "basic";
 369         h_defskip                 = "medskip";
 370         //h_float_placement;
 371         //h_fontcolor;
 372         h_fontencoding            = "default";
 373         h_font_roman              = "default";
 374         h_font_sans               = "default";
 375         h_font_typewriter         = "default";
 376         h_font_default_family     = "default";
 377         h_font_sc                 = "false";
 378         h_font_osf                = "false";
 379         h_font_sf_scale           = "100";
 380         h_font_tt_scale           = "100";
 381         h_graphics                = "default";
 382         h_html_be_strict          = "false";
 383         h_html_css_as_file        = "0";
 384         h_html_math_output        = "0";
 385         h_inputencoding           = "auto";
 386         h_language                = "english";
 387         h_language_package        = "none";
 388         //h_listings_params;
 389         //h_margins;
 390         //h_notefontcolor;
 391         //h_options;
 392         h_output_changes          = "false";
 393         h_papercolumns            = "1";
 394         h_paperfontsize           = "default";
 395         h_paperorientation        = "portrait";
 396         h_paperpagestyle          = "default";
 397         //h_papersides;
 398         h_papersize               = "default";
 399         h_paragraph_indentation   = "default";
 400         h_paragraph_separation    = "indent";
 401         //h_pdf_title;
 402         //h_pdf_author;
 403         //h_pdf_subject;
 404         //h_pdf_keywords;
 405         h_pdf_bookmarks           = "1";
 406         h_pdf_bookmarksnumbered   = "0";
 407         h_pdf_bookmarksopen       = "0";
 408         h_pdf_bookmarksopenlevel  = "1";
 409         h_pdf_breaklinks          = "0";
 410         h_pdf_pdfborder           = "0";
 411         h_pdf_colorlinks          = "0";
 412         h_pdf_backref             = "section";
 413         h_pdf_pdfusetitle         = "1";
 414         //h_pdf_pagemode;
 415         //h_pdf_quoted_options;
 416         h_quotes_language         = "english";
 417         h_secnumdepth             = "3";
 418         h_spacing                 = "single";
 419         h_suppress_date           = "false";
 420         h_textclass               = "article";
 421         h_tocdepth                = "3";
 422         h_tracking_changes        = "false";
 423         h_use_bibtopic            = "false";
 424         h_use_geometry            = "false";
 425         h_use_amsmath             = "1";
 426         h_use_default_options     = "false";
 427         h_use_esint               = "1";
 428         h_use_hyperref            = "0";
 429         h_use_mhchem              = "0";
 430         h_use_mathdots            = "0";
 431         h_use_refstyle            = "0";
 432         h_use_undertilde          = "0";
 433 }
 434
 435
 436 void Preamble::handle_hyperref(vector<string> & options)
 437 {
 438         // FIXME swallow inputencoding changes that might surround the
 439         //       hyperref setup if it was written by LyX
 440         h_use_hyperref = "1";
 441         // swallow "unicode=true", since LyX does always write that
 442         vector<string>::iterator it =
 443                 find(options.begin(), options.end(), "unicode=true");
 444         if (it != options.end())
 445                 options.erase(it);
 446         it = find(options.begin(), options.end(), "pdfusetitle");
 447         if (it != options.end()) {
 448                 h_pdf_pdfusetitle = "1";
 449                 options.erase(it);
 450         }
 451         string bookmarks = process_keyval_opt(options, "bookmarks");
 452         if (bookmarks == "true")
 453                 h_pdf_bookmarks = "1";
 454         else if (bookmarks == "false")
 455                 h_pdf_bookmarks = "0";
 456         if (h_pdf_bookmarks == "1") {
 457                 string bookmarksnumbered =
 458                         process_keyval_opt(options, "bookmarksnumbered");
 459                 if (bookmarksnumbered == "true")
 460                         h_pdf_bookmarksnumbered = "1";
 461                 else if (bookmarksnumbered == "false")
 462                         h_pdf_bookmarksnumbered = "0";
 463                 string bookmarksopen =
 464                         process_keyval_opt(options, "bookmarksopen");
 465                 if (bookmarksopen == "true")
 466                         h_pdf_bookmarksopen = "1";
 467                 else if (bookmarksopen == "false")
 468                         h_pdf_bookmarksopen = "0";
 469                 if (h_pdf_bookmarksopen == "1") {
 470                         string bookmarksopenlevel =
 471                                 process_keyval_opt(options, "bookmarksopenlevel");
 472                         if (!bookmarksopenlevel.empty())
 473                                 h_pdf_bookmarksopenlevel = bookmarksopenlevel;
 474                 }
 475         }
 476         string breaklinks = process_keyval_opt(options, "breaklinks");
 477         if (breaklinks == "true")
 478                 h_pdf_breaklinks = "1";
 479         else if (breaklinks == "false")
 480                 h_pdf_breaklinks = "0";
 481         string pdfborder = process_keyval_opt(options, "pdfborder");
 482         if (pdfborder == "{0 0 0}")
 483                 h_pdf_pdfborder = "1";
 484         else if (pdfborder == "{0 0 1}")
 485                 h_pdf_pdfborder = "0";
 486         string backref = process_keyval_opt(options, "backref");
 487         if (!backref.empty())
 488                 h_pdf_backref = backref;
 489         string colorlinks = process_keyval_opt(options, "colorlinks");
 490         if (colorlinks == "true")
 491                 h_pdf_colorlinks = "1";
 492         else if (colorlinks == "false")
 493                 h_pdf_colorlinks = "0";
 494         string pdfpagemode = process_keyval_opt(options, "pdfpagemode");
 495         if (!pdfpagemode.empty())
 496                 h_pdf_pagemode = pdfpagemode;
 497         string pdftitle = process_keyval_opt(options, "pdftitle");
 498         if (!pdftitle.empty()) {
 499                 h_pdf_title = remove_braces(pdftitle);
 500         }
 501         string pdfauthor = process_keyval_opt(options, "pdfauthor");
 502         if (!pdfauthor.empty()) {
 503                 h_pdf_author = remove_braces(pdfauthor);
 504         }
 505         string pdfsubject = process_keyval_opt(options, "pdfsubject");
 506         if (!pdfsubject.empty())
 507                 h_pdf_subject = remove_braces(pdfsubject);
 508         string pdfkeywords = process_keyval_opt(options, "pdfkeywords");
 509         if (!pdfkeywords.empty())
 510                 h_pdf_keywords = remove_braces(pdfkeywords);
 511         if (!options.empty()) {
 512                 if (!h_pdf_quoted_options.empty())
 513                         h_pdf_quoted_options += ',';
 514                 h_pdf_quoted_options += join(options, ",");
 515                 options.clear();
 516         }
 517 }
 518
 519
 520 void Preamble::handle_package(Parser &p, string const & name,
 521                               string const & opts, bool in_lyx_preamble)
 522 {
 523         vector<string> options = split_options(opts);
 524         add_package(name, options);
 525         string scale;
 526
 527         // roman fonts
 528         if (is_known(name, known_roman_fonts)) {
 529                 h_font_roman = name;
 530                 p.skip_spaces();
 531         }
 532
 533         if (name == "fourier") {
 534                 h_font_roman = "utopia";
 535                 // when font uses real small capitals
 536                 if (opts == "expert")
 537                         h_font_sc = "true";
 538         }
 539
 540         if (name == "mathpazo")
 541                 h_font_roman = "palatino";
 542
 543         if (name == "mathptmx")
 544                 h_font_roman = "times";
 545
 546         // sansserif fonts
 547         if (is_known(name, known_sans_fonts)) {
 548                 h_font_sans = name;
 549                 if (!opts.empty()) {
 550                         scale = opts;
 551                         h_font_sf_scale = scale_as_percentage(scale);
 552                 }
 553         }
 554
 555         // typewriter fonts
 556         if (is_known(name, known_typewriter_fonts)) {
 557                 // fourier can be set as roman font _only_
 558                 // fourier as typewriter is handled in handling of \ttdefault
 559                 if (name != "fourier") {
 560                         h_font_typewriter = name;
 561                         if (!opts.empty()) {
 562                                 scale = opts;
 563                                 h_font_tt_scale = scale_as_percentage(scale);
 564                         }
 565                 }
 566         }
 567
 568         // font uses old-style figure
 569         if (name == "eco")
 570                 h_font_osf = "true";
 571
 572         // after the detection and handling of special cases, we can remove the
 573         // fonts, otherwise they would appear in the preamble, see bug #7856
 574         if (is_known(name, known_roman_fonts) || is_known(name, known_sans_fonts)
 575                 ||      is_known(name, known_typewriter_fonts))
 576                 ;
 577
 578         else if (name == "amsmath" || name == "amssymb")
 579                 h_use_amsmath = "2";
 580
 581         else if (name == "esint")
 582                 h_use_esint = "2";
 583
 584         else if (name == "mhchem")
 585                 h_use_mhchem = "2";
 586
 587         else if (name == "mathdots")
 588                 h_use_mathdots = "2";
 589
 590         else if (name == "undertilde")
 591                 h_use_undertilde = "2";
 592
 593         else if (name == "babel") {
 594                 h_language_package = "default";
 595                 // One might think we would have to do nothing if babel is loaded
 596                 // without any options to prevent pollution of the preamble with this
 597                 // babel call in every roundtrip.
 598                 // But the user could have defined babel-specific things afterwards. So
 599                 // we need to keep it in the preamble to prevent cases like bug #7861.
 600                 if (!opts.empty()) {
 601                         // check if more than one option was used - used later for inputenc
 602                         if (options.begin() != options.end() - 1)
 603                                 one_language = false;
 604                         // babel takes the last language of the option of its \usepackage
 605                         // call as document language. If there is no such language option, the
 606                         // last language in the documentclass options is used.
 607                         handle_opt(options, known_languages, h_language);
 608                         // If babel is called with options, LyX puts them by default into the
 609                         // document class options. This works for most languages, except
 610                         // for Latvian, Lithuanian, Mongolian, Turkmen and Vietnamese and
 611                         // perhaps in future others.
 612                         // Therefore keep the babel call as it is as the user might have
 613                         // reasons for it.
 614                         h_preamble << "\\usepackage[" << opts << "]{babel}\n";
 615                         delete_opt(options, known_languages);
 616                 }
 617                 else
 618                         h_preamble << "\\usepackage{babel}\n";
 619         }
 620
 621         else if (name == "fontenc") {
 622                 h_fontencoding = getStringFromVector(options, ",");
 623                 /* We could do the following for better round trip support,
 624                  * but this makes the document less portable, so I skip it:
 625                 if (h_fontencoding == lyxrc.fontenc)
 626                         h_fontencoding = "global";
 627                  */
 628                 options.clear();
 629         }
 630
 631         else if (name == "inputenc" || name == "luainputenc") {
 632                 // h_inputencoding is only set when there is not more than one
 633                 // inputenc option because otherwise h_inputencoding must be
 634                 // set to "auto" (the default encoding of the document language)
 635                 // Therefore check for the "," character.
 636                 // It is also only set when there is not more than one babel
 637                 // language option.
 638                 if (opts.find(",") == string::npos && one_language == true)
 639                         h_inputencoding = opts;
 640                 if (!options.empty())
 641                         p.setEncoding(options.back());
 642                 options.clear();
 643         }
 644
 645         else if (is_known(name, known_old_language_packages)) {
 646                 // known language packages from the times before babel
 647                 // if they are found and not also babel, they will be used as
 648                 // cutom language package
 649                 h_language_package = "\\usepackage{" + name + "}";
 650         }
 651
 652         else if (name == "makeidx")
 653                 ; // ignore this
 654
 655         else if (name == "prettyref")
 656                 ; // ignore this
 657
 658         else if (name == "varioref")
 659                 ; // ignore this
 660
 661         else if (name == "verbatim")
 662                 ; // ignore this
 663
 664         else if (name == "nomencl")
 665                 ; // ignore this
 666
 667         else if (name == "textcomp")
 668                 ; // ignore this
 669
 670         else if (name == "url")
 671                 ; // ignore this
 672
 673         else if (name == "color" || name == "subscript" || name == "ulem") {
 674                 if (!in_lyx_preamble)
 675                         h_preamble << package_beg_sep << name
 676                                    << package_mid_sep << "\\usepackage{"
 677                                    << name << '}' << package_end_sep;
 678         }
 679
 680         else if (name == "graphicx")
 681                 ; // ignore this
 682
 683         else if (name == "setspace")
 684                 ; // ignore this
 685
 686         else if (name == "geometry")
 687                 ; // Ignore this, the geometry settings are made by the \geometry
 688                   // command. This command is handled below.
 689
 690         else if (name == "rotfloat")
 691                 ; // ignore this
 692
 693         else if (name == "wrapfig")
 694                 ; // ignore this
 695
 696         else if (name == "subfig")
 697                 ; // ignore this
 698
 699         else if (is_known(name, known_languages))
 700                 h_language = name;
 701
 702         else if (name == "natbib") {
 703                 h_cite_engine = "natbib_authoryear";
 704                 vector<string>::iterator it =
 705                         find(options.begin(), options.end(), "authoryear");
 706                 if (it != options.end())
 707                         options.erase(it);
 708                 else {
 709                         it = find(options.begin(), options.end(), "numbers");
 710                         if (it != options.end()) {
 711                                 h_cite_engine = "natbib_numerical";
 712                                 options.erase(it);
 713                         }
 714                 }
 715         }
 716
 717         else if (name == "jurabib")
 718                 h_cite_engine = "jurabib";
 719
 720         else if (name == "hyperref")
 721                 handle_hyperref(options);
 722
 723         else if (!in_lyx_preamble) {
 724                 if (options.empty())
 725                         h_preamble << "\\usepackage{" << name << "}";
 726                 else {
 727                         h_preamble << "\\usepackage[" << opts << "]{"
 728                                    << name << "}";
 729                         options.clear();
 730                 }
 731         }
 732
 733         // We need to do something with the options...
 734         if (!options.empty())
 735                 cerr << "Ignoring options '" << join(options, ",")
 736                      << "' of package " << name << '.' << endl;
 737
 738         // remove the whitespace
 739         p.skip_spaces();
 740 }
 741
 742
 743 void Preamble::handle_if(Parser & p, bool in_lyx_preamble)
 744 {
 745         while (p.good()) {
 746                 Token t = p.get_token();
 747                 if (t.cat() == catEscape &&
 748                     is_known(t.cs(), known_if_commands))
 749                         handle_if(p, in_lyx_preamble);
 750                 else {
 751                         if (!in_lyx_preamble)
 752                                 h_preamble << t.asInput();
 753                         if (t.cat() == catEscape && t.cs() == "fi")
 754                                 return;
 755                 }
 756         }
 757 }
 758
 759
 760 bool Preamble::writeLyXHeader(ostream & os)
 761 {
 762         // translate from babel to LyX names
 763         h_language = babel2lyx(h_language);
 764
 765         // set the quote language
 766         // LyX only knows the following quotes languages:
 767         // english, swedish, german, polish, french and danish
 768         // (quotes for "japanese" and "chinese-traditional" are missing because
 769         //  they wouldn't be useful: http://www.lyx.org/trac/ticket/6383)
 770         // conversion list taken from
 771         // http://en.wikipedia.org/wiki/Quotation_mark,_non-English_usage
 772         // (quotes for kazakh and interlingua are unknown)
 773         // danish
 774         if (h_language == "danish")
 775                 h_quotes_language = "danish";
 776         // french
 777         else if (is_known(h_language, known_french_quotes_languages))
 778                 h_quotes_language = "french";
 779         // german
 780         else if (is_known(h_language, known_german_quotes_languages))
 781                 h_quotes_language = "german";
 782         // polish
 783         else if (is_known(h_language, known_polish_quotes_languages))
 784                 h_quotes_language = "polish";
 785         // swedish
 786         else if (is_known(h_language, known_swedish_quotes_languages))
 787                 h_quotes_language = "swedish";
 788         //english
 789         else if (is_known(h_language, known_english_quotes_languages))
 790                 h_quotes_language = "english";
 791
 792         // output the LyX file settings
 793         os << "#LyX file created by tex2lyx " << PACKAGE_VERSION << "\n"
 794            << "\\lyxformat " << LYX_FORMAT << '\n'
 795            << "\\begin_document\n"
 796            << "\\begin_header\n"
 797            << "\\textclass " << h_textclass << "\n";
 798         string const raw = h_preamble.str();
 799         if (!raw.empty()) {
 800                 os << "\\begin_preamble\n";
 801                 for (string::size_type i = 0; i < raw.size(); ++i) {
 802                         if (raw[i] == package_beg_sep) {
 803                                 // Here follows some package loading code that
 804                                 // must be skipped if the package is loaded
 805                                 // automatically.
 806                                 string::size_type j = raw.find(package_mid_sep, i);
 807                                 if (j == string::npos)
 808                                         return false;
 809                                 string::size_type k = raw.find(package_end_sep, j);
 810                                 if (k == string::npos)
 811                                         return false;
 812                                 string const package = raw.substr(i + 1, j - i - 1);
 813                                 string const replacement = raw.substr(j + 1, k - j - 1);
 814                                 if (auto_packages.find(package) == auto_packages.end())
 815                                         os << replacement;
 816                                 i = k;
 817                         } else
 818                                 os.put(raw[i]);
 819                 }
 820                 os << "\n\\end_preamble\n";
 821         }
 822         if (!h_options.empty())
 823                 os << "\\options " << h_options << "\n";
 824         os << "\\use_default_options " << h_use_default_options << "\n";
 825         if (!used_modules.empty()) {
 826                 os << "\\begin_modules\n";
 827                 vector<string>::const_iterator const end = used_modules.end();
 828                 vector<string>::const_iterator it = used_modules.begin();
 829                 for (; it != end; it++)
 830                         os << *it << '\n';
 831                 os << "\\end_modules\n";
 832         }
 833         os << "\\language " << h_language << "\n"
 834            << "\\language_package " << h_language_package << "\n"
 835            << "\\inputencoding " << h_inputencoding << "\n"
 836            << "\\fontencoding " << h_fontencoding << "\n"
 837            << "\\font_roman " << h_font_roman << "\n"
 838            << "\\font_sans " << h_font_sans << "\n"
 839            << "\\font_typewriter " << h_font_typewriter << "\n"
 840            << "\\font_default_family " << h_font_default_family << "\n"
 841            << "\\font_sc " << h_font_sc << "\n"
 842            << "\\font_osf " << h_font_osf << "\n"
 843            << "\\font_sf_scale " << h_font_sf_scale << "\n"
 844            << "\\font_tt_scale " << h_font_tt_scale << "\n"
 845            << "\\graphics " << h_graphics << "\n";
 846         if (!h_float_placement.empty())
 847                 os << "\\float_placement " << h_float_placement << "\n";
 848         os << "\\paperfontsize " << h_paperfontsize << "\n"
 849            << "\\spacing " << h_spacing << "\n"
 850            << "\\use_hyperref " << h_use_hyperref << '\n';
 851         if (h_use_hyperref == "1") {
 852                 if (!h_pdf_title.empty())
 853                         os << "\\pdf_title \"" << h_pdf_title << "\"\n";
 854                 if (!h_pdf_author.empty())
 855                         os << "\\pdf_author \"" << h_pdf_author << "\"\n";
 856                 if (!h_pdf_subject.empty())
 857                         os << "\\pdf_subject \"" << h_pdf_subject << "\"\n";
 858                 if (!h_pdf_keywords.empty())
 859                         os << "\\pdf_keywords \"" << h_pdf_keywords << "\"\n";
 860                 os << "\\pdf_bookmarks " << h_pdf_bookmarks << "\n"
 861                       "\\pdf_bookmarksnumbered " << h_pdf_bookmarksnumbered << "\n"
 862                       "\\pdf_bookmarksopen " << h_pdf_bookmarksopen << "\n"
 863                       "\\pdf_bookmarksopenlevel " << h_pdf_bookmarksopenlevel << "\n"
 864                       "\\pdf_breaklinks " << h_pdf_breaklinks << "\n"
 865                       "\\pdf_pdfborder " << h_pdf_pdfborder << "\n"
 866                       "\\pdf_colorlinks " << h_pdf_colorlinks << "\n"
 867                       "\\pdf_backref " << h_pdf_backref << "\n"
 868                       "\\pdf_pdfusetitle " << h_pdf_pdfusetitle << '\n';
 869                 if (!h_pdf_pagemode.empty())
 870                         os << "\\pdf_pagemode " << h_pdf_pagemode << '\n';
 871                 if (!h_pdf_quoted_options.empty())
 872                         os << "\\pdf_quoted_options \"" << h_pdf_quoted_options << "\"\n";
 873         }
 874         os << "\\papersize " << h_papersize << "\n"
 875            << "\\use_geometry " << h_use_geometry << "\n"
 876            << "\\use_amsmath " << h_use_amsmath << "\n"
 877            << "\\use_esint " << h_use_esint << "\n"
 878            << "\\use_mhchem " << h_use_mhchem << "\n"
 879            << "\\use_mathdots " << h_use_mathdots << "\n"
 880            << "\\use_undertilde " << h_use_undertilde << "\n"
 881            << "\\cite_engine " << h_cite_engine << "\n"
 882            << "\\use_bibtopic " << h_use_bibtopic << "\n"
 883            << "\\paperorientation " << h_paperorientation << '\n'
 884            << "\\suppress_date " << h_suppress_date << '\n'
 885            << "\\use_refstyle " << h_use_refstyle << '\n';
 886         if (!h_fontcolor.empty())
 887                 os << "\\fontcolor " << h_fontcolor << '\n';
 888         if (!h_notefontcolor.empty())
 889                 os << "\\notefontcolor " << h_notefontcolor << '\n';
 890         if (!h_backgroundcolor.empty())
 891                 os << "\\backgroundcolor " << h_backgroundcolor << '\n';
 892         if (!h_boxbgcolor.empty())
 893                 os << "\\boxbgcolor " << h_boxbgcolor << '\n';
 894         os << h_margins
 895            << "\\secnumdepth " << h_secnumdepth << "\n"
 896            << "\\tocdepth " << h_tocdepth << "\n"
 897            << "\\paragraph_separation " << h_paragraph_separation << "\n";
 898         if (h_paragraph_separation == "skip")
 899                 os << "\\defskip " << h_defskip << "\n";
 900         else
 901                 os << "\\paragraph_indentation " << h_paragraph_indentation << "\n";
 902         os << "\\quotes_language " << h_quotes_language << "\n"
 903            << "\\papercolumns " << h_papercolumns << "\n"
 904            << "\\papersides " << h_papersides << "\n"
 905            << "\\paperpagestyle " << h_paperpagestyle << "\n";
 906         if (!h_listings_params.empty())
 907                 os << "\\listings_params " << h_listings_params << "\n";
 908         os << "\\tracking_changes " << h_tracking_changes << "\n"
 909            << "\\output_changes " << h_output_changes << "\n"
 910            << "\\html_math_output " << h_html_math_output << "\n"
 911            << "\\html_css_as_file " << h_html_css_as_file << "\n"
 912            << "\\html_be_strict " << h_html_be_strict << "\n"
 913            << "\\end_header\n\n"
 914            << "\\begin_body\n";
 915         // clear preamble for subdocuments
 916         h_preamble.str("");
 917         return true;
 918 }
 919
 920
 921 void Preamble::parse(Parser & p, string const & forceclass,
 922                      TeX2LyXDocClass & tc)
 923 {
 924         // initialize fixed types
 925         special_columns['D'] = 3;
 926         bool is_full_document = false;
 927         bool is_lyx_file = false;
 928         bool in_lyx_preamble = false;
 929
 930         // determine whether this is a full document or a fragment for inclusion
 931         while (p.good()) {
 932                 Token const & t = p.get_token();
 933
 934                 if (t.cat() == catEscape && t.cs() == "documentclass") {
 935                         is_full_document = true;
 936                         break;
 937                 }
 938         }
 939         p.reset();
 940
 941         while (is_full_document && p.good()) {
 942                 Token const & t = p.get_token();
 943
 944 #ifdef FILEDEBUG
 945                 cerr << "t: " << t << "\n";
 946 #endif
 947
 948                 //
 949                 // cat codes
 950                 //
 951                 if (!in_lyx_preamble &&
 952                     (t.cat() == catLetter ||
 953                      t.cat() == catSuper ||
 954                      t.cat() == catSub ||
 955                      t.cat() == catOther ||
 956                      t.cat() == catMath ||
 957                      t.cat() == catActive ||
 958                      t.cat() == catBegin ||
 959                      t.cat() == catEnd ||
 960                      t.cat() == catAlign ||
 961                      t.cat() == catParameter))
 962                         h_preamble << t.cs();
 963
 964                 else if (!in_lyx_preamble &&
 965                          (t.cat() == catSpace || t.cat() == catNewline))
 966                         h_preamble << t.asInput();
 967
 968                 else if (t.cat() == catComment) {
 969                         static regex const islyxfile("%% LyX .* created this file");
 970                         static regex const usercommands("User specified LaTeX commands");
 971
 972                         string const comment = t.asInput();
 973
 974                         // magically switch encoding default if it looks like XeLaTeX
 975                         static string const magicXeLaTeX =
 976                                 "% This document must be compiled with XeLaTeX ";
 977                         if (comment.size() > magicXeLaTeX.size()
 978                                   && comment.substr(0, magicXeLaTeX.size()) == magicXeLaTeX
 979                                   && h_inputencoding == "auto") {
 980                                 cerr << "XeLaTeX comment found, switching to UTF8\n";
 981                                 h_inputencoding = "utf8";
 982                         }
 983                         smatch sub;
 984                         if (regex_search(comment, sub, islyxfile)) {
 985                                 is_lyx_file = true;
 986                                 in_lyx_preamble = true;
 987                         } else if (is_lyx_file
 988                                    && regex_search(comment, sub, usercommands))
 989                                 in_lyx_preamble = false;
 990                         else if (!in_lyx_preamble)
 991                                 h_preamble << t.asInput();
 992                 }
 993
 994                 else if (t.cs() == "pagestyle")
 995                         h_paperpagestyle = p.verbatim_item();
 996
 997                 else if (t.cs() == "date") {
 998                         string argument = p.getArg('{', '}');
 999                         if (argument.empty())
1000                                 h_suppress_date = "true";
1001                         else
1002                                 h_preamble << t.asInput() << '{' << argument << '}';
1003                 }
1004
1005                 else if (t.cs() == "color") {
1006                         string argument = p.getArg('{', '}');
1007                         // check the case that a standard color is used
1008                         if (is_known(argument, known_basic_colors)) {
1009                                 h_fontcolor = rgbcolor2code(argument);
1010                                 preamble.registerAutomaticallyLoadedPackage("color");
1011                         } else if (argument == "document_fontcolor")
1012                                 preamble.registerAutomaticallyLoadedPackage("color");
1013                         // check the case that LyX's document_fontcolor is defined
1014                         // but not used for \color
1015                         else {
1016                                 h_preamble << t.asInput() << '{' << argument << '}';
1017                                 // the color might already be set because \definecolor
1018                                 // is parsed before this
1019                                 h_fontcolor = "";
1020                         }
1021                 }
1022
1023                 else if (t.cs() == "pagecolor") {
1024                         string argument = p.getArg('{', '}');
1025                         // check the case that a standard color is used
1026                         if (is_known(argument, known_basic_colors)) {
1027                                 h_backgroundcolor = rgbcolor2code(argument);
1028                         } else if (argument == "page_backgroundcolor")
1029                                 preamble.registerAutomaticallyLoadedPackage("color");
1030                         // check the case that LyX's page_backgroundcolor is defined
1031                         // but not used for \pagecolor
1032                         else {
1033                                 h_preamble << t.asInput() << '{' << argument << '}';
1034                                 // the color might already be set because \definecolor
1035                                 // is parsed before this
1036                                 h_backgroundcolor = "";
1037                         }
1038                 }
1039
1040                 else if (t.cs() == "makeatletter") {
1041                         // LyX takes care of this
1042                         p.setCatCode('@', catLetter);
1043                 }
1044
1045                 else if (t.cs() == "makeatother") {
1046                         // LyX takes care of this
1047                         p.setCatCode('@', catOther);
1048                 }
1049
1050                 else if (t.cs() == "newcommand" || t.cs() == "newcommandx"
1051                       || t.cs() == "renewcommand" || t.cs() == "renewcommandx"
1052                       || t.cs() == "providecommand" || t.cs() == "providecommandx"
1053                                 || t.cs() == "DeclareRobustCommand"
1054                       || t.cs() == "DeclareRobustCommandx"
1055                                 || t.cs() == "ProvideTextCommandDefault"
1056                                 || t.cs() == "DeclareMathAccent") {
1057                         bool star = false;
1058                         if (p.next_token().character() == '*') {
1059                                 p.get_token();
1060                                 star = true;
1061                         }
1062                         string const name = p.verbatim_item();
1063                         string const opt1 = p.getFullOpt();
1064                         string const opt2 = p.getFullOpt();
1065                         string const body = p.verbatim_item();
1066                         // font settings
1067                         if (name == "\\rmdefault")
1068                                 if (is_known(body, known_roman_fonts))
1069                                         h_font_roman = body;
1070                         if (name == "\\sfdefault")
1071                                 if (is_known(body, known_sans_fonts))
1072                                         h_font_sans = body;
1073                         if (name == "\\ttdefault")
1074                                 if (is_known(body, known_typewriter_fonts))
1075                                         h_font_typewriter = body;
1076                         if (name == "\\familydefault") {
1077                                 string family = body;
1078                                 // remove leading "\"
1079                                 h_font_default_family = family.erase(0,1);
1080                         }
1081
1082                         // Add the command to the known commands
1083                         add_known_command(name, opt1, !opt2.empty(), from_utf8(body));
1084
1085                         // only non-lyxspecific stuff
1086                         if (!in_lyx_preamble) {
1087                                 ostringstream ss;
1088                                 ss << '\\' << t.cs();
1089                                 if (star)
1090                                         ss << '*';
1091                                 ss << '{' << name << '}' << opt1 << opt2
1092                                    << '{' << body << "}";
1093                                 h_preamble << ss.str();
1094 /*
1095                                 ostream & out = in_preamble ? h_preamble : os;
1096                                 out << "\\" << t.cs() << "{" << name << "}"
1097                                     << opts << "{" << body << "}";
1098 */
1099                         }
1100                 }
1101
1102                 else if (t.cs() == "documentclass") {
1103                         vector<string>::iterator it;
1104                         vector<string> opts = split_options(p.getArg('[', ']'));
1105                         handle_opt(opts, known_fontsizes, h_paperfontsize);
1106                         delete_opt(opts, known_fontsizes);
1107                         // delete "pt" at the end
1108                         string::size_type i = h_paperfontsize.find("pt");
1109                         if (i != string::npos)
1110                                 h_paperfontsize.erase(i);
1111                         // The documentclass options are always parsed before the options
1112                         // of the babel call so that a language cannot overwrite the babel
1113                         // options.
1114                         handle_opt(opts, known_languages, h_language);
1115                         delete_opt(opts, known_languages);
1116
1117                         // paper orientation
1118                         if ((it = find(opts.begin(), opts.end(), "landscape")) != opts.end()) {
1119                                 h_paperorientation = "landscape";
1120                                 opts.erase(it);
1121                         }
1122                         // paper sides
1123                         if ((it = find(opts.begin(), opts.end(), "oneside"))
1124                                  != opts.end()) {
1125                                 h_papersides = "1";
1126                                 opts.erase(it);
1127                         }
1128                         if ((it = find(opts.begin(), opts.end(), "twoside"))
1129                                  != opts.end()) {
1130                                 h_papersides = "2";
1131                                 opts.erase(it);
1132                         }
1133                         // paper columns
1134                         if ((it = find(opts.begin(), opts.end(), "onecolumn"))
1135                                  != opts.end()) {
1136                                 h_papercolumns = "1";
1137                                 opts.erase(it);
1138                         }
1139                         if ((it = find(opts.begin(), opts.end(), "twocolumn"))
1140                                  != opts.end()) {
1141                                 h_papercolumns = "2";
1142                                 opts.erase(it);
1143                         }
1144                         // paper sizes
1145                         // some size options are know to any document classes, other sizes
1146                         // are handled by the \geometry command of the geometry package
1147                         handle_opt(opts, known_class_paper_sizes, h_papersize);
1148                         delete_opt(opts, known_class_paper_sizes);
1149                         // the remaining options
1150                         h_options = join(opts, ",");
1151                         // FIXME This does not work for classes that have a
1152                         //       different name in LyX than in LaTeX
1153                         h_textclass = p.getArg('{', '}');
1154                 }
1155
1156                 else if (t.cs() == "usepackage") {
1157                         string const options = p.getArg('[', ']');
1158                         string const name = p.getArg('{', '}');
1159                         vector<string> vecnames;
1160                         split(name, vecnames, ',');
1161                         vector<string>::const_iterator it  = vecnames.begin();
1162                         vector<string>::const_iterator end = vecnames.end();
1163                         for (; it != end; ++it)
1164                                 handle_package(p, trimSpaceAndEol(*it), options,
1165                                                in_lyx_preamble);
1166                 }
1167
1168                 else if (t.cs() == "inputencoding") {
1169                         string const encoding = p.getArg('{','}');
1170                         h_inputencoding = encoding;
1171                         p.setEncoding(encoding);
1172                 }
1173
1174                 else if (t.cs() == "newenvironment") {
1175                         string const name = p.getArg('{', '}');
1176                         string const opt1 = p.getFullOpt();
1177                         string const opt2 = p.getFullOpt();
1178                         string const beg = p.verbatim_item();
1179                         string const end = p.verbatim_item();
1180                         if (!in_lyx_preamble) {
1181                                 h_preamble << "\\newenvironment{" << name
1182                                            << '}' << opt1 << opt2 << '{'
1183                                            << beg << "}{" << end << '}';
1184                         }
1185                         add_known_environment(name, opt1, !opt2.empty(),
1186                                               from_utf8(beg), from_utf8(end));
1187
1188                 }
1189
1190                 else if (t.cs() == "def") {
1191                         string name = p.get_token().cs();
1192                         while (p.next_token().cat() != catBegin)
1193                                 name += p.get_token().cs();
1194                         if (!in_lyx_preamble)
1195                                 h_preamble << "\\def\\" << name << '{'
1196                                            << p.verbatim_item() << "}";
1197                 }
1198
1199                 else if (t.cs() == "newcolumntype") {
1200                         string const name = p.getArg('{', '}');
1201                         trimSpaceAndEol(name);
1202                         int nargs = 0;
1203                         string opts = p.getOpt();
1204                         if (!opts.empty()) {
1205                                 istringstream is(string(opts, 1));
1206                                 is >> nargs;
1207                         }
1208                         special_columns[name[0]] = nargs;
1209                         h_preamble << "\\newcolumntype{" << name << "}";
1210                         if (nargs)
1211                                 h_preamble << "[" << nargs << "]";
1212                         h_preamble << "{" << p.verbatim_item() << "}";
1213                 }
1214
1215                 else if (t.cs() == "setcounter") {
1216                         string const name = p.getArg('{', '}');
1217                         string const content = p.getArg('{', '}');
1218                         if (name == "secnumdepth")
1219                                 h_secnumdepth = content;
1220                         else if (name == "tocdepth")
1221                                 h_tocdepth = content;
1222                         else
1223                                 h_preamble << "\\setcounter{" << name << "}{" << content << "}";
1224                 }
1225
1226                 else if (t.cs() == "setlength") {
1227                         string const name = p.verbatim_item();
1228                         string const content = p.verbatim_item();
1229                         // the paragraphs are only not indented when \parindent is set to zero
1230                         if (name == "\\parindent" && content != "") {
1231                                 if (content[0] == '0')
1232                                         h_paragraph_separation = "skip";
1233                                 else
1234                                         h_paragraph_indentation = translate_len(content);
1235                         } else if (name == "\\parskip") {
1236                                 if (content == "\\smallskipamount")
1237                                         h_defskip = "smallskip";
1238                                 else if (content == "\\medskipamount")
1239                                         h_defskip = "medskip";
1240                                 else if (content == "\\bigskipamount")
1241                                         h_defskip = "bigskip";
1242                                 else
1243                                         h_defskip = content;
1244                         } else
1245                                 h_preamble << "\\setlength{" << name << "}{" << content << "}";
1246                 }
1247
1248                 else if (t.cs() == "onehalfspacing")
1249                         h_spacing = "onehalf";
1250
1251                 else if (t.cs() == "doublespacing")
1252                         h_spacing = "double";
1253
1254                 else if (t.cs() == "setstretch")
1255                         h_spacing = "other " + p.verbatim_item();
1256
1257                 else if (t.cs() == "begin") {
1258                         string const name = p.getArg('{', '}');
1259                         if (name == "document")
1260                                 break;
1261                         h_preamble << "\\begin{" << name << "}";
1262                 }
1263
1264                 else if (t.cs() == "geometry") {
1265                         h_use_geometry = "true";
1266                         vector<string> opts = split_options(p.getArg('{', '}'));
1267                         vector<string>::iterator it;
1268                         // paper orientation
1269                         if ((it = find(opts.begin(), opts.end(), "landscape")) != opts.end()) {
1270                                 h_paperorientation = "landscape";
1271                                 opts.erase(it);
1272                         }
1273                         // paper size
1274                         handle_opt(opts, known_paper_sizes, h_papersize);
1275                         delete_opt(opts, known_paper_sizes);
1276                         // page margins
1277                         char const * const * margin = known_paper_margins;
1278                         int k = -1;
1279                         for (; *margin; ++margin) {
1280                                 k += 1;
1281                                 // search for the "=" in e.g. "lmargin=2cm" to get the value
1282                                 for(size_t i = 0; i != opts.size(); i++) {
1283                                         if (opts.at(i).find(*margin) != string::npos) {
1284                                                 string::size_type pos = opts.at(i).find("=");
1285                                                 string value = opts.at(i).substr(pos + 1);
1286                                                 string name = known_coded_paper_margins[k];
1287                                                 h_margins += "\\" + name + " " + value + "\n";
1288                                         }
1289                                 }
1290                         }
1291                 }
1292
1293                 else if (t.cs() == "definecolor") {
1294                         string const color = p.getArg('{', '}');
1295                         string const space = p.getArg('{', '}');
1296                         string const value = p.getArg('{', '}');
1297                         if (color == "document_fontcolor" && space == "rgb") {
1298                                 RGBColor c(RGBColorFromLaTeX(value));
1299                                 h_fontcolor = X11hexname(c);
1300                         } else if (color == "note_fontcolor" && space == "rgb") {
1301                                 RGBColor c(RGBColorFromLaTeX(value));
1302                                 h_notefontcolor = X11hexname(c);
1303                         } else if (color == "page_backgroundcolor" && space == "rgb") {
1304                                 RGBColor c(RGBColorFromLaTeX(value));
1305                                 h_backgroundcolor = X11hexname(c);
1306                         } else if (color == "shadecolor" && space == "rgb") {
1307                                 RGBColor c(RGBColorFromLaTeX(value));
1308                                 h_boxbgcolor = X11hexname(c);
1309                         } else {
1310                                 h_preamble << "\\definecolor{" << color
1311                                            << "}{" << space << "}{" << value
1312                                            << '}';
1313                         }
1314                 }
1315
1316                 else if (t.cs() == "jurabibsetup") {
1317                         // FIXME p.getArg('{', '}') is most probably wrong (it
1318                         //       does not handle nested braces).
1319                         //       Use p.verbatim_item() instead.
1320                         vector<string> jurabibsetup =
1321                                 split_options(p.getArg('{', '}'));
1322                         // add jurabibsetup to the jurabib package options
1323                         add_package("jurabib", jurabibsetup);
1324                         if (!jurabibsetup.empty()) {
1325                                 h_preamble << "\\jurabibsetup{"
1326                                            << join(jurabibsetup, ",") << '}';
1327                         }
1328                 }
1329
1330                 else if (t.cs() == "hypersetup") {
1331                         vector<string> hypersetup =
1332                                 split_options(p.verbatim_item());
1333                         // add hypersetup to the hyperref package options
1334                         handle_hyperref(hypersetup);
1335                         if (!hypersetup.empty()) {
1336                                 h_preamble << "\\hypersetup{"
1337                                            << join(hypersetup, ",") << '}';
1338                         }
1339                 }
1340
1341                 else if (is_known(t.cs(), known_if_3arg_commands)) {
1342                         // prevent misparsing of \usepackage if it is used
1343                         // as an argument (see e.g. our own output of
1344                         // \@ifundefined above)
1345                         string const arg1 = p.verbatim_item();
1346                         string const arg2 = p.verbatim_item();
1347                         string const arg3 = p.verbatim_item();
1348                         // test case \@ifundefined{date}{}{\date{}}
1349                         if (t.cs() == "@ifundefined" && arg1 == "date" &&
1350                             arg2.empty() && arg3 == "\\date{}") {
1351                                 h_suppress_date = "true";
1352                         // older tex2lyx versions did output
1353                         // \@ifundefined{definecolor}{\usepackage{color}}{}
1354                         } else if (t.cs() == "@ifundefined" &&
1355                                    arg1 == "definecolor" &&
1356                                    arg2 == "\\usepackage{color}" &&
1357                                    arg3.empty()) {
1358                                 if (!in_lyx_preamble)
1359                                         h_preamble << package_beg_sep
1360                                                    << "color"
1361                                                    << package_mid_sep
1362                                                    << "\\@ifundefined{definecolor}{color}{}"
1363                                                    << package_end_sep;
1364                         // test for case
1365                         //\@ifundefined{showcaptionsetup}{}{%
1366                         // \PassOptionsToPackage{caption=false}{subfig}}
1367                         // that LyX uses for subfloats
1368                         } else if (t.cs() == "@ifundefined" &&
1369                                    arg1 == "showcaptionsetup" && arg2.empty()
1370                                 && arg3 == "%\n \\PassOptionsToPackage{caption=false}{subfig}") {
1371                                 ; // do nothing
1372                         } else if (!in_lyx_preamble) {
1373                                 h_preamble << t.asInput()
1374                                            << '{' << arg1 << '}'
1375                                            << '{' << arg2 << '}'
1376                                            << '{' << arg3 << '}';
1377                         }
1378                 }
1379
1380                 else if (is_known(t.cs(), known_if_commands)) {
1381                         // must not parse anything in conditional code, since
1382                         // LyX would output the parsed contents unconditionally
1383                         if (!in_lyx_preamble)
1384                                 h_preamble << t.asInput();
1385                         handle_if(p, in_lyx_preamble);
1386                 }
1387
1388                 else if (!t.cs().empty() && !in_lyx_preamble)
1389                         h_preamble << '\\' << t.cs();
1390         }
1391
1392         // remove the whitespace
1393         p.skip_spaces();
1394
1395         // Force textclass if the user wanted it
1396         if (!forceclass.empty())
1397                 h_textclass = forceclass;
1398         if (noweb_mode && !prefixIs(h_textclass, "literate-"))
1399                 h_textclass.insert(0, "literate-");
1400         tc.setName(h_textclass);
1401         if (!tc.load()) {
1402                 cerr << "Error: Could not read layout file for textclass \"" << h_textclass << "\"." << endl;
1403                 exit(EXIT_FAILURE);
1404         }
1405         if (h_papersides.empty()) {
1406                 ostringstream ss;
1407                 ss << tc.sides();
1408                 h_papersides = ss.str();
1409         }
1410 }
1411
1412
1413 string babel2lyx(string const & language)
1414 {
1415         char const * const * where = is_known(language, known_languages);
1416         if (where)
1417                 return known_coded_languages[where - known_languages];
1418         return language;
1419 }
1420
1421
1422 string rgbcolor2code(string const & name)
1423 {
1424         char const * const * where = is_known(name, known_basic_colors);
1425         if (where) {
1426                 // "red", "green" etc
1427                 return known_basic_color_codes[where - known_basic_colors];
1428         }
1429         // "255,0,0", "0,255,0" etc
1430         RGBColor c(RGBColorFromLaTeX(name));
1431         return X11hexname(c);
1432 }
1433
1434 // }])
1435
1436
1437 } // namespace lyx