]> Pileus Git - ~andy/gtk/blob - modules/other/gail/gailscrolledwindow.c
024bc2812af5c03a6759af5bb80a5271ede5fa68
[~andy/gtk] / modules / other / gail / gailscrolledwindow.c
1 /* GAIL - The GNOME Accessibility Enabling Library
2  * Copyright 2001, 2002, 2003 Sun Microsystems 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 #include <string.h>
21 #include <gtk/gtk.h>
22 #include "gailscrolledwindow.h"
23
24
25 static void         gail_scrolled_window_class_init     (GailScrolledWindowClass  *klass); 
26 static void         gail_scrolled_window_real_initialize
27                                                         (AtkObject     *obj,
28                                                          gpointer      data);
29
30 static gint         gail_scrolled_window_get_n_children (AtkObject     *object);
31 static AtkObject*   gail_scrolled_window_ref_child      (AtkObject     *obj,
32                                                          gint          child);
33 static void         gail_scrolled_window_scrollbar_visibility_changed 
34                                                         (GObject       *object,
35                                                          GParamSpec    *pspec,
36                                                          gpointer      user_data);
37
38 static GailContainerClass *parent_class = NULL;
39
40 GType
41 gail_scrolled_window_get_type (void)
42 {
43   static GType type = 0;
44
45   if (!type)
46     {
47       static const GTypeInfo tinfo =
48       {
49         sizeof (GailScrolledWindowClass),
50         (GBaseInitFunc) NULL, /* base init */
51         (GBaseFinalizeFunc) NULL, /* base finalize */
52         (GClassInitFunc) gail_scrolled_window_class_init, /* class init */
53         (GClassFinalizeFunc) NULL, /* class finalize */
54         NULL, /* class data */
55         sizeof (GailScrolledWindow), /* instance size */
56         0, /* nb preallocs */
57         (GInstanceInitFunc) NULL, /* instance init */
58         NULL /* value table */
59       };
60
61       type = g_type_register_static (GAIL_TYPE_CONTAINER,
62                                      "GailScrolledWindow", &tinfo, 0);
63     }
64   return type;
65 }
66
67 static void
68 gail_scrolled_window_class_init (GailScrolledWindowClass *klass)
69 {
70   AtkObjectClass  *class = ATK_OBJECT_CLASS (klass);
71
72   parent_class = g_type_class_peek_parent (klass);
73
74   class->get_n_children = gail_scrolled_window_get_n_children;
75   class->ref_child = gail_scrolled_window_ref_child;
76   class->initialize = gail_scrolled_window_real_initialize;
77 }
78
79 AtkObject* 
80 gail_scrolled_window_new (GtkWidget *widget)
81 {
82   GObject *object;
83   AtkObject *accessible;
84   
85   g_return_val_if_fail (GTK_IS_SCROLLED_WINDOW (widget), NULL);
86
87   object = g_object_new (GAIL_TYPE_SCROLLED_WINDOW, NULL);
88
89   accessible = ATK_OBJECT (object);
90   atk_object_initialize (accessible, widget);
91
92   return accessible;
93 }
94
95 static void
96 gail_scrolled_window_real_initialize (AtkObject *obj,
97                                       gpointer  data)
98 {
99   GtkScrolledWindow *window;
100
101   ATK_OBJECT_CLASS (parent_class)->initialize (obj, data);
102
103   window = GTK_SCROLLED_WINDOW (data);
104   g_signal_connect_data (window->hscrollbar, "notify::visible",
105     (GCallback)gail_scrolled_window_scrollbar_visibility_changed, 
106     obj, NULL, FALSE);
107   g_signal_connect_data (window->vscrollbar, "notify::visible",
108     (GCallback)gail_scrolled_window_scrollbar_visibility_changed, 
109     obj, NULL, FALSE);
110
111   obj->role = ATK_ROLE_SCROLL_PANE;
112 }
113
114 static gint
115 gail_scrolled_window_get_n_children (AtkObject *object)
116 {
117   GtkWidget *widget;
118   GtkScrolledWindow *gtk_window;
119   GList *children;
120   gint n_children;
121  
122   widget = GTK_ACCESSIBLE (object)->widget;
123   if (widget == NULL)
124     /* Object is defunct */
125     return 0;
126
127   gtk_window = GTK_SCROLLED_WINDOW (widget);
128    
129   /* Get the number of children returned by the backing GtkScrolledWindow */
130
131   children = gtk_container_get_children (GTK_CONTAINER(gtk_window));
132   n_children = g_list_length (children);
133   g_list_free (children);
134   
135   /* Add one to the count for each visible scrollbar */
136
137   if (gtk_window->hscrollbar_visible)
138     n_children++;
139   if (gtk_window->vscrollbar_visible)
140     n_children++;
141   return n_children;
142 }
143
144 static AtkObject *
145 gail_scrolled_window_ref_child (AtkObject *obj, 
146                                 gint      child)
147 {
148   GtkWidget *widget;
149   GtkScrolledWindow *gtk_window;
150   GList *children, *tmp_list;
151   gint n_children;
152   AtkObject  *accessible = NULL;
153
154   g_return_val_if_fail (child >= 0, NULL);
155
156   widget = GTK_ACCESSIBLE (obj)->widget;
157   if (widget == NULL)
158     /* Object is defunct */
159     return NULL;
160
161   gtk_window = GTK_SCROLLED_WINDOW (widget);
162
163   children = gtk_container_get_children (GTK_CONTAINER (gtk_window));
164   n_children = g_list_length (children);
165
166   if (child == n_children)
167     {
168       if (gtk_window->hscrollbar_visible)
169         accessible = gtk_widget_get_accessible (gtk_window->hscrollbar);
170       else if (gtk_window->vscrollbar_visible)
171         accessible = gtk_widget_get_accessible (gtk_window->vscrollbar);
172     }
173   else if (child == n_children+1 && 
174            gtk_window->hscrollbar_visible &&
175            gtk_window->vscrollbar_visible)
176     accessible = gtk_widget_get_accessible (gtk_window->vscrollbar);
177   else if (child < n_children)
178     {
179       tmp_list = g_list_nth (children, child);
180       if (tmp_list)
181         accessible = gtk_widget_get_accessible (
182                 GTK_WIDGET (tmp_list->data));
183     }
184
185   g_list_free (children);
186   if (accessible)
187     g_object_ref (accessible);
188   return accessible; 
189 }
190
191 static void
192 gail_scrolled_window_scrollbar_visibility_changed (GObject    *object,
193                                                    GParamSpec *pspec,
194                                                    gpointer   user_data)
195 {
196   if (!strcmp (pspec->name, "visible"))
197     {
198       gint index;
199       gint n_children;
200       gboolean child_added = FALSE;
201       GList *children;
202       AtkObject *child;
203       GtkScrolledWindow *gtk_window;
204       GailScrolledWindow *gail_window = GAIL_SCROLLED_WINDOW (user_data);
205       gchar *signal_name;
206
207       gtk_window = GTK_SCROLLED_WINDOW (GTK_ACCESSIBLE (user_data)->widget);
208       if (gtk_window == NULL)
209         return;
210       children = gtk_container_get_children (GTK_CONTAINER (gtk_window));
211       index = n_children = g_list_length (children);
212       g_list_free (children);
213
214       if ((gpointer) object == (gpointer) (gtk_window->hscrollbar))
215         {
216           if (gtk_window->hscrollbar_visible)
217             child_added = TRUE;
218
219           child = gtk_widget_get_accessible (gtk_window->hscrollbar);
220         }
221       else if ((gpointer) object == (gpointer) (gtk_window->vscrollbar))
222         {
223           if (gtk_window->vscrollbar_visible)
224             child_added = TRUE;
225
226           child = gtk_widget_get_accessible (gtk_window->vscrollbar);
227           if (gtk_window->hscrollbar_visible)
228             index = n_children+1;
229         }
230       else 
231         {
232           g_assert_not_reached ();
233           return;
234         }
235
236       if (child_added)
237         signal_name = "children_changed::add";
238       else
239         signal_name = "children_changed::delete";
240
241       g_signal_emit_by_name (gail_window, signal_name, index, child, NULL);
242     }
243 }