Scrollbar.c File Reference

#include <X11/IntrinsicP.h>
#include <X11/StringDefs.h>
#include <X11/Xaw3d/XawInit.h>
#include <X11/Xaw3d/ScrollbarP.h>
#include <X11/Xmu/Drawing.h>

Include dependency graph for Scrollbar.c:

Go to the source code of this file.

Data Structures
struct	EventData
Defines
#define	Offset(field)   XtOffsetOf(ScrollbarRec, field)
#define	NoButton   -1
#define	PICKLENGTH(widget, x, y)   ((widget->scrollbar.orientation == XtorientHorizontal) ? x : y)
#define	MIN(x, y)   ((x) < (y) ? (x) : (y))
#define	MAX(x, y)   ((x) > (y) ? (x) : (y))
#define	MARGIN(sbw)   (sbw)->threeD.shadow_width
#define	Check(field)   if (newEvent->field != oldEvent->field) return False;
Functions
static void	ClassInitialize ()
static void	Initialize ()
static void	Destroy ()
static void	Realize ()
static void	Resize ()
static void	Redisplay ()
static Boolean	SetValues ()
static void	StartScroll ()
static void	MoveThumb ()
static void	NotifyThumb ()
static void	NotifyScroll ()
static void	EndScroll ()
static void	FillArea (ScrollbarWidget sbw, Position top, Position bottom, int fill)
static void	_ShadowSurroundedBox (Widget gw, XEvent *event, Region region, Dimension xtl, Dimension ytl, Dimension xbr, Dimension ybr, Boolean out)
static void	PaintThumb (ScrollbarWidget sbw, XEvent *event)
static void	Destroy (Widget w)
static void	CreateGC (Widget w)
static void	SetDimensions (ScrollbarWidget sbw)
static void	Initialize (Widget request, Widget new, ArgList args, Cardinal *num_args)
static void	Realize (Widget w, Mask *valueMask, XSetWindowAttributes *attributes)
static Boolean	SetValues (Widget current, Widget request, Widget desired, ArgList args, Cardinal *num_args)
static void	Resize (Widget w)
static void	Redisplay (Widget w, XEvent *event, Region region)
static Boolean	CompareEvents (XEvent *oldEvent, XEvent *newEvent)
static Bool	PeekNotifyEvent (Display *dpy, XEvent *event, char *args)
static Boolean	LookAhead (Widget w, XEvent *event)
static void	ExtractPosition (XEvent *event, Position *x, Position *y)
static void	StartScroll (Widget w, XEvent *event, String *params, Cardinal *num_params)
static int	InRange (int num, int small, int big)
static float	FloatInRange (float num, float small, float big)
static void	NotifyScroll (Widget w, XEvent *event, String *params, Cardinal *num_params)
static void	EndScroll (Widget w, XEvent *event, String *params, Cardinal *num_params)
static float	FractionLoc (ScrollbarWidget sbw, int x, int y)
static void	MoveThumb (Widget w, XEvent *event, String *params, Cardinal *num_params)
static void	NotifyThumb (Widget w, XEvent *event, String *params, Cardinal *num_params)
void	XawScrollbarSetThumb (Widget w, float top, float shown)
Variables
static char	defaultTranslations []
static float	floatZero = 0.0
static XtResource	resources []
static XtActionsRec	actions []
ScrollbarClassRec	scrollbarClassRec
WidgetClass	scrollbarWidgetClass = (WidgetClass)&scrollbarClassRec

---

Define Documentation

#define Check

(

field

)

if (newEvent->field != oldEvent->field) return False;

Referenced by Check(), CompareEvents(), GetBMATRIX(), GetCOLUMN(), GetIMATRIX(), GetMATRIX(), GetPOLYNOM(), GetROW(), GetSPARSE(), GetSTRING(), GetSTRINGMAT(), GetVECTOR(), and WriteArgCheck().

#define MARGIN

(

sbw

)

(sbw)->threeD.shadow_width

Definition at line 240 of file Scrollbar.c.

Referenced by FillArea(), FractionLoc(), and PaintThumb().

#define MAX	(	x,
		y		)	((x) > (y) ? (x) : (y))

Definition at line 227 of file Scrollbar.c.

#define MIN	(	x,
		y		)	((x) < (y) ? (x) : (y))

Definition at line 226 of file Scrollbar.c.

Referenced by intdgesvd(), PaintThumb(), Xaw3dComputeTopShadowRGB(), and XawSme3dComputeTopShadowRGB().

#define NoButton   -1

Definition at line 223 of file Scrollbar.c.

#define Offset

(

field

)

XtOffsetOf(ScrollbarRec, field)

Definition at line 95 of file Scrollbar.c.

#define PICKLENGTH	(	widget,
		x,
		y		)	((widget->scrollbar.orientation == XtorientHorizontal) ? x : y)

Definition at line 224 of file Scrollbar.c.

Referenced by FractionLoc(), and NotifyScroll().

---

Function Documentation

static void _ShadowSurroundedBox	(	Widget	gw,
		XEvent *	event,
		Region	region,
		Dimension	xtl,
		Dimension	ytl,
		Dimension	xbr,
		Dimension	ybr,
		Boolean	out
	)			[static]

