CWS-TOOLING: integrate CWS extmgr01

2009-07-28 15:37:52 +0200 dv  r274410 : #i103856# Create dialog before using it
2009-07-27 15:24:42 +0200 dv  r274368 : #i103831# Made selectEntry virtual so the correct function will be used from the listbox with buttons
2009-07-27 14:17:08 +0200 dv  r274366 : #i103831# Made selectEntry virtual so the correct function will be used from the listbox with buttons
2009-07-07 08:23:17 +0200 dv  r273765 : #i102666# Extension check on startup after office update -> fixed repaint problem
2009-07-06 11:28:28 +0200 dv  r273729 : #i102666# Extension check on startup after office update -> fixed Mac OS X issues
2009-07-02 15:01:35 +0200 dv  r273654 : #i102666# Extension check on startup after office update -> set last checked to never when aborting
2009-07-01 12:18:52 +0200 dv  r273564 : Removed unused variable
2009-07-01 07:25:01 +0200 dv  r273542 : #i102666# Extension check on startup after office update -> better layout
2009-06-30 14:56:16 +0200 dv  r273506 : #i102666# Extension check on startup after office update -> mark incompatible extensions in extension manager
2009-06-30 12:43:55 +0200 dv  r273502 : CWS-TOOLING: rebase CWS extmgr01 to trunk@273468 (milestone: DEV300:m51)
2009-06-29 13:26:54 +0200 dv  r273469 : Now with newline at the end
2009-06-29 11:54:07 +0200 dv  r273462 : #i102666# Extension check on startup after office update -> exit button of dialog disables extensions, too
2009-06-26 16:26:02 +0200 dv  r273428 : #i102666# Extension check on startup after office update -> better progress handling
2009-06-26 14:50:34 +0200 dv  r273417 : fixed crash when shutting down while initial waiting
2009-06-26 14:46:40 +0200 dv  r273416 : #i102666# Extension check on startup after office update
2009-06-24 07:30:57 +0200 dv  r273306 : #i102666# Extension check on startup after update
2009-06-11 12:03:10 +0200 dv  r272863 : #i102666# Extension check on startup after update
2009-06-11 11:59:29 +0200 dv  r272862 : #i102666# Extension check on startup after update
2009-06-09 15:50:05 +0200 dv  r272773 : CWS-TOOLING: rebase CWS extmgr01 to trunk@272291 (milestone: DEV300:m49)

3 files changed, 261 insertions, 0 deletions

diff --git a/desktop/source/app/app.cxx b/desktop/source/app/app.cxx
index e9fad3f16d..f893ed07c8 100644
--- a/desktop/source/app/app.cxx
+++ b/desktop/source/app/app.cxx
@@ -1387,6 +1387,10 @@ void Desktop::Main()
         tools::InitTestToolLib();
         RTL_LOGFILE_CONTEXT_TRACE( aLog, "} tools::InitTestToolLib" );
 
