X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/c801d85f158c4cba50b588807daabdcbd0ed3853..aaf37267a8d038f61f06c4a12d16bf3df38fc3be:/src/gtk/slider.cpp

diff --git a/src/gtk/slider.cpp b/src/gtk/slider.cpp
index 891fcf61f9..b2a24b3640 100644
--- a/src/gtk/slider.cpp
+++ b/src/gtk/slider.cpp
@@ -1,247 +1,424 @@
 /////////////////////////////////////////////////////////////////////////////
-// Name:        slider.cpp
+// Name:        src/gtk/slider.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
+// Licence:     wxWindows licence
 /////////////////////////////////////////////////////////////////////////////
 
+// For compilers that support precompilation, includes "wx.h".
+#include "wx/wxprec.h"
 
-#ifdef __GNUG__
-#pragma implementation "slider.h"
-#endif
+#if wxUSE_SLIDER
 
 #include "wx/slider.h"
-#include "wx/utils.h"
+
+#ifndef WX_PRECOMP
+    #include "wx/utils.h"
+    #include "wx/math.h"
+#endif
+
+#include <gtk/gtk.h>
 
 //-----------------------------------------------------------------------------
-// wxSlider
+// data
 //-----------------------------------------------------------------------------
 
-void gtk_slider_callback( GtkWidget *WXUNUSED(widget), wxSlider *win )
-{ 
-/*
-  printf( "OnScroll from " );
-  if (win->GetClassInfo() && win->GetClassInfo()->GetClassName())
-    printf( win->GetClassInfo()->GetClassName() );
-  printf( ".\n" );
-*/
-  
-  if (!win->HasVMT()) return;
-    
-  float diff = win->m_adjust->value - win->m_oldPos;
-  if (fabs(diff) < 0.2) return;
-  
-  int command = 0;
-  
-  float line_step = win->m_adjust->step_increment;
-  float page_step = win->m_adjust->page_increment;
-  
-  if (fabs(diff-line_step) < 0.2) command = wxEVT_SCROLL_LINEDOWN;
-  else if (fabs(diff+line_step) < 0.2) command = wxEVT_SCROLL_LINEUP;
-  else if (fabs(diff-page_step) < 0.2) command = wxEVT_SCROLL_PAGEDOWN;
-  else if (fabs(diff+page_step) < 0.2) command = wxEVT_SCROLL_PAGEUP;
-  else command = wxEVT_SCROLL_THUMBTRACK;
-
-  int value = (int)(win->m_adjust->value+0.5);
-      
-  int orient = wxHORIZONTAL;
-  if (win->GetWindowStyleFlag() & wxSB_VERTICAL == wxSB_VERTICAL) orient = wxHORIZONTAL;
-  
-  wxScrollEvent event( command, win->GetId(), value, orient );
-  event.SetEventObject( win );
-  win->ProcessEvent( event );
-  
-  wxCommandEvent cevent( wxEVT_COMMAND_SLIDER_UPDATED, win->GetId() );
-  cevent.SetEventObject( win );
-  win->ProcessEvent( cevent );
-};
+extern bool g_blockEventsOnDrag;
 
-IMPLEMENT_DYNAMIC_CLASS(wxSlider,wxControl)
+// ----------------------------------------------------------------------------
+// helper functions
+// ----------------------------------------------------------------------------
 
