setup_native/source/win32/customactions/languagepacks/checkrunningofficelanguagepack.cxx

   1 /*************************************************************************
   2  *
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * Copyright 2008 by Sun Microsystems, Inc.
   6  *
   7  * OpenOffice.org - a multi-platform office productivity suite
   8  *
   9  * $RCSfile: checkrunningofficelanguagepack.cxx,v $
  10  * $Revision: 1.1.4.2 $
  11  *
  12  * This file is part of OpenOffice.org.
  13  *
  14  * OpenOffice.org is free software: you can redistribute it and/or modify
  15  * it under the terms of the GNU Lesser General Public License version 3
  16  * only, as published by the Free Software Foundation.
  17  *
  18  * OpenOffice.org is distributed in the hope that it will be useful,
  19  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  20  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21  * GNU Lesser General Public License version 3 for more details
  22  * (a copy is included in the LICENSE file that accompanied this code).
  23  *
  24  * You should have received a copy of the GNU Lesser General Public License
  25  * version 3 along with OpenOffice.org.  If not, see
  26  * <http://www.openoffice.org/license.html>
  27  * for a copy of the LGPLv3 License.
  28  *
  29  ************************************************************************/
  30
  31 #define _WIN32_WINDOWS 0x0410
  32
  33 #ifdef _MSC_VER
  34 #pragma warning(push, 1) /* disable warnings within system headers */
  35 #endif
  36 #define WIN32_LEAN_AND_MEAN
  37 #include <windows.h>
  38 #include <msiquery.h>
  39 #ifdef _MSC_VER
  40 #pragma warning(pop)
  41 #endif
  42
  43 #include <malloc.h>
  44 #include <assert.h>
  45
  46 #ifdef UNICODE
  47 #define _UNICODE
  48 #define _tstring        wstring
  49 #else
  50 #define _tstring        string
  51 #endif
  52 #include <tchar.h>
  53 #include <string>
  54 #include <queue>
  55 #include <stdio.h>
  56
  57 #include <systools/win32/uwinapi.h>
  58 #include <../tools/seterror.hxx>
  59
  60 #define WININIT_FILENAME        "wininit.ini"
  61 #define RENAME_SECTION          "rename"
  62
  63 #ifdef DEBUG
  64 inline void OutputDebugStringFormat( LPCTSTR pFormat, ... )
  65 {
  66     _TCHAR      buffer[1024];
  67     va_list     args;
  68
  69     va_start( args, pFormat );
  70     _vsntprintf( buffer, elementsof(buffer), pFormat, args );
  71     OutputDebugString( buffer );
  72 }
  73 #else
  74 static inline void OutputDebugStringFormat( LPCTSTR, ... )
  75 {
  76 }
  77 #endif
  78
  79 static std::_tstring GetMsiProperty( MSIHANDLE handle, const std::_tstring& sProperty )
  80 {
  81     std::_tstring       result;
  82     TCHAR       szDummy[1] = TEXT("");
  83     DWORD       nChars = 0;
  84
  85     if ( MsiGetProperty( handle, sProperty.c_str(), szDummy, &nChars ) == ERROR_MORE_DATA )
  86     {
  87         DWORD nBytes = ++nChars * sizeof(TCHAR);
  88         LPTSTR buffer = reinterpret_cast<LPTSTR>(_alloca(nBytes));
  89         ZeroMemory( buffer, nBytes );
  90         MsiGetProperty(handle, sProperty.c_str(), buffer, &nChars);
  91         result = buffer;
  92     }
  93
  94     return      result;
  95 }
  96
  97 static inline bool IsSetMsiProperty(MSIHANDLE handle, const std::_tstring& sProperty)
  98 {
  99     std::_tstring value = GetMsiProperty(handle, sProperty);
 100     return (value.length() > 0);
 101 }
 102
 103 static inline void UnsetMsiProperty(MSIHANDLE handle, const std::_tstring& sProperty)
 104 {
 105     MsiSetProperty(handle, sProperty.c_str(), NULL);
 106 }
 107
 108 static inline void SetMsiProperty(MSIHANDLE handle, const std::_tstring& sProperty)
 109 {
 110     MsiSetProperty(handle, sProperty.c_str(), TEXT("1"));
 111 }
 112
 113 static BOOL MoveFileEx9x( LPCSTR lpExistingFileNameA, LPCSTR lpNewFileNameA, DWORD dwFlags )
 114 {
 115     BOOL        fSuccess = FALSE;       // assume failure
 116
 117     // Windows 9x has a special mechanism to move files after reboot
 118
 119     if ( dwFlags & MOVEFILE_DELAY_UNTIL_REBOOT )
 120     {
 121         CHAR    szExistingFileNameA[MAX_PATH];
 122         CHAR    szNewFileNameA[MAX_PATH] = "NUL";
 123
 124         // Path names in WININIT.INI must be in short path name form
 125
 126         if (
 127             GetShortPathNameA( lpExistingFileNameA, szExistingFileNameA, MAX_PATH ) &&
 128             (!lpNewFileNameA || GetShortPathNameA( lpNewFileNameA, szNewFileNameA, MAX_PATH ))
 129             )
 130         {
 131             CHAR        szBuffer[32767];        // The buffer size must not exceed 32K
 132             DWORD       dwBufLen = GetPrivateProfileSectionA( RENAME_SECTION, szBuffer, elementsof(szBuffer), WININIT_FILENAME );
 133
 134             CHAR        szRename[MAX_PATH];     // This is enough for at most to times 67 chracters
 135             strcpy( szRename, szNewFileNameA );
 136             strcat( szRename, "=" );
 137             strcat( szRename, szExistingFileNameA );
 138             size_t      lnRename = strlen(szRename);
 139
 140             if ( dwBufLen + lnRename + 2 <= elementsof(szBuffer) )
 141             {
 142                 CopyMemory( &szBuffer[dwBufLen], szRename, lnRename );
 143                 szBuffer[dwBufLen + lnRename ] = 0;
 144                 szBuffer[dwBufLen + lnRename + 1 ] = 0;
 145
 146                 fSuccess = WritePrivateProfileSectionA( RENAME_SECTION, szBuffer, WININIT_FILENAME );
 147             }
 148             else
 149                 SetLastError( ERROR_BUFFER_OVERFLOW );
 150         }
 151     }
 152     else
 153     {
 154
 155         fSuccess = MoveFileA( lpExistingFileNameA, lpNewFileNameA );
 156
 157         if ( !fSuccess && GetLastError() != ERROR_ACCESS_DENIED &&
 158             0 != (dwFlags & (MOVEFILE_COPY_ALLOWED | MOVEFILE_REPLACE_EXISTING)) )
 159         {
 160             BOOL        bFailIfExist = 0 == (dwFlags & MOVEFILE_REPLACE_EXISTING);
 161
 162             fSuccess = CopyFileA( lpExistingFileNameA, lpNewFileNameA, bFailIfExist );
 163
 164             if ( fSuccess )
 165                 fSuccess = DeleteFileA( lpExistingFileNameA );
 166         }
 167
 168     }
 169
 170     return fSuccess;
 171 }
 172
 173 static BOOL MoveFileExImpl( LPCSTR lpExistingFileNameA, LPCSTR lpNewFileNameA, DWORD dwFlags )
 174 {
 175     if ( 0 > ((LONG)GetVersion())) // High order bit indicates Win 9x
 176         return MoveFileEx9x( lpExistingFileNameA, lpNewFileNameA, dwFlags );
 177     else
 178         return MoveFileExA( lpExistingFileNameA, lpNewFileNameA, dwFlags );
 179 }
 180
 181 extern "C" UINT __stdcall IsOfficeRunning( MSIHANDLE handle )
 182 {
 183     std::_tstring       sInstDir = GetMsiProperty( handle, TEXT("BASISINSTALLLOCATION") );
 184     std::_tstring       sResourceDir = sInstDir + TEXT("program\\resource\\");
 185     std::_tstring       sPattern = sResourceDir + TEXT("vcl*.res");
 186
 187     WIN32_FIND_DATA     aFindFileData;
 188     HANDLE      hFind = FindFirstFile( sPattern.c_str(), &aFindFileData );
 189
 190     if ( IsValidHandle(hFind) )
 191     {
 192         BOOL    fSuccess = false;
 193         bool    fRenameSucceeded;
 194
 195         do
 196         {
 197             std::_tstring       sResourceFile = sResourceDir + aFindFileData.cFileName;
 198             std::_tstring       sIntermediate = sResourceFile + TEXT(".tmp");
 199
 200             fRenameSucceeded = MoveFileExImpl( sResourceFile.c_str(), sIntermediate.c_str(), MOVEFILE_REPLACE_EXISTING );
 201             if ( fRenameSucceeded )
 202             {
 203                 MoveFileExImpl( sIntermediate.c_str(), sResourceFile.c_str(), 0 );
 204                 fSuccess = FindNextFile( hFind, &aFindFileData );
 205             }
 206         } while ( fSuccess && fRenameSucceeded );
 207
 208         if ( !fRenameSucceeded )
 209         {
 210             MsiSetProperty(handle, TEXT("OFFICERUNS"), TEXT("1"));
 211             SetMsiErrorCode( MSI_ERROR_OFFICE_IS_RUNNING );
 212         }
 213
 214         FindClose( hFind );
 215     }
 216
 217     return ERROR_SUCCESS;
 218 }
 219
 220
 221