Change the expected results to match the new actual results, now that angles no longe...
[synfig.git] / synfig-osx / trunk / launcher / rootless-val-tree.c
1 /*
2  * Calculate window clip lists for rootless mode
3  *
4  * This file is very closely based on mivaltree.c.
5  */
6  /* $XFree86: xc/programs/Xserver/hw/darwin/quartz/rootlessValTree.c,v 1.2 2002/06/18 19:43:04 torrey Exp $ */
7
8 /*
9  * mivaltree.c --
10  *      Functions for recalculating window clip lists. Main function
11  *      is miValidateTree.
12  *
13
14 Copyright 1987, 1988, 1989, 1998  The Open Group
15
16 All Rights Reserved.
17
18 The above copyright notice and this permission notice shall be included in
19 all copies or substantial portions of the Software.
20
21 THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
22 IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
23 FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL THE
24 OPEN GROUP BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
25 AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
26 CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
27
28 Except as contained in this notice, the name of The Open Group shall not be
29 used in advertising or otherwise to promote the sale, use or other dealings
30 in this Software without prior written authorization from The Open Group.
31
32  *
33  * Copyright 1987, 1988, 1989 by 
34  * Digital Equipment Corporation, Maynard, Massachusetts,
35  * 
36  *                         All Rights Reserved
37  * 
38  * Permission to use, copy, modify, and distribute this software and its 
39  * documentation for any purpose and without fee is hereby granted, 
40  * provided that the above copyright notice appear in all copies and that
41  * both that copyright notice and this permission notice appear in 
42  * supporting documentation, and that the name of Digital not be
43  * used in advertising or publicity pertaining to distribution of the
44  * software without specific, written prior permission.  
45  * 
46  * DIGITAL DISCLAIMS ALL WARRANTIES WITH REGARD TO THIS SOFTWARE, INCLUDING
47  * ALL IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS, IN NO EVENT SHALL
48  * DIGITAL BE LIABLE FOR ANY SPECIAL, INDIRECT OR CONSEQUENTIAL DAMAGES OR
49  * ANY DAMAGES WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS,
50  * WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION,
51  * ARISING OUT OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS
52  * SOFTWARE.
53  * 
54  ******************************************************************/
55
56 /* The panoramix components contained the following notice */
57 /****************************************************************
58 *                                                               *
59 *    Copyright (c) Digital Equipment Corporation, 1991, 1997    *
60 *                                                               *
61 *   All Rights Reserved.  Unpublished rights  reserved  under   *
62 *   the copyright laws of the United States.                    *
63 *                                                               *
64 *   The software contained on this media  is  proprietary  to   *
65 *   and  embodies  the  confidential  technology  of  Digital   *
66 *   Equipment Corporation.  Possession, use,  duplication  or   *
67 *   dissemination of the software and media is authorized only  *
68 *   pursuant to a valid written license from Digital Equipment  *
69 *   Corporation.                                                *
70 *                                                               *
71 *   RESTRICTED RIGHTS LEGEND   Use, duplication, or disclosure  *
72 *   by the U.S. Government is subject to restrictions  as  set  *
73 *   forth in Subparagraph (c)(1)(ii)  of  DFARS  252.227-7013,  *
74 *   or  in  FAR 52.227-19, as applicable.                       *
75 *                                                               *
76 *****************************************************************/
77
78  /* 
79   * Aug '86: Susan Angebranndt -- original code
80   * July '87: Adam de Boor -- substantially modified and commented
81   * Summer '89: Joel McCormack -- so fast you wouldn't believe it possible.
82   *             In particular, much improved code for window mapping and
83   *             circulating.
84   *             Bob Scheifler -- avoid miComputeClips for unmapped windows,
85   *                              valdata changes
86   */
87 #include    "X.h"
88 #include    "scrnintstr.h"
89 #include    "validate.h"
90 #include    "windowstr.h"
91 #include    "mi.h"
92 #include    "regionstr.h"
93 #include    "mivalidate.h"
94
95 #include    "globals.h"
96
97 #ifdef SHAPE
98 /*
99  * Compute the visibility of a shaped window
100  */
101 int
102 RootlessShapedWindowIn (pScreen, universe, bounding, rect, x, y)
103     ScreenPtr   pScreen;
104     RegionPtr   universe, bounding;
105     BoxPtr      rect;
106     register int x, y;
107 {
108     BoxRec  box;
109     register BoxPtr  boundBox;
110     int     nbox;
111     Bool    someIn, someOut;
112     register int t, x1, y1, x2, y2;
113
114     nbox = REGION_NUM_RECTS (bounding);
115     boundBox = REGION_RECTS (bounding);
116     someIn = someOut = FALSE;
117     x1 = rect->x1;
118     y1 = rect->y1;
119     x2 = rect->x2;
120     y2 = rect->y2;
121     while (nbox--)
122     {
123         if ((t = boundBox->x1 + x) < x1)
124             t = x1;
125         box.x1 = t;
126         if ((t = boundBox->y1 + y) < y1)
127             t = y1;
128         box.y1 = t;
129         if ((t = boundBox->x2 + x) > x2)
130             t = x2;
131         box.x2 = t;
132         if ((t = boundBox->y2 + y) > y2)
133             t = y2;
134         box.y2 = t;
135         if (box.x1 > box.x2)
136             box.x2 = box.x1;
137         if (box.y1 > box.y2)
138             box.y2 = box.y1;
139         switch (RECT_IN_REGION(pScreen, universe, &box))
140         {
141         case rgnIN:
142             if (someOut)
143                 return rgnPART;
144             someIn = TRUE;
145             break;
146         case rgnOUT:
147             if (someIn)
148                 return rgnPART;
149             someOut = TRUE;
150             break;
151         default:
152             return rgnPART;
153         }
154         boundBox++;
155     }
156     if (someIn)
157         return rgnIN;
158     return rgnOUT;
159 }
160 #endif
161
162 #define HasParentRelativeBorder(w) (!(w)->borderIsPixel && \
163                                     HasBorder(w) && \
164                                     (w)->backgroundState == ParentRelative)
165
166
167 /*
168  *-----------------------------------------------------------------------
169  * RootlessComputeClips --
170  *      Recompute the clipList, borderClip, exposed and borderExposed
171  *      regions for pParent and its children. Only viewable windows are
172  *      taken into account.
173  *
174  * Results:
175  *      None.
176  *
177  * Side Effects:
178  *      clipList, borderClip, exposed and borderExposed are altered.
179  *      A VisibilityNotify event may be generated on the parent window.
180  *
181  *-----------------------------------------------------------------------
182  */
183 static void
184 RootlessComputeClips (pParent, pScreen, universe, kind, exposed)
185     register WindowPtr  pParent;
186     register ScreenPtr  pScreen;
187     register RegionPtr  universe;
188     VTKind              kind;
189     RegionPtr           exposed; /* for intermediate calculations */
190 {
191     int                 dx,
192                         dy;
193     RegionRec           childUniverse;
194     register WindowPtr  pChild;
195     int                 oldVis, newVis;
196     BoxRec              borderSize;
197     RegionRec           childUnion;
198     Bool                overlap;
199     RegionPtr           borderVisible;
200     Bool                resized;
201     /*
202      * Figure out the new visibility of this window.
203      * The extent of the universe should be the same as the extent of
204      * the borderSize region. If the window is unobscured, this rectangle
205      * will be completely inside the universe (the universe will cover it
206      * completely). If the window is completely obscured, none of the
207      * universe will cover the rectangle.
208      */
209     borderSize.x1 = pParent->drawable.x - wBorderWidth(pParent);
210     borderSize.y1 = pParent->drawable.y - wBorderWidth(pParent);
211     dx = (int) pParent->drawable.x + (int) pParent->drawable.width + wBorderWidth(pParent);
212     if (dx > 32767)
213         dx = 32767;
214     borderSize.x2 = dx;
215     dy = (int) pParent->drawable.y + (int) pParent->drawable.height + wBorderWidth(pParent);
216     if (dy > 32767)
217         dy = 32767;
218     borderSize.y2 = dy;
219
220     oldVis = pParent->visibility;
221     switch (RECT_IN_REGION( pScreen, universe, &borderSize)) 
222     {
223     case rgnIN:
224             newVis = VisibilityUnobscured;
225             break;
226         case rgnPART:
227             newVis = VisibilityPartiallyObscured;
228 #ifdef SHAPE
229             {
230                 RegionPtr   pBounding;
231
232                 if ((pBounding = wBoundingShape (pParent)))
233                 {
234                     switch (RootlessShapedWindowIn (pScreen, universe, 
235                                                     pBounding, &borderSize,
236                                                     pParent->drawable.x,
237                                                     pParent->drawable.y))
238                     {
239                     case rgnIN:
240                         newVis = VisibilityUnobscured;
241                         break;
242                     case rgnOUT:
243                         newVis = VisibilityFullyObscured;
244                         break;
245                     }
246                 }
247             }
248 #endif
249             break;
250         default:
251             newVis = VisibilityFullyObscured;
252             break;
253     }
254
255     pParent->visibility = newVis;
256     if (oldVis != newVis &&
257         ((pParent->eventMask | wOtherEventMasks(pParent)) & VisibilityChangeMask))
258         SendVisibilityNotify(pParent);
259
260     dx = pParent->drawable.x - pParent->valdata->before.oldAbsCorner.x;
261     dy = pParent->drawable.y - pParent->valdata->before.oldAbsCorner.y;
262
263     /*
264      * avoid computations when dealing with simple operations
265      */
266
267     switch (kind) {
268     case VTMap:
269     case VTStack:
270     case VTUnmap:
271         break;
272     case VTMove:
273         if ((oldVis == newVis) &&
274             ((oldVis == VisibilityFullyObscured) ||
275              (oldVis == VisibilityUnobscured)))
276         {
277             pChild = pParent;
278             while (1)
279             {
280                 if (pChild->viewable)
281                 {
282                     if (pChild->visibility != VisibilityFullyObscured)
283                     {
284                         REGION_TRANSLATE( pScreen, &pChild->borderClip,
285                                                       dx, dy);
286                         REGION_TRANSLATE( pScreen, &pChild->clipList,
287                                                       dx, dy);
288                         pChild->drawable.serialNumber = NEXT_SERIAL_NUMBER;
289                         if (pScreen->ClipNotify)
290                             (* pScreen->ClipNotify) (pChild, dx, dy);
291
292                     }
293                     if (pChild->valdata)
294                     {
295                         REGION_INIT(pScreen, 
296                                     &pChild->valdata->after.borderExposed,
297                                     NullBox, 0);
298                         if (HasParentRelativeBorder(pChild))
299                           {
300                             REGION_SUBTRACT(pScreen,
301                                          &pChild->valdata->after.borderExposed,
302                                          &pChild->borderClip,
303                                          &pChild->winSize);
304                         }
305                         REGION_INIT( pScreen, &pChild->valdata->after.exposed,
306                                                  NullBox, 0);
307                     }
308                     if (pChild->firstChild)
309                     {
310                         pChild = pChild->firstChild;
311                         continue;
312                     }
313                 }
314                 while (!pChild->nextSib && (pChild != pParent))
315                     pChild = pChild->parent;
316                 if (pChild == pParent)
317                     break;
318                 pChild = pChild->nextSib;
319             }
320             return;
321         }
322         /* fall through */
323     default:
324         /*
325          * To calculate exposures correctly, we have to translate the old
326          * borderClip and clipList regions to the window's new location so there
327          * is a correspondence between pieces of the new and old clipping regions.
328          */
329         if (dx || dy) 
330         {
331             /*
332              * We translate the old clipList because that will be exposed or copied
333              * if gravity is right.
334              */
335             REGION_TRANSLATE( pScreen, &pParent->borderClip, dx, dy);
336             REGION_TRANSLATE( pScreen, &pParent->clipList, dx, dy);
337         } 
338         break;
339     case VTBroken:
340         REGION_EMPTY (pScreen, &pParent->borderClip);
341         REGION_EMPTY (pScreen, &pParent->clipList);
342         break;
343     }
344
345     borderVisible = pParent->valdata->before.borderVisible;
346     resized = pParent->valdata->before.resized;
347     REGION_INIT( pScreen, &pParent->valdata->after.borderExposed, NullBox, 0);
348     REGION_INIT( pScreen, &pParent->valdata->after.exposed, NullBox, 0);
349
350     /*
351      * Since the borderClip must not be clipped by the children, we do
352      * the border exposure first...
353      *
354      * 'universe' is the window's borderClip. To figure the exposures, remove
355      * the area that used to be exposed from the new.
356      * This leaves a region of pieces that weren't exposed before.
357      */
358
359     if (HasBorder (pParent))
360     {
361         if (borderVisible)
362         {
363             /*
364              * when the border changes shape, the old visible portions
365              * of the border will be saved by DIX in borderVisible --
366              * use that region and destroy it
367              */
368             REGION_SUBTRACT( pScreen, exposed, universe, borderVisible);
369             REGION_DESTROY( pScreen, borderVisible);
370         }
371         else
372         {
373             REGION_SUBTRACT( pScreen, exposed, universe, &pParent->borderClip);
374         }
375         if (HasParentRelativeBorder(pParent) && (dx || dy)) {
376             REGION_SUBTRACT( pScreen, &pParent->valdata->after.borderExposed,
377                                   universe,
378                                   &pParent->winSize);
379         } else {
380             REGION_SUBTRACT( pScreen, &pParent->valdata->after.borderExposed,
381                                exposed, &pParent->winSize);
382         }
383
384         REGION_COPY( pScreen, &pParent->borderClip, universe);
385     
386         /*
387          * To get the right clipList for the parent, and to make doubly sure
388          * that no child overlaps the parent's border, we remove the parent's
389          * border from the universe before proceeding.
390          */
391     
392         REGION_INTERSECT( pScreen, universe, universe, &pParent->winSize);
393     }
394     else
395         REGION_COPY( pScreen, &pParent->borderClip, universe);
396     
397     if ((pChild = pParent->firstChild) && pParent->mapped)
398     {
399         REGION_INIT(pScreen, &childUniverse, NullBox, 0);
400         REGION_INIT(pScreen, &childUnion, NullBox, 0);
401         if ((pChild->drawable.y < pParent->lastChild->drawable.y) ||
402             ((pChild->drawable.y == pParent->lastChild->drawable.y) &&
403              (pChild->drawable.x < pParent->lastChild->drawable.x)))
404         {
405             for (; pChild; pChild = pChild->nextSib)
406             {
407                 if (pChild->viewable)
408                     REGION_APPEND( pScreen, &childUnion, &pChild->borderSize);
409             }
410         }
411         else
412         {
413             for (pChild = pParent->lastChild; pChild; pChild = pChild->prevSib)
414             {
415                 if (pChild->viewable)
416                     REGION_APPEND( pScreen, &childUnion, &pChild->borderSize);
417             }
418         }
419         REGION_VALIDATE( pScreen, &childUnion, &overlap);
420
421         for (pChild = pParent->firstChild;
422              pChild;
423              pChild = pChild->nextSib)
424         {
425             if (pChild->viewable) {
426                 /*
427                  * If the child is viewable, we want to remove its extents
428                  * from the current universe, but we only re-clip it if
429                  * it's been marked.
430                  */
431                 if (pChild->valdata) {
432                     /*
433                      * Figure out the new universe from the child's
434                      * perspective and recurse.
435                      */
436                     REGION_INTERSECT( pScreen, &childUniverse,
437                                             universe,
438                                             &pChild->borderSize);
439                     RootlessComputeClips (pChild, pScreen, &childUniverse, 
440                                           kind, exposed);
441                 }
442                 /*
443                  * Once the child has been processed, we remove its extents
444                  * from the current universe, thus denying its space to any
445                  * other sibling.
446                  */
447                 if (overlap)
448                     REGION_SUBTRACT( pScreen, universe, universe,
449                                           &pChild->borderSize);
450             }
451         }
452         if (!overlap)
453             REGION_SUBTRACT( pScreen, universe, universe, &childUnion);
454         REGION_UNINIT( pScreen, &childUnion);
455         REGION_UNINIT( pScreen, &childUniverse);
456     } /* if any children */
457
458     /*
459      * 'universe' now contains the new clipList for the parent window.
460      *
461      * To figure the exposure of the window we subtract the old clip from the
462      * new, just as for the border.
463      */
464
465     if (oldVis == VisibilityFullyObscured ||
466         oldVis == VisibilityNotViewable)
467     {
468         REGION_COPY( pScreen, &pParent->valdata->after.exposed, universe);
469     }
470     else if (newVis != VisibilityFullyObscured &&
471              newVis != VisibilityNotViewable)
472     {
473         REGION_SUBTRACT( pScreen, &pParent->valdata->after.exposed,
474                                universe, &pParent->clipList);
475     }
476
477     /*
478      * One last thing: backing storage. We have to try to save what parts of
479      * the window are about to be obscured. We can just subtract the universe
480      * from the old clipList and get the areas that were in the old but aren't
481      * in the new and, hence, are about to be obscured.
482      */
483     if (pParent->backStorage && !resized)
484     {
485         REGION_SUBTRACT( pScreen, exposed, &pParent->clipList, universe);
486         (* pScreen->SaveDoomedAreas)(pParent, exposed, dx, dy);
487     }
488     
489     /* HACK ALERT - copying contents of regions, instead of regions */
490     {
491         RegionRec   tmp;
492
493         tmp = pParent->clipList;
494         pParent->clipList = *universe;
495         *universe = tmp;
496     }
497
498 #ifdef NOTDEF
499     REGION_COPY( pScreen, &pParent->clipList, universe);
500 #endif
501
502     pParent->drawable.serialNumber = NEXT_SERIAL_NUMBER;
503
504     if (pScreen->ClipNotify)
505         (* pScreen->ClipNotify) (pParent, dx, dy);
506 }
507
508 static void
509 RootlessTreeObscured(pParent)
510     register WindowPtr pParent;
511 {
512     register WindowPtr pChild;
513     register int    oldVis;
514
515     pChild = pParent;
516     while (1)
517     {
518         if (pChild->viewable)
519         {
520             oldVis = pChild->visibility;
521             if (oldVis != (pChild->visibility = VisibilityFullyObscured) &&
522                 ((pChild->eventMask | wOtherEventMasks(pChild)) & VisibilityChangeMask))
523                 SendVisibilityNotify(pChild);
524             if (pChild->firstChild)
525             {
526                 pChild = pChild->firstChild;
527                 continue;
528             }
529         }
530         while (!pChild->nextSib && (pChild != pParent))
531             pChild = pChild->parent;
532         if (pChild == pParent)
533             break;
534         pChild = pChild->nextSib;
535     }
536 }
537
538 /*
539  *-----------------------------------------------------------------------
540  * RootlessMiValidateTree --
541  *      Recomputes the clip list for pParent and all its inferiors.
542  *
543  * Results:
544  *      Always returns 1.
545  *
546  * Side Effects:
547  *      The clipList, borderClip, exposed, and borderExposed regions for
548  *      each marked window are altered.
549  *
550  * Notes:
551  *      This routine assumes that all affected windows have been marked
552  *      (valdata created) and their winSize and borderSize regions
553  *      adjusted to correspond to their new positions. The borderClip and
554  *      clipList regions should not have been touched.
555  *
556  *      The top-most level is treated differently from all lower levels
557  *      because pParent is unchanged. For the top level, we merge the
558  *      regions taken up by the marked children back into the clipList
559  *      for pParent, thus forming a region from which the marked children
560  *      can claim their areas. For lower levels, where the old clipList
561  *      and borderClip are invalid, we can't do this and have to do the
562  *      extra operations done in miComputeClips, but this is much faster
563  *      e.g. when only one child has moved...
564  *
565  *-----------------------------------------------------------------------
566  */
567 /* 
568    Quartz version: used for validate from root in rootless mode.
569    We need to make sure top-level windows don't clip each other, 
570    and that top-level windows aren't clipped to the root window.
571 */
572 /*ARGSUSED*/
573 // fixme this is ugly
574 // Xprint/ValTree.c doesn't work, but maybe that method can?
575 int
576 RootlessMiValidateTree (pRoot, pChild, kind)
577     WindowPtr           pRoot;      /* Parent to validate */
578     WindowPtr           pChild;     /* First child of pRoot that was
579                                      * affected */
580     VTKind              kind;       /* What kind of configuration caused call */
581 {
582     RegionRec           childClip;  /* The new borderClip for the current
583                                      * child */
584     RegionRec           exposed;    /* For intermediate calculations */
585     register ScreenPtr  pScreen;
586     register WindowPtr  pWin;
587
588     pScreen = pRoot->drawable.pScreen;
589     if (pChild == NullWindow)
590         pChild = pRoot->firstChild;
591
592     REGION_INIT(pScreen, &childClip, NullBox, 0);
593     REGION_INIT(pScreen, &exposed, NullBox, 0);
594
595     if (REGION_BROKEN (pScreen, &pRoot->clipList) &&
596         !REGION_BROKEN (pScreen, &pRoot->borderClip))
597     {
598         // fixme this might not work, but hopefully doesn't happen anyway.
599         kind = VTBroken;
600         REGION_EMPTY (pScreen, &pRoot->clipList);
601         ErrorF("ValidateTree: BUSTED!\n");
602     }
603
604     /* 
605      * Recursively compute the clips for all children of the root. 
606      * They don't clip against each other or the root itself, so 
607      * childClip is always reset to that child's size.
608      */
609
610     for (pWin = pChild;
611          pWin != NullWindow;
612          pWin = pWin->nextSib)
613     {
614         if (pWin->viewable) {
615             if (pWin->valdata) {
616                 REGION_COPY( pScreen, &childClip, &pWin->borderSize);
617                 RootlessComputeClips (pWin, pScreen, &childClip, kind, &exposed);
618             } else if (pWin->visibility == VisibilityNotViewable) {
619                 RootlessTreeObscured(pWin);
620             }
621         } else {
622             if (pWin->valdata) {
623                 REGION_EMPTY( pScreen, &pWin->clipList);
624                 if (pScreen->ClipNotify)
625                     (* pScreen->ClipNotify) (pWin, 0, 0);
626                 REGION_EMPTY( pScreen, &pWin->borderClip);
627                 pWin->valdata = (ValidatePtr)NULL;
628             }
629         }
630     }
631
632     REGION_UNINIT( pScreen, &childClip);
633
634     /* The root is never clipped by its children, so nothing on the root 
635        is ever exposed by moving or mapping its children. */
636     REGION_INIT( pScreen, &pRoot->valdata->after.exposed, NullBox, 0);
637     REGION_INIT( pScreen, &pRoot->valdata->after.borderExposed, NullBox, 0);
638
639     return 1;
640 }