/* GTK - The GIMP Toolkit
* Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald
*
* GtkSpinButton widget for GTK+
* Copyright (C) 1998 Lars Hamann and Stefan Jeske
*
* This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public
* License as published by the Free Software Foundation; either
* version 2 of the License, or (at your option) any later version.
*
* This library is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
* Lesser General Public License for more details.
*
* You should have received a copy of the GNU Lesser General Public
* License along with this library; if not, write to the
* Free Software Foundation, Inc., 59 Temple Place - Suite 330,
* Boston, MA 02111-1307, USA.
*/
/*
* A custon spin-button for gretl, based on gtkspinbutton.
* Allin Cottrell, November 2003.
*/
#include "gretl.h"
#include "obsbutton.h"
#include <gtk/gtkmain.h>
#define MIN_OBS_BUTTON_WIDTH 30
#define OBS_BUTTON_INITIAL_TIMER_DELAY 200
#define OBS_BUTTON_TIMER_DELAY 20
#define MAX_TIMER_CALLS 5
#define EPSILON 1e-10
#define MIN_ARROW_WIDTH 6
enum {
PROP_0,
PROP_VALUE
};
static void obs_button_class_init (ObsButtonClass *klass);
static void obs_button_editable_init (GtkEditableClass *iface);
static void obs_button_init (ObsButton *obs_button);
static void obs_button_finalize (GObject *object);
static void obs_button_destroy (GtkObject *object);
static void obs_button_set_property (GObject *object,
guint prop_id,
const GValue *value,
GParamSpec *pspec);
static void obs_button_get_property (GObject *object,
guint prop_id,
GValue *value,
GParamSpec *pspec);
static void obs_button_map (GtkWidget *widget);
static void obs_button_unmap (GtkWidget *widget);
static void obs_button_realize (GtkWidget *widget);
static void obs_button_unrealize (GtkWidget *widget);
static void obs_button_size_request (GtkWidget *widget,
GtkRequisition *requisition);
static void obs_button_size_allocate (GtkWidget *widget,
GtkAllocation *allocation);
static gint obs_button_expose (GtkWidget *widget,
GdkEventExpose *event);
static gint obs_button_button_press (GtkWidget *widget,
GdkEventButton *event);
static gint obs_button_button_release (GtkWidget *widget,
GdkEventButton *event);
static gint obs_button_motion_notify (GtkWidget *widget,
GdkEventMotion *event);
static gint obs_button_enter_notify (GtkWidget *widget,
GdkEventCrossing *event);
static gint obs_button_leave_notify (GtkWidget *widget,
GdkEventCrossing *event);
static gint obs_button_focus_out (GtkWidget *widget,
GdkEventFocus *event);
static void obs_button_grab_notify (GtkWidget *widget,
gboolean was_grabbed);
static void obs_button_state_changed (GtkWidget *widget,
GtkStateType previous_state);
static void obs_button_draw_arrow (ObsButton *obs_button,
GtkArrowType arrow_type);
static gint obs_button_timer (ObsButton *obs_button);
static void obs_button_stop_spinning (ObsButton *spin);
static void obs_button_value_changed (GtkAdjustment *adjustment,
ObsButton *obs_button);
static gint obs_button_key_release (GtkWidget *widget,
GdkEventKey *event);
static gint obs_button_scroll (GtkWidget *widget,
GdkEventScroll *event);
static void obs_button_activate (GtkEntry *entry);
static void obs_button_insert_text (GtkEditable *editable,
const gchar *new_text,
gint new_text_length,
gint *position);
static void obs_button_real_spin (ObsButton *obs_button,
gdouble step);
static void obs_button_real_change_value (ObsButton *spin,
GtkScrollType scroll);
static gint obs_button_default_input (ObsButton *obs_button,
gdouble *new_val);
static gint obs_button_default_output (ObsButton *obs_button);
static gint obs_button_get_arrow_size (ObsButton *obs_button);
static gint obs_button_get_shadow_type (ObsButton *spin_button);
static void obs_button_redraw (ObsButton *obs_button);
static void obs_button_set_adjustment (ObsButton *obs_button,
GtkAdjustment *adjustment);
static GtkEntryClass *parent_class = NULL;
#define NO_ARROW 2
GType
obs_button_get_type (void)
{
static GType obs_button_type = 0;
if (!obs_button_type)
{
static const GTypeInfo obs_button_info =
{
sizeof (ObsButtonClass),
NULL, /* base_init */
NULL, /* base_finalize */
(GClassInitFunc) obs_button_class_init,
NULL, /* class_finalize */
NULL, /* class_data */
sizeof (ObsButton),
0, /* n_preallocs */
(GInstanceInitFunc) obs_button_init,
NULL
};
static const GInterfaceInfo editable_info =
{
(GInterfaceInitFunc) obs_button_editable_init, /* interface_init */
NULL, /* interface_finalize */
NULL /* interface_data */
};
obs_button_type =
g_type_register_static (GTK_TYPE_ENTRY, "ObsButton",
&obs_button_info, 0);
g_type_add_interface_static (obs_button_type,
GTK_TYPE_EDITABLE,
&editable_info);
}
return obs_button_type;
}
static void
obs_button_class_init (ObsButtonClass *class)
{
GObjectClass *gobject_class = G_OBJECT_CLASS (class);
GtkObjectClass *object_class;
GtkWidgetClass *widget_class;
GtkEntryClass *entry_class;
object_class = (GtkObjectClass*) class;
widget_class = (GtkWidgetClass*) class;
entry_class = (GtkEntryClass*) class;
parent_class = g_type_class_peek_parent (class);
gobject_class->finalize = obs_button_finalize;
gobject_class->set_property = obs_button_set_property;
gobject_class->get_property = obs_button_get_property;
object_class->destroy = obs_button_destroy;
widget_class->map = obs_button_map;
widget_class->unmap = obs_button_unmap;
widget_class->realize = obs_button_realize;
widget_class->unrealize = obs_button_unrealize;
widget_class->size_request = obs_button_size_request;
widget_class->size_allocate = obs_button_size_allocate;
widget_class->expose_event = obs_button_expose;
widget_class->scroll_event = obs_button_scroll;
widget_class->button_press_event = obs_button_button_press;
widget_class->button_release_event = obs_button_button_release;
widget_class->motion_notify_event = obs_button_motion_notify;
widget_class->key_release_event = obs_button_key_release;
widget_class->enter_notify_event = obs_button_enter_notify;
widget_class->leave_notify_event = obs_button_leave_notify;
widget_class->focus_out_event = obs_button_focus_out;
widget_class->grab_notify = obs_button_grab_notify;
widget_class->state_changed = obs_button_state_changed;
entry_class->activate = obs_button_activate;
class->input = NULL;
class->output = NULL;
class->change_value = obs_button_real_change_value;
g_object_class_install_property (gobject_class,
PROP_VALUE,
g_param_spec_double ("value",
_("Value"),
_("Reads the current value, or sets a new value"),
-G_MAXDOUBLE,
G_MAXDOUBLE,
0.0,
G_PARAM_READWRITE));
gtk_widget_class_install_style_property_parser (widget_class,
g_param_spec_enum ("shadow_type", "Shadow Type", NULL,
GTK_TYPE_SHADOW_TYPE,
GTK_SHADOW_IN,
G_PARAM_READABLE),
gtk_rc_property_parse_enum);
}
static void
obs_button_editable_init (GtkEditableClass *iface)
{
iface->insert_text = obs_button_insert_text;
}
static void
obs_button_set_property (GObject *object,
guint prop_id,
const GValue *value,
GParamSpec *pspec)
{
ObsButton *obs_button = OBS_BUTTON (object);
if (prop_id == PROP_VALUE) {
obs_button_set_value (obs_button, g_value_get_double (value));
}
}
static void
obs_button_get_property (GObject *object,
guint prop_id,
GValue *value,
GParamSpec *pspec)
{
ObsButton *obs_button = OBS_BUTTON (object);
if (prop_id == PROP_VALUE) {
g_value_set_double (value, obs_button->adjustment->value);
} else {
G_OBJECT_WARN_INVALID_PROPERTY_ID (object, prop_id, pspec);
}
}
static void
obs_button_init (ObsButton *obs_button)
{
obs_button->adjustment = NULL;
obs_button->panel = NULL;
obs_button->timer = 0;
obs_button->timer_step = 0.0;
obs_button->in_child = NO_ARROW;
obs_button->click_child = NO_ARROW;
obs_button->button = 0;
obs_button->need_timer = FALSE;
obs_button->timer_calls = 0;
obs_button->adjustment = NULL;
}
static void
obs_button_finalize (GObject *object)
{
obs_button_set_adjustment (OBS_BUTTON (object), NULL);
G_OBJECT_CLASS (parent_class)->finalize (object);
}
static void
obs_button_destroy (GtkObject *object)
{
obs_button_stop_spinning (OBS_BUTTON (object));
GTK_OBJECT_CLASS (parent_class)->destroy (object);
}
static void
obs_button_map (GtkWidget *widget)
{
if (GTK_WIDGET_REALIZED (widget) && !GTK_WIDGET_MAPPED (widget)) {
GTK_WIDGET_CLASS (parent_class)->map (widget);
gdk_window_show (OBS_BUTTON (widget)->panel);
}
}
static void
obs_button_unmap (GtkWidget *widget)
{
if (GTK_WIDGET_MAPPED (widget)) {
gdk_window_hide (OBS_BUTTON (widget)->panel);
GTK_WIDGET_CLASS (parent_class)->unmap (widget);
}
}
static void
obs_button_realize (GtkWidget *widget)
{
ObsButton *obs_button;
GdkWindowAttr attributes;
gint attributes_mask;
guint real_width;
gint arrow_size;
obs_button = OBS_BUTTON (widget);
arrow_size = obs_button_get_arrow_size (obs_button);
real_width = widget->allocation.width;
widget->allocation.width -= arrow_size + 2 * widget->style->xthickness;
gtk_widget_set_events (widget, gtk_widget_get_events (widget) |
GDK_KEY_RELEASE_MASK);
GTK_WIDGET_CLASS (parent_class)->realize (widget);
widget->allocation.width = real_width;
attributes.window_type = GDK_WINDOW_CHILD;
attributes.wclass = GDK_INPUT_OUTPUT;
attributes.visual = gtk_widget_get_visual (widget);
attributes.colormap = gtk_widget_get_colormap (widget);
attributes.event_mask = gtk_widget_get_events (widget);
attributes.event_mask |= GDK_EXPOSURE_MASK | GDK_BUTTON_PRESS_MASK
| GDK_BUTTON_RELEASE_MASK | GDK_LEAVE_NOTIFY_MASK | GDK_ENTER_NOTIFY_MASK
| GDK_POINTER_MOTION_MASK | GDK_POINTER_MOTION_HINT_MASK;
attributes_mask = GDK_WA_X | GDK_WA_Y | GDK_WA_VISUAL | GDK_WA_COLORMAP;
attributes.x = (widget->allocation.x +
widget->allocation.width - arrow_size -
2 * widget->style->xthickness);
attributes.y = widget->allocation.y + (widget->allocation.height -
widget->requisition.height) / 2;
attributes.width = arrow_size + 2 * widget->style->xthickness;
attributes.height = widget->requisition.height;
obs_button->panel = gdk_window_new (gtk_widget_get_parent_window (widget),
&attributes, attributes_mask);
gdk_window_set_user_data (obs_button->panel, widget);
gtk_style_set_background (widget->style, obs_button->panel, GTK_STATE_NORMAL);
obs_button_default_output (obs_button);
gtk_widget_queue_resize (GTK_WIDGET (obs_button));
}
static void
obs_button_unrealize (GtkWidget *widget)
{
ObsButton *spin = OBS_BUTTON (widget);
GTK_WIDGET_CLASS (parent_class)->unrealize (widget);
if (spin->panel) {
gdk_window_set_user_data (spin->panel, NULL);
gdk_window_destroy (spin->panel);
spin->panel = NULL;
}
}
static void
obs_button_size_request (GtkWidget *widget,
GtkRequisition *requisition)
{
GtkEntry *entry;
ObsButton *obs_button;
gint arrow_size;
entry = GTK_ENTRY (widget);
obs_button = OBS_BUTTON (widget);
arrow_size = obs_button_get_arrow_size (obs_button);
GTK_WIDGET_CLASS (parent_class)->size_request (widget, requisition);
if (entry->width_chars < 0) {
PangoContext *context;
PangoFontMetrics *metrics;
gint width;
gint w;
gint string_len;
gint max_string_len;
gint digit_width;
gboolean interior_focus;
gint focus_width;
gtk_widget_style_get (widget,
"interior-focus", &interior_focus,
"focus-line-width", &focus_width,
NULL);
context = gtk_widget_get_pango_context (widget);
metrics = pango_context_get_metrics (context,
widget->style->font_desc,
pango_context_get_language (context));
digit_width = pango_font_metrics_get_approximate_digit_width (metrics);
digit_width = PANGO_SCALE *
((digit_width + PANGO_SCALE - 1) / PANGO_SCALE);
pango_font_metrics_unref (metrics);
/* Get max of MIN_OBS_BUTTON_WIDTH, size of upper, size of lower */
width = MIN_OBS_BUTTON_WIDTH;
max_string_len = OBSLEN;
string_len = strlen(obs_button->pdinfo->endobs) + 1;
w = PANGO_PIXELS (MIN (string_len, max_string_len) * digit_width);
width = MAX (width, w);
requisition->width = width + /* INNER_BORDER */ 2 * 2;
if (!interior_focus)
requisition->width += 2 * focus_width;
}
requisition->width += arrow_size + 2 * widget->style->xthickness;
}
static void
obs_button_size_allocate (GtkWidget *widget,
GtkAllocation *allocation)
{
ObsButton *spin;
GtkAllocation entry_allocation;
GtkAllocation panel_allocation;
gint arrow_size;
gint panel_width;
g_return_if_fail (GTK_IS_OBS_BUTTON (widget));
g_return_if_fail (allocation != NULL);
spin = OBS_BUTTON (widget);
arrow_size = obs_button_get_arrow_size (spin);
panel_width = arrow_size + 2 * widget->style->xthickness;
widget->allocation = *allocation;
entry_allocation = *allocation;
entry_allocation.width -= panel_width;
if (gtk_widget_get_direction (widget) == GTK_TEXT_DIR_RTL) {
entry_allocation.x += panel_width;
panel_allocation.x = allocation->x;
} else {
panel_allocation.x = allocation->x + allocation->width - panel_width;
}
panel_allocation.width = panel_width;
panel_allocation.height = MIN (widget->requisition.height, allocation->height);
panel_allocation.y = allocation->y + (allocation->height -
panel_allocation.height) / 2;
GTK_WIDGET_CLASS (parent_class)->size_allocate (widget, &entry_allocation);
if (GTK_WIDGET_REALIZED (widget)) {
gdk_window_move_resize (OBS_BUTTON (widget)->panel,
panel_allocation.x,
panel_allocation.y,
panel_allocation.width,
panel_allocation.height);
}
obs_button_redraw (spin);
}
static gint
obs_button_expose (GtkWidget *widget,
GdkEventExpose *event)
{
ObsButton *spin;
g_return_val_if_fail (GTK_IS_OBS_BUTTON (widget), FALSE);
g_return_val_if_fail (event != NULL, FALSE);
spin = OBS_BUTTON (widget);
if (GTK_WIDGET_DRAWABLE (widget)) {
GtkShadowType shadow_type;
GdkRectangle rect;
if (event->window != spin->panel)
GTK_WIDGET_CLASS (parent_class)->expose_event (widget, event);
/* we redraw the panel even if it wasn't exposed. This is
* because spin->panel is not a child window of widget->window,
* so it will not be invalidated by eg. gtk_widget_queue_draw().
*/
rect.x = 0;
rect.y = 0;
gdk_drawable_get_size (spin->panel, &rect.width, &rect.height);
shadow_type = obs_button_get_shadow_type (spin);
gdk_window_begin_paint_rect (spin->panel, &rect);
if (shadow_type != GTK_SHADOW_NONE) {
gtk_paint_box (widget->style, spin->panel,
GTK_STATE_NORMAL, shadow_type,
NULL, widget, "spinbutton",
rect.x, rect.y, rect.width, rect.height);
}
obs_button_draw_arrow (spin, GTK_ARROW_UP);
obs_button_draw_arrow (spin, GTK_ARROW_DOWN);
gdk_window_end_paint (spin->panel);
}
return FALSE;
}
static gboolean
obs_button_at_limit (ObsButton *obs_button,
GtkArrowType arrow)
{
ObsButton *other;
other = g_object_get_data(G_OBJECT(obs_button), "startspin");
if (other != NULL) {
obs_button->adjustment->lower = obs_button_get_value(other);
} else {
other = g_object_get_data(G_OBJECT(obs_button), "endspin");
if (other != NULL) {
obs_button->adjustment->upper = obs_button_get_value(other);
}
}
if (arrow == GTK_ARROW_UP &&
(obs_button->adjustment->upper - obs_button->adjustment->value <= EPSILON))
return TRUE;
if (arrow == GTK_ARROW_DOWN &&
(obs_button->adjustment->value - obs_button->adjustment->lower <= EPSILON))
return TRUE;
return FALSE;
}
static void
obs_button_draw_arrow (ObsButton *obs_button,
GtkArrowType arrow_type)
{
GtkStateType state_type;
GtkShadowType shadow_type;
GtkWidget *widget;
gint x;
gint y;
gint height;
gint width;
gint h, w;
g_return_if_fail (GTK_IS_OBS_BUTTON (obs_button));
g_return_if_fail (arrow_type == GTK_ARROW_UP || arrow_type == GTK_ARROW_DOWN);
widget = GTK_WIDGET (obs_button);
if (GTK_WIDGET_DRAWABLE (widget)) {
width = obs_button_get_arrow_size (obs_button) + 2 * widget->style->xthickness;
if (arrow_type == GTK_ARROW_UP) {
x = 0;
y = 0;
height = widget->requisition.height / 2;
} else {
x = 0;
y = widget->requisition.height / 2;
height = (widget->requisition.height + 1) / 2;
}
if (obs_button_at_limit (obs_button, arrow_type)) {
shadow_type = GTK_SHADOW_OUT;
state_type = GTK_STATE_INSENSITIVE;
} else {
if (obs_button->click_child == arrow_type) {
state_type = GTK_STATE_ACTIVE;
shadow_type = GTK_SHADOW_IN;
}
else {
if (obs_button->in_child == arrow_type &&
obs_button->click_child == NO_ARROW) {
state_type = GTK_STATE_PRELIGHT;
} else {
state_type = GTK_WIDGET_STATE (widget);
}
shadow_type = GTK_SHADOW_OUT;
}
}
gtk_paint_box (widget->style, obs_button->panel,
state_type, shadow_type,
NULL, widget,
(arrow_type == GTK_ARROW_UP)? "spinbutton_up" : "spinbutton_down",
x, y, width, height);
height = widget->requisition.height;
if (arrow_type == GTK_ARROW_DOWN) {
y = height / 2;
height = height - y - 2;
} else {
y = 2;
height = height / 2 - 2;
}
width -= 3;
if (widget && gtk_widget_get_direction (widget) == GTK_TEXT_DIR_RTL)
x = 2;
else
x = 1;
w = width / 2;
w -= w % 2 - 1; /* force odd */
h = (w + 1) / 2;
x += (width - w) / 2;
y += (height - h) / 2;
height = h;
width = w;
gtk_paint_arrow (widget->style, obs_button->panel,
state_type, shadow_type,
NULL, widget, "spinbutton",
arrow_type, TRUE,
x, y, width, height);
}
}
static gint
obs_button_enter_notify (GtkWidget *widget,
GdkEventCrossing *event)
{
ObsButton *spin = OBS_BUTTON (widget);
if (event->window == spin->panel) {
gint x;
gint y;
gdk_window_get_pointer (spin->panel, &x, &y, NULL);
if (y <= widget->requisition.height / 2)
spin->in_child = GTK_ARROW_UP;
else
spin->in_child = GTK_ARROW_DOWN;
obs_button_redraw (spin);
}
return FALSE;
}
static gint
obs_button_leave_notify (GtkWidget *widget,
GdkEventCrossing *event)
{
ObsButton *spin = OBS_BUTTON (widget);
spin->in_child = NO_ARROW;
obs_button_redraw (spin);
return FALSE;
}
static gint
obs_button_focus_out (GtkWidget *widget,
GdkEventFocus *event)
{
if (GTK_ENTRY (widget)->editable)
obs_button_update (OBS_BUTTON (widget));
return GTK_WIDGET_CLASS (parent_class)->focus_out_event (widget, event);
}
static void
obs_button_grab_notify (GtkWidget *widget,
gboolean was_grabbed)
{
ObsButton *spin = OBS_BUTTON (widget);
if (!was_grabbed) {
obs_button_stop_spinning (spin);
obs_button_redraw (spin);
}
}
static void
obs_button_state_changed (GtkWidget *widget,
GtkStateType previous_state)
{
ObsButton *spin = OBS_BUTTON (widget);
if (!GTK_WIDGET_IS_SENSITIVE (widget)) {
obs_button_stop_spinning (spin);
obs_button_redraw (spin);
}
}
static gint
obs_button_scroll (GtkWidget *widget,
GdkEventScroll *event)
{
ObsButton *spin = OBS_BUTTON (widget);
if (event->direction == GDK_SCROLL_UP) {
if (!GTK_WIDGET_HAS_FOCUS (widget))
gtk_widget_grab_focus (widget);
obs_button_real_spin (spin, spin->adjustment->step_increment);
}
else if (event->direction == GDK_SCROLL_DOWN) {
if (!GTK_WIDGET_HAS_FOCUS (widget))
gtk_widget_grab_focus (widget);
obs_button_real_spin (spin, -spin->adjustment->step_increment);
}
else
return FALSE;
return TRUE;
}
static void
obs_button_stop_spinning (ObsButton *spin)
{
if (spin->timer) {
gtk_timeout_remove (spin->timer);
spin->timer = 0;
spin->timer_calls = 0;
spin->need_timer = FALSE;
}
spin->button = 0;
spin->timer = 0;
spin->timer_step = spin->adjustment->step_increment;
spin->timer_calls = 0;
spin->click_child = NO_ARROW;
spin->button = 0;
}
static void
start_spinning (ObsButton *spin,
GtkArrowType click_child,
gdouble step)
{
g_return_if_fail (click_child == GTK_ARROW_UP || click_child == GTK_ARROW_DOWN);
spin->click_child = click_child;
obs_button_real_spin (spin, click_child == GTK_ARROW_UP ? step : -step);
if (!spin->timer) {
spin->timer_step = step;
spin->need_timer = TRUE;
spin->timer = gtk_timeout_add (OBS_BUTTON_INITIAL_TIMER_DELAY,
(GtkFunction) obs_button_timer, (gpointer) spin);
}
obs_button_redraw (spin);
}
static gint
obs_button_button_press (GtkWidget *widget,
GdkEventButton *event)
{
ObsButton *spin = OBS_BUTTON (widget);
if (!spin->button) {
if (event->window == spin->panel) {
if (!GTK_WIDGET_HAS_FOCUS (widget))
gtk_widget_grab_focus (widget);
spin->button = event->button;
if (GTK_ENTRY (widget)->editable)
obs_button_update (spin);
if (event->y <= widget->requisition.height / 2) {
if (event->button == 1)
start_spinning (spin, GTK_ARROW_UP, spin->adjustment->step_increment);
else if (event->button == 2)
start_spinning (spin, GTK_ARROW_UP, spin->adjustment->page_increment);
else
spin->click_child = GTK_ARROW_UP;
}
else {
if (event->button == 1)
start_spinning (spin, GTK_ARROW_DOWN, spin->adjustment->step_increment);
else if (event->button == 2)
start_spinning (spin, GTK_ARROW_DOWN, spin->adjustment->page_increment);
else
spin->click_child = GTK_ARROW_DOWN;
}
return TRUE;
}
else
return GTK_WIDGET_CLASS (parent_class)->button_press_event (widget, event);
}
return FALSE;
}
static gint
obs_button_button_release (GtkWidget *widget,
GdkEventButton *event)
{
ObsButton *spin = OBS_BUTTON (widget);
gint arrow_size;
arrow_size = obs_button_get_arrow_size (spin);
if (event->button == spin->button) {
int click_child = spin->click_child;
obs_button_stop_spinning (spin);
if (event->button == 3) {
if (event->y >= 0 && event->x >= 0 &&
event->y <= widget->requisition.height &&
event->x <= arrow_size + 2 * widget->style->xthickness) {
if (click_child == GTK_ARROW_UP &&
event->y <= widget->requisition.height / 2) {
gdouble diff;
diff = spin->adjustment->upper - spin->adjustment->value;
if (diff > EPSILON)
obs_button_real_spin (spin, diff);
}
else if (click_child == GTK_ARROW_DOWN &&
event->y > widget->requisition.height / 2) {
gdouble diff;
diff = spin->adjustment->value - spin->adjustment->lower;
if (diff > EPSILON)
obs_button_real_spin (spin, -diff);
}
}
}
obs_button_redraw (spin);
return TRUE;
}
else
return GTK_WIDGET_CLASS (parent_class)->button_release_event (widget, event);
}
static gint
obs_button_motion_notify (GtkWidget *widget,
GdkEventMotion *event)
{
ObsButton *spin = OBS_BUTTON (widget);
if (spin->button)
return FALSE;
if (event->window == spin->panel) {
gint y;
gdk_window_get_pointer (spin->panel, NULL, &y, NULL);
if (y <= widget->requisition.height / 2 &&
spin->in_child == GTK_ARROW_DOWN) {
spin->in_child = GTK_ARROW_UP;
obs_button_redraw (spin);
}
else if (y > widget->requisition.height / 2 &&
spin->in_child == GTK_ARROW_UP) {
spin->in_child = GTK_ARROW_DOWN;
obs_button_redraw (spin);
}
return FALSE;
}
return GTK_WIDGET_CLASS (parent_class)->motion_notify_event (widget, event);
}
static gint
obs_button_timer (ObsButton *obs_button)
{
gboolean retval = FALSE;
GDK_THREADS_ENTER ();
if (obs_button->timer) {
if (obs_button->click_child == GTK_ARROW_UP)
obs_button_real_spin (obs_button, obs_button->timer_step);
else
obs_button_real_spin (obs_button, -obs_button->timer_step);
if (obs_button->need_timer) {
obs_button->need_timer = FALSE;
obs_button->timer = gtk_timeout_add
(OBS_BUTTON_TIMER_DELAY, (GtkFunction) obs_button_timer,
(gpointer) obs_button);
} else {
retval = TRUE;
}
}
GDK_THREADS_LEAVE ();
return retval;
}
static void
obs_button_value_changed (GtkAdjustment *adjustment,
ObsButton *obs_button)
{
g_return_if_fail (GTK_IS_ADJUSTMENT (adjustment));
obs_button_default_output (obs_button);
obs_button_redraw (obs_button);
g_object_notify (G_OBJECT (obs_button), "value");
}
static void
obs_button_real_change_value (ObsButton *spin,
GtkScrollType scroll)
{
/* We don't test whether the entry is editable, since
* this key binding conceptually corresponds to changing
* the value with the buttons using the mouse, which
* we allow for non-editable spin buttons.
*/
switch (scroll) {
case GTK_SCROLL_STEP_BACKWARD:
case GTK_SCROLL_STEP_DOWN:
case GTK_SCROLL_STEP_LEFT:
obs_button_real_spin (spin, -spin->timer_step);
break;
case GTK_SCROLL_STEP_FORWARD:
case GTK_SCROLL_STEP_UP:
case GTK_SCROLL_STEP_RIGHT:
obs_button_real_spin (spin, spin->timer_step);
break;
case GTK_SCROLL_PAGE_BACKWARD:
case GTK_SCROLL_PAGE_DOWN:
case GTK_SCROLL_PAGE_LEFT:
obs_button_real_spin (spin, -spin->adjustment->page_increment);
break;
case GTK_SCROLL_PAGE_FORWARD:
case GTK_SCROLL_PAGE_UP:
case GTK_SCROLL_PAGE_RIGHT:
obs_button_real_spin (spin, spin->adjustment->page_increment);
break;
case GTK_SCROLL_START:
{
gdouble diff = spin->adjustment->value - spin->adjustment->lower;
if (diff > EPSILON)
obs_button_real_spin (spin, -diff);
break;
}
case GTK_SCROLL_END:
{
gdouble diff = spin->adjustment->upper - spin->adjustment->value;
if (diff > EPSILON)
obs_button_real_spin (spin, diff);
break;
}
default:
g_warning ("Invalid scroll type %d for ObsButton::change-value", scroll);
break;
}
obs_button_update (spin);
}
static gint
obs_button_key_release (GtkWidget *widget,
GdkEventKey *event)
{
ObsButton *spin = OBS_BUTTON (widget);
/* We only get a release at the end of a key repeat run, so reset the timer_step */
spin->timer_step = spin->adjustment->step_increment;
spin->timer_calls = 0;
return TRUE;
}
static void
obs_button_activate (GtkEntry *entry)
{
if (entry->editable)
obs_button_update (OBS_BUTTON (entry));
/* Chain up so that entry->activates_default is honored */
parent_class->activate (entry);
}
static void
obs_button_insert_text (GtkEditable *editable,
const gchar *new_text,
gint new_text_length,
gint *position)
{
GtkEditableClass *parent_editable_iface = g_type_interface_peek (parent_class, GTK_TYPE_EDITABLE);
parent_editable_iface->insert_text (editable, new_text,
new_text_length, position);
}
static void
obs_button_real_spin (ObsButton *obs_button,
gdouble increment)
{
GtkAdjustment *adj;
gdouble new_value = 0.0;
adj = obs_button->adjustment;
new_value = adj->value + increment;
if (increment > 0) {
new_value = MIN (new_value, adj->upper);
}
else if (increment < 0) {
new_value = MAX (new_value, adj->lower);
}
if (fabs (new_value - adj->value) > EPSILON)
gtk_adjustment_set_value (adj, new_value);
obs_button_redraw (obs_button);
}
static gint
obs_button_default_input (ObsButton *obs_button,
gdouble *new_val)
{
*new_val = dateton(gtk_entry_get_text(GTK_ENTRY (obs_button)),
obs_button->pdinfo);
if (*new_val < 0)
return GTK_INPUT_ERROR;
else
return FALSE;
}
extern gboolean update_obs_label (GtkEditable *entry, gpointer data);
static gint
obs_button_default_output (ObsButton *obs_button)
{
gchar buf[OBSLEN];
gpointer data;
ntodate_full(buf, (int) obs_button->adjustment->value, obs_button->pdinfo);
if (strcmp (buf, gtk_entry_get_text (GTK_ENTRY (obs_button))))
gtk_entry_set_text (GTK_ENTRY (obs_button), buf);
data = g_object_get_data(G_OBJECT(obs_button), "rset");
if (data != NULL) {
update_obs_label(NULL, data);
}
return FALSE;
}
/***********************************************************
***********************************************************
*** Public interface ***
***********************************************************
***********************************************************/
GtkWidget *
obs_button_new (GtkAdjustment *adjustment, const DATAINFO *pdinfo)
{
ObsButton *spin;
if (adjustment)
g_return_val_if_fail (GTK_IS_ADJUSTMENT (adjustment), NULL);
spin = g_object_new (GTK_TYPE_OBS_BUTTON, NULL);
spin->pdinfo = pdinfo;
obs_button_set_adjustment (spin, adjustment);
gtk_adjustment_value_changed (adjustment);
return GTK_WIDGET (spin);
}
/* Callback used when the spin button's adjustment changes. We need to redraw
* the arrows when the adjustment's range changes, and reevaluate our size request.
*/
static void
adjustment_changed_cb (GtkAdjustment *adjustment, gpointer data)
{
ObsButton *obs_button = OBS_BUTTON (data);
obs_button->timer_step = obs_button->adjustment->step_increment;
gtk_widget_queue_resize (GTK_WIDGET (obs_button));
}
/**
* obs_button_set_adjustment:
* @obs_button: a #ObsButton
* @adjustment: a #GtkAdjustment to replace the existing adjustment
*
* Replaces the #GtkAdjustment associated with @obs_button.
**/
static void
obs_button_set_adjustment (ObsButton *obs_button,
GtkAdjustment *adjustment)
{
g_return_if_fail (GTK_IS_OBS_BUTTON (obs_button));
if (obs_button->adjustment != adjustment) {
if (obs_button->adjustment) {
g_signal_handlers_disconnect_by_func (obs_button->adjustment,
obs_button_value_changed,
obs_button);
g_signal_handlers_disconnect_by_func (obs_button->adjustment,
adjustment_changed_cb,
obs_button);
g_object_unref (obs_button->adjustment);
}
obs_button->adjustment = adjustment;
if (adjustment) {
g_object_ref (adjustment);
gtk_object_sink (GTK_OBJECT (adjustment));
g_signal_connect (adjustment, "value_changed",
G_CALLBACK (obs_button_value_changed),
obs_button);
g_signal_connect (adjustment, "changed",
G_CALLBACK (adjustment_changed_cb),
obs_button);
obs_button->timer_step = obs_button->adjustment->step_increment;
}
gtk_widget_queue_resize (GTK_WIDGET (obs_button));
}
}
/**
* obs_button_get_value:
* @obs_button: a #ObsButton
*
* Get the value in the @obs_button.
*
* Return value: the value of @obs_button
**/
gdouble
obs_button_get_value (ObsButton *obs_button)
{
g_return_val_if_fail (GTK_IS_OBS_BUTTON (obs_button), 0.0);
return obs_button->adjustment->value;
}
/**
* obs_button_set_value:
* @obs_button: a #ObsButton
* @value: the new value
*
* Set the value of @obs_button.
**/
void
obs_button_set_value (ObsButton *obs_button,
gdouble value)
{
g_return_if_fail (GTK_IS_OBS_BUTTON (obs_button));
if (fabs (value - obs_button->adjustment->value) > EPSILON) {
gtk_adjustment_set_value (obs_button->adjustment, value);
} else {
obs_button_default_output (obs_button);
}
}
static gint
obs_button_get_arrow_size (ObsButton *obs_button)
{
gint size = pango_font_description_get_size (GTK_WIDGET (obs_button)->style->font_desc);
gint arrow_size;
arrow_size = MAX (PANGO_PIXELS (size), MIN_ARROW_WIDTH);
return arrow_size - arrow_size % 2; /* force even */
}
static gint
obs_button_get_shadow_type (ObsButton *spin_button)
{
GtkShadowType rc_shadow_type;
gtk_widget_style_get (GTK_WIDGET (spin_button), "shadow_type", &rc_shadow_type, NULL);
return rc_shadow_type;
}
/**
* obs_button_update:
* @obs_button: a #ObsButton
*
* Manually force an update of the spin button.
**/
void
obs_button_update (ObsButton *obs_button)
{
gdouble val;
gint error = 0;
gint return_val;
g_return_if_fail (GTK_IS_OBS_BUTTON (obs_button));
return_val = obs_button_default_input (obs_button, &val);
error = (return_val == GTK_INPUT_ERROR);
obs_button_redraw (obs_button);
if (val < obs_button->adjustment->lower)
val = obs_button->adjustment->lower;
else if (val > obs_button->adjustment->upper)
val = obs_button->adjustment->upper;
if (fabs(val - obs_button->adjustment->value) > EPSILON) {
gtk_adjustment_set_value (obs_button->adjustment, val);
} else {
obs_button_default_output (obs_button);
}
}
static void
obs_button_redraw (ObsButton *obs_button)
{
GtkWidget *widget;
widget = GTK_WIDGET (obs_button);
if (GTK_WIDGET_DRAWABLE (widget)) {
gtk_widget_queue_draw (widget);
/* We must invalidate the panel window ourselves, because it
* is not a child of widget->window
*/
gdk_window_invalidate_rect (obs_button->panel, NULL, TRUE);
}
}
syntax highlighted by Code2HTML, v. 0.9.1