- Add support for TBSTYLE_EX_MIXEDBUTTONS.
[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 "message.h"
38 #include "user.h"
39 #include "win.h"
40 #include "winproc.h"
41 #include "wine/debug.h"
42
43 WINE_DEFAULT_DEBUG_CHANNEL(msg);
44 WINE_DECLARE_DEBUG_CHANNEL(relay);
45
46 #define WM_NCMOUSEFIRST WM_NCMOUSEMOVE
47 #define WM_NCMOUSELAST  WM_NCMBUTTONDBLCLK
48
49 #define MAX_PACK_COUNT 4
50
51 /* description of the data fields that need to be packed along with a sent message */
52 struct packed_message
53 {
54     int         count;
55     const void *data[MAX_PACK_COUNT];
56     size_t      size[MAX_PACK_COUNT];
57 };
58
59 /* info about the message currently being received by the current thread */
60 struct received_message_info
61 {
62     enum message_type type;
63     MSG               msg;
64     UINT              flags;  /* InSendMessageEx return flags */
65 };
66
67 /* structure to group all parameters for sent messages of the various kinds */
68 struct send_message_info
69 {
70     enum message_type type;
71     HWND              hwnd;
72     UINT              msg;
73     WPARAM            wparam;
74     LPARAM            lparam;
75     UINT              flags;      /* flags for SendMessageTimeout */
76     UINT              timeout;    /* timeout for SendMessageTimeout */
77     SENDASYNCPROC     callback;   /* callback function for SendMessageCallback */
78     ULONG_PTR         data;       /* callback data */
79 };
80
81
82 /* flag for messages that contain pointers */
83 /* 32 messages per entry, messages 0..31 map to bits 0..31 */
84
85 #define SET(msg) (1 << ((msg) & 31))
86
87 static const unsigned int message_pointer_flags[] =
88 {
89     /* 0x00 - 0x1f */
90     SET(WM_CREATE) | SET(WM_SETTEXT) | SET(WM_GETTEXT) |
91     SET(WM_WININICHANGE) | SET(WM_DEVMODECHANGE),
92     /* 0x20 - 0x3f */
93     SET(WM_GETMINMAXINFO) | SET(WM_DRAWITEM) | SET(WM_MEASUREITEM) | SET(WM_DELETEITEM) |
94     SET(WM_COMPAREITEM),
95     /* 0x40 - 0x5f */
96     SET(WM_WINDOWPOSCHANGING) | SET(WM_WINDOWPOSCHANGED) | SET(WM_COPYDATA) |
97     SET(WM_NOTIFY) | SET(WM_HELP),
98     /* 0x60 - 0x7f */
99     SET(WM_STYLECHANGING) | SET(WM_STYLECHANGED),
100     /* 0x80 - 0x9f */
101     SET(WM_NCCREATE) | SET(WM_NCCALCSIZE) | SET(WM_GETDLGCODE),
102     /* 0xa0 - 0xbf */
103     SET(EM_GETSEL) | SET(EM_GETRECT) | SET(EM_SETRECT) | SET(EM_SETRECTNP),
104     /* 0xc0 - 0xdf */
105     SET(EM_REPLACESEL) | SET(EM_GETLINE) | SET(EM_SETTABSTOPS),
106     /* 0xe0 - 0xff */
107     SET(SBM_GETRANGE) | SET(SBM_SETSCROLLINFO) | SET(SBM_GETSCROLLINFO),
108     /* 0x100 - 0x11f */
109     0,
110     /* 0x120 - 0x13f */
111     0,
112     /* 0x140 - 0x15f */
113     SET(CB_GETEDITSEL) | SET(CB_ADDSTRING) | SET(CB_DIR) | SET(CB_GETLBTEXT) |
114     SET(CB_INSERTSTRING) | SET(CB_FINDSTRING) | SET(CB_SELECTSTRING) |
115     SET(CB_GETDROPPEDCONTROLRECT) | SET(CB_FINDSTRINGEXACT),
116     /* 0x160 - 0x17f */
117     0,
118     /* 0x180 - 0x19f */
119     SET(LB_ADDSTRING) | SET(LB_INSERTSTRING) | SET(LB_GETTEXT) | SET(LB_SELECTSTRING) |
120     SET(LB_DIR) | SET(LB_FINDSTRING) |
121     SET(LB_GETSELITEMS) | SET(LB_SETTABSTOPS) | SET(LB_ADDFILE) | SET(LB_GETITEMRECT),
122     /* 0x1a0 - 0x1bf */
123     SET(LB_FINDSTRINGEXACT),
124     /* 0x1c0 - 0x1df */
125     0,
126     /* 0x1e0 - 0x1ff */
127     0,
128     /* 0x200 - 0x21f */
129     SET(WM_NEXTMENU) | SET(WM_SIZING) | SET(WM_MOVING) | SET(WM_DEVICECHANGE),
130     /* 0x220 - 0x23f */
131     SET(WM_MDICREATE) | SET(WM_MDIGETACTIVE) | SET(WM_DROPOBJECT) |
132     SET(WM_QUERYDROPOBJECT) | SET(WM_DRAGLOOP) | SET(WM_DRAGSELECT) | SET(WM_DRAGMOVE),
133     /* 0x240 - 0x25f */
134     0,
135     /* 0x260 - 0x27f */
136     0,
137     /* 0x280 - 0x29f */
138     0,
139     /* 0x2a0 - 0x2bf */
140     0,
141     /* 0x2c0 - 0x2df */
142     0,
143     /* 0x2e0 - 0x2ff */
144     0,
145     /* 0x300 - 0x31f */
146     SET(WM_ASKCBFORMATNAME)
147 };
148
149 /* flags for messages that contain Unicode strings */
150 static const unsigned int message_unicode_flags[] =
151 {
152     /* 0x00 - 0x1f */
153     SET(WM_CREATE) | SET(WM_SETTEXT) | SET(WM_GETTEXT) | SET(WM_GETTEXTLENGTH) |
154     SET(WM_WININICHANGE) | SET(WM_DEVMODECHANGE),
155     /* 0x20 - 0x3f */
156     SET(WM_CHARTOITEM),
157     /* 0x40 - 0x5f */
158     0,
159     /* 0x60 - 0x7f */
160     0,
161     /* 0x80 - 0x9f */
162     SET(WM_NCCREATE),
163     /* 0xa0 - 0xbf */
164     0,
165     /* 0xc0 - 0xdf */
166     SET(EM_REPLACESEL) | SET(EM_GETLINE) | SET(EM_SETPASSWORDCHAR),
167     /* 0xe0 - 0xff */
168     0,
169     /* 0x100 - 0x11f */
170     SET(WM_CHAR) | SET(WM_DEADCHAR) | SET(WM_SYSCHAR) | SET(WM_SYSDEADCHAR),
171     /* 0x120 - 0x13f */
172     SET(WM_MENUCHAR),
173     /* 0x140 - 0x15f */
174     SET(CB_ADDSTRING) | SET(CB_DIR) | SET(CB_GETLBTEXT) | SET(CB_GETLBTEXTLEN) |
175     SET(CB_INSERTSTRING) | SET(CB_FINDSTRING) | SET(CB_SELECTSTRING) | SET(CB_FINDSTRINGEXACT),
176     /* 0x160 - 0x17f */
177     0,
178     /* 0x180 - 0x19f */
179     SET(LB_ADDSTRING) | SET(LB_INSERTSTRING) | SET(LB_GETTEXT) | SET(LB_GETTEXTLEN) |
180     SET(LB_SELECTSTRING) | SET(LB_DIR) | SET(LB_FINDSTRING) | SET(LB_ADDFILE),
181     /* 0x1a0 - 0x1bf */
182     SET(LB_FINDSTRINGEXACT),
183     /* 0x1c0 - 0x1df */
184     0,
185     /* 0x1e0 - 0x1ff */
186     0,
187     /* 0x200 - 0x21f */
188     0,
189     /* 0x220 - 0x23f */
190     SET(WM_MDICREATE),
191     /* 0x240 - 0x25f */
192     0,
193     /* 0x260 - 0x27f */
194     0,
195     /* 0x280 - 0x29f */
196     SET(WM_IME_CHAR),
197     /* 0x2a0 - 0x2bf */
198     0,
199     /* 0x2c0 - 0x2df */
200     0,
201     /* 0x2e0 - 0x2ff */
202     0,
203     /* 0x300 - 0x31f */
204     SET(WM_PAINTCLIPBOARD) | SET(WM_SIZECLIPBOARD) | SET(WM_ASKCBFORMATNAME)
205 };
206
207 /* check whether a given message type includes pointers */
208 inline static int is_pointer_message( UINT message )
209 {
210     if (message >= 8*sizeof(message_pointer_flags)) return FALSE;
211     return (message_pointer_flags[message / 32] & SET(message)) != 0;
212 }
213
214 /* check whether a given message type contains Unicode (or ASCII) chars */
215 inline static int is_unicode_message( UINT message )
216 {
217     if (message >= 8*sizeof(message_unicode_flags)) return FALSE;
218     return (message_unicode_flags[message / 32] & SET(message)) != 0;
219 }
220
221 #undef SET
222
223 /* add a data field to a packed message */
224 inline static void push_data( struct packed_message *data, const void *ptr, size_t size )
225 {
226     data->data[data->count] = ptr;
227     data->size[data->count] = size;
228     data->count++;
229 }
230
231 /* add a string to a packed message */
232 inline static void push_string( struct packed_message *data, LPCWSTR str )
233 {
234     push_data( data, str, (strlenW(str) + 1) * sizeof(WCHAR) );
235 }
236
237 /* retrieve a pointer to data from a packed message and increment the buffer pointer */
238 inline static void *get_data( void **buffer, size_t size )
239 {
240     void *ret = *buffer;
241     *buffer = (char *)*buffer + size;
242     return ret;
243 }
244
245 /* make sure that the buffer contains a valid null-terminated Unicode string */
246 inline static BOOL check_string( LPCWSTR str, size_t size )
247 {
248     for (size /= sizeof(WCHAR); size; size--, str++)
249         if (!*str) return TRUE;
250     return FALSE;
251 }
252
253 /* make sure that there is space for 'size' bytes in buffer, growing it if needed */
254 inline static void *get_buffer_space( void **buffer, size_t size )
255 {
256     void *ret;
257     if (!(ret = HeapReAlloc( GetProcessHeap(), 0, *buffer, size )))
258         HeapFree( GetProcessHeap(), 0, *buffer );
259     *buffer = ret;
260     return ret;
261 }
262
263 /* retrieve a string pointer from packed data */
264 inline static LPWSTR get_string( void **buffer )
265 {
266     return get_data( buffer, (strlenW( (LPWSTR)*buffer ) + 1) * sizeof(WCHAR) );
267 }
268
269 /* check whether a combobox expects strings or ids in CB_ADDSTRING/CB_INSERTSTRING */
270 inline static BOOL combobox_has_strings( HWND hwnd )
271 {
272     DWORD style = GetWindowLongA( hwnd, GWL_STYLE );
273     return (!(style & (CBS_OWNERDRAWFIXED | CBS_OWNERDRAWVARIABLE)) || (style & CBS_HASSTRINGS));
274 }
275
276 /* check whether a listbox expects strings or ids in LB_ADDSTRING/LB_INSERTSTRING */
277 inline static BOOL listbox_has_strings( HWND hwnd )
278 {
279     DWORD style = GetWindowLongA( hwnd, GWL_STYLE );
280     return (!(style & (LBS_OWNERDRAWFIXED | LBS_OWNERDRAWVARIABLE)) || (style & LBS_HASSTRINGS));
281 }
282
283
284 /***********************************************************************
285  *              broadcast_message_callback
286  *
287  * Helper callback for broadcasting messages.
288  */
289 static BOOL CALLBACK broadcast_message_callback( HWND hwnd, LPARAM lparam )
290 {
291     struct send_message_info *info = (struct send_message_info *)lparam;
292     if (!(GetWindowLongW( hwnd, GWL_STYLE ) & (WS_POPUP|WS_CAPTION))) return TRUE;
293     switch(info->type)
294     {
295     case MSG_UNICODE:
296         SendMessageTimeoutW( hwnd, info->msg, info->wparam, info->lparam,
297                              info->flags, info->timeout, NULL );
298         break;
299     case MSG_ASCII:
300         SendMessageTimeoutA( hwnd, info->msg, info->wparam, info->lparam,
301                              info->flags, info->timeout, NULL );
302         break;
303     case MSG_NOTIFY:
304         SendNotifyMessageW( hwnd, info->msg, info->wparam, info->lparam );
305         break;
306     case MSG_CALLBACK:
307         SendMessageCallbackW( hwnd, info->msg, info->wparam, info->lparam,
308                               info->callback, info->data );
309         break;
310     case MSG_POSTED:
311         PostMessageW( hwnd, info->msg, info->wparam, info->lparam );
312         break;
313     default:
314         ERR( "bad type %d\n", info->type );
315         break;
316     }
317     return TRUE;
318 }
319
320
321 /***********************************************************************
322  *              map_wparam_AtoW
323  *
324  * Convert the wparam of an ASCII message to Unicode.
325  */
326 static WPARAM map_wparam_AtoW( UINT message, WPARAM wparam )
327 {
328     switch(message)
329     {
330     case WM_CHARTOITEM:
331     case EM_SETPASSWORDCHAR:
332     case WM_CHAR:
333     case WM_DEADCHAR:
334     case WM_SYSCHAR:
335     case WM_SYSDEADCHAR:
336     case WM_MENUCHAR:
337         {
338             char ch = LOWORD(wparam);
339             WCHAR wch;
340             MultiByteToWideChar(CP_ACP, 0, &ch, 1, &wch, 1);
341             wparam = MAKEWPARAM( wch, HIWORD(wparam) );
342         }
343         break;
344     case WM_IME_CHAR:
345         {
346             char ch[2];
347             WCHAR wch;
348             ch[0] = (wparam >> 8);
349             ch[1] = (wparam & 0xff);
350             MultiByteToWideChar(CP_ACP, 0, ch, 2, &wch, 1);
351             wparam = MAKEWPARAM( wch, HIWORD(wparam) );
352         }
353         break;
354     }
355     return wparam;
356 }
357
358
359 /***********************************************************************
360  *              map_wparam_WtoA
361  *
362  * Convert the wparam of a Unicode message to ASCII.
363  */
364 static WPARAM map_wparam_WtoA( UINT message, WPARAM wparam )
365 {
366     switch(message)
367     {
368     case WM_CHARTOITEM:
369     case EM_SETPASSWORDCHAR:
370     case WM_CHAR:
371     case WM_DEADCHAR:
372     case WM_SYSCHAR:
373     case WM_SYSDEADCHAR:
374     case WM_MENUCHAR:
375         {
376             WCHAR wch = LOWORD(wparam);
377             BYTE ch;
378             WideCharToMultiByte( CP_ACP, 0, &wch, 1, &ch, 1, NULL, NULL );
379             wparam = MAKEWPARAM( ch, HIWORD(wparam) );
380         }
381         break;
382     case WM_IME_CHAR:
383         {
384             WCHAR wch = LOWORD(wparam);
385             BYTE ch[2];
386
387             ch[1] = 0;
388             WideCharToMultiByte( CP_ACP, 0, &wch, 1, ch, 2, NULL, NULL );
389             wparam = MAKEWPARAM( (ch[0] << 8) | ch[1], HIWORD(wparam) );
390         }
391         break;
392     }
393     return wparam;
394 }
395
396
397 /***********************************************************************
398  *              pack_message
399  *
400  * Pack a message for sending to another process.
401  * Return the size of the data we expect in the message reply.
402  * Set data->count to -1 if there is an error.
403  */
404 static size_t pack_message( HWND hwnd, UINT message, WPARAM wparam, LPARAM lparam,
405                             struct packed_message *data )
406 {
407     data->count = 0;
408     switch(message)
409     {
410     case WM_NCCREATE:
411     case WM_CREATE:
412     {
413         CREATESTRUCTW *cs = (CREATESTRUCTW *)lparam;
414         push_data( data, cs, sizeof(*cs) );
415         if (HIWORD(cs->lpszName)) push_string( data, cs->lpszName );
416         if (HIWORD(cs->lpszClass)) push_string( data, cs->lpszClass );
417         return sizeof(*cs);
418     }
419     case WM_GETTEXT:
420     case WM_ASKCBFORMATNAME:
421         return wparam * sizeof(WCHAR);
422     case WM_WININICHANGE:
423         if (lparam) push_string(data, (LPWSTR)lparam );
424         return 0;
425     case WM_SETTEXT:
426     case WM_DEVMODECHANGE:
427     case CB_DIR:
428     case LB_DIR:
429     case LB_ADDFILE:
430     case EM_REPLACESEL:
431         push_string( data, (LPWSTR)lparam );
432         return 0;
433     case WM_GETMINMAXINFO:
434         push_data( data, (MINMAXINFO *)lparam, sizeof(MINMAXINFO) );
435         return sizeof(MINMAXINFO);
436     case WM_DRAWITEM:
437         push_data( data, (DRAWITEMSTRUCT *)lparam, sizeof(DRAWITEMSTRUCT) );
438         return 0;
439     case WM_MEASUREITEM:
440         push_data( data, (MEASUREITEMSTRUCT *)lparam, sizeof(MEASUREITEMSTRUCT) );
441         return sizeof(MEASUREITEMSTRUCT);
442     case WM_DELETEITEM:
443         push_data( data, (DELETEITEMSTRUCT *)lparam, sizeof(DELETEITEMSTRUCT) );
444         return 0;
445     case WM_COMPAREITEM:
446         push_data( data, (COMPAREITEMSTRUCT *)lparam, sizeof(COMPAREITEMSTRUCT) );
447         return 0;
448     case WM_WINDOWPOSCHANGING:
449     case WM_WINDOWPOSCHANGED:
450         push_data( data, (WINDOWPOS *)lparam, sizeof(WINDOWPOS) );
451         return sizeof(WINDOWPOS);
452     case WM_COPYDATA:
453     {
454         COPYDATASTRUCT *cp = (COPYDATASTRUCT *)lparam;
455         push_data( data, cp, sizeof(*cp) );
456         if (cp->lpData) push_data( data, cp->lpData, cp->cbData );
457         return 0;
458     }
459     case WM_NOTIFY:
460         /* WM_NOTIFY cannot be sent across processes (MSDN) */
461         data->count = -1;
462         return 0;
463     case WM_HELP:
464         push_data( data, (HELPINFO *)lparam, sizeof(HELPINFO) );
465         return 0;
466     case WM_STYLECHANGING:
467     case WM_STYLECHANGED:
468         push_data( data, (STYLESTRUCT *)lparam, sizeof(STYLESTRUCT) );
469         return 0;
470     case WM_NCCALCSIZE:
471         if (!wparam)
472         {
473             push_data( data, (RECT *)lparam, sizeof(RECT) );
474             return sizeof(RECT);
475         }
476         else
477         {
478             NCCALCSIZE_PARAMS *nc = (NCCALCSIZE_PARAMS *)lparam;
479             push_data( data, nc, sizeof(*nc) );
480             push_data( data, nc->lppos, sizeof(*nc->lppos) );
481             return sizeof(*nc) + sizeof(*nc->lppos);
482         }
483     case WM_GETDLGCODE:
484         if (lparam) push_data( data, (MSG *)lparam, sizeof(MSG) );
485         return sizeof(MSG);
486     case SBM_SETSCROLLINFO:
487         push_data( data, (SCROLLINFO *)lparam, sizeof(SCROLLINFO) );
488         return 0;
489     case SBM_GETSCROLLINFO:
490         push_data( data, (SCROLLINFO *)lparam, sizeof(SCROLLINFO) );
491         return sizeof(SCROLLINFO);
492     case EM_GETSEL:
493     case SBM_GETRANGE:
494     case CB_GETEDITSEL:
495     {
496         size_t size = 0;
497         if (wparam) size += sizeof(DWORD);
498         if (lparam) size += sizeof(DWORD);
499         return size;
500     }
501     case EM_GETRECT:
502     case LB_GETITEMRECT:
503     case CB_GETDROPPEDCONTROLRECT:
504         return sizeof(RECT);
505     case EM_SETRECT:
506     case EM_SETRECTNP:
507         push_data( data, (RECT *)lparam, sizeof(RECT) );
508         return 0;
509     case EM_GETLINE:
510     {
511         WORD *pw = (WORD *)lparam;
512         push_data( data, pw, sizeof(*pw) );
513         return *pw * sizeof(WCHAR);
514     }
515     case EM_SETTABSTOPS:
516     case LB_SETTABSTOPS:
517         if (wparam) push_data( data, (UINT *)lparam, sizeof(UINT) * wparam );
518         return 0;
519     case CB_ADDSTRING:
520     case CB_INSERTSTRING:
521     case CB_FINDSTRING:
522     case CB_FINDSTRINGEXACT:
523     case CB_SELECTSTRING:
524         if (combobox_has_strings( hwnd )) push_string( data, (LPWSTR)lparam );
525         return 0;
526     case CB_GETLBTEXT:
527         if (!combobox_has_strings( hwnd )) return sizeof(ULONG_PTR);
528         return (SendMessageW( hwnd, CB_GETLBTEXTLEN, wparam, 0 ) + 1) * sizeof(WCHAR);
529     case LB_ADDSTRING:
530     case LB_INSERTSTRING:
531     case LB_FINDSTRING:
532     case LB_FINDSTRINGEXACT:
533     case LB_SELECTSTRING:
534         if (listbox_has_strings( hwnd )) push_string( data, (LPWSTR)lparam );
535         return 0;
536     case LB_GETTEXT:
537         if (!listbox_has_strings( hwnd )) return sizeof(ULONG_PTR);
538         return (SendMessageW( hwnd, LB_GETTEXTLEN, wparam, 0 ) + 1) * sizeof(WCHAR);
539     case LB_GETSELITEMS:
540         return wparam * sizeof(UINT);
541     case WM_NEXTMENU:
542         push_data( data, (MDINEXTMENU *)lparam, sizeof(MDINEXTMENU) );
543         return sizeof(MDINEXTMENU);
544     case WM_SIZING:
545     case WM_MOVING:
546         push_data( data, (RECT *)lparam, sizeof(RECT) );
547         return sizeof(RECT);
548     case WM_MDICREATE:
549     {
550         MDICREATESTRUCTW *cs = (MDICREATESTRUCTW *)lparam;
551         push_data( data, cs, sizeof(*cs) );
552         if (HIWORD(cs->szTitle)) push_string( data, cs->szTitle );
553         if (HIWORD(cs->szClass)) push_string( data, cs->szClass );
554         return sizeof(*cs);
555     }
556     case WM_MDIGETACTIVE:
557         if (lparam) return sizeof(BOOL);
558         return 0;
559     case WM_WINE_SETWINDOWPOS:
560         push_data( data, (WINDOWPOS *)lparam, sizeof(WINDOWPOS) );
561         return 0;
562     case WM_WINE_KEYBOARD_LL_HOOK:
563         push_data( data, (KBDLLHOOKSTRUCT *)lparam, sizeof(KBDLLHOOKSTRUCT) );
564         return 0;
565     case WM_WINE_MOUSE_LL_HOOK:
566         push_data( data, (MSLLHOOKSTRUCT *)lparam, sizeof(MSLLHOOKSTRUCT) );
567         return 0;
568
569     /* these contain an HFONT */
570     case WM_SETFONT:
571     case WM_GETFONT:
572     /* these contain an HDC */
573     case WM_PAINT:
574     case WM_ERASEBKGND:
575     case WM_ICONERASEBKGND:
576     case WM_NCPAINT:
577     case WM_CTLCOLORMSGBOX:
578     case WM_CTLCOLOREDIT:
579     case WM_CTLCOLORLISTBOX:
580     case WM_CTLCOLORBTN:
581     case WM_CTLCOLORDLG:
582     case WM_CTLCOLORSCROLLBAR:
583     case WM_CTLCOLORSTATIC:
584     case WM_PRINT:
585     case WM_PRINTCLIENT:
586     /* these contain an HGLOBAL */
587     case WM_PAINTCLIPBOARD:
588     case WM_SIZECLIPBOARD:
589     /* these contain HICON */
590     case WM_GETICON:
591     case WM_SETICON:
592     case WM_QUERYDRAGICON:
593     case WM_QUERYPARKICON:
594     /* these contain pointers */
595     case WM_DROPOBJECT:
596     case WM_QUERYDROPOBJECT:
597     case WM_DRAGLOOP:
598     case WM_DRAGSELECT:
599     case WM_DRAGMOVE:
600     case WM_DEVICECHANGE:
601         FIXME( "msg %x (%s) not supported yet\n", message, SPY_GetMsgName(message, hwnd) );
602         data->count = -1;
603         return 0;
604     }
605     return 0;
606 }
607
608
609 /***********************************************************************
610  *              unpack_message
611  *
612  * Unpack a message received from another process.
613  */
614 static BOOL unpack_message( HWND hwnd, UINT message, WPARAM *wparam, LPARAM *lparam,
615                             void **buffer, size_t size )
616 {
617     size_t minsize = 0;
618
619     switch(message)
620     {
621     case WM_NCCREATE:
622     case WM_CREATE:
623     {
624         CREATESTRUCTW *cs = *buffer;
625         WCHAR *str = (WCHAR *)(cs + 1);
626         if (size < sizeof(*cs)) return FALSE;
627         size -= sizeof(*cs);
628         if (HIWORD(cs->lpszName))
629         {
630             if (!check_string( str, size )) return FALSE;
631             cs->lpszName = str;
632             size -= (strlenW(str) + 1) * sizeof(WCHAR);
633             str += strlenW(str) + 1;
634         }
635         if (HIWORD(cs->lpszClass))
636         {
637             if (!check_string( str, size )) return FALSE;
638             cs->lpszClass = str;
639         }
640         break;
641     }
642     case WM_GETTEXT:
643     case WM_ASKCBFORMATNAME:
644         if (!get_buffer_space( buffer, (*wparam * sizeof(WCHAR)) )) return FALSE;
645         break;
646     case WM_WININICHANGE:
647         if (!*lparam) return TRUE;
648         /* fall through */
649     case WM_SETTEXT:
650     case WM_DEVMODECHANGE:
651     case CB_DIR:
652     case LB_DIR:
653     case LB_ADDFILE:
654     case EM_REPLACESEL:
655         if (!check_string( *buffer, size )) return FALSE;
656         break;
657     case WM_GETMINMAXINFO:
658         minsize = sizeof(MINMAXINFO);
659         break;
660     case WM_DRAWITEM:
661         minsize = sizeof(DRAWITEMSTRUCT);
662         break;
663     case WM_MEASUREITEM:
664         minsize = sizeof(MEASUREITEMSTRUCT);
665         break;
666     case WM_DELETEITEM:
667         minsize = sizeof(DELETEITEMSTRUCT);
668         break;
669     case WM_COMPAREITEM:
670         minsize = sizeof(COMPAREITEMSTRUCT);
671         break;
672     case WM_WINDOWPOSCHANGING:
673     case WM_WINDOWPOSCHANGED:
674     case WM_WINE_SETWINDOWPOS:
675         minsize = sizeof(WINDOWPOS);
676         break;
677     case WM_COPYDATA:
678     {
679         COPYDATASTRUCT *cp = *buffer;
680         if (size < sizeof(*cp)) return FALSE;
681         if (cp->lpData)
682         {
683             minsize = sizeof(*cp) + cp->cbData;
684             cp->lpData = cp + 1;
685         }
686         break;
687     }
688     case WM_NOTIFY:
689         /* WM_NOTIFY cannot be sent across processes (MSDN) */
690         return FALSE;
691     case WM_HELP:
692         minsize = sizeof(HELPINFO);
693         break;
694     case WM_STYLECHANGING:
695     case WM_STYLECHANGED:
696         minsize = sizeof(STYLESTRUCT);
697         break;
698     case WM_NCCALCSIZE:
699         if (!*wparam) minsize = sizeof(RECT);
700         else
701         {
702             NCCALCSIZE_PARAMS *nc = *buffer;
703             if (size < sizeof(*nc) + sizeof(*nc->lppos)) return FALSE;
704             nc->lppos = (WINDOWPOS *)(nc + 1);
705         }
706         break;
707     case WM_GETDLGCODE:
708         if (!*lparam) return TRUE;
709         minsize = sizeof(MSG);
710         break;
711     case SBM_SETSCROLLINFO:
712         minsize = sizeof(SCROLLINFO);
713         break;
714     case SBM_GETSCROLLINFO:
715         if (!get_buffer_space( buffer, sizeof(SCROLLINFO ))) return FALSE;
716         break;
717     case EM_GETSEL:
718     case SBM_GETRANGE:
719     case CB_GETEDITSEL:
720         if (*wparam || *lparam)
721         {
722             if (!get_buffer_space( buffer, 2*sizeof(DWORD) )) return FALSE;
723             if (*wparam) *wparam = (WPARAM)*buffer;
724             if (*lparam) *lparam = (LPARAM)((DWORD *)*buffer + 1);
725         }
726         return TRUE;
727     case EM_GETRECT:
728     case LB_GETITEMRECT:
729     case CB_GETDROPPEDCONTROLRECT:
730         if (!get_buffer_space( buffer, sizeof(RECT) )) return FALSE;
731         break;
732     case EM_SETRECT:
733     case EM_SETRECTNP:
734         minsize = sizeof(RECT);
735         break;
736     case EM_GETLINE:
737     {
738         WORD len;
739         if (size < sizeof(WORD)) return FALSE;
740         len = *(WORD *)*buffer;
741         if (!get_buffer_space( buffer, (len + 1) * sizeof(WCHAR) )) return FALSE;
742         *lparam = (LPARAM)*buffer + sizeof(WORD);  /* don't erase WORD at start of buffer */
743         return TRUE;
744     }
745     case EM_SETTABSTOPS:
746     case LB_SETTABSTOPS:
747         if (!*wparam) return TRUE;
748         minsize = *wparam * sizeof(UINT);
749         break;
750     case CB_ADDSTRING:
751     case CB_INSERTSTRING:
752     case CB_FINDSTRING:
753     case CB_FINDSTRINGEXACT:
754     case CB_SELECTSTRING:
755     case LB_ADDSTRING:
756     case LB_INSERTSTRING:
757     case LB_FINDSTRING:
758     case LB_FINDSTRINGEXACT:
759     case LB_SELECTSTRING:
760         if (!*buffer) return TRUE;
761         if (!check_string( *buffer, size )) return FALSE;
762         break;
763     case CB_GETLBTEXT:
764     {
765         size = sizeof(ULONG_PTR);
766         if (combobox_has_strings( hwnd ))
767             size = (SendMessageW( hwnd, CB_GETLBTEXTLEN, *wparam, 0 ) + 1) * sizeof(WCHAR);
768         if (!get_buffer_space( buffer, size )) return FALSE;
769         break;
770     }
771     case LB_GETTEXT:
772     {
773         size = sizeof(ULONG_PTR);
774         if (listbox_has_strings( hwnd ))
775             size = (SendMessageW( hwnd, LB_GETTEXTLEN, *wparam, 0 ) + 1) * sizeof(WCHAR);
776         if (!get_buffer_space( buffer, size )) return FALSE;
777         break;
778     }
779     case LB_GETSELITEMS:
780         if (!get_buffer_space( buffer, *wparam * sizeof(UINT) )) return FALSE;
781         break;
782     case WM_NEXTMENU:
783         minsize = sizeof(MDINEXTMENU);
784         if (!get_buffer_space( buffer, sizeof(MDINEXTMENU) )) return FALSE;
785         break;
786     case WM_SIZING:
787     case WM_MOVING:
788         minsize = sizeof(RECT);
789         if (!get_buffer_space( buffer, sizeof(RECT) )) return FALSE;
790         break;
791     case WM_MDICREATE:
792     {
793         MDICREATESTRUCTW *cs = *buffer;
794         WCHAR *str = (WCHAR *)(cs + 1);
795         if (size < sizeof(*cs)) return FALSE;
796         size -= sizeof(*cs);
797         if (HIWORD(cs->szTitle))
798         {
799             if (!check_string( str, size )) return FALSE;
800             cs->szTitle = str;
801             size -= (strlenW(str) + 1) * sizeof(WCHAR);
802             str += strlenW(str) + 1;
803         }
804         if (HIWORD(cs->szClass))
805         {
806             if (!check_string( str, size )) return FALSE;
807             cs->szClass = str;
808         }
809         break;
810     }
811     case WM_MDIGETACTIVE:
812         if (!*lparam) return TRUE;
813         if (!get_buffer_space( buffer, sizeof(BOOL) )) return FALSE;
814         break;
815     case WM_WINE_KEYBOARD_LL_HOOK:
816         minsize = sizeof(KBDLLHOOKSTRUCT);
817         break;
818     case WM_WINE_MOUSE_LL_HOOK:
819         minsize = sizeof(MSLLHOOKSTRUCT);
820         break;
821
822     /* these contain an HFONT */
823     case WM_SETFONT:
824     case WM_GETFONT:
825     /* these contain an HDC */
826     case WM_PAINT:
827     case WM_ERASEBKGND:
828     case WM_ICONERASEBKGND:
829     case WM_NCPAINT:
830     case WM_CTLCOLORMSGBOX:
831     case WM_CTLCOLOREDIT:
832     case WM_CTLCOLORLISTBOX:
833     case WM_CTLCOLORBTN:
834     case WM_CTLCOLORDLG:
835     case WM_CTLCOLORSCROLLBAR:
836     case WM_CTLCOLORSTATIC:
837     case WM_PRINT:
838     case WM_PRINTCLIENT:
839     /* these contain an HGLOBAL */
840     case WM_PAINTCLIPBOARD:
841     case WM_SIZECLIPBOARD:
842     /* these contain HICON */
843     case WM_GETICON:
844     case WM_SETICON:
845     case WM_QUERYDRAGICON:
846     case WM_QUERYPARKICON:
847     /* these contain pointers */
848     case WM_DROPOBJECT:
849     case WM_QUERYDROPOBJECT:
850     case WM_DRAGLOOP:
851     case WM_DRAGSELECT:
852     case WM_DRAGMOVE:
853     case WM_DEVICECHANGE:
854         FIXME( "msg %x (%s) not supported yet\n", message, SPY_GetMsgName(message, hwnd) );
855         return FALSE;
856
857     default:
858         return TRUE; /* message doesn't need any unpacking */
859     }
860
861     /* default exit for most messages: check minsize and store buffer in lparam */
862     if (size < minsize) return FALSE;
863     *lparam = (LPARAM)*buffer;
864     return TRUE;
865 }
866
867
868 /***********************************************************************
869  *              pack_reply
870  *
871  * Pack a reply to a message for sending to another process.
872  */
873 static void pack_reply( HWND hwnd, UINT message, WPARAM wparam, LPARAM lparam,
874                         LRESULT res, struct packed_message *data )
875 {
876     data->count = 0;
877     switch(message)
878     {
879     case WM_NCCREATE:
880     case WM_CREATE:
881         push_data( data, (CREATESTRUCTW *)lparam, sizeof(CREATESTRUCTW) );
882         break;
883     case WM_GETTEXT:
884     case CB_GETLBTEXT:
885     case LB_GETTEXT:
886         push_data( data, (WCHAR *)lparam, (res + 1) * sizeof(WCHAR) );
887         break;
888     case WM_GETMINMAXINFO:
889         push_data( data, (MINMAXINFO *)lparam, sizeof(MINMAXINFO) );
890         break;
891     case WM_MEASUREITEM:
892         push_data( data, (MEASUREITEMSTRUCT *)lparam, sizeof(MEASUREITEMSTRUCT) );
893         break;
894     case WM_WINDOWPOSCHANGING:
895     case WM_WINDOWPOSCHANGED:
896         push_data( data, (WINDOWPOS *)lparam, sizeof(WINDOWPOS) );
897         break;
898     case WM_GETDLGCODE:
899         if (lparam) push_data( data, (MSG *)lparam, sizeof(MSG) );
900         break;
901     case SBM_GETSCROLLINFO:
902         push_data( data, (SCROLLINFO *)lparam, sizeof(SCROLLINFO) );
903         break;
904     case EM_GETRECT:
905     case LB_GETITEMRECT:
906     case CB_GETDROPPEDCONTROLRECT:
907     case WM_SIZING:
908     case WM_MOVING:
909         push_data( data, (RECT *)lparam, sizeof(RECT) );
910         break;
911     case EM_GETLINE:
912     {
913         WORD *ptr = (WORD *)lparam;
914         push_data( data, ptr, ptr[-1] * sizeof(WCHAR) );
915         break;
916     }
917     case LB_GETSELITEMS:
918         push_data( data, (UINT *)lparam, wparam * sizeof(UINT) );
919         break;
920     case WM_MDIGETACTIVE:
921         if (lparam) push_data( data, (BOOL *)lparam, sizeof(BOOL) );
922         break;
923     case WM_NCCALCSIZE:
924         if (!wparam)
925             push_data( data, (RECT *)lparam, sizeof(RECT) );
926         else
927         {
928             NCCALCSIZE_PARAMS *nc = (NCCALCSIZE_PARAMS *)lparam;
929             push_data( data, nc, sizeof(*nc) );
930             push_data( data, nc->lppos, sizeof(*nc->lppos) );
931         }
932         break;
933     case EM_GETSEL:
934     case SBM_GETRANGE:
935     case CB_GETEDITSEL:
936         if (wparam) push_data( data, (DWORD *)wparam, sizeof(DWORD) );
937         if (lparam) push_data( data, (DWORD *)lparam, sizeof(DWORD) );
938         break;
939     case WM_NEXTMENU:
940         push_data( data, (MDINEXTMENU *)lparam, sizeof(MDINEXTMENU) );
941         break;
942     case WM_MDICREATE:
943         push_data( data, (MDICREATESTRUCTW *)lparam, sizeof(MDICREATESTRUCTW) );
944         break;
945     case WM_ASKCBFORMATNAME:
946         push_data( data, (WCHAR *)lparam, (strlenW((WCHAR *)lparam) + 1) * sizeof(WCHAR) );
947         break;
948     }
949 }
950
951
952 /***********************************************************************
953  *              unpack_reply
954  *
955  * Unpack a message reply received from another process.
956  */
957 static void unpack_reply( HWND hwnd, UINT message, WPARAM wparam, LPARAM lparam,
958                           void *buffer, size_t size )
959 {
960     switch(message)
961     {
962     case WM_NCCREATE:
963     case WM_CREATE:
964     {
965         CREATESTRUCTW *cs = (CREATESTRUCTW *)lparam;
966         LPCWSTR name = cs->lpszName, class = cs->lpszClass;
967         memcpy( cs, buffer, min( sizeof(*cs), size ));
968         cs->lpszName = name;  /* restore the original pointers */
969         cs->lpszClass = class;
970         break;
971     }
972     case WM_GETTEXT:
973     case WM_ASKCBFORMATNAME:
974         memcpy( (WCHAR *)lparam, buffer, min( wparam*sizeof(WCHAR), size ));
975         break;
976     case WM_GETMINMAXINFO:
977         memcpy( (MINMAXINFO *)lparam, buffer, min( sizeof(MINMAXINFO), size ));
978         break;
979     case WM_MEASUREITEM:
980         memcpy( (MEASUREITEMSTRUCT *)lparam, buffer, min( sizeof(MEASUREITEMSTRUCT), size ));
981         break;
982     case WM_WINDOWPOSCHANGING:
983     case WM_WINDOWPOSCHANGED:
984         memcpy( (WINDOWPOS *)lparam, buffer, min( sizeof(WINDOWPOS), size ));
985         break;
986     case WM_GETDLGCODE:
987         if (lparam) memcpy( (MSG *)lparam, buffer, min( sizeof(MSG), size ));
988         break;
989     case SBM_GETSCROLLINFO:
990         memcpy( (SCROLLINFO *)lparam, buffer, min( sizeof(SCROLLINFO), size ));
991         break;
992     case EM_GETRECT:
993     case CB_GETDROPPEDCONTROLRECT:
994     case LB_GETITEMRECT:
995     case WM_SIZING:
996     case WM_MOVING:
997         memcpy( (RECT *)lparam, buffer, min( sizeof(RECT), size ));
998         break;
999     case EM_GETLINE:
1000         size = min( size, (size_t)*(WORD *)lparam );
1001         memcpy( (WCHAR *)lparam, buffer, size );
1002         break;
1003     case LB_GETSELITEMS:
1004         memcpy( (UINT *)lparam, buffer, min( wparam*sizeof(UINT), size ));
1005         break;
1006     case LB_GETTEXT:
1007     case CB_GETLBTEXT:
1008         memcpy( (WCHAR *)lparam, buffer, size );
1009         break;
1010     case WM_NEXTMENU:
1011         memcpy( (MDINEXTMENU *)lparam, buffer, min( sizeof(MDINEXTMENU), size ));
1012         break;
1013     case WM_MDIGETACTIVE:
1014         if (lparam) memcpy( (BOOL *)lparam, buffer, min( sizeof(BOOL), size ));
1015         break;
1016     case WM_NCCALCSIZE:
1017         if (!wparam)
1018             memcpy( (RECT *)lparam, buffer, min( sizeof(RECT), size ));
1019         else
1020         {
1021             NCCALCSIZE_PARAMS *nc = (NCCALCSIZE_PARAMS *)lparam;
1022             WINDOWPOS *wp = nc->lppos;
1023             memcpy( nc, buffer, min( sizeof(*nc), size ));
1024             if (size > sizeof(*nc))
1025             {
1026                 size -= sizeof(*nc);
1027                 memcpy( wp, (NCCALCSIZE_PARAMS*)buffer + 1, min( sizeof(*wp), size ));
1028             }
1029             nc->lppos = wp;  /* restore the original pointer */
1030         }
1031         break;
1032     case EM_GETSEL:
1033     case SBM_GETRANGE:
1034     case CB_GETEDITSEL:
1035         if (wparam)
1036         {
1037             memcpy( (DWORD *)wparam, buffer, min( sizeof(DWORD), size ));
1038             if (size <= sizeof(DWORD)) break;
1039             size -= sizeof(DWORD);
1040             buffer = (DWORD *)buffer + 1;
1041         }
1042         if (lparam) memcpy( (DWORD *)lparam, buffer, min( sizeof(DWORD), size ));
1043         break;
1044     case WM_MDICREATE:
1045     {
1046         MDICREATESTRUCTW *cs = (MDICREATESTRUCTW *)lparam;
1047         LPCWSTR title = cs->szTitle, class = cs->szClass;
1048         memcpy( cs, buffer, min( sizeof(*cs), size ));
1049         cs->szTitle = title;  /* restore the original pointers */
1050         cs->szClass = class;
1051         break;
1052     }
1053     default:
1054         ERR( "should not happen: unexpected message %x\n", message );
1055         break;
1056     }
1057 }
1058
1059
1060 /***********************************************************************
1061  *           reply_message
1062  *
1063  * Send a reply to a sent message.
1064  */
1065 static void reply_message( struct received_message_info *info, LRESULT result, BOOL remove )
1066 {
1067     struct packed_message data;
1068     int i, replied = info->flags & ISMEX_REPLIED;
1069
1070     if (info->flags & ISMEX_NOTIFY) return;  /* notify messages don't get replies */
1071     if (!remove && replied) return;  /* replied already */
1072
1073     data.count = 0;
1074     info->flags |= ISMEX_REPLIED;
1075
1076     if (info->type == MSG_OTHER_PROCESS && !replied)
1077     {
1078         pack_reply( info->msg.hwnd, info->msg.message, info->msg.wParam,
1079                     info->msg.lParam, result, &data );
1080     }
1081
1082     SERVER_START_REQ( reply_message )
1083     {
1084         req->type   = info->type;
1085         req->result = result;
1086         req->remove = remove;
1087         for (i = 0; i < data.count; i++) wine_server_add_data( req, data.data[i], data.size[i] );
1088         wine_server_call( req );
1089     }
1090     SERVER_END_REQ;
1091 }
1092
1093
1094 /***********************************************************************
1095  *           handle_internal_message
1096  *
1097  * Handle an internal Wine message instead of calling the window proc.
1098  */
1099 static LRESULT handle_internal_message( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam )
1100 {
1101     if (hwnd == GetDesktopWindow()) return 0;
1102     switch(msg)
1103     {
1104     case WM_WINE_DESTROYWINDOW:
1105         return WIN_DestroyWindow( hwnd );
1106     case WM_WINE_SETWINDOWPOS:
1107         return USER_Driver.pSetWindowPos( (WINDOWPOS *)lparam );
1108     case WM_WINE_SHOWWINDOW:
1109         return ShowWindow( hwnd, wparam );
1110     case WM_WINE_SETPARENT:
1111         return (LRESULT)SetParent( hwnd, (HWND)wparam );
1112     case WM_WINE_SETWINDOWLONG:
1113         return (LRESULT)SetWindowLongW( hwnd, wparam, lparam );
1114     case WM_WINE_ENABLEWINDOW:
1115         return EnableWindow( hwnd, wparam );
1116     case WM_WINE_SETACTIVEWINDOW:
1117         return (LRESULT)SetActiveWindow( (HWND)wparam );
1118     case WM_WINE_KEYBOARD_LL_HOOK:
1119         return HOOK_CallHooks( WH_KEYBOARD_LL, HC_ACTION, wparam, lparam, TRUE );
1120     case WM_WINE_MOUSE_LL_HOOK:
1121         return HOOK_CallHooks( WH_MOUSE_LL, HC_ACTION, wparam, lparam, TRUE );
1122     default:
1123         FIXME( "unknown internal message %x\n", msg );
1124         return 0;
1125     }
1126 }
1127
1128 /* since the WM_DDE_ACK response to a WM_DDE_EXECUTE message should contain the handle
1129  * to the memory handle, we keep track (in the server side) of all pairs of handle
1130  * used (the client passes its value and the content of the memory handle), and
1131  * the server stored both values (the client, and the local one, created after the
1132  * content). When a ACK message is generated, the list of pair is searched for a
1133  * matching pair, so that the client memory handle can be returned.
1134  */
1135 struct DDE_pair {
1136     HGLOBAL     client_hMem;
1137     HGLOBAL     server_hMem;
1138 };
1139
1140 static      struct DDE_pair*    dde_pairs;
1141 static      int                 dde_num_alloc;
1142 static      int                 dde_num_used;
1143
1144 static CRITICAL_SECTION dde_crst;
1145 static CRITICAL_SECTION_DEBUG critsect_debug =
1146 {
1147     0, 0, &dde_crst,
1148     { &critsect_debug.ProcessLocksList, &critsect_debug.ProcessLocksList },
1149       0, 0, { 0, (DWORD)(__FILE__ ": dde_crst") }
1150 };
1151 static CRITICAL_SECTION dde_crst = { &critsect_debug, -1, 0, 0, 0, 0 };
1152
1153 static BOOL dde_add_pair(HGLOBAL chm, HGLOBAL shm)
1154 {
1155     int  i;
1156 #define GROWBY  4
1157
1158     EnterCriticalSection(&dde_crst);
1159
1160     /* now remember the pair of hMem on both sides */
1161     if (dde_num_used == dde_num_alloc)
1162     {
1163         struct DDE_pair* tmp;
1164         if (dde_pairs)
1165             tmp  = HeapReAlloc( GetProcessHeap(), 0, dde_pairs,
1166                                             (dde_num_alloc + GROWBY) * sizeof(struct DDE_pair));
1167         else
1168             tmp  = HeapAlloc( GetProcessHeap(), 0, 
1169                                             (dde_num_alloc + GROWBY) * sizeof(struct DDE_pair));
1170
1171         if (!tmp)
1172         {
1173             LeaveCriticalSection(&dde_crst);
1174             return FALSE;
1175         }
1176         dde_pairs = tmp;
1177         /* zero out newly allocated part */
1178         memset(&dde_pairs[dde_num_alloc], 0, GROWBY * sizeof(struct DDE_pair));
1179         dde_num_alloc += GROWBY;
1180     }
1181 #undef GROWBY
1182     for (i = 0; i < dde_num_alloc; i++)
1183     {
1184         if (dde_pairs[i].server_hMem == 0)
1185         {
1186             dde_pairs[i].client_hMem = chm;
1187             dde_pairs[i].server_hMem = shm;
1188             dde_num_used++;
1189             break;
1190         }
1191     }
1192     LeaveCriticalSection(&dde_crst);
1193     return TRUE;
1194 }
1195
1196 static HGLOBAL dde_get_pair(HGLOBAL shm)
1197 {
1198     int  i;
1199     HGLOBAL     ret = 0;
1200
1201     EnterCriticalSection(&dde_crst);
1202     for (i = 0; i < dde_num_alloc; i++)
1203     {
1204         if (dde_pairs[i].server_hMem == shm)
1205         {
1206             /* free this pair */
1207             dde_pairs[i].server_hMem = 0;
1208             dde_num_used--;
1209             ret = dde_pairs[i].client_hMem;
1210             break;
1211         }
1212     }
1213     LeaveCriticalSection(&dde_crst);
1214     return ret;
1215 }
1216
1217 /***********************************************************************
1218  *              post_dde_message
1219  *
1220  * Post a DDE message
1221  */
1222 static BOOL post_dde_message( DWORD dest_tid, struct packed_message *data, const struct send_message_info *info )
1223 {
1224     void*       ptr = NULL;
1225     int         size = 0;
1226     UINT        uiLo, uiHi;
1227     LPARAM      lp = 0;
1228     HGLOBAL     hunlock = 0;
1229     int         i;
1230     DWORD       res;
1231
1232     if (!UnpackDDElParam( info->msg, info->lparam, &uiLo, &uiHi ))
1233         return FALSE;
1234
1235     lp = info->lparam;
1236     switch (info->msg)
1237     {
1238         /* DDE messages which don't require packing are:
1239          * WM_DDE_INITIATE
1240          * WM_DDE_TERMINATE
1241          * WM_DDE_REQUEST
1242          * WM_DDE_UNADVISE
1243          */
1244     case WM_DDE_ACK:
1245         if (HIWORD(uiHi))
1246         {
1247             /* uiHi should contain a hMem from WM_DDE_EXECUTE */
1248             HGLOBAL h = dde_get_pair( (HANDLE)uiHi );
1249             if (h)
1250             {
1251                 /* send back the value of h on the other side */
1252                 push_data( data, &h, sizeof(HGLOBAL) );
1253                 lp = uiLo;
1254                 TRACE( "send dde-ack %x %08x => %08lx\n", uiLo, uiHi, (DWORD)h );
1255             }
1256         }
1257         else
1258         {
1259             /* uiHi should contain either an atom or 0 */
1260             TRACE( "send dde-ack %x atom=%x\n", uiLo, uiHi );
1261             lp = MAKELONG( uiLo, uiHi );
1262         }
1263         break;
1264     case WM_DDE_ADVISE:
1265     case WM_DDE_DATA:
1266     case WM_DDE_POKE:
1267         size = 0;
1268         if (uiLo)
1269         {
1270             size = GlobalSize( (HGLOBAL)uiLo ) ;
1271             if ((info->msg == WM_DDE_ADVISE && size < sizeof(DDEADVISE)) ||
1272                 (info->msg == WM_DDE_DATA   && size < sizeof(DDEDATA))   ||
1273                 (info->msg == WM_DDE_POKE   && size < sizeof(DDEPOKE))
1274                 )
1275             return FALSE;
1276         }
1277         else if (info->msg != WM_DDE_DATA) return FALSE;
1278
1279         lp = uiHi;
1280         if (uiLo)
1281         {
1282             if ((ptr = GlobalLock( (HGLOBAL)uiLo) ))
1283             {
1284                 DDEDATA *dde_data = (DDEDATA *)ptr;
1285                 TRACE("unused %d, fResponse %d, fRelease %d, fDeferUpd %d, fAckReq %d, cfFormat %d\n",
1286                        dde_data->unused, dde_data->fResponse, dde_data->fRelease,
1287                        dde_data->reserved, dde_data->fAckReq, dde_data->cfFormat);
1288                 push_data( data, ptr, size );
1289                 hunlock = (HGLOBAL)uiLo;
1290             }
1291         }
1292         TRACE( "send ddepack %u %x\n", size, uiHi );
1293         break;
1294     case WM_DDE_EXECUTE:
1295         if (info->lparam)
1296         {
1297             if ((ptr = GlobalLock( (HGLOBAL)info->lparam) ))
1298             {
1299                 push_data(data, ptr, GlobalSize( (HGLOBAL)info->lparam ));
1300                 /* so that the other side can send it back on ACK */
1301                 lp = info->lparam;
1302                 hunlock = (HGLOBAL)info->lparam;
1303             }
1304         }
1305         break;
1306     }
1307     SERVER_START_REQ( send_message )
1308     {
1309         req->id      = dest_tid;
1310         req->type    = info->type;
1311         req->flags   = 0;
1312         req->win     = info->hwnd;
1313         req->msg     = info->msg;
1314         req->wparam  = info->wparam;
1315         req->lparam  = lp;
1316         req->time    = GetCurrentTime();
1317         req->timeout = -1;
1318         for (i = 0; i < data->count; i++)
1319             wine_server_add_data( req, data->data[i], data->size[i] );
1320         if ((res = wine_server_call( req )))
1321         {
1322             if (res == STATUS_INVALID_PARAMETER)
1323                 /* FIXME: find a STATUS_ value for this one */
1324                 SetLastError( ERROR_INVALID_THREAD_ID );
1325             else
1326                 SetLastError( RtlNtStatusToDosError(res) );
1327         }
1328         else
1329             FreeDDElParam(info->msg, info->lparam);
1330     }
1331     SERVER_END_REQ;
1332     if (hunlock) GlobalUnlock(hunlock);
1333
1334     return !res;
1335 }
1336
1337 /***********************************************************************
1338  *              unpack_dde_message
1339  *
1340  * Unpack a posted DDE message received from another process.
1341  */
1342 static BOOL unpack_dde_message( HWND hwnd, UINT message, WPARAM *wparam, LPARAM *lparam,
1343                                 void **buffer, size_t size )
1344 {
1345     UINT        uiLo, uiHi;
1346     HGLOBAL     hMem = 0;
1347     void*       ptr;
1348
1349     switch (message)
1350     {
1351     case WM_DDE_ACK:
1352         if (size)
1353         {
1354             /* hMem is being passed */
1355             if (size != sizeof(HGLOBAL)) return FALSE;
1356             if (!buffer || !*buffer) return FALSE;
1357             uiLo = *lparam;
1358             memcpy( &hMem, *buffer, size );
1359             uiHi = (UINT)hMem;
1360             TRACE("recv dde-ack %x mem=%x[%lx]\n", uiLo, uiHi, GlobalSize( hMem ));
1361         }
1362         else
1363         {
1364             uiLo = LOWORD( *lparam );
1365             uiHi = HIWORD( *lparam );
1366             TRACE("recv dde-ack %x atom=%x\n", uiLo, uiHi);
1367         }
1368         *lparam = PackDDElParam( WM_DDE_ACK, uiLo, uiHi );
1369         break;
1370     case WM_DDE_ADVISE:
1371     case WM_DDE_DATA:
1372     case WM_DDE_POKE:
1373         if ((!buffer || !*buffer) && message != WM_DDE_DATA) return FALSE;
1374         uiHi = *lparam;
1375         TRACE( "recv ddepack %u %x\n", size, uiHi );
1376         if (size)
1377         {
1378             hMem = GlobalAlloc( GMEM_MOVEABLE|GMEM_DDESHARE, size );
1379             if (hMem && (ptr = GlobalLock( hMem )))
1380             {
1381                 memcpy( ptr, *buffer, size );
1382                 GlobalUnlock( hMem );
1383             }
1384             else return FALSE;
1385         }
1386         uiLo = (UINT)hMem;
1387
1388         *lparam = PackDDElParam( message, uiLo, uiHi );
1389         break;
1390     case WM_DDE_EXECUTE:
1391         if (size)
1392         {
1393             if (!buffer || !*buffer) return FALSE;
1394             hMem = GlobalAlloc( GMEM_MOVEABLE|GMEM_DDESHARE, size );
1395             if (hMem && (ptr = GlobalLock( hMem )))
1396             {
1397                 memcpy( ptr, *buffer, size );
1398                 GlobalUnlock( hMem );
1399                 TRACE( "exec: pairing c=%08lx s=%08lx\n", *lparam, (DWORD)hMem );
1400                 if (!dde_add_pair( (HGLOBAL)*lparam, hMem ))
1401                 {
1402                     GlobalFree( hMem );
1403                     return FALSE;
1404                 }
1405             }
1406         } else return FALSE;
1407         *lparam = (LPARAM)hMem;
1408         break;
1409     }
1410     return TRUE;
1411 }
1412
1413 /***********************************************************************
1414  *           call_window_proc
1415  *
1416  * Call a window procedure and the corresponding hooks.
1417  */
1418 static LRESULT call_window_proc( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam,
1419                                  BOOL unicode, BOOL same_thread )
1420 {
1421     LRESULT result = 0;
1422     WNDPROC winproc;
1423     CWPSTRUCT cwp;
1424     CWPRETSTRUCT cwpret;
1425     MESSAGEQUEUE *queue = QUEUE_Current();
1426
1427     if (queue->recursion_count > MAX_SENDMSG_RECURSION) return 0;
1428     queue->recursion_count++;
1429
1430     if (msg & 0x80000000)
1431     {
1432         result = handle_internal_message( hwnd, msg, wparam, lparam );
1433         goto done;
1434     }
1435
1436     /* first the WH_CALLWNDPROC hook */
1437     hwnd = WIN_GetFullHandle( hwnd );
1438     cwp.lParam  = lparam;
1439     cwp.wParam  = wparam;
1440     cwp.message = msg;
1441     cwp.hwnd    = hwnd;
1442     HOOK_CallHooks( WH_CALLWNDPROC, HC_ACTION, same_thread, (LPARAM)&cwp, unicode );
1443
1444     /* now call the window procedure */
1445     if (unicode)
1446     {
1447         if (!(winproc = (WNDPROC)GetWindowLongW( hwnd, GWL_WNDPROC ))) goto done;
1448         result = CallWindowProcW( winproc, hwnd, msg, wparam, lparam );
1449     }
1450     else
1451     {
1452         if (!(winproc = (WNDPROC)GetWindowLongA( hwnd, GWL_WNDPROC ))) goto done;
1453         result = CallWindowProcA( winproc, hwnd, msg, wparam, lparam );
1454     }
1455
1456     /* and finally the WH_CALLWNDPROCRET hook */
1457     cwpret.lResult = result;
1458     cwpret.lParam  = lparam;
1459     cwpret.wParam  = wparam;
1460     cwpret.message = msg;
1461     cwpret.hwnd    = hwnd;
1462     HOOK_CallHooks( WH_CALLWNDPROCRET, HC_ACTION, same_thread, (LPARAM)&cwpret, unicode );
1463  done:
1464     queue->recursion_count--;
1465     return result;
1466 }
1467
1468
1469 /***********************************************************************
1470  *           process_hardware_message
1471  *
1472  * Process a hardware message; return TRUE if message should be passed on to the app
1473  */
1474 static BOOL process_hardware_message( MSG *msg, ULONG_PTR extra_info, HWND hwnd,
1475                                       UINT first, UINT last, BOOL remove )
1476 {
1477     BOOL ret;
1478
1479     if (!MSG_process_raw_hardware_message( msg, extra_info, hwnd, first, last, remove ))
1480         return FALSE;
1481
1482     ret = MSG_process_cooked_hardware_message( msg, extra_info, remove );
1483
1484     /* tell the server we have passed it to the app
1485      * (even though we may end up dropping it later on)
1486      */
1487     SERVER_START_REQ( reply_message )
1488     {
1489         req->type   = MSG_HARDWARE;
1490         req->result = 0;
1491         req->remove = remove || !ret;
1492         wine_server_call( req );
1493     }
1494     SERVER_END_REQ;
1495     return ret;
1496 }
1497
1498
1499 /***********************************************************************
1500  *           call_sendmsg_callback
1501  *
1502  * Call the callback function of SendMessageCallback.
1503  */
1504 static inline void call_sendmsg_callback( SENDASYNCPROC callback, HWND hwnd, UINT msg,
1505                                           ULONG_PTR data, LRESULT result )
1506 {
1507     if (TRACE_ON(relay))
1508         DPRINTF( "%04lx:Call message callback %p (hwnd=%p,msg=%s,data=%08lx,result=%08lx)\n",
1509                  GetCurrentThreadId(), callback, hwnd, SPY_GetMsgName( msg, hwnd ),
1510                  data, result );
1511     callback( hwnd, msg, data, result );
1512     if (TRACE_ON(relay))
1513         DPRINTF( "%04lx:Ret  message callback %p (hwnd=%p,msg=%s,data=%08lx,result=%08lx)\n",
1514                  GetCurrentThreadId(), callback, hwnd, SPY_GetMsgName( msg, hwnd ),
1515                  data, result );
1516 }
1517
1518
1519 /***********************************************************************
1520  *           MSG_peek_message
1521  *
1522  * Peek for a message matching the given parameters. Return FALSE if none available.
1523  * All pending sent messages are processed before returning.
1524  */
1525 BOOL MSG_peek_message( MSG *msg, HWND hwnd, UINT first, UINT last, int flags )
1526 {
1527     LRESULT result;
1528     ULONG_PTR extra_info = 0;
1529     MESSAGEQUEUE *queue = QUEUE_Current();
1530     struct received_message_info info, *old_info;
1531
1532     if (!first && !last) last = ~0;
1533
1534     for (;;)
1535     {
1536         NTSTATUS res;
1537         void *buffer = NULL;
1538         size_t size = 0, buffer_size = 0;
1539
1540         do  /* loop while buffer is too small */
1541         {
1542             if (buffer_size && !(buffer = HeapAlloc( GetProcessHeap(), 0, buffer_size )))
1543                 return FALSE;
1544             SERVER_START_REQ( get_message )
1545             {
1546                 req->flags     = flags;
1547                 req->get_win   = hwnd;
1548                 req->get_first = first;
1549                 req->get_last  = last;
1550                 if (buffer_size) wine_server_set_reply( req, buffer, buffer_size );
1551                 if (!(res = wine_server_call( req )))
1552                 {
1553                     size = wine_server_reply_size( reply );
1554                     info.type        = reply->type;
1555                     info.msg.hwnd    = reply->win;
1556                     info.msg.message = reply->msg;
1557                     info.msg.wParam  = reply->wparam;
1558                     info.msg.lParam  = reply->lparam;
1559                     info.msg.time    = reply->time;
1560                     info.msg.pt.x    = reply->x;
1561                     info.msg.pt.y    = reply->y;
1562                     extra_info       = reply->info;
1563                 }
1564                 else
1565                 {
1566                     if (buffer) HeapFree( GetProcessHeap(), 0, buffer );
1567                     buffer_size = reply->total;
1568                 }
1569             }
1570             SERVER_END_REQ;
1571         } while (res == STATUS_BUFFER_OVERFLOW);
1572
1573         if (res) return FALSE;
1574
1575         TRACE( "got type %d msg %x (%s) hwnd %p wp %x lp %lx\n",
1576                info.type, info.msg.message, SPY_GetMsgName(info.msg.message, info.msg.hwnd),
1577                info.msg.hwnd, info.msg.wParam, info.msg.lParam );
1578
1579         switch(info.type)
1580         {
1581         case MSG_ASCII:
1582         case MSG_UNICODE:
1583             info.flags = ISMEX_SEND;
1584             break;
1585         case MSG_NOTIFY:
1586             info.flags = ISMEX_NOTIFY;
1587             break;
1588         case MSG_CALLBACK:
1589             info.flags = ISMEX_CALLBACK;
1590             break;
1591         case MSG_CALLBACK_RESULT:
1592             call_sendmsg_callback( (SENDASYNCPROC)info.msg.wParam, info.msg.hwnd,
1593                                    info.msg.message, extra_info, info.msg.lParam );
1594             goto next;
1595         case MSG_OTHER_PROCESS:
1596             info.flags = ISMEX_SEND;
1597             if (!unpack_message( info.msg.hwnd, info.msg.message, &info.msg.wParam,
1598                                  &info.msg.lParam, &buffer, size ))
1599             {
1600                 ERR( "invalid packed message %x (%s) hwnd %p wp %x lp %lx size %d\n",
1601                      info.msg.message, SPY_GetMsgName(info.msg.message, info.msg.hwnd), info.msg.hwnd,
1602                      info.msg.wParam, info.msg.lParam, size );
1603                 /* ignore it */
1604                 reply_message( &info, 0, TRUE );
1605                 goto next;
1606             }
1607             break;
1608         case MSG_HARDWARE:
1609             if (!process_hardware_message( &info.msg, extra_info,
1610                                            hwnd, first, last, flags & GET_MSG_REMOVE ))
1611             {
1612                 TRACE("dropping msg %x\n", info.msg.message );
1613                 goto next;  /* ignore it */
1614             }
1615             queue->GetMessagePosVal = MAKELONG( info.msg.pt.x, info.msg.pt.y );
1616             /* fall through */
1617         case MSG_POSTED:
1618             queue->GetMessageExtraInfoVal = extra_info;
1619             if (info.msg.message >= WM_DDE_FIRST && info.msg.message <= WM_DDE_LAST)
1620             {
1621                 if (!unpack_dde_message( info.msg.hwnd, info.msg.message, &info.msg.wParam,
1622                                          &info.msg.lParam, &buffer, size ))
1623                 {
1624                     ERR( "invalid packed dde-message %x (%s) hwnd %p wp %x lp %lx size %d\n",
1625                          info.msg.message, SPY_GetMsgName(info.msg.message, info.msg.hwnd),
1626                          info.msg.hwnd, info.msg.wParam, info.msg.lParam, size );
1627                     goto next;  /* ignore it */
1628                 }
1629             }
1630             *msg = info.msg;
1631             if (buffer) HeapFree( GetProcessHeap(), 0, buffer );
1632             return TRUE;
1633         }
1634
1635         /* if we get here, we have a sent message; call the window procedure */
1636         old_info = queue->receive_info;
1637         queue->receive_info = &info;
1638         result = call_window_proc( info.msg.hwnd, info.msg.message, info.msg.wParam,
1639                                    info.msg.lParam, (info.type != MSG_ASCII), FALSE );
1640         reply_message( &info, result, TRUE );
1641         queue->receive_info = old_info;
1642     next:
1643         if (buffer) HeapFree( GetProcessHeap(), 0, buffer );
1644     }
1645 }
1646
1647
1648 /***********************************************************************
1649  *           wait_message_reply
1650  *
1651  * Wait until a sent message gets replied to.
1652  */
1653 static void wait_message_reply( UINT flags )
1654 {
1655     MESSAGEQUEUE *queue;
1656
1657     if (!(queue = QUEUE_Current())) return;
1658
1659     for (;;)
1660     {
1661         unsigned int wake_bits = 0, changed_bits = 0;
1662         DWORD dwlc, res;
1663
1664         SERVER_START_REQ( set_queue_mask )
1665         {
1666             req->wake_mask    = QS_SMRESULT | ((flags & SMTO_BLOCK) ? 0 : QS_SENDMESSAGE);
1667             req->changed_mask = req->wake_mask;
1668             req->skip_wait    = 1;
1669             if (!wine_server_call( req ))
1670             {
1671                 wake_bits    = reply->wake_bits;
1672                 changed_bits = reply->changed_bits;
1673             }
1674         }
1675         SERVER_END_REQ;
1676
1677         if (wake_bits & QS_SMRESULT) return;  /* got a result */
1678         if (wake_bits & QS_SENDMESSAGE)
1679         {
1680             /* Process the sent message immediately */
1681             MSG msg;
1682             MSG_peek_message( &msg, 0, 0, 0, GET_MSG_REMOVE | GET_MSG_SENT_ONLY );
1683             continue;
1684         }
1685
1686         /* now wait for it */
1687
1688         ReleaseThunkLock( &dwlc );
1689
1690         if (USER_Driver.pMsgWaitForMultipleObjectsEx)
1691             res = USER_Driver.pMsgWaitForMultipleObjectsEx( 1, &queue->server_queue,
1692                                                             INFINITE, 0, 0 );
1693         else
1694             res = WaitForSingleObject( queue->server_queue, INFINITE );
1695
1696         if (dwlc) RestoreThunkLock( dwlc );
1697     }
1698 }
1699
1700 /***********************************************************************
1701  *              put_message_in_queue
1702  *
1703  * Put a sent message into the destination queue.
1704  * For inter-process message, reply_size is set to expected size of reply data.
1705  */
1706 static BOOL put_message_in_queue( DWORD dest_tid, const struct send_message_info *info,
1707                                   size_t *reply_size )
1708 {
1709     struct packed_message data;
1710     unsigned int res;
1711     int i, timeout = -1;
1712
1713     if (info->type != MSG_NOTIFY &&
1714         info->type != MSG_CALLBACK &&
1715         info->type != MSG_POSTED &&
1716         info->timeout != INFINITE)
1717         timeout = info->timeout;
1718
1719     data.count = 0;
1720     if (info->type == MSG_OTHER_PROCESS)
1721     {
1722         *reply_size = pack_message( info->hwnd, info->msg, info->wparam, info->lparam, &data );
1723         if (data.count == -1)
1724         {
1725             WARN( "cannot pack message %x\n", info->msg );
1726             return FALSE;
1727         }
1728     }
1729     else if (info->type == MSG_POSTED && info->msg >= WM_DDE_FIRST && info->msg <= WM_DDE_LAST)
1730     {
1731         return post_dde_message( dest_tid, &data, info );
1732     }
1733
1734     SERVER_START_REQ( send_message )
1735     {
1736         req->id      = dest_tid;
1737         req->type    = info->type;
1738         req->flags   = 0;
1739         req->win     = info->hwnd;
1740         req->msg     = info->msg;
1741         req->wparam  = info->wparam;
1742         req->lparam  = info->lparam;
1743         req->time    = GetCurrentTime();
1744         req->timeout = timeout;
1745
1746         if (info->type == MSG_CALLBACK)
1747         {
1748             req->callback = info->callback;
1749             req->info     = info->data;
1750         }
1751
1752         if (info->flags & SMTO_ABORTIFHUNG) req->flags |= SEND_MSG_ABORT_IF_HUNG;
1753         for (i = 0; i < data.count; i++) wine_server_add_data( req, data.data[i], data.size[i] );
1754         if ((res = wine_server_call( req )))
1755         {
1756             if (res == STATUS_INVALID_PARAMETER)
1757                 /* FIXME: find a STATUS_ value for this one */
1758                 SetLastError( ERROR_INVALID_THREAD_ID );
1759             else
1760                 SetLastError( RtlNtStatusToDosError(res) );
1761         }
1762     }
1763     SERVER_END_REQ;
1764     return !res;
1765 }
1766
1767
1768 /***********************************************************************
1769  *              retrieve_reply
1770  *
1771  * Retrieve a message reply from the server.
1772  */
1773 static LRESULT retrieve_reply( const struct send_message_info *info,
1774                                size_t reply_size, LRESULT *result )
1775 {
1776     NTSTATUS status;
1777     void *reply_data = NULL;
1778
1779     if (reply_size)
1780     {
1781         if (!(reply_data = HeapAlloc( GetProcessHeap(), 0, reply_size )))
1782         {
1783             WARN( "no memory for reply %d bytes, will be truncated\n", reply_size );
1784             reply_size = 0;
1785         }
1786     }
1787     SERVER_START_REQ( get_message_reply )
1788     {
1789         req->cancel = 1;
1790         if (reply_size) wine_server_set_reply( req, reply_data, reply_size );
1791         if (!(status = wine_server_call( req ))) *result = reply->result;
1792         reply_size = wine_server_reply_size( reply );
1793     }
1794     SERVER_END_REQ;
1795     if (!status && reply_size)
1796         unpack_reply( info->hwnd, info->msg, info->wparam, info->lparam, reply_data, reply_size );
1797
1798     if (reply_data) HeapFree( GetProcessHeap(), 0, reply_data );
1799
1800     TRACE( "hwnd %p msg %x (%s) wp %x lp %lx got reply %lx (err=%ld)\n",
1801            info->hwnd, info->msg, SPY_GetMsgName(info->msg, info->hwnd), info->wparam,
1802            info->lparam, *result, status );
1803
1804     /* MSDN states that last error is 0 on timeout, but at least NT4 returns ERROR_TIMEOUT */
1805     if (status) SetLastError( RtlNtStatusToDosError(status) );
1806     return !status;
1807 }
1808
1809
1810 /***********************************************************************
1811  *              send_inter_thread_message
1812  */
1813 static LRESULT send_inter_thread_message( DWORD dest_tid, const struct send_message_info *info,
1814                                           LRESULT *res_ptr )
1815 {
1816     LRESULT ret;
1817     int locks;
1818     size_t reply_size = 0;
1819
1820     TRACE( "hwnd %p msg %x (%s) wp %x lp %lx\n",
1821            info->hwnd, info->msg, SPY_GetMsgName(info->msg, info->hwnd), info->wparam, info->lparam );
1822
1823     if (!put_message_in_queue( dest_tid, info, &reply_size )) return 0;
1824
1825     /* there's no reply to wait for on notify/callback messages */
1826     if (info->type == MSG_NOTIFY || info->type == MSG_CALLBACK) return 1;
1827
1828     locks = WIN_SuspendWndsLock();
1829
1830     wait_message_reply( info->flags );
1831     ret = retrieve_reply( info, reply_size, res_ptr );
1832
1833     WIN_RestoreWndsLock( locks );
1834     return ret;
1835 }
1836
1837
1838 /***********************************************************************
1839  *              MSG_SendInternalMessageTimeout
1840  *
1841  * Same as SendMessageTimeoutW but sends the message to a specific thread
1842  * without requiring a window handle. Only works for internal Wine messages.
1843  */
1844 LRESULT MSG_SendInternalMessageTimeout( DWORD dest_pid, DWORD dest_tid,
1845                                         UINT msg, WPARAM wparam, LPARAM lparam,
1846                                         UINT flags, UINT timeout, PDWORD_PTR res_ptr )
1847 {
1848     struct send_message_info info;
1849     LRESULT ret, result;
1850
1851     assert( msg & 0x80000000 );  /* must be an internal Wine message */
1852
1853     info.type    = MSG_UNICODE;
1854     info.hwnd    = 0;
1855     info.msg     = msg;
1856     info.wparam  = wparam;
1857     info.lparam  = lparam;
1858     info.flags   = flags;
1859     info.timeout = timeout;
1860
1861     if (USER_IsExitingThread( dest_tid )) return 0;
1862
1863     if (dest_tid == GetCurrentThreadId())
1864     {
1865         result = handle_internal_message( 0, msg, wparam, lparam );
1866         ret = 1;
1867     }
1868     else
1869     {
1870         if (dest_pid != GetCurrentProcessId()) info.type = MSG_OTHER_PROCESS;
1871         ret = send_inter_thread_message( dest_tid, &info, &result );
1872     }
1873     if (ret && res_ptr) *res_ptr = result;
1874     return ret;
1875 }
1876
1877
1878 /***********************************************************************
1879  *              SendMessageTimeoutW  (USER32.@)
1880  */
1881 LRESULT WINAPI SendMessageTimeoutW( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam,
1882                                     UINT flags, UINT timeout, PDWORD_PTR res_ptr )
1883 {
1884     struct send_message_info info;
1885     DWORD dest_tid, dest_pid;
1886     LRESULT ret, result;
1887
1888     info.type    = MSG_UNICODE;
1889     info.hwnd    = hwnd;
1890     info.msg     = msg;
1891     info.wparam  = wparam;
1892     info.lparam  = lparam;
1893     info.flags   = flags;
1894     info.timeout = timeout;
1895
1896     if (is_broadcast(hwnd))
1897     {
1898         EnumWindows( broadcast_message_callback, (LPARAM)&info );
1899         if (res_ptr) *res_ptr = 1;
1900         return 1;
1901     }
1902
1903     if (!(dest_tid = GetWindowThreadProcessId( hwnd, &dest_pid ))) return 0;
1904
1905     if (USER_IsExitingThread( dest_tid )) return 0;
1906
1907     SPY_EnterMessage( SPY_SENDMESSAGE, hwnd, msg, wparam, lparam );
1908
1909     if (dest_tid == GetCurrentThreadId())
1910     {
1911         result = call_window_proc( hwnd, msg, wparam, lparam, TRUE, TRUE );
1912         ret = 1;
1913     }
1914     else
1915     {
1916         if (dest_pid != GetCurrentProcessId()) info.type = MSG_OTHER_PROCESS;
1917         ret = send_inter_thread_message( dest_tid, &info, &result );
1918     }
1919
1920     SPY_ExitMessage( SPY_RESULT_OK, hwnd, msg, result, wparam, lparam );
1921     if (ret && res_ptr) *res_ptr = result;
1922     return ret;
1923 }
1924
1925
1926 /***********************************************************************
1927  *              SendMessageTimeoutA  (USER32.@)
1928  */
1929 LRESULT WINAPI SendMessageTimeoutA( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam,
1930                                     UINT flags, UINT timeout, PDWORD_PTR res_ptr )
1931 {
1932     struct send_message_info info;
1933     DWORD dest_tid, dest_pid;
1934     LRESULT ret, result;
1935
1936     info.type    = MSG_ASCII;
1937     info.hwnd    = hwnd;
1938     info.msg     = msg;
1939     info.wparam  = wparam;
1940     info.lparam  = lparam;
1941     info.flags   = flags;
1942     info.timeout = timeout;
1943
1944     if (is_broadcast(hwnd))
1945     {
1946         EnumWindows( broadcast_message_callback, (LPARAM)&info );
1947         if (res_ptr) *res_ptr = 1;
1948         return 1;
1949     }
1950
1951     if (!(dest_tid = GetWindowThreadProcessId( hwnd, &dest_pid ))) return 0;
1952
1953     if (USER_IsExitingThread( dest_tid )) return 0;
1954
1955     SPY_EnterMessage( SPY_SENDMESSAGE, hwnd, msg, wparam, lparam );
1956
1957     if (dest_tid == GetCurrentThreadId())
1958     {
1959         result = call_window_proc( hwnd, msg, wparam, lparam, FALSE, TRUE );
1960         ret = 1;
1961     }
1962     else if (dest_pid == GetCurrentProcessId())
1963     {
1964         ret = send_inter_thread_message( dest_tid, &info, &result );
1965     }
1966     else
1967     {
1968         /* inter-process message: need to map to Unicode */
1969         info.type = MSG_OTHER_PROCESS;
1970         if (is_unicode_message( info.msg ))
1971         {
1972             if (WINPROC_MapMsg32ATo32W( info.hwnd, info.msg, &info.wparam, &info.lparam ) == -1)
1973                 return 0;
1974             ret = send_inter_thread_message( dest_tid, &info, &result );
1975             result = WINPROC_UnmapMsg32ATo32W( info.hwnd, info.msg, info.wparam,
1976                                                info.lparam, result );
1977         }
1978         else ret = send_inter_thread_message( dest_tid, &info, &result );
1979     }
1980     SPY_ExitMessage( SPY_RESULT_OK, hwnd, msg, result, wparam, lparam );
1981     if (ret && res_ptr) *res_ptr = result;
1982     return ret;
1983 }
1984
1985
1986 /***********************************************************************
1987  *              SendMessageW  (USER32.@)
1988  */
1989 LRESULT WINAPI SendMessageW( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam )
1990 {
1991     LRESULT res = 0;
1992     SendMessageTimeoutW( hwnd, msg, wparam, lparam, SMTO_NORMAL, INFINITE, &res );
1993     return res;
1994 }
1995
1996
1997 /***********************************************************************
1998  *              SendMessageA  (USER32.@)
1999  */
2000 LRESULT WINAPI SendMessageA( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam )
2001 {
2002     LRESULT res = 0;
2003     SendMessageTimeoutA( hwnd, msg, wparam, lparam, SMTO_NORMAL, INFINITE, &res );
2004     return res;
2005 }
2006
2007
2008 /***********************************************************************
2009  *              SendNotifyMessageA  (USER32.@)
2010  */
2011 BOOL WINAPI SendNotifyMessageA( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam )
2012 {
2013     return SendNotifyMessageW( hwnd, msg, map_wparam_AtoW( msg, wparam ), lparam );
2014 }
2015
2016
2017 /***********************************************************************
2018  *              SendNotifyMessageW  (USER32.@)
2019  */
2020 BOOL WINAPI SendNotifyMessageW( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam )
2021 {
2022     struct send_message_info info;
2023     DWORD dest_tid;
2024     LRESULT result;
2025
2026     if (is_pointer_message(msg))
2027     {
2028         SetLastError(ERROR_INVALID_PARAMETER);
2029         return FALSE;
2030     }
2031
2032     info.type    = MSG_NOTIFY;
2033     info.hwnd    = hwnd;
2034     info.msg     = msg;
2035     info.wparam  = wparam;
2036     info.lparam  = lparam;
2037     info.flags   = 0;
2038
2039     if (is_broadcast(hwnd))
2040     {
2041         EnumWindows( broadcast_message_callback, (LPARAM)&info );
2042         return TRUE;
2043     }
2044
2045     if (!(dest_tid = GetWindowThreadProcessId( hwnd, NULL ))) return FALSE;
2046
2047     if (USER_IsExitingThread( dest_tid )) return TRUE;
2048
2049     if (dest_tid == GetCurrentThreadId())
2050     {
2051         call_window_proc( hwnd, msg, wparam, lparam, TRUE, TRUE );
2052         return TRUE;
2053     }
2054     return send_inter_thread_message( dest_tid, &info, &result );
2055 }
2056
2057
2058 /***********************************************************************
2059  *              SendMessageCallbackA  (USER32.@)
2060  */
2061 BOOL WINAPI SendMessageCallbackA( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam,
2062                                   SENDASYNCPROC callback, ULONG_PTR data )
2063 {
2064     return SendMessageCallbackW( hwnd, msg, map_wparam_AtoW( msg, wparam ),
2065                                  lparam, callback, data );
2066 }
2067
2068
2069 /***********************************************************************
2070  *              SendMessageCallbackW  (USER32.@)
2071  */
2072 BOOL WINAPI SendMessageCallbackW( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam,
2073                                   SENDASYNCPROC callback, ULONG_PTR data )
2074 {
2075     struct send_message_info info;
2076     LRESULT result;
2077     DWORD dest_tid;
2078
2079     if (is_pointer_message(msg))
2080     {
2081         SetLastError(ERROR_INVALID_PARAMETER);
2082         return FALSE;
2083     }
2084
2085     info.type     = MSG_CALLBACK;
2086     info.hwnd     = hwnd;
2087     info.msg      = msg;
2088     info.wparam   = wparam;
2089     info.lparam   = lparam;
2090     info.callback = callback;
2091     info.data     = data;
2092     info.flags    = 0;
2093
2094     if (is_broadcast(hwnd))
2095     {
2096         EnumWindows( broadcast_message_callback, (LPARAM)&info );
2097         return TRUE;
2098     }
2099
2100     if (!(dest_tid = GetWindowThreadProcessId( hwnd, NULL ))) return FALSE;
2101
2102     if (USER_IsExitingThread( dest_tid )) return TRUE;
2103
2104     if (dest_tid == GetCurrentThreadId())
2105     {
2106         result = call_window_proc( hwnd, msg, wparam, lparam, TRUE, TRUE );
2107         call_sendmsg_callback( callback, hwnd, msg, data, result );
2108         return TRUE;
2109     }
2110     FIXME( "callback will not be called\n" );
2111     return send_inter_thread_message( dest_tid, &info, &result );
2112 }
2113
2114
2115 /***********************************************************************
2116  *              ReplyMessage  (USER32.@)
2117  */
2118 BOOL WINAPI ReplyMessage( LRESULT result )
2119 {
2120     MESSAGEQUEUE *queue = QUEUE_Current();
2121     struct received_message_info *info = queue->receive_info;
2122
2123     if (!info) return FALSE;
2124     reply_message( info, result, FALSE );
2125     return TRUE;
2126 }
2127
2128
2129 /***********************************************************************
2130  *              InSendMessage  (USER32.@)
2131  */
2132 BOOL WINAPI InSendMessage(void)
2133 {
2134     return (InSendMessageEx(NULL) & (ISMEX_SEND|ISMEX_REPLIED)) == ISMEX_SEND;
2135 }
2136
2137
2138 /***********************************************************************
2139  *              InSendMessageEx  (USER32.@)
2140  */
2141 DWORD WINAPI InSendMessageEx( LPVOID reserved )
2142 {
2143     MESSAGEQUEUE *queue = QUEUE_Current();
2144     struct received_message_info *info = queue->receive_info;
2145
2146     if (info) return info->flags;
2147     return ISMEX_NOSEND;
2148 }
2149
2150
2151 /***********************************************************************
2152  *              PostMessageA  (USER32.@)
2153  */
2154 BOOL WINAPI PostMessageA( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam )
2155 {
2156     return PostMessageW( hwnd, msg, map_wparam_AtoW( msg, wparam ), lparam );
2157 }
2158
2159
2160 /***********************************************************************
2161  *              PostMessageW  (USER32.@)
2162  */
2163 BOOL WINAPI PostMessageW( HWND hwnd, UINT msg, WPARAM wparam, LPARAM lparam )
2164 {
2165     struct send_message_info info;
2166     DWORD dest_tid;
2167
2168     if (is_pointer_message( msg ))
2169     {
2170         SetLastError( ERROR_INVALID_PARAMETER );
2171         return FALSE;
2172     }
2173
2174     TRACE( "hwnd %p msg %x (%s) wp %x lp %lx\n",
2175            hwnd, msg, SPY_GetMsgName(msg, hwnd), wparam, lparam );
2176
2177     info.type   = MSG_POSTED;
2178     info.hwnd   = hwnd;
2179     info.msg    = msg;
2180     info.wparam = wparam;
2181     info.lparam = lparam;
2182     info.flags  = 0;
2183
2184     if (is_broadcast(hwnd))
2185     {
2186         EnumWindows( broadcast_message_callback, (LPARAM)&info );
2187         return TRUE;
2188     }
2189
2190     if (!hwnd) return PostThreadMessageW( GetCurrentThreadId(), msg, wparam, lparam );
2191
2192     if (!(dest_tid = GetWindowThreadProcessId( hwnd, NULL ))) return FALSE;
2193
2194     if (USER_IsExitingThread( dest_tid )) return TRUE;
2195
2196     return put_message_in_queue( dest_tid, &info, NULL );
2197 }
2198
2199
2200 /**********************************************************************
2201  *              PostThreadMessageA  (USER32.@)
2202  */
2203 BOOL WINAPI PostThreadMessageA( DWORD thread, UINT msg, WPARAM wparam, LPARAM lparam )
2204 {
2205     return PostThreadMessageW( thread, msg, map_wparam_AtoW( msg, wparam ), lparam );
2206 }
2207
2208
2209 /**********************************************************************
2210  *              PostThreadMessageW  (USER32.@)
2211  */
2212 BOOL WINAPI PostThreadMessageW( DWORD thread, UINT msg, WPARAM wparam, LPARAM lparam )
2213 {
2214     struct send_message_info info;
2215
2216     if (is_pointer_message( msg ))
2217     {
2218         SetLastError( ERROR_INVALID_PARAMETER );
2219         return FALSE;
2220     }
2221     if (USER_IsExitingThread( thread )) return TRUE;
2222
2223     info.type   = MSG_POSTED;
2224     info.hwnd   = 0;
2225     info.msg    = msg;
2226     info.wparam = wparam;
2227     info.lparam = lparam;
2228     info.flags  = 0;
2229     return put_message_in_queue( thread, &info, NULL );
2230 }
2231
2232
2233 /***********************************************************************
2234  *              PostQuitMessage  (USER32.@)
2235  */
2236 void WINAPI PostQuitMessage( INT exitCode )
2237 {
2238     PostThreadMessageW( GetCurrentThreadId(), WM_QUIT, exitCode, 0 );
2239 }
2240
2241
2242 /***********************************************************************
2243  *              PeekMessageW  (USER32.@)
2244  */
2245 BOOL WINAPI PeekMessageW( MSG *msg_out, HWND hwnd, UINT first, UINT last, UINT flags )
2246 {
2247     MESSAGEQUEUE *queue;
2248     MSG msg;
2249     int locks;
2250
2251     /* check for graphics events */
2252     if (USER_Driver.pMsgWaitForMultipleObjectsEx)
2253         USER_Driver.pMsgWaitForMultipleObjectsEx( 0, NULL, 0, 0, 0 );
2254
2255     hwnd = WIN_GetFullHandle( hwnd );
2256     locks = WIN_SuspendWndsLock();
2257
2258     if (!MSG_peek_message( &msg, hwnd, first, last,
2259                            (flags & PM_REMOVE) ? GET_MSG_REMOVE : 0 ))
2260     {
2261         if (!(flags & PM_NOYIELD))
2262         {
2263             DWORD count;
2264             ReleaseThunkLock(&count);
2265             if (count) RestoreThunkLock(count);
2266         }
2267         WIN_RestoreWndsLock( locks );
2268         return FALSE;
2269     }
2270
2271     WIN_RestoreWndsLock( locks );
2272
2273     /* need to fill the window handle for WM_PAINT message */
2274     if (msg.message == WM_PAINT)
2275     {
2276         if (IsIconic( msg.hwnd ) && GetClassLongA( msg.hwnd, GCL_HICON ))
2277         {
2278             msg.message = WM_PAINTICON;
2279             msg.wParam = 1;
2280         }
2281         /* clear internal paint flag */
2282         RedrawWindow( msg.hwnd, NULL, 0, RDW_NOINTERNALPAINT | RDW_NOCHILDREN );
2283     }
2284
2285     if ((queue = QUEUE_Current()))
2286     {
2287         queue->GetMessageTimeVal = msg.time;
2288         msg.pt.x = LOWORD( queue->GetMessagePosVal );
2289         msg.pt.y = HIWORD( queue->GetMessagePosVal );
2290     }
2291
2292     HOOK_CallHooks( WH_GETMESSAGE, HC_ACTION, flags & PM_REMOVE, (LPARAM)&msg, TRUE );
2293
2294     /* copy back our internal safe copy of message data to msg_out.
2295      * msg_out is a variable from the *program*, so it can't be used
2296      * internally as it can get "corrupted" by our use of SendMessage()
2297      * (back to the program) inside the message handling itself. */
2298     *msg_out = msg;
2299     return TRUE;
2300 }
2301
2302
2303 /***********************************************************************
2304  *              PeekMessageA  (USER32.@)
2305  */
2306 BOOL WINAPI PeekMessageA( MSG *msg, HWND hwnd, UINT first, UINT last, UINT flags )
2307 {
2308     BOOL ret = PeekMessageW( msg, hwnd, first, last, flags );
2309     if (ret) msg->wParam = map_wparam_WtoA( msg->message, msg->wParam );
2310     return ret;
2311 }
2312
2313
2314 /***********************************************************************
2315  *              GetMessageW  (USER32.@)
2316  */
2317 BOOL WINAPI GetMessageW( MSG *msg, HWND hwnd, UINT first, UINT last )
2318 {
2319     MESSAGEQUEUE *queue = QUEUE_Current();
2320     int mask, locks;
2321
2322     mask = QS_POSTMESSAGE | QS_SENDMESSAGE;  /* Always selected */
2323     if (first || last)
2324     {
2325         if ((first <= WM_KEYLAST) && (last >= WM_KEYFIRST)) mask |= QS_KEY;
2326         if ( ((first <= WM_MOUSELAST) && (last >= WM_MOUSEFIRST)) ||
2327              ((first <= WM_NCMOUSELAST) && (last >= WM_NCMOUSEFIRST)) ) mask |= QS_MOUSE;
2328         if ((first <= WM_TIMER) && (last >= WM_TIMER)) mask |= QS_TIMER;
2329         if ((first <= WM_SYSTIMER) && (last >= WM_SYSTIMER)) mask |= QS_TIMER;
2330         if ((first <= WM_PAINT) && (last >= WM_PAINT)) mask |= QS_PAINT;
2331     }
2332     else mask |= QS_MOUSE | QS_KEY | QS_TIMER | QS_PAINT;
2333
2334     locks = WIN_SuspendWndsLock();
2335
2336     while (!PeekMessageW( msg, hwnd, first, last, PM_REMOVE ))
2337     {
2338         /* wait until one of the bits is set */
2339         unsigned int wake_bits = 0, changed_bits = 0;
2340         DWORD dwlc;
2341
2342         SERVER_START_REQ( set_queue_mask )
2343         {
2344             req->wake_mask    = QS_SENDMESSAGE;
2345             req->changed_mask = mask;
2346             req->skip_wait    = 1;
2347             if (!wine_server_call( req ))
2348             {
2349                 wake_bits    = reply->wake_bits;
2350                 changed_bits = reply->changed_bits;
2351             }
2352         }
2353         SERVER_END_REQ;
2354
2355         if (changed_bits & mask) continue;
2356         if (wake_bits & QS_SENDMESSAGE) continue;
2357
2358         TRACE( "(%04x) mask=%08x, bits=%08x, changed=%08x, waiting\n",
2359                queue->self, mask, wake_bits, changed_bits );
2360
2361         ReleaseThunkLock( &dwlc );
2362         if (USER_Driver.pMsgWaitForMultipleObjectsEx)
2363             USER_Driver.pMsgWaitForMultipleObjectsEx( 1, &queue->server_queue, INFINITE, 0, 0 );
2364         else
2365             WaitForSingleObject( queue->server_queue, INFINITE );
2366         if (dwlc) RestoreThunkLock( dwlc );
2367     }
2368
2369     WIN_RestoreWndsLock( locks );
2370
2371     return (msg->message != WM_QUIT);
2372 }
2373
2374
2375 /***********************************************************************
2376  *              GetMessageA  (USER32.@)
2377  */
2378 BOOL WINAPI GetMessageA( MSG *msg, HWND hwnd, UINT first, UINT last )
2379 {
2380     GetMessageW( msg, hwnd, first, last );
2381     msg->wParam = map_wparam_WtoA( msg->message, msg->wParam );
2382     return (msg->message != WM_QUIT);
2383 }
2384
2385
2386 /***********************************************************************
2387  *              IsDialogMessage  (USER32.@)
2388  *              IsDialogMessageA (USER32.@)
2389  */
2390 BOOL WINAPI IsDialogMessageA( HWND hwndDlg, LPMSG pmsg )
2391 {
2392     MSG msg = *pmsg;
2393     msg.wParam = map_wparam_AtoW( msg.message, msg.wParam );
2394     return IsDialogMessageW( hwndDlg, &msg );
2395 }
2396
2397
2398 /***********************************************************************
2399  *              SetMessageQueue (USER32.@)
2400  */
2401 BOOL WINAPI SetMessageQueue( INT size )
2402 {
2403     /* now obsolete the message queue will be expanded dynamically as necessary */
2404     return TRUE;
2405 }
2406
2407
2408 /**********************************************************************
2409  *              AttachThreadInput (USER32.@)
2410  *
2411  * Attaches the input processing mechanism of one thread to that of
2412  * another thread.
2413  */
2414 BOOL WINAPI AttachThreadInput( DWORD from, DWORD to, BOOL attach )
2415 {
2416     BOOL ret;
2417
2418     SERVER_START_REQ( attach_thread_input )
2419     {
2420         req->tid_from = from;
2421         req->tid_to   = to;
2422         req->attach   = attach;
2423         ret = !wine_server_call_err( req );
2424     }
2425     SERVER_END_REQ;
2426     return ret;
2427 }
2428
2429
2430 /**********************************************************************
2431  *              GetGUIThreadInfo  (USER32.@)
2432  */
2433 BOOL WINAPI GetGUIThreadInfo( DWORD id, GUITHREADINFO *info )
2434 {
2435     BOOL ret;
2436
2437     SERVER_START_REQ( get_thread_input )
2438     {
2439         req->tid = id;
2440         if ((ret = !wine_server_call_err( req )))
2441         {
2442             info->flags          = 0;
2443             info->hwndActive     = reply->active;
2444             info->hwndFocus      = reply->focus;
2445             info->hwndCapture    = reply->capture;
2446             info->hwndMenuOwner  = reply->menu_owner;
2447             info->hwndMoveSize   = reply->move_size;
2448             info->hwndCaret      = reply->caret;
2449             info->rcCaret.left   = reply->rect.left;
2450             info->rcCaret.top    = reply->rect.top;
2451             info->rcCaret.right  = reply->rect.right;
2452             info->rcCaret.bottom = reply->rect.bottom;
2453             if (reply->menu_owner) info->flags |= GUI_INMENUMODE;
2454             if (reply->move_size) info->flags |= GUI_INMOVESIZE;
2455             if (reply->caret) info->flags |= GUI_CARETBLINKING;
2456         }
2457     }
2458     SERVER_END_REQ;
2459     return ret;
2460 }
2461
2462
2463 /**********************************************************************
2464  *              GetKeyState (USER32.@)
2465  *
2466  * An application calls the GetKeyState function in response to a
2467  * keyboard-input message.  This function retrieves the state of the key
2468  * at the time the input message was generated.
2469  */
2470 SHORT WINAPI GetKeyState(INT vkey)
2471 {
2472     SHORT retval = 0;
2473
2474     SERVER_START_REQ( get_key_state )
2475     {
2476         req->tid = GetCurrentThreadId();
2477         req->key = vkey;
2478         if (!wine_server_call( req )) retval = (signed char)reply->state;
2479     }
2480     SERVER_END_REQ;
2481     TRACE("key (0x%x) -> %x\n", vkey, retval);
2482     return retval;
2483 }
2484
2485
2486 /**********************************************************************
2487  *              GetKeyboardState (USER32.@)
2488  */
2489 BOOL WINAPI GetKeyboardState( LPBYTE state )
2490 {
2491     BOOL ret;
2492
2493     TRACE("(%p)\n", state);
2494
2495     memset( state, 0, 256 );
2496     SERVER_START_REQ( get_key_state )
2497     {
2498         req->tid = GetCurrentThreadId();
2499         req->key = -1;
2500         wine_server_set_reply( req, state, 256 );
2501         ret = !wine_server_call_err( req );
2502     }
2503     SERVER_END_REQ;
2504     return ret;
2505 }
2506
2507
2508 /**********************************************************************
2509  *              SetKeyboardState (USER32.@)
2510  */
2511 BOOL WINAPI SetKeyboardState( LPBYTE state )
2512 {
2513     BOOL ret;
2514
2515     TRACE("(%p)\n", state);
2516
2517     SERVER_START_REQ( set_key_state )
2518     {
2519         req->tid = GetCurrentThreadId();
2520         wine_server_add_data( req, state, 256 );
2521         ret = !wine_server_call_err( req );
2522     }
2523     SERVER_END_REQ;
2524     return ret;
2525 }
2526
2527 /******************************************************************
2528  *              IsHungAppWindow (USER32.@)
2529  *
2530  */
2531 BOOL WINAPI IsHungAppWindow( HWND hWnd )
2532 {
2533     DWORD dwResult; 
2534     return !SendMessageTimeoutA(hWnd, WM_NULL, 0, 0, SMTO_ABORTIFHUNG, 5000, &dwResult);        
2535 }