1 /************************************************************************* 2 * 3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER. 4 * 5 * Copyright 2000, 2010 Oracle and/or its affiliates. 6 * 7 * OpenOffice.org - a multi-platform office productivity suite 8 * 9 * This file is part of OpenOffice.org. 10 * 11 * OpenOffice.org is free software: you can redistribute it and/or modify 12 * it under the terms of the GNU Lesser General Public License version 3 13 * only, as published by the Free Software Foundation. 14 * 15 * OpenOffice.org is distributed in the hope that it will be useful, 16 * but WITHOUT ANY WARRANTY; without even the implied warranty of 17 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 18 * GNU Lesser General Public License version 3 for more details 19 * (a copy is included in the LICENSE file that accompanied this code). 20 * 21 * You should have received a copy of the GNU Lesser General Public License 22 * version 3 along with OpenOffice.org. If not, see 23 * <http://www.openoffice.org/license.html> 24 * for a copy of the LGPLv3 License. 25 * 26 ************************************************************************/ 27 28 #include "macros.h" 29 30 #define WININIT_FILENAME "wininit.ini" 31 #define RENAME_SECTION "rename" 32 33 IMPLEMENT_THUNK( kernel32, WINDOWS, BOOL, WINAPI, MoveFileExA, ( LPCSTR lpExistingFileNameA, LPCSTR lpNewFileNameA, DWORD dwFlags ) ) 34 { 35 BOOL fSuccess = FALSE; // assume failure 36 37 // Windows 9x has a special mechanism to move files after reboot 38 39 if ( dwFlags & MOVEFILE_DELAY_UNTIL_REBOOT ) 40 { 41 CHAR szExistingFileNameA[MAX_PATH]; 42 CHAR szNewFileNameA[MAX_PATH] = "NUL"; 43 44 // Path names in WININIT.INI must be in short path name form 45 46 if ( 47 GetShortPathNameA( lpExistingFileNameA, szExistingFileNameA, MAX_PATH ) && 48 (!lpNewFileNameA || GetShortPathNameA( lpNewFileNameA, szNewFileNameA, MAX_PATH )) 49 ) 50 { 51 CHAR szBuffer[32767]; // The buffer size must not exceed 32K 52 DWORD dwBufLen = GetPrivateProfileSectionA( RENAME_SECTION, szBuffer, elementsof(szBuffer), WININIT_FILENAME ); 53 54 CHAR szRename[MAX_PATH]; // This is enough for at most to times 67 chracters 55 strcpy( szRename, szNewFileNameA ); 56 strcat( szRename, "=" ); 57 strcat( szRename, szExistingFileNameA ); 58 size_t lnRename = strlen(szRename); 59 60 if ( dwBufLen + lnRename + 2 <= elementsof(szBuffer) ) 61 { 62 CopyMemory( &szBuffer[dwBufLen], szRename, lnRename ); 63 szBuffer[dwBufLen + lnRename ] = 0; 64 szBuffer[dwBufLen + lnRename + 1 ] = 0; 65 66 fSuccess = WritePrivateProfileSectionA( RENAME_SECTION, szBuffer, WININIT_FILENAME ); 67 } 68 else 69 SetLastError( ERROR_BUFFER_OVERFLOW ); 70 } 71 } 72 else 73 { 74 75 fSuccess = MoveFileA( lpExistingFileNameA, lpNewFileNameA ); 76 77 if ( !fSuccess && 0 != (dwFlags & (MOVEFILE_COPY_ALLOWED | MOVEFILE_REPLACE_EXISTING)) ) 78 { 79 BOOL bFailIfExist = 0 == (dwFlags & MOVEFILE_REPLACE_EXISTING); 80 81 fSuccess = CopyFileA( lpExistingFileNameA, lpNewFileNameA, bFailIfExist ); 82 83 // In case of successfull copy do not return FALSE if delete fails. 84 // Error detection is done by GetLastError() 85 86 if ( fSuccess ) 87 { 88 SetLastError( NO_ERROR ); 89 DeleteFileA( lpExistingFileNameA ); 90 } 91 } 92 93 } 94 95 return fSuccess; 96 } 97 98