windows/scroll.c

   1 /*
   2  * Scroll windows and DCs
   3  *
   4  * Copyright  David W. Metcalfe, 1993
   5  *            Alex Korobka       1995
   6  *
   7  *
   8  */
   9
  10 #include <stdlib.h>
  11 #include "wintypes.h"
  12 #include "class.h"
  13 #include "win.h"
  14 #include "gdi.h"
  15 #include "sysmetrics.h"
  16 #include "stddebug.h"
  17 /* #define DEBUG_SCROLL */
  18 #include "debug.h"
  19
  20
  21
  22 extern HRGN DCE_GetVisRgn(HWND, WORD);
  23 extern HWND CARET_GetHwnd();
  24
  25 static int RgnType;
  26
  27
  28 /* -----------------------------------------------------------------------
  29  *             SCROLL_TraceChildren
  30  *
  31  * Returns a region invalidated by children, siblings, and/or ansectors
  32  * in the window rectangle or client rectangle
  33  *
  34  * dcx can have DCX_WINDOW, DCX_CLIPCHILDREN, DCX_CLIPSIBLINGS set
  35  */
  36
  37 HRGN    SCROLL_TraceChildren( HWND hScroll, short dx, short dy, WORD dcx)
  38 {
  39  WND           *wndScroll = WIN_FindWndPtr( hScroll );
  40  HRGN           hRgnWnd;
  41  HRGN           hUpdateRgn,hCombineRgn;
  42
  43  if( !wndScroll || ( !dx && !dy) ) return 0;
  44
  45  if( dcx & DCX_WINDOW )
  46          hRgnWnd   = CreateRectRgnIndirect16(&wndScroll->rectWindow);
  47  else
  48         {
  49          RECT32 rect;
  50
  51          GetClientRect32(hScroll,&rect);
  52          hRgnWnd   = CreateRectRgnIndirect32(&rect);
  53         }
  54
  55  hUpdateRgn  = DCE_GetVisRgn( hScroll, dcx );
  56  hCombineRgn = CreateRectRgn(0,0,0,0);
  57
  58  if( !hUpdateRgn || !hCombineRgn )
  59       {
  60         DeleteObject( hUpdateRgn? hUpdateRgn : hCombineRgn);
  61         DeleteObject(hRgnWnd);
  62         return 0;
  63       }
  64
  65  OffsetRgn( hUpdateRgn, dx, dy);
  66  CombineRgn(hCombineRgn, hRgnWnd, hUpdateRgn, RGN_DIFF);
  67
  68  DeleteObject(hRgnWnd);
  69  DeleteObject(hUpdateRgn);
  70
  71  return hCombineRgn;
  72 }
  73
  74
  75 /* ----------------------------------------------------------------------
  76  *             SCROLL_ScrollChildren
  77  */
  78 BOOL    SCROLL_ScrollChildren( HWND hScroll, short dx, short dy)
  79 {
  80  WND           *wndPtr = WIN_FindWndPtr(hScroll);
  81  HRGN           hUpdateRgn;
  82  BOOL           b = 0;
  83
  84  if( !wndPtr || ( !dx && !dy )) return 0;
  85
  86  dprintf_scroll(stddeb,"SCROLL_ScrollChildren: hwnd %04x dx=%i dy=%i\n",hScroll,dx,dy);
  87
  88  /* get a region in client rect invalidated by siblings and ansectors */
  89  hUpdateRgn = SCROLL_TraceChildren(hScroll, dx , dy, DCX_CLIPSIBLINGS);
  90
  91    /* update children coordinates */
  92    for (wndPtr = wndPtr->child; wndPtr; wndPtr = wndPtr->next)
  93    {
  94         /* we can check if window intersects with clipRect parameter
  95          * and do not move it if not - just a thought.     - AK
  96          */
  97         SetWindowPos(wndPtr->hwndSelf, 0, wndPtr->rectWindow.left + dx,
  98                      wndPtr->rectWindow.top  + dy, 0,0, SWP_NOZORDER |
  99                      SWP_NOSIZE | SWP_NOACTIVATE | SWP_NOREDRAW |
 100                      SWP_DEFERERASE );
 101   }
 102
 103  /* invalidate uncovered region and paint frames */
 104  b = RedrawWindow32( hScroll, NULL, hUpdateRgn, RDW_INVALIDATE | RDW_FRAME | RDW_ERASE |
 105                                               RDW_ERASENOW | RDW_ALLCHILDREN );
 106
 107  DeleteObject( hUpdateRgn);
 108  return b;
 109 }
 110
 111
 112 /*************************************************************************
 113  *             ScrollWindow         (USER.61)
 114  *
 115  * FIXME: a bit broken
 116  */
 117
 118 void ScrollWindow(HWND hwnd, short dx, short dy, LPRECT16 rect, LPRECT16 clipRect)
 119 {
 120     HDC  hdc;
 121     HRGN hrgnUpdate,hrgnClip;
 122     RECT16 rc, cliprc;
 123     HWND hCaretWnd = CARET_GetHwnd();
 124
 125     dprintf_scroll(stddeb,"ScrollWindow: dx=%d, dy=%d, lpRect =%08lx clipRect=%i,%i,%i,%i\n",
 126             dx, dy, (LONG)rect, (int)((clipRect)?clipRect->left:0),
 127                                 (int)((clipRect)?clipRect->top:0),
 128                                 (int)((clipRect)?clipRect->right:0),
 129                                 (int)((clipRect)?clipRect->bottom:0));
 130
 131     /* if rect is NULL children have to be moved */
 132     if ( !rect )
 133        {
 134         GetClientRect16(hwnd, &rc);
 135           hrgnClip = CreateRectRgnIndirect16( &rc );
 136
 137           if ((hCaretWnd == hwnd) || IsChild(hwnd,hCaretWnd))
 138               HideCaret(hCaretWnd);
 139           else hCaretWnd = 0;
 140
 141           /* children will be Blt'ed too */
 142           hdc      = GetDCEx(hwnd, hrgnClip, DCX_CACHE | DCX_CLIPSIBLINGS);
 143           DeleteObject(hrgnClip);
 144        }
 145     else
 146        {
 147           GetClientRect16(hwnd,&rc);
 148           dprintf_scroll(stddeb,"\trect=%i %i %i %i client=%i %i %i %i\n",
 149                          (int)rect->left,(int)rect->top,(int)rect->right,
 150                          (int)rect->bottom,(int)rc.left,(int)rc.top,
 151                          (int)rc.right,(int)rc.bottom);
 152
 153           if (hCaretWnd == hwnd) HideCaret(hCaretWnd);
 154           else hCaretWnd = 0;
 155           CopyRect16(&rc, rect);
 156           hdc = GetDC(hwnd);
 157        }
 158
 159     if (clipRect == NULL)
 160         GetClientRect16(hwnd, &cliprc);
 161     else
 162         CopyRect16(&cliprc, clipRect);
 163
 164     hrgnUpdate = CreateRectRgn(0, 0, 0, 0);
 165     ScrollDC(hdc, dx, dy, &rc, &cliprc, hrgnUpdate, NULL);
 166     ReleaseDC(hwnd, hdc);
 167
 168     if( !rect )
 169       {
 170          /* FIXME: this doesn't take into account hrgnUpdate */
 171          if( !SCROLL_ScrollChildren(hwnd,dx,dy) )
 172              InvalidateRgn(hwnd, hrgnUpdate, TRUE);
 173       }
 174     else
 175       {
 176         HRGN hrgnInv = SCROLL_TraceChildren(hwnd,dx,dy,DCX_CLIPCHILDREN |
 177                                                        DCX_CLIPSIBLINGS );
 178         if( hrgnInv )
 179         {
 180             CombineRgn(hrgnUpdate,hrgnInv,hrgnUpdate,RGN_OR);
 181             DeleteObject(hrgnInv);
 182         }
 183
 184         RedrawWindow32( hwnd, NULL, hrgnUpdate, RDW_INVALIDATE | RDW_ERASE | RDW_ERASENOW);
 185       }
 186
 187     DeleteObject(hrgnUpdate);
 188     if( hCaretWnd ) ShowCaret(hCaretWnd);
 189 }
 190
 191
 192 /*************************************************************************
 193  *             ScrollDC         (USER.221)
 194  *
 195  * FIXME: half-broken
 196  */
 197
 198 BOOL ScrollDC(HDC hdc, short dx, short dy, LPRECT16 rc, LPRECT16 cliprc,
 199               HRGN hrgnUpdate, LPRECT16 rcUpdate)
 200 {
 201     HRGN hrgnClip;
 202     POINT16 src, dest;
 203     short width, height;
 204     DC *dc = (DC *)GDI_GetObjPtr(hdc, DC_MAGIC);
 205
 206     dprintf_scroll(stddeb,"ScrollDC: dx=%d dy=%d, hrgnUpdate=%04x rcUpdate = %p cliprc = %p, rc=%d %d %d %d\n",
 207                    dx, dy, hrgnUpdate, rcUpdate, cliprc, rc ? rc->left : 0,
 208                    rc ? rc->top : 0, rc ? rc->right : 0, rc ? rc->bottom : 0 );
 209
 210     if (rc == NULL)
 211         return FALSE;
 212
 213     if (!dc)
 214     {
 215         fprintf(stdnimp,"ScrollDC: Invalid HDC\n");
 216         return FALSE;
 217     }
 218
 219     if (cliprc)
 220     {
 221         hrgnClip = CreateRectRgnIndirect16(cliprc);
 222         SelectClipRgn(hdc, hrgnClip);
 223     }
 224
 225     if (dx > 0)
 226     {
 227         src.x = XDPTOLP(dc, rc->left);
 228         dest.x = XDPTOLP(dc, rc->left + abs(dx));
 229     }
 230     else
 231     {
 232         src.x = XDPTOLP(dc, rc->left + abs(dx));
 233         dest.x = XDPTOLP(dc, rc->left);
 234     }
 235     if (dy > 0)
 236     {
 237         src.y = YDPTOLP(dc, rc->top);
 238         dest.y = YDPTOLP(dc, rc->top + abs(dy));
 239     }
 240     else
 241     {
 242         src.y = YDPTOLP(dc, rc->top + abs(dy));
 243         dest.y = YDPTOLP(dc, rc->top);
 244     }
 245
 246     width = rc->right - rc->left - abs(dx);
 247     height = rc->bottom - rc->top - abs(dy);
 248
 249     if (!BitBlt(hdc, dest.x, dest.y, width, height, hdc, src.x, src.y,
 250                 SRCCOPY))
 251         return FALSE;
 252
 253     if (hrgnUpdate)
 254     {
 255         HRGN hrgn1,hrgn2;
 256
 257         if (dx > 0)
 258             hrgn1 = CreateRectRgn(rc->left, rc->top, rc->left+dx, rc->bottom);
 259         else if (dx < 0)
 260             hrgn1 = CreateRectRgn(rc->right+dx, rc->top, rc->right,
 261                                   rc->bottom);
 262         else
 263             hrgn1 = CreateRectRgn(0, 0, 0, 0);
 264
 265         if (dy > 0)
 266             hrgn2 = CreateRectRgn(rc->left, rc->top, rc->right, rc->top+dy);
 267         else if (dy < 0)
 268             hrgn2 = CreateRectRgn(rc->left, rc->bottom+dy, rc->right,
 269                                   rc->bottom);
 270         else
 271             hrgn2 = CreateRectRgn(0, 0, 0, 0);
 272
 273         RgnType = CombineRgn(hrgnUpdate, hrgn1, hrgn2, RGN_OR);
 274         DeleteObject(hrgn1);
 275         DeleteObject(hrgn2);
 276         if (rcUpdate) GetRgnBox16( hrgnUpdate, rcUpdate );
 277     }
 278     else if (rcUpdate)
 279     {
 280         RECT16 rx,ry;
 281
 282         rx = ry = *rc;
 283         if( dx > 0 )      rx.right = rc->left+dx;
 284         else if (dx < 0)  rx.left = rc->right+dx;
 285         else SetRectEmpty16( &rx );
 286
 287         if( dy > 0 )      ry.bottom = rc->top+dy;
 288         else if (dy < 0)  ry.top = rc->bottom+dy;
 289         else SetRectEmpty16( &ry );
 290
 291         UnionRect16( rcUpdate, &rx, &ry );
 292     }
 293
 294     return TRUE;
 295 }
 296
 297
 298 /*************************************************************************
 299  *             ScrollWindowEx       (USER.319)
 300  *
 301  * FIXME: broken
 302  *
 303  * SCROLL_TraceChildren can help
 304  */
 305
 306 int ScrollWindowEx(HWND hwnd, short dx, short dy, LPRECT16 rect, LPRECT16 clipRect,
 307                    HRGN hrgnUpdate, LPRECT16 rcUpdate, WORD flags)
 308 {
 309     HDC hdc;
 310     RECT16 rc, cliprc;
 311
 312     dprintf_scroll(stddeb,"ScrollWindowEx: dx=%d, dy=%d, wFlags=%04x\n",dx, dy, flags);
 313
 314     hdc = GetDC(hwnd);
 315
 316     if (rect == NULL)
 317         GetClientRect16(hwnd, &rc);
 318     else
 319         CopyRect16(&rc, rect);
 320     if (clipRect == NULL)
 321         GetClientRect16(hwnd, &cliprc);
 322     else
 323         CopyRect16(&cliprc, clipRect);
 324
 325     ScrollDC(hdc, dx, dy, &rc, &cliprc, hrgnUpdate, rcUpdate);
 326
 327     if (flags | SW_INVALIDATE)
 328     {
 329         RedrawWindow32( hwnd, NULL, hrgnUpdate, RDW_INVALIDATE | RDW_ERASE |
 330                         ((flags & SW_ERASE) ? RDW_ERASENOW : 0));
 331     }
 332
 333     ReleaseDC(hwnd, hdc);
 334     return RgnType;
 335 }