X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/ca8b28f2efff34b9939035a7aeb1de1e3ac98a0c..aa78d22e2008726218d47da1f2ac5864c11b8ebb:/src/gtk/textctrl.cpp diff --git a/src/gtk/textctrl.cpp b/src/gtk/textctrl.cpp index 4da56a23e5..373b2536b7 100644 --- a/src/gtk/textctrl.cpp +++ b/src/gtk/textctrl.cpp @@ -3,60 +3,475 @@ // Purpose: // Author: Robert Roebling // Id: $Id$ -// Copyright: (c) 1998 Robert Roebling, Vadim Zeitlin +// 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" #include "wx/textctrl.h" #include "wx/utils.h" #include "wx/intl.h" +#include "wx/log.h" +#include "wx/math.h" #include "wx/settings.h" +#include "wx/panel.h" +#include "wx/strconv.h" +#include "wx/fontutil.h" // for wxNativeFontInfo (GetNativeFontInfo()) #include #include #include +#include "wx/math.h" -#include "gdk/gdk.h" -#include "gtk/gtk.h" -#include "gdk/gdkkeysyms.h" +#include "wx/gtk/private.h" +#include //----------------------------------------------------------------------------- // data //----------------------------------------------------------------------------- -extern bool g_blockEventsOnDrag; +extern wxCursor g_globalCursor; +extern wxWindowGTK *g_delayedFocus; + +// ---------------------------------------------------------------------------- +// helpers +// ---------------------------------------------------------------------------- + +extern "C" { +static void wxGtkOnRemoveTag(GtkTextBuffer *buffer, + GtkTextTag *tag, + GtkTextIter *start, + GtkTextIter *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); +} +} + +extern "C" { +static void wxGtkTextApplyTagsFromAttr(GtkTextBuffer *text_buffer, + const wxTextAttr& attr, + GtkTextIter *start, + GtkTextIter *end) +{ + static gchar buf[1024]; + GtkTextTag *tag; + + gulong remove_handler_id = g_signal_connect (text_buffer, "remove_tag", + G_CALLBACK (wxGtkOnRemoveTag), gpointer("WX")); + gtk_text_buffer_remove_all_tags(text_buffer, start, end); + g_signal_handler_disconnect (text_buffer, remove_handler_id); + + if (attr.HasFont()) + { + char *font_string; + PangoFontDescription *font_description = attr.GetFont().GetNativeFontInfo()->description; + font_string = pango_font_description_to_string(font_description); + g_snprintf(buf, sizeof(buf), "WXFONT %s", font_string); + 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); + g_free (font_string); + + if (attr.GetFont().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 (attr.HasTextColour()) + { + 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()) + { + 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); + + remove_handler_id = g_signal_connect (text_buffer, "remove_tag", + G_CALLBACK(wxGtkOnRemoveTag), + gpointer("WXALIGNMENT")); + gtk_text_buffer_remove_all_tags( text_buffer, ¶_start, ¶_end ); + g_signal_handler_disconnect (text_buffer, remove_handler_id); + + GtkJustification align; + switch (attr.GetAlignment()) + { + default: + align = GTK_JUSTIFY_LEFT; + break; + case wxTEXT_ALIGNMENT_RIGHT: + align = GTK_JUSTIFY_RIGHT; + break; + case wxTEXT_ALIGNMENT_CENTER: + align = GTK_JUSTIFY_CENTER; + break; + // gtk+ doesn't support justify as of gtk+-2.7.4 + } + + 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 ); + } +} +} + +extern "C" { +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_buffer, attr, &start, &iter); +} +} + +// ---------------------------------------------------------------------------- +// "insert_text" for GtkEntry +// ---------------------------------------------------------------------------- + +extern "C" { +static void +gtk_insert_text_callback(GtkEditable *editable, + const gchar *new_text, + gint new_text_length, + gint *position, + wxTextCtrl *win) +{ + if (g_isIdle) + wxapp_install_idle_handler(); + + // we should only be called if we have a max len limit at all + GtkEntry *entry = GTK_ENTRY (editable); + + wxCHECK_RET( entry->text_max_length, _T("shouldn't be called") ); + + // check that we don't overflow the max length limit + // + // FIXME: this doesn't work when we paste a string which is going to be + // truncated + if ( entry->text_length == entry->text_max_length ) + { + // we don't need to run the base class version at all + g_signal_stop_emission_by_name (editable, "insert_text"); + + // remember that the next changed signal is to be ignored to avoid + // generating a dummy wxEVT_COMMAND_TEXT_UPDATED event + win->IgnoreNextTextUpdate(); + + // and generate the correct one ourselves + wxCommandEvent event(wxEVT_COMMAND_TEXT_MAXLEN, win->GetId()); + event.SetEventObject(win); + event.SetString(win->GetValue()); + win->GetEventHandler()->ProcessEvent( event ); + } +} +} + +// Implementation of wxTE_AUTO_URL for wxGTK2 by Mart Raudsepp, + +extern "C" { +static void +au_apply_tag_callback(GtkTextBuffer *buffer, + GtkTextTag *tag, + GtkTextIter *start, + GtkTextIter *end, + gpointer 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 user_data) +{ + return g_unichar_isspace(ch); +} +} + +extern "C" { +static gboolean +pred_non_whitespace (gunichar ch, gpointer user_data) +{ + return !g_unichar_isspace(ch); +} +} + +extern "C" { +static gboolean +pred_nonpunct (gunichar ch, gpointer user_data) +{ + return !g_unichar_ispunct(ch); +} +} + +extern "C" { +static gboolean +pred_nonpunct_or_slash (gunichar ch, gpointer 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 *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); + + gchar* 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) && !strncasecmp(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 *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 *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); +} +} + //----------------------------------------------------------------------------- // "changed" //----------------------------------------------------------------------------- +extern "C" { static void -gtk_text_changed_callback( GtkWidget *WXUNUSED(widget), wxTextCtrl *win ) +gtk_text_changed_callback( GtkWidget *widget, wxTextCtrl *win ) { - win->SetModified(); + if ( win->IgnoreTextUpdate() ) + return; + + if (!win->m_hasVMT) return; - win->CalculateScrollbar(); + if (g_isIdle) + wxapp_install_idle_handler(); + + win->SetModified(); - wxCommandEvent event( wxEVT_COMMAND_TEXT_UPDATED, win->m_windowId ); - event.SetString( win->GetValue() ); + wxCommandEvent event( wxEVT_COMMAND_TEXT_UPDATED, win->GetId() ); event.SetEventObject( win ); win->GetEventHandler()->ProcessEvent( event ); } +} //----------------------------------------------------------------------------- -// "size_allocate" +// "expose_event" from scrolled window and textview //----------------------------------------------------------------------------- -static void -gtk_text_size_callback( GtkWidget *WXUNUSED(widget), GtkAllocation* WXUNUSED(alloc), wxTextCtrl *win ) +extern "C" { +static gboolean +gtk_text_exposed_callback( GtkWidget *widget, GdkEventExpose *event, wxTextCtrl *win ) { - win->CalculateScrollbar(); + return TRUE; +} } + //----------------------------------------------------------------------------- // wxTextCtrl //----------------------------------------------------------------------------- @@ -65,139 +480,158 @@ IMPLEMENT_DYNAMIC_CLASS(wxTextCtrl,wxControl) BEGIN_EVENT_TABLE(wxTextCtrl, wxControl) EVT_CHAR(wxTextCtrl::OnChar) + + 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) + + // 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() -#ifndef NO_TEXT_WINDOW_STREAM -wxTextCtrl::wxTextCtrl() : streambuf() +void wxTextCtrl::Init() { - if (allocate()) setp(base(),ebuf()); - - m_modified = FALSE; + m_ignoreNextUpdate = + m_modified = false; + SetUpdateFont(false); + m_text = + m_vScrollbar = (GtkWidget *)NULL; + m_frozenness = 0; + m_gdkHandCursor = NULL; + m_gdkXTermCursor = NULL; } -#else -wxTextCtrl::wxTextCtrl() + +wxTextCtrl::~wxTextCtrl() { - m_modified = FALSE; + if(m_gdkHandCursor) + gdk_cursor_unref(m_gdkHandCursor); + if(m_gdkXTermCursor) + gdk_cursor_unref(m_gdkXTermCursor); } -#endif -#ifndef NO_TEXT_WINDOW_STREAM -wxTextCtrl::wxTextCtrl( wxWindow *parent, wxWindowID id, const wxString &value, - const wxPoint &pos, const wxSize &size, - int style, const wxValidator& validator, const wxString &name ) : streambuf() +wxTextCtrl::wxTextCtrl( wxWindow *parent, + wxWindowID id, + const wxString &value, + const wxPoint &pos, + const wxSize &size, + long style, + const wxValidator& validator, + const wxString &name ) { - if (allocate()) setp(base(),ebuf()); + Init(); - m_modified = FALSE; - Create( parent, id, value, pos, size, style, validator, name ); -} -#else -wxTextCtrl::wxTextCtrl( wxWindow *parent, wxWindowID id, const wxString &value, - const wxPoint &pos, const wxSize &size, - int style, const wxValidator& validator, const wxString &name ) -{ - m_modified = FALSE; Create( parent, id, value, pos, size, style, validator, name ); } -#endif -bool wxTextCtrl::Create( wxWindow *parent, wxWindowID id, const wxString &value, - const wxPoint &pos, const wxSize &size, - int style, const wxValidator& validator, const wxString &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 ) { - m_needParent = TRUE; - m_acceptsFocus = TRUE; + m_needParent = true; + m_acceptsFocus = true; - PreCreation( parent, id, pos, size, style, name ); + if (!PreCreation( parent, pos, size ) || + !CreateBase( parent, id, pos, size, style, validator, name )) + { + wxFAIL_MSG( wxT("wxTextCtrl creation failed") ); + return false; + } - SetValidator( validator ); - m_vScrollbarVisible = TRUE; + m_vScrollbarVisible = false; bool multi_line = (style & wxTE_MULTILINE) != 0; - if ( multi_line ) - { - // a multi-line edit control: create a vertical scrollbar by default and - // horizontal if requested - bool bHasHScrollbar = (style & wxHSCROLL) != 0; - - // create our control... - m_text = gtk_text_new( (GtkAdjustment *) NULL, (GtkAdjustment *) NULL ); - // ... and put into the upper left hand corner of the table - m_widget = gtk_table_new(bHasHScrollbar ? 2 : 1, 2, FALSE); - GTK_WIDGET_UNSET_FLAGS( m_widget, GTK_CAN_FOCUS ); - - gtk_table_attach( GTK_TABLE(m_widget), m_text, 0, 1, 0, 1, - (GtkAttachOptions)(GTK_FILL | GTK_EXPAND | GTK_SHRINK), - (GtkAttachOptions)(GTK_FILL | GTK_EXPAND | GTK_SHRINK), - 0, 0); - - // put the horizontal scrollbar in the lower left hand corner - if (bHasHScrollbar) + if (multi_line) + { + // Create view + m_text = gtk_text_view_new(); + + m_buffer = gtk_text_view_get_buffer( GTK_TEXT_VIEW(m_text) ); + + // create scrolled window + m_widget = gtk_scrolled_window_new( NULL, NULL ); + gtk_scrolled_window_set_policy( GTK_SCROLLED_WINDOW( m_widget ), + GTK_POLICY_AUTOMATIC, GTK_POLICY_AUTOMATIC ); + + // Insert view into scrolled window + gtk_container_add( GTK_CONTAINER(m_widget), m_text ); + + // 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 { - GtkWidget *hscrollbar = gtk_hscrollbar_new(GTK_TEXT(m_text)->hadj); - GTK_WIDGET_UNSET_FLAGS( hscrollbar, GTK_CAN_FOCUS ); - - gtk_table_attach(GTK_TABLE(m_widget), hscrollbar, 0, 1, 1, 2, - (GtkAttachOptions)(GTK_EXPAND | GTK_FILL), - GTK_FILL, - 0, 0); - gtk_widget_show(hscrollbar); + // GTK_WRAP_WORD_CHAR seems to be new in GTK+ 2.4 +#ifdef __WXGTK24__ + if ( !gtk_check_version(2,4,0) ) + { + wrap = GTK_WRAP_WORD_CHAR; + } + else +#endif + wrap = GTK_WRAP_WORD; } - // finally, put the vertical scrollbar in the upper right corner - m_vScrollbar = gtk_vscrollbar_new( GTK_TEXT(m_text)->vadj ); - GTK_WIDGET_UNSET_FLAGS( m_vScrollbar, GTK_CAN_FOCUS ); - - gtk_table_attach(GTK_TABLE(m_widget), m_vScrollbar, 1, 2, 0, 1, - GTK_FILL, - (GtkAttachOptions)(GTK_EXPAND | GTK_FILL | GTK_SHRINK), - 0, 0); - gtk_widget_show( m_vScrollbar ); + gtk_text_view_set_wrap_mode( GTK_TEXT_VIEW( m_text ), wrap ); + + if (!HasFlag(wxNO_BORDER)) + gtk_scrolled_window_set_shadow_type( GTK_SCROLLED_WINDOW(m_widget), GTK_SHADOW_IN ); + + gtk_widget_add_events( GTK_WIDGET(m_text), GDK_ENTER_NOTIFY_MASK | GDK_LEAVE_NOTIFY_MASK ); - gtk_signal_connect( GTK_OBJECT(m_widget), "size_allocate", - GTK_SIGNAL_FUNC(gtk_text_size_callback), (gpointer)this ); + GTK_WIDGET_UNSET_FLAGS( m_widget, GTK_CAN_FOCUS ); } else { // a single-line text control: no need for scrollbars m_widget = - m_text = gtk_entry_new(); - } + m_text = 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 ); + if (style & wxNO_BORDER) + g_object_set( GTK_ENTRY(m_text), "has-frame", FALSE, NULL ); + } - m_parent->AddChild( this ); + m_parent->DoAddChild( this ); - (m_parent->m_insertCallback)( m_parent, this ); + m_focusWidget = m_text; - PostCreation(); + PostCreation(size); if (multi_line) { - gtk_widget_realize(m_text); gtk_widget_show(m_text); + SetVScrollAdjustment(gtk_scrolled_window_get_vadjustment((GtkScrolledWindow*)m_widget)); } - // we want to be notified about text changes - gtk_signal_connect( GTK_OBJECT(m_text), "changed", - GTK_SIGNAL_FUNC(gtk_text_changed_callback), (gpointer)this); - - if (!value.IsEmpty()) + if (!value.empty()) { - gint tmp = 0; - gtk_editable_insert_text( GTK_EDITABLE(m_text), value, value.Length(), &tmp ); - - if (multi_line) - { - /* bring editable's cursor uptodate. bug in GTK. */ - - GTK_EDITABLE(m_text)->current_pos = gtk_text_get_point( GTK_TEXT(m_text) ); - } + SetValue( value ); } if (style & wxTE_PASSWORD) @@ -209,725 +643,1107 @@ bool wxTextCtrl::Create( wxWindow *parent, wxWindowID id, const wxString &value, if (style & wxTE_READONLY) { if (!multi_line) - gtk_entry_set_editable( GTK_ENTRY(m_text), FALSE ); + gtk_editable_set_editable( GTK_EDITABLE(m_text), FALSE ); + else + gtk_text_view_set_editable( GTK_TEXT_VIEW( m_text), FALSE); + } + + if (multi_line) + { + if (style & wxTE_RIGHT) + gtk_text_view_set_justification( GTK_TEXT_VIEW(m_text), GTK_JUSTIFY_RIGHT ); + else if (style & wxTE_CENTRE) + gtk_text_view_set_justification( GTK_TEXT_VIEW(m_text), GTK_JUSTIFY_CENTER ); + // Left justify (alignment) is the default and we don't need to apply GTK_JUSTIFY_LEFT } else { - if (multi_line) - gtk_text_set_editable( GTK_TEXT(m_text), 1 ); +#ifdef __WXGTK24__ + // gtk_entry_set_alignment was introduced in gtk+-2.3.5 + if (!gtk_check_version(2,4,0)) + { + if (style & wxTE_RIGHT) + gtk_entry_set_alignment( GTK_ENTRY(m_text), 1.0 ); + else if (style & wxTE_CENTRE) + gtk_entry_set_alignment( GTK_ENTRY(m_text), 0.5 ); + } +#endif } - Show( TRUE ); + // We want to be notified about text changes. + if (multi_line) + { + g_signal_connect (m_buffer, "changed", + G_CALLBACK (gtk_text_changed_callback), this); - SetBackgroundColour( parent->GetBackgroundColour() ); - SetForegroundColour( parent->GetForegroundColour() ); + // .. and handle URLs on multi-line controls with wxTE_AUTO_URL style + if (style & wxTE_AUTO_URL) + { + GtkTextIter start, end; + m_gdkHandCursor = gdk_cursor_new(GDK_HAND2); + m_gdkXTermCursor = gdk_cursor_new(GDK_XTERM); + + // We create our wxUrl tag here for slight efficiency gain - we + // don't have to check for the tag existance 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 + { + g_signal_connect (m_text, "changed", + G_CALLBACK (gtk_text_changed_callback), this); + } - return TRUE; + m_cursor = wxCursor( wxCURSOR_IBEAM ); + + wxTextAttr attrDef(GetForegroundColour(), GetBackgroundColour(), GetFont()); + SetDefaultStyle( attrDef ); + + return true; } + void wxTextCtrl::CalculateScrollbar() { - if ((m_windowStyle & wxTE_MULTILINE) == 0) return; +} - GtkAdjustment *adj = GTK_TEXT(m_text)->vadj; +wxString wxTextCtrl::GetValue() const +{ + wxCHECK_MSG( m_text != NULL, wxEmptyString, wxT("invalid text ctrl") ); - if (adj->upper - adj->page_size < 0.8) + wxString tmp; + if (m_windowStyle & wxTE_MULTILINE) { - if (m_vScrollbarVisible) - { - gtk_widget_hide( m_vScrollbar ); + GtkTextIter start; + gtk_text_buffer_get_start_iter( m_buffer, &start ); + GtkTextIter end; + gtk_text_buffer_get_end_iter( m_buffer, &end ); + gchar *text = gtk_text_buffer_get_text( m_buffer, &start, &end, TRUE ); + +#if wxUSE_UNICODE + wxWCharBuffer buffer( wxConvUTF8.cMB2WX( text ) ); +#else + wxCharBuffer buffer( wxConvLocal.cWC2WX( wxConvUTF8.cMB2WC( text ) ) ); +#endif + if ( buffer ) + tmp = buffer; - m_vScrollbarVisible = FALSE; + g_free( text ); + } + else + { + tmp = wxGTK_CONV_BACK( gtk_entry_get_text( GTK_ENTRY(m_text) ) ); + } + + return tmp; +} + +void wxTextCtrl::SetValue( const wxString &value ) +{ + wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") ); + + if (m_windowStyle & wxTE_MULTILINE) + { +#if wxUSE_UNICODE + wxCharBuffer buffer( wxConvUTF8.cWX2MB( value) ); +#else + wxCharBuffer buffer( wxConvUTF8.cWC2MB( wxConvLocal.cWX2WC( value ) ) ); +#endif + if (gtk_text_buffer_get_char_count(m_buffer) != 0) + IgnoreNextTextUpdate(); + + if ( !buffer ) + { + // what else can we do? at least don't crash... + return; } + + gtk_text_buffer_set_text( m_buffer, buffer, strlen(buffer) ); } else { - if (!m_vScrollbarVisible) + gtk_entry_set_text( GTK_ENTRY(m_text), wxGTK_CONV( value ) ); + } + + // GRG, Jun/2000: Changed this after a lot of discussion in + // the lists. wxWidgets 2.2 will have a set of flags to + // customize this behaviour. + SetInsertionPoint(0); + + m_modified = false; +} + +void wxTextCtrl::WriteText( const wxString &text ) +{ + wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") ); + + if ( text.empty() ) + return; + + // gtk_text_changed_callback() will set m_modified to true but m_modified + // shouldn't be changed by the program writing to the text control itself, + // so save the old value and restore when we're done + bool oldModified = m_modified; + + if ( m_windowStyle & wxTE_MULTILINE ) + { +#if wxUSE_UNICODE + wxCharBuffer buffer( wxConvUTF8.cWX2MB( text ) ); +#else + wxCharBuffer buffer( wxConvUTF8.cWC2MB( wxConvLocal.cWX2WC( text ) ) ); +#endif + if ( !buffer ) + { + // what else can we do? at least don't crash... + return; + } + + // TODO: Call whatever is needed to delete the selection. + wxGtkTextInsert( m_text, m_buffer, m_defaultStyle, buffer ); + + GtkAdjustment *adj = gtk_scrolled_window_get_vadjustment( GTK_SCROLLED_WINDOW(m_widget) ); + // Scroll to cursor, but only if scrollbar thumb is at the very bottom + if ( wxIsSameDouble(adj->value, adj->upper - adj->page_size) ) + { + gtk_text_view_scroll_to_mark( GTK_TEXT_VIEW(m_text), + gtk_text_buffer_get_insert( m_buffer ), 0.0, FALSE, 0.0, 1.0 ); + } + } + else // single line + { + // First remove the selection if there is one + gtk_editable_delete_selection( GTK_EDITABLE(m_text) ); + + // This moves the cursor pos to behind the inserted text. + gint len = gtk_editable_get_position(GTK_EDITABLE(m_text)); + +#if wxUSE_UNICODE + wxCharBuffer buffer( wxConvUTF8.cWX2MB( text ) ); +#else + wxCharBuffer buffer( wxConvUTF8.cWC2MB( wxConvLocal.cWX2WC( text ) ) ); +#endif + if ( !buffer ) { - gtk_widget_show( m_vScrollbar ); + // what else can we do? at least don't crash... + return; + } + + gtk_editable_insert_text( GTK_EDITABLE(m_text), buffer, strlen(buffer), &len ); + + // Bring entry's cursor uptodate. + gtk_editable_set_position( GTK_EDITABLE(m_text), len ); + } + + m_modified = oldModified; +} + +void wxTextCtrl::AppendText( const wxString &text ) +{ + SetInsertionPointEnd(); + WriteText( text ); +} - m_vScrollbarVisible = TRUE; +wxString wxTextCtrl::GetLineText( long lineNo ) const +{ + if (m_windowStyle & wxTE_MULTILINE) + { + GtkTextIter line; + gtk_text_buffer_get_iter_at_line(m_buffer,&line,lineNo); + GtkTextIter end = line; + gtk_text_iter_forward_to_line_end(&end); + gchar *text = gtk_text_buffer_get_text(m_buffer,&line,&end,TRUE); + wxString result(wxGTK_CONV_BACK(text)); + g_free(text); + return result; + } + else + { + if (lineNo == 0) return GetValue(); + return wxEmptyString; + } +} + +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::PositionToXY(long pos, long *x, long *y ) const +{ + if ( m_windowStyle & wxTE_MULTILINE ) + { + GtkTextIter iter; + gtk_text_buffer_get_iter_at_offset(m_buffer, &iter, pos); + if (gtk_text_iter_is_end(&iter)) + return false; + + *y = gtk_text_iter_get_line(&iter); + *x = gtk_text_iter_get_line_offset(&iter); + } + else // single line control + { + if ( pos <= GTK_ENTRY(m_text)->text_length ) + { + *y = 0; + *x = pos; + } + else + { + // index out of bounds + return false; } } + + return true; } -wxString wxTextCtrl::GetValue() const +long wxTextCtrl::XYToPosition(long x, long y ) const { - wxCHECK_MSG( m_text != NULL, "", "invalid text ctrl" ); + if (!(m_windowStyle & wxTE_MULTILINE)) return 0; - wxString tmp; + GtkTextIter iter; + if (y >= gtk_text_buffer_get_line_count (m_buffer)) + return -1; + + 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 (m_windowStyle & wxTE_MULTILINE) { - gint len = gtk_text_get_length( GTK_TEXT(m_text) ); - char *text = gtk_editable_get_chars( GTK_EDITABLE(m_text), 0, len ); - tmp = text; - g_free( text ); + 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 { - tmp = gtk_entry_get_text( GTK_ENTRY(m_text) ); + wxString str = GetLineText (lineNo); + return (int) str.Length(); } - return tmp; } -void wxTextCtrl::SetValue( const wxString &value ) +int wxTextCtrl::GetNumberOfLines() const +{ + if ( m_windowStyle & wxTE_MULTILINE ) + { + GtkTextIter iter; + gtk_text_buffer_get_iter_at_offset( m_buffer, &iter, 0 ); + + // move forward by one display line until the end is reached + int lineCount = 1; + while ( gtk_text_view_forward_display_line(GTK_TEXT_VIEW(m_text), &iter) ) + { + lineCount++; + } + + // If the last character in the text buffer is a newline, + // gtk_text_view_forward_display_line() will return false without that + // line being counted. Must add one manually in that case. + GtkTextIter lastCharIter; + gtk_text_buffer_get_iter_at_offset + ( + m_buffer, + &lastCharIter, + gtk_text_buffer_get_char_count(m_buffer) - 1 + ); + gchar lastChar = gtk_text_iter_get_char( &lastCharIter ); + if ( lastChar == wxT('\n') ) + lineCount++; + + return lineCount; + } + else // single line + { + return 1; + } +} + +void wxTextCtrl::SetInsertionPoint( long pos ) { - wxCHECK_RET( m_text != NULL, "invalid text ctrl" ); + wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") ); - wxString tmp = ""; - if (!value.IsNull()) tmp = value; - if (m_windowStyle & wxTE_MULTILINE) + if ( IsMultiLine() ) { - gint len = gtk_text_get_length( GTK_TEXT(m_text) ); - gtk_editable_delete_text( GTK_EDITABLE(m_text), 0, len ); - len = 0; - gtk_editable_insert_text( GTK_EDITABLE(m_text), tmp, tmp.Length(), &len ); + GtkTextIter iter; + gtk_text_buffer_get_iter_at_offset( m_buffer, &iter, pos ); + gtk_text_buffer_place_cursor( m_buffer, &iter ); + gtk_text_view_scroll_mark_onscreen + ( + GTK_TEXT_VIEW(m_text), + gtk_text_buffer_get_insert( m_buffer ) + ); } else { - gtk_entry_set_text( GTK_ENTRY(m_text), tmp ); + // FIXME: Is the editable's cursor really uptodate without double set_position in GTK2? + gtk_editable_set_position(GTK_EDITABLE(m_text), int(pos)); } } -void wxTextCtrl::WriteText( const wxString &text ) +void wxTextCtrl::SetInsertionPointEnd() { - wxCHECK_RET( m_text != NULL, "invalid text ctrl" ); - - if (text.IsNull()) return; + wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") ); if (m_windowStyle & wxTE_MULTILINE) { - /* this moves the cursor pos to behind the inserted text */ - gint len = GTK_EDITABLE(m_text)->current_pos; - - gtk_editable_insert_text( GTK_EDITABLE(m_text), text, text.Length(), &len ); - - /* bring editable's cursor uptodate. bug in GTK. */ - GTK_EDITABLE(m_text)->current_pos = gtk_text_get_point( GTK_TEXT(m_text) ); + GtkTextIter end; + gtk_text_buffer_get_end_iter( m_buffer, &end ); + gtk_text_buffer_place_cursor( m_buffer, &end ); } else { - /* this moves the cursor pos to behind the inserted text */ - gint len = GTK_EDITABLE(m_text)->current_pos; - gtk_editable_insert_text( GTK_EDITABLE(m_text), text, text.Length(), &len ); - - /* bring editable's cursor uptodate. bug in GTK. */ - GTK_EDITABLE(m_text)->current_pos += text.Len(); - - /* bring entry's cursor uptodate. bug in GTK. */ - gtk_entry_set_position( GTK_ENTRY(m_text), GTK_EDITABLE(m_text)->current_pos ); + gtk_editable_set_position( GTK_EDITABLE(m_text), -1 ); } } -void wxTextCtrl::AppendText( const wxString &text ) +void wxTextCtrl::SetEditable( bool editable ) { - wxCHECK_RET( m_text != NULL, "invalid text ctrl" ); + wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") ); if (m_windowStyle & wxTE_MULTILINE) { - /* we'll insert at the last position */ - gint len = gtk_text_get_length( GTK_TEXT(m_text) ); - gtk_editable_insert_text( GTK_EDITABLE(m_text), text, text.Length(), &len ); - - /* bring editable's cursor uptodate. bug in GTK. */ - GTK_EDITABLE(m_text)->current_pos = gtk_text_get_point( GTK_TEXT(m_text) ); + gtk_text_view_set_editable( GTK_TEXT_VIEW(m_text), editable ); } else { - gtk_entry_append_text( GTK_ENTRY(m_text), text ); + gtk_editable_set_editable( GTK_EDITABLE(m_text), editable ); } } -bool wxTextCtrl::LoadFile( const wxString &file ) +bool wxTextCtrl::Enable( bool enable ) { - wxCHECK_MSG( m_text != NULL, FALSE, "invalid text ctrl" ); - - if (!wxFileExists(file)) return FALSE; - - Clear(); - - FILE *fp = (FILE*) NULL; - struct stat statb; - - if ((stat ((char*) (const char*) file, &statb) == -1) || (statb.st_mode & S_IFMT) != S_IFREG || - !(fp = fopen ((char*) (const char*) file, "r"))) - { - return FALSE; - } - else - { - gint len = statb.st_size; - char *text; - if (!(text = (char*)malloc ((unsigned) (len + 1)))) - { - fclose (fp); - return FALSE; - } - if (fread (text, sizeof (char), len, fp) != (size_t) len) + if (!wxWindowBase::Enable(enable)) { + // nothing to do + return false; } - fclose (fp); - - text[len] = 0; if (m_windowStyle & wxTE_MULTILINE) { - gint pos = 0; - gtk_editable_insert_text( GTK_EDITABLE(m_text), text, len, &pos ); + SetEditable( enable ); } else { - gtk_entry_set_text( GTK_ENTRY(m_text), text ); + gtk_widget_set_sensitive( m_text, enable ); } - free (text); - m_modified = FALSE; - return TRUE; - } - return FALSE; + return true; } -bool wxTextCtrl::SaveFile( const wxString &file ) +// wxGTK-specific: called recursively by Enable, +// to give widgets an oppprtunity to correct their colours after they +// have been changed by Enable +void wxTextCtrl::OnParentEnable( bool enable ) { - wxCHECK_MSG( m_text != NULL, FALSE, "invalid text ctrl" ); - - if (file == "") return FALSE; - - FILE *fp; - - if (!(fp = fopen ((char*) (const char*) file, "w"))) - { - return FALSE; - } - else + // 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.Ok()) { - char *text = (char*) NULL; - gint len = 0; - - if (m_windowStyle & wxTE_MULTILINE) - { - len = gtk_text_get_length( GTK_TEXT(m_text) ); - text = gtk_editable_get_chars( GTK_EDITABLE(m_text), 0, len ); - } - else - { - text = gtk_entry_get_text( GTK_ENTRY(m_text) ); - } - - if (fwrite (text, sizeof (char), len, fp) != (size_t) len) - { - // Did not write whole file - } - - // Make sure newline terminates the file - if (text[len - 1] != '\n') - fputc ('\n', fp); - - fclose (fp); - - if (m_windowStyle & wxTE_MULTILINE) g_free( text ); - - m_modified = FALSE; - return TRUE; + // Need to set twice or it'll optimize the useful stuff out + if (oldColour == * wxWHITE) + SetBackgroundColour(*wxBLACK); + else + SetBackgroundColour(*wxWHITE); + SetBackgroundColour(oldColour); } - - return TRUE; } -wxString wxTextCtrl::GetLineText( long lineNo ) const +void wxTextCtrl::MarkDirty() { - if (m_windowStyle & wxTE_MULTILINE) - { - gint len = gtk_text_get_length( GTK_TEXT(m_text) ); - char *text = gtk_editable_get_chars( GTK_EDITABLE(m_text), 0, len ); - - if (text) - { - wxString buf(""); - long i; - int currentLine = 0; - for (i = 0; currentLine != lineNo && text[i]; i++ ) - if (text[i] == '\n') - currentLine++; - // Now get the text - int j; - for (j = 0; text[i] && text[i] != '\n'; i++, j++ ) - buf += text[i]; + m_modified = true; +} - g_free( text ); - return buf; - } - else - return wxEmptyString; - } - else - { - if (lineNo == 0) return GetValue(); - return wxEmptyString; - } +void wxTextCtrl::DiscardEdits() +{ + m_modified = false; } -void wxTextCtrl::OnDropFiles( wxDropFilesEvent &WXUNUSED(event) ) +// ---------------------------------------------------------------------------- +// max text length support +// ---------------------------------------------------------------------------- + +void wxTextCtrl::IgnoreNextTextUpdate() { - /* If you implement this, don't forget to update the documentation! - * (file docs/latex/wx/text.tex) */ - wxFAIL_MSG( "wxTextCtrl::OnDropFiles not implemented" ); + m_ignoreNextUpdate = true; } -long wxTextCtrl::PositionToXY(long pos, long *x, long *y ) const +bool wxTextCtrl::IgnoreTextUpdate() { - if ( m_windowStyle & wxTE_MULTILINE ) + if ( m_ignoreNextUpdate ) { - wxString text = GetValue(); + m_ignoreNextUpdate = false; - // cast to prevent warning. But pos really should've been unsigned. - if( (unsigned long)pos > text.Len() ) - return FALSE; + return true; + } - *x=0; // First Col - *y=0; // First Line + return false; +} - const char* stop = text.c_str() + pos; - for ( const char *p = text.c_str(); p < stop; p++ ) - { - if (*p == '\n') - { - (*y)++; - *x=0; - } - else - (*x)++; - } - } - else // single line control +void wxTextCtrl::SetMaxLength(unsigned long len) +{ + if ( !HasFlag(wxTE_MULTILINE) ) { - if ( pos <= GTK_ENTRY(m_text)->text_length ) + gtk_entry_set_max_length(GTK_ENTRY(m_text), len); + + // there is a bug in GTK+ 1.2.x: "changed" signal is emitted even if + // we had tried to enter more text than allowed by max text length and + // the text wasn't really changed + // + // to detect this and generate TEXT_MAXLEN event instead of + // TEXT_CHANGED one in this case we also catch "insert_text" signal + // + // when max len is set to 0 we disconnect our handler as it means that + // we shouldn't check anything any more + if ( len ) { - *y = 0; - *x = pos; + g_signal_connect (m_text, "insert_text", + G_CALLBACK (gtk_insert_text_callback), this); } - else + else // no checking { - // index out of bounds - return FALSE; + g_signal_handlers_disconnect_by_func (m_text, + (gpointer) gtk_insert_text_callback, this); } } - - return TRUE; } -long wxTextCtrl::XYToPosition(long x, long y ) const +void wxTextCtrl::SetSelection( long from, long to ) { - if (!(m_windowStyle & wxTE_MULTILINE)) return 0; + wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") ); - long pos=0; - for( int i=0; icurrent_pos = gtk_text_get_point( GTK_TEXT(m_text) ); - } - else + if (m_windowStyle & wxTE_MULTILINE) { - gtk_entry_set_position( GTK_ENTRY(m_text), (int)pos ); - - /* bring editable's cursor uptodate. bug in GTK. */ - - GTK_EDITABLE(m_text)->current_pos = pos; + GtkTextIter iter; + gtk_text_buffer_get_start_iter( m_buffer, &iter ); + gtk_text_iter_set_offset( &iter, pos ); + GtkTextMark *mark = gtk_text_buffer_create_mark( m_buffer, NULL, &iter, TRUE ); + gtk_text_view_scroll_to_mark( GTK_TEXT_VIEW(m_text), mark, 0.0, FALSE, 0.0, 0.0 ); } } -void wxTextCtrl::SetInsertionPointEnd() +wxTextCtrlHitTestResult +wxTextCtrl::HitTest(const wxPoint& pt, long *pos) const { - wxCHECK_RET( m_text != NULL, "invalid text ctrl" ); + if ( !IsMultiLine() ) + { + // not supported + return wxTE_HT_UNKNOWN; + } - if (m_windowStyle & wxTE_MULTILINE) - SetInsertionPoint(gtk_text_get_length(GTK_TEXT(m_text))); - else - gtk_entry_set_position( GTK_ENTRY(m_text), -1 ); + 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); + + return wxTE_HT_ON_TEXT; } -void wxTextCtrl::SetEditable( bool editable ) +long wxTextCtrl::GetInsertionPoint() const { - wxCHECK_RET( m_text != NULL, "invalid text ctrl" ); + wxCHECK_MSG( m_text != NULL, 0, wxT("invalid text ctrl") ); if (m_windowStyle & wxTE_MULTILINE) - gtk_text_set_editable( GTK_TEXT(m_text), editable ); - else - gtk_entry_set_editable( GTK_ENTRY(m_text), editable ); -} - -void wxTextCtrl::SetSelection( long from, long to ) -{ - wxCHECK_RET( m_text != NULL, "invalid text ctrl" ); - - gtk_editable_select_region( GTK_EDITABLE(m_text), (gint)from, (gint)to ); -} - -void wxTextCtrl::ShowPosition( long WXUNUSED(pos) ) -{ - wxFAIL_MSG( "wxTextCtrl::ShowPosition not implemented" ); -} + { + // There is no direct accessor for the cursor, but + // internally, the cursor is the "mark" called + // "insert" in the text view's btree structure. -long wxTextCtrl::GetInsertionPoint() const -{ - wxCHECK_MSG( m_text != NULL, 0, "invalid text ctrl" ); + GtkTextMark *mark = gtk_text_buffer_get_insert( m_buffer ); + GtkTextIter cursor; + gtk_text_buffer_get_iter_at_mark( m_buffer, &cursor, mark ); - return (long) GTK_EDITABLE(m_text)->current_pos; + return gtk_text_iter_get_offset( &cursor ); + } + else + { + return (long) gtk_editable_get_position(GTK_EDITABLE(m_text)); + } } -long wxTextCtrl::GetLastPosition() const +wxTextPos wxTextCtrl::GetLastPosition() const { - wxCHECK_MSG( m_text != NULL, 0, "invalid text ctrl" ); + wxCHECK_MSG( m_text != NULL, 0, wxT("invalid text ctrl") ); int pos = 0; + if (m_windowStyle & wxTE_MULTILINE) - pos = gtk_text_get_length( GTK_TEXT(m_text) ); + { + GtkTextIter end; + gtk_text_buffer_get_end_iter( m_buffer, &end ); + + pos = gtk_text_iter_get_offset( &end ); + } else + { pos = GTK_ENTRY(m_text)->text_length; + } return (long)pos; } void wxTextCtrl::Remove( long from, long to ) { - wxCHECK_RET( m_text != NULL, "invalid text ctrl" ); + wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") ); + + if (m_windowStyle & wxTE_MULTILINE) + { + 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_editable_delete_text( GTK_EDITABLE(m_text), (gint)from, (gint)to ); + gtk_text_buffer_delete( m_buffer, &fromi, &toi ); + } + else // single line + gtk_editable_delete_text( GTK_EDITABLE(m_text), (gint)from, (gint)to ); } void wxTextCtrl::Replace( long from, long to, const wxString &value ) { - wxCHECK_RET( m_text != NULL, "invalid text ctrl" ); + wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") ); + + Remove( from, to ); - gtk_editable_delete_text( GTK_EDITABLE(m_text), (gint)from, (gint)to ); - if (value.IsNull()) return; - gint pos = (gint)from; - gtk_editable_insert_text( GTK_EDITABLE(m_text), value, value.Length(), &pos ); + if (!value.empty()) + { + SetInsertionPoint( from ); + WriteText( value ); + } } void wxTextCtrl::Cut() { - wxCHECK_RET( m_text != NULL, "invalid text ctrl" ); + wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") ); -#if (GTK_MINOR_VERSION > 0) - gtk_editable_cut_clipboard( GTK_EDITABLE(m_text) ); -#else - gtk_editable_cut_clipboard( GTK_EDITABLE(m_text), 0 ); -#endif + if (m_windowStyle & wxTE_MULTILINE) + g_signal_emit_by_name (m_text, "cut-clipboard"); + else + gtk_editable_cut_clipboard(GTK_EDITABLE(m_text)); } void wxTextCtrl::Copy() { - wxCHECK_RET( m_text != NULL, "invalid text ctrl" ); + wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") ); -#if (GTK_MINOR_VERSION > 0) - gtk_editable_copy_clipboard( GTK_EDITABLE(m_text) ); -#else - gtk_editable_copy_clipboard( GTK_EDITABLE(m_text), 0 ); -#endif + if (m_windowStyle & wxTE_MULTILINE) + g_signal_emit_by_name (m_text, "copy-clipboard"); + else + gtk_editable_copy_clipboard(GTK_EDITABLE(m_text)); } void wxTextCtrl::Paste() { - wxCHECK_RET( m_text != NULL, "invalid text ctrl" ); + wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") ); -#if (GTK_MINOR_VERSION > 0) - gtk_editable_paste_clipboard( GTK_EDITABLE(m_text) ); -#else - gtk_editable_paste_clipboard( GTK_EDITABLE(m_text), 0 ); -#endif -} - -bool wxTextCtrl::CanCopy() const -{ - // Can copy if there's a selection - long from, to; - GetSelection(& from, & to); - return (from != to) ; -} - -bool wxTextCtrl::CanCut() const -{ - // Can cut if there's a selection - long from, to; - GetSelection(& from, & to); - return (from != to) ; -} - -bool wxTextCtrl::CanPaste() const -{ - return IsEditable() ; + if (m_windowStyle & wxTE_MULTILINE) + g_signal_emit_by_name (m_text, "paste-clipboard"); + else + gtk_editable_paste_clipboard(GTK_EDITABLE(m_text)); } // Undo/redo void wxTextCtrl::Undo() { // TODO - wxFAIL_MSG( "wxTextCtrl::Undo not implemented" ); + wxFAIL_MSG( wxT("wxTextCtrl::Undo not implemented") ); } void wxTextCtrl::Redo() { // TODO - wxFAIL_MSG( "wxTextCtrl::Redo not implemented" ); + wxFAIL_MSG( wxT("wxTextCtrl::Redo not implemented") ); } bool wxTextCtrl::CanUndo() const { // TODO - wxFAIL_MSG( "wxTextCtrl::CanUndo not implemented" ); - return FALSE; + //wxFAIL_MSG( wxT("wxTextCtrl::CanUndo not implemented") ); + return false; } bool wxTextCtrl::CanRedo() const { // TODO - wxFAIL_MSG( "wxTextCtrl::CanRedo not implemented" ); - return FALSE; + //wxFAIL_MSG( wxT("wxTextCtrl::CanRedo not implemented") ); + return false; } // If the return values from and to are the same, there is no // selection. -void wxTextCtrl::GetSelection(long* from, long* to) const +void wxTextCtrl::GetSelection(long* fromOut, long* toOut) const { - // TODO - *from = 0; - *to = 0; - wxFAIL_MSG( "wxTextCtrl::GetSelection not implemented" ); + wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") ); + + gint from = -1; + gint to = -1; + bool haveSelection = false; + + if (m_windowStyle & wxTE_MULTILINE) + { + GtkTextIter ifrom, ito; + if ( gtk_text_buffer_get_selection_bounds(m_buffer, &ifrom, &ito) ) + { + haveSelection = true; + from = gtk_text_iter_get_offset(&ifrom); + to = gtk_text_iter_get_offset(&ito); + } + } + else // not multi-line + { + if ( gtk_editable_get_selection_bounds( GTK_EDITABLE(m_text), + &from, &to) ) + { + haveSelection = true; + } + } + + if (! haveSelection ) + from = to = GetInsertionPoint(); + + if ( from > to ) + { + // exchange them to be compatible with wxMSW + gint tmp = from; + from = to; + to = tmp; + } + + if ( fromOut ) + *fromOut = from; + if ( toOut ) + *toOut = to; } + bool wxTextCtrl::IsEditable() const { - // TODO - wxFAIL_MSG( "wxTextCtrl::IsEditable not implemented" ); - return FALSE; + wxCHECK_MSG( m_text != NULL, false, wxT("invalid text ctrl") ); + + if (m_windowStyle & wxTE_MULTILINE) + { + return gtk_text_view_get_editable(GTK_TEXT_VIEW(m_text)); + } + else + { + return gtk_editable_get_editable(GTK_EDITABLE(m_text)); + } +} + +bool wxTextCtrl::IsModified() const +{ + return m_modified; } void wxTextCtrl::Clear() { - SetValue( "" ); + SetValue( wxEmptyString ); } void wxTextCtrl::OnChar( wxKeyEvent &key_event ) { - wxCHECK_RET( m_text != NULL, "invalid text ctrl" ); + wxCHECK_RET( m_text != NULL, wxT("invalid text ctrl") ); - if ((key_event.KeyCode() == WXK_RETURN) && (m_windowStyle & wxPROCESS_ENTER)) + if ((key_event.GetKeyCode() == WXK_RETURN) && (m_windowStyle & wxPROCESS_ENTER)) { wxCommandEvent event(wxEVT_COMMAND_TEXT_ENTER, m_windowId); event.SetEventObject(this); + event.SetString(GetValue()); if (GetEventHandler()->ProcessEvent(event)) return; } + if ((key_event.GetKeyCode() == WXK_RETURN) && !(m_windowStyle & wxTE_MULTILINE)) + { + // This will invoke the dialog default action, such + // as the clicking the default button. + + wxWindow *top_frame = m_parent; + while (top_frame->GetParent() && !(top_frame->IsTopLevel())) + top_frame = top_frame->GetParent(); + + if (top_frame && GTK_IS_WINDOW(top_frame->m_widget)) + { + GtkWindow *window = GTK_WINDOW(top_frame->m_widget); + + if (window->default_widget) + { + gtk_widget_activate (window->default_widget); + return; + } + } + } + key_event.Skip(); } -#ifndef NO_TEXT_WINDOW_STREAM -int wxTextCtrl::overflow( int WXUNUSED(c) ) +GtkWidget* wxTextCtrl::GetConnectWidget() +{ + return GTK_WIDGET(m_text); +} + +bool wxTextCtrl::IsOwnGtkWindow( GdkWindow *window ) { - 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; + if (m_windowStyle & wxTE_MULTILINE) + { + return window == gtk_text_view_get_window( GTK_TEXT_VIEW( m_text ), GTK_TEXT_WINDOW_TEXT ); // pure guesswork + } + else + { + return (window == GTK_ENTRY(m_text)->text_area); + } } -int wxTextCtrl::sync() +// the font will change for subsequent text insertiongs +bool wxTextCtrl::SetFont( const wxFont &font ) { - 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; + wxCHECK_MSG( m_text != NULL, false, wxT("invalid text ctrl") ); + + if ( !wxTextCtrlBase::SetFont(font) ) + { + // font didn't change, nothing to do + return false; + } + + if ( m_windowStyle & wxTE_MULTILINE ) + { + SetUpdateFont(true); + + m_defaultStyle.SetFont(font); + + ChangeFontGlobally(); + } + + return true; } -int wxTextCtrl::underflow() +void wxTextCtrl::ChangeFontGlobally() { - return EOF; + // 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( (m_windowStyle & wxTE_MULTILINE), + _T("shouldn't be called for single line controls") ); + + wxString value = GetValue(); + if ( !value.empty() ) + { + SetUpdateFont(false); + + Clear(); + AppendText(value); + } } -wxTextCtrl& wxTextCtrl::operator<<(const wxString& s) +bool wxTextCtrl::SetForegroundColour(const wxColour& colour) { - AppendText(s); - return *this; + if ( !wxControl::SetForegroundColour(colour) ) + return false; + + // update default fg colour too + m_defaultStyle.SetTextColour(colour); + + return true; } -wxTextCtrl& wxTextCtrl::operator<<(float f) +bool wxTextCtrl::SetBackgroundColour( const wxColour &colour ) { - static char buf[100]; - sprintf(buf, "%.2f", f); - AppendText(buf); - return *this; + wxCHECK_MSG( m_text != NULL, false, wxT("invalid text ctrl") ); + + if ( !wxControl::SetBackgroundColour( colour ) ) + return false; + + if (!m_backgroundColour.Ok()) + return false; + + // change active background color too + m_defaultStyle.SetBackgroundColour( colour ); + + return true; } -wxTextCtrl& wxTextCtrl::operator<<(double d) +bool wxTextCtrl::SetStyle( long start, long end, const wxTextAttr& style ) { - static char buf[100]; - sprintf(buf, "%.2f", d); - AppendText(buf); - return *this; + if ( m_windowStyle & wxTE_MULTILINE ) + { + if ( style.IsDefault() ) + { + // nothing to do + return true; + } + + gint l = gtk_text_buffer_get_char_count( m_buffer ); + + wxCHECK_MSG( start >= 0 && end <= l, false, + _T("invalid range in wxTextCtrl::SetStyle") ); + + 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 ); + + // use the attributes from style which are set in it and fall back + // first to the default style and then to the text control default + // colours for the others + wxTextAttr attr = wxTextAttr::Combine(style, m_defaultStyle, this); + + wxGtkTextApplyTagsFromAttr( m_buffer, attr, &starti, &endi ); + + return true; + } + + // else single line + // cannot do this for GTK+'s Entry widget + return false; } -wxTextCtrl& wxTextCtrl::operator<<(int i) +void wxTextCtrl::DoApplyWidgetStyle(GtkRcStyle *style) { - static char buf[100]; - sprintf(buf, "%i", i); - AppendText(buf); - return *this; + gtk_widget_modify_style(m_text, style); } -wxTextCtrl& wxTextCtrl::operator<<(long i) +void wxTextCtrl::OnCut(wxCommandEvent& WXUNUSED(event)) { - static char buf[100]; - sprintf(buf, "%ld", i); - AppendText(buf); - return *this; + Cut(); } -wxTextCtrl& wxTextCtrl::operator<<(const char c) +void wxTextCtrl::OnCopy(wxCommandEvent& WXUNUSED(event)) { - char buf[2]; + Copy(); +} - buf[0] = c; - buf[1] = 0; - AppendText(buf); - return *this; +void wxTextCtrl::OnPaste(wxCommandEvent& WXUNUSED(event)) +{ + Paste(); } -#endif -GtkWidget* wxTextCtrl::GetConnectWidget() +void wxTextCtrl::OnUndo(wxCommandEvent& WXUNUSED(event)) { - return GTK_WIDGET(m_text); + Undo(); } -bool wxTextCtrl::IsOwnGtkWindow( GdkWindow *window ) +void wxTextCtrl::OnRedo(wxCommandEvent& WXUNUSED(event)) { - if (m_windowStyle & wxTE_MULTILINE) - return (window == GTK_TEXT(m_text)->text_area); - else - return (window == GTK_ENTRY(m_text)->text_area); + Redo(); } -void wxTextCtrl::SetFont( const wxFont &WXUNUSED(font) ) +void wxTextCtrl::OnUpdateCut(wxUpdateUIEvent& event) { - wxCHECK_RET( m_text != NULL, "invalid text ctrl" ); + event.Enable( CanCut() ); +} - // doesn't work +void wxTextCtrl::OnUpdateCopy(wxUpdateUIEvent& event) +{ + event.Enable( CanCopy() ); } -void wxTextCtrl::SetForegroundColour( const wxColour &WXUNUSED(colour) ) +void wxTextCtrl::OnUpdatePaste(wxUpdateUIEvent& event) { - wxCHECK_RET( m_text != NULL, "invalid text ctrl" ); + event.Enable( CanPaste() ); +} - // doesn't work +void wxTextCtrl::OnUpdateUndo(wxUpdateUIEvent& event) +{ + event.Enable( CanUndo() ); } -void wxTextCtrl::SetBackgroundColour( const wxColour &colour ) +void wxTextCtrl::OnUpdateRedo(wxUpdateUIEvent& event) { - wxCHECK_RET( m_text != NULL, "invalid text ctrl" ); + event.Enable( CanRedo() ); +} - wxControl::SetBackgroundColour( colour ); +void wxTextCtrl::OnInternalIdle() +{ + wxCursor cursor = m_cursor; + if (g_globalCursor.Ok()) cursor = g_globalCursor; - wxColour sysbg = wxSystemSettings::GetSystemColour( wxSYS_COLOUR_BTNFACE ); - if (sysbg.Red() == colour.Red() && - sysbg.Green() == colour.Green() && - sysbg.Blue() == colour.Blue()) + if (g_delayedFocus == this) { - return; + if (GTK_WIDGET_REALIZED(m_widget)) + { + gtk_widget_grab_focus( m_widget ); + g_delayedFocus = NULL; + } } - if (!m_backgroundColour.Ok()) return; + if (wxUpdateUIEvent::CanUpdate(this)) + UpdateWindowUI(wxUPDATE_UI_FROMIDLE); +} - if (m_windowStyle & wxTE_MULTILINE) +wxSize wxTextCtrl::DoGetBestSize() const +{ + // 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::Freeze() +{ + if ( HasFlag(wxTE_MULTILINE) ) { - GdkWindow *window = GTK_TEXT(m_text)->text_area; - m_backgroundColour.CalcPixel( gdk_window_get_colormap( window ) ); - gdk_window_set_background( window, m_backgroundColour.GetColor() ); - gdk_window_clear( window ); + if ( !m_frozenness++ ) + { + // freeze textview updates and remove buffer + g_signal_connect (m_text, "expose_event", + G_CALLBACK (gtk_text_exposed_callback), this); + g_signal_connect (m_widget, "expose_event", + G_CALLBACK (gtk_text_exposed_callback), this); + gtk_widget_set_sensitive(m_widget, false); + g_object_ref(m_buffer); + gtk_text_view_set_buffer(GTK_TEXT_VIEW(m_text), gtk_text_buffer_new(NULL)); + } } } -void wxTextCtrl::ApplyWidgetStyle() +void wxTextCtrl::Thaw() { - if (m_windowStyle & wxTE_MULTILINE) + if ( HasFlag(wxTE_MULTILINE) ) { - // how ? + wxASSERT_MSG( m_frozenness > 0, _T("Thaw() without matching Freeze()") ); + + if ( !--m_frozenness ) + { + // Reattach buffer and thaw textview updates + gtk_text_view_set_buffer(GTK_TEXT_VIEW(m_text), m_buffer); + g_object_unref(m_buffer); + gtk_widget_set_sensitive(m_widget, true); + g_signal_handlers_disconnect_by_func (m_widget, + (gpointer) gtk_text_exposed_callback, this); + g_signal_handlers_disconnect_by_func (m_text, + (gpointer) gtk_text_exposed_callback, this); + } } - else +} + +// ---------------------------------------------------------------------------- +// 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) +{ + event.Skip(); + if(!(m_windowStyle & 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)) { - SetWidgetStyle(); - gtk_widget_set_style( m_text, m_widgetStyle ); + gdk_window_set_cursor(gtk_text_view_get_window(GTK_TEXT_VIEW(m_text), + GTK_TEXT_WINDOW_TEXT), m_gdkXTermCursor); + return; } + + gdk_window_set_cursor(gtk_text_view_get_window(GTK_TEXT_VIEW(m_text), + GTK_TEXT_WINDOW_TEXT), m_gdkHandCursor); + + 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 dependant 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(!GetEventHandler()->ProcessEvent(url_event)); + GetEventHandler()->ProcessEvent(url_event); } +// static +wxVisualAttributes +wxTextCtrl::GetClassDefaultAttributes(wxWindowVariant WXUNUSED(variant)) +{ + return GetDefaultAttributesFromGTKWidget(gtk_entry_new, true); +}