Pileus Git - ~andy/gtk/blob - modules/other/gail/gailscrollbar.c

   1 /* GAIL - The GNOME Accessibility Implementation Library
   2  * Copyright 2001 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 "config.h"
  21
  22 #include <gtk/gtk.h>
  23 #include "gailscrollbar.h"
  24
  25 static void gail_scrollbar_class_init  (GailScrollbarClass *klass);
  26 static void gail_scrollbar_init        (GailScrollbar      *accessible);
  27 static void gail_scrollbar_initialize  (AtkObject           *accessible,
  28                                         gpointer             data);
  29
  30 static gint gail_scrollbar_get_index_in_parent (AtkObject *accessible);
  31
  32 G_DEFINE_TYPE (GailScrollbar, gail_scrollbar, GAIL_TYPE_RANGE)
  33
  34 static void
  35 gail_scrollbar_class_init (GailScrollbarClass *klass)
  36 {
  37   AtkObjectClass *class = ATK_OBJECT_CLASS (klass);
  38
  39   class->initialize = gail_scrollbar_initialize;
  40   class->get_index_in_parent = gail_scrollbar_get_index_in_parent;
  41 }
  42
  43 static void
  44 gail_scrollbar_init (GailScrollbar      *accessible)
  45 {
  46 }
  47
  48 static void
  49 gail_scrollbar_initialize (AtkObject *accessible,
  50                            gpointer  data)
  51 {
  52   ATK_OBJECT_CLASS (gail_scrollbar_parent_class)->initialize (accessible, data);
  53
  54   accessible->role = ATK_ROLE_SCROLL_BAR;
  55 }
  56
  57 static gint
  58 gail_scrollbar_get_index_in_parent (AtkObject *accessible)
  59 {
  60   GtkWidget *widget;
  61   GtkScrolledWindow *scrolled_window;
  62   gint n_children;
  63   GList *children;
  64
  65   widget = gtk_accessible_get_widget (GTK_ACCESSIBLE (accessible));
  66
  67   if (widget == NULL)
  68   {
  69     /*
  70      * State is defunct
  71      */
  72     return -1;
  73   }
  74   g_return_val_if_fail (GTK_IS_SCROLLBAR (widget), -1);
  75
  76   if (!GTK_IS_SCROLLED_WINDOW(widget->parent))
  77     return ATK_OBJECT_CLASS (gail_scrollbar_parent_class)->get_index_in_parent (accessible);
  78
  79   scrolled_window = GTK_SCROLLED_WINDOW (widget->parent);
  80   children = gtk_container_get_children (GTK_CONTAINER (scrolled_window));
  81   n_children = g_list_length (children);
  82   g_list_free (children);
  83
  84   if (GTK_IS_HSCROLLBAR (widget))
  85   {
  86     if (!scrolled_window->hscrollbar_visible)
  87     {
  88       n_children = -1;
  89     }
  90   }
  91   else if (GTK_IS_VSCROLLBAR (widget))
  92   {
  93     if (!scrolled_window->vscrollbar_visible)
  94     {
  95       n_children = -1;
  96     }
  97     else if (scrolled_window->hscrollbar_visible)
  98     {
  99       n_children++;
 100     }
 101   }
 102   else
 103   {
 104     n_children = -1;
 105   }
 106   return n_children;
 107 }