jdk/src/solaris/native/sun/awt/awt_Scrollbar.c - platform/libcore - Gitiles

 /*
  * Copyright 1995-2004 Sun Microsystems, Inc.  All Rights Reserved.
  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
  *
  * This code is free software; you can redistribute it and/or modify it
  * under the terms of the GNU General Public License version 2 only, as
  * published by the Free Software Foundation.  Sun designates this
  * particular file as subject to the "Classpath" exception as provided
  * by Sun in the LICENSE file that accompanied this code.
  *
  * This code 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 General Public License
  * version 2 for more details (a copy is included in the LICENSE file that
  * accompanied this code).
  *
  * You should have received a copy of the GNU General Public License version
  * 2 along with this work; if not, write to the Free Software Foundation,
  * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
  *
  * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
  * CA 95054 USA or visit www.sun.com if you need additional information or
  * have any questions.
  */

 #ifdef HEADLESS
     #error This file should not be included in headless library
 #endif

 #include "awt_p.h"
 #include "java_awt_Scrollbar.h"
 #include "java_awt_event_MouseEvent.h"
 #include "sun_awt_motif_MScrollbarPeer.h"
 #include "sun_awt_motif_MComponentPeer.h"

 #include "awt_Component.h"
 #include "canvas.h"

 #include <jni.h>
 #include <jni_util.h>
 #include "multi_font.h"


 extern struct MComponentPeerIDs mComponentPeerIDs;
 extern AwtGraphicsConfigDataPtr
     copyGraphicsConfigToPeer(JNIEnv *env, jobject this);

 /* fieldIDs for java.awt.Scrollbar fields that may be accessed from C */
 static struct ScrollbarIDs {
     jfieldID orientation;
     jfieldID visibleAmount;
     jfieldID lineIncrement;
     jfieldID pageIncrement;
     jfieldID value;
     jfieldID minimum;
     jfieldID maximum;
 } targetIDs;

 /* MScrollbarPeer callback methods */
 static struct {
     jmethodID lineUp;
     jmethodID lineDown;
     jmethodID pageUp;
     jmethodID pageDown;
     jmethodID drag;
     jmethodID dragEnd;
     jmethodID warp;
 } peerIDs;


 /*
  * Class:     java_awt_ScrollBar
  * Method:    initIDs
  * Signature: ()V
  */

 /* This function gets called from the static initializer for
    Scrollbar.java to initialize the fieldIDs for fields that may
    be accessed from C */

 JNIEXPORT void JNICALL
 Java_java_awt_Scrollbar_initIDs(JNIEnv *env, jclass cls)
 {
     targetIDs.orientation =
       (*env)->GetFieldID(env, cls, "orientation", "I");
     targetIDs.visibleAmount =
       (*env)->GetFieldID(env, cls, "visibleAmount", "I");
     targetIDs.lineIncrement =
       (*env)->GetFieldID(env, cls, "lineIncrement", "I");
     targetIDs.pageIncrement =
       (*env)->GetFieldID(env, cls, "pageIncrement", "I");
     targetIDs.value =
       (*env)->GetFieldID(env, cls, "value", "I");
     targetIDs.minimum =
       (*env)->GetFieldID(env, cls, "minimum", "I");
     targetIDs.maximum =
       (*env)->GetFieldID(env, cls, "maximum", "I");
 }


 /*
  * Class:     sun_awt_motif_MComponentPeer
  * Method:    initIDs
  * Signature: ()V
  */

 /* This function gets called from the static initializer for
    MScrollbarPeer to initialize the JNI ids for fields and methods
    that may be accessed from C */

 JNIEXPORT void JNICALL
 Java_sun_awt_motif_MScrollbarPeer_initIDs(JNIEnv *env, jclass cls)
 {
     peerIDs.lineUp =
         (*env)->GetMethodID(env, cls, "lineUp",   "(I)V");
     peerIDs.lineDown =
         (*env)->GetMethodID(env, cls, "lineDown", "(I)V");
     peerIDs.pageUp =
         (*env)->GetMethodID(env, cls, "pageUp",   "(I)V");
     peerIDs.pageDown =
         (*env)->GetMethodID(env, cls, "pageDown", "(I)V");
     peerIDs.drag =
         (*env)->GetMethodID(env, cls, "drag",     "(I)V");
     peerIDs.dragEnd =
         (*env)->GetMethodID(env, cls, "dragEnd",  "(I)V");
     peerIDs.warp =
         (*env)->GetMethodID(env, cls, "warp",     "(I)V");
 }

 /*
  * Call peer.jcallback(value)
  */
 static void
 DoJavaCallback(jobject peer, jmethodID jcallback, jint value)
 {
     JNIEnv *env = (JNIEnv *)JNU_GetEnv(jvm, JNI_VERSION_1_2);
     (*env)->CallVoidMethod(env, peer, jcallback, value);
     if ((*env)->ExceptionOccurred(env)) {
         (*env)->ExceptionDescribe(env);
         (*env)->ExceptionClear(env);
     }
 }


 static void /* XtCallbackProc */
 decrementCallback(Widget w, jobject peer,
     XmScrollBarCallbackStruct *scroll)
 {
     DASSERT(scroll->reason == XmCR_DECREMENT);
     DoJavaCallback(peer, peerIDs.lineUp, scroll->value);
 }

 static void /* XtCallbackProc */
 incrementCallback(Widget w, jobject peer,
     XmScrollBarCallbackStruct *scroll)
 {
     DASSERT(scroll->reason == XmCR_INCREMENT);
     DoJavaCallback(peer, peerIDs.lineDown, scroll->value);
 }

 static void /* XtCallbackProc */
 pageDecrementCallback(Widget w, jobject peer,
     XmScrollBarCallbackStruct *scroll)
 {
     DASSERT(scroll->reason == XmCR_PAGE_DECREMENT);
     DoJavaCallback(peer, peerIDs.pageUp, scroll->value);
 }

 static void /* XtCallbackProc */
 pageIncrementCallback(Widget w, jobject peer,
     XmScrollBarCallbackStruct *scroll)
 {
     DASSERT(scroll->reason == XmCR_PAGE_INCREMENT);
     DoJavaCallback(peer, peerIDs.pageDown, scroll->value);
 }

 static void /* XtCallbackProc */
 dragCallback(Widget w, jobject peer,
     XmScrollBarCallbackStruct *scroll)
 {
     DASSERT(scroll->reason == XmCR_DRAG);
     DoJavaCallback(peer, peerIDs.drag, scroll->value);
 }

 static void /* XtCallbackProc */
 dragEndCallback(Widget w, jobject peer,
     XmScrollBarCallbackStruct *scroll)
 {
     DASSERT(scroll->reason == XmCR_VALUE_CHANGED);
     DoJavaCallback(peer, peerIDs.dragEnd, scroll->value);
 }

 static void /* XtCallbackProc */
 toTopCallback(Widget w, jobject peer,
     XmScrollBarCallbackStruct *scroll)
 {
     DASSERT(scroll->reason == XmCR_TO_TOP);
     DoJavaCallback(peer, peerIDs.warp, scroll->value);
 }

 static void /* XtCallbackProc */
 toBottomCallback(Widget w, jobject peer,
     XmScrollBarCallbackStruct *scroll)
 {
     DASSERT(scroll->reason == XmCR_TO_BOTTOM);
     DoJavaCallback(peer, peerIDs.warp, scroll->value);
 }


 /*
  * Class:     sun_awt_motif_MScrollbarPeer
  * Method:    create
  * Signature: (Lsun/awt/motif/MComponentPeer;)V
  */
 JNIEXPORT void JNICALL
 Java_sun_awt_motif_MScrollbarPeer_create(JNIEnv *env, jobject this,
     jobject parent)
 {
     Widget w;

     jobject target;
     XtPointer globalRef = (XtPointer) /* jobject */
         awtJNI_CreateAndSetGlobalRef(env, this);

     struct ComponentData *pdata; /* for parent     */
     struct ComponentData *sdata; /* for scrollbar */
     AwtGraphicsConfigDataPtr adata;

     int32_t value, visible, minimum, maximum;
     int32_t lineIncrement, pageIncrement;
     Pixel bg;

 #define MAX_ARGC 20
     Arg args[MAX_ARGC];
     int32_t argc = 0;


     AWT_LOCK();

     if (JNU_IsNull(env, parent)) {
         JNU_ThrowNullPointerException(env, "NullPointerException");
         AWT_UNLOCK();
         return;
     }

     pdata = (struct ComponentData *)
         JNU_GetLongFieldAsPtr(env, parent, mComponentPeerIDs.pData);

     target = (*env)->GetObjectField(env, this, mComponentPeerIDs.target);

     if (JNU_IsNull(env, target) || pdata == NULL) {
         JNU_ThrowNullPointerException(env, "NullPointerException");
         AWT_UNLOCK();
         return;
     }


     switch ((*env)->GetIntField(env, target, targetIDs.orientation)) {
       case java_awt_Scrollbar_HORIZONTAL:
           XtSetArg(args[argc], XmNorientation, XmHORIZONTAL);
           argc++;
           break;

       case java_awt_Scrollbar_VERTICAL:
           XtSetArg(args[argc], XmNorientation, XmVERTICAL);
           argc++;
           break;

       default:
           JNU_ThrowIllegalArgumentException(env, "bad scrollbar orientation");
           AWT_UNLOCK();
           return;
     }

     adata = copyGraphicsConfigToPeer(env, this);
     XtVaGetValues(pdata->widget, XmNbackground, &bg, NULL);

     visible = (int32_t) (*env)->GetIntField(env, target, targetIDs.visibleAmount);
     value   = (int32_t) (*env)->GetIntField(env, target, targetIDs.value);
     minimum = (int32_t) (*env)->GetIntField(env, target, targetIDs.minimum);
     maximum = (int32_t) (*env)->GetIntField(env, target, targetIDs.maximum);
     lineIncrement =
               (int32_t) (*env)->GetIntField(env, target, targetIDs.lineIncrement);
     pageIncrement =
               (int32_t) (*env)->GetIntField(env, target, targetIDs.pageIncrement);

     /*
      * Sanity check.  Scrollbar.setValues should have taken care.
      */
     DASSERT(maximum > minimum);
     DASSERT(visible <= maximum - minimum);
     DASSERT(visible >= 1);
     DASSERT(value >= minimum);
     DASSERT(value <= maximum - visible);

     XtSetArg(args[argc], XmNx,             0);                  argc++;
     XtSetArg(args[argc], XmNy,             0);                  argc++;
     XtSetArg(args[argc], XmNvalue,         value);              argc++;
     XtSetArg(args[argc], XmNsliderSize,    visible);            argc++;
     XtSetArg(args[argc], XmNminimum,       minimum);            argc++;
     XtSetArg(args[argc], XmNmaximum,       maximum);            argc++;
     XtSetArg(args[argc], XmNincrement,     lineIncrement);      argc++;
     XtSetArg(args[argc], XmNpageIncrement, pageIncrement);      argc++;
     XtSetArg(args[argc], XmNbackground,    bg);                 argc++;
     XtSetArg(args[argc], XmNrecomputeSize, False);              argc++;
     XtSetArg(args[argc], XmNuserData,      globalRef);          argc++;
     XtSetArg(args[argc], XmNscreen,
                              ScreenOfDisplay(awt_display,
                                  adata->awt_visInfo.screen));   argc++;

     DASSERT(argc <= MAX_ARGC);  /* sanity check */

     sdata = ZALLOC(ComponentData);
     if (sdata == NULL) {
         JNU_ThrowOutOfMemoryError(env, "OutOfMemoryError");
         AWT_UNLOCK();
         return;
     }

     JNU_SetLongFieldFromPtr(env, this, mComponentPeerIDs.pData, sdata);

     sdata->widget = w =
         XmCreateScrollBar(pdata->widget, "scrollbar", args, argc);

     XtAddCallback(w, XmNdecrementCallback,
         (XtCallbackProc)decrementCallback, globalRef);
     XtAddCallback(w, XmNincrementCallback,
         (XtCallbackProc)incrementCallback, globalRef);
     XtAddCallback(w, XmNpageDecrementCallback,
         (XtCallbackProc)pageDecrementCallback, globalRef);
     XtAddCallback(w, XmNpageIncrementCallback,
         (XtCallbackProc)pageIncrementCallback, globalRef);
     XtAddCallback(w, XmNtoTopCallback,
         (XtCallbackProc)toTopCallback, globalRef);
     XtAddCallback(w, XmNtoBottomCallback,
         (XtCallbackProc)toBottomCallback, globalRef);
     XtAddCallback(w, XmNdragCallback,
         (XtCallbackProc)dragCallback, globalRef);
     XtAddCallback(w, XmNvalueChangedCallback,
         (XtCallbackProc)dragEndCallback, globalRef);

     /* Set up workaround for the continuous scrolling bug */
     XtAddEventHandler(w, ButtonReleaseMask, False,
         awt_motif_Scrollbar_ButtonReleaseHandler, NULL);

     /* Fix for 4955950. ButtonRelease & MotionNotify should be handled as well */
     XtAddEventHandler(w, ButtonPressMask | ButtonReleaseMask | PointerMotionMask,
                       False, awt_canvas_event_handler, globalRef);

     XtSetMappedWhenManaged(w, False);
     XtManageChild(w);

     AWT_UNLOCK();
 }

 /*
  * Class:     sun_awt_motif_MScrollbarPeer
  * Method:    pSetValues
  * Signature: (IIII)V
  */
 JNIEXPORT void JNICALL
 Java_sun_awt_motif_MScrollbarPeer_pSetValues(JNIEnv *env, jobject this,
     jint value, jint visible, jint minimum, jint maximum)
 {
     struct ComponentData *sdata;

     AWT_LOCK();

     sdata = (struct ComponentData *)
         JNU_GetLongFieldAsPtr(env, this, mComponentPeerIDs.pData);
     if (sdata == NULL) {
         JNU_ThrowNullPointerException(env, "NullPointerException");
         AWT_UNLOCK();
         return;
     }
     /* pass in visible for sliderSize since Motif will calculate the */
     /* slider's size for us. */
     XtVaSetValues(sdata->widget,
                   XmNminimum, minimum,
                   XmNmaximum, maximum,
                   XmNvalue, value,
                   XmNsliderSize, visible,
                   NULL);
     AWT_FLUSH_UNLOCK();
 }


 /*
  * Class:     sun_awt_motif_MScrollbarPeer
  * Method:    setLineIncrement
  * Signature: (I)V
  */
 JNIEXPORT void JNICALL
 Java_sun_awt_motif_MScrollbarPeer_setLineIncrement(JNIEnv *env, jobject this,
     jint value)
 {
     struct ComponentData *sdata;

     AWT_LOCK();

     sdata = (struct ComponentData *)
         JNU_GetLongFieldAsPtr(env, this, mComponentPeerIDs.pData);
     if (sdata == NULL) {
         JNU_ThrowNullPointerException(env, "NullPointerException");
         AWT_UNLOCK();
         return;
     }
     XtVaSetValues(sdata->widget,
                   XmNincrement, value,
                   NULL);
     AWT_FLUSH_UNLOCK();
 }


 /*
  * Class:     sun_awt_motif_MScrollbarPeer
  * Method:    setPageIncrement
  * Signature: (I)V
  */
 JNIEXPORT void JNICALL
 Java_sun_awt_motif_MScrollbarPeer_setPageIncrement(JNIEnv *env, jobject this,
     jint value)
 {
     struct ComponentData *sdata;

     AWT_LOCK();

     sdata = (struct ComponentData *)
         JNU_GetLongFieldAsPtr(env, this, mComponentPeerIDs.pData);
     if (sdata == NULL) {
         JNU_ThrowNullPointerException(env, "NullPointerException");
         AWT_UNLOCK();
         return;
     }
     XtVaSetValues(sdata->widget,
                   XmNpageIncrement, value,
                   NULL);
     AWT_FLUSH_UNLOCK();
 }
	/*
	* Copyright 1995-2004 Sun Microsystems, Inc. All Rights Reserved.
	* DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
	*
	* This code is free software; you can redistribute it and/or modify it
	* under the terms of the GNU General Public License version 2 only, as
	* published by the Free Software Foundation. Sun designates this
	* particular file as subject to the "Classpath" exception as provided
	* by Sun in the LICENSE file that accompanied this code.
	*
	* This code 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 General Public License
	* version 2 for more details (a copy is included in the LICENSE file that
	* accompanied this code).
	*
	* You should have received a copy of the GNU General Public License version
	* 2 along with this work; if not, write to the Free Software Foundation,
	* Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
	*
	* Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
	* CA 95054 USA or visit www.sun.com if you need additional information or
	* have any questions.
	*/

	#ifdef HEADLESS
	#error This file should not be included in headless library
	#endif

	#include "awt_p.h"
	#include "java_awt_Scrollbar.h"
	#include "java_awt_event_MouseEvent.h"
	#include "sun_awt_motif_MScrollbarPeer.h"
	#include "sun_awt_motif_MComponentPeer.h"

	#include "awt_Component.h"
	#include "canvas.h"

	#include <jni.h>
	#include <jni_util.h>
	#include "multi_font.h"


	extern struct MComponentPeerIDs mComponentPeerIDs;
	extern AwtGraphicsConfigDataPtr
	copyGraphicsConfigToPeer(JNIEnv *env, jobject this);

	/* fieldIDs for java.awt.Scrollbar fields that may be accessed from C */
	static struct ScrollbarIDs {
	jfieldID orientation;
	jfieldID visibleAmount;
	jfieldID lineIncrement;
	jfieldID pageIncrement;
	jfieldID value;
	jfieldID minimum;
	jfieldID maximum;
	} targetIDs;

	/* MScrollbarPeer callback methods */
	static struct {
	jmethodID lineUp;
	jmethodID lineDown;
	jmethodID pageUp;
	jmethodID pageDown;
	jmethodID drag;
	jmethodID dragEnd;
	jmethodID warp;
	} peerIDs;



	/*
	* Class: java_awt_ScrollBar
	* Method: initIDs
	* Signature: ()V
	*/

	/* This function gets called from the static initializer for
	Scrollbar.java to initialize the fieldIDs for fields that may
	be accessed from C */

	JNIEXPORT void JNICALL
	Java_java_awt_Scrollbar_initIDs(JNIEnv *env, jclass cls)
	{
	targetIDs.orientation =
	(*env)->GetFieldID(env, cls, "orientation", "I");
	targetIDs.visibleAmount =
	(*env)->GetFieldID(env, cls, "visibleAmount", "I");
	targetIDs.lineIncrement =
	(*env)->GetFieldID(env, cls, "lineIncrement", "I");
	targetIDs.pageIncrement =
	(*env)->GetFieldID(env, cls, "pageIncrement", "I");
	targetIDs.value =
	(*env)->GetFieldID(env, cls, "value", "I");
	targetIDs.minimum =
	(*env)->GetFieldID(env, cls, "minimum", "I");
	targetIDs.maximum =
	(*env)->GetFieldID(env, cls, "maximum", "I");
	}


	/*
	* Class: sun_awt_motif_MComponentPeer
	* Method: initIDs
	* Signature: ()V
	*/

	/* This function gets called from the static initializer for
	MScrollbarPeer to initialize the JNI ids for fields and methods
	that may be accessed from C */

	JNIEXPORT void JNICALL
	Java_sun_awt_motif_MScrollbarPeer_initIDs(JNIEnv *env, jclass cls)
	{
	peerIDs.lineUp =
	(*env)->GetMethodID(env, cls, "lineUp", "(I)V");
	peerIDs.lineDown =
	(*env)->GetMethodID(env, cls, "lineDown", "(I)V");
	peerIDs.pageUp =
	(*env)->GetMethodID(env, cls, "pageUp", "(I)V");
	peerIDs.pageDown =
	(*env)->GetMethodID(env, cls, "pageDown", "(I)V");
	peerIDs.drag =
	(*env)->GetMethodID(env, cls, "drag", "(I)V");
	peerIDs.dragEnd =
	(*env)->GetMethodID(env, cls, "dragEnd", "(I)V");
	peerIDs.warp =
	(*env)->GetMethodID(env, cls, "warp", "(I)V");
	}

	/*
	* Call peer.jcallback(value)
	*/
	static void
	DoJavaCallback(jobject peer, jmethodID jcallback, jint value)
	{
	JNIEnv env = (JNIEnv )JNU_GetEnv(jvm, JNI_VERSION_1_2);
	(*env)->CallVoidMethod(env, peer, jcallback, value);
	if ((*env)->ExceptionOccurred(env)) {
	(*env)->ExceptionDescribe(env);
	(*env)->ExceptionClear(env);
	}
	}


	static void /* XtCallbackProc */
	decrementCallback(Widget w, jobject peer,
	XmScrollBarCallbackStruct *scroll)
	{
	DASSERT(scroll->reason == XmCR_DECREMENT);
	DoJavaCallback(peer, peerIDs.lineUp, scroll->value);
	}

	static void /* XtCallbackProc */
	incrementCallback(Widget w, jobject peer,
	XmScrollBarCallbackStruct *scroll)
	{
	DASSERT(scroll->reason == XmCR_INCREMENT);
	DoJavaCallback(peer, peerIDs.lineDown, scroll->value);
	}

	static void /* XtCallbackProc */
	pageDecrementCallback(Widget w, jobject peer,
	XmScrollBarCallbackStruct *scroll)
	{
	DASSERT(scroll->reason == XmCR_PAGE_DECREMENT);
	DoJavaCallback(peer, peerIDs.pageUp, scroll->value);
	}

	static void /* XtCallbackProc */
	pageIncrementCallback(Widget w, jobject peer,
	XmScrollBarCallbackStruct *scroll)
	{
	DASSERT(scroll->reason == XmCR_PAGE_INCREMENT);
	DoJavaCallback(peer, peerIDs.pageDown, scroll->value);
	}

	static void /* XtCallbackProc */
	dragCallback(Widget w, jobject peer,
	XmScrollBarCallbackStruct *scroll)
	{
	DASSERT(scroll->reason == XmCR_DRAG);
	DoJavaCallback(peer, peerIDs.drag, scroll->value);
	}

	static void /* XtCallbackProc */
	dragEndCallback(Widget w, jobject peer,
	XmScrollBarCallbackStruct *scroll)
	{
	DASSERT(scroll->reason == XmCR_VALUE_CHANGED);
	DoJavaCallback(peer, peerIDs.dragEnd, scroll->value);
	}

	static void /* XtCallbackProc */
	toTopCallback(Widget w, jobject peer,
	XmScrollBarCallbackStruct *scroll)
	{
	DASSERT(scroll->reason == XmCR_TO_TOP);
	DoJavaCallback(peer, peerIDs.warp, scroll->value);
	}

	static void /* XtCallbackProc */
	toBottomCallback(Widget w, jobject peer,
	XmScrollBarCallbackStruct *scroll)
	{
	DASSERT(scroll->reason == XmCR_TO_BOTTOM);
	DoJavaCallback(peer, peerIDs.warp, scroll->value);
	}


	/*
	* Class: sun_awt_motif_MScrollbarPeer
	* Method: create
	* Signature: (Lsun/awt/motif/MComponentPeer;)V
	*/
	JNIEXPORT void JNICALL
	Java_sun_awt_motif_MScrollbarPeer_create(JNIEnv *env, jobject this,
	jobject parent)
	{
	Widget w;

	jobject target;
	XtPointer globalRef = (XtPointer) /* jobject */
	awtJNI_CreateAndSetGlobalRef(env, this);

	struct ComponentData pdata; / for parent */
	struct ComponentData sdata; / for scrollbar */
	AwtGraphicsConfigDataPtr adata;

	int32_t value, visible, minimum, maximum;
	int32_t lineIncrement, pageIncrement;
	Pixel bg;

	#define MAX_ARGC 20
	Arg args[MAX_ARGC];
	int32_t argc = 0;


	AWT_LOCK();

	if (JNU_IsNull(env, parent)) {
	JNU_ThrowNullPointerException(env, "NullPointerException");
	AWT_UNLOCK();
	return;
	}

	pdata = (struct ComponentData *)
	JNU_GetLongFieldAsPtr(env, parent, mComponentPeerIDs.pData);

	target = (*env)->GetObjectField(env, this, mComponentPeerIDs.target);

	if (JNU_IsNull(env, target) \|\| pdata == NULL) {
	JNU_ThrowNullPointerException(env, "NullPointerException");
	AWT_UNLOCK();
	return;
	}


	switch ((*env)->GetIntField(env, target, targetIDs.orientation)) {
	case java_awt_Scrollbar_HORIZONTAL:
	XtSetArg(args[argc], XmNorientation, XmHORIZONTAL);
	argc++;
	break;

	case java_awt_Scrollbar_VERTICAL:
	XtSetArg(args[argc], XmNorientation, XmVERTICAL);
	argc++;
	break;

	default:
	JNU_ThrowIllegalArgumentException(env, "bad scrollbar orientation");
	AWT_UNLOCK();
	return;
	}

	adata = copyGraphicsConfigToPeer(env, this);
	XtVaGetValues(pdata->widget, XmNbackground, &bg, NULL);

	visible = (int32_t) (*env)->GetIntField(env, target, targetIDs.visibleAmount);
	value = (int32_t) (*env)->GetIntField(env, target, targetIDs.value);
	minimum = (int32_t) (*env)->GetIntField(env, target, targetIDs.minimum);
	maximum = (int32_t) (*env)->GetIntField(env, target, targetIDs.maximum);
	lineIncrement =
	(int32_t) (*env)->GetIntField(env, target, targetIDs.lineIncrement);
	pageIncrement =
	(int32_t) (*env)->GetIntField(env, target, targetIDs.pageIncrement);

	/*
	* Sanity check. Scrollbar.setValues should have taken care.
	*/
	DASSERT(maximum > minimum);
	DASSERT(visible <= maximum - minimum);
	DASSERT(visible >= 1);
	DASSERT(value >= minimum);
	DASSERT(value <= maximum - visible);

	XtSetArg(args[argc], XmNx, 0); argc++;
	XtSetArg(args[argc], XmNy, 0); argc++;
	XtSetArg(args[argc], XmNvalue, value); argc++;
	XtSetArg(args[argc], XmNsliderSize, visible); argc++;
	XtSetArg(args[argc], XmNminimum, minimum); argc++;
	XtSetArg(args[argc], XmNmaximum, maximum); argc++;
	XtSetArg(args[argc], XmNincrement, lineIncrement); argc++;
	XtSetArg(args[argc], XmNpageIncrement, pageIncrement); argc++;
	XtSetArg(args[argc], XmNbackground, bg); argc++;
	XtSetArg(args[argc], XmNrecomputeSize, False); argc++;
	XtSetArg(args[argc], XmNuserData, globalRef); argc++;
	XtSetArg(args[argc], XmNscreen,
	ScreenOfDisplay(awt_display,
	adata->awt_visInfo.screen)); argc++;

	DASSERT(argc <= MAX_ARGC); /* sanity check */

	sdata = ZALLOC(ComponentData);
	if (sdata == NULL) {
	JNU_ThrowOutOfMemoryError(env, "OutOfMemoryError");
	AWT_UNLOCK();
	return;
	}

	JNU_SetLongFieldFromPtr(env, this, mComponentPeerIDs.pData, sdata);

	sdata->widget = w =
	XmCreateScrollBar(pdata->widget, "scrollbar", args, argc);

	XtAddCallback(w, XmNdecrementCallback,
	(XtCallbackProc)decrementCallback, globalRef);
	XtAddCallback(w, XmNincrementCallback,
	(XtCallbackProc)incrementCallback, globalRef);
	XtAddCallback(w, XmNpageDecrementCallback,
	(XtCallbackProc)pageDecrementCallback, globalRef);
	XtAddCallback(w, XmNpageIncrementCallback,
	(XtCallbackProc)pageIncrementCallback, globalRef);
	XtAddCallback(w, XmNtoTopCallback,
	(XtCallbackProc)toTopCallback, globalRef);
	XtAddCallback(w, XmNtoBottomCallback,
	(XtCallbackProc)toBottomCallback, globalRef);
	XtAddCallback(w, XmNdragCallback,
	(XtCallbackProc)dragCallback, globalRef);
	XtAddCallback(w, XmNvalueChangedCallback,
	(XtCallbackProc)dragEndCallback, globalRef);

	/* Set up workaround for the continuous scrolling bug */
	XtAddEventHandler(w, ButtonReleaseMask, False,
	awt_motif_Scrollbar_ButtonReleaseHandler, NULL);

	/* Fix for 4955950. ButtonRelease & MotionNotify should be handled as well */
	XtAddEventHandler(w, ButtonPressMask \| ButtonReleaseMask \| PointerMotionMask,
	False, awt_canvas_event_handler, globalRef);

	XtSetMappedWhenManaged(w, False);
	XtManageChild(w);

	AWT_UNLOCK();
	}

	/*
	* Class: sun_awt_motif_MScrollbarPeer
	* Method: pSetValues
	* Signature: (IIII)V
	*/
	JNIEXPORT void JNICALL
	Java_sun_awt_motif_MScrollbarPeer_pSetValues(JNIEnv *env, jobject this,
	jint value, jint visible, jint minimum, jint maximum)
	{
	struct ComponentData *sdata;

	AWT_LOCK();

	sdata = (struct ComponentData *)
	JNU_GetLongFieldAsPtr(env, this, mComponentPeerIDs.pData);
	if (sdata == NULL) {
	JNU_ThrowNullPointerException(env, "NullPointerException");
	AWT_UNLOCK();
	return;
	}
	/* pass in visible for sliderSize since Motif will calculate the */
	/* slider's size for us. */
	XtVaSetValues(sdata->widget,
	XmNminimum, minimum,
	XmNmaximum, maximum,
	XmNvalue, value,
	XmNsliderSize, visible,
	NULL);
	AWT_FLUSH_UNLOCK();
	}


	/*
	* Class: sun_awt_motif_MScrollbarPeer
	* Method: setLineIncrement
	* Signature: (I)V
	*/
	JNIEXPORT void JNICALL
	Java_sun_awt_motif_MScrollbarPeer_setLineIncrement(JNIEnv *env, jobject this,
	jint value)
	{
	struct ComponentData *sdata;

	AWT_LOCK();

	sdata = (struct ComponentData *)
	JNU_GetLongFieldAsPtr(env, this, mComponentPeerIDs.pData);
	if (sdata == NULL) {
	JNU_ThrowNullPointerException(env, "NullPointerException");
	AWT_UNLOCK();
	return;
	}
	XtVaSetValues(sdata->widget,
	XmNincrement, value,
	NULL);
	AWT_FLUSH_UNLOCK();
	}


	/*
	* Class: sun_awt_motif_MScrollbarPeer
	* Method: setPageIncrement
	* Signature: (I)V
	*/
	JNIEXPORT void JNICALL
	Java_sun_awt_motif_MScrollbarPeer_setPageIncrement(JNIEnv *env, jobject this,
	jint value)
	{
	struct ComponentData *sdata;

	AWT_LOCK();

	sdata = (struct ComponentData *)
	JNU_GetLongFieldAsPtr(env, this, mComponentPeerIDs.pData);
	if (sdata == NULL) {
	JNU_ThrowNullPointerException(env, "NullPointerException");
	AWT_UNLOCK();
	return;
	}
	XtVaSetValues(sdata->widget,
	XmNpageIncrement, value,
	NULL);
	AWT_FLUSH_UNLOCK();
	}