Definition at line 303 of file Scrollbar.c.

References bot, ThreeDPart::bot_shadow_GC, CoordModeOrigin, dpy, out(), pt, s, ThreeDPart::shadow_width, _ThreeDRec::threeD, top, and ThreeDPart::top_shadow_GC.

Referenced by PaintThumb().

{
    XPoint       pt[6];
    ThreeDWidget tdw = (ThreeDWidget) gw;
    Dimension    s   = tdw->threeD.shadow_width;

    /* 
     *  no point to do anything if the shadow_width is 0 or the
     *  widget has not been realized.
     */ 
    if((s > 0) && XtIsRealized (gw)){

        Dimension       xms = xtl - s;
        Dimension       yms = ytl - s;
        Dimension       xps = xbr + s;
        Dimension       yps = ybr + s;
        Display         *dpy = XtDisplay (gw);
        Window          win = XtWindow (gw);
        GC              top, bot;

        if (out) {
            top = tdw->threeD.top_shadow_GC;
            bot = tdw->threeD.bot_shadow_GC;
        } else {
            top = tdw->threeD.bot_shadow_GC;
            bot = tdw->threeD.top_shadow_GC;
        }
        /* Draw shadows. Points are numbered as follows:
         *
         *   1_________________________________ 2
         *   |                               / /|
         *   |                              / / |
         *   |   4_________________________/ /  |
         *   |   |                         3|   |

         *   |   |                          |   |
         *   |   |                          |   |
         *   |   |                          |   |
         *   |   |5_________________________|   |
         *   |  / /                         4   |
         *   | / /                              |
         *   |/ /_______________________________|
         *   3                                  1
         */

        /* points common to top and bottom shadow */
        pt[0].x = xms;  pt[0].y = yps;
        pt[2].x = xps;  pt[2].y = yms;
        pt[3].x = xbr;  pt[3].y = ytl;
        pt[5].x = xtl;  pt[5].y = ybr;

        /* top-left shadow */
        if ((region == NULL) ||
            (XRectInRegion (region, xms, yms, xps, ytl) != RectangleOut) ||
            (XRectInRegion (region, xms, yms, xtl, yps) != RectangleOut)) {

            pt[1].x = xms;      pt[1].y = yms;
            pt[4].x = xtl;      pt[4].y = ytl;
            XFillPolygon (dpy, win, top, pt, 6,Complex,CoordModeOrigin);
        }

        /* bottom-right shadow */
        if ((region == NULL) ||
            (XRectInRegion (region, xms, ybr, xps, yps) != RectangleOut) ||
            (XRectInRegion (region, xbr, yms, xps, yps) != RectangleOut)) {

            /* swap points from top left to bottom right */
            pt[1].x = xps;      pt[1].y = yps;
            pt[4].x = xbr;      pt[4].y = ybr;
            XFillPolygon (dpy, win, bot, pt,6, Complex,CoordModeOrigin);
        }
    }
}

Here is the call graph for this function:

Here is the caller graph for this function:

static void ClassInitialize

(

)

[static]

Definition at line 229 of file Scrollbar.c.

References XawInitializeWidgetSet(), and XmuCvtStringToOrientation().

{
    XawInitializeWidgetSet();
    XtAddConverter( XtRString, XtROrientation, XmuCvtStringToOrientation,
                    (XtConvertArgList)NULL, (Cardinal)0 );
}

Here is the call graph for this function:

static Boolean CompareEvents	(	XEvent *	oldEvent,
		XEvent *	newEvent
	)			[static]

Definition at line 774 of file Scrollbar.c.

References Check.

Referenced by LookAhead(), and PeekNotifyEvent().

{
#define Check(field) if (newEvent->field != oldEvent->field) return False;

    Check(xany.display);
    Check(xany.type);
    Check(xany.window);

    switch (newEvent->type) {
    case MotionNotify:
        Check(xmotion.state); 
        break;
    case ButtonPress:
    case ButtonRelease:
        Check(xbutton.state);
        Check(xbutton.button); 
        break;
    case KeyPress:
    case KeyRelease:
        Check(xkey.state);
        Check(xkey.keycode); 
        break;
    case EnterNotify:
    case LeaveNotify:
        Check(xcrossing.mode);
        Check(xcrossing.detail);
        Check(xcrossing.state); 
        break;
    }
#undef Check

    return True;
}

Here is the caller graph for this function:

static void CreateGC

(

Widget

w

)

[static]

Definition at line 576 of file Scrollbar.c.

References _ScrollbarRec::core, depth, ScrollbarPart::foreground, ScrollbarPart::gc, height, root, _ScrollbarRec::scrollbar, ScrollbarPart::thumb, width, x, XmuCreateStippledPixmap(), and y.

Referenced by Initialize(), and SetValues().

