src/mathed/formulabase.C

   1  /*
   2 *  File:        formula.C
   3 *  Purpose:     Implementation of formula inset
   4 *  Author:      Alejandro Aguilar Sierra <asierra@servidor.unam.mx>
   5 *  Created:     January 1996
   6 *  Description: Allows the edition of math paragraphs inside Lyx.
   7 *
   8 *  Copyright: 1996-1998 Alejandro Aguilar Sierra
   9 *
  10 *  Version: 0.4, Lyx project.
  11 *
  12 *   You are free to use and modify this code under the terms of
  13 *   the GNU General Public Licence version 2 or later.
  14 */
  15
  16 #include <config.h>
  17 #include <fstream>
  18
  19 #include "Lsstream.h"
  20
  21 #ifdef __GNUG__
  22 #pragma implementation
  23 #endif
  24
  25 #include "formula.h"
  26 #include "formulamacro.h"
  27 #include "commandtags.h"
  28 #include "math_cursor.h"
  29 #include "math_parser.h"
  30 #include "BufferView.h"
  31 #include "lyxtext.h"
  32 #include "lyxfunc.h"
  33 #include "gettext.h"
  34 #include "LaTeXFeatures.h"
  35 #include "debug.h"
  36 #include "support/LOstream.h"
  37 #include "LyXView.h"
  38 #include "Painter.h"
  39 #include "font.h"
  40 #include "math_arrayinset.h"
  41 #include "math_spaceinset.h"
  42 #include "support/lyxlib.h"
  43 #include "mathed/support.h"
  44 #include "undo_funcs.h"
  45
  46 using std::endl;
  47 using std::ostream;
  48 using std::vector;
  49
  50 extern char const * latex_special_chars;
  51
  52 int greek_kb_flag = 0;
  53 extern char const * latex_mathenv[];
  54 LyXFont           * Math_Fonts = 0;
  55 MathCursor        * mathcursor = 0;
  56
  57
  58 namespace {
  59
  60
  61 // local global
  62 int sel_x;
  63 int sel_y;
  64 bool sel_flag;
  65
  66 void mathed_init_fonts();
  67
  68 string nicelabel(string const & label)
  69 {
  70         return "(" + (label.empty() ? "#" : label) + ")";
  71 }
  72
  73 void handleFont(BufferView * bv, MathTextCodes t)
  74 {
  75         if (mathcursor->Selection())
  76                 bv->lockedInsetStoreUndo(Undo::EDIT);
  77         mathcursor->handleFont(t);
  78 }
  79
  80 void handleAccent(BufferView * bv, string const & name, int code)
  81 {
  82         bv->lockedInsetStoreUndo(Undo::EDIT);
  83         mathcursor->handleAccent(name, code);
  84 }
  85
  86 void handleDelim(BufferView * bv, int l, int r)
  87 {
  88         bv->lockedInsetStoreUndo(Undo::EDIT);
  89         mathcursor->handleDelim(l, r);
  90 }
  91
  92 bool openNewInset(BufferView * bv, UpdatableInset * new_inset)
  93 {
  94         LyXText * lt = bv->getLyXText();
  95
  96         bv->beforeChange(lt);
  97         finishUndo();
  98         if (!bv->insertInset(new_inset)) {
  99                 delete new_inset;
 100                 return false;
 101         }
 102         new_inset->edit(bv, 0, 0, 0);
 103         return true;
 104 }
 105
 106
 107 } // namespaces
 108
 109
 110
 111 LyXFont WhichFont(short type, int size)
 112 {
 113         LyXFont f;
 114
 115         if (!Math_Fonts)
 116                 mathed_init_fonts();
 117
 118         switch (type) {
 119         case LM_TC_SYMB:
 120                 f = Math_Fonts[2];
 121                 break;
 122
 123         case LM_TC_BSYM:
 124                 f = Math_Fonts[2];
 125                 break;
 126
 127         case LM_TC_VAR:
 128         case LM_TC_IT:
 129                 f = Math_Fonts[0];
 130                 break;
 131
 132         case LM_TC_BF:
 133                 f = Math_Fonts[3];
 134                 break;
 135
 136         case LM_TC_SF:
 137                 f = Math_Fonts[7];
 138                 break;
 139
 140         case LM_TC_CAL:
 141                 f = Math_Fonts[4];
 142                 break;
 143
 144         case LM_TC_TT:
 145                 f = Math_Fonts[5];
 146                 break;
 147
 148         case LM_TC_SPECIAL: //f = Math_Fonts[0]; break;
 149         case LM_TC_TEXTRM:
 150         case LM_TC_TEX:
 151         case LM_TC_RM:
 152                 f = Math_Fonts[6];
 153                 break;
 154
 155         default:
 156                 f = Math_Fonts[1];
 157                 break;
 158         }
 159
 160         switch (size) {
 161         case LM_ST_DISPLAY:
 162                 if (type == LM_TC_BSYM) {
 163                         f.incSize();
 164                         f.incSize();
 165                 }
 166                 break;
 167
 168         case LM_ST_TEXT:
 169                 break;
 170
 171         case LM_ST_SCRIPT:
 172                 f.decSize();
 173                 break;
 174
 175         case LM_ST_SCRIPTSCRIPT:
 176                 f.decSize();
 177                 f.decSize();
 178                 break;
 179
 180         default:
 181                 lyxerr << "Math Error: wrong font size: " << size << endl;
 182                 break;
 183         }
 184
 185         if (type != LM_TC_TEXTRM)
 186                 f.setColor(LColor::math);
 187
 188         if (type == LM_TC_TEX)
 189                 f.setColor(LColor::latex);
 190
 191         return f;
 192 }
 193
 194
 195 namespace {
 196
 197 void mathed_init_fonts()
 198 {
 199         Math_Fonts = new LyXFont[8]; //DEC cxx cannot initialize all fonts
 200         //at once (JMarc) rc
 201
 202         for (int i = 0 ; i < 8 ; ++i) {
 203                 Math_Fonts[i] = LyXFont(LyXFont::ALL_SANE);
 204         }
 205
 206         Math_Fonts[0].setShape(LyXFont::ITALIC_SHAPE);
 207
 208         Math_Fonts[1].setFamily(LyXFont::SYMBOL_FAMILY);
 209
 210         Math_Fonts[2].setFamily(LyXFont::SYMBOL_FAMILY);
 211         Math_Fonts[2].setShape(LyXFont::ITALIC_SHAPE);
 212
 213         Math_Fonts[3].setSeries(LyXFont::BOLD_SERIES);
 214
 215         Math_Fonts[4].setFamily(LyXFont::SANS_FAMILY);
 216         Math_Fonts[4].setShape(LyXFont::ITALIC_SHAPE);
 217
 218         Math_Fonts[5].setFamily(LyXFont::TYPEWRITER_FAMILY);
 219
 220         Math_Fonts[6].setFamily(LyXFont::ROMAN_FAMILY);
 221
 222         Math_Fonts[7].setFamily(LyXFont::SANS_FAMILY);
 223 }
 224
 225
 226 // returns the nearest enclosing matrix
 227 MathArrayInset * matrixpar(int & idx)
 228 {
 229         idx = 0;
 230         return
 231                 static_cast<MathArrayInset *>
 232                         (mathcursor ? mathcursor->enclosing(LM_OT_MATRIX, idx) : 0);
 233 }
 234
 235
 236 } // namespace anon
 237
 238
 239 InsetFormulaBase::InsetFormulaBase(MathInset * par)
 240         : par_(par)
 241 {}
 242
 243
 244 InsetFormulaBase::InsetFormulaBase(InsetFormulaBase const & f)
 245         : UpdatableInset(f), par_(static_cast<MathInset *>(f.par_->clone()))
 246 {}
 247
 248
 249 InsetFormulaBase::~InsetFormulaBase()
 250 {
 251 #ifdef WITH_WARNINGS
 252 #warning leak this for a while...
 253 #endif
 254         //delete par_;
 255 }
 256
 257
 258 void InsetFormulaBase::read(Buffer const *, LyXLex & lex)
 259 {
 260         read(lex);
 261 }
 262
 263 void InsetFormulaBase::write(Buffer const *, ostream & os) const
 264 {
 265         write(os);
 266 }
 267
 268 int InsetFormulaBase::latex(Buffer const *, ostream & os,
 269         bool fragile, bool spacing) const
 270 {
 271         return latex(os, fragile, spacing);
 272 }
 273
 274 int InsetFormulaBase::ascii(Buffer const *, ostream & os, int spacing) const
 275 {
 276         return ascii(os, spacing);
 277 }
 278
 279 int InsetFormulaBase::linuxdoc(Buffer const *, ostream & os) const
 280 {
 281         return linuxdoc(os);
 282 }
 283
 284 int InsetFormulaBase::docBook(Buffer const *, ostream & os) const
 285 {
 286         return docBook(os);
 287 }
 288
 289
 290
 291 // Check if uses AMS macros
 292 void InsetFormulaBase::validate(LaTeXFeatures &) const
 293 {}
 294
 295
 296 string const InsetFormulaBase::editMessage() const
 297 {
 298         return _("Math editor mode");
 299 }
 300
 301
 302 void InsetFormulaBase::edit(BufferView * bv, int x, int /*y*/, unsigned int)
 303 {
 304         mathcursor = new MathCursor(this);
 305
 306         if (!bv->lockInset(this))
 307                 lyxerr[Debug::MATHED] << "Cannot lock inset!!!" << endl;
 308
 309         Metrics();
 310         //bv->updateInset(this, false);
 311         if (x == 0)
 312                 mathcursor->first();
 313         else
 314                 mathcursor->last();
 315         sel_x = 0;
 316         sel_y = 0;
 317         sel_flag = false;
 318 }
 319
 320
 321 void InsetFormulaBase::insetUnlock(BufferView * bv)
 322 {
 323         if (mathcursor) {
 324                 if (mathcursor->InMacroMode()) {
 325                         mathcursor->MacroModeClose();
 326                         updateLocal(bv, true);
 327                 }
 328                 delete mathcursor;
 329                 mathcursor = 0;
 330         }
 331         bv->updateInset(this, false);
 332 }
 333
 334
 335 void InsetFormulaBase::getCursorPos(BufferView *, int & x, int & y) const
 336 {
 337         mathcursor->GetPos(x, y);
 338         x -= par_->xo();
 339         y -= par_->yo();
 340 }
 341
 342
 343 void InsetFormulaBase::toggleInsetCursor(BufferView * bv)
 344 {
 345         if (!mathcursor)
 346                 return;
 347
 348         if (isCursorVisible())
 349                 bv->hideLockedInsetCursor();
 350         else {
 351                 int x;
 352                 int y;
 353                 mathcursor->GetPos(x, y);
 354                 //x -= par_->xo();
 355                 y -= par_->yo();
 356
 357                 LyXFont   font = WhichFont(LM_TC_TEXTRM, LM_ST_TEXT);
 358                 int const asc  = lyxfont::maxAscent(font);
 359                 int const desc = lyxfont::maxDescent(font);
 360
 361                 bv->showLockedInsetCursor(x, y, asc, desc);
 362         }
 363
 364         toggleCursorVisible();
 365 }
 366
 367
 368 void InsetFormulaBase::showInsetCursor(BufferView * bv, bool)
 369 {
 370         if (!isCursorVisible()) {
 371                 if (mathcursor) {
 372                         int x;
 373                         int y;
 374                         mathcursor->GetPos(x, y);
 375                         x -= par_->xo();
 376                         y -= par_->yo();
 377                         LyXFont font   = WhichFont(LM_TC_TEXTRM, LM_ST_TEXT);
 378                         int const asc  = lyxfont::maxAscent(font);
 379                         int const desc = lyxfont::maxDescent(font);
 380                         bv->fitLockedInsetCursor(x, y, asc, desc);
 381                 }
 382                 toggleInsetCursor(bv);
 383         }
 384 }
 385
 386
 387 void InsetFormulaBase::hideInsetCursor(BufferView * bv)
 388 {
 389         if (isCursorVisible())
 390                 toggleInsetCursor(bv);
 391 }
 392
 393
 394 void InsetFormulaBase::toggleInsetSelection(BufferView * bv)
 395 {
 396         if (mathcursor)
 397                 bv->updateInset(this, false);
 398 }
 399
 400
 401 vector<string> const InsetFormulaBase::getLabelList() const
 402 {
 403   return std::vector<string>();
 404 }
 405
 406
 407 void InsetFormulaBase::updateLocal(BufferView * bv, bool dirty)
 408 {
 409         Metrics();
 410         bv->updateInset(this, dirty);
 411 }
 412
 413
 414 void InsetFormulaBase::Metrics() const
 415 {
 416         const_cast<MathInset *>(par_)->Metrics(LM_ST_TEXT);
 417 }
 418
 419
 420 void InsetFormulaBase::insetButtonRelease(BufferView * bv,
 421                                           int x, int y, int /*button*/)
 422 {
 423         if (mathcursor) {
 424                 hideInsetCursor(bv);
 425                 x += par_->xo();
 426                 y += par_->yo();
 427                 mathcursor->SetPos(x, y);
 428                 showInsetCursor(bv);
 429                 if (sel_flag) {
 430                         sel_flag = false;
 431                         sel_x = 0;
 432                         sel_y = 0;
 433                 }
 434                 bv->updateInset(this, false);
 435         }
 436 }
 437
 438
 439 void InsetFormulaBase::insetButtonPress(BufferView * bv,
 440                                         int x, int y, int /*button*/)
 441 {
 442         sel_flag = false;
 443         sel_x = x;
 444         sel_y = y;
 445         if (mathcursor && mathcursor->Selection()) {
 446                 mathcursor->SelClear();
 447                 bv->updateInset(this, false);
 448         }
 449 }
 450
 451
 452 void InsetFormulaBase::insetMotionNotify(BufferView * bv,
 453                                          int x, int y, int /*button*/)
 454 {
 455         if (sel_x && sel_y && abs(x-sel_x) > 4 && !sel_flag) {
 456                 sel_flag = true;
 457                 hideInsetCursor(bv);
 458                 mathcursor->SetPos(sel_x + par_->xo(), sel_y + par_->yo());
 459                 mathcursor->SelStart();
 460                 showInsetCursor(bv);
 461                 mathcursor->GetPos(sel_x, sel_y);
 462         } else if (sel_flag) {
 463                 hideInsetCursor(bv);
 464                 x += par_->xo();
 465                 y += par_->yo();
 466                 mathcursor->SetPos(x, y);
 467                 showInsetCursor(bv);
 468                 mathcursor->GetPos(x, y);
 469                 if (sel_x != x || sel_y != y)
 470                         bv->updateInset(this, false);
 471                 sel_x = x;
 472                 sel_y = y;
 473         }
 474 }
 475
 476
 477 void InsetFormulaBase::insetKeyPress(XKeyEvent *)
 478 {
 479         lyxerr[Debug::MATHED]
 480                 << "Used InsetFormulaBase::InsetKeyPress." << endl;
 481 }
 482
 483
 484
 485 UpdatableInset::RESULT
 486 InsetFormulaBase::localDispatch(BufferView * bv, kb_action action,
 487                             string const & arg)
 488 {
 489         //lyxerr << "InsetFormulaBase::LocalDispatch: act: " << action
 490         //      << " arg: '" << arg << "' cursor: " << mathcursor << "\n";
 491
 492         if (!mathcursor)
 493                 return UNDISPATCHED;
 494
 495         MathTextCodes varcode = LM_TC_MIN;
 496         bool was_macro = mathcursor->InMacroMode();
 497         bool sel = false;
 498         bool was_selection = mathcursor->Selection();
 499         RESULT result = DISPATCHED;
 500
 501         hideInsetCursor(bv);
 502
 503         if (mathcursor->getLastCode() == LM_TC_TEX)
 504                 varcode = LM_TC_TEX;
 505
 506         mathcursor->normalize();
 507
 508         switch (action) {
 509
 510                 // --- Cursor Movements ---------------------------------------------
 511
 512         case LFUN_RIGHTSEL:
 513                 sel = true; // fall through...
 514
 515         case LFUN_RIGHT:
 516                 result = DISPATCH_RESULT(mathcursor->Right(sel));
 517                 updateLocal(bv, false);
 518                 break;
 519
 520
 521         case LFUN_LEFTSEL:
 522                 sel = true; // fall through
 523
 524         case LFUN_LEFT:
 525                 result = DISPATCH_RESULT(mathcursor->Left(sel));
 526                 updateLocal(bv, false);
 527                 break;
 528
 529
 530         case LFUN_UPSEL:
 531                 sel = true;
 532
 533         case LFUN_UP:
 534                 result = DISPATCH_RESULT(mathcursor->Up(sel));
 535                 updateLocal(bv, false);
 536                 break;
 537
 538
 539         case LFUN_DOWNSEL:
 540                 sel = true;
 541
 542         case LFUN_DOWN:
 543                 result = DISPATCH_RESULT(mathcursor->Down(sel));
 544                 updateLocal(bv, false);
 545                 break;
 546
 547         case LFUN_HOME:
 548                 mathcursor->Home();
 549                 updateLocal(bv, false);
 550                 break;
 551
 552         case LFUN_END:
 553                 mathcursor->End();
 554                 updateLocal(bv, false);
 555                 break;
 556
 557         case LFUN_DELETE_LINE_FORWARD:
 558                 bv->lockedInsetStoreUndo(Undo::DELETE);
 559                 mathcursor->DelLine();
 560                 updateLocal(bv, true);
 561                 break;
 562
 563         case LFUN_TAB:
 564                 mathcursor->idxNext();
 565                 updateLocal(bv, false);
 566                 break;
 567
 568         case LFUN_SHIFT_TAB:
 569                 mathcursor->idxPrev();
 570                 updateLocal(bv, false);
 571                 break;
 572
 573         case LFUN_TABINSERT:
 574                 bv->lockedInsetStoreUndo(Undo::EDIT);
 575                 mathcursor->splitCell();
 576                 updateLocal(bv, true);
 577                 break;
 578
 579         case LFUN_BACKSPACE:
 580                 // if (!mathcursor->InMacroMode() && mathcursor->pos() == 0)
 581                 if (mathcursor->pos() == 0) {
 582                         bv->lockedInsetStoreUndo(Undo::DELETE);
 583                         mathcursor->pullArg();
 584                         bv->updateInset(this, true);
 585                         break;
 586                 }
 587                 if (mathcursor->InMacroMode())
 588                         mathcursor->Left();
 589                 else
 590                         mathcursor->plainLeft();
 591                 // fall through...
 592
 593         case LFUN_DELETE:
 594                 bv->lockedInsetStoreUndo(Undo::DELETE);
 595                 mathcursor->Delete();
 596                 bv->updateInset(this, true);
 597                 break;
 598
 599                 //    case LFUN_GETXY:
 600                 //      sprintf(dispatch_buffer, "%d %d",);
 601                 //      dispatch_result = dispatch_buffer;
 602                 //      break;
 603         case LFUN_SETXY:
 604         {
 605                 lyxerr << "LFUN_SETXY broken!\n";
 606                 int x;
 607                 int y;
 608                 int x1;
 609                 int y1;
 610                 istringstream is(arg.c_str());
 611                 is >> x >> y;
 612                 par_->GetXY(x1, y1);
 613                 mathcursor->SetPos(x1 + x, y1 + y);
 614                 updateLocal(bv, false);
 615         }
 616         break;
 617
 618                 // cursor selection ----------------------------
 619
 620         case LFUN_PASTE:
 621                 if (was_macro)
 622                         mathcursor->MacroModeClose();
 623                 bv->lockedInsetStoreUndo(Undo::INSERT);
 624                 mathcursor->SelPaste();
 625                 updateLocal(bv, true);
 626                 break;
 627
 628         case LFUN_CUT:
 629                 bv->lockedInsetStoreUndo(Undo::DELETE);
 630                 mathcursor->SelCut();
 631                 updateLocal(bv, true);
 632                 break;
 633
 634         case LFUN_COPY:
 635                 mathcursor->SelCopy();
 636                 break;
 637
 638         case LFUN_HOMESEL:
 639         case LFUN_ENDSEL:
 640         case LFUN_WORDRIGHTSEL:
 641         case LFUN_WORDLEFTSEL:
 642                 break;
 643
 644                 // --- accented characters ------------------------------
 645
 646         case LFUN_UMLAUT:     handleAccent(bv, "ddot", LM_ddot); break;
 647         case LFUN_CIRCUMFLEX: handleAccent(bv, "hat", LM_hat); break;
 648         case LFUN_GRAVE:      handleAccent(bv, "grave", LM_grave); break;
 649         case LFUN_ACUTE:      handleAccent(bv, "acute", LM_acute); break;
 650         case LFUN_TILDE:      handleAccent(bv, "tilde", LM_tilde); break;
 651         case LFUN_MACRON:     handleAccent(bv, "bar", LM_bar); break;
 652         case LFUN_DOT:        handleAccent(bv, "dot", LM_dot); break;
 653         case LFUN_CARON:      handleAccent(bv, "check", LM_check); break;
 654         case LFUN_BREVE:      handleAccent(bv, "breve", LM_breve); break;
 655         case LFUN_VECTOR:     handleAccent(bv, "vec", LM_vec); break;
 656
 657                 // Greek mode
 658         case LFUN_GREEK:
 659                 if (!greek_kb_flag) {
 660                         greek_kb_flag = 1;
 661                         bv->owner()->message(_("Math greek mode on"));
 662                 } else
 663                         greek_kb_flag = 0;
 664                 break;
 665
 666                 // Greek keyboard
 667         case LFUN_GREEK_TOGGLE:
 668                 greek_kb_flag = greek_kb_flag ? 0 : 2;
 669                 if (greek_kb_flag)
 670                         bv->owner()->message(_("Math greek keyboard on"));
 671                 else
 672                         bv->owner()->message(_("Math greek keyboard off"));
 673                 break;
 674
 675                 //  Math fonts
 676         case LFUN_BOLD:    handleFont(bv, LM_TC_BF); break;
 677         case LFUN_SANS:    handleFont(bv, LM_TC_SF); break;
 678         case LFUN_EMPH:    handleFont(bv, LM_TC_CAL); break;
 679         case LFUN_ROMAN:   handleFont(bv, LM_TC_RM); break;
 680         case LFUN_CODE:    handleFont(bv, LM_TC_TT); break;
 681         case LFUN_DEFAULT: handleFont(bv, LM_TC_VAR); break;
 682
 683         case LFUN_MATH_MODE:
 684                 handleFont(bv, LM_TC_TEXTRM);
 685                 //bv->owner()->message(_("math text mode toggled"));
 686                 break;
 687
 688 #ifndef NO_LATEX
 689         case LFUN_TEX:
 690                 if (!mathcursor->Selection()) {
 691                         mathcursor->handleFont(LM_TC_TEX);
 692                         //bv->owner()->message(_("TeX mode toggled"));
 693                 }
 694                 break;
 695 #endif
 696
 697         case LFUN_MATH_LIMITS:
 698                 bv->lockedInsetStoreUndo(Undo::INSERT);
 699                 if (mathcursor->toggleLimits())
 700                         updateLocal(bv, true);
 701                 break;
 702
 703         case LFUN_MATH_SIZE:
 704                 if (!arg.empty()) {
 705                         bv->lockedInsetStoreUndo(Undo::INSERT);
 706                         latexkeys const * l = in_word_set(arg);
 707                         mathcursor->SetSize(MathStyles(l ? l->id : static_cast<unsigned int>(-1)));
 708                         updateLocal(bv, true);
 709                 }
 710                 break;
 711
 712         case LFUN_INSERT_MATRIX:
 713                 if (!arg.empty()) {
 714                         bv->lockedInsetStoreUndo(Undo::INSERT);
 715                         mathcursor->Interpret("matrix " + arg);
 716                         updateLocal(bv, true);
 717                 }
 718                 break;
 719
 720         case LFUN_INSERT_MATH:
 721                 if (!arg.empty()) {
 722                         bv->lockedInsetStoreUndo(Undo::INSERT);
 723                         mathcursor->Interpret(arg);
 724                         updateLocal(bv, true);
 725                 }
 726                 break;
 727
 728         case LFUN_MATH_DELIM:
 729         {
 730                 bv->lockedInsetStoreUndo(Undo::INSERT);
 731                 int ilt = '(';
 732                 int irt = '.';
 733                 static const string vdelim("(){}[]./|");
 734                 //lyxerr << "formulabase::LFUN_MATH_DELIM, arg: '" << arg << "'\n";
 735
 736                 if (arg.empty())
 737                         break;
 738
 739                 istringstream is(arg.c_str());
 740                 string lt;
 741                 string rt;
 742                 is >> lt >> rt;
 743                 //lyxerr << "formulabase::LFUN_MATH_DELIM, lt: '" << lt << "'\n";
 744                 //lyxerr << "formulabase::LFUN_MATH_DELIM, rt: '" << rt << "'\n";
 745
 746                 if (lt.size() > 1) {
 747                         latexkeys const * l = in_word_set(lt);
 748                         if (l)
 749                                 ilt = l->id;
 750                 } else if (vdelim.find(lt[0]) != string::npos)
 751                                 ilt = lt[0];
 752
 753                 if (rt.size() > 1) {
 754                         latexkeys const * l = in_word_set(rt);
 755                         if (l)
 756                                 irt = l->id;
 757                 } else if (vdelim.find(rt[0]) != string::npos)
 758                                 irt = rt[0];
 759
 760                 handleDelim(bv, ilt, irt);
 761                 updateLocal(bv, true);
 762                 break;
 763         }
 764
 765         case LFUN_PROTECTEDSPACE:
 766                 bv->lockedInsetStoreUndo(Undo::INSERT);
 767                 mathcursor->insert(new MathSpaceInset(1));
 768                 updateLocal(bv, true);
 769                 break;
 770
 771         case LFUN_UNDO:
 772                 bv->owner()->message(_("Invalid action in math mode!"));
 773                 break;
 774
 775
 776         case LFUN_MATH_HALIGN:
 777         {
 778                 bv->lockedInsetStoreUndo(Undo::INSERT);
 779                 lyxerr << "handling halign '" << arg << "'\n";
 780                 int idx;
 781                 MathArrayInset * p = matrixpar(idx);
 782                 if (!p)
 783                         break;
 784                 p->halign(arg.size() ? arg[0] : 'c', p->col(idx));
 785                 updateLocal(bv, true);
 786                 break;
 787         }
 788
 789         case LFUN_MATH_VALIGN:
 790         {
 791                 bv->lockedInsetStoreUndo(Undo::INSERT);
 792                 lyxerr << "handling valign '" << arg << "'\n";
 793                 int idx;
 794                 MathArrayInset * p = matrixpar(idx);
 795                 if (!p)
 796                         break;
 797                 p->valign(arg.size() ? arg[0] : 'c');
 798                 updateLocal(bv, true);
 799                 break;
 800         }
 801
 802         case LFUN_MATH_ROW_INSERT:
 803         {
 804                 bv->lockedInsetStoreUndo(Undo::INSERT);
 805                 int idx;
 806                 MathArrayInset * p = matrixpar(idx);
 807                 lyxerr << " calling LFUN_MATH_ROW_INSERT on " << p << endl;
 808                 if (!p)
 809                         break;
 810                 p->addRow(p->row(idx));
 811                 updateLocal(bv, true);
 812                 break;
 813         }
 814
 815         case LFUN_MATH_ROW_DELETE:
 816         {
 817                 bv->lockedInsetStoreUndo(Undo::INSERT);
 818                 int idx;
 819                 MathArrayInset * p = matrixpar(idx);
 820                 lyxerr << " calling LFUN_MATH_ROW_DELETE on " << p << endl;
 821                 if (!p)
 822                         break;
 823                 p->delRow(p->row(idx));
 824                 updateLocal(bv, true);
 825                 break;
 826         }
 827
 828         case LFUN_MATH_COLUMN_INSERT:
 829         {
 830                 bv->lockedInsetStoreUndo(Undo::INSERT);
 831                 int idx;
 832                 MathArrayInset * p = matrixpar(idx);
 833                 if (!p)
 834                         break;
 835                 p->addCol(p->col(idx));
 836                 updateLocal(bv, true);
 837                 break;
 838         }
 839
 840         case LFUN_MATH_COLUMN_DELETE:
 841         {
 842                 bv->lockedInsetStoreUndo(Undo::INSERT);
 843                 int idx;
 844                 MathArrayInset * p = matrixpar(idx);
 845                 if (!p)
 846                         break;
 847                 p->delCol(p->col(idx));
 848                 updateLocal(bv, true);
 849                 break;
 850         }
 851
 852         case LFUN_EXEC_COMMAND:
 853                 result = UNDISPATCHED;
 854                 break;
 855
 856         default:
 857                 if ((action == -1 || action == LFUN_SELFINSERT) && !arg.empty()) {
 858                         unsigned char c = arg[0];
 859
 860                         lyxerr << "Action: " << action << endl;
 861
 862                         lyxerr << "char: '" << c << "'  int: " << int(c) << endl;
 863                         //owner_->getIntl()->getTrans().TranslateAndInsert(c, lt);
 864                         //lyxerr << "trans: '" << c << "'  int: " << int(c) << endl;
 865                         bv->lockedInsetStoreUndo(Undo::INSERT);
 866
 867                         if (c == 0) {      // Dead key, do nothing
 868                                 //lyxerr << "deadkey" << endl;
 869                                 break;
 870                         }
 871
 872                         if (isalpha(c)) {
 873                                 if (mathcursor->getLastCode() == LM_TC_TEX) {
 874                                         mathcursor->MacroModeOpen();
 875                                         mathcursor->clearLastCode();
 876                                         varcode = LM_TC_MIN;
 877                                 } else if (!varcode) {
 878                                         short f = mathcursor->getLastCode() ?
 879                                                 mathcursor->getLastCode() :
 880                                                 mathcursor->nextCode();
 881                                         varcode = MathIsAlphaFont(f) ?
 882                                                 static_cast<MathTextCodes>(f) :
 883                                                 LM_TC_VAR;
 884                                 }
 885
 886                                 //           lyxerr << "Varcode << vardoce;
 887                                 MathTextCodes char_code = varcode;
 888                                 if (greek_kb_flag) {
 889                                         char greek[26] =
 890                                         {'A', 'B', 'X',  0 , 'E',  0 ,  0 , 'H', 'I',  0 ,
 891                                          'K',  0 , 'M', 'N', 'O',  0 ,  0 , 'P',  0 , 'T',
 892                                          'Y',  0,   0,   0,   0 , 'Z' };
 893
 894                                         if ('A' <= c && c <= 'Z' && greek[c - 'A']) {
 895                                                 char_code = LM_TC_RM;
 896                                                 c = greek[c - 'A'];
 897                                         } else
 898                                                 char_code = LM_TC_SYMB;
 899                                 }
 900
 901                                 mathcursor->insert(c, char_code);
 902
 903                                 if (greek_kb_flag && char_code == LM_TC_RM )
 904                                         mathcursor->setLastCode(LM_TC_VAR);
 905
 906                                 varcode = LM_TC_MIN;
 907
 908                                 if (greek_kb_flag < 2)
 909                                         greek_kb_flag = 0;
 910
 911                         } else if (strchr("!,:;{}", c) && (varcode == LM_TC_TEX||was_macro)) {
 912                                 mathcursor->insert(c, LM_TC_TEX);
 913                                 if (c == '{') {
 914                                         mathcursor->insert('}', LM_TC_TEX);
 915                                         mathcursor->Left();
 916                                 }
 917                                 mathcursor->clearLastCode();
 918                                 //             varcode = LM_TC_MIN;
 919                         } else if (c == '_' && varcode == LM_TC_TEX) {
 920                                 mathcursor->insert(c, LM_TC_SPECIAL);
 921                                 mathcursor->clearLastCode();
 922                                 //             varcode = LM_TC_MIN;
 923                         } else if ('0' <= c && c <= '9' && (varcode == LM_TC_TEX||was_macro)) {
 924                                 mathcursor->MacroModeOpen();
 925                                 mathcursor->clearLastCode();
 926                                 mathcursor->insert(c, LM_TC_MIN);
 927                         } else if (('0' <= c && c <= '9') || strchr(";:!|[]().,?", c)) {
 928                                 MathTextCodes code = mathcursor->getLastCode();
 929                                 if (code != LM_TC_TEXTRM)
 930                                         code = LM_TC_CONST;
 931                                 mathcursor->insert(c, code);
 932                         } else if (strchr("+/-*<>=", c)) {
 933                                 MathTextCodes code = mathcursor->getLastCode();
 934                                 if (code != LM_TC_TEXTRM)
 935                                         code = LM_TC_BOP;
 936                                 mathcursor->insert(c, code);
 937                         } else if (strchr(latex_special_chars, c) && c != '_') {
 938                                 MathTextCodes code = mathcursor->getLastCode();
 939                                 if (code != LM_TC_TEXTRM)
 940                                         code = LM_TC_SPECIAL;
 941                                 mathcursor->insert(c, code);
 942                         } else if (c == '_' || c == '^') {
 943                                 char s[2];
 944                                 s[0] = c;
 945                                 s[1] = 0;
 946                                 mathcursor->Interpret(s);
 947                         } else if (c == ' ') {
 948                                 if (!varcode) {
 949                                         MathTextCodes f = (mathcursor->getLastCode()) ?
 950                                                 mathcursor->getLastCode() :
 951                                                 mathcursor->nextCode();
 952                                         varcode = MathIsAlphaFont(f) ? f : LM_TC_VAR;
 953                                 }
 954
 955                                 if (varcode == LM_TC_TEXTRM)
 956                                         mathcursor->insert(c, LM_TC_TEXTRM);
 957                                 else if (was_macro)
 958                                         mathcursor->MacroModeClose();
 959                                 else if (mathcursor->pop())
 960                                         mathcursor->plainRight();
 961                                 else {
 962                                         // this would not work if the inset is in an table!
 963                                         //bv->text->cursorRight(bv, true);
 964                                         result = FINISHED;
 965                                 }
 966                         } else if (c == '\'' || c == '@') {
 967                                 mathcursor->insert(c, LM_TC_VAR);
 968                         } else if (c == '\\') {
 969                                 if (was_macro)
 970                                         mathcursor->MacroModeClose();
 971                                 bv->owner()->message(_("TeX mode"));
 972                                 mathcursor->setLastCode(LM_TC_TEX);
 973                         }
 974                         updateLocal(bv, true);
 975                 } else if (action == LFUN_MATH_PANEL) {
 976                         result = UNDISPATCHED;
 977                 } else {
 978                         lyxerr << "Closed by action " << action << endl;
 979                         result =  FINISHED;
 980                 }
 981         }
 982
 983         mathcursor->normalize();
 984
 985         if (was_macro != mathcursor->InMacroMode()
 986                                 && action >= 0 && action != LFUN_BACKSPACE)
 987                 updateLocal(bv, true);
 988
 989         if (mathcursor->Selection() || was_selection)
 990                 toggleInsetSelection(bv);
 991
 992         if (result == DISPATCHED || result == DISPATCHED_NOUPDATE ||
 993             result == UNDISPATCHED)
 994                 showInsetCursor(bv);
 995         else
 996                 bv->unlockInset(this);
 997
 998         return result;  // original version
 999 }