-wxSlider::wxSlider(void)
-{
-};
-
-wxSlider::wxSlider( wxWindow *parent, const wxWindowID id,
-        const int value, const int minValue, const int maxValue,
-        const wxPoint& pos, const wxSize& size,
-        const long style,
-/*      const wxValidator& validator = wxDefaultValidator, */
-        const wxString& name )
-{
-  Create( parent, id, value, minValue, maxValue,
-          pos, size, style, name );
-};
-
-wxSlider::~wxSlider(void)
-{
-};
-
-bool wxSlider::Create(wxWindow *parent, const wxWindowID id,
-        const int value, const int minValue, const int maxValue,
-        const wxPoint& pos, const wxSize& size,
-        const long style,
-/*      const wxValidator& validator = wxDefaultValidator, */
-        const wxString& name )
+// process a scroll event
+static void
+ProcessScrollEvent(wxSlider *win, wxEventType evtType)
 {
-  m_needParent = TRUE;
-  
-  PreCreation( parent, id, pos, size, style, name );
-  
-  m_oldPos = 0.0;
+    const int orient = win->HasFlag(wxSL_VERTICAL) ? wxVERTICAL
+                                                   : wxHORIZONTAL;
+
+    const int value = win->GetValue();
+
+    // if we have any "special" event (i.e. the value changed by a line or a
+    // page), send this specific event first
+    if ( evtType != wxEVT_NULL )
+    {
+        wxScrollEvent event( evtType, win->GetId(), value, orient );
+        event.SetEventObject( win );
+        win->HandleWindowEvent( event );
+    }
+
+    // but, in any case, except if we're dragging the slider (and so the change
+    // is not definitive), send a generic "changed" event
+    if ( evtType != wxEVT_SCROLL_THUMBTRACK )
+    {
+        wxScrollEvent event(wxEVT_SCROLL_CHANGED, win->GetId(), value, orient);
+        event.SetEventObject( win );
+        win->HandleWindowEvent( event );
+    }
+
+    // and also generate a command event for compatibility
+    wxCommandEvent event( wxEVT_COMMAND_SLIDER_UPDATED, win->GetId() );
+    event.SetEventObject( win );
+    event.SetInt( value );
+    win->HandleWindowEvent( event );
+}
+
+static inline wxEventType GtkScrollTypeToWx(int scrollType)
+{
+    wxEventType eventType;
+    switch (scrollType)
+    {
+    case GTK_SCROLL_STEP_BACKWARD:
+    case GTK_SCROLL_STEP_LEFT:
+    case GTK_SCROLL_STEP_UP:
+        eventType = wxEVT_SCROLL_LINEUP;
+        break;
+    case GTK_SCROLL_STEP_DOWN:
+    case GTK_SCROLL_STEP_FORWARD:
+    case GTK_SCROLL_STEP_RIGHT:
+        eventType = wxEVT_SCROLL_LINEDOWN;
+        break;
+    case GTK_SCROLL_PAGE_BACKWARD:
+    case GTK_SCROLL_PAGE_LEFT:
+    case GTK_SCROLL_PAGE_UP:
+        eventType = wxEVT_SCROLL_PAGEUP;
+        break;
+    case GTK_SCROLL_PAGE_DOWN:
+    case GTK_SCROLL_PAGE_FORWARD:
+    case GTK_SCROLL_PAGE_RIGHT:
+        eventType = wxEVT_SCROLL_PAGEDOWN;
+        break;
+    case GTK_SCROLL_START:
+        eventType = wxEVT_SCROLL_TOP;
+        break;
+    case GTK_SCROLL_END:
+        eventType = wxEVT_SCROLL_BOTTOM;
+        break;
+    case GTK_SCROLL_JUMP:
+        eventType = wxEVT_SCROLL_THUMBTRACK;
+        break;
+    default:
+        wxFAIL_MSG(_T("Unknown GtkScrollType"));
+        eventType = wxEVT_NULL;
+        break;
+    }
+    return eventType;
+}
+
+// Determine if increment is the same as +/-x, allowing for some small
+//   difference due to possible inexactness in floating point arithmetic
+static inline bool IsScrollIncrement(double increment, double x)
+{
+    wxASSERT(increment > 0);
+    const double tolerance = 1.0 / 1024;
+    return fabs(increment - fabs(x)) < tolerance;
+}
 
-  if (style & wxSL_VERTICAL == wxSL_VERTICAL)
-    m_widget = gtk_hscale_new( NULL );
-  else
-    m_widget = gtk_vscale_new( NULL );
-    
-  m_adjust = gtk_range_get_adjustment( GTK_RANGE(m_widget) );
-  
-  gtk_signal_connect (GTK_OBJECT (m_adjust), "value_changed",
-		      (GtkSignalFunc) gtk_slider_callback, (gpointer) this );
-  SetRange( minValue, maxValue );
-  SetValue( value );
-  
-  PostCreation();
-  
-  Show( TRUE );
-    
-  return TRUE;
-};
+//-----------------------------------------------------------------------------
+// "value_changed"
+//-----------------------------------------------------------------------------
 
