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

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