oleview: Added base TypeLib Viewer menu functionality.
[wine] / server / window.c
1 /*
2  * Server-side window handling
3  *
4  * Copyright (C) 2001 Alexandre Julliard
5  *
6  * This library is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU Lesser General Public
8  * License as published by the Free Software Foundation; either
9  * version 2.1 of the License, or (at your option) any later version.
10  *
11  * This library is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  * Lesser General Public License for more details.
15  *
16  * You should have received a copy of the GNU Lesser General Public
17  * License along with this library; if not, write to the Free Software
18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
19  */
20
21 #include "config.h"
22 #include "wine/port.h"
23
24 #include <assert.h>
25 #include <stdarg.h>
26
27 #include "ntstatus.h"
28 #define WIN32_NO_STATUS
29 #include "windef.h"
30 #include "winbase.h"
31 #include "wingdi.h"
32 #include "winuser.h"
33 #include "winternl.h"
34
35 #include "object.h"
36 #include "request.h"
37 #include "thread.h"
38 #include "process.h"
39 #include "user.h"
40 #include "unicode.h"
41
42 /* a window property */
43 struct property
44 {
45     unsigned short type;     /* property type (see below) */
46     atom_t         atom;     /* property atom */
47     obj_handle_t   handle;   /* property handle (user-defined storage) */
48 };
49
50 enum property_type
51 {
52     PROP_TYPE_FREE,   /* free entry */
53     PROP_TYPE_STRING, /* atom that was originally a string */
54     PROP_TYPE_ATOM    /* plain atom */
55 };
56
57
58 struct window
59 {
60     struct window   *parent;          /* parent window */
61     user_handle_t    owner;           /* owner of this window */
62     struct list      children;        /* list of children in Z-order */
63     struct list      unlinked;        /* list of children not linked in the Z-order list */
64     struct list      entry;           /* entry in parent's children list */
65     user_handle_t    handle;          /* full handle for this window */
66     struct thread   *thread;          /* thread owning the window */
67     struct desktop  *desktop;         /* desktop that the window belongs to */
68     struct window_class *class;       /* window class */
69     atom_t           atom;            /* class atom */
70     user_handle_t    last_active;     /* last active popup */
71     rectangle_t      window_rect;     /* window rectangle (relative to parent client area) */
72     rectangle_t      visible_rect;    /* visible part of window rect (relative to parent client area) */
73     rectangle_t      client_rect;     /* client rectangle (relative to parent client area) */
74     struct region   *win_region;      /* region for shaped windows (relative to window rect) */
75     struct region   *update_region;   /* update region (relative to window rect) */
76     unsigned int     style;           /* window style */
77     unsigned int     ex_style;        /* window extended style */
78     unsigned int     id;              /* window id */
79     void*            instance;        /* creator instance */
80     int              is_unicode;      /* ANSI or unicode */
81     void*            user_data;       /* user-specific data */
82     WCHAR           *text;            /* window caption text */
83     unsigned int     paint_flags;     /* various painting flags */
84     int              prop_inuse;      /* number of in-use window properties */
85     int              prop_alloc;      /* number of allocated window properties */
86     struct property *properties;      /* window properties array */
87     int              nb_extra_bytes;  /* number of extra bytes */
88     char             extra_bytes[1];  /* extra bytes storage */
89 };
90
91 #define PAINT_INTERNAL  0x01  /* internal WM_PAINT pending */
92 #define PAINT_ERASE     0x02  /* needs WM_ERASEBKGND */
93 #define PAINT_NONCLIENT 0x04  /* needs WM_NCPAINT */
94
95 /* growable array of user handles */
96 struct user_handle_array
97 {
98     user_handle_t *handles;
99     int            count;
100     int            total;
101 };
102
103 /* global window pointers */
104 static struct window *shell_window;
105 static struct window *shell_listview;
106 static struct window *progman_window;
107 static struct window *taskman_window;
108
109 /* retrieve a pointer to a window from its handle */
110 inline static struct window *get_window( user_handle_t handle )
111 {
112     struct window *ret = get_user_object( handle, USER_WINDOW );
113     if (!ret) set_error( STATUS_INVALID_HANDLE );
114     return ret;
115 }
116
117 /* check if window is the desktop */
118 static inline int is_desktop_window( const struct window *win )
119 {
120     return !win->parent;  /* only desktop windows have no parent */
121 }
122
123 /* change the parent of a window (or unlink the window if the new parent is NULL) */
124 static int set_parent_window( struct window *win, struct window *parent )
125 {
126     struct window *ptr;
127
128     /* make sure parent is not a child of window */
129     for (ptr = parent; ptr; ptr = ptr->parent)
130     {
131         if (ptr == win)
132         {
133             set_error( STATUS_INVALID_PARAMETER );
134             return 0;
135         }
136     }
137
138     list_remove( &win->entry );  /* unlink it from the previous location */
139
140     if (parent)
141     {
142         win->parent = parent;
143         list_add_head( &parent->children, &win->entry );
144
145         /* if parent belongs to a different thread and the window isn't */
146         /* top-level, attach the two threads */
147         if (parent->thread && parent->thread != win->thread && !is_desktop_window(parent))
148             attach_thread_input( win->thread, parent->thread );
149     }
150     else  /* move it to parent unlinked list */
151     {
152         list_add_head( &win->parent->unlinked, &win->entry );
153     }
154     return 1;
155 }
156
157 /* get next window in Z-order list */
158 static inline struct window *get_next_window( struct window *win )
159 {
160     struct list *ptr = list_next( &win->parent->children, &win->entry );
161     if (ptr == &win->parent->unlinked) ptr = NULL;
162     return ptr ? LIST_ENTRY( ptr, struct window, entry ) : NULL;
163 }
164
165 /* get previous window in Z-order list */
166 static inline struct window *get_prev_window( struct window *win )
167 {
168     struct list *ptr = list_prev( &win->parent->children, &win->entry );
169     if (ptr == &win->parent->unlinked) ptr = NULL;
170     return ptr ? LIST_ENTRY( ptr, struct window, entry ) : NULL;
171 }
172
173 /* get first child in Z-order list */
174 static inline struct window *get_first_child( struct window *win )
175 {
176     struct list *ptr = list_head( &win->children );
177     return ptr ? LIST_ENTRY( ptr, struct window, entry ) : NULL;
178 }
179
180 /* get last child in Z-order list */
181 static inline struct window *get_last_child( struct window *win )
182 {
183     struct list *ptr = list_tail( &win->children );
184     return ptr ? LIST_ENTRY( ptr, struct window, entry ) : NULL;
185 }
186
187 /* append a user handle to a handle array */
188 static int add_handle_to_array( struct user_handle_array *array, user_handle_t handle )
189 {
190     if (array->count >= array->total)
191     {
192         int new_total = max( array->total * 2, 32 );
193         user_handle_t *new_array = realloc( array->handles, new_total * sizeof(*new_array) );
194         if (!new_array)
195         {
196             free( array->handles );
197             set_error( STATUS_NO_MEMORY );
198             return 0;
199         }
200         array->handles = new_array;
201         array->total = new_total;
202     }
203     array->handles[array->count++] = handle;
204     return 1;
205 }
206
207 /* set a window property */
208 static void set_property( struct window *win, atom_t atom, obj_handle_t handle, enum property_type type )
209 {
210     int i, free = -1;
211     struct property *new_props;
212
213     /* check if it exists already */
214     for (i = 0; i < win->prop_inuse; i++)
215     {
216         if (win->properties[i].type == PROP_TYPE_FREE)
217         {
218             free = i;
219             continue;
220         }
221         if (win->properties[i].atom == atom)
222         {
223             win->properties[i].type = type;
224             win->properties[i].handle = handle;
225             return;
226         }
227     }
228
229     /* need to add an entry */
230     if (!grab_global_atom( NULL, atom )) return;
231     if (free == -1)
232     {
233         /* no free entry */
234         if (win->prop_inuse >= win->prop_alloc)
235         {
236             /* need to grow the array */
237             if (!(new_props = realloc( win->properties,
238                                        sizeof(*new_props) * (win->prop_alloc + 16) )))
239             {
240                 set_error( STATUS_NO_MEMORY );
241                 release_global_atom( NULL, atom );
242                 return;
243             }
244             win->prop_alloc += 16;
245             win->properties = new_props;
246         }
247         free = win->prop_inuse++;
248     }
249     win->properties[free].atom   = atom;
250     win->properties[free].type   = type;
251     win->properties[free].handle = handle;
252 }
253
254 /* remove a window property */
255 static obj_handle_t remove_property( struct window *win, atom_t atom )
256 {
257     int i;
258
259     for (i = 0; i < win->prop_inuse; i++)
260     {
261         if (win->properties[i].type == PROP_TYPE_FREE) continue;
262         if (win->properties[i].atom == atom)
263         {
264             release_global_atom( NULL, atom );
265             win->properties[i].type = PROP_TYPE_FREE;
266             return win->properties[i].handle;
267         }
268     }
269     /* FIXME: last error? */
270     return 0;
271 }
272
273 /* find a window property */
274 static obj_handle_t get_property( struct window *win, atom_t atom )
275 {
276     int i;
277
278     for (i = 0; i < win->prop_inuse; i++)
279     {
280         if (win->properties[i].type == PROP_TYPE_FREE) continue;
281         if (win->properties[i].atom == atom) return win->properties[i].handle;
282     }
283     /* FIXME: last error? */
284     return 0;
285 }
286
287 /* destroy all properties of a window */
288 inline static void destroy_properties( struct window *win )
289 {
290     int i;
291
292     if (!win->properties) return;
293     for (i = 0; i < win->prop_inuse; i++)
294     {
295         if (win->properties[i].type == PROP_TYPE_FREE) continue;
296         release_global_atom( NULL, win->properties[i].atom );
297     }
298     free( win->properties );
299 }
300
301 /* detach a window from its owner thread but keep the window around */
302 static void detach_window_thread( struct window *win )
303 {
304     struct thread *thread = win->thread;
305
306     if (!thread) return;
307     if (thread->queue)
308     {
309         if (win->update_region) inc_queue_paint_count( thread, -1 );
310         if (win->paint_flags & PAINT_INTERNAL) inc_queue_paint_count( thread, -1 );
311         queue_cleanup_window( thread, win->handle );
312     }
313     assert( thread->desktop_users > 0 );
314     thread->desktop_users--;
315     release_class( win->class );
316     win->class = NULL;
317
318     /* don't hold a reference to the desktop so that the desktop window can be */
319     /* destroyed when the desktop ref count reaches zero */
320     release_object( win->desktop );
321     win->thread = NULL;
322 }
323
324 /* destroy a window */
325 void destroy_window( struct window *win )
326 {
327     /* destroy all children */
328     while (!list_empty(&win->children))
329         destroy_window( LIST_ENTRY( list_head(&win->children), struct window, entry ));
330     while (!list_empty(&win->unlinked))
331         destroy_window( LIST_ENTRY( list_head(&win->unlinked), struct window, entry ));
332
333     /* reset global window pointers, if the corresponding window is destroyed */
334     if (win == shell_window) shell_window = NULL;
335     if (win == shell_listview) shell_listview = NULL;
336     if (win == progman_window) progman_window = NULL;
337     if (win == taskman_window) taskman_window = NULL;
338     free_user_handle( win->handle );
339     destroy_properties( win );
340     list_remove( &win->entry );
341     if (is_desktop_window(win))
342     {
343         assert( win->desktop->top_window == win );
344         win->desktop->top_window = NULL;
345     }
346     detach_window_thread( win );
347     if (win->win_region) free_region( win->win_region );
348     if (win->update_region) free_region( win->update_region );
349     if (win->class) release_class( win->class );
350     if (win->text) free( win->text );
351     memset( win, 0x55, sizeof(*win) + win->nb_extra_bytes - 1 );
352     free( win );
353 }
354
355 /* get the process owning the top window of a given desktop */
356 struct process *get_top_window_owner( struct desktop *desktop )
357 {
358     struct window *win = desktop->top_window;
359     if (!win || !win->thread) return NULL;
360     return win->thread->process;
361 }
362
363 /* attempt to close the desktop window when the last process using it is gone */
364 void close_desktop_window( struct desktop *desktop )
365 {
366     struct window *win = desktop->top_window;
367     if (win && win->thread) post_message( win->handle, WM_CLOSE, 0, 0 );
368 }
369
370 /* create a new window structure (note: the window is not linked in the window tree) */
371 static struct window *create_window( struct window *parent, struct window *owner,
372                                      atom_t atom, void *instance )
373 {
374     int extra_bytes;
375     struct window *win;
376     struct desktop *desktop;
377     struct window_class *class;
378
379     if (!(desktop = get_thread_desktop( current, DESKTOP_CREATEWINDOW ))) return NULL;
380
381     if (!(class = grab_class( current->process, atom, instance, &extra_bytes )))
382     {
383         release_object( desktop );
384         return NULL;
385     }
386
387     if (!(win = mem_alloc( sizeof(*win) + extra_bytes - 1 ))) goto failed;
388     if (!(win->handle = alloc_user_handle( win, USER_WINDOW ))) goto failed;
389
390     win->parent         = parent;
391     win->owner          = owner ? owner->handle : 0;
392     win->thread         = current;
393     win->desktop        = desktop;
394     win->class          = class;
395     win->atom           = atom;
396     win->last_active    = win->handle;
397     win->win_region     = NULL;
398     win->update_region  = NULL;
399     win->style          = 0;
400     win->ex_style       = 0;
401     win->id             = 0;
402     win->instance       = NULL;
403     win->is_unicode     = 1;
404     win->user_data      = NULL;
405     win->text           = NULL;
406     win->paint_flags    = 0;
407     win->prop_inuse     = 0;
408     win->prop_alloc     = 0;
409     win->properties     = NULL;
410     win->nb_extra_bytes = extra_bytes;
411     memset( win->extra_bytes, 0, extra_bytes );
412     list_init( &win->children );
413     list_init( &win->unlinked );
414
415     /* parent must be on the same desktop */
416     if (parent && parent->desktop != desktop)
417     {
418         set_error( STATUS_ACCESS_DENIED );
419         goto failed;
420     }
421
422     /* if no parent, class must be the desktop */
423     if (!parent && !is_desktop_class( class ))
424     {
425         set_error( STATUS_ACCESS_DENIED );
426         goto failed;
427     }
428
429     /* if parent belongs to a different thread and the window isn't */
430     /* top-level, attach the two threads */
431     if (parent && parent->thread && parent->thread != current && !is_desktop_window(parent))
432     {
433         if (!attach_thread_input( current, parent->thread )) goto failed;
434     }
435     else  /* otherwise just make sure that the thread has a message queue */
436     {
437         if (!current->queue && !init_thread_queue( current )) goto failed;
438     }
439
440     /* put it on parent unlinked list */
441     if (parent) list_add_head( &parent->unlinked, &win->entry );
442     else
443     {
444         list_init( &win->entry );
445         assert( !desktop->top_window );
446         desktop->top_window = win;
447         set_process_default_desktop( current->process, desktop, current->desktop );
448     }
449
450     current->desktop_users++;
451     return win;
452
453 failed:
454     if (win)
455     {
456         if (win->handle) free_user_handle( win->handle );
457         free( win );
458     }
459     release_object( desktop );
460     release_class( class );
461     return NULL;
462 }
463
464 /* destroy all windows belonging to a given thread */
465 void destroy_thread_windows( struct thread *thread )
466 {
467     user_handle_t handle = 0;
468     struct window *win;
469
470     while ((win = next_user_handle( &handle, USER_WINDOW )))
471     {
472         if (win->thread != thread) continue;
473         if (is_desktop_window( win )) detach_window_thread( win );
474         else destroy_window( win );
475     }
476 }
477
478 /* get the desktop window */
479 static struct window *get_desktop_window( struct thread *thread, int create )
480 {
481     struct window *top_window;
482     struct desktop *desktop = get_thread_desktop( thread, 0 );
483
484     if (!desktop) return NULL;
485
486     if (!(top_window = desktop->top_window) && create)
487     {
488         if ((top_window = create_window( NULL, NULL, DESKTOP_ATOM, 0 )))
489         {
490             detach_window_thread( top_window );
491             top_window->style  = WS_POPUP | WS_VISIBLE | WS_CLIPSIBLINGS | WS_CLIPCHILDREN;
492         }
493     }
494     release_object( desktop );
495     return top_window;
496 }
497
498 /* check whether child is a descendant of parent */
499 int is_child_window( user_handle_t parent, user_handle_t child )
500 {
501     struct window *child_ptr = get_user_object( child, USER_WINDOW );
502     struct window *parent_ptr = get_user_object( parent, USER_WINDOW );
503
504     if (!child_ptr || !parent_ptr) return 0;
505     while (child_ptr->parent)
506     {
507         if (child_ptr->parent == parent_ptr) return 1;
508         child_ptr = child_ptr->parent;
509     }
510     return 0;
511 }
512
513 /* check whether window is a top-level window */
514 int is_top_level_window( user_handle_t window )
515 {
516     struct window *win = get_user_object( window, USER_WINDOW );
517     return (win && win->parent && is_desktop_window(win->parent));
518 }
519
520 /* make a window active if possible */
521 int make_window_active( user_handle_t window )
522 {
523     struct window *owner, *win = get_window( window );
524
525     if (!win) return 0;
526
527     /* set last active for window and its owner */
528     win->last_active = win->handle;
529     if ((owner = get_user_object( win->owner, USER_WINDOW ))) owner->last_active = win->handle;
530     return 1;
531 }
532
533 /* increment (or decrement) the window paint count */
534 static inline void inc_window_paint_count( struct window *win, int incr )
535 {
536     if (win->thread) inc_queue_paint_count( win->thread, incr );
537 }
538
539 /* check if window and all its ancestors are visible */
540 static int is_visible( const struct window *win )
541 {
542     while (win && win->parent)
543     {
544         if (!(win->style & WS_VISIBLE)) return 0;
545         win = win->parent;
546         /* if parent is minimized children are not visible */
547         if (win && (win->style & WS_MINIMIZE)) return 0;
548     }
549     return 1;
550 }
551
552 /* same as is_visible but takes a window handle */
553 int is_window_visible( user_handle_t window )
554 {
555     struct window *win = get_user_object( window, USER_WINDOW );
556     if (!win) return 0;
557     return is_visible( win );
558 }
559
560 /* check if point is inside the window */
561 static inline int is_point_in_window( struct window *win, int x, int y )
562 {
563     if (!(win->style & WS_VISIBLE)) return 0; /* not visible */
564     if ((win->style & (WS_POPUP|WS_CHILD|WS_DISABLED)) == (WS_CHILD|WS_DISABLED))
565         return 0;  /* disabled child */
566     if ((win->ex_style & (WS_EX_LAYERED|WS_EX_TRANSPARENT)) == (WS_EX_LAYERED|WS_EX_TRANSPARENT))
567         return 0;  /* transparent */
568     if (x < win->visible_rect.left || x >= win->visible_rect.right ||
569         y < win->visible_rect.top || y >= win->visible_rect.bottom)
570         return 0;  /* not in window */
571     if (win->win_region &&
572         !point_in_region( win->win_region, x - win->window_rect.left, y - win->window_rect.top ))
573         return 0;  /* not in window region */
574     return 1;
575 }
576
577 /* find child of 'parent' that contains the given point (in parent-relative coords) */
578 static struct window *child_window_from_point( struct window *parent, int x, int y )
579 {
580     struct window *ptr;
581
582     LIST_FOR_EACH_ENTRY( ptr, &parent->children, struct window, entry )
583     {
584         if (!is_point_in_window( ptr, x, y )) continue;  /* skip it */
585
586         /* if window is minimized or disabled, return at once */
587         if (ptr->style & (WS_MINIMIZE|WS_DISABLED)) return ptr;
588
589         /* if point is not in client area, return at once */
590         if (x < ptr->client_rect.left || x >= ptr->client_rect.right ||
591             y < ptr->client_rect.top || y >= ptr->client_rect.bottom)
592             return ptr;
593
594         return child_window_from_point( ptr, x - ptr->client_rect.left, y - ptr->client_rect.top );
595     }
596     return parent;  /* not found any child */
597 }
598
599 /* find all children of 'parent' that contain the given point */
600 static int get_window_children_from_point( struct window *parent, int x, int y,
601                                            struct user_handle_array *array )
602 {
603     struct window *ptr;
604
605     LIST_FOR_EACH_ENTRY( ptr, &parent->children, struct window, entry )
606     {
607         if (!is_point_in_window( ptr, x, y )) continue;  /* skip it */
608
609         /* if point is in client area, and window is not minimized or disabled, check children */
610         if (!(ptr->style & (WS_MINIMIZE|WS_DISABLED)) &&
611             x >= ptr->client_rect.left && x < ptr->client_rect.right &&
612             y >= ptr->client_rect.top && y < ptr->client_rect.bottom)
613         {
614             if (!get_window_children_from_point( ptr, x - ptr->client_rect.left,
615                                                  y - ptr->client_rect.top, array ))
616                 return 0;
617         }
618
619         /* now add window to the array */
620         if (!add_handle_to_array( array, ptr->handle )) return 0;
621     }
622     return 1;
623 }
624
625 /* find window containing point (in absolute coords) */
626 user_handle_t window_from_point( struct desktop *desktop, int x, int y )
627 {
628     struct window *ret;
629
630     if (!desktop->top_window) return 0;
631     ret = child_window_from_point( desktop->top_window, x, y );
632     return ret->handle;
633 }
634
635 /* return list of all windows containing point (in absolute coords) */
636 static int all_windows_from_point( struct window *top, int x, int y, struct user_handle_array *array )
637 {
638     struct window *ptr;
639
640     /* make point relative to top window */
641     for (ptr = top->parent; ptr; ptr = ptr->parent)
642     {
643         x -= ptr->client_rect.left;
644         y -= ptr->client_rect.top;
645     }
646
647     if (!is_point_in_window( top, x, y )) return 1;
648
649     /* if point is in client area, and window is not minimized or disabled, check children */
650     if (!(top->style & (WS_MINIMIZE|WS_DISABLED)) &&
651         x >= top->client_rect.left && x < top->client_rect.right &&
652         y >= top->client_rect.top && y < top->client_rect.bottom)
653     {
654         if (!get_window_children_from_point( top, x - top->client_rect.left,
655                                              y - top->client_rect.top, array ))
656             return 0;
657     }
658     /* now add window to the array */
659     if (!add_handle_to_array( array, top->handle )) return 0;
660     return 1;
661 }
662
663
664 /* return the thread owning a window */
665 struct thread *get_window_thread( user_handle_t handle )
666 {
667     struct window *win = get_user_object( handle, USER_WINDOW );
668     if (!win || !win->thread) return NULL;
669     return (struct thread *)grab_object( win->thread );
670 }
671
672
673 /* check if any area of a window needs repainting */
674 static inline int win_needs_repaint( struct window *win )
675 {
676     return win->update_region || (win->paint_flags & PAINT_INTERNAL);
677 }
678
679
680 /* find a child of the specified window that needs repainting */
681 static struct window *find_child_to_repaint( struct window *parent, struct thread *thread )
682 {
683     struct window *ptr, *ret = NULL;
684
685     LIST_FOR_EACH_ENTRY( ptr, &parent->children, struct window, entry )
686     {
687         if (!(ptr->style & WS_VISIBLE)) continue;
688         if (ptr->thread == thread && win_needs_repaint( ptr ))
689             ret = ptr;
690         else if (!(ptr->style & WS_MINIMIZE)) /* explore its children */
691             ret = find_child_to_repaint( ptr, thread );
692         if (ret) break;
693     }
694
695     if (ret && (ret->ex_style & WS_EX_TRANSPARENT))
696     {
697         /* transparent window, check for non-transparent sibling to paint first */
698         for (ptr = get_next_window(ret); ptr; ptr = get_next_window(ptr))
699         {
700             if (!(ptr->style & WS_VISIBLE)) continue;
701             if (ptr->ex_style & WS_EX_TRANSPARENT) continue;
702             if (ptr->thread != thread) continue;
703             if (win_needs_repaint( ptr )) return ptr;
704         }
705     }
706     return ret;
707 }
708
709
710 /* find a window that needs to receive a WM_PAINT; also clear its internal paint flag */
711 user_handle_t find_window_to_repaint( user_handle_t parent, struct thread *thread )
712 {
713     struct window *ptr, *win, *top_window = get_desktop_window( thread, 0 );
714
715     if (!top_window) return 0;
716
717     if (top_window->thread == thread && win_needs_repaint( top_window )) win = top_window;
718     else win = find_child_to_repaint( top_window, thread );
719
720     if (win && parent)
721     {
722         /* check that it is a child of the specified parent */
723         for (ptr = win; ptr; ptr = ptr->parent)
724             if (ptr->handle == parent) break;
725         /* otherwise don't return any window, we don't repaint a child before its parent */
726         if (!ptr) win = NULL;
727     }
728     if (!win) return 0;
729     win->paint_flags &= ~PAINT_INTERNAL;
730     return win->handle;
731 }
732
733
734 /* intersect the window region with the specified region, relative to the window parent */
735 static struct region *intersect_window_region( struct region *region, struct window *win )
736 {
737     /* make region relative to window rect */
738     offset_region( region, -win->window_rect.left, -win->window_rect.top );
739     if (!intersect_region( region, region, win->win_region )) return NULL;
740     /* make region relative to parent again */
741     offset_region( region, win->window_rect.left, win->window_rect.top );
742     return region;
743 }
744
745
746 /* convert coordinates from client to screen coords */
747 static inline void client_to_screen( struct window *win, int *x, int *y )
748 {
749     for ( ; win; win = win->parent)
750     {
751         *x += win->client_rect.left;
752         *y += win->client_rect.top;
753     }
754 }
755
756 /* map the region from window to screen coordinates */
757 static inline void map_win_region_to_screen( struct window *win, struct region *region )
758 {
759     int x = win->window_rect.left;
760     int y = win->window_rect.top;
761     client_to_screen( win->parent, &x, &y );
762     offset_region( region, x, y );
763 }
764
765
766 /* clip all children of a given window out of the visible region */
767 static struct region *clip_children( struct window *parent, struct window *last,
768                                      struct region *region, int offset_x, int offset_y )
769 {
770     struct window *ptr;
771     struct region *tmp = create_empty_region();
772
773     if (!tmp) return NULL;
774     LIST_FOR_EACH_ENTRY( ptr, &parent->children, struct window, entry )
775     {
776         if (ptr == last) break;
777         if (!(ptr->style & WS_VISIBLE)) continue;
778         if (ptr->ex_style & WS_EX_TRANSPARENT) continue;
779         set_region_rect( tmp, &ptr->visible_rect );
780         if (ptr->win_region && !intersect_window_region( tmp, ptr ))
781         {
782             free_region( tmp );
783             return NULL;
784         }
785         offset_region( tmp, offset_x, offset_y );
786         if (!(region = subtract_region( region, region, tmp ))) break;
787         if (is_region_empty( region )) break;
788     }
789     free_region( tmp );
790     return region;
791 }
792
793
794 /* compute the intersection of two rectangles; return 0 if the result is empty */
795 static inline int intersect_rect( rectangle_t *dst, const rectangle_t *src1, const rectangle_t *src2 )
796 {
797     dst->left   = max( src1->left, src2->left );
798     dst->top    = max( src1->top, src2->top );
799     dst->right  = min( src1->right, src2->right );
800     dst->bottom = min( src1->bottom, src2->bottom );
801     return (dst->left < dst->right && dst->top < dst->bottom);
802 }
803
804
805 /* set the region to the client rect clipped by the window rect, in parent-relative coordinates */
806 static void set_region_client_rect( struct region *region, struct window *win )
807 {
808     rectangle_t rect;
809
810     intersect_rect( &rect, &win->window_rect, &win->client_rect );
811     set_region_rect( region, &rect );
812 }
813
814
815 /* get the top-level window to clip against for a given window */
816 static inline struct window *get_top_clipping_window( struct window *win )
817 {
818     while (win->parent && !is_desktop_window(win->parent)) win = win->parent;
819     return win;
820 }
821
822
823 /* compute the visible region of a window, in window coordinates */
824 static struct region *get_visible_region( struct window *win, struct window *top, unsigned int flags )
825 {
826     struct region *tmp = NULL, *region;
827     int offset_x, offset_y;
828
829     if (!(region = create_empty_region())) return NULL;
830
831     /* first check if all ancestors are visible */
832
833     if (!is_visible( win )) return region;  /* empty region */
834
835     /* create a region relative to the window itself */
836
837     if ((flags & DCX_PARENTCLIP) && win != top && win->parent)
838     {
839         set_region_client_rect( region, win->parent );
840         offset_region( region, -win->parent->client_rect.left, -win->parent->client_rect.top );
841     }
842     else if (flags & DCX_WINDOW)
843     {
844         set_region_rect( region, &win->visible_rect );
845         if (win->win_region && !intersect_window_region( region, win )) goto error;
846     }
847     else
848     {
849         set_region_client_rect( region, win );
850         if (win->win_region && !intersect_window_region( region, win )) goto error;
851     }
852     offset_x = win->window_rect.left;
853     offset_y = win->window_rect.top;
854
855     /* clip children */
856
857     if (flags & DCX_CLIPCHILDREN)
858     {
859         if (!clip_children( win, NULL, region, win->client_rect.left, win->client_rect.top ))
860             goto error;
861     }
862
863     /* clip siblings of ancestors */
864
865     if (top && top != win && (tmp = create_empty_region()) != NULL)
866     {
867         while (win != top && win->parent)
868         {
869             if (win->style & WS_CLIPSIBLINGS)
870             {
871                 if (!clip_children( win->parent, win, region, 0, 0 )) goto error;
872                 if (is_region_empty( region )) break;
873             }
874             /* clip to parent client area */
875             win = win->parent;
876             offset_x += win->client_rect.left;
877             offset_y += win->client_rect.top;
878             offset_region( region, win->client_rect.left, win->client_rect.top );
879             set_region_client_rect( tmp, win );
880             if (win->win_region && !intersect_window_region( tmp, win )) goto error;
881             if (!intersect_region( region, region, tmp )) goto error;
882             if (is_region_empty( region )) break;
883         }
884         free_region( tmp );
885     }
886     offset_region( region, -offset_x, -offset_y );  /* make it relative to target window */
887     return region;
888
889 error:
890     if (tmp) free_region( tmp );
891     free_region( region );
892     return NULL;
893 }
894
895
896 /* get the window class of a window */
897 struct window_class* get_window_class( user_handle_t window )
898 {
899     struct window *win;
900     if (!(win = get_window( window ))) return NULL;
901     if (!win->class) set_error( STATUS_ACCESS_DENIED );
902     return win->class;
903 }
904
905 /* return a copy of the specified region cropped to the window client or frame rectangle, */
906 /* and converted from client to window coordinates. Helper for (in)validate_window. */
907 static struct region *crop_region_to_win_rect( struct window *win, struct region *region, int frame )
908 {
909     struct region *tmp = create_empty_region();
910
911     if (!tmp) return NULL;
912
913     /* get bounding rect in client coords */
914     if (frame) set_region_rect( tmp, &win->window_rect );
915     else set_region_client_rect( tmp, win );
916     offset_region( tmp, -win->client_rect.left, -win->client_rect.top );
917
918     /* intersect specified region with bounding rect */
919     if (region && !intersect_region( tmp, region, tmp )) goto done;
920     if (is_region_empty( tmp )) goto done;
921
922     /* map it to window coords */
923     offset_region( tmp, win->client_rect.left - win->window_rect.left,
924                    win->client_rect.top - win->window_rect.top );
925     return tmp;
926
927 done:
928     free_region( tmp );
929     return NULL;
930 }
931
932
933 /* set a region as new update region for the window */
934 static void set_update_region( struct window *win, struct region *region )
935 {
936     if (region && !is_region_empty( region ))
937     {
938         if (!win->update_region) inc_window_paint_count( win, 1 );
939         else free_region( win->update_region );
940         win->update_region = region;
941     }
942     else
943     {
944         if (win->update_region)
945         {
946             inc_window_paint_count( win, -1 );
947             free_region( win->update_region );
948         }
949         win->paint_flags &= ~(PAINT_ERASE | PAINT_NONCLIENT);
950         win->update_region = NULL;
951         if (region) free_region( region );
952     }
953 }
954
955
956 /* add a region to the update region; the passed region is freed or reused */
957 static int add_update_region( struct window *win, struct region *region )
958 {
959     if (win->update_region && !union_region( region, win->update_region, region ))
960     {
961         free_region( region );
962         return 0;
963     }
964     set_update_region( win, region );
965     return 1;
966 }
967
968
969 /* validate the non client area of a window */
970 static void validate_non_client( struct window *win )
971 {
972     struct region *tmp;
973     rectangle_t rect;
974
975     if (!win->update_region) return;  /* nothing to do */
976
977     /* get client rect in window coords */
978     rect.left   = win->client_rect.left - win->window_rect.left;
979     rect.top    = win->client_rect.top - win->window_rect.top;
980     rect.right  = win->client_rect.right - win->window_rect.left;
981     rect.bottom = win->client_rect.bottom - win->window_rect.top;
982
983     if ((tmp = create_empty_region()))
984     {
985         set_region_rect( tmp, &rect );
986         if (intersect_region( tmp, win->update_region, tmp ))
987             set_update_region( win, tmp );
988         else
989             free_region( tmp );
990     }
991     win->paint_flags &= ~PAINT_NONCLIENT;
992 }
993
994
995 /* validate a window completely so that we don't get any further paint messages for it */
996 static void validate_whole_window( struct window *win )
997 {
998     set_update_region( win, NULL );
999
1000     if (win->paint_flags & PAINT_INTERNAL)
1001     {
1002         win->paint_flags &= ~PAINT_INTERNAL;
1003         inc_window_paint_count( win, -1 );
1004     }
1005 }
1006
1007
1008 /* validate the update region of a window on all parents; helper for redraw_window */
1009 static void validate_parents( struct window *child )
1010 {
1011     int offset_x = 0, offset_y = 0;
1012     struct window *win = child;
1013     struct region *tmp = NULL;
1014
1015     if (!child->update_region) return;
1016
1017     while (win->parent)
1018     {
1019         /* map to parent client coords */
1020         offset_x += win->window_rect.left;
1021         offset_y += win->window_rect.top;
1022
1023         win = win->parent;
1024
1025         /* and now map to window coords */
1026         offset_x += win->client_rect.left - win->window_rect.left;
1027         offset_y += win->client_rect.top - win->window_rect.top;
1028
1029         if (win->update_region && !(win->style & WS_CLIPCHILDREN))
1030         {
1031             if (!tmp && !(tmp = create_empty_region())) return;
1032             offset_region( child->update_region, offset_x, offset_y );
1033             if (subtract_region( tmp, win->update_region, child->update_region ))
1034             {
1035                 set_update_region( win, tmp );
1036                 tmp = NULL;
1037             }
1038             /* restore child coords */
1039             offset_region( child->update_region, -offset_x, -offset_y );
1040         }
1041     }
1042     if (tmp) free_region( tmp );
1043 }
1044
1045
1046 /* add/subtract a region (in client coordinates) to the update region of the window */
1047 static void redraw_window( struct window *win, struct region *region, int frame, unsigned int flags )
1048 {
1049     struct region *tmp;
1050     struct window *child;
1051
1052     if (flags & RDW_INVALIDATE)
1053     {
1054         if (!(tmp = crop_region_to_win_rect( win, region, frame ))) return;
1055
1056         if (!add_update_region( win, tmp )) return;
1057
1058         if (flags & RDW_FRAME) win->paint_flags |= PAINT_NONCLIENT;
1059         if (flags & RDW_ERASE) win->paint_flags |= PAINT_ERASE;
1060     }
1061     else if (flags & RDW_VALIDATE)
1062     {
1063         if (!region && (flags & RDW_NOFRAME))  /* shortcut: validate everything */
1064         {
1065             set_update_region( win, NULL );
1066         }
1067         else if (win->update_region)
1068         {
1069             if ((tmp = crop_region_to_win_rect( win, region, frame )))
1070             {
1071                 if (!subtract_region( tmp, win->update_region, tmp ))
1072                 {
1073                     free_region( tmp );
1074                     return;
1075                 }
1076                 set_update_region( win, tmp );
1077             }
1078             if (flags & RDW_NOFRAME) validate_non_client( win );
1079             if (flags & RDW_NOERASE) win->paint_flags &= ~PAINT_ERASE;
1080         }
1081     }
1082
1083     if ((flags & RDW_INTERNALPAINT) && !(win->paint_flags & PAINT_INTERNAL))
1084     {
1085         win->paint_flags |= PAINT_INTERNAL;
1086         inc_window_paint_count( win, 1 );
1087     }
1088     else if ((flags & RDW_NOINTERNALPAINT) && (win->paint_flags & PAINT_INTERNAL))
1089     {
1090         win->paint_flags &= ~PAINT_INTERNAL;
1091         inc_window_paint_count( win, -1 );
1092     }
1093
1094     if (flags & RDW_UPDATENOW)
1095     {
1096         validate_parents( win );
1097         flags &= ~RDW_UPDATENOW;
1098     }
1099
1100     /* now process children recursively */
1101
1102     if (flags & RDW_NOCHILDREN) return;
1103     if (win->style & WS_MINIMIZE) return;
1104     if ((win->style & WS_CLIPCHILDREN) && !(flags & RDW_ALLCHILDREN)) return;
1105
1106     if (!(tmp = crop_region_to_win_rect( win, region, 0 ))) return;
1107
1108     /* map to client coordinates */
1109     offset_region( tmp, win->window_rect.left - win->client_rect.left,
1110                    win->window_rect.top - win->client_rect.top );
1111
1112     if (flags & RDW_INVALIDATE) flags |= RDW_FRAME | RDW_ERASE;
1113
1114     LIST_FOR_EACH_ENTRY( child, &win->children, struct window, entry )
1115     {
1116         if (!(child->style & WS_VISIBLE)) continue;
1117         if (!rect_in_region( tmp, &child->window_rect )) continue;
1118         offset_region( tmp, -child->client_rect.left, -child->client_rect.top );
1119         redraw_window( child, tmp, 1, flags );
1120         offset_region( tmp, child->client_rect.left, child->client_rect.top );
1121     }
1122     free_region( tmp );
1123 }
1124
1125
1126 /* retrieve the update flags for a window depending on the state of the update region */
1127 static unsigned int get_update_flags( struct window *win, unsigned int flags )
1128 {
1129     unsigned int ret = 0;
1130
1131     if (flags & UPDATE_NONCLIENT)
1132     {
1133         if ((win->paint_flags & PAINT_NONCLIENT) && win->update_region) ret |= UPDATE_NONCLIENT;
1134     }
1135     if (flags & UPDATE_ERASE)
1136     {
1137         if ((win->paint_flags & PAINT_ERASE) && win->update_region) ret |= UPDATE_ERASE;
1138     }
1139     if (flags & UPDATE_PAINT)
1140     {
1141         if (win->update_region) ret |= UPDATE_PAINT;
1142     }
1143     if (flags & UPDATE_INTERNALPAINT)
1144     {
1145         if (win->paint_flags & PAINT_INTERNAL) ret |= UPDATE_INTERNALPAINT;
1146     }
1147     return ret;
1148 }
1149
1150
1151 /* iterate through the children of the given window until we find one with some update flags */
1152 static unsigned int get_child_update_flags( struct window *win, struct window *from_child,
1153                                             unsigned int flags, struct window **child )
1154 {
1155     struct window *ptr;
1156     unsigned int ret = 0;
1157
1158     /* first make sure we want to iterate children at all */
1159
1160     if (win->style & WS_MINIMIZE) return 0;
1161
1162     /* note: the WS_CLIPCHILDREN test is the opposite of the invalidation case,
1163      * here we only want to repaint children of windows that clip them, others
1164      * need to wait for WM_PAINT to be done in the parent first.
1165      */
1166     if (!(flags & UPDATE_ALLCHILDREN) && !(win->style & WS_CLIPCHILDREN)) return 0;
1167
1168     LIST_FOR_EACH_ENTRY( ptr, &win->children, struct window, entry )
1169     {
1170         if (from_child)  /* skip all children until from_child is found */
1171         {
1172             if (ptr == from_child) from_child = NULL;
1173             continue;
1174         }
1175         if (!(ptr->style & WS_VISIBLE)) continue;
1176         if ((ret = get_update_flags( ptr, flags )) != 0)
1177         {
1178             *child = ptr;
1179             break;
1180         }
1181         if ((ret = get_child_update_flags( ptr, NULL, flags, child ))) break;
1182     }
1183     return ret;
1184 }
1185
1186 /* iterate through children and siblings of the given window until we find one with some update flags */
1187 static unsigned int get_window_update_flags( struct window *win, struct window *from_child,
1188                                              unsigned int flags, struct window **child )
1189 {
1190     unsigned int ret;
1191     struct window *ptr, *from_sibling = NULL;
1192
1193     /* if some parent is not visible start from the next sibling */
1194
1195     if (!is_visible( win )) return 0;
1196     for (ptr = from_child; ptr; ptr = ptr->parent)
1197     {
1198         if (!(ptr->style & WS_VISIBLE) || (ptr->style & WS_MINIMIZE)) from_sibling = ptr;
1199         if (ptr == win) break;
1200     }
1201
1202     /* non-client painting must be delayed if one of the parents is going to
1203      * be repainted and doesn't clip children */
1204
1205     if ((flags & UPDATE_NONCLIENT) && !(flags & (UPDATE_PAINT|UPDATE_INTERNALPAINT)))
1206     {
1207         for (ptr = win->parent; ptr; ptr = ptr->parent)
1208         {
1209             if (!(ptr->style & WS_CLIPCHILDREN) && win_needs_repaint( ptr ))
1210                 return 0;
1211         }
1212         if (from_child && !(flags & UPDATE_ALLCHILDREN))
1213         {
1214             for (ptr = from_sibling ? from_sibling : from_child; ptr; ptr = ptr->parent)
1215             {
1216                 if (!(ptr->style & WS_CLIPCHILDREN) && win_needs_repaint( ptr )) from_sibling = ptr;
1217                 if (ptr == win) break;
1218             }
1219         }
1220     }
1221
1222
1223     /* check window itself (only if not restarting from a child) */
1224
1225     if (!from_child)
1226     {
1227         if ((ret = get_update_flags( win, flags )))
1228         {
1229             *child = win;
1230             return ret;
1231         }
1232         from_child = win;
1233     }
1234
1235     /* now check children */
1236
1237     if (flags & UPDATE_NOCHILDREN) return 0;
1238     if (!from_sibling)
1239     {
1240         if ((ret = get_child_update_flags( from_child, NULL, flags, child ))) return ret;
1241         from_sibling = from_child;
1242     }
1243
1244     /* then check siblings and parent siblings */
1245
1246     while (from_sibling->parent && from_sibling != win)
1247     {
1248         if ((ret = get_child_update_flags( from_sibling->parent, from_sibling, flags, child )))
1249             return ret;
1250         from_sibling = from_sibling->parent;
1251     }
1252     return 0;
1253 }
1254
1255
1256 /* expose a region of a window, looking for the top most parent that needs to be exposed */
1257 /* the region is in window coordinates */
1258 static void expose_window( struct window *win, struct window *top, struct region *region )
1259 {
1260     struct window *parent, *ptr;
1261     int offset_x, offset_y;
1262
1263     /* find the top most parent that doesn't clip either siblings or children */
1264     for (parent = ptr = win; ptr != top; ptr = ptr->parent)
1265     {
1266         if (!(ptr->style & WS_CLIPCHILDREN)) parent = ptr;
1267         if (!(ptr->style & WS_CLIPSIBLINGS)) parent = ptr->parent;
1268     }
1269     if (parent == win && parent != top && win->parent)
1270         parent = win->parent;  /* always go up at least one level if possible */
1271
1272     offset_x = win->window_rect.left - win->client_rect.left;
1273     offset_y = win->window_rect.top - win->client_rect.top;
1274     for (ptr = win; ptr != parent; ptr = ptr->parent)
1275     {
1276         offset_x += ptr->client_rect.left;
1277         offset_y += ptr->client_rect.top;
1278     }
1279     offset_region( region, offset_x, offset_y );
1280     redraw_window( parent, region, 0, RDW_INVALIDATE | RDW_ERASE | RDW_ALLCHILDREN );
1281     offset_region( region, -offset_x, -offset_y );
1282 }
1283
1284
1285 /* set the window and client rectangles, updating the update region if necessary */
1286 static void set_window_pos( struct window *win, struct window *previous,
1287                             unsigned int swp_flags, const rectangle_t *window_rect,
1288                             const rectangle_t *client_rect, const rectangle_t *visible_rect,
1289                             const rectangle_t *valid_rects )
1290 {
1291     struct region *old_vis_rgn = NULL, *new_vis_rgn;
1292     const rectangle_t old_window_rect = win->window_rect;
1293     const rectangle_t old_visible_rect = win->visible_rect;
1294     const rectangle_t old_client_rect = win->client_rect;
1295     struct window *top = get_top_clipping_window( win );
1296     int visible = (win->style & WS_VISIBLE) || (swp_flags & SWP_SHOWWINDOW);
1297
1298     if (win->parent && !is_visible( win->parent )) visible = 0;
1299
1300     if (visible && !(old_vis_rgn = get_visible_region( win, top, DCX_WINDOW ))) return;
1301
1302     /* set the new window info before invalidating anything */
1303
1304     win->window_rect  = *window_rect;
1305     win->visible_rect = *visible_rect;
1306     win->client_rect  = *client_rect;
1307     if (!(swp_flags & SWP_NOZORDER) && win->parent)
1308     {
1309         list_remove( &win->entry );  /* unlink it from the previous location */
1310         if (previous) list_add_after( &previous->entry, &win->entry );
1311         else list_add_head( &win->parent->children, &win->entry );
1312     }
1313     if (swp_flags & SWP_SHOWWINDOW) win->style |= WS_VISIBLE;
1314     else if (swp_flags & SWP_HIDEWINDOW) win->style &= ~WS_VISIBLE;
1315
1316     /* if the window is not visible, everything is easy */
1317     if (!visible) return;
1318
1319     if (!(new_vis_rgn = get_visible_region( win, top, DCX_WINDOW )))
1320     {
1321         free_region( old_vis_rgn );
1322         clear_error();  /* ignore error since the window info has been modified already */
1323         return;
1324     }
1325
1326     /* expose anything revealed by the change */
1327
1328     if (!(swp_flags & SWP_NOREDRAW))
1329     {
1330         offset_region( old_vis_rgn, old_window_rect.left - window_rect->left,
1331                        old_window_rect.top - window_rect->top );
1332         if (xor_region( new_vis_rgn, old_vis_rgn, new_vis_rgn ))
1333             expose_window( win, top, new_vis_rgn );
1334     }
1335     free_region( old_vis_rgn );
1336
1337     if (!(win->style & WS_VISIBLE))
1338     {
1339         /* clear the update region since the window is no longer visible */
1340         validate_whole_window( win );
1341         goto done;
1342     }
1343
1344     /* crop update region to the new window rect */
1345
1346     if (win->update_region &&
1347         (window_rect->right - window_rect->left < old_window_rect.right - old_window_rect.left ||
1348          window_rect->bottom - window_rect->top < old_window_rect.bottom - old_window_rect.top))
1349     {
1350         struct region *tmp = create_empty_region();
1351         if (tmp)
1352         {
1353             set_region_rect( tmp, window_rect );
1354             offset_region( tmp, -window_rect->left, -window_rect->top );
1355             if (intersect_region( tmp, win->update_region, tmp ))
1356                 set_update_region( win, tmp );
1357             else
1358                 free_region( tmp );
1359         }
1360     }
1361
1362     if (swp_flags & SWP_NOREDRAW) goto done;  /* do not repaint anything */
1363
1364     /* expose the whole non-client area if it changed in any way */
1365
1366     if ((swp_flags & SWP_FRAMECHANGED) ||
1367         memcmp( window_rect, &old_window_rect, sizeof(old_window_rect) ) ||
1368         memcmp( visible_rect, &old_visible_rect, sizeof(old_visible_rect) ) ||
1369         memcmp( client_rect, &old_client_rect, sizeof(old_client_rect) ))
1370     {
1371         struct region *tmp = create_empty_region();
1372
1373         if (tmp)
1374         {
1375             /* subtract the valid portion of client rect from the total region */
1376             if (!memcmp( client_rect, &old_client_rect, sizeof(old_client_rect) ))
1377                 set_region_rect( tmp, client_rect );
1378             else if (valid_rects)
1379                 set_region_rect( tmp, &valid_rects[0] );
1380
1381             set_region_rect( new_vis_rgn, window_rect );
1382             if (subtract_region( tmp, new_vis_rgn, tmp ))
1383             {
1384                 offset_region( tmp, -client_rect->left, -client_rect->top );
1385                 redraw_window( win, tmp, 1, RDW_INVALIDATE | RDW_ERASE | RDW_FRAME | RDW_ALLCHILDREN );
1386             }
1387             free_region( tmp );
1388         }
1389     }
1390
1391 done:
1392     free_region( new_vis_rgn );
1393     clear_error();  /* we ignore out of memory errors once the new rects have been set */
1394 }
1395
1396
1397 /* create a window */
1398 DECL_HANDLER(create_window)
1399 {
1400     struct window *win, *parent, *owner = NULL;
1401
1402     reply->handle = 0;
1403
1404     if (!req->parent) parent = get_desktop_window( current, 0 );
1405     else if (!(parent = get_window( req->parent ))) return;
1406
1407     if (req->owner)
1408     {
1409         if (!(owner = get_window( req->owner ))) return;
1410         if (is_desktop_window(owner)) owner = NULL;
1411         else if (!is_desktop_window(parent))
1412         {
1413             /* an owned window must be created as top-level */
1414             set_error( STATUS_ACCESS_DENIED );
1415             return;
1416         }
1417         else /* owner must be a top-level window */
1418             while (!is_desktop_window(owner->parent)) owner = owner->parent;
1419     }
1420     if (!(win = create_window( parent, owner, req->atom, req->instance ))) return;
1421
1422     reply->handle    = win->handle;
1423     reply->parent    = win->parent ? win->parent->handle : 0;
1424     reply->owner     = win->owner;
1425     reply->extra     = win->nb_extra_bytes;
1426     reply->class_ptr = get_class_client_ptr( win->class );
1427 }
1428
1429
1430 /* set the parent of a window */
1431 DECL_HANDLER(set_parent)
1432 {
1433     struct window *win, *parent = NULL;
1434
1435     if (!(win = get_window( req->handle ))) return;
1436     if (req->parent && !(parent = get_window( req->parent ))) return;
1437
1438     if (is_desktop_window(win))
1439     {
1440         set_error( STATUS_INVALID_PARAMETER );
1441         return;
1442     }
1443     reply->old_parent  = win->parent->handle;
1444     reply->full_parent = parent ? parent->handle : 0;
1445     set_parent_window( win, parent );
1446 }
1447
1448
1449 /* destroy a window */
1450 DECL_HANDLER(destroy_window)
1451 {
1452     struct window *win = get_window( req->handle );
1453     if (win)
1454     {
1455         if (!is_desktop_window(win)) destroy_window( win );
1456         else if (win->thread == current) detach_window_thread( win );
1457         else set_error( STATUS_ACCESS_DENIED );
1458     }
1459 }
1460
1461
1462 /* retrieve the desktop window for the current thread */
1463 DECL_HANDLER(get_desktop_window)
1464 {
1465     struct window *win = get_desktop_window( current, req->force );
1466
1467     if (win) reply->handle = win->handle;
1468 }
1469
1470
1471 /* set a window owner */
1472 DECL_HANDLER(set_window_owner)
1473 {
1474     struct window *win = get_window( req->handle );
1475     struct window *owner = NULL;
1476
1477     if (!win) return;
1478     if (req->owner && !(owner = get_window( req->owner ))) return;
1479     if (is_desktop_window(win))
1480     {
1481         set_error( STATUS_ACCESS_DENIED );
1482         return;
1483     }
1484     reply->prev_owner = win->owner;
1485     reply->full_owner = win->owner = owner ? owner->handle : 0;
1486 }
1487
1488
1489 /* get information from a window handle */
1490 DECL_HANDLER(get_window_info)
1491 {
1492     struct window *win = get_window( req->handle );
1493
1494     reply->full_handle = 0;
1495     reply->tid = reply->pid = 0;
1496     if (win)
1497     {
1498         reply->full_handle = win->handle;
1499         reply->last_active = win->handle;
1500         reply->is_unicode  = win->is_unicode;
1501         if (get_user_object( win->last_active, USER_WINDOW )) reply->last_active = win->last_active;
1502         if (win->thread)
1503         {
1504             reply->tid  = get_thread_id( win->thread );
1505             reply->pid  = get_process_id( win->thread->process );
1506             reply->atom = win->class ? get_class_atom( win->class ) : DESKTOP_ATOM;
1507         }
1508     }
1509 }
1510
1511
1512 /* set some information in a window */
1513 DECL_HANDLER(set_window_info)
1514 {
1515     struct window *win = get_window( req->handle );
1516
1517     if (!win) return;
1518     if (req->flags && is_desktop_window(win) && win->thread != current)
1519     {
1520         set_error( STATUS_ACCESS_DENIED );
1521         return;
1522     }
1523     if (req->extra_size > sizeof(req->extra_value) ||
1524         req->extra_offset < -1 ||
1525         req->extra_offset > win->nb_extra_bytes - (int)req->extra_size)
1526     {
1527         set_win32_error( ERROR_INVALID_INDEX );
1528         return;
1529     }
1530     if (req->extra_offset != -1)
1531     {
1532         memcpy( &reply->old_extra_value, win->extra_bytes + req->extra_offset, req->extra_size );
1533     }
1534     else if (req->flags & SET_WIN_EXTRA)
1535     {
1536         set_win32_error( ERROR_INVALID_INDEX );
1537         return;
1538     }
1539     reply->old_style     = win->style;
1540     reply->old_ex_style  = win->ex_style;
1541     reply->old_id        = win->id;
1542     reply->old_instance  = win->instance;
1543     reply->old_user_data = win->user_data;
1544     if (req->flags & SET_WIN_STYLE) win->style = req->style;
1545     if (req->flags & SET_WIN_EXSTYLE) win->ex_style = req->ex_style;
1546     if (req->flags & SET_WIN_ID) win->id = req->id;
1547     if (req->flags & SET_WIN_INSTANCE) win->instance = req->instance;
1548     if (req->flags & SET_WIN_UNICODE) win->is_unicode = req->is_unicode;
1549     if (req->flags & SET_WIN_USERDATA) win->user_data = req->user_data;
1550     if (req->flags & SET_WIN_EXTRA) memcpy( win->extra_bytes + req->extra_offset,
1551                                             &req->extra_value, req->extra_size );
1552
1553     /* changing window style triggers a non-client paint */
1554     if (req->flags & SET_WIN_STYLE) win->paint_flags |= PAINT_NONCLIENT;
1555 }
1556
1557
1558 /* get a list of the window parents, up to the root of the tree */
1559 DECL_HANDLER(get_window_parents)
1560 {
1561     struct window *ptr, *win = get_window( req->handle );
1562     int total = 0;
1563     user_handle_t *data;
1564     size_t len;
1565
1566     if (win) for (ptr = win->parent; ptr; ptr = ptr->parent) total++;
1567
1568     reply->count = total;
1569     len = min( get_reply_max_size(), total * sizeof(user_handle_t) );
1570     if (len && ((data = set_reply_data_size( len ))))
1571     {
1572         for (ptr = win->parent; ptr && len; ptr = ptr->parent, len -= sizeof(*data))
1573             *data++ = ptr->handle;
1574     }
1575 }
1576
1577
1578 /* get a list of the window children */
1579 DECL_HANDLER(get_window_children)
1580 {
1581     struct window *ptr, *parent = get_window( req->parent );
1582     int total = 0;
1583     user_handle_t *data;
1584     size_t len;
1585
1586     if (parent)
1587     {
1588         LIST_FOR_EACH_ENTRY( ptr, &parent->children, struct window, entry )
1589         {
1590             if (req->atom && get_class_atom(ptr->class) != req->atom) continue;
1591             if (req->tid && get_thread_id(ptr->thread) != req->tid) continue;
1592             total++;
1593         }
1594     }
1595     reply->count = total;
1596     len = min( get_reply_max_size(), total * sizeof(user_handle_t) );
1597     if (len && ((data = set_reply_data_size( len ))))
1598     {
1599         LIST_FOR_EACH_ENTRY( ptr, &parent->children, struct window, entry )
1600         {
1601             if (len < sizeof(*data)) break;
1602             if (req->atom && get_class_atom(ptr->class) != req->atom) continue;
1603             if (req->tid && get_thread_id(ptr->thread) != req->tid) continue;
1604             *data++ = ptr->handle;
1605             len -= sizeof(*data);
1606         }
1607     }
1608 }
1609
1610
1611 /* get a list of the window children that contain a given point */
1612 DECL_HANDLER(get_window_children_from_point)
1613 {
1614     struct user_handle_array array;
1615     struct window *parent = get_window( req->parent );
1616     size_t len;
1617
1618     if (!parent) return;
1619
1620     array.handles = NULL;
1621     array.count = 0;
1622     array.total = 0;
1623     if (!all_windows_from_point( parent, req->x, req->y, &array )) return;
1624
1625     reply->count = array.count;
1626     len = min( get_reply_max_size(), array.count * sizeof(user_handle_t) );
1627     if (len) set_reply_data_ptr( array.handles, len );
1628     else free( array.handles );
1629 }
1630
1631
1632 /* get window tree information from a window handle */
1633 DECL_HANDLER(get_window_tree)
1634 {
1635     struct window *ptr, *win = get_window( req->handle );
1636
1637     if (!win) return;
1638
1639     reply->parent        = 0;
1640     reply->owner         = 0;
1641     reply->next_sibling  = 0;
1642     reply->prev_sibling  = 0;
1643     reply->first_sibling = 0;
1644     reply->last_sibling  = 0;
1645     reply->first_child   = 0;
1646     reply->last_child    = 0;
1647
1648     if (win->parent)
1649     {
1650         struct window *parent = win->parent;
1651         reply->parent = parent->handle;
1652         reply->owner  = win->owner;
1653         if ((ptr = get_next_window( win ))) reply->next_sibling = ptr->handle;
1654         if ((ptr = get_prev_window( win ))) reply->prev_sibling = ptr->handle;
1655         if ((ptr = get_first_child( parent ))) reply->first_sibling = ptr->handle;
1656         if ((ptr = get_last_child( parent ))) reply->last_sibling = ptr->handle;
1657     }
1658     if ((ptr = get_first_child( win ))) reply->first_child = ptr->handle;
1659     if ((ptr = get_last_child( win ))) reply->last_child = ptr->handle;
1660 }
1661
1662
1663 /* set the position and Z order of a window */
1664 DECL_HANDLER(set_window_pos)
1665 {
1666     const rectangle_t *visible_rect = NULL, *valid_rects = NULL;
1667     struct window *previous = NULL;
1668     struct window *win = get_window( req->handle );
1669     unsigned int flags = req->flags;
1670
1671     if (!win) return;
1672     if (!win->parent) flags |= SWP_NOZORDER;  /* no Z order for the desktop */
1673
1674     if (!(flags & SWP_NOZORDER))
1675     {
1676         if (!req->previous)  /* special case: HWND_TOP */
1677         {
1678             if (get_first_child(win->parent) == win) flags |= SWP_NOZORDER;
1679         }
1680         else if (req->previous == (user_handle_t)1)  /* special case: HWND_BOTTOM */
1681         {
1682             previous = get_last_child( win->parent );
1683         }
1684         else
1685         {
1686             if (!(previous = get_window( req->previous ))) return;
1687             /* previous must be a sibling */
1688             if (previous->parent != win->parent)
1689             {
1690                 set_error( STATUS_INVALID_PARAMETER );
1691                 return;
1692             }
1693         }
1694         if (previous == win) flags |= SWP_NOZORDER;  /* nothing to do */
1695     }
1696
1697     /* window rectangle must be ordered properly */
1698     if (req->window.right < req->window.left || req->window.bottom < req->window.top)
1699     {
1700         set_error( STATUS_INVALID_PARAMETER );
1701         return;
1702     }
1703
1704     if (get_req_data_size() >= sizeof(rectangle_t)) visible_rect = get_req_data();
1705     if (get_req_data_size() >= 3 * sizeof(rectangle_t)) valid_rects = visible_rect + 1;
1706
1707     if (!visible_rect) visible_rect = &req->window;
1708     set_window_pos( win, previous, flags, &req->window, &req->client, visible_rect, valid_rects );
1709     reply->new_style = win->style;
1710 }
1711
1712
1713 /* get the window and client rectangles of a window */
1714 DECL_HANDLER(get_window_rectangles)
1715 {
1716     struct window *win = get_window( req->handle );
1717
1718     if (win)
1719     {
1720         reply->window  = win->window_rect;
1721         reply->visible = win->visible_rect;
1722         reply->client  = win->client_rect;
1723     }
1724 }
1725
1726
1727 /* get the window text */
1728 DECL_HANDLER(get_window_text)
1729 {
1730     struct window *win = get_window( req->handle );
1731
1732     if (win && win->text)
1733     {
1734         size_t len = strlenW( win->text ) * sizeof(WCHAR);
1735         if (len > get_reply_max_size()) len = get_reply_max_size();
1736         set_reply_data( win->text, len );
1737     }
1738 }
1739
1740
1741 /* set the window text */
1742 DECL_HANDLER(set_window_text)
1743 {
1744     struct window *win = get_window( req->handle );
1745
1746     if (win)
1747     {
1748         WCHAR *text = NULL;
1749         size_t len = get_req_data_size() / sizeof(WCHAR);
1750         if (len)
1751         {
1752             if (!(text = mem_alloc( (len+1) * sizeof(WCHAR) ))) return;
1753             memcpy( text, get_req_data(), len * sizeof(WCHAR) );
1754             text[len] = 0;
1755         }
1756         if (win->text) free( win->text );
1757         win->text = text;
1758     }
1759 }
1760
1761
1762 /* get the coordinates offset between two windows */
1763 DECL_HANDLER(get_windows_offset)
1764 {
1765     struct window *win;
1766
1767     reply->x = reply->y = 0;
1768     if (req->from)
1769     {
1770         if (!(win = get_window( req->from ))) return;
1771         while (win)
1772         {
1773             reply->x += win->client_rect.left;
1774             reply->y += win->client_rect.top;
1775             win = win->parent;
1776         }
1777     }
1778     if (req->to)
1779     {
1780         if (!(win = get_window( req->to ))) return;
1781         while (win)
1782         {
1783             reply->x -= win->client_rect.left;
1784             reply->y -= win->client_rect.top;
1785             win = win->parent;
1786         }
1787     }
1788 }
1789
1790
1791 /* get the visible region of a window */
1792 DECL_HANDLER(get_visible_region)
1793 {
1794     struct region *region;
1795     struct window *top, *win = get_window( req->window );
1796
1797     if (!win) return;
1798
1799     top = get_top_clipping_window( win );
1800     if ((region = get_visible_region( win, top, req->flags )))
1801     {
1802         rectangle_t *data;
1803         map_win_region_to_screen( win, region );
1804         data = get_region_data_and_free( region, get_reply_max_size(), &reply->total_size );
1805         if (data) set_reply_data_ptr( data, reply->total_size );
1806     }
1807     reply->top_win   = top->handle;
1808     reply->top_org_x = top->visible_rect.left;
1809     reply->top_org_y = top->visible_rect.top;
1810     reply->win_org_x = (req->flags & DCX_WINDOW) ? win->window_rect.left : win->client_rect.left;
1811     reply->win_org_y = (req->flags & DCX_WINDOW) ? win->window_rect.top : win->client_rect.top;
1812     client_to_screen( top->parent, &reply->top_org_x, &reply->top_org_y );
1813     client_to_screen( win->parent, &reply->win_org_x, &reply->win_org_y );
1814 }
1815
1816
1817 /* get the window region */
1818 DECL_HANDLER(get_window_region)
1819 {
1820     struct window *win = get_window( req->window );
1821
1822     if (!win) return;
1823
1824     if (win->win_region)
1825     {
1826         rectangle_t *data = get_region_data( win->win_region, get_reply_max_size(), &reply->total_size );
1827         if (data) set_reply_data_ptr( data, reply->total_size );
1828     }
1829 }
1830
1831
1832 /* set the window region */
1833 DECL_HANDLER(set_window_region)
1834 {
1835     struct region *region = NULL;
1836     struct window *win = get_window( req->window );
1837
1838     if (!win) return;
1839
1840     if (get_req_data_size())  /* no data means remove the region completely */
1841     {
1842         if (!(region = create_region_from_req_data( get_req_data(), get_req_data_size() )))
1843             return;
1844     }
1845     if (win->win_region) free_region( win->win_region );
1846     win->win_region = region;
1847 }
1848
1849
1850 /* get a window update region */
1851 DECL_HANDLER(get_update_region)
1852 {
1853     rectangle_t *data;
1854     unsigned int flags = req->flags;
1855     struct window *from_child = NULL;
1856     struct window *win = get_window( req->window );
1857
1858     reply->flags = 0;
1859     if (!win) return;
1860
1861     if (req->from_child)
1862     {
1863         struct window *ptr;
1864
1865         if (!(from_child = get_window( req->from_child ))) return;
1866
1867         /* make sure from_child is a child of win */
1868         ptr = from_child;
1869         while (ptr && ptr != win) ptr = ptr->parent;
1870         if (!ptr)
1871         {
1872             set_error( STATUS_INVALID_PARAMETER );
1873             return;
1874         }
1875     }
1876
1877     reply->flags = get_window_update_flags( win, from_child, flags, &win );
1878     reply->child = win->handle;
1879
1880     if (flags & UPDATE_NOREGION) return;
1881
1882     if (win->update_region)
1883     {
1884         /* convert update region to screen coordinates */
1885         struct region *region = create_empty_region();
1886
1887         if (!region) return;
1888         if (!copy_region( region, win->update_region ))
1889         {
1890             free_region( region );
1891             return;
1892         }
1893         map_win_region_to_screen( win, region );
1894         if (!(data = get_region_data_and_free( region, get_reply_max_size(),
1895                                                &reply->total_size ))) return;
1896         set_reply_data_ptr( data, reply->total_size );
1897     }
1898
1899     if (reply->flags & (UPDATE_PAINT|UPDATE_INTERNALPAINT)) /* validate everything */
1900     {
1901         validate_whole_window( win );
1902     }
1903     else
1904     {
1905         if (reply->flags & UPDATE_NONCLIENT) validate_non_client( win );
1906         if (reply->flags & UPDATE_ERASE)
1907         {
1908             win->paint_flags &= ~PAINT_ERASE;
1909             /* desktop window only gets erased, not repainted */
1910             if (is_desktop_window(win)) validate_whole_window( win );
1911         }
1912     }
1913 }
1914
1915
1916 /* update the z order of a window so that a given rectangle is fully visible */
1917 DECL_HANDLER(update_window_zorder)
1918 {
1919     rectangle_t tmp;
1920     struct window *ptr, *win = get_window( req->window );
1921
1922     if (!win || !win->parent || !is_visible( win )) return;  /* nothing to do */
1923
1924     LIST_FOR_EACH_ENTRY( ptr, &win->parent->children, struct window, entry )
1925     {
1926         if (ptr == win) break;
1927         if (!(ptr->style & WS_VISIBLE)) continue;
1928         if (ptr->ex_style & WS_EX_TRANSPARENT) continue;
1929         if (!intersect_rect( &tmp, &ptr->visible_rect, &req->rect )) continue;
1930         if (ptr->win_region && !rect_in_region( ptr->win_region, &req->rect )) continue;
1931         /* found a window obscuring the rectangle, now move win above this one */
1932         list_remove( &win->entry );
1933         list_add_before( &ptr->entry, &win->entry );
1934         break;
1935     }
1936 }
1937
1938
1939 /* mark parts of a window as needing a redraw */
1940 DECL_HANDLER(redraw_window)
1941 {
1942     struct region *region = NULL;
1943     struct window *win = get_window( req->window );
1944
1945     if (!win) return;
1946     if (!is_visible( win )) return;  /* nothing to do */
1947
1948     if (req->flags & (RDW_VALIDATE|RDW_INVALIDATE))
1949     {
1950         if (get_req_data_size())  /* no data means whole rectangle */
1951         {
1952             if (!(region = create_region_from_req_data( get_req_data(), get_req_data_size() )))
1953                 return;
1954         }
1955     }
1956
1957     redraw_window( win, region, (req->flags & RDW_INVALIDATE) && (req->flags & RDW_FRAME),
1958                    req->flags );
1959     if (region) free_region( region );
1960 }
1961
1962
1963 /* set a window property */
1964 DECL_HANDLER(set_window_property)
1965 {
1966     struct window *win = get_window( req->window );
1967
1968     if (!win) return;
1969
1970     if (get_req_data_size())
1971     {
1972         atom_t atom = add_global_atom( NULL, get_req_data(), get_req_data_size() / sizeof(WCHAR) );
1973         if (atom)
1974         {
1975             set_property( win, atom, req->handle, PROP_TYPE_STRING );
1976             release_global_atom( NULL, atom );
1977         }
1978     }
1979     else set_property( win, req->atom, req->handle, PROP_TYPE_ATOM );
1980 }
1981
1982
1983 /* remove a window property */
1984 DECL_HANDLER(remove_window_property)
1985 {
1986     struct window *win = get_window( req->window );
1987
1988     if (win)
1989     {
1990         atom_t atom = req->atom;
1991         if (get_req_data_size()) atom = find_global_atom( NULL, get_req_data(),
1992                                                           get_req_data_size() / sizeof(WCHAR) );
1993         if (atom) reply->handle = remove_property( win, atom );
1994     }
1995 }
1996
1997
1998 /* get a window property */
1999 DECL_HANDLER(get_window_property)
2000 {
2001     struct window *win = get_window( req->window );
2002
2003     if (win)
2004     {
2005         atom_t atom = req->atom;
2006         if (get_req_data_size()) atom = find_global_atom( NULL, get_req_data(),
2007                                                           get_req_data_size() / sizeof(WCHAR) );
2008         if (atom) reply->handle = get_property( win, atom );
2009     }
2010 }
2011
2012
2013 /* get the list of properties of a window */
2014 DECL_HANDLER(get_window_properties)
2015 {
2016     property_data_t *data;
2017     int i, count, max = get_reply_max_size() / sizeof(*data);
2018     struct window *win = get_window( req->window );
2019
2020     reply->total = 0;
2021     if (!win) return;
2022
2023     for (i = count = 0; i < win->prop_inuse; i++)
2024         if (win->properties[i].type != PROP_TYPE_FREE) count++;
2025     reply->total = count;
2026
2027     if (count > max) count = max;
2028     if (!count || !(data = set_reply_data_size( count * sizeof(*data) ))) return;
2029
2030     for (i = 0; i < win->prop_inuse && count; i++)
2031     {
2032         if (win->properties[i].type == PROP_TYPE_FREE) continue;
2033         data->atom   = win->properties[i].atom;
2034         data->string = (win->properties[i].type == PROP_TYPE_STRING);
2035         data->handle = win->properties[i].handle;
2036         data++;
2037         count--;
2038     }
2039 }
2040
2041
2042 /* get the new window pointer for a global window, checking permissions */
2043 /* helper for set_global_windows request */
2044 static int get_new_global_window( struct window **win, user_handle_t handle )
2045 {
2046     if (!handle)
2047     {
2048         *win = NULL;
2049         return 1;
2050     }
2051     else if (*win)
2052     {
2053         set_error( STATUS_ACCESS_DENIED );
2054         return 0;
2055     }
2056     *win = get_window( handle );
2057     return (*win != NULL);
2058 }
2059
2060 /* Set/get the global windows */
2061 DECL_HANDLER(set_global_windows)
2062 {
2063     struct window *new_shell_window   = shell_window;
2064     struct window *new_shell_listview = shell_listview;
2065     struct window *new_progman_window = progman_window;
2066     struct window *new_taskman_window = taskman_window;
2067
2068     reply->old_shell_window   = shell_window ? shell_window->handle : 0;
2069     reply->old_shell_listview = shell_listview ? shell_listview->handle : 0;
2070     reply->old_progman_window = progman_window ? progman_window->handle : 0;
2071     reply->old_taskman_window = taskman_window ? taskman_window->handle : 0;
2072
2073     if (req->flags & SET_GLOBAL_SHELL_WINDOWS)
2074     {
2075         if (!get_new_global_window( &new_shell_window, req->shell_window )) return;
2076         if (!get_new_global_window( &new_shell_listview, req->shell_listview )) return;
2077     }
2078     if (req->flags & SET_GLOBAL_PROGMAN_WINDOW)
2079     {
2080         if (!get_new_global_window( &new_progman_window, req->progman_window )) return;
2081     }
2082     if (req->flags & SET_GLOBAL_TASKMAN_WINDOW)
2083     {
2084         if (!get_new_global_window( &new_taskman_window, req->taskman_window )) return;
2085     }
2086     shell_window   = new_shell_window;
2087     shell_listview = new_shell_listview;
2088     progman_window = new_progman_window;
2089     taskman_window = new_taskman_window;
2090 }