/************************************************************** * * 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 #include #ifdef _MSC_VER #pragma warning(pop) #endif #include #include #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( 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( 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( 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( 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; }