src/output_latex.cpp

   1 /**
   2  * \file output_latex.cpp
   3  * This file is part of LyX, the document processor.
   4  * Licence details can be found in the file COPYING.
   5  *
   6  * \author Lars Gullik Bjønnes
   7  *
   8  * Full author contact details are available in file CREDITS.
   9  */
  10
  11 #include <config.h>
  12
  13 #include "output_latex.h"
  14
  15 #include "Buffer.h"
  16 #include "BufferParams.h"
  17 #include "Encoding.h"
  18 #include "InsetList.h"
  19 #include "Language.h"
  20 #include "Layout.h"
  21 #include "LyXRC.h"
  22 #include "OutputParams.h"
  23 #include "Paragraph.h"
  24 #include "paragraph_funcs.h"
  25 #include "ParagraphParameters.h"
  26 #include "TextClass.h"
  27 #include "TexRow.h"
  28 #include "VSpace.h"
  29
  30 #include "insets/InsetBibitem.h"
  31 #include "insets/InsetOptArg.h"
  32
  33 #include "support/lassert.h"
  34 #include "support/debug.h"
  35 #include "support/lstrings.h"
  36
  37 #include <boost/next_prior.hpp>
  38
  39 using namespace std;
  40 using namespace lyx::support;
  41
  42
  43 namespace lyx {
  44
  45 namespace {
  46
  47 enum OpenEncoding {
  48                 none,
  49                 inputenc,
  50                 CJK
  51 };
  52
  53 static int open_encoding_ = none;
  54 static int cjk_inherited_ = 0;
  55
  56
  57 ParagraphList::const_iterator
  58 TeXEnvironment(Buffer const & buf,
  59                Text const & text,
  60                ParagraphList::const_iterator pit,
  61                odocstream & os, TexRow & texrow,
  62                OutputParams const & runparams);
  63
  64
  65 ParagraphList::const_iterator
  66 TeXDeeper(Buffer const & buf,
  67           Text const & text,
  68           ParagraphList::const_iterator pit,
  69           odocstream & os, TexRow & texrow,
  70           OutputParams const & runparams)
  71 {
  72         LYXERR(Debug::LATEX, "TeXDeeper...     " << &*pit);
  73         ParagraphList::const_iterator par = pit;
  74
  75         ParagraphList const & paragraphs = text.paragraphs();
  76
  77         while (par != paragraphs.end() &&
  78                                         par->params().depth() == pit->params().depth()) {
  79                 // FIXME This test should not be necessary.
  80                 // We should perhaps issue an error if it is.
  81                 Layout const & style = par->forcePlainLayout() ?
  82                         buf.params().documentClass().plainLayout() : par->layout();
  83                 if (style.isEnvironment()) {
  84                         par = TeXEnvironment(buf, text, par,
  85                                              os, texrow, runparams);
  86                 } else {
  87                         par = TeXOnePar(buf, text, par,
  88                                              os, texrow, runparams);
  89                 }
  90         }
  91         LYXERR(Debug::LATEX, "TeXDeeper...done ");
  92
  93         return par;
  94 }
  95
  96
  97 ParagraphList::const_iterator
  98 TeXEnvironment(Buffer const & buf,
  99                Text const & text,
 100                ParagraphList::const_iterator pit,
 101                odocstream & os, TexRow & texrow,
 102                OutputParams const & runparams)
 103 {
 104         LYXERR(Debug::LATEX, "TeXEnvironment...     " << &*pit);
 105
 106         BufferParams const & bparams = buf.params();
 107
 108         // FIXME This test should not be necessary.
 109         // We should perhaps issue an error if it is.
 110         Layout const & style = pit->forcePlainLayout() ?
 111                 bparams.documentClass().plainLayout() : pit->layout();
 112
 113         ParagraphList const & paragraphs = text.paragraphs();
 114
 115         Language const * const par_language = pit->getParLanguage(bparams);
 116         Language const * const doc_language = bparams.language;
 117         Language const * const prev_par_language =
 118                 (pit != paragraphs.begin())
 119                 ? boost::prior(pit)->getParLanguage(bparams)
 120                 : doc_language;
 121         if (par_language->babel() != prev_par_language->babel()) {
 122
 123                 if (!lyxrc.language_command_end.empty() &&
 124                     prev_par_language->babel() != doc_language->babel() &&
 125                     !prev_par_language->babel().empty()) {
 126                         os << from_ascii(subst(
 127                                 lyxrc.language_command_end,
 128                                 "$$lang",
 129                                 prev_par_language->babel()))
 130                            // the '%' is necessary to prevent unwanted whitespace
 131                            << "%\n";
 132                         texrow.newline();
 133                 }
 134
 135                 if ((lyxrc.language_command_end.empty() ||
 136                      par_language->babel() != doc_language->babel()) &&
 137                     !par_language->babel().empty()) {
 138                         os << from_ascii(subst(
 139                                 lyxrc.language_command_begin,
 140                                 "$$lang",
 141                                 par_language->babel()))
 142                            // the '%' is necessary to prevent unwanted whitespace
 143                            << "%\n";
 144                         texrow.newline();
 145                 }
 146         }
 147
 148         bool leftindent_open = false;
 149         if (!pit->params().leftIndent().zero()) {
 150                 os << "\\begin{LyXParagraphLeftIndent}{"
 151                    << from_ascii(pit->params().leftIndent().asLatexString())
 152                    << "}\n";
 153                 texrow.newline();
 154                 leftindent_open = true;
 155         }
 156
 157         if (style.isEnvironment()) {
 158                 os << "\\begin{" << from_ascii(style.latexname()) << '}';
 159                 if (style.optionalargs > 0) {
 160                         int ret = latexOptArgInsets(*pit, os, runparams,
 161                                                     style.optionalargs);
 162                         while (ret > 0) {
 163                                 texrow.newline();
 164                                 --ret;
 165                         }
 166                 }
 167                 if (style.latextype == LATEX_LIST_ENVIRONMENT) {
 168                         os << '{'
 169                            << pit->params().labelWidthString()
 170                            << "}\n";
 171                 } else if (style.labeltype == LABEL_BIBLIO) {
 172                         if (pit->params().labelWidthString().empty())
 173                                 os << '{' << bibitemWidest(buf) << "}\n";
 174                         else
 175                                 os << '{'
 176                                   << pit->params().labelWidthString()
 177                                   << "}\n";
 178                 } else
 179                         os << from_ascii(style.latexparam()) << '\n';
 180                 texrow.newline();
 181         }
 182
 183         // in multilingual environments, the CJK tags have to be nested properly
 184         bool cjk_nested = false;
 185         if (par_language->encoding()->package() == Encoding::CJK &&
 186             open_encoding_ != CJK && pit->isMultiLingual(bparams)) {
 187                 if (prev_par_language->encoding()->package() == Encoding::CJK)
 188                         os << "\\begin{CJK}{" << from_ascii(par_language->encoding()->latexName())
 189                            << "}{" << from_ascii(bparams.fontsCJK) << "}%\n";
 190                 open_encoding_ = CJK;
 191                 cjk_nested = true;
 192                 texrow.newline();
 193         }
 194
 195         ParagraphList::const_iterator par = pit;
 196         do {
 197                 par = TeXOnePar(buf, text, par, os, texrow, runparams);
 198
 199                 if (par == paragraphs.end()) {
 200                         // Make sure that the last paragraph is
 201                         // correctly terminated (because TeXOnePar does
 202                         // not add a \n in this case)
 203                         os << '\n';
 204                         texrow.newline();
 205                 } else if (par->params().depth() > pit->params().depth()) {
 206                         if (par->layout().isParagraph()) {
 207                           // Thinko!
 208                           // How to handle this? (Lgb)
 209                           //&& !suffixIs(os, "\n\n")
 210
 211                                 // There should be at least one '\n' already
 212                                 // but we need there to be two for Standard
 213                                 // paragraphs that are depth-increment'ed to be
 214                                 // output correctly.  However, tables can
 215                                 // also be paragraphs so don't adjust them.
 216                                 // ARRae
 217                                 // Thinkee:
 218                                 // Will it ever harm to have one '\n' too
 219                                 // many? i.e. that we sometimes will have
 220                                 // three in a row. (Lgb)
 221                                 os << '\n';
 222                                 texrow.newline();
 223                         }
 224                         par = TeXDeeper(buf, text, par, os, texrow,
 225                                         runparams);
 226                 }
 227         } while (par != paragraphs.end()
 228                  && par->layout() == pit->layout()
 229                  && par->params().depth() == pit->params().depth()
 230                  && par->params().leftIndent() == pit->params().leftIndent());
 231
 232         if (open_encoding_ == CJK && cjk_nested) {
 233                 // We need to close the encoding even if it does not change
 234                 // to do correct environment nesting
 235                 os << "\\end{CJK}\n";
 236                 texrow.newline();
 237                 open_encoding_ = none;
 238         }
 239
 240         if (style.isEnvironment()) {
 241                 os << "\\end{" << from_ascii(style.latexname()) << "}\n";
 242                 texrow.newline();
 243         }
 244
 245         if (leftindent_open) {
 246                 os << "\\end{LyXParagraphLeftIndent}\n";
 247                 texrow.newline();
 248         }
 249
 250         if (par != paragraphs.end())
 251                 LYXERR(Debug::LATEX, "TeXEnvironment...done " << &*par);
 252
 253         return par;
 254 }
 255
 256 } // namespace anon
 257
 258
 259 int latexOptArgInsets(Paragraph const & par, odocstream & os,
 260         OutputParams const & runparams, int number)
 261 {
 262         int lines = 0;
 263
 264         InsetList::const_iterator it = par.insetList().begin();
 265         InsetList::const_iterator end = par.insetList().end();
 266         for (; it != end && number > 0 ; ++it) {
 267                 if (it->inset->lyxCode() == OPTARG_CODE) {
 268                         InsetOptArg * ins =
 269                                 static_cast<InsetOptArg *>(it->inset);
 270                         lines += ins->latexOptional(os, runparams);
 271                         --number;
 272                 }
 273         }
 274         return lines;
 275 }
 276
 277 // FIXME: this should be anonymous
 278 ParagraphList::const_iterator TeXOnePar(Buffer const & buf,
 279           Text const & text,
 280           ParagraphList::const_iterator const pit,
 281           odocstream & os, TexRow & texrow,
 282           OutputParams const & runparams_in,
 283           string const & everypar,
 284           int start_pos, int end_pos)
 285 {
 286         LYXERR(Debug::LATEX, "TeXOnePar...     " << &*pit << " '"
 287                 << everypar << "'");
 288         BufferParams const & bparams = buf.params();
 289         ParagraphList const & paragraphs = text.paragraphs();
 290
 291         ParagraphList::const_iterator const priorpit =
 292                 pit == paragraphs.begin() ? pit : boost::prior(pit);
 293         ParagraphList::const_iterator const nextpit =
 294                 pit == paragraphs.end() ? pit : boost::next(pit);
 295
 296         OutputParams runparams = runparams_in;
 297         runparams.isLastPar = nextpit == paragraphs.end();
 298
 299         if (runparams.verbatim) {
 300                 int const dist = distance(paragraphs.begin(), pit);
 301                 Font const outerfont = outerFont(dist, paragraphs);
 302
 303                 // No newline if only one paragraph in this lyxtext
 304                 if (dist > 0) {
 305                         os << '\n';
 306                         texrow.newline();
 307                 }
 308
 309                 /*bool need_par = */ pit->latex(bparams, outerfont,
 310                         os, texrow, runparams, start_pos, end_pos);
 311                 return nextpit;
 312         }
 313
 314         // FIXME This check should not really be needed.
 315         // Perhaps we should issue an error if it is.
 316         Layout const style = pit->forcePlainLayout() ?
 317                 bparams.documentClass().plainLayout() : pit->layout();
 318
 319         runparams.moving_arg |= style.needprotect;
 320
 321         bool const maintext = text.isMainText(buf);
 322         // we are at the beginning of an inset and CJK is already open;
 323         // we count inheritation levels to get the inset nesting right.
 324         if (pit == paragraphs.begin() && !maintext
 325             && (cjk_inherited_ > 0 || open_encoding_ == CJK)) {
 326                 cjk_inherited_ += 1;
 327                 open_encoding_ = none;
 328         }
 329
 330         // This paragraph's language
 331         Language const * const par_language = pit->getParLanguage(bparams);
 332         // The document's language
 333         Language const * const doc_language = bparams.language;
 334         // The language that was in effect when the environment this paragraph is
 335         // inside of was opened
 336         Language const * const outer_language =
 337                 (runparams.local_font != 0) ?
 338                         runparams.local_font->language() : doc_language;
 339         // The previous language that was in effect is either the language of
 340         // the previous paragraph, if there is one, or else the outer language
 341         // if there is no previous paragraph
 342         Language const * prev_language =
 343                 (pit != paragraphs.begin()) ?
 344                         priorpit->getParLanguage(bparams) : outer_language;
 345
 346         // When the language is changed at the very start of a LyX environment,
 347         // the language switch in the LaTeX code occurs just before switching to
 348         // the corresponding LaTeX environment. So, when the environment ends,
 349         // we have to restore the language that was in effect.
 350         bool env_lang_switch = false;
 351         if (!priorpit->hasSameLayout(*pit)) {
 352                 ParagraphList::const_iterator outpit = priorpit;
 353                 while (outpit != paragraphs.begin()
 354                         && (outpit->hasSameLayout(*priorpit)
 355                                 || outpit->getDepth() > priorpit->getDepth()))
 356                         outpit = boost::prior(outpit);
 357                 ParagraphList::const_iterator const inpit = boost::next(outpit);
 358                 Language const * const outenv_language
 359                                         = outpit->getParLanguage(bparams);
 360                 Language const * const inenv_language
 361                                         = inpit->getParLanguage(bparams);
 362                 if (outenv_language->babel() != inenv_language->babel())
 363                         env_lang_switch = true;
 364                 if (outenv_language->babel() != par_language->babel())
 365                         prev_language = outenv_language;
 366         }
 367
 368         if ((par_language->babel() != prev_language->babel() || env_lang_switch)
 369             // check if we already put language command in TeXEnvironment()
 370             && !(style.isEnvironment()
 371                  && (pit == paragraphs.begin() ||
 372                      (priorpit->layout() != pit->layout() &&
 373                       priorpit->getDepth() <= pit->getDepth())
 374                      || priorpit->getDepth() < pit->getDepth())))
 375         {
 376                 if (!lyxrc.language_command_end.empty() &&
 377                     prev_language->babel() != outer_language->babel() &&
 378                     !prev_language->babel().empty())
 379                 {
 380                         os << from_ascii(subst(lyxrc.language_command_end,
 381                                 "$$lang",
 382                                 prev_language->babel()))
 383                            // the '%' is necessary to prevent unwanted whitespace
 384                            << "%\n";
 385                         texrow.newline();
 386                 }
 387
 388                 // We need to open a new language if we couldn't close the previous
 389                 // one (because there's no language_command_end); and even if we closed
 390                 // the previous one, if the current language is different than the
 391                 // outer_language (which is currently in effect once the previous one
 392                 // is closed).
 393                 if ((lyxrc.language_command_end.empty() ||
 394                      par_language->babel() != outer_language->babel()) &&
 395                     !par_language->babel().empty()) {
 396                         // If we're inside an inset, and that inset is within an \L or \R
 397                         // (or equivalents), then within the inset, too, any opposite
 398                         // language paragraph should appear within an \L or \R (in addition
 399                         // to, outside of, the normal language switch commands).
 400                         // This behavior is not correct for ArabTeX, though.
 401                         if (    // not for ArabTeX
 402                                         (par_language->lang() != "arabic_arabtex" &&
 403                                          outer_language->lang() != "arabic_arabtex") &&
 404                                         // are we in an inset?
 405                                         runparams.local_font != 0 &&
 406                                         // is the inset within an \L or \R?
 407                                         //
 408                                         // FIXME: currently, we don't check this; this means that
 409                                         // we'll have unnnecessary \L and \R commands, but that
 410                                         // doesn't seem to hurt (though latex will complain)
 411                                         //
 412                                         // is this paragraph in the opposite direction?
 413                                         runparams.local_font->isRightToLeft() !=
 414                                                 par_language->rightToLeft()
 415                                 ) {
 416                                 // FIXME: I don't have a working copy of the Arabi package, so
 417                                 // I'm not sure if the farsi and arabic_arabi stuff is correct
 418                                 // or not...
 419                                 if (par_language->lang() == "farsi")
 420                                         os << "\\textFR{";
 421                                 else if (outer_language->lang() == "farsi")
 422                                         os << "\\textLR{";
 423                                 else if (par_language->lang() == "arabic_arabi")
 424                                         os << "\\textAR{";
 425                                 else if (outer_language->lang() == "arabic_arabi")
 426                                         os << "\\textLR{";
 427                                 // remaining RTL languages currently is hebrew
 428                                 else if (par_language->rightToLeft())
 429                                         os << "\\R{";
 430                                 else
 431                                         os << "\\L{";
 432                         }
 433                         // With CJK, the CJK tag has to be closed first (see below)
 434                         if (runparams.encoding->package() != Encoding::CJK) {
 435                                 os << from_ascii(subst(
 436                                         lyxrc.language_command_begin,
 437                                         "$$lang",
 438                                         par_language->babel()))
 439                                    // the '%' is necessary to prevent unwanted whitespace
 440                                    << "%\n";
 441                                 texrow.newline();
 442                         }
 443                 }
 444         }
 445
 446         // Switch file encoding if necessary; no need to do this for "default"
 447         // encoding, since this only affects the position of the outputted
 448         // \inputencoding command; the encoding switch will occur when necessary
 449         if (bparams.inputenc == "auto" &&
 450             runparams.encoding->package() != Encoding::none) {
 451                 // Look ahead for future encoding changes.
 452                 // We try to output them at the beginning of the paragraph,
 453                 // since the \inputencoding command is not allowed e.g. in
 454                 // sections.
 455                 for (pos_type i = 0; i < pit->size(); ++i) {
 456                         char_type const c = pit->getChar(i);
 457                         Encoding const * const encoding =
 458                                 pit->getFontSettings(bparams, i).language()->encoding();
 459                         if (encoding->package() != Encoding::CJK &&
 460                             runparams.encoding->package() == Encoding::inputenc &&
 461                             c < 0x80)
 462                                 continue;
 463                         if (pit->isInset(i))
 464                                 break;
 465                         // All characters before c are in the ASCII range, and
 466                         // c is non-ASCII (but no inset), so change the
 467                         // encoding to that required by the language of c.
 468                         // With CJK, only add switch if we have CJK content at the beginning
 469                         // of the paragraph
 470                         if (encoding->package() != Encoding::CJK || i == 0) {
 471                                 pair<bool, int> enc_switch = switchEncoding(os, bparams, runparams,
 472                                         *encoding);
 473                                 // the following is necessary after a CJK environment in a multilingual
 474                                 // context (nesting issue).
 475                                 if (par_language->encoding()->package() == Encoding::CJK &&
 476                                     open_encoding_ != CJK && cjk_inherited_ == 0) {
 477                                         os << "\\begin{CJK}{" << from_ascii(par_language->encoding()->latexName())
 478                                            << "}{" << from_ascii(bparams.fontsCJK) << "}%\n";
 479                                         open_encoding_ = CJK;
 480                                         texrow.newline();
 481                                 }
 482                                 if (encoding->package() != Encoding::none && enc_switch.first) {
 483                                         if (enc_switch.second > 0) {
 484                                                 // the '%' is necessary to prevent unwanted whitespace
 485                                                 os << "%\n";
 486                                                 texrow.newline();
 487                                         }
 488                                         // With CJK, the CJK tag had to be closed first (see above)
 489                                         if (runparams.encoding->package() == Encoding::CJK) {
 490                                                 os << from_ascii(subst(
 491                                                         lyxrc.language_command_begin,
 492                                                         "$$lang",
 493                                                         par_language->babel()))
 494                                                 // the '%' is necessary to prevent unwanted whitespace
 495                                                 << "%\n";
 496                                                 texrow.newline();
 497                                         }
 498                                         runparams.encoding = encoding;
 499                                 }
 500                                 break;
 501                         }
 502                 }
 503         }
 504
 505         bool const useSetSpace = bparams.documentClass().provides("SetSpace");
 506         if (pit->allowParagraphCustomization()) {
 507                 if (pit->params().startOfAppendix()) {
 508                         os << "\\appendix\n";
 509                         texrow.newline();
 510                 }
 511
 512                 if (!pit->params().spacing().isDefault()
 513                         && (pit == paragraphs.begin()
 514                             || !priorpit->hasSameLayout(*pit)))
 515                 {
 516                         os << from_ascii(pit->params().spacing().writeEnvirBegin(useSetSpace))
 517                             << '\n';
 518                         texrow.newline();
 519                 }
 520
 521                 if (style.isCommand()) {
 522                         os << '\n';
 523                         texrow.newline();
 524                 }
 525         }
 526
 527         switch (style.latextype) {
 528         case LATEX_COMMAND:
 529                 os << '\\' << from_ascii(style.latexname());
 530
 531                 // Separate handling of optional argument inset.
 532                 if (style.optionalargs > 0) {
 533                         int ret = latexOptArgInsets(*pit, os, runparams,
 534                                                     style.optionalargs);
 535                         while (ret > 0) {
 536                                 texrow.newline();
 537                                 --ret;
 538                         }
 539                 }
 540                 else
 541                         os << from_ascii(style.latexparam());
 542                 break;
 543         case LATEX_ITEM_ENVIRONMENT:
 544         case LATEX_LIST_ENVIRONMENT:
 545                 os << "\\item ";
 546                 break;
 547         case LATEX_BIB_ENVIRONMENT:
 548                 // ignore this, the inset will write itself
 549                 break;
 550         default:
 551                 break;
 552         }
 553
 554         Font const outerfont = outerFont(distance(paragraphs.begin(), pit),
 555                           paragraphs);
 556
 557         // FIXME UNICODE
 558         os << from_utf8(everypar);
 559         bool need_par = pit->latex(bparams, outerfont,
 560                                              os, texrow, runparams, start_pos, end_pos);
 561
 562         // Make sure that \\par is done with the font of the last
 563         // character if this has another size as the default.
 564         // This is necessary because LaTeX (and LyX on the screen)
 565         // calculates the space between the baselines according
 566         // to this font. (Matthias)
 567         //
 568         // Is this really needed ? (Dekel)
 569         // We do not need to use to change the font for the last paragraph
 570         // or for a command.
 571
 572         Font const font = pit->empty()
 573                  ? pit->getLayoutFont(bparams, outerfont)
 574                  : pit->getFont(bparams, pit->size() - 1, outerfont);
 575
 576         bool const is_command = style.isCommand();
 577
 578         if (style.resfont.size() != font.fontInfo().size()
 579             && nextpit != paragraphs.end()
 580             && !is_command) {
 581                 if (!need_par)
 582                         os << '{';
 583                 os << "\\" << from_ascii(font.latexSize()) << " \\par}";
 584         } else if (need_par) {
 585                 os << "\\par}";
 586         } else if (is_command)
 587                 os << '}';
 588
 589         bool pending_newline = false;
 590         switch (style.latextype) {
 591         case LATEX_ITEM_ENVIRONMENT:
 592         case LATEX_LIST_ENVIRONMENT:
 593                 if (nextpit != paragraphs.end()
 594                     && (pit->params().depth() < nextpit->params().depth()))
 595                         pending_newline = true;
 596                 break;
 597         case LATEX_ENVIRONMENT: {
 598                 // if its the last paragraph of the current environment
 599                 // skip it otherwise fall through
 600                 if (nextpit != paragraphs.end() &&
 601                     (nextpit->layout() != pit->layout()
 602                      || nextpit->params().depth() != pit->params().depth()))
 603                         break;
 604         }
 605
 606         // fall through possible
 607         default:
 608                 // we don't need it for the last paragraph!!!
 609                 if (nextpit != paragraphs.end())
 610                         pending_newline = true;
 611         }
 612
 613         if (pit->allowParagraphCustomization()) {
 614                 if (!pit->params().spacing().isDefault()
 615                         && (nextpit == paragraphs.end() || !nextpit->hasSameLayout(*pit)))
 616                 {
 617                         if (pending_newline) {
 618                                 os << '\n';
 619                                 texrow.newline();
 620                         }
 621                         os << from_ascii(pit->params().spacing().writeEnvirEnd(useSetSpace));
 622                         pending_newline = true;
 623                 }
 624         }
 625
 626         // Closing the language is needed for the last paragraph; it is also
 627         // needed if we're within an \L or \R that we may have opened above (not
 628         // necessarily in this paragraph) and are about to close.
 629         bool closing_rtl_ltr_environment =
 630                 // not for ArabTeX
 631                 (par_language->lang() != "arabic_arabtex" &&
 632                  outer_language->lang() != "arabic_arabtex") &&
 633                 // have we opened and \L or \R environment?
 634                 runparams.local_font != 0 &&
 635                 runparams.local_font->isRightToLeft() != par_language->rightToLeft() &&
 636                 // are we about to close the language?
 637                 ((nextpit != paragraphs.end() &&
 638                   par_language->babel() !=
 639                     (nextpit->getParLanguage(bparams))->babel()) ||
 640                   (nextpit == paragraphs.end() &&
 641                     par_language->babel() != outer_language->babel()));
 642
 643         if (closing_rtl_ltr_environment || (nextpit == paragraphs.end()
 644             && par_language->babel() != outer_language->babel())) {
 645                 // Since \selectlanguage write the language to the aux file,
 646                 // we need to reset the language at the end of footnote or
 647                 // float.
 648
 649                 if (pending_newline) {
 650                         os << '\n';
 651                         texrow.newline();
 652                 }
 653                 // when the paragraph uses CJK, the language has to be closed earlier
 654                 if (font.language()->encoding()->package() != Encoding::CJK) {
 655                         if (lyxrc.language_command_end.empty()) {
 656                                 if (!prev_language->babel().empty()) {
 657                                         os << from_ascii(subst(
 658                                                 lyxrc.language_command_begin,
 659                                                 "$$lang",
 660                                                 prev_language->babel()));
 661                                         pending_newline = true;
 662                                 }
 663                         } else if (!par_language->babel().empty()) {
 664                                 os << from_ascii(subst(
 665                                         lyxrc.language_command_end,
 666                                         "$$lang",
 667                                         par_language->babel()));
 668                                 pending_newline = true;
 669                         }
 670                 }
 671         }
 672         if (closing_rtl_ltr_environment)
 673                 os << "}";
 674
 675         if (pending_newline) {
 676                 os << '\n';
 677                 texrow.newline();
 678         }
 679
 680         // if this is a CJK-paragraph and the next isn't, close CJK
 681         // also if the next paragraph is a multilingual environment (because of nesting)
 682         if (nextpit != paragraphs.end() && open_encoding_ == CJK &&
 683             (nextpit->getParLanguage(bparams)->encoding()->package() != Encoding::CJK ||
 684              (nextpit->layout().isEnvironment() && nextpit->isMultiLingual(bparams)))
 685              // inbetween environments, CJK has to be closed later (nesting!)
 686              && (!style.isEnvironment() || !nextpit->layout().isEnvironment())) {
 687                 os << "\\end{CJK}\n";
 688                 open_encoding_ = none;
 689         }
 690
 691         // If this is the last paragraph, close the CJK environment
 692         // if necessary. If it's an environment, we'll have to \end that first.
 693         if (nextpit == paragraphs.end() && !style.isEnvironment()) {
 694                 switch (open_encoding_) {
 695                         case CJK: {
 696                                 // do nothing at the end of child documents
 697                                 if (maintext && buf.masterBuffer() != &buf)
 698                                         break;
 699                                 // end of main text
 700                                 if (maintext) {
 701                                         os << '\n';
 702                                         texrow.newline();
 703                                         os << "\\end{CJK}\n";
 704                                         texrow.newline();
 705                                 // end of an inset
 706                                 } else
 707                                         os << "\\end{CJK}";
 708                                 open_encoding_ = none;
 709                                 break;
 710                         }
 711                         case inputenc: {
 712                                 os << "\\egroup";
 713                                 open_encoding_ = none;
 714                                 break;
 715                         }
 716                         case none:
 717                         default:
 718                                 // do nothing
 719                                 break;
 720                 }
 721         }
 722
 723         // If this is the last paragraph, and a local_font was set upon entering
 724         // the inset, and we're using "auto" or "default" encoding, the encoding
 725         // should be set back to that local_font's encoding.
 726         // However, do not change the encoding when XeTeX is used.
 727         if (nextpit == paragraphs.end() && runparams_in.local_font != 0
 728             && runparams_in.encoding != runparams_in.local_font->language()->encoding()
 729             && (bparams.inputenc == "auto" || bparams.inputenc == "default")
 730             && (!bparams.useXetex)) {
 731                 runparams_in.encoding = runparams_in.local_font->language()->encoding();
 732                 os << setEncoding(runparams_in.encoding->iconvName());
 733         }
 734         // Otherwise, the current encoding should be set for the next paragraph.
 735         else
 736                 runparams_in.encoding = runparams.encoding;
 737
 738
 739         // we don't need a newline for the last paragraph!!!
 740         // Note from JMarc: we will re-add a \n explicitly in
 741         // TeXEnvironment, because it is needed in this case
 742         if (nextpit != paragraphs.end()) {
 743                 Layout const & next_layout = nextpit->layout();
 744                 if (style == next_layout
 745                     // no blank lines before environments!
 746                     || !next_layout.isEnvironment()
 747                     // unless there's a depth change
 748                     // FIXME What we really want to do here is put every \begin and \end
 749                     // tag on a new line (which was not the case with nested environments).
 750                     // But in the present state of play, we don't have access to the
 751                     // information whether the current TeX row is empty or not.
 752                     // For some ideas about how to fix this, see this thread:
 753                     // http://www.mail-archive.com/lyx-devel@lists.lyx.org/msg145787.html
 754                     || nextpit->params().depth() != pit->params().depth()) {
 755                         os << '\n';
 756                         texrow.newline();
 757                 }
 758         }
 759
 760         if (nextpit != paragraphs.end())
 761                 LYXERR(Debug::LATEX, "TeXOnePar...done " << &*nextpit);
 762
 763         return nextpit;
 764 }
 765
 766
 767 // LaTeX all paragraphs
 768 void latexParagraphs(Buffer const & buf,
 769                      Text const & text,
 770                      odocstream & os,
 771                      TexRow & texrow,
 772                      OutputParams const & runparams,
 773                      string const & everypar)
 774 {
 775         bool was_title = false;
 776         bool already_title = false;
 777         BufferParams const & bparams = buf.params();
 778         DocumentClass const & tclass = bparams.documentClass();
 779         ParagraphList const & paragraphs = text.paragraphs();
 780         ParagraphList::const_iterator par = paragraphs.begin();
 781         ParagraphList::const_iterator endpar = paragraphs.end();
 782
 783         LASSERT(runparams.par_begin <= runparams.par_end, /**/);
 784         // if only part of the paragraphs will be outputed
 785         if (runparams.par_begin !=  runparams.par_end) {
 786                 par = boost::next(paragraphs.begin(), runparams.par_begin);
 787                 endpar = boost::next(paragraphs.begin(), runparams.par_end);
 788                 // runparams will be passed to nested paragraphs, so
 789                 // we have to reset the range parameters.
 790                 const_cast<OutputParams&>(runparams).par_begin = 0;
 791                 const_cast<OutputParams&>(runparams).par_end = 0;
 792         }
 793
 794         bool const maintext = text.isMainText(buf);
 795         bool const is_child = buf.masterBuffer() != &buf;
 796
 797         // Open a CJK environment at the beginning of the main buffer
 798         // if the document's language is a CJK language
 799         // (but not in child documents)
 800         if (maintext && !is_child
 801             && bparams.encoding().package() == Encoding::CJK) {
 802                 os << "\\begin{CJK}{" << from_ascii(bparams.encoding().latexName())
 803                 << "}{" << from_ascii(bparams.fontsCJK) << "}%\n";
 804                 texrow.newline();
 805                 open_encoding_ = CJK;
 806         }
 807         // if "auto begin" is switched off, explicitely switch the
 808         // language on at start
 809         if (maintext && !lyxrc.language_auto_begin &&
 810             !bparams.language->babel().empty()) {
 811                 // FIXME UNICODE
 812                 os << from_utf8(subst(lyxrc.language_command_begin,
 813                                         "$$lang",
 814                                         bparams.language->babel()))
 815                         << '\n';
 816         texrow.newline();
 817         }
 818
 819         ParagraphList::const_iterator lastpar;
 820         // if only_body
 821         while (par != endpar) {
 822                 lastpar = par;
 823                 // FIXME This check should not be needed. We should
 824                 // perhaps issue an error if it is.
 825                 Layout const & layout = par->forcePlainLayout() ?
 826                                 tclass.plainLayout() : par->layout();
 827
 828                 if (layout.intitle) {
 829                         if (already_title) {
 830                                 lyxerr << "Error in latexParagraphs: You"
 831                                         " should not mix title layouts"
 832                                         " with normal ones." << endl;
 833                         } else if (!was_title) {
 834                                 was_title = true;
 835                                 if (tclass.titletype() == TITLE_ENVIRONMENT) {
 836                                         os << "\\begin{"
 837                                                         << from_ascii(tclass.titlename())
 838                                                         << "}\n";
 839                                         texrow.newline();
 840                                 }
 841                         }
 842                 } else if (was_title && !already_title) {
 843                         if (tclass.titletype() == TITLE_ENVIRONMENT) {
 844                                 os << "\\end{" << from_ascii(tclass.titlename())
 845                                                 << "}\n";
 846                         }
 847                         else {
 848                                 os << "\\" << from_ascii(tclass.titlename())
 849                                                 << "\n";
 850                         }
 851                         texrow.newline();
 852                         already_title = true;
 853                         was_title = false;
 854                 }
 855
 856                 if (layout.isEnvironment() ||
 857                                         !par->params().leftIndent().zero()) {
 858                         par = TeXEnvironment(buf, text, par, os,
 859                                                                 texrow, runparams);
 860                 } else {
 861                         par = TeXOnePar(buf, text, par, os, texrow,
 862                                         runparams, everypar);
 863                 }
 864                 if (distance(lastpar, par) >= distance(lastpar, endpar))
 865                         break;
 866         }
 867
 868         // It might be that we only have a title in this document
 869         if (was_title && !already_title) {
 870                 if (tclass.titletype() == TITLE_ENVIRONMENT) {
 871                         os << "\\end{" << from_ascii(tclass.titlename())
 872                             << "}\n";
 873                 }
 874                 else {
 875                         os << "\\" << from_ascii(tclass.titlename())
 876                             << "\n";
 877                                 }
 878                 texrow.newline();
 879         }
 880
 881         // if "auto end" is switched off, explicitely close the language at the end
 882         // but only if the last par is in a babel language
 883         if (maintext && !lyxrc.language_auto_end && !bparams.language->babel().empty() &&
 884                 lastpar->getParLanguage(bparams)->encoding()->package() != Encoding::CJK) {
 885                 os << from_utf8(subst(lyxrc.language_command_end,
 886                                         "$$lang",
 887                                         bparams.language->babel()))
 888                         << '\n';
 889                 texrow.newline();
 890         }
 891
 892         // If the last paragraph is an environment, we'll have to close
 893         // CJK at the very end to do proper nesting.
 894         if (maintext && !is_child && open_encoding_ == CJK) {
 895                 os << "\\end{CJK}\n";
 896                 texrow.newline();
 897                 open_encoding_ = none;
 898         }
 899
 900         // reset inherited encoding
 901         if (cjk_inherited_ > 0) {
 902                 cjk_inherited_ -= 1;
 903                 if (cjk_inherited_ == 0)
 904                         open_encoding_ = CJK;
 905         }
 906 }
 907
 908
 909 pair<bool, int> switchEncoding(odocstream & os, BufferParams const & bparams,
 910                    OutputParams const & runparams, Encoding const & newEnc,
 911                    bool force)
 912 {
 913         Encoding const & oldEnc = *runparams.encoding;
 914         bool moving_arg = runparams.moving_arg;
 915         if (!force && ((bparams.inputenc != "auto" && bparams.inputenc != "default")
 916                 || moving_arg))
 917                 return make_pair(false, 0);
 918
 919         // Do nothing if the encoding is unchanged.
 920         if (oldEnc.name() == newEnc.name())
 921                 return make_pair(false, 0);
 922
 923         // FIXME We ignore encoding switches from/to encodings that do
 924         // neither support the inputenc package nor the CJK package here.
 925         // This does of course only work in special cases (e.g. switch from
 926         // tis620-0 to latin1, but the text in latin1 contains ASCII only),
 927         // but it is the best we can do
 928         if (oldEnc.package() == Encoding::none
 929                 || newEnc.package() == Encoding::none)
 930                 return make_pair(false, 0);
 931
 932         LYXERR(Debug::LATEX, "Changing LaTeX encoding from "
 933                 << oldEnc.name() << " to " << newEnc.name());
 934         os << setEncoding(newEnc.iconvName());
 935         if (bparams.inputenc == "default")
 936                 return make_pair(true, 0);
 937
 938         docstring const inputenc_arg(from_ascii(newEnc.latexName()));
 939         switch (newEnc.package()) {
 940                 case Encoding::none:
 941                 case Encoding::japanese:
 942                         // shouldn't ever reach here, see above
 943                         return make_pair(true, 0);
 944                 case Encoding::inputenc: {
 945                         int count = inputenc_arg.length();
 946                         if (oldEnc.package() == Encoding::CJK &&
 947                             open_encoding_ == CJK) {
 948                                 os << "\\end{CJK}";
 949                                 open_encoding_ = none;
 950                                 count += 9;
 951                         }
 952                         else if (oldEnc.package() == Encoding::inputenc &&
 953                                  open_encoding_ == inputenc) {
 954                                 os << "\\egroup";
 955                                 open_encoding_ = none;
 956                                 count += 7;
 957                         }
 958                         if (runparams.local_font != 0
 959                             &&  oldEnc.package() == Encoding::CJK) {
 960                                 // within insets, \inputenc switches need
 961                                 // to be embraced within \bgroup...\egroup;
 962                                 // else CJK fails.
 963                                 os << "\\bgroup";
 964                                 count += 7;
 965                                 open_encoding_ = inputenc;
 966                         }
 967                         // with the japanese option, inputenc is omitted.
 968                         if (runparams.use_japanese)
 969                                 return make_pair(true, count);
 970                         os << "\\inputencoding{" << inputenc_arg << '}';
 971                         return make_pair(true, count + 16);
 972                 }
 973                 case Encoding::CJK: {
 974                         int count = inputenc_arg.length();
 975                         if (oldEnc.package() == Encoding::CJK &&
 976                             open_encoding_ == CJK) {
 977                                 os << "\\end{CJK}";
 978                                 count += 9;
 979                         }
 980                         if (oldEnc.package() == Encoding::inputenc &&
 981                             open_encoding_ == inputenc) {
 982                                 os << "\\egroup";
 983                                 count += 7;
 984                         }
 985                         os << "\\begin{CJK}{" << inputenc_arg << "}{"
 986                            << from_ascii(bparams.fontsCJK) << "}";
 987                         open_encoding_ = CJK;
 988                         return make_pair(true, count + 15);
 989                 }
 990         }
 991         // Dead code to avoid a warning:
 992         return make_pair(true, 0);
 993
 994 }
 995
 996 } // namespace lyx