git.oblomov.eu Git - wine/blob - dlls/user/message.c

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