{
    ScrollbarWidget sbw = (ScrollbarWidget) w;
    XGCValues gcValues;
    XtGCMask mask;
    unsigned int depth = 1;

    if (sbw->scrollbar.thumb == XtUnspecifiedPixmap) {
        sbw->scrollbar.thumb = XmuCreateStippledPixmap (XtScreen(w), 
                                        (Pixel) 1, (Pixel) 0, depth);
    } else if (sbw->scrollbar.thumb != None) {
        Window root;
        int x, y;
        unsigned int width, height, bw;
        if (XGetGeometry (XtDisplay(w), sbw->scrollbar.thumb, &root, &x, &y,
                         &width, &height, &bw, &depth) == 0) {
            XtAppError (XtWidgetToApplicationContext (w),
               "Scrollbar Widget: Could not get geometry of thumb pixmap.");
        }
    }

    gcValues.foreground = sbw->scrollbar.foreground;
    gcValues.background = sbw->core.background_pixel;
    mask = GCForeground | GCBackground;

    if (sbw->scrollbar.thumb != None) {
        if (depth == 1) {
            gcValues.fill_style = FillOpaqueStippled;
            gcValues.stipple = sbw->scrollbar.thumb;
            mask |= GCFillStyle | GCStipple;
        }
        else {
            gcValues.fill_style = FillTiled;
            gcValues.tile = sbw->scrollbar.thumb;
            mask |= GCFillStyle | GCTile;
        }
    }
    /* the creation should be non-caching, because */
    /* we now set and clear clip masks on the gc returned */
    sbw->scrollbar.gc = XtGetGC (w, mask, &gcValues);
}

Here is the call graph for this function:

Here is the caller graph for this function:

static void Destroy

(

Widget

w

)

[static]

Definition at line 559 of file Scrollbar.c.

References ScrollbarPart::gc, and _ScrollbarRec::scrollbar.

{
    ScrollbarWidget sbw = (ScrollbarWidget) w;
#ifdef ARROW_SCROLLBAR
    if(sbw->scrollbar.timer_id != (XtIntervalId) 0)
        XtRemoveTimeOut (sbw->scrollbar.timer_id);
#endif
    XtReleaseGC (w, sbw->scrollbar.gc);
}

static void Destroy

(

)

[static]

static void EndScroll	(	Widget	w,
		XEvent *	event,
		String *	params,
		Cardinal *	num_params
	)			[static]

Definition at line 1089 of file Scrollbar.c.

References ScrollbarPart::direction, ScrollbarPart::inactiveCursor, _ScrollbarRec::scrollbar, and XtNcursor.

{
    ScrollbarWidget sbw = (ScrollbarWidget) w;

#ifdef ARROW_SCROLLBAR
    sbw->scrollbar.scroll_mode = 0;
    /* no need to remove any autoscroll timeout; it will no-op */
    /* because the scroll_mode is 0 */
    /* but be sure to remove timeout in destroy proc */
#else
    XtVaSetValues (w, XtNcursor, sbw->scrollbar.inactiveCursor, NULL);
    XFlush (XtDisplay (w));
    sbw->scrollbar.direction = 0;
#endif
}

static void EndScroll

(

)

[static]

static void ExtractPosition	(	XEvent *	event,
		Position *	x,
		Position *	y
	)			[static]

Definition at line 844 of file Scrollbar.c.

Referenced by MoveThumb(), and NotifyScroll().

{
    switch( event->type ) {
    case MotionNotify:
        *x = event->xmotion.x;   
        *y = event->xmotion.y;    
        break;
    case ButtonPress:
    case ButtonRelease:
        *x = event->xbutton.x;   
        *y = event->xbutton.y;   
        break;
    case KeyPress:
    case KeyRelease:
        *x = event->xkey.x;      
        *y = event->xkey.y;       
        break;
    case EnterNotify:
    case LeaveNotify:
        *x = event->xcrossing.x; 
        *y = event->xcrossing.y; 
        break;
    default:
        *x = 0; *y = 0;
    }
}

Here is the caller graph for this function:

static void FillArea	(	ScrollbarWidget	sbw,
		Position	top,
		Position	bottom,
		int	fill
	)			[static]

Definition at line 249 of file Scrollbar.c.

References FALSE, lw, MARGIN, and XtorientHorizontal.

Referenced by PaintThumb().

{
    int tlen = bottom - top;    /* length of thumb in pixels */
    int sw, margin, floor;
    int lx, ly, lw, lh;

    if (bottom <= 0 || bottom <= top) 
        return;
    if ((sw = sbw->threeD.shadow_width) < 0) 
        sw = 0;
    margin = MARGIN (sbw);
    floor = sbw->scrollbar.length - margin;

    if (sbw->scrollbar.orientation == XtorientHorizontal) {
        lx = ((top < margin) ? margin : top);
        ly = sw;
        lw = ((bottom > floor) ? floor - top : tlen);
/* CHECKIT      lw = (((top + tlen) > floor) ? floor - top : tlen); */
        lh = sbw->core.height - 2 * sw;
    } else {
        lx = sw;
        ly = ((top < margin) ? margin : top);
        lw = sbw->core.width - 2 * sw;
/* CHECKIT      lh = (((top + tlen) > floor) ? floor - top : tlen); */
        lh = ((bottom > floor) ? floor - top : tlen);
    }
    if (lh <= 0 || lw <= 0) return;
    if (fill) {
        XFillRectangle(XtDisplay((Widget) sbw), XtWindow((Widget) sbw), 
                        sbw->scrollbar.gc, 
                        lx, ly, (unsigned int) lw, (unsigned int) lh);
    } else {
        XClearArea (XtDisplay((Widget) sbw), XtWindow((Widget) sbw), 
                        lx, ly, (unsigned int) lw, (unsigned int) lh, 
                        FALSE);
    }
}

