| /************************************************************** |
| * |
| * Licensed to the Apache Software Foundation (ASF) under one |
| * or more contributor license agreements. See the NOTICE file |
| * distributed with this work for additional information |
| * regarding copyright ownership. The ASF licenses this file |
| * to you under the Apache License, Version 2.0 (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.apache.org/licenses/LICENSE-2.0 |
| * |
| * Unless required by applicable law or agreed to in writing, |
| * software distributed under the License is distributed on an |
| * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY |
| * KIND, either express or implied. See the License for the |
| * specific language governing permissions and limitations |
| * under the License. |
| * |
| *************************************************************/ |
| |
| |
| |
| #define UNICODE |
| |
| #ifdef _MSC_VER |
| #pragma warning(push, 1) /* disable warnings within system headers */ |
| #endif |
| #include <windows.h> |
| #include <msiquery.h> |
| #ifdef _MSC_VER |
| #pragma warning(pop) |
| #endif |
| |
| #include <string.h> |
| #include <malloc.h> |
| |
| #define CHART_COMPONENT 1 |
| #define DRAW_COMPONENT 2 |
| #define IMPRESS_COMPONENT 4 |
| #define CALC_COMPONENT 8 |
| #define WRITER_COMPONENT 16 |
| #define MATH_COMPONENT 32 |
| |
| // #define OWN_DEBUG_PRINT |
| |
| typedef int ( __stdcall * DllNativeRegProc ) ( int, BOOL, BOOL, const char* ); |
| typedef int ( __stdcall * DllNativeUnregProc ) ( int, BOOL, BOOL ); |
| |
| BOOL UnicodeEquals( wchar_t* pStr1, wchar_t* pStr2 ) |
| { |
| if ( pStr1 == NULL && pStr2 == NULL ) |
| return TRUE; |
| else if ( pStr1 == NULL || pStr2 == NULL ) |
| return FALSE; |
| |
| while( *pStr1 == *pStr2 && *pStr1 && *pStr2 ) |
| pStr1++, pStr2++; |
| |
| return ( *pStr1 == 0 && *pStr2 == 0 ); |
| } |
| |
| //---------------------------------------------------------- |
| char* UnicodeToAnsiString( wchar_t* pUniString ) |
| { |
| int len = WideCharToMultiByte( |
| CP_ACP, 0, pUniString, -1, 0, 0, 0, 0 ); |
| |
| char* buff = reinterpret_cast<char*>( malloc( len ) ); |
| |
| WideCharToMultiByte( |
| CP_ACP, 0, pUniString, -1, buff, len, 0, 0 ); |
| |
| return buff; |
| } |
| |
| #ifdef OWN_DEBUG_PRINT |
| void WarningMessageInt( wchar_t* pWarning, unsigned int nValue ) |
| { |
| wchar_t pStr[5] = { nValue%10000/1000 + 48, nValue%1000/100 + 48, nValue%100/10 + 48, nValue%10 + 48, 0 }; |
| MessageBox(NULL, pStr, pWarning, MB_OK | MB_ICONINFORMATION); |
| } |
| #endif |
| |
| //---------------------------------------------------------- |
| void RegisterActiveXNative( const char* pActiveXPath, int nMode, BOOL InstallForAllUser, BOOL InstallFor64Bit ) |
| { |
| #ifdef OWN_DEBUG_PRINT |
| MessageBoxW(NULL, L"RegisterActiveXNative", L"Information", MB_OK | MB_ICONINFORMATION); |
| MessageBoxA(NULL, pActiveXPath, "Library Path", MB_OK | MB_ICONINFORMATION); |
| #endif |
| |
| // For Win98/WinME the values should be written to the local machine |
| OSVERSIONINFO aVerInfo; |
| aVerInfo.dwOSVersionInfoSize = sizeof( aVerInfo ); |
| if ( GetVersionEx( &aVerInfo ) && aVerInfo.dwPlatformId != VER_PLATFORM_WIN32_NT ) |
| InstallForAllUser = TRUE; |
| |
| HINSTANCE hModule = LoadLibraryExA( pActiveXPath, NULL, LOAD_WITH_ALTERED_SEARCH_PATH ); |
| if( !( hModule <= ( HINSTANCE )HINSTANCE_ERROR ) ) |
| { |
| DllNativeRegProc pNativeProc = ( DllNativeRegProc )GetProcAddress( hModule, "DllRegisterServerNative" ); |
| if( pNativeProc!=NULL ) |
| { |
| #ifdef OWN_DEBUG_PRINT |
| MessageBoxA(NULL, pActiveXPath, "Library Path", MB_OK | MB_ICONINFORMATION); |
| #endif |
| int nLen = strlen( pActiveXPath ); |
| int nRemoveLen = strlen( "\\so_activex.dll" ); |
| if ( nLen > nRemoveLen ) |
| { |
| char* pProgramPath = reinterpret_cast<char*>( malloc( nLen - nRemoveLen + 1 ) ); |
| strncpy( pProgramPath, pActiveXPath, nLen - nRemoveLen ); |
| pProgramPath[ nLen - nRemoveLen ] = 0; |
| |
| ( *pNativeProc )( nMode, InstallForAllUser, InstallFor64Bit, pProgramPath ); |
| |
| free( pProgramPath ); |
| } |
| } |
| |
| FreeLibrary( hModule ); |
| } |
| } |
| |
| //---------------------------------------------------------- |
| void UnregisterActiveXNative( const char* pActiveXPath, int nMode, BOOL InstallForAllUser, BOOL InstallFor64Bit ) |
| { |
| // For Win98/WinME the values should be written to the local machine |
| OSVERSIONINFO aVerInfo; |
| aVerInfo.dwOSVersionInfoSize = sizeof( aVerInfo ); |
| if ( GetVersionEx( &aVerInfo ) && aVerInfo.dwPlatformId != VER_PLATFORM_WIN32_NT ) |
| InstallForAllUser = TRUE; |
| |
| HINSTANCE hModule = LoadLibraryExA( pActiveXPath, NULL, LOAD_WITH_ALTERED_SEARCH_PATH ); |
| if( !( hModule <= ( HINSTANCE )HINSTANCE_ERROR ) ) |
| { |
| DllNativeUnregProc pNativeProc = ( DllNativeUnregProc )GetProcAddress( hModule, "DllUnregisterServerNative" ); |
| if( pNativeProc!=NULL ) |
| ( *pNativeProc )( nMode, InstallForAllUser, InstallFor64Bit ); |
| |
| FreeLibrary( hModule ); |
| } |
| } |
| |
| //---------------------------------------------------------- |
| BOOL GetMsiProp( MSIHANDLE hMSI, const wchar_t* pPropName, wchar_t** ppValue ) |
| { |
| DWORD sz = 0; |
| if ( MsiGetProperty( hMSI, pPropName, L"", &sz ) == ERROR_MORE_DATA ) |
| { |
| sz++; |
| DWORD nbytes = sz * sizeof( wchar_t ); |
| wchar_t* buff = reinterpret_cast<wchar_t*>( malloc( nbytes ) ); |
| ZeroMemory( buff, nbytes ); |
| MsiGetProperty( hMSI, pPropName, buff, &sz ); |
| *ppValue = buff; |
| |
| return TRUE; |
| } |
| |
| return FALSE; |
| } |
| |
| //---------------------------------------------------------- |
| BOOL GetActiveXControlPath( MSIHANDLE hMSI, char** ppActiveXPath ) |
| { |
| wchar_t* pProgPath = NULL; |
| if ( GetMsiProp( hMSI, L"INSTALLLOCATION", &pProgPath ) && pProgPath ) |
| { |
| char* pCharProgPath = UnicodeToAnsiString( pProgPath ); |
| #ifdef OWN_DEBUG_PRINT |
| MessageBox(NULL, pProgPath, L"Basis Installation Path", MB_OK | MB_ICONINFORMATION); |
| MessageBoxA(NULL, pCharProgPath, "Basis Installation Path( char )", MB_OK | MB_ICONINFORMATION); |
| #endif |
| |
| if ( pCharProgPath ) |
| { |
| int nLen = strlen( pCharProgPath ); |
| *ppActiveXPath = reinterpret_cast<char*>( malloc( nLen + 23 ) ); |
| strncpy( *ppActiveXPath, pCharProgPath, nLen ); |
| strncpy( (*ppActiveXPath) + nLen, "program\\so_activex.dll", 22 ); |
| (*ppActiveXPath)[nLen+22] = 0; |
| |
| free( pCharProgPath ); |
| |
| return TRUE; |
| } |
| |
| free( pProgPath ); |
| } |
| |
| return FALSE; |
| } |
| |
| //---------------------------------------------------------- |
| BOOL GetDelta( MSIHANDLE hMSI, int& nOldInstallMode, int& nInstallMode, int& nDeinstallMode ) |
| { |
| // for now the chart is always installed |
| nOldInstallMode = CHART_COMPONENT; |
| nInstallMode = CHART_COMPONENT; |
| nDeinstallMode = 0; |
| |
| INSTALLSTATE current_state; |
| INSTALLSTATE future_state; |
| |
| if ( ERROR_SUCCESS == MsiGetFeatureState( hMSI, L"gm_p_Wrt_Bin", ¤t_state, &future_state ) ) |
| { |
| #ifdef OWN_DEBUG_PRINT |
| WarningMessageInt( L"writer current_state = ", current_state ); |
| WarningMessageInt( L"writer future_state = ", future_state ); |
| #endif |
| |
| // analyze writer installation mode |
| if ( current_state == INSTALLSTATE_LOCAL ) |
| nOldInstallMode |= WRITER_COMPONENT; |
| |
| if ( future_state == INSTALLSTATE_LOCAL |
| || ( current_state == INSTALLSTATE_LOCAL && future_state == INSTALLSTATE_UNKNOWN ) ) |
| nInstallMode |= WRITER_COMPONENT; |
| else if ( current_state == INSTALLSTATE_LOCAL && future_state == INSTALLSTATE_ABSENT ) |
| nDeinstallMode |= WRITER_COMPONENT; |
| } |
| else |
| { |
| // assert( FALSE ); |
| } |
| |
| if ( ERROR_SUCCESS == MsiGetFeatureState( hMSI, L"gm_p_Calc_Bin", ¤t_state, &future_state ) ) |
| { |
| #ifdef OWN_DEBUG_PRINT |
| WarningMessageInt( L"calc current_state = ", current_state ); |
| WarningMessageInt( L"calc future_state = ", future_state ); |
| #endif |
| |
| // analyze calc installation mode |
| if ( current_state == INSTALLSTATE_LOCAL ) |
| nOldInstallMode |= CALC_COMPONENT; |
| |
| if ( future_state == INSTALLSTATE_LOCAL |
| || ( current_state == INSTALLSTATE_LOCAL && future_state == INSTALLSTATE_UNKNOWN ) ) |
| nInstallMode |= CALC_COMPONENT; |
| else if ( current_state == INSTALLSTATE_LOCAL && future_state == INSTALLSTATE_ABSENT ) |
| nDeinstallMode |= CALC_COMPONENT; |
| } |
| else |
| { |
| // assert( FALSE ); |
| } |
| |
| if ( ERROR_SUCCESS == MsiGetFeatureState( hMSI, L"gm_p_Draw_Bin", ¤t_state, &future_state ) ) |
| { |
| // analyze draw installation mode |
| if ( current_state == INSTALLSTATE_LOCAL ) |
| nOldInstallMode |= DRAW_COMPONENT; |
| |
| if ( future_state == INSTALLSTATE_LOCAL |
| || ( current_state == INSTALLSTATE_LOCAL && future_state == INSTALLSTATE_UNKNOWN ) ) |
| nInstallMode |= DRAW_COMPONENT; |
| else if ( current_state == INSTALLSTATE_LOCAL && future_state == INSTALLSTATE_ABSENT ) |
| nDeinstallMode |= DRAW_COMPONENT; |
| } |
| else |
| { |
| // assert( FALSE ); |
| } |
| |
| if ( ERROR_SUCCESS == MsiGetFeatureState( hMSI, L"gm_p_Impress_Bin", ¤t_state, &future_state ) ) |
| { |
| // analyze impress installation mode |
| if ( current_state == INSTALLSTATE_LOCAL ) |
| nOldInstallMode |= IMPRESS_COMPONENT; |
| |
| if ( future_state == INSTALLSTATE_LOCAL |
| || ( current_state == INSTALLSTATE_LOCAL && future_state == INSTALLSTATE_UNKNOWN ) ) |
| nInstallMode |= IMPRESS_COMPONENT; |
| else if ( current_state == INSTALLSTATE_LOCAL && future_state == INSTALLSTATE_ABSENT ) |
| nDeinstallMode |= IMPRESS_COMPONENT; |
| } |
| else |
| { |
| // assert( FALSE ); |
| } |
| |
| if ( ERROR_SUCCESS == MsiGetFeatureState( hMSI, L"gm_p_Math_Bin", ¤t_state, &future_state ) ) |
| { |
| // analyze math installation mode |
| if ( current_state == INSTALLSTATE_LOCAL ) |
| nOldInstallMode |= MATH_COMPONENT; |
| |
| if ( future_state == INSTALLSTATE_LOCAL |
| || ( current_state == INSTALLSTATE_LOCAL && future_state == INSTALLSTATE_UNKNOWN ) ) |
| nInstallMode |= MATH_COMPONENT; |
| else if ( current_state == INSTALLSTATE_LOCAL && future_state == INSTALLSTATE_ABSENT ) |
| nDeinstallMode |= MATH_COMPONENT; |
| } |
| else |
| { |
| // assert( FALSE ); |
| } |
| |
| return TRUE; |
| } |
| |
| //---------------------------------------------------------- |
| BOOL MakeInstallForAllUsers( MSIHANDLE hMSI ) |
| { |
| BOOL bResult = FALSE; |
| wchar_t* pVal = NULL; |
| if ( GetMsiProp( hMSI, L"ALLUSERS", &pVal ) && pVal ) |
| { |
| bResult = UnicodeEquals( pVal , L"1" ); |
| free( pVal ); |
| } |
| |
| return bResult; |
| } |
| |
| //---------------------------------------------------------- |
| BOOL MakeInstallFor64Bit( MSIHANDLE hMSI ) |
| { |
| BOOL bResult = FALSE; |
| wchar_t* pVal = NULL; |
| if ( GetMsiProp( hMSI, L"VersionNT64", &pVal ) && pVal ) |
| { |
| bResult = TRUE; |
| free( pVal ); |
| } |
| |
| return bResult; |
| } |
| //---------------------------------------------------------- |
| extern "C" UINT __stdcall InstallActiveXControl( MSIHANDLE hMSI ) |
| { |
| int nOldInstallMode = 0; |
| int nInstallMode = 0; |
| int nDeinstallMode = 0; |
| |
| #ifdef OWN_DEBUG_PRINT |
| MessageBox(NULL, L"InstallActiveXControl", L"Information", MB_OK | MB_ICONINFORMATION); |
| #endif |
| |
| INSTALLSTATE current_state; |
| INSTALLSTATE future_state; |
| |
| if ( ERROR_SUCCESS == MsiGetFeatureState( hMSI, L"gm_o_Activexcontrol", ¤t_state, &future_state ) ) |
| { |
| #ifdef OWN_DEBUG_PRINT |
| MessageBox(NULL, L"InstallActiveXControl Step2", L"Information", MB_OK | MB_ICONINFORMATION); |
| #endif |
| |
| BOOL bInstallForAllUser = MakeInstallForAllUsers( hMSI ); |
| BOOL bInstallFor64Bit = MakeInstallFor64Bit( hMSI ); |
| |
| char* pActiveXPath = NULL; |
| if ( GetActiveXControlPath( hMSI, &pActiveXPath ) && pActiveXPath |
| && GetDelta( hMSI, nOldInstallMode, nInstallMode, nDeinstallMode ) ) |
| { |
| #ifdef OWN_DEBUG_PRINT |
| MessageBox(NULL, L"InstallActiveXControl Step3", L"Information", MB_OK | MB_ICONINFORMATION); |
| #endif |
| |
| if ( future_state == INSTALLSTATE_LOCAL |
| || ( current_state == INSTALLSTATE_LOCAL && future_state == INSTALLSTATE_UNKNOWN ) ) |
| { |
| #ifdef OWN_DEBUG_PRINT |
| MessageBox(NULL, L"InstallActiveXControl, adjusting", L"Information", MB_OK | MB_ICONINFORMATION); |
| WarningMessageInt( L"nInstallMode = ", nInstallMode ); |
| #endif |
| // the control is installed in the new selected configuration |
| |
| if ( current_state == INSTALLSTATE_LOCAL && nDeinstallMode ) |
| UnregisterActiveXNative( pActiveXPath, nDeinstallMode, bInstallForAllUser, bInstallFor64Bit ); |
| |
| if ( nInstallMode ) |
| RegisterActiveXNative( pActiveXPath, nInstallMode, bInstallForAllUser, bInstallFor64Bit ); |
| } |
| else if ( current_state == INSTALLSTATE_LOCAL && future_state == INSTALLSTATE_ABSENT ) |
| { |
| #ifdef OWN_DEBUG_PRINT |
| MessageBox(NULL, L"InstallActiveXControl, removing", L"Information", MB_OK | MB_ICONINFORMATION); |
| #endif |
| if ( nOldInstallMode ) |
| UnregisterActiveXNative( pActiveXPath, nOldInstallMode, bInstallForAllUser, bInstallFor64Bit ); |
| } |
| } |
| |
| if ( pActiveXPath ) |
| free( pActiveXPath ); |
| } |
| else |
| { |
| // assert( FALSE ); |
| } |
| |
| return ERROR_SUCCESS; |
| } |
| |
| //---------------------------------------------------------- |
| extern "C" UINT __stdcall DeinstallActiveXControl( MSIHANDLE hMSI ) |
| { |
| INSTALLSTATE current_state; |
| INSTALLSTATE future_state; |
| |
| #ifdef OWN_DEBUG_PRINT |
| MessageBox(NULL, L"DeinstallActiveXControl", L"Information", MB_OK | MB_ICONINFORMATION); |
| #endif |
| |
| if ( ERROR_SUCCESS == MsiGetFeatureState( hMSI, L"gm_o_Activexcontrol", ¤t_state, &future_state ) ) |
| { |
| char* pActiveXPath = NULL; |
| if ( current_state == INSTALLSTATE_LOCAL && GetActiveXControlPath( hMSI, &pActiveXPath ) && pActiveXPath ) |
| { |
| BOOL bInstallForAllUser = MakeInstallForAllUsers( hMSI ); |
| BOOL bInstallFor64Bit = MakeInstallFor64Bit( hMSI ); |
| |
| { |
| UnregisterActiveXNative( pActiveXPath, |
| CHART_COMPONENT |
| | DRAW_COMPONENT |
| | IMPRESS_COMPONENT |
| | CALC_COMPONENT |
| | WRITER_COMPONENT |
| | MATH_COMPONENT, |
| bInstallForAllUser, |
| bInstallFor64Bit ); |
| } |
| |
| free( pActiveXPath ); |
| } |
| } |
| |
| return ERROR_SUCCESS; |
| } |