WINGs/wscroller.c

   1
   2
   3
   4
   5 #include "WINGsP.h"
   6
   7 /* undefine will disable the autoadjusting of the knob dimple to be
   8  * directly below the cursor
   9  * DOES NOT WORK */
  10 #undef STRICT_NEXT_BEHAVIOUR
  11
  12 #define AUTOSCROLL_INITIAL_DELAY        200
  13
  14 #define AUTOSCROLL_DELAY                40
  15
  16
  17 typedef struct W_Scroller {
  18     W_Class widgetClass;
  19     W_View *view;
  20
  21     void *clientData;
  22     WMAction *action;
  23
  24     float knobProportion;
  25     float floatValue;
  26
  27     WMHandlerID timerID;               /* for continuous scrolling mode */
  28
  29 #ifndef STRICT_NEXT_BEHAVIOUR
  30     int dragPoint;                     /* point where the knob is being
  31                                         * dragged */
  32 #endif
  33     struct {
  34         WMScrollArrowPosition arrowsPosition:4;
  35
  36         unsigned int horizontal:1;
  37
  38         WMScrollerPart hitPart:4;
  39
  40         /* */
  41         unsigned int documentFullyVisible:1;   /* document is fully visible */
  42
  43         unsigned int prevSelected:1;
  44
  45         unsigned int pushed:1;
  46
  47         unsigned int incrDown:1;      /* whether increment button is down */
  48
  49         unsigned int decrDown:1;
  50
  51         unsigned int draggingKnob:1;
  52
  53         unsigned int configured:1;
  54
  55         unsigned int redrawPending:1;
  56     } flags;
  57 } Scroller;
  58
  59
  60
  61 #define DEFAULT_HEIGHT          60
  62 #define DEFAULT_WIDTH           SCROLLER_WIDTH
  63 #define DEFAULT_ARROWS_POSITION WSAMinEnd
  64
  65
  66
  67 static void destroyScroller(Scroller *sPtr);
  68 static void paintScroller(Scroller *sPtr);
  69
  70 static void resizeScroller();
  71 static void handleEvents(XEvent *event, void *data);
  72 static void handleActionEvents(XEvent *event, void *data);
  73
  74 static void handleMotion(Scroller *sPtr, int mouseX, int mouseY);
  75
  76
  77 W_ViewProcedureTable _ScrollerViewProcedures = {
  78     NULL,
  79         resizeScroller,
  80         NULL
  81 };
  82
  83
  84
  85
  86 WMScroller*
  87 WMCreateScroller(WMWidget *parent)
  88 {
  89     Scroller *sPtr;
  90
  91     sPtr = wmalloc(sizeof(Scroller));
  92     memset(sPtr, 0, sizeof(Scroller));
  93
  94     sPtr->widgetClass = WC_Scroller;
  95
  96     sPtr->view = W_CreateView(W_VIEW(parent));
  97     if (!sPtr->view) {
  98         free(sPtr);
  99         return NULL;
 100     }
 101     sPtr->view->self = sPtr;
 102
 103     sPtr->flags.documentFullyVisible = 1;
 104
 105     WMCreateEventHandler(sPtr->view, ExposureMask|StructureNotifyMask
 106                          |ClientMessageMask, handleEvents, sPtr);
 107
 108     resizeScroller(sPtr, DEFAULT_WIDTH, DEFAULT_WIDTH);
 109     sPtr->flags.arrowsPosition = DEFAULT_ARROWS_POSITION;
 110
 111     WMCreateEventHandler(sPtr->view, ButtonPressMask|ButtonReleaseMask
 112                          |EnterWindowMask|LeaveWindowMask|ButtonMotionMask,
 113                          handleActionEvents, sPtr);
 114
 115     sPtr->flags.hitPart = WSNoPart;
 116
 117     return sPtr;
 118 }
 119
 120
 121
 122 void
 123 WMSetScrollerArrowsPosition(WMScroller *sPtr, WMScrollArrowPosition position)
 124 {
 125     sPtr->flags.arrowsPosition = position;
 126     if (sPtr->view->flags.realized) {
 127         paintScroller(sPtr);
 128     }
 129 }
 130
 131
 132 static void
 133 resizeScroller(WMScroller *sPtr, unsigned int width, unsigned int height)
 134 {
 135     if (width > height) {
 136         sPtr->flags.horizontal = 1;
 137         W_ResizeView(sPtr->view, width, SCROLLER_WIDTH);
 138     } else {
 139         sPtr->flags.horizontal = 0;
 140         W_ResizeView(sPtr->view, SCROLLER_WIDTH, height);
 141     }
 142     if (sPtr->view->flags.realized) {
 143         paintScroller(sPtr);
 144     }
 145 }
 146
 147
 148 void
 149 WMSetScrollerAction(WMScroller *sPtr, WMAction *action, void *clientData)
 150 {
 151     CHECK_CLASS(sPtr, WC_Scroller);
 152
 153     sPtr->action = action;
 154
 155     sPtr->clientData = clientData;
 156 }
 157
 158
 159 void
 160 WMSetScrollerParameters(WMScroller *sPtr, float floatValue,
 161                         float knobProportion)
 162 {
 163     CHECK_CLASS(sPtr, WC_Scroller);
 164
 165     if (floatValue < 0.0)
 166         sPtr->floatValue = 0.0;
 167     else if (floatValue > 1.0)
 168         sPtr->floatValue = 1.0;
 169     else
 170         sPtr->floatValue = floatValue;
 171
 172     if (knobProportion <= 0.0) {
 173
 174         sPtr->knobProportion = 0.0;
 175         sPtr->flags.documentFullyVisible = 0;
 176
 177     } else if (knobProportion >= 1.0) {
 178
 179         sPtr->knobProportion = 1.0;
 180         sPtr->flags.documentFullyVisible = 1;
 181
 182     } else {
 183         sPtr->knobProportion = knobProportion;
 184         sPtr->flags.documentFullyVisible = 0;
 185     }
 186
 187     if (sPtr->view->flags.realized)
 188         paintScroller(sPtr);
 189 }
 190
 191
 192 float
 193 WMGetScrollerKnobProportion(WMScroller *sPtr)
 194 {
 195     CHECK_CLASS(sPtr, WC_Scroller);
 196
 197     return sPtr->knobProportion;
 198 }
 199
 200
 201 float
 202 WMGetScrollerValue(WMScroller *sPtr)
 203 {
 204     CHECK_CLASS(sPtr, WC_Scroller);
 205
 206     return sPtr->floatValue;
 207 }
 208
 209
 210 WMScrollerPart
 211 WMGetScrollerHitPart(WMScroller *sPtr)
 212 {
 213     CHECK_CLASS(sPtr, WC_Scroller);
 214
 215     return sPtr->flags.hitPart;
 216 }
 217
 218
 219 static void
 220 paintArrow(WMScroller *sPtr, Drawable d, int part)
 221 /*
 222  * part- 0 paints the decrement arrow, 1 the increment arrow
 223  */
 224 {
 225     WMView *view = sPtr->view;
 226     WMScreen *scr = view->screen;
 227     int ofs, bsize;
 228     W_Pixmap *arrow;
 229
 230 #ifndef DOUBLE_BUFFER
 231     GC gc = scr->lightGC;
 232 #endif
 233
 234     bsize = SCROLLER_WIDTH - 4;
 235
 236
 237     if (part == 0) { /* decrement button */
 238         if (sPtr->flags.horizontal) {
 239             if (sPtr->flags.arrowsPosition == WSAMaxEnd) {
 240                 ofs = view->size.width - 2*(bsize+1) - 1;
 241             } else {
 242                 ofs = 2;
 243             }
 244             if (sPtr->flags.decrDown)
 245                 arrow = scr->hiLeftArrow;
 246             else
 247                 arrow = scr->leftArrow;
 248
 249         } else {
 250             if (sPtr->flags.arrowsPosition == WSAMaxEnd) {
 251                 ofs = view->size.height - 2*(bsize+1) - 1;
 252             } else {
 253                 ofs = 2;
 254             }
 255             if (sPtr->flags.decrDown)
 256                 arrow = scr->hiUpArrow;
 257             else
 258                 arrow = scr->upArrow;
 259         }
 260
 261 #ifndef DOUBLE_BUFFER
 262         if (sPtr->flags.decrDown)
 263             gc = WMColorGC(scr->white);
 264 #endif
 265     } else { /* increment button */
 266         if (sPtr->flags.horizontal) {
 267             if (sPtr->flags.arrowsPosition == WSAMaxEnd) {
 268                 ofs = view->size.width - bsize+1 - 3;
 269             } else {
 270                 ofs = 2 + bsize+1;
 271             }
 272             if (sPtr->flags.incrDown)
 273                 arrow = scr->hiRightArrow;
 274             else
 275                 arrow = scr->rightArrow;
 276         } else {
 277             if (sPtr->flags.arrowsPosition == WSAMaxEnd) {
 278                 ofs = view->size.height - bsize+1 - 3;
 279             } else {
 280                 ofs = 2 + bsize+1;
 281             }
 282             if (sPtr->flags.incrDown)
 283                 arrow = scr->hiDownArrow;
 284             else
 285                 arrow = scr->downArrow;
 286         }
 287
 288 #ifndef DOUBLE_BUFFER
 289         if (sPtr->flags.incrDown)
 290             gc = scr->whiteGC;
 291 #endif
 292     }
 293
 294
 295     if (sPtr->flags.horizontal) {
 296
 297         /* paint button */
 298 #ifndef DOUBLE_BUFFER
 299         XFillRectangle(scr->display, d, gc,
 300                        ofs+1, 2+1, bsize+1-3, bsize-3);
 301 #else
 302         if ((!part&&sPtr->flags.decrDown) || (part&&sPtr->flags.incrDown))
 303             XFillRectangle(scr->display, d, WMColorGC(scr->white),
 304                            ofs+1, 2+1, bsize+1-3, bsize-3);
 305 #endif /* DOUBLE_BUFFER */
 306         W_DrawRelief(scr, d, ofs, 2, bsize, bsize, WRRaised);
 307
 308         /* paint arrow */
 309         XSetClipMask(scr->display, scr->clipGC, arrow->mask);
 310         XSetClipOrigin(scr->display, scr->clipGC,
 311                        ofs + (bsize - arrow->width) / 2,
 312                        2 + (bsize - arrow->height) / 2);
 313
 314         XCopyArea(scr->display, arrow->pixmap, d, scr->clipGC,
 315                   0, 0, arrow->width, arrow->height,
 316                   ofs + (bsize - arrow->width) / 2,
 317                   2 + (bsize - arrow->height) / 2);
 318
 319     } else { /* vertical */
 320
 321         /* paint button */
 322 #ifndef DOUBLE_BUFFER
 323         XFillRectangle(scr->display, d, gc,
 324                        2+1, ofs+1, bsize-3, bsize+1-3);
 325 #else
 326         if ((!part&&sPtr->flags.decrDown) || (part&&sPtr->flags.incrDown))
 327             XFillRectangle(scr->display, d, WMColorGC(scr->white),
 328                            2+1, ofs+1, bsize-3, bsize+1-3);
 329 #endif /* DOUBLE_BUFFER */
 330         W_DrawRelief(scr, d, 2, ofs, bsize, bsize, WRRaised);
 331
 332         /* paint arrow */
 333
 334         XSetClipMask(scr->display, scr->clipGC, arrow->mask);
 335         XSetClipOrigin(scr->display, scr->clipGC,
 336                        2 + (bsize - arrow->width) / 2,
 337                        ofs + (bsize - arrow->height) / 2);
 338         XCopyArea(scr->display, arrow->pixmap, d, scr->clipGC,
 339                   0, 0, arrow->width, arrow->height,
 340                   2 + (bsize - arrow->width) / 2,
 341                   ofs + (bsize - arrow->height) / 2);
 342     }
 343 }
 344
 345
 346 static int
 347 knobLength(Scroller *sPtr)
 348 {
 349     int tmp, length;
 350
 351
 352     if (sPtr->flags.horizontal)
 353         length = sPtr->view->size.width - 4;
 354     else
 355         length = sPtr->view->size.height - 4;
 356
 357     if (sPtr->flags.arrowsPosition == WSAMaxEnd) {
 358         length -= (SCROLLER_WIDTH - 4 + 1)*2;
 359     } else if (sPtr->flags.arrowsPosition == WSAMinEnd) {
 360         length -= (SCROLLER_WIDTH - 4 + 1)*2;
 361     }
 362
 363     tmp = (int)((float)length * sPtr->knobProportion + 0.5);
 364     /* keep minimum size */
 365     if (tmp < SCROLLER_WIDTH-4)
 366         tmp = SCROLLER_WIDTH-4;
 367
 368     return tmp;
 369 }
 370
 371
 372 static void
 373 paintScroller(Scroller *sPtr)
 374 {
 375     WMView *view = sPtr->view;
 376     WMScreen *scr = view->screen;
 377 #ifdef DOUBLE_BUFFER
 378     Pixmap d;
 379 #else
 380     Drawable d = view->window;
 381 #endif
 382     int length, ofs;
 383     float knobP, knobL;
 384
 385
 386 #ifdef DOUBLE_BUFFER
 387     d = XCreatePixmap(scr->display, view->window, view->size.width,
 388                       view->size.height, scr->depth);
 389     XFillRectangle(scr->display, d, WMColorGC(scr->gray), 0, 0,
 390                    view->size.width, view->size.height);
 391 #endif
 392
 393     XDrawRectangle(scr->display, d, WMColorGC(scr->black), 0, 0,
 394                    view->size.width-1, view->size.height-1);
 395 #ifndef DOUBLE_BUFFER
 396     XDrawRectangle(scr->display, d, WMColorGC(scr->gray), 1, 1,
 397                    view->size.width-3, view->size.height-3);
 398 #endif
 399
 400     if (sPtr->flags.horizontal)
 401         length = view->size.width - 4;
 402     else
 403         length = view->size.height - 4;
 404
 405     if (sPtr->flags.documentFullyVisible) {
 406         XFillRectangle(scr->display, d, scr->stippleGC, 2, 2,
 407                        view->size.width-4, view->size.height-4);
 408     } else {
 409         if (sPtr->flags.arrowsPosition==WSAMaxEnd) {
 410             ofs = 0;
 411             length -= (SCROLLER_WIDTH - 4 + 1)*2;
 412         } else if (sPtr->flags.arrowsPosition==WSAMinEnd) {
 413             ofs = (SCROLLER_WIDTH - 4 + 1)*2;
 414             length -= (SCROLLER_WIDTH - 4 + 1)*2;
 415         } else {
 416             ofs = 0;
 417         }
 418
 419         knobL = (float)knobLength(sPtr);
 420
 421         knobP = sPtr->floatValue * ((float)length - knobL);
 422
 423
 424         if (sPtr->flags.horizontal) {
 425             /* before */
 426             XFillRectangle(scr->display, d, scr->stippleGC,
 427                            ofs+2, 2, (int)knobP, view->size.height-4);
 428
 429             /* knob */
 430 #ifndef DOUBLE_BUFFER
 431             XFillRectangle(scr->display, d, scr->lightGC,
 432                            ofs+2+(int)knobP+2, 2+2, (int)knobL-4,
 433                            view->size.height-4-4);
 434 #endif
 435             W_DrawRelief(scr, d, ofs+2+(int)knobP, 2, (int)knobL,
 436                          view->size.height-4, WRRaised);
 437
 438             XCopyArea(scr->display, scr->scrollerDimple->pixmap, d,
 439                       scr->copyGC, 0, 0,
 440                       scr->scrollerDimple->width, scr->scrollerDimple->height,
 441                       ofs+2+(int)knobP+((int)knobL-scr->scrollerDimple->width-1)/2,
 442                       (view->size.height-scr->scrollerDimple->height-1)/2);
 443
 444             /* after */
 445             if ((int)(knobP+knobL) < length)
 446                 XFillRectangle(scr->display, d, scr->stippleGC,
 447                                ofs+2+(int)(knobP+knobL), 2,
 448                                length-(int)(knobP+knobL),
 449                                view->size.height-4);
 450         } else {
 451             /* before */
 452             if (knobP>0.0)
 453                 XFillRectangle(scr->display, d, scr->stippleGC,
 454                                2, ofs+2, view->size.width-4, (int)knobP);
 455
 456             /* knob */
 457 #ifndef DOUBLE_BUFFER
 458             XFillRectangle(scr->display, d, scr->lightGC,
 459                            2+2, ofs+2+(int)knobP+2,
 460                            view->size.width-4-4, (int)knobL-4);
 461 #endif
 462             XCopyArea(scr->display, scr->scrollerDimple->pixmap, d,
 463                       scr->copyGC, 0, 0,
 464                       scr->scrollerDimple->width, scr->scrollerDimple->height,
 465                       (view->size.width-scr->scrollerDimple->width-1)/2,
 466                       ofs+2+(int)knobP+((int)knobL-scr->scrollerDimple->height-1)/2);
 467
 468             W_DrawRelief(scr, d, 2, ofs+2+(int)knobP,
 469                          view->size.width-4, (int)knobL, WRRaised);
 470
 471             /* after */
 472             if ((int)(knobP+knobL) < length)
 473                 XFillRectangle(scr->display, d, scr->stippleGC,
 474                                2, ofs+2+(int)(knobP+knobL),
 475                                view->size.width-4,
 476                                length-(int)(knobP+knobL));
 477         }
 478
 479         if (sPtr->flags.arrowsPosition != WSANone) {
 480             paintArrow(sPtr, d, 0);
 481             paintArrow(sPtr, d, 1);
 482         }
 483     }
 484
 485 #ifdef DOUBLE_BUFFER
 486     XCopyArea(scr->display, d, view->window, scr->copyGC, 0, 0,
 487               view->size.width, view->size.height, 0, 0);
 488     XFreePixmap(scr->display, d);
 489 #endif
 490 }
 491
 492
 493
 494 static void
 495 handleEvents(XEvent *event, void *data)
 496 {
 497     Scroller *sPtr = (Scroller*)data;
 498
 499     CHECK_CLASS(data, WC_Scroller);
 500
 501
 502     switch (event->type) {
 503      case Expose:
 504         if (event->xexpose.count==0)
 505             paintScroller(sPtr);
 506         break;
 507
 508      case DestroyNotify:
 509         destroyScroller(sPtr);
 510         break;
 511     }
 512 }
 513
 514
 515
 516 /*
 517  * locatePointInScroller-
 518  *     Return the part of the scroller where the point is located.
 519  */
 520 static WMScrollerPart
 521 locatePointInScroller(Scroller *sPtr, int x, int y, int alternate)
 522 {
 523     int width = sPtr->view->size.width;
 524     int height = sPtr->view->size.height;
 525     int c, p1, p2, p3, p4, p5, p6;
 526     int knobL, slotL;
 527
 528
 529     /* if there is no knob... */
 530     if (sPtr->flags.documentFullyVisible)
 531         return WSKnobSlot;
 532
 533     if (sPtr->flags.horizontal)
 534         c = x;
 535     else
 536         c = y;
 537
 538     /*     p1  p2           p3           p4   p5   p6
 539      * |   |   |###########|             |#####|   |   |
 540      * | < | > |###########|      O      |#####| < | > |
 541      * |   |   |###########|             |#####|   |   |
 542      */
 543
 544     if (sPtr->flags.arrowsPosition == WSAMinEnd) {
 545         p1 = 18;
 546         p2 = 36;
 547
 548         if (sPtr->flags.horizontal) {
 549             slotL = width - 36;
 550             p5 = width;
 551         } else {
 552             slotL = height - 36;
 553             p5 = height;
 554         }
 555         p6 = p5;
 556     } else if (sPtr->flags.arrowsPosition == WSAMaxEnd) {
 557         if (sPtr->flags.horizontal) {
 558             slotL = width - 36;
 559             p6 = width - 18;
 560         } else {
 561             slotL = height - 36;
 562             p6 = height - 18;
 563         }
 564         p5 = p6 - 18;
 565
 566         p1 = p2 = 0;
 567     } else {
 568         /* no arrows */
 569         p1 = p2 = 0;
 570
 571         if (sPtr->flags.horizontal) {
 572             slotL = p5 = p6 = width;
 573         } else {
 574             slotL = p5 = p6 = height;
 575         }
 576     }
 577
 578     knobL = knobLength(sPtr);
 579     p3 = p2 + (int)((float)(slotL-knobL) * sPtr->floatValue);
 580     p4 = p3 + knobL;
 581
 582     /* uses a mix of the NS and Win ways of doing scroll page */
 583     if (c <= p1)
 584         return alternate ? WSDecrementPage : WSDecrementLine;
 585     else if (c <= p2)
 586         return alternate ? WSIncrementPage : WSIncrementLine;
 587     else if (c <= p3)
 588         return WSDecrementPage;
 589     else if (c <= p4)
 590         return WSKnob;
 591     else if (c <= p5)
 592         return WSIncrementPage;
 593     else if (c <= p6)
 594         return alternate ? WSDecrementPage : WSDecrementLine;
 595     else
 596         return alternate ? WSIncrementPage : WSIncrementLine;
 597 }
 598
 599
 600
 601 static void
 602 handlePush(Scroller *sPtr, int pushX, int pushY, int alternate)
 603 {
 604     WMScrollerPart part;
 605     int doAction = 0;
 606
 607     part = locatePointInScroller(sPtr, pushX, pushY, alternate);
 608
 609     sPtr->flags.hitPart = part;
 610
 611     switch (part) {
 612      case WSIncrementLine:
 613         sPtr->flags.incrDown = 1;
 614         doAction = 1;
 615         break;
 616
 617      case WSIncrementPage:
 618         doAction = 1;
 619         break;
 620
 621      case WSDecrementLine:
 622         sPtr->flags.decrDown = 1;
 623         doAction = 1;
 624         break;
 625
 626      case WSDecrementPage:
 627         doAction = 1;
 628         break;
 629
 630      case WSKnob:
 631         sPtr->flags.draggingKnob = 1;
 632 #ifndef STRICT_NEXT_BEHAVIOUR
 633         if (sPtr->flags.horizontal)
 634             sPtr->dragPoint = pushX;
 635         else
 636             sPtr->dragPoint = pushY;
 637
 638         {
 639             int noButtons = (sPtr->flags.arrowsPosition == WSANone);
 640             int length, knobP;
 641
 642             if (sPtr->flags.horizontal)
 643                 length = sPtr->view->size.width - 4;
 644             else
 645                 length = sPtr->view->size.height - 4;
 646
 647             if (!noButtons)
 648                 length -= 36;
 649
 650             knobP = (int)(sPtr->floatValue * (float)(length-knobLength(sPtr)));
 651
 652             if (sPtr->flags.arrowsPosition == WSAMinEnd)
 653                 sPtr->dragPoint -= 2 + (noButtons ? 0 : 36) + knobP;
 654             else
 655                 sPtr->dragPoint -= 2 + knobP;
 656         }
 657 #endif /* STRICT_NEXT_BEHAVIOUR */
 658         /* This does not seem necesary here since we don't know yet if the
 659          * knob will be dragged later. -Dan
 660         handleMotion(sPtr, pushX, pushY); */
 661         break;
 662
 663      case WSKnobSlot:
 664      case WSNoPart:
 665         /* dummy */
 666         break;
 667     }
 668
 669     if (doAction && sPtr->action) {
 670         (*sPtr->action)(sPtr, sPtr->clientData);
 671     }
 672 }
 673
 674
 675 static float
 676 floatValueForPoint(int slotOfs, int slotLength, int knobLength, int point)
 677 {
 678     float floatValue = 0;
 679     float position;
 680
 681 #ifdef STRICT_NEXT_BEHAVIOUR
 682     if (point < slotOfs + knobLength/2)
 683         position = (float)(slotOfs + knobLength/2);
 684     else if (point > slotOfs + slotLength - knobLength/2)
 685         position = (float)(slotOfs + slotLength - knobLength/2);
 686     else
 687         position = (float)point;
 688
 689     floatValue = (position-(float)(slotOfs+slotLength/2))
 690         /(float)(slotLength-knobLength);
 691 #else
 692     /* Adjust the last point to lie inside the knob slot */
 693     if (point < slotOfs)
 694         position = (float)slotOfs;
 695     else if (point > slotOfs + slotLength)
 696         position = (float)(slotOfs + slotLength);
 697     else
 698         position = (float)point;
 699
 700     /* Compute the float value */
 701     floatValue = (position-(float)slotOfs) / (float)(slotLength-knobLength);
 702 #endif
 703
 704     return floatValue;
 705 }
 706
 707
 708 static void
 709 handleMotion(Scroller *sPtr, int mouseX, int mouseY)
 710 {
 711     int slotOffset;
 712     int slotLength;
 713     int noButtons = (sPtr->flags.arrowsPosition == WSANone);
 714
 715     if (sPtr->flags.arrowsPosition == WSAMinEnd)
 716         slotOffset = 2 + (noButtons ? 0 : 36);
 717     else
 718         slotOffset = 2;
 719
 720     if (sPtr->flags.draggingKnob) {
 721         float newFloatValue;
 722 #ifdef STRICT_NEXT_BEHAVIOUR
 723         if (sPtr->flags.horizontal) {
 724             slotLength = sPtr->view->size.width-4-(noButtons ? 0 : 36);
 725             newFloatValue = floatValueForPoint(slotOffset, slotLength,
 726                                        (int)(slotLength*sPtr->knobProportion),
 727                                        mouseX);
 728         } else {
 729             slotLength = sPtr->view->size.height-4-(noButtons ? 0 : 36);
 730             newFloatValue = floatValueForPoint(slotOffset, slotLength,
 731                                        (int)(slotLength*sPtr->knobProportion),
 732                                        mouseY);
 733         }
 734 #else
 735         if (sPtr->flags.horizontal) {
 736             slotLength = sPtr->view->size.width-4-(noButtons ? 0 : 36);
 737             newFloatValue = floatValueForPoint(slotOffset, slotLength,
 738                                        (int)(slotLength*sPtr->knobProportion),
 739                                        mouseX-sPtr->dragPoint);
 740         } else {
 741             slotLength = sPtr->view->size.height-4-(noButtons ? 0 : 36);
 742             newFloatValue = floatValueForPoint(slotOffset, slotLength,
 743                                        (int)(slotLength*sPtr->knobProportion),
 744                                        mouseY-sPtr->dragPoint);
 745         }
 746 #endif /* !STRICT_NEXT_BEHAVIOUR */
 747         WMSetScrollerParameters(sPtr, newFloatValue, sPtr->knobProportion);
 748         if (sPtr->action) {
 749             (*sPtr->action)(sPtr, sPtr->clientData);
 750         }
 751     } else {
 752         int part;
 753
 754         part = locatePointInScroller(sPtr, mouseX, mouseY, False);
 755
 756         sPtr->flags.hitPart = part;
 757
 758         if (part == WSIncrementLine && sPtr->flags.decrDown) {
 759             sPtr->flags.decrDown = 0;
 760             sPtr->flags.incrDown = 1;
 761         } else if (part == WSDecrementLine && sPtr->flags.incrDown) {
 762             sPtr->flags.incrDown = 0;
 763             sPtr->flags.decrDown = 1;
 764         } else if (part != WSIncrementLine && part != WSDecrementLine) {
 765             sPtr->flags.incrDown = 0;
 766             sPtr->flags.decrDown = 0;
 767         }
 768     }
 769 }
 770
 771
 772 static void
 773 autoScroll(void *clientData)
 774 {
 775     Scroller *sPtr = (Scroller*)clientData;
 776
 777     if (sPtr->action) {
 778         (*sPtr->action)(sPtr, sPtr->clientData);
 779     }
 780     sPtr->timerID= WMAddTimerHandler(AUTOSCROLL_DELAY, autoScroll, clientData);
 781 }
 782
 783
 784 static void
 785 handleActionEvents(XEvent *event, void *data)
 786 {
 787     Scroller *sPtr = (Scroller*)data;
 788     int id, dd;
 789
 790
 791     /* check if we're really dealing with a scroller, as something
 792      * might have gone wrong in the event dispatching stuff */
 793     CHECK_CLASS(sPtr, WC_Scroller);
 794
 795     id = sPtr->flags.incrDown;
 796     dd = sPtr->flags.decrDown;
 797
 798     switch (event->type) {
 799      case EnterNotify:
 800
 801         break;
 802
 803      case LeaveNotify:
 804         if (sPtr->timerID) {
 805             WMDeleteTimerHandler(sPtr->timerID);
 806             sPtr->timerID = NULL;
 807         }
 808         sPtr->flags.incrDown = 0;
 809         sPtr->flags.decrDown = 0;
 810         break;
 811
 812      case ButtonPress:
 813         /* FIXME: change Mod1Mask with something else */
 814         handlePush(sPtr, event->xbutton.x, event->xbutton.y,
 815                    (event->xbutton.state & Mod1Mask)
 816                    ||event->xbutton.button==Button2);
 817         /* continue scrolling if pushed on the buttons */
 818         if (sPtr->flags.hitPart == WSIncrementLine
 819             || sPtr->flags.hitPart == WSDecrementLine) {
 820             sPtr->timerID = WMAddTimerHandler(AUTOSCROLL_INITIAL_DELAY,
 821                                               autoScroll, sPtr);
 822         }
 823         break;
 824
 825      case ButtonRelease:
 826         if (sPtr->flags.draggingKnob) {
 827             if (sPtr->action) {
 828                 (*sPtr->action)(sPtr, sPtr->clientData);
 829             }
 830         }
 831         if (sPtr->timerID) {
 832             WMDeleteTimerHandler(sPtr->timerID);
 833             sPtr->timerID = NULL;
 834         }
 835         sPtr->flags.incrDown = 0;
 836         sPtr->flags.decrDown = 0;
 837         sPtr->flags.draggingKnob = 0;
 838         break;
 839
 840      case MotionNotify:
 841         handleMotion(sPtr, event->xbutton.x, event->xbutton.y);
 842         if (sPtr->timerID && sPtr->flags.hitPart != WSIncrementLine
 843             && sPtr->flags.hitPart != WSDecrementLine) {
 844             WMDeleteTimerHandler(sPtr->timerID);
 845             sPtr->timerID = NULL;
 846         }
 847         break;
 848     }
 849     if (id != sPtr->flags.incrDown || dd != sPtr->flags.decrDown)
 850         paintScroller(sPtr);
 851 }
 852
 853
 854
 855 static void
 856 destroyScroller(Scroller *sPtr)
 857 {
 858     /* we don't want autoscroll try to scroll a freed widget */
 859     if (sPtr->timerID) {
 860         WMDeleteTimerHandler(sPtr->timerID);
 861     }
 862
 863     free(sPtr);
 864 }
 865