Here is the caller graph for this function:

static float FloatInRange	(	float	num,
		float	small,
		float	big
	)			[static]

Definition at line 981 of file Scrollbar.c.

Referenced by FractionLoc(), and MoveThumb().

{
    return (num < small) ? small : ((num > big) ? big : num);
}

Here is the caller graph for this function:

static float FractionLoc	(	ScrollbarWidget	sbw,
		int	x,
		int	y
	)			[static]

Definition at line 1109 of file Scrollbar.c.

References FloatInRange(), height, MARGIN, PICKLENGTH, result, and width.

Referenced by MoveThumb().

{
    float   result;
    int margin;
    float   height, width;

    margin = MARGIN (sbw);
    x -= margin;
    y -= margin;
    height = sbw->core.height - 2 * margin;
    width = sbw->core.width - 2 * margin;
    result = PICKLENGTH (sbw, x / width, y / height);
    return FloatInRange(result, 0.0, 1.0);
}

Here is the call graph for this function:

Here is the caller graph for this function:

static void Initialize	(	Widget	request,
		Widget	new,
		ArgList	args,
		Cardinal *	num_args
	)			[static]

Definition at line 632 of file Scrollbar.c.

References _ScrollbarRec::core, CreateGC(), ScrollbarPart::length, ScrollbarPart::min_thumb, ScrollbarPart::orientation, _ScrollbarRec::scrollbar, SetDimensions(), ScrollbarPart::shownLength, ScrollbarPart::thickness, ScrollbarPart::topLoc, XtorientHorizontal, and XtorientVertical.

{
    ScrollbarWidget sbw = (ScrollbarWidget) new;

    CreateGC (new);

    if (sbw->core.width == 0)
        sbw->core.width = (sbw->scrollbar.orientation == XtorientVertical)
            ? sbw->scrollbar.thickness : sbw->scrollbar.length;

    if (sbw->core.height == 0)
        sbw->core.height = (sbw->scrollbar.orientation == XtorientHorizontal)
            ? sbw->scrollbar.thickness : sbw->scrollbar.length;

    SetDimensions (sbw);
#ifdef ARROW_SCROLLBAR
    sbw->scrollbar.scroll_mode = 0;
    sbw->scrollbar.timer_id = (XtIntervalId)0;
#endif
    sbw->scrollbar.topLoc = 0;
    sbw->scrollbar.shownLength = sbw->scrollbar.min_thumb;
}

Here is the call graph for this function:

static void Initialize

(

)

[static]

Definition at line 26 of file javasci_globals.c.

{
  static char env[1024];
  static char initstr[]="exec(\"SCI/etc/scilab.start\",-1);quit;";
  static int iflag=-1, stacksize = 1000000, ierr=0;

  #ifdef _MSC_VER
    static char JavaSciInterf[]="javasci";
    static char nw[]="-nw";
    static char nb[]="-nb";
  #endif

  
  char *p1 = (char*)getenv ("SCI");
  
  
  #ifdef _MSC_VER
  /* Supprime le mode windows et la baniere */
    add_sci_argv(JavaSciInterf);
    add_sci_argv(nb);
  #endif
  
  #ifdef _MSC_VER 
    if ( p1== NULL )
    {
                /* Detection Scilab path */
                char modname[MAX_PATH+1];
                if (!GetModuleFileName (GetModuleHandle("javasci.dll"), modname, MAX_PATH))
                {
                        MessageBox(NULL,"javasci.dll not found","Warning",MB_ICONWARNING);
                }
                else
                {
                        char *p;
                        if ((p = strrchr (modname, '\\')) == NULL) exit(1); /* remove \javasci.dll from modname */
                        else
                        {
                                *p='\0';
                                if ((p = strrchr (modname, '\\')) == NULL) exit(1); /* remove \bin from modname */
                                else
                                {
                                        *p='\0';
                                        set_sci_env(modname);
                                }
                        }
                }
    }
    else 
        {
                char *pathSCI=(char*)MALLOC((strlen(p1)+1)*sizeof(char));
                sprintf(pathSCI,"%s",p1);
                set_sci_env(pathSCI);
                if (pathSCI) {FREE(pathSCI);pathSCI=NULL;}
        }
  #else
   if (p1==NULL)
   {
        fprintf(stderr,"Please define SCI environment variable\n");
        sprintf (env, "%s=%s", "SCI",SCI);
        setSCIpath(SCI);
        putenv (env);
   }
  #endif
  /* set TMPDIR */
  C2F(settmpdir)();
  /* Scilab Initialization */
  C2F(inisci)(&iflag,&stacksize,&ierr);
  if ( ierr > 0 ) 
    {
      fprintf(stderr,"Scilab initialization failed !\n");
      exit(1);
    }


  /* Initialisation fenetre graphique */
  #ifdef _MSC_VER
    InitWindowGraphDll();
  #endif

  /* pour initialisation de la primitive scilab : fromjava() */
  SetFromJavaToON();

  /* Chargement de Scilab.start */
  C2F(scirun)(initstr,(int)strlen(initstr));
 
}

