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