wininet: Remove the custom thread pool implementation and use QueueUserWorkItem instead.
[wine] / dlls / user32 / user16.c
1 /*
2  * Misc 16-bit USER functions
3  *
4  * Copyright 1993, 1996 Alexandre Julliard
5  * Copyright 2002 Patrik Stridvall
6  *
7  * This library is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * This library is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with this library; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
20  */
21
22 #include <stdarg.h>
23 #include <stdlib.h>
24 #include <stdio.h>
25 #include <string.h>
26
27 #define OEMRESOURCE
28
29 #include "wine/winuser16.h"
30 #include "windef.h"
31 #include "winbase.h"
32 #include "wownt32.h"
33 #include "user_private.h"
34 #include "win.h"
35 #include "controls.h"
36 #include "wine/debug.h"
37
38 WINE_DEFAULT_DEBUG_CHANNEL(user);
39
40 /* handle to handle 16 conversions */
41 #define HANDLE_16(h32)          (LOWORD(h32))
42
43 /* handle16 to handle conversions */
44 #define HANDLE_32(h16)          ((HANDLE)(ULONG_PTR)(h16))
45 #define HINSTANCE_32(h16)       ((HINSTANCE)(ULONG_PTR)(h16))
46
47 #define IS_MENU_STRING_ITEM(flags) \
48     (((flags) & (MF_STRING | MF_BITMAP | MF_OWNERDRAW | MF_SEPARATOR)) == MF_STRING)
49
50 /* UserSeeUserDo parameters */
51 #define USUD_LOCALALLOC        0x0001
52 #define USUD_LOCALFREE         0x0002
53 #define USUD_LOCALCOMPACT      0x0003
54 #define USUD_LOCALHEAP         0x0004
55 #define USUD_FIRSTCLASS        0x0005
56
57 WORD WINAPI DestroyIcon32(HGLOBAL16, UINT16);
58
59
60 struct gray_string_info
61 {
62     GRAYSTRINGPROC16 proc;
63     LPARAM           param;
64     char             str[1];
65 };
66
67 /* callback for 16-bit gray string proc with opaque pointer */
68 static BOOL CALLBACK gray_string_callback( HDC hdc, LPARAM param, INT len )
69 {
70     const struct gray_string_info *info = (struct gray_string_info *)param;
71     WORD args[4];
72     DWORD ret;
73
74     args[3] = HDC_16(hdc);
75     args[2] = HIWORD(info->param);
76     args[1] = LOWORD(info->param);
77     args[0] = len;
78     WOWCallback16Ex( (DWORD)info->proc, WCB16_PASCAL, sizeof(args), args, &ret );
79     return LOWORD(ret);
80 }
81
82 /* callback for 16-bit gray string proc with string pointer */
83 static BOOL CALLBACK gray_string_callback_ptr( HDC hdc, LPARAM param, INT len )
84 {
85     const struct gray_string_info *info;
86     char *str = (char *)param;
87
88     info = (struct gray_string_info *)(str - offsetof( struct gray_string_info, str ));
89     return gray_string_callback( hdc, (LPARAM)info, len );
90 }
91
92 struct draw_state_info
93 {
94     DRAWSTATEPROC16 proc;
95     LPARAM          param;
96 };
97
98 /* callback for 16-bit DrawState functions */
99 static BOOL CALLBACK draw_state_callback( HDC hdc, LPARAM lparam, WPARAM wparam, int cx, int cy )
100 {
101     const struct draw_state_info *info = (struct draw_state_info *)lparam;
102     WORD args[6];
103     DWORD ret;
104
105     args[5] = HDC_16(hdc);
106     args[4] = HIWORD(info->param);
107     args[3] = LOWORD(info->param);
108     args[2] = wparam;
109     args[1] = cx;
110     args[0] = cy;
111     WOWCallback16Ex( (DWORD)info->proc, WCB16_PASCAL, sizeof(args), args, &ret );
112     return LOWORD(ret);
113 }
114
115
116 /**********************************************************************
117  *              InitApp (USER.5)
118  */
119 INT16 WINAPI InitApp16( HINSTANCE16 hInstance )
120 {
121     /* Create task message queue */
122     return (InitThreadInput16( 0, 0 ) != 0);
123 }
124
125
126 /***********************************************************************
127  *              ExitWindows (USER.7)
128  */
129 BOOL16 WINAPI ExitWindows16( DWORD dwReturnCode, UINT16 wReserved )
130 {
131     return ExitWindowsEx( EWX_LOGOFF, 0xffffffff );
132 }
133
134
135 /***********************************************************************
136  *              GetTimerResolution (USER.14)
137  */
138 LONG WINAPI GetTimerResolution16(void)
139 {
140     return (1000);
141 }
142
143
144 /***********************************************************************
145  *              ClipCursor (USER.16)
146  */
147 BOOL16 WINAPI ClipCursor16( const RECT16 *rect )
148 {
149     RECT rect32;
150
151     if (!rect) return ClipCursor( NULL );
152     rect32.left   = rect->left;
153     rect32.top    = rect->top;
154     rect32.right  = rect->right;
155     rect32.bottom = rect->bottom;
156     return ClipCursor( &rect32 );
157 }
158
159
160 /***********************************************************************
161  *              GetCursorPos (USER.17)
162  */
163 BOOL16 WINAPI GetCursorPos16( POINT16 *pt )
164 {
165     POINT pos;
166     if (!pt) return 0;
167     GetCursorPos(&pos);
168     pt->x = pos.x;
169     pt->y = pos.y;
170     return 1;
171 }
172
173
174 /***********************************************************************
175  *              SetCursor (USER.69)
176  */
177 HCURSOR16 WINAPI SetCursor16(HCURSOR16 hCursor)
178 {
179   return HCURSOR_16(SetCursor(HCURSOR_32(hCursor)));
180 }
181
182
183 /***********************************************************************
184  *              SetCursorPos (USER.70)
185  */
186 void WINAPI SetCursorPos16( INT16 x, INT16 y )
187 {
188     SetCursorPos( x, y );
189 }
190
191
192 /***********************************************************************
193  *              ShowCursor (USER.71)
194  */
195 INT16 WINAPI ShowCursor16(BOOL16 bShow)
196 {
197   return ShowCursor(bShow);
198 }
199
200
201 /***********************************************************************
202  *              SetRect (USER.72)
203  */
204 void WINAPI SetRect16( LPRECT16 rect, INT16 left, INT16 top, INT16 right, INT16 bottom )
205 {
206     rect->left   = left;
207     rect->right  = right;
208     rect->top    = top;
209     rect->bottom = bottom;
210 }
211
212
213 /***********************************************************************
214  *              SetRectEmpty (USER.73)
215  */
216 void WINAPI SetRectEmpty16( LPRECT16 rect )
217 {
218     rect->left = rect->right = rect->top = rect->bottom = 0;
219 }
220
221
222 /***********************************************************************
223  *              CopyRect (USER.74)
224  */
225 BOOL16 WINAPI CopyRect16( RECT16 *dest, const RECT16 *src )
226 {
227     *dest = *src;
228     return TRUE;
229 }
230
231
232 /***********************************************************************
233  *              IsRectEmpty (USER.75)
234  *
235  * Bug compat: Windows checks for 0 or negative width/height.
236  */
237 BOOL16 WINAPI IsRectEmpty16( const RECT16 *rect )
238 {
239     return ((rect->left >= rect->right) || (rect->top >= rect->bottom));
240 }
241
242
243 /***********************************************************************
244  *              PtInRect (USER.76)
245  */
246 BOOL16 WINAPI PtInRect16( const RECT16 *rect, POINT16 pt )
247 {
248     return ((pt.x >= rect->left) && (pt.x < rect->right) &&
249             (pt.y >= rect->top) && (pt.y < rect->bottom));
250 }
251
252
253 /***********************************************************************
254  *              OffsetRect (USER.77)
255  */
256 void WINAPI OffsetRect16( LPRECT16 rect, INT16 x, INT16 y )
257 {
258     rect->left   += x;
259     rect->right  += x;
260     rect->top    += y;
261     rect->bottom += y;
262 }
263
264
265 /***********************************************************************
266  *              InflateRect (USER.78)
267  */
268 void WINAPI InflateRect16( LPRECT16 rect, INT16 x, INT16 y )
269 {
270     rect->left   -= x;
271     rect->top    -= y;
272     rect->right  += x;
273     rect->bottom += y;
274 }
275
276
277 /***********************************************************************
278  *              IntersectRect (USER.79)
279  */
280 BOOL16 WINAPI IntersectRect16( LPRECT16 dest, const RECT16 *src1,
281                                const RECT16 *src2 )
282 {
283     if (IsRectEmpty16(src1) || IsRectEmpty16(src2) ||
284         (src1->left >= src2->right) || (src2->left >= src1->right) ||
285         (src1->top >= src2->bottom) || (src2->top >= src1->bottom))
286     {
287         SetRectEmpty16( dest );
288         return FALSE;
289     }
290     dest->left   = max( src1->left, src2->left );
291     dest->right  = min( src1->right, src2->right );
292     dest->top    = max( src1->top, src2->top );
293     dest->bottom = min( src1->bottom, src2->bottom );
294     return TRUE;
295 }
296
297
298 /***********************************************************************
299  *              UnionRect (USER.80)
300  */
301 BOOL16 WINAPI UnionRect16( LPRECT16 dest, const RECT16 *src1,
302                            const RECT16 *src2 )
303 {
304     if (IsRectEmpty16(src1))
305     {
306         if (IsRectEmpty16(src2))
307         {
308             SetRectEmpty16( dest );
309             return FALSE;
310         }
311         else *dest = *src2;
312     }
313     else
314     {
315         if (IsRectEmpty16(src2)) *dest = *src1;
316         else
317         {
318             dest->left   = min( src1->left, src2->left );
319             dest->right  = max( src1->right, src2->right );
320             dest->top    = min( src1->top, src2->top );
321             dest->bottom = max( src1->bottom, src2->bottom );
322         }
323     }
324     return TRUE;
325 }
326
327
328 /***********************************************************************
329  *              FillRect (USER.81)
330  * NOTE
331  *   The Win16 variant doesn't support special color brushes like
332  *   the Win32 one, despite the fact that Win16, as well as Win32,
333  *   supports special background brushes for a window class.
334  */
335 INT16 WINAPI FillRect16( HDC16 hdc, const RECT16 *rect, HBRUSH16 hbrush )
336 {
337     HBRUSH prevBrush;
338
339     /* coordinates are logical so we cannot fast-check 'rect',
340      * it will be done later in the PatBlt().
341      */
342
343     if (!(prevBrush = SelectObject( HDC_32(hdc), HBRUSH_32(hbrush) ))) return 0;
344     PatBlt( HDC_32(hdc), rect->left, rect->top,
345               rect->right - rect->left, rect->bottom - rect->top, PATCOPY );
346     SelectObject( HDC_32(hdc), prevBrush );
347     return 1;
348 }
349
350
351 /***********************************************************************
352  *              InvertRect (USER.82)
353  */
354 void WINAPI InvertRect16( HDC16 hdc, const RECT16 *rect )
355 {
356     PatBlt( HDC_32(hdc), rect->left, rect->top,
357               rect->right - rect->left, rect->bottom - rect->top, DSTINVERT );
358 }
359
360
361 /***********************************************************************
362  *              FrameRect (USER.83)
363  */
364 INT16 WINAPI FrameRect16( HDC16 hdc, const RECT16 *rect16, HBRUSH16 hbrush )
365 {
366     RECT rect;
367
368     rect.left   = rect16->left;
369     rect.top    = rect16->top;
370     rect.right  = rect16->right;
371     rect.bottom = rect16->bottom;
372     return FrameRect( HDC_32(hdc), &rect, HBRUSH_32(hbrush) );
373 }
374
375
376 /***********************************************************************
377  *              DrawIcon (USER.84)
378  */
379 BOOL16 WINAPI DrawIcon16(HDC16 hdc, INT16 x, INT16 y, HICON16 hIcon)
380 {
381   return DrawIcon(HDC_32(hdc), x, y, HICON_32(hIcon));
382 }
383
384
385 /***********************************************************************
386  *           DrawText    (USER.85)
387  */
388 INT16 WINAPI DrawText16( HDC16 hdc, LPCSTR str, INT16 count, LPRECT16 rect, UINT16 flags )
389 {
390     INT16 ret;
391
392     if (rect)
393     {
394         RECT rect32;
395
396         rect32.left   = rect->left;
397         rect32.top    = rect->top;
398         rect32.right  = rect->right;
399         rect32.bottom = rect->bottom;
400         ret = DrawTextA( HDC_32(hdc), str, count, &rect32, flags );
401         rect->left   = rect32.left;
402         rect->top    = rect32.top;
403         rect->right  = rect32.right;
404         rect->bottom = rect32.bottom;
405     }
406     else ret = DrawTextA( HDC_32(hdc), str, count, NULL, flags);
407     return ret;
408 }
409
410
411 /***********************************************************************
412  *              IconSize (USER.86)
413  *
414  * See "Undocumented Windows". Used by W2.0 paint.exe.
415  */
416 DWORD WINAPI IconSize16(void)
417 {
418   return MAKELONG(GetSystemMetrics(SM_CYICON), GetSystemMetrics(SM_CXICON));
419 }
420
421
422 /***********************************************************************
423  *              AdjustWindowRect (USER.102)
424  */
425 BOOL16 WINAPI AdjustWindowRect16( LPRECT16 rect, DWORD style, BOOL16 menu )
426 {
427     return AdjustWindowRectEx16( rect, style, menu, 0 );
428 }
429
430
431 /**************************************************************************
432  *              CloseClipboard (USER.138)
433  */
434 BOOL16 WINAPI CloseClipboard16(void)
435 {
436     return CloseClipboard();
437 }
438
439
440 /**************************************************************************
441  *              EmptyClipboard (USER.139)
442  */
443 BOOL16 WINAPI EmptyClipboard16(void)
444 {
445     return EmptyClipboard();
446 }
447
448
449 /**************************************************************************
450  *              CountClipboardFormats (USER.143)
451  */
452 INT16 WINAPI CountClipboardFormats16(void)
453 {
454     return CountClipboardFormats();
455 }
456
457
458 /**************************************************************************
459  *              EnumClipboardFormats (USER.144)
460  */
461 UINT16 WINAPI EnumClipboardFormats16( UINT16 id )
462 {
463     return EnumClipboardFormats( id );
464 }
465
466
467 /**************************************************************************
468  *              RegisterClipboardFormat (USER.145)
469  */
470 UINT16 WINAPI RegisterClipboardFormat16( LPCSTR name )
471 {
472     return RegisterClipboardFormatA( name );
473 }
474
475
476 /**************************************************************************
477  *              GetClipboardFormatName (USER.146)
478  */
479 INT16 WINAPI GetClipboardFormatName16( UINT16 id, LPSTR buffer, INT16 maxlen )
480 {
481     return GetClipboardFormatNameA( id, buffer, maxlen );
482 }
483
484
485 /**********************************************************************
486  *         CreateMenu    (USER.151)
487  */
488 HMENU16 WINAPI CreateMenu16(void)
489 {
490     return HMENU_16( CreateMenu() );
491 }
492
493
494 /**********************************************************************
495  *         DestroyMenu    (USER.152)
496  */
497 BOOL16 WINAPI DestroyMenu16( HMENU16 hMenu )
498 {
499     return DestroyMenu( HMENU_32(hMenu) );
500 }
501
502
503 /*******************************************************************
504  *         ChangeMenu    (USER.153)
505  */
506 BOOL16 WINAPI ChangeMenu16( HMENU16 hMenu, UINT16 pos, SEGPTR data,
507                             UINT16 id, UINT16 flags )
508 {
509     if (flags & MF_APPEND) return AppendMenu16( hMenu, flags & ~MF_APPEND, id, data );
510
511     /* FIXME: Word passes the item id in 'pos' and 0 or 0xffff as id */
512     /* for MF_DELETE. We should check the parameters for all others */
513     /* MF_* actions also (anybody got a doc on ChangeMenu?). */
514
515     if (flags & MF_DELETE) return DeleteMenu16(hMenu, pos, flags & ~MF_DELETE);
516     if (flags & MF_CHANGE) return ModifyMenu16(hMenu, pos, flags & ~MF_CHANGE, id, data );
517     if (flags & MF_REMOVE) return RemoveMenu16(hMenu, flags & MF_BYPOSITION ? pos : id,
518                                                flags & ~MF_REMOVE );
519     /* Default: MF_INSERT */
520     return InsertMenu16( hMenu, pos, flags, id, data );
521 }
522
523
524 /*******************************************************************
525  *         CheckMenuItem    (USER.154)
526  */
527 BOOL16 WINAPI CheckMenuItem16( HMENU16 hMenu, UINT16 id, UINT16 flags )
528 {
529     return CheckMenuItem( HMENU_32(hMenu), id, flags );
530 }
531
532
533 /**********************************************************************
534  *         EnableMenuItem    (USER.155)
535  */
536 BOOL16 WINAPI EnableMenuItem16( HMENU16 hMenu, UINT16 wItemID, UINT16 wFlags )
537 {
538     return EnableMenuItem( HMENU_32(hMenu), wItemID, wFlags );
539 }
540
541
542 /**********************************************************************
543  *         GetSubMenu    (USER.159)
544  */
545 HMENU16 WINAPI GetSubMenu16( HMENU16 hMenu, INT16 nPos )
546 {
547     return HMENU_16( GetSubMenu( HMENU_32(hMenu), nPos ) );
548 }
549
550
551 /*******************************************************************
552  *         GetMenuString    (USER.161)
553  */
554 INT16 WINAPI GetMenuString16( HMENU16 hMenu, UINT16 wItemID,
555                               LPSTR str, INT16 nMaxSiz, UINT16 wFlags )
556 {
557     return GetMenuStringA( HMENU_32(hMenu), wItemID, str, nMaxSiz, wFlags );
558 }
559
560
561 /**********************************************************************
562  *              WinHelp (USER.171)
563  */
564 BOOL16 WINAPI WinHelp16( HWND16 hWnd, LPCSTR lpHelpFile, UINT16 wCommand,
565                          DWORD dwData )
566 {
567     BOOL ret;
568     DWORD mutex_count;
569
570     /* We might call WinExec() */
571     ReleaseThunkLock(&mutex_count);
572
573     ret = WinHelpA(WIN_Handle32(hWnd), lpHelpFile, wCommand, (DWORD)MapSL(dwData));
574
575     RestoreThunkLock(mutex_count);
576     return ret;
577 }
578
579
580 /***********************************************************************
581  *              LoadCursor (USER.173)
582  */
583 HCURSOR16 WINAPI LoadCursor16(HINSTANCE16 hInstance, LPCSTR name)
584 {
585   return HCURSOR_16(LoadCursorA(HINSTANCE_32(hInstance), name));
586 }
587
588
589 /***********************************************************************
590  *              LoadIcon (USER.174)
591  */
592 HICON16 WINAPI LoadIcon16(HINSTANCE16 hInstance, LPCSTR name)
593 {
594   return HICON_16(LoadIconA(HINSTANCE_32(hInstance), name));
595 }
596
597 /**********************************************************************
598  *              LoadBitmap (USER.175)
599  */
600 HBITMAP16 WINAPI LoadBitmap16(HINSTANCE16 hInstance, LPCSTR name)
601 {
602   return HBITMAP_16(LoadBitmapA(HINSTANCE_32(hInstance), name));
603 }
604
605
606 /***********************************************************************
607  *              GetSystemMetrics (USER.179)
608  */
609 INT16 WINAPI GetSystemMetrics16( INT16 index )
610 {
611     return GetSystemMetrics( index );
612 }
613
614
615 /*************************************************************************
616  *              GetSysColor (USER.180)
617  */
618 COLORREF WINAPI GetSysColor16( INT16 index )
619 {
620     return GetSysColor( index );
621 }
622
623
624 /*************************************************************************
625  *              SetSysColors (USER.181)
626  */
627 VOID WINAPI SetSysColors16( INT16 count, const INT16 *list16, const COLORREF *values )
628 {
629     INT i, *list;
630
631     if ((list = HeapAlloc( GetProcessHeap(), 0, count * sizeof(*list) )))
632     {
633         for (i = 0; i < count; i++) list[i] = list16[i];
634         SetSysColors( count, list, values );
635         HeapFree( GetProcessHeap(), 0, list );
636     }
637 }
638
639
640 /***********************************************************************
641  *           GrayString   (USER.185)
642  */
643 BOOL16 WINAPI GrayString16( HDC16 hdc, HBRUSH16 hbr, GRAYSTRINGPROC16 gsprc,
644                             LPARAM lParam, INT16 cch, INT16 x, INT16 y,
645                             INT16 cx, INT16 cy )
646 {
647     BOOL ret;
648
649     if (!gsprc) return GrayStringA( HDC_32(hdc), HBRUSH_32(hbr), NULL,
650                                     (LPARAM)MapSL(lParam), cch, x, y, cx, cy );
651
652     if (cch == -1 || (cch && cx && cy))
653     {
654         /* lParam can be treated as an opaque pointer */
655         struct gray_string_info info;
656
657         info.proc  = gsprc;
658         info.param = lParam;
659         ret = GrayStringA( HDC_32(hdc), HBRUSH_32(hbr), gray_string_callback,
660                            (LPARAM)&info, cch, x, y, cx, cy );
661     }
662     else  /* here we need some string conversions */
663     {
664         char *str16 = MapSL(lParam);
665         struct gray_string_info *info;
666
667         if (!cch) cch = strlen(str16);
668         if (!(info = HeapAlloc( GetProcessHeap(), 0, sizeof(*info) + cch ))) return FALSE;
669         info->proc  = gsprc;
670         info->param = lParam;
671         memcpy( info->str, str16, cch );
672         ret = GrayStringA( HDC_32(hdc), HBRUSH_32(hbr), gray_string_callback_ptr,
673                            (LPARAM)info->str, cch, x, y, cx, cy );
674         HeapFree( GetProcessHeap(), 0, info );
675     }
676     return ret;
677 }
678
679
680 /**************************************************************************
681  *              IsClipboardFormatAvailable (USER.193)
682  */
683 BOOL16 WINAPI IsClipboardFormatAvailable16( UINT16 wFormat )
684 {
685     return IsClipboardFormatAvailable( wFormat );
686 }
687
688
689 /***********************************************************************
690  *           TabbedTextOut    (USER.196)
691  */
692 LONG WINAPI TabbedTextOut16( HDC16 hdc, INT16 x, INT16 y, LPCSTR lpstr,
693                              INT16 count, INT16 nb_tabs, const INT16 *tabs16, INT16 tab_org )
694 {
695     LONG ret;
696     INT i, *tabs = HeapAlloc( GetProcessHeap(), 0, nb_tabs * sizeof(tabs) );
697     if (!tabs) return 0;
698     for (i = 0; i < nb_tabs; i++) tabs[i] = tabs16[i];
699     ret = TabbedTextOutA( HDC_32(hdc), x, y, lpstr, count, nb_tabs, tabs, tab_org );
700     HeapFree( GetProcessHeap(), 0, tabs );
701     return ret;
702 }
703
704
705 /***********************************************************************
706  *           GetTabbedTextExtent    (USER.197)
707  */
708 DWORD WINAPI GetTabbedTextExtent16( HDC16 hdc, LPCSTR lpstr, INT16 count,
709                                     INT16 nb_tabs, const INT16 *tabs16 )
710 {
711     LONG ret;
712     INT i, *tabs = HeapAlloc( GetProcessHeap(), 0, nb_tabs * sizeof(tabs) );
713     if (!tabs) return 0;
714     for (i = 0; i < nb_tabs; i++) tabs[i] = tabs16[i];
715     ret = GetTabbedTextExtentA( HDC_32(hdc), lpstr, count, nb_tabs, tabs );
716     HeapFree( GetProcessHeap(), 0, tabs );
717     return ret;
718 }
719
720
721 /***********************************************************************
722  *              UserSeeUserDo (USER.216)
723  */
724 DWORD WINAPI UserSeeUserDo16(WORD wReqType, WORD wParam1, WORD wParam2, WORD wParam3)
725 {
726     STACK16FRAME* stack16 = MapSL((SEGPTR)NtCurrentTeb()->WOW32Reserved);
727     HANDLE16 oldDS = stack16->ds;
728     DWORD ret = (DWORD)-1;
729
730     stack16->ds = USER_HeapSel;
731     switch (wReqType)
732     {
733     case USUD_LOCALALLOC:
734         ret = LocalAlloc16(wParam1, wParam3);
735         break;
736     case USUD_LOCALFREE:
737         ret = LocalFree16(wParam1);
738         break;
739     case USUD_LOCALCOMPACT:
740         ret = LocalCompact16(wParam3);
741         break;
742     case USUD_LOCALHEAP:
743         ret = USER_HeapSel;
744         break;
745     case USUD_FIRSTCLASS:
746         FIXME("return a pointer to the first window class.\n");
747         break;
748     default:
749         WARN("wReqType %04x (unknown)\n", wReqType);
750     }
751     stack16->ds = oldDS;
752     return ret;
753 }
754
755
756 /*************************************************************************
757  *              ScrollDC (USER.221)
758  */
759 BOOL16 WINAPI ScrollDC16( HDC16 hdc, INT16 dx, INT16 dy, const RECT16 *rect,
760                           const RECT16 *cliprc, HRGN16 hrgnUpdate,
761                           LPRECT16 rcUpdate )
762 {
763     RECT rect32, clipRect32, rcUpdate32;
764     BOOL16 ret;
765
766     if (rect)
767     {
768         rect32.left   = rect->left;
769         rect32.top    = rect->top;
770         rect32.right  = rect->right;
771         rect32.bottom = rect->bottom;
772     }
773     if (cliprc)
774     {
775         clipRect32.left   = cliprc->left;
776         clipRect32.top    = cliprc->top;
777         clipRect32.right  = cliprc->right;
778         clipRect32.bottom = cliprc->bottom;
779     }
780     ret = ScrollDC( HDC_32(hdc), dx, dy, rect ? &rect32 : NULL,
781                     cliprc ? &clipRect32 : NULL, HRGN_32(hrgnUpdate),
782                     &rcUpdate32 );
783     if (rcUpdate)
784     {
785         rcUpdate->left   = rcUpdate32.left;
786         rcUpdate->top    = rcUpdate32.top;
787         rcUpdate->right  = rcUpdate32.right;
788         rcUpdate->bottom = rcUpdate32.bottom;
789     }
790     return ret;
791 }
792
793
794 /***********************************************************************
795  *              GetSystemDebugState (USER.231)
796  */
797 WORD WINAPI GetSystemDebugState16(void)
798 {
799     return 0;  /* FIXME */
800 }
801
802
803 /***********************************************************************
804  *              EqualRect (USER.244)
805  */
806 BOOL16 WINAPI EqualRect16( const RECT16* rect1, const RECT16* rect2 )
807 {
808     return ((rect1->left == rect2->left) && (rect1->right == rect2->right) &&
809             (rect1->top == rect2->top) && (rect1->bottom == rect2->bottom));
810 }
811
812
813 /***********************************************************************
814  *              ExitWindowsExec (USER.246)
815  */
816 BOOL16 WINAPI ExitWindowsExec16( LPCSTR lpszExe, LPCSTR lpszParams )
817 {
818     TRACE("Should run the following in DOS-mode: \"%s %s\"\n",
819           lpszExe, lpszParams);
820     return ExitWindowsEx( EWX_LOGOFF, 0xffffffff );
821 }
822
823
824 /***********************************************************************
825  *              GetCursor (USER.247)
826  */
827 HCURSOR16 WINAPI GetCursor16(void)
828 {
829   return HCURSOR_16(GetCursor());
830 }
831
832
833 /**********************************************************************
834  *              GetAsyncKeyState (USER.249)
835  */
836 INT16 WINAPI GetAsyncKeyState16( INT16 key )
837 {
838     return GetAsyncKeyState( key );
839 }
840
841
842 /**********************************************************************
843  *         GetMenuState    (USER.250)
844  */
845 UINT16 WINAPI GetMenuState16( HMENU16 hMenu, UINT16 wItemID, UINT16 wFlags )
846 {
847     return GetMenuState( HMENU_32(hMenu), wItemID, wFlags );
848 }
849
850
851 /**********************************************************************
852  *         GetMenuItemCount    (USER.263)
853  */
854 INT16 WINAPI GetMenuItemCount16( HMENU16 hMenu )
855 {
856     return GetMenuItemCount( HMENU_32(hMenu) );
857 }
858
859
860 /**********************************************************************
861  *         GetMenuItemID    (USER.264)
862  */
863 UINT16 WINAPI GetMenuItemID16( HMENU16 hMenu, INT16 nPos )
864 {
865     return GetMenuItemID( HMENU_32(hMenu), nPos );
866 }
867
868
869 /***********************************************************************
870  *              GlobalAddAtom (USER.268)
871  */
872 ATOM WINAPI GlobalAddAtom16(LPCSTR lpString)
873 {
874   return GlobalAddAtomA(lpString);
875 }
876
877 /***********************************************************************
878  *              GlobalDeleteAtom (USER.269)
879  */
880 ATOM WINAPI GlobalDeleteAtom16(ATOM nAtom)
881 {
882   return GlobalDeleteAtom(nAtom);
883 }
884
885 /***********************************************************************
886  *              GlobalFindAtom (USER.270)
887  */
888 ATOM WINAPI GlobalFindAtom16(LPCSTR lpString)
889 {
890   return GlobalFindAtomA(lpString);
891 }
892
893 /***********************************************************************
894  *              GlobalGetAtomName (USER.271)
895  */
896 UINT16 WINAPI GlobalGetAtomName16(ATOM nAtom, LPSTR lpBuffer, INT16 nSize)
897 {
898   return GlobalGetAtomNameA(nAtom, lpBuffer, nSize);
899 }
900
901
902 /***********************************************************************
903  *              ControlPanelInfo (USER.273)
904  */
905 void WINAPI ControlPanelInfo16( INT16 nInfoType, WORD wData, LPSTR lpBuffer )
906 {
907     FIXME("(%d, %04x, %p): stub.\n", nInfoType, wData, lpBuffer);
908 }
909
910
911 /***********************************************************************
912  *              GetSysColorBrush (USER.281)
913  */
914 HBRUSH16 WINAPI GetSysColorBrush16( INT16 index )
915 {
916     return HBRUSH_16( GetSysColorBrush(index) );
917 }
918
919
920 /***********************************************************************
921  *              SelectPalette (USER.282)
922  */
923 HPALETTE16 WINAPI SelectPalette16( HDC16 hdc, HPALETTE16 hpal, BOOL16 bForceBackground )
924 {
925     return HPALETTE_16( SelectPalette( HDC_32(hdc), HPALETTE_32(hpal), bForceBackground ));
926 }
927
928 /***********************************************************************
929  *              RealizePalette (USER.283)
930  */
931 UINT16 WINAPI RealizePalette16( HDC16 hdc )
932 {
933     return UserRealizePalette( HDC_32(hdc) );
934 }
935
936
937 /***********************************************************************
938  *              GetFreeSystemResources (USER.284)
939  */
940 WORD WINAPI GetFreeSystemResources16( WORD resType )
941 {
942     STACK16FRAME* stack16 = MapSL((SEGPTR)NtCurrentTeb()->WOW32Reserved);
943     HANDLE16 oldDS = stack16->ds;
944     HINSTANCE16 gdi_inst;
945     WORD gdi_heap;
946     int userPercent, gdiPercent;
947
948     if ((gdi_inst = LoadLibrary16( "GDI" )) < 32) return 0;
949     gdi_heap = gdi_inst | 7;
950
951     switch(resType)
952     {
953     case GFSR_USERRESOURCES:
954         stack16->ds = USER_HeapSel;
955         userPercent = (int)LocalCountFree16() * 100 / LocalHeapSize16();
956         gdiPercent  = 100;
957         stack16->ds = oldDS;
958         break;
959
960     case GFSR_GDIRESOURCES:
961         stack16->ds = gdi_inst;
962         gdiPercent  = (int)LocalCountFree16() * 100 / LocalHeapSize16();
963         userPercent = 100;
964         stack16->ds = oldDS;
965         break;
966
967     case GFSR_SYSTEMRESOURCES:
968         stack16->ds = USER_HeapSel;
969         userPercent = (int)LocalCountFree16() * 100 / LocalHeapSize16();
970         stack16->ds = gdi_inst;
971         gdiPercent  = (int)LocalCountFree16() * 100 / LocalHeapSize16();
972         stack16->ds = oldDS;
973         break;
974
975     default:
976         userPercent = gdiPercent = 0;
977         break;
978     }
979     FreeLibrary16( gdi_inst );
980     TRACE("<- userPercent %d, gdiPercent %d\n", userPercent, gdiPercent);
981     return (WORD)min( userPercent, gdiPercent );
982 }
983
984
985 /***********************************************************************
986  *              GetClipCursor (USER.309)
987  */
988 void WINAPI GetClipCursor16( RECT16 *rect )
989 {
990     if (rect)
991     {
992         RECT rect32;
993         GetClipCursor( &rect32 );
994         rect->left   = rect32.left;
995         rect->top    = rect32.top;
996         rect->right  = rect32.right;
997         rect->bottom = rect32.bottom;
998     }
999 }
1000
1001
1002 /***********************************************************************
1003  *              SignalProc (USER.314)
1004  */
1005 void WINAPI SignalProc16( HANDLE16 hModule, UINT16 code,
1006                           UINT16 uExitFn, HINSTANCE16 hInstance, HQUEUE16 hQueue )
1007 {
1008     if (code == USIG16_DLL_UNLOAD)
1009     {
1010         /* HOOK_FreeModuleHooks( hModule ); */
1011         CLASS_FreeModuleClasses( hModule );
1012         CURSORICON_FreeModuleIcons( hModule );
1013     }
1014 }
1015
1016
1017 /***********************************************************************
1018  *              SetEventHook (USER.321)
1019  *
1020  *      Used by Turbo Debugger for Windows
1021  */
1022 FARPROC16 WINAPI SetEventHook16(FARPROC16 lpfnEventHook)
1023 {
1024     FIXME("(lpfnEventHook=%p): stub\n", lpfnEventHook);
1025     return 0;
1026 }
1027
1028
1029 /**********************************************************************
1030  *              EnableHardwareInput (USER.331)
1031  */
1032 BOOL16 WINAPI EnableHardwareInput16(BOOL16 bEnable)
1033 {
1034     FIXME("(%d) - stub\n", bEnable);
1035     return TRUE;
1036 }
1037
1038
1039 /***********************************************************************
1040  *              IsUserIdle (USER.333)
1041  */
1042 BOOL16 WINAPI IsUserIdle16(void)
1043 {
1044     if ( GetAsyncKeyState( VK_LBUTTON ) & 0x8000 )
1045         return FALSE;
1046     if ( GetAsyncKeyState( VK_RBUTTON ) & 0x8000 )
1047         return FALSE;
1048     if ( GetAsyncKeyState( VK_MBUTTON ) & 0x8000 )
1049         return FALSE;
1050     /* Should check for screen saver activation here ... */
1051     return TRUE;
1052 }
1053
1054
1055 /**********************************************************************
1056  *              LoadDIBIconHandler (USER.357)
1057  *
1058  * RT_ICON resource loader, installed by USER_SignalProc when module
1059  * is initialized.
1060  */
1061 HGLOBAL16 WINAPI LoadDIBIconHandler16( HGLOBAL16 hMemObj, HMODULE16 hModule, HRSRC16 hRsrc )
1062 {
1063     /* If hResource is zero we must allocate a new memory block, if it's
1064      * non-zero but GlobalLock() returns NULL then it was discarded and
1065      * we have to recommit some memory, otherwise we just need to check
1066      * the block size. See LoadProc() in 16-bit SDK for more.
1067      */
1068     FIXME( "%x %x %x: stub, not supported anymore\n", hMemObj, hModule, hRsrc );
1069     return 0;
1070 }
1071
1072 /**********************************************************************
1073  *              LoadDIBCursorHandler (USER.356)
1074  *
1075  * RT_CURSOR resource loader. Same as above.
1076  */
1077 HGLOBAL16 WINAPI LoadDIBCursorHandler16( HGLOBAL16 hMemObj, HMODULE16 hModule, HRSRC16 hRsrc )
1078 {
1079     FIXME( "%x %x %x: stub, not supported anymore\n", hMemObj, hModule, hRsrc );
1080     return 0;
1081 }
1082
1083
1084 /**********************************************************************
1085  *              IsMenu    (USER.358)
1086  */
1087 BOOL16 WINAPI IsMenu16( HMENU16 hmenu )
1088 {
1089     return IsMenu( HMENU_32(hmenu) );
1090 }
1091
1092
1093 /***********************************************************************
1094  *              DCHook (USER.362)
1095  */
1096 BOOL16 WINAPI DCHook16( HDC16 hdc, WORD code, DWORD data, LPARAM lParam )
1097 {
1098     FIXME( "hDC = %x, %i: stub\n", hdc, code );
1099     return FALSE;
1100 }
1101
1102
1103 /***********************************************************************
1104  *              SubtractRect (USER.373)
1105  */
1106 BOOL16 WINAPI SubtractRect16( LPRECT16 dest, const RECT16 *src1,
1107                               const RECT16 *src2 )
1108 {
1109     RECT16 tmp;
1110
1111     if (IsRectEmpty16( src1 ))
1112     {
1113         SetRectEmpty16( dest );
1114         return FALSE;
1115     }
1116     *dest = *src1;
1117     if (IntersectRect16( &tmp, src1, src2 ))
1118     {
1119         if (EqualRect16( &tmp, dest ))
1120         {
1121             SetRectEmpty16( dest );
1122             return FALSE;
1123         }
1124         if ((tmp.top == dest->top) && (tmp.bottom == dest->bottom))
1125         {
1126             if (tmp.left == dest->left) dest->left = tmp.right;
1127             else if (tmp.right == dest->right) dest->right = tmp.left;
1128         }
1129         else if ((tmp.left == dest->left) && (tmp.right == dest->right))
1130         {
1131             if (tmp.top == dest->top) dest->top = tmp.bottom;
1132             else if (tmp.bottom == dest->bottom) dest->bottom = tmp.top;
1133         }
1134     }
1135     return TRUE;
1136 }
1137
1138
1139 /**********************************************************************
1140  *         SetMenuContextHelpId    (USER.384)
1141  */
1142 BOOL16 WINAPI SetMenuContextHelpId16( HMENU16 hMenu, DWORD dwContextHelpID)
1143 {
1144     return SetMenuContextHelpId( HMENU_32(hMenu), dwContextHelpID );
1145 }
1146
1147
1148 /**********************************************************************
1149  *         GetMenuContextHelpId    (USER.385)
1150  */
1151 DWORD WINAPI GetMenuContextHelpId16( HMENU16 hMenu )
1152 {
1153     return GetMenuContextHelpId( HMENU_32(hMenu) );
1154 }
1155
1156
1157 /***********************************************************************
1158  *              LoadImage (USER.389)
1159  *
1160  */
1161 HANDLE16 WINAPI LoadImage16(HINSTANCE16 hinst, LPCSTR name, UINT16 type,
1162                             INT16 desiredx, INT16 desiredy, UINT16 loadflags)
1163 {
1164   return HANDLE_16(LoadImageA(HINSTANCE_32(hinst), name, type, desiredx,
1165                               desiredy, loadflags));
1166 }
1167
1168 /******************************************************************************
1169  *              CopyImage (USER.390) Creates new image and copies attributes to it
1170  *
1171  */
1172 HICON16 WINAPI CopyImage16(HANDLE16 hnd, UINT16 type, INT16 desiredx,
1173                            INT16 desiredy, UINT16 flags)
1174 {
1175   return HICON_16(CopyImage(HANDLE_32(hnd), (UINT)type, (INT)desiredx,
1176                             (INT)desiredy, (UINT)flags));
1177 }
1178
1179 /**********************************************************************
1180  *              DrawIconEx (USER.394)
1181  */
1182 BOOL16 WINAPI DrawIconEx16(HDC16 hdc, INT16 xLeft, INT16 yTop, HICON16 hIcon,
1183                            INT16 cxWidth, INT16 cyWidth, UINT16 istep,
1184                            HBRUSH16 hbr, UINT16 flags)
1185 {
1186   return DrawIconEx(HDC_32(hdc), xLeft, yTop, HICON_32(hIcon), cxWidth, cyWidth,
1187                     istep, HBRUSH_32(hbr), flags);
1188 }
1189
1190 /**********************************************************************
1191  *              GetIconInfo (USER.395)
1192  */
1193 BOOL16 WINAPI GetIconInfo16(HICON16 hIcon, LPICONINFO16 iconinfo)
1194 {
1195   ICONINFO ii32;
1196   BOOL16 ret = GetIconInfo(HICON_32(hIcon), &ii32);
1197
1198   iconinfo->fIcon = ii32.fIcon;
1199   iconinfo->xHotspot = ii32.xHotspot;
1200   iconinfo->yHotspot = ii32.yHotspot;
1201   iconinfo->hbmMask  = HBITMAP_16(ii32.hbmMask);
1202   iconinfo->hbmColor = HBITMAP_16(ii32.hbmColor);
1203   return ret;
1204 }
1205
1206
1207 /***********************************************************************
1208  *              FinalUserInit (USER.400)
1209  */
1210 void WINAPI FinalUserInit16( void )
1211 {
1212     /* FIXME: Should chain to FinalGdiInit */
1213 }
1214
1215
1216 /***********************************************************************
1217  *              CreateCursor (USER.406)
1218  */
1219 HCURSOR16 WINAPI CreateCursor16(HINSTANCE16 hInstance,
1220                                 INT16 xHotSpot, INT16 yHotSpot,
1221                                 INT16 nWidth, INT16 nHeight,
1222                                 LPCVOID lpANDbits, LPCVOID lpXORbits)
1223 {
1224   CURSORICONINFO info;
1225
1226   info.ptHotSpot.x = xHotSpot;
1227   info.ptHotSpot.y = yHotSpot;
1228   info.nWidth = nWidth;
1229   info.nHeight = nHeight;
1230   info.nWidthBytes = 0;
1231   info.bPlanes = 1;
1232   info.bBitsPerPixel = 1;
1233
1234   return CreateCursorIconIndirect16(hInstance, &info, lpANDbits, lpXORbits);
1235 }
1236
1237
1238 /***********************************************************************
1239  *              InitThreadInput   (USER.409)
1240  */
1241 HQUEUE16 WINAPI InitThreadInput16( WORD unknown, WORD flags )
1242 {
1243     /* nothing to do here */
1244     return 0xbeef;
1245 }
1246
1247
1248 /*******************************************************************
1249  *         InsertMenu    (USER.410)
1250  */
1251 BOOL16 WINAPI InsertMenu16( HMENU16 hMenu, UINT16 pos, UINT16 flags,
1252                             UINT16 id, SEGPTR data )
1253 {
1254     UINT pos32 = (UINT)pos;
1255     if ((pos == (UINT16)-1) && (flags & MF_BYPOSITION)) pos32 = (UINT)-1;
1256     if (IS_MENU_STRING_ITEM(flags) && data)
1257         return InsertMenuA( HMENU_32(hMenu), pos32, flags, id, MapSL(data) );
1258     return InsertMenuA( HMENU_32(hMenu), pos32, flags, id, (LPSTR)data );
1259 }
1260
1261
1262 /*******************************************************************
1263  *         AppendMenu    (USER.411)
1264  */
1265 BOOL16 WINAPI AppendMenu16(HMENU16 hMenu, UINT16 flags, UINT16 id, SEGPTR data)
1266 {
1267     return InsertMenu16( hMenu, -1, flags | MF_BYPOSITION, id, data );
1268 }
1269
1270
1271 /**********************************************************************
1272  *         RemoveMenu   (USER.412)
1273  */
1274 BOOL16 WINAPI RemoveMenu16( HMENU16 hMenu, UINT16 nPos, UINT16 wFlags )
1275 {
1276     return RemoveMenu( HMENU_32(hMenu), nPos, wFlags );
1277 }
1278
1279
1280 /**********************************************************************
1281  *         DeleteMenu    (USER.413)
1282  */
1283 BOOL16 WINAPI DeleteMenu16( HMENU16 hMenu, UINT16 nPos, UINT16 wFlags )
1284 {
1285     return DeleteMenu( HMENU_32(hMenu), nPos, wFlags );
1286 }
1287
1288
1289 /*******************************************************************
1290  *         ModifyMenu    (USER.414)
1291  */
1292 BOOL16 WINAPI ModifyMenu16( HMENU16 hMenu, UINT16 pos, UINT16 flags,
1293                             UINT16 id, SEGPTR data )
1294 {
1295     if (IS_MENU_STRING_ITEM(flags))
1296         return ModifyMenuA( HMENU_32(hMenu), pos, flags, id, MapSL(data) );
1297     return ModifyMenuA( HMENU_32(hMenu), pos, flags, id, (LPSTR)data );
1298 }
1299
1300
1301 /**********************************************************************
1302  *         CreatePopupMenu    (USER.415)
1303  */
1304 HMENU16 WINAPI CreatePopupMenu16(void)
1305 {
1306     return HMENU_16( CreatePopupMenu() );
1307 }
1308
1309
1310 /**********************************************************************
1311  *         SetMenuItemBitmaps    (USER.418)
1312  */
1313 BOOL16 WINAPI SetMenuItemBitmaps16( HMENU16 hMenu, UINT16 nPos, UINT16 wFlags,
1314                                     HBITMAP16 hNewUnCheck, HBITMAP16 hNewCheck)
1315 {
1316     return SetMenuItemBitmaps( HMENU_32(hMenu), nPos, wFlags,
1317                                HBITMAP_32(hNewUnCheck), HBITMAP_32(hNewCheck) );
1318 }
1319
1320
1321 /***********************************************************************
1322  *           lstrcmp   (USER.430)
1323  */
1324 INT16 WINAPI lstrcmp16( LPCSTR str1, LPCSTR str2 )
1325 {
1326     return strcmp( str1, str2 );
1327 }
1328
1329
1330 /***********************************************************************
1331  *           AnsiUpper   (USER.431)
1332  */
1333 SEGPTR WINAPI AnsiUpper16( SEGPTR strOrChar )
1334 {
1335     /* uppercase only one char if strOrChar < 0x10000 */
1336     if (HIWORD(strOrChar))
1337     {
1338         CharUpperA( MapSL(strOrChar) );
1339         return strOrChar;
1340     }
1341     else return (SEGPTR)CharUpperA( (LPSTR)strOrChar );
1342 }
1343
1344
1345 /***********************************************************************
1346  *           AnsiLower   (USER.432)
1347  */
1348 SEGPTR WINAPI AnsiLower16( SEGPTR strOrChar )
1349 {
1350     /* lowercase only one char if strOrChar < 0x10000 */
1351     if (HIWORD(strOrChar))
1352     {
1353         CharLowerA( MapSL(strOrChar) );
1354         return strOrChar;
1355     }
1356     else return (SEGPTR)CharLowerA( (LPSTR)strOrChar );
1357 }
1358
1359
1360 /***********************************************************************
1361  *           AnsiUpperBuff   (USER.437)
1362  */
1363 UINT16 WINAPI AnsiUpperBuff16( LPSTR str, UINT16 len )
1364 {
1365     CharUpperBuffA( str, len ? len : 65536 );
1366     return len;
1367 }
1368
1369
1370 /***********************************************************************
1371  *           AnsiLowerBuff   (USER.438)
1372  */
1373 UINT16 WINAPI AnsiLowerBuff16( LPSTR str, UINT16 len )
1374 {
1375     CharLowerBuffA( str, len ? len : 65536 );
1376     return len;
1377 }
1378
1379
1380 /*******************************************************************
1381  *              InsertMenuItem   (USER.441)
1382  *
1383  * FIXME: untested
1384  */
1385 BOOL16 WINAPI InsertMenuItem16( HMENU16 hmenu, UINT16 pos, BOOL16 byposition,
1386                                 const MENUITEMINFO16 *mii )
1387 {
1388     MENUITEMINFOA miia;
1389
1390     miia.cbSize        = sizeof(miia);
1391     miia.fMask         = mii->fMask;
1392     miia.dwTypeData    = (LPSTR)mii->dwTypeData;
1393     miia.fType         = mii->fType;
1394     miia.fState        = mii->fState;
1395     miia.wID           = mii->wID;
1396     miia.hSubMenu      = HMENU_32(mii->hSubMenu);
1397     miia.hbmpChecked   = HBITMAP_32(mii->hbmpChecked);
1398     miia.hbmpUnchecked = HBITMAP_32(mii->hbmpUnchecked);
1399     miia.dwItemData    = mii->dwItemData;
1400     miia.cch           = mii->cch;
1401     if (IS_MENU_STRING_ITEM(miia.fType))
1402         miia.dwTypeData = MapSL(mii->dwTypeData);
1403     return InsertMenuItemA( HMENU_32(hmenu), pos, byposition, &miia );
1404 }
1405
1406
1407 /**********************************************************************
1408  *           DrawState    (USER.449)
1409  */
1410 BOOL16 WINAPI DrawState16( HDC16 hdc, HBRUSH16 hbr, DRAWSTATEPROC16 func, LPARAM ldata,
1411                            WPARAM16 wdata, INT16 x, INT16 y, INT16 cx, INT16 cy, UINT16 flags )
1412 {
1413     struct draw_state_info info;
1414     UINT opcode = flags & 0xf;
1415
1416     if (opcode == DST_TEXT || opcode == DST_PREFIXTEXT)
1417     {
1418         /* make sure DrawStateA doesn't try to use ldata as a pointer */
1419         if (!wdata) wdata = strlen( MapSL(ldata) );
1420         if (!cx || !cy)
1421         {
1422             SIZE s;
1423             if (!GetTextExtentPoint32A( HDC_32(hdc), MapSL(ldata), wdata, &s )) return FALSE;
1424             if (!cx) cx = s.cx;
1425             if (!cy) cy = s.cy;
1426         }
1427     }
1428     info.proc  = func;
1429     info.param = ldata;
1430     return DrawStateA( HDC_32(hdc), HBRUSH_32(hbr), draw_state_callback,
1431                        (LPARAM)&info, wdata, x, y, cx, cy, flags );
1432 }
1433
1434
1435 /**********************************************************************
1436  *              CreateIconFromResourceEx (USER.450)
1437  *
1438  * FIXME: not sure about exact parameter types
1439  */
1440 HICON16 WINAPI CreateIconFromResourceEx16(LPBYTE bits, UINT16 cbSize,
1441                                           BOOL16 bIcon, DWORD dwVersion,
1442                                           INT16 width, INT16 height,
1443                                           UINT16 cFlag)
1444 {
1445   return HICON_16(CreateIconFromResourceEx(bits, cbSize, bIcon, dwVersion,
1446                                            width, height, cFlag));
1447 }
1448
1449
1450 /***********************************************************************
1451  *              AdjustWindowRectEx (USER.454)
1452  */
1453 BOOL16 WINAPI AdjustWindowRectEx16( LPRECT16 rect, DWORD style, BOOL16 menu, DWORD exStyle )
1454 {
1455     RECT rect32;
1456     BOOL ret;
1457
1458     rect32.left   = rect->left;
1459     rect32.top    = rect->top;
1460     rect32.right  = rect->right;
1461     rect32.bottom = rect->bottom;
1462     ret = AdjustWindowRectEx( &rect32, style, menu, exStyle );
1463     rect->left   = rect32.left;
1464     rect->top    = rect32.top;
1465     rect->right  = rect32.right;
1466     rect->bottom = rect32.bottom;
1467     return ret;
1468 }
1469
1470
1471 /***********************************************************************
1472  *              DestroyIcon (USER.457)
1473  */
1474 BOOL16 WINAPI DestroyIcon16(HICON16 hIcon)
1475 {
1476   return DestroyIcon32(hIcon, 0);
1477 }
1478
1479 /***********************************************************************
1480  *              DestroyCursor (USER.458)
1481  */
1482 BOOL16 WINAPI DestroyCursor16(HCURSOR16 hCursor)
1483 {
1484   return DestroyIcon32(hCursor, 0);
1485 }
1486
1487 /*******************************************************************
1488  *                      DRAG_QueryUpdate16
1489  *
1490  * Recursively find a child that contains spDragInfo->pt point
1491  * and send WM_QUERYDROPOBJECT. Helper for DragObject16.
1492  */
1493 static BOOL DRAG_QueryUpdate16( HWND hQueryWnd, SEGPTR spDragInfo )
1494 {
1495     BOOL bResult = 0;
1496     WPARAM wParam;
1497     POINT pt, old_pt;
1498     LPDRAGINFO16 ptrDragInfo = MapSL(spDragInfo);
1499     RECT tempRect;
1500     HWND child;
1501
1502     if (!IsWindowEnabled(hQueryWnd)) return FALSE;
1503
1504     old_pt.x = ptrDragInfo->pt.x;
1505     old_pt.y = ptrDragInfo->pt.y;
1506     pt = old_pt;
1507     ScreenToClient( hQueryWnd, &pt );
1508     child = ChildWindowFromPointEx( hQueryWnd, pt, CWP_SKIPINVISIBLE );
1509     if (!child) return FALSE;
1510
1511     if (child != hQueryWnd)
1512     {
1513         wParam = 0;
1514         if (DRAG_QueryUpdate16( child, spDragInfo )) return TRUE;
1515     }
1516     else
1517     {
1518         GetClientRect( hQueryWnd, &tempRect );
1519         wParam = !PtInRect( &tempRect, pt );
1520     }
1521
1522     ptrDragInfo->pt.x = pt.x;
1523     ptrDragInfo->pt.y = pt.y;
1524     ptrDragInfo->hScope = HWND_16(hQueryWnd);
1525
1526     bResult = SendMessage16( HWND_16(hQueryWnd), WM_QUERYDROPOBJECT, wParam, spDragInfo );
1527
1528     if (!bResult)
1529     {
1530         ptrDragInfo->pt.x = old_pt.x;
1531         ptrDragInfo->pt.y = old_pt.y;
1532     }
1533     return bResult;
1534 }
1535
1536
1537 /******************************************************************************
1538  *              DragObject (USER.464)
1539  */
1540 DWORD WINAPI DragObject16( HWND16 hwndScope, HWND16 hWnd, UINT16 wObj,
1541                            HANDLE16 hOfStruct, WORD szList, HCURSOR16 hCursor )
1542 {
1543     MSG msg;
1544     LPDRAGINFO16 lpDragInfo;
1545     SEGPTR      spDragInfo;
1546     HCURSOR     hOldCursor=0, hBummer=0;
1547     HGLOBAL16   hDragInfo  = GlobalAlloc16( GMEM_SHARE | GMEM_ZEROINIT, 2*sizeof(DRAGINFO16));
1548     HCURSOR     hCurrentCursor = 0;
1549     HWND16      hCurrentWnd = 0;
1550
1551     lpDragInfo = (LPDRAGINFO16) GlobalLock16(hDragInfo);
1552     spDragInfo = WOWGlobalLock16(hDragInfo);
1553
1554     if( !lpDragInfo || !spDragInfo ) return 0L;
1555
1556     if (!(hBummer = LoadCursorA(0, MAKEINTRESOURCEA(OCR_NO))))
1557     {
1558         GlobalFree16(hDragInfo);
1559         return 0L;
1560     }
1561
1562     if(hCursor) hOldCursor = SetCursor(HCURSOR_32(hCursor));
1563
1564     lpDragInfo->hWnd   = hWnd;
1565     lpDragInfo->hScope = 0;
1566     lpDragInfo->wFlags = wObj;
1567     lpDragInfo->hList  = szList; /* near pointer! */
1568     lpDragInfo->hOfStruct = hOfStruct;
1569     lpDragInfo->l = 0L;
1570
1571     SetCapture( HWND_32(hWnd) );
1572     ShowCursor( TRUE );
1573
1574     do
1575     {
1576         GetMessageW( &msg, 0, WM_MOUSEFIRST, WM_MOUSELAST );
1577
1578        *(lpDragInfo+1) = *lpDragInfo;
1579
1580         lpDragInfo->pt.x = msg.pt.x;
1581         lpDragInfo->pt.y = msg.pt.y;
1582
1583         /* update DRAGINFO struct */
1584         if( DRAG_QueryUpdate16(WIN_Handle32(hwndScope), spDragInfo) > 0 )
1585             hCurrentCursor = HCURSOR_32(hCursor);
1586         else
1587         {
1588             hCurrentCursor = hBummer;
1589             lpDragInfo->hScope = 0;
1590         }
1591         if( hCurrentCursor )
1592             SetCursor(hCurrentCursor);
1593
1594         /* send WM_DRAGLOOP */
1595         SendMessage16( hWnd, WM_DRAGLOOP, (WPARAM16)(hCurrentCursor != hBummer),
1596                                           (LPARAM) spDragInfo );
1597         /* send WM_DRAGSELECT or WM_DRAGMOVE */
1598         if( hCurrentWnd != lpDragInfo->hScope )
1599         {
1600             if( hCurrentWnd )
1601                 SendMessage16( hCurrentWnd, WM_DRAGSELECT, 0,
1602                        (LPARAM)MAKELONG(LOWORD(spDragInfo)+sizeof(DRAGINFO16),
1603                                         HIWORD(spDragInfo)) );
1604             hCurrentWnd = lpDragInfo->hScope;
1605             if( hCurrentWnd )
1606                 SendMessage16( hCurrentWnd, WM_DRAGSELECT, 1, (LPARAM)spDragInfo);
1607         }
1608         else
1609             if( hCurrentWnd )
1610                 SendMessage16( hCurrentWnd, WM_DRAGMOVE, 0, (LPARAM)spDragInfo);
1611
1612     } while( msg.message != WM_LBUTTONUP && msg.message != WM_NCLBUTTONUP );
1613
1614     ReleaseCapture();
1615     ShowCursor( FALSE );
1616
1617     if( hCursor ) SetCursor(hOldCursor);
1618
1619     if( hCurrentCursor != hBummer )
1620         msg.lParam = SendMessage16( lpDragInfo->hScope, WM_DROPOBJECT,
1621                                    (WPARAM16)hWnd, (LPARAM)spDragInfo );
1622     else
1623         msg.lParam = 0;
1624     GlobalFree16(hDragInfo);
1625
1626     return (DWORD)(msg.lParam);
1627 }
1628
1629
1630 /***********************************************************************
1631  *              DrawFocusRect (USER.466)
1632  */
1633 void WINAPI DrawFocusRect16( HDC16 hdc, const RECT16* rc )
1634 {
1635     RECT rect32;
1636
1637     rect32.left   = rc->left;
1638     rect32.top    = rc->top;
1639     rect32.right  = rc->right;
1640     rect32.bottom = rc->bottom;
1641     DrawFocusRect( HDC_32(hdc), &rect32 );
1642 }
1643
1644
1645 /***********************************************************************
1646  *           AnsiNext   (USER.472)
1647  */
1648 SEGPTR WINAPI AnsiNext16(SEGPTR current)
1649 {
1650     char *ptr = MapSL(current);
1651     return current + (CharNextA(ptr) - ptr);
1652 }
1653
1654
1655 /***********************************************************************
1656  *           AnsiPrev   (USER.473)
1657  */
1658 SEGPTR WINAPI AnsiPrev16( LPCSTR start, SEGPTR current )
1659 {
1660     char *ptr = MapSL(current);
1661     return current - (ptr - CharPrevA( start, ptr ));
1662 }
1663
1664
1665 /***********************************************************************
1666  *           FormatMessage   (USER.606)
1667  */
1668 DWORD WINAPI FormatMessage16(
1669     DWORD   dwFlags,
1670     SEGPTR lpSource,     /* [in] NOTE: not always a valid pointer */
1671     WORD   dwMessageId,
1672     WORD   dwLanguageId,
1673     LPSTR  lpBuffer,     /* [out] NOTE: *((HLOCAL16*)) for FORMAT_MESSAGE_ALLOCATE_BUFFER*/
1674     WORD   nSize,
1675     LPDWORD args )       /* [in] NOTE: va_list *args */
1676 {
1677 #ifdef __i386__
1678 /* This implementation is completely dependent on the format of the va_list on x86 CPUs */
1679     LPSTR       target,t;
1680     DWORD       talloced;
1681     LPSTR       from,f;
1682     DWORD       width = dwFlags & FORMAT_MESSAGE_MAX_WIDTH_MASK;
1683     BOOL        eos = FALSE;
1684     LPSTR       allocstring = NULL;
1685
1686     TRACE("(0x%x,%x,%d,0x%x,%p,%d,%p)\n",
1687           dwFlags,lpSource,dwMessageId,dwLanguageId,lpBuffer,nSize,args);
1688         if ((dwFlags & FORMAT_MESSAGE_FROM_SYSTEM)
1689                 && (dwFlags & FORMAT_MESSAGE_FROM_HMODULE)) return 0;
1690         if ((dwFlags & FORMAT_MESSAGE_FROM_STRING)
1691                 &&((dwFlags & FORMAT_MESSAGE_FROM_SYSTEM)
1692                         || (dwFlags & FORMAT_MESSAGE_FROM_HMODULE))) return 0;
1693
1694     if (width && width != FORMAT_MESSAGE_MAX_WIDTH_MASK)
1695         FIXME("line wrapping (%u) not supported.\n", width);
1696     from = NULL;
1697     if (dwFlags & FORMAT_MESSAGE_FROM_STRING)
1698     {
1699         char *source = MapSL(lpSource);
1700         from = HeapAlloc( GetProcessHeap(), 0, strlen(source)+1 );
1701         strcpy( from, source );
1702     }
1703     else if (dwFlags & FORMAT_MESSAGE_FROM_SYSTEM) {
1704         from = HeapAlloc( GetProcessHeap(),0,200 );
1705         sprintf(from,"Systemmessage, messageid = 0x%08x\n",dwMessageId);
1706     }
1707     else if (dwFlags & FORMAT_MESSAGE_FROM_HMODULE) {
1708         INT16   bufsize;
1709         HINSTANCE16 hinst16 = ((HINSTANCE16)lpSource & 0xffff);
1710
1711         dwMessageId &= 0xFFFF;
1712         bufsize=LoadString16(hinst16,dwMessageId,NULL,0);
1713         if (bufsize) {
1714             from = HeapAlloc( GetProcessHeap(), 0, bufsize +1);
1715             LoadString16(hinst16,dwMessageId,from,bufsize+1);
1716         }
1717     }
1718     target      = HeapAlloc( GetProcessHeap(), HEAP_ZERO_MEMORY, 100);
1719     t   = target;
1720     talloced= 100;
1721
1722 #define ADD_TO_T(c) \
1723         *t++=c;\
1724         if (t-target == talloced) {\
1725                 target  = HeapReAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,target,talloced*2);\
1726                 t       = target+talloced;\
1727                 talloced*=2;\
1728         }
1729
1730     if (from) {
1731         f=from;
1732         while (*f && !eos) {
1733             if (*f=='%') {
1734                 int     insertnr;
1735                 char    *fmtstr,*x,*lastf;
1736                 DWORD   *argliststart;
1737
1738                 fmtstr = NULL;
1739                 lastf = f;
1740                 f++;
1741                 if (!*f) {
1742                     ADD_TO_T('%');
1743                     continue;
1744                 }
1745                 switch (*f) {
1746                 case '1':case '2':case '3':case '4':case '5':
1747                 case '6':case '7':case '8':case '9':
1748                     insertnr=*f-'0';
1749                     switch (f[1]) {
1750                     case '0':case '1':case '2':case '3':
1751                     case '4':case '5':case '6':case '7':
1752                     case '8':case '9':
1753                         f++;
1754                         insertnr=insertnr*10+*f-'0';
1755                         f++;
1756                         break;
1757                     default:
1758                         f++;
1759                         break;
1760                     }
1761                     if (*f=='!') {
1762                         f++;
1763                         if (NULL!=(x=strchr(f,'!'))) {
1764                             *x='\0';
1765                             fmtstr=HeapAlloc(GetProcessHeap(),0,strlen(f)+2);
1766                             sprintf(fmtstr,"%%%s",f);
1767                             f=x+1;
1768                         } else {
1769                             fmtstr=HeapAlloc(GetProcessHeap(),0,strlen(f)+2);
1770                             sprintf(fmtstr,"%%%s",f);
1771                             f+=strlen(f); /*at \0*/
1772                         }
1773                     }
1774                     else
1775                     {
1776                         if(!args) break;
1777                         fmtstr=HeapAlloc( GetProcessHeap(), 0, 3 );
1778                         strcpy( fmtstr, "%s" );
1779                     }
1780                     if (args) {
1781                         int     ret;
1782                         int     sz;
1783                         LPSTR   b = HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sz = 100);
1784
1785                         argliststart=args+insertnr-1;
1786
1787                         /* CMF - This makes a BIG assumption about va_list */
1788                         while ((ret = vsnprintf(b, sz, fmtstr, (va_list) argliststart) < 0) || (ret >= sz)) {
1789                             sz = (ret == -1 ? sz + 100 : ret + 1);
1790                             b = HeapReAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, b, sz);
1791                         }
1792                         for (x=b; *x; x++) ADD_TO_T(*x);
1793                         HeapFree(GetProcessHeap(), 0, b);
1794                     } else {
1795                         /* NULL args - copy formatstr
1796                          * (probably wrong)
1797                          */
1798                         while ((lastf<f)&&(*lastf)) {
1799                             ADD_TO_T(*lastf++);
1800                         }
1801                     }
1802                     HeapFree(GetProcessHeap(),0,fmtstr);
1803                     break;
1804                 case '0': /* Just stop processing format string */
1805                     eos = TRUE;
1806                     f++;
1807                     break;
1808                 case 'n': /* 16 bit version just outputs 'n' */
1809                 default:
1810                     ADD_TO_T(*f++);
1811                     break;
1812                 }
1813             } else { /* '\n' or '\r' gets mapped to "\r\n" */
1814                 if(*f == '\n' || *f == '\r') {
1815                     if (width == 0) {
1816                         ADD_TO_T('\r');
1817                         ADD_TO_T('\n');
1818                         if(*f++ == '\r' && *f == '\n')
1819                             f++;
1820                     }
1821                 } else {
1822                     ADD_TO_T(*f++);
1823                 }
1824             }
1825         }
1826         *t='\0';
1827     }
1828     talloced = strlen(target)+1;
1829     if (nSize && talloced<nSize) {
1830         target = HeapReAlloc(GetProcessHeap(),HEAP_ZERO_MEMORY,target,nSize);
1831     }
1832     TRACE("-- %s\n",debugstr_a(target));
1833     if (dwFlags & FORMAT_MESSAGE_ALLOCATE_BUFFER) {
1834         /* nSize is the MINIMUM size */
1835         HLOCAL16 h = LocalAlloc16(LPTR,talloced);
1836         SEGPTR ptr = LocalLock16(h);
1837         allocstring = MapSL( ptr );
1838         memcpy( allocstring,target,talloced);
1839         LocalUnlock16( h );
1840         *((HLOCAL16*)lpBuffer) = h;
1841     } else
1842         lstrcpynA(lpBuffer,target,nSize);
1843     HeapFree(GetProcessHeap(),0,target);
1844     HeapFree(GetProcessHeap(),0,from);
1845     return (dwFlags & FORMAT_MESSAGE_ALLOCATE_BUFFER) ?
1846         strlen(allocstring):
1847         strlen(lpBuffer);
1848 #else
1849         return 0;
1850 #endif /* __i386__ */
1851 }
1852 #undef ADD_TO_T
1853
1854
1855 /***********************************************************************
1856  *              ChangeDisplaySettings (USER.620)
1857  */
1858 LONG WINAPI ChangeDisplaySettings16( LPDEVMODEA devmode, DWORD flags )
1859 {
1860     return ChangeDisplaySettingsA( devmode, flags );
1861 }
1862
1863
1864 /***********************************************************************
1865  *              EnumDisplaySettings (USER.621)
1866  */
1867 BOOL16 WINAPI EnumDisplaySettings16( LPCSTR name, DWORD n, LPDEVMODEA devmode )
1868 {
1869     return EnumDisplaySettingsA( name, n, devmode );
1870 }
1871
1872 /**********************************************************************
1873  *          DrawFrameControl  (USER.656)
1874  */
1875 BOOL16 WINAPI DrawFrameControl16( HDC16 hdc, LPRECT16 rc, UINT16 uType, UINT16 uState )
1876 {
1877     RECT rect32;
1878     BOOL ret;
1879
1880     rect32.left   = rc->left;
1881     rect32.top    = rc->top;
1882     rect32.right  = rc->right;
1883     rect32.bottom = rc->bottom;
1884     ret = DrawFrameControl( HDC_32(hdc), &rect32, uType, uState );
1885     rc->left   = rect32.left;
1886     rc->top    = rect32.top;
1887     rc->right  = rect32.right;
1888     rc->bottom = rect32.bottom;
1889     return ret;
1890 }
1891
1892 /**********************************************************************
1893  *          DrawEdge   (USER.659)
1894  */
1895 BOOL16 WINAPI DrawEdge16( HDC16 hdc, LPRECT16 rc, UINT16 edge, UINT16 flags )
1896 {
1897     RECT rect32;
1898     BOOL ret;
1899
1900     rect32.left   = rc->left;
1901     rect32.top    = rc->top;
1902     rect32.right  = rc->right;
1903     rect32.bottom = rc->bottom;
1904     ret = DrawEdge( HDC_32(hdc), &rect32, edge, flags );
1905     rc->left   = rect32.left;
1906     rc->top    = rect32.top;
1907     rc->right  = rect32.right;
1908     rc->bottom = rect32.bottom;
1909     return ret;
1910 }
1911
1912 /**********************************************************************
1913  *              CheckMenuRadioItem (USER.666)
1914  */
1915 BOOL16 WINAPI CheckMenuRadioItem16(HMENU16 hMenu, UINT16 first, UINT16 last,
1916                                    UINT16 check, BOOL16 bypos)
1917 {
1918      return CheckMenuRadioItem( HMENU_32(hMenu), first, last, check, bypos );
1919 }