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