src/stc/ScintillaWX.cpp

   1 ////////////////////////////////////////////////////////////////////////////
   2 // Name:        ScintillaWX.cxx
   3 // Purpose:     A wxWidgets 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 #include "wx/wx.h"
  18 #include "wx/textbuf.h"
  19 #include "wx/dataobj.h"
  20 #include "wx/clipbrd.h"
  21 #include "wx/dnd.h"
  22
  23 #include "ScintillaWX.h"
  24 #include "ExternalLexer.h"
  25 #include "wx/stc/stc.h"
  26 #include "PlatWX.h"
  27
  28 #ifdef __WXMSW__
  29     // GetHwndOf()
  30     #include "wx/msw/private.h"
  31 #endif
  32
  33 //----------------------------------------------------------------------
  34 // Helper classes
  35
  36 class wxSTCTimer : public wxTimer {
  37 public:
  38     wxSTCTimer(ScintillaWX* swx) {
  39         this->swx = swx;
  40     }
  41
  42     void Notify() {
  43         swx->DoTick();
  44     }
  45
  46 private:
  47     ScintillaWX* swx;
  48 };
  49
  50
  51 #if wxUSE_DRAG_AND_DROP
  52 class wxStartDragTimer : public wxTimer {
  53 public:
  54     wxStartDragTimer(ScintillaWX* swx) {
  55         this->swx = swx;
  56     }
  57
  58     void Notify() {
  59         swx->DoStartDrag();
  60     }
  61
  62 private:
  63     ScintillaWX* swx;
  64 };
  65
  66
  67 bool wxSTCDropTarget::OnDropText(wxCoord x, wxCoord y, const wxString& data) {
  68     return swx->DoDropText(x, y, data);
  69 }
  70
  71 wxDragResult  wxSTCDropTarget::OnEnter(wxCoord x, wxCoord y, wxDragResult def) {
  72     return swx->DoDragEnter(x, y, def);
  73 }
  74
  75 wxDragResult  wxSTCDropTarget::OnDragOver(wxCoord x, wxCoord y, wxDragResult def) {
  76     return swx->DoDragOver(x, y, def);
  77 }
  78
  79 void  wxSTCDropTarget::OnLeave() {
  80     swx->DoDragLeave();
  81 }
  82 #endif // wxUSE_DRAG_AND_DROP
  83
  84
  85 #if wxUSE_POPUPWIN && wxSTC_USE_POPUP
  86 #include <wx/popupwin.h>
  87 #define wxSTCCallTipBase wxPopupWindow
  88 #define param2  wxBORDER_NONE  // popup's 2nd param is flags
  89 #else
  90 #define wxSTCCallTipBase wxFrame
  91 #define param2 -1 // wxWindow's 2nd param is ID
  92 #endif
  93
  94 #include <wx/dcbuffer.h>
  95
  96 class wxSTCCallTip : public wxSTCCallTipBase {
  97 public:
  98     wxSTCCallTip(wxWindow* parent, CallTip* ct, ScintillaWX* swx) :
  99 #if wxUSE_POPUPWIN && wxSTC_USE_POPUP
 100         wxSTCCallTipBase(parent, wxBORDER_NONE),
 101 #else
 102         wxSTCCallTipBase(parent, -1, wxEmptyString, wxDefaultPosition, wxDefaultSize,
 103                          wxFRAME_NO_TASKBAR
 104                          | wxFRAME_FLOAT_ON_PARENT
 105                          | wxBORDER_NONE
 106 #ifdef __WXMAC__
 107                          | wxPOPUP_WINDOW
 108 #endif
 109             ),
 110 #endif
 111           m_ct(ct), m_swx(swx), m_cx(wxDefaultCoord), m_cy(wxDefaultCoord)
 112         {
 113         }
 114
 115     ~wxSTCCallTip() {
 116 #if wxUSE_POPUPWIN && wxSTC_USE_POPUP && defined(__WXGTK__)
 117         wxRect rect = GetRect();
 118         rect.x = m_cx;
 119         rect.y = m_cy;
 120         GetParent()->Refresh(false, &rect);
 121 #endif
 122     }
 123
 124     bool AcceptsFocus() const { return false; }
 125
 126     void OnPaint(wxPaintEvent& WXUNUSED(evt))
 127     {
 128         wxBufferedPaintDC dc(this);
 129         Surface* surfaceWindow = Surface::Allocate();
 130         surfaceWindow->Init(&dc, m_ct->wDraw.GetID());
 131         m_ct->PaintCT(surfaceWindow);
 132         surfaceWindow->Release();
 133         delete surfaceWindow;
 134     }
 135
 136     void OnFocus(wxFocusEvent& event)
 137     {
 138         GetParent()->SetFocus();
 139         event.Skip();
 140     }
 141
 142     void OnLeftDown(wxMouseEvent& event)
 143     {
 144         wxPoint pt = event.GetPosition();
 145         Point p(pt.x, pt.y);
 146         m_ct->MouseClick(p);
 147         m_swx->CallTipClick();
 148     }
 149
 150     virtual void DoSetSize(int x, int y,
 151                            int width, int height,
 152                            int sizeFlags = wxSIZE_AUTO)
 153     {
 154         // convert coords to screen coords since we're a top-level window
 155         if (x != wxDefaultCoord) {
 156             m_cx = x;
 157             GetParent()->ClientToScreen(&x, NULL);
 158         }
 159         if (y != wxDefaultCoord) {
 160             m_cy = y;
 161             GetParent()->ClientToScreen(NULL, &y);
 162         }
 163         wxSTCCallTipBase::DoSetSize(x, y, width, height, sizeFlags);
 164     }
 165
 166 #if wxUSE_POPUPWIN && wxSTC_USE_POPUP
 167 #else
 168     virtual bool Show( bool show = true )
 169     {
 170         // Although we're a frame, we always want the parent to be active, so
 171         // raise it whenever we get shown.
 172         bool rv = wxSTCCallTipBase::Show(show);
 173         if (rv && show)
 174         {
 175             wxTopLevelWindow *frame = wxDynamicCast(
 176                 wxGetTopLevelParent(GetParent()), wxTopLevelWindow);
 177             if (frame)
 178                 frame->Raise();
 179         }
 180         return rv;
 181     }
 182 #endif
 183
 184     wxPoint GetMyPosition()
 185     {
 186         return wxPoint(m_cx, m_cy);
 187     }
 188
 189 private:
 190     CallTip*      m_ct;
 191     ScintillaWX*  m_swx;
 192     int           m_cx, m_cy;
 193     DECLARE_EVENT_TABLE()
 194 };
 195
 196 BEGIN_EVENT_TABLE(wxSTCCallTip, wxSTCCallTipBase)
 197     EVT_PAINT(wxSTCCallTip::OnPaint)
 198     EVT_SET_FOCUS(wxSTCCallTip::OnFocus)
 199     EVT_LEFT_DOWN(wxSTCCallTip::OnLeftDown)
 200 END_EVENT_TABLE()
 201
 202
 203 //----------------------------------------------------------------------
 204
 205 #if wxUSE_DATAOBJ
 206 static wxTextFileType wxConvertEOLMode(int scintillaMode)
 207 {
 208     wxTextFileType type;
 209
 210     switch (scintillaMode) {
 211         case wxSTC_EOL_CRLF:
 212             type = wxTextFileType_Dos;
 213             break;
 214
 215         case wxSTC_EOL_CR:
 216             type = wxTextFileType_Mac;
 217             break;
 218
 219         case wxSTC_EOL_LF:
 220             type = wxTextFileType_Unix;
 221             break;
 222
 223         default:
 224             type = wxTextBuffer::typeDefault;
 225             break;
 226     }
 227     return type;
 228 }
 229 #endif // wxUSE_DATAOBJ
 230
 231
 232 //----------------------------------------------------------------------
 233 // Constructor/Destructor
 234
 235
 236 ScintillaWX::ScintillaWX(wxStyledTextCtrl* win) {
 237     capturedMouse = false;
 238     focusEvent = false;
 239     wMain = win;
 240     stc   = win;
 241     wheelRotation = 0;
 242     Initialise();
 243 #ifdef __WXMSW__
 244     sysCaretBitmap = 0;
 245     sysCaretWidth = 0;
 246     sysCaretHeight = 0;
 247 #endif
 248 #if wxUSE_DRAG_AND_DROP
 249     startDragTimer = new wxStartDragTimer(this);
 250 #endif // wxUSE_DRAG_AND_DROP
 251 }
 252
 253
 254 ScintillaWX::~ScintillaWX() {
 255 #if wxUSE_DRAG_AND_DROP
 256     delete startDragTimer;
 257 #endif // wxUSE_DRAG_AND_DROP
 258     Finalise();
 259 }
 260
 261 //----------------------------------------------------------------------
 262 // base class virtuals
 263
 264
 265 void ScintillaWX::Initialise() {
 266     //ScintillaBase::Initialise();
 267 #if wxUSE_DRAG_AND_DROP
 268     dropTarget = new wxSTCDropTarget;
 269     dropTarget->SetScintilla(this);
 270     stc->SetDropTarget(dropTarget);
 271 #endif // wxUSE_DRAG_AND_DROP
 272 #ifdef __WXMAC__
 273     vs.extraFontFlag = false;  // UseAntiAliasing
 274 #else
 275     vs.extraFontFlag = true;   // UseAntiAliasing
 276 #endif
 277 }
 278
 279
 280 void ScintillaWX::Finalise() {
 281     ScintillaBase::Finalise();
 282     SetTicking(false);
 283     SetIdle(false);
 284     DestroySystemCaret();
 285 }
 286
 287
 288 void ScintillaWX::StartDrag() {
 289 #if wxUSE_DRAG_AND_DROP
 290     // We defer the starting of the DnD, otherwise the LeftUp of a normal
 291     // click could be lost and the STC will think it is doing a DnD when the
 292     // user just wanted a normal click.
 293     startDragTimer->Start(200, true);
 294 #endif // wxUSE_DRAG_AND_DROP
 295 }
 296
 297 void ScintillaWX::DoStartDrag() {
 298 #if wxUSE_DRAG_AND_DROP
 299     wxString dragText = stc2wx(drag.s, drag.len);
 300
 301     // Send an event to allow the drag text to be changed
 302     wxStyledTextEvent evt(wxEVT_STC_START_DRAG, stc->GetId());
 303     evt.SetEventObject(stc);
 304     evt.SetDragText(dragText);
 305     evt.SetDragAllowMove(true);
 306     evt.SetPosition(wxMin(stc->GetSelectionStart(),
 307                           stc->GetSelectionEnd()));
 308     stc->GetEventHandler()->ProcessEvent(evt);
 309     dragText = evt.GetDragText();
 310
 311     if (dragText.length()) {
 312         wxDropSource        source(stc);
 313         wxTextDataObject    data(dragText);
 314         wxDragResult        result;
 315
 316         source.SetData(data);
 317         dropWentOutside = true;
 318         result = source.DoDragDrop(evt.GetDragAllowMove());
 319         if (result == wxDragMove && dropWentOutside)
 320             ClearSelection();
 321         inDragDrop = false;
 322         SetDragPosition(invalidPosition);
 323     }
 324 #endif // wxUSE_DRAG_AND_DROP
 325 }
 326
 327
 328 bool ScintillaWX::SetIdle(bool on) {
 329     if (idler.state != on) {
 330         // connect or disconnect the EVT_IDLE handler
 331         if (on)
 332             stc->Connect(wxID_ANY, wxEVT_IDLE,
 333                          (wxObjectEventFunction) (wxEventFunction) (wxIdleEventFunction) &wxStyledTextCtrl::OnIdle);
 334         else
 335             stc->Disconnect(wxID_ANY, wxEVT_IDLE,
 336                             (wxObjectEventFunction) (wxEventFunction) (wxIdleEventFunction) &wxStyledTextCtrl::OnIdle);
 337         idler.state = on;
 338     }
 339     return idler.state;
 340 }
 341
 342
 343 void ScintillaWX::SetTicking(bool on) {
 344     wxSTCTimer* steTimer;
 345     if (timer.ticking != on) {
 346         timer.ticking = on;
 347         if (timer.ticking) {
 348             steTimer = new wxSTCTimer(this);
 349             steTimer->Start(timer.tickSize);
 350             timer.tickerID = steTimer;
 351         } else {
 352             steTimer = (wxSTCTimer*)timer.tickerID;
 353             steTimer->Stop();
 354             delete steTimer;
 355             timer.tickerID = 0;
 356         }
 357     }
 358     timer.ticksToWait = caret.period;
 359 }
 360
 361
 362 void ScintillaWX::SetMouseCapture(bool on) {
 363     if (mouseDownCaptures) {
 364         if (on && !capturedMouse)
 365             stc->CaptureMouse();
 366         else if (!on && capturedMouse && stc->HasCapture())
 367             stc->ReleaseMouse();
 368         capturedMouse = on;
 369     }
 370 }
 371
 372
 373 bool ScintillaWX::HaveMouseCapture() {
 374     return capturedMouse;
 375 }
 376
 377
 378 void ScintillaWX::ScrollText(int linesToMove) {
 379     int dy = vs.lineHeight * (linesToMove);
 380     stc->ScrollWindow(0, dy);
 381     stc->Update();
 382 }
 383
 384 void ScintillaWX::SetVerticalScrollPos() {
 385     if (stc->m_vScrollBar == NULL) {  // Use built-in scrollbar
 386         stc->SetScrollPos(wxVERTICAL, topLine);
 387     }
 388     else { // otherwise use the one that's been given to us
 389         stc->m_vScrollBar->SetThumbPosition(topLine);
 390     }
 391 }
 392
 393 void ScintillaWX::SetHorizontalScrollPos() {
 394     if (stc->m_hScrollBar == NULL) {  // Use built-in scrollbar
 395         stc->SetScrollPos(wxHORIZONTAL, xOffset);
 396     }
 397     else { // otherwise use the one that's been given to us
 398         stc->m_hScrollBar->SetThumbPosition(xOffset);
 399     }
 400 }
 401
 402
 403 const int H_SCROLL_STEP = 20;
 404
 405 bool ScintillaWX::ModifyScrollBars(int nMax, int nPage) {
 406     bool modified = false;
 407
 408     int vertEnd = nMax;
 409     if (!verticalScrollBarVisible)
 410         vertEnd = 0;
 411
 412     // Check the vertical scrollbar
 413     if (stc->m_vScrollBar == NULL) {  // Use built-in scrollbar
 414         int  sbMax    = stc->GetScrollRange(wxVERTICAL);
 415         int  sbThumb  = stc->GetScrollThumb(wxVERTICAL);
 416         int  sbPos    = stc->GetScrollPos(wxVERTICAL);
 417         if (sbMax != vertEnd || sbThumb != nPage) {
 418             stc->SetScrollbar(wxVERTICAL, sbPos, nPage, vertEnd+1);
 419             modified = true;
 420         }
 421     }
 422     else { // otherwise use the one that's been given to us
 423         int  sbMax    = stc->m_vScrollBar->GetRange();
 424         int  sbPage   = stc->m_vScrollBar->GetPageSize();
 425         int  sbPos    = stc->m_vScrollBar->GetThumbPosition();
 426         if (sbMax != vertEnd || sbPage != nPage) {
 427             stc->m_vScrollBar->SetScrollbar(sbPos, nPage, vertEnd+1, nPage);
 428             modified = true;
 429         }
 430     }
 431
 432
 433     // Check the horizontal scrollbar
 434     PRectangle rcText = GetTextRectangle();
 435     int horizEnd = scrollWidth;
 436     if (horizEnd < 0)
 437         horizEnd = 0;
 438     if (!horizontalScrollBarVisible || (wrapState != eWrapNone))
 439         horizEnd = 0;
 440     int pageWidth = rcText.Width();
 441
 442     if (stc->m_hScrollBar == NULL) {  // Use built-in scrollbar
 443         int sbMax    = stc->GetScrollRange(wxHORIZONTAL);
 444         int sbThumb  = stc->GetScrollThumb(wxHORIZONTAL);
 445         int sbPos    = stc->GetScrollPos(wxHORIZONTAL);
 446         if ((sbMax != horizEnd) || (sbThumb != pageWidth) || (sbPos != 0)) {
 447             stc->SetScrollbar(wxHORIZONTAL, sbPos, pageWidth, horizEnd);
 448             modified = true;
 449             if (scrollWidth < pageWidth) {
 450                 HorizontalScrollTo(0);
 451             }
 452         }
 453     }
 454     else { // otherwise use the one that's been given to us
 455         int sbMax    = stc->m_hScrollBar->GetRange();
 456         int sbThumb  = stc->m_hScrollBar->GetPageSize();
 457         int sbPos    = stc->m_hScrollBar->GetThumbPosition();
 458         if ((sbMax != horizEnd) || (sbThumb != pageWidth) || (sbPos != 0)) {
 459             stc->m_hScrollBar->SetScrollbar(sbPos, pageWidth, horizEnd, pageWidth);
 460             modified = true;
 461             if (scrollWidth < pageWidth) {
 462                 HorizontalScrollTo(0);
 463             }
 464         }
 465     }
 466
 467     return modified;
 468 }
 469
 470
 471 void ScintillaWX::NotifyChange() {
 472     stc->NotifyChange();
 473 }
 474
 475
 476 void ScintillaWX::NotifyParent(SCNotification scn) {
 477     stc->NotifyParent(&scn);
 478 }
 479
 480
 481 // This method is overloaded from ScintillaBase in order to prevent the
 482 // AutoComplete window from being destroyed when it gets the focus.  There is
 483 // a side effect that the AutoComp will also not be destroyed when switching
 484 // to another window, but I think that is okay.
 485 void ScintillaWX::CancelModes() {
 486     if (! focusEvent)
 487         AutoCompleteCancel();
 488     ct.CallTipCancel();
 489     Editor::CancelModes();
 490 }
 491
 492
 493
 494 void ScintillaWX::Copy() {
 495     if (currentPos != anchor) {
 496         SelectionText st;
 497         CopySelectionRange(&st);
 498         CopyToClipboard(st);
 499     }
 500 }
 501
 502
 503 void ScintillaWX::Paste() {
 504     pdoc->BeginUndoAction();
 505     ClearSelection();
 506
 507 #if wxUSE_DATAOBJ
 508     wxTextDataObject data;
 509     bool gotData = false;
 510
 511     if (wxTheClipboard->Open()) {
 512         wxTheClipboard->UsePrimarySelection(false);
 513         gotData = wxTheClipboard->GetData(data);
 514         wxTheClipboard->Close();
 515     }
 516     if (gotData) {
 517         wxString   text = wxTextBuffer::Translate(data.GetText(),
 518                                                   wxConvertEOLMode(pdoc->eolMode));
 519         wxWX2MBbuf buf = (wxWX2MBbuf)wx2stc(text);
 520
 521 #if wxUSE_UNICODE
 522         // free up the old character buffer in case the text is real big
 523         data.SetText(wxEmptyString);
 524         text = wxEmptyString;
 525 #endif
 526         int len = strlen(buf);
 527         pdoc->InsertString(currentPos, buf, len);
 528         SetEmptySelection(currentPos + len);
 529     }
 530 #endif // wxUSE_DATAOBJ
 531
 532     pdoc->EndUndoAction();
 533     NotifyChange();
 534     Redraw();
 535 }
 536
 537
 538 void ScintillaWX::CopyToClipboard(const SelectionText& st) {
 539 #if wxUSE_CLIPBOARD
 540     if (wxTheClipboard->Open()) {
 541         wxTheClipboard->UsePrimarySelection(false);
 542         wxString text = wxTextBuffer::Translate(stc2wx(st.s, st.len-1));
 543         wxTheClipboard->SetData(new wxTextDataObject(text));
 544         wxTheClipboard->Close();
 545     }
 546 #else
 547     wxUnusedVar(st);
 548 #endif // wxUSE_CLIPBOARD
 549 }
 550
 551
 552 bool ScintillaWX::CanPaste() {
 553 #if wxUSE_CLIPBOARD
 554     bool canPaste = false;
 555     bool didOpen;
 556
 557     if (Editor::CanPaste()) {
 558         didOpen = !wxTheClipboard->IsOpened();
 559         if ( didOpen )
 560             wxTheClipboard->Open();
 561
 562         if (wxTheClipboard->IsOpened()) {
 563             wxTheClipboard->UsePrimarySelection(false);
 564             canPaste = wxTheClipboard->IsSupported(wxUSE_UNICODE ? wxDF_UNICODETEXT : wxDF_TEXT);
 565             if (didOpen)
 566                 wxTheClipboard->Close();
 567         }
 568     }
 569     return canPaste;
 570 #else
 571     return false;
 572 #endif // wxUSE_CLIPBOARD
 573 }
 574
 575 void ScintillaWX::CreateCallTipWindow(PRectangle) {
 576     if (! ct.wCallTip.Created() ) {
 577         ct.wCallTip = new wxSTCCallTip(stc, &ct, this);
 578         ct.wDraw = ct.wCallTip;
 579     }
 580 }
 581
 582
 583 void ScintillaWX::AddToPopUp(const char *label, int cmd, bool enabled) {
 584     if (!label[0])
 585         ((wxMenu*)popup.GetID())->AppendSeparator();
 586     else
 587         ((wxMenu*)popup.GetID())->Append(cmd, wxGetTranslation(stc2wx(label)));
 588
 589     if (!enabled)
 590         ((wxMenu*)popup.GetID())->Enable(cmd, enabled);
 591 }
 592
 593
 594 // This is called by the Editor base class whenever something is selected
 595 void ScintillaWX::ClaimSelection() {
 596 #if 0
 597     // Until wxGTK is able to support using both the primary selection and the
 598     // clipboard at the same time I think it causes more problems than it is
 599     // worth to implement this method.  Selecting text should not clear the
 600     // clipboard.  --Robin
 601 #ifdef __WXGTK__
 602     // Put the selected text in the PRIMARY selection
 603     if (currentPos != anchor) {
 604         SelectionText st;
 605         CopySelectionRange(&st);
 606         if (wxTheClipboard->Open()) {
 607             wxTheClipboard->UsePrimarySelection(true);
 608             wxString text = stc2wx(st.s, st.len);
 609             wxTheClipboard->SetData(new wxTextDataObject(text));
 610             wxTheClipboard->UsePrimarySelection(false);
 611             wxTheClipboard->Close();
 612         }
 613     }
 614 #endif
 615 #endif
 616 }
 617
 618
 619 void ScintillaWX::UpdateSystemCaret() {
 620 #ifdef __WXMSW__
 621     if (hasFocus) {
 622         if (HasCaretSizeChanged()) {
 623             DestroySystemCaret();
 624             CreateSystemCaret();
 625         }
 626         Point pos = LocationFromPosition(currentPos);
 627         ::SetCaretPos(pos.x, pos.y);
 628     }
 629 #endif
 630 }
 631
 632
 633 bool ScintillaWX::HasCaretSizeChanged() {
 634 #ifdef __WXMSW__
 635     if (( (0 != vs.caretWidth) && (sysCaretWidth != vs.caretWidth) )
 636         || (0 != vs.lineHeight) && (sysCaretHeight != vs.lineHeight)) {
 637         return true;
 638     }
 639 #endif
 640     return false;
 641 }
 642
 643 bool ScintillaWX::CreateSystemCaret() {
 644 #ifdef __WXMSW__
 645     sysCaretWidth = vs.caretWidth;
 646     if (0 == sysCaretWidth) {
 647         sysCaretWidth = 1;
 648     }
 649     sysCaretHeight = vs.lineHeight;
 650     int bitmapSize = (((sysCaretWidth + 15) & ~15) >> 3) * sysCaretHeight;
 651     char *bits = new char[bitmapSize];
 652     memset(bits, 0, bitmapSize);
 653     sysCaretBitmap = ::CreateBitmap(sysCaretWidth, sysCaretHeight, 1,
 654                                     1, reinterpret_cast<BYTE *>(bits));
 655     delete [] bits;
 656     BOOL retval = ::CreateCaret(GetHwndOf(stc), sysCaretBitmap,
 657                                 sysCaretWidth, sysCaretHeight);
 658     ::ShowCaret(GetHwndOf(stc));
 659     return retval != 0;
 660 #else
 661     return false;
 662 #endif
 663 }
 664
 665 bool ScintillaWX::DestroySystemCaret() {
 666 #ifdef __WXMSW__
 667     ::HideCaret(GetHwndOf(stc));
 668     BOOL retval = ::DestroyCaret();
 669     if (sysCaretBitmap) {
 670         ::DeleteObject(sysCaretBitmap);
 671         sysCaretBitmap = 0;
 672     }
 673     return retval != 0;
 674 #else
 675     return false;
 676 #endif
 677 }
 678
 679
 680 //----------------------------------------------------------------------
 681
 682
 683 sptr_t ScintillaWX::DefWndProc(unsigned int /*iMessage*/, uptr_t /*wParam*/, sptr_t /*lParam*/) {
 684     return 0;
 685 }
 686
 687 sptr_t ScintillaWX::WndProc(unsigned int iMessage, uptr_t wParam, sptr_t lParam) {
 688       switch (iMessage) {
 689       case SCI_CALLTIPSHOW: {
 690           // NOTE: This is copied here from scintilla/src/ScintillaBase.cxx
 691           // because of the little tweak that needs done below for wxGTK.
 692           // When updating new versions double check that this is still
 693           // needed, and that any new code there is copied here too.
 694           Point pt = LocationFromPosition(wParam);
 695           char* defn = reinterpret_cast<char *>(lParam);
 696           AutoCompleteCancel();
 697           pt.y += vs.lineHeight;
 698           PRectangle rc = ct.CallTipStart(currentPos, pt,
 699                                           defn,
 700                                           vs.styles[STYLE_DEFAULT].fontName,
 701                                           vs.styles[STYLE_DEFAULT].sizeZoomed,
 702                                           CodePage(),
 703                                           vs.styles[STYLE_DEFAULT].characterSet,
 704                                           wMain);
 705           // If the call-tip window would be out of the client
 706           // space, adjust so it displays above the text.
 707           PRectangle rcClient = GetClientRectangle();
 708           if (rc.bottom > rcClient.bottom) {
 709 #ifdef __WXGTK__
 710               int offset = int(vs.lineHeight * 1.25)  + rc.Height();
 711 #else
 712               int offset = vs.lineHeight + rc.Height();
 713 #endif
 714               rc.top -= offset;
 715               rc.bottom -= offset;
 716           }
 717           // Now display the window.
 718           CreateCallTipWindow(rc);
 719           ct.wCallTip.SetPositionRelative(rc, wMain);
 720           ct.wCallTip.Show();
 721           break;
 722       }
 723
 724 #ifdef SCI_LEXER
 725       case SCI_LOADLEXERLIBRARY:
 726             LexerManager::GetInstance()->Load((const char*)lParam);
 727             break;
 728 #endif
 729
 730       default:
 731           return ScintillaBase::WndProc(iMessage, wParam, lParam);
 732       }
 733       return 0;
 734 }
 735
 736
 737
 738 //----------------------------------------------------------------------
 739 // Event delegates
 740
 741 void ScintillaWX::DoPaint(wxDC* dc, wxRect rect) {
 742
 743     paintState = painting;
 744     Surface* surfaceWindow = Surface::Allocate();
 745     surfaceWindow->Init(dc, wMain.GetID());
 746     rcPaint = PRectangleFromwxRect(rect);
 747     PRectangle rcClient = GetClientRectangle();
 748     paintingAllText = rcPaint.Contains(rcClient);
 749
 750     ClipChildren(*dc, rcPaint);
 751     Paint(surfaceWindow, rcPaint);
 752
 753     delete surfaceWindow;
 754     if (paintState == paintAbandoned) {
 755         // Painting area was insufficient to cover new styling or brace
 756         // highlight positions
 757         FullPaint();
 758     }
 759     paintState = notPainting;
 760 }
 761
 762
 763 void ScintillaWX::DoHScroll(int type, int pos) {
 764     int xPos = xOffset;
 765     PRectangle rcText = GetTextRectangle();
 766     int pageWidth = rcText.Width() * 2 / 3;
 767     if (type == wxEVT_SCROLLWIN_LINEUP || type == wxEVT_SCROLL_LINEUP)
 768         xPos -= H_SCROLL_STEP;
 769     else if (type == wxEVT_SCROLLWIN_LINEDOWN || type == wxEVT_SCROLL_LINEDOWN)
 770         xPos += H_SCROLL_STEP;
 771     else if (type == wxEVT_SCROLLWIN_PAGEUP || type == wxEVT_SCROLL_PAGEUP)
 772         xPos -= pageWidth;
 773     else if (type == wxEVT_SCROLLWIN_PAGEDOWN || type == wxEVT_SCROLL_PAGEDOWN) {
 774         xPos += pageWidth;
 775         if (xPos > scrollWidth - rcText.Width()) {
 776             xPos = scrollWidth - rcText.Width();
 777         }
 778     }
 779     else if (type == wxEVT_SCROLLWIN_TOP || type == wxEVT_SCROLL_TOP)
 780         xPos = 0;
 781     else if (type == wxEVT_SCROLLWIN_BOTTOM || type == wxEVT_SCROLL_BOTTOM)
 782         xPos = scrollWidth;
 783     else if (type == wxEVT_SCROLLWIN_THUMBTRACK || type == wxEVT_SCROLL_THUMBTRACK)
 784         xPos = pos;
 785
 786     HorizontalScrollTo(xPos);
 787 }
 788
 789 void ScintillaWX::DoVScroll(int type, int pos) {
 790     int topLineNew = topLine;
 791     if (type == wxEVT_SCROLLWIN_LINEUP || type == wxEVT_SCROLL_LINEUP)
 792         topLineNew -= 1;
 793     else if (type == wxEVT_SCROLLWIN_LINEDOWN || type == wxEVT_SCROLL_LINEDOWN)
 794         topLineNew += 1;
 795     else if (type ==  wxEVT_SCROLLWIN_PAGEUP || type == wxEVT_SCROLL_PAGEUP)
 796         topLineNew -= LinesToScroll();
 797     else if (type ==  wxEVT_SCROLLWIN_PAGEDOWN || type == wxEVT_SCROLL_PAGEDOWN)
 798         topLineNew += LinesToScroll();
 799     else if (type ==  wxEVT_SCROLLWIN_TOP || type == wxEVT_SCROLL_TOP)
 800         topLineNew = 0;
 801     else if (type ==  wxEVT_SCROLLWIN_BOTTOM || type == wxEVT_SCROLL_BOTTOM)
 802         topLineNew = MaxScrollPos();
 803     else if (type ==   wxEVT_SCROLLWIN_THUMBTRACK || type == wxEVT_SCROLL_THUMBTRACK)
 804         topLineNew = pos;
 805
 806     ScrollTo(topLineNew);
 807 }
 808
 809 void ScintillaWX::DoMouseWheel(int rotation, int delta,
 810                                int linesPerAction, int ctrlDown,
 811                                bool isPageScroll ) {
 812     int topLineNew = topLine;
 813     int lines;
 814
 815     if (ctrlDown) {  // Zoom the fonts if Ctrl key down
 816         if (rotation < 0) {
 817             KeyCommand(SCI_ZOOMIN);
 818         }
 819         else {
 820             KeyCommand(SCI_ZOOMOUT);
 821         }
 822     }
 823     else { // otherwise just scroll the window
 824         if ( !delta )
 825             delta = 120;
 826         wheelRotation += rotation;
 827         lines = wheelRotation / delta;
 828         wheelRotation -= lines * delta;
 829         if (lines != 0) {
 830             if (isPageScroll)
 831                 lines = lines * LinesOnScreen();  // lines is either +1 or -1
 832             else
 833                 lines *= linesPerAction;
 834             topLineNew -= lines;
 835             ScrollTo(topLineNew);
 836         }
 837     }
 838 }
 839
 840
 841 void ScintillaWX::DoSize(int WXUNUSED(width), int WXUNUSED(height)) {
 842     ChangeSize();
 843 }
 844
 845 void ScintillaWX::DoLoseFocus(){
 846     focusEvent = true;
 847     SetFocusState(false);
 848     focusEvent = false;
 849     DestroySystemCaret();
 850 }
 851
 852 void ScintillaWX::DoGainFocus(){
 853     focusEvent = true;
 854     SetFocusState(true);
 855     focusEvent = false;
 856     DestroySystemCaret();
 857     CreateSystemCaret();
 858 }
 859
 860 void ScintillaWX::DoSysColourChange() {
 861     InvalidateStyleData();
 862 }
 863
 864 void ScintillaWX::DoLeftButtonDown(Point pt, unsigned int curTime, bool shift, bool ctrl, bool alt) {
 865     ButtonDown(pt, curTime, shift, ctrl, alt);
 866 }
 867
 868 void ScintillaWX::DoLeftButtonUp(Point pt, unsigned int curTime, bool ctrl) {
 869     ButtonUp(pt, curTime, ctrl);
 870 #if wxUSE_DRAG_AND_DROP
 871     if (startDragTimer->IsRunning()) {
 872         startDragTimer->Stop();
 873         SetDragPosition(invalidPosition);
 874         SetEmptySelection(PositionFromLocation(pt));
 875         ShowCaretAtCurrentPosition();
 876     }
 877 #endif // wxUSE_DRAG_AND_DROP
 878 }
 879
 880 void ScintillaWX::DoLeftButtonMove(Point pt) {
 881     ButtonMove(pt);
 882 }
 883
 884 #ifdef __WXGTK__
 885 void ScintillaWX::DoMiddleButtonUp(Point pt) {
 886     // Set the current position to the mouse click point and
 887     // then paste in the PRIMARY selection, if any.  wxGTK only.
 888     int newPos = PositionFromLocation(pt);
 889     MovePositionTo(newPos, noSel, true);
 890
 891     pdoc->BeginUndoAction();
 892     wxTextDataObject data;
 893     bool gotData = false;
 894     if (wxTheClipboard->Open()) {
 895         wxTheClipboard->UsePrimarySelection(true);
 896         gotData = wxTheClipboard->GetData(data);
 897         wxTheClipboard->UsePrimarySelection(false);
 898         wxTheClipboard->Close();
 899     }
 900     if (gotData) {
 901         wxString   text = wxTextBuffer::Translate(data.GetText(),
 902                                                   wxConvertEOLMode(pdoc->eolMode));
 903         wxWX2MBbuf buf = (wxWX2MBbuf)wx2stc(text);
 904         int        len = strlen(buf);
 905         pdoc->InsertString(currentPos, buf, len);
 906         SetEmptySelection(currentPos + len);
 907     }
 908     pdoc->EndUndoAction();
 909     NotifyChange();
 910     Redraw();
 911
 912     ShowCaretAtCurrentPosition();
 913     EnsureCaretVisible();
 914 }
 915 #else
 916 void ScintillaWX::DoMiddleButtonUp(Point WXUNUSED(pt)) {
 917 }
 918 #endif
 919
 920
 921 void ScintillaWX::DoAddChar(int key) {
 922 #if wxUSE_UNICODE
 923     wxChar wszChars[2];
 924     wszChars[0] = (wxChar)key;
 925     wszChars[1] = 0;
 926     wxWX2MBbuf buf = (wxWX2MBbuf)wx2stc(wszChars);
 927     AddCharUTF((char*)buf.data(), strlen(buf));
 928 #else
 929     AddChar((char)key);
 930 #endif
 931 }
 932
 933
 934 int  ScintillaWX::DoKeyDown(const wxKeyEvent& evt, bool* consumed)
 935 {
 936     int key = evt.GetKeyCode();
 937     bool shift = evt.ShiftDown(),
 938          ctrl  = evt.ControlDown(),
 939          alt   = evt.AltDown();
 940
 941     if (ctrl && key >= 1 && key <= 26 && key != WXK_BACK)
 942         key += 'A' - 1;
 943
 944     switch (key) {
 945     case WXK_DOWN:              key = SCK_DOWN;     break;
 946     case WXK_UP:                key = SCK_UP;       break;
 947     case WXK_LEFT:              key = SCK_LEFT;     break;
 948     case WXK_RIGHT:             key = SCK_RIGHT;    break;
 949     case WXK_HOME:              key = SCK_HOME;     break;
 950     case WXK_END:               key = SCK_END;      break;
 951     case WXK_PAGEUP:            key = SCK_PRIOR;    break;
 952     case WXK_PAGEDOWN:          key = SCK_NEXT;     break;
 953     case WXK_NUMPAD_DOWN:       key = SCK_DOWN;     break;
 954     case WXK_NUMPAD_UP:         key = SCK_UP;       break;
 955     case WXK_NUMPAD_LEFT:       key = SCK_LEFT;     break;
 956     case WXK_NUMPAD_RIGHT:      key = SCK_RIGHT;    break;
 957     case WXK_NUMPAD_HOME:       key = SCK_HOME;     break;
 958     case WXK_NUMPAD_END:        key = SCK_END;      break;
 959     case WXK_NUMPAD_PAGEUP:     key = SCK_PRIOR;    break;
 960     case WXK_NUMPAD_PAGEDOWN:   key = SCK_NEXT;     break;
 961     case WXK_NUMPAD_DELETE:     key = SCK_DELETE;   break;
 962     case WXK_NUMPAD_INSERT:     key = SCK_INSERT;   break;
 963     case WXK_DELETE:            key = SCK_DELETE;   break;
 964     case WXK_INSERT:            key = SCK_INSERT;   break;
 965     case WXK_ESCAPE:            key = SCK_ESCAPE;   break;
 966     case WXK_BACK:              key = SCK_BACK;     break;
 967     case WXK_TAB:               key = SCK_TAB;      break;
 968     case WXK_NUMPAD_ENTER:      // fall through
 969     case WXK_RETURN:            key = SCK_RETURN;   break;
 970     case WXK_ADD:               // fall through
 971     case WXK_NUMPAD_ADD:        key = SCK_ADD;      break;
 972     case WXK_SUBTRACT:          // fall through
 973     case WXK_NUMPAD_SUBTRACT:   key = SCK_SUBTRACT; break;
 974     case WXK_DIVIDE:            // fall through
 975     case WXK_NUMPAD_DIVIDE:     key = SCK_DIVIDE;   break;
 976     case WXK_CONTROL:           key = 0; break;
 977     case WXK_ALT:               key = 0; break;
 978     case WXK_SHIFT:             key = 0; break;
 979     case WXK_MENU:              key = 0; break;
 980     }
 981
 982 #ifdef __WXMAC__
 983     if ( evt.MetaDown() ) {
 984         // check for a few common Mac Meta-key combos and remap them to Ctrl
 985         // for Scintilla
 986         switch ( key ) {
 987         case 'Z':       // Undo
 988         case 'X':       // Cut
 989         case 'C':       // Copy
 990         case 'V':       // Paste
 991         case 'A':       // Select All
 992             ctrl = true;
 993             break;
 994         }
 995     }
 996 #endif
 997
 998     int rv = KeyDown(key, shift, ctrl, alt, consumed);
 999
1000     if (key)
1001         return rv;
1002     else
1003         return 1;
1004 }
1005
1006
1007 void ScintillaWX::DoCommand(int ID) {
1008     Command(ID);
1009 }
1010
1011
1012 void ScintillaWX::DoContextMenu(Point pt) {
1013     if (displayPopupMenu)
1014         ContextMenu(pt);
1015 }
1016
1017 void ScintillaWX::DoOnListBox() {
1018     AutoCompleteCompleted();
1019 }
1020
1021
1022 void ScintillaWX::DoOnIdle(wxIdleEvent& evt) {
1023
1024     if ( Idle() )
1025         evt.RequestMore();
1026     else
1027         SetIdle(false);
1028 }
1029
1030 //----------------------------------------------------------------------
1031
1032 #if wxUSE_DRAG_AND_DROP
1033 bool ScintillaWX::DoDropText(long x, long y, const wxString& data) {
1034     SetDragPosition(invalidPosition);
1035
1036     wxString text = wxTextBuffer::Translate(data,
1037                                             wxConvertEOLMode(pdoc->eolMode));
1038
1039     // Send an event to allow the drag details to be changed
1040     wxStyledTextEvent evt(wxEVT_STC_DO_DROP, stc->GetId());
1041     evt.SetEventObject(stc);
1042     evt.SetDragResult(dragResult);
1043     evt.SetX(x);
1044     evt.SetY(y);
1045     evt.SetPosition(PositionFromLocation(Point(x,y)));
1046     evt.SetDragText(text);
1047     stc->GetEventHandler()->ProcessEvent(evt);
1048
1049     dragResult = evt.GetDragResult();
1050     if (dragResult == wxDragMove || dragResult == wxDragCopy) {
1051         DropAt(evt.GetPosition(),
1052                wx2stc(evt.GetDragText()),
1053                dragResult == wxDragMove,
1054                false); // TODO: rectangular?
1055         return true;
1056     }
1057     return false;
1058 }
1059
1060
1061 wxDragResult ScintillaWX::DoDragEnter(wxCoord WXUNUSED(x), wxCoord WXUNUSED(y), wxDragResult def) {
1062     dragResult = def;
1063     return dragResult;
1064 }
1065
1066
1067 wxDragResult ScintillaWX::DoDragOver(wxCoord x, wxCoord y, wxDragResult def) {
1068     SetDragPosition(PositionFromLocation(Point(x, y)));
1069
1070     // Send an event to allow the drag result to be changed
1071     wxStyledTextEvent evt(wxEVT_STC_DRAG_OVER, stc->GetId());
1072     evt.SetEventObject(stc);
1073     evt.SetDragResult(def);
1074     evt.SetX(x);
1075     evt.SetY(y);
1076     evt.SetPosition(PositionFromLocation(Point(x,y)));
1077     stc->GetEventHandler()->ProcessEvent(evt);
1078
1079     dragResult = evt.GetDragResult();
1080     return dragResult;
1081 }
1082
1083
1084 void ScintillaWX::DoDragLeave() {
1085     SetDragPosition(invalidPosition);
1086 }
1087 #endif // wxUSE_DRAG_AND_DROP
1088 //----------------------------------------------------------------------
1089
1090 // Force the whole window to be repainted
1091 void ScintillaWX::FullPaint() {
1092 #ifndef __WXMAC__
1093     stc->Refresh(false);
1094 #endif
1095     stc->Update();
1096 }
1097
1098
1099 void ScintillaWX::DoScrollToLine(int line) {
1100     ScrollTo(line);
1101 }
1102
1103
1104 void ScintillaWX::DoScrollToColumn(int column) {
1105     HorizontalScrollTo(column * vs.spaceWidth);
1106 }
1107
1108 // wxGTK doesn't appear to need this explicit clipping code any longer, but I
1109 // will leave it here commented out for a while just in case...
1110 void ScintillaWX::ClipChildren(wxDC& WXUNUSED(dc), PRectangle WXUNUSED(rect))
1111 {
1112 //     wxRegion rgn(wxRectFromPRectangle(rect));
1113 //     if (ac.Active()) {
1114 //         wxRect childRect = ((wxWindow*)ac.lb->GetID())->GetRect();
1115 //         rgn.Subtract(childRect);
1116 //     }
1117 //     if (ct.inCallTipMode) {
1118 //         wxSTCCallTip* tip = (wxSTCCallTip*)ct.wCallTip.GetID();
1119 //         wxRect childRect = tip->GetRect();
1120 // #if wxUSE_POPUPWIN && wxSTC_USE_POPUP
1121 //         childRect.SetPosition(tip->GetMyPosition());
1122 // #endif
1123 //         rgn.Subtract(childRect);
1124 //     }
1125 //     dc.SetClippingRegion(rgn);
1126 }
1127
1128
1129 void ScintillaWX::SetUseAntiAliasing(bool useAA) {
1130     vs.extraFontFlag = useAA;
1131     InvalidateStyleRedraw();
1132 }
1133
1134 bool ScintillaWX::GetUseAntiAliasing() {
1135     return vs.extraFontFlag;
1136 }
1137
1138 //----------------------------------------------------------------------
1139 //----------------------------------------------------------------------