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 <gtk/gtk.h>
  34 #include "wx/gtk/private.h"
  35 #include "wx/gtk/private/gtk2-compat.h"
  36
  37 // ----------------------------------------------------------------------------
  38 // helpers
  39 // ----------------------------------------------------------------------------
  40
  41 extern "C" {
  42 static 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
  60 static void
  61 wxGtkTextRemoveTagsWithPrefix(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
  77 static 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
 292 static 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
 313 extern "C" {
 314 static void
 315 au_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
 330 extern "C" {
 331 static gboolean
 332 pred_whitespace(gunichar ch, gpointer WXUNUSED(user_data))
 333 {
 334     return g_unichar_isspace(ch);
 335 }
 336 }
 337
 338 extern "C" {
 339 static gboolean
 340 pred_non_whitespace (gunichar ch, gpointer WXUNUSED(user_data))
 341 {
 342     return !g_unichar_isspace(ch);
 343 }
 344 }
 345
 346 extern "C" {
 347 static gboolean
 348 pred_nonpunct (gunichar ch, gpointer WXUNUSED(user_data))
 349 {
 350     return !g_unichar_ispunct(ch);
 351 }
 352 }
 353
 354 extern "C" {
 355 static gboolean
 356 pred_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.
 368 extern "C" {
 369 static void
 370 au_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
 430 extern "C" {
 431 static void
 432 au_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
 463 extern "C" {
 464 static void
 465 au_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
 495 extern "C" {
 496 static void
 497 au_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
 520 extern "C" {
 521 static void
 522 gtk_textctrl_popup_unmap( GtkMenu *WXUNUSED(menu), wxTextCtrl* win )
 523 {
 524     win->GTKEnableFocusOutEvent();
 525 }
 526 }
 527
 528 extern "C" {
 529 static void
 530 gtk_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
 542 extern "C" {
 543 static void
 544 gtk_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
 560 extern "C" {
 561 static 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
 572 BEGIN_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)
 596 END_EVENT_TABLE()
 597
 598 void 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
 613 wxTextCtrl::~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
 629 wxTextCtrl::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
 643 bool 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
 806 GtkEditable *wxTextCtrl::GetEditable() const
 807 {
 808     wxCHECK_MSG( IsSingleLine(), NULL, "shouldn't be called for multiline" );
 809
 810     return GTK_EDITABLE(m_text);
 811 }
 812
 813 GtkEntry *wxTextCtrl::GetEntry() const
 814 {
 815     return GTK_ENTRY(m_text);
 816 }
 817
 818 // ----------------------------------------------------------------------------
 819 // flags handling
 820 // ----------------------------------------------------------------------------
 821
 822 void 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
 831 void 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
 839 void 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
 848 void 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
 868 void 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
 896 void 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
 924 wxString 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
 944 wxFontEncoding 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
 962 bool 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
 970 void 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
1035 void 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
1099 wxString 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
1123 void 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
1130 bool 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
1165 long 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
1181 int 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
1201 wxPoint 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
1232 int 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
1244 void 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
1266 void 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
1280 bool 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
1297 void 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
1314 void wxTextCtrl::MarkDirty()
1315 {
1316     m_modified = true;
1317 }
1318
1319 void wxTextCtrl::DiscardEdits()
1320 {
1321     m_modified = false;
1322 }
1323
1324 // ----------------------------------------------------------------------------
1325 // event handling
1326 // ----------------------------------------------------------------------------
1327
1328 void 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
1342 bool wxTextCtrl::IgnoreTextUpdate()
1343 {
1344     if ( m_countUpdatesToIgnore > 0 )
1345     {
1346         m_countUpdatesToIgnore--;
1347
1348         return true;
1349     }
1350
1351     return false;
1352 }
1353
1354 bool wxTextCtrl::MarkDirtyOnChange()
1355 {
1356     if ( m_dontMarkDirty )
1357     {
1358         m_dontMarkDirty = false;
1359
1360         return false;
1361     }
1362
1363     return true;
1364 }
1365
1366 void 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
1390 void 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
1406 wxTextCtrlHitTestResult
1407 wxTextCtrl::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
1432 long 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
1454 wxTextPos 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
1475 void 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
1493 void 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
1503 void 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
1513 void 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.
1525 void 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
1564 bool 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
1578 bool wxTextCtrl::IsModified() const
1579 {
1580     return m_modified;
1581 }
1582
1583 void 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
1602 GtkWidget* wxTextCtrl::GetConnectWidget()
1603 {
1604     return GTK_WIDGET(m_text);
1605 }
1606
1607 GdkWindow *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
1626 bool 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
1648 void 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
1667 bool 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
1678 bool 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
1694 bool 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
1722 bool 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
1766 void wxTextCtrl::DoApplyWidgetStyle(GtkRcStyle *style)
1767 {
1768     GTKApplyStyle(m_text, style);
1769 }
1770
1771 void wxTextCtrl::OnCut(wxCommandEvent& WXUNUSED(event))
1772 {
1773     Cut();
1774 }
1775
1776 void wxTextCtrl::OnCopy(wxCommandEvent& WXUNUSED(event))
1777 {
1778     Copy();
1779 }
1780
1781 void wxTextCtrl::OnPaste(wxCommandEvent& WXUNUSED(event))
1782 {
1783     Paste();
1784 }
1785
1786 void wxTextCtrl::OnUndo(wxCommandEvent& WXUNUSED(event))
1787 {
1788     Undo();
1789 }
1790
1791 void wxTextCtrl::OnRedo(wxCommandEvent& WXUNUSED(event))
1792 {
1793     Redo();
1794 }
1795
1796 void wxTextCtrl::OnUpdateCut(wxUpdateUIEvent& event)
1797 {
1798     event.Enable( CanCut() );
1799 }
1800
1801 void wxTextCtrl::OnUpdateCopy(wxUpdateUIEvent& event)
1802 {
1803     event.Enable( CanCopy() );
1804 }
1805
1806 void wxTextCtrl::OnUpdatePaste(wxUpdateUIEvent& event)
1807 {
1808     event.Enable( CanPaste() );
1809 }
1810
1811 void wxTextCtrl::OnUpdateUndo(wxUpdateUIEvent& event)
1812 {
1813     event.Enable( CanUndo() );
1814 }
1815
1816 void wxTextCtrl::OnUpdateRedo(wxUpdateUIEvent& event)
1817 {
1818     event.Enable( CanRedo() );
1819 }
1820
1821 wxSize 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
1834 void 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
1866 void 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
1894 void 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
1938 bool 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
1951 wxVisualAttributes
1952 wxTextCtrl::GetClassDefaultAttributes(wxWindowVariant WXUNUSED(variant))
1953 {
1954     return GetDefaultAttributesFromGTKWidget(gtk_entry_new, true);
1955 }
1956
1957 #endif // wxUSE_TEXTCTRL