git.oblomov.eu Git - wine/blob - programs/wineboot/wineboot.c

   1 /*
   2  * Copyright (C) 2002 Andreas Mohr
   3  * Copyright (C) 2002 Shachar Shemesh
   4  *
   5  * This library is free software; you can redistribute it and/or
   6  * modify it under the terms of the GNU Lesser General Public
   7  * License as published by the Free Software Foundation; either
   8  * version 2.1 of the License, or (at your option) any later version.
   9  *
  10  * This library is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * Lesser General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU Lesser General Public
  16  * License along with this library; if not, write to the Free Software
  17  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  18  */
  19 /* Wine "bootup" handler application
  20  *
  21  * This app handles the various "hooks" windows allows for applications to perform
  22  * as part of the bootstrap process. These are roughly divided into three types.
  23  * Knowledge base articles that explain this are 137367, 179365, 232487 and 232509.
  24  * Also, 119941 has some info on grpconv.exe
  25  * The operations performed are (by order of execution):
  26  *
  27  * Preboot (prior to fully loading the Windows kernel):
  28  * - wininit.exe (rename operations left in wininit.ini - Win 9x only)
  29  * - PendingRenameOperations (rename operations left in the registry - Win NT+ only)
  30  *
  31  * Startup (before the user logs in)
  32  * - Services (NT)
  33  * - HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\RunServicesOnce (9x, asynch)
  34  * - HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\RunServices (9x, asynch)
  35  *
  36  * After log in
  37  * - HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\RunOnce (all, synch)
  38  * - HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run (all, asynch)
  39  * - HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run (all, asynch)
  40  * - Startup folders (all, ?asynch?)
  41  * - HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\RunOnce (all, asynch)
  42  *
  43  * Somewhere in there is processing the RunOnceEx entries (also no imp)
  44  *
  45  * Bugs:
  46  * - If a pending rename registry does not start with \??\ the entry is
  47  *   processed anyways. I'm not sure that is the Windows behaviour.
  48  * - Need to check what is the windows behaviour when trying to delete files
  49  *   and directories that are read-only
  50  * - In the pending rename registry processing - there are no traces of the files
  51  *   processed (requires translations from Unicode to Ansi).
  52  */
  53
  54 #include "config.h"
  55 #include "wine/port.h"
  56
  57 #define WIN32_LEAN_AND_MEAN
  58
  59 #include <stdio.h>
  60 #ifdef HAVE_GETOPT_H
  61 # include <getopt.h>
  62 #endif
  63 #include <windows.h>
  64 #include <wine/unicode.h>
  65 #include <wine/debug.h>
  66
  67 #define COBJMACROS
  68 #include <shlobj.h>
  69 #include <shobjidl.h>
  70 #include <shlwapi.h>
  71 #include <shellapi.h>
  72
  73 WINE_DEFAULT_DEBUG_CHANNEL(wineboot);
  74
  75 #define MAX_LINE_LENGTH (2*MAX_PATH+2)
  76
  77 extern BOOL shutdown_close_windows( BOOL force );
  78 extern void kill_processes( BOOL kill_desktop );
  79
  80
  81 /* Performs the rename operations dictated in %SystemRoot%\Wininit.ini.
  82  * Returns FALSE if there was an error, or otherwise if all is ok.
  83  */
  84 static BOOL wininit(void)
  85 {
  86     static const WCHAR nulW[] = {'N','U','L',0};
  87     static const WCHAR renameW[] = {'r','e','n','a','m','e',0};
  88     static const WCHAR wininitW[] = {'w','i','n','i','n','i','t','.','i','n','i',0};
  89     static const WCHAR wininitbakW[] = {'w','i','n','i','n','i','t','.','b','a','k',0};
  90     WCHAR initial_buffer[1024];
  91     WCHAR *str, *buffer = initial_buffer;
  92     DWORD size = sizeof(initial_buffer)/sizeof(WCHAR);
  93     DWORD res;
  94
  95     for (;;)
  96     {
  97         if (!(res = GetPrivateProfileSectionW( renameW, buffer, size, wininitW ))) return TRUE;
  98         if (res < size - 2) break;
  99         if (buffer != initial_buffer) HeapFree( GetProcessHeap(), 0, buffer );
 100         size *= 2;
 101         if (!(buffer = HeapAlloc( GetProcessHeap(), 0, size * sizeof(WCHAR) ))) return FALSE;
 102     }
 103
 104     for (str = buffer; *str; str += strlenW(str) + 1)
 105     {
 106         WCHAR *value;
 107
 108         if (*str == ';') continue;  /* comment */
 109         if (!(value = strchrW( str, '=' ))) continue;
 110
 111         /* split the line into key and value */
 112         *value++ = 0;
 113
 114         if (!lstrcmpiW( nulW, str ))
 115         {
 116             WINE_TRACE("Deleting file %s\n", wine_dbgstr_w(value) );
 117             if( !DeleteFileW( value ) )
 118                 WINE_WARN("Error deleting file %s\n", wine_dbgstr_w(value) );
 119         }
 120         else
 121         {
 122             WINE_TRACE("Renaming file %s to %s\n", wine_dbgstr_w(value), wine_dbgstr_w(str) );
 123
 124             if( !MoveFileExW(value, str, MOVEFILE_COPY_ALLOWED | MOVEFILE_REPLACE_EXISTING) )
 125                 WINE_WARN("Error renaming %s to %s\n", wine_dbgstr_w(value), wine_dbgstr_w(str) );
 126         }
 127         str = value;
 128     }
 129
 130     if (buffer != initial_buffer) HeapFree( GetProcessHeap(), 0, buffer );
 131
 132     if( !MoveFileExW( wininitW, wininitbakW, MOVEFILE_REPLACE_EXISTING) )
 133     {
 134         WINE_ERR("Couldn't rename wininit.ini, error %d\n", GetLastError() );
 135
 136         return FALSE;
 137     }
 138
 139     return TRUE;
 140 }
 141
 142 static BOOL pendingRename(void)
 143 {
 144     static const WCHAR ValueName[] = {'P','e','n','d','i','n','g',
 145                                       'F','i','l','e','R','e','n','a','m','e',
 146                                       'O','p','e','r','a','t','i','o','n','s',0};
 147     static const WCHAR SessionW[] = { 'S','y','s','t','e','m','\\',
 148                                      'C','u','r','r','e','n','t','C','o','n','t','r','o','l','S','e','t','\\',
 149                                      'C','o','n','t','r','o','l','\\',
 150                                      'S','e','s','s','i','o','n',' ','M','a','n','a','g','e','r',0};
 151     WCHAR *buffer=NULL;
 152     const WCHAR *src=NULL, *dst=NULL;
 153     DWORD dataLength=0;
 154     HKEY hSession=NULL;
 155     DWORD res;
 156
 157     WINE_TRACE("Entered\n");
 158
 159     if( (res=RegOpenKeyExW( HKEY_LOCAL_MACHINE, SessionW, 0, KEY_ALL_ACCESS, &hSession ))
 160             !=ERROR_SUCCESS )
 161     {
 162         if( res==ERROR_FILE_NOT_FOUND )
 163         {
 164             WINE_TRACE("The key was not found - skipping\n");
 165             res=TRUE;
 166         }
 167         else
 168         {
 169             WINE_ERR("Couldn't open key, error %d\n", res );
 170             res=FALSE;
 171         }
 172
 173         goto end;
 174     }
 175
 176     res=RegQueryValueExW( hSession, ValueName, NULL, NULL /* The value type does not really interest us, as it is not
 177                                                              truly a REG_MULTI_SZ anyways */,
 178             NULL, &dataLength );
 179     if( res==ERROR_FILE_NOT_FOUND )
 180     {
 181         /* No value - nothing to do. Great! */
 182         WINE_TRACE("Value not present - nothing to rename\n");
 183         res=TRUE;
 184         goto end;
 185     }
 186
 187     if( res!=ERROR_SUCCESS )
 188     {
 189         WINE_ERR("Couldn't query value's length (%d)\n", res );
 190         res=FALSE;
 191         goto end;
 192     }
 193
 194     buffer=HeapAlloc( GetProcessHeap(),0,dataLength );
 195     if( buffer==NULL )
 196     {
 197         WINE_ERR("Couldn't allocate %u bytes for the value\n", dataLength );
 198         res=FALSE;
 199         goto end;
 200     }
 201
 202     res=RegQueryValueExW( hSession, ValueName, NULL, NULL, (LPBYTE)buffer, &dataLength );
 203     if( res!=ERROR_SUCCESS )
 204     {
 205         WINE_ERR("Couldn't query value after successfully querying before (%u),\n"
 206                 "please report to wine-devel@winehq.org\n", res);
 207         res=FALSE;
 208         goto end;
 209     }
 210
 211     /* Make sure that the data is long enough and ends with two NULLs. This
 212      * simplifies the code later on.
 213      */
 214     if( dataLength<2*sizeof(buffer[0]) ||
 215             buffer[dataLength/sizeof(buffer[0])-1]!='\0' ||
 216             buffer[dataLength/sizeof(buffer[0])-2]!='\0' )
 217     {
 218         WINE_ERR("Improper value format - doesn't end with NULL\n");
 219         res=FALSE;
 220         goto end;
 221     }
 222
 223     for( src=buffer; (src-buffer)*sizeof(src[0])<dataLength && *src!='\0';
 224             src=dst+lstrlenW(dst)+1 )
 225     {
 226         DWORD dwFlags=0;
 227
 228         WINE_TRACE("processing next command\n");
 229
 230         dst=src+lstrlenW(src)+1;
 231
 232         /* We need to skip the \??\ header */
 233         if( src[0]=='\\' && src[1]=='?' && src[2]=='?' && src[3]=='\\' )
 234             src+=4;
 235
 236         if( dst[0]=='!' )
 237         {
 238             dwFlags|=MOVEFILE_REPLACE_EXISTING;
 239             dst++;
 240         }
 241
 242         if( dst[0]=='\\' && dst[1]=='?' && dst[2]=='?' && dst[3]=='\\' )
 243             dst+=4;
 244
 245         if( *dst!='\0' )
 246         {
 247             /* Rename the file */
 248             MoveFileExW( src, dst, dwFlags );
 249         } else
 250         {
 251             /* Delete the file or directory */
 252             if( (res=GetFileAttributesW(src))!=INVALID_FILE_ATTRIBUTES )
 253             {
 254                 if( (res&FILE_ATTRIBUTE_DIRECTORY)==0 )
 255                 {
 256                     /* It's a file */
 257                     DeleteFileW(src);
 258                 } else
 259                 {
 260                     /* It's a directory */
 261                     RemoveDirectoryW(src);
 262                 }
 263             } else
 264             {
 265                 WINE_ERR("couldn't get file attributes (%d)\n", GetLastError() );
 266             }
 267         }
 268     }
 269
 270     if((res=RegDeleteValueW(hSession, ValueName))!=ERROR_SUCCESS )
 271     {
 272         WINE_ERR("Error deleting the value (%u)\n", GetLastError() );
 273         res=FALSE;
 274     } else
 275         res=TRUE;
 276
 277 end:
 278     HeapFree(GetProcessHeap(), 0, buffer);
 279
 280     if( hSession!=NULL )
 281         RegCloseKey( hSession );
 282
 283     return res;
 284 }
 285
 286 enum runkeys {
 287     RUNKEY_RUN, RUNKEY_RUNONCE, RUNKEY_RUNSERVICES, RUNKEY_RUNSERVICESONCE
 288 };
 289
 290 const WCHAR runkeys_names[][30]=
 291 {
 292     {'R','u','n',0},
 293     {'R','u','n','O','n','c','e',0},
 294     {'R','u','n','S','e','r','v','i','c','e','s',0},
 295     {'R','u','n','S','e','r','v','i','c','e','s','O','n','c','e',0}
 296 };
 297
 298 #define INVALID_RUNCMD_RETURN -1
 299 /*
 300  * This function runs the specified command in the specified dir.
 301  * [in,out] cmdline - the command line to run. The function may change the passed buffer.
 302  * [in] dir - the dir to run the command in. If it is NULL, then the current dir is used.
 303  * [in] wait - whether to wait for the run program to finish before returning.
 304  * [in] minimized - Whether to ask the program to run minimized.
 305  *
 306  * Returns:
 307  * If running the process failed, returns INVALID_RUNCMD_RETURN. Use GetLastError to get the error code.
 308  * If wait is FALSE - returns 0 if successful.
 309  * If wait is TRUE - returns the program's return value.
 310  */
 311 static DWORD runCmd(LPWSTR cmdline, LPCWSTR dir, BOOL wait, BOOL minimized)
 312 {
 313     STARTUPINFOW si;
 314     PROCESS_INFORMATION info;
 315     DWORD exit_code=0;
 316
 317     memset(&si, 0, sizeof(si));
 318     si.cb=sizeof(si);
 319     if( minimized )
 320     {
 321         si.dwFlags=STARTF_USESHOWWINDOW;
 322         si.wShowWindow=SW_MINIMIZE;
 323     }
 324     memset(&info, 0, sizeof(info));
 325
 326     if( !CreateProcessW(NULL, cmdline, NULL, NULL, FALSE, 0, NULL, dir, &si, &info) )
 327     {
 328         WINE_ERR("Failed to run command %s (%d)\n", wine_dbgstr_w(cmdline),
 329                  GetLastError() );
 330
 331         return INVALID_RUNCMD_RETURN;
 332     }
 333
 334     WINE_TRACE("Successfully ran command %s - Created process handle %p\n",
 335                wine_dbgstr_w(cmdline), info.hProcess );
 336
 337     if(wait)
 338     {   /* wait for the process to exit */
 339         WaitForSingleObject(info.hProcess, INFINITE);
 340         GetExitCodeProcess(info.hProcess, &exit_code);
 341     }
 342
 343     CloseHandle( info.hProcess );
 344
 345     return exit_code;
 346 }
 347
 348 /*
 349  * Process a "Run" type registry key.
 350  * hkRoot is the HKEY from which "Software\Microsoft\Windows\CurrentVersion" is
 351  *      opened.
 352  * szKeyName is the key holding the actual entries.
 353  * bDelete tells whether we should delete each value right before executing it.
 354  * bSynchronous tells whether we should wait for the prog to complete before
 355  *      going on to the next prog.
 356  */
 357 static BOOL ProcessRunKeys( HKEY hkRoot, LPCWSTR szKeyName, BOOL bDelete,
 358         BOOL bSynchronous )
 359 {
 360     static const WCHAR WINKEY_NAME[]={'S','o','f','t','w','a','r','e','\\',
 361         'M','i','c','r','o','s','o','f','t','\\','W','i','n','d','o','w','s','\\',
 362         'C','u','r','r','e','n','t','V','e','r','s','i','o','n',0};
 363     HKEY hkWin=NULL, hkRun=NULL;
 364     DWORD res=ERROR_SUCCESS;
 365     DWORD i, nMaxCmdLine=0, nMaxValue=0;
 366     WCHAR *szCmdLine=NULL;
 367     WCHAR *szValue=NULL;
 368
 369     if (hkRoot==HKEY_LOCAL_MACHINE)
 370         WINE_TRACE("processing %s entries under HKLM\n",wine_dbgstr_w(szKeyName) );
 371     else
 372         WINE_TRACE("processing %s entries under HKCU\n",wine_dbgstr_w(szKeyName) );
 373
 374     if( (res=RegOpenKeyExW( hkRoot, WINKEY_NAME, 0, KEY_READ, &hkWin ))!=ERROR_SUCCESS )
 375     {
 376         WINE_ERR("RegOpenKey failed on Software\\Microsoft\\Windows\\CurrentVersion (%d)\n",
 377                 res);
 378
 379         goto end;
 380     }
 381
 382     if( (res=RegOpenKeyExW( hkWin, szKeyName, 0, bDelete?KEY_ALL_ACCESS:KEY_READ, &hkRun ))!=
 383             ERROR_SUCCESS)
 384     {
 385         if( res==ERROR_FILE_NOT_FOUND )
 386         {
 387             WINE_TRACE("Key doesn't exist - nothing to be done\n");
 388
 389             res=ERROR_SUCCESS;
 390         }
 391         else
 392             WINE_ERR("RegOpenKey failed on run key (%d)\n", res);
 393
 394         goto end;
 395     }
 396
 397     if( (res=RegQueryInfoKeyW( hkRun, NULL, NULL, NULL, NULL, NULL, NULL, &i, &nMaxValue,
 398                     &nMaxCmdLine, NULL, NULL ))!=ERROR_SUCCESS )
 399     {
 400         WINE_ERR("Couldn't query key info (%d)\n", res );
 401
 402         goto end;
 403     }
 404
 405     if( i==0 )
 406     {
 407         WINE_TRACE("No commands to execute.\n");
 408
 409         res=ERROR_SUCCESS;
 410         goto end;
 411     }
 412
 413     if( (szCmdLine=HeapAlloc(GetProcessHeap(),0,nMaxCmdLine))==NULL )
 414     {
 415         WINE_ERR("Couldn't allocate memory for the commands to be executed\n");
 416
 417         res=ERROR_NOT_ENOUGH_MEMORY;
 418         goto end;
 419     }
 420
 421     if( (szValue=HeapAlloc(GetProcessHeap(),0,(++nMaxValue)*sizeof(*szValue)))==NULL )
 422     {
 423         WINE_ERR("Couldn't allocate memory for the value names\n");
 424
 425         res=ERROR_NOT_ENOUGH_MEMORY;
 426         goto end;
 427     }
 428
 429     while( i>0 )
 430     {
 431         DWORD nValLength=nMaxValue, nDataLength=nMaxCmdLine;
 432         DWORD type;
 433
 434         --i;
 435
 436         if( (res=RegEnumValueW( hkRun, i, szValue, &nValLength, 0, &type,
 437                         (LPBYTE)szCmdLine, &nDataLength ))!=ERROR_SUCCESS )
 438         {
 439             WINE_ERR("Couldn't read in value %d - %d\n", i, res );
 440
 441             continue;
 442         }
 443
 444         if( bDelete && (res=RegDeleteValueW( hkRun, szValue ))!=ERROR_SUCCESS )
 445         {
 446             WINE_ERR("Couldn't delete value - %d, %d. Running command anyways.\n", i, res );
 447         }
 448
 449         if( type!=REG_SZ )
 450         {
 451             WINE_ERR("Incorrect type of value #%d (%d)\n", i, type );
 452
 453             continue;
 454         }
 455
 456         if( (res=runCmd(szCmdLine, NULL, bSynchronous, FALSE ))==INVALID_RUNCMD_RETURN )
 457         {
 458             WINE_ERR("Error running cmd #%d (%d)\n", i, GetLastError() );
 459         }
 460
 461         WINE_TRACE("Done processing cmd #%d\n", i);
 462     }
 463
 464     res=ERROR_SUCCESS;
 465
 466 end:
 467     HeapFree( GetProcessHeap(), 0, szValue );
 468     HeapFree( GetProcessHeap(), 0, szCmdLine );
 469
 470     if( hkRun!=NULL )
 471         RegCloseKey( hkRun );
 472     if( hkWin!=NULL )
 473         RegCloseKey( hkWin );
 474
 475     WINE_TRACE("done\n");
 476
 477     return res==ERROR_SUCCESS?TRUE:FALSE;
 478 }
 479
 480 /*
 481  * WFP is Windows File Protection, in NT5 and Windows 2000 it maintains a cache
 482  * of known good dlls and scans through and replaces corrupted DLLs with these
 483  * known good versions. The only programs that should install into this dll
 484  * cache are Windows Updates and IE (which is treated like a Windows Update)
 485  *
 486  * Implementing this allows installing ie in win2k mode to actaully install the
 487  * system dlls that we expect and need
 488  */
 489 static int ProcessWindowsFileProtection(void)
 490 {
 491     WIN32_FIND_DATA finddata;
 492     LPSTR custom_dllcache = NULL;
 493     static CHAR default_dllcache[] = "C:\\Windows\\System32\\dllcache";
 494     HANDLE find_handle;
 495     BOOL find_rc;
 496     DWORD rc;
 497     HKEY hkey;
 498     LPSTR dllcache;
 499     CHAR find_string[MAX_PATH];
 500     CHAR windowsdir[MAX_PATH];
 501
 502     rc = RegOpenKeyA( HKEY_LOCAL_MACHINE, "Software\\Microsoft\\Windows NT\\CurrentVersion\\Winlogon", &hkey );
 503     if (rc == ERROR_SUCCESS)
 504     {
 505         DWORD sz = 0;
 506         rc = RegQueryValueEx( hkey, "SFCDllCacheDir", 0, NULL, NULL, &sz);
 507         if (rc == ERROR_MORE_DATA)
 508         {
 509             sz++;
 510             custom_dllcache = HeapAlloc(GetProcessHeap(),0,sz);
 511             RegQueryValueEx( hkey, "SFCDllCacheDir", 0, NULL, (LPBYTE)custom_dllcache, &sz);
 512         }
 513     }
 514     RegCloseKey(hkey);
 515
 516     if (custom_dllcache)
 517         dllcache = custom_dllcache;
 518     else
 519         dllcache = default_dllcache;
 520
 521     strcpy(find_string,dllcache);
 522     strcat(find_string,"\\*.*");
 523
 524     GetWindowsDirectory(windowsdir,MAX_PATH);
 525
 526     find_handle = FindFirstFile(find_string,&finddata);
 527     find_rc = find_handle != INVALID_HANDLE_VALUE;
 528     while (find_rc)
 529     {
 530         CHAR targetpath[MAX_PATH];
 531         CHAR currentpath[MAX_PATH];
 532         UINT sz;
 533         UINT sz2;
 534         CHAR tempfile[MAX_PATH];
 535
 536         if (strcmp(finddata.cFileName,".") == 0 ||
 537             strcmp(finddata.cFileName,"..") == 0)
 538         {
 539             find_rc = FindNextFile(find_handle,&finddata);
 540             continue;
 541         }
 542
 543         sz = MAX_PATH;
 544         sz2 = MAX_PATH;
 545         VerFindFile(VFFF_ISSHAREDFILE, finddata.cFileName, windowsdir,
 546                 windowsdir, currentpath, &sz, targetpath,&sz2);
 547         sz = MAX_PATH;
 548         rc = VerInstallFile(0, finddata.cFileName, finddata.cFileName,
 549                             dllcache, targetpath, currentpath, tempfile,&sz);
 550         if (rc != ERROR_SUCCESS)
 551         {
 552             WINE_ERR("WFP: %s error 0x%x\n",finddata.cFileName,rc);
 553             DeleteFile(tempfile);
 554         }
 555         find_rc = FindNextFile(find_handle,&finddata);
 556     }
 557     FindClose(find_handle);
 558     HeapFree(GetProcessHeap(),0,custom_dllcache);
 559     return 1;
 560 }
 561
 562 /* start services */
 563 static void start_services(void)
 564 {
 565     static const WCHAR servicesW[] = {'S','y','s','t','e','m','\\',
 566                                       'C','u','r','r','e','n','t','C','o','n','t','r','o','l','S','e','t','\\',
 567                                       'S','e','r','v','i','c','e','s',0};
 568     static const WCHAR startW[] = {'S','t','a','r','t',0};
 569     HKEY hkey, skey;
 570     DWORD type, size, start, index = 0;
 571     WCHAR name[MAX_PATH];
 572     SC_HANDLE manager;
 573
 574     if (RegOpenKeyW( HKEY_LOCAL_MACHINE, servicesW, &hkey )) return;
 575
 576     if (!(manager = OpenSCManagerW( NULL, NULL, SC_MANAGER_ALL_ACCESS )))
 577     {
 578         RegCloseKey( hkey );
 579         return;
 580     }
 581
 582     while (!RegEnumKeyW( hkey, index++, name, sizeof(name) ))
 583     {
 584         if (RegOpenKeyW( hkey, name, &skey )) continue;
 585         size = sizeof(start);
 586         if (!RegQueryValueExW( skey, startW, NULL, &type, (LPBYTE)&start, &size ) && type == REG_DWORD)
 587         {
 588             if (start == SERVICE_BOOT_START ||
 589                 start == SERVICE_SYSTEM_START ||
 590                 start == SERVICE_AUTO_START)
 591             {
 592                 SC_HANDLE handle = OpenServiceW( manager, name, SERVICE_ALL_ACCESS );
 593                 if (handle)
 594                 {
 595                     WINE_TRACE( "starting service %s start %u\n", wine_dbgstr_w(name), start );
 596                     StartServiceW( handle, 0, NULL );
 597                     CloseServiceHandle( handle );
 598                 }
 599             }
 600         }
 601         RegCloseKey( skey );
 602     }
 603     CloseServiceHandle( manager );
 604     RegCloseKey( hkey );
 605 }
 606
 607 /* Process items in the StartUp group of the user's Programs under the Start Menu. Some installers put
 608  * shell links here to restart themselves after boot. */
 609 static BOOL ProcessStartupItems(void)
 610 {
 611     BOOL ret = FALSE;
 612     HRESULT hr;
 613     int iRet;
 614     IMalloc *ppM = NULL;
 615     IShellFolder *psfDesktop = NULL, *psfStartup = NULL;
 616     LPITEMIDLIST pidlStartup = NULL, pidlItem;
 617     ULONG NumPIDLs;
 618     IEnumIDList *iEnumList = NULL;
 619     STRRET strret;
 620     WCHAR wszCommand[MAX_PATH];
 621
 622     WINE_TRACE("Processing items in the StartUp folder.\n");
 623
 624     hr = SHGetMalloc(&ppM);
 625     if (FAILED(hr))
 626     {
 627         WINE_ERR("Couldn't get IMalloc object.\n");
 628         goto done;
 629     }
 630
 631     hr = SHGetDesktopFolder(&psfDesktop);
 632     if (FAILED(hr))
 633     {
 634         WINE_ERR("Couldn't get desktop folder.\n");
 635         goto done;
 636     }
 637
 638     hr = SHGetSpecialFolderLocation(NULL, CSIDL_STARTUP, &pidlStartup);
 639     if (FAILED(hr))
 640     {
 641         WINE_TRACE("Couldn't get StartUp folder location.\n");
 642         goto done;
 643     }
 644
 645     hr = IShellFolder_BindToObject(psfDesktop, pidlStartup, NULL, &IID_IShellFolder, (LPVOID*)&psfStartup);
 646     if (FAILED(hr))
 647     {
 648         WINE_TRACE("Couldn't bind IShellFolder to StartUp folder.\n");
 649         goto done;
 650     }
 651
 652     hr = IShellFolder_EnumObjects(psfStartup, NULL, SHCONTF_NONFOLDERS | SHCONTF_INCLUDEHIDDEN, &iEnumList);
 653     if (FAILED(hr))
 654     {
 655         WINE_TRACE("Unable to enumerate StartUp objects.\n");
 656         goto done;
 657     }
 658
 659     while (IEnumIDList_Next(iEnumList, 1, &pidlItem, &NumPIDLs) == S_OK &&
 660            (NumPIDLs) == 1)
 661     {
 662         hr = IShellFolder_GetDisplayNameOf(psfStartup, pidlItem, SHGDN_FORPARSING, &strret);
 663         if (FAILED(hr))
 664             WINE_TRACE("Unable to get display name of enumeration item.\n");
 665         else
 666         {
 667             hr = StrRetToBufW(&strret, pidlItem, wszCommand, MAX_PATH);
 668             if (FAILED(hr))
 669                 WINE_TRACE("Unable to parse display name.\n");
 670             else
 671                 if ((iRet = (int)ShellExecuteW(NULL, NULL, wszCommand, NULL, NULL, SW_SHOWNORMAL)) <= 32)
 672                     WINE_ERR("Error %d executing command %s.\n", iRet, wine_dbgstr_w(wszCommand));
 673         }
 674
 675         IMalloc_Free(ppM, pidlItem);
 676     }
 677
 678     /* Return success */
 679     ret = TRUE;
 680
 681 done:
 682     if (iEnumList) IEnumIDList_Release(iEnumList);
 683     if (psfStartup) IShellFolder_Release(psfStartup);
 684     if (pidlStartup) IMalloc_Free(ppM, pidlStartup);
 685
 686     return ret;
 687 }
 688
 689 static void usage(void)
 690 {
 691     WINE_MESSAGE( "Usage: wineboot [options]\n" );
 692     WINE_MESSAGE( "Options;\n" );
 693     WINE_MESSAGE( "    -h,--help         Display this help message\n" );
 694     WINE_MESSAGE( "    -e,--end-session  End the current session cleanly\n" );
 695     WINE_MESSAGE( "    -f,--force        Force exit for processes that don't exit cleanly\n" );
 696     WINE_MESSAGE( "    -k,--kill         Kill running processes without any cleanup\n" );
 697     WINE_MESSAGE( "    -r,--restart      Restart only, don't do normal startup operations\n" );
 698     WINE_MESSAGE( "    -s,--shutdown     Shutdown only, don't reboot\n" );
 699 }
 700
 701 static const char short_options[] = "efhkrs";
 702
 703 static const struct option long_options[] =
 704 {
 705     { "help",        0, 0, 'h' },
 706     { "end-session", 0, 0, 'e' },
 707     { "force",       0, 0, 'f' },
 708     { "kill",        0, 0, 'k' },
 709     { "restart",     0, 0, 'r' },
 710     { "shutdown",    0, 0, 's' },
 711     { NULL,          0, 0, 0 }
 712 };
 713
 714 int main( int argc, char *argv[] )
 715 {
 716     /* First, set the current directory to SystemRoot */
 717     TCHAR gen_path[MAX_PATH];
 718     DWORD res;
 719     int optc;
 720     int end_session = 0, force = 0, kill = 0, restart = 0, shutdown = 0;
 721
 722     res=GetWindowsDirectory( gen_path, sizeof(gen_path) );
 723
 724     if( res==0 )
 725     {
 726         WINE_ERR("Couldn't get the windows directory - error %d\n",
 727                 GetLastError() );
 728
 729         return 100;
 730     }
 731
 732     if( res>=sizeof(gen_path) )
 733     {
 734         WINE_ERR("Windows path too long (%d)\n", res );
 735
 736         return 100;
 737     }
 738
 739     if( !SetCurrentDirectory( gen_path ) )
 740     {
 741         WINE_ERR("Cannot set the dir to %s (%d)\n", gen_path, GetLastError() );
 742
 743         return 100;
 744     }
 745
 746
 747     while ((optc = getopt_long(argc, argv, short_options, long_options, NULL )) != -1)
 748     {
 749         switch(optc)
 750         {
 751         case 'e': end_session = 1; break;
 752         case 'f': force = 1; break;
 753         case 'k': kill = 1; break;
 754         case 'r': restart = 1; break;
 755         case 's': shutdown = 1; break;
 756         case 'h': usage(); return 0;
 757         case '?': usage(); return 1;
 758         }
 759     }
 760
 761     if (end_session)
 762     {
 763         if (!shutdown_close_windows( force )) return 1;
 764     }
 765
 766     if (end_session || kill) kill_processes( shutdown );
 767
 768     if (shutdown) return 0;
 769
 770     wininit();
 771     pendingRename();
 772
 773     ProcessWindowsFileProtection();
 774     ProcessRunKeys( HKEY_LOCAL_MACHINE, runkeys_names[RUNKEY_RUNSERVICESONCE], TRUE, FALSE );
 775     if (!restart)
 776     {
 777         ProcessRunKeys( HKEY_LOCAL_MACHINE, runkeys_names[RUNKEY_RUNSERVICES], FALSE, FALSE );
 778         start_services();
 779     }
 780     ProcessRunKeys( HKEY_LOCAL_MACHINE, runkeys_names[RUNKEY_RUNONCE], TRUE, TRUE );
 781     if (!restart)
 782     {
 783         ProcessRunKeys( HKEY_LOCAL_MACHINE, runkeys_names[RUNKEY_RUN], FALSE, FALSE );
 784         ProcessRunKeys( HKEY_CURRENT_USER, runkeys_names[RUNKEY_RUN], FALSE, FALSE );
 785         ProcessStartupItems();
 786     }
 787
 788     WINE_TRACE("Operation done\n");
 789     return 0;
 790 }