4 * Copyright 1993 Robert J. Amstadt
9 #include "wine/winbase16.h"
19 #include "cursoricon.h"
24 #include "sysmetrics.h"
28 #include "debugtools.h"
30 DECLARE_DEBUG_CHANNEL(hook);
31 DECLARE_DEBUG_CHANNEL(local);
32 DECLARE_DEBUG_CHANNEL(system);
33 DECLARE_DEBUG_CHANNEL(win);
34 DECLARE_DEBUG_CHANNEL(win32);
36 /***********************************************************************
37 * GetFreeSystemResources (USER.284)
39 WORD WINAPI GetFreeSystemResources16( WORD resType )
43 int userPercent, gdiPercent;
45 if ((gdi_inst = LoadLibrary16( "GDI" )) < 32) return 0;
46 gdi_heap = GlobalHandleToSel16( gdi_inst );
50 case GFSR_USERRESOURCES:
51 userPercent = (int)LOCAL_CountFree( USER_HeapSel ) * 100 /
52 LOCAL_HeapSize( USER_HeapSel );
56 case GFSR_GDIRESOURCES:
57 gdiPercent = (int)LOCAL_CountFree( gdi_inst ) * 100 /
58 LOCAL_HeapSize( gdi_inst );
62 case GFSR_SYSTEMRESOURCES:
63 userPercent = (int)LOCAL_CountFree( USER_HeapSel ) * 100 /
64 LOCAL_HeapSize( USER_HeapSel );
65 gdiPercent = (int)LOCAL_CountFree( gdi_inst ) * 100 /
66 LOCAL_HeapSize( gdi_inst );
70 userPercent = gdiPercent = 0;
73 FreeLibrary16( gdi_inst );
74 return (WORD)min( userPercent, gdiPercent );
78 /**********************************************************************
81 INT16 WINAPI InitApp16( HINSTANCE16 hInstance )
83 /* Hack: restore the divide-by-zero handler */
84 /* FIXME: should set a USER-specific handler that displays a msg box */
85 INT_SetPMHandler( 0, INT_GetPMHandler( 0xff ) );
87 /* Create task message queue */
88 if ( !GetFastQueue16() ) return 0;
93 /**********************************************************************
96 static void USER_ModuleUnload( HMODULE16 hModule )
98 HOOK_FreeModuleHooks( hModule );
99 CLASS_FreeModuleClasses( hModule );
100 CURSORICON_FreeModuleIcons( hModule );
103 /**********************************************************************
106 static void USER_QueueCleanup( HQUEUE16 hQueue )
110 WND* desktop = WIN_GetDesktop();
112 /* Patch desktop window */
113 if ( desktop->hmemTaskQ == hQueue )
115 HTASK16 nextTask = TASK_GetNextTask( GetCurrentTask() );
116 desktop->hmemTaskQ = GetTaskQueue16( nextTask );
119 /* Patch resident popup menu window */
120 MENU_PatchResidentPopup( hQueue, NULL );
122 TIMER_RemoveQueueTimers( hQueue );
124 HOOK_FreeQueueHooks( hQueue );
126 QUEUE_SetExitingQueue( hQueue );
127 WIN_ResetQueueWindows( desktop, hQueue, (HQUEUE16)0);
128 QUEUE_SetExitingQueue( 0 );
130 /* Free the message queue */
131 QUEUE_DeleteMsgQueue( hQueue );
133 WIN_ReleaseDesktop();
137 /**********************************************************************
140 static void USER_AppExit( HINSTANCE16 hInstance )
142 /* FIXME: maybe destroy menus (Windows only complains about them
146 /* ModuleUnload() in "Internals" */
148 hInstance = GetExePtr( hInstance );
149 if( GetModuleUsage16( hInstance ) <= 1 )
150 USER_ModuleUnload( hInstance );
154 /***********************************************************************
155 * USER_SignalProc (USER.314)
157 void WINAPI USER_SignalProc( HANDLE16 hTaskOrModule, UINT16 uCode,
158 UINT16 uExitFn, HINSTANCE16 hInstance,
161 FIXME_(win)("Win 3.1 USER signal %04x\n", uCode );
164 /***********************************************************************
165 * FinalUserInit (USER.400)
167 void WINAPI FinalUserInit16( void )
169 /* FIXME: Should chain to FinalGdiInit now. */
172 /***********************************************************************
173 * UserSignalProc (USER.610) (USER32.559)
175 * For comments about the meaning of uCode and dwFlags
176 * see PROCESS_CallUserSignalProc.
179 WORD WINAPI UserSignalProc( UINT uCode, DWORD dwThreadOrProcessID,
180 DWORD dwFlags, HMODULE16 hModule )
184 /* FIXME: Proper reaction to most signals still missing. */
188 case USIG_DLL_UNLOAD_WIN16:
189 case USIG_DLL_UNLOAD_WIN32:
190 USER_ModuleUnload( hModule );
193 case USIG_DLL_UNLOAD_ORPHANS:
196 case USIG_FAULT_DIALOG_PUSH:
197 case USIG_FAULT_DIALOG_POP:
200 case USIG_THREAD_INIT:
203 case USIG_THREAD_EXIT:
204 USER_QueueCleanup( GetThreadQueue16( dwThreadOrProcessID ) );
205 SetThreadQueue16( dwThreadOrProcessID, 0 );
208 case USIG_PROCESS_CREATE:
211 case USIG_PROCESS_INIT:
212 case USIG_PROCESS_LOADED:
214 case USIG_PROCESS_RUNNING:
217 case USIG_PROCESS_EXIT:
220 case USIG_PROCESS_DESTROY:
221 hInst = ((TDB *)GlobalLock16( GetCurrentTask() ))->hInstance;
222 USER_AppExit( hInst );
226 FIXME_(win)("(%04x, %08lx, %04lx, %04x)\n",
227 uCode, dwThreadOrProcessID, dwFlags, hModule );
231 /* FIXME: Should chain to GdiSignalProc now. */
236 /***********************************************************************
237 * USER_DllEntryPoint (USER.374)
239 BOOL WINAPI USER_DllEntryPoint( DWORD dwReason, HINSTANCE hInstDLL, WORD ds,
240 WORD wHeapSize, DWORD dwReserved1, WORD wReserved2 )
244 case DLL_PROCESS_ATTACH:
246 * We need to load the 32-bit library so as to be able
247 * to access the system resources stored there!
249 if ( !LoadLibraryA("USER32.DLL") )
251 ERR_(win)( "Could not load USER32.DLL\n" );
260 /***********************************************************************
261 * ExitWindows16 (USER.7)
263 BOOL16 WINAPI ExitWindows16( DWORD dwReturnCode, UINT16 wReserved )
265 return ExitWindowsEx( EWX_LOGOFF, 0xffffffff );
269 /***********************************************************************
270 * ExitWindowsExec16 (USER.246)
272 BOOL16 WINAPI ExitWindowsExec16( LPCSTR lpszExe, LPCSTR lpszParams )
274 TRACE_(system)("Should run the following in DOS-mode: \"%s %s\"\n",
275 lpszExe, lpszParams);
276 return ExitWindowsEx( EWX_LOGOFF, 0xffffffff );
280 /***********************************************************************
281 * ExitWindowsEx (USER32.196)
283 BOOL WINAPI ExitWindowsEx( UINT flags, DWORD reserved )
289 /* We have to build a list of all windows first, as in EnumWindows */
291 if (!(list = WIN_BuildWinArray( WIN_GetDesktop(), 0, NULL )))
293 WIN_ReleaseDesktop();
297 /* Send a WM_QUERYENDSESSION message to every window */
299 for (ppWnd = list, i = 0; *ppWnd; ppWnd++, i++)
301 /* Make sure that the window still exists */
302 if (!IsWindow( (*ppWnd)->hwndSelf )) continue;
303 if (!SendMessage16( (*ppWnd)->hwndSelf, WM_QUERYENDSESSION, 0, 0 ))
308 /* Now notify all windows that got a WM_QUERYENDSESSION of the result */
310 for (ppWnd = list; i > 0; i--, ppWnd++)
312 if (!IsWindow( (*ppWnd)->hwndSelf )) continue;
313 SendMessage16( (*ppWnd)->hwndSelf, WM_ENDSESSION, result, 0 );
315 WIN_ReleaseWinArray(list);
317 if (result) ExitKernel16();
318 WIN_ReleaseDesktop();
322 static void _dump_CDS_flags(DWORD flags) {
323 #define X(x) if (flags & CDS_##x) MESSAGE(""#x ",");
324 X(UPDATEREGISTRY);X(TEST);X(FULLSCREEN);X(GLOBAL);
325 X(SET_PRIMARY);X(RESET);X(SETRECT);X(NORESET);
329 /***********************************************************************
330 * ChangeDisplaySettingsA (USER32.589)
332 LONG WINAPI ChangeDisplaySettingsA( LPDEVMODEA devmode, DWORD flags )
334 FIXME_(system)("(%p,0x%08lx), stub\n",devmode,flags);
335 MESSAGE("\tflags=");_dump_CDS_flags(flags);MESSAGE("\n");
337 FIXME_(system)(" devmode=NULL (return to default mode)\n");
338 else if ( (devmode->dmBitsPerPel != GetSystemMetrics(SM_WINE_BPP))
339 || (devmode->dmPelsHeight != GetSystemMetrics(SM_CYSCREEN))
340 || (devmode->dmPelsWidth != GetSystemMetrics(SM_CXSCREEN)) )
344 if (devmode->dmFields & DM_BITSPERPEL)
345 FIXME_(system)(" bpp=%ld\n",devmode->dmBitsPerPel);
346 if (devmode->dmFields & DM_PELSWIDTH)
347 FIXME_(system)(" width=%ld\n",devmode->dmPelsWidth);
348 if (devmode->dmFields & DM_PELSHEIGHT)
349 FIXME_(system)(" height=%ld\n",devmode->dmPelsHeight);
350 FIXME_(system)(" (Putting X in this mode beforehand might help)\n");
351 /* we don't, but the program ... does not need to know */
352 return DISP_CHANGE_SUCCESSFUL;
354 return DISP_CHANGE_SUCCESSFUL;
357 /***********************************************************************
358 * ChangeDisplaySettingsExA (USER32.604)
360 LONG WINAPI ChangeDisplaySettingsExA(
361 LPCSTR devname, LPDEVMODEA devmode, HWND hwnd, DWORD flags,
364 FIXME_(system)("(%s,%p,0x%04x,0x%08lx,0x%08lx), stub\n",devname,devmode,hwnd,flags,lparam);
365 MESSAGE("\tflags=");_dump_CDS_flags(flags);MESSAGE("\n");
367 FIXME_(system)(" devmode=NULL (return to default mode)\n");
368 else if ( (devmode->dmBitsPerPel != GetSystemMetrics(SM_WINE_BPP))
369 || (devmode->dmPelsHeight != GetSystemMetrics(SM_CYSCREEN))
370 || (devmode->dmPelsWidth != GetSystemMetrics(SM_CXSCREEN)) )
374 if (devmode->dmFields & DM_BITSPERPEL)
375 FIXME_(system)(" bpp=%ld\n",devmode->dmBitsPerPel);
376 if (devmode->dmFields & DM_PELSWIDTH)
377 FIXME_(system)(" width=%ld\n",devmode->dmPelsWidth);
378 if (devmode->dmFields & DM_PELSHEIGHT)
379 FIXME_(system)(" height=%ld\n",devmode->dmPelsHeight);
380 FIXME_(system)(" (Putting X in this mode beforehand might help)\n");
381 /* we don't, but the program ... does not need to know */
382 return DISP_CHANGE_SUCCESSFUL;
384 return DISP_CHANGE_SUCCESSFUL;
387 /***********************************************************************
388 * EnumDisplaySettingsA (USER32.592)
389 * FIXME: Currently uses static list of modes.
392 * TRUE if nth setting exists found (described in the LPDEVMODEA struct)
393 * FALSE if we do not have the nth setting
395 BOOL WINAPI EnumDisplaySettingsA(
396 LPCSTR name, /* [in] huh? */
397 DWORD n, /* [in] nth entry in display settings list*/
398 LPDEVMODEA devmode /* [out] devmode for that setting */
404 } modes[NRMODES]={{512,384},{640,400},{640,480},{800,600},{1024,768}};
405 int depths[4] = {8,16,24,32};
407 TRACE_(system)("(%s,%ld,%p)\n",name,n,devmode);
409 devmode->dmBitsPerPel = GetSystemMetrics(SM_WINE_BPP);
410 devmode->dmPelsHeight = GetSystemMetrics(SM_CYSCREEN);
411 devmode->dmPelsWidth = GetSystemMetrics(SM_CXSCREEN);
414 if ((n-1)<NRMODES*NRDEPTHS) {
415 devmode->dmBitsPerPel = depths[(n-1)/NRMODES];
416 devmode->dmPelsHeight = modes[(n-1)%NRMODES].h;
417 devmode->dmPelsWidth = modes[(n-1)%NRMODES].w;
423 /***********************************************************************
424 * EnumDisplaySettingsW (USER32.593)
426 BOOL WINAPI EnumDisplaySettingsW(LPCWSTR name,DWORD n,LPDEVMODEW devmode) {
427 LPSTR nameA = HEAP_strdupWtoA(GetProcessHeap(),0,name);
429 BOOL ret = EnumDisplaySettingsA(nameA,n,&devmodeA);
432 devmode->dmBitsPerPel = devmodeA.dmBitsPerPel;
433 devmode->dmPelsHeight = devmodeA.dmPelsHeight;
434 devmode->dmPelsWidth = devmodeA.dmPelsWidth;
435 /* FIXME: convert rest too, if they are ever returned */
437 HeapFree(GetProcessHeap(),0,nameA);
441 /***********************************************************************
442 * EnumDisplayDevicesA (USER32.184)
444 BOOL WINAPI EnumDisplayDevicesA(
445 LPVOID unused,DWORD i,LPDISPLAY_DEVICEA lpDisplayDevice,DWORD dwFlags
449 FIXME_(system)("(%p,%ld,%p,0x%08lx), stub!\n",unused,i,lpDisplayDevice,dwFlags);
450 strcpy(lpDisplayDevice->DeviceName,"X11");
451 strcpy(lpDisplayDevice->DeviceString,"X 11 Windowing System");
452 lpDisplayDevice->StateFlags =
453 DISPLAY_DEVICE_ATTACHED_TO_DESKTOP |
454 DISPLAY_DEVICE_PRIMARY_DEVICE |
455 DISPLAY_DEVICE_VGA_COMPATIBLE;
459 /***********************************************************************
460 * EnumDisplayDevicesW (USER32.185)
462 BOOL WINAPI EnumDisplayDevicesW(
463 LPVOID unused,DWORD i,LPDISPLAY_DEVICEW lpDisplayDevice,DWORD dwFlags
467 FIXME_(system)("(%p,%ld,%p,0x%08lx), stub!\n",unused,i,lpDisplayDevice,dwFlags);
468 MultiByteToWideChar( CP_ACP, 0, "X11", -1, lpDisplayDevice->DeviceName,
469 sizeof(lpDisplayDevice->DeviceName)/sizeof(WCHAR) );
470 MultiByteToWideChar( CP_ACP, 0, "X11 Windowing System", -1, lpDisplayDevice->DeviceString,
471 sizeof(lpDisplayDevice->DeviceString)/sizeof(WCHAR) );
472 lpDisplayDevice->StateFlags =
473 DISPLAY_DEVICE_ATTACHED_TO_DESKTOP |
474 DISPLAY_DEVICE_PRIMARY_DEVICE |
475 DISPLAY_DEVICE_VGA_COMPATIBLE;
479 /***********************************************************************
480 * SetEventHook (USER.321)
482 * Used by Turbo Debugger for Windows
484 FARPROC16 WINAPI SetEventHook16(FARPROC16 lpfnEventHook)
486 FIXME_(hook)("(lpfnEventHook=%08x): stub\n", (UINT)lpfnEventHook);
490 /***********************************************************************
491 * UserSeeUserDo (USER.216)
493 DWORD WINAPI UserSeeUserDo16(WORD wReqType, WORD wParam1, WORD wParam2, WORD wParam3)
497 case USUD_LOCALALLOC:
498 return LOCAL_Alloc(USER_HeapSel, wParam1, wParam3);
500 return LOCAL_Free(USER_HeapSel, wParam1);
501 case USUD_LOCALCOMPACT:
502 return LOCAL_Compact(USER_HeapSel, wParam3, 0);
505 case USUD_FIRSTCLASS:
506 FIXME_(local)("return a pointer to the first window class.\n");
509 WARN_(local)("wReqType %04x (unknown)", wReqType);
514 /***********************************************************************
515 * GetSystemDebugState16 (USER.231)
517 WORD WINAPI GetSystemDebugState16(void)
519 return 0; /* FIXME */
522 /***********************************************************************
523 * RegisterLogonProcess (USER32.434)
525 DWORD WINAPI RegisterLogonProcess(HANDLE hprocess,BOOL x) {
526 FIXME_(win32)("(%d,%d),stub!\n",hprocess,x);
530 /***********************************************************************
531 * CreateWindowStationW (USER32.86)
533 HWINSTA WINAPI CreateWindowStationW(
534 LPWSTR winstation,DWORD res1,DWORD desiredaccess,
535 LPSECURITY_ATTRIBUTES lpsa
537 FIXME_(win32)("(%s,0x%08lx,0x%08lx,%p),stub!\n",debugstr_w(winstation),
538 res1,desiredaccess,lpsa
543 /***********************************************************************
544 * SetProcessWindowStation (USER32.496)
546 BOOL WINAPI SetProcessWindowStation(HWINSTA hWinSta) {
547 FIXME_(win32)("(%d),stub!\n",hWinSta);
551 /***********************************************************************
552 * SetUserObjectSecurity (USER32.514)
554 BOOL WINAPI SetUserObjectSecurity(
556 PSECURITY_INFORMATION pSIRequested,
557 PSECURITY_DESCRIPTOR pSID
559 FIXME_(win32)("(0x%08x,%p,%p),stub!\n",hObj,pSIRequested,pSID);
563 /***********************************************************************
564 * CreateDesktopA (USER32.68)
566 HDESK WINAPI CreateDesktopA(
567 LPSTR lpszDesktop,LPSTR lpszDevice,LPDEVMODEA pDevmode,
568 DWORD dwFlags,DWORD dwDesiredAccess,LPSECURITY_ATTRIBUTES lpsa
570 FIXME_(win32)("(%s,%s,%p,0x%08lx,0x%08lx,%p),stub!\n",
571 lpszDesktop,lpszDevice,pDevmode,
572 dwFlags,dwDesiredAccess,lpsa
577 /***********************************************************************
578 * CreateDesktopW (USER32.69)
580 HDESK WINAPI CreateDesktopW(
581 LPWSTR lpszDesktop,LPWSTR lpszDevice,LPDEVMODEW pDevmode,
582 DWORD dwFlags,DWORD dwDesiredAccess,LPSECURITY_ATTRIBUTES lpsa
584 FIXME_(win32)("(%s,%s,%p,0x%08lx,0x%08lx,%p),stub!\n",
585 debugstr_w(lpszDesktop),debugstr_w(lpszDevice),pDevmode,
586 dwFlags,dwDesiredAccess,lpsa
591 /***********************************************************************
592 * EnumDesktopWindows (USER32.591)
594 BOOL WINAPI EnumDesktopWindows( HDESK hDesktop, WNDENUMPROC lpfn, LPARAM lParam ) {
595 FIXME_(win32)("(0x%08x, %p, 0x%08lx), stub!\n", hDesktop, lpfn, lParam );
600 /***********************************************************************
603 BOOL WINAPI CloseWindowStation(HWINSTA hWinSta)
605 FIXME_(win32)("(0x%08x)\n", hWinSta);
609 /***********************************************************************
612 BOOL WINAPI CloseDesktop(HDESK hDesk)
614 FIXME_(win32)("(0x%08x)\n", hDesk);
618 /***********************************************************************
619 * SetWindowStationUser (USER32.521)
621 DWORD WINAPI SetWindowStationUser(DWORD x1,DWORD x2) {
622 FIXME_(win32)("(0x%08lx,0x%08lx),stub!\n",x1,x2);
626 /***********************************************************************
627 * SetLogonNotifyWindow (USER32.486)
629 DWORD WINAPI SetLogonNotifyWindow(HWINSTA hwinsta,HWND hwnd) {
630 FIXME_(win32)("(0x%x,%04x),stub!\n",hwinsta,hwnd);
634 /***********************************************************************
635 * LoadLocalFonts (USER32.486)
637 VOID WINAPI LoadLocalFonts(VOID) {
641 /***********************************************************************
642 * GetUserObjectInformationA (USER32.299)
644 BOOL WINAPI GetUserObjectInformationA( HANDLE hObj, INT nIndex, LPVOID pvInfo, DWORD nLength, LPDWORD lpnLen )
645 { FIXME_(win32)("(0x%x %i %p %ld %p),stub!\n", hObj, nIndex, pvInfo, nLength, lpnLen );
648 /***********************************************************************
649 * GetUserObjectInformationW (USER32.300)
651 BOOL WINAPI GetUserObjectInformationW( HANDLE hObj, INT nIndex, LPVOID pvInfo, DWORD nLength, LPDWORD lpnLen )
652 { FIXME_(win32)("(0x%x %i %p %ld %p),stub!\n", hObj, nIndex, pvInfo, nLength, lpnLen );
655 /***********************************************************************
656 * GetUserObjectSecurity (USER32.300)
658 BOOL WINAPI GetUserObjectSecurity(HANDLE hObj, PSECURITY_INFORMATION pSIRequested,
659 PSECURITY_DESCRIPTOR pSID, DWORD nLength, LPDWORD lpnLengthNeeded)
660 { FIXME_(win32)("(0x%x %p %p len=%ld %p),stub!\n", hObj, pSIRequested, pSID, nLength, lpnLengthNeeded);
664 /***********************************************************************
665 * SetSystemCursor (USER32.507)
667 BOOL WINAPI SetSystemCursor(HCURSOR hcur, DWORD id)
668 { FIXME_(win32)("(%08x,%08lx),stub!\n", hcur, id);
672 /***********************************************************************
673 * RegisterSystemThread (USER32.435)
675 void WINAPI RegisterSystemThread(DWORD flags, DWORD reserved)
677 FIXME_(win32)("(%08lx, %08lx)\n", flags, reserved);
680 /***********************************************************************
681 * RegisterDeviceNotificationA (USER32.477)
683 HDEVNOTIFY WINAPI RegisterDeviceNotificationA(
684 HANDLE hnd, LPVOID notifyfilter, DWORD flags
686 FIXME_(win32)("(hwnd=%08x, filter=%p,flags=0x%08lx), STUB!\n",
687 hnd,notifyfilter,flags