static int InRange	(	int	num,
		int	small,
		int	big
	)			[static]

Definition at line 970 of file Scrollbar.c.

Referenced by NotifyScroll().

{
    return (num < small) ? small : ((num > big) ? big : num);
}

Here is the caller graph for this function:

static Boolean LookAhead	(	Widget	w,
		XEvent *	event
	)			[static]

Definition at line 826 of file Scrollbar.c.

References CompareEvents(), EventData::count, EventData::oldEvent, and PeekNotifyEvent().

Referenced by MoveThumb(), NotifyScroll(), and NotifyThumb().

{
    XEvent newEvent;
    struct EventData eventData;

    if (QLength (XtDisplay (w)) == 0) return False;

    eventData.count = 0;
    eventData.oldEvent = event;

    XPeekIfEvent (XtDisplay (w), &newEvent, PeekNotifyEvent, (char*)&eventData);

    return CompareEvents (event, &newEvent);
}

Here is the call graph for this function:

Here is the caller graph for this function:

static void MoveThumb	(	Widget	w,
		XEvent *	event,
		String *	params,
		Cardinal *	num_params
	)			[static]

Definition at line 1127 of file Scrollbar.c.

References ScrollbarPart::direction, ExtractPosition(), FloatInRange(), FractionLoc(), LookAhead(), PaintThumb(), ScrollbarPart::pick_top, ScrollbarPart::picked, _ScrollbarRec::scrollbar, ScrollbarPart::shown, and ScrollbarPart::top.

{
    ScrollbarWidget sbw = (ScrollbarWidget) w;
    Position x, y;
    float loc, t, s;

#ifndef ARROW_SCROLLBAR
    if (sbw->scrollbar.direction == 0) return; /* if no StartScroll */
#endif

    if (LookAhead (w, event)) return;

    if (!event->xmotion.same_screen) return;

    ExtractPosition (event, &x, &y);
    loc = FractionLoc (sbw, x, y);
    t = sbw->scrollbar.top;
    s = sbw->scrollbar.shown;
#ifdef ARROW_SCROLLBAR
    if (sbw->scrollbar.scroll_mode != 2 )
      /* initialize picked position */
      sbw->scrollbar.picked = (FloatInRange( loc, t, t + s ) - t);
#else
    sbw->scrollbar.picked = 0.5 * s;
#endif
    if (sbw->scrollbar.pick_top)
      sbw->scrollbar.top = loc;
    else {
      sbw->scrollbar.top = loc - sbw->scrollbar.picked;
      if (sbw->scrollbar.top < 0.0) sbw->scrollbar.top = 0.0;
    }

    if (sbw->scrollbar.top + sbw->scrollbar.shown > 1.0)
      sbw->scrollbar.top = 1.0 - sbw->scrollbar.shown;
#ifdef ARROW_SCROLLBAR
    sbw->scrollbar.scroll_mode = 2; /* indicate continuous scroll */
#endif
    PaintThumb (sbw, event);
    XFlush (XtDisplay (w));     /* re-draw it before Notifying */
}

Here is the call graph for this function:

static void MoveThumb

(

)

[static]

static void NotifyScroll	(	Widget	w,
		XEvent *	event,
		String *	params,
		Cardinal *	num_params
	)			[static]

Definition at line 1038 of file Scrollbar.c.

References ScrollbarPart::direction, ExtractPosition(), InRange(), LookAhead(), PICKLENGTH, _ScrollbarRec::scrollbar, and style.

                                        : Proportional|FullLength */
    Cardinal *num_params;       /* we only support 1 */
{
    ScrollbarWidget sbw = (ScrollbarWidget) w;
    int call_data;
    char style;
    Position x, y;

    if (sbw->scrollbar.direction == 0) return; /* if no StartScroll */
    if (LookAhead (w, event)) return;
    if (*num_params > 0) 
        style = *params[0];
    else
        style = 'P';

    switch (style) {
    case 'P':    /* Proportional */
    case 'p':
        ExtractPosition (event, &x, &y);
        call_data = 
            InRange (PICKLENGTH (sbw, x, y), 0, (int) sbw->scrollbar.length); 
        break;

    case 'F':    /* FullLength */
    case 'f':    
        call_data = sbw->scrollbar.length; 
        break;
    }
    switch (sbw->scrollbar.direction) {
    case 'B':
    case 'b':    
        call_data = -call_data;
        /* fall through */

    case 'F':
    case 'f':    
        XtCallCallbacks (w, XtNscrollProc, (XtPointer)call_data);
        break;

    case 'C':
    case 'c':
        /* NotifyThumb has already called the thumbProc(s) */
        break;
    }
}

Here is the call graph for this function:

static void NotifyScroll

(

)

[static]

static void NotifyThumb	(	Widget	w,
		XEvent *	event,
		String *	params,
		Cardinal *	num_params
	)			[static]

Definition at line 1174 of file Scrollbar.c.

References ScrollbarPart::direction, LookAhead(), _ScrollbarRec::scrollbar, and ScrollbarPart::top.

