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