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