{
    register ScrollbarWidget sbw = (ScrollbarWidget) w;
    float top = sbw->scrollbar.top;

#ifndef ARROW_SCROLLBAR
    if (sbw->scrollbar.direction == 0) return; /* if no StartScroll */
#endif

    if (LookAhead (w, event)) return;

    /* thumbProc is not pretty, but is necessary for backwards
       compatibility on those architectures for which it work{s,ed};
       the intent is to pass a (truncated) float by value. */
#ifdef ARROW_SCROLLBAR
    /* This corrects for rounding errors: If the thumb is moved to the end of
       the scrollable area sometimes the last line/column is not displayed.
       This can happen when the integer number of the top line or leftmost
       column to be be displayed is calculated from the float value
       sbw->scrollbar.top. The numerical error of this rounding problem is
       very small. We therefore add a small value which then forces the
       next line/column (the correct one) to be used. Since we can expect
       that the resolution of display screens will not be higher then
       10000 text lines/columns we add 1/10000 to the top position. The
       intermediate variable `top' is used to avoid erroneous summing up
       corrections (can this happen at all?). If the arrows are not displayed
       there is no problem since in this case there is always a constant
       integer number of pixels the thumb must be moved in order to scroll
       to the next line/column. */
    top += 0.0001;
#endif
    XtCallCallbacks (w, XtNthumbProc, *(XtPointer*)&top);
    XtCallCallbacks (w, XtNjumpProc, (XtPointer)&top);
}

Here is the call graph for this function:

static void NotifyThumb

(

)

[static]

static void PaintThumb	(	ScrollbarWidget	sbw,
		XEvent *	event
	)			[static]

Definition at line 387 of file Scrollbar.c.

References _ShadowSurroundedBox(), FillArea(), int, MARGIN, MAX, MIN, s, TRUE, and XtorientHorizontal.

Referenced by MoveThumb(), Redisplay(), and XawScrollbarSetThumb().

{
    Dimension s                   = sbw->threeD.shadow_width;
    Position  oldtop              = sbw->scrollbar.topLoc;
    Position  oldbot              = oldtop + sbw->scrollbar.shownLength;
    Dimension margin              = MARGIN (sbw);
    Dimension tzl                 = sbw->scrollbar.length - margin - margin;
    Position newtop, newbot;    
    Position  floor               = sbw->scrollbar.length - margin;

    newtop = margin + (int)(tzl * sbw->scrollbar.top);
    newbot = newtop + (int)(tzl * sbw->scrollbar.shown);
    if (sbw->scrollbar.shown < 1.) newbot++;
    if (newbot < newtop + (int)sbw->scrollbar.min_thumb +
                        2 * (int)sbw->threeD.shadow_width) 
      newbot = newtop + sbw->scrollbar.min_thumb +
                        2 * sbw->threeD.shadow_width;
    if ( newbot >= floor ) {
        newtop = floor-(newbot-newtop)+1;
        newbot = floor;
    }

    sbw->scrollbar.topLoc = newtop;
    sbw->scrollbar.shownLength = newbot - newtop;
    if (XtIsRealized ((Widget) sbw)) {
      /*  3D thumb wanted ?
       */
      if (s) 
          {
          if (newtop < oldtop) FillArea(sbw, oldtop, oldtop + s, 0);
          if (newtop > oldtop) FillArea(sbw, oldtop, MIN(newtop, oldbot), 0);
          if (newbot < oldbot) FillArea(sbw, MAX(newbot, oldtop), oldbot, 0);
          if (newbot > oldbot) FillArea(sbw, oldbot - s, oldbot, 0);

          if (sbw->scrollbar.orientation == XtorientHorizontal) 
              {
              _ShadowSurroundedBox(
                  sbw, event,
                  (Region)NULL,
                  newtop + s, 2 * s,
                  newbot - s, sbw->core.height - 2 * s, TRUE);
              }
          else 
              {
              _ShadowSurroundedBox(
                  sbw, event,
                  (Region)NULL,
                  2 * s, newtop + s,
                  sbw->core.width - 2 * s, newbot - s,
                  TRUE);
              }
          }
      else 
          {
          /* 
            Note to Mitch: FillArea is (now) correctly implemented to 
            not draw over shadows or the arrows. Therefore setting clipmasks 
            doesn't seem to be necessary.  Correct me if I'm wrong!
          */
          if (newtop < oldtop) FillArea(sbw, newtop, MIN(newbot, oldtop), 1);
          if (newtop > oldtop) FillArea(sbw, oldtop, MIN(newtop, oldbot), 0);
          if (newbot < oldbot) FillArea(sbw, MAX(newbot, oldtop), oldbot, 0);
          if (newbot > oldbot) FillArea(sbw, MAX(newtop, oldbot), newbot, 1);
          }
    }
}

Here is the call graph for this function:

Here is the caller graph for this function:

static Bool PeekNotifyEvent	(	Display *	dpy,
		XEvent *	event,
		char *	args
	)			[static]

Definition at line 814 of file Scrollbar.c.

References CompareEvents(), EventData::count, and EventData::oldEvent.

Referenced by LookAhead().

{
    struct EventData *eventData = (struct EventData*)args;

    return ((++eventData->count == QLength(dpy)) /* since PeekIf blocks */
            || CompareEvents(event, eventData->oldEvent));
}