1000
1001
1002
1003 /* FIXME: math-greek-toggle seems to work OK, but math-greek doesn't turn
1004  * on greek mode */
1005 bool math_insert_greek(BufferView * bv, char c)
1006 {
1007         if (!bv->available())
1008                 return false;
1009
1010         if (!isalpha(c))
1011                 return false;
1012
1013         string tmp;
1014         tmp = c;
1015         if (!bv->theLockingInset() || bv->theLockingInset()->isTextInset()) {
1016                 int greek_kb_flag_save = greek_kb_flag;
1017                 InsetFormula * new_inset = new InsetFormula();
1018                 bv->beforeChange(bv->text);
1019                 if (!bv->insertInset(new_inset)) {
1020                         delete new_inset;
1021                         return false;
1022                 }
1023                 //Update(1);//BUG
1024                 new_inset->edit(bv, 0, 0, 0);
1025                 new_inset->localDispatch(bv, LFUN_SELFINSERT, tmp);
1026                 if (greek_kb_flag_save < 2) {
1027                         bv->unlockInset(new_inset); // bv->theLockingInset());
1028                         bv->text->cursorRight(bv, true);
1029                 }
1030         } else
1031                 if (bv->theLockingInset()->lyxCode() == Inset::MATH_CODE ||
1032                                 bv->theLockingInset()->lyxCode() == Inset::MATHMACRO_CODE)
1033                         static_cast<InsetFormula*>(bv->theLockingInset())->localDispatch(bv, LFUN_SELFINSERT, tmp);
1034                 else
1035                         lyxerr << "Math error: attempt to write on a wrong "
1036                                 "class of inset." << endl;
1037         return true;
1038 }
1039
1040
1041
1042 Inset::Code InsetFormulaBase::lyxCode() const
1043 {
1044         return Inset::MATH_CODE;
1045 }
1046
1047
1048 LyXFont const InsetFormulaBase::convertFont(LyXFont const & f) const
1049 {
1050         // We have already discussed what was here
1051         LyXFont font(f);
1052 #ifndef NO_LATEX
1053         font.setLatex(LyXFont::OFF);
1054 #endif
1055         return font;
1056 }
1057
1058 MathInset * InsetFormulaBase::par() const
1059 {
1060         return par_;
1061 }
1062
1063
1064 void mathDispatchCreation(BufferView * bv, string const & arg, bool display)
1065 {
1066         if (bv->available()) {
1067 // Feature "Read math inset from selection" disabled.
1068 //              // use selection if available..
1069 //              string sel;
1070 //              if (action == LFUN_MATH_IMPORT_SELECTION)
1071 //                      sel = "";
1072 //              else
1073 //                      sel = bv->getLyXText()->selectionAsString(bv->buffer());
1074
1075                         InsetFormula * f;
1076 //              if (sel.empty()) {
1077                                 f = new InsetFormula;
1078                                 if (openNewInset(bv, f)) {
1079                                         // don't do that also for LFUN_MATH_MODE unless you want end up with
1080                                         // always changing to mathrm when opening an inlined inset
1081                                         // -- I really hate "LyXfunc overloading"...
1082                                         if (display)
1083                                                 f->localDispatch(bv, LFUN_MATH_DISPLAY, string());
1084                                         f->localDispatch(bv, LFUN_INSERT_MATH, arg);
1085                                 }
1086 //              } else {
1087 //                      f = new InsetFormula(sel);
1088 //                      bv->getLyXText()->cutSelection(bv);
1089 //                      openNewInset(bv, f);
1090 //              }
1091         }
1092         bv->owner()->getLyXFunc()->setMessage(N_("Math editor mode"));
1093 }
1094
1095 void mathDispatchMathDisplay(BufferView * bv, string const & arg)
1096 {
1097         mathDispatchCreation(bv, arg, true);
1098 }
1099
1100 void mathDispatchMathMode(BufferView * bv, string const & arg)
1101 {
1102         mathDispatchCreation(bv, arg, false);
1103 }
1104
1105 void mathDispatchMathImportSelection(BufferView * bv, string const & arg)
1106 {
1107         mathDispatchCreation(bv, arg, true);
1108 }
1109
1110 void mathDispatchMathMacro(BufferView * bv, string const & arg)
1111 {
1112         if (bv->available()) {
1113                 if (arg.empty())
1114                         bv->owner()->getLyXFunc()->setErrorMessage(N_("Missing argument"));
1115                 else {
1116                         string s(arg);
1117                         string const s1 = token(s, ' ', 1);
1118                         int const na = s1.empty() ? 0 : lyx::atoi(s1);
1119                         openNewInset(bv, new InsetFormulaMacro(token(s, ' ', 0), na));
1120                 }
1121         }
1122 }
1123
1124 void mathDispatchMathDelim(BufferView * bv, string const & arg)
1125 {
1126         if (bv->available()) {
1127                 if (openNewInset(bv, new InsetFormula))
1128                         bv->theLockingInset()->localDispatch(bv, LFUN_MATH_DELIM, arg);
1129         }
1130 }
1131
1132
1133 void mathDispatchInsertMatrix(BufferView * bv, string const & arg)
1134 {
1135         if (bv->available()) {
1136                 if (openNewInset(bv, new InsetFormula))
1137                         bv->theLockingInset()->localDispatch(bv, LFUN_INSERT_MATRIX, arg);
1138         }
1139 }
1140
1141 void mathDispatchInsertMath(BufferView * bv, string const & arg)
1142 {
1143         if (bv->available()) {
1144                 if (arg.size() && arg[0] == '\\')
1145                         openNewInset(bv, new InsetFormula(arg));
1146                 else
1147                         mathDispatchMathMode(bv, arg);
1148         }
1149 }
1150