Xw/WorkSpace.c

   1 /*************************************<+>*************************************
   2  *****************************************************************************
   3  **
   4  **   File:        WorkSpace.c
   5  **
   6  **   Project:     X Widgets
   7  **
   8  **   Description: Contains code for workSpace widget class.
   9  **
  10  *****************************************************************************
  11  **
  12  **   Copyright (c) 1988 by Hewlett-Packard Company
  13  **   Copyright (c) 1988 by the Massachusetts Institute of Technology
  14  **
  15  **   Permission to use, copy, modify, and distribute this software
  16  **   and its documentation for any purpose and without fee is hereby
  17  **   granted, provided that the above copyright notice appear in all
  18  **   copies and that both that copyright notice and this permission
  19  **   notice appear in supporting documentation, and that the names of
  20  **   Hewlett-Packard or  M.I.T.  not be used in advertising or publicity
  21  **   pertaining to distribution of the software without specific, written
  22  **   prior permission.
  23  **
  24  *****************************************************************************
  25  *************************************<+>*************************************/
  26
  27
  28 #include <stdio.h>
  29 #include <string.h>
  30 #include <ctype.h>
  31 #include <X11/StringDefs.h>
  32 #include <X11/keysymdef.h>
  33 #include <X11/IntrinsicP.h>
  34 #include <X11/Intrinsic.h>
  35 #include <Xw/Xw.h>
  36 #include <Xw/XwP.h>
  37 #include <Xw/WorkSpace.h>
  38 #include <Xw/WorkSpaceP.h>
  39
  40
  41 /*  Event procedures referenced in the actions list  */
  42
  43 static void KeyDown();
  44 static void KeyUp();
  45 static void Select();
  46 static void Release();
  47
  48
  49 /*  Default translation table and action list  */
  50
  51 static char defaultTranslations[] =
  52     "<KeyDown>:         keydown()\n\
  53      <KeyUp>:           keyup()\n\
  54      <BtnDown>:         select()\n\
  55      <BtnUp>:           release()\n\
  56      <EnterWindow>:     enter()\n\
  57      <LeaveWindow>:     leave()";
  58
  59
  60 static XtActionsRec actionsList[] =
  61 {
  62   { "keydown",  (XtActionProc) KeyDown              },
  63   { "keyup",    (XtActionProc) KeyUp                },
  64   { "select",   (XtActionProc) Select               },
  65   { "release",  (XtActionProc) Release              },
  66   { "enter",    (XtActionProc) _XwPrimitiveEnter    },
  67   { "leave",    (XtActionProc) _XwPrimitiveLeave    },
  68  };
  69
  70
  71 /*  Resource list for WorkSpace  */
  72
  73 static XtResource resources[] =
  74 {
  75    {
  76       XtNexpose, XtCCallback, XtRCallback, sizeof (caddr_t),
  77       XtOffset (XwWorkSpaceWidget, workSpace.expose),
  78       XtRPointer, (caddr_t) NULL
  79    },
  80
  81    {
  82       XtNresize, XtCCallback, XtRCallback, sizeof (caddr_t),
  83       XtOffset (XwWorkSpaceWidget, workSpace.resize),
  84       XtRPointer, (caddr_t) NULL
  85    },
  86
  87    {
  88       XtNkeyDown, XtCCallback, XtRCallback, sizeof (caddr_t),
  89       XtOffset (XwWorkSpaceWidget, workSpace.key_down),
  90       XtRPointer, (caddr_t) NULL
  91    },
  92
  93    {
  94       XtNkeyUp, XtCCallback, XtRCallback, sizeof (caddr_t),
  95       XtOffset (XwWorkSpaceWidget, workSpace.key_up),
  96       XtRPointer, (caddr_t) NULL
  97    }
  98 };
  99
 100
 101 /*  Static routine definitions  */
 102
 103 static void      Initialize();
 104 static void    Redisplay();
 105 static void    Resize();
 106 static void    Destroy();
 107 static Boolean SetValues();
 108
 109
 110 /*  The WorkSpace class record definition  */
 111
 112 XwWorkSpaceClassRec XwworkSpaceClassRec =
 113 {
 114    {
 115       (WidgetClass) &XwprimitiveClassRec, /* superclass          */
 116       "XwWorkSpace",                    /* class_name            */
 117       sizeof(XwWorkSpaceRec),           /* widget_size           */
 118       NULL,                             /* class_initialize      */
 119       NULL,                             /* class_part_initialize */
 120       FALSE,                            /* class_inited          */
 121       (XtInitProc) Initialize,          /* initialize            */
 122       NULL,                             /* initialize_hook       */
 123       _XwRealize,                       /* realize               */
 124       actionsList,                      /* actions               */
 125       XtNumber(actionsList),            /* num_actions           */
 126       resources,                        /* resources             */
 127       XtNumber(resources),              /* num_resources         */
 128       NULLQUARK,                        /* xrm_class             */
 129       TRUE,                             /* compress_motion       */
 130       TRUE,                             /* compress_exposure     */
 131       TRUE,                             /* compress_enterleave   */
 132       FALSE,                            /* visible_interest      */
 133       (XtWidgetProc) Destroy,           /* destroy               */
 134       (XtWidgetProc) Resize,            /* resize                */
 135       (XtExposeProc) Redisplay,         /* expose                */
 136       (XtSetValuesFunc) SetValues,      /* set_values            */
 137       NULL,                             /* set_values_hook       */
 138       XtInheritSetValuesAlmost,         /* set_values_almost     */
 139       NULL,                             /* get_values_hook       */
 140       NULL,                             /* accept_focus          */
 141       XtVersion,                        /* version               */
 142       NULL,                             /* callback private      */
 143       defaultTranslations,              /* tm_table              */
 144       NULL,                             /* query_geometry        */
 145     /* display_accelerator      */      XtInheritDisplayAccelerator,
 146     /* extension                */      NULL
 147    },
 148
 149    {
 150       NULL,         /* Primitive border_highlight   */
 151       NULL,         /* Primitive border_unhighlight */
 152       NULL,         /* Primitive select_proc        */
 153       NULL,         /* Primitive release_proc       */
 154       NULL,         /* Primitive toggle_proc        */
 155    }
 156 };
 157
 158 WidgetClass XwworkSpaceWidgetClass = (WidgetClass) &XwworkSpaceClassRec;
 159
 160
 161
 162
 163 /************************************************************************
 164  *
 165  *  Initialize
 166  *     The main widget instance initialization routine.
 167  *
 168  ************************************************************************/
 169
 170 static void Initialize (request, new)
 171 XwWorkSpaceWidget request, new;
 172
 173 {
 174    if (request -> core.width == 0)
 175       new -> core.width += 20;
 176    if (request -> core.height == 0)
 177       new -> core.height += 20;
 178 }
 179
 180
 181
 182
 183 /************************************************************************
 184  *
 185  *  Redisplay
 186  *      Draw the traversal/enter border, and
 187  *      invoke the application exposure callbacks.
 188  *
 189  ************************************************************************/
 190
 191 static void Redisplay (hw, event, region)
 192 XwWorkSpaceWidget hw;
 193 XEvent * event;
 194 Region region;
 195
 196 {
 197    if (hw -> primitive.highlighted)
 198       _XwHighlightBorder (hw);
 199    else if (hw -> primitive.display_highlighted)
 200       _XwUnhighlightBorder (hw);
 201
 202    XtCallCallbacks ((Widget)hw, XtNexpose, region);
 203 }
 204
 205
 206
 207
 208 /************************************************************************
 209  *
 210  *  Resize
 211  *     Invoke the application resize callbacks.
 212  *
 213  ************************************************************************/
 214
 215 static void Resize (hw)
 216 XwWorkSpaceWidget hw;
 217
 218 {
 219    XtCallCallbacks ((Widget)hw, XtNresize, NULL);
 220 }
 221
 222
 223
 224
 225 /************************************************************************
 226  *
 227  *  Destroy
 228  *      Remove the callback lists.
 229  *
 230  ************************************************************************/
 231
 232 static void Destroy (hw)
 233 XwWorkSpaceWidget hw;
 234
 235 {
 236    XtRemoveAllCallbacks ((Widget)hw, XtNexpose);
 237    XtRemoveAllCallbacks ((Widget)hw, XtNresize);
 238    XtRemoveAllCallbacks ((Widget)hw, XtNkeyDown);
 239 }
 240
 241
 242
 243
 244 /************************************************************************
 245  *
 246  *  SetValues
 247  *
 248  ************************************************************************/
 249
 250 static Boolean SetValues (current, request, new)
 251 XwWorkSpaceWidget current, request, new;
 252
 253 {
 254    return (False);
 255 }
 256
 257
 258
 259
 260 /************************************************************************
 261  *
 262  *  KeyDown
 263  *     This function processes key presses occuring on the workSpace.
 264  *
 265  ************************************************************************/
 266
 267 static void KeyDown (hw, event)
 268 XwWorkSpaceWidget hw;
 269 XButtonPressedEvent * event;
 270
 271 {
 272    XtCallCallbacks ((Widget)hw, XtNkeyDown, event);
 273 }
 274
 275
 276 /************************************************************************
 277  *
 278  *  KeyUp
 279  *     This function processes key releases occuring on the workSpace.
 280  *
 281  ************************************************************************/
 282
 283 static void KeyUp (hw, event)
 284 XwWorkSpaceWidget hw;
 285 XButtonPressedEvent * event;
 286
 287 {
 288    XtCallCallbacks ((Widget)hw, XtNkeyUp, event);
 289 }
 290
 291
 292
 293
 294 /************************************************************************
 295  *
 296  *  Select
 297  *     This function processes selections occuring on the workSpace.
 298  *
 299  ************************************************************************/
 300
 301 static void Select (hw, event)
 302 XwWorkSpaceWidget hw;
 303 XButtonPressedEvent * event;
 304
 305 {
 306    XtCallCallbacks ((Widget)hw, XtNselect, event);
 307 }
 308
 309
 310
 311
 312 /************************************************************************
 313  *
 314  *  Release
 315  *     This function processes releases occuring on the workSpace.
 316  *
 317  ************************************************************************/
 318
 319 static void Release (hw, event)
 320 XwWorkSpaceWidget   hw;
 321 XEvent * event;
 322
 323 {
 324    XtCallCallbacks ((Widget)hw, XtNrelease, event);
 325 }