| /* |
| * Copyright (C) 2002 Andreas Mohr |
| * Copyright (C) 2002 Shachar Shemesh |
| * |
| * This library is free software; you can redistribute it and/or |
| * modify it under the terms of the GNU Lesser General Public |
| * License as published by the Free Software Foundation; either |
| * version 2.1 of the License, or (at your option) any later version. |
| * |
| * This library is distributed in the hope that it will be useful, |
| * but WITHOUT ANY WARRANTY; without even the implied warranty of |
| * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
| * Lesser General Public License for more details. |
| * |
| * You should have received a copy of the GNU Lesser General Public |
| * License along with this library; if not, write to the Free Software |
| * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
| */ |
| /* Wine "bootup" handler application |
| * |
| * This app handles the various "hooks" windows allows for applications to perform |
| * as part of the bootstrap process. Theses are roughly devided into three types. |
| * Knowledge base articles that explain this are 137367, 179365, 232487 and 232509. |
| * Also, 119941 has some info on grpconv.exe |
| * The operations performed are (by order of execution): |
| * |
| * Preboot (prior to fully loading the Windows kernel): |
| * - wininit.exe (rename operations left in wininit.ini - Win 9x only) |
| * - PendingRenameOperations (rename operations left in the registry - Win NT+ only) |
| * |
| * Startup (before the user logs in) |
| * - Services (NT, ?semi-synchronous?, not implemented yet) |
| * - HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\RunServicesOnce (9x, asynch) |
| * - HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\RunServices (9x, asynch) |
| * |
| * After log in |
| * - HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\RunOnce (all, synch) |
| * - HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run (all, asynch) |
| * - HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run (all, asynch) |
| * - Startup folders (all, ?asynch?, no imp) |
| * - HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\RunOnce (all, asynch) |
| * |
| * Somewhere in there is processing the RunOnceEx entries (also no imp) |
| * |
| * Bugs: |
| * - If a pending rename registry does not start with \??\ the entry is |
| * processed anyways. I'm not sure that is the Windows behaviour. |
| * - Need to check what is the windows behaviour when trying to delete files |
| * and directories that are read-only |
| * - In the pending rename registry processing - there are no traces of the files |
| * processed (requires translations from Unicode to Ansi). |
| */ |
| |
| #include <stdio.h> |
| #include <windows.h> |
| #include <wine/debug.h> |
| |
| WINE_DEFAULT_DEBUG_CHANNEL(wineboot); |
| |
| #define MAX_LINE_LENGTH (2*MAX_PATH+2) |
| |
| static BOOL GetLine( HANDLE hFile, char *buf, size_t buflen ) |
| { |
| unsigned int i=0; |
| DWORD r; |
| buf[0]='\0'; |
| |
| do |
| { |
| DWORD read; |
| if( !ReadFile( hFile, buf, 1, &read, NULL ) || read!=1 ) |
| { |
| return FALSE; |
| } |
| |
| } while( isspace( *buf ) ); |
| |
| while( buf[i]!='\n' && i<=buflen && |
| ReadFile( hFile, buf+i+1, 1, &r, NULL ) ) |
| { |
| ++i; |
| } |
| |
| |
| if( buf[i]!='\n' ) |
| { |
| return FALSE; |
| } |
| |
| if( i>0 && buf[i-1]=='\r' ) |
| --i; |
| |
| buf[i]='\0'; |
| |
| return TRUE; |
| } |
| |
| /* Performs the rename operations dictated in %SystemRoot%\Wininit.ini. |
| * Returns FALSE if there was an error, or otherwise if all is ok. |
| */ |
| static BOOL wininit() |
| { |
| const char * const RENAME_FILE="wininit.ini"; |
| const char * const RENAME_FILE_TO="wininit.bak"; |
| const char * const RENAME_FILE_SECTION="[rename]"; |
| char buffer[MAX_LINE_LENGTH]; |
| HANDLE hFile; |
| |
| |
| hFile=CreateFileA(RENAME_FILE, GENERIC_READ, |
| FILE_SHARE_READ, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, |
| NULL ); |
| |
| if( hFile==INVALID_HANDLE_VALUE ) |
| { |
| DWORD err=GetLastError(); |
| |
| if( err==ERROR_FILE_NOT_FOUND ) |
| { |
| /* No file - nothing to do. Great! */ |
| WINE_TRACE("Wininit.ini not present - no renaming to do\n"); |
| |
| return TRUE; |
| } |
| |
| WINE_ERR("There was an error in reading wininit.ini file - %ld\n", |
| GetLastError() ); |
| |
| return FALSE; |
| } |
| |
| printf("Wine is finalizing your software installation. This may take a few minutes,\n"); |
| printf("though it never actually does.\n"); |
| |
| while( GetLine( hFile, buffer, sizeof(buffer) ) && |
| lstrcmpiA(buffer,RENAME_FILE_SECTION)!=0 ) |
| ; /* Read the lines until we match the rename section */ |
| |
| while( GetLine( hFile, buffer, sizeof(buffer) ) && buffer[0]!='[' ) |
| { |
| /* First, make sure this is not a comment */ |
| if( buffer[0]!=';' && buffer[0]!='\0' ) |
| { |
| char * value; |
| |
| value=strchr(buffer, '='); |
| |
| if( value==NULL ) |
| { |
| WINE_WARN("Line with no \"=\" in it in wininit.ini - %s\n", |
| buffer); |
| } else |
| { |
| /* split the line into key and value */ |
| *(value++)='\0'; |
| |
| if( lstrcmpiA( "NUL", buffer )==0 ) |
| { |
| WINE_TRACE("Deleting file \"%s\"\n", value ); |
| /* A file to delete */ |
| if( !DeleteFileA( value ) ) |
| WINE_WARN("Error deleting file \"%s\"\n", value); |
| } else |
| { |
| WINE_TRACE("Renaming file \"%s\" to \"%s\"\n", value, |
| buffer ); |
| |
| if( !MoveFileExA(value, buffer, MOVEFILE_COPY_ALLOWED| |
| MOVEFILE_REPLACE_EXISTING) ) |
| { |
| WINE_WARN("Error renaming \"%s\" to \"%s\"\n", value, |
| buffer ); |
| } |
| } |
| } |
| } |
| } |
| |
| CloseHandle( hFile ); |
| |
| if( !MoveFileExA( RENAME_FILE, RENAME_FILE_TO, MOVEFILE_REPLACE_EXISTING) ) |
| { |
| WINE_ERR("Couldn't rename wininit.ini, error %ld\n", GetLastError() ); |
| |
| return FALSE; |
| } |
| |
| return TRUE; |
| } |
| |
| static BOOL pendingRename() |
| { |
| static const WCHAR ValueName[] = {'P','e','n','d','i','n','g', |
| 'F','i','l','e','R','e','n','a','m','e', |
| 'O','p','e','r','a','t','i','o','n','s',0}; |
| static const WCHAR SessionW[] = { 'S','y','s','t','e','m','\\', |
| 'C','u','r','r','e','n','t','C','o','n','t','r','o','l','S','e','t','\\', |
| 'C','o','n','t','r','o','l','\\', |
| 'S','e','s','s','i','o','n',' ','M','a','n','a','g','e','r',0}; |
| WCHAR *buffer=NULL; |
| const WCHAR *src=NULL, *dst=NULL; |
| DWORD dataLength=0; |
| HKEY hSession=NULL; |
| DWORD res; |
| |
| WINE_TRACE("Entered\n"); |
| |
| if( (res=RegOpenKeyExW( HKEY_LOCAL_MACHINE, SessionW, 0, KEY_ALL_ACCESS, &hSession )) |
| !=ERROR_SUCCESS ) |
| { |
| if( res==ERROR_FILE_NOT_FOUND ) |
| { |
| WINE_TRACE("The key was not found - skipping\n"); |
| res=TRUE; |
| } |
| else |
| { |
| WINE_ERR("Couldn't open key, error %ld\n", res ); |
| res=FALSE; |
| } |
| |
| goto end; |
| } |
| |
| res=RegQueryValueExW( hSession, ValueName, NULL, NULL /* The value type does not really interest us, as it is not |
| truly a REG_MULTI_SZ anyways */, |
| NULL, &dataLength ); |
| if( res==ERROR_FILE_NOT_FOUND ) |
| { |
| /* No value - nothing to do. Great! */ |
| WINE_TRACE("Value not present - nothing to rename\n"); |
| res=TRUE; |
| goto end; |
| } |
| |
| if( res!=ERROR_SUCCESS ) |
| { |
| WINE_ERR("Couldn't query value's length (%ld)\n", res ); |
| res=FALSE; |
| goto end; |
| } |
| |
| buffer=malloc( dataLength ); |
| if( buffer==NULL ) |
| { |
| WINE_ERR("Couldn't allocate %lu bytes for the value\n", dataLength ); |
| res=FALSE; |
| goto end; |
| } |
| |
| res=RegQueryValueExW( hSession, ValueName, NULL, NULL, (LPBYTE)buffer, &dataLength ); |
| if( res!=ERROR_SUCCESS ) |
| { |
| WINE_ERR("Couldn't query value after successfully querying before (%lu),\n" |
| "please report to wine-devel@winehq.org\n", res); |
| res=FALSE; |
| goto end; |
| } |
| |
| /* Make sure that the data is long enough and ends with two NULLs. This |
| * simplifies the code later on. |
| */ |
| if( dataLength<2*sizeof(buffer[0]) || |
| buffer[dataLength/sizeof(buffer[0])-1]!='\0' || |
| buffer[dataLength/sizeof(buffer[0])-2]!='\0' ) |
| { |
| WINE_ERR("Improper value format - doesn't end with NULL\n"); |
| res=FALSE; |
| goto end; |
| } |
| |
| for( src=buffer; (src-buffer)*sizeof(src[0])<dataLength && *src!='\0'; |
| src=dst+lstrlenW(dst)+1 ) |
| { |
| DWORD dwFlags=0; |
| |
| WINE_TRACE("processing next command\n"); |
| |
| dst=src+lstrlenW(src)+1; |
| |
| /* We need to skip the \??\ header */ |
| if( src[0]=='\\' && src[1]=='?' && src[2]=='?' && src[3]=='\\' ) |
| src+=4; |
| |
| if( dst[0]=='!' ) |
| { |
| dwFlags|=MOVEFILE_REPLACE_EXISTING; |
| dst++; |
| } |
| |
| if( dst[0]=='\\' && dst[1]=='?' && dst[2]=='?' && dst[3]=='\\' ) |
| dst+=4; |
| |
| if( *dst!='\0' ) |
| { |
| /* Rename the file */ |
| MoveFileExW( src, dst, dwFlags ); |
| } else |
| { |
| /* Delete the file or directory */ |
| if( (res=GetFileAttributesW(src))!=INVALID_FILE_ATTRIBUTES ) |
| { |
| if( (res&FILE_ATTRIBUTE_DIRECTORY)==0 ) |
| { |
| /* It's a file */ |
| DeleteFileW(src); |
| } else |
| { |
| /* It's a directory */ |
| RemoveDirectoryW(src); |
| } |
| } else |
| { |
| WINE_ERR("couldn't get file attributes (%ld)\n", GetLastError() ); |
| } |
| } |
| } |
| |
| if((res=RegDeleteValueW(hSession, ValueName))!=ERROR_SUCCESS ) |
| { |
| WINE_ERR("Error deleting the value (%lu)\n", GetLastError() ); |
| res=FALSE; |
| } else |
| res=TRUE; |
| |
| end: |
| if( buffer!=NULL ) |
| free(buffer); |
| |
| if( hSession!=NULL ) |
| RegCloseKey( hSession ); |
| |
| return res; |
| } |
| |
| enum runkeys { |
| RUNKEY_RUN, RUNKEY_RUNONCE, RUNKEY_RUNSERVICES, RUNKEY_RUNSERVICESONCE |
| }; |
| |
| const WCHAR runkeys_names[][30]= |
| { |
| {'R','u','n',0}, |
| {'R','u','n','O','n','c','e',0}, |
| {'R','u','n','S','e','r','v','i','c','e','s',0}, |
| {'R','u','n','S','e','r','v','i','c','e','s','O','n','c','e',0} |
| }; |
| |
| #define INVALID_RUNCMD_RETURN -1 |
| /* |
| * This function runs the specified command in the specified dir. |
| * [in,out] cmdline - the command line to run. The function may change the passed buffer. |
| * [in] dir - the dir to run the command in. If it is NULL, then the current dir is used. |
| * [in] wait - whether to wait for the run program to finish before returning. |
| * [in] minimized - Whether to ask the program to run minimized. |
| * |
| * Returns: |
| * If running the process failed, returns INVALID_RUNCMD_RETURN. Use GetLastError to get the error code. |
| * If wait is FALSE - returns 0 if successful. |
| * If wait is TRUE - returns the program's return value. |
| */ |
| static DWORD runCmd(LPWSTR cmdline, LPCWSTR dir, BOOL wait, BOOL minimized) |
| { |
| STARTUPINFOW si; |
| PROCESS_INFORMATION info; |
| DWORD exit_code=0; |
| |
| memset(&si, 0, sizeof(si)); |
| si.cb=sizeof(si); |
| if( minimized ) |
| { |
| si.dwFlags=STARTF_USESHOWWINDOW; |
| si.wShowWindow=SW_MINIMIZE; |
| } |
| memset(&info, 0, sizeof(info)); |
| |
| if( !CreateProcessW(NULL, cmdline, NULL, NULL, FALSE, 0, NULL, dir, &si, &info) ) |
| { |
| WINE_ERR("Failed to run command (%ld)\n", GetLastError() ); |
| |
| return INVALID_RUNCMD_RETURN; |
| } |
| |
| WINE_TRACE("Successfully ran command %s - Created process handle %p\n", |
| wine_dbgstr_w(cmdline), info.hProcess ); |
| |
| if(wait) |
| { /* wait for the process to exit */ |
| WaitForSingleObject(info.hProcess, INFINITE); |
| GetExitCodeProcess(info.hProcess, &exit_code); |
| } |
| |
| CloseHandle( info.hProcess ); |
| |
| return exit_code; |
| } |
| |
| /* |
| * Process a "Run" type registry key. |
| * hkRoot is the HKEY from which "Software\Microsoft\Windows\CurrentVersion" is |
| * opened. |
| * szKeyName is the key holding the actual entries. |
| * bDelete tells whether we should delete each value right before executing it. |
| * bSynchronous tells whether we should wait for the prog to complete before |
| * going on to the next prog. |
| */ |
| static BOOL ProcessRunKeys( HKEY hkRoot, LPCWSTR szKeyName, BOOL bDelete, |
| BOOL bSynchronous ) |
| { |
| static const WCHAR WINKEY_NAME[]={'S','o','f','t','w','a','r','e','\\', |
| 'M','i','c','r','o','s','o','f','t','\\','W','i','n','d','o','w','s','\\', |
| 'C','u','r','r','e','n','t','V','e','r','s','i','o','n',0}; |
| HKEY hkWin=NULL, hkRun=NULL; |
| DWORD res=ERROR_SUCCESS; |
| DWORD i, nMaxCmdLine=0, nMaxValue=0; |
| WCHAR *szCmdLine=NULL; |
| WCHAR *szValue=NULL; |
| |
| if (hkRoot==HKEY_LOCAL_MACHINE) |
| WINE_TRACE("processing %s entries under HKLM\n",wine_dbgstr_w(szKeyName) ); |
| else |
| WINE_TRACE("processing %s entries under HKCU\n",wine_dbgstr_w(szKeyName) ); |
| |
| if( (res=RegOpenKeyExW( hkRoot, WINKEY_NAME, 0, KEY_READ, &hkWin ))!=ERROR_SUCCESS ) |
| { |
| WINE_ERR("RegOpenKey failed on Software\\Microsoft\\Windows\\CurrentVersion (%ld)\n", |
| res); |
| |
| goto end; |
| } |
| |
| if( (res=RegOpenKeyExW( hkWin, szKeyName, 0, bDelete?KEY_ALL_ACCESS:KEY_READ, &hkRun ))!= |
| ERROR_SUCCESS) |
| { |
| if( res==ERROR_FILE_NOT_FOUND ) |
| { |
| WINE_TRACE("Key doesn't exist - nothing to be done\n"); |
| |
| res=ERROR_SUCCESS; |
| } |
| else |
| WINE_ERR("RegOpenKey failed on run key (%ld)\n", res); |
| |
| goto end; |
| } |
| |
| if( (res=RegQueryInfoKeyW( hkRun, NULL, NULL, NULL, NULL, NULL, NULL, &i, &nMaxValue, |
| &nMaxCmdLine, NULL, NULL ))!=ERROR_SUCCESS ) |
| { |
| WINE_ERR("Couldn't query key info (%ld)\n", res ); |
| |
| goto end; |
| } |
| |
| if( i==0 ) |
| { |
| WINE_TRACE("No commands to execute.\n"); |
| |
| res=ERROR_SUCCESS; |
| goto end; |
| } |
| |
| if( (szCmdLine=malloc(nMaxCmdLine))==NULL ) |
| { |
| WINE_ERR("Couldn't allocate memory for the commands to be executed\n"); |
| |
| res=ERROR_NOT_ENOUGH_MEMORY; |
| goto end; |
| } |
| |
| if( (szValue=malloc((++nMaxValue)*sizeof(*szValue)))==NULL ) |
| { |
| WINE_ERR("Couldn't allocate memory for the value names\n"); |
| |
| res=ERROR_NOT_ENOUGH_MEMORY; |
| goto end; |
| } |
| |
| while( i>0 ) |
| { |
| DWORD nValLength=nMaxValue, nDataLength=nMaxCmdLine; |
| DWORD type; |
| |
| --i; |
| |
| if( (res=RegEnumValueW( hkRun, i, szValue, &nValLength, 0, &type, |
| (LPBYTE)szCmdLine, &nDataLength ))!=ERROR_SUCCESS ) |
| { |
| WINE_ERR("Couldn't read in value %ld - %ld\n", i, res ); |
| |
| continue; |
| } |
| |
| if( bDelete && (res=RegDeleteValueW( hkRun, szValue ))!=ERROR_SUCCESS ) |
| { |
| WINE_ERR("Couldn't delete value - %ld, %ld. Running command anyways.\n", i, res ); |
| } |
| |
| if( type!=REG_SZ ) |
| { |
| WINE_ERR("Incorrect type of value #%ld (%ld)\n", i, type ); |
| |
| continue; |
| } |
| |
| if( (res=runCmd(szCmdLine, NULL, bSynchronous, FALSE ))==INVALID_RUNCMD_RETURN ) |
| { |
| WINE_ERR("Error running cmd #%ld (%ld)\n", i, GetLastError() ); |
| } |
| |
| WINE_TRACE("Done processing cmd #%ld\n", i); |
| } |
| |
| res=ERROR_SUCCESS; |
| |
| end: |
| if( hkRun!=NULL ) |
| RegCloseKey( hkRun ); |
| if( hkWin!=NULL ) |
| RegCloseKey( hkWin ); |
| |
| WINE_TRACE("done\n"); |
| |
| return res==ERROR_SUCCESS?TRUE:FALSE; |
| } |
| |
| struct op_mask { |
| BOOL w9xonly; /* Perform only operations done on Windows 9x */ |
| BOOL ntonly; /* Perform only operations done on Windows NT */ |
| BOOL startup; /* Perform the operations that are performed every boot */ |
| BOOL preboot; /* Perform file renames typically done before the system starts */ |
| BOOL prelogin; /* Perform the operations typically done before the user logs in */ |
| BOOL postlogin; /* Operations done after login */ |
| }; |
| |
| static const struct op_mask SESSION_START={FALSE, FALSE, TRUE, TRUE, TRUE, TRUE}, |
| SETUP={FALSE, FALSE, FALSE, TRUE, TRUE, TRUE}; |
| #define DEFAULT SESSION_START |
| |
| int main( int argc, char *argv[] ) |
| { |
| struct op_mask ops; /* Which of the ops do we want to perform? */ |
| /* First, set the current directory to SystemRoot */ |
| TCHAR gen_path[MAX_PATH]; |
| DWORD res; |
| |
| res=GetWindowsDirectory( gen_path, sizeof(gen_path) ); |
| |
| if( res==0 ) |
| { |
| WINE_ERR("Couldn't get the windows directory - error %ld\n", |
| GetLastError() ); |
| |
| return 100; |
| } |
| |
| if( res>=sizeof(gen_path) ) |
| { |
| WINE_ERR("Windows path too long (%ld)\n", res ); |
| |
| return 100; |
| } |
| |
| if( !SetCurrentDirectory( gen_path ) ) |
| { |
| WINE_ERR("Cannot set the dir to %s (%ld)\n", gen_path, GetLastError() ); |
| |
| return 100; |
| } |
| |
| if( argc>1 ) |
| { |
| switch( argv[1][0] ) |
| { |
| case 'r': /* Restart */ |
| ops=SETUP; |
| break; |
| case 's': /* Full start */ |
| ops=SESSION_START; |
| break; |
| default: |
| ops=DEFAULT; |
| break; |
| } |
| } else |
| ops=DEFAULT; |
| |
| /* Perform the ops by order, stopping if one fails, skipping if necessary */ |
| /* Shachar: Sorry for the perl syntax */ |
| res=(ops.ntonly || !ops.preboot || wininit())&& |
| (ops.w9xonly || !ops.preboot || pendingRename()) && |
| (ops.ntonly || !ops.prelogin || |
| ProcessRunKeys( HKEY_LOCAL_MACHINE, runkeys_names[RUNKEY_RUNSERVICESONCE], |
| TRUE, FALSE )) && |
| (ops.ntonly || !ops.prelogin || !ops.startup || |
| ProcessRunKeys( HKEY_LOCAL_MACHINE, runkeys_names[RUNKEY_RUNSERVICES], |
| FALSE, FALSE )) && |
| (!ops.postlogin || |
| ProcessRunKeys( HKEY_LOCAL_MACHINE, runkeys_names[RUNKEY_RUNONCE], |
| TRUE, TRUE )) && |
| (!ops.postlogin || !ops.startup || |
| ProcessRunKeys( HKEY_LOCAL_MACHINE, runkeys_names[RUNKEY_RUN], |
| FALSE, FALSE )) && |
| (!ops.postlogin || !ops.startup || |
| ProcessRunKeys( HKEY_CURRENT_USER, runkeys_names[RUNKEY_RUN], |
| FALSE, FALSE )); |
| |
| WINE_TRACE("Operation done\n"); |
| |
| return res?0:101; |
| } |
