src/mathed/MathFactory.cpp

   1 /**
   2  * \file MathFactory.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 #include <config.h>
  12
  13 #include "MathFactory.h"
  14
  15 #include "InsetMathAMSArray.h"
  16 #include "InsetMathArray.h"
  17 #include "InsetMathBoldSymbol.h"
  18 #include "InsetMathBox.h"
  19 #include "InsetMathCancel.h"
  20 #include "InsetMathCancelto.h"
  21 #include "InsetMathCases.h"
  22 #include "InsetMathColor.h"
  23 #include "InsetMathDecoration.h"
  24 #include "InsetMathDots.h"
  25 #include "InsetMathEnsureMath.h"
  26 #include "InsetMathFont.h"
  27 #include "InsetMathFontOld.h"
  28 #include "InsetMathFrac.h"
  29 #include "InsetMathKern.h"
  30 #include "InsetMathLefteqn.h"
  31 #include "InsetMathOverset.h"
  32 #include "InsetMathPhantom.h"
  33 #include "InsetMathRef.h"
  34 #include "InsetMathRoot.h"
  35 #include "InsetMathSize.h"
  36 #include "InsetMathSpace.h"
  37 #include "InsetMathSpecialChar.h"
  38 #include "InsetMathSplit.h"
  39 #include "InsetMathSqrt.h"
  40 #include "InsetMathStackrel.h"
  41 #include "InsetMathSubstack.h"
  42 #include "InsetMathSymbol.h"
  43 #include "InsetMathTabular.h"
  44 #include "InsetMathUnderset.h"
  45 #include "InsetMathUnknown.h"
  46 #include "InsetMathHull.h"
  47 #include "InsetMathXArrow.h"
  48 #include "InsetMathXYMatrix.h"
  49 #include "InsetMathDiagram.h"
  50 #include "MacroTable.h"
  51 #include "MathMacro.h"
  52 #include "MathMacroArgument.h"
  53 #include "MathParser.h"
  54 #include "MathStream.h"
  55 #include "MathSupport.h"
  56
  57 #include "insets/InsetCommand.h"
  58 #include "insets/InsetSpace.h"
  59
  60 #include "support/debug.h"
  61 #include "support/docstream.h"
  62 #include "support/FileName.h"
  63 #include "support/filetools.h" // LibFileSearch
  64 #include "support/lstrings.h"
  65
  66 #include "frontends/FontLoader.h"
  67
  68 #include "Buffer.h"
  69 #include "BufferParams.h"
  70 #include "Encoding.h"
  71 #include "LyX.h" // use_gui
  72 #include "OutputParams.h"
  73
  74 using namespace std;
  75 using namespace lyx::support;
  76
  77 namespace lyx {
  78
  79 bool has_math_fonts;
  80
  81
  82 namespace {
  83
  84 MathWordList theMathWordList;
  85
  86
  87 bool isMathFontAvailable(docstring & name)
  88 {
  89         if (!use_gui)
  90                 return false;
  91
  92         FontInfo f;
  93         augmentFont(f, name);
  94
  95         // Do we have the font proper?
  96         if (theFontLoader().available(f))
  97                 return true;
  98
  99         // can we fake it?
 100         if (name == "eufrak") {
 101                 name = from_ascii("lyxfakefrak");
 102                 return true;
 103         }
 104
 105         LYXERR(Debug::MATHED,
 106                 "font " << to_utf8(name) << " not available and I can't fake it");
 107         return false;
 108 }
 109
 110
 111 void initSymbols()
 112 {
 113         FileName const filename = libFileSearch(string(), "symbols");
 114         LYXERR(Debug::MATHED, "read symbols from " << filename);
 115         if (filename.empty()) {
 116                 lyxerr << "Could not find symbols file" << endl;
 117                 return;
 118         }
 119
 120         ifstream fs(filename.toFilesystemEncoding().c_str());
 121         string line;
 122         bool skip = false;
 123         while (getline(fs, line)) {
 124                 int charid     = 0;
 125                 int fallbackid = 0;
 126                 if (line.empty() || line[0] == '#')
 127                         continue;
 128
 129                 // special case of iffont/else/endif
 130                 if (line.size() >= 7 && line.substr(0, 6) == "iffont") {
 131                         istringstream is(line);
 132                         string tmp;
 133                         is >> tmp;
 134                         is >> tmp;
 135                         docstring t = from_utf8(tmp);
 136                         skip = !isMathFontAvailable(t);
 137                         continue;
 138                 } else if (line.size() >= 4 && line.substr(0, 4) == "else") {
 139                         skip = !skip;
 140                         continue;
 141                 } else if (line.size() >= 5 && line.substr(0, 5) == "endif") {
 142                         skip = false;
 143                         continue;
 144                 } else if (skip)
 145                         continue;
 146
 147                 // special case of pre-defined macros
 148                 if (line.size() > 8 && line.substr(0, 5) == "\\def\\") {
 149                         //lyxerr << "macro definition: '" << line << '\'' << endl;
 150                         istringstream is(line);
 151                         string macro;
 152                         string requires;
 153                         is >> macro >> requires;
 154                         MacroTable::globalMacros().insert(0, from_utf8(macro), requires);
 155                         continue;
 156                 }
 157
 158                 idocstringstream is(from_utf8(line));
 159                 latexkeys tmp;
 160                 is >> tmp.name >> tmp.inset;
 161                 if (isFontName(tmp.inset))
 162                         is >> charid >> fallbackid >> tmp.extra >> tmp.xmlname;
 163                 else
 164                         is >> tmp.extra;
 165                 // requires is optional
 166                 if (is) {
 167                         is >> tmp.requires;
 168                         // backward compatibility
 169                         if (tmp.requires == "esintoramsmath")
 170                                 tmp.requires = from_ascii("esint|amsmath");
 171                 } else {
 172                         LYXERR(Debug::MATHED, "skipping line '" << line << "'\n"
 173                                 << to_utf8(tmp.name) << ' ' << to_utf8(tmp.inset) << ' '
 174                                 << to_utf8(tmp.extra));
 175                         continue;
 176                 }
 177
 178                 if (isFontName(tmp.inset)) {
 179                         // tmp.inset _is_ the fontname here.
 180                         // create fallbacks if necessary
 181
 182                         // store requirements as long as we can
 183                         if (tmp.requires.empty()) {
 184                                 if (tmp.inset == "msa" || tmp.inset == "msb")
 185                                         tmp.requires = from_ascii("amssymb");
 186                                 else if (tmp.inset == "wasy")
 187                                         tmp.requires = from_ascii("wasysym");
 188                                 else if (tmp.inset == "mathscr")
 189                                         tmp.requires = from_ascii("mathrsfs");
 190                         }
 191
 192                         // symbol font is not available sometimes
 193                         docstring symbol_font = from_ascii("lyxsymbol");
 194
 195                         if (tmp.extra == "func" || tmp.extra == "funclim" || tmp.extra == "special") {
 196                                 LYXERR(Debug::MATHED, "symbol abuse for " << to_utf8(tmp.name));
 197                                 tmp.draw = tmp.name;
 198                         } else if (isMathFontAvailable(tmp.inset)) {
 199                                 LYXERR(Debug::MATHED, "symbol available for " << to_utf8(tmp.name));
 200                                 tmp.draw.push_back(char_type(charid));
 201                         } else if (fallbackid && isMathFontAvailable(symbol_font)) {
 202                                 if (tmp.inset == "cmex")
 203                                         tmp.inset = from_ascii("lyxsymbol");
 204                                 else
 205                                         tmp.inset = from_ascii("lyxboldsymbol");
 206                                 LYXERR(Debug::MATHED, "symbol fallback for " << to_utf8(tmp.name));
 207                                 tmp.draw.push_back(char_type(fallbackid));
 208                         } else {
 209                                 LYXERR(Debug::MATHED, "faking " << to_utf8(tmp.name));
 210                                 tmp.draw = tmp.name;
 211                                 tmp.inset = from_ascii("lyxtex");
 212                         }
 213                 } else {
 214                         // it's a proper inset
 215                         LYXERR(Debug::MATHED, "inset " << to_utf8(tmp.inset)
 216                                               << " used for " << to_utf8(tmp.name));
 217                 }
 218
 219                 if (theMathWordList.find(tmp.name) != theMathWordList.end())
 220                         LYXERR(Debug::MATHED, "readSymbols: inset " << to_utf8(tmp.name)
 221                                 << " already exists.");
 222                 else
 223                         theMathWordList[tmp.name] = tmp;
 224
 225                 LYXERR(Debug::MATHED, "read symbol '" << to_utf8(tmp.name)
 226                         << "  inset: " << to_utf8(tmp.inset)
 227                         << "  draw: " << int(tmp.draw.empty() ? 0 : tmp.draw[0])
 228                         << "  extra: " << to_utf8(tmp.extra)
 229                         << "  requires: " << to_utf8(tmp.requires) << '\'');
 230         }
 231         docstring tmp = from_ascii("cmm");
 232         docstring tmp2 = from_ascii("cmsy");
 233         has_math_fonts = isMathFontAvailable(tmp) && isMathFontAvailable(tmp2);
 234 }
 235
 236
 237 bool isSpecialChar(docstring const & name)
 238 {
 239         if (name.size() != 1)
 240                 return  name == "textasciicircum" || name == "mathcircumflex" ||
 241                         name == "textasciitilde"  || name == "textbackslash";
 242
 243         char_type const c = name.at(0);
 244         return  c == '{' || c == '}' || c == '&' || c == '$' ||
 245                 c == '#' || c == '%' || c == '_';
 246 }
 247
 248
 249 } // namespace anon
 250
 251 MathWordList const & mathedWordList()
 252 {
 253         return theMathWordList;
 254 }
 255
 256
 257 void initMath()
 258 {
 259         static bool initialized = false;
 260         if (!initialized) {
 261                 initialized = true;
 262                 initParser();
 263                 initSymbols();
 264         }
 265 }
 266
 267
 268 bool ensureMath(WriteStream & os, bool needs_math_mode, bool macro)
 269 {
 270         bool brace = os.pendingBrace();
 271         os.pendingBrace(false);
 272         if (!os.latex())
 273                 return brace;
 274         if (os.textMode() && needs_math_mode) {
 275                 os << "\\ensuremath{";
 276                 os.textMode(false);
 277                 brace = true;
 278         } else if (macro && brace && !needs_math_mode) {
 279                 // This is a user defined macro, but not a MathMacro, so we
 280                 // cannot be sure what mode is needed. As it was entered in
 281                 // a text box, we restore the text mode.
 282                 os << '}';
 283                 os.textMode(true);
 284                 brace = false;
 285         }
 286         return brace;
 287 }
 288
 289
 290 int ensureMode(WriteStream & os, InsetMath::mode_type mode,
 291                 bool locked, bool ascii)
 292 {
 293         bool textmode = mode == InsetMath::TEXT_MODE;
 294         if (os.latex() && textmode && os.pendingBrace()) {
 295                 os.os() << '}';
 296                 os.pendingBrace(false);
 297                 os.pendingSpace(false);
 298                 os.textMode(true);
 299         }
 300         int oldmodes = os.textMode() ? 0x01 : 0;
 301         os.textMode(textmode);
 302         oldmodes |= os.lockedMode() ? 0x02 : 0;
 303         os.lockedMode(locked);
 304         oldmodes |= os.asciiOnly() ? 0x04 : 0;
 305         os.asciiOnly(ascii);
 306         return oldmodes;
 307 }
 308
 309
 310 latexkeys const * in_word_set(docstring const & str)
 311 {
 312         MathWordList::iterator it = theMathWordList.find(str);
 313         return it != theMathWordList.end() ? &(it->second) : 0;
 314 }
 315
 316
 317 MathAtom createInsetMath(char const * const s, Buffer * buf)
 318 {
 319         return createInsetMath(from_utf8(s), buf);
 320 }
 321
 322
 323 MathAtom createInsetMath(docstring const & s, Buffer * buf)
 324 {
 325         //lyxerr << "creating inset with name: '" << to_utf8(s) << '\'' << endl;
 326         if ((s == "ce" || s == "cf") && buf
 327             && buf->params().use_package("mhchem") == BufferParams::package_off)
 328                 return MathAtom(new MathMacro(buf, s));
 329
 330         latexkeys const * l = in_word_set(s);
 331         if (l) {
 332                 docstring const & inset = l->inset;
 333                 //lyxerr << " found inset: '" << inset << '\'' << endl;
 334                 if (inset == "ref")
 335                         return MathAtom(new InsetMathRef(buf, l->name));
 336                 if (inset == "overset")
 337                         return MathAtom(new InsetMathOverset(buf));
 338                 if (inset == "underset")
 339                         return MathAtom(new InsetMathUnderset(buf));
 340                 if (inset == "decoration")
 341                         return MathAtom(new InsetMathDecoration(buf, l));
 342                 if (inset == "space")
 343                         return MathAtom(new InsetMathSpace(to_ascii(l->name), ""));
 344                 if (inset == "dots")
 345                         return MathAtom(new InsetMathDots(l));
 346                 if (inset == "mbox")
 347                         // return MathAtom(new InsetMathMBox);
 348                         // InsetMathMBox is proposed to replace InsetMathBox,
 349                         // but is not ready yet (it needs a BufferView for
 350                         // construction)
 351                         return MathAtom(new InsetMathBox(buf, l->name));
 352 //              if (inset == "fbox")
 353 //                      return MathAtom(new InsetMathFBox(l));
 354                 if (inset == "style")
 355                         return MathAtom(new InsetMathSize(buf, l));
 356                 if (inset == "font")
 357                         return MathAtom(new InsetMathFont(buf, l));
 358                 if (inset == "oldfont")
 359                         return MathAtom(new InsetMathFontOld(buf, l));
 360                 if (inset == "matrix")
 361                         return MathAtom(new InsetMathAMSArray(buf, s));
 362                 if (inset == "split")
 363                         return MathAtom(new InsetMathSplit(buf, s));
 364                 if (inset == "big")
 365                         // we can't create a InsetMathBig, since the argument
 366                         // is missing.
 367                         return MathAtom(new InsetMathUnknown(s));
 368                 return MathAtom(new InsetMathSymbol(l));
 369         }
 370
 371         if (s.size() == 2 && s[0] == '#' && s[1] >= '1' && s[1] <= '9')
 372                 return MathAtom(new MathMacroArgument(s[1] - '0'));
 373         if (s.size() == 3 && s[0] == '\\' && s[1] == '#'
 374                         && s[2] >= '1' && s[2] <= '9')
 375                 return MathAtom(new MathMacroArgument(s[2] - '0'));
 376         if (s == "boxed")
 377                 return MathAtom(new InsetMathBoxed(buf));
 378         if (s == "fbox")
 379                 return MathAtom(new InsetMathFBox(buf));
 380         if (s == "framebox")
 381                 return MathAtom(new InsetMathMakebox(buf, true));
 382         if (s == "makebox")
 383                 return MathAtom(new InsetMathMakebox(buf, false));
 384         if (s == "kern")
 385                 return MathAtom(new InsetMathKern);
 386         if (s.substr(0, 8) == "xymatrix") {
 387                 char spacing_code = '\0';
 388                 Length spacing;
 389                 bool equal_spacing = false;
 390                 size_t const len = s.length();
 391                 size_t i = 8;
 392                 if (i < len && s[i] == '@') {
 393                         ++i;
 394                         if (i < len && s[i] == '!') {
 395                                 equal_spacing = true;
 396                                 ++i;
 397                                 if (i < len) {
 398                                         switch (s[i]) {
 399                                         case '0':
 400                                         case 'R':
 401                                         case 'C':
 402                                                 spacing_code = static_cast<char>(s[i]);
 403                                         }
 404                                 }
 405                         } else if (i < len) {
 406                                 switch (s[i]) {
 407                                 case 'R':
 408                                 case 'C':
 409                                 case 'M':
 410                                 case 'W':
 411                                 case 'H':
 412                                 case 'L':
 413                                         spacing_code = static_cast<char>(s[i]);
 414                                         ++i;
 415                                         break;
 416                                 }
 417                                 if (i < len && s[i] == '=') {
 418                                         ++i;
 419                                         spacing = Length(to_ascii(s.substr(i)));
 420                                 }
 421                         }
 422                 }
 423                 return MathAtom(new InsetMathXYMatrix(buf, spacing, spacing_code,
 424                         equal_spacing));
 425         }
 426
 427         if (s == "Diagram")
 428                 return MathAtom(new InsetMathDiagram(buf));
 429         if (s == "xrightarrow" || s == "xleftarrow")
 430                 return MathAtom(new InsetMathXArrow(buf, s));
 431         if (s == "split" || s == "alignedat")
 432                 return MathAtom(new InsetMathSplit(buf, s));
 433         if (s == "cases")
 434                 return MathAtom(new InsetMathCases(buf));
 435         if (s == "substack")
 436                 return MathAtom(new InsetMathSubstack(buf));
 437         if (s == "subarray" || s == "array")
 438                 return MathAtom(new InsetMathArray(buf, s, 1, 1));
 439         if (s == "sqrt")
 440                 return MathAtom(new InsetMathSqrt(buf));
 441         if (s == "root")
 442                 return MathAtom(new InsetMathRoot(buf));
 443         if (s == "tabular")
 444                 return MathAtom(new InsetMathTabular(buf, s, 1, 1));
 445         if (s == "stackrel")
 446                 return MathAtom(new InsetMathStackrel(buf));
 447         if (s == "binom")
 448                 return MathAtom(new InsetMathBinom(buf, InsetMathBinom::BINOM));
 449         if (s == "dbinom")
 450                 return MathAtom(new InsetMathBinom(buf, InsetMathBinom::DBINOM));
 451         if (s == "tbinom")
 452                 return MathAtom(new InsetMathBinom(buf, InsetMathBinom::TBINOM));
 453         if (s == "choose")
 454                 return MathAtom(new InsetMathBinom(buf, InsetMathBinom::CHOOSE));
 455         if (s == "brace")
 456                 return MathAtom(new InsetMathBinom(buf, InsetMathBinom::BRACE));
 457         if (s == "brack")
 458                 return MathAtom(new InsetMathBinom(buf, InsetMathBinom::BRACK));
 459         if (s == "frac")
 460                 return MathAtom(new InsetMathFrac(buf));
 461         if (s == "cfrac")
 462                 return MathAtom(new InsetMathFrac(buf, InsetMathFrac::CFRAC));
 463         if (s == "dfrac")
 464                 return MathAtom(new InsetMathFrac(buf, InsetMathFrac::DFRAC));
 465         if (s == "tfrac")
 466                 return MathAtom(new InsetMathFrac(buf, InsetMathFrac::TFRAC));
 467         if (s == "over")
 468                 return MathAtom(new InsetMathFrac(buf, InsetMathFrac::OVER));
 469         if (s == "nicefrac")
 470                 return MathAtom(new InsetMathFrac(buf, InsetMathFrac::NICEFRAC));
 471         if (s == "unitfrac")
 472                 return MathAtom(new InsetMathFrac(buf, InsetMathFrac::UNITFRAC));
 473         // These string values are only for math toolbar use, no LaTeX names
 474         if (s == "unitfracthree")
 475                 return MathAtom(new InsetMathFrac(buf, InsetMathFrac::UNITFRAC, 3));
 476         if (s == "unitone")
 477                 return MathAtom(new InsetMathFrac(buf, InsetMathFrac::UNIT, 1));
 478         if (s == "unittwo")
 479                 return MathAtom(new InsetMathFrac(buf, InsetMathFrac::UNIT));
 480         if (s == "cfracleft")
 481                 return MathAtom(new InsetMathFrac(buf, InsetMathFrac::CFRACLEFT));
 482         if (s == "cfracright")
 483                 return MathAtom(new InsetMathFrac(buf, InsetMathFrac::CFRACRIGHT));
 484         //if (s == "infer")
 485         //      return MathAtom(new MathInferInset);
 486         if (s == "atop")
 487                 return MathAtom(new InsetMathFrac(buf, InsetMathFrac::ATOP));
 488         if (s == "lefteqn")
 489                 return MathAtom(new InsetMathLefteqn(buf));
 490         if (s == "boldsymbol")
 491                 return MathAtom(new InsetMathBoldSymbol(buf, InsetMathBoldSymbol::AMS_BOLD));
 492         if (s == "bm")
 493                 return MathAtom(new InsetMathBoldSymbol(buf, InsetMathBoldSymbol::BM_BOLD));
 494         if (s == "heavysymbol" || s == "hm")
 495                 return MathAtom(new InsetMathBoldSymbol(buf, InsetMathBoldSymbol::BM_HEAVY));
 496         if (s == "color" || s == "normalcolor")
 497                 return MathAtom(new InsetMathColor(buf, true));
 498         if (s == "textcolor")
 499                 return MathAtom(new InsetMathColor(buf, false));
 500         if (s == "hphantom")
 501                 return MathAtom(new InsetMathPhantom(buf, InsetMathPhantom::hphantom));
 502         if (s == "phantom")
 503                 return MathAtom(new InsetMathPhantom(buf, InsetMathPhantom::phantom));
 504         if (s == "vphantom")
 505                 return MathAtom(new InsetMathPhantom(buf, InsetMathPhantom::vphantom));
 506         if (s == "cancel")
 507                 return MathAtom(new InsetMathCancel(buf, InsetMathCancel::cancel));
 508         if (s == "bcancel")
 509                 return MathAtom(new InsetMathCancel(buf, InsetMathCancel::bcancel));
 510         if (s == "xcancel")
 511                 return MathAtom(new InsetMathCancel(buf, InsetMathCancel::xcancel));
 512         if (s == "cancelto")
 513                 return MathAtom(new InsetMathCancelto(buf));
 514         if (s == "smash")
 515                 return MathAtom(new InsetMathPhantom(buf, InsetMathPhantom::smash));
 516         if (s == "mathclap")
 517                 return MathAtom(new InsetMathPhantom(buf, InsetMathPhantom::mathclap));
 518         if (s == "mathllap")
 519                 return MathAtom(new InsetMathPhantom(buf, InsetMathPhantom::mathllap));
 520         if (s == "mathrlap")
 521                 return MathAtom(new InsetMathPhantom(buf, InsetMathPhantom::mathrlap));
 522         if (s == "ensuremath")
 523                 return MathAtom(new InsetMathEnsureMath(buf));
 524         if (isSpecialChar(s))
 525                 return MathAtom(new InsetMathSpecialChar(s));
 526         if (s == " ")
 527                 return MathAtom(new InsetMathSpace(" ", ""));
 528
 529         if (s == "regexp")
 530                 return MathAtom(new InsetMathHull(buf, hullRegexp));
 531
 532         return MathAtom(new MathMacro(buf, s));
 533 }
 534
 535
 536 bool createInsetMath_fromDialogStr(docstring const & str, MathData & ar)
 537 {
 538         // An example str:
 539         // "ref LatexCommand ref\nreference \"sec:Title\"\n\\end_inset\n\n";
 540         docstring name;
 541         docstring body = split(str, name, ' ');
 542
 543         if (name == "ref") {
 544                 InsetCommandParams icp(REF_CODE);
 545                 // FIXME UNICODE
 546                 InsetCommand::string2params(to_utf8(str), icp);
 547                 Encoding const * const utf8 = encodings.fromLyXName("utf8");
 548                 OutputParams op(utf8);
 549                 mathed_parse_cell(ar, icp.getCommand(op));
 550         } else if (name == "mathspace") {
 551                 InsetSpaceParams isp(true);
 552                 InsetSpace::string2params(to_utf8(str), isp);
 553                 InsetSpace is(isp);
 554                 TexRow texrow;
 555                 odocstringstream ods;
 556                 otexstream os(ods, texrow);
 557                 Encoding const * const ascii = encodings.fromLyXName("ascii");
 558                 OutputParams op(ascii);
 559                 is.latex(os, op);
 560                 mathed_parse_cell(ar, ods.str());
 561                 if (ar.size() == 2) {
 562                         // remove "{}"
 563                         if (ar[1].nucleus()->asBraceInset())
 564                                 ar.pop_back();
 565                 }
 566         } else
 567                 return false;
 568
 569         if (ar.size() != 1)
 570                 return false;
 571
 572         return ar[0].nucleus();
 573 }
 574
 575
 576 bool isAsciiOrMathAlpha(char_type c)
 577 {
 578         return c < 0x80 || Encodings::isMathAlpha(c);
 579 }
 580
 581
 582 } // namespace lyx