INTEGRATION: CWS nativefixer6 (1.1.2); FILE ADDED

2005/04/19 13:05:25 is 1.1.2.2: #121396# Custom Actions for Patch
2005/04/14 12:22:47 hro 1.1.2.1: #121396# Custum action for Patch installation/deinstallation

setup_native/source/win32/customactions/patch/swappatchfiles.cxx

+/*************************************************************************
+ *
+ *  $RCSfile: swappatchfiles.cxx,v $
+ *
+ *  $Revision: 1.2 $
+ *
+ *  last change: $Author: obo $ $Date: 2005-04-20 11:41:45 $
+ *
+ *  The Contents of this file are made available subject to the terms of
+ *  either of the following licenses
+ *
+ *         - GNU Lesser General Public License Version 2.1
+ *         - Sun Industry Standards Source License Version 1.1
+ *
+ *  Sun Microsystems Inc., October, 2000
+ *
+ *  GNU Lesser General Public License Version 2.1
+ *  =============================================
+ *  Copyright 2000 by Sun Microsystems, Inc.
+ *  901 San Antonio Road, Palo Alto, CA 94303, USA
+ *
+ *  This library is free software; you can redistribute it and/or
+ *  modify it under the terms of the GNU Lesser General Public
+ *  License version 2.1, as published by the Free Software Foundation.
+ *
+ *  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
+ *
+ *
+ *  Sun Industry Standards Source License Version 1.1
+ *  =================================================
+ *  The contents of this file are subject to the Sun Industry Standards
+ *  Source License Version 1.1 (the "License"); You may not use this file
+ *  except in compliance with the License. You may obtain a copy of the
+ *  License at http://www.openoffice.org/license.html.
+ *
+ *  Software provided under this License is provided on an "AS IS" basis,
+ *  WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING,
+ *  WITHOUT LIMITATION, WARRANTIES THAT THE SOFTWARE IS FREE OF DEFECTS,
+ *  MERCHANTABLE, FIT FOR A PARTICULAR PURPOSE, OR NON-INFRINGING.
+ *  See the License for the specific provisions governing your rights and
+ *  obligations concerning the Software.
+ *
+ *  The Initial Developer of the Original Code is: Sun Microsystems, Inc.
+ *
+ *  Copyright: 2000 by Sun Microsystems, Inc.
+ *
+ *  All Rights Reserved.
+ *
+ *  Contributor(s): _______________________________________
+ *
+ *
+ ************************************************************************/
+
+#define WIN32_LEAN_AND_MEAN
+#include <windows.h>
+#include <msiquery.h>
+#include <malloc.h>
+
+#ifdef UNICODE
+#define _UNICODE
+#define _tstring    wstring
+#else
+#define _tstring    string
+#endif
+#include <tchar.h>
+#include <string>
+#include <stdio.h>
+
+#ifdef _WIN32_WINNT
+#error YES
+#endif
+
+#include <systools/win32/uwinapi.h>
+
+static std::_tstring GetMsiProperty( MSIHANDLE handle, const std::_tstring& sProperty )
+{
+    std::_tstring   result;
+    TCHAR   szDummy[1] = TEXT("");
+    DWORD   nChars = 0;
+
+    if ( MsiGetProperty( handle, sProperty.c_str(), szDummy, &nChars ) == ERROR_MORE_DATA )
+    {
+        DWORD nBytes = ++nChars * sizeof(TCHAR);
+        LPTSTR buffer = reinterpret_cast<LPTSTR>(_alloca(nBytes));
+        ZeroMemory( buffer, nBytes );
+        MsiGetProperty(handle, sProperty.c_str(), buffer, &nChars);
+        result = buffer;
+    }
+
+    return  result;
+}
+
+static bool SwapFiles( const std::_tstring& sFileName1, const std::_tstring& sFileName2 )
+{
+    std::_tstring   sTempFileName = sFileName1 + TEXT(".tmp");
+
+    bool    fSuccess = MoveFileEx( sFileName1.c_str(), sTempFileName.c_str(), MOVEFILE_REPLACE_EXISTING  );
+
+    if ( fSuccess )
+    {
+        fSuccess = MoveFileEx( sFileName2.c_str(), sFileName1.c_str(), MOVEFILE_REPLACE_EXISTING );
+
+        if ( fSuccess )
+        {
+            fSuccess = MoveFileEx( sTempFileName.c_str(), sFileName2.c_str(), MOVEFILE_REPLACE_EXISTING );
+            if ( !fSuccess )
+                MoveFileEx( sFileName1.c_str(), sFileName2.c_str(), MOVEFILE_REPLACE_EXISTING );
+        }
+        else
+            MoveFileEx( sTempFileName.c_str(), sFileName1.c_str(), MOVEFILE_REPLACE_EXISTING  );
+    }
+
+    return fSuccess;
+}
+
+static std::_tstring strip( const std::_tstring& s, _TCHAR c )
+{
+    std::_tstring   result = s;
+
+    std::_tstring::size_type f;
+
+    do
+    {
+        f = result.find( c );
+        if ( f != std::_tstring::npos )
+            result.erase( f, 1 );
+    } while ( f != std::_tstring::npos );
+
+    return result;
+}
+
+extern "C" UINT __stdcall InstallPatchedFiles( MSIHANDLE handle )
+{
+    std::_tstring   sInstDir = GetMsiProperty( handle, TEXT("INSTALLLOCATION") );
+    std::_tstring   sProgramDir = sInstDir + TEXT("program\\");
+    std::_tstring   sPatchFile = sProgramDir + TEXT("patchlist.txt");
+
+    TCHAR   szKeyNames[32767];
+
+    // std::_tstring    mystr;
+    // mystr = "Patchfile: " + sPatchFile;
+    // MessageBox( NULL, mystr.c_str(), "Titel", MB_OK );
+
+    if ( GetPrivateProfileString( TEXT("SwapFiles"), NULL, TEXT(""), szKeyNames, elementsof(szKeyNames), sPatchFile.c_str() ) )
+    {
+        TCHAR   *pKeyName = szKeyNames;
+
+        while ( *pKeyName )
+        {
+            TCHAR   szValue[4096];
+
+            if ( GetPrivateProfileString( TEXT("SwapFiles"), pKeyName, TEXT(""), szValue, elementsof(szValue), sPatchFile.c_str() ) )
+            {
+                std::_tstring   sFileName1 = pKeyName;
+                std::_tstring   sFileName2 = szValue;
+
+                sFileName1 = strip( sFileName1, '\"' );
+                sFileName2 = strip( sFileName2, '\"' );
+
+                sFileName1 = sInstDir + sFileName1;
+                sFileName2 = sInstDir + sFileName2;
+
+                // mystr = "Convert: " + sFileName1 + " to " + sFileName2;
+                // MessageBox( NULL, mystr.c_str(), "Titel", MB_OK );
+
+                SwapFiles( sFileName1, sFileName2 );
+            }
+
+            pKeyName += _tcslen(pKeyName) + 1;
+        }
+    }
+
+    return ERROR_SUCCESS;
+}
+
+extern "C" UINT __stdcall UninstallPatchedFiles( MSIHANDLE handle )
+{
+    TCHAR   szValue[8192];
+    DWORD   nValueSize = sizeof(szValue);
+    HKEY    hKey;
+
+    std::_tstring   sInstDir;
+
+    std::_tstring   sProductKey = GetMsiProperty( handle, TEXT("FINDPRODUCT") );
+
+    if ( ERROR_SUCCESS == RegOpenKey( HKEY_CURRENT_USER,  sProductKey.c_str(), &hKey ) )
+    {
+        if ( ERROR_SUCCESS == RegQueryValueEx( hKey, TEXT("INSTALLLOCATION"), NULL, NULL, (LPBYTE)szValue, &nValueSize ) )
+        {
+            sInstDir = szValue;
+        }
+        RegCloseKey( hKey );
+    }
+    else if ( ERROR_SUCCESS == RegOpenKey( HKEY_LOCAL_MACHINE,  sProductKey.c_str(), &hKey ) )
+    {
+        if ( ERROR_SUCCESS == RegQueryValueEx( hKey, TEXT("INSTALLLOCATION"), NULL, NULL, (LPBYTE)szValue, &nValueSize ) )
+        {
+            sInstDir = szValue;
+        }
+        RegCloseKey( hKey );
+    }
+    else
+        return ERROR_SUCCESS;
+
+    std::_tstring   sProgramDir = sInstDir + TEXT("program\\");
+    std::_tstring   sPatchFile = sProgramDir + TEXT("patchlist.txt");
+
+    TCHAR   szKeyNames[32767];
+
+    // std::_tstring    mystr;
+    // mystr = "Patchfile: " + sPatchFile;
+    // MessageBox( NULL, mystr.c_str(), "Titel", MB_OK );
+
+    if ( GetPrivateProfileString( TEXT("SwapFiles"), NULL, TEXT(""), szKeyNames, elementsof(szKeyNames), sPatchFile.c_str() ) )
+    {
+        TCHAR   *pKeyName = szKeyNames;
+
+        while ( *pKeyName )
+        {
+            TCHAR   szValue[4096];
+
+            if ( GetPrivateProfileString( TEXT("SwapFiles"), pKeyName, TEXT(""), szValue, elementsof(szValue), sPatchFile.c_str() ) )
+            {
+                std::_tstring   sFileName1 = pKeyName;
+                std::_tstring   sFileName2 = szValue;
+
+                sFileName1 = strip( sFileName1, '\"' );
+                sFileName2 = strip( sFileName2, '\"' );
+
+                sFileName1 = sInstDir + sFileName1;
+                sFileName2 = sInstDir + sFileName2;
+
+                // mystr = "Convert: " + sFileName1 + " to " + sFileName2;
+                // MessageBox( NULL, mystr.c_str(), "Titel", MB_OK );
+
+                SwapFiles( sFileName1, sFileName2 );
+            }
+
+            pKeyName += _tcslen(pKeyName) + 1;
+        }
+    }
+
+    return ERROR_SUCCESS;
+}
+