-int wxSlider::GetValue(void) const
+extern "C" {
+static void
+gtk_value_changed(GtkRange* range, wxSlider* win)
 {
-  return (int)(m_adjust->value+0.5);
-};
+    GtkAdjustment* adj = gtk_range_get_adjustment (range);
+    const int pos = wxRound(adj->value);
+    const double oldPos = win->m_pos;
+    win->m_pos = adj->value;
+
+    if (!win->m_hasVMT || g_blockEventsOnDrag)
+        return;
+
+    if (win->m_blockScrollEvent)
+    {
+        win->m_scrollEventType = GTK_SCROLL_NONE;
+        return;
+    }
+
+    wxEventType eventType = wxEVT_NULL;
+    if (win->m_isScrolling)
+    {
+        eventType = wxEVT_SCROLL_THUMBTRACK;
+    }
+    else if (win->m_scrollEventType != GTK_SCROLL_NONE)
+    {
+        // Scroll event from "move-slider" (keyboard)
+        eventType = GtkScrollTypeToWx(win->m_scrollEventType);
+    }
+    else if (win->m_mouseButtonDown)
+    {
+        // Difference from last change event
+        const double diff = adj->value - oldPos;
+        const bool isDown = diff > 0;
+
+        if (IsScrollIncrement(adj->page_increment, diff))
+        {
+            eventType = isDown ? wxEVT_SCROLL_PAGEDOWN : wxEVT_SCROLL_PAGEUP;
+        }
+        else if (wxIsSameDouble(adj->value, 0))
+        {
+            eventType = wxEVT_SCROLL_PAGEUP;
+        }
+        else if (wxIsSameDouble(adj->value, adj->upper))
+        {
+            eventType = wxEVT_SCROLL_PAGEDOWN;
+        }
+        else
+        {
+            // Assume track event
+            eventType = wxEVT_SCROLL_THUMBTRACK;
+            // Remember that we're tracking
+            win->m_isScrolling = true;
+        }
+    }
+
+    win->m_scrollEventType = GTK_SCROLL_NONE;
+
+    // If integral position has changed
+    if (wxRound(oldPos) != pos)
+    {
+        ProcessScrollEvent(win, eventType);
+        win->m_needThumbRelease = eventType == wxEVT_SCROLL_THUMBTRACK;
+    }
+}
+}
 
-void wxSlider::SetValue( const int value )
-{
-  float fpos = (float)value;
-  m_oldPos = fpos;
-  if (fabs(fpos-m_adjust->value) < 0.2) return;
-  m_adjust->value = fpos;
-  
-  gtk_signal_emit_by_name( GTK_OBJECT(m_adjust), "value_changed" );
-};
+//-----------------------------------------------------------------------------
+// "move_slider" (keyboard event)
+//-----------------------------------------------------------------------------
 
-void wxSlider::SetRange( const int minValue, const int maxValue )
+extern "C" {
+static void
+gtk_move_slider(GtkRange*, GtkScrollType scrollType, wxSlider* win)
 {
-  float fmin = (float)minValue;
-  float fmax = (float)maxValue;
-      
-  if ((fabs(fmin-m_adjust->lower) < 0.2) &&
-      (fabs(fmax-m_adjust->upper) < 0.2))
-      return;
-      
-  m_adjust->lower = fmin;
-  m_adjust->upper = fmax;
+    // Save keyboard scroll type for "value_changed" handler
+    win->m_scrollEventType = scrollType;
+}
+}
 
-  gtk_signal_emit_by_name( GTK_OBJECT(m_adjust), "changed" );
-};
+//-----------------------------------------------------------------------------
+// "button_press_event"
+//-----------------------------------------------------------------------------
 
-int wxSlider::GetMin(void) const
+extern "C" {
+static gboolean
+gtk_button_press_event(GtkWidget*, GdkEventButton*, wxSlider* win)
 {
-  return (int)(m_adjust->lower+0.5);
-};
+    win->m_mouseButtonDown = true;
 
-int wxSlider::GetMax(void) const
-{
-  return (int)(m_adjust->upper+0.5);
-};
+    return false;
+}
+}
 
-void wxSlider::SetPageSize( const int pageSize )
+//-----------------------------------------------------------------------------
+// "event_after"
+//-----------------------------------------------------------------------------
+
+extern "C" {
+static void
+gtk_event_after(GtkRange* range, GdkEvent* event, wxSlider* win)
 {
-  float fpage = (float)pageSize;
-      
-  if (fabs(fpage-m_adjust->page_increment) < 0.2) return;
-      
-  m_adjust->page_increment = fpage;
+    if (event->type == GDK_BUTTON_RELEASE)
+    {
+        g_signal_handlers_block_by_func(range, (gpointer) gtk_event_after, win);
+
+        if (win->m_needThumbRelease)
+        {
+            win->m_needThumbRelease = false;
+            ProcessScrollEvent(win, wxEVT_SCROLL_THUMBRELEASE);
+        }
+        // Keep slider at an integral position
+        win->m_blockScrollEvent = true;
+        gtk_range_set_value(GTK_RANGE (win->m_widget), win->GetValue());
+        win->m_blockScrollEvent = false;
+    }
+}
+}
 
