src/tex2lyx/tex2lyx.cpp

   1 /**
   2  * \file tex2lyx.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  *
   8  * Full author contact details are available in file CREDITS.
   9  */
  10
  11 // {[(
  12
  13 #include <config.h>
  14 #include <version.h>
  15
  16 #include "tex2lyx.h"
  17
  18 #include "Context.h"
  19 #include "Encoding.h"
  20 #include "Layout.h"
  21 #include "LayoutFile.h"
  22 #include "LayoutModuleList.h"
  23 #include "ModuleList.h"
  24 #include "Preamble.h"
  25 #include "TextClass.h"
  26
  27 #include "support/convert.h"
  28 #include "support/ExceptionMessage.h"
  29 #include "support/filetools.h"
  30 #include "support/lassert.h"
  31 #include "support/lstrings.h"
  32 #include "support/os.h"
  33 #include "support/Package.h"
  34 #include "support/Systemcall.h"
  35
  36 #include <cstdlib>
  37 #include <algorithm>
  38 #include <iostream>
  39 #include <string>
  40 #include <sstream>
  41 #include <vector>
  42 #include <map>
  43
  44 using namespace std;
  45 using namespace lyx::support;
  46 using namespace lyx::support::os;
  47
  48 namespace lyx {
  49
  50 string const trimSpaceAndEol(string const & a)
  51 {
  52         return trim(a, " \t\n\r");
  53 }
  54
  55
  56 void split(string const & s, vector<string> & result, char delim)
  57 {
  58         //cerr << "split 1: '" << s << "'\n";
  59         istringstream is(s);
  60         string t;
  61         while (getline(is, t, delim))
  62                 result.push_back(t);
  63         //cerr << "split 2\n";
  64 }
  65
  66
  67 string join(vector<string> const & input, char const * delim)
  68 {
  69         ostringstream os;
  70         for (size_t i = 0; i != input.size(); ++i) {
  71                 if (i)
  72                         os << delim;
  73                 os << input[i];
  74         }
  75         return os.str();
  76 }
  77
  78
  79 char const * const * is_known(string const & str, char const * const * what)
  80 {
  81         for ( ; *what; ++what)
  82                 if (str == *what)
  83                         return what;
  84         return 0;
  85 }
  86
  87
  88
  89 // current stack of nested environments
  90 vector<string> active_environments;
  91
  92
  93 string active_environment()
  94 {
  95         return active_environments.empty() ? string() : active_environments.back();
  96 }
  97
  98
  99 TeX2LyXDocClass textclass;
 100 CommandMap known_commands;
 101 CommandMap known_environments;
 102 CommandMap known_math_environments;
 103 FullCommandMap possible_textclass_commands;
 104 FullEnvironmentMap possible_textclass_environments;
 105 FullCommandMap possible_textclass_theorems;
 106 int const LYX_FORMAT = LYX_FORMAT_TEX2LYX;
 107
 108 /// used modules
 109 LayoutModuleList used_modules;
 110 vector<string> preloaded_modules;
 111
 112
 113 void convertArgs(string const & o1, bool o2, vector<ArgumentType> & arguments)
 114 {
 115         // We have to handle the following cases:
 116         // definition                      o1    o2    invocation result
 117         // \newcommand{\foo}{bar}          ""    false \foo       bar
 118         // \newcommand{\foo}[1]{bar #1}    "[1]" false \foo{x}    bar x
 119         // \newcommand{\foo}[1][]{bar #1}  "[1]" true  \foo       bar
 120         // \newcommand{\foo}[1][]{bar #1}  "[1]" true  \foo[x]    bar x
 121         // \newcommand{\foo}[1][x]{bar #1} "[1]" true  \foo[x]    bar x
 122         unsigned int nargs = 0;
 123         string const opt1 = rtrim(ltrim(o1, "["), "]");
 124         if (isStrUnsignedInt(opt1)) {
 125                 // The command has arguments
 126                 nargs = convert<unsigned int>(opt1);
 127                 if (nargs > 0 && o2) {
 128                         // The first argument is optional
 129                         arguments.push_back(optional);
 130                         --nargs;
 131                 }
 132         }
 133         for (unsigned int i = 0; i < nargs; ++i)
 134                 arguments.push_back(required);
 135 }
 136
 137
 138 void add_known_command(string const & command, string const & o1,
 139                        bool o2, docstring const & definition)
 140 {
 141         vector<ArgumentType> arguments;
 142         convertArgs(o1, o2, arguments);
 143         known_commands[command] = arguments;
 144         if (!definition.empty())
 145                 possible_textclass_commands[command] =
 146                         FullCommand(arguments, definition);
 147 }
 148
 149
 150 void add_known_environment(string const & environment, string const & o1,
 151                            bool o2, docstring const & beg, docstring const &end)
 152 {
 153         vector<ArgumentType> arguments;
 154         convertArgs(o1, o2, arguments);
 155         known_environments[environment] = arguments;
 156         if (!beg.empty() || ! end.empty())
 157                 possible_textclass_environments[environment] =
 158                         FullEnvironment(arguments, beg, end);
 159 }
 160
 161
 162 void add_known_theorem(string const & theorem, string const & o1,
 163                        bool o2, docstring const & definition)
 164 {
 165         vector<ArgumentType> arguments;
 166         convertArgs(o1, o2, arguments);
 167         if (!definition.empty())
 168                 possible_textclass_theorems[theorem] =
 169                         FullCommand(arguments, definition);
 170 }
 171
 172
 173 Layout const * findLayoutWithoutModule(TextClass const & textclass,
 174                                        string const & name, bool command)
 175 {
 176         DocumentClass::const_iterator it = textclass.begin();
 177         DocumentClass::const_iterator en = textclass.end();
 178         for (; it != en; ++it) {
 179                 if (it->latexname() == name &&
 180                     ((command && it->isCommand()) || (!command && it->isEnvironment())))
 181                         return &*it;
 182         }
 183         return 0;
 184 }
 185
 186
 187 InsetLayout const * findInsetLayoutWithoutModule(TextClass const & textclass,
 188                                                  string const & name, bool command)
 189 {
 190         DocumentClass::InsetLayouts::const_iterator it = textclass.insetLayouts().begin();
 191         DocumentClass::InsetLayouts::const_iterator en = textclass.insetLayouts().end();
 192         for (; it != en; ++it) {
 193                 if (it->second.latexname() == name &&
 194                     ((command && it->second.latextype() == InsetLayout::COMMAND) ||
 195                      (!command && it->second.latextype() == InsetLayout::ENVIRONMENT)))
 196                         return &(it->second);
 197         }
 198         return 0;
 199 }
 200
 201
 202 namespace {
 203
 204 typedef map<string, DocumentClassPtr> ModuleMap;
 205 ModuleMap modules;
 206
 207
 208 bool addModule(string const module, LayoutFile const & baseClass, LayoutModuleList & m, vector<string> & visited)
 209 {
 210         // avoid endless loop for circular dependency
 211         vector<string>::const_iterator const vb = visited.begin();
 212         vector<string>::const_iterator const ve = visited.end();
 213         if (find(vb, ve, module) != ve) {
 214                 cerr << "Circular dependency detected for module " << module << '\n';
 215                 return false;
 216         }
 217         LyXModule const * const lm = theModuleList[module];
 218         if (!lm) {
 219                 cerr << "Could not find module " << module << " in module list.\n";
 220                 return false;
 221         }
 222         bool foundone = false;
 223         LayoutModuleList::const_iterator const exclmodstart = baseClass.excludedModules().begin();
 224         LayoutModuleList::const_iterator const exclmodend = baseClass.excludedModules().end();
 225         LayoutModuleList::const_iterator const provmodstart = baseClass.providedModules().begin();
 226         LayoutModuleList::const_iterator const provmodend = baseClass.providedModules().end();
 227         vector<string> const reqs = lm->getRequiredModules();
 228         if (reqs.empty())
 229                 foundone = true;
 230         else {
 231                 LayoutModuleList::const_iterator mit = m.begin();
 232                 LayoutModuleList::const_iterator men = m.end();
 233                 vector<string>::const_iterator rit = reqs.begin();
 234                 vector<string>::const_iterator ren = reqs.end();
 235                 for (; rit != ren; ++rit) {
 236                         if (find(mit, men, *rit) != men) {
 237                                 foundone = true;
 238                                 break;
 239                         }
 240                         if (find(provmodstart, provmodend, *rit) != provmodend) {
 241                                 foundone = true;
 242                                 break;
 243                         }
 244                 }
 245                 if (!foundone) {
 246                         visited.push_back(module);
 247                         for (rit = reqs.begin(); rit != ren; ++rit) {
 248                                 if (find(exclmodstart, exclmodend, *rit) == exclmodend) {
 249                                         if (addModule(*rit, baseClass, m, visited)) {
 250                                                 foundone = true;
 251                                                 break;
 252                                         }
 253                                 }
 254                         }
 255                         visited.pop_back();
 256                 }
 257         }
 258         if (!foundone) {
 259                 cerr << "Could not add required modules for " << module << ".\n";
 260                 return false;
 261         }
 262         if (!m.moduleCanBeAdded(module, &baseClass))
 263                 return false;
 264         m.push_back(module);
 265         return true;
 266 }
 267
 268
 269 void initModules()
 270 {
 271         // Create list of dummy document classes if not already done.
 272         // This is needed since a module cannot be read on its own, only as
 273         // part of a document class.
 274         LayoutFile const & baseClass = LayoutFileList::get()[textclass.name()];
 275         static bool init = true;
 276         if (init) {
 277                 baseClass.load();
 278                 LyXModuleList::const_iterator const end = theModuleList.end();
 279                 LyXModuleList::const_iterator it = theModuleList.begin();
 280                 for (; it != end; ++it) {
 281                         string const module = it->getID();
 282                         LayoutModuleList m;
 283                         vector<string> v;
 284                         if (!addModule(module, baseClass, m, v))
 285                                 continue;
 286                         modules[module] = getDocumentClass(baseClass, m);
 287                 }
 288                 init = false;
 289         }
 290 }
 291
 292
 293 bool addModule(string const & module)
 294 {
 295         initModules();
 296         LayoutFile const & baseClass = LayoutFileList::get()[textclass.name()];
 297         if (!used_modules.moduleCanBeAdded(module, &baseClass))
 298                 return false;
 299         FileName layout_file = libFileSearch("layouts", module, "module");
 300         if (textclass.read(layout_file, TextClass::MODULE)) {
 301                 used_modules.push_back(module);
 302                 // speed up further searches:
 303                 // the module does not need to be checked anymore.
 304                 ModuleMap::iterator const it = modules.find(module);
 305                 if (it != modules.end())
 306                         modules.erase(it);
 307                 return true;
 308         }
 309         return false;
 310 }
 311
 312 }
 313
 314
 315 bool checkModule(string const & name, bool command)
 316 {
 317         // Cache to avoid slowdown by repated searches
 318         static set<string> failed[2];
 319
 320         // Only add the module if the command was actually defined in the LyX preamble
 321         bool theorem = false;
 322         if (command) {
 323                 if (possible_textclass_commands.find('\\' + name) == possible_textclass_commands.end())
 324                         return false;
 325         } else {
 326                 if (possible_textclass_environments.find(name) == possible_textclass_environments.end()) {
 327                         if (possible_textclass_theorems.find(name) != possible_textclass_theorems.end())
 328                                 theorem = true;
 329                         else
 330                                 return false;
 331                 }
 332         }
 333         if (failed[command].find(name) != failed[command].end())
 334                 return false;
 335
 336         initModules();
 337         LayoutFile const & baseClass = LayoutFileList::get()[textclass.name()];
 338
 339         // Try to find a module that defines the command.
 340         // Only add it if the definition can be found in the preamble of the
 341         // style that corresponds to the command. This is a heuristic and
 342         // different from the way how we parse the builtin commands of the
 343         // text class (in that case we only compare the name), but it is
 344         // needed since it is not unlikely that two different modules define a
 345         // command with the same name.
 346         ModuleMap::iterator const end = modules.end();
 347         for (ModuleMap::iterator it = modules.begin(); it != end; ++it) {
 348                 string const module = it->first;
 349                 if (used_modules.moduleConflicts(module, &baseClass))
 350                         continue;
 351                 if (findLayoutWithoutModule(textclass, name, command))
 352                         continue;
 353                 if (findInsetLayoutWithoutModule(textclass, name, command))
 354                         continue;
 355                 DocumentClassConstPtr c = it->second;
 356                 Layout const * layout = findLayoutWithoutModule(*c, name, command);
 357                 InsetLayout const * insetlayout = layout ? 0 :
 358                         findInsetLayoutWithoutModule(*c, name, command);
 359                 docstring preamble;
 360                 if (layout)
 361                         preamble = layout->preamble();
 362                 else if (insetlayout)
 363                         preamble = insetlayout->preamble();
 364                 if (preamble.empty())
 365                         continue;
 366                 bool add = false;
 367                 if (command) {
 368                         FullCommand const & cmd =
 369                                 possible_textclass_commands['\\' + name];
 370                         if (preamble.find(cmd.def) != docstring::npos)
 371                                 add = true;
 372                 } else if (theorem) {
 373                         FullCommand const & thm =
 374                                 possible_textclass_theorems[name];
 375                         if (preamble.find(thm.def) != docstring::npos)
 376                                 add = true;
 377                 } else {
 378                         FullEnvironment const & env =
 379                                 possible_textclass_environments[name];
 380                         if (preamble.find(env.beg) != docstring::npos &&
 381                             preamble.find(env.end) != docstring::npos)
 382                                 add = true;
 383                 }
 384                 if (add) {
 385                         FileName layout_file = libFileSearch("layouts", module, "module");
 386                         if (textclass.read(layout_file, TextClass::MODULE)) {
 387                                 used_modules.push_back(module);
 388                                 // speed up further searches:
 389                                 // the module does not need to be checked anymore.
 390                                 modules.erase(it);
 391                                 return true;
 392                         }
 393                 }
 394         }
 395         failed[command].insert(name);
 396         return false;
 397 }
 398
 399
 400 bool isProvided(string const & name)
 401 {
 402         // This works only for features that are named like the LaTeX packages
 403         return textclass.provides(name) || preamble.isPackageUsed(name);
 404 }
 405
 406
 407 bool noweb_mode = false;
 408 bool pdflatex = false;
 409 bool xetex = false;
 410 bool is_nonCJKJapanese = false;
 411 bool roundtrip = false;
 412
 413
 414 namespace {
 415
 416
 417 /*!
 418  * Read one command definition from the syntax file
 419  */
 420 void read_command(Parser & p, string command, CommandMap & commands)
 421 {
 422         if (p.next_token().asInput() == "*") {
 423                 p.get_token();
 424                 command += '*';
 425         }
 426         vector<ArgumentType> arguments;
 427         while (p.next_token().cat() == catBegin ||
 428                p.next_token().asInput() == "[") {
 429                 if (p.next_token().cat() == catBegin) {
 430                         string const arg = p.getArg('{', '}');
 431                         if (arg == "translate")
 432                                 arguments.push_back(required);
 433                         else if (arg == "group")
 434                                 arguments.push_back(req_group);
 435                         else if (arg == "item")
 436                                 arguments.push_back(item);
 437                         else if (arg == "displaymath")
 438                                 arguments.push_back(displaymath);
 439                         else
 440                                 arguments.push_back(verbatim);
 441                 } else {
 442                         string const arg = p.getArg('[', ']');
 443                         if (arg == "group")
 444                                 arguments.push_back(opt_group);
 445                         else
 446                                 arguments.push_back(optional);
 447                 }
 448         }
 449         commands[command] = arguments;
 450 }
 451
 452
 453 /*!
 454  * Read a class of environments from the syntax file
 455  */
 456 void read_environment(Parser & p, string const & begin,
 457                       CommandMap & environments)
 458 {
 459         string environment;
 460         while (p.good()) {
 461                 Token const & t = p.get_token();
 462                 if (t.cat() == catLetter)
 463                         environment += t.asInput();
 464                 else if (!environment.empty()) {
 465                         p.putback();
 466                         read_command(p, environment, environments);
 467                         environment.erase();
 468                 }
 469                 if (t.cat() == catEscape && t.asInput() == "\\end") {
 470                         string const end = p.getArg('{', '}');
 471                         if (end == begin)
 472                                 return;
 473                 }
 474         }
 475 }
 476
 477
 478 /*!
 479  * Read a list of TeX commands from a reLyX compatible syntax file.
 480  * Since this list is used after all commands that have a LyX counterpart
 481  * are handled, it does not matter that the "syntax.default" file
 482  * has almost all of them listed. For the same reason the reLyX-specific
 483  * reLyXre environment is ignored.
 484  */
 485 void read_syntaxfile(FileName const & file_name)
 486 {
 487         ifdocstream is(file_name.toFilesystemEncoding().c_str());
 488         if (!is.good()) {
 489                 cerr << "Could not open syntax file \"" << file_name
 490                      << "\" for reading." << endl;
 491                 exit(2);
 492         }
 493         // We can use our TeX parser, since the syntax of the layout file is
 494         // modeled after TeX.
 495         // Unknown tokens are just silently ignored, this helps us to skip some
 496         // reLyX specific things.
 497         Parser p(is);
 498         while (p.good()) {
 499                 Token const & t = p.get_token();
 500                 if (t.cat() == catEscape) {
 501                         string const command = t.asInput();
 502                         if (command == "\\begin") {
 503                                 string const name = p.getArg('{', '}');
 504                                 if (name == "environments" || name == "reLyXre")
 505                                         // We understand "reLyXre", but it is
 506                                         // not as powerful as "environments".
 507                                         read_environment(p, name,
 508                                                 known_environments);
 509                                 else if (name == "mathenvironments")
 510                                         read_environment(p, name,
 511                                                 known_math_environments);
 512                         } else {
 513                                 read_command(p, command, known_commands);
 514                         }
 515                 }
 516         }
 517 }
 518
 519
 520 string documentclass;
 521 string default_encoding;
 522 string syntaxfile;
 523 bool copy_files = false;
 524 bool overwrite_files = false;
 525 bool skip_children = false;
 526 int error_code = 0;
 527
 528 /// return the number of arguments consumed
 529 typedef int (*cmd_helper)(string const &, string const &);
 530
 531
 532 int parse_help(string const &, string const &)
 533 {
 534         cerr << "Usage: tex2lyx [options] infile.tex [outfile.lyx]\n"
 535                 "Options:\n"
 536                 "\t-c textclass       Declare the textclass.\n"
 537                 "\t-m mod1[,mod2...]  Load the given modules.\n"
 538                 "\t-copyfiles         Copy all included files to the directory of outfile.lyx.\n"
 539                 "\t-e encoding        Set the default encoding (latex name).\n"
 540                 "\t-f                 Force overwrite of .lyx files.\n"
 541                 "\t-help              Print this message and quit.\n"
 542                 "\t-n                 translate literate programming (noweb, sweave,... ) file.\n"
 543                 "\t-skipchildren      Do not translate included child documents.\n"
 544                 "\t-roundtrip         re-export created .lyx file infile.lyx.lyx to infile.lyx.tex.\n"
 545                 "\t-s syntaxfile      read additional syntax file.\n"
 546                 "\t-sysdir SYSDIR     Set system directory to SYSDIR.\n"
 547                 "\t                   Default: " << package().system_support() << "\n"
 548                 "\t-userdir USERDIR   Set user directory to USERDIR.\n"
 549                 "\t                   Default: " << package().user_support() << "\n"
 550                 "\t-version           Summarize version and build info.\n"
 551                 "Paths:\n"
 552                 "\tThe program searches for the files \"encodings\", \"lyxmodules.lst\",\n"
 553                 "\t\"textclass.lst\", \"syntax.default\", and \"unicodesymbols\", first in\n"
 554                 "\t\"USERDIR\", then in \"SYSDIR\". The subdirectories \"USERDIR/layouts\"\n"
 555                 "\tand \"SYSDIR/layouts\" are searched for layout and module files.\n"
 556                 "Check the tex2lyx man page for more details."
 557              << endl;
 558         exit(error_code);
 559 }
 560
 561
 562 int parse_version(string const &, string const &)
 563 {
 564         lyxerr << "tex2lyx " << lyx_version
 565                << " (" << lyx_release_date << ")" << endl;
 566         lyxerr << "Built on " << __DATE__ << ", " << __TIME__ << endl;
 567
 568         lyxerr << lyx_version_info << endl;
 569         exit(error_code);
 570 }
 571
 572
 573 void error_message(string const & message)
 574 {
 575         cerr << "tex2lyx: " << message << "\n\n";
 576         error_code = 1;
 577         parse_help(string(), string());
 578 }
 579
 580
 581 int parse_class(string const & arg, string const &)
 582 {
 583         if (arg.empty())
 584                 error_message("Missing textclass string after -c switch");
 585         documentclass = arg;
 586         return 1;
 587 }
 588
 589
 590 int parse_module(string const & arg, string const &)
 591 {
 592         if (arg.empty())
 593                 error_message("Missing modules string after -m switch");
 594         split(arg, preloaded_modules, ',');
 595         return 1;
 596 }
 597
 598
 599 int parse_encoding(string const & arg, string const &)
 600 {
 601         if (arg.empty())
 602                 error_message("Missing encoding string after -e switch");
 603         default_encoding = arg;
 604         return 1;
 605 }
 606
 607
 608 int parse_syntaxfile(string const & arg, string const &)
 609 {
 610         if (arg.empty())
 611                 error_message("Missing syntaxfile string after -s switch");
 612         syntaxfile = internal_path(arg);
 613         return 1;
 614 }
 615
 616
 617 // Filled with the command line arguments "foo" of "-sysdir foo" or
 618 // "-userdir foo".
 619 string cl_system_support;
 620 string cl_user_support;
 621
 622
 623 int parse_sysdir(string const & arg, string const &)
 624 {
 625         if (arg.empty())
 626                 error_message("Missing directory for -sysdir switch");
 627         cl_system_support = internal_path(arg);
 628         return 1;
 629 }
 630
 631
 632 int parse_userdir(string const & arg, string const &)
 633 {
 634         if (arg.empty())
 635                 error_message("Missing directory for -userdir switch");
 636         cl_user_support = internal_path(arg);
 637         return 1;
 638 }
 639
 640
 641 int parse_force(string const &, string const &)
 642 {
 643         overwrite_files = true;
 644         return 0;
 645 }
 646
 647
 648 int parse_noweb(string const &, string const &)
 649 {
 650         noweb_mode = true;
 651         return 0;
 652 }
 653
 654
 655 int parse_skipchildren(string const &, string const &)
 656 {
 657         skip_children = true;
 658         return 0;
 659 }
 660
 661
 662 int parse_roundtrip(string const &, string const &)
 663 {
 664         roundtrip = true;
 665         return 0;
 666 }
 667
 668
 669 int parse_copyfiles(string const &, string const &)
 670 {
 671         copy_files = true;
 672         return 0;
 673 }
 674
 675
 676 void easyParse(int & argc, char * argv[])
 677 {
 678         map<string, cmd_helper> cmdmap;
 679
 680         cmdmap["-h"] = parse_help;
 681         cmdmap["-help"] = parse_help;
 682         cmdmap["--help"] = parse_help;
 683         cmdmap["-v"] = parse_version;
 684         cmdmap["-version"] = parse_version;
 685         cmdmap["--version"] = parse_version;
 686         cmdmap["-c"] = parse_class;
 687         cmdmap["-m"] = parse_module;
 688         cmdmap["-e"] = parse_encoding;
 689         cmdmap["-f"] = parse_force;
 690         cmdmap["-s"] = parse_syntaxfile;
 691         cmdmap["-n"] = parse_noweb;
 692         cmdmap["-skipchildren"] = parse_skipchildren;
 693         cmdmap["-sysdir"] = parse_sysdir;
 694         cmdmap["-userdir"] = parse_userdir;
 695         cmdmap["-roundtrip"] = parse_roundtrip;
 696         cmdmap["-copyfiles"] = parse_copyfiles;
 697
 698         for (int i = 1; i < argc; ++i) {
 699                 map<string, cmd_helper>::const_iterator it
 700                         = cmdmap.find(argv[i]);
 701
 702                 // don't complain if not found - may be parsed later
 703                 if (it == cmdmap.end()) {
 704                         if (argv[i][0] == '-')
 705                                 error_message(string("Unknown option `") + argv[i] + "'.");
 706                         else
 707                                 continue;
 708                 }
 709
 710                 string arg = (i + 1 < argc) ? os::utf8_argv(i + 1) : string();
 711                 string arg2 = (i + 2 < argc) ? os::utf8_argv(i + 2) : string();
 712
 713                 int const remove = 1 + it->second(arg, arg2);
 714
 715                 // Now, remove used arguments by shifting
 716                 // the following ones remove places down.
 717                 os::remove_internal_args(i, remove);
 718                 argc -= remove;
 719                 for (int j = i; j < argc; ++j)
 720                         argv[j] = argv[j + remove];
 721                 --i;
 722         }
 723 }
 724
 725
 726 // path of the first parsed file
 727 string masterFilePathLyX;
 728 string masterFilePathTeX;
 729 // path of the currently parsed file
 730 string parentFilePathTeX;
 731
 732 } // anonymous namespace
 733
 734
 735 string getMasterFilePath(bool input)
 736 {
 737         return input ? masterFilePathTeX : masterFilePathLyX;
 738 }
 739
 740 string getParentFilePath(bool input)
 741 {
 742         if (input)
 743                 return parentFilePathTeX;
 744         string const rel = to_utf8(makeRelPath(from_utf8(masterFilePathTeX),
 745                                                from_utf8(parentFilePathTeX)));
 746         if (rel.substr(0, 3) == "../") {
 747                 // The parent is not below the master - keep the path
 748                 return parentFilePathTeX;
 749         }
 750         return makeAbsPath(rel, masterFilePathLyX).absFileName();
 751 }
 752
 753
 754 bool copyFiles()
 755 {
 756         return copy_files;
 757 }
 758
 759
 760 bool overwriteFiles()
 761 {
 762         return overwrite_files;
 763 }
 764
 765
 766 bool skipChildren()
 767 {
 768         return skip_children;
 769 }
 770
 771
 772 bool roundtripMode()
 773 {
 774         return roundtrip;
 775 }
 776
 777
 778 namespace {
 779
 780 /*!
 781  *  Reads tex input from \a is and writes lyx output to \a os.
 782  *  Uses some common settings for the preamble, so this should only
 783  *  be used more than once for included documents.
 784  *  Caution: Overwrites the existing preamble settings if the new document
 785  *  contains a preamble.
 786  *  You must ensure that \p parentFilePathTeX is properly set before calling
 787  *  this function!
 788  */
 789 bool tex2lyx(idocstream & is, ostream & os, string encoding)
 790 {
 791         // Set a sensible default encoding.
 792         // This is used until an encoding command is found.
 793         // For child documents use the encoding of the master, else ISO8859-1,
 794         // (formerly known by its latex name latin1), since ISO8859-1 does not
 795         // cause an iconv error if the actual encoding is different (bug 7509).
 796         if (encoding.empty()) {
 797                 if (preamble.inputencoding() == "auto")
 798                         encoding = "ISO8859-1";
 799                 else {
 800                         Encoding const * const enc = encodings.fromLyXName(
 801                                 preamble.inputencoding(), true);
 802                         encoding = enc->iconvName();
 803                 }
 804         }
 805
 806         Parser p(is);
 807         p.setEncoding(encoding);
 808         //p.dump();
 809
 810         preamble.parse(p, documentclass, textclass);
 811         list<string> removed_modules;
 812         LayoutFile const & baseClass = LayoutFileList::get()[textclass.name()];
 813         if (!used_modules.adaptToBaseClass(&baseClass, removed_modules)) {
 814                 cerr << "Could not load default modules for text class." << endl;
 815                 return false;
 816         }
 817
 818         // Load preloaded modules.
 819         // This needs to be done after the preamble is parsed, since the text
 820         // class may not be known before. It neds to be done before parsing
 821         // body, since otherwise the commands/environments provided by the
 822         // modules would be parsed as ERT.
 823         for (size_t i = 0; i < preloaded_modules.size(); ++i) {
 824                 if (!addModule(preloaded_modules[i])) {
 825                         cerr << "Error: Could not load module \""
 826                              << preloaded_modules[i] << "\"." << endl;
 827                         return false;
 828                 }
 829         }
 830         // Ensure that the modules are not loaded again for included files
 831         preloaded_modules.clear();
 832
 833         active_environments.push_back("document");
 834         Context context(true, textclass);
 835         stringstream ss;
 836         // store the document language in the context to be able to handle the
 837         // commands like \foreignlanguage and \textenglish etc.
 838         context.font.language = preamble.defaultLanguage();
 839         // parse the main text
 840         parse_text(p, ss, FLAG_END, true, context);
 841         if (Context::empty)
 842                 // Empty document body. LyX needs at least one paragraph.
 843                 context.check_layout(ss);
 844         context.check_end_layout(ss);
 845         ss << "\n\\end_body\n\\end_document\n";
 846         active_environments.pop_back();
 847
 848         // We know the used modules only after parsing the full text
 849         if (!used_modules.empty()) {
 850                 LayoutModuleList::const_iterator const end = used_modules.end();
 851                 LayoutModuleList::const_iterator it = used_modules.begin();
 852                 for (; it != end; ++it)
 853                         preamble.addModule(*it);
 854         }
 855         if (!preamble.writeLyXHeader(os, !active_environments.empty())) {
 856                 cerr << "Could not write LyX file header." << endl;
 857                 return false;
 858         }
 859
 860         ss.seekg(0);
 861         os << ss.str();
 862 #ifdef TEST_PARSER
 863         p.reset();
 864         ofdocstream parsertest("parsertest.tex");
 865         while (p.good())
 866                 parsertest << p.get_token().asInput();
 867         // <origfile> and parsertest.tex should now have identical content
 868 #endif
 869         return true;
 870 }
 871
 872
 873 /// convert TeX from \p infilename to LyX and write it to \p os
 874 bool tex2lyx(FileName const & infilename, ostream & os, string const & encoding)
 875 {
 876         ifdocstream is;
 877         // forbid buffering on this stream
 878         is.rdbuf()->pubsetbuf(0,0);
 879         is.open(infilename.toFilesystemEncoding().c_str());
 880         if (!is.good()) {
 881                 cerr << "Could not open input file \"" << infilename
 882                      << "\" for reading." << endl;
 883                 return false;
 884         }
 885         string const oldParentFilePath = parentFilePathTeX;
 886         parentFilePathTeX = onlyPath(infilename.absFileName());
 887         bool retval = tex2lyx(is, os, encoding);
 888         parentFilePathTeX = oldParentFilePath;
 889         return retval;
 890 }
 891
 892 } // anonymous namespace
 893
 894
 895 bool tex2lyx(string const & infilename, FileName const & outfilename,
 896              string const & encoding)
 897 {
 898         if (outfilename.isReadableFile()) {
 899                 if (overwrite_files) {
 900                         cerr << "Overwriting existing file "
 901                              << outfilename << endl;
 902                 } else {
 903                         cerr << "Not overwriting existing file "
 904                              << outfilename << endl;
 905                         return false;
 906                 }
 907         } else {
 908                 cerr << "Creating file " << outfilename << endl;
 909         }
 910         ofstream os(outfilename.toFilesystemEncoding().c_str());
 911         if (!os.good()) {
 912                 cerr << "Could not open output file \"" << outfilename
 913                      << "\" for writing." << endl;
 914                 return false;
 915         }
 916 #ifdef FILEDEBUG
 917         cerr << "Input file: " << infilename << "\n";
 918         cerr << "Output file: " << outfilename << "\n";
 919 #endif
 920         return tex2lyx(FileName(infilename), os, encoding);
 921 }
 922
 923
 924 bool tex2tex(string const & infilename, FileName const & outfilename,
 925              string const & encoding)
 926 {
 927         if (!tex2lyx(infilename, outfilename, encoding))
 928                 return false;
 929         string command = quoteName(package().lyx_binary().toFilesystemEncoding());
 930         if (overwrite_files)
 931                 command += " -f main";
 932         else
 933                 command += " -f none";
 934         if (pdflatex)
 935                 command += " -e pdflatex ";
 936         else if (xetex)
 937                 command += " -e xetex ";
 938         else
 939                 command += " -e latex ";
 940         command += quoteName(outfilename.toFilesystemEncoding());
 941         Systemcall one;
 942         if (one.startscript(Systemcall::Wait, command) == 0)
 943                 return true;
 944         cerr << "Error: Running '" << command << "' failed." << endl;
 945         return false;
 946 }
 947
 948 } // namespace lyx
 949
 950
 951 int main(int argc, char * argv[])
 952 {
 953         using namespace lyx;
 954
 955         //setlocale(LC_CTYPE, "");
 956
 957         lyxerr.setStream(cerr);
 958
 959         os::init(argc, argv);
 960
 961         try {
 962                 init_package(internal_path(os::utf8_argv(0)), string(), string());
 963         } catch (ExceptionMessage const & message) {
 964                 cerr << to_utf8(message.title_) << ":\n"
 965                      << to_utf8(message.details_) << endl;
 966                 if (message.type_ == ErrorException)
 967                         return EXIT_FAILURE;
 968         }
 969
 970         easyParse(argc, argv);
 971
 972         if (argc <= 1)
 973                 error_message("Not enough arguments.");
 974
 975         try {
 976                 init_package(internal_path(os::utf8_argv(0)),
 977                              cl_system_support, cl_user_support);
 978         } catch (ExceptionMessage const & message) {
 979                 cerr << to_utf8(message.title_) << ":\n"
 980                      << to_utf8(message.details_) << endl;
 981                 if (message.type_ == ErrorException)
 982                         return EXIT_FAILURE;
 983         }
 984
 985         // Now every known option is parsed. Look for input and output
 986         // file name (the latter is optional).
 987         string infilename = internal_path(os::utf8_argv(1));
 988         infilename = makeAbsPath(infilename).absFileName();
 989
 990         string outfilename;
 991         if (argc > 2) {
 992                 outfilename = internal_path(os::utf8_argv(2));
 993                 if (outfilename != "-")
 994                         outfilename = makeAbsPath(outfilename).absFileName();
 995                 if (roundtrip) {
 996                         if (outfilename == "-") {
 997                                 cerr << "Error: Writing to standard output is "
 998                                         "not supported in roundtrip mode."
 999                                      << endl;
1000                                 return EXIT_FAILURE;
1001                         }
1002                         string texfilename = changeExtension(outfilename, ".tex");
1003                         if (equivalent(FileName(infilename), FileName(texfilename))) {
1004                                 cerr << "Error: The input file `" << infilename
1005                                      << "´ would be overwritten by the TeX file exported from `"
1006                                      << outfilename << "´ in roundtrip mode." << endl;
1007                                 return EXIT_FAILURE;
1008                         }
1009                 }
1010         } else if (roundtrip) {
1011                 // avoid overwriting the input file
1012                 outfilename = changeExtension(infilename, ".lyx.lyx");
1013         } else
1014                 outfilename = changeExtension(infilename, ".lyx");
1015
1016         // Read the syntax tables
1017         FileName const system_syntaxfile = libFileSearch("", "syntax.default");
1018         if (system_syntaxfile.empty()) {
1019                 cerr << "Error: Could not find syntax file \"syntax.default\"." << endl;
1020                 return EXIT_FAILURE;
1021         }
1022         read_syntaxfile(system_syntaxfile);
1023         if (!syntaxfile.empty())
1024                 read_syntaxfile(makeAbsPath(syntaxfile));
1025
1026         // Read the encodings table.
1027         FileName const symbols_path = libFileSearch(string(), "unicodesymbols");
1028         if (symbols_path.empty()) {
1029                 cerr << "Error: Could not find file \"unicodesymbols\"."
1030                      << endl;
1031                 return EXIT_FAILURE;
1032         }
1033         FileName const enc_path = libFileSearch(string(), "encodings");
1034         if (enc_path.empty()) {
1035                 cerr << "Error: Could not find file \"encodings\"."
1036                      << endl;
1037                 return EXIT_FAILURE;
1038         }
1039         encodings.read(enc_path, symbols_path);
1040         if (!default_encoding.empty()) {
1041                 Encoding const * const enc = encodings.fromLaTeXName(
1042                         default_encoding, Encoding::any, true);
1043                 if (!enc)
1044                         error_message("Unknown LaTeX encoding `" + default_encoding + "'");
1045                 default_encoding = enc->iconvName();
1046         }
1047
1048         // Load the layouts
1049         LayoutFileList::get().read();
1050         //...and the modules
1051         theModuleList.read();
1052
1053         // The real work now.
1054         masterFilePathTeX = onlyPath(infilename);
1055         parentFilePathTeX = masterFilePathTeX;
1056         if (outfilename == "-") {
1057                 // assume same directory as input file
1058                 masterFilePathLyX = masterFilePathTeX;
1059                 if (tex2lyx(FileName(infilename), cout, default_encoding))
1060                         return EXIT_SUCCESS;
1061         } else {
1062                 masterFilePathLyX = onlyPath(outfilename);
1063                 if (copy_files) {
1064                         FileName const path(masterFilePathLyX);
1065                         if (!path.isDirectory()) {
1066                                 if (!path.createPath()) {
1067                                         cerr << "Warning: Could not create directory for file `"
1068                                              << masterFilePathLyX << "´." << endl;
1069                                         return EXIT_FAILURE;
1070                                 }
1071                         }
1072                 }
1073                 if (roundtrip) {
1074                         if (tex2tex(infilename, FileName(outfilename), default_encoding))
1075                                 return EXIT_SUCCESS;
1076                 } else {
1077                         if (tex2lyx(infilename, FileName(outfilename), default_encoding))
1078                                 return EXIT_SUCCESS;
1079                 }
1080         }
1081         return EXIT_FAILURE;
1082 }
1083
1084 // }])