]> git.saurik.com Git - wxWidgets.git/blame - src/stc/stc.cpp.in
fixed problem with HAVE_PTHREAD_RECURSIVE_MUTEX_INITIALIZER test
[wxWidgets.git] / src / stc / stc.cpp.in
CommitLineData
f97d84a6
RD
1////////////////////////////////////////////////////////////////////////////
2// Name: stc.cpp
3// Purpose: A wxWindows implementation of Scintilla. This class is the
4// one meant to be used directly by wx applications. It does not
5// derive directly from the Scintilla classes, but instead
6// delegates most things to the real Scintilla class.
7// This allows the use of Scintilla without polluting the
8// namespace with all the classes and identifiers from Scintilla.
9//
10// Author: Robin Dunn
11//
12// Created: 13-Jan-2000
13// RCS-ID: $Id$
14// Copyright: (c) 2000 by Total Control Software
15// Licence: wxWindows license
16/////////////////////////////////////////////////////////////////////////////
17
18#include <ctype.h>
19
20#include "wx/stc/stc.h"
21#include "ScintillaWX.h"
22
23#include <wx/tokenzr.h>
24
25// The following code forces a reference to all of the Scintilla lexers.
26// If we don't do something like this, then the linker tends to "optimize"
27// them away. (eric@sourcegear.com)
28
29int wxForceScintillaLexers(void)
30{
31 extern LexerModule lmCPP;
32 extern LexerModule lmHTML;
33 extern LexerModule lmXML;
34 extern LexerModule lmProps;
35 extern LexerModule lmErrorList;
36 extern LexerModule lmMake;
37 extern LexerModule lmBatch;
38 extern LexerModule lmPerl;
39 extern LexerModule lmPython;
40 extern LexerModule lmSQL;
41 extern LexerModule lmVB;
42
43 if (
44 &lmCPP
45 && &lmHTML
46 && &lmXML
47 && &lmProps
48 && &lmErrorList
49 && &lmMake
50 && &lmBatch
51 && &lmPerl
52 && &lmPython
53 && &lmSQL
54 && &lmVB
55 )
56 {
57 return 1;
58 }
59 else
60 {
61 return 0;
62 }
63}
64
65//----------------------------------------------------------------------
66
67const wxChar* wxSTCNameStr = "stcwindow";
68
d25f5fbb
RD
69
70DEFINE_EVENT_TYPE( wxEVT_STC_CHANGE )
71DEFINE_EVENT_TYPE( wxEVT_STC_STYLENEEDED )
72DEFINE_EVENT_TYPE( wxEVT_STC_CHARADDED )
73DEFINE_EVENT_TYPE( wxEVT_STC_UPDATEUI )
74DEFINE_EVENT_TYPE( wxEVT_STC_SAVEPOINTREACHED )
75DEFINE_EVENT_TYPE( wxEVT_STC_SAVEPOINTLEFT )
76DEFINE_EVENT_TYPE( wxEVT_STC_ROMODIFYATTEMPT )
77DEFINE_EVENT_TYPE( wxEVT_STC_DOUBLECLICK )
78DEFINE_EVENT_TYPE( wxEVT_STC_MODIFIED )
79DEFINE_EVENT_TYPE( wxEVT_STC_KEY )
80DEFINE_EVENT_TYPE( wxEVT_STC_MACRORECORD )
81DEFINE_EVENT_TYPE( wxEVT_STC_MARGINCLICK )
82DEFINE_EVENT_TYPE( wxEVT_STC_NEEDSHOWN )
83DEFINE_EVENT_TYPE( wxEVT_STC_POSCHANGED )
84
85
f97d84a6
RD
86BEGIN_EVENT_TABLE(wxStyledTextCtrl, wxControl)
87 EVT_PAINT (wxStyledTextCtrl::OnPaint)
88 EVT_SCROLLWIN (wxStyledTextCtrl::OnScrollWin)
89 EVT_SIZE (wxStyledTextCtrl::OnSize)
90 EVT_LEFT_DOWN (wxStyledTextCtrl::OnMouseLeftDown)
91 EVT_MOTION (wxStyledTextCtrl::OnMouseMove)
92 EVT_LEFT_UP (wxStyledTextCtrl::OnMouseLeftUp)
93 EVT_RIGHT_UP (wxStyledTextCtrl::OnMouseRightUp)
37d62433 94 EVT_MOUSEWHEEL (wxStyledTextCtrl::OnMouseWheel)
f97d84a6
RD
95 EVT_CHAR (wxStyledTextCtrl::OnChar)
96 EVT_KEY_DOWN (wxStyledTextCtrl::OnKeyDown)
97 EVT_KILL_FOCUS (wxStyledTextCtrl::OnLoseFocus)
98 EVT_SET_FOCUS (wxStyledTextCtrl::OnGainFocus)
99 EVT_SYS_COLOUR_CHANGED (wxStyledTextCtrl::OnSysColourChanged)
100 EVT_ERASE_BACKGROUND (wxStyledTextCtrl::OnEraseBackground)
101 EVT_MENU_RANGE (-1, -1, wxStyledTextCtrl::OnMenu)
102 EVT_LISTBOX_DCLICK (-1, wxStyledTextCtrl::OnListBox)
103END_EVENT_TABLE()
104
105
106IMPLEMENT_CLASS(wxStyledTextCtrl, wxControl)
107IMPLEMENT_DYNAMIC_CLASS(wxStyledTextEvent, wxCommandEvent)
108
109//----------------------------------------------------------------------
110// Constructor and Destructor
111
112wxStyledTextCtrl::wxStyledTextCtrl(wxWindow *parent,
113 wxWindowID id,
114 const wxPoint& pos,
115 const wxSize& size,
116 long style,
117 const wxString& name) :
118 wxControl(parent, id, pos, size,
119 style | wxVSCROLL | wxHSCROLL | wxWANTS_CHARS | wxCLIP_CHILDREN,
120 wxDefaultValidator, name)
121{
122 m_swx = new ScintillaWX(this);
123 m_stopWatch.Start();
124}
125
126
127wxStyledTextCtrl::~wxStyledTextCtrl() {
128 delete m_swx;
129}
130
131
132//----------------------------------------------------------------------
133
134long wxStyledTextCtrl::SendMsg(int msg, long wp, long lp) {
135
136 return m_swx->WndProc(msg, wp, lp);
137}
138
139
140#ifdef MAKELONG
141#undef MAKELONG
142#endif
143
144#define MAKELONG(a, b) ((a) | ((b) << 16))
145
146
147static long wxColourAsLong(const wxColour& co) {
148 return (((long)co.Blue() << 16) |
149 ((long)co.Green() << 8) |
150 ((long)co.Red()));
151}
152
153static wxColour wxColourFromLong(long c) {
154 wxColour clr;
155 clr.Set(c & 0xff, (c >> 8) & 0xff, (c >> 16) & 0xff);
156 return clr;
157}
158
159
160static wxColour wxColourFromSpec(const wxString& spec) {
161 // spec should be #RRGGBB
162 char* junk;
163 int red = strtol(spec.Mid(1,2), &junk, 16);
164 int green = strtol(spec.Mid(3,2), &junk, 16);
165 int blue = strtol(spec.Mid(5,2), &junk, 16);
166 return wxColour(red, green, blue);
167}
168
169
170//----------------------------------------------------------------------
171// BEGIN generated section. The following code is automatically generated
172// by gen_iface.py from the contents of Scintilla.iface. Do not edit
173// this file. Edit stc.cpp.in or gen_iface.py instead and regenerate.
174
175%(METHOD_IMPS)s
176
177// END of generated section
178//----------------------------------------------------------------------
179
180
181// Returns the line number of the line with the caret.
182int wxStyledTextCtrl::GetCurrentLine() {
183 int line = LineFromPosition(GetCurrentPos());
184 return line;
185}
186
187
188// Extract style settings from a spec-string which is composed of one or
189// more of the following comma separated elements:
190//
191// bold turns on bold
192// italic turns on italics
193// fore:#RRGGBB sets the foreground colour
194// back:#RRGGBB sets the background colour
195// face:[facename] sets the font face name to use
196// size:[num] sets the font size in points
197// eol turns on eol filling
198// underline turns on underlining
199//
200void wxStyledTextCtrl::StyleSetSpec(int styleNum, const wxString& spec) {
201
202 wxStringTokenizer tkz(spec, ",");
203 while (tkz.HasMoreTokens()) {
204 wxString token = tkz.GetNextToken();
205
206 wxString option = token.BeforeFirst(':');
207 wxString val = token.AfterFirst(':');
208
209 if (option == "bold")
210 StyleSetBold(styleNum, true);
211
212 else if (option == "italic")
213 StyleSetItalic(styleNum, true);
214
215 else if (option == "underline")
216 StyleSetUnderline(styleNum, true);
217
218 else if (option == "eol")
219 StyleSetEOLFilled(styleNum, true);
220
221 else if (option == "size") {
222 long points;
223 if (val.ToLong(&points))
224 StyleSetSize(styleNum, points);
225 }
226
227 else if (option == "face")
228 StyleSetFaceName(styleNum, val);
229
230 else if (option == "fore")
231 StyleSetForeground(styleNum, wxColourFromSpec(val));
232
233 else if (option == "back")
234 StyleSetBackground(styleNum, wxColourFromSpec(val));
235 }
236}
237
238
239// Set style size, face, bold, italic, and underline attributes from
240// a wxFont's attributes.
241void wxStyledTextCtrl::StyleSetFont(int styleNum, wxFont& font) {
242 int size = font.GetPointSize();
243 wxString faceName = font.GetFaceName();
244 bool bold = font.GetWeight() == wxBOLD;
245 bool italic = font.GetStyle() != wxNORMAL;
246 bool under = font.GetUnderlined();
247
248 // TODO: add encoding/charset mapping
249 StyleSetFontAttr(styleNum, size, faceName, bold, italic, under);
250}
251
252// Set all font style attributes at once.
253void wxStyledTextCtrl::StyleSetFontAttr(int styleNum, int size,
254 const wxString& faceName,
255 bool bold, bool italic,
256 bool underline) {
257 StyleSetSize(styleNum, size);
258 StyleSetFaceName(styleNum, faceName);
259 StyleSetBold(styleNum, bold);
260 StyleSetItalic(styleNum, italic);
261 StyleSetUnderline(styleNum, underline);
262
263 // TODO: add encoding/charset mapping
264}
265
266
267// Perform one of the operations defined by the wxSTC_CMD_* constants.
268void wxStyledTextCtrl::CmdKeyExecute(int cmd) {
269 SendMsg(cmd);
270}
271
272
273// Set the left and right margin in the edit area, measured in pixels.
274void wxStyledTextCtrl::SetMargins(int left, int right) {
275 SetMarginLeft(left);
276 SetMarginRight(right);
277}
278
279
280// Retrieve the start and end positions of the current selection.
281void wxStyledTextCtrl::GetSelection(int* startPos, int* endPos) {
282 if (startPos != NULL)
283 *startPos = SendMsg(SCI_GETSELECTIONSTART);
284 if (endPos != NULL)
285 *endPos = SendMsg(SCI_GETSELECTIONEND);
286}
287
288
289// Retrieve the point in the window where a position is displayed.
290wxPoint wxStyledTextCtrl::PointFromPosition(int pos) {
291 int x = SendMsg(SCI_POINTXFROMPOSITION, 0, pos);
292 int y = SendMsg(SCI_POINTYFROMPOSITION, 0, pos);
293 return wxPoint(x, y);
294}
295
296// Scroll enough to make the given line visible
297void wxStyledTextCtrl::ScrollToLine(int line) {
298 m_swx->DoScrollToLine(line);
299}
300
301
302// Scroll enough to make the given column visible
303void wxStyledTextCtrl::ScrollToColumn(int column) {
304 m_swx->DoScrollToColumn(column);
305}
306
307
308
309//----------------------------------------------------------------------
310// Event handlers
311
312void wxStyledTextCtrl::OnPaint(wxPaintEvent& evt) {
313 wxPaintDC dc(this);
314 wxRegion region = GetUpdateRegion();
315
316 m_swx->DoPaint(&dc, region.GetBox());
317}
318
319void wxStyledTextCtrl::OnScrollWin(wxScrollWinEvent& evt) {
320 if (evt.GetOrientation() == wxHORIZONTAL)
321 m_swx->DoHScroll(evt.GetEventType(), evt.GetPosition());
322 else
323 m_swx->DoVScroll(evt.GetEventType(), evt.GetPosition());
324}
325
326void wxStyledTextCtrl::OnSize(wxSizeEvent& evt) {
327 wxSize sz = GetClientSize();
328 m_swx->DoSize(sz.x, sz.y);
329}
330
331void wxStyledTextCtrl::OnMouseLeftDown(wxMouseEvent& evt) {
332 wxPoint pt = evt.GetPosition();
333 m_swx->DoButtonDown(Point(pt.x, pt.y), m_stopWatch.Time(),
334 evt.ShiftDown(), evt.ControlDown(), evt.AltDown());
335}
336
337void wxStyledTextCtrl::OnMouseMove(wxMouseEvent& evt) {
338 wxPoint pt = evt.GetPosition();
339 m_swx->DoButtonMove(Point(pt.x, pt.y));
340}
341
342void wxStyledTextCtrl::OnMouseLeftUp(wxMouseEvent& evt) {
343 wxPoint pt = evt.GetPosition();
344 m_swx->DoButtonUp(Point(pt.x, pt.y), m_stopWatch.Time(),
345 evt.ControlDown());
346}
347
348
349void wxStyledTextCtrl::OnMouseRightUp(wxMouseEvent& evt) {
350 wxPoint pt = evt.GetPosition();
351 m_swx->DoContextMenu(Point(pt.x, pt.y));
352}
353
37d62433
RD
354
355void wxStyledTextCtrl::OnMouseWheel(wxMouseEvent& evt) {
356 m_swx->DoMouseWheel(evt.GetWheelRotation(),
357 evt.GetWheelDelta(),
358 evt.GetLinesPerAction());
359}
360
361
f97d84a6
RD
362void wxStyledTextCtrl::OnChar(wxKeyEvent& evt) {
363 long key = evt.KeyCode();
364 if ((key > WXK_ESCAPE) &&
365 (key != WXK_DELETE) && (key < 255) &&
366 !evt.ControlDown() && !evt.AltDown()) {
367
368 m_swx->DoAddChar(key);
369 }
370 else {
371 evt.Skip();
372 }
373}
374
375void wxStyledTextCtrl::OnKeyDown(wxKeyEvent& evt) {
376 long key = evt.KeyCode();
377 key = toupper(key);
378 int processed = m_swx->DoKeyDown(key, evt.ShiftDown(),
379 evt.ControlDown(), evt.AltDown());
380 if (! processed)
381 evt.Skip();
382}
383
384void wxStyledTextCtrl::OnLoseFocus(wxFocusEvent& evt) {
385 m_swx->DoLoseFocus();
386}
387
388void wxStyledTextCtrl::OnGainFocus(wxFocusEvent& evt) {
389 m_swx->DoGainFocus();
390}
391
392void wxStyledTextCtrl::OnSysColourChanged(wxSysColourChangedEvent& evt) {
393 m_swx->DoSysColourChange();
394}
395
396void wxStyledTextCtrl::OnEraseBackground(wxEraseEvent& evt) {
397 // do nothing to help avoid flashing
398}
399
400
401
402void wxStyledTextCtrl::OnMenu(wxCommandEvent& evt) {
403 m_swx->DoCommand(evt.GetId());
404}
405
406
407void wxStyledTextCtrl::OnListBox(wxCommandEvent& evt) {
408 m_swx->DoOnListBox();
409}
410
411
412//----------------------------------------------------------------------
413// Turn notifications from Scintilla into events
414
415
416void wxStyledTextCtrl::NotifyChange() {
417 wxStyledTextEvent evt(wxEVT_STC_CHANGE, GetId());
418 GetEventHandler()->ProcessEvent(evt);
419}
420
421void wxStyledTextCtrl::NotifyParent(SCNotification* _scn) {
422 SCNotification& scn = *_scn;
423 int eventType = 0;
424 switch (scn.nmhdr.code) {
425 case SCN_STYLENEEDED:
426 eventType = wxEVT_STC_STYLENEEDED;
427 break;
428 case SCN_CHARADDED:
429 eventType = wxEVT_STC_CHARADDED;
430 break;
431 case SCN_UPDATEUI:
432 eventType = wxEVT_STC_UPDATEUI;
433 break;
434 case SCN_SAVEPOINTREACHED:
435 eventType = wxEVT_STC_SAVEPOINTREACHED;
436 break;
437 case SCN_SAVEPOINTLEFT:
438 eventType = wxEVT_STC_SAVEPOINTLEFT;
439 break;
440 case SCN_MODIFYATTEMPTRO:
441 eventType = wxEVT_STC_ROMODIFYATTEMPT;
442 break;
443 case SCN_DOUBLECLICK:
444 eventType = wxEVT_STC_DOUBLECLICK;
445 break;
446 case SCN_MODIFIED:
447 eventType = wxEVT_STC_MODIFIED;
448 break;
449 case SCN_KEY:
450 eventType = wxEVT_STC_KEY;
451 break;
452 case SCN_MACRORECORD:
453 eventType = wxEVT_STC_MACRORECORD;
454 break;
455 case SCN_MARGINCLICK:
456 eventType = wxEVT_STC_MARGINCLICK;
457 break;
458 case SCN_NEEDSHOWN:
459 eventType = wxEVT_STC_NEEDSHOWN;
460 break;
461 case SCN_POSCHANGED:
462 eventType = wxEVT_STC_POSCHANGED;
463 break;
464 }
465 if (eventType) {
466 wxStyledTextEvent evt(eventType, GetId());
467 evt.SetPosition(scn.position);
468 evt.SetKey(scn.ch);
469 evt.SetModifiers(scn.modifiers);
470 if (eventType == wxEVT_STC_MODIFIED) {
471 evt.SetModificationType(scn.modificationType);
472 if (scn.text)
473 evt.SetText(wxString(scn.text, scn.length));
474 evt.SetLength(scn.length);
475 evt.SetLinesAdded(scn.linesAdded);
476 evt.SetLine(scn.line);
477 evt.SetFoldLevelNow(scn.foldLevelNow);
478 evt.SetFoldLevelPrev(scn.foldLevelPrev);
479 }
480 if (eventType == wxEVT_STC_MARGINCLICK)
481 evt.SetMargin(scn.margin);
482 if (eventType == wxEVT_STC_MACRORECORD) {
483 evt.SetMessage(scn.message);
484 evt.SetWParam(scn.wParam);
485 evt.SetLParam(scn.lParam);
486 }
487
488 GetEventHandler()->ProcessEvent(evt);
489 }
490}
491
492
493
494//----------------------------------------------------------------------
495//----------------------------------------------------------------------
496//----------------------------------------------------------------------
497
498wxStyledTextEvent::wxStyledTextEvent(wxEventType commandType, int id)
499 : wxCommandEvent(commandType, id)
500{
501 m_position = 0;
502 m_key = 0;
503 m_modifiers = 0;
504 m_modificationType = 0;
505 m_length = 0;
506 m_linesAdded = 0;
507 m_line = 0;
508 m_foldLevelNow = 0;
509 m_foldLevelPrev = 0;
510 m_margin = 0;
511 m_message = 0;
512 m_wParam = 0;
513 m_lParam = 0;
514
515
516}
517
518bool wxStyledTextEvent::GetShift() const { return (m_modifiers & SCI_SHIFT) != 0; }
519bool wxStyledTextEvent::GetControl() const { return (m_modifiers & SCI_CTRL) != 0; }
520bool wxStyledTextEvent::GetAlt() const { return (m_modifiers & SCI_ALT) != 0; }
521
522void wxStyledTextEvent::CopyObject(wxObject& obj) const {
523 wxCommandEvent::CopyObject(obj);
524
525 wxStyledTextEvent* o = (wxStyledTextEvent*)&obj;
526 o->m_position = m_position;
527 o->m_key = m_key;
528 o->m_modifiers = m_modifiers;
529 o->m_modificationType = m_modificationType;
530 o->m_text = m_text;
531 o->m_length = m_length;
532 o->m_linesAdded = m_linesAdded;
533 o->m_line = m_line;
534 o->m_foldLevelNow = m_foldLevelNow;
535 o->m_foldLevelPrev = m_foldLevelPrev;
536
537 o->m_margin = m_margin;
538
539 o->m_message = m_message;
540 o->m_wParam = m_wParam;
541 o->m_lParam = m_lParam;
542
543
544
545}
546
547//----------------------------------------------------------------------
548//----------------------------------------------------------------------
549