-  gtk_signal_emit_by_name( GTK_OBJECT(m_adjust), "changed" );
-};
+//-----------------------------------------------------------------------------
+// "button_release_event"
+//-----------------------------------------------------------------------------
 
-int wxSlider::GetPageSize(void) const
+extern "C" {
+static gboolean
+gtk_button_release_event(GtkRange* range, GdkEventButton*, wxSlider* win)
 {
-  return (int)(m_adjust->page_increment+0.5);
-};
+    win->m_mouseButtonDown = false;
+    if (win->m_isScrolling)
+    {
+        win->m_isScrolling = false;
+        g_signal_handlers_unblock_by_func(range, (gpointer) gtk_event_after, win);
+    }
+    return false;
+}
+}
 
-void wxSlider::SetThumbLength( const int len )
+//-----------------------------------------------------------------------------
+// "format_value"
+//-----------------------------------------------------------------------------
+
+extern "C" {
+static gchar* gtk_format_value(GtkScale*, double value, void*)
 {
-  float flen = (float)len;
-      
-  if (fabs(flen-m_adjust->page_size) < 0.2) return;
-      
-  m_adjust->page_size = flen;
+    // Format value as nearest integer
+    return g_strdup_printf("%d", wxRound(value));
+}
+}
 
-  gtk_signal_emit_by_name( GTK_OBJECT(m_adjust), "changed" );
-};
+//-----------------------------------------------------------------------------
+// wxSlider
+//-----------------------------------------------------------------------------
 
-int wxSlider::GetThumbLength(void) const
-{
-  return (int)(m_adjust->page_size+0.5);
-};
+IMPLEMENT_DYNAMIC_CLASS(wxSlider,wxControl)
 
-void wxSlider::SetLineSize( const int WXUNUSED(lineSize) )
+wxSlider::wxSlider()
+{
+    m_pos = 0;
+    m_scrollEventType = GTK_SCROLL_NONE;
+    m_needThumbRelease = false;
+    m_blockScrollEvent = false;
+}
+
+bool wxSlider::Create(wxWindow *parent,
+                      wxWindowID id,
+                      int value,
+                      int minValue,
+                      int maxValue,
+                      const wxPoint& pos,
+                      const wxSize& size,
+                      long style,
+                      const wxValidator& validator,
+                      const wxString& name)
 {
-};
+    m_pos = value;
+    m_scrollEventType = GTK_SCROLL_NONE;
+
+    if (!PreCreation( parent, pos, size ) ||
+        !CreateBase( parent, id, pos, size, style, validator, name ))
+    {
+        wxFAIL_MSG( wxT("wxSlider creation failed") );
+        return false;
+    }
+
+    if (style & wxSL_VERTICAL)
+        m_widget = gtk_vscale_new( (GtkAdjustment *) NULL );
+    else
+        m_widget = gtk_hscale_new( (GtkAdjustment *) NULL );
+    g_object_ref(m_widget);
 
-int wxSlider::GetLineSize(void) const
+    gtk_scale_set_draw_value(GTK_SCALE (m_widget), (style & wxSL_LABELS) != 0);
+    // Keep full precision in position value
+    gtk_scale_set_digits(GTK_SCALE (m_widget), -1);
+
+    if (style & wxSL_INVERSE)
+        gtk_range_set_inverted( GTK_RANGE(m_widget), TRUE );
+
+    g_signal_connect(m_widget, "button_press_event", G_CALLBACK(gtk_button_press_event), this);
+    g_signal_connect(m_widget, "button_release_event", G_CALLBACK(gtk_button_release_event), this);
+    g_signal_connect(m_widget, "move_slider", G_CALLBACK(gtk_move_slider), this);
+    g_signal_connect(m_widget, "format_value", G_CALLBACK(gtk_format_value), NULL);
+    g_signal_connect(m_widget, "value_changed", G_CALLBACK(gtk_value_changed), this);
+    gulong handler_id = g_signal_connect(m_widget, "event_after", G_CALLBACK(gtk_event_after), this);
+    g_signal_handler_block(m_widget, handler_id);
+
+    SetRange( minValue, maxValue );
+
+    // don't call the public SetValue() as it won't do anything unless the
+    // value really changed
+    GTKSetValue( value );
+
+    m_parent->DoAddChild( this );
+
+    PostCreation(size);
+
+    return true;
+}
+
+int wxSlider::GetValue() const
 {
-  return 0;
-};
+    return wxRound(m_pos);
+}
 
