dlls/user/user_main.c

   1 /*
   2  * USER initialization code
   3  *
   4  * Copyright 2000 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 <stdarg.h>
  22 #include <stdio.h>
  23 #include <string.h>
  24 #include "windef.h"
  25 #include "winbase.h"
  26 #include "wingdi.h"
  27 #include "winuser.h"
  28 #include "winreg.h"
  29 #include "tlhelp32.h"
  30
  31 #include "controls.h"
  32 #include "user_private.h"
  33 #include "win.h"
  34 #include "wine/debug.h"
  35
  36 WINE_DEFAULT_DEBUG_CHANNEL(graphics);
  37
  38 USER_DRIVER USER_Driver;
  39
  40 WORD USER_HeapSel = 0;  /* USER heap selector */
  41 HMODULE user32_module = 0;
  42
  43 static SYSLEVEL USER_SysLevel;
  44 static CRITICAL_SECTION_DEBUG critsect_debug =
  45 {
  46     0, 0, &USER_SysLevel.crst,
  47     { &critsect_debug.ProcessLocksList, &critsect_debug.ProcessLocksList },
  48       0, 0, { 0, (DWORD)(__FILE__ ": USER_SysLevel") }
  49 };
  50 static SYSLEVEL USER_SysLevel = { { &critsect_debug, -1, 0, 0, 0, 0 }, 2 };
  51
  52 static HPALETTE (WINAPI *pfnGDISelectPalette)( HDC hdc, HPALETTE hpal, WORD bkgnd );
  53 static UINT (WINAPI *pfnGDIRealizePalette)( HDC hdc );
  54 static HPALETTE hPrimaryPalette;
  55
  56 static HMODULE graphics_driver;
  57 static DWORD exiting_thread_id;
  58
  59 extern void WDML_NotifyThreadDetach(void);
  60
  61 #define GET_USER_FUNC(name) USER_Driver.p##name = (void*)GetProcAddress( graphics_driver, #name )
  62
  63 /* load the graphics driver */
  64 static BOOL load_driver(void)
  65 {
  66     char buffer[MAX_PATH], libname[32], *name, *next;
  67     HKEY hkey;
  68
  69     strcpy( buffer, "x11,tty" );  /* default value */
  70     /* @@ Wine registry key: HKCU\Software\Wine\Drivers */
  71     if (!RegOpenKeyA( HKEY_CURRENT_USER, "Software\\Wine\\Drivers", &hkey ))
  72     {
  73         DWORD type, count = sizeof(buffer);
  74         RegQueryValueExA( hkey, "Graphics", 0, &type, buffer, &count );
  75         RegCloseKey( hkey );
  76     }
  77
  78     name = buffer;
  79     while (name)
  80     {
  81         next = strchr( name, ',' );
  82         if (next) *next++ = 0;
  83
  84         snprintf( libname, sizeof(libname), "wine%s.drv", name );
  85         if ((graphics_driver = LoadLibraryA( libname )) != 0) break;
  86         name = next;
  87     }
  88     if (!graphics_driver)
  89     {
  90         MESSAGE( "wine: Could not load graphics driver '%s'.\n", buffer );
  91         if (!strcasecmp( buffer, "x11" ))
  92             MESSAGE( "Make sure that your X server is running and that $DISPLAY is set correctly.\n" );
  93         ExitProcess(1);
  94     }
  95
  96     GET_USER_FUNC(ActivateKeyboardLayout);
  97     GET_USER_FUNC(Beep);
  98     GET_USER_FUNC(GetAsyncKeyState);
  99     GET_USER_FUNC(GetKeyNameText);
 100     GET_USER_FUNC(GetKeyboardLayout);
 101     GET_USER_FUNC(GetKeyboardLayoutList);
 102     GET_USER_FUNC(GetKeyboardLayoutName);
 103     GET_USER_FUNC(LoadKeyboardLayout);
 104     GET_USER_FUNC(MapVirtualKeyEx);
 105     GET_USER_FUNC(SendInput);
 106     GET_USER_FUNC(ToUnicodeEx);
 107     GET_USER_FUNC(UnloadKeyboardLayout);
 108     GET_USER_FUNC(VkKeyScanEx);
 109     GET_USER_FUNC(SetCursor);
 110     GET_USER_FUNC(GetCursorPos);
 111     GET_USER_FUNC(SetCursorPos);
 112     GET_USER_FUNC(GetScreenSaveActive);
 113     GET_USER_FUNC(SetScreenSaveActive);
 114     GET_USER_FUNC(AcquireClipboard);
 115     GET_USER_FUNC(EmptyClipboard);
 116     GET_USER_FUNC(SetClipboardData);
 117     GET_USER_FUNC(GetClipboardData);
 118     GET_USER_FUNC(CountClipboardFormats);
 119     GET_USER_FUNC(EnumClipboardFormats);
 120     GET_USER_FUNC(IsClipboardFormatAvailable);
 121     GET_USER_FUNC(RegisterClipboardFormat);
 122     GET_USER_FUNC(GetClipboardFormatName);
 123     GET_USER_FUNC(EndClipboardUpdate);
 124     GET_USER_FUNC(ResetSelectionOwner);
 125     GET_USER_FUNC(ChangeDisplaySettingsExW);
 126     GET_USER_FUNC(EnumDisplaySettingsExW);
 127     GET_USER_FUNC(CreateWindow);
 128     GET_USER_FUNC(DestroyWindow);
 129     GET_USER_FUNC(GetDCEx);
 130     GET_USER_FUNC(MsgWaitForMultipleObjectsEx);
 131     GET_USER_FUNC(ReleaseDC);
 132     GET_USER_FUNC(ScrollDC);
 133     GET_USER_FUNC(SetFocus);
 134     GET_USER_FUNC(SetParent);
 135     GET_USER_FUNC(SetWindowPos);
 136     GET_USER_FUNC(SetWindowRgn);
 137     GET_USER_FUNC(SetWindowIcon);
 138     GET_USER_FUNC(SetWindowStyle);
 139     GET_USER_FUNC(SetWindowText);
 140     GET_USER_FUNC(ShowWindow);
 141     GET_USER_FUNC(SysCommandSizeMove);
 142     GET_USER_FUNC(WindowFromDC);
 143     GET_USER_FUNC(WindowMessage);
 144
 145     return TRUE;
 146 }
 147
 148
 149 /***********************************************************************
 150  *           USER_Lock
 151  */
 152 void USER_Lock(void)
 153 {
 154     _EnterSysLevel( &USER_SysLevel );
 155 }
 156
 157
 158 /***********************************************************************
 159  *           USER_Unlock
 160  */
 161 void USER_Unlock(void)
 162 {
 163     _LeaveSysLevel( &USER_SysLevel );
 164 }
 165
 166
 167 /***********************************************************************
 168  *           USER_CheckNotLock
 169  *
 170  * Make sure that we don't hold the user lock.
 171  */
 172 void USER_CheckNotLock(void)
 173 {
 174     _CheckNotSysLevel( &USER_SysLevel );
 175 }
 176
 177
 178 /***********************************************************************
 179  *              UserSelectPalette (Not a Windows API)
 180  */
 181 static HPALETTE WINAPI UserSelectPalette( HDC hDC, HPALETTE hPal, BOOL bForceBackground )
 182 {
 183     WORD wBkgPalette = 1;
 184
 185     if (!bForceBackground && (hPal != GetStockObject(DEFAULT_PALETTE)))
 186     {
 187         HWND hwnd = WindowFromDC( hDC );
 188         if (hwnd)
 189         {
 190             HWND hForeground = GetForegroundWindow();
 191             /* set primary palette if it's related to current active */
 192             if (hForeground == hwnd || IsChild(hForeground,hwnd))
 193             {
 194                 wBkgPalette = 0;
 195                 hPrimaryPalette = hPal;
 196             }
 197         }
 198     }
 199     return pfnGDISelectPalette( hDC, hPal, wBkgPalette);
 200 }
 201
 202
 203 /***********************************************************************
 204  *              UserRealizePalette (USER32.@)
 205  */
 206 UINT WINAPI UserRealizePalette( HDC hDC )
 207 {
 208     UINT realized = pfnGDIRealizePalette( hDC );
 209
 210     /* do not send anything if no colors were changed */
 211     if (realized && GetCurrentObject( hDC, OBJ_PAL ) == hPrimaryPalette)
 212     {
 213         /* send palette change notification */
 214         HWND hWnd = WindowFromDC( hDC );
 215         if (hWnd) SendMessageTimeoutW( HWND_BROADCAST, WM_PALETTECHANGED, (WPARAM)hWnd, 0,
 216                                        SMTO_ABORTIFHUNG, 2000, NULL );
 217     }
 218     return realized;
 219 }
 220
 221
 222 /***********************************************************************
 223  *           palette_init
 224  *
 225  * Patch the function pointers in GDI for SelectPalette and RealizePalette
 226  */
 227 static void palette_init(void)
 228 {
 229     void **ptr;
 230     HMODULE module = GetModuleHandleA( "gdi32" );
 231     if (!module)
 232     {
 233         ERR( "cannot get GDI32 handle\n" );
 234         return;
 235     }
 236     if ((ptr = (void**)GetProcAddress( module, "pfnSelectPalette" )))
 237         pfnGDISelectPalette = InterlockedExchangePointer( ptr, UserSelectPalette );
 238     else ERR( "cannot find pfnSelectPalette in GDI32\n" );
 239     if ((ptr = (void**)GetProcAddress( module, "pfnRealizePalette" )))
 240         pfnGDIRealizePalette = InterlockedExchangePointer( ptr, UserRealizePalette );
 241     else ERR( "cannot find pfnRealizePalette in GDI32\n" );
 242 }
 243
 244
 245 /***********************************************************************
 246  *           USER initialisation routine
 247  */
 248 static BOOL process_attach(void)
 249 {
 250     HINSTANCE16 instance;
 251
 252     /* Create USER heap */
 253     if ((instance = LoadLibrary16( "USER.EXE" )) >= 32) USER_HeapSel = instance | 7;
 254     else
 255     {
 256         USER_HeapSel = GlobalAlloc16( GMEM_FIXED, 65536 );
 257         LocalInit16( USER_HeapSel, 32, 65534 );
 258     }
 259
 260     /* some Win9x dlls expect keyboard to be loaded */
 261     if (GetVersion() & 0x80000000) LoadLibrary16( "keyboard.drv" );
 262
 263     /* Load the graphics driver */
 264     if (!load_driver()) return FALSE;
 265
 266     /* Initialize system colors and metrics */
 267     SYSPARAMS_Init();
 268
 269     /* Setup palette function pointers */
 270     palette_init();
 271
 272     /* Initialize built-in window classes */
 273     CLASS_RegisterBuiltinClasses();
 274
 275     /* Initialize menus */
 276     if (!MENU_Init()) return FALSE;
 277
 278     /* Initialize message spying */
 279     if (!SPY_Init()) return FALSE;
 280
 281     /* Create desktop window */
 282     if (!WIN_CreateDesktopWindow()) return FALSE;
 283
 284     return TRUE;
 285 }
 286
 287
 288 /**********************************************************************
 289  *           USER_IsExitingThread
 290  */
 291 BOOL USER_IsExitingThread( DWORD tid )
 292 {
 293     return (tid == exiting_thread_id);
 294 }
 295
 296
 297 /**********************************************************************
 298  *           thread_detach
 299  */
 300 static void thread_detach(void)
 301 {
 302     exiting_thread_id = GetCurrentThreadId();
 303
 304     WDML_NotifyThreadDetach();
 305
 306     WIN_DestroyThreadWindows( GetDesktopWindow() );
 307     CloseHandle( get_user_thread_info()->server_queue );
 308
 309     exiting_thread_id = 0;
 310 }
 311
 312
 313 /**********************************************************************
 314  *           process_detach
 315  */
 316 static void process_detach(void)
 317 {
 318     memset(&USER_Driver, 0, sizeof(USER_Driver));
 319     FreeLibrary(graphics_driver);
 320 }
 321
 322 /***********************************************************************
 323  *           UserClientDllInitialize  (USER32.@)
 324  *
 325  * USER dll initialisation routine (exported as UserClientDllInitialize for compatibility).
 326  */
 327 BOOL WINAPI DllMain( HINSTANCE inst, DWORD reason, LPVOID reserved )
 328 {
 329     BOOL ret = TRUE;
 330     switch(reason)
 331     {
 332     case DLL_PROCESS_ATTACH:
 333         user32_module = inst;
 334         ret = process_attach();
 335         break;
 336     case DLL_PROCESS_DETACH:
 337         process_detach();
 338         break;
 339     case DLL_THREAD_DETACH:
 340         thread_detach();
 341         break;
 342     }
 343     return ret;
 344 }
 345
 346
 347 /***********************************************************************
 348  *           USER_GetProcessHandleList(Internal)
 349  */
 350 static HANDLE *USER_GetProcessHandleList(void)
 351 {
 352     DWORD count, i, n;
 353     HANDLE *list;
 354     PROCESSENTRY32 pe;
 355     HANDLE hSnapshot;
 356     BOOL r;
 357
 358     hSnapshot = CreateToolhelp32Snapshot( TH32CS_SNAPPROCESS, 0 );
 359     if (!hSnapshot)
 360     {
 361         ERR("cannot create snapshot\n");
 362         return FALSE;
 363     }
 364
 365     /* count the number of processes plus one */
 366     for (count=0; ;count++)
 367     {
 368         pe.dwSize = sizeof pe;
 369         if (count)
 370             r = Process32Next( hSnapshot, &pe );
 371         else
 372             r = Process32First( hSnapshot, &pe );
 373         if (!r)
 374             break;
 375     }
 376
 377     /* allocate memory make a list of the process handles */
 378     list = HeapAlloc( GetProcessHeap(), 0, (count+1)*sizeof(HANDLE) );
 379     n=0;
 380     for (i=0; i<count; i++)
 381     {
 382         pe.dwSize = sizeof pe;
 383         if (i)
 384             r = Process32Next( hSnapshot, &pe );
 385         else
 386             r = Process32First( hSnapshot, &pe );
 387         if (!r)
 388             break;
 389
 390         /* don't kill ourselves */
 391         if (GetCurrentProcessId() == pe.th32ProcessID )
 392             continue;
 393
 394         /* open the process so we don't can track it */
 395         list[n] = OpenProcess( PROCESS_QUERY_INFORMATION|
 396                                   PROCESS_TERMINATE,
 397                                   FALSE, pe.th32ProcessID );
 398
 399         /* check it didn't terminate already */
 400         if( list[n] )
 401             n++;
 402     }
 403     list[n]=0;
 404     CloseHandle( hSnapshot );
 405
 406     if (!r)
 407         ERR("Error enumerating processes\n");
 408
 409     TRACE("return %lu processes\n", n);
 410
 411     return list;
 412 }
 413
 414
 415 /***********************************************************************
 416  *              USER_KillProcesses (Internal)
 417  */
 418 static DWORD USER_KillProcesses(void)
 419 {
 420     DWORD n, r, i;
 421     HANDLE *handles;
 422     const DWORD dwShutdownTimeout = 10000;
 423
 424     TRACE("terminating other processes\n");
 425
 426     /* kill it and add it to our list of object to wait on */
 427     handles = USER_GetProcessHandleList();
 428     for (n=0; handles && handles[n]; n++)
 429         TerminateProcess( handles[n], 0 );
 430
 431     /* wait for processes to exit */
 432     for (i=0; i<n; i+=MAXIMUM_WAIT_OBJECTS)
 433     {
 434         int n_objs = ((n-i)>MAXIMUM_WAIT_OBJECTS) ? MAXIMUM_WAIT_OBJECTS : (n-i);
 435         r = WaitForMultipleObjects( n_objs, &handles[i], TRUE, dwShutdownTimeout );
 436         if (r==WAIT_TIMEOUT)
 437             ERR("wait failed!\n");
 438     }
 439
 440     /* close the handles */
 441     for (i=0; i<n; i++)
 442         CloseHandle( handles[i] );
 443
 444     HeapFree( GetProcessHeap(), 0, handles );
 445
 446     return n;
 447 }
 448
 449
 450 /***********************************************************************
 451  *              USER_DoShutdown (Internal)
 452  */
 453 static void USER_DoShutdown(void)
 454 {
 455     DWORD i, n;
 456     const DWORD nRetries = 10;
 457
 458     for (i=0; i<nRetries; i++)
 459     {
 460         n = USER_KillProcesses();
 461         TRACE("Killed %ld processes, attempt %ld\n", n, i);
 462         if(!n)
 463             break;
 464     }
 465 }
 466
 467
 468 /***********************************************************************
 469  *              ExitWindowsEx (USER32.@)
 470  */
 471 BOOL WINAPI ExitWindowsEx( UINT flags, DWORD reserved )
 472 {
 473     int i;
 474     BOOL result = FALSE;
 475     HWND *list, *phwnd;
 476
 477     /* We have to build a list of all windows first, as in EnumWindows */
 478     TRACE("(%x,%lx)\n", flags, reserved);
 479
 480     list = WIN_ListChildren( GetDesktopWindow() );
 481     if (list)
 482     {
 483         /* Send a WM_QUERYENDSESSION message to every window */
 484
 485         for (i = 0; list[i]; i++)
 486         {
 487             /* Make sure that the window still exists */
 488             if (!IsWindow( list[i] )) continue;
 489             if (!SendMessageW( list[i], WM_QUERYENDSESSION, 0, 0 )) break;
 490         }
 491         result = !list[i];
 492
 493         /* Now notify all windows that got a WM_QUERYENDSESSION of the result */
 494
 495         for (phwnd = list; i > 0; i--, phwnd++)
 496         {
 497             if (!IsWindow( *phwnd )) continue;
 498             SendMessageW( *phwnd, WM_ENDSESSION, result, 0 );
 499         }
 500         HeapFree( GetProcessHeap(), 0, list );
 501
 502         if ( !(result || (flags & EWX_FORCE) ))
 503             return FALSE;
 504     }
 505
 506     /* USER_DoShutdown will kill all processes except the current process */
 507     USER_DoShutdown();
 508
 509     if (flags & EWX_REBOOT)
 510     {
 511         WCHAR winebootW[] = { 'w','i','n','e','b','o','o','t',0 };
 512         PROCESS_INFORMATION pi;
 513         STARTUPINFOW si;
 514
 515         memset( &si, 0, sizeof si );
 516         si.cb = sizeof si;
 517         if (CreateProcessW( NULL, winebootW, NULL, NULL, FALSE, 0, NULL, NULL, &si, &pi ))
 518         {
 519             CloseHandle( pi.hProcess );
 520             CloseHandle( pi.hThread );
 521         }
 522         else
 523             MESSAGE("wine: Failed to start wineboot\n");
 524     }
 525
 526     if (result) ExitProcess(0);
 527     return TRUE;
 528 }