wininet: Add a stub for RunOnceUrlCache.
[wine] / 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 COBJMACROS
58 #define WIN32_LEAN_AND_MEAN
59
60 #include <errno.h>
61 #include <fcntl.h>
62 #include <stdio.h>
63 #include <stdlib.h>
64 #ifdef HAVE_GETOPT_H
65 # include <getopt.h>
66 #endif
67 #ifdef HAVE_SYS_STAT_H
68 # include <sys/stat.h>
69 #endif
70 #ifdef HAVE_UNISTD_H
71 # include <unistd.h>
72 #endif
73 #include <windows.h>
74 #include <winternl.h>
75 #include <wine/svcctl.h>
76 #include <wine/unicode.h>
77 #include <wine/library.h>
78 #include <wine/debug.h>
79
80 #include <shlobj.h>
81 #include <shobjidl.h>
82 #include <shlwapi.h>
83 #include <shellapi.h>
84 #include "resource.h"
85
86 WINE_DEFAULT_DEBUG_CHANNEL(wineboot);
87
88 #define MAX_LINE_LENGTH (2*MAX_PATH+2)
89
90 extern BOOL shutdown_close_windows( BOOL force );
91 extern BOOL shutdown_all_desktops( BOOL force );
92 extern void kill_processes( BOOL kill_desktop );
93
94 static WCHAR windowsdir[MAX_PATH];
95
96 /* retrieve the (unix) path to the wine.inf file */
97 static char *get_wine_inf_path(void)
98 {
99     const char *build_dir, *data_dir;
100     char *name = NULL;
101
102     if ((data_dir = wine_get_data_dir()))
103     {
104         if (!(name = HeapAlloc( GetProcessHeap(), 0, strlen(data_dir) + sizeof("/wine.inf") )))
105             return NULL;
106         strcpy( name, data_dir );
107         strcat( name, "/wine.inf" );
108     }
109     else if ((build_dir = wine_get_build_dir()))
110     {
111         if (!(name = HeapAlloc( GetProcessHeap(), 0, strlen(build_dir) + sizeof("/tools/wine.inf") )))
112             return NULL;
113         strcpy( name, build_dir );
114         strcat( name, "/tools/wine.inf" );
115     }
116     return name;
117 }
118
119 /* update the timestamp if different from the reference time */
120 static BOOL update_timestamp( const char *config_dir, unsigned long timestamp )
121 {
122     BOOL ret = FALSE;
123     int fd, count;
124     char buffer[100];
125     char *file = HeapAlloc( GetProcessHeap(), 0, strlen(config_dir) + sizeof("/.update-timestamp") );
126
127     if (!file) return FALSE;
128     strcpy( file, config_dir );
129     strcat( file, "/.update-timestamp" );
130
131     if ((fd = open( file, O_RDWR )) != -1)
132     {
133         if ((count = read( fd, buffer, sizeof(buffer) - 1 )) >= 0)
134         {
135             buffer[count] = 0;
136             if (!strncmp( buffer, "disable", sizeof("disable")-1 )) goto done;
137             if (timestamp == strtoul( buffer, NULL, 10 )) goto done;
138         }
139         lseek( fd, 0, SEEK_SET );
140         ftruncate( fd, 0 );
141     }
142     else
143     {
144         if (errno != ENOENT) goto done;
145         if ((fd = open( file, O_WRONLY | O_CREAT | O_TRUNC, 0666 )) == -1) goto done;
146     }
147
148     count = sprintf( buffer, "%lu\n", timestamp );
149     if (write( fd, buffer, count ) != count)
150     {
151         WINE_WARN( "failed to update timestamp in %s\n", file );
152         ftruncate( fd, 0 );
153     }
154     else ret = TRUE;
155
156 done:
157     if (fd != -1) close( fd );
158     HeapFree( GetProcessHeap(), 0, file );
159     return ret;
160 }
161
162 /* wrapper for RegSetValueExW */
163 static DWORD set_reg_value( HKEY hkey, const WCHAR *name, const WCHAR *value )
164 {
165     return RegSetValueExW( hkey, name, 0, REG_SZ, (const BYTE *)value, (strlenW(value) + 1) * sizeof(WCHAR) );
166 }
167
168 /* create the volatile hardware registry keys */
169 static void create_hardware_registry_keys(void)
170 {
171     static const WCHAR SystemW[] = {'H','a','r','d','w','a','r','e','\\',
172                                     'D','e','s','c','r','i','p','t','i','o','n','\\',
173                                     'S','y','s','t','e','m',0};
174     static const WCHAR fpuW[] = {'F','l','o','a','t','i','n','g','P','o','i','n','t','P','r','o','c','e','s','s','o','r',0};
175     static const WCHAR cpuW[] = {'C','e','n','t','r','a','l','P','r','o','c','e','s','s','o','r',0};
176     static const WCHAR FeatureSetW[] = {'F','e','a','t','u','r','e','S','e','t',0};
177     static const WCHAR IdentifierW[] = {'I','d','e','n','t','i','f','i','e','r',0};
178     static const WCHAR ProcessorNameStringW[] = {'P','r','o','c','e','s','s','o','r','N','a','m','e','S','t','r','i','n','g',0};
179     static const WCHAR SysidW[] = {'A','T',' ','c','o','m','p','a','t','i','b','l','e',0};
180     static const WCHAR mhzKeyW[] = {'~','M','H','z',0};
181     static const WCHAR VendorIdentifierW[] = {'V','e','n','d','o','r','I','d','e','n','t','i','f','i','e','r',0};
182     static const WCHAR VenidIntelW[] = {'G','e','n','u','i','n','e','I','n','t','e','l',0};
183     /* static const WCHAR VenidAMDW[] = {'A','u','t','h','e','n','t','i','c','A','M','D',0}; */
184     static const WCHAR PercentDW[] = {'%','d',0};
185     static const WCHAR IntelCpuDescrW[] = {'x','8','6',' ','F','a','m','i','l','y',' ','%','d',' ','M','o','d','e','l',' ','%','d',
186                                            ' ','S','t','e','p','p','i','n','g',' ','%','d',0};
187     static const WCHAR IntelCpuStringW[] = {'I','n','t','e','l','(','R',')',' ','P','e','n','t','i','u','m','(','R',')',' ','4',' ',
188                                             'C','P','U',' ','2','.','4','0','G','H','z',0};
189     unsigned int i;
190     HKEY hkey, system_key, cpu_key, fpu_key;
191     SYSTEM_CPU_INFORMATION sci;
192     PROCESSOR_POWER_INFORMATION power_info;
193     WCHAR idW[60];
194
195     NtQuerySystemInformation( SystemCpuInformation, &sci, sizeof(sci), NULL );
196     if (NtPowerInformation(ProcessorInformation, NULL, 0, &power_info, sizeof(power_info)))
197         power_info.MaxMhz = 0;
198
199     /*TODO: report 64bit processors properly*/
200     sprintfW( idW, IntelCpuDescrW, sci.Level, HIBYTE(sci.Revision), LOBYTE(sci.Revision) );
201
202     if (RegCreateKeyExW( HKEY_LOCAL_MACHINE, SystemW, 0, NULL, REG_OPTION_VOLATILE,
203                          KEY_ALL_ACCESS, NULL, &system_key, NULL ))
204         return;
205
206     set_reg_value( system_key, IdentifierW, SysidW );
207
208     if (RegCreateKeyExW( system_key, fpuW, 0, NULL, REG_OPTION_VOLATILE,
209                          KEY_ALL_ACCESS, NULL, &fpu_key, NULL ))
210         fpu_key = 0;
211     if (RegCreateKeyExW( system_key, cpuW, 0, NULL, REG_OPTION_VOLATILE,
212                          KEY_ALL_ACCESS, NULL, &cpu_key, NULL ))
213         cpu_key = 0;
214
215     for (i = 0; i < NtCurrentTeb()->Peb->NumberOfProcessors; i++)
216     {
217         WCHAR numW[10];
218
219         sprintfW( numW, PercentDW, i );
220         if (!RegCreateKeyExW( cpu_key, numW, 0, NULL, REG_OPTION_VOLATILE,
221                               KEY_ALL_ACCESS, NULL, &hkey, NULL ))
222         {
223             RegSetValueExW( hkey, FeatureSetW, 0, REG_DWORD, (BYTE *)&sci.FeatureSet, sizeof(DWORD) );
224             set_reg_value( hkey, IdentifierW, idW );
225             /*TODO; report amd's properly*/
226             set_reg_value( hkey, ProcessorNameStringW, IntelCpuStringW );
227             set_reg_value( hkey, VendorIdentifierW, VenidIntelW );
228             RegSetValueExW( hkey, mhzKeyW, 0, REG_DWORD, (BYTE *)&power_info.MaxMhz, sizeof(DWORD) );
229             RegCloseKey( hkey );
230         }
231         if (!RegCreateKeyExW( fpu_key, numW, 0, NULL, REG_OPTION_VOLATILE,
232                               KEY_ALL_ACCESS, NULL, &hkey, NULL ))
233         {
234             set_reg_value( hkey, IdentifierW, idW );
235             RegCloseKey( hkey );
236         }
237     }
238     RegCloseKey( fpu_key );
239     RegCloseKey( cpu_key );
240     RegCloseKey( system_key );
241 }
242
243
244 /* create the DynData registry keys */
245 static void create_dynamic_registry_keys(void)
246 {
247     static const WCHAR StatDataW[] = {'P','e','r','f','S','t','a','t','s','\\',
248                                       'S','t','a','t','D','a','t','a',0};
249     static const WCHAR ConfigManagerW[] = {'C','o','n','f','i','g',' ','M','a','n','a','g','e','r','\\',
250                                            'E','n','u','m',0};
251     HKEY key;
252
253     if (!RegCreateKeyExW( HKEY_DYN_DATA, StatDataW, 0, NULL, 0, KEY_WRITE, NULL, &key, NULL ))
254         RegCloseKey( key );
255     if (!RegCreateKeyExW( HKEY_DYN_DATA, ConfigManagerW, 0, NULL, 0, KEY_WRITE, NULL, &key, NULL ))
256         RegCloseKey( key );
257 }
258
259 /* create the platform-specific environment registry keys */
260 static void create_environment_registry_keys( void )
261 {
262     static const WCHAR EnvironW[]  = {'S','y','s','t','e','m','\\',
263                                       'C','u','r','r','e','n','t','C','o','n','t','r','o','l','S','e','t','\\',
264                                       'C','o','n','t','r','o','l','\\',
265                                       'S','e','s','s','i','o','n',' ','M','a','n','a','g','e','r','\\',
266                                       'E','n','v','i','r','o','n','m','e','n','t',0};
267     static const WCHAR NumProcW[]  = {'N','U','M','B','E','R','_','O','F','_','P','R','O','C','E','S','S','O','R','S',0};
268     static const WCHAR ProcArchW[] = {'P','R','O','C','E','S','S','O','R','_','A','R','C','H','I','T','E','C','T','U','R','E',0};
269     static const WCHAR x86W[]      = {'x','8','6',0};
270     static const WCHAR IA64W[]     = {'I','A','6','4',0};
271     static const WCHAR AMD64W[]    = {'A','M','D','6','4',0};
272     static const WCHAR ProcIdW[]   = {'P','R','O','C','E','S','S','O','R','_','I','D','E','N','T','I','F','I','E','R',0};
273     static const WCHAR ProcLvlW[]  = {'P','R','O','C','E','S','S','O','R','_','L','E','V','E','L',0};
274     static const WCHAR ProcRevW[]  = {'P','R','O','C','E','S','S','O','R','_','R','E','V','I','S','I','O','N',0};
275     static const WCHAR PercentDW[] = {'%','d',0};
276     static const WCHAR Percent04XW[] = {'%','0','4','x',0};
277     static const WCHAR IntelCpuDescrW[]  = {'%','s',' ','F','a','m','i','l','y',' ','%','d',' ','M','o','d','e','l',' ','%','d',
278                                             ' ','S','t','e','p','p','i','n','g',' ','%','d',',',' ','G','e','n','u','i','n','e','I','n','t','e','l',0};
279
280     HKEY env_key;
281     SYSTEM_CPU_INFORMATION sci;
282     WCHAR buffer[60];
283     const WCHAR *arch;
284
285     NtQuerySystemInformation( SystemCpuInformation, &sci, sizeof(sci), NULL );
286
287     if (RegCreateKeyW( HKEY_LOCAL_MACHINE, EnvironW, &env_key )) return;
288
289     sprintfW( buffer, PercentDW, NtCurrentTeb()->Peb->NumberOfProcessors );
290     set_reg_value( env_key, NumProcW, buffer );
291
292     switch(sci.Architecture)
293     {
294     case PROCESSOR_ARCHITECTURE_AMD64: arch = AMD64W; break;
295     case PROCESSOR_ARCHITECTURE_IA64:  arch = IA64W; break;
296     default:
297     case PROCESSOR_ARCHITECTURE_INTEL: arch = x86W; break;
298     }
299     set_reg_value( env_key, ProcArchW, arch );
300
301     /* TODO: currently hardcoded Intel, add different processors */
302     sprintfW( buffer, IntelCpuDescrW, arch, sci.Level, HIBYTE(sci.Revision), LOBYTE(sci.Revision) );
303     set_reg_value( env_key, ProcIdW, buffer );
304
305     sprintfW( buffer, PercentDW, sci.Level );
306     set_reg_value( env_key, ProcLvlW, buffer );
307
308     /* Properly report model/stepping */
309     sprintfW( buffer, Percent04XW, sci.Revision );
310     set_reg_value( env_key, ProcRevW, buffer );
311
312     RegCloseKey( env_key );
313 }
314
315 static void create_volatile_environment_registry_key(void)
316 {
317     static const WCHAR VolatileEnvW[] = {'V','o','l','a','t','i','l','e',' ','E','n','v','i','r','o','n','m','e','n','t',0};
318     static const WCHAR AppDataW[] = {'A','P','P','D','A','T','A',0};
319     static const WCHAR ClientNameW[] = {'C','L','I','E','N','T','N','A','M','E',0};
320     static const WCHAR HomeDriveW[] = {'H','O','M','E','D','R','I','V','E',0};
321     static const WCHAR HomePathW[] = {'H','O','M','E','P','A','T','H',0};
322     static const WCHAR HomeShareW[] = {'H','O','M','E','S','H','A','R','E',0};
323     static const WCHAR LocalAppDataW[] = {'L','O','C','A','L','A','P','P','D','A','T','A',0};
324     static const WCHAR LogonServerW[] = {'L','O','G','O','N','S','E','R','V','E','R',0};
325     static const WCHAR SessionNameW[] = {'S','E','S','S','I','O','N','N','A','M','E',0};
326     static const WCHAR UserNameW[] = {'U','S','E','R','N','A','M','E',0};
327     static const WCHAR UserDomainW[] = {'U','S','E','R','D','O','M','A','I','N',0};
328     static const WCHAR UserProfileW[] = {'U','S','E','R','P','R','O','F','I','L','E',0};
329     static const WCHAR ConsoleW[] = {'C','o','n','s','o','l','e',0};
330     static const WCHAR EmptyW[] = {0};
331     WCHAR path[MAX_PATH];
332     WCHAR computername[MAX_COMPUTERNAME_LENGTH + 1 + 2];
333     DWORD size;
334     HKEY hkey;
335     HRESULT hr;
336
337     if (RegCreateKeyExW( HKEY_CURRENT_USER, VolatileEnvW, 0, NULL, REG_OPTION_VOLATILE,
338                          KEY_ALL_ACCESS, NULL, &hkey, NULL ))
339         return;
340
341     hr = SHGetFolderPathW( NULL, CSIDL_APPDATA, NULL, SHGFP_TYPE_CURRENT, path );
342     if (SUCCEEDED(hr)) set_reg_value( hkey, AppDataW, path );
343
344     set_reg_value( hkey, ClientNameW, ConsoleW );
345
346     /* Write the profile path's drive letter and directory components into
347      * HOMEDRIVE and HOMEPATH respectively. */
348     hr = SHGetFolderPathW( NULL, CSIDL_PROFILE, NULL, SHGFP_TYPE_CURRENT, path );
349     if (SUCCEEDED(hr))
350     {
351         set_reg_value( hkey, UserProfileW, path );
352         set_reg_value( hkey, HomePathW, path + 2 );
353         path[2] = '\0';
354         set_reg_value( hkey, HomeDriveW, path );
355     }
356
357     size = sizeof(path)/sizeof(path[0]);
358     if (GetUserNameW( path, &size )) set_reg_value( hkey, UserNameW, path );
359
360     set_reg_value( hkey, HomeShareW, EmptyW );
361
362     hr = SHGetFolderPathW( NULL, CSIDL_LOCAL_APPDATA, NULL, SHGFP_TYPE_CURRENT, path );
363     if (SUCCEEDED(hr))
364         set_reg_value( hkey, LocalAppDataW, path );
365
366     size = (sizeof(computername)/sizeof(WCHAR)) - 2;
367     if (GetComputerNameW(&computername[2], &size))
368     {
369         set_reg_value( hkey, UserDomainW, &computername[2] );
370         computername[0] = computername[1] = '\\';
371         set_reg_value( hkey, LogonServerW, computername );
372     }
373
374     set_reg_value( hkey, SessionNameW, ConsoleW );
375     RegCloseKey( hkey );
376 }
377
378 /* Performs the rename operations dictated in %SystemRoot%\Wininit.ini.
379  * Returns FALSE if there was an error, or otherwise if all is ok.
380  */
381 static BOOL wininit(void)
382 {
383     static const WCHAR nulW[] = {'N','U','L',0};
384     static const WCHAR renameW[] = {'r','e','n','a','m','e',0};
385     static const WCHAR wininitW[] = {'w','i','n','i','n','i','t','.','i','n','i',0};
386     static const WCHAR wininitbakW[] = {'w','i','n','i','n','i','t','.','b','a','k',0};
387     WCHAR initial_buffer[1024];
388     WCHAR *str, *buffer = initial_buffer;
389     DWORD size = sizeof(initial_buffer)/sizeof(WCHAR);
390     DWORD res;
391
392     for (;;)
393     {
394         if (!(res = GetPrivateProfileSectionW( renameW, buffer, size, wininitW ))) return TRUE;
395         if (res < size - 2) break;
396         if (buffer != initial_buffer) HeapFree( GetProcessHeap(), 0, buffer );
397         size *= 2;
398         if (!(buffer = HeapAlloc( GetProcessHeap(), 0, size * sizeof(WCHAR) ))) return FALSE;
399     }
400
401     for (str = buffer; *str; str += strlenW(str) + 1)
402     {
403         WCHAR *value;
404
405         if (*str == ';') continue;  /* comment */
406         if (!(value = strchrW( str, '=' ))) continue;
407
408         /* split the line into key and value */
409         *value++ = 0;
410
411         if (!lstrcmpiW( nulW, str ))
412         {
413             WINE_TRACE("Deleting file %s\n", wine_dbgstr_w(value) );
414             if( !DeleteFileW( value ) )
415                 WINE_WARN("Error deleting file %s\n", wine_dbgstr_w(value) );
416         }
417         else
418         {
419             WINE_TRACE("Renaming file %s to %s\n", wine_dbgstr_w(value), wine_dbgstr_w(str) );
420
421             if( !MoveFileExW(value, str, MOVEFILE_COPY_ALLOWED | MOVEFILE_REPLACE_EXISTING) )
422                 WINE_WARN("Error renaming %s to %s\n", wine_dbgstr_w(value), wine_dbgstr_w(str) );
423         }
424         str = value;
425     }
426
427     if (buffer != initial_buffer) HeapFree( GetProcessHeap(), 0, buffer );
428
429     if( !MoveFileExW( wininitW, wininitbakW, MOVEFILE_REPLACE_EXISTING) )
430     {
431         WINE_ERR("Couldn't rename wininit.ini, error %d\n", GetLastError() );
432
433         return FALSE;
434     }
435
436     return TRUE;
437 }
438
439 static BOOL pendingRename(void)
440 {
441     static const WCHAR ValueName[] = {'P','e','n','d','i','n','g',
442                                       'F','i','l','e','R','e','n','a','m','e',
443                                       'O','p','e','r','a','t','i','o','n','s',0};
444     static const WCHAR SessionW[] = { 'S','y','s','t','e','m','\\',
445                                      'C','u','r','r','e','n','t','C','o','n','t','r','o','l','S','e','t','\\',
446                                      'C','o','n','t','r','o','l','\\',
447                                      'S','e','s','s','i','o','n',' ','M','a','n','a','g','e','r',0};
448     WCHAR *buffer=NULL;
449     const WCHAR *src=NULL, *dst=NULL;
450     DWORD dataLength=0;
451     HKEY hSession=NULL;
452     DWORD res;
453
454     WINE_TRACE("Entered\n");
455
456     if( (res=RegOpenKeyExW( HKEY_LOCAL_MACHINE, SessionW, 0, KEY_ALL_ACCESS, &hSession ))
457             !=ERROR_SUCCESS )
458     {
459         WINE_TRACE("The key was not found - skipping\n");
460         return TRUE;
461     }
462
463     res=RegQueryValueExW( hSession, ValueName, NULL, NULL /* The value type does not really interest us, as it is not
464                                                              truly a REG_MULTI_SZ anyways */,
465             NULL, &dataLength );
466     if( res==ERROR_FILE_NOT_FOUND )
467     {
468         /* No value - nothing to do. Great! */
469         WINE_TRACE("Value not present - nothing to rename\n");
470         res=TRUE;
471         goto end;
472     }
473
474     if( res!=ERROR_SUCCESS )
475     {
476         WINE_ERR("Couldn't query value's length (%d)\n", res );
477         res=FALSE;
478         goto end;
479     }
480
481     buffer=HeapAlloc( GetProcessHeap(),0,dataLength );
482     if( buffer==NULL )
483     {
484         WINE_ERR("Couldn't allocate %u bytes for the value\n", dataLength );
485         res=FALSE;
486         goto end;
487     }
488
489     res=RegQueryValueExW( hSession, ValueName, NULL, NULL, (LPBYTE)buffer, &dataLength );
490     if( res!=ERROR_SUCCESS )
491     {
492         WINE_ERR("Couldn't query value after successfully querying before (%u),\n"
493                 "please report to wine-devel@winehq.org\n", res);
494         res=FALSE;
495         goto end;
496     }
497
498     /* Make sure that the data is long enough and ends with two NULLs. This
499      * simplifies the code later on.
500      */
501     if( dataLength<2*sizeof(buffer[0]) ||
502             buffer[dataLength/sizeof(buffer[0])-1]!='\0' ||
503             buffer[dataLength/sizeof(buffer[0])-2]!='\0' )
504     {
505         WINE_ERR("Improper value format - doesn't end with NULL\n");
506         res=FALSE;
507         goto end;
508     }
509
510     for( src=buffer; (src-buffer)*sizeof(src[0])<dataLength && *src!='\0';
511             src=dst+lstrlenW(dst)+1 )
512     {
513         DWORD dwFlags=0;
514
515         WINE_TRACE("processing next command\n");
516
517         dst=src+lstrlenW(src)+1;
518
519         /* We need to skip the \??\ header */
520         if( src[0]=='\\' && src[1]=='?' && src[2]=='?' && src[3]=='\\' )
521             src+=4;
522
523         if( dst[0]=='!' )
524         {
525             dwFlags|=MOVEFILE_REPLACE_EXISTING;
526             dst++;
527         }
528
529         if( dst[0]=='\\' && dst[1]=='?' && dst[2]=='?' && dst[3]=='\\' )
530             dst+=4;
531
532         if( *dst!='\0' )
533         {
534             /* Rename the file */
535             MoveFileExW( src, dst, dwFlags );
536         } else
537         {
538             /* Delete the file or directory */
539             if( (res=GetFileAttributesW(src))!=INVALID_FILE_ATTRIBUTES )
540             {
541                 if( (res&FILE_ATTRIBUTE_DIRECTORY)==0 )
542                 {
543                     /* It's a file */
544                     DeleteFileW(src);
545                 } else
546                 {
547                     /* It's a directory */
548                     RemoveDirectoryW(src);
549                 }
550             } else
551             {
552                 WINE_ERR("couldn't get file attributes (%d)\n", GetLastError() );
553             }
554         }
555     }
556
557     if((res=RegDeleteValueW(hSession, ValueName))!=ERROR_SUCCESS )
558     {
559         WINE_ERR("Error deleting the value (%u)\n", GetLastError() );
560         res=FALSE;
561     } else
562         res=TRUE;
563     
564 end:
565     HeapFree(GetProcessHeap(), 0, buffer);
566
567     if( hSession!=NULL )
568         RegCloseKey( hSession );
569
570     return res;
571 }
572
573 enum runkeys {
574     RUNKEY_RUN, RUNKEY_RUNONCE, RUNKEY_RUNSERVICES, RUNKEY_RUNSERVICESONCE
575 };
576
577 const WCHAR runkeys_names[][30]=
578 {
579     {'R','u','n',0},
580     {'R','u','n','O','n','c','e',0},
581     {'R','u','n','S','e','r','v','i','c','e','s',0},
582     {'R','u','n','S','e','r','v','i','c','e','s','O','n','c','e',0}
583 };
584
585 #define INVALID_RUNCMD_RETURN -1
586 /*
587  * This function runs the specified command in the specified dir.
588  * [in,out] cmdline - the command line to run. The function may change the passed buffer.
589  * [in] dir - the dir to run the command in. If it is NULL, then the current dir is used.
590  * [in] wait - whether to wait for the run program to finish before returning.
591  * [in] minimized - Whether to ask the program to run minimized.
592  *
593  * Returns:
594  * If running the process failed, returns INVALID_RUNCMD_RETURN. Use GetLastError to get the error code.
595  * If wait is FALSE - returns 0 if successful.
596  * If wait is TRUE - returns the program's return value.
597  */
598 static DWORD runCmd(LPWSTR cmdline, LPCWSTR dir, BOOL wait, BOOL minimized)
599 {
600     STARTUPINFOW si;
601     PROCESS_INFORMATION info;
602     DWORD exit_code=0;
603
604     memset(&si, 0, sizeof(si));
605     si.cb=sizeof(si);
606     if( minimized )
607     {
608         si.dwFlags=STARTF_USESHOWWINDOW;
609         si.wShowWindow=SW_MINIMIZE;
610     }
611     memset(&info, 0, sizeof(info));
612
613     if( !CreateProcessW(NULL, cmdline, NULL, NULL, FALSE, 0, NULL, dir, &si, &info) )
614     {
615         WINE_WARN("Failed to run command %s (%d)\n", wine_dbgstr_w(cmdline), GetLastError() );
616         return INVALID_RUNCMD_RETURN;
617     }
618
619     WINE_TRACE("Successfully ran command %s - Created process handle %p\n",
620                wine_dbgstr_w(cmdline), info.hProcess );
621
622     if(wait)
623     {   /* wait for the process to exit */
624         WaitForSingleObject(info.hProcess, INFINITE);
625         GetExitCodeProcess(info.hProcess, &exit_code);
626     }
627
628     CloseHandle( info.hThread );
629     CloseHandle( info.hProcess );
630
631     return exit_code;
632 }
633
634 /*
635  * Process a "Run" type registry key.
636  * hkRoot is the HKEY from which "Software\Microsoft\Windows\CurrentVersion" is
637  *      opened.
638  * szKeyName is the key holding the actual entries.
639  * bDelete tells whether we should delete each value right before executing it.
640  * bSynchronous tells whether we should wait for the prog to complete before
641  *      going on to the next prog.
642  */
643 static BOOL ProcessRunKeys( HKEY hkRoot, LPCWSTR szKeyName, BOOL bDelete,
644         BOOL bSynchronous )
645 {
646     static const WCHAR WINKEY_NAME[]={'S','o','f','t','w','a','r','e','\\',
647         'M','i','c','r','o','s','o','f','t','\\','W','i','n','d','o','w','s','\\',
648         'C','u','r','r','e','n','t','V','e','r','s','i','o','n',0};
649     HKEY hkWin, hkRun;
650     DWORD res, dispos;
651     DWORD i, nMaxCmdLine=0, nMaxValue=0;
652     WCHAR *szCmdLine=NULL;
653     WCHAR *szValue=NULL;
654
655     if (hkRoot==HKEY_LOCAL_MACHINE)
656         WINE_TRACE("processing %s entries under HKLM\n",wine_dbgstr_w(szKeyName) );
657     else
658         WINE_TRACE("processing %s entries under HKCU\n",wine_dbgstr_w(szKeyName) );
659
660     if (RegCreateKeyExW( hkRoot, WINKEY_NAME, 0, NULL, 0, KEY_READ, NULL, &hkWin, NULL ) != ERROR_SUCCESS)
661         return TRUE;
662
663     if ((res = RegCreateKeyExW( hkWin, szKeyName, 0, NULL, 0, bDelete ? KEY_ALL_ACCESS : KEY_READ,
664                                 NULL, &hkRun, &dispos ) != ERROR_SUCCESS))
665     {
666         RegCloseKey( hkWin );
667         return TRUE;
668     }
669     RegCloseKey( hkWin );
670     if (dispos == REG_CREATED_NEW_KEY) goto end;
671
672     if( (res=RegQueryInfoKeyW( hkRun, NULL, NULL, NULL, NULL, NULL, NULL, &i, &nMaxValue,
673                     &nMaxCmdLine, NULL, NULL ))!=ERROR_SUCCESS )
674         goto end;
675
676     if( i==0 )
677     {
678         WINE_TRACE("No commands to execute.\n");
679
680         res=ERROR_SUCCESS;
681         goto end;
682     }
683     
684     if( (szCmdLine=HeapAlloc(GetProcessHeap(),0,nMaxCmdLine))==NULL )
685     {
686         WINE_ERR("Couldn't allocate memory for the commands to be executed\n");
687
688         res=ERROR_NOT_ENOUGH_MEMORY;
689         goto end;
690     }
691
692     if( (szValue=HeapAlloc(GetProcessHeap(),0,(++nMaxValue)*sizeof(*szValue)))==NULL )
693     {
694         WINE_ERR("Couldn't allocate memory for the value names\n");
695
696         res=ERROR_NOT_ENOUGH_MEMORY;
697         goto end;
698     }
699     
700     while( i>0 )
701     {
702         DWORD nValLength=nMaxValue, nDataLength=nMaxCmdLine;
703         DWORD type;
704
705         --i;
706
707         if( (res=RegEnumValueW( hkRun, i, szValue, &nValLength, 0, &type,
708                         (LPBYTE)szCmdLine, &nDataLength ))!=ERROR_SUCCESS )
709         {
710             WINE_ERR("Couldn't read in value %d - %d\n", i, res );
711
712             continue;
713         }
714
715         if( bDelete && (res=RegDeleteValueW( hkRun, szValue ))!=ERROR_SUCCESS )
716         {
717             WINE_ERR("Couldn't delete value - %d, %d. Running command anyways.\n", i, res );
718         }
719         
720         if( type!=REG_SZ )
721         {
722             WINE_ERR("Incorrect type of value #%d (%d)\n", i, type );
723
724             continue;
725         }
726
727         if( (res=runCmd(szCmdLine, NULL, bSynchronous, FALSE ))==INVALID_RUNCMD_RETURN )
728         {
729             WINE_ERR("Error running cmd %s (%d)\n", wine_dbgstr_w(szCmdLine), GetLastError() );
730         }
731
732         WINE_TRACE("Done processing cmd #%d\n", i);
733     }
734
735     res=ERROR_SUCCESS;
736
737 end:
738     HeapFree( GetProcessHeap(), 0, szValue );
739     HeapFree( GetProcessHeap(), 0, szCmdLine );
740
741     if( hkRun!=NULL )
742         RegCloseKey( hkRun );
743
744     WINE_TRACE("done\n");
745
746     return res==ERROR_SUCCESS;
747 }
748
749 /*
750  * WFP is Windows File Protection, in NT5 and Windows 2000 it maintains a cache
751  * of known good dlls and scans through and replaces corrupted DLLs with these
752  * known good versions. The only programs that should install into this dll
753  * cache are Windows Updates and IE (which is treated like a Windows Update)
754  *
755  * Implementing this allows installing ie in win2k mode to actually install the
756  * system dlls that we expect and need
757  */
758 static int ProcessWindowsFileProtection(void)
759 {
760     static const WCHAR winlogonW[] = {'S','o','f','t','w','a','r','e','\\',
761                                       'M','i','c','r','o','s','o','f','t','\\',
762                                       'W','i','n','d','o','w','s',' ','N','T','\\',
763                                       'C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
764                                       'W','i','n','l','o','g','o','n',0};
765     static const WCHAR cachedirW[] = {'S','F','C','D','l','l','C','a','c','h','e','D','i','r',0};
766     static const WCHAR dllcacheW[] = {'\\','d','l','l','c','a','c','h','e','\\','*',0};
767     static const WCHAR wildcardW[] = {'\\','*',0};
768     WIN32_FIND_DATAW finddata;
769     HANDLE find_handle;
770     BOOL find_rc;
771     DWORD rc;
772     HKEY hkey;
773     LPWSTR dllcache = NULL;
774
775     if (!RegOpenKeyW( HKEY_LOCAL_MACHINE, winlogonW, &hkey ))
776     {
777         DWORD sz = 0;
778         if (!RegQueryValueExW( hkey, cachedirW, 0, NULL, NULL, &sz))
779         {
780             sz += sizeof(WCHAR);
781             dllcache = HeapAlloc(GetProcessHeap(),0,sz + sizeof(wildcardW));
782             RegQueryValueExW( hkey, cachedirW, 0, NULL, (LPBYTE)dllcache, &sz);
783             strcatW( dllcache, wildcardW );
784         }
785     }
786     RegCloseKey(hkey);
787
788     if (!dllcache)
789     {
790         DWORD sz = GetSystemDirectoryW( NULL, 0 );
791         dllcache = HeapAlloc( GetProcessHeap(), 0, sz * sizeof(WCHAR) + sizeof(dllcacheW));
792         GetSystemDirectoryW( dllcache, sz );
793         strcatW( dllcache, dllcacheW );
794     }
795
796     find_handle = FindFirstFileW(dllcache,&finddata);
797     dllcache[ strlenW(dllcache) - 2] = 0; /* strip off wildcard */
798     find_rc = find_handle != INVALID_HANDLE_VALUE;
799     while (find_rc)
800     {
801         static const WCHAR dotW[] = {'.',0};
802         static const WCHAR dotdotW[] = {'.','.',0};
803         WCHAR targetpath[MAX_PATH];
804         WCHAR currentpath[MAX_PATH];
805         UINT sz;
806         UINT sz2;
807         WCHAR tempfile[MAX_PATH];
808
809         if (strcmpW(finddata.cFileName,dotW) == 0 || strcmpW(finddata.cFileName,dotdotW) == 0)
810         {
811             find_rc = FindNextFileW(find_handle,&finddata);
812             continue;
813         }
814
815         sz = MAX_PATH;
816         sz2 = MAX_PATH;
817         VerFindFileW(VFFF_ISSHAREDFILE, finddata.cFileName, windowsdir,
818                      windowsdir, currentpath, &sz, targetpath, &sz2);
819         sz = MAX_PATH;
820         rc = VerInstallFileW(0, finddata.cFileName, finddata.cFileName,
821                              dllcache, targetpath, currentpath, tempfile, &sz);
822         if (rc != ERROR_SUCCESS)
823         {
824             WINE_WARN("WFP: %s error 0x%x\n",wine_dbgstr_w(finddata.cFileName),rc);
825             DeleteFileW(tempfile);
826         }
827
828         /* now delete the source file so that we don't try to install it over and over again */
829         lstrcpynW( targetpath, dllcache, MAX_PATH - 1 );
830         sz = strlenW( targetpath );
831         targetpath[sz++] = '\\';
832         lstrcpynW( targetpath + sz, finddata.cFileName, MAX_PATH - sz );
833         if (!DeleteFileW( targetpath ))
834             WINE_WARN( "failed to delete %s: error %u\n", wine_dbgstr_w(targetpath), GetLastError() );
835
836         find_rc = FindNextFileW(find_handle,&finddata);
837     }
838     FindClose(find_handle);
839     HeapFree(GetProcessHeap(),0,dllcache);
840     return 1;
841 }
842
843 static BOOL start_services_process(void)
844 {
845     static const WCHAR svcctl_started_event[] = SVCCTL_STARTED_EVENT;
846     static const WCHAR services[] = {'\\','s','e','r','v','i','c','e','s','.','e','x','e',0};
847     PROCESS_INFORMATION pi;
848     STARTUPINFOW si;
849     HANDLE wait_handles[2];
850     WCHAR path[MAX_PATH];
851
852     if (!GetSystemDirectoryW(path, MAX_PATH - strlenW(services)))
853         return FALSE;
854     strcatW(path, services);
855     ZeroMemory(&si, sizeof(si));
856     si.cb = sizeof(si);
857     if (!CreateProcessW(path, path, NULL, NULL, TRUE, 0, NULL, NULL, &si, &pi))
858     {
859         WINE_ERR("Couldn't start services.exe: error %u\n", GetLastError());
860         return FALSE;
861     }
862     CloseHandle(pi.hThread);
863
864     wait_handles[0] = CreateEventW(NULL, TRUE, FALSE, svcctl_started_event);
865     wait_handles[1] = pi.hProcess;
866
867     /* wait for the event to become available or the process to exit */
868     if ((WaitForMultipleObjects(2, wait_handles, FALSE, INFINITE)) == WAIT_OBJECT_0 + 1)
869     {
870         DWORD exit_code;
871         GetExitCodeProcess(pi.hProcess, &exit_code);
872         WINE_ERR("Unexpected termination of services.exe - exit code %d\n", exit_code);
873         CloseHandle(pi.hProcess);
874         CloseHandle(wait_handles[0]);
875         return FALSE;
876     }
877
878     CloseHandle(pi.hProcess);
879     CloseHandle(wait_handles[0]);
880     return TRUE;
881 }
882
883 static INT_PTR CALLBACK wait_dlgproc( HWND hwnd, UINT msg, WPARAM wp, LPARAM lp )
884 {
885     switch (msg)
886     {
887     case WM_INITDIALOG:
888         {
889             WCHAR *buffer, text[1024];
890             const WCHAR *name = (WCHAR *)lp;
891             HICON icon = LoadImageW( 0, (LPCWSTR)IDI_WINLOGO, IMAGE_ICON, 48, 48, LR_SHARED );
892             SendDlgItemMessageW( hwnd, IDC_WAITICON, STM_SETICON, (WPARAM)icon, 0 );
893             SendDlgItemMessageW( hwnd, IDC_WAITTEXT, WM_GETTEXT, 1024, (LPARAM)text );
894             buffer = HeapAlloc( GetProcessHeap(), 0, (strlenW(text) + strlenW(name) + 1) * sizeof(WCHAR) );
895             sprintfW( buffer, text, name );
896             SendDlgItemMessageW( hwnd, IDC_WAITTEXT, WM_SETTEXT, 0, (LPARAM)buffer );
897             HeapFree( GetProcessHeap(), 0, buffer );
898         }
899         break;
900     }
901     return 0;
902 }
903
904 static HWND show_wait_window(void)
905 {
906     const char *config_dir = wine_get_config_dir();
907     WCHAR *name;
908     HWND hwnd;
909     DWORD len;
910
911     len = MultiByteToWideChar( CP_UNIXCP, 0, config_dir, -1, NULL, 0 );
912     name = HeapAlloc( GetProcessHeap(), 0, len * sizeof(WCHAR) );
913     MultiByteToWideChar( CP_UNIXCP, 0, config_dir, -1, name, len );
914     hwnd = CreateDialogParamW( GetModuleHandleW(0), MAKEINTRESOURCEW(IDD_WAITDLG), 0,
915                                wait_dlgproc, (LPARAM)name );
916     ShowWindow( hwnd, SW_SHOWNORMAL );
917     HeapFree( GetProcessHeap(), 0, name );
918     return hwnd;
919 }
920
921 static HANDLE start_rundll32( const char *inf_path, BOOL wow64 )
922 {
923     static const WCHAR rundll[] = {'\\','r','u','n','d','l','l','3','2','.','e','x','e',0};
924     static const WCHAR setupapi[] = {' ','s','e','t','u','p','a','p','i',',',
925                                      'I','n','s','t','a','l','l','H','i','n','f','S','e','c','t','i','o','n',0};
926     static const WCHAR definstall[] = {' ','D','e','f','a','u','l','t','I','n','s','t','a','l','l',0};
927     static const WCHAR wowinstall[] = {' ','W','o','w','6','4','I','n','s','t','a','l','l',0};
928     static const WCHAR inf[] = {' ','1','2','8',' ','\\','\\','?','\\','u','n','i','x',0 };
929
930     WCHAR app[MAX_PATH + sizeof(rundll)/sizeof(WCHAR)];
931     STARTUPINFOW si;
932     PROCESS_INFORMATION pi;
933     WCHAR *buffer;
934     DWORD inf_len, cmd_len;
935
936     memset( &si, 0, sizeof(si) );
937     si.cb = sizeof(si);
938
939     if (wow64)
940     {
941         if (!GetSystemWow64DirectoryW( app, MAX_PATH )) return 0;  /* not on 64-bit */
942     }
943     else GetSystemDirectoryW( app, MAX_PATH );
944
945     strcatW( app, rundll );
946
947     cmd_len = strlenW(app) * sizeof(WCHAR) + sizeof(setupapi) + sizeof(definstall) + sizeof(inf);
948     inf_len = MultiByteToWideChar( CP_UNIXCP, 0, inf_path, -1, NULL, 0 );
949
950     if (!(buffer = HeapAlloc( GetProcessHeap(), 0, cmd_len + inf_len * sizeof(WCHAR) ))) return 0;
951
952     strcpyW( buffer, app );
953     strcatW( buffer, setupapi );
954     strcatW( buffer, wow64 ? wowinstall : definstall );
955     strcatW( buffer, inf );
956     MultiByteToWideChar( CP_UNIXCP, 0, inf_path, -1, buffer + strlenW(buffer), inf_len );
957
958     if (CreateProcessW( app, buffer, NULL, NULL, FALSE, 0, NULL, NULL, &si, &pi ))
959         CloseHandle( pi.hThread );
960     else
961         pi.hProcess = 0;
962
963     HeapFree( GetProcessHeap(), 0, buffer );
964     return pi.hProcess;
965 }
966
967 /* execute rundll32 on the wine.inf file if necessary */
968 static void update_wineprefix( int force )
969 {
970     const char *config_dir = wine_get_config_dir();
971     char *inf_path = get_wine_inf_path();
972     int fd;
973     struct stat st;
974
975     if (!inf_path)
976     {
977         WINE_MESSAGE( "wine: failed to update %s, wine.inf not found\n", config_dir );
978         return;
979     }
980     if ((fd = open( inf_path, O_RDONLY )) == -1)
981     {
982         WINE_MESSAGE( "wine: failed to update %s with %s: %s\n",
983                       config_dir, inf_path, strerror(errno) );
984         goto done;
985     }
986     fstat( fd, &st );
987     close( fd );
988
989     if (update_timestamp( config_dir, st.st_mtime ) || force)
990     {
991         HANDLE process;
992         DWORD count = 0;
993
994         if ((process = start_rundll32( inf_path, FALSE )))
995         {
996             HWND hwnd = show_wait_window();
997             for (;;)
998             {
999                 MSG msg;
1000                 DWORD res = MsgWaitForMultipleObjects( 1, &process, FALSE, INFINITE, QS_ALLINPUT );
1001                 if (res == WAIT_OBJECT_0)
1002                 {
1003                     CloseHandle( process );
1004                     if (count++ || !(process = start_rundll32( inf_path, TRUE ))) break;
1005                 }
1006                 else while (PeekMessageW( &msg, 0, 0, 0, PM_REMOVE )) DispatchMessageW( &msg );
1007             }
1008             DestroyWindow( hwnd );
1009         }
1010         WINE_MESSAGE( "wine: configuration in '%s' has been updated.\n", config_dir );
1011     }
1012
1013 done:
1014     HeapFree( GetProcessHeap(), 0, inf_path );
1015 }
1016
1017 /* Process items in the StartUp group of the user's Programs under the Start Menu. Some installers put
1018  * shell links here to restart themselves after boot. */
1019 static BOOL ProcessStartupItems(void)
1020 {
1021     BOOL ret = FALSE;
1022     HRESULT hr;
1023     IMalloc *ppM = NULL;
1024     IShellFolder *psfDesktop = NULL, *psfStartup = NULL;
1025     LPITEMIDLIST pidlStartup = NULL, pidlItem;
1026     ULONG NumPIDLs;
1027     IEnumIDList *iEnumList = NULL;
1028     STRRET strret;
1029     WCHAR wszCommand[MAX_PATH];
1030
1031     WINE_TRACE("Processing items in the StartUp folder.\n");
1032
1033     hr = SHGetMalloc(&ppM);
1034     if (FAILED(hr))
1035     {
1036         WINE_ERR("Couldn't get IMalloc object.\n");
1037         goto done;
1038     }
1039
1040     hr = SHGetDesktopFolder(&psfDesktop);
1041     if (FAILED(hr))
1042     {
1043         WINE_ERR("Couldn't get desktop folder.\n");
1044         goto done;
1045     }
1046
1047     hr = SHGetSpecialFolderLocation(NULL, CSIDL_STARTUP, &pidlStartup);
1048     if (FAILED(hr))
1049     {
1050         WINE_TRACE("Couldn't get StartUp folder location.\n");
1051         goto done;
1052     }
1053
1054     hr = IShellFolder_BindToObject(psfDesktop, pidlStartup, NULL, &IID_IShellFolder, (LPVOID*)&psfStartup);
1055     if (FAILED(hr))
1056     {
1057         WINE_TRACE("Couldn't bind IShellFolder to StartUp folder.\n");
1058         goto done;
1059     }
1060
1061     hr = IShellFolder_EnumObjects(psfStartup, NULL, SHCONTF_NONFOLDERS | SHCONTF_INCLUDEHIDDEN, &iEnumList);
1062     if (FAILED(hr))
1063     {
1064         WINE_TRACE("Unable to enumerate StartUp objects.\n");
1065         goto done;
1066     }
1067
1068     while (IEnumIDList_Next(iEnumList, 1, &pidlItem, &NumPIDLs) == S_OK &&
1069            (NumPIDLs) == 1)
1070     {
1071         hr = IShellFolder_GetDisplayNameOf(psfStartup, pidlItem, SHGDN_FORPARSING, &strret);
1072         if (FAILED(hr))
1073             WINE_TRACE("Unable to get display name of enumeration item.\n");
1074         else
1075         {
1076             hr = StrRetToBufW(&strret, pidlItem, wszCommand, MAX_PATH);
1077             if (FAILED(hr))
1078                 WINE_TRACE("Unable to parse display name.\n");
1079             else
1080             {
1081                 HINSTANCE hinst;
1082
1083                 hinst = ShellExecuteW(NULL, NULL, wszCommand, NULL, NULL, SW_SHOWNORMAL);
1084                 if (PtrToUlong(hinst) <= 32)
1085                     WINE_WARN("Error %p executing command %s.\n", hinst, wine_dbgstr_w(wszCommand));
1086             }
1087         }
1088
1089         IMalloc_Free(ppM, pidlItem);
1090     }
1091
1092     /* Return success */
1093     ret = TRUE;
1094
1095 done:
1096     if (iEnumList) IEnumIDList_Release(iEnumList);
1097     if (psfStartup) IShellFolder_Release(psfStartup);
1098     if (pidlStartup) IMalloc_Free(ppM, pidlStartup);
1099
1100     return ret;
1101 }
1102
1103 static void usage(void)
1104 {
1105     WINE_MESSAGE( "Usage: wineboot [options]\n" );
1106     WINE_MESSAGE( "Options;\n" );
1107     WINE_MESSAGE( "    -h,--help         Display this help message\n" );
1108     WINE_MESSAGE( "    -e,--end-session  End the current session cleanly\n" );
1109     WINE_MESSAGE( "    -f,--force        Force exit for processes that don't exit cleanly\n" );
1110     WINE_MESSAGE( "    -i,--init         Perform initialization for first Wine instance\n" );
1111     WINE_MESSAGE( "    -k,--kill         Kill running processes without any cleanup\n" );
1112     WINE_MESSAGE( "    -r,--restart      Restart only, don't do normal startup operations\n" );
1113     WINE_MESSAGE( "    -s,--shutdown     Shutdown only, don't reboot\n" );
1114     WINE_MESSAGE( "    -u,--update       Update the wineprefix directory\n" );
1115 }
1116
1117 static const char short_options[] = "efhikrsu";
1118
1119 static const struct option long_options[] =
1120 {
1121     { "help",        0, 0, 'h' },
1122     { "end-session", 0, 0, 'e' },
1123     { "force",       0, 0, 'f' },
1124     { "init" ,       0, 0, 'i' },
1125     { "kill",        0, 0, 'k' },
1126     { "restart",     0, 0, 'r' },
1127     { "shutdown",    0, 0, 's' },
1128     { "update",      0, 0, 'u' },
1129     { NULL,          0, 0, 0 }
1130 };
1131
1132 int main( int argc, char *argv[] )
1133 {
1134     extern HANDLE CDECL __wine_make_process_system(void);
1135     static const WCHAR wineboot_eventW[] = {'_','_','w','i','n','e','b','o','o','t','_','e','v','e','n','t',0};
1136
1137     /* First, set the current directory to SystemRoot */
1138     int optc;
1139     int end_session = 0, force = 0, init = 0, kill = 0, restart = 0, shutdown = 0, update = 0;
1140     HANDLE event;
1141     SECURITY_ATTRIBUTES sa;
1142     BOOL is_wow64;
1143
1144     GetWindowsDirectoryW( windowsdir, MAX_PATH );
1145     if( !SetCurrentDirectoryW( windowsdir ) )
1146         WINE_ERR("Cannot set the dir to %s (%d)\n", wine_dbgstr_w(windowsdir), GetLastError() );
1147
1148     if (IsWow64Process( GetCurrentProcess(), &is_wow64 ) && is_wow64)
1149     {
1150         STARTUPINFOW si;
1151         PROCESS_INFORMATION pi;
1152         WCHAR filename[MAX_PATH];
1153         void *redir;
1154         DWORD exit_code;
1155
1156         memset( &si, 0, sizeof(si) );
1157         si.cb = sizeof(si);
1158         GetModuleFileNameW( 0, filename, MAX_PATH );
1159
1160         Wow64DisableWow64FsRedirection( &redir );
1161         if (CreateProcessW( filename, GetCommandLineW(), NULL, NULL, FALSE, 0, NULL, NULL, &si, &pi ))
1162         {
1163             WINE_TRACE( "restarting %s\n", wine_dbgstr_w(filename) );
1164             WaitForSingleObject( pi.hProcess, INFINITE );
1165             GetExitCodeProcess( pi.hProcess, &exit_code );
1166             ExitProcess( exit_code );
1167         }
1168         else WINE_ERR( "failed to restart 64-bit %s, err %d\n", wine_dbgstr_w(filename), GetLastError() );
1169         Wow64RevertWow64FsRedirection( redir );
1170     }
1171
1172     while ((optc = getopt_long(argc, argv, short_options, long_options, NULL )) != -1)
1173     {
1174         switch(optc)
1175         {
1176         case 'e': end_session = 1; break;
1177         case 'f': force = 1; break;
1178         case 'i': init = 1; break;
1179         case 'k': kill = 1; break;
1180         case 'r': restart = 1; break;
1181         case 's': shutdown = 1; break;
1182         case 'u': update = 1; break;
1183         case 'h': usage(); return 0;
1184         case '?': usage(); return 1;
1185         }
1186     }
1187
1188     if (end_session)
1189     {
1190         if (kill)
1191         {
1192             if (!shutdown_all_desktops( force )) return 1;
1193         }
1194         else if (!shutdown_close_windows( force )) return 1;
1195     }
1196
1197     if (kill) kill_processes( shutdown );
1198
1199     if (shutdown) return 0;
1200
1201     sa.nLength = sizeof(sa);
1202     sa.lpSecurityDescriptor = NULL;
1203     sa.bInheritHandle = TRUE;  /* so that services.exe inherits it */
1204     event = CreateEventW( &sa, TRUE, FALSE, wineboot_eventW );
1205
1206     ResetEvent( event );  /* in case this is a restart */
1207
1208     create_hardware_registry_keys();
1209     create_dynamic_registry_keys();
1210     create_environment_registry_keys();
1211     wininit();
1212     pendingRename();
1213
1214     ProcessWindowsFileProtection();
1215     ProcessRunKeys( HKEY_LOCAL_MACHINE, runkeys_names[RUNKEY_RUNSERVICESONCE], TRUE, FALSE );
1216
1217     if (init || (kill && !restart))
1218     {
1219         ProcessRunKeys( HKEY_LOCAL_MACHINE, runkeys_names[RUNKEY_RUNSERVICES], FALSE, FALSE );
1220         start_services_process();
1221     }
1222     if (init || update) update_wineprefix( update );
1223
1224     create_volatile_environment_registry_key();
1225
1226     ProcessRunKeys( HKEY_LOCAL_MACHINE, runkeys_names[RUNKEY_RUNONCE], TRUE, TRUE );
1227
1228     if (!init && !restart)
1229     {
1230         ProcessRunKeys( HKEY_LOCAL_MACHINE, runkeys_names[RUNKEY_RUN], FALSE, FALSE );
1231         ProcessRunKeys( HKEY_CURRENT_USER, runkeys_names[RUNKEY_RUN], FALSE, FALSE );
1232         ProcessStartupItems();
1233     }
1234
1235     WINE_TRACE("Operation done\n");
1236
1237     SetEvent( event );
1238     return 0;
1239 }