libjava/jni/gtk-peer/gnu_java_awt_peer_gtk_GtkScrollPanePeer.c

   1 /* gtkscrollpanepeer.c -- Native implementation of GtkScrollPanePeer
   2    Copyright (C) 1998, 1999, 2002 Free Software Foundation, Inc.
   3
   4 This file is part of GNU Classpath.
   5
   6 GNU Classpath is free software; you can redistribute it and/or modify
   7 it under the terms of the GNU General Public License as published by
   8 the Free Software Foundation; either version 2, or (at your option)
   9 any later version.
  10
  11 GNU Classpath is distributed in the hope that it will be useful, but
  12 WITHOUT ANY WARRANTY; without even the implied warranty of
  13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14 General Public License for more details.
  15
  16 You should have received a copy of the GNU General Public License
  17 along with GNU Classpath; see the file COPYING.  If not, write to the
  18 Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
  19 02111-1307 USA.
  20
  21 Linking this library statically or dynamically with other modules is
  22 making a combined work based on this library.  Thus, the terms and
  23 conditions of the GNU General Public License cover the whole
  24 combination.
  25
  26 As a special exception, the copyright holders of this library give you
  27 permission to link this library with independent modules to produce an
  28 executable, regardless of the license terms of these independent
  29 modules, and to copy and distribute the resulting executable under
  30 terms of your choice, provided that you also meet, for each linked
  31 independent module, the terms and conditions of the license of that
  32 module.  An independent module is a module which is not derived from
  33 or based on this library.  If you modify this library, you may extend
  34 this exception to your version of the library, but you are not
  35 obligated to do so.  If you do not wish to do so, delete this
  36 exception statement from your version. */
  37
  38
  39 #include "gtkpeer.h"
  40 #include "gnu_java_awt_peer_gtk_GtkScrollPanePeer.h"
  41
  42 JNIEXPORT void JNICALL
  43 Java_gnu_java_awt_peer_gtk_GtkScrollPanePeer_create
  44   (JNIEnv *env, jobject obj)
  45 {
  46   gpointer window;
  47   GtkWidget *layout;
  48
  49   gdk_threads_enter ();
  50   window = gtk_scrolled_window_new (NULL, NULL);
  51   gdk_threads_leave ();
  52
  53   NSA_SET_PTR (env, obj, window);
  54 }
  55
  56 JNIEXPORT void JNICALL
  57 Java_gnu_java_awt_peer_gtk_GtkScrollPanePeer_setScrollPosition
  58   (JNIEnv *env, jobject obj, jint x, jint y)
  59 {
  60   GtkAdjustment *hadj, *vadj;
  61   GtkScrolledWindow *sw;
  62   void *ptr;
  63
  64   ptr = NSA_GET_PTR (env, obj);
  65
  66   gdk_threads_enter ();
  67   sw = GTK_SCROLLED_WINDOW (ptr);
  68
  69   hadj = gtk_scrolled_window_get_hadjustment (sw);
  70   vadj = gtk_scrolled_window_get_vadjustment (sw);
  71
  72   gtk_adjustment_set_value (hadj, x);
  73   gtk_adjustment_set_value (vadj, y);
  74   gdk_threads_leave ();
  75 }
  76
  77 JNIEXPORT void JNICALL
  78 Java_gnu_java_awt_peer_gtk_GtkScrollPanePeer_gtkScrolledWindowSetHScrollIncrement
  79   (JNIEnv *env, jobject obj, jint u)
  80 {
  81   GtkAdjustment *hadj;
  82   GtkScrolledWindow *sw;
  83   void *ptr;
  84
  85   ptr = NSA_GET_PTR (env, obj);
  86
  87   gdk_threads_enter ();
  88   sw = GTK_SCROLLED_WINDOW(ptr);
  89
  90   hadj = gtk_scrolled_window_get_hadjustment (sw);
  91   hadj->step_increment = u;
  92
  93   gdk_threads_leave ();
  94 }
  95
  96 JNIEXPORT void JNICALL
  97 Java_gnu_java_awt_peer_gtk_GtkScrollPanePeer_gtkScrolledWindowSetVScrollIncrement
  98   (JNIEnv *env, jobject obj, jint u)
  99 {
 100   GtkAdjustment *vadj;
 101   GtkScrolledWindow *sw;
 102   void *ptr;
 103
 104   ptr = NSA_GET_PTR (env, obj);
 105
 106   gdk_threads_enter ();
 107   sw = GTK_SCROLLED_WINDOW(ptr);
 108
 109   vadj = gtk_scrolled_window_get_hadjustment (sw);
 110   vadj->step_increment = u;
 111
 112   gdk_threads_leave ();
 113 }
 114
 115 JNIEXPORT void JNICALL
 116 Java_gnu_java_awt_peer_gtk_GtkScrollPanePeer_childResized
 117   (JNIEnv *env, jobject obj, jint width, jint height)
 118 {
 119   void *ptr;
 120
 121   ptr = NSA_GET_PTR (env, obj);
 122
 123   return;
 124
 125   gdk_threads_enter ();
 126   gtk_widget_set_usize (GTK_BIN (ptr)->child, width, height);
 127   gdk_threads_leave ();
 128 }
 129
 130 JNIEXPORT jint JNICALL
 131 Java_gnu_java_awt_peer_gtk_GtkScrollPanePeer_getHScrollbarHeight
 132   (JNIEnv *env, jobject obj)
 133 {
 134   void *ptr;
 135   GtkScrolledWindow *sw;
 136   jint height;
 137
 138   ptr = NSA_GET_PTR (env, obj);
 139
 140   gdk_threads_enter ();
 141   sw = GTK_SCROLLED_WINDOW (ptr);
 142   height = (sw->hscrollbar_visible) ? sw->hscrollbar->allocation.height : 0;
 143   gdk_threads_leave ();
 144
 145   return height;
 146 }
 147
 148 JNIEXPORT jint JNICALL
 149 Java_gnu_java_awt_peer_gtk_GtkScrollPanePeer_getVScrollbarWidth
 150   (JNIEnv *env, jobject obj)
 151 {
 152   void *ptr;
 153   GtkScrolledWindow *sw;
 154   jint width;
 155
 156   ptr = NSA_GET_PTR (env, obj);
 157
 158   gdk_threads_enter ();
 159   sw = GTK_SCROLLED_WINDOW (ptr);
 160   width = (sw->vscrollbar_visible) ? sw->vscrollbar->allocation.width : 0;
 161   gdk_threads_leave ();
 162
 163   return width;
 164 }
 165
 166 JNIEXPORT void JNICALL
 167 Java_gnu_java_awt_peer_gtk_GtkScrollPanePeer_setPolicy
 168   (JNIEnv *env, jobject obj, jint policy)
 169 {
 170   void *ptr;
 171
 172   ptr = NSA_GET_PTR (env, obj);
 173
 174   switch (policy)
 175     {
 176     case AWT_SCROLLPANE_SCROLLBARS_AS_NEEDED:
 177       policy = GTK_POLICY_AUTOMATIC;
 178       break;
 179     case AWT_SCROLLPANE_SCROLLBARS_ALWAYS:
 180       policy = GTK_POLICY_ALWAYS;
 181       break;
 182     case AWT_SCROLLPANE_SCROLLBARS_NEVER:
 183       policy = GTK_POLICY_NEVER;
 184       break;
 185     }
 186
 187   gdk_threads_enter ();
 188   gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (ptr), policy, policy);
 189   gdk_threads_leave ();
 190 }