]> git.saurik.com Git - wxWidgets.git/blame - contrib/src/stc/stc.cpp.in
projects / wxWidgets.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
UPdated the OSX build instructions a bit
[wxWidgets.git] / contrib / 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{
65ec6247
RD		 31 extern LexerModule lmAda;
32 extern LexerModule lmAVE;
33 extern LexerModule lmConf;
f97d84a6 34 extern LexerModule lmCPP;
b8b0e402 35 extern LexerModule lmNncrontab;
65ec6247 36 extern LexerModule lmEiffel;
f97d84a6 37 extern LexerModule lmHTML;
65ec6247
RD		 38 extern LexerModule lmLISP;
39 extern LexerModule lmLua;
40 extern LexerModule lmBatch; // In LexOthers.cxx
41 extern LexerModule lmPascal;
f97d84a6
RD		 42 extern LexerModule lmPerl;
43 extern LexerModule lmPython;
65ec6247 44 extern LexerModule lmRuby;
f97d84a6
RD		 45 extern LexerModule lmSQL;
46 extern LexerModule lmVB;
47
65ec6247
RD		 48 if ( &lmAda
49 && &lmAVE
50 && &lmConf
51 && &lmCPP
b8b0e402 52 && &lmNncrontab
65ec6247
RD		 53 && &lmEiffel
54 && &lmHTML
55 && &lmLISP
56 && &lmLua
57 && &lmBatch
58 && &lmPascal
59 && &lmPerl
60 && &lmPython
61 && &lmRuby
62 && &lmSQL
63 && &lmVB )
f97d84a6
RD		 64 {
65 return 1;
66 }
67 else
68 {
69 return 0;
70 }
71}
72
73//----------------------------------------------------------------------
74
75const wxChar* wxSTCNameStr = "stcwindow";
76
d25f5fbb
RD		 77DEFINE_EVENT_TYPE( wxEVT_STC_CHANGE )
78DEFINE_EVENT_TYPE( wxEVT_STC_STYLENEEDED )
79DEFINE_EVENT_TYPE( wxEVT_STC_CHARADDED )
d25f5fbb
RD		 80DEFINE_EVENT_TYPE( wxEVT_STC_SAVEPOINTREACHED )
81DEFINE_EVENT_TYPE( wxEVT_STC_SAVEPOINTLEFT )
82DEFINE_EVENT_TYPE( wxEVT_STC_ROMODIFYATTEMPT )
65ec6247 83DEFINE_EVENT_TYPE( wxEVT_STC_KEY )
d25f5fbb 84DEFINE_EVENT_TYPE( wxEVT_STC_DOUBLECLICK )
65ec6247 85DEFINE_EVENT_TYPE( wxEVT_STC_UPDATEUI )
d25f5fbb 86DEFINE_EVENT_TYPE( wxEVT_STC_MODIFIED )
d25f5fbb
RD		 87DEFINE_EVENT_TYPE( wxEVT_STC_MACRORECORD )
88DEFINE_EVENT_TYPE( wxEVT_STC_MARGINCLICK )
89DEFINE_EVENT_TYPE( wxEVT_STC_NEEDSHOWN )
90DEFINE_EVENT_TYPE( wxEVT_STC_POSCHANGED )
65ec6247
RD		 91DEFINE_EVENT_TYPE( wxEVT_STC_PAINTED )
92DEFINE_EVENT_TYPE( wxEVT_STC_USERLISTSELECTION )
93DEFINE_EVENT_TYPE( wxEVT_STC_URIDROPPED )
94DEFINE_EVENT_TYPE( wxEVT_STC_DWELLSTART )
95DEFINE_EVENT_TYPE( wxEVT_STC_DWELLEND )
a29a241f
RD		 96DEFINE_EVENT_TYPE( wxEVT_STC_START_DRAG )
97DEFINE_EVENT_TYPE( wxEVT_STC_DRAG_OVER )
98DEFINE_EVENT_TYPE( wxEVT_STC_DO_DROP )
d25f5fbb
RD		 99
100
f97d84a6
RD		 101BEGIN_EVENT_TABLE(wxStyledTextCtrl, wxControl)
102 EVT_PAINT (wxStyledTextCtrl::OnPaint)
103 EVT_SCROLLWIN (wxStyledTextCtrl::OnScrollWin)
5fa4613c 104 EVT_SCROLL (wxStyledTextCtrl::OnScroll)
f97d84a6
RD		 105 EVT_SIZE (wxStyledTextCtrl::OnSize)
106 EVT_LEFT_DOWN (wxStyledTextCtrl::OnMouseLeftDown)
4ceb1196
RD		 107#ifdef __WXMSW__
108 // Let Scintilla see the double click as a second click
109 EVT_LEFT_DCLICK (wxStyledTextCtrl::OnMouseLeftDown)
110#endif
f97d84a6
RD		 111 EVT_MOTION (wxStyledTextCtrl::OnMouseMove)
112 EVT_LEFT_UP (wxStyledTextCtrl::OnMouseLeftUp)
ddf2da08
RD		 113#ifdef __WXGTK__
114 EVT_RIGHT_UP (wxStyledTextCtrl::OnMouseRightUp)
115#else
65ec6247 116 EVT_CONTEXT_MENU (wxStyledTextCtrl::OnContextMenu)
ddf2da08 117#endif
37d62433 118 EVT_MOUSEWHEEL (wxStyledTextCtrl::OnMouseWheel)
f97d84a6
RD		 119 EVT_CHAR (wxStyledTextCtrl::OnChar)
120 EVT_KEY_DOWN (wxStyledTextCtrl::OnKeyDown)
121 EVT_KILL_FOCUS (wxStyledTextCtrl::OnLoseFocus)
122 EVT_SET_FOCUS (wxStyledTextCtrl::OnGainFocus)
123 EVT_SYS_COLOUR_CHANGED (wxStyledTextCtrl::OnSysColourChanged)
124 EVT_ERASE_BACKGROUND (wxStyledTextCtrl::OnEraseBackground)
125 EVT_MENU_RANGE (-1, -1, wxStyledTextCtrl::OnMenu)
126 EVT_LISTBOX_DCLICK (-1, wxStyledTextCtrl::OnListBox)
127END_EVENT_TABLE()
128
129
130IMPLEMENT_CLASS(wxStyledTextCtrl, wxControl)
131IMPLEMENT_DYNAMIC_CLASS(wxStyledTextEvent, wxCommandEvent)
132
133//----------------------------------------------------------------------
134// Constructor and Destructor
135
136wxStyledTextCtrl::wxStyledTextCtrl(wxWindow *parent,
137 wxWindowID id,
138 const wxPoint& pos,
139 const wxSize& size,
140 long style,
141 const wxString& name) :
142 wxControl(parent, id, pos, size,
143 style | wxVSCROLL | wxHSCROLL | wxWANTS_CHARS | wxCLIP_CHILDREN,
144 wxDefaultValidator, name)
145{
146 m_swx = new ScintillaWX(this);
147 m_stopWatch.Start();
d6582821 148 m_lastKeyDownConsumed = FALSE;
5fa4613c
RD		 149 m_vScrollBar = NULL;
150 m_hScrollBar = NULL;
f97d84a6
RD		 151}
152
153
154wxStyledTextCtrl::~wxStyledTextCtrl() {
155 delete m_swx;
156}
157
158
159//----------------------------------------------------------------------
160
161long wxStyledTextCtrl::SendMsg(int msg, long wp, long lp) {
162
163 return m_swx->WndProc(msg, wp, lp);
164}
165
166
167#ifdef MAKELONG
168#undef MAKELONG
169#endif
170
171#define MAKELONG(a, b) ((a) | ((b) << 16))
172
173
174static long wxColourAsLong(const wxColour& co) {
175 return (((long)co.Blue() << 16) |
176 ((long)co.Green() << 8) |
177 ((long)co.Red()));
178}
179
180static wxColour wxColourFromLong(long c) {
181 wxColour clr;
182 clr.Set(c & 0xff, (c >> 8) & 0xff, (c >> 16) & 0xff);
183 return clr;
184}
185
186
187static wxColour wxColourFromSpec(const wxString& spec) {
188 // spec should be #RRGGBB
189 char* junk;
190 int red = strtol(spec.Mid(1,2), &junk, 16);
191 int green = strtol(spec.Mid(3,2), &junk, 16);
192 int blue = strtol(spec.Mid(5,2), &junk, 16);
193 return wxColour(red, green, blue);
194}
195
196
197//----------------------------------------------------------------------
198// BEGIN generated section. The following code is automatically generated
199// by gen_iface.py from the contents of Scintilla.iface. Do not edit
200// this file. Edit stc.cpp.in or gen_iface.py instead and regenerate.
201
202%(METHOD_IMPS)s
203
204// END of generated section
205//----------------------------------------------------------------------
206
207
208// Returns the line number of the line with the caret.
209int wxStyledTextCtrl::GetCurrentLine() {
210 int line = LineFromPosition(GetCurrentPos());
211 return line;
212}
213
214
215// Extract style settings from a spec-string which is composed of one or
216// more of the following comma separated elements:
217//
218// bold turns on bold
219// italic turns on italics
220// fore:#RRGGBB sets the foreground colour
221// back:#RRGGBB sets the background colour
222// face:[facename] sets the font face name to use
223// size:[num] sets the font size in points
224// eol turns on eol filling
225// underline turns on underlining
226//
227void wxStyledTextCtrl::StyleSetSpec(int styleNum, const wxString& spec) {
228
229 wxStringTokenizer tkz(spec, ",");
230 while (tkz.HasMoreTokens()) {
231 wxString token = tkz.GetNextToken();
232
233 wxString option = token.BeforeFirst(':');
234 wxString val = token.AfterFirst(':');
235
236 if (option == "bold")
237 StyleSetBold(styleNum, true);
238
239 else if (option == "italic")
240 StyleSetItalic(styleNum, true);
241
242 else if (option == "underline")
243 StyleSetUnderline(styleNum, true);
244
245 else if (option == "eol")
246 StyleSetEOLFilled(styleNum, true);
247
248 else if (option == "size") {
249 long points;
250 if (val.ToLong(&points))
251 StyleSetSize(styleNum, points);
252 }
253
254 else if (option == "face")
255 StyleSetFaceName(styleNum, val);
256
257 else if (option == "fore")
258 StyleSetForeground(styleNum, wxColourFromSpec(val));
259
260 else if (option == "back")
261 StyleSetBackground(styleNum, wxColourFromSpec(val));
262 }
263}
264
265
266// Set style size, face, bold, italic, and underline attributes from
267// a wxFont's attributes.
268void wxStyledTextCtrl::StyleSetFont(int styleNum, wxFont& font) {
269 int size = font.GetPointSize();
270 wxString faceName = font.GetFaceName();
271 bool bold = font.GetWeight() == wxBOLD;
272 bool italic = font.GetStyle() != wxNORMAL;
273 bool under = font.GetUnderlined();
274
275 // TODO: add encoding/charset mapping
276 StyleSetFontAttr(styleNum, size, faceName, bold, italic, under);
277}
278
279// Set all font style attributes at once.
280void wxStyledTextCtrl::StyleSetFontAttr(int styleNum, int size,
281 const wxString& faceName,
282 bool bold, bool italic,
283 bool underline) {
284 StyleSetSize(styleNum, size);
285 StyleSetFaceName(styleNum, faceName);
286 StyleSetBold(styleNum, bold);
287 StyleSetItalic(styleNum, italic);
288 StyleSetUnderline(styleNum, underline);
289
290 // TODO: add encoding/charset mapping
291}
292
293
294// Perform one of the operations defined by the wxSTC_CMD_* constants.
295void wxStyledTextCtrl::CmdKeyExecute(int cmd) {
296 SendMsg(cmd);
297}
298
299
300// Set the left and right margin in the edit area, measured in pixels.
301void wxStyledTextCtrl::SetMargins(int left, int right) {
302 SetMarginLeft(left);
303 SetMarginRight(right);
304}
305
306
307// Retrieve the start and end positions of the current selection.
308void wxStyledTextCtrl::GetSelection(int* startPos, int* endPos) {
309 if (startPos != NULL)
310 *startPos = SendMsg(SCI_GETSELECTIONSTART);
311 if (endPos != NULL)
312 *endPos = SendMsg(SCI_GETSELECTIONEND);
313}
314
315
316// Retrieve the point in the window where a position is displayed.
317wxPoint wxStyledTextCtrl::PointFromPosition(int pos) {
318 int x = SendMsg(SCI_POINTXFROMPOSITION, 0, pos);
319 int y = SendMsg(SCI_POINTYFROMPOSITION, 0, pos);
320 return wxPoint(x, y);
321}
322
323// Scroll enough to make the given line visible
324void wxStyledTextCtrl::ScrollToLine(int line) {
325 m_swx->DoScrollToLine(line);
326}
327
328
329// Scroll enough to make the given column visible
330void wxStyledTextCtrl::ScrollToColumn(int column) {
331 m_swx->DoScrollToColumn(column);
332}
333
334
335
336//----------------------------------------------------------------------
337// Event handlers
338
339void wxStyledTextCtrl::OnPaint(wxPaintEvent& evt) {
340 wxPaintDC dc(this);
341 wxRegion region = GetUpdateRegion();
342
343 m_swx->DoPaint(&dc, region.GetBox());
344}
345
346void wxStyledTextCtrl::OnScrollWin(wxScrollWinEvent& evt) {
347 if (evt.GetOrientation() == wxHORIZONTAL)
348 m_swx->DoHScroll(evt.GetEventType(), evt.GetPosition());
349 else
350 m_swx->DoVScroll(evt.GetEventType(), evt.GetPosition());
351}
352
5fa4613c
RD		 353void wxStyledTextCtrl::OnScroll(wxScrollEvent& evt) {
354 wxScrollBar* sb = wxDynamicCast(evt.GetEventObject(), wxScrollBar);
355 if (sb) {
356 if (sb->IsVertical())
357 m_swx->DoVScroll(evt.GetEventType(), evt.GetPosition());
358 else
359 m_swx->DoHScroll(evt.GetEventType(), evt.GetPosition());
360 }
361}
362
f97d84a6
RD		 363void wxStyledTextCtrl::OnSize(wxSizeEvent& evt) {
364 wxSize sz = GetClientSize();
365 m_swx->DoSize(sz.x, sz.y);
366}
367
368void wxStyledTextCtrl::OnMouseLeftDown(wxMouseEvent& evt) {
369 wxPoint pt = evt.GetPosition();
370 m_swx->DoButtonDown(Point(pt.x, pt.y), m_stopWatch.Time(),
371 evt.ShiftDown(), evt.ControlDown(), evt.AltDown());
372}
373
374void wxStyledTextCtrl::OnMouseMove(wxMouseEvent& evt) {
375 wxPoint pt = evt.GetPosition();
376 m_swx->DoButtonMove(Point(pt.x, pt.y));
377}
378
379void wxStyledTextCtrl::OnMouseLeftUp(wxMouseEvent& evt) {
380 wxPoint pt = evt.GetPosition();
381 m_swx->DoButtonUp(Point(pt.x, pt.y), m_stopWatch.Time(),
382 evt.ControlDown());
383}
384
385
ddf2da08
RD		 386void wxStyledTextCtrl::OnMouseRightUp(wxMouseEvent& evt) {
387 wxPoint pt = evt.GetPosition();
388 m_swx->DoContextMenu(Point(pt.x, pt.y));
389}
390
391
65ec6247 392void wxStyledTextCtrl::OnContextMenu(wxContextMenuEvent& evt) {
f97d84a6 393 wxPoint pt = evt.GetPosition();
65ec6247 394 ScreenToClient(&pt.x, &pt.y);
f97d84a6
RD		 395 m_swx->DoContextMenu(Point(pt.x, pt.y));
396}
397
37d62433
RD		 398
399void wxStyledTextCtrl::OnMouseWheel(wxMouseEvent& evt) {
400 m_swx->DoMouseWheel(evt.GetWheelRotation(),
401 evt.GetWheelDelta(),
65ec6247
RD		 402 evt.GetLinesPerAction(),
403 evt.ControlDown());
37d62433
RD		 404}
405
406
f97d84a6
RD		 407void wxStyledTextCtrl::OnChar(wxKeyEvent& evt) {
408 long key = evt.KeyCode();
f3c2c221
RD		 409
410// printf("OnChar key:%%d consumed:%%d ctrl:%%d alt:%%d\n",
411// key, m_lastKeyDownConsumed, evt.ControlDown(), evt.AltDown());
412
413 // AltGr keys???
414