Update ooo320-m1
[ooovba.git] / setup_native / source / win32 / customactions / shellextensions / postuninstall.cxx
blobafffb6c02b02b355b94e85b896d5a31c88bc66c3
1 /*************************************************************************
3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4 *
5 * Copyright 2008 by Sun Microsystems, Inc.
7 * OpenOffice.org - a multi-platform office productivity suite
9 * $RCSfile: postuninstall.cxx,v $
10 * $Revision: 1.9 $
12 * This file is part of OpenOffice.org.
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.
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).
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.
29 ************************************************************************/
31 #define _WIN32_WINDOWS 0x0410
32 #ifdef _MSC_VER
33 #pragma warning(push, 1) /* disable warnings within system headers */
34 #endif
35 #define WIN32_LEAN_AND_MEAN
36 #include <windows.h>
37 #include <msiquery.h>
38 #ifdef _MSC_VER
39 #pragma warning(pop)
40 #endif
42 #include <malloc.h>
44 #ifdef UNICODE
45 #define _UNICODE
46 #define _tstring wstring
47 #else
48 #define _tstring string
49 #endif
50 #include <tchar.h>
51 #include <string>
53 #include <io.h>
55 static std::_tstring GetMsiProperty( MSIHANDLE handle, const std::_tstring& sProperty )
57 std::_tstring result;
58 TCHAR szDummy[1] = TEXT("");
59 DWORD nChars = 0;
61 if ( MsiGetProperty( handle, sProperty.c_str(), szDummy, &nChars ) == ERROR_MORE_DATA )
63 DWORD nBytes = ++nChars * sizeof(TCHAR);
64 LPTSTR buffer = reinterpret_cast<LPTSTR>(_alloca(nBytes));
65 ZeroMemory( buffer, nBytes );
66 MsiGetProperty(handle, sProperty.c_str(), buffer, &nChars);
67 result = buffer;
70 return result;
74 static BOOL ExecuteCommand( LPCTSTR lpCommand, BOOL bSync )
76 BOOL fSuccess = FALSE;
77 STARTUPINFO si;
78 PROCESS_INFORMATION pi;
80 ZeroMemory( &si, sizeof(si) );
81 si.cb = sizeof(si);
83 fSuccess = CreateProcess(
84 NULL,
85 (LPTSTR)lpCommand,
86 NULL,
87 NULL,
88 FALSE,
90 NULL,
91 NULL,
92 &si,
93 &pi
96 if ( fSuccess )
98 if ( bSync )
99 WaitForSingleObject( pi.hProcess, INFINITE );
101 CloseHandle( pi.hProcess );
102 CloseHandle( pi.hThread );
105 return fSuccess;
108 extern "C" UINT __stdcall ExecutePostUninstallScript( MSIHANDLE handle )
110 TCHAR szValue[8192];
111 DWORD nValueSize = sizeof(szValue);
112 HKEY hKey;
113 std::_tstring sInstDir;
115 std::_tstring sProductKey = GetMsiProperty( handle, TEXT("FINDPRODUCT") );
117 // MessageBox( NULL, sProductKey.c_str(), "Titel", MB_OK );
119 if ( ERROR_SUCCESS == RegOpenKey( HKEY_CURRENT_USER, sProductKey.c_str(), &hKey ) )
121 if ( ERROR_SUCCESS == RegQueryValueEx( hKey, TEXT("OFFICEINSTALLLOCATION"), NULL, NULL, (LPBYTE)szValue, &nValueSize ) )
123 sInstDir = szValue;
125 RegCloseKey( hKey );
127 else if ( ERROR_SUCCESS == RegOpenKey( HKEY_LOCAL_MACHINE, sProductKey.c_str(), &hKey ) )
129 if ( ERROR_SUCCESS == RegQueryValueEx( hKey, TEXT("OFFICEINSTALLLOCATION"), NULL, NULL, (LPBYTE)szValue, &nValueSize ) )
131 sInstDir = szValue;
133 RegCloseKey( hKey );
135 else
136 return ERROR_SUCCESS;
138 std::_tstring sInfFile = sInstDir + TEXT("program\\postuninstall.inf");
139 std::_tstring sCommand = _T("RUNDLL32.EXE ");
141 // MessageBox( NULL, sInfFile.c_str(), "Titel", MB_OK );
143 if ( (LONG)GetVersion() < 0 )
144 sCommand += _T("setupx.dll");
145 else
146 sCommand += _T("setupapi.dll");
148 sCommand += _T(",InstallHinfSection PostUninstall 132 ");
149 sCommand += sInfFile;
151 if ( 0 == _taccess( sInfFile.c_str(), 2 ) )
152 ExecuteCommand( sCommand.c_str(), TRUE );
154 DeleteFile( sInfFile.c_str() );
156 return ERROR_SUCCESS;