Added Irish Summer Time.
[wine] / dlls / user / message.c
1 /*
2  * Window messaging support
3  *
4  * Copyright 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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  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 #include "windef.h"
29 #include "winbase.h"
30 #include "wingdi.h"
31 #include "winuser.h"
32 #include "winerror.h"
33 #include "winnls.h"
34 #include "dde.h"
35 #include "wine/unicode.h"
36 #include "wine/server.h"
37 #include "user_private.h"
38 #include "win.h"
39 #include "winpos.h"
40 #include "controls.h"
41 #include "winproc.h"
42 #include "wine/debug.h"
43
44 WINE_DEFAULT_DEBUG_CHANNEL(msg);
45 WINE_DECLARE_DEBUG_CHANNEL(relay);
46 WINE_DECLARE_DEBUG_CHANNEL(key);
47
48 #define WM_NCMOUSEFIRST WM_NCMOUSEMOVE
49 #define WM_NCMOUSELAST  (WM_NCMOUSEFIRST+(WM_MOUSELAST-WM_MOUSEFIRST))
50
51 #define MAX_PACK_COUNT 4
52 #define MAX_SENDMSG_RECURSION  64
53
54 #define SYS_TIMER_RATE  55   /* min. timer rate in ms (actually 54.925)*/
55
56 /* description of the data fields that need to be packed along with a sent message */
57 struct packed_message
58 {
59     int         count;
60     const void *data[MAX_PACK_COUNT];
61     size_t      size[MAX_PACK_COUNT];
62 };
63
64 /* info about the message currently being received by the current thread */
65 struct received_message_info
66 {
67     enum message_type type;
68     MSG               msg;
69     UINT              flags;  /* InSendMessageEx return flags */
70     HWINEVENTHOOK     hook;   /* winevent hook handle */
71     WINEVENTPROC      hook_proc; /* winevent hook proc address */
72 };
73
74 /* structure to group all parameters for sent messages of the various kinds */
75 struct send_message_info
76 {
77     enum message_type type;
78     HWND              hwnd;
79     UINT              msg;
80     WPARAM            wparam;
81     LPARAM            lparam;
82     UINT              flags;      /* flags for SendMessageTimeout */
83     UINT              timeout;    /* timeout for SendMessageTimeout */
84     SENDASYNCPROC     callback;   /* callback function for SendMessageCallback */
85     ULONG_PTR         data;       /* callback data */
86 };
87
88
89 /* flag for messages that contain pointers */
90 /* 32 messages per entry, messages 0..31 map to bits 0..31 */
91
92 #define SET(msg) (1 << ((msg) & 31))
93
94 static const unsigned int message_pointer_flags[] =
95 {
96     /* 0x00 - 0x1f */
97     SET(WM_CREATE) | SET(WM_SETTEXT) | SET(WM_GETTEXT) |
98     SET(WM_WININICHANGE) | SET(WM_DEVMODECHANGE),
99     /* 0x20 - 0x3f */
100     SET(WM_GETMINMAXINFO) | SET(WM_DRAWITEM) | SET(WM_MEASUREITEM) | SET(WM_DELETEITEM) |
101     SET(WM_COMPAREITEM),
102     /* 0x40 - 0x5f */
103     SET(WM_WINDOWPOSCHANGING) | SET(WM_WINDOWPOSCHANGED) | SET(WM_COPYDATA) |
104     SET(WM_NOTIFY) | SET(WM_HELP),
105     /* 0x60 - 0x7f */
106     SET(WM_STYLECHANGING) | SET(WM_STYLECHANGED),
107     /* 0x80 - 0x9f */
108     SET(WM_NCCREATE) | SET(WM_NCCALCSIZE) | SET(WM_GETDLGCODE),
109     /* 0xa0 - 0xbf */
110     SET(EM_GETSEL) | SET(EM_GETRECT) | SET(EM_SETRECT) | SET(EM_SETRECTNP),
111     /* 0xc0 - 0xdf */
112     SET(EM_REPLACESEL) | SET(EM_GETLINE) | SET(EM_SETTABSTOPS),
113     /* 0xe0 - 0xff */
114     SET(SBM_GETRANGE) | SET(SBM_SETSCROLLINFO) | SET(SBM_GETSCROLLINFO) | SET(SBM_GETSCROLLBARINFO),
115     /* 0x100 - 0x11f */
116     0,
117     /* 0x120 - 0x13f */
118     0,
119     /* 0x140 - 0x15f */
120     SET(CB_GETEDITSEL) | SET(CB_ADDSTRING) | SET(CB_DIR) | SET(CB_GETLBTEXT) |
121     SET(CB_INSERTSTRING) | SET(CB_FINDSTRING) | SET(CB_SELECTSTRING) |
122     SET(CB_GETDROPPEDCONTROLRECT) | SET(CB_FINDSTRINGEXACT),
123     /* 0x160 - 0x17f */
124     0,
125     /* 0x180 - 0x19f */
126     SET(LB_ADDSTRING) | SET(LB_INSERTSTRING) | SET(LB_GETTEXT) | SET(LB_SELECTSTRING) |
127     SET(LB_DIR) | SET(LB_FINDSTRING) |
128     SET(LB_GETSELITEMS) | SET(LB_SETTABSTOPS) | SET(LB_ADDFILE) | SET(LB_GETITEMRECT),
129     /* 0x1a0 - 0x1bf */
130     SET(LB_FINDSTRINGEXACT),
131     /* 0x1c0 - 0x1df */
132     0,
133     /* 0x1e0 - 0x1ff */
134     0,
135     /* 0x200 - 0x21f */
136     SET(WM_NEXTMENU) | SET(WM_SIZING) | SET(WM_MOVING) | SET(WM_DEVICECHANGE),
137     /* 0x220 - 0x23f */
138     SET(WM_MDICREATE) | SET(WM_MDIGETACTIVE) | SET(WM_DROPOBJECT) |
139     SET(WM_QUERYDROPOBJECT) | SET(WM_DRAGLOOP) | SET(WM_DRAGSELECT) | SET(WM_DRAGMOVE),
140     /* 0x240 - 0x25f */
141     0,
142     /* 0x260 - 0x27f */
143     0,
144     /* 0x280 - 0x29f */
145     0,
146     /* 0x2a0 - 0x2bf */
147     0,
148     /* 0x2c0 - 0x2df */
149     0,
150     /* 0x2e0 - 0x2ff */
151     0,
152     /* 0x300 - 0x31f */
153     SET(WM_ASKCBFORMATNAME)
154 };
155
156 /* flags for messages that contain Unicode strings */
157 static const unsigned int message_unicode_flags[] =
158 {
159     /* 0x00 - 0x1f */
160     SET(WM_CREATE) | SET(WM_SETTEXT) | SET(WM_GETTEXT) | SET(WM_GETTEXTLENGTH) |
161     SET(WM_WININICHANGE) | SET(WM_DEVMODECHANGE),
162     /* 0x20 - 0x3f */
163     SET(WM_CHARTOITEM),
164     /* 0x40 - 0x5f */
165     0,
166     /* 0x60 - 0x7f */
167     0,
168     /* 0x80 - 0x9f */
169     SET(WM_NCCREATE),
170     /* 0xa0 - 0xbf */
171     0,
172     /* 0xc0 - 0xdf */
173     SET(EM_REPLACESEL) | SET(EM_GETLINE) | SET(EM_SETPASSWORDCHAR),
174     /* 0xe0 - 0xff */
175     0,
176     /* 0x100 - 0x11f */
177     SET(WM_CHAR) | SET(WM_DEADCHAR) | SET(WM_SYSCHAR) | SET(WM_SYSDEADCHAR),
178     /* 0x120 - 0x13f */
179     SET(WM_MENUCHAR),
180     /* 0x140 - 0x15f */
181     SET(CB_ADDSTRING) | SET(CB_DIR) | SET(CB_GETLBTEXT) | SET(CB_GETLBTEXTLEN) |
182     SET(CB_INSERTSTRING) | SET(CB_FINDSTRING) | SET(CB_SELECTSTRING) | SET(CB_FINDSTRINGEXACT),
183     /* 0x160 - 0x17f */
184     0,
185     /* 0x180 - 0x19f */
186     SET(LB_ADDSTRING) | SET(LB_INSERTSTRING) | SET(LB_GETTEXT) | SET(LB_GETTEXTLEN) |
187     SET(LB_SELECTSTRING) | SET(LB_DIR) | SET(LB_FINDSTRING) | SET(LB_ADDFILE),
188     /* 0x1a0 - 0x1bf */
189     SET(LB_FINDSTRINGEXACT),
190     /* 0x1c0 - 0x1df */
191     0,
192     /* 0x1e0 - 0x1ff */
193     0,
194     /* 0x200 - 0x21f */
195     0,
196     /* 0x220 - 0x23f */
197     SET(WM_MDICREATE),
198     /* 0x240 - 0x25f */
199     0,
200     /* 0x260 - 0x27f */
201     0,
202     /* 0x280 - 0x29f */
203     SET(WM_IME_CHAR),
204     /* 0x2a0 - 0x2bf */
205     0,
206     /* 0x2c0 - 0x2df */
207     0,
208     /* 0x2e0 - 0x2ff */
209     0,
210     /* 0x300 - 0x31f */
211     SET(WM_PAINTCLIPBOARD) | SET(WM_SIZECLIPBOARD) | SET(WM_ASKCBFORMATNAME)
212 };
213
214 /* check whether a given message type includes pointers */
215 inline static int is_pointer_message( UINT message )
216 {
217     if (message >= 8*sizeof(message_pointer_flags)) return FALSE;
218     return (message_pointer_flags[message / 32] & SET(message)) != 0;
219 }
220
221 /* check whether a given message type contains Unicode (or ASCII) chars */
222 inline static int is_unicode_message( UINT message )
223 {
224     if (message >= 8*sizeof(message_unicode_flags)) return FALSE;
225     return (message_unicode_flags[message / 32] & SET(message)) != 0;
226 }
227
228 #undef SET
229
230 /* add a data field to a packed message */
231 inline static void push_data( struct packed_message *data, const void *ptr, size_t size )
232 {
233     data->data[data->count] = ptr;
234     data->size[data->count] = size;
235     data->count++;
236 }
237
238 /* add a string to a packed message */
239 inline static void push_string( struct packed_message *data, LPCWSTR str )
240 {
241     push_data( data, str, (strlenW(str) + 1) * sizeof(WCHAR) );
242 }
243
244 /* retrieve a pointer to data from a packed message and increment the buffer pointer */
245 inline static void *get_data( void **buffer, size_t size )
246 {
247     void *ret = *buffer;
248     *buffer = (char *)*buffer + size;
249     return ret;
250 }
251
252 /* make sure that the buffer contains a valid null-terminated Unicode string */
253 inline static BOOL check_string( LPCWSTR str, size_t size )
254 {
255     for (size /= sizeof(WCHAR); size; size--, str++)
256         if (!*str) return TRUE;
257     return FALSE;
258 }
259
260 /* make sure that there is space for 'size' bytes in buffer, growing it if needed */
261 inline static void *get_buffer_space( void **buffer, size_t size )
262 {
263     void *ret;
264
265     if (*buffer)
266     {
267         if (!(ret = HeapReAlloc( GetProcessHeap(), 0, *buffer, size )))
268             HeapFree( GetProcessHeap(), 0, *buffer );
269     }
270     else ret = HeapAlloc( GetProcessHeap(), 0, size );
271
272     *buffer = ret;
273     return ret;
274 }
275
276 /* retrieve a string pointer from packed data */
277 inline static LPWSTR get_string( void **buffer )
278 {
279     return get_data( buffer, (strlenW( (LPWSTR)*buffer ) + 1) * sizeof(WCHAR) );
280 }
281
282 /* check whether a combobox expects strings or ids in CB_ADDSTRING/CB_INSERTSTRING */
283 inline static BOOL combobox_has_strings( HWND hwnd )
284 {
285     DWORD style = GetWindowLongA( hwnd, GWL_STYLE );
286     return (!(style & (CBS_OWNERDRAWFIXED | CBS_OWNERDRAWVARIABLE)) || (style & CBS_HASSTRINGS));
287 }
288
289 /* check whether a listbox expects strings or ids in LB_ADDSTRING/LB_INSERTSTRING */
290 inline static BOOL listbox_has_strings( HWND hwnd )
291 {
292     DWORD style = GetWindowLongA( hwnd, GWL_STYLE );
293     return (!(style & (LBS_OWNERDRAWFIXED | LBS_OWNERDRAWVARIABLE)) || (style & LBS_HASSTRINGS));
294 }
295
296 /* check whether message is in the range of keyboard messages */
297 inline static BOOL is_keyboard_message( UINT message )
298 {
299     return (message >= WM_KEYFIRST && message <= WM_KEYLAST);
300 }
301
302 /* check whether message is in the range of mouse messages */
303 inline static BOOL is_mouse_message( UINT message )
304 {
305     return ((message >= WM_NCMOUSEFIRST && message <= WM_NCMOUSELAST) ||
306             (message >= WM_MOUSEFIRST && message <= WM_MOUSELAST));
307 }
308
309 /* check whether message matches the specified hwnd filter */
310 inline static BOOL check_hwnd_filter( const MSG *msg, HWND hwnd_filter )
311 {
312     if (!hwnd_filter) return TRUE;
313     return (msg->hwnd == hwnd_filter || IsChild( hwnd_filter, msg->hwnd ));
314 }
315
316
317 /***********************************************************************
318  *              broadcast_message_callback
319  *
320  * Helper callback for broadcasting messages.
321  */
322 static BOOL CALLBACK broadcast_message_callback( HWND hwnd, LPARAM lparam )
323 {
324     struct send_message_info *info = (struct send_message_info *)lparam;
325     if (!(GetWindowLongW( hwnd, GWL_STYLE ) & (WS_POPUP|WS_CAPTION))) return TRUE;
326     switch(info->type)
327     {
328     case MSG_UNICODE:
329         SendMessageTimeoutW( hwnd, info->msg, info->wparam, info->lparam,
330                              info->flags, info->timeout, NULL );
331         break;
332     case MSG_ASCII:
333         SendMessageTimeoutA( hwnd, info->msg, info->wparam, info->lparam,
334                              info->flags, info->timeout, NULL );
335         break;
336     case MSG_NOTIFY:
337         SendNotifyMessageW( hwnd, info->msg, info->wparam, info->lparam );
338         break;
339     case MSG_CALLBACK:
340         SendMessageCallbackW( hwnd, info->msg, info->wparam, info->lparam,
341                               info->callback, info->data );
342         break;
343     case MSG_POSTED:
344         PostMessageW( hwnd, info->msg, info->wparam, info->lparam );
345         break;
346     default:
347         ERR( "bad type %d\n", info->type );
348         break;
349     }
350     return TRUE;
351 }
352
353
354 /***********************************************************************
355  *              map_wparam_AtoW
356  *
357  * Convert the wparam of an ASCII message to Unicode.
358  */
359 static WPARAM map_wparam_AtoW( UINT message, WPARAM wparam )
360 {
361     switch(message)
362     {
363     case WM_CHARTOITEM:
364     case EM_SETPASSWORDCHAR:
365     case WM_CHAR:
366     case WM_DEADCHAR:
367     case WM_SYSCHAR:
368     case WM_SYSDEADCHAR:
369     case WM_MENUCHAR:
370         {
371             char ch = LOWORD(wparam);
372             WCHAR wch;
373             MultiByteToWideChar(CP_ACP, 0, &ch, 1, &wch, 1);
374             wparam = MAKEWPARAM( wch, HIWORD(wparam) );
375         }
376         break;
377     case WM_IME_CHAR:
378         {
379             char ch[2];
380             WCHAR wch;
381             ch[0] = (wparam >> 8);
382             ch[1] = (wparam & 0xff);
383             if (ch[0]) MultiByteToWideChar(CP_ACP, 0, ch, 2, &wch, 1);
384             else MultiByteToWideChar(CP_ACP, 0, &ch[1], 1, &wch, 1);
385             wparam = MAKEWPARAM( wch, HIWORD(wparam) );
386         }
387         break;
388     }
389     return wparam;
390 }
391
392
393 /***********************************************************************
394  *              map_wparam_WtoA
395  *
396  * Convert the wparam of a Unicode message to ASCII.
397  */
398 static WPARAM map_wparam_WtoA( UINT message, WPARAM wparam )
399 {
400     switch(message)
401     {
402     case WM_CHARTOITEM:
403     case EM_SETPASSWORDCHAR:
404     case WM_CHAR:
405     case WM_DEADCHAR:
406     case WM_SYSCHAR:
407     case WM_SYSDEADCHAR:
408     case WM_MENUCHAR:
409         {
410             WCHAR wch = LOWORD(wparam);
411             BYTE ch;
412             WideCharToMultiByte( CP_ACP, 0, &wch, 1, &ch, 1, NULL, NULL );
413             wparam = MAKEWPARAM( ch, HIWORD(wparam) );
414         }
415         break;
416     case WM_IME_CHAR:
417         {
418             WCHAR wch = LOWORD(wparam);
419             BYTE ch[2];
420
421             if (WideCharToMultiByte( CP_ACP, 0, &wch, 1, ch, 2, NULL, NULL ) == 2)
422                 wparam = MAKEWPARAM( (ch[0] << 8) | ch[1], HIWORD(wparam) );
423             else
424                 wparam = MAKEWPARAM( ch[0], HIWORD(wparam) );
425         }
426         break;
427     }
428     return wparam;
429 }
430
431
432 /***********************************************************************
433  *              pack_message
434  *
435  * Pack a message for sending to another process.
436  * Return the size of the data we expect in the message reply.
437  * Set data->count to -1 if there is an error.
438  */
439 static size_t pack_message( HWND hwnd, UINT message, WPARAM wparam, LPARAM lparam,
440                             struct packed_message *data )
441 {
442     data->count = 0;
443     switch(message)
444     {
445     case WM_NCCREATE:
446     case WM_CREATE:
447     {
448         CREATESTRUCTW *cs = (CREATESTRUCTW *)lparam;
449         push_data( data, cs, sizeof(*cs) );
450         if (HIWORD(cs->lpszName)) push_string( data, cs->lpszName );
451         if (HIWORD(cs->lpszClass)) push_string( data, cs->lpszClass );
452         return sizeof(*cs);
453     }
454     case WM_GETTEXT:
455     case WM_ASKCBFORMATNAME:
456         return wparam * sizeof(WCHAR);
457     case WM_WININICHANGE:
458         if (lparam) push_string(data, (LPWSTR)lparam );
459         return 0;
460     case WM_SETTEXT:
461     case WM_DEVMODECHANGE:
462     case CB_DIR:
463     case LB_DIR:
464     case LB_ADDFILE:
465     case EM_REPLACESEL:
466         push_string( data, (LPWSTR)lparam );
467         return 0;
468     case WM_GETMINMAXINFO:
469         push_data( data, (MINMAXINFO *)lparam, sizeof(MINMAXINFO) );
470         return sizeof(MINMAXINFO);
471     case WM_DRAWITEM:
472         push_data( data, (DRAWITEMSTRUCT *)lparam, sizeof(DRAWITEMSTRUCT) );
473         return 0;
474     case WM_MEASUREITEM:
475         push_data( data, (MEASUREITEMSTRUCT *)lparam, sizeof(MEASUREITEMSTRUCT) );
476         return sizeof(MEASUREITEMSTRUCT);
477     case WM_DELETEITEM:
478         push_data( data, (DELETEITEMSTRUCT *)lparam, sizeof(DELETEITEMSTRUCT) );
479         return 0;
480     case WM_COMPAREITEM:
481         push_data( data, (COMPAREITEMSTRUCT *)lparam, sizeof(COMPAREITEMSTRUCT) );
482         return 0;
483     case WM_WINDOWPOSCHANGING:
484     case WM_WINDOWPOSCHANGED:
485         push_data( data, (WINDOWPOS *)lparam, sizeof(WINDOWPOS) );
486         return sizeof(WINDOWPOS);
487     case WM_COPYDATA:
488     {
489         COPYDATASTRUCT *cp = (COPYDATASTRUCT *)lparam;
490         push_data( data, cp, sizeof(*cp) );
491         if (cp->lpData) push_data( data, cp->lpData, cp->cbData );
492         return 0;
493     }
494     case WM_NOTIFY:
495         /* WM_NOTIFY cannot be sent across processes (MSDN) */
496         data->count = -1;
497         return 0;
498     case WM_HELP:
499         push_data( data, (HELPINFO *)lparam, sizeof(HELPINFO) );
500         return 0;
501     case WM_STYLECHANGING:
502     case WM_STYLECHANGED:
503         push_data( data, (STYLESTRUCT *)lparam, sizeof(STYLESTRUCT) );
504         return 0;
505     case WM_NCCALCSIZE:
506         if (!wparam)
507         {
508             push_data( data, (RECT *)lparam, sizeof(RECT) );
509             return sizeof(RECT);
510         }
511         else
512         {
513             NCCALCSIZE_PARAMS *nc = (NCCALCSIZE_PARAMS *)lparam;
514             push_data( data, nc, sizeof(*nc) );
515             push_data( data, nc->lppos, sizeof(*nc->lppos) );
516             return sizeof(*nc) + sizeof(*nc->lppos);
517         }
518     case WM_GETDLGCODE:
519         if (lparam) push_data( data, (MSG *)lparam, sizeof(MSG) );
520         return sizeof(MSG);
521     case SBM_SETSCROLLINFO:
522         push_data( data, (SCROLLINFO *)lparam, sizeof(SCROLLINFO) );
523         return 0;
524     case SBM_GETSCROLLINFO:
525         push_data( data, (SCROLLINFO *)lparam, sizeof(SCROLLINFO) );
526         return sizeof(SCROLLINFO);
527     case SBM_GETSCROLLBARINFO:
528     {
529         const SCROLLBARINFO *info = (const SCROLLBARINFO *)lparam;
530         size_t size = min( info->cbSize, sizeof(SCROLLBARINFO) );
531         push_data( data, info, size );
532         return size;
533     }
534     case EM_GETSEL:
535     case SBM_GETRANGE:
536     case CB_GETEDITSEL:
537     {
538         size_t size = 0;
539         if (wparam) size += sizeof(DWORD);
540         if (lparam) size += sizeof(DWORD);
541         return size;
542     }
543     case EM_GETRECT:
544     case LB_GETITEMRECT:
545     case CB_GETDROPPEDCONTROLRECT:
546         return sizeof(RECT);
547     case EM_SETRECT:
548     case EM_SETRECTNP:
549         push_data( data, (RECT *)lparam, sizeof(RECT) );
550         return 0;
551     case EM_GETLINE:
552     {
553         WORD *pw = (WORD *)lparam;
554         push_data( data, pw, sizeof(*pw) );
555         return *pw * sizeof(WCHAR);
556     }
557     case EM_SETTABSTOPS:
558     case LB_SETTABSTOPS:
559         if (wparam) push_data( data, (UINT *)lparam, sizeof(UINT) * wparam );
560         return 0;
561     case CB_ADDSTRING:
562     case CB_INSERTSTRING:
563     case CB_FINDSTRING:
564     case CB_FINDSTRINGEXACT:
565     case CB_SELECTSTRING:
566         if (combobox_has_strings( hwnd )) push_string( data, (LPWSTR)lparam );
567         return 0;
568     case CB_GETLBTEXT:
569         if (!combobox_has_strings( hwnd )) return sizeof(ULONG_PTR);
570         return (SendMessageW( hwnd, CB_GETLBTEXTLEN, wparam, 0 ) + 1) * sizeof(WCHAR);
571     case LB_ADDSTRING:
572     case LB_INSERTSTRING:
573     case LB_FINDSTRING:
574     case LB_FINDSTRINGEXACT:
575     case LB_SELECTSTRING:
576         if (listbox_has_strings( hwnd )) push_string( data, (LPWSTR)lparam );
577         return 0;
578     case LB_GETTEXT:
579         if (!listbox_has_strings( hwnd )) return sizeof(ULONG_PTR);
580         return (SendMessageW( hwnd, LB_GETTEXTLEN, wparam, 0 ) + 1) * sizeof(WCHAR);
581     case LB_GETSELITEMS:
582         return wparam * sizeof(UINT);
583     case WM_NEXTMENU:
584         push_data( data, (MDINEXTMENU *)lparam, sizeof(MDINEXTMENU) );
585         return sizeof(MDINEXTMENU);
586     case WM_SIZING:
587     case WM_MOVING:
588         push_data( data, (RECT *)lparam, sizeof(RECT) );
589         return sizeof(RECT);
590     case WM_MDICREATE:
591     {
592         MDICREATESTRUCTW *cs = (MDICREATESTRUCTW *)lparam;
593         push_data( data, cs, sizeof(*cs) );
594         if (HIWORD(cs->szTitle)) push_string( data, cs->szTitle );
595         if (HIWORD(cs->szClass)) push_string( data, cs->szClass );
596         return sizeof(*cs);
597     }
598     case WM_MDIGETACTIVE:
599         if (lparam) return sizeof(BOOL);
600         return 0;
601     case WM_WINE_SETWINDOWPOS:
602         push_data( data, (WINDOWPOS *)lparam, sizeof(WINDOWPOS) );
603         return 0;
604     case WM_WINE_KEYBOARD_LL_HOOK:
605         push_data( data, (KBDLLHOOKSTRUCT *)lparam, sizeof(KBDLLHOOKSTRUCT) );
606         return 0;
607     case WM_WINE_MOUSE_LL_HOOK:
608         push_data( data, (MSLLHOOKSTRUCT *)lparam, sizeof(MSLLHOOKSTRUCT) );
609         return 0;
610     case WM_PAINT:
611         if (!wparam) return 0;
612         /* fall through */
613
614     /* these contain an HFONT */
615     case WM_SETFONT:
616     case WM_GETFONT:
617     /* these contain an HDC */
618     case WM_ERASEBKGND:
619     case WM_ICONERASEBKGND:
620     case WM_NCPAINT:
621     case WM_CTLCOLORMSGBOX:
622     case WM_CTLCOLOREDIT:
623     case WM_CTLCOLORLISTBOX:
624     case WM_CTLCOLORBTN:
625     case WM_CTLCOLORDLG:
626     case WM_CTLCOLORSCROLLBAR:
627     case WM_CTLCOLORSTATIC:
628     case WM_PRINT:
629     case WM_PRINTCLIENT:
630     /* these contain an HGLOBAL */
631     case WM_PAINTCLIPBOARD:
632     case WM_SIZECLIPBOARD:
633     /* these contain HICON */
634     case WM_GETICON:
635     case WM_SETICON:
636     case WM_QUERYDRAGICON:
637     case WM_QUERYPARKICON:
638     /* these contain pointers */
639     case WM_DROPOBJECT:
640     case WM_QUERYDROPOBJECT:
641     case WM_DRAGLOOP:
642     case WM_DRAGSELECT:
643     case WM_DRAGMOVE:
644     case WM_DEVICECHANGE:
645         FIXME( "msg %x (%s) not supported yet\n", message, SPY_GetMsgName(message, hwnd) );
646         data->count = -1;
647         return 0;
648     }
649     return 0;
650 }
651
652
653 /***********************************************************************
654  *              unpack_message
655  *
656  * Unpack a message received from another process.
657  */
658 static BOOL unpack_message( HWND hwnd, UINT message, WPARAM *wparam, LPARAM *lparam,
659                             void **buffer, size_t size )
660 {
661     size_t minsize = 0;
662
663     switch(message)
664     {
665     case WM_NCCREATE:
666     case WM_CREATE:
667     {
668         CREATESTRUCTW *cs = *buffer;
669         WCHAR *str = (WCHAR *)(cs + 1);
670         if (size < sizeof(*cs)) return FALSE;
671         size -= sizeof(*cs);
672         if (HIWORD(cs->lpszName))
673         {
674             if (!check_string( str, size )) return FALSE;
675             cs->lpszName = str;
676             size -= (strlenW(str) + 1) * sizeof(WCHAR);
677             str += strlenW(str) + 1;
678         }
679         if (HIWORD(cs->lpszClass))
680         {
681             if (!check_string( str, size )) return FALSE;
682             cs->lpszClass = str;
683         }
684         break;
685     }
686     case WM_GETTEXT:
687     case WM_ASKCBFORMATNAME:
688         if (!get_buffer_space( buffer, (*wparam * sizeof(WCHAR)) )) return FALSE;
689         break;
690     case WM_WININICHANGE:
691         if (!*lparam) return TRUE;
692         /* fall through */
693     case WM_SETTEXT:
694     case WM_DEVMODECHANGE:
695     case CB_DIR:
696     case LB_DIR:
697     case LB_ADDFILE:
698     case EM_REPLACESEL:
699         if (!check_string( *buffer, size )) return FALSE;
700         break;
701     case WM_GETMINMAXINFO:
702         minsize = sizeof(MINMAXINFO);
703         break;
704     case WM_DRAWITEM:
705         minsize = sizeof(DRAWITEMSTRUCT);
706         break;
707     case WM_MEASUREITEM:
708         minsize = sizeof(MEASUREITEMSTRUCT);
709         break;
710     case WM_DELETEITEM:
711         minsize = sizeof(DELETEITEMSTRUCT);
712         break;
713     case WM_COMPAREITEM:
714         minsize = sizeof(COMPAREITEMSTRUCT);
715         break;
716     case WM_WINDOWPOSCHANGING:
717     case WM_WINDOWPOSCHANGED:
718     case WM_WINE_SETWINDOWPOS:
719         minsize = sizeof(WINDOWPOS);
720         break;
721     case WM_COPYDATA:
722     {
723         COPYDATASTRUCT *cp = *buffer;
724         if (size < sizeof(*cp)) return FALSE;
725         if (cp->lpData)
726         {
727             minsize = sizeof(*cp) + cp->cbData;
728             cp->lpData = cp + 1;
729         }
730         break;
731     }
732     case WM_NOTIFY:
733         /* WM_NOTIFY cannot be sent across processes (MSDN) */
734         return FALSE;
735     case WM_HELP:
736         minsize = sizeof(HELPINFO);
737         break;
738     case WM_STYLECHANGING:
739     case WM_STYLECHANGED:
740         minsize = sizeof(STYLESTRUCT);
741         break;
742     case WM_NCCALCSIZE:
743         if (!*wparam) minsize = sizeof(RECT);
744         else
745         {
746             NCCALCSIZE_PARAMS *nc = *buffer;
747             if (size < sizeof(*nc) + sizeof(*nc->lppos)) return FALSE;
748             nc->lppos = (WINDOWPOS *)(nc + 1);
749         }
750         break;
751     case WM_GETDLGCODE:
752         if (!*lparam) return TRUE;
753         minsize = sizeof(MSG);
754         break;
755     case SBM_SETSCROLLINFO:
756         minsize = sizeof(SCROLLINFO);
757         break;
758     case SBM_GETSCROLLINFO:
759         if (!get_buffer_space( buffer, sizeof(SCROLLINFO ))) return FALSE;
760         break;
761     case SBM_GETSCROLLBARINFO:
762         if (!get_buffer_space( buffer, sizeof(SCROLLBARINFO ))) return FALSE;
763         break;
764     case EM_GETSEL:
765     case SBM_GETRANGE:
766     case CB_GETEDITSEL:
767         if (*wparam || *lparam)
768         {
769             if (!get_buffer_space( buffer, 2*sizeof(DWORD) )) return FALSE;
770             if (*wparam) *wparam = (WPARAM)*buffer;
771             if (*lparam) *lparam = (LPARAM)((DWORD *)*buffer + 1);
772         }
773         return TRUE;
774     case EM_GETRECT:
775     case LB_GETITEMRECT:
776     case CB_GETDROPPEDCONTROLRECT:
777         if (!get_buffer_space( buffer, sizeof(RECT) )) return FALSE;
778         break;
779     case EM_SETRECT:
780     case EM_SETRECTNP:
781         minsize = sizeof(RECT);
782         break;
783     case EM_GETLINE:
784     {
785         WORD len;
786         if (size < sizeof(WORD)) return FALSE;
787         len = *(WORD *)*buffer;
788         if (!get_buffer_space( buffer, (len + 1) * sizeof(WCHAR) )) return FALSE;
789         *lparam = (LPARAM)*buffer + sizeof(WORD);  /* don't erase WORD at start of buffer */
790         return TRUE;
791     }
792     case EM_SETTABSTOPS:
793     case LB_SETTABSTOPS:
794         if (!*wparam) return TRUE;
795         minsize = *wparam * sizeof(UINT);
796         break;
797     case CB_ADDSTRING:
798     case CB_INSERTSTRING:
799     case CB_FINDSTRING:
800     case CB_FINDSTRINGEXACT:
801     case CB_SELECTSTRING:
802     case LB_ADDSTRING:
803     case LB_INSERTSTRING:
804     case LB_FINDSTRING:
805     case LB_FINDSTRINGEXACT:
806     case LB_SELECTSTRING:
807         if (!*buffer) return TRUE;
808         if (!check_string( *buffer, size )) return FALSE;
809         break;
810     case CB_GETLBTEXT:
811     {
812         size = sizeof(ULONG_PTR);
813         if (combobox_has_strings( hwnd ))
814             size = (SendMessageW( hwnd, CB_GETLBTEXTLEN, *wparam, 0 ) + 1) * sizeof(WCHAR);
815         if (!get_buffer_space( buffer, size )) return FALSE;
816         break;
817     }
818     case LB_GETTEXT:
819     {
820         size = sizeof(ULONG_PTR);
821         if (listbox_has_strings( hwnd ))
822             size = (SendMessageW( hwnd, LB_GETTEXTLEN, *wparam, 0 ) + 1) * sizeof(WCHAR);
823         if (!get_buffer_space( buffer, size )) return FALSE;
824         break;
825     }
826     case LB_GETSELITEMS:
827         if (!get_buffer_space( buffer, *wparam * sizeof(UINT) )) return FALSE;
828         break;
829     case WM_NEXTMENU:
830         minsize = sizeof(MDINEXTMENU);
831         if (!get_buffer_space( buffer, sizeof(MDINEXTMENU) )) return FALSE;
832         break;
833     case WM_SIZING:
834     case WM_MOVING:
835         minsize = sizeof(RECT);
836         if (!get_buffer_space( buffer, sizeof(RECT) )) return FALSE;
837         break;
838     case WM_MDICREATE:
839     {
840         MDICREATESTRUCTW *cs = *buffer;
841         WCHAR *str = (WCHAR *)(cs + 1);
842         if (size < sizeof(*cs)) return FALSE;
843         size -= sizeof(*cs);
844         if (HIWORD(cs->szTitle))
845         {
846             if (!check_string( str, size )) return FALSE;
847             cs->szTitle = str;
848             size -= (strlenW(str) + 1) * sizeof(WCHAR);
849             str += strlenW(str) + 1;
850         }
851         if (HIWORD(cs->szClass))
852         {
853             if (!check_string( str, size )) return FALSE;
854             cs->szClass = str;
855         }
856         break;
857     }
858     case WM_MDIGETACTIVE:
859         if (!*lparam) return TRUE;
860         if (!get_buffer_space( buffer, sizeof(BOOL) )) return FALSE;
861         break;
862     case WM_WINE_KEYBOARD_LL_HOOK:
863         minsize = sizeof(KBDLLHOOKSTRUCT);
864         break;
865     case WM_WINE_MOUSE_LL_HOOK:
866         minsize = sizeof(MSLLHOOKSTRUCT);
867         break;
868     case WM_PAINT:
869         if (!*wparam) return TRUE;
870         /* fall through */
871
872     /* these contain an HFONT */
873     case WM_SETFONT:
874     case WM_GETFONT:
875     /* these contain an HDC */
876     case WM_ERASEBKGND:
877     case WM_ICONERASEBKGND:
878     case WM_NCPAINT:
879     case WM_CTLCOLORMSGBOX:
880     case WM_CTLCOLOREDIT:
881     case WM_CTLCOLORLISTBOX:
882     case WM_CTLCOLORBTN:
883     case WM_CTLCOLORDLG:
884     case WM_CTLCOLORSCROLLBAR:
885     case WM_CTLCOLORSTATIC:
886     case WM_PRINT:
887     case WM_PRINTCLIENT:
888     /* these contain an HGLOBAL */
889     case WM_PAINTCLIPBOARD:
890     case WM_SIZECLIPBOARD:
891     /* these contain HICON */
892     case WM_GETICON:
893     case WM_SETICON:
894     case WM_QUERYDRAGICON:
895     case WM_QUERYPARKICON:
896     /* these contain pointers */
897     case WM_DROPOBJECT:
898     case WM_QUERYDROPOBJECT:
899     case WM_DRAGLOOP:
900     case WM_DRAGSELECT:
901     case WM_DRAGMOVE:
902     case WM_DEVICECHANGE:
903         FIXME( "msg %x (%s) not supported yet\n", message, SPY_GetMsgName(message, hwnd) );
904         return FALSE;
905
906     default:
907         return TRUE; /* message doesn't need any unpacking */
908     }
909
910     /* default exit for most messages: check minsize and store buffer in lparam */
911     if (size < minsize) return FALSE;
912     *lparam = (LPARAM)*buffer;
913     return TRUE;
914 }
915
916
917 /***********************************************************************
918  *              pack_reply
919  *
920  * Pack a reply to a message for sending to another process.
921  */
922 static void pack_reply( HWND hwnd, UINT message, WPARAM wparam, LPARAM lparam,
923                         LRESULT res, struct packed_message *data )
924 {
925     data->count = 0;
926     switch(message)
927     {
928     case WM_NCCREATE:
929     case WM_CREATE:
930         push_data( data, (CREATESTRUCTW *)lparam, sizeof(CREATESTRUCTW) );
931         break;
932     case WM_GETTEXT:
933     case CB_GETLBTEXT:
934     case LB_GETTEXT:
935         push_data( data, (WCHAR *)lparam, (res + 1) * sizeof(WCHAR) );
936         break;
937     case WM_GETMINMAXINFO:
938         push_data( data, (MINMAXINFO *)lparam, sizeof(MINMAXINFO) );
939         break;
940     case WM_MEASUREITEM:
941         push_data( data, (MEASUREITEMSTRUCT *)lparam, sizeof(MEASUREITEMSTRUCT) );
942         break;
943     case WM_WINDOWPOSCHANGING:
944     case WM_WINDOWPOSCHANGED:
945         push_data( data, (WINDOWPOS *)lparam, sizeof(WINDOWPOS) );
946         break;
947     case WM_GETDLGCODE:
948         if (lparam) push_data( data, (MSG *)lparam, sizeof(MSG) );
949         break;
950     case SBM_GETSCROLLINFO:
951         push_data( data, (SCROLLINFO *)lparam, sizeof(SCROLLINFO) );
952         break;
953     case EM_GETRECT:
954     case LB_GETITEMRECT:
955     case CB_GETDROPPEDCONTROLRECT:
956     case WM_SIZING:
957     case WM_MOVING:
958         push_data( data, (RECT *)lparam, sizeof(RECT) );
959         break;
960     case EM_GETLINE:
961     {
962         WORD *ptr = (WORD *)lparam;
963         push_data( data, ptr, ptr[-1] * sizeof(WCHAR) );
964         break;
965     }
966     case LB_GETSELITEMS:
967         push_data( data, (UINT *)lparam, wparam * sizeof(UINT) );
968         break;
969     case WM_MDIGETACTIVE:
970         if (lparam) push_data( data, (BOOL *)lparam, sizeof(BOOL) );
971         break;
972     case WM_NCCALCSIZE:
973         if (!wparam)
974             push_data( data, (RECT *)lparam, sizeof(RECT) );
975         else
976         {
977             NCCALCSIZE_PARAMS *nc = (NCCALCSIZE_PARAMS *)lparam;
978             push_data( data, nc, sizeof(*nc) );
979             push_data( data, nc->lppos, sizeof(*nc->lppos) );
980         }
981         break;
982     case EM_GETSEL:
983     case SBM_GETRANGE:
984     case CB_GETEDITSEL:
985         if (wparam) push_data( data, (DWORD *)wparam, sizeof(DWORD) );
986         if (lparam) push_data( data, (DWORD *)lparam, sizeof(DWORD) );
987         break;
988     case WM_NEXTMENU:
989         push_data( data, (MDINEXTMENU *)lparam, sizeof(MDINEXTMENU) );
990         break;
991     case WM_MDICREATE:
992         push_data( data, (MDICREATESTRUCTW *)lparam, sizeof(MDICREATESTRUCTW) );
993         break;
994     case WM_ASKCBFORMATNAME:
995         push_data( data, (WCHAR *)lparam, (strlenW((WCHAR *)lparam) + 1) * sizeof(WCHAR) );
996         break;
997     }
998 }
999
1000
1001 /***********************************************************************
1002  *              unpack_reply
1003  *
1004  * Unpack a message reply received from another process.
1005  */
1006 static void unpack_reply( HWND hwnd, UINT message, WPARAM wparam, LPARAM lparam,
1007                           void *buffer, size_t size )
1008 {
1009     switch(message)
1010     {
1011     case WM_NCCREATE:
1012     case WM_CREATE:
1013     {
1014         CREATESTRUCTW *cs = (CREATESTRUCTW *)lparam;
1015         LPCWSTR name = cs->lpszName, class = cs->lpszClass;
1016         memcpy( cs, buffer, min( sizeof(*cs), size ));
1017         cs->lpszName = name;  /* restore the original pointers */
1018         cs->lpszClass = class;
1019         break;
1020     }
1021     case WM_GETTEXT:
1022     case WM_ASKCBFORMATNAME:
1023         memcpy( (WCHAR *)lparam, buffer, min( wparam*sizeof(WCHAR), size ));
1024         break;
1025     case WM_GETMINMAXINFO:
1026         memcpy( (MINMAXINFO *)lparam, buffer, min( sizeof(MINMAXINFO), size ));
1027         break;
1028     case WM_MEASUREITEM:
1029         memcpy( (MEASUREITEMSTRUCT *)lparam, buffer, min( sizeof(MEASUREITEMSTRUCT), size ));
1030         break;
1031     case WM_WINDOWPOSCHANGING:
1032     case WM_WINDOWPOSCHANGED:
1033         memcpy( (WINDOWPOS *)lparam, buffer, min( sizeof(WINDOWPOS), size ));
1034         break;
1035     case WM_GETDLGCODE:
1036         if (lparam) memcpy( (MSG *)lparam, buffer, min( sizeof(MSG), size ));
1037         break;
1038     case SBM_GETSCROLLINFO:
1039         memcpy( (SCROLLINFO *)lparam, buffer, min( sizeof(SCROLLINFO), size ));
1040         break;
1041     case SBM_GETSCROLLBARINFO:
1042         memcpy( (SCROLLBARINFO *)lparam, buffer, min( sizeof(SCROLLBARINFO), size ));
1043         break;
1044     case EM_GETRECT:
1045     case CB_GETDROPPEDCONTROLRECT:
1046     case LB_GETITEMRECT:
1047     case WM_SIZING:
1048     case WM_MOVING:
1049         memcpy( (RECT *)lparam, buffer, min( sizeof(RECT), size ));
1050         break;
1051     case EM_GETLINE:
1052         size = min( size, (size_t)*(WORD *)lparam );
1053         memcpy( (WCHAR *)lparam, buffer, size );
1054         break;
1055     case LB_GETSELITEMS:
1056         memcpy( (UINT *)lparam, buffer, min( wparam*sizeof(UINT), size ));
1057         break;
1058     case LB_GETTEXT:
1059     case CB_GETLBTEXT:
1060         memcpy( (WCHAR *)lparam, buffer, size );
1061         break;
1062     case WM_NEXTMENU:
1063         memcpy( (MDINEXTMENU *)lparam, buffer, min( sizeof(MDINEXTMENU), size ));
1064         break;
1065     case WM_MDIGETACTIVE:
1066         if (lparam) memcpy( (BOOL *)lparam, buffer, min( sizeof(BOOL), size ));
1067         break;
1068     case WM_NCCALCSIZE:
1069         if (!wparam)
1070             memcpy( (RECT *)lparam, buffer, min( sizeof(RECT), size ));
1071         else
1072         {
1073             NCCALCSIZE_PARAMS *nc = (NCCALCSIZE_PARAMS *)lparam;
1074             WINDOWPOS *wp = nc->lppos;
1075             memcpy( nc, buffer, min( sizeof(*nc), size ));
1076             if (size > sizeof(*nc))
1077             {
1078                 size -= sizeof(*nc);
1079                 memcpy( wp, (NCCALCSIZE_PARAMS*)buffer + 1, min( sizeof(*wp), size ));
1080             }
1081             nc->lppos = wp;  /* restore the original pointer */
1082         }
1083         break;
1084     case EM_GETSEL:
1085     case SBM_GETRANGE:
1086     case CB_GETEDITSEL:
1087         if (wparam)
1088         {
1089             memcpy( (DWORD *)wparam, buffer, min( sizeof(DWORD), size ));
1090             if (size <= sizeof(DWORD)) break;
1091             size -= sizeof(DWORD);
1092             buffer = (DWORD *)buffer + 1;
1093         }
1094         if (lparam) memcpy( (DWORD *)lparam, buffer, min( sizeof(DWORD), size ));
1095         break;
1096     case WM_MDICREATE:
1097     {
1098         MDICREATESTRUCTW *cs = (MDICREATESTRUCTW *)lparam;
1099         LPCWSTR title = cs->szTitle, class = cs->szClass;
1100         memcpy( cs, buffer, min( sizeof(*cs), size ));
1101         cs->szTitle = title;  /* restore the original pointers */
1102         cs->szClass = class;
1103         break;
1104     }
1105     default:
1106         ERR( "should not happen: unexpected message %x\n", message );
1107         break;
1108     }
1109 }
1110
1111
1112 /***********************************************************************
1113  *           reply_message
1114  *
1115  * Send a reply to a sent message.
1116  */
1117 static void reply_message( struct received_message_info *info, LRESULT result, BOOL remove )
1118 {
1119     struct packed_message data;
1120     int i, replied = info->flags & ISMEX_REPLIED;
1121
1122     if (info->flags & ISMEX_NOTIFY) return;  /* notify messages don't get replies */
1123     if (!remove && replied) return;  /* replied already */
1124
1125     data.count = 0;
1126     info->flags |= ISMEX_REPLIED;
1127
1128     if (info->type == MSG_OTHER_PROCESS && !replied)
1129     {
1130         pack_reply( info->msg.hwnd, info->msg.message, info->msg.wParam,
1131                     info->msg.lParam, result, &data );
1132     }
1133
1134     SERVER_START_REQ( reply_message )
1135     {
1136         req->result = result;
1137         req->remove = remove;
1138         for (i = 0; i < data.count; i++) wine_server_add_data( req, data.data[i], data.size[i] );
1139         wine_server_call( req );
1140     }
1141     SERVER_END_REQ;
1142 }
1143
1144
1145 /***********************************************************************
1146  *           handle_internal_message
1147  *
1148  * Handle an internal Wine message instead of calling the window proc.
1149  */
1150 static LRESULT handle_internal_message( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam )
1151 {
1152     if (hwnd == GetDesktopWindow()) return 0;
1153     switch(msg)
1154     {
1155     case WM_WINE_DESTROYWINDOW:
1156         return WIN_DestroyWindow( hwnd );
1157     case WM_WINE_SETWINDOWPOS:
1158         if (USER_Driver.pSetWindowPos)
1159             return USER_Driver.pSetWindowPos( (WINDOWPOS *)lparam );
1160         return 0;
1161     case WM_WINE_SHOWWINDOW:
1162         return ShowWindow( hwnd, wparam );
1163     case WM_WINE_SETPARENT:
1164         return (LRESULT)SetParent( hwnd, (HWND)wparam );
1165     case WM_WINE_SETWINDOWLONG:
1166         return (LRESULT)SetWindowLongW( hwnd, wparam, lparam );
1167     case WM_WINE_ENABLEWINDOW:
1168         return EnableWindow( hwnd, wparam );
1169     case WM_WINE_SETACTIVEWINDOW:
1170         return (LRESULT)SetActiveWindow( (HWND)wparam );
1171     case WM_WINE_KEYBOARD_LL_HOOK:
1172         return HOOK_CallHooks( WH_KEYBOARD_LL, HC_ACTION, wparam, lparam, TRUE );
1173     case WM_WINE_MOUSE_LL_HOOK:
1174         return HOOK_CallHooks( WH_MOUSE_LL, HC_ACTION, wparam, lparam, TRUE );
1175     default:
1176         if (msg >= WM_WINE_FIRST_DRIVER_MSG && msg <= WM_WINE_LAST_DRIVER_MSG)
1177         {
1178             if (!USER_Driver.pWindowMessage) return 0;
1179             return USER_Driver.pWindowMessage( hwnd, msg, wparam, lparam );
1180         }
1181         FIXME( "unknown internal message %x\n", msg );
1182         return 0;
1183     }
1184 }
1185
1186 /* since the WM_DDE_ACK response to a WM_DDE_EXECUTE message should contain the handle
1187  * to the memory handle, we keep track (in the server side) of all pairs of handle
1188  * used (the client passes its value and the content of the memory handle), and
1189  * the server stored both values (the client, and the local one, created after the
1190  * content). When a ACK message is generated, the list of pair is searched for a
1191  * matching pair, so that the client memory handle can be returned.
1192  */
1193 struct DDE_pair {
1194     HGLOBAL     client_hMem;
1195     HGLOBAL     server_hMem;
1196 };
1197
1198 static      struct DDE_pair*    dde_pairs;
1199 static      int                 dde_num_alloc;
1200 static      int                 dde_num_used;
1201
1202 static CRITICAL_SECTION dde_crst;
1203 static CRITICAL_SECTION_DEBUG critsect_debug =
1204 {
1205     0, 0, &dde_crst,
1206     { &critsect_debug.ProcessLocksList, &critsect_debug.ProcessLocksList },
1207       0, 0, { 0, (DWORD)(__FILE__ ": dde_crst") }
1208 };
1209 static CRITICAL_SECTION dde_crst = { &critsect_debug, -1, 0, 0, 0, 0 };
1210
1211 static BOOL dde_add_pair(HGLOBAL chm, HGLOBAL shm)
1212 {
1213     int  i;
1214 #define GROWBY  4
1215
1216     EnterCriticalSection(&dde_crst);
1217
1218     /* now remember the pair of hMem on both sides */
1219     if (dde_num_used == dde_num_alloc)
1220     {
1221         struct DDE_pair* tmp;
1222         if (dde_pairs)
1223             tmp  = HeapReAlloc( GetProcessHeap(), 0, dde_pairs,
1224                                             (dde_num_alloc + GROWBY) * sizeof(struct DDE_pair));
1225         else
1226             tmp  = HeapAlloc( GetProcessHeap(), 0, 
1227                                             (dde_num_alloc + GROWBY) * sizeof(struct DDE_pair));
1228
1229         if (!tmp)
1230         {
1231             LeaveCriticalSection(&dde_crst);
1232             return FALSE;
1233         }
1234         dde_pairs = tmp;
1235         /* zero out newly allocated part */
1236         memset(&dde_pairs[dde_num_alloc], 0, GROWBY * sizeof(struct DDE_pair));
1237         dde_num_alloc += GROWBY;
1238     }
1239 #undef GROWBY
1240     for (i = 0; i < dde_num_alloc; i++)
1241     {
1242         if (dde_pairs[i].server_hMem == 0)
1243         {
1244             dde_pairs[i].client_hMem = chm;
1245             dde_pairs[i].server_hMem = shm;
1246             dde_num_used++;
1247             break;
1248         }
1249     }
1250     LeaveCriticalSection(&dde_crst);
1251     return TRUE;
1252 }
1253
1254 static HGLOBAL dde_get_pair(HGLOBAL shm)
1255 {
1256     int  i;
1257     HGLOBAL     ret = 0;
1258
1259     EnterCriticalSection(&dde_crst);
1260     for (i = 0; i < dde_num_alloc; i++)
1261     {
1262         if (dde_pairs[i].server_hMem == shm)
1263         {
1264             /* free this pair */
1265             dde_pairs[i].server_hMem = 0;
1266             dde_num_used--;
1267             ret = dde_pairs[i].client_hMem;
1268             break;
1269         }
1270     }
1271     LeaveCriticalSection(&dde_crst);
1272     return ret;
1273 }
1274
1275 /***********************************************************************
1276  *              post_dde_message
1277  *
1278  * Post a DDE message
1279  */
1280 static BOOL post_dde_message( DWORD dest_tid, struct packed_message *data, const struct send_message_info *info )
1281 {
1282     void*       ptr = NULL;
1283     int         size = 0;
1284     UINT        uiLo, uiHi;
1285     LPARAM      lp = 0;
1286     HGLOBAL     hunlock = 0;
1287     int         i;
1288     DWORD       res;
1289
1290     if (!UnpackDDElParam( info->msg, info->lparam, &uiLo, &uiHi ))
1291         return FALSE;
1292
1293     lp = info->lparam;
1294     switch (info->msg)
1295     {
1296         /* DDE messages which don't require packing are:
1297          * WM_DDE_INITIATE
1298          * WM_DDE_TERMINATE
1299          * WM_DDE_REQUEST
1300          * WM_DDE_UNADVISE
1301          */
1302     case WM_DDE_ACK:
1303         if (HIWORD(uiHi))
1304         {
1305             /* uiHi should contain a hMem from WM_DDE_EXECUTE */
1306             HGLOBAL h = dde_get_pair( (HANDLE)uiHi );
1307             if (h)
1308             {
1309                 /* send back the value of h on the other side */
1310                 push_data( data, &h, sizeof(HGLOBAL) );
1311                 lp = uiLo;
1312                 TRACE( "send dde-ack %x %08x => %08lx\n", uiLo, uiHi, (DWORD)h );
1313             }
1314         }
1315         else
1316         {
1317             /* uiHi should contain either an atom or 0 */
1318             TRACE( "send dde-ack %x atom=%x\n", uiLo, uiHi );
1319             lp = MAKELONG( uiLo, uiHi );
1320         }
1321         break;
1322     case WM_DDE_ADVISE:
1323     case WM_DDE_DATA:
1324     case WM_DDE_POKE:
1325         size = 0;
1326         if (uiLo)
1327         {
1328             size = GlobalSize( (HGLOBAL)uiLo ) ;
1329             if ((info->msg == WM_DDE_ADVISE && size < sizeof(DDEADVISE)) ||
1330                 (info->msg == WM_DDE_DATA   && size < sizeof(DDEDATA))   ||
1331                 (info->msg == WM_DDE_POKE   && size < sizeof(DDEPOKE))
1332                 )
1333             return FALSE;
1334         }
1335         else if (info->msg != WM_DDE_DATA) return FALSE;
1336
1337         lp = uiHi;
1338         if (uiLo)
1339         {
1340             if ((ptr = GlobalLock( (HGLOBAL)uiLo) ))
1341             {
1342                 DDEDATA *dde_data = (DDEDATA *)ptr;
1343                 TRACE("unused %d, fResponse %d, fRelease %d, fDeferUpd %d, fAckReq %d, cfFormat %d\n",
1344                        dde_data->unused, dde_data->fResponse, dde_data->fRelease,
1345                        dde_data->reserved, dde_data->fAckReq, dde_data->cfFormat);
1346                 push_data( data, ptr, size );
1347                 hunlock = (HGLOBAL)uiLo;
1348             }
1349         }
1350         TRACE( "send ddepack %u %x\n", size, uiHi );
1351         break;
1352     case WM_DDE_EXECUTE:
1353         if (info->lparam)
1354         {
1355             if ((ptr = GlobalLock( (HGLOBAL)info->lparam) ))
1356             {
1357                 push_data(data, ptr, GlobalSize( (HGLOBAL)info->lparam ));
1358                 /* so that the other side can send it back on ACK */
1359                 lp = info->lparam;
1360                 hunlock = (HGLOBAL)info->lparam;
1361             }
1362         }
1363         break;
1364     }
1365     SERVER_START_REQ( send_message )
1366     {
1367         req->id      = dest_tid;
1368         req->type    = info->type;
1369         req->flags   = 0;
1370         req->win     = info->hwnd;
1371         req->msg     = info->msg;
1372         req->wparam  = info->wparam;
1373         req->lparam  = lp;
1374         req->time    = GetCurrentTime();
1375         req->timeout = -1;
1376         for (i = 0; i < data->count; i++)
1377             wine_server_add_data( req, data->data[i], data->size[i] );
1378         if ((res = wine_server_call( req )))
1379         {
1380             if (res == STATUS_INVALID_PARAMETER)
1381                 /* FIXME: find a STATUS_ value for this one */
1382                 SetLastError( ERROR_INVALID_THREAD_ID );
1383             else
1384                 SetLastError( RtlNtStatusToDosError(res) );
1385         }
1386         else
1387             FreeDDElParam(info->msg, info->lparam);
1388     }
1389     SERVER_END_REQ;
1390     if (hunlock) GlobalUnlock(hunlock);
1391
1392     return !res;
1393 }
1394
1395 /***********************************************************************
1396  *              unpack_dde_message
1397  *
1398  * Unpack a posted DDE message received from another process.
1399  */
1400 static BOOL unpack_dde_message( HWND hwnd, UINT message, WPARAM *wparam, LPARAM *lparam,
1401                                 void **buffer, size_t size )
1402 {
1403     UINT        uiLo, uiHi;
1404     HGLOBAL     hMem = 0;
1405     void*       ptr;
1406
1407     switch (message)
1408     {
1409     case WM_DDE_ACK:
1410         if (size)
1411         {
1412             /* hMem is being passed */
1413             if (size != sizeof(HGLOBAL)) return FALSE;
1414             if (!buffer || !*buffer) return FALSE;
1415             uiLo = *lparam;
1416             memcpy( &hMem, *buffer, size );
1417             uiHi = (UINT)hMem;
1418             TRACE("recv dde-ack %x mem=%x[%lx]\n", uiLo, uiHi, GlobalSize( hMem ));
1419         }
1420         else
1421         {
1422             uiLo = LOWORD( *lparam );
1423             uiHi = HIWORD( *lparam );
1424             TRACE("recv dde-ack %x atom=%x\n", uiLo, uiHi);
1425         }
1426         *lparam = PackDDElParam( WM_DDE_ACK, uiLo, uiHi );
1427         break;
1428     case WM_DDE_ADVISE:
1429     case WM_DDE_DATA:
1430     case WM_DDE_POKE:
1431         if ((!buffer || !*buffer) && message != WM_DDE_DATA) return FALSE;
1432         uiHi = *lparam;
1433         TRACE( "recv ddepack %u %x\n", size, uiHi );
1434         if (size)
1435         {
1436             if (!(hMem = GlobalAlloc( GMEM_MOVEABLE|GMEM_DDESHARE, size )))
1437                 return FALSE;
1438             if ((ptr = GlobalLock( hMem )))
1439             {
1440                 memcpy( ptr, *buffer, size );
1441                 GlobalUnlock( hMem );
1442             }
1443             else
1444             {
1445                 GlobalFree( hMem );
1446                 return FALSE;
1447             }
1448         }
1449         uiLo = (UINT)hMem;
1450
1451         *lparam = PackDDElParam( message, uiLo, uiHi );
1452         break;
1453     case WM_DDE_EXECUTE:
1454         if (size)
1455         {
1456             if (!buffer || !*buffer) return FALSE;
1457             if (!(hMem = GlobalAlloc( GMEM_MOVEABLE|GMEM_DDESHARE, size ))) return FALSE;
1458             if ((ptr = GlobalLock( hMem )))
1459             {
1460                 memcpy( ptr, *buffer, size );
1461                 GlobalUnlock( hMem );
1462                 TRACE( "exec: pairing c=%08lx s=%08lx\n", *lparam, (DWORD)hMem );
1463                 if (!dde_add_pair( (HGLOBAL)*lparam, hMem ))
1464                 {
1465                     GlobalFree( hMem );
1466                     return FALSE;
1467                 }
1468             }
1469             else
1470             {
1471                 GlobalFree( hMem );
1472                 return FALSE;
1473             }
1474         } else return FALSE;
1475         *lparam = (LPARAM)hMem;
1476         break;
1477     }
1478     return TRUE;
1479 }
1480
1481 /***********************************************************************
1482  *           call_window_proc
1483  *
1484  * Call a window procedure and the corresponding hooks.
1485  */
1486 static LRESULT call_window_proc( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam,
1487                                  BOOL unicode, BOOL same_thread )
1488 {
1489     struct user_thread_info *thread_info = get_user_thread_info();
1490     LRESULT result = 0;
1491     WNDPROC winproc;
1492     CWPSTRUCT cwp;
1493     CWPRETSTRUCT cwpret;
1494
1495     if (thread_info->recursion_count > MAX_SENDMSG_RECURSION) return 0;
1496     thread_info->recursion_count++;
1497
1498     if (msg & 0x80000000)
1499     {
1500         result = handle_internal_message( hwnd, msg, wparam, lparam );
1501         goto done;
1502     }
1503
1504     /* first the WH_CALLWNDPROC hook */
1505     hwnd = WIN_GetFullHandle( hwnd );
1506     cwp.lParam  = lparam;
1507     cwp.wParam  = wparam;
1508     cwp.message = msg;
1509     cwp.hwnd    = hwnd;
1510     HOOK_CallHooks( WH_CALLWNDPROC, HC_ACTION, same_thread, (LPARAM)&cwp, unicode );
1511
1512     /* now call the window procedure */
1513     if (unicode)
1514     {
1515         if (!(winproc = (WNDPROC)GetWindowLongPtrW( hwnd, GWLP_WNDPROC ))) goto done;
1516         result = CallWindowProcW( winproc, hwnd, msg, wparam, lparam );
1517     }
1518     else
1519     {
1520         if (!(winproc = (WNDPROC)GetWindowLongPtrA( hwnd, GWLP_WNDPROC ))) goto done;
1521         result = CallWindowProcA( winproc, hwnd, msg, wparam, lparam );
1522     }
1523
1524     /* and finally the WH_CALLWNDPROCRET hook */
1525     cwpret.lResult = result;
1526     cwpret.lParam  = lparam;
1527     cwpret.wParam  = wparam;
1528     cwpret.message = msg;
1529     cwpret.hwnd    = hwnd;
1530     HOOK_CallHooks( WH_CALLWNDPROCRET, HC_ACTION, same_thread, (LPARAM)&cwpret, unicode );
1531  done:
1532     thread_info->recursion_count--;
1533     return result;
1534 }
1535
1536
1537 /***********************************************************************
1538  *           send_parent_notify
1539  *
1540  * Send a WM_PARENTNOTIFY to all ancestors of the given window, unless
1541  * the window has the WS_EX_NOPARENTNOTIFY style.
1542  */
1543 static void send_parent_notify( HWND hwnd, WORD event, WORD idChild, POINT pt )
1544 {
1545     /* pt has to be in the client coordinates of the parent window */
1546     MapWindowPoints( 0, hwnd, &pt, 1 );
1547     for (;;)
1548     {
1549         HWND parent;
1550
1551         if (!(GetWindowLongW( hwnd, GWL_STYLE ) & WS_CHILD)) break;
1552         if (GetWindowLongW( hwnd, GWL_EXSTYLE ) & WS_EX_NOPARENTNOTIFY) break;
1553         if (!(parent = GetParent(hwnd))) break;
1554         MapWindowPoints( hwnd, parent, &pt, 1 );
1555         hwnd = parent;
1556         SendMessageW( hwnd, WM_PARENTNOTIFY,
1557                       MAKEWPARAM( event, idChild ), MAKELPARAM( pt.x, pt.y ) );
1558     }
1559 }
1560
1561
1562 /***********************************************************************
1563  *          accept_hardware_message
1564  *
1565  * Tell the server we have passed the message to the app
1566  * (even though we may end up dropping it later on)
1567  */
1568 static void accept_hardware_message( UINT hw_id, BOOL remove, HWND new_hwnd )
1569 {
1570     SERVER_START_REQ( accept_hardware_message )
1571     {
1572         req->hw_id   = hw_id;
1573         req->remove  = remove;
1574         req->new_win = new_hwnd;
1575         if (wine_server_call( req ))
1576             FIXME("Failed to reply to MSG_HARDWARE message. Message may not be removed from queue.\n");
1577     }
1578     SERVER_END_REQ;
1579 }
1580
1581
1582 /***********************************************************************
1583  *          process_keyboard_message
1584  *
1585  * returns TRUE if the contents of 'msg' should be passed to the application
1586  */
1587 static BOOL process_keyboard_message( MSG *msg, UINT hw_id, HWND hwnd_filter,
1588                                       UINT first, UINT last, BOOL remove )
1589 {
1590     EVENTMSG event;
1591
1592     /* FIXME: is this really the right place for this hook? */
1593     event.message = msg->message;
1594     event.hwnd    = msg->hwnd;
1595     event.time    = msg->time;
1596     event.paramL  = (msg->wParam & 0xFF) | (HIWORD(msg->lParam) << 8);
1597     event.paramH  = msg->lParam & 0x7FFF;
1598     if (HIWORD(msg->lParam) & 0x0100) event.paramH |= 0x8000; /* special_key - bit */
1599     HOOK_CallHooks( WH_JOURNALRECORD, HC_ACTION, 0, (LPARAM)&event, TRUE );
1600
1601     /* check message filters */
1602     if (msg->message < first || msg->message > last) return FALSE;
1603     if (!check_hwnd_filter( msg, hwnd_filter )) return FALSE;
1604
1605     if (remove)
1606     {
1607         /* Handle F1 key by sending out WM_HELP message */
1608         if ((msg->message == WM_KEYUP) &&
1609             (msg->wParam == VK_F1) &&
1610             (msg->hwnd != GetDesktopWindow()) &&
1611             !MENU_IsMenuActive())
1612         {
1613             HELPINFO hi;
1614             hi.cbSize = sizeof(HELPINFO);
1615             hi.iContextType = HELPINFO_WINDOW;
1616             hi.iCtrlId = GetWindowLongPtrA( msg->hwnd, GWLP_ID );
1617             hi.hItemHandle = msg->hwnd;
1618             hi.dwContextId = GetWindowContextHelpId( msg->hwnd );
1619             hi.MousePos = msg->pt;
1620             SendMessageW( msg->hwnd, WM_HELP, 0, (LPARAM)&hi );
1621         }
1622     }
1623
1624     if (HOOK_CallHooks( WH_KEYBOARD, remove ? HC_ACTION : HC_NOREMOVE,
1625                         LOWORD(msg->wParam), msg->lParam, TRUE ))
1626     {
1627         /* skip this message */
1628         HOOK_CallHooks( WH_CBT, HCBT_KEYSKIPPED, LOWORD(msg->wParam), msg->lParam, TRUE );
1629         accept_hardware_message( hw_id, TRUE, 0 );
1630         return FALSE;
1631     }
1632     accept_hardware_message( hw_id, remove, 0 );
1633     return TRUE;
1634 }
1635
1636
1637 /***********************************************************************
1638  *          process_mouse_message
1639  *
1640  * returns TRUE if the contents of 'msg' should be passed to the application
1641  */
1642 static BOOL process_mouse_message( MSG *msg, UINT hw_id, ULONG_PTR extra_info, HWND hwnd_filter,
1643                                    UINT first, UINT last, BOOL remove )
1644 {
1645     static MSG clk_msg;
1646
1647     POINT pt;
1648     UINT message;
1649     INT hittest;
1650     EVENTMSG event;
1651     GUITHREADINFO info;
1652     MOUSEHOOKSTRUCT hook;
1653     BOOL eatMsg;
1654
1655     /* find the window to dispatch this mouse message to */
1656
1657     hittest = HTCLIENT;
1658     GetGUIThreadInfo( GetCurrentThreadId(), &info );
1659     if (!(msg->hwnd = info.hwndCapture))
1660     {
1661         HWND hWndScope = msg->hwnd;
1662         /* If no capture HWND, find window which contains the mouse position.
1663          * Also find the position of the cursor hot spot (hittest) */
1664         if (!IsWindow(hWndScope)) hWndScope = 0;
1665         if (!(msg->hwnd = WINPOS_WindowFromPoint( hWndScope, msg->pt, &hittest )))
1666             msg->hwnd = GetDesktopWindow();
1667     }
1668
1669     if (!WIN_IsCurrentThread( msg->hwnd ))
1670     {
1671         accept_hardware_message( hw_id, FALSE, msg->hwnd );
1672         return FALSE;
1673     }
1674
1675     /* FIXME: is this really the right place for this hook? */
1676     event.message = msg->message;
1677     event.time    = msg->time;
1678     event.hwnd    = msg->hwnd;
1679     event.paramL  = msg->pt.x;
1680     event.paramH  = msg->pt.y;
1681     HOOK_CallHooks( WH_JOURNALRECORD, HC_ACTION, 0, (LPARAM)&event, TRUE );
1682
1683     if (!check_hwnd_filter( msg, hwnd_filter )) return FALSE;
1684
1685     pt = msg->pt;
1686     message = msg->message;
1687     /* Note: windows has no concept of a non-client wheel message */
1688     if (message != WM_MOUSEWHEEL)
1689     {
1690         if (hittest != HTCLIENT)
1691         {
1692             message += WM_NCMOUSEMOVE - WM_MOUSEMOVE;
1693             msg->wParam = hittest;
1694         }
1695         else
1696         {
1697             /* coordinates don't get translated while tracking a menu */
1698             /* FIXME: should differentiate popups and top-level menus */
1699             if (!(info.flags & GUI_INMENUMODE))
1700                 ScreenToClient( msg->hwnd, &pt );
1701         }
1702     }
1703     msg->lParam = MAKELONG( pt.x, pt.y );
1704
1705     /* translate double clicks */
1706
1707     if ((msg->message == WM_LBUTTONDOWN) ||
1708         (msg->message == WM_RBUTTONDOWN) ||
1709         (msg->message == WM_MBUTTONDOWN) ||
1710         (msg->message == WM_XBUTTONDOWN))
1711     {
1712         BOOL update = remove;
1713
1714         /* translate double clicks -
1715          * note that ...MOUSEMOVEs can slip in between
1716          * ...BUTTONDOWN and ...BUTTONDBLCLK messages */
1717
1718         if ((info.flags & (GUI_INMENUMODE|GUI_INMOVESIZE)) ||
1719             hittest != HTCLIENT ||
1720             (GetClassLongA( msg->hwnd, GCL_STYLE ) & CS_DBLCLKS))
1721         {
1722            if ((msg->message == clk_msg.message) &&
1723                (msg->hwnd == clk_msg.hwnd) &&
1724                (msg->wParam == clk_msg.wParam) &&
1725                (msg->time - clk_msg.time < GetDoubleClickTime()) &&
1726                (abs(msg->pt.x - clk_msg.pt.x) < GetSystemMetrics(SM_CXDOUBLECLK)/2) &&
1727                (abs(msg->pt.y - clk_msg.pt.y) < GetSystemMetrics(SM_CYDOUBLECLK)/2))
1728            {
1729                message += (WM_LBUTTONDBLCLK - WM_LBUTTONDOWN);
1730                clk_msg.message = 0;  /* clear the double click conditions */
1731                update = FALSE;
1732            }
1733         }
1734         if (message < first || message > last) return FALSE;
1735         /* update static double click conditions */
1736         if (update) clk_msg = *msg;
1737     }
1738     else
1739     {
1740         if (message < first || message > last) return FALSE;
1741     }
1742
1743     /* message is accepted now (but may still get dropped) */
1744
1745     hook.pt           = msg->pt;
1746     hook.hwnd         = msg->hwnd;
1747     hook.wHitTestCode = hittest;
1748     hook.dwExtraInfo  = extra_info;
1749     if (HOOK_CallHooks( WH_MOUSE, remove ? HC_ACTION : HC_NOREMOVE,
1750                         message, (LPARAM)&hook, TRUE ))
1751     {
1752         hook.pt           = msg->pt;
1753         hook.hwnd         = msg->hwnd;
1754         hook.wHitTestCode = hittest;
1755         hook.dwExtraInfo  = extra_info;
1756         HOOK_CallHooks( WH_CBT, HCBT_CLICKSKIPPED, message, (LPARAM)&hook, TRUE );
1757         accept_hardware_message( hw_id, TRUE, 0 );
1758         return FALSE;
1759     }
1760
1761     if ((hittest == HTERROR) || (hittest == HTNOWHERE))
1762     {
1763         SendMessageW( msg->hwnd, WM_SETCURSOR, (WPARAM)msg->hwnd,
1764                       MAKELONG( hittest, msg->message ));
1765         accept_hardware_message( hw_id, TRUE, 0 );
1766         return FALSE;
1767     }
1768
1769     accept_hardware_message( hw_id, remove, 0 );
1770
1771     if (!remove || info.hwndCapture)
1772     {
1773         msg->message = message;
1774         return TRUE;
1775     }
1776
1777     eatMsg = FALSE;
1778
1779     if ((msg->message == WM_LBUTTONDOWN) ||
1780         (msg->message == WM_RBUTTONDOWN) ||
1781         (msg->message == WM_MBUTTONDOWN) ||
1782         (msg->message == WM_XBUTTONDOWN))
1783     {
1784         /* Send the WM_PARENTNOTIFY,
1785          * note that even for double/nonclient clicks
1786          * notification message is still WM_L/M/RBUTTONDOWN.
1787          */
1788         send_parent_notify( msg->hwnd, msg->message, 0, msg->pt );
1789
1790         /* Activate the window if needed */
1791
1792         if (msg->hwnd != info.hwndActive)
1793         {
1794             HWND hwndTop = msg->hwnd;
1795             while (hwndTop)
1796             {
1797                 if ((GetWindowLongW( hwndTop, GWL_STYLE ) & (WS_POPUP|WS_CHILD)) != WS_CHILD) break;
1798                 hwndTop = GetParent( hwndTop );
1799             }
1800
1801             if (hwndTop && hwndTop != GetDesktopWindow())
1802             {
1803                 LONG ret = SendMessageW( msg->hwnd, WM_MOUSEACTIVATE, (WPARAM)hwndTop,
1804                                          MAKELONG( hittest, msg->message ) );
1805                 switch(ret)
1806                 {
1807                 case MA_NOACTIVATEANDEAT:
1808                     eatMsg = TRUE;
1809                     /* fall through */
1810                 case MA_NOACTIVATE:
1811                     break;
1812                 case MA_ACTIVATEANDEAT:
1813                     eatMsg = TRUE;
1814                     /* fall through */
1815                 case MA_ACTIVATE:
1816                 case 0:
1817                     if (!FOCUS_MouseActivate( hwndTop )) eatMsg = TRUE;
1818                     break;
1819                 default:
1820                     WARN( "unknown WM_MOUSEACTIVATE code %ld\n", ret );
1821                     break;
1822                 }
1823             }
1824         }
1825     }
1826
1827     /* send the WM_SETCURSOR message */
1828
1829     /* Windows sends the normal mouse message as the message parameter
1830        in the WM_SETCURSOR message even if it's non-client mouse message */
1831     SendMessageW( msg->hwnd, WM_SETCURSOR, (WPARAM)msg->hwnd, MAKELONG( hittest, msg->message ));
1832
1833     msg->message = message;
1834     return !eatMsg;
1835 }
1836
1837
1838 /***********************************************************************
1839  *           process_hardware_message
1840  *
1841  * Process a hardware message; return TRUE if message should be passed on to the app
1842  */
1843 static BOOL process_hardware_message( MSG *msg, UINT hw_id, ULONG_PTR extra_info, HWND hwnd_filter,
1844                                       UINT first, UINT last, BOOL remove )
1845 {
1846     if (is_keyboard_message( msg->message ))
1847         return process_keyboard_message( msg, hw_id, hwnd_filter, first, last, remove );
1848
1849     if (is_mouse_message( msg->message ))
1850         return process_mouse_message( msg, hw_id, extra_info, hwnd_filter, first, last, remove );
1851
1852     ERR( "unknown message type %x\n", msg->message );
1853     return FALSE;
1854 }
1855
1856
1857 /***********************************************************************
1858  *           call_sendmsg_callback
1859  *
1860  * Call the callback function of SendMessageCallback.
1861  */
1862 static inline void call_sendmsg_callback( SENDASYNCPROC callback, HWND hwnd, UINT msg,
1863                                           ULONG_PTR data, LRESULT result )
1864 {
1865     if (TRACE_ON(relay))
1866         DPRINTF( "%04lx:Call message callback %p (hwnd=%p,msg=%s,data=%08lx,result=%08lx)\n",
1867                  GetCurrentThreadId(), callback, hwnd, SPY_GetMsgName( msg, hwnd ),
1868                  data, result );
1869     callback( hwnd, msg, data, result );
1870     if (TRACE_ON(relay))
1871         DPRINTF( "%04lx:Ret  message callback %p (hwnd=%p,msg=%s,data=%08lx,result=%08lx)\n",
1872                  GetCurrentThreadId(), callback, hwnd, SPY_GetMsgName( msg, hwnd ),
1873                  data, result );
1874 }
1875
1876
1877 /***********************************************************************
1878  *              get_hook_proc
1879  *
1880  * Retrieve the hook procedure real value for a module-relative proc
1881  */
1882 static void *get_hook_proc( void *proc, const WCHAR *module )
1883 {
1884     HMODULE mod;
1885
1886     if (!(mod = GetModuleHandleW(module)))
1887     {
1888         TRACE( "loading %s\n", debugstr_w(module) );
1889         /* FIXME: the library will never be freed */
1890         if (!(mod = LoadLibraryW(module))) return NULL;
1891     }
1892     return (char *)mod + (ULONG_PTR)proc;
1893 }
1894
1895
1896 /***********************************************************************
1897  *           peek_message
1898  *
1899  * Peek for a message matching the given parameters. Return FALSE if none available.
1900  * All pending sent messages are processed before returning.
1901  */
1902 static BOOL peek_message( MSG *msg, HWND hwnd, UINT first, UINT last, int flags )
1903 {
1904     LRESULT result;
1905     ULONG_PTR extra_info = 0;
1906     struct user_thread_info *thread_info = get_user_thread_info();
1907     struct received_message_info info, *old_info;
1908     unsigned int hw_id = 0;  /* id of previous hardware message */
1909
1910     if (!first && !last) last = ~0;
1911
1912     for (;;)
1913     {
1914         NTSTATUS res;
1915         void *buffer = NULL;
1916         size_t size = 0, buffer_size = 0;
1917
1918         do  /* loop while buffer is too small */
1919         {
1920             if (buffer_size && !(buffer = HeapAlloc( GetProcessHeap(), 0, buffer_size )))
1921                 return FALSE;
1922             SERVER_START_REQ( get_message )
1923             {
1924                 req->flags     = flags;
1925                 req->get_win   = hwnd;
1926                 req->get_first = first;
1927                 req->get_last  = last;
1928                 req->hw_id     = hw_id;
1929                 if (buffer_size) wine_server_set_reply( req, buffer, buffer_size );
1930                 if (!(res = wine_server_call( req )))
1931                 {
1932                     size = wine_server_reply_size( reply );
1933                     info.type        = reply->type;
1934                     info.msg.hwnd    = reply->win;
1935                     info.msg.message = reply->msg;
1936                     info.msg.wParam  = reply->wparam;
1937                     info.msg.lParam  = reply->lparam;
1938                     info.msg.time    = reply->time;
1939                     info.msg.pt.x    = reply->x;
1940                     info.msg.pt.y    = reply->y;
1941                     info.hook        = reply->hook;
1942                     info.hook_proc   = reply->hook_proc;
1943                     hw_id            = reply->hw_id;
1944                     extra_info       = reply->info;
1945                 }
1946                 else
1947                 {
1948                     HeapFree( GetProcessHeap(), 0, buffer );
1949                     buffer_size = reply->total;
1950                 }
1951             }
1952             SERVER_END_REQ;
1953         } while (res == STATUS_BUFFER_OVERFLOW);
1954
1955         if (res) return FALSE;
1956
1957         TRACE( "got type %d msg %x (%s) hwnd %p wp %x lp %lx\n",
1958                info.type, info.msg.message,
1959                (info.type == MSG_WINEVENT) ? "MSG_WINEVENT" : SPY_GetMsgName(info.msg.message, info.msg.hwnd),
1960                info.msg.hwnd, info.msg.wParam, info.msg.lParam );
1961
1962         switch(info.type)
1963         {
1964         case MSG_ASCII:
1965         case MSG_UNICODE:
1966             info.flags = ISMEX_SEND;
1967             break;
1968         case MSG_NOTIFY:
1969             info.flags = ISMEX_NOTIFY;
1970             break;
1971         case MSG_CALLBACK:
1972             info.flags = ISMEX_CALLBACK;
1973             break;
1974         case MSG_CALLBACK_RESULT:
1975             call_sendmsg_callback( (SENDASYNCPROC)info.msg.wParam, info.msg.hwnd,
1976                                    info.msg.message, extra_info, info.msg.lParam );
1977             goto next;
1978         case MSG_WINEVENT:
1979             if (size)
1980             {
1981                 WCHAR module[MAX_PATH];
1982                 size = min( size, (MAX_PATH - 1) * sizeof(WCHAR) );
1983                 memcpy( module, buffer, size );
1984                 module[size / sizeof(WCHAR)] = 0;
1985                 if (!(info.hook_proc = get_hook_proc( info.hook_proc, module )))
1986                 {
1987                     ERR( "invalid winevent hook module name %s\n", debugstr_w(module) );
1988                     goto next;
1989                 }
1990             }
1991             if (TRACE_ON(relay))
1992                 DPRINTF( "%04lx:Call winevent proc %p (hook=%p,event=%x,hwnd=%p,object_id=%x,child_id=%lx,tid=%04lx,time=%lx)\n",
1993                          GetCurrentThreadId(), info.hook_proc,
1994                          info.hook, info.msg.message, info.msg.hwnd, info.msg.wParam,
1995                          info.msg.lParam, extra_info, info.msg.time);
1996
1997             info.hook_proc( info.hook, info.msg.message, info.msg.hwnd, info.msg.wParam,
1998                             info.msg.lParam, extra_info, info.msg.time );
1999
2000             if (TRACE_ON(relay))
2001                 DPRINTF( "%04lx:Ret  winevent proc %p (hook=%p,event=%x,hwnd=%p,object_id=%x,child_id=%lx,tid=%04lx,time=%lx)\n",
2002                          GetCurrentThreadId(), info.hook_proc,
2003                          info.hook, info.msg.message, info.msg.hwnd, info.msg.wParam,
2004                          info.msg.lParam, extra_info, info.msg.time);
2005             goto next;
2006         case MSG_OTHER_PROCESS:
2007             info.flags = ISMEX_SEND;
2008             if (!unpack_message( info.msg.hwnd, info.msg.message, &info.msg.wParam,
2009                                  &info.msg.lParam, &buffer, size ))
2010             {
2011                 ERR( "invalid packed message %x (%s) hwnd %p wp %x lp %lx size %d\n",
2012                      info.msg.message, SPY_GetMsgName(info.msg.message, info.msg.hwnd), info.msg.hwnd,
2013                      info.msg.wParam, info.msg.lParam, size );
2014                 /* ignore it */
2015                 reply_message( &info, 0, TRUE );
2016                 goto next;
2017             }
2018             break;
2019         case MSG_HARDWARE:
2020             if (!process_hardware_message( &info.msg, hw_id, extra_info,
2021                                            hwnd, first, last, flags & GET_MSG_REMOVE ))
2022             {
2023                 TRACE("dropping msg %x\n", info.msg.message );
2024                 goto next;  /* ignore it */
2025             }
2026             thread_info->GetMessagePosVal = MAKELONG( info.msg.pt.x, info.msg.pt.y );
2027             /* fall through */
2028         case MSG_POSTED:
2029             thread_info->GetMessageExtraInfoVal = extra_info;
2030             if (info.msg.message >= WM_DDE_FIRST && info.msg.message <= WM_DDE_LAST)
2031             {
2032                 if (!unpack_dde_message( info.msg.hwnd, info.msg.message, &info.msg.wParam,
2033                                          &info.msg.lParam, &buffer, size ))
2034                 {
2035                     ERR( "invalid packed dde-message %x (%s) hwnd %p wp %x lp %lx size %d\n",
2036                          info.msg.message, SPY_GetMsgName(info.msg.message, info.msg.hwnd),
2037                          info.msg.hwnd, info.msg.wParam, info.msg.lParam, size );
2038                     goto next;  /* ignore it */
2039                 }
2040             }
2041             *msg = info.msg;
2042             HeapFree( GetProcessHeap(), 0, buffer );
2043             return TRUE;
2044         }
2045
2046         /* if we get here, we have a sent message; call the window procedure */
2047         old_info = thread_info->receive_info;
2048         thread_info->receive_info = &info;
2049         result = call_window_proc( info.msg.hwnd, info.msg.message, info.msg.wParam,
2050                                    info.msg.lParam, (info.type != MSG_ASCII), FALSE );
2051         reply_message( &info, result, TRUE );
2052         thread_info->receive_info = old_info;
2053     next:
2054         HeapFree( GetProcessHeap(), 0, buffer );
2055     }
2056 }
2057
2058
2059 /***********************************************************************
2060  *           process_sent_messages
2061  *
2062  * Process all pending sent messages.
2063  */
2064 inline static void process_sent_messages(void)
2065 {
2066     MSG msg;
2067     peek_message( &msg, 0, 0, 0, GET_MSG_REMOVE | GET_MSG_SENT_ONLY );
2068 }
2069
2070
2071 /***********************************************************************
2072  *           get_server_queue_handle
2073  *
2074  * Get a handle to the server message queue for the current thread.
2075  */
2076 static HANDLE get_server_queue_handle(void)
2077 {
2078     struct user_thread_info *thread_info = get_user_thread_info();
2079     HANDLE ret;
2080
2081     if (!(ret = thread_info->server_queue))
2082     {
2083         SERVER_START_REQ( get_msg_queue )
2084         {
2085             wine_server_call( req );
2086             ret = reply->handle;
2087         }
2088         SERVER_END_REQ;
2089         thread_info->server_queue = ret;
2090         if (!ret) ERR( "Cannot get server thread queue\n" );
2091     }
2092     return ret;
2093 }
2094
2095
2096 /***********************************************************************
2097  *           wait_message_reply
2098  *
2099  * Wait until a sent message gets replied to.
2100  */
2101 static void wait_message_reply( UINT flags )
2102 {
2103     HANDLE server_queue = get_server_queue_handle();
2104
2105     for (;;)
2106     {
2107         unsigned int wake_bits = 0, changed_bits = 0;
2108         DWORD dwlc, res;
2109
2110         SERVER_START_REQ( set_queue_mask )
2111         {
2112             req->wake_mask    = QS_SMRESULT | ((flags & SMTO_BLOCK) ? 0 : QS_SENDMESSAGE);
2113             req->changed_mask = req->wake_mask;
2114             req->skip_wait    = 1;
2115             if (!wine_server_call( req ))
2116             {
2117                 wake_bits    = reply->wake_bits;
2118                 changed_bits = reply->changed_bits;
2119             }
2120         }
2121         SERVER_END_REQ;
2122
2123         if (wake_bits & QS_SMRESULT) return;  /* got a result */
2124         if (wake_bits & QS_SENDMESSAGE)
2125         {
2126             /* Process the sent message immediately */
2127             process_sent_messages();
2128             continue;
2129         }
2130
2131         /* now wait for it */
2132
2133         ReleaseThunkLock( &dwlc );
2134
2135         if (USER_Driver.pMsgWaitForMultipleObjectsEx)
2136             res = USER_Driver.pMsgWaitForMultipleObjectsEx( 1, &server_queue,
2137                                                             INFINITE, QS_ALLINPUT, 0 );
2138         else
2139             res = WaitForSingleObject( server_queue, INFINITE );
2140
2141         if (dwlc) RestoreThunkLock( dwlc );
2142     }
2143 }
2144
2145 /***********************************************************************
2146  *              put_message_in_queue
2147  *
2148  * Put a sent message into the destination queue.
2149  * For inter-process message, reply_size is set to expected size of reply data.
2150  */
2151 static BOOL put_message_in_queue( DWORD dest_tid, const struct send_message_info *info,
2152                                   size_t *reply_size )
2153 {
2154     struct packed_message data;
2155     unsigned int res;
2156     int i, timeout = -1;
2157
2158     if (info->type != MSG_NOTIFY &&
2159         info->type != MSG_CALLBACK &&
2160         info->type != MSG_POSTED &&
2161         info->timeout != INFINITE)
2162         timeout = info->timeout;
2163
2164     data.count = 0;
2165     if (info->type == MSG_OTHER_PROCESS)
2166     {
2167         *reply_size = pack_message( info->hwnd, info->msg, info->wparam, info->lparam, &data );
2168         if (data.count == -1)
2169         {
2170             WARN( "cannot pack message %x\n", info->msg );
2171             return FALSE;
2172         }
2173     }
2174     else if (info->type == MSG_POSTED && info->msg >= WM_DDE_FIRST && info->msg <= WM_DDE_LAST)
2175     {
2176         return post_dde_message( dest_tid, &data, info );
2177     }
2178
2179     SERVER_START_REQ( send_message )
2180     {
2181         req->id      = dest_tid;
2182         req->type    = info->type;
2183         req->flags   = 0;
2184         req->win     = info->hwnd;
2185         req->msg     = info->msg;
2186         req->wparam  = info->wparam;
2187         req->lparam  = info->lparam;
2188         req->time    = GetCurrentTime();
2189         req->timeout = timeout;
2190
2191         if (info->type == MSG_CALLBACK)
2192         {
2193             req->callback = info->callback;
2194             req->info     = info->data;
2195         }
2196
2197         if (info->flags & SMTO_ABORTIFHUNG) req->flags |= SEND_MSG_ABORT_IF_HUNG;
2198         for (i = 0; i < data.count; i++) wine_server_add_data( req, data.data[i], data.size[i] );
2199         if ((res = wine_server_call( req )))
2200         {
2201             if (res == STATUS_INVALID_PARAMETER)
2202                 /* FIXME: find a STATUS_ value for this one */
2203                 SetLastError( ERROR_INVALID_THREAD_ID );
2204             else
2205                 SetLastError( RtlNtStatusToDosError(res) );
2206         }
2207     }
2208     SERVER_END_REQ;
2209     return !res;
2210 }
2211
2212
2213 /***********************************************************************
2214  *              retrieve_reply
2215  *
2216  * Retrieve a message reply from the server.
2217  */
2218 static LRESULT retrieve_reply( const struct send_message_info *info,
2219                                size_t reply_size, LRESULT *result )
2220 {
2221     NTSTATUS status;
2222     void *reply_data = NULL;
2223
2224     if (reply_size)
2225     {
2226         if (!(reply_data = HeapAlloc( GetProcessHeap(), 0, reply_size )))
2227         {
2228             WARN( "no memory for reply %d bytes, will be truncated\n", reply_size );
2229             reply_size = 0;
2230         }
2231     }
2232     SERVER_START_REQ( get_message_reply )
2233     {
2234         req->cancel = 1;
2235         if (reply_size) wine_server_set_reply( req, reply_data, reply_size );
2236         if (!(status = wine_server_call( req ))) *result = reply->result;
2237         reply_size = wine_server_reply_size( reply );
2238     }
2239     SERVER_END_REQ;
2240     if (!status && reply_size)
2241         unpack_reply( info->hwnd, info->msg, info->wparam, info->lparam, reply_data, reply_size );
2242
2243     HeapFree( GetProcessHeap(), 0, reply_data );
2244
2245     TRACE( "hwnd %p msg %x (%s) wp %x lp %lx got reply %lx (err=%ld)\n",
2246            info->hwnd, info->msg, SPY_GetMsgName(info->msg, info->hwnd), info->wparam,
2247            info->lparam, *result, status );
2248
2249     /* MSDN states that last error is 0 on timeout, but at least NT4 returns ERROR_TIMEOUT */
2250     if (status) SetLastError( RtlNtStatusToDosError(status) );
2251     return !status;
2252 }
2253
2254
2255 /***********************************************************************
2256  *              send_inter_thread_message
2257  */
2258 static LRESULT send_inter_thread_message( DWORD dest_tid, const struct send_message_info *info,
2259                                           LRESULT *res_ptr )
2260 {
2261     size_t reply_size = 0;
2262
2263     TRACE( "hwnd %p msg %x (%s) wp %x lp %lx\n",
2264            info->hwnd, info->msg, SPY_GetMsgName(info->msg, info->hwnd), info->wparam, info->lparam );
2265
2266     USER_CheckNotLock();
2267
2268     if (!put_message_in_queue( dest_tid, info, &reply_size )) return 0;
2269
2270     /* there's no reply to wait for on notify/callback messages */
2271     if (info->type == MSG_NOTIFY || info->type == MSG_CALLBACK) return 1;
2272
2273     wait_message_reply( info->flags );
2274     return retrieve_reply( info, reply_size, res_ptr );
2275 }
2276
2277
2278 /***********************************************************************
2279  *              MSG_SendInternalMessageTimeout
2280  *
2281  * Same as SendMessageTimeoutW but sends the message to a specific thread
2282  * without requiring a window handle. Only works for internal Wine messages.
2283  */
2284 LRESULT MSG_SendInternalMessageTimeout( DWORD dest_pid, DWORD dest_tid,
2285                                         UINT msg, WPARAM wparam, LPARAM lparam,
2286                                         UINT flags, UINT timeout, PDWORD_PTR res_ptr )
2287 {
2288     struct send_message_info info;
2289     LRESULT ret, result;
2290
2291     assert( msg & 0x80000000 );  /* must be an internal Wine message */
2292
2293     info.type    = MSG_UNICODE;
2294     info.hwnd    = 0;
2295     info.msg     = msg;
2296     info.wparam  = wparam;
2297     info.lparam  = lparam;
2298     info.flags   = flags;
2299     info.timeout = timeout;
2300
2301     if (USER_IsExitingThread( dest_tid )) return 0;
2302
2303     if (dest_tid == GetCurrentThreadId())
2304     {
2305         result = handle_internal_message( 0, msg, wparam, lparam );
2306         ret = 1;
2307     }
2308     else
2309     {
2310         if (dest_pid != GetCurrentProcessId()) info.type = MSG_OTHER_PROCESS;
2311         ret = send_inter_thread_message( dest_tid, &info, &result );
2312     }
2313     if (ret && res_ptr) *res_ptr = result;
2314     return ret;
2315 }
2316
2317
2318 /***********************************************************************
2319  *              SendMessageTimeoutW  (USER32.@)
2320  */
2321 LRESULT WINAPI SendMessageTimeoutW( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam,
2322                                     UINT flags, UINT timeout, PDWORD_PTR res_ptr )
2323 {
2324     struct send_message_info info;
2325     DWORD dest_tid, dest_pid;
2326     LRESULT ret, result;
2327
2328     info.type    = MSG_UNICODE;
2329     info.hwnd    = hwnd;
2330     info.msg     = msg;
2331     info.wparam  = wparam;
2332     info.lparam  = lparam;
2333     info.flags   = flags;
2334     info.timeout = timeout;
2335
2336     if (is_broadcast(hwnd))
2337     {
2338         EnumWindows( broadcast_message_callback, (LPARAM)&info );
2339         if (res_ptr) *res_ptr = 1;
2340         return 1;
2341     }
2342
2343     if (!(dest_tid = GetWindowThreadProcessId( hwnd, &dest_pid ))) return 0;
2344
2345     if (USER_IsExitingThread( dest_tid )) return 0;
2346
2347     SPY_EnterMessage( SPY_SENDMESSAGE, hwnd, msg, wparam, lparam );
2348
2349     if (dest_tid == GetCurrentThreadId())
2350     {
2351         result = call_window_proc( hwnd, msg, wparam, lparam, TRUE, TRUE );
2352         ret = 1;
2353     }
2354     else
2355     {
2356         if (dest_pid != GetCurrentProcessId()) info.type = MSG_OTHER_PROCESS;
2357         ret = send_inter_thread_message( dest_tid, &info, &result );
2358     }
2359
2360     SPY_ExitMessage( SPY_RESULT_OK, hwnd, msg, result, wparam, lparam );
2361     if (ret && res_ptr) *res_ptr = result;
2362     return ret;
2363 }
2364
2365
2366 /***********************************************************************
2367  *              SendMessageTimeoutA  (USER32.@)
2368  */
2369 LRESULT WINAPI SendMessageTimeoutA( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam,
2370                                     UINT flags, UINT timeout, PDWORD_PTR res_ptr )
2371 {
2372     struct send_message_info info;
2373     DWORD dest_tid, dest_pid;
2374     LRESULT ret, result;
2375
2376     info.type    = MSG_ASCII;
2377     info.hwnd    = hwnd;
2378     info.msg     = msg;
2379     info.wparam  = wparam;
2380     info.lparam  = lparam;
2381     info.flags   = flags;
2382     info.timeout = timeout;
2383
2384     if (is_broadcast(hwnd))
2385     {
2386         EnumWindows( broadcast_message_callback, (LPARAM)&info );
2387         if (res_ptr) *res_ptr = 1;
2388         return 1;
2389     }
2390
2391     if (!(dest_tid = GetWindowThreadProcessId( hwnd, &dest_pid ))) return 0;
2392
2393     if (USER_IsExitingThread( dest_tid )) return 0;
2394
2395     SPY_EnterMessage( SPY_SENDMESSAGE, hwnd, msg, wparam, lparam );
2396
2397     if (dest_tid == GetCurrentThreadId())
2398     {
2399         result = call_window_proc( hwnd, msg, wparam, lparam, FALSE, TRUE );
2400         ret = 1;
2401     }
2402     else if (dest_pid == GetCurrentProcessId())
2403     {
2404         ret = send_inter_thread_message( dest_tid, &info, &result );
2405     }
2406     else
2407     {
2408         /* inter-process message: need to map to Unicode */
2409         info.type = MSG_OTHER_PROCESS;
2410         if (is_unicode_message( info.msg ))
2411         {
2412             if (WINPROC_MapMsg32ATo32W( info.hwnd, info.msg, &info.wparam, &info.lparam ) == -1)
2413                 return 0;
2414             ret = send_inter_thread_message( dest_tid, &info, &result );
2415             result = WINPROC_UnmapMsg32ATo32W( info.hwnd, info.msg, info.wparam,
2416                                                info.lparam, result );
2417         }
2418         else ret = send_inter_thread_message( dest_tid, &info, &result );
2419     }
2420     SPY_ExitMessage( SPY_RESULT_OK, hwnd, msg, result, wparam, lparam );
2421     if (ret && res_ptr) *res_ptr = result;
2422     return ret;
2423 }
2424
2425
2426 /***********************************************************************
2427  *              SendMessageW  (USER32.@)
2428  */
2429 LRESULT WINAPI SendMessageW( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam )
2430 {
2431     LRESULT res = 0;
2432     SendMessageTimeoutW( hwnd, msg, wparam, lparam, SMTO_NORMAL, INFINITE, &res );
2433     return res;
2434 }
2435
2436
2437 /***********************************************************************
2438  *              SendMessageA  (USER32.@)
2439  */
2440 LRESULT WINAPI SendMessageA( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam )
2441 {
2442     LRESULT res = 0;
2443     SendMessageTimeoutA( hwnd, msg, wparam, lparam, SMTO_NORMAL, INFINITE, &res );
2444     return res;
2445 }
2446
2447
2448 /***********************************************************************
2449  *              SendNotifyMessageA  (USER32.@)
2450  */
2451 BOOL WINAPI SendNotifyMessageA( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam )
2452 {
2453     return SendNotifyMessageW( hwnd, msg, map_wparam_AtoW( msg, wparam ), lparam );
2454 }
2455
2456
2457 /***********************************************************************
2458  *              SendNotifyMessageW  (USER32.@)
2459  */
2460 BOOL WINAPI SendNotifyMessageW( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam )
2461 {
2462     struct send_message_info info;
2463     DWORD dest_tid;
2464     LRESULT result;
2465
2466     if (is_pointer_message(msg))
2467     {
2468         SetLastError( ERROR_MESSAGE_SYNC_ONLY );
2469         return FALSE;
2470     }
2471
2472     info.type    = MSG_NOTIFY;
2473     info.hwnd    = hwnd;
2474     info.msg     = msg;
2475     info.wparam  = wparam;
2476     info.lparam  = lparam;
2477     info.flags   = 0;
2478
2479     if (is_broadcast(hwnd))
2480     {
2481         EnumWindows( broadcast_message_callback, (LPARAM)&info );
2482         return TRUE;
2483     }
2484
2485     if (!(dest_tid = GetWindowThreadProcessId( hwnd, NULL ))) return FALSE;
2486
2487     if (USER_IsExitingThread( dest_tid )) return TRUE;
2488
2489     if (dest_tid == GetCurrentThreadId())
2490     {
2491         call_window_proc( hwnd, msg, wparam, lparam, TRUE, TRUE );
2492         return TRUE;
2493     }
2494     return send_inter_thread_message( dest_tid, &info, &result );
2495 }
2496
2497
2498 /***********************************************************************
2499  *              SendMessageCallbackA  (USER32.@)
2500  */
2501 BOOL WINAPI SendMessageCallbackA( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam,
2502                                   SENDASYNCPROC callback, ULONG_PTR data )
2503 {
2504     return SendMessageCallbackW( hwnd, msg, map_wparam_AtoW( msg, wparam ),
2505                                  lparam, callback, data );
2506 }
2507
2508
2509 /***********************************************************************
2510  *              SendMessageCallbackW  (USER32.@)
2511  */
2512 BOOL WINAPI SendMessageCallbackW( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam,
2513                                   SENDASYNCPROC callback, ULONG_PTR data )
2514 {
2515     struct send_message_info info;
2516     LRESULT result;
2517     DWORD dest_tid;
2518
2519     if (is_pointer_message(msg))
2520     {
2521         SetLastError( ERROR_MESSAGE_SYNC_ONLY );
2522         return FALSE;
2523     }
2524
2525     info.type     = MSG_CALLBACK;
2526     info.hwnd     = hwnd;
2527     info.msg      = msg;
2528     info.wparam   = wparam;
2529     info.lparam   = lparam;
2530     info.callback = callback;
2531     info.data     = data;
2532     info.flags    = 0;
2533
2534     if (is_broadcast(hwnd))
2535     {
2536         EnumWindows( broadcast_message_callback, (LPARAM)&info );
2537         return TRUE;
2538     }
2539
2540     if (!(dest_tid = GetWindowThreadProcessId( hwnd, NULL ))) return FALSE;
2541
2542     if (USER_IsExitingThread( dest_tid )) return TRUE;
2543
2544     if (dest_tid == GetCurrentThreadId())
2545     {
2546         result = call_window_proc( hwnd, msg, wparam, lparam, TRUE, TRUE );
2547         call_sendmsg_callback( callback, hwnd, msg, data, result );
2548         return TRUE;
2549     }
2550     FIXME( "callback will not be called\n" );
2551     return send_inter_thread_message( dest_tid, &info, &result );
2552 }
2553
2554
2555 /***********************************************************************
2556  *              ReplyMessage  (USER32.@)
2557  */
2558 BOOL WINAPI ReplyMessage( LRESULT result )
2559 {
2560     struct received_message_info *info = get_user_thread_info()->receive_info;
2561
2562     if (!info) return FALSE;
2563     reply_message( info, result, FALSE );
2564     return TRUE;
2565 }
2566
2567
2568 /***********************************************************************
2569  *              InSendMessage  (USER32.@)
2570  */
2571 BOOL WINAPI InSendMessage(void)
2572 {
2573     return (InSendMessageEx(NULL) & (ISMEX_SEND|ISMEX_REPLIED)) == ISMEX_SEND;
2574 }
2575
2576
2577 /***********************************************************************
2578  *              InSendMessageEx  (USER32.@)
2579  */
2580 DWORD WINAPI InSendMessageEx( LPVOID reserved )
2581 {
2582     struct received_message_info *info = get_user_thread_info()->receive_info;
2583
2584     if (info) return info->flags;
2585     return ISMEX_NOSEND;
2586 }
2587
2588
2589 /***********************************************************************
2590  *              PostMessageA  (USER32.@)
2591  */
2592 BOOL WINAPI PostMessageA( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam )
2593 {
2594     return PostMessageW( hwnd, msg, map_wparam_AtoW( msg, wparam ), lparam );
2595 }
2596
2597
2598 /***********************************************************************
2599  *              PostMessageW  (USER32.@)
2600  */
2601 BOOL WINAPI PostMessageW( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam )
2602 {
2603     struct send_message_info info;
2604     DWORD dest_tid;
2605
2606     if (is_pointer_message( msg ))
2607     {
2608         SetLastError( ERROR_MESSAGE_SYNC_ONLY );
2609         return FALSE;
2610     }
2611
2612     TRACE( "hwnd %p msg %x (%s) wp %x lp %lx\n",
2613            hwnd, msg, SPY_GetMsgName(msg, hwnd), wparam, lparam );
2614
2615     info.type   = MSG_POSTED;
2616     info.hwnd   = hwnd;
2617     info.msg    = msg;
2618     info.wparam = wparam;
2619     info.lparam = lparam;
2620     info.flags  = 0;
2621
2622     if (is_broadcast(hwnd))
2623     {
2624         EnumWindows( broadcast_message_callback, (LPARAM)&info );
2625         return TRUE;
2626     }
2627
2628     if (!hwnd) return PostThreadMessageW( GetCurrentThreadId(), msg, wparam, lparam );
2629
2630     if (!(dest_tid = GetWindowThreadProcessId( hwnd, NULL ))) return FALSE;
2631
2632     if (USER_IsExitingThread( dest_tid )) return TRUE;
2633
2634     return put_message_in_queue( dest_tid, &info, NULL );
2635 }
2636
2637
2638 /**********************************************************************
2639  *              PostThreadMessageA  (USER32.@)
2640  */
2641 BOOL WINAPI PostThreadMessageA( DWORD thread, UINT msg, WPARAM wparam, LPARAM lparam )
2642 {
2643     return PostThreadMessageW( thread, msg, map_wparam_AtoW( msg, wparam ), lparam );
2644 }
2645
2646
2647 /**********************************************************************
2648  *              PostThreadMessageW  (USER32.@)
2649  */
2650 BOOL WINAPI PostThreadMessageW( DWORD thread, UINT msg, WPARAM wparam, LPARAM lparam )
2651 {
2652     struct send_message_info info;
2653
2654     if (is_pointer_message( msg ))
2655     {
2656         SetLastError( ERROR_MESSAGE_SYNC_ONLY );
2657         return FALSE;
2658     }
2659     if (USER_IsExitingThread( thread )) return TRUE;
2660
2661     info.type   = MSG_POSTED;
2662     info.hwnd   = 0;
2663     info.msg    = msg;
2664     info.wparam = wparam;
2665     info.lparam = lparam;
2666     info.flags  = 0;
2667     return put_message_in_queue( thread, &info, NULL );
2668 }
2669
2670
2671 /***********************************************************************
2672  *              PostQuitMessage  (USER32.@)
2673  */
2674 void WINAPI PostQuitMessage( INT exitCode )
2675 {
2676     PostThreadMessageW( GetCurrentThreadId(), WM_QUIT, exitCode, 0 );
2677 }
2678
2679
2680 /***********************************************************************
2681  *              PeekMessageW  (USER32.@)
2682  */
2683 BOOL WINAPI PeekMessageW( MSG *msg_out, HWND hwnd, UINT first, UINT last, UINT flags )
2684 {
2685     struct user_thread_info *thread_info = get_user_thread_info();
2686     MSG msg;
2687
2688     USER_CheckNotLock();
2689
2690     /* check for graphics events */
2691     if (USER_Driver.pMsgWaitForMultipleObjectsEx)
2692         USER_Driver.pMsgWaitForMultipleObjectsEx( 0, NULL, 0, QS_ALLINPUT, 0 );
2693
2694     hwnd = WIN_GetFullHandle( hwnd );
2695
2696     for (;;)
2697     {
2698         if (!peek_message( &msg, hwnd, first, last, (flags & PM_REMOVE) ? GET_MSG_REMOVE : 0 ))
2699         {
2700             if (!(flags & PM_NOYIELD))
2701             {
2702                 DWORD count;
2703                 ReleaseThunkLock(&count);
2704                 NtYieldExecution();
2705                 if (count) RestoreThunkLock(count);
2706             }
2707             return FALSE;
2708         }
2709         if (msg.message & 0x80000000)
2710         {
2711             handle_internal_message( msg.hwnd, msg.message, msg.wParam, msg.lParam );
2712             if (!(flags & PM_REMOVE))  /* have to remove it explicitly */
2713                 peek_message( &msg, msg.hwnd, msg.message, msg.message, GET_MSG_REMOVE );
2714         }
2715         else break;
2716     }
2717
2718     thread_info->GetMessageTimeVal = msg.time;
2719     msg.pt.x = LOWORD( thread_info->GetMessagePosVal );
2720     msg.pt.y = HIWORD( thread_info->GetMessagePosVal );
2721
2722     HOOK_CallHooks( WH_GETMESSAGE, HC_ACTION, flags & PM_REMOVE, (LPARAM)&msg, TRUE );
2723
2724     /* copy back our internal safe copy of message data to msg_out.
2725      * msg_out is a variable from the *program*, so it can't be used
2726      * internally as it can get "corrupted" by our use of SendMessage()
2727      * (back to the program) inside the message handling itself. */
2728     if (!msg_out)
2729     {
2730         SetLastError( ERROR_NOACCESS );
2731         return FALSE;
2732     }
2733     *msg_out = msg;
2734     return TRUE;
2735 }
2736
2737
2738 /***********************************************************************
2739  *              PeekMessageA  (USER32.@)
2740  */
2741 BOOL WINAPI PeekMessageA( MSG *msg, HWND hwnd, UINT first, UINT last, UINT flags )
2742 {
2743     BOOL ret = PeekMessageW( msg, hwnd, first, last, flags );
2744     if (ret) msg->wParam = map_wparam_WtoA( msg->message, msg->wParam );
2745     return ret;
2746 }
2747
2748
2749 /***********************************************************************
2750  *              GetMessageW  (USER32.@)
2751  */
2752 BOOL WINAPI GetMessageW( MSG *msg, HWND hwnd, UINT first, UINT last )
2753 {
2754     HANDLE server_queue = get_server_queue_handle();
2755     int mask = QS_POSTMESSAGE | QS_SENDMESSAGE;  /* Always selected */
2756
2757     if (first || last)
2758     {
2759         if ((first <= WM_KEYLAST) && (last >= WM_KEYFIRST)) mask |= QS_KEY;
2760         if ( ((first <= WM_MOUSELAST) && (last >= WM_MOUSEFIRST)) ||
2761              ((first <= WM_NCMOUSELAST) && (last >= WM_NCMOUSEFIRST)) ) mask |= QS_MOUSE;
2762         if ((first <= WM_TIMER) && (last >= WM_TIMER)) mask |= QS_TIMER;
2763         if ((first <= WM_SYSTIMER) && (last >= WM_SYSTIMER)) mask |= QS_TIMER;
2764         if ((first <= WM_PAINT) && (last >= WM_PAINT)) mask |= QS_PAINT;
2765     }
2766     else mask |= QS_MOUSE | QS_KEY | QS_TIMER | QS_PAINT;
2767
2768     while (!PeekMessageW( msg, hwnd, first, last, PM_REMOVE ))
2769     {
2770         /* wait until one of the bits is set */
2771         unsigned int wake_bits = 0, changed_bits = 0;
2772         DWORD dwlc;
2773
2774         SERVER_START_REQ( set_queue_mask )
2775         {
2776             req->wake_mask    = QS_SENDMESSAGE;
2777             req->changed_mask = mask;
2778             req->skip_wait    = 1;
2779             if (!wine_server_call( req ))
2780             {
2781                 wake_bits    = reply->wake_bits;
2782                 changed_bits = reply->changed_bits;
2783             }
2784         }
2785         SERVER_END_REQ;
2786
2787         if (changed_bits & mask) continue;
2788         if (wake_bits & QS_SENDMESSAGE) continue;
2789
2790         TRACE( "(%04lx) mask=%08x, bits=%08x, changed=%08x, waiting\n",
2791                GetCurrentThreadId(), mask, wake_bits, changed_bits );
2792
2793         ReleaseThunkLock( &dwlc );
2794         if (USER_Driver.pMsgWaitForMultipleObjectsEx)
2795             USER_Driver.pMsgWaitForMultipleObjectsEx( 1, &server_queue, INFINITE,
2796                                                       QS_ALLINPUT, 0 );
2797         else
2798             WaitForSingleObject( server_queue, INFINITE );
2799         if (dwlc) RestoreThunkLock( dwlc );
2800     }
2801
2802     return (msg->message != WM_QUIT);
2803 }
2804
2805
2806 /***********************************************************************
2807  *              GetMessageA  (USER32.@)
2808  */
2809 BOOL WINAPI GetMessageA( MSG *msg, HWND hwnd, UINT first, UINT last )
2810 {
2811     GetMessageW( msg, hwnd, first, last );
2812     msg->wParam = map_wparam_WtoA( msg->message, msg->wParam );
2813     return (msg->message != WM_QUIT);
2814 }
2815
2816
2817 /***********************************************************************
2818  *              IsDialogMessage  (USER32.@)
2819  *              IsDialogMessageA (USER32.@)
2820  */
2821 BOOL WINAPI IsDialogMessageA( HWND hwndDlg, LPMSG pmsg )
2822 {
2823     MSG msg = *pmsg;
2824     msg.wParam = map_wparam_AtoW( msg.message, msg.wParam );
2825     return IsDialogMessageW( hwndDlg, &msg );
2826 }
2827
2828
2829 /***********************************************************************
2830  *              TranslateMessage (USER32.@)
2831  *
2832  * Implementation of TranslateMessage.
2833  *
2834  * TranslateMessage translates virtual-key messages into character-messages,
2835  * as follows :
2836  * WM_KEYDOWN/WM_KEYUP combinations produce a WM_CHAR or WM_DEADCHAR message.
2837  * ditto replacing WM_* with WM_SYS*
2838  * This produces WM_CHAR messages only for keys mapped to ASCII characters
2839  * by the keyboard driver.
2840  *
2841  * If the message is WM_KEYDOWN, WM_KEYUP, WM_SYSKEYDOWN, or WM_SYSKEYUP, the
2842  * return value is nonzero, regardless of the translation.
2843  *
2844  */
2845 BOOL WINAPI TranslateMessage( const MSG *msg )
2846 {
2847     UINT message;
2848     WCHAR wp[2];
2849     BYTE state[256];
2850
2851     if (msg->message < WM_KEYFIRST || msg->message > WM_KEYLAST) return FALSE;
2852     if (msg->message != WM_KEYDOWN && msg->message != WM_SYSKEYDOWN) return TRUE;
2853
2854     TRACE_(key)("Translating key %s (%04x), scancode %02x\n",
2855                  SPY_GetVKeyName(msg->wParam), msg->wParam, LOBYTE(HIWORD(msg->lParam)));
2856
2857     GetKeyboardState( state );
2858     /* FIXME : should handle ToUnicode yielding 2 */
2859     switch (ToUnicode(msg->wParam, HIWORD(msg->lParam), state, wp, 2, 0))
2860     {
2861     case 1:
2862         message = (msg->message == WM_KEYDOWN) ? WM_CHAR : WM_SYSCHAR;
2863         TRACE_(key)("1 -> PostMessageW(%p,%s,%04x,%08lx)\n",
2864             msg->hwnd, SPY_GetMsgName(message, msg->hwnd), wp[0], msg->lParam);
2865         PostMessageW( msg->hwnd, message, wp[0], msg->lParam );
2866         break;
2867
2868     case -1:
2869         message = (msg->message == WM_KEYDOWN) ? WM_DEADCHAR : WM_SYSDEADCHAR;
2870         TRACE_(key)("-1 -> PostMessageW(%p,%s,%04x,%08lx)\n",
2871             msg->hwnd, SPY_GetMsgName(message, msg->hwnd), wp[0], msg->lParam);
2872         PostMessageW( msg->hwnd, message, wp[0], msg->lParam );
2873         break;
2874     }
2875     return TRUE;
2876 }
2877
2878
2879 /***********************************************************************
2880  *              DispatchMessageA (USER32.@)
2881  */
2882 LONG WINAPI DispatchMessageA( const MSG* msg )
2883 {
2884     WND * wndPtr;
2885     LONG retval;
2886     WNDPROC winproc;
2887
2888       /* Process timer messages */
2889     if ((msg->message == WM_TIMER) || (msg->message == WM_SYSTIMER))
2890     {
2891         if (msg->lParam) return CallWindowProcA( (WNDPROC)msg->lParam, msg->hwnd,
2892                                                  msg->message, msg->wParam, GetTickCount() );
2893     }
2894
2895     if (!(wndPtr = WIN_GetPtr( msg->hwnd )))
2896     {
2897         if (msg->hwnd) SetLastError( ERROR_INVALID_WINDOW_HANDLE );
2898         return 0;
2899     }
2900     if (wndPtr == WND_OTHER_PROCESS || wndPtr == WND_DESKTOP)
2901     {
2902         if (IsWindow( msg->hwnd )) SetLastError( ERROR_MESSAGE_SYNC_ONLY );
2903         else SetLastError( ERROR_INVALID_WINDOW_HANDLE );
2904         return 0;
2905     }
2906     if (wndPtr->tid != GetCurrentThreadId())
2907     {
2908         SetLastError( ERROR_MESSAGE_SYNC_ONLY );
2909         WIN_ReleasePtr( wndPtr );
2910         return 0;
2911     }
2912     winproc = wndPtr->winproc;
2913     WIN_ReleasePtr( wndPtr );
2914
2915     SPY_EnterMessage( SPY_DISPATCHMESSAGE, msg->hwnd, msg->message,
2916                       msg->wParam, msg->lParam );
2917     retval = CallWindowProcA( winproc, msg->hwnd, msg->message,
2918                               msg->wParam, msg->lParam );
2919     SPY_ExitMessage( SPY_RESULT_OK, msg->hwnd, msg->message, retval,
2920                      msg->wParam, msg->lParam );
2921
2922     if (msg->message == WM_PAINT)
2923     {
2924         /* send a WM_NCPAINT and WM_ERASEBKGND if the non-client area is still invalid */
2925         HRGN hrgn = CreateRectRgn( 0, 0, 0, 0 );
2926         GetUpdateRgn( msg->hwnd, hrgn, TRUE );
2927         DeleteObject( hrgn );
2928     }
2929     return retval;
2930 }
2931
2932
2933 /***********************************************************************
2934  *              DispatchMessageW (USER32.@) Process a message
2935  *
2936  * Process the message specified in the structure *_msg_.
2937  *
2938  * If the lpMsg parameter points to a WM_TIMER message and the
2939  * parameter of the WM_TIMER message is not NULL, the lParam parameter
2940  * points to the function that is called instead of the window
2941  * procedure.
2942  *
2943  * The message must be valid.
2944  *
2945  * RETURNS
2946  *
2947  *   DispatchMessage() returns the result of the window procedure invoked.
2948  *
2949  * CONFORMANCE
2950  *
2951  *   ECMA-234, Win32
2952  *
2953  */
2954 LONG WINAPI DispatchMessageW( const MSG* msg )
2955 {
2956     WND * wndPtr;
2957     LONG retval;
2958     WNDPROC winproc;
2959
2960       /* Process timer messages */
2961     if ((msg->message == WM_TIMER) || (msg->message == WM_SYSTIMER))
2962     {
2963         if (msg->lParam) return CallWindowProcW( (WNDPROC)msg->lParam, msg->hwnd,
2964                                                  msg->message, msg->wParam, GetTickCount() );
2965     }
2966
2967     if (!(wndPtr = WIN_GetPtr( msg->hwnd )))
2968     {
2969         if (msg->hwnd) SetLastError( ERROR_INVALID_WINDOW_HANDLE );
2970         return 0;
2971     }
2972     if (wndPtr == WND_OTHER_PROCESS || wndPtr == WND_DESKTOP)
2973     {
2974         if (IsWindow( msg->hwnd )) SetLastError( ERROR_MESSAGE_SYNC_ONLY );
2975         else SetLastError( ERROR_INVALID_WINDOW_HANDLE );
2976         return 0;
2977     }
2978     if (wndPtr->tid != GetCurrentThreadId())
2979     {
2980         SetLastError( ERROR_MESSAGE_SYNC_ONLY );
2981         WIN_ReleasePtr( wndPtr );
2982         return 0;
2983     }
2984     winproc = wndPtr->winproc;
2985     WIN_ReleasePtr( wndPtr );
2986
2987     SPY_EnterMessage( SPY_DISPATCHMESSAGE, msg->hwnd, msg->message,
2988                       msg->wParam, msg->lParam );
2989     retval = CallWindowProcW( winproc, msg->hwnd, msg->message,
2990                               msg->wParam, msg->lParam );
2991     SPY_ExitMessage( SPY_RESULT_OK, msg->hwnd, msg->message, retval,
2992                      msg->wParam, msg->lParam );
2993
2994     if (msg->message == WM_PAINT)
2995     {
2996         /* send a WM_NCPAINT and WM_ERASEBKGND if the non-client area is still invalid */
2997         HRGN hrgn = CreateRectRgn( 0, 0, 0, 0 );
2998         GetUpdateRgn( msg->hwnd, hrgn, TRUE );
2999         DeleteObject( hrgn );
3000     }
3001     return retval;
3002 }
3003
3004
3005 /***********************************************************************
3006  *              GetMessagePos (USER.119)
3007  *              GetMessagePos (USER32.@)
3008  *
3009  * The GetMessagePos() function returns a long value representing a
3010  * cursor position, in screen coordinates, when the last message
3011  * retrieved by the GetMessage() function occurs. The x-coordinate is
3012  * in the low-order word of the return value, the y-coordinate is in
3013  * the high-order word. The application can use the MAKEPOINT()
3014  * macro to obtain a POINT structure from the return value.
3015  *
3016  * For the current cursor position, use GetCursorPos().
3017  *
3018  * RETURNS
3019  *
3020  * Cursor position of last message on success, zero on failure.
3021  *
3022  * CONFORMANCE
3023  *
3024  * ECMA-234, Win32
3025  *
3026  */
3027 DWORD WINAPI GetMessagePos(void)
3028 {
3029     return get_user_thread_info()->GetMessagePosVal;
3030 }
3031
3032
3033 /***********************************************************************
3034  *              GetMessageTime (USER.120)
3035  *              GetMessageTime (USER32.@)
3036  *
3037  * GetMessageTime() returns the message time for the last message
3038  * retrieved by the function. The time is measured in milliseconds with
3039  * the same offset as GetTickCount().
3040  *
3041  * Since the tick count wraps, this is only useful for moderately short
3042  * relative time comparisons.
3043  *
3044  * RETURNS
3045  *
3046  * Time of last message on success, zero on failure.
3047  */
3048 LONG WINAPI GetMessageTime(void)
3049 {
3050     return get_user_thread_info()->GetMessageTimeVal;
3051 }
3052
3053
3054 /***********************************************************************
3055  *              GetMessageExtraInfo (USER.288)
3056  *              GetMessageExtraInfo (USER32.@)
3057  */
3058 LPARAM WINAPI GetMessageExtraInfo(void)
3059 {
3060     return get_user_thread_info()->GetMessageExtraInfoVal;
3061 }
3062
3063
3064 /***********************************************************************
3065  *              SetMessageExtraInfo (USER32.@)
3066  */
3067 LPARAM WINAPI SetMessageExtraInfo(LPARAM lParam)
3068 {
3069     struct user_thread_info *thread_info = get_user_thread_info();
3070     LONG old_value = thread_info->GetMessageExtraInfoVal;
3071     thread_info->GetMessageExtraInfoVal = lParam;
3072     return old_value;
3073 }
3074
3075
3076 /***********************************************************************
3077  *              WaitMessage (USER.112) Suspend thread pending messages
3078  *              WaitMessage (USER32.@) Suspend thread pending messages
3079  *
3080  * WaitMessage() suspends a thread until events appear in the thread's
3081  * queue.
3082  */
3083 BOOL WINAPI WaitMessage(void)
3084 {
3085     return (MsgWaitForMultipleObjectsEx( 0, NULL, INFINITE, QS_ALLINPUT, 0 ) != WAIT_FAILED);
3086 }
3087
3088
3089 /***********************************************************************
3090  *              MsgWaitForMultipleObjectsEx   (USER32.@)
3091  */
3092 DWORD WINAPI MsgWaitForMultipleObjectsEx( DWORD count, CONST HANDLE *pHandles,
3093                                           DWORD timeout, DWORD mask, DWORD flags )
3094 {
3095     HANDLE handles[MAXIMUM_WAIT_OBJECTS];
3096     DWORD i, ret, lock;
3097
3098     if (count > MAXIMUM_WAIT_OBJECTS-1)
3099     {
3100         SetLastError( ERROR_INVALID_PARAMETER );
3101         return WAIT_FAILED;
3102     }
3103
3104     /* set the queue mask */
3105     SERVER_START_REQ( set_queue_mask )
3106     {
3107         req->wake_mask    = (flags & MWMO_INPUTAVAILABLE) ? mask : 0;
3108         req->changed_mask = mask;
3109         req->skip_wait    = 0;
3110         wine_server_call( req );
3111     }
3112     SERVER_END_REQ;
3113
3114     /* Add the thread event to the handle list */
3115     for (i = 0; i < count; i++) handles[i] = pHandles[i];
3116     handles[count] = get_server_queue_handle();
3117
3118     ReleaseThunkLock( &lock );
3119     if (USER_Driver.pMsgWaitForMultipleObjectsEx)
3120     {
3121         ret = USER_Driver.pMsgWaitForMultipleObjectsEx( count+1, handles, timeout, mask, flags );
3122         if (ret == count+1) ret = count; /* pretend the msg queue is ready */
3123     }
3124     else
3125         ret = WaitForMultipleObjectsEx( count+1, handles, flags & MWMO_WAITALL,
3126                                         timeout, flags & MWMO_ALERTABLE );
3127     if (lock) RestoreThunkLock( lock );
3128     return ret;
3129 }
3130
3131
3132 /***********************************************************************
3133  *              MsgWaitForMultipleObjects (USER32.@)
3134  */
3135 DWORD WINAPI MsgWaitForMultipleObjects( DWORD count, CONST HANDLE *handles,
3136                                         BOOL wait_all, DWORD timeout, DWORD mask )
3137 {
3138     return MsgWaitForMultipleObjectsEx( count, handles, timeout, mask,
3139                                         wait_all ? MWMO_WAITALL : 0 );
3140 }
3141
3142
3143 /***********************************************************************
3144  *              WaitForInputIdle (USER32.@)
3145  */
3146 DWORD WINAPI WaitForInputIdle( HANDLE hProcess, DWORD dwTimeOut )
3147 {
3148     DWORD start_time, elapsed, ret;
3149     HANDLE idle_event = (HANDLE)-1;
3150
3151     SERVER_START_REQ( wait_input_idle )
3152     {
3153         req->handle = hProcess;
3154         req->timeout = dwTimeOut;
3155         if (!(ret = wine_server_call_err( req ))) idle_event = reply->event;
3156     }
3157     SERVER_END_REQ;
3158     if (ret) return WAIT_FAILED;  /* error */
3159     if (!idle_event) return 0;  /* no event to wait on */
3160
3161     start_time = GetTickCount();
3162     elapsed = 0;
3163
3164     TRACE("waiting for %p\n", idle_event );
3165     do
3166     {
3167         ret = MsgWaitForMultipleObjects ( 1, &idle_event, FALSE, dwTimeOut - elapsed, QS_SENDMESSAGE );
3168         switch (ret)
3169         {
3170         case WAIT_OBJECT_0+1:
3171             process_sent_messages();
3172             break;
3173         case WAIT_TIMEOUT:
3174         case WAIT_FAILED:
3175             TRACE("timeout or error\n");
3176             return ret;
3177         default:
3178             TRACE("finished\n");
3179             return 0;
3180         }
3181         if (dwTimeOut != INFINITE)
3182         {
3183             elapsed = GetTickCount() - start_time;
3184             if (elapsed > dwTimeOut)
3185                 break;
3186         }
3187     }
3188     while (1);
3189
3190     return WAIT_TIMEOUT;
3191 }
3192
3193
3194 /***********************************************************************
3195  *              UserYield (USER.332)
3196  */
3197 void WINAPI UserYield16(void)
3198 {
3199    DWORD count;
3200
3201     /* Handle sent messages */
3202     process_sent_messages();
3203
3204     /* Yield */
3205     ReleaseThunkLock(&count);
3206
3207     if (count)
3208     {
3209         RestoreThunkLock(count);
3210         /* Handle sent messages again */
3211         process_sent_messages();
3212     }
3213 }
3214
3215
3216 /***********************************************************************
3217  *              RegisterWindowMessage (USER.118)
3218  *              RegisterWindowMessageA (USER32.@)
3219  */
3220 WORD WINAPI RegisterWindowMessageA( LPCSTR str )
3221 {
3222     TRACE("%s\n", str );
3223     return GlobalAddAtomA( str );
3224 }
3225
3226
3227 /***********************************************************************
3228  *              RegisterWindowMessageW (USER32.@)
3229  */
3230 WORD WINAPI RegisterWindowMessageW( LPCWSTR str )
3231 {
3232     TRACE("%p\n", str );
3233     return GlobalAddAtomW( str );
3234 }
3235
3236
3237 /***********************************************************************
3238  *              BroadcastSystemMessage  (USER32.@)
3239  *              BroadcastSystemMessageA (USER32.@)
3240  */
3241 LONG WINAPI BroadcastSystemMessageA( DWORD flags, LPDWORD recipients, UINT msg, WPARAM wp, LPARAM lp )
3242 {
3243     if ((*recipients & BSM_APPLICATIONS) || (*recipients == BSM_ALLCOMPONENTS))
3244     {
3245         FIXME( "(%08lx,%08lx,%08x,%08x,%08lx): semi-stub!\n", flags, *recipients, msg, wp, lp );
3246         PostMessageA( HWND_BROADCAST, msg, wp, lp );
3247         return 1;
3248     }
3249     else
3250     {
3251         FIXME( "(%08lx,%08lx,%08x,%08x,%08lx): stub!\n", flags, *recipients, msg, wp, lp);
3252         return -1;
3253     }
3254 }
3255
3256
3257 /***********************************************************************
3258  *              BroadcastSystemMessageW (USER32.@)
3259  */
3260 LONG WINAPI BroadcastSystemMessageW( DWORD flags, LPDWORD recipients, UINT msg, WPARAM wp, LPARAM lp )
3261 {
3262     if ((*recipients & BSM_APPLICATIONS) || (*recipients == BSM_ALLCOMPONENTS))
3263     {
3264         FIXME( "(%08lx,%08lx,%08x,%08x,%08lx): semi-stub!\n", flags, *recipients, msg, wp, lp );
3265         PostMessageW( HWND_BROADCAST, msg, wp, lp );
3266         return 1;
3267     }
3268     else
3269     {
3270         FIXME( "(%08lx,%08lx,%08x,%08x,%08lx): stub!\n", flags, *recipients, msg, wp, lp );
3271         return -1;
3272     }
3273 }
3274
3275
3276 /***********************************************************************
3277  *              SetMessageQueue (USER32.@)
3278  */
3279 BOOL WINAPI SetMessageQueue( INT size )
3280 {
3281     /* now obsolete the message queue will be expanded dynamically as necessary */
3282     return TRUE;
3283 }
3284
3285
3286 /***********************************************************************
3287  *              MessageBeep (USER32.@)
3288  */
3289 BOOL WINAPI MessageBeep( UINT i )
3290 {
3291     BOOL active = TRUE;
3292     SystemParametersInfoA( SPI_GETBEEP, 0, &active, FALSE );
3293     if (active && USER_Driver.pBeep) USER_Driver.pBeep();
3294     return TRUE;
3295 }
3296
3297
3298 /***********************************************************************
3299  *              SetTimer (USER32.@)
3300  */
3301 UINT_PTR WINAPI SetTimer( HWND hwnd, UINT_PTR id, UINT timeout, TIMERPROC proc )
3302 {
3303     UINT_PTR ret;
3304     WNDPROC winproc = 0;
3305
3306     if (proc) winproc = WINPROC_AllocProc( (WNDPROC)proc, WIN_PROC_32A );
3307
3308     SERVER_START_REQ( set_win_timer )
3309     {
3310         req->win    = hwnd;
3311         req->msg    = WM_TIMER;
3312         req->id     = id;
3313         req->rate   = max( timeout, SYS_TIMER_RATE );
3314         req->lparam = (unsigned int)winproc;
3315         if (!wine_server_call_err( req ))
3316         {
3317             ret = reply->id;
3318             if (!ret) ret = TRUE;
3319         }
3320         else ret = 0;
3321     }
3322     SERVER_END_REQ;
3323
3324     TRACE("Added %p %x %p timeout %d\n", hwnd, id, winproc, timeout );
3325     return ret;
3326 }
3327
3328
3329 /***********************************************************************
3330  *              SetSystemTimer (USER32.@)
3331  */
3332 UINT_PTR WINAPI SetSystemTimer( HWND hwnd, UINT_PTR id, UINT timeout, TIMERPROC proc )
3333 {
3334     UINT_PTR ret;
3335     WNDPROC winproc = 0;
3336
3337     if (proc) winproc = WINPROC_AllocProc( (WNDPROC)proc, WIN_PROC_32A );
3338
3339     SERVER_START_REQ( set_win_timer )
3340     {
3341         req->win    = hwnd;
3342         req->msg    = WM_SYSTIMER;
3343         req->id     = id;
3344         req->rate   = max( timeout, SYS_TIMER_RATE );
3345         req->lparam = (unsigned int)winproc;
3346         if (!wine_server_call_err( req ))
3347         {
3348             ret = reply->id;
3349             if (!ret) ret = TRUE;
3350         }
3351         else ret = 0;
3352     }
3353     SERVER_END_REQ;
3354
3355     TRACE("Added %p %x %p timeout %d\n", hwnd, id, winproc, timeout );
3356     return ret;
3357 }
3358
3359
3360 /***********************************************************************
3361  *              KillTimer (USER32.@)
3362  */
3363 BOOL WINAPI KillTimer( HWND hwnd, UINT_PTR id )
3364 {
3365     BOOL ret;
3366
3367     TRACE("%p %d\n", hwnd, id );
3368
3369     SERVER_START_REQ( kill_win_timer )
3370     {
3371         req->win = hwnd;
3372         req->msg = WM_TIMER;
3373         req->id  = id;
3374         ret = !wine_server_call_err( req );
3375     }
3376     SERVER_END_REQ;
3377     return ret;
3378 }
3379
3380
3381 /***********************************************************************
3382  *              KillSystemTimer (USER32.@)
3383  */
3384 BOOL WINAPI KillSystemTimer( HWND hwnd, UINT_PTR id )
3385 {
3386     BOOL ret;
3387
3388     TRACE("%p %d\n", hwnd, id );
3389
3390     SERVER_START_REQ( kill_win_timer )
3391     {
3392         req->win = hwnd;
3393         req->msg = WM_SYSTIMER;
3394         req->id  = id;
3395         ret = !wine_server_call_err( req );
3396     }
3397     SERVER_END_REQ;
3398     return ret;
3399 }
3400
3401
3402 /**********************************************************************
3403  *              GetGUIThreadInfo  (USER32.@)
3404  */
3405 BOOL WINAPI GetGUIThreadInfo( DWORD id, GUITHREADINFO *info )
3406 {
3407     BOOL ret;
3408
3409     SERVER_START_REQ( get_thread_input )
3410     {
3411         req->tid = id;
3412         if ((ret = !wine_server_call_err( req )))
3413         {
3414             info->flags          = 0;
3415             info->hwndActive     = reply->active;
3416             info->hwndFocus      = reply->focus;
3417             info->hwndCapture    = reply->capture;
3418             info->hwndMenuOwner  = reply->menu_owner;
3419             info->hwndMoveSize   = reply->move_size;
3420             info->hwndCaret      = reply->caret;
3421             info->rcCaret.left   = reply->rect.left;
3422             info->rcCaret.top    = reply->rect.top;
3423             info->rcCaret.right  = reply->rect.right;
3424             info->rcCaret.bottom = reply->rect.bottom;
3425             if (reply->menu_owner) info->flags |= GUI_INMENUMODE;
3426             if (reply->move_size) info->flags |= GUI_INMOVESIZE;
3427             if (reply->caret) info->flags |= GUI_CARETBLINKING;
3428         }
3429     }
3430     SERVER_END_REQ;
3431     return ret;
3432 }
3433
3434
3435 /******************************************************************
3436  *              IsHungAppWindow (USER32.@)
3437  *
3438  */
3439 BOOL WINAPI IsHungAppWindow( HWND hWnd )
3440 {
3441     DWORD dwResult; 
3442     return !SendMessageTimeoutA(hWnd, WM_NULL, 0, 0, SMTO_ABORTIFHUNG, 5000, &dwResult);        
3443 }