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