svx/source/cui/optimprove2.cxx

   1 /*************************************************************************
   2  *
   3  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   4  *
   5  * Copyright 2008 by Sun Microsystems, Inc.
   6  *
   7  * OpenOffice.org - a multi-platform office productivity suite
   8  *
   9  * $RCSfile: optimprove2.cxx,v $
  10  * $Revision: 1.2 $
  11  *
  12  * This file is part of OpenOffice.org.
  13  *
  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.
  17  *
  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).
  23  *
  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.
  28  *
  29  ************************************************************************/
  30
  31 // MARKER(update_precomp.py): autogen include statement, do not remove
  32 #include "precompiled_svx.hxx"
  33
  34 #ifdef SVX_DLLIMPLEMENTATION
  35 #undef SVX_DLLIMPLEMENTATION
  36 #endif
  37
  38 // include ---------------------------------------------------------------
  39
  40 #define _SVX_OPTIMPROVE_CXX
  41
  42 #include <svx/optimprove.hxx>
  43 #include <svx/dialmgr.hxx>
  44 #include <vcl/msgbox.hxx>
  45
  46 #include "optimprove.hrc"
  47 #include "helpid.hrc"
  48 #include <svx/dialogs.hrc>
  49
  50 #include <com/sun/star/beans/PropertyValue.hpp>
  51 #include <com/sun/star/lang/XComponent.hpp>
  52 #include <com/sun/star/oooimprovement/XCore.hpp>
  53 #include <com/sun/star/oooimprovement/XCoreController.hpp>
  54 #include <com/sun/star/system/XSystemShellExecute.hpp>
  55 #include <com/sun/star/system/SystemShellExecuteFlags.hpp>
  56 #include <com/sun/star/util/XStringSubstitution.hpp>
  57 #include <comphelper/configurationhelper.hxx>
  58 #include <comphelper/processfactory.hxx>
  59 #include <comphelper/synchronousdispatch.hxx>
  60 #include <comphelper/uieventslogger.hxx>
  61 #include <tools/testtoolloader.hxx>
  62
  63 #define C2S(s)  ::rtl::OUString(RTL_CONSTASCII_USTRINGPARAM(s))
  64
  65 namespace beans  = ::com::sun::star::beans;
  66 namespace lang  = ::com::sun::star::lang;
  67 namespace uno   = ::com::sun::star::uno;
  68 namespace util  = ::com::sun::star::util;
  69 using namespace com::sun::star::system;
  70
  71 // class SvxEmptyPage ----------------------------------------------------
  72
  73 SvxEmptyPage::SvxEmptyPage( Window* pParent ) :
  74
  75     TabPage( pParent, SVX_RES( RID_SVXPAGE_IMPROVEMENT ) )
  76
  77 {
  78     FreeResource();
  79 }
  80
  81 // class SvxImprovementOptionsPage ---------------------------------------
  82
  83 SvxImprovementOptionsPage::SvxImprovementOptionsPage( Window* pParent, const SfxItemSet& rSet ) :
  84
  85     SfxTabPage( pParent, SVX_RES( RID_SVXPAGE_IMPROVEMENT ), rSet ),
  86
  87     m_aImproveFL                ( this, SVX_RES( FL_IMPROVE ) ),
  88     m_aInvitationFT             ( this, SVX_RES( FT_INVITATION ) ),
  89     m_aYesRB                    ( this, SVX_RES( RB_YES ) ),
  90     m_aNoRB                     ( this, SVX_RES( RB_NO ) ),
  91     m_aInfoFI                   ( this, SVX_RES( FI_INFO ) ),
  92     m_aDataFL                   ( this, SVX_RES( FL_DATA ) ),
  93     m_aNumberOfReportsFT        ( this, SVX_RES( FT_NR_REPORTS ) ),
  94     m_aNumberOfReportsValueFT   ( this, SVX_RES( FT_NR_REPORTS_VALUE ) ),
  95     m_aNumberOfActionsFT        ( this, SVX_RES( FT_NR_ACTIONS ) ),
  96     m_aNumberOfActionsValueFT   ( this, SVX_RES( FT_NR_ACTIONS_VALUE ) ),
  97     m_aShowDataPB               ( this, SVX_RES( PB_SHOWDATA ) ),
  98
  99     m_sInfo                     (       SVX_RES( STR_INFO ) ),
 100     m_sMoreInfo                 (       SVX_RES( STR_MOREINFO ) )
 101
 102 {
 103     FreeResource();
 104
 105     m_aInfoFI.SetURL( C2S( "www.sun.com/privacy/" ) );
 106     m_aInfoFI.SetClickHdl( LINK( this, SvxImprovementOptionsPage, HandleHyperlink ) );
 107     m_aShowDataPB.SetClickHdl( LINK( this, SvxImprovementOptionsPage, HandleShowData ) );
 108 }
 109
 110 SvxImprovementOptionsPage::~SvxImprovementOptionsPage()
 111 {
 112 }
 113
 114 IMPL_LINK( SvxImprovementOptionsPage, HandleHyperlink, svt::FixedHyperlinkImage*, EMPTYARG )
 115 {
 116     ::rtl::OUString sURL( m_aInfoFI.GetURL() );
 117
 118     if ( sURL.getLength() > 0 )
 119     {
 120         try
 121         {
 122             uno::Reference< lang::XMultiServiceFactory > xSMGR =
 123                 ::comphelper::getProcessServiceFactory();
 124             uno::Reference< XSystemShellExecute > xSystemShell(
 125                 xSMGR->createInstance( ::rtl::OUString(
 126                     RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.system.SystemShellExecute" ) ) ),
 127                 uno::UNO_QUERY_THROW );
 128             if ( xSystemShell.is() )
 129             {
 130                 xSystemShell->execute(
 131                     sURL, ::rtl::OUString(), SystemShellExecuteFlags::DEFAULTS );
 132             }
 133         }
 134         catch( const uno::Exception& e )
 135         {
 136              OSL_TRACE( "Caught exception: %s\n thread terminated.\n",
 137                 rtl::OUStringToOString( e.Message, RTL_TEXTENCODING_UTF8 ).getStr() );
 138         }
 139     }
 140
 141     return 0;
 142 }
 143
 144 IMPL_LINK( SvxImprovementOptionsPage, HandleShowData, PushButton*, EMPTYARG )
 145 {
 146     uno::Reference < uno::XInterface > xDesktop( ::comphelper::getProcessServiceFactory()->createInstance(
 147         C2S("com.sun.star.frame.Desktop") ), uno::UNO_QUERY );
 148     if ( xDesktop.is() )
 149     {
 150         ::rtl::OUString sLogFile( m_sLogPath );
 151         sLogFile += C2S("/Current.csv");
 152         uno::Sequence< beans::PropertyValue > aArgs;
 153
 154         uno::Reference< lang::XComponent > xDoc = ::comphelper::SynchronousDispatch::dispatch(
 155             xDesktop, sLogFile, C2S("_default"), 0, aArgs );
 156         if ( xDoc.is() )
 157             return 1;
 158     }
 159
 160     return 0;
 161 }
 162
 163 SfxTabPage* SvxImprovementOptionsPage::Create( Window* pParent, const SfxItemSet& rSet )
 164 {
 165     return new SvxImprovementOptionsPage( pParent, rSet );
 166 }
 167
 168 sal_uInt16* SvxImprovementOptionsPage::GetRanges()
 169 {
 170     return NULL;
 171 }
 172
 173 sal_Bool SvxImprovementOptionsPage::FillItemSet( SfxItemSet& /*rSet*/ )
 174 {
 175     uno::Reference< lang::XMultiServiceFactory > xSMGR = ::comphelper::getProcessServiceFactory();
 176     uno::Reference< uno::XInterface > xConfig;
 177
 178     try
 179     {
 180         xConfig = ::comphelper::ConfigurationHelper::openConfig(
 181             xSMGR, C2S("/org.openoffice.Office.OOoImprovement.Settings"),
 182             ::comphelper::ConfigurationHelper::E_STANDARD );
 183         ::comphelper::ConfigurationHelper::writeRelativeKey(
 184             xConfig, C2S("Participation"), C2S("ShowedInvitation"), uno::makeAny( true ) );
 185         ::comphelper::ConfigurationHelper::writeRelativeKey(
 186             xConfig, C2S("Participation"), C2S("InvitationAccepted"), uno::makeAny( m_aYesRB.IsChecked() != FALSE ) );
 187         ::comphelper::ConfigurationHelper::flush( xConfig );
 188         // TODO: refactor
 189         ::comphelper::UiEventsLogger::reinit();
 190         ::tools::InitTestToolLib();
 191     }
 192     catch( uno::Exception& )
 193     {
 194     }
 195
 196     return sal_False;
 197 }
 198
 199 void SvxImprovementOptionsPage::Reset( const SfxItemSet& /*rSet*/ )
 200 {
 201     uno::Reference< lang::XMultiServiceFactory > xSMGR = ::comphelper::getProcessServiceFactory();
 202     uno::Reference< com::sun::star::oooimprovement::XCore > xCore(
 203         xSMGR->createInstance( C2S("com.sun.star.oooimprovement.Core") ),
 204         uno::UNO_QUERY );
 205     uno::Reference< uno::XInterface > xConfig;
 206
 207     try
 208     {
 209         m_aNoRB.Check();
 210         xConfig = ::comphelper::ConfigurationHelper::openConfig(
 211             xSMGR, C2S("/org.openoffice.Office.OOoImprovement.Settings"),
 212             ::comphelper::ConfigurationHelper::E_READONLY );
 213         if ( xConfig.is() )
 214         {
 215             bool bYesChecked = false;
 216             uno::Any aAny = ::comphelper::ConfigurationHelper::
 217                 readRelativeKey( xConfig, C2S("Participation"), C2S("ShowedInvitation") );
 218             if ( ( aAny >>= bYesChecked ) && bYesChecked )
 219             {
 220                 bool bTemp = false;
 221                 aAny = ::comphelper::ConfigurationHelper::
 222                     readRelativeKey( xConfig, C2S("Participation"), C2S("InvitationAccepted") );
 223                 if ( aAny >>= bTemp )
 224                 {
 225                     bYesChecked &= bTemp;
 226                     if ( bYesChecked )
 227                         m_aYesRB.Check();
 228                 }
 229             }
 230
 231             ::rtl::OUString sURL;
 232             aAny = ::comphelper::ConfigurationHelper::
 233                 readRelativeKey( xConfig, C2S("Participation"), C2S("HelpUrl") );
 234             if ( aAny >>= sURL )
 235                 m_aInfoFI.SetURL( sURL );
 236
 237             sal_Int32 nCount = 0;
 238             aAny = ::comphelper::ConfigurationHelper::
 239                 readRelativeKey( xConfig, C2S("Counters"), C2S("UploadedReports") );
 240             if ( aAny >>= nCount )
 241                 m_aNumberOfReportsValueFT.SetText( String::CreateFromInt32( nCount ) );
 242             aAny = ::comphelper::ConfigurationHelper::
 243                 readRelativeKey( xConfig, C2S("Counters"), C2S("LoggedEvents") );
 244             if ( aAny >>= nCount )
 245             {
 246                 if ( xCore.is() )
 247                     nCount += xCore->getSessionLogEventCount();
 248                 m_aNumberOfActionsValueFT.SetText( String::CreateFromInt32( nCount ) );
 249             }
 250
 251             ::rtl::OUString sPath;
 252             aAny = ::comphelper::ConfigurationHelper::readDirectKey(
 253                 xSMGR, C2S("/org.openoffice.Office.Logging"), C2S("OOoImprovement"),
 254                 C2S("LogPath"), ::comphelper::ConfigurationHelper::E_READONLY );
 255             if ( aAny >>= sPath )
 256             {
 257                 uno::Reference< util::XStringSubstitution > xSubst(
 258                     xSMGR->createInstance( C2S("com.sun.star.util.PathSubstitution") ),
 259                     uno::UNO_QUERY );
 260                 if ( xSubst.is() )
 261                     sPath = xSubst->substituteVariables( sPath, sal_False );
 262                 m_sLogPath = sPath;
 263             }
 264         }
 265     }
 266     catch( uno::Exception& )
 267     {
 268     }
 269 }
 270