Here is the call graph for this function:

Here is the caller graph for this function:

static void Realize	(	Widget	w,
		Mask *	valueMask,
		XSetWindowAttributes *	attributes
	)			[static]

Definition at line 659 of file Scrollbar.c.

References SimplePart::cursor_name, ScrollbarPart::horCursor, ScrollbarPart::inactiveCursor, ScrollbarPart::orientation, _ScrollbarRec::scrollbar, _ScrollbarRec::simple, ScrollbarPart::verCursor, XtNcursor, XtNcursorName, and XtorientVertical.

{
    ScrollbarWidget sbw = (ScrollbarWidget) w;
#ifdef ARROW_SCROLLBAR
    if(sbw->simple.cursor_name == NULL)
        XtVaSetValues(w, XtNcursorName, "crosshair", NULL);
    /* dont set the cursor of the window to anything */
    *valueMask &= ~CWCursor;
#else
    sbw->scrollbar.inactiveCursor =
      (sbw->scrollbar.orientation == XtorientVertical)
        ? sbw->scrollbar.verCursor
        : sbw->scrollbar.horCursor;

    XtVaSetValues (w, XtNcursor, sbw->scrollbar.inactiveCursor, NULL);
#endif
    /* 
     * The Simple widget actually stuffs the value in the valuemask. 
     */
    
    (*scrollbarWidgetClass->core_class.superclass->core_class.realize)
        (w, valueMask, attributes);
}

static void Realize

(

)

[static]

static void Redisplay	(	Widget	w,
		XEvent *	event,
		Region	region
	)			[static]

Definition at line 737 of file Scrollbar.c.

References _ScrollbarRec::core, FALSE, height, ScrollbarPart::length, ScrollbarPart::orientation, PaintThumb(), _ScrollbarRec::scrollbar, ThreeDClassPart::shadowdraw, ScrollbarPart::shownLength, _ScrollbarClassRec::threeD_class, ScrollbarPart::topLoc, width, x, XtorientHorizontal, and y.

{
    ScrollbarWidget sbw = (ScrollbarWidget) w;
    ScrollbarWidgetClass swclass = (ScrollbarWidgetClass) XtClass (w);
    int x, y;
    unsigned int width, height;

    (*swclass->threeD_class.shadowdraw) (w, event, region, FALSE);

    if (sbw->scrollbar.orientation == XtorientHorizontal) {
        x = sbw->scrollbar.topLoc;
        y = 1;
        width = sbw->scrollbar.shownLength;
        height = sbw->core.height - 2;
    } else {
        x = 1;
        y = sbw->scrollbar.topLoc;
        width = sbw->core.width - 2;
        height = sbw->scrollbar.shownLength;
    }
    if (region == NULL ||
        XRectInRegion (region, x, y, width, height) != RectangleOut) {
        /* Forces entire thumb to be painted. */
        sbw->scrollbar.topLoc = -(sbw->scrollbar.length + 1);
        PaintThumb (sbw, event); 
    }
#ifdef ARROW_SCROLLBAR
    /* we'd like to be region aware here!!!! */
    PaintArrows (sbw);
#endif

}

Here is the call graph for this function:

static void Redisplay

(

)

[static]

static void Resize

(

Widget

w

)

[static]

Definition at line 726 of file Scrollbar.c.

References Redisplay(), SetDimensions(), and w.

{
    /* ForgetGravity has taken care of background, but thumb may
     * have to move as a result of the new size. */
    SetDimensions ((ScrollbarWidget) w);
    Redisplay (w, (XEvent*) NULL, (Region)NULL);
}

Here is the call graph for this function:

static void Resize

(

)

[static]

static void SetDimensions

(

ScrollbarWidget

sbw

)

[static]

Definition at line 619 of file Scrollbar.c.

References XtorientVertical.

Referenced by Initialize(), and Resize().

{
    if (sbw->scrollbar.orientation == XtorientVertical) {
        sbw->scrollbar.length = sbw->core.height;
        sbw->scrollbar.thickness = sbw->core.width;
    } else {
        sbw->scrollbar.length = sbw->core.width;
        sbw->scrollbar.thickness = sbw->core.height;
    }
}

Here is the caller graph for this function:

static Boolean SetValues	(	Widget	current,
		Widget	request,
		Widget	desired,
		ArgList	args,
		Cardinal *	num_args
	)			[static]

Definition at line 687 of file Scrollbar.c.

References _ScrollbarRec::core, CreateGC(), FALSE, ScrollbarPart::foreground, ScrollbarPart::gc, _ScrollbarRec::scrollbar, ScrollbarPart::shown, ScrollbarPart::thumb, ScrollbarPart::top, and TRUE.