+        bool bAbort = CheckExtensionDependencies();
+        if ( bAbort )
+            return;
+
         // First Start Wizard allowed ?
         if ( ! pCmdLineArgs->IsNoFirstStartWizard())
         {
diff --git a/desktop/source/app/check_ext_deps.cxx b/desktop/source/app/check_ext_deps.cxx
new file mode 100644
index 0000000000..f61f577694
--- /dev/null
+++ b/desktop/source/app/check_ext_deps.cxx
@@ -0,0 +1,256 @@
+/*************************************************************************
+ *
+ * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
+ *
+ * Copyright 2009 by Sun Microsystems, Inc.
+ *
+ * OpenOffice.org - a multi-platform office productivity suite
+ *
+ * This file is part of OpenOffice.org.
+ *
+ * OpenOffice.org is free software: you can redistribute it and/or modify
+ * it under the terms of the GNU Lesser General Public License version 3
+ * only, as published by the Free Software Foundation.
+ *
+ * OpenOffice.org 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 version 3 for more details
+ * (a copy is included in the LICENSE file that accompanied this code).
+ *
+ * You should have received a copy of the GNU Lesser General Public License
+ * version 3 along with OpenOffice.org.  If not, see
+ * <http://www.openoffice.org/license.html>
+ * for a copy of the LGPLv3 License.
+ *
+ ************************************************************************/
+// MARKER(update_precomp.py): autogen include statement, do not remove
+#include "precompiled_desktop.hxx"
+
+#include <rtl/bootstrap.hxx>
+#include <rtl/ustring.hxx>
+#include <unotools/configmgr.hxx>
+
+#include <comphelper/processfactory.hxx>
+#include <comphelper/sequence.hxx>
+#include <cppuhelper/bootstrap.hxx>
+
+#include <com/sun/star/beans/XPropertySet.hpp>
+#include <com/sun/star/beans/NamedValue.hpp>
+#include "com/sun/star/deployment/XPackage.hpp"
+#include "com/sun/star/deployment/XPackageManager.hpp"
+#include "com/sun/star/deployment/thePackageManagerFactory.hpp"
+#include <com/sun/star/task/XJob.hpp>
+#include <com/sun/star/task/XJobExecutor.hpp>
+#include <com/sun/star/ui/dialogs/XExecutableDialog.hpp>
+#include <com/sun/star/util/XChangesBatch.hpp>
+
+#include "app.hxx"
+
+using rtl::OUString;
+using namespace desktop;
+using namespace com::sun::star;
+
+#define UNISTRING(s) rtl::OUString(RTL_CONSTASCII_USTRINGPARAM(s))
+
+static const OUString sConfigSrvc( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.configuration.ConfigurationProvider" ) );
+static const OUString sAccessSrvc( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.configuration.ConfigurationUpdateAccess" ) );
+
+//------------------------------------------------------------------------------
+static sal_Int16 impl_showExtensionDialog( uno::Reference< uno::XComponentContext > &xContext )
+{
+    rtl::OUString sServiceName = UNISTRING("com.sun.star.deployment.ui.UpdateRequiredDialog");
+    uno::Reference< uno::XInterface > xService;
+    sal_Int16 nRet = 0;
+
+    uno::Reference< lang::XMultiComponentFactory > xServiceManager( xContext->getServiceManager() );
+    if( !xServiceManager.is() )
+        throw uno::RuntimeException( 
+            UNISTRING( "impl_showExtensionDialog(): unable to obtain service manager from component context" ), uno::Reference< uno::XInterface > () );
+
+    xService = xServiceManager->createInstanceWithContext( sServiceName, xContext );
+    uno::Reference< ui::dialogs::XExecutableDialog > xExecuteable( xService, uno::UNO_QUERY );
+    if ( xExecuteable.is() )
+        nRet = xExecuteable->execute();
+
+    return nRet;
+}
+
+//------------------------------------------------------------------------------
+// Check dependencies of all packages
+//------------------------------------------------------------------------------
+static bool impl_checkDependencies( const uno::Reference< deployment::XPackageManager > &xPackageManager )
+{
+    uno::Sequence< uno::Reference< deployment::XPackage > > packages;
+
+    try {
+        packages = xPackageManager->getDeployedPackages( uno::Reference< task::XAbortChannel >(),
+                                                         uno::Reference< ucb::XCommandEnvironment >() );
+    }
+    catch ( deployment::DeploymentException & ) { /* handleGeneralError(e.Cause);*/ }
+    catch ( ucb::CommandFailedException & ) { /* handleGeneralError(e.Reason);*/ }
+    catch ( ucb::CommandAbortedException & ) {}
+    catch ( lang::IllegalArgumentException & e ) {
+        throw uno::RuntimeException( e.Message, e.Context );
+    }
+
+    for ( sal_Int32 i = 0; i < packages.getLength(); ++i )
+    {
+        bool bRegistered = false;
+        try {
+            beans::Optional< beans::Ambiguous< sal_Bool > > option( packages[i]->isRegistered( uno::Reference< task::XAbortChannel >(),
+                                                                                               uno::Reference< ucb::XCommandEnvironment >() ) );
+            if ( option.IsPresent )
+            {
+                ::beans::Ambiguous< sal_Bool > const & reg = option.Value;
+                if ( reg.IsAmbiguous )
+                    bRegistered = false;
+                else
+                    bRegistered = reg.Value ? true : false;
+            }
+            else
+                bRegistered = false;
+        }
+        catch ( uno::RuntimeException & ) { throw; }
+        catch ( uno::Exception & exc) {
+            (void) exc;
+            OSL_ENSURE( 0, ::rtl::OUStringToOString( exc.Message, RTL_TEXTENCODING_UTF8 ).getStr() );
+            bRegistered = false;
+        }
+
+        if ( bRegistered )
+        {
+            bool bDependenciesValid = false;
+            try {
+                bDependenciesValid = packages[i]->checkDependencies( uno::Reference< ucb::XCommandEnvironment >() );
+            }
+            catch ( deployment::DeploymentException & ) {}
+            if ( ! bDependenciesValid )
+            {
+                return false;
+            }
+        }
+    }
+    return true;
+}
+
+//------------------------------------------------------------------------------
+// resets the 'check needed' flag (needed, if aborted)
+//------------------------------------------------------------------------------
+static void impl_setNeedsCompatCheck()
+{
+    try {
+        Reference < XMultiServiceFactory > xFactory = ::comphelper::getProcessServiceFactory();
+        // get configuration provider
+        Reference< XMultiServiceFactory > theConfigProvider = Reference< XMultiServiceFactory >(
+                xFactory->createInstance(sConfigSrvc), UNO_QUERY_THROW);
+
+        Sequence< Any > theArgs(1);
+        beans::NamedValue v( OUString::createFromAscii("NodePath"), 
+                      makeAny( OUString::createFromAscii("org.openoffice.Setup/Office") ) );
+        theArgs[0] <<= v;
+        Reference< beans::XPropertySet > pset = Reference< beans::XPropertySet >(
+            theConfigProvider->createInstanceWithArguments( sAccessSrvc, theArgs ), UNO_QUERY_THROW );
+
+        Any value = makeAny( OUString::createFromAscii("never") );
+
+        pset->setPropertyValue( OUString::createFromAscii("LastCompatibilityCheckID"), value );
+        Reference< util::XChangesBatch >( pset, UNO_QUERY_THROW )->commitChanges();
+    }
+    catch (const Exception&) {}
+}
+
+//------------------------------------------------------------------------------
+static bool impl_check()
+{
+    uno::Reference< uno::XComponentContext > xContext = comphelper_getProcessComponentContext();
+    uno::Reference< deployment::XPackageManager > xManager;
+    bool bDependenciesValid = true;
+
+    try {
+        xManager = deployment::thePackageManagerFactory::get( xContext )->getPackageManager( UNISTRING("user") );
+    }
+    catch ( ucb::CommandFailedException & ){}
+    catch ( uno::RuntimeException & ) {}
+
+    if ( xManager.is() )
+        bDependenciesValid = impl_checkDependencies( xManager );
+
+    if ( bDependenciesValid )
+    {
+        try {
+            xManager = deployment::thePackageManagerFactory::get( xContext )->getPackageManager( UNISTRING("shared") );
+        }
+        catch ( ucb::CommandFailedException & ){}
+        catch ( uno::RuntimeException & ) {}
+
+        if ( xManager.is() )
+            bDependenciesValid = impl_checkDependencies( xManager );
+    }
+
+    short nRet = 0;
+    if ( !bDependenciesValid )
+        nRet = impl_showExtensionDialog( xContext );
+
+    if ( nRet == -1 )
+    {
+        impl_setNeedsCompatCheck();
+        return true;
+    }
+    else
+        return false;
+}
+
+//------------------------------------------------------------------------------
+// to check, if we need checking the dependencies of the extensions again, we compare
+// the build id of the office with the one of the last check
+//------------------------------------------------------------------------------
+static bool impl_needsCompatCheck()
+{
+    bool bNeedsCheck = false;
+    rtl::OUString aLastCheckBuildID;
+    rtl::OUString aCurrentBuildID( UNISTRING( "${$OOO_BASE_DIR/program/" SAL_CONFIGFILE("version") ":buildid}" ) );
+    rtl::Bootstrap::expandMacros( aCurrentBuildID );
+
+    try {
+        Reference < XMultiServiceFactory > xFactory = ::comphelper::getProcessServiceFactory();
+        // get configuration provider
+        Reference< XMultiServiceFactory > theConfigProvider = Reference< XMultiServiceFactory >(
+                xFactory->createInstance(sConfigSrvc), UNO_QUERY_THROW);
+
+        Sequence< Any > theArgs(1);
+        beans::NamedValue v( OUString::createFromAscii("NodePath"), 
+                      makeAny( OUString::createFromAscii("org.openoffice.Setup/Office") ) );
+        theArgs[0] <<= v;
+        Reference< beans::XPropertySet > pset = Reference< beans::XPropertySet >(
+            theConfigProvider->createInstanceWithArguments( sAccessSrvc, theArgs ), UNO_QUERY_THROW );
+
+        Any result = pset->getPropertyValue( OUString::createFromAscii("LastCompatibilityCheckID") );
+
+        result >>= aLastCheckBuildID;
+        if ( aLastCheckBuildID != aCurrentBuildID )
+        {
+            bNeedsCheck = true;
+            result <<= aCurrentBuildID;
+            pset->setPropertyValue( OUString::createFromAscii("LastCompatibilityCheckID"), result );
+            Reference< util::XChangesBatch >( pset, UNO_QUERY_THROW )->commitChanges();
+        }
+    }
+    catch (const Exception&) {}
+
+    return bNeedsCheck;
+}
+
+//------------------------------------------------------------------------------
+// Do we need to check the dependencies of the extensions?
+// When there are unresolved issues, we can't continue with startup
+sal_Bool Desktop::CheckExtensionDependencies()
+{
+    sal_Bool bAbort = false;
+
+    if ( impl_needsCompatCheck() )
+        bAbort = impl_check();
+
+    return bAbort;
+}
+
diff --git a/desktop/source/app/makefile.mk b/desktop/source/app/makefile.mk
index 18c2170d3f..36993bfdf3 100644
--- a/desktop/source/app/makefile.mk
+++ b/desktop/source/app/makefile.mk
@@ -56,6 +56,7 @@ SHL1OBJS = \
     $(SLO)$/appsys.obj \
     $(SLO)$/cfgfilter.obj \
     $(SLO)$/checkinstall.obj \
+    $(SLO)$/check_ext_deps.obj \
     $(SLO)$/cmdlineargs.obj \
     $(SLO)$/cmdlinehelp.obj \
     $(SLO)$/configinit.obj \