]> Pileus Git - ~andy/gtk/blob - gtk/gtkhscale.c
4b407ccf59f3dec20ba94612106e5a18148b3a7c
[~andy/gtk] / gtk / gtkhscale.c
1 /* GTK - The GIMP Toolkit
2  * Copyright (C) 2001 Red Hat, Inc.
3  *
4  * This library is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU Lesser General Public
6  * License as published by the Free Software Foundation; either
7  * version 2 of the License, or (at your option) any later version.
8  *
9  * This library is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12  * Lesser General Public License for more details.
13  *
14  * You should have received a copy of the GNU Lesser General Public
15  * License along with this library; if not, write to the
16  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
17  * Boston, MA 02111-1307, USA.
18  */
19
20 /*
21  * Modified by the GTK+ Team and others 1997-2000.  See the AUTHORS
22  * file for a list of people on the GTK+ Team.  See the ChangeLog
23  * files for a list of changes.  These files are distributed with
24  * GTK+ at ftp://ftp.gtk.org/pub/gtk/. 
25  */
26
27 #include <config.h>
28 #include <math.h>
29 #include <stdio.h>
30 #include <stdlib.h>
31 #include "gtkhscale.h"
32 #include "gtkintl.h"
33 #include "gtkalias.h"
34
35 static gboolean gtk_hscale_expose           (GtkWidget      *widget,
36                                              GdkEventExpose *event);
37
38 static void     gtk_hscale_get_layout_offsets (GtkScale       *scale,
39                                                gint           *x,
40                                                gint           *y);
41
42 G_DEFINE_TYPE (GtkHScale, gtk_hscale, GTK_TYPE_SCALE)
43
44 static void
45 gtk_hscale_class_init (GtkHScaleClass *class)
46 {
47   GtkWidgetClass *widget_class;
48   GtkRangeClass *range_class;
49   GtkScaleClass *scale_class;
50   
51   widget_class = GTK_WIDGET_CLASS (class);
52   range_class = GTK_RANGE_CLASS (class);
53   scale_class = GTK_SCALE_CLASS (class);
54
55   range_class->slider_detail = "hscale";
56
57   scale_class->get_layout_offsets = gtk_hscale_get_layout_offsets;
58   
59   widget_class->expose_event = gtk_hscale_expose;
60 }
61
62 static void
63 gtk_hscale_init (GtkHScale *hscale)
64 {
65   GtkRange *range;
66
67   range = GTK_RANGE (hscale);
68
69   range->orientation = GTK_ORIENTATION_HORIZONTAL;
70   range->flippable = TRUE;
71 }
72
73 GtkWidget*
74 gtk_hscale_new (GtkAdjustment *adjustment)
75 {
76   return g_object_new (GTK_TYPE_HSCALE, "adjustment", adjustment, NULL);
77 }
78
79 /**
80  * gtk_hscale_new_with_range:
81  * @min: minimum value
82  * @max: maximum value
83  * @step: step increment (tick size) used with keyboard shortcuts
84  * 
85  * Creates a new horizontal scale widget that lets the user input a
86  * number between @min and @max (including @min and @max) with the
87  * increment @step.  @step must be nonzero; it's the distance the
88  * slider moves when using the arrow keys to adjust the scale value.
89  * 
90  * Note that the way in which the precision is derived works best if @step 
91  * is a power of ten. If the resulting precision is not suitable for your 
92  * needs, use gtk_scale_set_digits() to correct it.
93  * 
94  * Return value: a new #GtkHScale
95  **/
96 GtkWidget*
97 gtk_hscale_new_with_range (gdouble min,
98                            gdouble max,
99                            gdouble step)
100 {
101   GtkObject *adj;
102   GtkScale *scale;
103   gint digits;
104
105   g_return_val_if_fail (min < max, NULL);
106   g_return_val_if_fail (step != 0.0, NULL);
107
108   adj = gtk_adjustment_new (min, min, max, step, 10 * step, 0);
109   
110   scale = g_object_new (GTK_TYPE_HSCALE,
111                         "adjustment", adj,
112                         NULL);
113
114   if (fabs (step) >= 1.0 || step == 0.0)
115     digits = 0;
116   else {
117     digits = abs ((gint) floor (log10 (fabs (step))));
118     if (digits > 5)
119       digits = 5;
120   }
121
122   gtk_scale_set_digits (scale, digits);
123   
124   return GTK_WIDGET (scale);
125 }
126
127 static gboolean
128 gtk_hscale_expose (GtkWidget      *widget,
129                    GdkEventExpose *event)
130 {
131   GtkScale *scale;
132   
133   scale = GTK_SCALE (widget);
134
135   /* We need to chain up _first_ so the various geometry members of
136    * GtkRange struct are updated.
137    */
138   if (GTK_WIDGET_CLASS (gtk_hscale_parent_class)->expose_event)
139     GTK_WIDGET_CLASS (gtk_hscale_parent_class)->expose_event (widget, event);
140
141   if (scale->draw_value)
142     {
143       PangoLayout *layout;
144       gint x, y;
145       GtkStateType state_type;
146
147       layout = gtk_scale_get_layout (scale);
148       gtk_scale_get_layout_offsets (scale, &x, &y);
149
150       state_type = GTK_STATE_NORMAL;
151       if (!GTK_WIDGET_IS_SENSITIVE (scale))
152         state_type = GTK_STATE_INSENSITIVE;
153
154       gtk_paint_layout (widget->style,
155                         widget->window,
156                         state_type,
157                         FALSE,
158                         NULL,
159                         widget,
160                         "hscale",
161                         x, y,
162                         layout);
163
164     }
165   
166   return FALSE;
167 }
168
169 static void     
170 gtk_hscale_get_layout_offsets (GtkScale *scale,
171                                gint     *x,
172                                gint     *y)
173 {
174   GtkWidget *widget;
175   GtkRange *range;
176   PangoLayout *layout;
177   PangoRectangle logical_rect;
178   gint value_spacing;
179
180   widget = GTK_WIDGET (scale);
181   layout = gtk_scale_get_layout (scale);
182       
183   if (!layout)    
184     {
185       *x = 0;
186       *y = 0;
187
188       return;
189     }
190
191   gtk_widget_style_get (widget, "value-spacing", &value_spacing, NULL);
192
193   range = GTK_RANGE (widget);
194   scale = GTK_SCALE (widget);
195
196   pango_layout_get_pixel_extents (layout, NULL, &logical_rect);
197       
198   switch (scale->value_pos)
199     {
200      case GTK_POS_LEFT:
201        *x = range->range_rect.x - value_spacing - logical_rect.width;
202        *y = range->range_rect.y + (range->range_rect.height - logical_rect.height) / 2;
203        break;
204           
205     case GTK_POS_RIGHT:
206       *x = range->range_rect.x + range->range_rect.width + value_spacing;
207       *y = range->range_rect.y + (range->range_rect.height - logical_rect.height) / 2;
208       break;
209           
210     case GTK_POS_TOP:
211       *x = range->slider_start +
212         (range->slider_end - range->slider_start - logical_rect.width) / 2;
213       *x = CLAMP (*x, 0, widget->allocation.width - logical_rect.width);
214       *y = range->range_rect.y - logical_rect.height - value_spacing;
215       break;
216           
217     case GTK_POS_BOTTOM:
218       *x = range->slider_start +
219         (range->slider_end - range->slider_start - logical_rect.width) / 2;
220       *x = CLAMP (*x, 0, widget->allocation.width - logical_rect.width);
221       *y = range->range_rect.y + range->range_rect.height + value_spacing;
222       break;
223
224     default:
225       g_return_if_reached ();
226       *x = 0;
227       *y = 0;
228       break;
229     }
230
231   *x += widget->allocation.x;
232   *y += widget->allocation.y;
233 }
234
235 #define __GTK_HSCALE_C__
236 #include "gtkaliasdef.c"