in DoSetSize, only call GetPosition if necessary
[wxWidgets.git] / src / gtk / textctrl.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: src/gtk/textctrl.cpp
3 // Purpose:
4 // Author: Robert Roebling
5 // Id: $Id$
6 // Copyright: (c) 1998 Robert Roebling, Vadim Zeitlin, 2005 Mart Raudsepp
7 // Licence: wxWindows licence
8 /////////////////////////////////////////////////////////////////////////////
9
10 // For compilers that support precompilation, includes "wx.h".
11 #include "wx/wxprec.h"
12
13 #if wxUSE_TEXTCTRL
14
15 #include "wx/textctrl.h"
16
17 #ifndef WX_PRECOMP
18 #include "wx/intl.h"
19 #include "wx/log.h"
20 #include "wx/utils.h"
21 #include "wx/settings.h"
22 #include "wx/math.h"
23 #endif
24
25 #include "wx/scopeguard.h"
26 #include "wx/strconv.h"
27 #include "wx/fontutil.h" // for wxNativeFontInfo (GetNativeFontInfo())
28
29 #include <sys/types.h>
30 #include <sys/stat.h>
31 #include <ctype.h>
32
33 #include "wx/gtk/private.h"
34
35 // ----------------------------------------------------------------------------
36 // helpers
37 // ----------------------------------------------------------------------------
38
39 extern "C" {
40 static void wxGtkOnRemoveTag(GtkTextBuffer *buffer,
41 GtkTextTag *tag,
42 GtkTextIter * WXUNUSED(start),
43 GtkTextIter * WXUNUSED(end),
44 char *prefix)
45 {
46 gchar *name;
47 g_object_get (tag, "name", &name, NULL);
48
49 if (!name || strncmp(name, prefix, strlen(prefix)))
50 // anonymous tag or not starting with prefix - don't remove
51 g_signal_stop_emission_by_name (buffer, "remove_tag");
52
53 g_free(name);
54 }
55 }
56
57 // remove all tags starting with the given prefix from the start..end range
58 static void
59 wxGtkTextRemoveTagsWithPrefix(GtkTextBuffer *text_buffer,
60 const char *prefix,
61 GtkTextIter *start,
62 GtkTextIter *end)
63 {
64 gulong remove_handler_id = g_signal_connect
65 (
66 text_buffer,
67 "remove_tag",
68 G_CALLBACK(wxGtkOnRemoveTag),
69 gpointer(prefix)
70 );
71 gtk_text_buffer_remove_all_tags(text_buffer, start, end);
72 g_signal_handler_disconnect(text_buffer, remove_handler_id);
73 }
74
75 static void wxGtkTextApplyTagsFromAttr(GtkWidget *text,
76 GtkTextBuffer *text_buffer,
77 const wxTextAttr& attr,
78 GtkTextIter *start,
79 GtkTextIter *end)
80 {
81 static gchar buf[1024];
82 GtkTextTag *tag;
83
84 if (attr.HasFont())
85 {
86 wxGtkTextRemoveTagsWithPrefix(text_buffer, "WXFONT", start, end);
87
88 wxFont font(attr.GetFont());
89
90 PangoFontDescription *font_description = font.GetNativeFontInfo()->description;
91 wxGtkString font_string(pango_font_description_to_string(font_description));
92 g_snprintf(buf, sizeof(buf), "WXFONT %s", font_string.c_str());
93 tag = gtk_text_tag_table_lookup( gtk_text_buffer_get_tag_table( text_buffer ),
94 buf );
95 if (!tag)
96 tag = gtk_text_buffer_create_tag( text_buffer, buf,
97 "font-desc", font_description,
98 NULL );
99 gtk_text_buffer_apply_tag (text_buffer, tag, start, end);
100
101 if (font.GetUnderlined())
102 {
103 g_snprintf(buf, sizeof(buf), "WXFONTUNDERLINE");
104 tag = gtk_text_tag_table_lookup( gtk_text_buffer_get_tag_table( text_buffer ),
105 buf );
106 if (!tag)
107 tag = gtk_text_buffer_create_tag( text_buffer, buf,
108 "underline-set", TRUE,
109 "underline", PANGO_UNDERLINE_SINGLE,
110 NULL );
111 gtk_text_buffer_apply_tag (text_buffer, tag, start, end);
112 }
113 }
114
115 if (attr.HasTextColour())
116 {
117 wxGtkTextRemoveTagsWithPrefix(text_buffer, "WXFORECOLOR", start, end);
118
119 const GdkColor *colFg = attr.GetTextColour().GetColor();
120 g_snprintf(buf, sizeof(buf), "WXFORECOLOR %d %d %d",
121 colFg->red, colFg->green, colFg->blue);
122 tag = gtk_text_tag_table_lookup( gtk_text_buffer_get_tag_table( text_buffer ),
123 buf );
124 if (!tag)
125 tag = gtk_text_buffer_create_tag( text_buffer, buf,
126 "foreground-gdk", colFg, NULL );
127 gtk_text_buffer_apply_tag (text_buffer, tag, start, end);
128 }
129
130 if (attr.HasBackgroundColour())
131 {
132 wxGtkTextRemoveTagsWithPrefix(text_buffer, "WXBACKCOLOR", start, end);
133
134 const GdkColor *colBg = attr.GetBackgroundColour().GetColor();
135 g_snprintf(buf, sizeof(buf), "WXBACKCOLOR %d %d %d",
136 colBg->red, colBg->green, colBg->blue);
137 tag = gtk_text_tag_table_lookup( gtk_text_buffer_get_tag_table( text_buffer ),
138 buf );
139 if (!tag)
140 tag = gtk_text_buffer_create_tag( text_buffer, buf,
141 "background-gdk", colBg, NULL );
142 gtk_text_buffer_apply_tag (text_buffer, tag, start, end);
143 }
144
145 if (attr.HasAlignment())
146 {
147 GtkTextIter para_start, para_end = *end;
148 gtk_text_buffer_get_iter_at_line( text_buffer,
149 &para_start,
150 gtk_text_iter_get_line(start) );
151 gtk_text_iter_forward_line(&para_end);
152
153 wxGtkTextRemoveTagsWithPrefix(text_buffer, "WXALIGNMENT", &para_start, &para_end);
154
155 GtkJustification align;
156 switch (attr.GetAlignment())
157 {
158 default:
159 align = GTK_JUSTIFY_LEFT;
160 break;
161 case wxTEXT_ALIGNMENT_RIGHT:
162 align = GTK_JUSTIFY_RIGHT;
163 break;
164 case wxTEXT_ALIGNMENT_CENTER:
165 align = GTK_JUSTIFY_CENTER;
166 break;
167 // gtk+ doesn't support justify before gtk+-2.11.0 with pango-1.17 being available
168 // (but if new enough pango isn't available it's a mere gtk warning)
169 #if GTK_CHECK_VERSION(2,11,0)
170 case wxTEXT_ALIGNMENT_JUSTIFIED:
171 if (!gtk_check_version(2,11,0))
172 align = GTK_JUSTIFY_FILL;
173 else
174 align = GTK_JUSTIFY_LEFT;
175 break;
176 #endif
177 }
178
179 g_snprintf(buf, sizeof(buf), "WXALIGNMENT %d", align);
180 tag = gtk_text_tag_table_lookup( gtk_text_buffer_get_tag_table( text_buffer ),
181 buf );
182 if (!tag)
183 tag = gtk_text_buffer_create_tag( text_buffer, buf,
184 "justification", align, NULL );
185 gtk_text_buffer_apply_tag( text_buffer, tag, &para_start, &para_end );
186 }
187
188 if (attr.HasLeftIndent())
189 {
190 // Indentation attribute
191
192 // Clear old indentation tags
193 GtkTextIter para_start, para_end = *end;
194 gtk_text_buffer_get_iter_at_line( text_buffer,
195 &para_start,
196 gtk_text_iter_get_line(start) );
197 gtk_text_iter_forward_line(&para_end);
198
199 wxGtkTextRemoveTagsWithPrefix(text_buffer, "WXINDENT", &para_start, &para_end);
200
201 // Convert indent from 1/10th of a mm into pixels
202 float factor =
203 (float)gdk_screen_get_width(gtk_widget_get_screen(text)) /
204 gdk_screen_get_width_mm(gtk_widget_get_screen(text)) / 10;
205
206 const int indent = (int)(factor * attr.GetLeftIndent());
207 const int subIndent = (int)(factor * attr.GetLeftSubIndent());
208
209 gint gindent;
210 gint gsubindent;
211
212 if (subIndent >= 0)
213 {
214 gindent = indent;
215 gsubindent = -subIndent;
216 }
217 else
218 {
219 gindent = -subIndent;
220 gsubindent = indent;
221 }
222
223 g_snprintf(buf, sizeof(buf), "WXINDENT %d %d", gindent, gsubindent);
224 tag = gtk_text_tag_table_lookup( gtk_text_buffer_get_tag_table( text_buffer ),
225 buf );
226 if (!tag)
227 tag = gtk_text_buffer_create_tag( text_buffer, buf,
228 "left-margin", gindent, "indent", gsubindent, NULL );
229 gtk_text_buffer_apply_tag (text_buffer, tag, &para_start, &para_end);
230 }
231
232 if (attr.HasTabs())
233 {
234 // Set tab stops
235
236 // Clear old tabs
237 GtkTextIter para_start, para_end = *end;
238 gtk_text_buffer_get_iter_at_line( text_buffer,
239 &para_start,
240 gtk_text_iter_get_line(start) );
241 gtk_text_iter_forward_line(&para_end);
242
243 wxGtkTextRemoveTagsWithPrefix(text_buffer, "WXTABS", &para_start, &para_end);
244
245 const wxArrayInt& tabs = attr.GetTabs();
246
247 wxString tagname = wxT("WXTABS");
248 g_snprintf(buf, sizeof(buf), "WXTABS");
249 for (size_t i = 0; i < tabs.GetCount(); i++)
250 tagname += wxString::Format(wxT(" %d"), tabs[i]);
251
252 const wxWX2MBbuf buftag = tagname.utf8_str();
253
254 tag = gtk_text_tag_table_lookup( gtk_text_buffer_get_tag_table( text_buffer ),
255 buftag );
256 if (!tag)
257 {
258 // Factor to convert from 1/10th of a mm into pixels
259 float factor =
260 (float)gdk_screen_get_width(gtk_widget_get_screen(text)) /
261 gdk_screen_get_width_mm(gtk_widget_get_screen(text)) / 10;
262
263 PangoTabArray* tabArray = pango_tab_array_new(tabs.GetCount(), TRUE);
264 for (size_t i = 0; i < tabs.GetCount(); i++)
265 pango_tab_array_set_tab(tabArray, i, PANGO_TAB_LEFT, (gint)(tabs[i] * factor));
266 tag = gtk_text_buffer_create_tag( text_buffer, buftag,
267 "tabs", tabArray, NULL );
268 pango_tab_array_free(tabArray);
269 }
270 gtk_text_buffer_apply_tag (text_buffer, tag, &para_start, &para_end);
271 }
272 }
273
274 static void wxGtkTextInsert(GtkWidget *text,
275 GtkTextBuffer *text_buffer,
276 const wxTextAttr& attr,
277 const wxCharBuffer& buffer)
278
279 {
280 gint start_offset;
281 GtkTextIter iter, start;
282
283 gtk_text_buffer_get_iter_at_mark( text_buffer, &iter,
284 gtk_text_buffer_get_insert (text_buffer) );
285 start_offset = gtk_text_iter_get_offset (&iter);
286 gtk_text_buffer_insert( text_buffer, &iter, buffer, strlen(buffer) );
287
288 gtk_text_buffer_get_iter_at_offset (text_buffer, &start, start_offset);
289
290 wxGtkTextApplyTagsFromAttr(text, text_buffer, attr, &start, &iter);
291 }
292
293 // Implementation of wxTE_AUTO_URL for wxGTK2 by Mart Raudsepp,
294
295 extern "C" {
296 static void
297 au_apply_tag_callback(GtkTextBuffer *buffer,
298 GtkTextTag *tag,
299 GtkTextIter * WXUNUSED(start),
300 GtkTextIter * WXUNUSED(end),
301 gpointer WXUNUSED(textctrl))
302 {
303 if(tag == gtk_text_tag_table_lookup(gtk_text_buffer_get_tag_table(buffer), "wxUrl"))
304 g_signal_stop_emission_by_name (buffer, "apply_tag");
305 }
306 }
307
308 //-----------------------------------------------------------------------------
309 // GtkTextCharPredicates for gtk_text_iter_*_find_char
310 //-----------------------------------------------------------------------------
311
312 extern "C" {
313 static gboolean
314 pred_whitespace(gunichar ch, gpointer WXUNUSED(user_data))
315 {
316 return g_unichar_isspace(ch);
317 }
318 }
319
320 extern "C" {
321 static gboolean
322 pred_non_whitespace (gunichar ch, gpointer WXUNUSED(user_data))
323 {
324 return !g_unichar_isspace(ch);
325 }
326 }
327
328 extern "C" {
329 static gboolean
330 pred_nonpunct (gunichar ch, gpointer WXUNUSED(user_data))
331 {
332 return !g_unichar_ispunct(ch);
333 }
334 }
335
336 extern "C" {
337 static gboolean
338 pred_nonpunct_or_slash (gunichar ch, gpointer WXUNUSED(user_data))
339 {
340 return !g_unichar_ispunct(ch) || ch == '/';
341 }
342 }
343
344 //-----------------------------------------------------------------------------
345 // Check for links between s and e and correct tags as necessary
346 //-----------------------------------------------------------------------------
347
348 // This function should be made match better while being efficient at one point.
349 // Most probably with a row of regular expressions.
350 extern "C" {
351 static void
352 au_check_word( GtkTextIter *s, GtkTextIter *e )
353 {
354 static const char *const URIPrefixes[] =
355 {
356 "http://",
357 "ftp://",
358 "www.",
359 "ftp.",
360 "mailto://",
361 "https://",
362 "file://",
363 "nntp://",
364 "news://",
365 "telnet://",
366 "mms://",
367 "gopher://",
368 "prospero://",
369 "wais://",
370 };
371
372 GtkTextIter start = *s, end = *e;
373 GtkTextBuffer *buffer = gtk_text_iter_get_buffer(s);
374
375 // Get our special link tag
376 GtkTextTag *tag = gtk_text_tag_table_lookup(gtk_text_buffer_get_tag_table(buffer), "wxUrl");
377
378 // Get rid of punctuation from beginning and end.
379 // Might want to move this to au_check_range if an improved link checking doesn't
380 // use some intelligent punctuation checking itself (beware of undesired iter modifications).
381 if(g_unichar_ispunct( gtk_text_iter_get_char( &start ) ) )
382 gtk_text_iter_forward_find_char( &start, pred_nonpunct, NULL, e );
383
384 gtk_text_iter_backward_find_char( &end, pred_nonpunct_or_slash, NULL, &start );
385 gtk_text_iter_forward_char(&end);
386
387 wxGtkString text(gtk_text_iter_get_text( &start, &end ));
388 size_t len = strlen(text), prefix_len;
389 size_t n;
390
391 for( n = 0; n < WXSIZEOF(URIPrefixes); ++n )
392 {
393 prefix_len = strlen(URIPrefixes[n]);
394 if((len > prefix_len) && !strncasecmp(text, URIPrefixes[n], prefix_len))
395 break;
396 }
397
398 if(n < WXSIZEOF(URIPrefixes))
399 {
400 gulong signal_id = g_signal_handler_find (buffer,
401 (GSignalMatchType) (G_SIGNAL_MATCH_FUNC),
402 0, 0, NULL,
403 (gpointer)au_apply_tag_callback, NULL);
404
405 g_signal_handler_block (buffer, signal_id);
406 gtk_text_buffer_apply_tag(buffer, tag, &start, &end);
407 g_signal_handler_unblock (buffer, signal_id);
408 }
409 }
410 }
411
412 extern "C" {
413 static void
414 au_check_range(GtkTextIter *s,
415 GtkTextIter *range_end)
416 {
417 GtkTextIter range_start = *s;
418 GtkTextIter word_end;
419 GtkTextBuffer *buffer = gtk_text_iter_get_buffer(s);
420 GtkTextTag *tag = gtk_text_tag_table_lookup(gtk_text_buffer_get_tag_table(buffer), "wxUrl");
421
422 gtk_text_buffer_remove_tag(buffer, tag, s, range_end);
423
424 if(g_unichar_isspace(gtk_text_iter_get_char(&range_start)))
425 gtk_text_iter_forward_find_char(&range_start, pred_non_whitespace, NULL, range_end);
426
427 while(!gtk_text_iter_equal(&range_start, range_end))
428 {
429 word_end = range_start;
430 gtk_text_iter_forward_find_char(&word_end, pred_whitespace, NULL, range_end);
431
432 // Now we should have a word delimited by range_start and word_end, correct link tags
433 au_check_word(&range_start, &word_end);
434
435 range_start = word_end;
436 gtk_text_iter_forward_find_char(&range_start, pred_non_whitespace, NULL, range_end);
437 }
438 }
439 }
440
441 //-----------------------------------------------------------------------------
442 // "insert-text" for GtkTextBuffer
443 //-----------------------------------------------------------------------------
444
445 extern "C" {
446 static void
447 au_insert_text_callback(GtkTextBuffer * WXUNUSED(buffer),
448 GtkTextIter *end,
449 gchar *text,
450 gint len,
451 wxTextCtrl *win)
452 {
453 if (!len || !(win->GetWindowStyleFlag() & wxTE_AUTO_URL) )
454 return;
455
456 GtkTextIter start = *end;
457 gtk_text_iter_backward_chars(&start, g_utf8_strlen(text, len));
458
459 GtkTextIter line_start = start;
460 GtkTextIter line_end = *end;
461 GtkTextIter words_start = start;
462 GtkTextIter words_end = *end;
463
464 gtk_text_iter_set_line(&line_start, gtk_text_iter_get_line(&start));
465 gtk_text_iter_forward_to_line_end(&line_end);
466 gtk_text_iter_backward_find_char(&words_start, pred_whitespace, NULL, &line_start);
467 gtk_text_iter_forward_find_char(&words_end, pred_whitespace, NULL, &line_end);
468
469 au_check_range(&words_start, &words_end);
470 }
471 }
472
473 //-----------------------------------------------------------------------------
474 // "delete-range" for GtkTextBuffer
475 //-----------------------------------------------------------------------------
476
477 extern "C" {
478 static void
479 au_delete_range_callback(GtkTextBuffer * WXUNUSED(buffer),
480 GtkTextIter *start,
481 GtkTextIter *end,
482 wxTextCtrl *win)
483 {
484 if( !(win->GetWindowStyleFlag() & wxTE_AUTO_URL) )
485 return;
486
487 GtkTextIter line_start = *start, line_end = *end;
488
489 gtk_text_iter_set_line(&line_start, gtk_text_iter_get_line(start));
490 gtk_text_iter_forward_to_line_end(&line_end);
491 gtk_text_iter_backward_find_char(start, pred_whitespace, NULL, &line_start);
492 gtk_text_iter_forward_find_char(end, pred_whitespace, NULL, &line_end);
493
494 au_check_range(start, end);
495 }
496 }
497
498 //-----------------------------------------------------------------------------
499 // "populate_popup" from text control and "unmap" from its poup menu
500 //-----------------------------------------------------------------------------
501
502 extern "C" {
503 static void
504 gtk_textctrl_popup_unmap( GtkMenu *WXUNUSED(menu), wxTextCtrl* win )
505 {
506 win->GTKEnableFocusOutEvent();
507 }
508 }
509
510 extern "C" {
511 static void
512 gtk_textctrl_populate_popup( GtkEntry *WXUNUSED(entry), GtkMenu *menu, wxTextCtrl *win )
513 {
514 win->GTKDisableFocusOutEvent();
515
516 g_signal_connect (menu, "unmap", G_CALLBACK (gtk_textctrl_popup_unmap), win );
517 }
518 }
519
520 //-----------------------------------------------------------------------------
521 // "changed"
522 //-----------------------------------------------------------------------------
523
524 extern "C" {
525 static void
526 gtk_text_changed_callback( GtkWidget *WXUNUSED(widget), wxTextCtrl *win )
527 {
528 if ( win->IgnoreTextUpdate() )
529 return;
530
531 if (!win->m_hasVMT) return;
532
533 if ( win->MarkDirtyOnChange() )
534 win->MarkDirty();
535
536 win->SendTextUpdatedEvent();
537 }
538 }
539
540 //-----------------------------------------------------------------------------
541 // clipboard events: "copy-clipboard", "cut-clipboard", "paste-clipboard"
542 //-----------------------------------------------------------------------------
543
544 // common part of the event handlers below
545 static void
546 handle_text_clipboard_callback( GtkWidget *widget, wxTextCtrl *win,
547 wxEventType eventType, const gchar * signal_name)
548 {
549 wxClipboardTextEvent event( eventType, win->GetId() );
550 event.SetEventObject( win );
551 if ( win->HandleWindowEvent( event ) )
552 {
553 // don't let the default processing to take place if we did something
554 // ourselves in the event handler
555 g_signal_stop_emission_by_name (widget, signal_name);
556 }
557 }
558
559 extern "C" {
560 static void
561 gtk_copy_clipboard_callback( GtkWidget *widget, wxTextCtrl *win )
562 {
563 handle_text_clipboard_callback(
564 widget, win, wxEVT_COMMAND_TEXT_COPY, "copy-clipboard" );
565 }
566
567 static void
568 gtk_cut_clipboard_callback( GtkWidget *widget, wxTextCtrl *win )
569 {
570 handle_text_clipboard_callback(
571 widget, win, wxEVT_COMMAND_TEXT_CUT, "cut-clipboard" );
572 }
573
574 static void
575 gtk_paste_clipboard_callback( GtkWidget *widget, wxTextCtrl *win )
576 {
577 handle_text_clipboard_callback(
578 widget, win, wxEVT_COMMAND_TEXT_PASTE, "paste-clipboard" );
579 }
580 }
581
582 //-----------------------------------------------------------------------------
583 // "mark_set"
584 //-----------------------------------------------------------------------------
585
586 extern "C" {
587 static void mark_set(GtkTextBuffer*, GtkTextIter*, GtkTextMark* mark, GSList** markList)
588 {
589 if (gtk_text_mark_get_name(mark) == NULL)
590 *markList = g_slist_prepend(*markList, mark);
591 }
592 }
593
594 //-----------------------------------------------------------------------------
595 // wxTextCtrl
596 //-----------------------------------------------------------------------------
597
598 BEGIN_EVENT_TABLE(wxTextCtrl, wxTextCtrlBase)
599 EVT_CHAR(wxTextCtrl::OnChar)
600
601 EVT_MENU(wxID_CUT, wxTextCtrl::OnCut)
602 EVT_MENU(wxID_COPY, wxTextCtrl::OnCopy)
603 EVT_MENU(wxID_PASTE, wxTextCtrl::OnPaste)
604 EVT_MENU(wxID_UNDO, wxTextCtrl::OnUndo)
605 EVT_MENU(wxID_REDO, wxTextCtrl::OnRedo)
606
607 EVT_UPDATE_UI(wxID_CUT, wxTextCtrl::OnUpdateCut)
608 EVT_UPDATE_UI(wxID_COPY, wxTextCtrl::OnUpdateCopy)
609 EVT_UPDATE_UI(wxID_PASTE, wxTextCtrl::OnUpdatePaste)
610 EVT_UPDATE_UI(wxID_UNDO, wxTextCtrl::OnUpdateUndo)
611 EVT_UPDATE_UI(wxID_REDO, wxTextCtrl::OnUpdateRedo)
612
613 // wxTE_AUTO_URL wxTextUrl support. Currently only creates
614 // wxTextUrlEvent in the same cases as wxMSW, more can be added here.
615 EVT_MOTION (wxTextCtrl::OnUrlMouseEvent)
616 EVT_LEFT_DOWN (wxTextCtrl::OnUrlMouseEvent)
617 EVT_LEFT_UP (wxTextCtrl::OnUrlMouseEvent)
618 EVT_LEFT_DCLICK (wxTextCtrl::OnUrlMouseEvent)
619 EVT_RIGHT_DOWN (wxTextCtrl::OnUrlMouseEvent)
620 EVT_RIGHT_UP (wxTextCtrl::OnUrlMouseEvent)
621 EVT_RIGHT_DCLICK(wxTextCtrl::OnUrlMouseEvent)
622 END_EVENT_TABLE()
623
624 void wxTextCtrl::Init()
625 {
626 m_dontMarkDirty =
627 m_modified = false;
628
629 m_countUpdatesToIgnore = 0;
630
631 SetUpdateFont(false);
632
633 m_text = NULL;
634 m_showPositionOnThaw = NULL;
635 m_anonymousMarkList = NULL;
636 }
637
638 wxTextCtrl::~wxTextCtrl()
639 {
640 if (m_anonymousMarkList)
641 g_slist_free(m_anonymousMarkList);
642 }
643
644 wxTextCtrl::wxTextCtrl( wxWindow *parent,
645 wxWindowID id,
646 const wxString &value,
647 const wxPoint &pos,
648 const wxSize &size,
649 long style,
650 const wxValidator& validator,
651 const wxString &name )
652 {
653 Init();
654
655 Create( parent, id, value, pos, size, style, validator, name );
656 }
657
658 bool wxTextCtrl::Create( wxWindow *parent,
659 wxWindowID id,
660 const wxString &value,
661 const wxPoint &pos,
662 const wxSize &size,
663 long style,
664 const wxValidator& validator,
665 const wxString &name )
666 {
667 if (!PreCreation( parent, pos, size ) ||
668 !CreateBase( parent, id, pos, size, style, validator, name ))
669 {
670 wxFAIL_MSG( wxT("wxTextCtrl creation failed") );
671 return false;
672 }
673
674 bool multi_line = (style & wxTE_MULTILINE) != 0;
675
676 if (multi_line)
677 {
678 m_buffer = gtk_text_buffer_new(NULL);
679 gulong sig_id = g_signal_connect(m_buffer, "mark_set", G_CALLBACK(mark_set), &m_anonymousMarkList);
680 // Create view
681 m_text = gtk_text_view_new_with_buffer(m_buffer);
682 // gtk_text_view_set_buffer adds its own reference
683 g_object_unref(m_buffer);
684 g_signal_handler_disconnect(m_buffer, sig_id);
685
686 // create "ShowPosition" marker
687 GtkTextIter iter;
688 gtk_text_buffer_get_start_iter(m_buffer, &iter);
689 gtk_text_buffer_create_mark(m_buffer, "ShowPosition", &iter, true);
690
691 // create scrolled window
692 m_widget = gtk_scrolled_window_new( NULL, NULL );
693 gtk_scrolled_window_set_policy( GTK_SCROLLED_WINDOW( m_widget ),
694 GTK_POLICY_AUTOMATIC,
695 style & wxTE_NO_VSCROLL
696 ? GTK_POLICY_NEVER
697 : GTK_POLICY_AUTOMATIC );
698 // for ScrollLines/Pages
699 m_scrollBar[1] = GTK_RANGE(gtk_scrolled_window_get_vscrollbar(GTK_SCROLLED_WINDOW(m_widget)));
700
701 // Insert view into scrolled window
702 gtk_container_add( GTK_CONTAINER(m_widget), m_text );
703
704 GTKSetWrapMode();
705
706 GTKScrolledWindowSetBorder(m_widget, style);
707
708 gtk_widget_add_events( GTK_WIDGET(m_text), GDK_ENTER_NOTIFY_MASK | GDK_LEAVE_NOTIFY_MASK );
709
710 gtk_widget_set_can_focus(m_widget, FALSE);
711 }
712 else
713 {
714 // a single-line text control: no need for scrollbars
715 m_widget =
716 m_text = gtk_entry_new();
717 // work around probable bug in GTK+ 2.18 when calling WriteText on a
718 // new, empty control, see http://trac.wxwidgets.org/ticket/11409
719 gtk_entry_get_text((GtkEntry*)m_text);
720
721 if (style & wxNO_BORDER)
722 g_object_set (m_text, "has-frame", FALSE, NULL);
723
724 }
725 g_object_ref(m_widget);
726
727 m_parent->DoAddChild( this );
728
729 m_focusWidget = m_text;
730
731 PostCreation(size);
732
733 if (multi_line)
734 {
735 gtk_widget_show(m_text);
736 }
737
738 // We want to be notified about text changes.
739 if (multi_line)
740 {
741 g_signal_connect (m_buffer, "changed",
742 G_CALLBACK (gtk_text_changed_callback), this);
743 }
744 else
745 {
746 g_signal_connect (m_text, "changed",
747 G_CALLBACK (gtk_text_changed_callback), this);
748 }
749
750 // Catch to disable focus out handling
751 g_signal_connect (m_text, "populate_popup",
752 G_CALLBACK (gtk_textctrl_populate_popup),
753 this);
754
755 if (!value.empty())
756 {
757 SetValue( value );
758 }
759
760 if (style & wxTE_PASSWORD)
761 GTKSetVisibility();
762
763 if (style & wxTE_READONLY)
764 GTKSetEditable();
765
766 // left justification (alignment) is the default anyhow
767 if ( style & (wxTE_RIGHT | wxTE_CENTRE) )
768 GTKSetJustification();
769
770 if (multi_line)
771 {
772 // Handle URLs on multi-line controls with wxTE_AUTO_URL style
773 if (style & wxTE_AUTO_URL)
774 {
775 GtkTextIter start, end;
776
777 // We create our wxUrl tag here for slight efficiency gain - we
778 // don't have to check for the tag existance in callbacks,
779 // hereby it's guaranteed to exist.
780 gtk_text_buffer_create_tag(m_buffer, "wxUrl",
781 "foreground", "blue",
782 "underline", PANGO_UNDERLINE_SINGLE,
783 NULL);
784
785 // Check for URLs after each text change
786 g_signal_connect_after (m_buffer, "insert_text",
787 G_CALLBACK (au_insert_text_callback), this);
788 g_signal_connect_after (m_buffer, "delete_range",
789 G_CALLBACK (au_delete_range_callback), this);
790
791 // Block all wxUrl tag applying unless we do it ourselves, in which case we
792 // block this callback temporarily. This takes care of gtk+ internal
793 // gtk_text_buffer_insert_range* calls that would copy our URL tag otherwise,
794 // which is undesired because only a part of the URL might be copied.
795 // The insert-text signal emitted inside it will take care of newly formed
796 // or wholly copied URLs.
797 g_signal_connect (m_buffer, "apply_tag",
798 G_CALLBACK (au_apply_tag_callback), NULL);
799
800 // Check for URLs in the initial string passed to Create
801 gtk_text_buffer_get_start_iter(m_buffer, &start);
802 gtk_text_buffer_get_end_iter(m_buffer, &end);
803 au_check_range(&start, &end);
804 }
805 }
806 else // single line
807 {
808 // do the right thing with Enter presses depending on whether we have
809 // wxTE_PROCESS_ENTER or not
810 GTKSetActivatesDefault();
811 }
812
813
814 g_signal_connect (m_text, "copy-clipboard",
815 G_CALLBACK (gtk_copy_clipboard_callback), this);
816 g_signal_connect (m_text, "cut-clipboard",
817 G_CALLBACK (gtk_cut_clipboard_callback), this);
818 g_signal_connect (m_text, "paste-clipboard",
819 G_CALLBACK (gtk_paste_clipboard_callback), this);
820
821 m_cursor = wxCursor( wxCURSOR_IBEAM );
822
823 return true;
824 }
825
826 GtkEditable *wxTextCtrl::GetEditable() const
827 {
828 wxCHECK_MSG( IsSingleLine(), NULL, "shouldn't be called for multiline" );
829
830 return GTK_EDITABLE(m_text);
831 }
832
833 GtkEntry *wxTextCtrl::GetEntry() const
834 {
835 return GTK_ENTRY(m_text);
836 }
837
838 // ----------------------------------------------------------------------------
839 // flags handling
840 // ----------------------------------------------------------------------------
841
842 void wxTextCtrl::GTKSetEditable()
843 {
844 gboolean editable = !HasFlag(wxTE_READONLY);
845 if ( IsSingleLine() )
846 gtk_editable_set_editable(GTK_EDITABLE(m_text), editable);
847 else
848 gtk_text_view_set_editable(GTK_TEXT_VIEW(m_text), editable);
849 }
850
851 void wxTextCtrl::GTKSetVisibility()
852 {
853 wxCHECK_RET( IsSingleLine(),
854 "wxTE_PASSWORD is for single line text controls only" );
855
856 gtk_entry_set_visibility(GTK_ENTRY(m_text), !HasFlag(wxTE_PASSWORD));
857 }
858
859 void wxTextCtrl::GTKSetActivatesDefault()
860 {
861 wxCHECK_RET( IsSingleLine(),
862 "wxTE_PROCESS_ENTER is for single line text controls only" );
863
864 gtk_entry_set_activates_default(GTK_ENTRY(m_text),
865 !HasFlag(wxTE_PROCESS_ENTER));
866 }
867
868 void wxTextCtrl::GTKSetWrapMode()
869 {
870 // no wrapping in single line controls
871 if ( !IsMultiLine() )
872 return;
873
874 // translate wx wrapping style to GTK+
875 GtkWrapMode wrap;
876 if ( HasFlag( wxTE_DONTWRAP ) )
877 wrap = GTK_WRAP_NONE;
878 else if ( HasFlag( wxTE_CHARWRAP ) )
879 wrap = GTK_WRAP_CHAR;
880 else if ( HasFlag( wxTE_WORDWRAP ) )
881 wrap = GTK_WRAP_WORD;
882 else // HasFlag(wxTE_BESTWRAP) always true as wxTE_BESTWRAP == 0
883 wrap = GTK_WRAP_WORD_CHAR;
884
885 gtk_text_view_set_wrap_mode( GTK_TEXT_VIEW( m_text ), wrap );
886 }
887
888 void wxTextCtrl::GTKSetJustification()
889 {
890 if ( IsMultiLine() )
891 {
892 GtkJustification just;
893 if ( HasFlag(wxTE_RIGHT) )
894 just = GTK_JUSTIFY_RIGHT;
895 else if ( HasFlag(wxTE_CENTRE) )
896 just = GTK_JUSTIFY_CENTER;
897 else // wxTE_LEFT == 0
898 just = GTK_JUSTIFY_LEFT;
899
900 gtk_text_view_set_justification(GTK_TEXT_VIEW(m_text), just);
901 }
902 else // single line
903 {
904 gfloat align;
905 if ( HasFlag(wxTE_RIGHT) )
906 align = 1.0;
907 else if ( HasFlag(wxTE_CENTRE) )
908 align = 0.5;
909 else // single line
910 align = 0.0;
911
912 gtk_entry_set_alignment(GTK_ENTRY(m_text), align);
913 }
914 }
915
916 void wxTextCtrl::SetWindowStyleFlag(long style)
917 {
918 long styleOld = GetWindowStyleFlag();
919
920 wxTextCtrlBase::SetWindowStyleFlag(style);
921
922 if ( (style & wxTE_READONLY) != (styleOld & wxTE_READONLY) )
923 GTKSetEditable();
924
925 if ( (style & wxTE_PASSWORD) != (styleOld & wxTE_PASSWORD) )
926 GTKSetVisibility();
927
928 if ( (style & wxTE_PROCESS_ENTER) != (styleOld & wxTE_PROCESS_ENTER) )
929 GTKSetActivatesDefault();
930
931 static const long flagsWrap = wxTE_WORDWRAP | wxTE_CHARWRAP | wxTE_DONTWRAP;
932 if ( (style & flagsWrap) != (styleOld & flagsWrap) )
933 GTKSetWrapMode();
934
935 static const long flagsAlign = wxTE_LEFT | wxTE_CENTRE | wxTE_RIGHT;
936 if ( (style & flagsAlign) != (styleOld & flagsAlign) )
937 GTKSetJustification();
938 }
939
940 // ----------------------------------------------------------------------------
941 // control value
942 // ----------------------------------------------------------------------------
943
944 wxString wxTextCtrl::GetValue() const
945 {
946 wxCHECK_MSG( m_text != NULL, wxEmptyString, wxT("invalid text ctrl") );
947
948 if ( IsMultiLine() )
949 {
950 GtkTextIter start;
951 gtk_text_buffer_get_start_iter( m_buffer, &start );
952 GtkTextIter end;
953 gtk_text_buffer_get_end_iter( m_buffer, &end );
954 wxGtkString text(gtk_text_buffer_get_text(m_buffer, &start, &end, true));
955
956 return wxGTK_CONV_BACK(text);
957 }
958 else // single line
959 {
960 return wxTextEntry::GetValue();
961 }
962 }
963
964 wxFontEncoding wxTextCtrl::GetTextEncoding() const
965 {
966 // GTK+ uses UTF-8 internally, we need to convert to it but from which
967 // encoding?
968
969 // first check the default text style (we intentionally don't check the
970 // style for the current position as it doesn't make sense for SetValue())
971 const wxTextAttr& style = GetDefaultStyle();
972 wxFontEncoding enc = style.HasFontEncoding() ? style.GetFontEncoding()
973 : wxFONTENCODING_SYSTEM;
974
975 // fall back to the controls font if no style
976 if ( enc == wxFONTENCODING_SYSTEM && m_hasFont )
977 enc = GetFont().GetEncoding();
978
979 return enc;
980 }
981
982 bool wxTextCtrl::IsEmpty() const
983 {
984 if ( IsMultiLine() )
985 return gtk_text_buffer_get_char_count(m_buffer) == 0;
986
987 return wxTextEntry::IsEmpty();
988 }
989
990 void wxTextCtrl::DoSetValue( const wxString &value, int flags )
991 {
992 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
993
994 m_modified = false;
995
996 if ( !IsMultiLine() )
997 {
998 wxTextEntry::DoSetValue(value, flags);
999 return;
1000 }
1001
1002 if (value.IsEmpty())
1003 {
1004 if ( !(flags & SetValue_SendEvent) )
1005 EnableTextChangedEvents(false);
1006
1007 gtk_text_buffer_set_text( m_buffer, "", 0 );
1008
1009 if ( !(flags & SetValue_SendEvent) )
1010 EnableTextChangedEvents(true);
1011
1012 return;
1013 }
1014
1015 #if wxUSE_UNICODE
1016 const wxCharBuffer buffer(value.utf8_str());
1017 #else
1018 wxFontEncoding enc = m_defaultStyle.HasFont()
1019 ? m_defaultStyle.GetFont().GetEncoding()
1020 : wxFONTENCODING_SYSTEM;
1021 if ( enc == wxFONTENCODING_SYSTEM )
1022 enc = GetTextEncoding();
1023
1024 const wxCharBuffer buffer(wxGTK_CONV_ENC(value, enc));
1025 if ( !buffer )
1026 {
1027 // see comment in WriteText() as to why we must warn the user about
1028 // this
1029 wxLogWarning(_("Failed to set text in the text control."));
1030 return;
1031 }
1032 #endif
1033
1034 if ( !(flags & SetValue_SendEvent) )
1035 {
1036 EnableTextChangedEvents(false);
1037 }
1038
1039 gtk_text_buffer_set_text( m_buffer, buffer, strlen(buffer) );
1040
1041 if ( !m_defaultStyle.IsDefault() )
1042 {
1043 GtkTextIter start, end;
1044 gtk_text_buffer_get_bounds( m_buffer, &start, &end );
1045 wxGtkTextApplyTagsFromAttr(m_widget, m_buffer, m_defaultStyle,
1046 &start, &end);
1047 }
1048
1049 if ( !(flags & SetValue_SendEvent) )
1050 {
1051 EnableTextChangedEvents(true);
1052 }
1053 }
1054
1055 void wxTextCtrl::WriteText( const wxString &text )
1056 {
1057 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
1058
1059 // we're changing the text programmatically
1060 DontMarkDirtyOnNextChange();
1061
1062 if ( !IsMultiLine() )
1063 {
1064 wxTextEntry::WriteText(text);
1065 return;
1066 }
1067
1068 #if wxUSE_UNICODE
1069 const wxCharBuffer buffer(text.utf8_str());
1070 #else
1071 // check if we have a specific style for the current position
1072 wxFontEncoding enc = wxFONTENCODING_SYSTEM;
1073 wxTextAttr style;
1074 if ( GetStyle(GetInsertionPoint(), style) && style.HasFontEncoding() )
1075 {
1076 enc = style.GetFontEncoding();
1077 }
1078
1079 if ( enc == wxFONTENCODING_SYSTEM )
1080 enc = GetTextEncoding();
1081
1082 const wxCharBuffer buffer(wxGTK_CONV_ENC(text, enc));
1083 if ( !buffer )
1084 {
1085 // we must log an error here as losing the text like this can be a
1086 // serious problem (e.g. imagine the document edited by user being
1087 // empty instead of containing the correct text)
1088 wxLogWarning(_("Failed to insert text in the control."));
1089 return;
1090 }
1091 #endif
1092
1093 // First remove the selection if there is one
1094 // TODO: Is there an easier GTK specific way to do this?
1095 long from, to;
1096 GetSelection(&from, &to);
1097 if (from != to)
1098 Remove(from, to);
1099
1100 // Insert the text
1101 wxGtkTextInsert( m_text, m_buffer, m_defaultStyle, buffer );
1102
1103 // Scroll to cursor, but only if scrollbar thumb is at the very bottom
1104 // won't work when frozen, text view is not using m_buffer then
1105 if (!IsFrozen())
1106 {
1107 GtkAdjustment* adj = gtk_scrolled_window_get_vadjustment(GTK_SCROLLED_WINDOW(m_widget));
1108 const double value = gtk_adjustment_get_value(adj);
1109 const double upper = gtk_adjustment_get_upper(adj);
1110 const double page_size = gtk_adjustment_get_page_size(adj);
1111 if (wxIsSameDouble(value, upper - page_size))
1112 {
1113 gtk_text_view_scroll_to_mark(GTK_TEXT_VIEW(m_text),
1114 gtk_text_buffer_get_insert(m_buffer), 0, false, 0, 1);
1115 }
1116 }
1117 }
1118
1119 wxString wxTextCtrl::GetLineText( long lineNo ) const
1120 {
1121 wxString result;
1122 if ( IsMultiLine() )
1123 {
1124 GtkTextIter line;
1125 gtk_text_buffer_get_iter_at_line(m_buffer,&line,lineNo);
1126
1127 GtkTextIter end = line;
1128 // avoid skipping to the next line end if this one is empty
1129 if ( !gtk_text_iter_ends_line(&line) )
1130 gtk_text_iter_forward_to_line_end(&end);
1131
1132 wxGtkString text(gtk_text_buffer_get_text(m_buffer, &line, &end, true));
1133 result = wxGTK_CONV_BACK(text);
1134 }
1135 else
1136 {
1137 if (lineNo == 0)
1138 result = GetValue();
1139 }
1140 return result;
1141 }
1142
1143 void wxTextCtrl::OnDropFiles( wxDropFilesEvent &WXUNUSED(event) )
1144 {
1145 /* If you implement this, don't forget to update the documentation!
1146 * (file docs/latex/wx/text.tex) */
1147 wxFAIL_MSG( wxT("wxTextCtrl::OnDropFiles not implemented") );
1148 }
1149
1150 bool wxTextCtrl::PositionToXY(long pos, long *x, long *y ) const
1151 {
1152 if ( IsMultiLine() )
1153 {
1154 GtkTextIter iter;
1155
1156 if (pos > GetLastPosition())
1157 return false;
1158
1159 gtk_text_buffer_get_iter_at_offset(m_buffer, &iter, pos);
1160
1161 if ( y )
1162 *y = gtk_text_iter_get_line(&iter);
1163 if ( x )
1164 *x = gtk_text_iter_get_line_offset(&iter);
1165 }
1166 else // single line control
1167 {
1168 if (pos <= gtk_entry_get_text_length(GTK_ENTRY(m_text)))
1169 {
1170 if ( y )
1171 *y = 0;
1172 if ( x )
1173 *x = pos;
1174 }
1175 else
1176 {
1177 // index out of bounds
1178 return false;
1179 }
1180 }
1181
1182 return true;
1183 }
1184
1185 long wxTextCtrl::XYToPosition(long x, long y ) const
1186 {
1187 if ( IsSingleLine() )
1188 return 0;
1189
1190 GtkTextIter iter;
1191 if (y >= gtk_text_buffer_get_line_count (m_buffer))
1192 return -1;
1193
1194 gtk_text_buffer_get_iter_at_line(m_buffer, &iter, y);
1195 if (x >= gtk_text_iter_get_chars_in_line (&iter))
1196 return -1;
1197
1198 return gtk_text_iter_get_offset(&iter) + x;
1199 }
1200
1201 int wxTextCtrl::GetLineLength(long lineNo) const
1202 {
1203 if ( IsMultiLine() )
1204 {
1205 int last_line = gtk_text_buffer_get_line_count( m_buffer ) - 1;
1206 if (lineNo > last_line)
1207 return -1;
1208
1209 GtkTextIter iter;
1210 gtk_text_buffer_get_iter_at_line(m_buffer, &iter, lineNo);
1211 // get_chars_in_line return includes paragraph delimiters, so need to subtract 1 IF it is not the last line
1212 return gtk_text_iter_get_chars_in_line(&iter) - ((lineNo == last_line) ? 0 : 1);
1213 }
1214 else
1215 {
1216 wxString str = GetLineText (lineNo);
1217 return (int) str.length();
1218 }
1219 }
1220
1221 wxPoint wxTextCtrl::DoPositionToCoords(long pos) const
1222 {
1223 if ( !IsMultiLine() )
1224 {
1225 // Single line text entry (GtkTextEntry) doesn't have support for
1226 // getting the coordinates for the given offset. Perhaps we could
1227 // find them ourselves by using GetTextExtent() but for now just leave
1228 // it unimplemented, this function is more useful for multiline
1229 // controls anyhow.
1230 return wxDefaultPosition;
1231 }
1232
1233 // Window coordinates for the given position is calculated by getting
1234 // the buffer coordinates and converting them to window coordinates.
1235 GtkTextView *textview = GTK_TEXT_VIEW(m_text);
1236
1237 GtkTextIter iter;
1238 gtk_text_buffer_get_iter_at_offset(m_buffer, &iter, pos);
1239
1240 GdkRectangle bufferCoords;
1241 gtk_text_view_get_iter_location(textview, &iter, &bufferCoords);
1242
1243 gint winCoordX = 0,
1244 winCoordY = 0;
1245 gtk_text_view_buffer_to_window_coords(textview, GTK_TEXT_WINDOW_WIDGET,
1246 bufferCoords.x, bufferCoords.y,
1247 &winCoordX, &winCoordY);
1248
1249 return wxPoint(winCoordX, winCoordY);
1250 }
1251
1252 int wxTextCtrl::GetNumberOfLines() const
1253 {
1254 if ( IsMultiLine() )
1255 {
1256 return gtk_text_buffer_get_line_count( m_buffer );
1257 }
1258 else // single line
1259 {
1260 return 1;
1261 }
1262 }
1263
1264 void wxTextCtrl::SetInsertionPoint( long pos )
1265 {
1266 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
1267
1268 if ( IsMultiLine() )
1269 {
1270 GtkTextIter iter;
1271 gtk_text_buffer_get_iter_at_offset( m_buffer, &iter, pos );
1272 gtk_text_buffer_place_cursor( m_buffer, &iter );
1273 GtkTextMark* mark = gtk_text_buffer_get_insert(m_buffer);
1274 if (IsFrozen())
1275 // defer until Thaw, text view is not using m_buffer now
1276 m_showPositionOnThaw = mark;
1277 else
1278 gtk_text_view_scroll_mark_onscreen(GTK_TEXT_VIEW(m_text), mark);
1279 }
1280 else // single line
1281 {
1282 wxTextEntry::SetInsertionPoint(pos);
1283 }
1284 }
1285
1286 void wxTextCtrl::SetEditable( bool editable )
1287 {
1288 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
1289
1290 if ( IsMultiLine() )
1291 {
1292 gtk_text_view_set_editable( GTK_TEXT_VIEW(m_text), editable );
1293 }
1294 else // single line
1295 {
1296 wxTextEntry::SetEditable(editable);
1297 }
1298 }
1299
1300 bool wxTextCtrl::Enable( bool enable )
1301 {
1302 if (!wxWindowBase::Enable(enable))
1303 {
1304 // nothing to do
1305 return false;
1306 }
1307
1308 gtk_widget_set_sensitive( m_text, enable );
1309 SetCursor(enable ? wxCursor(wxCURSOR_IBEAM) : wxCursor());
1310
1311 return true;
1312 }
1313
1314 // wxGTK-specific: called recursively by Enable,
1315 // to give widgets an opportunity to correct their colours after they
1316 // have been changed by Enable
1317 void wxTextCtrl::OnEnabled(bool WXUNUSED(enable))
1318 {
1319 // If we have a custom background colour, we use this colour in both
1320 // disabled and enabled mode, or we end up with a different colour under the
1321 // text.
1322 wxColour oldColour = GetBackgroundColour();
1323 if (oldColour.IsOk())
1324 {
1325 // Need to set twice or it'll optimize the useful stuff out
1326 if (oldColour == * wxWHITE)
1327 SetBackgroundColour(*wxBLACK);
1328 else
1329 SetBackgroundColour(*wxWHITE);
1330 SetBackgroundColour(oldColour);
1331 }
1332 }
1333
1334 void wxTextCtrl::MarkDirty()
1335 {
1336 m_modified = true;
1337 }
1338
1339 void wxTextCtrl::DiscardEdits()
1340 {
1341 m_modified = false;
1342 }
1343
1344 // ----------------------------------------------------------------------------
1345 // event handling
1346 // ----------------------------------------------------------------------------
1347
1348 void wxTextCtrl::EnableTextChangedEvents(bool enable)
1349 {
1350 if ( enable )
1351 {
1352 g_signal_handlers_unblock_by_func(GetTextObject(),
1353 (gpointer)gtk_text_changed_callback, this);
1354 }
1355 else // disable events
1356 {
1357 g_signal_handlers_block_by_func(GetTextObject(),
1358 (gpointer)gtk_text_changed_callback, this);
1359 }
1360 }
1361
1362 bool wxTextCtrl::IgnoreTextUpdate()
1363 {
1364 if ( m_countUpdatesToIgnore > 0 )
1365 {
1366 m_countUpdatesToIgnore--;
1367
1368 return true;
1369 }
1370
1371 return false;
1372 }
1373
1374 bool wxTextCtrl::MarkDirtyOnChange()
1375 {
1376 if ( m_dontMarkDirty )
1377 {
1378 m_dontMarkDirty = false;
1379
1380 return false;
1381 }
1382
1383 return true;
1384 }
1385
1386 void wxTextCtrl::SetSelection( long from, long to )
1387 {
1388 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
1389
1390 if ( IsMultiLine() )
1391 {
1392 if (from == -1 && to == -1)
1393 {
1394 from = 0;
1395 to = GetValue().length();
1396 }
1397
1398 GtkTextIter fromi, toi;
1399 gtk_text_buffer_get_iter_at_offset( m_buffer, &fromi, from );
1400 gtk_text_buffer_get_iter_at_offset( m_buffer, &toi, to );
1401
1402 gtk_text_buffer_select_range( m_buffer, &fromi, &toi );
1403 }
1404 else // single line
1405 {
1406 wxTextEntry::SetSelection(from, to);
1407 }
1408 }
1409
1410 void wxTextCtrl::ShowPosition( long pos )
1411 {
1412 if (IsMultiLine())
1413 {
1414 GtkTextIter iter;
1415 gtk_text_buffer_get_iter_at_offset(m_buffer, &iter, int(pos));
1416 GtkTextMark* mark = gtk_text_buffer_get_mark(m_buffer, "ShowPosition");
1417 gtk_text_buffer_move_mark(m_buffer, mark, &iter);
1418 if (IsFrozen())
1419 // defer until Thaw, text view is not using m_buffer now
1420 m_showPositionOnThaw = mark;
1421 else
1422 gtk_text_view_scroll_mark_onscreen(GTK_TEXT_VIEW(m_text), mark);
1423 }
1424 }
1425
1426 wxTextCtrlHitTestResult
1427 wxTextCtrl::HitTest(const wxPoint& pt, long *pos) const
1428 {
1429 if ( !IsMultiLine() )
1430 {
1431 // not supported
1432 return wxTE_HT_UNKNOWN;
1433 }
1434
1435 int x, y;
1436 gtk_text_view_window_to_buffer_coords
1437 (
1438 GTK_TEXT_VIEW(m_text),
1439 GTK_TEXT_WINDOW_TEXT,
1440 pt.x, pt.y,
1441 &x, &y
1442 );
1443
1444 GtkTextIter iter;
1445 gtk_text_view_get_iter_at_location(GTK_TEXT_VIEW(m_text), &iter, x, y);
1446 if ( pos )
1447 *pos = gtk_text_iter_get_offset(&iter);
1448
1449 return wxTE_HT_ON_TEXT;
1450 }
1451
1452 long wxTextCtrl::GetInsertionPoint() const
1453 {
1454 wxCHECK_MSG( m_text != NULL, 0, wxT("invalid text ctrl") );
1455
1456 if ( IsMultiLine() )
1457 {
1458 // There is no direct accessor for the cursor, but
1459 // internally, the cursor is the "mark" called
1460 // "insert" in the text view's btree structure.
1461
1462 GtkTextMark *mark = gtk_text_buffer_get_insert( m_buffer );
1463 GtkTextIter cursor;
1464 gtk_text_buffer_get_iter_at_mark( m_buffer, &cursor, mark );
1465
1466 return gtk_text_iter_get_offset( &cursor );
1467 }
1468 else
1469 {
1470 return wxTextEntry::GetInsertionPoint();
1471 }
1472 }
1473
1474 wxTextPos wxTextCtrl::GetLastPosition() const
1475 {
1476 wxCHECK_MSG( m_text != NULL, 0, wxT("invalid text ctrl") );
1477
1478 int pos = 0;
1479
1480 if ( IsMultiLine() )
1481 {
1482 GtkTextIter end;
1483 gtk_text_buffer_get_end_iter( m_buffer, &end );
1484
1485 pos = gtk_text_iter_get_offset( &end );
1486 }
1487 else // single line
1488 {
1489 pos = wxTextEntry::GetLastPosition();
1490 }
1491
1492 return (long)pos;
1493 }
1494
1495 void wxTextCtrl::Remove( long from, long to )
1496 {
1497 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
1498
1499 if ( IsMultiLine() )
1500 {
1501 GtkTextIter fromi, toi;
1502 gtk_text_buffer_get_iter_at_offset( m_buffer, &fromi, from );
1503 gtk_text_buffer_get_iter_at_offset( m_buffer, &toi, to );
1504
1505 gtk_text_buffer_delete( m_buffer, &fromi, &toi );
1506 }
1507 else // single line
1508 {
1509 wxTextEntry::Remove(from, to);
1510 }
1511 }
1512
1513 void wxTextCtrl::Cut()
1514 {
1515 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
1516
1517 if ( IsMultiLine() )
1518 g_signal_emit_by_name (m_text, "cut-clipboard");
1519 else
1520 wxTextEntry::Cut();
1521 }
1522
1523 void wxTextCtrl::Copy()
1524 {
1525 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
1526
1527 if ( IsMultiLine() )
1528 g_signal_emit_by_name (m_text, "copy-clipboard");
1529 else
1530 wxTextEntry::Copy();
1531 }
1532
1533 void wxTextCtrl::Paste()
1534 {
1535 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
1536
1537 if ( IsMultiLine() )
1538 g_signal_emit_by_name (m_text, "paste-clipboard");
1539 else
1540 wxTextEntry::Paste();
1541 }
1542
1543 // If the return values from and to are the same, there is no
1544 // selection.
1545 void wxTextCtrl::GetSelection(long* fromOut, long* toOut) const
1546 {
1547 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
1548
1549 if ( !IsMultiLine() )
1550 {
1551 wxTextEntry::GetSelection(fromOut, toOut);
1552 return;
1553 }
1554
1555 gint from, to;
1556
1557 GtkTextIter ifrom, ito;
1558 if ( gtk_text_buffer_get_selection_bounds(m_buffer, &ifrom, &ito) )
1559 {
1560 from = gtk_text_iter_get_offset(&ifrom);
1561 to = gtk_text_iter_get_offset(&ito);
1562
1563 if ( from > to )
1564 {
1565 // exchange them to be compatible with wxMSW
1566 gint tmp = from;
1567 from = to;
1568 to = tmp;
1569 }
1570 }
1571 else // no selection
1572 {
1573 from =
1574 to = GetInsertionPoint();
1575 }
1576
1577 if ( fromOut )
1578 *fromOut = from;
1579 if ( toOut )
1580 *toOut = to;
1581 }
1582
1583
1584 bool wxTextCtrl::IsEditable() const
1585 {
1586 wxCHECK_MSG( m_text != NULL, false, wxT("invalid text ctrl") );
1587
1588 if ( IsMultiLine() )
1589 {
1590 return gtk_text_view_get_editable(GTK_TEXT_VIEW(m_text));
1591 }
1592 else
1593 {
1594 return wxTextEntry::IsEditable();
1595 }
1596 }
1597
1598 bool wxTextCtrl::IsModified() const
1599 {
1600 return m_modified;
1601 }
1602
1603 void wxTextCtrl::OnChar( wxKeyEvent &key_event )
1604 {
1605 wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") );
1606
1607 if ( key_event.GetKeyCode() == WXK_RETURN )
1608 {
1609 if ( HasFlag(wxTE_PROCESS_ENTER) )
1610 {
1611 wxCommandEvent event(wxEVT_COMMAND_TEXT_ENTER, m_windowId);
1612 event.SetEventObject(this);
1613 event.SetString(GetValue());
1614 if ( HandleWindowEvent(event) )
1615 return;
1616 }
1617 }
1618
1619 key_event.Skip();
1620 }
1621
1622 GtkWidget* wxTextCtrl::GetConnectWidget()
1623 {
1624 return GTK_WIDGET(m_text);
1625 }
1626
1627 GdkWindow *wxTextCtrl::GTKGetWindow(wxArrayGdkWindows& WXUNUSED(windows)) const
1628 {
1629 if ( IsMultiLine() )
1630 {
1631 return gtk_text_view_get_window(GTK_TEXT_VIEW(m_text),
1632 GTK_TEXT_WINDOW_TEXT );
1633 }
1634 else
1635 {
1636 return gtk_entry_get_text_window(GTK_ENTRY(m_text));
1637 }
1638 }
1639
1640 // the font will change for subsequent text insertiongs
1641 bool wxTextCtrl::SetFont( const wxFont &font )
1642 {
1643 wxCHECK_MSG( m_text != NULL, false, wxT("invalid text ctrl") );
1644
1645 if ( !wxTextCtrlBase::SetFont(font) )
1646 {
1647 // font didn't change, nothing to do
1648 return false;
1649 }
1650
1651 if ( IsMultiLine() )
1652 {
1653 SetUpdateFont(true);
1654
1655 m_defaultStyle.SetFont(font);
1656
1657 ChangeFontGlobally();
1658 }
1659
1660 return true;
1661 }
1662
1663 void wxTextCtrl::ChangeFontGlobally()
1664 {
1665 // this method is very inefficient and hence should be called as rarely as
1666 // possible!
1667 //
1668 // TODO: it can be implemented much more efficiently for GTK2
1669 wxASSERT_MSG( IsMultiLine(),
1670 wxT("shouldn't be called for single line controls") );
1671
1672 wxString value = GetValue();
1673 if ( !value.empty() )
1674 {
1675 SetUpdateFont(false);
1676
1677 Clear();
1678 AppendText(value);
1679 }
1680 }
1681
1682 bool wxTextCtrl::SetForegroundColour(const wxColour& colour)
1683 {
1684 if ( !wxControl::SetForegroundColour(colour) )
1685 return false;
1686
1687 // update default fg colour too
1688 m_defaultStyle.SetTextColour(colour);
1689
1690 return true;
1691 }
1692
1693 bool wxTextCtrl::SetBackgroundColour( const wxColour &colour )
1694 {
1695 wxCHECK_MSG( m_text != NULL, false, wxT("invalid text ctrl") );
1696
1697 if ( !wxControl::SetBackgroundColour( colour ) )
1698 return false;
1699
1700 if (!m_backgroundColour.IsOk())
1701 return false;
1702
1703 // change active background color too
1704 m_defaultStyle.SetBackgroundColour( colour );
1705
1706 return true;
1707 }
1708
1709 bool wxTextCtrl::SetStyle( long start, long end, const wxTextAttr& style )
1710 {
1711 if ( IsMultiLine() )
1712 {
1713 if ( style.IsDefault() )
1714 {
1715 // nothing to do
1716 return true;
1717 }
1718
1719 gint l = gtk_text_buffer_get_char_count( m_buffer );
1720
1721 wxCHECK_MSG( start >= 0 && end <= l, false,
1722 wxT("invalid range in wxTextCtrl::SetStyle") );
1723
1724 GtkTextIter starti, endi;
1725 gtk_text_buffer_get_iter_at_offset( m_buffer, &starti, start );
1726 gtk_text_buffer_get_iter_at_offset( m_buffer, &endi, end );
1727
1728 wxGtkTextApplyTagsFromAttr( m_widget, m_buffer, style, &starti, &endi );
1729
1730 return true;
1731 }
1732 //else: single line text controls don't support styles
1733
1734 return false;
1735 }
1736
1737 bool wxTextCtrl::GetStyle(long position, wxTextAttr& style)
1738 {
1739 if ( !IsMultiLine() )
1740 {
1741 // no styles for GtkEntry
1742 return false;
1743 }
1744
1745 gint l = gtk_text_buffer_get_char_count( m_buffer );
1746
1747 wxCHECK_MSG( position >= 0 && position <= l, false,
1748 wxT("invalid range in wxTextCtrl::GetStyle") );
1749
1750 GtkTextIter positioni;
1751 gtk_text_buffer_get_iter_at_offset(m_buffer, &positioni, position);
1752
1753 // Obtain a copy of the default attributes
1754 GtkTextAttributes * const
1755 pattr = gtk_text_view_get_default_attributes(GTK_TEXT_VIEW(m_text));
1756 wxON_BLOCK_EXIT1( g_free, pattr );
1757
1758 // And query GTK for the attributes at the given position using it as base
1759 if ( !gtk_text_iter_get_attributes(&positioni, pattr) )
1760 {
1761 style = m_defaultStyle;
1762 }
1763 else // have custom attributes
1764 {
1765 style.SetBackgroundColour(pattr->appearance.bg_color);
1766 style.SetTextColour(pattr->appearance.fg_color);
1767
1768 const wxGtkString
1769 pangoFontString(pango_font_description_to_string(pattr->font));
1770
1771 wxFont font;
1772 if ( font.SetNativeFontInfo(wxString(pangoFontString)) )
1773 style.SetFont(font);
1774
1775 // TODO: set alignment, tabs and indents
1776 }
1777
1778 return true;
1779 }
1780
1781 void wxTextCtrl::DoApplyWidgetStyle(GtkRcStyle *style)
1782 {
1783 gtk_widget_modify_style(m_text, style);
1784 }
1785
1786 void wxTextCtrl::OnCut(wxCommandEvent& WXUNUSED(event))
1787 {
1788 Cut();
1789 }
1790
1791 void wxTextCtrl::OnCopy(wxCommandEvent& WXUNUSED(event))
1792 {
1793 Copy();
1794 }
1795
1796 void wxTextCtrl::OnPaste(wxCommandEvent& WXUNUSED(event))
1797 {
1798 Paste();
1799 }
1800
1801 void wxTextCtrl::OnUndo(wxCommandEvent& WXUNUSED(event))
1802 {
1803 Undo();
1804 }
1805
1806 void wxTextCtrl::OnRedo(wxCommandEvent& WXUNUSED(event))
1807 {
1808 Redo();
1809 }
1810
1811 void wxTextCtrl::OnUpdateCut(wxUpdateUIEvent& event)
1812 {
1813 event.Enable( CanCut() );
1814 }
1815
1816 void wxTextCtrl::OnUpdateCopy(wxUpdateUIEvent& event)
1817 {
1818 event.Enable( CanCopy() );
1819 }
1820
1821 void wxTextCtrl::OnUpdatePaste(wxUpdateUIEvent& event)
1822 {
1823 event.Enable( CanPaste() );
1824 }
1825
1826 void wxTextCtrl::OnUpdateUndo(wxUpdateUIEvent& event)
1827 {
1828 event.Enable( CanUndo() );
1829 }
1830
1831 void wxTextCtrl::OnUpdateRedo(wxUpdateUIEvent& event)
1832 {
1833 event.Enable( CanRedo() );
1834 }
1835
1836 wxSize wxTextCtrl::DoGetBestSize() const
1837 {
1838 // FIXME should be different for multi-line controls...
1839 wxSize ret( wxControl::DoGetBestSize() );
1840 wxSize best(80, ret.y);
1841 CacheBestSize(best);
1842 return best;
1843 }
1844
1845 // ----------------------------------------------------------------------------
1846 // freeze/thaw
1847 // ----------------------------------------------------------------------------
1848
1849 void wxTextCtrl::DoFreeze()
1850 {
1851 wxCHECK_RET(m_text != NULL, wxT("invalid text ctrl"));
1852
1853 wxWindow::DoFreeze();
1854
1855 if ( HasFlag(wxTE_MULTILINE) )
1856 {
1857 GTKFreezeWidget(m_text);
1858
1859 // removing buffer dramatically speeds up insertion:
1860 g_object_ref(m_buffer);
1861 GtkTextBuffer* buf_new = gtk_text_buffer_new(NULL);
1862 gtk_text_view_set_buffer(GTK_TEXT_VIEW(m_text), buf_new);
1863 // gtk_text_view_set_buffer adds its own reference
1864 g_object_unref(buf_new);
1865 // These marks should be deleted when the buffer is changed,
1866 // but they are not (in GTK+ up to at least 3.0.1).
1867 // Otherwise these anonymous marks start to build up in the buffer,
1868 // and Freeze takes longer and longer each time it is called.
1869 if (m_anonymousMarkList)
1870 {
1871 for (GSList* item = m_anonymousMarkList; item; item = item->next)
1872 {
1873 GtkTextMark* mark = static_cast<GtkTextMark*>(item->data);
1874 if (GTK_IS_TEXT_MARK(mark) && !gtk_text_mark_get_deleted(mark))
1875 gtk_text_buffer_delete_mark(m_buffer, mark);
1876 }
1877 g_slist_free(m_anonymousMarkList);
1878 m_anonymousMarkList = NULL;
1879 }
1880 }
1881 }
1882
1883 void wxTextCtrl::DoThaw()
1884 {
1885 if ( HasFlag(wxTE_MULTILINE) )
1886 {
1887 // reattach buffer:
1888 gulong sig_id = g_signal_connect(m_buffer, "mark_set", G_CALLBACK(mark_set), &m_anonymousMarkList);
1889 gtk_text_view_set_buffer(GTK_TEXT_VIEW(m_text), m_buffer);
1890 g_object_unref(m_buffer);
1891 g_signal_handler_disconnect(m_buffer, sig_id);
1892
1893 if (m_showPositionOnThaw != NULL)
1894 {
1895 gtk_text_view_scroll_mark_onscreen(
1896 GTK_TEXT_VIEW(m_text), m_showPositionOnThaw);
1897 m_showPositionOnThaw = NULL;
1898 }
1899
1900 // and thaw the window
1901 GTKThawWidget(m_text);
1902 }
1903
1904 wxWindow::DoThaw();
1905 }
1906
1907 // ----------------------------------------------------------------------------
1908 // wxTextUrlEvent passing if style & wxTE_AUTO_URL
1909 // ----------------------------------------------------------------------------
1910
1911 // FIXME: when dragging on a link the sample gets an "Unknown event".
1912 // This might be an excessive event from us or a buggy wxMouseEvent::Moving() or
1913 // a buggy sample, or something else
1914 void wxTextCtrl::OnUrlMouseEvent(wxMouseEvent& event)
1915 {
1916 event.Skip();
1917 if( !HasFlag(wxTE_AUTO_URL) )
1918 return;
1919
1920 gint x, y;
1921 GtkTextIter start, end;
1922 GtkTextTag *tag = gtk_text_tag_table_lookup(gtk_text_buffer_get_tag_table(m_buffer),
1923 "wxUrl");
1924
1925 gtk_text_view_window_to_buffer_coords(GTK_TEXT_VIEW(m_text), GTK_TEXT_WINDOW_WIDGET,
1926 event.GetX(), event.GetY(), &x, &y);
1927
1928 gtk_text_view_get_iter_at_location(GTK_TEXT_VIEW(m_text), &end, x, y);
1929 if (!gtk_text_iter_has_tag(&end, tag))
1930 {
1931 SetCursor(wxCursor(wxCURSOR_IBEAM));
1932 return;
1933 }
1934
1935 SetCursor(wxCursor(wxCURSOR_HAND));
1936
1937 start = end;
1938 if(!gtk_text_iter_begins_tag(&start, tag))
1939 gtk_text_iter_backward_to_tag_toggle(&start, tag);
1940 if(!gtk_text_iter_ends_tag(&end, tag))
1941 gtk_text_iter_forward_to_tag_toggle(&end, tag);
1942
1943 // Native context menu is probably not desired on an URL.
1944 // Consider making this dependant on ProcessEvent(wxTextUrlEvent) return value
1945 if(event.GetEventType() == wxEVT_RIGHT_DOWN)
1946 event.Skip(false);
1947
1948 wxTextUrlEvent url_event(m_windowId, event,
1949 gtk_text_iter_get_offset(&start),
1950 gtk_text_iter_get_offset(&end));
1951
1952 InitCommandEvent(url_event);
1953 // Is that a good idea? Seems not (pleasure with gtk_text_view_start_selection_drag)
1954 //event.Skip(!HandleWindowEvent(url_event));
1955 HandleWindowEvent(url_event);
1956 }
1957
1958 bool wxTextCtrl::GTKProcessEvent(wxEvent& event) const
1959 {
1960 bool rc = wxTextCtrlBase::GTKProcessEvent(event);
1961
1962 // GtkTextView starts a drag operation when left mouse button is pressed
1963 // and ends it when it is released and if it doesn't get the release event
1964 // the next click on a control results in an assertion failure inside
1965 // gtk_text_view_start_selection_drag() which simply *kills* the program
1966 // without anything we can do about it, so always let GTK+ have this event
1967 return rc && (IsSingleLine() || event.GetEventType() != wxEVT_LEFT_UP);
1968 }
1969
1970 // static
1971 wxVisualAttributes
1972 wxTextCtrl::GetClassDefaultAttributes(wxWindowVariant WXUNUSED(variant))
1973 {
1974 return GetDefaultAttributesFromGTKWidget(gtk_entry_new, true);
1975 }
1976
1977 #endif // wxUSE_TEXTCTRL