contrib/src/stc/ScintillaWX.cpp

   1 ////////////////////////////////////////////////////////////////////////////
   2 // Name:        ScintillaWX.cxx
   3 // Purpose:     A wxWindows implementation of Scintilla.  A class derived
   4 //              from ScintillaBase that uses the "wx platform" defined in
   5 //              PlatformWX.cxx  This class is one end of a bridge between
   6 //              the wx world and the Scintilla world.  It needs a peer
   7 //              object of type wxStyledTextCtrl to function.
   8 //
   9 // Author:      Robin Dunn
  10 //
  11 // Created:     13-Jan-2000
  12 // RCS-ID:      $Id$
  13 // Copyright:   (c) 2000 by Total Control Software
  14 // Licence:     wxWindows license
  15 /////////////////////////////////////////////////////////////////////////////
  16
  17
  18 #include "ScintillaWX.h"
  19 #include "wx/stc/stc.h"
  20 #include "PlatWX.h"
  21
  22
  23 //----------------------------------------------------------------------
  24
  25 const int H_SCROLL_MAX  = 4000;
  26 const int H_SCROLL_STEP = 20;
  27 const int H_SCROLL_PAGE = 200;
  28
  29 //----------------------------------------------------------------------
  30 // Helper classes
  31
  32 class wxSTCTimer : public wxTimer {
  33 public:
  34     wxSTCTimer(ScintillaWX* swx) {
  35         this->swx = swx;
  36     }
  37
  38     void Notify() {
  39         swx->DoTick();
  40     }
  41
  42 private:
  43     ScintillaWX* swx;
  44 };
  45
  46
  47 #if wxUSE_DRAG_AND_DROP
  48 bool wxSTCDropTarget::OnDropText(wxCoord x, wxCoord y, const wxString& data) {
  49     return swx->DoDropText(x, y, data);
  50 }
  51
  52 wxDragResult  wxSTCDropTarget::OnEnter(wxCoord x, wxCoord y, wxDragResult def) {
  53     return swx->DoDragEnter(x, y, def);
  54 }
  55
  56 wxDragResult  wxSTCDropTarget::OnDragOver(wxCoord x, wxCoord y, wxDragResult def) {
  57     return swx->DoDragOver(x, y, def);
  58 }
  59
  60 void  wxSTCDropTarget::OnLeave() {
  61     swx->DoDragLeave();
  62 }
  63 #endif
  64
  65
  66 #if wxUSE_POPUPWIN
  67 #include <wx/popupwin.h>
  68 #define wxSTCCallTipBase wxPopupWindow
  69 #define param2  wxBORDER_NONE  // popup's 2nd param is flags
  70 #else
  71 #define wxSTCCallTipBase wxWindow
  72 #define param2 -1 // wxWindows 2nd param is ID
  73 #endif
  74
  75 class wxSTCCallTip : public wxSTCCallTipBase {
  76 public:
  77     wxSTCCallTip(wxWindow* parent, CallTip* ct)
  78         : wxSTCCallTipBase(parent, param2)
  79         {
  80             m_ct = ct;
  81         }
  82
  83     void OnPaint(wxPaintEvent& evt) {
  84         wxPaintDC dc(this);
  85         Surface* surfaceWindow = Surface::Allocate();
  86         surfaceWindow->Init(&dc);
  87         m_ct->PaintCT(surfaceWindow);
  88         delete surfaceWindow;
  89     }
  90
  91 #if wxUSE_POPUPWIN
  92     virtual void DoSetSize(int x, int y,
  93                            int width, int height,
  94                            int sizeFlags = wxSIZE_AUTO) {
  95         if (x != -1)
  96             GetParent()->ClientToScreen(&x, NULL);
  97         if (y != -1)
  98             GetParent()->ClientToScreen(NULL, &y);
  99         wxSTCCallTipBase::DoSetSize(x, y, width, height, sizeFlags);
 100     }
 101 #endif
 102
 103 private:
 104     CallTip*    m_ct;
 105     DECLARE_EVENT_TABLE()
 106 };
 107
 108 BEGIN_EVENT_TABLE(wxSTCCallTip, wxSTCCallTipBase)
 109     EVT_PAINT(wxSTCCallTip::OnPaint)
 110 END_EVENT_TABLE()
 111
 112
 113 //----------------------------------------------------------------------
 114 // Constructor/Destructor
 115
 116
 117 ScintillaWX::ScintillaWX(wxStyledTextCtrl* win) {
 118     capturedMouse = false;
 119     wMain = win;
 120     stc   = win;
 121     wheelRotation = 0;
 122     Initialise();
 123 }
 124
 125
 126 ScintillaWX::~ScintillaWX() {
 127     SetTicking(false);
 128 }
 129
 130 //----------------------------------------------------------------------
 131 // base class virtuals
 132
 133
 134 void ScintillaWX::Initialise() {
 135     //ScintillaBase::Initialise();
 136 #if wxUSE_DRAG_AND_DROP
 137     dropTarget = new wxSTCDropTarget;
 138     dropTarget->SetScintilla(this);
 139     stc->SetDropTarget(dropTarget);
 140 #endif
 141 }
 142
 143
 144 void ScintillaWX::Finalise() {
 145     ScintillaBase::Finalise();
 146 }
 147
 148
 149 void ScintillaWX::StartDrag() {
 150 #if wxUSE_DRAG_AND_DROP
 151     wxString dragText(drag.s, drag.len);
 152
 153     // Send an event to allow the drag text to be changed
 154     wxStyledTextEvent evt(wxEVT_STC_START_DRAG, stc->GetId());
 155     evt.SetEventObject(stc);
 156     evt.SetDragText(dragText);
 157     evt.SetDragAllowMove(TRUE);
 158     evt.SetPosition(wxMin(stc->GetSelectionStart(),
 159                           stc->GetSelectionEnd()));
 160     stc->GetEventHandler()->ProcessEvent(evt);
 161     dragText = evt.GetDragText();
 162
 163     if (dragText.Length()) {
 164         wxDropSource        source(stc);
 165         wxTextDataObject    data(dragText);
 166         wxDragResult        result;
 167
 168         source.SetData(data);
 169         dropWentOutside = TRUE;
 170         result = source.DoDragDrop(evt.GetDragAllowMove());
 171         if (result == wxDragMove && dropWentOutside)
 172             ClearSelection();
 173         inDragDrop = FALSE;
 174         SetDragPosition(invalidPosition);
 175     }
 176 #endif
 177 }
 178
 179
 180 void ScintillaWX::SetTicking(bool on) {
 181     wxSTCTimer* steTimer;
 182     if (timer.ticking != on) {
 183         timer.ticking = on;
 184         if (timer.ticking) {
 185             steTimer = new wxSTCTimer(this);
 186             steTimer->Start(timer.tickSize);
 187             timer.tickerID = steTimer;
 188         } else {
 189             steTimer = (wxSTCTimer*)timer.tickerID;
 190             steTimer->Stop();
 191             delete steTimer;
 192             timer.tickerID = 0;
 193         }
 194     }
 195     timer.ticksToWait = caret.period;
 196 }
 197
 198
 199 void ScintillaWX::SetMouseCapture(bool on) {
 200     if (on && !capturedMouse)
 201         stc->CaptureMouse();
 202     else if (!on && capturedMouse)
 203         stc->ReleaseMouse();
 204     capturedMouse = on;
 205 }
 206
 207
 208 bool ScintillaWX::HaveMouseCapture() {
 209     return capturedMouse;
 210 }
 211
 212
 213 void ScintillaWX::ScrollText(int linesToMove) {
 214     int dy = vs.lineHeight * (linesToMove);
 215     stc->ScrollWindow(0, dy);
 216     stc->Update();
 217 }
 218
 219 void ScintillaWX::SetVerticalScrollPos() {
 220     if (stc->m_vScrollBar == NULL) {  // Use built-in scrollbar
 221         stc->SetScrollPos(wxVERTICAL, topLine);
 222     }
 223     else { // otherwise use the one that's been given to us
 224         stc->m_vScrollBar->SetThumbPosition(topLine);
 225     }
 226 }
 227
 228 void ScintillaWX::SetHorizontalScrollPos() {
 229     if (stc->m_hScrollBar == NULL) {  // Use built-in scrollbar
 230         stc->SetScrollPos(wxHORIZONTAL, xOffset);
 231     }
 232     else { // otherwise use the one that's been given to us
 233         stc->m_hScrollBar->SetThumbPosition(xOffset);
 234     }
 235 }
 236
 237
 238 bool ScintillaWX::ModifyScrollBars(int nMax, int nPage) {
 239     bool modified = false;
 240
 241     if (stc->m_vScrollBar == NULL) {  // Use built-in scrollbar
 242         int  sbMax    = stc->GetScrollRange(wxVERTICAL);
 243         int  sbThumb  = stc->GetScrollThumb(wxVERTICAL);
 244         int  sbPos    = stc->GetScrollPos(wxVERTICAL);
 245         if (sbMax != nMax || sbThumb != nPage) {
 246             stc->SetScrollbar(wxVERTICAL, sbPos, nPage, nMax);
 247             modified = true;
 248         }
 249     }
 250     else { // otherwise use the one that's been given to us
 251         int  sbMax    = stc->m_vScrollBar->GetRange();
 252         int  sbPage   = stc->m_vScrollBar->GetPageSize();
 253         int  sbPos    = stc->m_vScrollBar->GetThumbPosition();
 254         if (sbMax != nMax || sbPage != nPage) {
 255             stc->m_vScrollBar->SetScrollbar(sbPos, nPage, nMax, nPage);
 256             modified = true;
 257         }
 258     }
 259
 260
 261     if (horizontalScrollBarVisible) {
 262         if (stc->m_hScrollBar == NULL) {  // Use built-in scrollbar
 263             int sbMax    = stc->GetScrollRange(wxHORIZONTAL);
 264             int sbThumb  = stc->GetScrollThumb(wxHORIZONTAL);
 265             if ((sbMax != H_SCROLL_MAX) || (sbThumb != H_SCROLL_STEP)) {
 266                 stc->SetScrollbar(wxHORIZONTAL, 0, H_SCROLL_STEP, H_SCROLL_MAX);
 267                 modified = true;
 268             }
 269         }
 270         else { // otherwise use the one that's been given to us
 271             int  sbMax    = stc->m_hScrollBar->GetRange();
 272             int  sbPage   = stc->m_hScrollBar->GetPageSize();
 273             if ((sbMax != H_SCROLL_MAX) || (sbPage != H_SCROLL_STEP)) {
 274                 stc->m_hScrollBar->SetScrollbar(0, H_SCROLL_STEP, H_SCROLL_MAX, H_SCROLL_STEP);
 275                 modified = true;
 276             }
 277         }
 278     }
 279     return modified;
 280 }
 281
 282
 283 void ScintillaWX::NotifyChange() {
 284     stc->NotifyChange();
 285 }
 286
 287
 288 void ScintillaWX::NotifyParent(SCNotification scn) {
 289     stc->NotifyParent(&scn);
 290 }
 291
 292
 293
 294 void ScintillaWX::Copy() {
 295     if (currentPos != anchor) {
 296         SelectionText st;
 297         CopySelectionRange(&st);
 298         wxTheClipboard->Open();
 299         wxTheClipboard->SetData(new wxTextDataObject(wxString(st.s, st.len)));
 300         wxTheClipboard->Close();
 301     }
 302 }
 303
 304
 305 void ScintillaWX::Paste() {
 306     pdoc->BeginUndoAction();
 307     ClearSelection();
 308
 309     wxTextDataObject data;
 310     bool gotData;
 311
 312     wxTheClipboard->Open();
 313     gotData = wxTheClipboard->GetData(data);
 314     wxTheClipboard->Close();
 315     if (gotData) {
 316         wxString str = data.GetText();
 317         int      len = str.Length();
 318         pdoc->InsertString(currentPos, str.c_str(), len);
 319         SetEmptySelection(currentPos + len);
 320     }
 321
 322     pdoc->EndUndoAction();
 323     NotifyChange();
 324     Redraw();
 325 }
 326
 327
 328 bool ScintillaWX::CanPaste() {
 329     bool canPaste;
 330
 331     wxTheClipboard->Open();
 332     canPaste = wxTheClipboard->IsSupported( wxDF_TEXT );
 333     wxTheClipboard->Close();
 334
 335     return canPaste;
 336 }
 337
 338 void ScintillaWX::CreateCallTipWindow(PRectangle) {
 339     ct.wCallTip = new wxSTCCallTip(stc, &ct);
 340     ct.wDraw = ct.wCallTip;
 341 }
 342
 343
 344 void ScintillaWX::AddToPopUp(const char *label, int cmd, bool enabled) {
 345     if (!label[0])
 346         ((wxMenu*)popup.GetID())->AppendSeparator();
 347     else
 348         ((wxMenu*)popup.GetID())->Append(cmd, label);
 349
 350     if (!enabled)
 351         ((wxMenu*)popup.GetID())->Enable(cmd, enabled);
 352 }
 353
 354
 355 void ScintillaWX::ClaimSelection() {
 356
 357 }
 358
 359
 360 long ScintillaWX::DefWndProc(unsigned int /*iMessage*/, unsigned long /*wParam*/, long /*lParam*/) {
 361     return 0;
 362 }
 363
 364 long ScintillaWX::WndProc(unsigned int iMessage, unsigned long wParam, long lParam) {
 365 //      switch (iMessage) {
 366 //      case EM_CANPASTE:
 367 //          return CanPaste();
 368 //      default:
 369         return ScintillaBase::WndProc(iMessage, wParam, lParam);
 370 //      }
 371 //      return 0;
 372 }
 373
 374
 375
 376 //----------------------------------------------------------------------
 377 // Event delegates
 378
 379 void ScintillaWX::DoPaint(wxDC* dc, wxRect rect) {
 380
 381     paintState = painting;
 382     Surface* surfaceWindow = Surface::Allocate();
 383     surfaceWindow->Init(dc);
 384     PRectangle rcPaint = PRectangleFromwxRect(rect);
 385     dc->BeginDrawing();
 386     Paint(surfaceWindow, rcPaint);
 387     dc->EndDrawing();
 388     delete surfaceWindow;
 389     if (paintState == paintAbandoned) {
 390         // Painting area was insufficient to cover new styling or brace highlight positions
 391         FullPaint();
 392     }
 393     paintState = notPainting;
 394 #ifdef __WXGTK__
 395     // On wxGTK the editor window paints can overwrite the listbox...
 396     if (ac.Active())
 397         ((wxWindow*)ac.lb.GetID())->Refresh(TRUE);
 398 #endif
 399 }
 400
 401
 402 void ScintillaWX::DoHScroll(int type, int pos) {
 403     int xPos = xOffset;
 404     if (type == wxEVT_SCROLLWIN_LINEUP || type == wxEVT_SCROLL_LINEUP)
 405         xPos -= H_SCROLL_STEP;
 406     else if (type == wxEVT_SCROLLWIN_LINEDOWN || type == wxEVT_SCROLL_LINEDOWN)
 407         xPos += H_SCROLL_STEP;
 408     else if (type == wxEVT_SCROLLWIN_PAGEUP || type == wxEVT_SCROLL_PAGEUP)
 409         xPos -= H_SCROLL_PAGE;
 410     else if (type == wxEVT_SCROLLWIN_PAGEDOWN || type == wxEVT_SCROLL_PAGEDOWN)
 411         xPos += H_SCROLL_PAGE;
 412     else if (type == wxEVT_SCROLLWIN_TOP || type == wxEVT_SCROLL_TOP)
 413         xPos = 0;
 414     else if (type == wxEVT_SCROLLWIN_BOTTOM || type == wxEVT_SCROLL_BOTTOM)
 415         xPos = H_SCROLL_MAX;
 416     else if (type == wxEVT_SCROLLWIN_THUMBTRACK || type == wxEVT_SCROLL_THUMBTRACK)
 417         xPos = pos;
 418
 419     HorizontalScrollTo(xPos);
 420 }
 421
 422 void ScintillaWX::DoVScroll(int type, int pos) {
 423     int topLineNew = topLine;
 424     if (type == wxEVT_SCROLLWIN_LINEUP || type == wxEVT_SCROLL_LINEUP)
 425         topLineNew -= 1;
 426     else if (type == wxEVT_SCROLLWIN_LINEDOWN || type == wxEVT_SCROLL_LINEDOWN)
 427         topLineNew += 1;
 428     else if (type ==  wxEVT_SCROLLWIN_PAGEUP || type == wxEVT_SCROLL_PAGEUP)
 429         topLineNew -= LinesToScroll();
 430     else if (type ==  wxEVT_SCROLLWIN_PAGEDOWN || type == wxEVT_SCROLL_PAGEDOWN)
 431         topLineNew += LinesToScroll();
 432     else if (type ==  wxEVT_SCROLLWIN_TOP || type == wxEVT_SCROLL_TOP)
 433         topLineNew = 0;
 434     else if (type ==  wxEVT_SCROLLWIN_BOTTOM || type == wxEVT_SCROLL_BOTTOM)
 435         topLineNew = MaxScrollPos();
 436     else if (type ==   wxEVT_SCROLLWIN_THUMBTRACK || type == wxEVT_SCROLL_THUMBTRACK)
 437         topLineNew = pos;
 438
 439     ScrollTo(topLineNew);
 440 }
 441
 442
 443 void ScintillaWX::DoMouseWheel(int rotation, int delta, int linesPerAction, int ctrlDown) {
 444     int topLineNew = topLine;
 445     int lines;
 446
 447     if (ctrlDown) {  // Zoom the fonts if Ctrl key down
 448         if (rotation < 0) {
 449             KeyCommand(SCI_ZOOMIN);
 450         }
 451         else {
 452             KeyCommand(SCI_ZOOMOUT);
 453         }
 454     }
 455     else { // otherwise just scroll the window
 456         wheelRotation += rotation;
 457         lines = wheelRotation / delta;
 458         wheelRotation -= lines * delta;
 459         if (lines != 0) {
 460             lines *= linesPerAction;
 461             topLineNew -= lines;
 462             ScrollTo(topLineNew);
 463         }
 464     }
 465 }
 466
 467
 468 void ScintillaWX::DoSize(int width, int height) {
 469 //      PRectangle rcClient(0,0,width,height);
 470 //      SetScrollBarsTo(rcClient);
 471 //      DropGraphics();
 472     ChangeSize();
 473 }
 474
 475 void ScintillaWX::DoLoseFocus(){
 476     SetFocusState(false);
 477 }
 478
 479 void ScintillaWX::DoGainFocus(){
 480     SetFocusState(true);
 481 }
 482
 483 void ScintillaWX::DoSysColourChange() {
 484     InvalidateStyleData();
 485 }
 486
 487 void ScintillaWX::DoButtonDown(Point pt, unsigned int curTime, bool shift, bool ctrl, bool alt) {
 488     ButtonDown(pt, curTime, shift, ctrl, alt);
 489 }
 490
 491 void ScintillaWX::DoButtonUp(Point pt, unsigned int curTime, bool ctrl) {
 492     ButtonUp(pt, curTime, ctrl);
 493 }
 494
 495 void ScintillaWX::DoButtonMove(Point pt) {
 496     ButtonMove(pt);
 497 }
 498
 499
 500 void ScintillaWX::DoAddChar(char ch) {
 501     AddChar(ch);
 502 }
 503
 504 int  ScintillaWX::DoKeyDown(int key, bool shift, bool ctrl, bool alt, bool* consumed) {
 505 #ifdef __WXGTK__
 506     // Ctrl chars (A-Z) end up with the wrong keycode on wxGTK...
 507     if (ctrl && key >= 1 && key <= 26)
 508         key += 'A' - 1;
 509 #endif
 510
 511     switch (key) {
 512     case WXK_DOWN: key = SCK_DOWN; break;
 513     case WXK_UP: key = SCK_UP; break;
 514     case WXK_LEFT: key = SCK_LEFT; break;
 515     case WXK_RIGHT: key = SCK_RIGHT; break;
 516     case WXK_HOME: key = SCK_HOME; break;
 517     case WXK_END: key = SCK_END; break;
 518     case WXK_PRIOR: key = SCK_PRIOR; break;
 519     case WXK_NEXT: key = SCK_NEXT; break;
 520     case WXK_DELETE: key = SCK_DELETE; break;
 521     case WXK_INSERT: key = SCK_INSERT; break;
 522     case WXK_ESCAPE: key = SCK_ESCAPE; break;
 523     case WXK_BACK: key = SCK_BACK; break;
 524     case WXK_TAB: key = SCK_TAB; break;
 525     case WXK_RETURN: key = SCK_RETURN; break;
 526     case WXK_ADD:
 527     case WXK_NUMPAD_ADD:
 528         key = SCK_ADD; break;
 529     case WXK_SUBTRACT:
 530     case WXK_NUMPAD_SUBTRACT:
 531         key = SCK_SUBTRACT; break;
 532     case WXK_DIVIDE:
 533     case WXK_NUMPAD_DIVIDE:
 534         key = SCK_DIVIDE; break;
 535     case WXK_CONTROL: key = 0; break;
 536     case WXK_ALT: key = 0; break;
 537     case WXK_SHIFT: key = 0; break;
 538     case WXK_MENU: key = 0; break;
 539     }
 540
 541     int rv = KeyDown(key, shift, ctrl, alt, consumed);
 542
 543     if (key)
 544         return rv;
 545     else
 546         return 1;
 547 }
 548
 549
 550 void ScintillaWX::DoCommand(int ID) {
 551     Command(ID);
 552 }
 553
 554
 555 void ScintillaWX::DoContextMenu(Point pt) {
 556     ContextMenu(pt);
 557 }
 558
 559 void ScintillaWX::DoOnListBox() {
 560     AutoCompleteCompleted();
 561 }
 562
 563 //----------------------------------------------------------------------
 564
 565 #if wxUSE_DRAG_AND_DROP
 566 bool ScintillaWX::DoDropText(long x, long y, const wxString& data) {
 567     SetDragPosition(invalidPosition);
 568
 569     // Send an event to allow the drag details to be changed
 570     wxStyledTextEvent evt(wxEVT_STC_DO_DROP, stc->GetId());
 571     evt.SetEventObject(stc);
 572     evt.SetDragResult(dragResult);
 573     evt.SetX(x);
 574     evt.SetY(y);
 575     evt.SetPosition(PositionFromLocation(Point(x,y)));
 576     evt.SetDragText(data);
 577     stc->GetEventHandler()->ProcessEvent(evt);
 578
 579     dragResult = evt.GetDragResult();
 580     if (dragResult == wxDragMove || dragResult == wxDragCopy) {
 581         DropAt(evt.GetPosition(),
 582                evt.GetDragText(),
 583                dragResult == wxDragMove,
 584                FALSE); // TODO: rectangular?
 585         return TRUE;
 586     }
 587     return FALSE;
 588 }
 589
 590
 591 wxDragResult ScintillaWX::DoDragEnter(wxCoord x, wxCoord y, wxDragResult def) {
 592     dragResult = def;
 593     return dragResult;
 594 }
 595
 596
 597 wxDragResult ScintillaWX::DoDragOver(wxCoord x, wxCoord y, wxDragResult def) {
 598     SetDragPosition(PositionFromLocation(Point(x, y)));
 599
 600     // Send an event to allow the drag result to be changed
 601     wxStyledTextEvent evt(wxEVT_STC_DRAG_OVER, stc->GetId());
 602     evt.SetEventObject(stc);
 603     evt.SetDragResult(def);
 604     evt.SetX(x);
 605     evt.SetY(y);
 606     evt.SetPosition(PositionFromLocation(Point(x,y)));
 607     stc->GetEventHandler()->ProcessEvent(evt);
 608
 609     dragResult = evt.GetDragResult();
 610     return dragResult;
 611 }
 612
 613
 614 void ScintillaWX::DoDragLeave() {
 615     SetDragPosition(invalidPosition);
 616 }
 617 #endif
 618 //----------------------------------------------------------------------
 619
 620 // Redraw all of text area. This paint will not be abandoned.
 621 void ScintillaWX::FullPaint() {
 622     paintState = painting;
 623     rcPaint = GetTextRectangle();
 624     paintingAllText = true;
 625     wxClientDC dc(stc);
 626     Surface* surfaceWindow = Surface::Allocate();
 627     surfaceWindow->Init(&dc);
 628     Paint(surfaceWindow, rcPaint);
 629     delete surfaceWindow;
 630
 631 //     stc->Refresh(FALSE);
 632
 633     paintState = notPainting;
 634 }
 635
 636
 637 void ScintillaWX::DoScrollToLine(int line) {
 638     ScrollTo(line);
 639 }
 640
 641
 642 void ScintillaWX::DoScrollToColumn(int column) {
 643     HorizontalScrollTo(column * vs.spaceWidth);
 644 }
 645
 646
 647
 648 //----------------------------------------------------------------------
 649 //----------------------------------------------------------------------