X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/2ad3a34ecc54333aa8bf5bb6a0a54343e0dfe55e..7d6a4d96961eac84d05db8bb24c64d39003f6e54:/src/gtk/textctrl.cpp diff --git a/src/gtk/textctrl.cpp b/src/gtk/textctrl.cpp index f1c4883d44..eedc7c026f 100644 --- a/src/gtk/textctrl.cpp +++ b/src/gtk/textctrl.cpp @@ -1,421 +1,2000 @@ ///////////////////////////////////////////////////////////////////////////// -// Name: textctrl.cpp +// Name: src/gtk/textctrl.cpp // Purpose: // Author: Robert Roebling -// Created: 01/02/97 -// Id: -// Copyright: (c) 1998 Robert Roebling, Julian Smart and Markus Holzem -// Licence: wxWindows licence +// Id: $Id$ +// Copyright: (c) 1998 Robert Roebling, Vadim Zeitlin, 2005 Mart Raudsepp +// Licence: wxWindows licence ///////////////////////////////////////////////////////////////////////////// -#ifdef __GNUG__ -#pragma implementation "textctrl.h" -#endif +// For compilers that support precompilation, includes "wx.h". +#include "wx/wxprec.h" + +#if wxUSE_TEXTCTRL #include "wx/textctrl.h" -#include "wx/utils.h" + +#ifndef WX_PRECOMP + #include "wx/intl.h" + #include "wx/log.h" + #include "wx/utils.h" + #include "wx/settings.h" + #include "wx/math.h" +#endif + +#include "wx/scopeguard.h" +#include "wx/strconv.h" +#include "wx/fontutil.h" // for wxNativeFontInfo (GetNativeFontInfo()) + +#include +#include +#include + +#include +#include "wx/gtk/private.h" +#include "wx/gtk/private/gtk2-compat.h" + +// ---------------------------------------------------------------------------- +// helpers +// ---------------------------------------------------------------------------- + +extern "C" { +static void wxGtkOnRemoveTag(GtkTextBuffer *buffer, + GtkTextTag *tag, + GtkTextIter * WXUNUSED(start), + GtkTextIter * WXUNUSED(end), + char *prefix) +{ + gchar *name; + g_object_get (tag, "name", &name, NULL); + + if (!name || strncmp(name, prefix, strlen(prefix))) + // anonymous tag or not starting with prefix - don't remove + g_signal_stop_emission_by_name (buffer, "remove_tag"); + + g_free(name); +} +} + +// remove all tags starting with the given prefix from the start..end range +static void +wxGtkTextRemoveTagsWithPrefix(GtkTextBuffer *text_buffer, + const char *prefix, + GtkTextIter *start, + GtkTextIter *end) +{ + gulong remove_handler_id = g_signal_connect + ( + text_buffer, + "remove_tag", + G_CALLBACK(wxGtkOnRemoveTag), + gpointer(prefix) + ); + gtk_text_buffer_remove_all_tags(text_buffer, start, end); + g_signal_handler_disconnect(text_buffer, remove_handler_id); +} + +static void wxGtkTextApplyTagsFromAttr(GtkWidget *text, + GtkTextBuffer *text_buffer, + const wxTextAttr& attr, + GtkTextIter *start, + GtkTextIter *end) +{ + static gchar buf[1024]; + GtkTextTag *tag; + + if (attr.HasFont()) + { + wxGtkTextRemoveTagsWithPrefix(text_buffer, "WXFONT", start, end); + + wxFont font(attr.GetFont()); + + PangoFontDescription *font_description = font.GetNativeFontInfo()->description; + wxGtkString font_string(pango_font_description_to_string(font_description)); + g_snprintf(buf, sizeof(buf), "WXFONT %s", font_string.c_str()); + tag = gtk_text_tag_table_lookup( gtk_text_buffer_get_tag_table( text_buffer ), + buf ); + if (!tag) + tag = gtk_text_buffer_create_tag( text_buffer, buf, + "font-desc", font_description, + NULL ); + gtk_text_buffer_apply_tag (text_buffer, tag, start, end); + + if (font.GetUnderlined()) + { + g_snprintf(buf, sizeof(buf), "WXFONTUNDERLINE"); + tag = gtk_text_tag_table_lookup( gtk_text_buffer_get_tag_table( text_buffer ), + buf ); + if (!tag) + tag = gtk_text_buffer_create_tag( text_buffer, buf, + "underline-set", TRUE, + "underline", PANGO_UNDERLINE_SINGLE, + NULL ); + gtk_text_buffer_apply_tag (text_buffer, tag, start, end); + } + if ( font.GetStrikethrough() ) + { + g_snprintf(buf, sizeof(buf), "WXFONTSTRIKETHROUGH"); + tag = gtk_text_tag_table_lookup( gtk_text_buffer_get_tag_table( text_buffer ), + buf ); + if (!tag) + tag = gtk_text_buffer_create_tag( text_buffer, buf, + "strikethrough-set", TRUE, + "strikethrough", TRUE, + NULL ); + gtk_text_buffer_apply_tag (text_buffer, tag, start, end); + } + } + + if (attr.HasTextColour()) + { + wxGtkTextRemoveTagsWithPrefix(text_buffer, "WXFORECOLOR", start, end); + + const GdkColor *colFg = attr.GetTextColour().GetColor(); + g_snprintf(buf, sizeof(buf), "WXFORECOLOR %d %d %d", + colFg->red, colFg->green, colFg->blue); + tag = gtk_text_tag_table_lookup( gtk_text_buffer_get_tag_table( text_buffer ), + buf ); + if (!tag) + tag = gtk_text_buffer_create_tag( text_buffer, buf, + "foreground-gdk", colFg, NULL ); + gtk_text_buffer_apply_tag (text_buffer, tag, start, end); + } + + if (attr.HasBackgroundColour()) + { + wxGtkTextRemoveTagsWithPrefix(text_buffer, "WXBACKCOLOR", start, end); + + const GdkColor *colBg = attr.GetBackgroundColour().GetColor(); + g_snprintf(buf, sizeof(buf), "WXBACKCOLOR %d %d %d", + colBg->red, colBg->green, colBg->blue); + tag = gtk_text_tag_table_lookup( gtk_text_buffer_get_tag_table( text_buffer ), + buf ); + if (!tag) + tag = gtk_text_buffer_create_tag( text_buffer, buf, + "background-gdk", colBg, NULL ); + gtk_text_buffer_apply_tag (text_buffer, tag, start, end); + } + + if (attr.HasAlignment()) + { + GtkTextIter para_start, para_end = *end; + gtk_text_buffer_get_iter_at_line( text_buffer, + ¶_start, + gtk_text_iter_get_line(start) ); + gtk_text_iter_forward_line(¶_end); + + wxGtkTextRemoveTagsWithPrefix(text_buffer, "WXALIGNMENT", ¶_start, ¶_end); + + GtkJustification align; + switch (attr.GetAlignment()) + { + case wxTEXT_ALIGNMENT_RIGHT: + align = GTK_JUSTIFY_RIGHT; + break; + case wxTEXT_ALIGNMENT_CENTER: + align = GTK_JUSTIFY_CENTER; + break; + case wxTEXT_ALIGNMENT_JUSTIFIED: +#ifdef __WXGTK3__ + align = GTK_JUSTIFY_FILL; + break; +#elif GTK_CHECK_VERSION(2,11,0) +// gtk+ doesn't support justify before gtk+-2.11.0 with pango-1.17 being available +// (but if new enough pango isn't available it's a mere gtk warning) + if (!gtk_check_version(2,11,0)) + { + align = GTK_JUSTIFY_FILL; + break; + } + // fallthrough +#endif + default: + align = GTK_JUSTIFY_LEFT; + break; + } + + g_snprintf(buf, sizeof(buf), "WXALIGNMENT %d", align); + tag = gtk_text_tag_table_lookup( gtk_text_buffer_get_tag_table( text_buffer ), + buf ); + if (!tag) + tag = gtk_text_buffer_create_tag( text_buffer, buf, + "justification", align, NULL ); + gtk_text_buffer_apply_tag( text_buffer, tag, ¶_start, ¶_end ); + } + + if (attr.HasLeftIndent()) + { + // Indentation attribute + + // Clear old indentation tags + GtkTextIter para_start, para_end = *end; + gtk_text_buffer_get_iter_at_line( text_buffer, + ¶_start, + gtk_text_iter_get_line(start) ); + gtk_text_iter_forward_line(¶_end); + + wxGtkTextRemoveTagsWithPrefix(text_buffer, "WXINDENT", ¶_start, ¶_end); + + // Convert indent from 1/10th of a mm into pixels + float factor = + (float)gdk_screen_get_width(gtk_widget_get_screen(text)) / + gdk_screen_get_width_mm(gtk_widget_get_screen(text)) / 10; + + const int indent = (int)(factor * attr.GetLeftIndent()); + const int subIndent = (int)(factor * attr.GetLeftSubIndent()); + + gint gindent; + gint gsubindent; + + if (subIndent >= 0) + { + gindent = indent; + gsubindent = -subIndent; + } + else + { + gindent = -subIndent; + gsubindent = indent; + } + + g_snprintf(buf, sizeof(buf), "WXINDENT %d %d", gindent, gsubindent); + tag = gtk_text_tag_table_lookup( gtk_text_buffer_get_tag_table( text_buffer ), + buf ); + if (!tag) + tag = gtk_text_buffer_create_tag( text_buffer, buf, + "left-margin", gindent, "indent", gsubindent, NULL ); + gtk_text_buffer_apply_tag (text_buffer, tag, ¶_start, ¶_end); + } + + if (attr.HasTabs()) + { + // Set tab stops + + // Clear old tabs + GtkTextIter para_start, para_end = *end; + gtk_text_buffer_get_iter_at_line( text_buffer, + ¶_start, + gtk_text_iter_get_line(start) ); + gtk_text_iter_forward_line(¶_end); + + wxGtkTextRemoveTagsWithPrefix(text_buffer, "WXTABS", ¶_start, ¶_end); + + const wxArrayInt& tabs = attr.GetTabs(); + + wxString tagname = wxT("WXTABS"); + g_snprintf(buf, sizeof(buf), "WXTABS"); + for (size_t i = 0; i < tabs.GetCount(); i++) + tagname += wxString::Format(wxT(" %d"), tabs[i]); + + const wxWX2MBbuf buftag = tagname.utf8_str(); + + tag = gtk_text_tag_table_lookup( gtk_text_buffer_get_tag_table( text_buffer ), + buftag ); + if (!tag) + { + // Factor to convert from 1/10th of a mm into pixels + float factor = + (float)gdk_screen_get_width(gtk_widget_get_screen(text)) / + gdk_screen_get_width_mm(gtk_widget_get_screen(text)) / 10; + + PangoTabArray* tabArray = pango_tab_array_new(tabs.GetCount(), TRUE); + for (size_t i = 0; i < tabs.GetCount(); i++) + pango_tab_array_set_tab(tabArray, i, PANGO_TAB_LEFT, (gint)(tabs[i] * factor)); + tag = gtk_text_buffer_create_tag( text_buffer, buftag, + "tabs", tabArray, NULL ); + pango_tab_array_free(tabArray); + } + gtk_text_buffer_apply_tag (text_buffer, tag, ¶_start, ¶_end); + } +} + +static void wxGtkTextInsert(GtkWidget *text, + GtkTextBuffer *text_buffer, + const wxTextAttr& attr, + const wxCharBuffer& buffer) + +{ + gint start_offset; + GtkTextIter iter, start; + + gtk_text_buffer_get_iter_at_mark( text_buffer, &iter, + gtk_text_buffer_get_insert (text_buffer) ); + start_offset = gtk_text_iter_get_offset (&iter); + gtk_text_buffer_insert( text_buffer, &iter, buffer, strlen(buffer) ); + + gtk_text_buffer_get_iter_at_offset (text_buffer, &start, start_offset); + + wxGtkTextApplyTagsFromAttr(text, text_buffer, attr, &start, &iter); +} + +// Implementation of wxTE_AUTO_URL for wxGTK2 by Mart Raudsepp, + +extern "C" { +static void +au_apply_tag_callback(GtkTextBuffer *buffer, + GtkTextTag *tag, + GtkTextIter * WXUNUSED(start), + GtkTextIter * WXUNUSED(end), + gpointer WXUNUSED(textctrl)) +{ + if(tag == gtk_text_tag_table_lookup(gtk_text_buffer_get_tag_table(buffer), "wxUrl")) + g_signal_stop_emission_by_name (buffer, "apply_tag"); +} +} + +//----------------------------------------------------------------------------- +// GtkTextCharPredicates for gtk_text_iter_*_find_char +//----------------------------------------------------------------------------- + +extern "C" { +static gboolean +pred_whitespace(gunichar ch, gpointer WXUNUSED(user_data)) +{ + return g_unichar_isspace(ch); +} +} + +extern "C" { +static gboolean +pred_non_whitespace (gunichar ch, gpointer WXUNUSED(user_data)) +{ + return !g_unichar_isspace(ch); +} +} + +extern "C" { +static gboolean +pred_nonpunct (gunichar ch, gpointer WXUNUSED(user_data)) +{ + return !g_unichar_ispunct(ch); +} +} + +extern "C" { +static gboolean +pred_nonpunct_or_slash (gunichar ch, gpointer WXUNUSED(user_data)) +{ + return !g_unichar_ispunct(ch) || ch == '/'; +} +} + +//----------------------------------------------------------------------------- +// Check for links between s and e and correct tags as necessary +//----------------------------------------------------------------------------- + +// This function should be made match better while being efficient at one point. +// Most probably with a row of regular expressions. +extern "C" { +static void +au_check_word( GtkTextIter *s, GtkTextIter *e ) +{ + static const char *const URIPrefixes[] = + { + "http://", + "ftp://", + "www.", + "ftp.", + "mailto://", + "https://", + "file://", + "nntp://", + "news://", + "telnet://", + "mms://", + "gopher://", + "prospero://", + "wais://", + }; + + GtkTextIter start = *s, end = *e; + GtkTextBuffer *buffer = gtk_text_iter_get_buffer(s); + + // Get our special link tag + GtkTextTag *tag = gtk_text_tag_table_lookup(gtk_text_buffer_get_tag_table(buffer), "wxUrl"); + + // Get rid of punctuation from beginning and end. + // Might want to move this to au_check_range if an improved link checking doesn't + // use some intelligent punctuation checking itself (beware of undesired iter modifications). + if(g_unichar_ispunct( gtk_text_iter_get_char( &start ) ) ) + gtk_text_iter_forward_find_char( &start, pred_nonpunct, NULL, e ); + + gtk_text_iter_backward_find_char( &end, pred_nonpunct_or_slash, NULL, &start ); + gtk_text_iter_forward_char(&end); + + wxGtkString text(gtk_text_iter_get_text( &start, &end )); + size_t len = strlen(text), prefix_len; + size_t n; + + for( n = 0; n < WXSIZEOF(URIPrefixes); ++n ) + { + prefix_len = strlen(URIPrefixes[n]); + if((len > prefix_len) && !wxStrnicmp(text, URIPrefixes[n], prefix_len)) + break; + } + + if(n < WXSIZEOF(URIPrefixes)) + { + gulong signal_id = g_signal_handler_find (buffer, + (GSignalMatchType) (G_SIGNAL_MATCH_FUNC), + 0, 0, NULL, + (gpointer)au_apply_tag_callback, NULL); + + g_signal_handler_block (buffer, signal_id); + gtk_text_buffer_apply_tag(buffer, tag, &start, &end); + g_signal_handler_unblock (buffer, signal_id); + } +} +} + +extern "C" { +static void +au_check_range(GtkTextIter *s, + GtkTextIter *range_end) +{ + GtkTextIter range_start = *s; + GtkTextIter word_end; + GtkTextBuffer *buffer = gtk_text_iter_get_buffer(s); + GtkTextTag *tag = gtk_text_tag_table_lookup(gtk_text_buffer_get_tag_table(buffer), "wxUrl"); + + gtk_text_buffer_remove_tag(buffer, tag, s, range_end); + + if(g_unichar_isspace(gtk_text_iter_get_char(&range_start))) + gtk_text_iter_forward_find_char(&range_start, pred_non_whitespace, NULL, range_end); + + while(!gtk_text_iter_equal(&range_start, range_end)) + { + word_end = range_start; + gtk_text_iter_forward_find_char(&word_end, pred_whitespace, NULL, range_end); + + // Now we should have a word delimited by range_start and word_end, correct link tags + au_check_word(&range_start, &word_end); + + range_start = word_end; + gtk_text_iter_forward_find_char(&range_start, pred_non_whitespace, NULL, range_end); + } +} +} + +//----------------------------------------------------------------------------- +// "insert-text" for GtkTextBuffer +//----------------------------------------------------------------------------- + +extern "C" { +static void +au_insert_text_callback(GtkTextBuffer * WXUNUSED(buffer), + GtkTextIter *end, + gchar *text, + gint len, + wxTextCtrl *win) +{ + if (!len || !(win->GetWindowStyleFlag() & wxTE_AUTO_URL) ) + return; + + GtkTextIter start = *end; + gtk_text_iter_backward_chars(&start, g_utf8_strlen(text, len)); + + GtkTextIter line_start = start; + GtkTextIter line_end = *end; + GtkTextIter words_start = start; + GtkTextIter words_end = *end; + + gtk_text_iter_set_line(&line_start, gtk_text_iter_get_line(&start)); + gtk_text_iter_forward_to_line_end(&line_end); + gtk_text_iter_backward_find_char(&words_start, pred_whitespace, NULL, &line_start); + gtk_text_iter_forward_find_char(&words_end, pred_whitespace, NULL, &line_end); + + au_check_range(&words_start, &words_end); +} +} + +//----------------------------------------------------------------------------- +// "delete-range" for GtkTextBuffer +//----------------------------------------------------------------------------- + +extern "C" { +static void +au_delete_range_callback(GtkTextBuffer * WXUNUSED(buffer), + GtkTextIter *start, + GtkTextIter *end, + wxTextCtrl *win) +{ + if( !(win->GetWindowStyleFlag() & wxTE_AUTO_URL) ) + return; + + GtkTextIter line_start = *start, line_end = *end; + + gtk_text_iter_set_line(&line_start, gtk_text_iter_get_line(start)); + gtk_text_iter_forward_to_line_end(&line_end); + gtk_text_iter_backward_find_char(start, pred_whitespace, NULL, &line_start); + gtk_text_iter_forward_find_char(end, pred_whitespace, NULL, &line_end); + + au_check_range(start, end); +} +} + +//----------------------------------------------------------------------------- +// "populate_popup" from text control and "unmap" from its poup menu +//----------------------------------------------------------------------------- + +extern "C" { +static void +gtk_textctrl_popup_unmap( GtkMenu *WXUNUSED(menu), wxTextCtrl* win ) +{ + win->GTKEnableFocusOutEvent(); +} +} + +extern "C" { +static void +gtk_textctrl_populate_popup( GtkEntry *WXUNUSED(entry), GtkMenu *menu, wxTextCtrl *win ) +{ + win->GTKDisableFocusOutEvent(); + + g_signal_connect (menu, "unmap", G_CALLBACK (gtk_textctrl_popup_unmap), win ); +} +} + +//----------------------------------------------------------------------------- +// "changed" +//----------------------------------------------------------------------------- + +extern "C" { +static void +gtk_text_changed_callback( GtkWidget *WXUNUSED(widget), wxTextCtrl *win ) +{ + if ( win->IgnoreTextUpdate() ) + return; + + if (!win->m_hasVMT) return; + + if ( win->MarkDirtyOnChange() ) + win->MarkDirty(); + + win->SendTextUpdatedEvent(); +} +} + +//----------------------------------------------------------------------------- +// clipboard events: "copy-clipboard", "cut-clipboard", "paste-clipboard" +//----------------------------------------------------------------------------- + +// common part of the event handlers below +static void +handle_text_clipboard_callback( GtkWidget *widget, wxTextCtrl *win, + wxEventType eventType, const gchar * signal_name) +{ + wxClipboardTextEvent event( eventType, win->GetId() ); + event.SetEventObject( win ); + if ( win->HandleWindowEvent( event ) ) + { + // don't let the default processing to take place if we did something + // ourselves in the event handler + g_signal_stop_emission_by_name (widget, signal_name); + } +} + +extern "C" { +static void +gtk_copy_clipboard_callback( GtkWidget *widget, wxTextCtrl *win ) +{ + handle_text_clipboard_callback( + widget, win, wxEVT_COMMAND_TEXT_COPY, "copy-clipboard" ); +} + +static void +gtk_cut_clipboard_callback( GtkWidget *widget, wxTextCtrl *win ) +{ + handle_text_clipboard_callback( + widget, win, wxEVT_COMMAND_TEXT_CUT, "cut-clipboard" ); +} + +static void +gtk_paste_clipboard_callback( GtkWidget *widget, wxTextCtrl *win ) +{ + handle_text_clipboard_callback( + widget, win, wxEVT_COMMAND_TEXT_PASTE, "paste-clipboard" ); +} +} + +//----------------------------------------------------------------------------- +// "mark_set" +//----------------------------------------------------------------------------- + +extern "C" { +static void mark_set(GtkTextBuffer*, GtkTextIter*, GtkTextMark* mark, GSList** markList) +{ + if (gtk_text_mark_get_name(mark) == NULL) + *markList = g_slist_prepend(*markList, mark); +} +} //----------------------------------------------------------------------------- // wxTextCtrl //----------------------------------------------------------------------------- -IMPLEMENT_DYNAMIC_CLASS(wxTextCtrl,wxControl) +BEGIN_EVENT_TABLE(wxTextCtrl, wxTextCtrlBase) + EVT_CHAR(wxTextCtrl::OnChar) -void gtk_text_changed_callback( GtkWidget *WXUNUSED(widget), wxTextCtrl *win ) -{ - win->m_modified = TRUE; -}; + EVT_MENU(wxID_CUT, wxTextCtrl::OnCut) + EVT_MENU(wxID_COPY, wxTextCtrl::OnCopy) + EVT_MENU(wxID_PASTE, wxTextCtrl::OnPaste) + EVT_MENU(wxID_UNDO, wxTextCtrl::OnUndo) + EVT_MENU(wxID_REDO, wxTextCtrl::OnRedo) + EVT_UPDATE_UI(wxID_CUT, wxTextCtrl::OnUpdateCut) + EVT_UPDATE_UI(wxID_COPY, wxTextCtrl::OnUpdateCopy) + EVT_UPDATE_UI(wxID_PASTE, wxTextCtrl::OnUpdatePaste) + EVT_UPDATE_UI(wxID_UNDO, wxTextCtrl::OnUpdateUndo) + EVT_UPDATE_UI(wxID_REDO, wxTextCtrl::OnUpdateRedo) -BEGIN_EVENT_TABLE(wxTextCtrl, wxControl) -// EVT_CHAR(wxTextCtrl::OnChar) + // wxTE_AUTO_URL wxTextUrl support. Currently only creates + // wxTextUrlEvent in the same cases as wxMSW, more can be added here. + EVT_MOTION (wxTextCtrl::OnUrlMouseEvent) + EVT_LEFT_DOWN (wxTextCtrl::OnUrlMouseEvent) + EVT_LEFT_UP (wxTextCtrl::OnUrlMouseEvent) + EVT_LEFT_DCLICK (wxTextCtrl::OnUrlMouseEvent) + EVT_RIGHT_DOWN (wxTextCtrl::OnUrlMouseEvent) + EVT_RIGHT_UP (wxTextCtrl::OnUrlMouseEvent) + EVT_RIGHT_DCLICK(wxTextCtrl::OnUrlMouseEvent) END_EVENT_TABLE() -wxTextCtrl::wxTextCtrl(void) : streambuf() -{ - m_modified = FALSE; -}; - -wxTextCtrl::wxTextCtrl( wxWindow *parent, const wxWindowID id, const wxString &value, - const wxPoint &pos, const wxSize &size, - const int style, const wxString &name ) : streambuf() -{ - m_modified = FALSE; - Create( parent, id, value, pos, size, style, name ); -}; - -bool wxTextCtrl::Create( wxWindow *parent, const wxWindowID id, const wxString &value, - const wxPoint &pos, const wxSize &size, - const int style, const wxString &name ) -{ - m_needParent = TRUE; - - PreCreation( parent, id, pos, size, style, name ); - - if (style & wxTE_MULTILINE) - m_widget = gtk_text_new( NULL, NULL ); - else - m_widget = gtk_entry_new(); - - wxSize newSize = size; - if (newSize.x == -1) newSize.x = 80; - if (newSize.y == -1) newSize.y = 26; - SetSize( newSize.x, newSize.y ); - - PostCreation(); - - if (!value.IsNull()) - { - gint tmp = 0; - - // Don't know why this is so - if (style & wxTE_MULTILINE) - gtk_editable_insert_text( GTK_EDITABLE(m_widget), value, value.Length()+1, &tmp ); +void wxTextCtrl::Init() +{ + m_dontMarkDirty = + m_modified = false; + + m_countUpdatesToIgnore = 0; + + SetUpdateFont(false); + + m_text = NULL; + m_showPositionOnThaw = NULL; + m_anonymousMarkList = NULL; +} + +wxTextCtrl::~wxTextCtrl() +{ + if (m_anonymousMarkList) + g_slist_free(m_anonymousMarkList); +} + +wxTextCtrl::wxTextCtrl( wxWindow *parent, + wxWindowID id, + const wxString &value, + const wxPoint &pos, + const wxSize &size, + long style, + const wxValidator& validator, + const wxString &name ) +{ + Init(); + + Create( parent, id, value, pos, size, style, validator, name ); +} + +bool wxTextCtrl::Create( wxWindow *parent, + wxWindowID id, + const wxString &value, + const wxPoint &pos, + const wxSize &size, + long style, + const wxValidator& validator, + const wxString &name ) +{ + if (!PreCreation( parent, pos, size ) || + !CreateBase( parent, id, pos, size, style, validator, name )) + { + wxFAIL_MSG( wxT("wxTextCtrl creation failed") ); + return false; + } + + bool multi_line = (style & wxTE_MULTILINE) != 0; + + if (multi_line) + { + m_buffer = gtk_text_buffer_new(NULL); + gulong sig_id = g_signal_connect(m_buffer, "mark_set", G_CALLBACK(mark_set), &m_anonymousMarkList); + // Create view + m_text = gtk_text_view_new_with_buffer(m_buffer); + // gtk_text_view_set_buffer adds its own reference + g_object_unref(m_buffer); + g_signal_handler_disconnect(m_buffer, sig_id); + + // create "ShowPosition" marker + GtkTextIter iter; + gtk_text_buffer_get_start_iter(m_buffer, &iter); + gtk_text_buffer_create_mark(m_buffer, "ShowPosition", &iter, true); + + // create scrolled window + m_widget = gtk_scrolled_window_new( NULL, NULL ); + gtk_scrolled_window_set_policy( GTK_SCROLLED_WINDOW( m_widget ), + GTK_POLICY_AUTOMATIC, + style & wxTE_NO_VSCROLL + ? GTK_POLICY_NEVER + : GTK_POLICY_AUTOMATIC ); + // for ScrollLines/Pages + m_scrollBar[1] = GTK_RANGE(gtk_scrolled_window_get_vscrollbar(GTK_SCROLLED_WINDOW(m_widget))); + + // Insert view into scrolled window + gtk_container_add( GTK_CONTAINER(m_widget), m_text ); + + GTKSetWrapMode(); + + GTKScrolledWindowSetBorder(m_widget, style); + + gtk_widget_add_events( GTK_WIDGET(m_text), GDK_ENTER_NOTIFY_MASK | GDK_LEAVE_NOTIFY_MASK ); + + gtk_widget_set_can_focus(m_widget, FALSE); + } + else + { + // a single-line text control: no need for scrollbars + m_widget = + m_text = gtk_entry_new(); + // work around probable bug in GTK+ 2.18 when calling WriteText on a + // new, empty control, see http://trac.wxwidgets.org/ticket/11409 + gtk_entry_get_text((GtkEntry*)m_text); + + if (style & wxNO_BORDER) + g_object_set (m_text, "has-frame", FALSE, NULL); + + } + g_object_ref(m_widget); + + m_parent->DoAddChild( this ); + + m_focusWidget = m_text; + + PostCreation(size); + + if (multi_line) + { + gtk_widget_show(m_text); + } + + // We want to be notified about text changes. + if (multi_line) + { + g_signal_connect (m_buffer, "changed", + G_CALLBACK (gtk_text_changed_callback), this); + } + else + { + g_signal_connect (m_text, "changed", + G_CALLBACK (gtk_text_changed_callback), this); + } + + // Catch to disable focus out handling + g_signal_connect (m_text, "populate_popup", + G_CALLBACK (gtk_textctrl_populate_popup), + this); + + if (!value.empty()) + { + SetValue( value ); + } + + if (style & wxTE_PASSWORD) + GTKSetVisibility(); + + if (style & wxTE_READONLY) + GTKSetEditable(); + + // left justification (alignment) is the default anyhow + if ( style & (wxTE_RIGHT | wxTE_CENTRE) ) + GTKSetJustification(); + + if (multi_line) + { + // Handle URLs on multi-line controls with wxTE_AUTO_URL style + if (style & wxTE_AUTO_URL) + { + GtkTextIter start, end; + + // We create our wxUrl tag here for slight efficiency gain - we + // don't have to check for the tag existence in callbacks, + // hereby it's guaranteed to exist. + gtk_text_buffer_create_tag(m_buffer, "wxUrl", + "foreground", "blue", + "underline", PANGO_UNDERLINE_SINGLE, + NULL); + + // Check for URLs after each text change + g_signal_connect_after (m_buffer, "insert_text", + G_CALLBACK (au_insert_text_callback), this); + g_signal_connect_after (m_buffer, "delete_range", + G_CALLBACK (au_delete_range_callback), this); + + // Block all wxUrl tag applying unless we do it ourselves, in which case we + // block this callback temporarily. This takes care of gtk+ internal + // gtk_text_buffer_insert_range* calls that would copy our URL tag otherwise, + // which is undesired because only a part of the URL might be copied. + // The insert-text signal emitted inside it will take care of newly formed + // or wholly copied URLs. + g_signal_connect (m_buffer, "apply_tag", + G_CALLBACK (au_apply_tag_callback), NULL); + + // Check for URLs in the initial string passed to Create + gtk_text_buffer_get_start_iter(m_buffer, &start); + gtk_text_buffer_get_end_iter(m_buffer, &end); + au_check_range(&start, &end); + } + } + else // single line + { + // do the right thing with Enter presses depending on whether we have + // wxTE_PROCESS_ENTER or not + GTKSetActivatesDefault(); + } + + + g_signal_connect (m_text, "copy-clipboard", + G_CALLBACK (gtk_copy_clipboard_callback), this); + g_signal_connect (m_text, "cut-clipboard", + G_CALLBACK (gtk_cut_clipboard_callback), this); + g_signal_connect (m_text, "paste-clipboard", + G_CALLBACK (gtk_paste_clipboard_callback), this); + + m_cursor = wxCursor( wxCURSOR_IBEAM ); + + return true; +} + +GtkEditable *wxTextCtrl::GetEditable() const +{ + wxCHECK_MSG( IsSingleLine(), NULL, "shouldn't be called for multiline" ); + + return GTK_EDITABLE(m_text); +} + +GtkEntry *wxTextCtrl::GetEntry() const +{ + return GTK_ENTRY(m_text); +} + +// ---------------------------------------------------------------------------- +// flags handling +// ---------------------------------------------------------------------------- + +void wxTextCtrl::GTKSetEditable() +{ + gboolean editable = !HasFlag(wxTE_READONLY); + if ( IsSingleLine() ) + gtk_editable_set_editable(GTK_EDITABLE(m_text), editable); else - gtk_editable_insert_text( GTK_EDITABLE(m_widget), value, value.Length(), &tmp ); - }; - - if (style & wxREADONLY) - { - } - else - { - if (style & wxTE_MULTILINE) gtk_text_set_editable( GTK_TEXT(m_widget), 1 ); - }; - - Show( TRUE ); - - return TRUE; -}; - -wxString wxTextCtrl::GetValue(void) const -{ - wxString tmp; - if (m_windowStyle & wxTE_MULTILINE) - { - gint len = gtk_text_get_length( GTK_TEXT(m_widget) ); - tmp = gtk_editable_get_chars( GTK_EDITABLE(m_widget), 0, len-1 ); - } - else - { - tmp = gtk_entry_get_text( GTK_ENTRY(m_widget) ); - }; - return tmp; -}; - -void wxTextCtrl::SetValue( const wxString &value ) -{ - wxString tmp = ""; - if (!value.IsNull()) tmp = value; - if (m_windowStyle & wxTE_MULTILINE) - { - gint len = gtk_text_get_length( GTK_TEXT(m_widget) ); - gtk_editable_delete_text( GTK_EDITABLE(m_widget), 0, len-1 ); - len = 0; - gtk_editable_insert_text( GTK_EDITABLE(m_widget), tmp, tmp.Length(), &len ); - } - else - { - gtk_entry_set_text( GTK_ENTRY(m_widget), tmp ); - }; -}; + gtk_text_view_set_editable(GTK_TEXT_VIEW(m_text), editable); +} + +void wxTextCtrl::GTKSetVisibility() +{ + wxCHECK_RET( IsSingleLine(), + "wxTE_PASSWORD is for single line text controls only" ); + + gtk_entry_set_visibility(GTK_ENTRY(m_text), !HasFlag(wxTE_PASSWORD)); +} + +void wxTextCtrl::GTKSetActivatesDefault() +{ + wxCHECK_RET( IsSingleLine(), + "wxTE_PROCESS_ENTER is for single line text controls only" ); + + gtk_entry_set_activates_default(GTK_ENTRY(m_text), + !HasFlag(wxTE_PROCESS_ENTER)); +} + +void wxTextCtrl::GTKSetWrapMode() +{ + // no wrapping in single line controls + if ( !IsMultiLine() ) + return; + + // translate wx wrapping style to GTK+ + GtkWrapMode wrap; + if ( HasFlag( wxTE_DONTWRAP ) ) + wrap = GTK_WRAP_NONE; + else if ( HasFlag( wxTE_CHARWRAP ) ) + wrap = GTK_WRAP_CHAR; + else if ( HasFlag( wxTE_WORDWRAP ) ) + wrap = GTK_WRAP_WORD; + else // HasFlag(wxTE_BESTWRAP) always true as wxTE_BESTWRAP == 0 + wrap = GTK_WRAP_WORD_CHAR; + + gtk_text_view_set_wrap_mode( GTK_TEXT_VIEW( m_text ), wrap ); +} + +void wxTextCtrl::GTKSetJustification() +{ + if ( IsMultiLine() ) + { + GtkJustification just; + if ( HasFlag(wxTE_RIGHT) ) + just = GTK_JUSTIFY_RIGHT; + else if ( HasFlag(wxTE_CENTRE) ) + just = GTK_JUSTIFY_CENTER; + else // wxTE_LEFT == 0 + just = GTK_JUSTIFY_LEFT; + + gtk_text_view_set_justification(GTK_TEXT_VIEW(m_text), just); + } + else // single line + { + gfloat align; + if ( HasFlag(wxTE_RIGHT) ) + align = 1.0; + else if ( HasFlag(wxTE_CENTRE) ) + align = 0.5; + else // single line + align = 0.0; + + gtk_entry_set_alignment(GTK_ENTRY(m_text), align); + } +} + +void wxTextCtrl::SetWindowStyleFlag(long style) +{ + long styleOld = GetWindowStyleFlag(); + + wxTextCtrlBase::SetWindowStyleFlag(style); + + if ( (style & wxTE_READONLY) != (styleOld & wxTE_READONLY) ) + GTKSetEditable(); + + if ( (style & wxTE_PASSWORD) != (styleOld & wxTE_PASSWORD) ) + GTKSetVisibility(); + + if ( (style & wxTE_PROCESS_ENTER) != (styleOld & wxTE_PROCESS_ENTER) ) + GTKSetActivatesDefault(); + + static const long flagsWrap = wxTE_WORDWRAP | wxTE_CHARWRAP | wxTE_DONTWRAP; + if ( (style & flagsWrap) != (styleOld & flagsWrap) ) + GTKSetWrapMode(); + + static const long flagsAlign = wxTE_LEFT | wxTE_CENTRE | wxTE_RIGHT; + if ( (style & flagsAlign) != (styleOld & flagsAlign) ) + GTKSetJustification(); +} + +// ---------------------------------------------------------------------------- +// control value +// ---------------------------------------------------------------------------- + +wxString wxTextCtrl::GetValue() const +{ + wxCHECK_MSG( m_text != NULL, wxEmptyString, wxT("invalid text ctrl") ); + + if ( IsMultiLine() ) + { + GtkTextIter start; + gtk_text_buffer_get_start_iter( m_buffer, &start ); + GtkTextIter end; + gtk_text_buffer_get_end_iter( m_buffer, &end ); + wxGtkString text(gtk_text_buffer_get_text(m_buffer, &start, &end, true)); + + return wxGTK_CONV_BACK(text); + } + else // single line + { + return wxTextEntry::GetValue(); + } +} + +wxFontEncoding wxTextCtrl::GetTextEncoding() const +{ + // GTK+ uses UTF-8 internally, we need to convert to it but from which + // encoding? + + // first check the default text style (we intentionally don't check the + // style for the current position as it doesn't make sense for SetValue()) + const wxTextAttr& style = GetDefaultStyle(); + wxFontEncoding enc = style.HasFontEncoding() ? style.GetFontEncoding() + : wxFONTENCODING_SYSTEM; + + // fall back to the controls font if no style + if ( enc == wxFONTENCODING_SYSTEM && m_hasFont ) + enc = GetFont().GetEncoding(); + + return enc; +} + +bool wxTextCtrl::IsEmpty() const +{ + if ( IsMultiLine() ) + return gtk_text_buffer_get_char_count(m_buffer) == 0; + + return wxTextEntry::IsEmpty(); +} + +void wxTextCtrl::DoSetValue( const wxString &value, int flags ) +{ + wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") ); + + m_modified = false; + + if ( !IsMultiLine() ) + { + wxTextEntry::DoSetValue(value, flags); + return; + } + + if (value.IsEmpty()) + { + if ( !(flags & SetValue_SendEvent) ) + EnableTextChangedEvents(false); + + gtk_text_buffer_set_text( m_buffer, "", 0 ); + + if ( !(flags & SetValue_SendEvent) ) + EnableTextChangedEvents(true); + + return; + } + +#if wxUSE_UNICODE + const wxCharBuffer buffer(value.utf8_str()); +#else + wxFontEncoding enc = m_defaultStyle.HasFont() + ? m_defaultStyle.GetFont().GetEncoding() + : wxFONTENCODING_SYSTEM; + if ( enc == wxFONTENCODING_SYSTEM ) + enc = GetTextEncoding(); + + const wxCharBuffer buffer(wxGTK_CONV_ENC(value, enc)); + if ( !buffer ) + { + // see comment in WriteText() as to why we must warn the user about + // this + wxLogWarning(_("Failed to set text in the text control.")); + return; + } +#endif + + if ( !(flags & SetValue_SendEvent) ) + { + EnableTextChangedEvents(false); + } + + gtk_text_buffer_set_text( m_buffer, buffer, strlen(buffer) ); + + if ( !m_defaultStyle.IsDefault() ) + { + GtkTextIter start, end; + gtk_text_buffer_get_bounds( m_buffer, &start, &end ); + wxGtkTextApplyTagsFromAttr(m_widget, m_buffer, m_defaultStyle, + &start, &end); + } + + if ( !(flags & SetValue_SendEvent) ) + { + EnableTextChangedEvents(true); + } +} void wxTextCtrl::WriteText( const wxString &text ) { - if (text.IsNull()) return; - - if (m_windowStyle & wxTE_MULTILINE) - { - gint len = gtk_text_get_length( GTK_TEXT(m_widget) ); - gtk_editable_insert_text( GTK_EDITABLE(m_widget), text, text.Length(), &len ); - } - else - { - gtk_entry_append_text( GTK_ENTRY(m_widget), text ); - }; -}; + wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") ); + + // we're changing the text programmatically + DontMarkDirtyOnNextChange(); + + if ( !IsMultiLine() ) + { + wxTextEntry::WriteText(text); + return; + } + +#if wxUSE_UNICODE + const wxCharBuffer buffer(text.utf8_str()); +#else + // check if we have a specific style for the current position + wxFontEncoding enc = wxFONTENCODING_SYSTEM; + wxTextAttr style; + if ( GetStyle(GetInsertionPoint(), style) && style.HasFontEncoding() ) + { + enc = style.GetFontEncoding(); + } + + if ( enc == wxFONTENCODING_SYSTEM ) + enc = GetTextEncoding(); -bool wxTextCtrl::LoadFile( const wxString &WXUNUSED(file) ) + const wxCharBuffer buffer(wxGTK_CONV_ENC(text, enc)); + if ( !buffer ) + { + // we must log an error here as losing the text like this can be a + // serious problem (e.g. imagine the document edited by user being + // empty instead of containing the correct text) + wxLogWarning(_("Failed to insert text in the control.")); + return; + } +#endif + + // First remove the selection if there is one + // TODO: Is there an easier GTK specific way to do this? + long from, to; + GetSelection(&from, &to); + if (from != to) + Remove(from, to); + + // Insert the text + wxGtkTextInsert( m_text, m_buffer, m_defaultStyle, buffer ); + + // Scroll to cursor, but only if scrollbar thumb is at the very bottom + // won't work when frozen, text view is not using m_buffer then + if (!IsFrozen()) + { + GtkAdjustment* adj = gtk_scrolled_window_get_vadjustment(GTK_SCROLLED_WINDOW(m_widget)); + const double value = gtk_adjustment_get_value(adj); + const double upper = gtk_adjustment_get_upper(adj); + const double page_size = gtk_adjustment_get_page_size(adj); + if (wxIsSameDouble(value, upper - page_size)) + { + gtk_text_view_scroll_to_mark(GTK_TEXT_VIEW(m_text), + gtk_text_buffer_get_insert(m_buffer), 0, false, 0, 1); + } + } +} + +wxString wxTextCtrl::GetLineText( long lineNo ) const { - wxFAIL_MSG("wxTextCtrl::LoadFile not implemented"); + wxString result; + if ( IsMultiLine() ) + { + GtkTextIter line; + gtk_text_buffer_get_iter_at_line(m_buffer,&line,lineNo); + + GtkTextIter end = line; + // avoid skipping to the next line end if this one is empty + if ( !gtk_text_iter_ends_line(&line) ) + gtk_text_iter_forward_to_line_end(&end); - return FALSE; -}; + wxGtkString text(gtk_text_buffer_get_text(m_buffer, &line, &end, true)); + result = wxGTK_CONV_BACK(text); + } + else + { + if (lineNo == 0) + result = GetValue(); + } + return result; +} + +void wxTextCtrl::OnDropFiles( wxDropFilesEvent &WXUNUSED(event) ) +{ + /* If you implement this, don't forget to update the documentation! + * (file docs/latex/wx/text.tex) */ + wxFAIL_MSG( wxT("wxTextCtrl::OnDropFiles not implemented") ); +} -bool wxTextCtrl::SaveFile( const wxString &WXUNUSED(file) ) +bool wxTextCtrl::PositionToXY(long pos, long *x, long *y ) const { - wxFAIL_MSG("wxTextCtrl::SaveFile not implemented"); + if ( IsMultiLine() ) + { + GtkTextIter iter; + + if (pos > GetLastPosition()) + return false; - return FALSE; -}; + gtk_text_buffer_get_iter_at_offset(m_buffer, &iter, pos); -bool wxTextCtrl::IsModified(void) + if ( y ) + *y = gtk_text_iter_get_line(&iter); + if ( x ) + *x = gtk_text_iter_get_line_offset(&iter); + } + else // single line control + { + if (pos <= gtk_entry_get_text_length(GTK_ENTRY(m_text))) + { + if ( y ) + *y = 0; + if ( x ) + *x = pos; + } + else + { + // index out of bounds + return false; + } + } + + return true; +} + +long wxTextCtrl::XYToPosition(long x, long y ) const { - return m_modified; -}; + if ( IsSingleLine() ) + return 0; + + GtkTextIter iter; + if (y >= gtk_text_buffer_get_line_count (m_buffer)) + return -1; -void wxTextCtrl::DiscardEdits(void) + gtk_text_buffer_get_iter_at_line(m_buffer, &iter, y); + if (x >= gtk_text_iter_get_chars_in_line (&iter)) + return -1; + + return gtk_text_iter_get_offset(&iter) + x; +} + +int wxTextCtrl::GetLineLength(long lineNo) const { -}; + if ( IsMultiLine() ) + { + int last_line = gtk_text_buffer_get_line_count( m_buffer ) - 1; + if (lineNo > last_line) + return -1; + + GtkTextIter iter; + gtk_text_buffer_get_iter_at_line(m_buffer, &iter, lineNo); + // get_chars_in_line return includes paragraph delimiters, so need to subtract 1 IF it is not the last line + return gtk_text_iter_get_chars_in_line(&iter) - ((lineNo == last_line) ? 0 : 1); + } + else + { + wxString str = GetLineText (lineNo); + return (int) str.length(); + } +} -/* -wxString wxTextCtrl::GetLineText( const long lineNo ) const +wxPoint wxTextCtrl::DoPositionToCoords(long pos) const { -}; + if ( !IsMultiLine() ) + { + // Single line text entry (GtkTextEntry) doesn't have support for + // getting the coordinates for the given offset. Perhaps we could + // find them ourselves by using GetTextExtent() but for now just leave + // it unimplemented, this function is more useful for multiline + // controls anyhow. + return wxDefaultPosition; + } + + // Window coordinates for the given position is calculated by getting + // the buffer coordinates and converting them to window coordinates. + GtkTextView *textview = GTK_TEXT_VIEW(m_text); + + GtkTextIter iter; + gtk_text_buffer_get_iter_at_offset(m_buffer, &iter, pos); + + GdkRectangle bufferCoords; + gtk_text_view_get_iter_location(textview, &iter, &bufferCoords); + gint winCoordX = 0, + winCoordY = 0; + gtk_text_view_buffer_to_window_coords(textview, GTK_TEXT_WINDOW_WIDGET, + bufferCoords.x, bufferCoords.y, + &winCoordX, &winCoordY); -void wxTextCtrl::OnDropFiles( wxDropFilesEvent &event ) + return wxPoint(winCoordX, winCoordY); +} + +int wxTextCtrl::GetNumberOfLines() const { -}; + if ( IsMultiLine() ) + { + return gtk_text_buffer_get_line_count( m_buffer ); + } + else // single line + { + return 1; + } +} -long wxTextCtrl::PositionToXY( const long pos, long *x, long *y ) const +void wxTextCtrl::SetInsertionPoint( long pos ) { -}; + wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") ); -long wxTextCtrl::XYToPosition( const long x, const long y ) + if ( IsMultiLine() ) + { + GtkTextIter iter; + gtk_text_buffer_get_iter_at_offset( m_buffer, &iter, pos ); + gtk_text_buffer_place_cursor( m_buffer, &iter ); + GtkTextMark* mark = gtk_text_buffer_get_insert(m_buffer); + if (IsFrozen()) + // defer until Thaw, text view is not using m_buffer now + m_showPositionOnThaw = mark; + else + gtk_text_view_scroll_mark_onscreen(GTK_TEXT_VIEW(m_text), mark); + } + else // single line + { + wxTextEntry::SetInsertionPoint(pos); + } +} + +void wxTextCtrl::SetEditable( bool editable ) { -}; + wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") ); + + if ( IsMultiLine() ) + { + gtk_text_view_set_editable( GTK_TEXT_VIEW(m_text), editable ); + } + else // single line + { + wxTextEntry::SetEditable(editable); + } +} + +bool wxTextCtrl::Enable( bool enable ) +{ + if (!wxWindowBase::Enable(enable)) + { + // nothing to do + return false; + } + + gtk_widget_set_sensitive( m_text, enable ); + SetCursor(enable ? wxCursor(wxCURSOR_IBEAM) : wxCursor()); + + return true; +} -int wxTextCtrl::GetNumberOfLines(void) +// wxGTK-specific: called recursively by Enable, +// to give widgets an opportunity to correct their colours after they +// have been changed by Enable +void wxTextCtrl::OnEnabled(bool WXUNUSED(enable)) { -}; + // If we have a custom background colour, we use this colour in both + // disabled and enabled mode, or we end up with a different colour under the + // text. + wxColour oldColour = GetBackgroundColour(); + if (oldColour.IsOk()) + { + // Need to set twice or it'll optimize the useful stuff out + if (oldColour == * wxWHITE) + SetBackgroundColour(*wxBLACK); + else + SetBackgroundColour(*wxWHITE); + SetBackgroundColour(oldColour); + } +} -*/ -void wxTextCtrl::SetInsertionPoint( const long pos ) +void wxTextCtrl::MarkDirty() { - int tmp = (int) pos; - if (m_windowStyle & wxTE_MULTILINE) - gtk_text_set_point( GTK_TEXT(m_widget), tmp ); - else - gtk_entry_set_position( GTK_ENTRY(m_widget), tmp ); -}; + m_modified = true; +} -void wxTextCtrl::SetInsertionPointEnd(void) +void wxTextCtrl::DiscardEdits() { - int pos = 0; - if (m_windowStyle & wxTE_MULTILINE) - pos = gtk_text_get_length( GTK_TEXT(m_widget) ); - else - pos = GTK_ENTRY(m_widget)->text_length; - SetInsertionPoint( pos-1 ); -}; + m_modified = false; +} -void wxTextCtrl::SetEditable( const bool editable ) +// ---------------------------------------------------------------------------- +// event handling +// ---------------------------------------------------------------------------- + +void wxTextCtrl::EnableTextChangedEvents(bool enable) { - if (m_windowStyle & wxTE_MULTILINE) - gtk_text_set_editable( GTK_TEXT(m_widget), editable ); - else - gtk_entry_set_editable( GTK_ENTRY(m_widget), editable ); -}; + if ( enable ) + { + g_signal_handlers_unblock_by_func(GetTextObject(), + (gpointer)gtk_text_changed_callback, this); + } + else // disable events + { + g_signal_handlers_block_by_func(GetTextObject(), + (gpointer)gtk_text_changed_callback, this); + } +} -void wxTextCtrl::SetSelection( const long from, const long to ) +bool wxTextCtrl::IgnoreTextUpdate() { - gtk_editable_select_region( GTK_EDITABLE(m_widget), (gint)from, (gint)to ); -}; + if ( m_countUpdatesToIgnore > 0 ) + { + m_countUpdatesToIgnore--; -void wxTextCtrl::ShowPosition( const long WXUNUSED(pos) ) + return true; + } + + return false; +} + +bool wxTextCtrl::MarkDirtyOnChange() { - wxFAIL_MSG("wxTextCtrl::ShowPosition not implemented"); -}; + if ( m_dontMarkDirty ) + { + m_dontMarkDirty = false; + + return false; + } + + return true; +} -long wxTextCtrl::GetInsertionPoint(void) const +void wxTextCtrl::SetSelection( long from, long to ) { - return (long) GTK_EDITABLE(m_widget)->current_pos; -}; + wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") ); + + if ( IsMultiLine() ) + { + if (from == -1 && to == -1) + { + from = 0; + to = GetValue().length(); + } + + GtkTextIter fromi, toi; + gtk_text_buffer_get_iter_at_offset( m_buffer, &fromi, from ); + gtk_text_buffer_get_iter_at_offset( m_buffer, &toi, to ); + + gtk_text_buffer_select_range( m_buffer, &fromi, &toi ); + } + else // single line + { + wxTextEntry::SetSelection(from, to); + } +} -long wxTextCtrl::GetLastPosition(void) const +void wxTextCtrl::ShowPosition( long pos ) { - int pos = 0; - if (m_windowStyle & wxTE_MULTILINE) - pos = gtk_text_get_length( GTK_TEXT(m_widget) ); - else - pos = GTK_ENTRY(m_widget)->text_length; - return (long)pos-1; -}; + if (IsMultiLine()) + { + GtkTextIter iter; + gtk_text_buffer_get_iter_at_offset(m_buffer, &iter, int(pos)); + GtkTextMark* mark = gtk_text_buffer_get_mark(m_buffer, "ShowPosition"); + gtk_text_buffer_move_mark(m_buffer, mark, &iter); + if (IsFrozen()) + // defer until Thaw, text view is not using m_buffer now + m_showPositionOnThaw = mark; + else + gtk_text_view_scroll_mark_onscreen(GTK_TEXT_VIEW(m_text), mark); + } +} -void wxTextCtrl::Remove( const long from, const long to ) +wxTextCtrlHitTestResult +wxTextCtrl::HitTest(const wxPoint& pt, long *pos) const { - gtk_editable_delete_text( GTK_EDITABLE(m_widget), (gint)from, (gint)to ); -}; + if ( !IsMultiLine() ) + { + // not supported + return wxTE_HT_UNKNOWN; + } + + int x, y; + gtk_text_view_window_to_buffer_coords + ( + GTK_TEXT_VIEW(m_text), + GTK_TEXT_WINDOW_TEXT, + pt.x, pt.y, + &x, &y + ); + + GtkTextIter iter; + gtk_text_view_get_iter_at_location(GTK_TEXT_VIEW(m_text), &iter, x, y); + if ( pos ) + *pos = gtk_text_iter_get_offset(&iter); -void wxTextCtrl::Replace( const long from, const long to, const wxString &value ) + return wxTE_HT_ON_TEXT; +} + +long wxTextCtrl::GetInsertionPoint() const { - gtk_editable_delete_text( GTK_EDITABLE(m_widget), (gint)from, (gint)to ); - if (value.IsNull()) return; - gint pos = (gint)to; - gtk_editable_insert_text( GTK_EDITABLE(m_widget), value, value.Length(), &pos ); -}; + wxCHECK_MSG( m_text != NULL, 0, wxT("invalid text ctrl") ); + + if ( IsMultiLine() ) + { + // There is no direct accessor for the cursor, but + // internally, the cursor is the "mark" called + // "insert" in the text view's btree structure. + + GtkTextMark *mark = gtk_text_buffer_get_insert( m_buffer ); + GtkTextIter cursor; + gtk_text_buffer_get_iter_at_mark( m_buffer, &cursor, mark ); -void wxTextCtrl::Cut(void) + return gtk_text_iter_get_offset( &cursor ); + } + else + { + return wxTextEntry::GetInsertionPoint(); + } +} + +wxTextPos wxTextCtrl::GetLastPosition() const { - gtk_editable_cut_clipboard( GTK_EDITABLE(m_widget), 0 ); -}; + wxCHECK_MSG( m_text != NULL, 0, wxT("invalid text ctrl") ); + + int pos = 0; + + if ( IsMultiLine() ) + { + GtkTextIter end; + gtk_text_buffer_get_end_iter( m_buffer, &end ); + + pos = gtk_text_iter_get_offset( &end ); + } + else // single line + { + pos = wxTextEntry::GetLastPosition(); + } + + return (long)pos; +} -void wxTextCtrl::Copy(void) +void wxTextCtrl::Remove( long from, long to ) { - gtk_editable_copy_clipboard( GTK_EDITABLE(m_widget), 0 ); -}; + wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") ); + + if ( IsMultiLine() ) + { + GtkTextIter fromi, toi; + gtk_text_buffer_get_iter_at_offset( m_buffer, &fromi, from ); + gtk_text_buffer_get_iter_at_offset( m_buffer, &toi, to ); + + gtk_text_buffer_delete( m_buffer, &fromi, &toi ); + } + else // single line + { + wxTextEntry::Remove(from, to); + } +} -void wxTextCtrl::Paste(void) +void wxTextCtrl::Cut() { - gtk_editable_paste_clipboard( GTK_EDITABLE(m_widget), 0 ); -}; + wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") ); -void wxTextCtrl::Delete(void) + if ( IsMultiLine() ) + g_signal_emit_by_name (m_text, "cut-clipboard"); + else + wxTextEntry::Cut(); +} + +void wxTextCtrl::Copy() { - SetValue( "" ); -}; + wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") ); -void wxTextCtrl::OnChar( wxKeyEvent &WXUNUSED(event) ) + if ( IsMultiLine() ) + g_signal_emit_by_name (m_text, "copy-clipboard"); + else + wxTextEntry::Copy(); +} + +void wxTextCtrl::Paste() { -}; + wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") ); -int wxTextCtrl::overflow(int c) + if ( IsMultiLine() ) + g_signal_emit_by_name (m_text, "paste-clipboard"); + else + wxTextEntry::Paste(); +} + +// If the return values from and to are the same, there is no +// selection. +void wxTextCtrl::GetSelection(long* fromOut, long* toOut) const { - // Make sure there is a holding area - if ( allocate()==EOF ) - { - wxError("Streambuf allocation failed","Internal error"); - return EOF; - } - - // Verify that there are no characters in get area - if ( gptr() && gptr() < egptr() ) - { - wxError("Who's trespassing my get area?","Internal error"); - return EOF; - } + wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") ); + + if ( !IsMultiLine() ) + { + wxTextEntry::GetSelection(fromOut, toOut); + return; + } + + gint from, to; - // Reset get area - setg(0,0,0); + GtkTextIter ifrom, ito; + if ( gtk_text_buffer_get_selection_bounds(m_buffer, &ifrom, &ito) ) + { + from = gtk_text_iter_get_offset(&ifrom); + to = gtk_text_iter_get_offset(&ito); - // Make sure there is a put area - if ( ! pptr() ) - { -/* This doesn't seem to be fatal so comment out error message */ -// wxError("Put area not opened","Internal error"); - setp( base(), base() ); - } + if ( from > to ) + { + // exchange them to be compatible with wxMSW + gint tmp = from; + from = to; + to = tmp; + } + } + else // no selection + { + from = + to = GetInsertionPoint(); + } + + if ( fromOut ) + *fromOut = from; + if ( toOut ) + *toOut = to; +} - // Determine how many characters have been inserted but no consumed - int plen = pptr() - pbase(); - // Now Jerry relies on the fact that the buffer is at least 2 chars - // long, but the holding area "may be as small as 1" ??? - // And we need an additional \0, so let's keep this inefficient but - // safe copy. +bool wxTextCtrl::IsEditable() const +{ + wxCHECK_MSG( m_text != NULL, false, wxT("invalid text ctrl") ); - // If c!=EOF, it is a character that must also be comsumed - int xtra = c==EOF? 0 : 1; + if ( IsMultiLine() ) + { + return gtk_text_view_get_editable(GTK_TEXT_VIEW(m_text)) != 0; + } + else + { + return wxTextEntry::IsEditable(); + } +} - // Write temporary C-string to wxTextWindow - { - char *txt = new char[plen+xtra+1]; - memcpy(txt, pbase(), plen); - txt[plen] = (char)c; // append c - txt[plen+xtra] = '\0'; // append '\0' or overwrite c - // If the put area already contained \0, output will be truncated there - WriteText(txt); - delete[] txt; - } +bool wxTextCtrl::IsModified() const +{ + return m_modified; +} - // Reset put area - setp(pbase(), epptr()); +void wxTextCtrl::OnChar( wxKeyEvent &key_event ) +{ + wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") ); -#if defined(__WATCOMC__) - return __NOT_EOF; -#elif defined(zapeof) // HP-UX (all cfront based?) - return zapeof(c); + if ( key_event.GetKeyCode() == WXK_RETURN ) + { + if ( HasFlag(wxTE_PROCESS_ENTER) ) + { + wxCommandEvent event(wxEVT_COMMAND_TEXT_ENTER, m_windowId); + event.SetEventObject(this); + event.SetString(GetValue()); + if ( HandleWindowEvent(event) ) + return; + } + } + + key_event.Skip(); +} + +GtkWidget* wxTextCtrl::GetConnectWidget() +{ + return GTK_WIDGET(m_text); +} + +GdkWindow *wxTextCtrl::GTKGetWindow(wxArrayGdkWindows& WXUNUSED(windows)) const +{ + if ( IsMultiLine() ) + { + return gtk_text_view_get_window(GTK_TEXT_VIEW(m_text), + GTK_TEXT_WINDOW_TEXT ); + } + else + { +#ifdef __WXGTK3__ + // no access to internal GdkWindows + return NULL; #else - return c!=EOF ? c : 0; // this should make everybody happy + return gtk_entry_get_text_window(GTK_ENTRY(m_text)); #endif + } +} + +// the font will change for subsequent text insertiongs +bool wxTextCtrl::SetFont( const wxFont &font ) +{ + wxCHECK_MSG( m_text != NULL, false, wxT("invalid text ctrl") ); + + if ( !wxTextCtrlBase::SetFont(font) ) + { + // font didn't change, nothing to do + return false; + } + + if ( IsMultiLine() ) + { + SetUpdateFont(true); + + m_defaultStyle.SetFont(font); + + ChangeFontGlobally(); + } + + return true; +} + +void wxTextCtrl::ChangeFontGlobally() +{ + // this method is very inefficient and hence should be called as rarely as + // possible! + // + // TODO: it can be implemented much more efficiently for GTK2 + wxASSERT_MSG( IsMultiLine(), + wxT("shouldn't be called for single line controls") ); + + wxString value = GetValue(); + if ( !value.empty() ) + { + SetUpdateFont(false); + + Clear(); + AppendText(value); + } +} + +bool wxTextCtrl::SetForegroundColour(const wxColour& colour) +{ + if ( !wxControl::SetForegroundColour(colour) ) + return false; + + // update default fg colour too + m_defaultStyle.SetTextColour(colour); + + return true; +} + +bool wxTextCtrl::SetBackgroundColour( const wxColour &colour ) +{ + wxCHECK_MSG( m_text != NULL, false, wxT("invalid text ctrl") ); + + if ( !wxControl::SetBackgroundColour( colour ) ) + return false; + + if (!m_backgroundColour.IsOk()) + return false; + + // change active background color too + m_defaultStyle.SetBackgroundColour( colour ); + + return true; +} + +bool wxTextCtrl::SetStyle( long start, long end, const wxTextAttr& style ) +{ + if ( IsMultiLine() ) + { + if ( style.IsDefault() ) + { + // nothing to do + return true; + } + + gint l = gtk_text_buffer_get_char_count( m_buffer ); -/* OLD CODE - int len = pptr() - pbase(); - char *txt = new char[len+1]; - strncpy(txt, pbase(), len); - txt[len] = '\0'; - (*this) << txt; - setp(pbase(), epptr()); - delete[] txt; - return EOF; -*/ -}; + wxCHECK_MSG( start >= 0 && end <= l, false, + wxT("invalid range in wxTextCtrl::SetStyle") ); -int wxTextCtrl::sync(void) + GtkTextIter starti, endi; + gtk_text_buffer_get_iter_at_offset( m_buffer, &starti, start ); + gtk_text_buffer_get_iter_at_offset( m_buffer, &endi, end ); + + wxGtkTextApplyTagsFromAttr( m_widget, m_buffer, style, &starti, &endi ); + + return true; + } + //else: single line text controls don't support styles + + return false; +} + +bool wxTextCtrl::GetStyle(long position, wxTextAttr& style) +{ + if ( !IsMultiLine() ) + { + // no styles for GtkEntry + return false; + } + + gint l = gtk_text_buffer_get_char_count( m_buffer ); + + wxCHECK_MSG( position >= 0 && position <= l, false, + wxT("invalid range in wxTextCtrl::GetStyle") ); + + GtkTextIter positioni; + gtk_text_buffer_get_iter_at_offset(m_buffer, &positioni, position); + + // Obtain a copy of the default attributes + GtkTextAttributes * const + pattr = gtk_text_view_get_default_attributes(GTK_TEXT_VIEW(m_text)); + wxON_BLOCK_EXIT1(gtk_text_attributes_unref, pattr); + + // And query GTK for the attributes at the given position using it as base + if ( !gtk_text_iter_get_attributes(&positioni, pattr) ) + { + style = m_defaultStyle; + } + else // have custom attributes + { + style.SetBackgroundColour(pattr->appearance.bg_color); + style.SetTextColour(pattr->appearance.fg_color); + + const wxGtkString + pangoFontString(pango_font_description_to_string(pattr->font)); + + wxFont font; + if ( font.SetNativeFontInfo(wxString(pangoFontString)) ) + style.SetFont(font); + + // TODO: set alignment, tabs and indents + } + + return true; +} + +void wxTextCtrl::DoApplyWidgetStyle(GtkRcStyle *style) +{ + GTKApplyStyle(m_text, style); +} + +void wxTextCtrl::OnCut(wxCommandEvent& WXUNUSED(event)) +{ + Cut(); +} + +void wxTextCtrl::OnCopy(wxCommandEvent& WXUNUSED(event)) +{ + Copy(); +} + +void wxTextCtrl::OnPaste(wxCommandEvent& WXUNUSED(event)) +{ + Paste(); +} + +void wxTextCtrl::OnUndo(wxCommandEvent& WXUNUSED(event)) +{ + Undo(); +} + +void wxTextCtrl::OnRedo(wxCommandEvent& WXUNUSED(event)) { - // Verify that there are no characters in get area - if ( gptr() && gptr() < egptr() ) - { - wxError("Who's trespassing my get area?","Internal error"); - return EOF; - } + Redo(); +} - if ( pptr() && pptr() > pbase() ) return overflow(EOF); +void wxTextCtrl::OnUpdateCut(wxUpdateUIEvent& event) +{ + event.Enable( CanCut() ); +} - return 0; -/* OLD CODE - int len = pptr() - pbase(); - char *txt = new char[len+1]; - strncpy(txt, pbase(), len); - txt[len] = '\0'; - (*this) << txt; - setp(pbase(), epptr()); - delete[] txt; - return 0; -*/ -}; +void wxTextCtrl::OnUpdateCopy(wxUpdateUIEvent& event) +{ + event.Enable( CanCopy() ); +} -int wxTextCtrl::underflow(void) +void wxTextCtrl::OnUpdatePaste(wxUpdateUIEvent& event) { - return EOF; -}; + event.Enable( CanPaste() ); +} -wxTextCtrl& wxTextCtrl::operator<<(const wxString& s) +void wxTextCtrl::OnUpdateUndo(wxUpdateUIEvent& event) { - WriteText(s); - return *this; + event.Enable( CanUndo() ); } -wxTextCtrl& wxTextCtrl::operator<<(const float f) +void wxTextCtrl::OnUpdateRedo(wxUpdateUIEvent& event) { - static char buf[100]; - sprintf(buf, "%.2f", f); - WriteText(buf); - return *this; + event.Enable( CanRedo() ); } -wxTextCtrl& wxTextCtrl::operator<<(const double d) +wxSize wxTextCtrl::DoGetBestSize() const { - static char buf[100]; - sprintf(buf, "%.2f", d); - WriteText(buf); - return *this; + // FIXME should be different for multi-line controls... + wxSize ret( wxControl::DoGetBestSize() ); + wxSize best(80, ret.y); + CacheBestSize(best); + return best; +} + +// ---------------------------------------------------------------------------- +// freeze/thaw +// ---------------------------------------------------------------------------- + +void wxTextCtrl::DoFreeze() +{ + wxCHECK_RET(m_text != NULL, wxT("invalid text ctrl")); + + wxWindow::DoFreeze(); + + if ( HasFlag(wxTE_MULTILINE) ) + { + GTKFreezeWidget(m_text); + + // removing buffer dramatically speeds up insertion: + g_object_ref(m_buffer); + GtkTextBuffer* buf_new = gtk_text_buffer_new(NULL); + gtk_text_view_set_buffer(GTK_TEXT_VIEW(m_text), buf_new); + // gtk_text_view_set_buffer adds its own reference + g_object_unref(buf_new); + // These marks should be deleted when the buffer is changed, + // but they are not (in GTK+ up to at least 3.0.1). + // Otherwise these anonymous marks start to build up in the buffer, + // and Freeze takes longer and longer each time it is called. + if (m_anonymousMarkList) + { + for (GSList* item = m_anonymousMarkList; item; item = item->next) + { + GtkTextMark* mark = static_cast(item->data); + if (GTK_IS_TEXT_MARK(mark) && !gtk_text_mark_get_deleted(mark)) + gtk_text_buffer_delete_mark(m_buffer, mark); + } + g_slist_free(m_anonymousMarkList); + m_anonymousMarkList = NULL; + } + } } -wxTextCtrl& wxTextCtrl::operator<<(const int i) +void wxTextCtrl::DoThaw() { - static char buf[100]; - sprintf(buf, "%i", i); - WriteText(buf); - return *this; + if ( HasFlag(wxTE_MULTILINE) ) + { + // reattach buffer: + gulong sig_id = g_signal_connect(m_buffer, "mark_set", G_CALLBACK(mark_set), &m_anonymousMarkList); + gtk_text_view_set_buffer(GTK_TEXT_VIEW(m_text), m_buffer); + g_object_unref(m_buffer); + g_signal_handler_disconnect(m_buffer, sig_id); + + if (m_showPositionOnThaw != NULL) + { + gtk_text_view_scroll_mark_onscreen( + GTK_TEXT_VIEW(m_text), m_showPositionOnThaw); + m_showPositionOnThaw = NULL; + } + + // and thaw the window + GTKThawWidget(m_text); + } + + wxWindow::DoThaw(); } -wxTextCtrl& wxTextCtrl::operator<<(const long i) +// ---------------------------------------------------------------------------- +// wxTextUrlEvent passing if style & wxTE_AUTO_URL +// ---------------------------------------------------------------------------- + +// FIXME: when dragging on a link the sample gets an "Unknown event". +// This might be an excessive event from us or a buggy wxMouseEvent::Moving() or +// a buggy sample, or something else +void wxTextCtrl::OnUrlMouseEvent(wxMouseEvent& event) { - static char buf[100]; - sprintf(buf, "%ld", i); - WriteText(buf); - return *this; + event.Skip(); + if( !HasFlag(wxTE_AUTO_URL) ) + return; + + gint x, y; + GtkTextIter start, end; + GtkTextTag *tag = gtk_text_tag_table_lookup(gtk_text_buffer_get_tag_table(m_buffer), + "wxUrl"); + + gtk_text_view_window_to_buffer_coords(GTK_TEXT_VIEW(m_text), GTK_TEXT_WINDOW_WIDGET, + event.GetX(), event.GetY(), &x, &y); + + gtk_text_view_get_iter_at_location(GTK_TEXT_VIEW(m_text), &end, x, y); + if (!gtk_text_iter_has_tag(&end, tag)) + { + SetCursor(wxCursor(wxCURSOR_IBEAM)); + return; + } + + SetCursor(wxCursor(wxCURSOR_HAND)); + + start = end; + if(!gtk_text_iter_begins_tag(&start, tag)) + gtk_text_iter_backward_to_tag_toggle(&start, tag); + if(!gtk_text_iter_ends_tag(&end, tag)) + gtk_text_iter_forward_to_tag_toggle(&end, tag); + + // Native context menu is probably not desired on an URL. + // Consider making this dependent on ProcessEvent(wxTextUrlEvent) return value + if(event.GetEventType() == wxEVT_RIGHT_DOWN) + event.Skip(false); + + wxTextUrlEvent url_event(m_windowId, event, + gtk_text_iter_get_offset(&start), + gtk_text_iter_get_offset(&end)); + + InitCommandEvent(url_event); + // Is that a good idea? Seems not (pleasure with gtk_text_view_start_selection_drag) + //event.Skip(!HandleWindowEvent(url_event)); + HandleWindowEvent(url_event); } -wxTextCtrl& wxTextCtrl::operator<<(const char c) +bool wxTextCtrl::GTKProcessEvent(wxEvent& event) const { - char buf[2]; + bool rc = wxTextCtrlBase::GTKProcessEvent(event); - buf[0] = c; - buf[1] = 0; - WriteText(buf); - return *this; + // GtkTextView starts a drag operation when left mouse button is pressed + // and ends it when it is released and if it doesn't get the release event + // the next click on a control results in an assertion failure inside + // gtk_text_view_start_selection_drag() which simply *kills* the program + // without anything we can do about it, so always let GTK+ have this event + return rc && (IsSingleLine() || event.GetEventType() != wxEVT_LEFT_UP); +} + +// static +wxVisualAttributes +wxTextCtrl::GetClassDefaultAttributes(wxWindowVariant WXUNUSED(variant)) +{ + return GetDefaultAttributesFromGTKWidget(gtk_entry_new, true); } +#endif // wxUSE_TEXTCTRL