-// not supported in wxGTK (and GTK)
+void wxSlider::SetValue( int value )
+{
+    if (GetValue() != value)
+        GTKSetValue(value);
+}
 
-void wxSlider::GetSize( int *x, int *y ) const
+void wxSlider::GTKSetValue(int value)
 {
-  wxWindow::GetSize( x, y );
-};
+    m_blockScrollEvent = true;
+    gtk_range_set_value(GTK_RANGE (m_widget), value);
+    m_blockScrollEvent = false;
+}
 
-void wxSlider::SetSize( const int x, const int y, const int width, const int height, const int sizeFlags )
+void wxSlider::SetRange( int minValue, int maxValue )
+{
+    m_blockScrollEvent = true;
+    if (minValue == maxValue)
+       maxValue++;
+    gtk_range_set_range(GTK_RANGE (m_widget), minValue, maxValue);
+    gtk_range_set_increments(GTK_RANGE (m_widget), 1, (maxValue - minValue + 9) / 10);
+    m_blockScrollEvent = false;
+}
+
+int wxSlider::GetMin() const
 {
-  wxWindow::SetSize( x, y, width, height, sizeFlags );
-};
+    return int(gtk_range_get_adjustment (GTK_RANGE (m_widget))->lower);
+}
 
-void wxSlider::GetPosition( int *x, int *y ) const
+int wxSlider::GetMax() const
 {
-  wxWindow::GetPosition( x, y );
-};
+    return int(gtk_range_get_adjustment (GTK_RANGE (m_widget))->upper);
+}
 
-void wxSlider::SetTick( const int WXUNUSED(tickPos) )
+void wxSlider::SetPageSize( int pageSize )
 {
-};
+    m_blockScrollEvent = true;
+    gtk_range_set_increments(GTK_RANGE (m_widget), GetLineSize(), pageSize);
+    m_blockScrollEvent = false;
+}
 
-void wxSlider::SetTickFreq( const int WXUNUSED(n), const int WXUNUSED(pos) )
+int wxSlider::GetPageSize() const
 {
-};
+    return int(gtk_range_get_adjustment (GTK_RANGE (m_widget))->page_increment);
+}
 
-int wxSlider::GetTickFreq(void) const
+// GTK does not support changing the size of the slider
+void wxSlider::SetThumbLength(int)
 {
-  return 0;
-};
+}
 
-void wxSlider::ClearTicks(void)
+int wxSlider::GetThumbLength() const
 {
-};
+    return 0;
+}
 
-void wxSlider::SetSelection( const int WXUNUSED(minPos), const int WXUNUSED(maxPos) )
+void wxSlider::SetLineSize( int lineSize )
 {
-};
+    m_blockScrollEvent = true;
+    gtk_range_set_increments(GTK_RANGE (m_widget), lineSize, GetPageSize());
+    m_blockScrollEvent = false;
+}
 
-int wxSlider::GetSelEnd(void) const
+int wxSlider::GetLineSize() const
 {
-  return 0;
-};
+    return int(gtk_range_get_adjustment (GTK_RANGE (m_widget))->step_increment);
+}
 
-int wxSlider::GetSelStart(void) const
+GdkWindow *wxSlider::GTKGetWindow(wxArrayGdkWindows& WXUNUSED(windows)) const
 {
-  return 0;
-};
+    return GTK_RANGE(m_widget)->event_window;
+}
 
-void wxSlider::ClearSel(void)
+// static
+wxVisualAttributes
+wxSlider::GetClassDefaultAttributes(wxWindowVariant WXUNUSED(variant))
 {
-};
+    return GetDefaultAttributesFromGTKWidget(gtk_vscale_new);
+}
 
+#endif // wxUSE_SLIDER