setup_native/source/win32/customactions/tools/checkversion.cxx

   1 /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
   2 /*************************************************************************
   3  *
   4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   5  *
   6  * Copyright 2000, 2010 Oracle and/or its affiliates.
   7  *
   8  * OpenOffice.org - a multi-platform office productivity suite
   9  *
  10  * This file is part of OpenOffice.org.
  11  *
  12  * OpenOffice.org is free software: you can redistribute it and/or modify
  13  * it under the terms of the GNU Lesser General Public License version 3
  14  * only, as published by the Free Software Foundation.
  15  *
  16  * OpenOffice.org is distributed in the hope that it will be useful,
  17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  19  * GNU Lesser General Public License version 3 for more details
  20  * (a copy is included in the LICENSE file that accompanied this code).
  21  *
  22  * You should have received a copy of the GNU Lesser General Public License
  23  * version 3 along with OpenOffice.org.  If not, see
  24  * <http://www.openoffice.org/license.html>
  25  * for a copy of the LGPLv3 License.
  26  *
  27  ************************************************************************/
  28
  29 #define UNICODE
  30
  31 #ifdef _MSC_VER
  32 #pragma warning(push,1) // disable warnings within system headers
  33 #endif
  34 #include <windows.h>
  35 #include <msiquery.h>
  36 #ifdef _MSC_VER
  37 #pragma warning(pop)
  38 #endif
  39
  40 #include <string.h>
  41 #include <malloc.h>
  42 #include <stdio.h>
  43 #include "strsafe.h"
  44
  45 #include <seterror.hxx>
  46
  47 //----------------------------------------------------------
  48 BOOL GetMsiProp( MSIHANDLE hMSI, const wchar_t* pPropName, wchar_t** ppValue )
  49 {
  50     DWORD sz = 0;
  51        if ( MsiGetProperty( hMSI, pPropName, L"", &sz ) == ERROR_MORE_DATA )
  52        {
  53            sz++;
  54            DWORD nbytes = sz * sizeof( wchar_t );
  55            wchar_t* buff = reinterpret_cast<wchar_t*>( malloc( nbytes ) );
  56            ZeroMemory( buff, nbytes );
  57            MsiGetProperty( hMSI, pPropName, buff, &sz );
  58            *ppValue = buff;
  59
  60         return TRUE;
  61     }
  62
  63     return FALSE;
  64 }
  65
  66 //----------------------------------------------------------
  67 #ifdef DEBUG
  68 inline void OutputDebugStringFormat( LPCTSTR pFormat, ... )
  69 {
  70     TCHAR    buffer[1024];
  71     va_list  args;
  72
  73     va_start( args, pFormat );
  74     StringCchVPrintf( buffer, sizeof(buffer), pFormat, args );
  75     OutputDebugString( buffer );
  76 }
  77 #else
  78 static inline void OutputDebugStringFormat( LPCTSTR, ... )
  79 {
  80 }
  81 #endif
  82
  83 //----------------------------------------------------------
  84 extern "C" UINT __stdcall CheckVersions( MSIHANDLE hMSI )
  85 {
  86     // MessageBox(NULL, L"CheckVersions", L"Information", MB_OK | MB_ICONINFORMATION);
  87
  88     wchar_t* pVal = NULL;
  89
  90     if ( GetMsiProp( hMSI, L"NEWPRODUCTS", &pVal ) && pVal )
  91     {
  92         OutputDebugStringFormat( TEXT("DEBUG: NEWPRODUCTS found [%s]"), pVal );
  93         if ( *pVal != 0 )
  94             SetMsiErrorCode( MSI_ERROR_NEW_VERSION_FOUND );
  95         free( pVal );
  96     }
  97     pVal = NULL;
  98     if ( GetMsiProp( hMSI, L"SAMEPRODUCTS", &pVal ) && pVal )
  99     {
 100         OutputDebugStringFormat( TEXT("DEBUG: SAMEPRODUCTS found [%s]"), pVal );
 101         if ( *pVal != 0 )
 102             SetMsiErrorCode( MSI_ERROR_SAME_VERSION_FOUND );
 103         free( pVal );
 104     }
 105     pVal = NULL;
 106     if ( GetMsiProp( hMSI, L"OLDPRODUCTS", &pVal ) && pVal )
 107     {
 108         OutputDebugStringFormat( TEXT("DEBUG: OLDPRODUCTS found [%s]"), pVal );
 109         if ( *pVal != 0 )
 110             SetMsiErrorCode( MSI_ERROR_OLD_VERSION_FOUND );
 111         free( pVal );
 112     }
 113     pVal = NULL;
 114     if ( GetMsiProp( hMSI, L"BETAPRODUCTS", &pVal ) && pVal )
 115     {
 116         OutputDebugStringFormat( TEXT("DEBUG: BETAPRODUCTS found [%s]"), pVal );
 117         if ( *pVal != 0 )
 118             SetMsiErrorCode( MSI_ERROR_OLD_VERSION_FOUND );
 119         free( pVal );
 120     }
 121
 122     pVal = NULL;
 123     if ( GetMsiProp( hMSI, L"NEWPRODUCTSPATCH", &pVal ) && pVal )
 124     {
 125         OutputDebugStringFormat( TEXT("DEBUG: NEWPRODUCTSPATCH found [%s]"), pVal );
 126         if ( *pVal != 0 )
 127             SetMsiErrorCode( MSI_ERROR_NEW_PATCH_FOUND );
 128         free( pVal );
 129     }
 130     pVal = NULL;
 131     if ( GetMsiProp( hMSI, L"SAMEPRODUCTSPATCH", &pVal ) && pVal )
 132     {
 133         OutputDebugStringFormat( TEXT("DEBUG: SAMEPRODUCTSPATCH found [%s]"), pVal );
 134         if ( *pVal != 0 )
 135             SetMsiErrorCode( MSI_ERROR_SAME_PATCH_FOUND );
 136         free( pVal );
 137     }
 138     pVal = NULL;
 139     if ( GetMsiProp( hMSI, L"OLDPRODUCTSPATCH", &pVal ) && pVal )
 140     {
 141         OutputDebugStringFormat( TEXT("DEBUG: OLDPRODUCTSPATCH found [%s]"), pVal );
 142         if ( *pVal != 0 )
 143             SetMsiErrorCode( MSI_ERROR_OLD_PATCH_FOUND );
 144         free( pVal );
 145     }
 146
 147     return ERROR_SUCCESS;
 148 }
 149
 150
 151 /* vim:set shiftwidth=4 softtabstop=4 expandtab: */