{
    ScrollbarWidget sbw = (ScrollbarWidget) current;
    ScrollbarWidget dsbw = (ScrollbarWidget) desired;
    Boolean redraw = FALSE;

/*
 * If these values are outside the acceptable range ignore them...
 */

    if (dsbw->scrollbar.top < 0.0 || dsbw->scrollbar.top > 1.0)
        dsbw->scrollbar.top = sbw->scrollbar.top;

    if (dsbw->scrollbar.shown < 0.0 || dsbw->scrollbar.shown > 1.0)
        dsbw->scrollbar.shown = sbw->scrollbar.shown;

/*
 * Change colors and stuff...
 */
    if (XtIsRealized (desired)) {
        if (sbw->scrollbar.foreground != dsbw->scrollbar.foreground ||
            sbw->core.background_pixel != dsbw->core.background_pixel ||
            sbw->scrollbar.thumb != dsbw->scrollbar.thumb) {
            XtReleaseGC (desired, sbw->scrollbar.gc);
            CreateGC (desired);
            redraw = TRUE;
        }
        if (sbw->scrollbar.top != dsbw->scrollbar.top ||
            sbw->scrollbar.shown != dsbw->scrollbar.shown)
            redraw = TRUE;
    }
    return redraw;
}

Here is the call graph for this function:

static Boolean SetValues

(

)

[static]

static void StartScroll	(	Widget	w,
		XEvent *	event,
		String *	params,
		Cardinal *	num_params
	)			[static]

Definition at line 919 of file Scrollbar.c.

References ScrollbarPart::direction, ScrollbarPart::downCursor, ScrollbarPart::leftCursor, ScrollbarPart::orientation, ScrollbarPart::rightCursor, _ScrollbarRec::scrollbar, ScrollbarPart::upCursor, XtNcursor, and XtorientVertical.

                                            : Back|Forward|Smooth */
    Cardinal *num_params;       /* we only support 1 */
{
    ScrollbarWidget sbw = (ScrollbarWidget) w;
    Cursor cursor;
    char direction;

    if (sbw->scrollbar.direction != 0) return; /* if we're already scrolling */
    if (*num_params > 0) 
        direction = *params[0];
    else
        direction = 'C';

    sbw->scrollbar.direction = direction;

    switch (direction) {
    case 'B':
    case 'b':   
        cursor = (sbw->scrollbar.orientation == XtorientVertical)
                        ? sbw->scrollbar.downCursor
                        : sbw->scrollbar.rightCursor; 
        break;
    case 'F':
    case 'f':
        cursor = (sbw->scrollbar.orientation == XtorientVertical)
                        ? sbw->scrollbar.upCursor
                        : sbw->scrollbar.leftCursor; 
        break;
    case 'C':
    case 'c':
        cursor = (sbw->scrollbar.orientation == XtorientVertical)
                        ? sbw->scrollbar.rightCursor
                        : sbw->scrollbar.upCursor; 
        break;
    default:    
        return; /* invalid invocation */
    }
    XtVaSetValues (w, XtNcursor, cursor, NULL);
    XFlush (XtDisplay (w));
}

static void StartScroll

(

)

[static]

void XawScrollbarSetThumb	(	Widget	w,
		float	top,
		float	shown
	)

Definition at line 1231 of file Scrollbar.c.

References ScrollbarPart::direction, PaintThumb(), _ScrollbarRec::scrollbar, ScrollbarPart::shown, and ScrollbarPart::top.

Referenced by _XawTextSetScrollBars(), CheckVBarScrolling(), ScrollBarDrawThumb(), and SetBar().

{
    ScrollbarWidget sbw = (ScrollbarWidget) w;

#ifdef WIERD
    fprintf(stderr,"< XawScrollbarSetThumb w=%p, top=%f, shown=%f\n", 
            w,top,shown);
#endif

#ifdef ARROW_SCROLLBAR
    if (sbw->scrollbar.scroll_mode == (char) 2) return; /* if still thumbing */
#else
    if (sbw->scrollbar.direction == 'c') return; /* if still thumbing */
#endif

    sbw->scrollbar.top = (top > 1.0) ? 1.0 :
                                (top >= 0.0) ? top : sbw->scrollbar.top;

    sbw->scrollbar.shown = (shown > 1.0) ? 1.0 :
                                (shown >= 0.0) ? shown : sbw->scrollbar.shown;

    PaintThumb (sbw);
}

Here is the call graph for this function:

Here is the caller graph for this function:

---

Variable Documentation

XtActionsRec actions[] [static]

Initial value:

 {



    {"StartScroll",     StartScroll},

    {"MoveThumb",       MoveThumb},
    {"NotifyThumb",     NotifyThumb},
    {"NotifyScroll",    NotifyScroll},
    {"EndScroll",       EndScroll}
}

Definition at line 160 of file Scrollbar.c.

char defaultTranslations[] [static]

Initial value:

    "<Btn1Down>:   StartScroll(Forward) \n\
     <Btn2Down>:   StartScroll(Continuous) MoveThumb() NotifyThumb() \n\
     <Btn3Down>:   StartScroll(Backward) \n\
     <Btn2Motion>: MoveThumb() NotifyThumb() \n\
     <BtnUp>:      NotifyScroll(Proportional) EndScroll()"

Definition at line 80 of file Scrollbar.c.

float floatZero = 0.0 [static]

Definition at line 93 of file Scrollbar.c.

XtResource resources[] [static]

Definition at line 97 of file Scrollbar.c.

ScrollbarClassRec scrollbarClassRec

Definition at line 173 of file Scrollbar.c.

WidgetClass scrollbarWidgetClass = (WidgetClass)&scrollbarClassRec

Definition at line 221 of file Scrollbar.c.

---