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