sw/source/ui/app/apphdl.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: apphdl.cxx,v $
  10  * $Revision: 1.68 $
  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_sw.hxx"
  33 #include <hintids.hxx>
  34 #include <tools/urlobj.hxx>
  35
  36 #include <tools/debug.hxx>
  37 #include <tools/link.hxx>
  38
  39 #define _SVSTDARR_STRINGSDTOR
  40 #include <svtools/svstdarr.hxx>
  41 #include <svtools/urihelper.hxx>
  42 #include <svtools/undoopt.hxx>
  43 #include <svtools/pathoptions.hxx>
  44 #include <svtools/accessibilityoptions.hxx>
  45 #include <sfx2/dispatch.hxx>
  46 #include <sfx2/event.hxx>
  47 #include <sfx2/objitem.hxx>
  48 #include <svx/dataaccessdescriptor.hxx>
  49 #include <svx/srchitem.hxx>
  50 #include <svtools/colorcfg.hxx>
  51 #include <svtools/eitem.hxx>
  52 #include <svtools/whiter.hxx>
  53 #include <svtools/isethint.hxx>
  54 #include <svx/hyprlink.hxx>
  55 #include <sfx2/request.hxx>
  56 #include <sfx2/fcontnr.hxx>
  57 #include <svtools/stritem.hxx>
  58 #include <svtools/ctloptions.hxx>
  59 #include <svtools/useroptions.hxx>
  60 #include <vcl/msgbox.hxx>
  61 #include <vcl/wrkwin.hxx>
  62 #include <svx/insctrl.hxx>
  63 #include <svx/selctrl.hxx>
  64 #include <com/sun/star/document/UpdateDocMode.hpp>
  65 #include <sfx2/docfile.hxx>
  66 #include <svx/xmlsecctrl.hxx>
  67 #include <navicfg.hxx>
  68
  69 #include <sfx2/objface.hxx>
  70 #include <sfx2/app.hxx>
  71
  72 #include <view.hxx>
  73 #include <pview.hxx>
  74 #include <srcview.hxx>
  75 #include <wrtsh.hxx>
  76 #include <docsh.hxx>
  77 #ifndef _CMDID_H
  78 #include <cmdid.h>                      // Funktion-Ids
  79 #endif
  80 #include <initui.hxx>
  81 #include <uitool.hxx>
  82 #include <swmodule.hxx>
  83 #include <wdocsh.hxx>
  84 #include <wview.hxx>
  85 #include <usrpref.hxx>
  86 #include <gloslst.hxx>      // SwGlossaryList
  87 #include <glosdoc.hxx>      // SwGlossaryList
  88 #include <doc.hxx>
  89 #include <cfgitems.hxx>
  90 #include <prtopt.hxx>
  91 #include <modcfg.hxx>
  92 #include <globals.h>            // globale Konstanten z.B.
  93 #ifndef _APP_HRC
  94 #include <app.hrc>
  95 #endif
  96 #include <fontcfg.hxx>
  97 #include <barcfg.hxx>
  98 #include <uinums.hxx>
  99 #include <dbconfig.hxx>
 100 #include <mmconfigitem.hxx>
 101 #include <mailmergechildwindow.hxx>
 102 #include <linguistic/lngprops.hxx>
 103 #include <svx/unolingu.hxx>
 104 #include <com/sun/star/beans/XMultiPropertySet.hpp>
 105 #include <com/sun/star/beans/XFastPropertySet.hpp>
 106 #include <com/sun/star/beans/XPropertyState.hpp>
 107 #include <com/sun/star/beans/XPropertyStateChangeListener.hpp>
 108 #include <com/sun/star/beans/PropertyAttribute.hpp>
 109 #include <com/sun/star/beans/XPropertyAccess.hpp>
 110 #include <com/sun/star/beans/XPropertyContainer.hpp>
 111 #include <com/sun/star/container/XChild.hpp>
 112 #include <com/sun/star/sdbc/XConnection.hpp>
 113 #include <com/sun/star/sdbc/XDataSource.hpp>
 114 #include <swabstdlg.hxx>
 115
 116
 117 #include <vcl/status.hxx>
 118
 119 #include "salhelper/simplereferenceobject.hxx"
 120 #include "rtl/ref.hxx"
 121
 122 #include <unomid.h>
 123
 124 using namespace ::com::sun::star;
 125
 126 /*--------------------------------------------------------------------
 127     Beschreibung: Slotmaps fuer Methoden der Applikation
 128  --------------------------------------------------------------------*/
 129
 130
 131 // hier werden die SlotID's included
 132 // siehe Idl-File
 133 //
 134 #define SwModule
 135 #define ViewSettings
 136 #define WebViewSettings
 137 #define PrintSettings
 138 #define _ExecAddress ExecOther
 139 #define _StateAddress StateOther
 140 #include <sfx2/msg.hxx>
 141 #include <svx/svxslots.hxx>
 142 #include "swslots.hxx"
 143 #include <cfgid.h>
 144
 145 #include <shells.hrc>
 146
 147 SFX_IMPL_INTERFACE( SwModule, SfxModule, SW_RES(RID_SW_NAME) )
 148 {
 149     SFX_CHILDWINDOW_REGISTRATION(SvxHyperlinkDlgWrapper::GetChildWindowId());
 150     SFX_STATUSBAR_REGISTRATION(SW_RES(CFG_STATUSBAR));
 151     SFX_OBJECTBAR_REGISTRATION( SFX_OBJECTBAR_APPLICATION |
 152             SFX_VISIBILITY_DESKTOP | SFX_VISIBILITY_STANDARD | SFX_VISIBILITY_CLIENT | SFX_VISIBILITY_VIEWER,
 153             SW_RES(RID_MODULE_TOOLBOX) );
 154 }
 155
 156
 157 /*--------------------------------------------------------------------
 158     Beschreibung: Andere States
 159  --------------------------------------------------------------------*/
 160
 161
 162 void SwModule::StateOther(SfxItemSet &rSet)
 163 {
 164     SfxWhichIter aIter(rSet);
 165     sal_uInt16 nWhich = aIter.FirstWhich();
 166
 167     SwView* pActView = ::GetActiveView();
 168     sal_Bool bWebView = 0 != PTR_CAST(SwWebView, pActView);
 169
 170     while(nWhich)
 171     {
 172         switch(nWhich)
 173         {
 174             case FN_BUSINESS_CARD:
 175             case FN_LABEL:
 176             case FN_ENVELOP:
 177             {
 178                 sal_Bool bDisable = sal_False;
 179                 SfxViewShell* pCurrView = SfxViewShell::Current();
 180                 if( !pCurrView || (pCurrView && !pCurrView->ISA(SwView)) )
 181                     bDisable = sal_True;
 182                 SwDocShell *pDocSh = (SwDocShell*) SfxObjectShell::Current();
 183                 if ( bDisable ||
 184                     (pDocSh &&    (pDocSh->IsReadOnly() ||
 185                                   pDocSh->GetCreateMode() == SFX_CREATE_MODE_EMBEDDED)) )
 186                     rSet.DisableItem( nWhich );
 187
 188             }
 189             break;
 190             case FN_XFORMS_INIT:
 191                 // slot is always active!
 192                 break;
 193             case FN_EDIT_FORMULA:
 194                 {
 195                     SwWrtShell* pSh = 0;
 196                     int nSelection = 0;
 197                     if( pActView )
 198                         pSh = &pActView->GetWrtShell();
 199                     if( pSh )
 200                         nSelection = pSh->GetSelectionType();
 201
 202                     if( (pSh && pSh->HasSelection()) ||
 203                         !(nSelection & (nsSelectionType::SEL_TXT | nsSelectionType::SEL_TBL)))
 204                         rSet.DisableItem(nWhich);
 205                 }
 206             break;
 207             case SID_ATTR_METRIC:
 208                 rSet.Put( SfxUInt16Item( SID_ATTR_METRIC, static_cast< UINT16 >(::GetDfltMetric(bWebView))));
 209             break;
 210             case FN_SET_MODOPT_TBLNUMFMT:
 211                 rSet.Put( SfxBoolItem( nWhich, pModuleConfig->
 212                                             IsInsTblFormatNum( bWebView )));
 213             break;
 214             default:
 215                 DBG_ERROR("::StateOther: default");
 216         }
 217         nWhich = aIter.NextWhich();
 218     }
 219 }
 220
 221 /*-- 06.04.2004 15:21:43---------------------------------------------------
 222
 223   -----------------------------------------------------------------------*/
 224 SwView* lcl_LoadDoc(SwView* pView, const String& rURL)
 225 {
 226     SwView* pNewView = 0;
 227     if(rURL.Len())
 228     {
 229         SfxStringItem aURL(SID_FILE_NAME, rURL);
 230         SfxStringItem aTargetFrameName( SID_TARGETNAME, String::CreateFromAscii("_blank") );
 231         SfxBoolItem aHidden( SID_HIDDEN, TRUE );
 232         SfxStringItem aReferer(SID_REFERER, pView->GetDocShell()->GetTitle());
 233         SfxObjectItem* pItem = (SfxObjectItem*)pView->GetViewFrame()->GetDispatcher()->
 234                 Execute(SID_OPENDOC, SFX_CALLMODE_SYNCHRON,
 235                             &aURL, &aHidden, &aReferer, &aTargetFrameName, 0L);
 236         SfxShell* pShell = pItem ? pItem->GetShell() : 0;
 237
 238         if(pShell)
 239         {
 240             SfxViewShell* pViewShell = pShell->GetViewShell();
 241             if(pViewShell)
 242             {
 243                 if( pViewShell->ISA(SwView) )
 244                 {
 245                     pNewView = PTR_CAST(SwView,pViewShell);
 246                     pNewView->GetViewFrame()->GetFrame()->Appear();
 247                 }
 248                 else
 249                 {
 250                     pViewShell->GetViewFrame()->DoClose();
 251                 }
 252             }
 253         }
 254     }
 255     else
 256     {
 257         SfxStringItem aFactory(SID_NEWDOCDIRECT, SwDocShell::Factory().GetFilterContainer()->GetName());
 258         const SfxFrameItem* pItem = (SfxFrameItem*)
 259                             pView->GetViewFrame()->GetDispatcher()->Execute(SID_NEWDOCDIRECT,
 260                                 SFX_CALLMODE_SYNCHRON, &aFactory, 0L);
 261         SfxFrame* pFrm = pItem ? pItem->GetFrame() : 0;
 262         SfxViewFrame* pFrame = pFrm ? pFrm->GetCurrentViewFrame() : 0;
 263         pNewView = pFrame ? PTR_CAST(SwView, pFrame->GetViewShell()) : 0;
 264     }
 265
 266     return pNewView;
 267 }
 268 /*--------------------------------------------------------------------
 269     Beschreibung:       Felddialog starten
 270  --------------------------------------------------------------------*/
 271
 272 void NewXForms( SfxRequest& rReq ); // implementation: below
 273
 274 namespace
 275 {
 276
 277 class SwMailMergeWizardExecutor : public salhelper::SimpleReferenceObject
 278 {
 279     SwView*                  m_pView;           // never owner
 280     SwView*                  m_pView2Close; // never owner
 281     SwMailMergeConfigItem*   m_pMMConfig;       // sometimes owner
 282     AbstractMailMergeWizard* m_pWizard;         // always owner
 283
 284     DECL_LINK( EndDialogHdl, AbstractMailMergeWizard* );
 285     DECL_LINK( DestroyDialogHdl, AbstractMailMergeWizard* );
 286     DECL_LINK( DestroyWizardHdl, AbstractMailMergeWizard* );
 287     DECL_LINK( CancelHdl, AbstractMailMergeWizard* );
 288     DECL_LINK( CloseFrameHdl, AbstractMailMergeWizard* );
 289
 290     void ExecutionFinished( bool bDeleteConfigItem );
 291     void ExecuteWizard();
 292
 293 public:
 294     SwMailMergeWizardExecutor();
 295     ~SwMailMergeWizardExecutor();
 296
 297     void ExecuteMailMergeWizard( const SfxItemSet * pArgs );
 298 };
 299
 300 SwMailMergeWizardExecutor::SwMailMergeWizardExecutor()
 301     : m_pView( 0 ),
 302       m_pView2Close( NULL ),
 303       m_pMMConfig( 0 ),
 304       m_pWizard( 0 )
 305 {
 306 }
 307
 308 SwMailMergeWizardExecutor::~SwMailMergeWizardExecutor()
 309 {
 310     DBG_ASSERT( m_pWizard == 0, "SwMailMergeWizardExecutor: m_pWizard must be Null!" );
 311     DBG_ASSERT( m_pMMConfig == 0, "SwMailMergeWizardExecutor: m_pMMConfig must be Null!" );
 312 }
 313
 314 void SwMailMergeWizardExecutor::ExecuteMailMergeWizard( const SfxItemSet * pArgs )
 315 {
 316     if ( m_pView )
 317     {
 318         DBG_ERROR( "SwMailMergeWizardExecutor::ExecuteMailMergeWizard: Already executing the wizard!" );
 319         return;
 320     }
 321
 322     m_pView = ::GetActiveView(); // not owner!
 323     DBG_ASSERT(m_pView, "no current view?");
 324     if(m_pView)
 325     {
 326         // keep self alive until done.
 327         acquire();
 328
 329         // if called from the child window - get the config item and close the ChildWindow, then restore
 330         // the wizard
 331         SwMailMergeChildWindow* pChildWin =
 332             static_cast<SwMailMergeChildWindow*>(m_pView->GetViewFrame()->GetChildWindow(FN_MAILMERGE_CHILDWINDOW));
 333         bool bRestoreWizard = false;
 334         sal_uInt16 nRestartPage = 0;
 335         if(pChildWin && pChildWin->IsVisible())
 336         {
 337             m_pMMConfig = m_pView->GetMailMergeConfigItem();
 338             nRestartPage = m_pView->GetMailMergeRestartPage();
 339             if(m_pView->IsMailMergeSourceView())
 340                 m_pMMConfig->SetSourceView( m_pView );
 341             m_pView->SetMailMergeConfigItem(0, 0, sal_True);
 342             SfxViewFrame* pViewFrame = m_pView->GetViewFrame();
 343             pViewFrame->ShowChildWindow(FN_MAILMERGE_CHILDWINDOW, FALSE);
 344             DBG_ASSERT(m_pMMConfig, "no MailMergeConfigItem available");
 345             bRestoreWizard = true;
 346         }
 347         // to make it bullet proof ;-)
 348         if(!m_pMMConfig)
 349         {
 350             m_pMMConfig = new SwMailMergeConfigItem;
 351             m_pMMConfig->SetSourceView(m_pView);
 352
 353             //set the first used database as default source on the config item
 354             const SfxPoolItem* pItem = 0;
 355             if(pArgs && SFX_ITEM_SET == pArgs->GetItemState(
 356                    FN_PARAM_DATABASE_PROPERTIES, sal_False, &pItem))
 357             {
 358                 //mailmerge has been called from the database beamer
 359                 uno::Sequence< beans::PropertyValue> aDBValues;
 360                 if(static_cast<const SfxUsrAnyItem*>(pItem)->GetValue() >>= aDBValues)
 361                 {
 362                     SwDBData aDBData;
 363                     svx::ODataAccessDescriptor aDescriptor(aDBValues);
 364                     aDescriptor[svx::daDataSource]   >>= aDBData.sDataSource;
 365                     aDescriptor[svx::daCommand]      >>= aDBData.sCommand;
 366                     aDescriptor[svx::daCommandType]  >>= aDBData.nCommandType;
 367
 368                     uno::Sequence< uno::Any >                   aSelection;
 369                     uno::Reference< sdbc::XConnection>          xConnection;
 370                     uno::Reference< sdbc::XDataSource>          xSource;
 371                     uno::Reference< sdbcx::XColumnsSupplier>    xColumnsSupplier;
 372                     if ( aDescriptor.has(svx::daSelection) )
 373                         aDescriptor[svx::daSelection] >>= aSelection;
 374                     if ( aDescriptor.has(svx::daConnection) )
 375                         aDescriptor[svx::daConnection] >>= xConnection;
 376                     uno::Reference<container::XChild> xChild(xConnection, uno::UNO_QUERY);
 377                     if(xChild.is())
 378                         xSource = uno::Reference<sdbc::XDataSource>(
 379                             xChild->getParent(), uno::UNO_QUERY);
 380                     m_pMMConfig->SetCurrentConnection(
 381                         xSource, SharedConnection( xConnection, SharedConnection::NoTakeOwnership ),
 382                         xColumnsSupplier, aDBData);
 383                 }
 384             }
 385             else
 386             {
 387                 SvStringsDtor aDBNameList(5, 1);
 388                 SvStringsDtor aAllDBNames(5, 5);
 389                 m_pView->GetWrtShell().GetAllUsedDB( aDBNameList, &aAllDBNames );
 390                 if(aDBNameList.Count())
 391                 {
 392                     String sDBName = *aDBNameList[0];
 393                     SwDBData aDBData;
 394                     aDBData.sDataSource = sDBName.GetToken(0, DB_DELIM);
 395                     aDBData.sCommand = sDBName.GetToken(1, DB_DELIM);
 396                     aDBData.nCommandType = sDBName.GetToken(2, DB_DELIM ).ToInt32();
 397                     //set the currently used database for the wizard
 398                     m_pMMConfig->SetCurrentDBData( aDBData );
 399                 }
 400             }
 401         }
 402
 403         SwAbstractDialogFactory* pFact = SwAbstractDialogFactory::Create();
 404         m_pWizard = pFact->CreateMailMergeWizard(*m_pView, *m_pMMConfig);
 405
 406         if(bRestoreWizard)
 407         {
 408             m_pWizard->ShowPage( nRestartPage );
 409         }
 410
 411         ExecuteWizard();
 412     }
 413 }
 414
 415 void SwMailMergeWizardExecutor::ExecutionFinished( bool bDeleteConfigItem )
 416 {
 417     m_pMMConfig->Commit();
 418     if ( bDeleteConfigItem ) // owner?
 419         delete m_pMMConfig;
 420
 421     m_pMMConfig = 0;
 422
 423     // release/destroy asynchronously
 424     Application::PostUserEvent( LINK( this, SwMailMergeWizardExecutor, DestroyDialogHdl ) );
 425 }
 426
 427 void SwMailMergeWizardExecutor::ExecuteWizard()
 428 {
 429     m_pWizard->StartExecuteModal(
 430         LINK( this, SwMailMergeWizardExecutor, EndDialogHdl ) );
 431 }
 432
 433 #if OSL_DEBUG_LEVEL > 1
 434 IMPL_LINK( SwMailMergeWizardExecutor, EndDialogHdl, AbstractMailMergeWizard*, pDialog )
 435 #else
 436 IMPL_LINK( SwMailMergeWizardExecutor, EndDialogHdl, AbstractMailMergeWizard*, EMPTYARG )
 437 #endif
 438 {
 439 #if OSL_DEBUG_LEVEL > 1
 440     DBG_ASSERT( pDialog == m_pWizard, "wrong dialog passed to EndDialogHdl!" );
 441     (void) pDialog;
 442 #endif
 443
 444     long nRet = m_pWizard->GetResult();
 445     sal_uInt16 nRestartPage = m_pWizard->GetRestartPage();
 446
 447     switch ( nRet )
 448     {
 449     case RET_LOAD_DOC:
 450         {
 451             SwView* pNewView = lcl_LoadDoc(m_pView, m_pWizard->GetReloadDocument());
 452
 453             // destroy wizard asynchronously
 454             Application::PostUserEvent(
 455                 LINK( this, SwMailMergeWizardExecutor, DestroyWizardHdl ), m_pWizard );
 456
 457             SwAbstractDialogFactory* pFact = SwAbstractDialogFactory::Create();
 458             if(pNewView)
 459             {
 460                 m_pView = pNewView;
 461                 m_pMMConfig->DocumentReloaded();
 462                 //new source view!
 463                 m_pMMConfig->SetSourceView( m_pView );
 464                 m_pWizard = pFact->CreateMailMergeWizard(*m_pView, *m_pMMConfig);
 465                 m_pWizard->ShowPage( nRestartPage );
 466             }
 467             else
 468             {
 469                 m_pWizard = pFact->CreateMailMergeWizard(*m_pView, *m_pMMConfig);
 470             }
 471
 472             // execute the wizard again
 473             ExecuteWizard();
 474             break;
 475         }
 476     case RET_TARGET_CREATED:
 477         {
 478             SwView* pTargetView = m_pMMConfig->GetTargetView();
 479             uno::Reference< frame::XFrame > xFrame =
 480                 m_pView->GetViewFrame()->GetFrame()->GetFrameInterface();
 481             xFrame->getContainerWindow()->setVisible(sal_False);
 482             DBG_ASSERT(pTargetView, "No target view has been created");
 483             if(pTargetView)
 484             {
 485                 // destroy wizard asynchronously
 486                 Application::PostUserEvent(
 487                     LINK( this, SwMailMergeWizardExecutor, DestroyWizardHdl ), m_pWizard );
 488
 489                 SwAbstractDialogFactory* pFact = SwAbstractDialogFactory::Create();
 490                 m_pWizard = pFact->CreateMailMergeWizard(*pTargetView, *m_pMMConfig);
 491                 m_pWizard->ShowPage( nRestartPage );
 492
 493                 // execute the wizard again
 494                 ExecuteWizard();
 495             }
 496             else
 497             {
 498                 //should not happen - just in case no target view has been created
 499                 ExecutionFinished( true );
 500             }
 501             break;
 502         }
 503     case RET_EDIT_DOC:
 504     case RET_EDIT_RESULT_DOC:
 505         {
 506             //create a non-modal dialog that allows to return to the wizard
 507             //the ConfigItem ownership moves to this dialog
 508             bool bResult = nRet == RET_EDIT_RESULT_DOC && m_pMMConfig->GetTargetView();
 509             SwView* pTempView = bResult ? m_pMMConfig->GetTargetView() : m_pMMConfig->GetSourceView();
 510             pTempView->SetMailMergeConfigItem(m_pMMConfig, m_pWizard->GetRestartPage(), !bResult);
 511             SfxViewFrame* pViewFrame = pTempView->GetViewFrame();
 512             pViewFrame->GetDispatcher()->Execute(
 513                 FN_MAILMERGE_CHILDWINDOW, SFX_CALLMODE_SYNCHRON);
 514             ExecutionFinished( false );
 515             break;
 516         }
 517     case RET_REMOVE_TARGET:
 518         {
 519             SwView* pTargetView = m_pMMConfig->GetTargetView();
 520             SwView* pSourceView = m_pMMConfig->GetSourceView();
 521             DBG_ASSERT(pTargetView && pSourceView, "source or target view not available" );
 522             if(pTargetView && pSourceView)
 523             {
 524                 m_pView2Close = pTargetView;
 525                 pTargetView->GetViewFrame()->GetTopViewFrame()->GetWindow().Hide();
 526                 pSourceView->GetViewFrame()->GetFrame()->AppearWithUpdate();
 527                 // the current view has be be set when the target is destroyed
 528                 m_pView = pSourceView;
 529                 m_pMMConfig->SetTargetView(0);
 530
 531                 // destroy wizard asynchronously
 532                 Application::PostUserEvent(
 533                     LINK( this, SwMailMergeWizardExecutor, CloseFrameHdl ), m_pWizard );
 534
 535                 SwAbstractDialogFactory* pFact = SwAbstractDialogFactory::Create();
 536                 m_pWizard = pFact->CreateMailMergeWizard(*pSourceView, *m_pMMConfig);
 537                 m_pWizard->ShowPage( nRestartPage );
 538
 539                 // execute the wizard again
 540                 ExecuteWizard();
 541             }
 542             else
 543             {
 544                 //should not happen - just in case no target view has been created
 545                 ExecutionFinished( true );
 546             }
 547             break;
 548         }
 549     case RET_CANCEL:
 550         {
 551             // close frame and destroy wizard asynchronously
 552             Application::PostUserEvent(
 553                 LINK( this, SwMailMergeWizardExecutor, CancelHdl ), m_pWizard );
 554             break;
 555         }
 556     default: //finish
 557         {
 558             SwView* pSourceView = m_pMMConfig->GetSourceView();
 559             if(pSourceView)
 560             {
 561                 SwDocShell* pDocShell = pSourceView->GetDocShell();
 562                 if(pDocShell->HasName() && !pDocShell->IsModified())
 563                     m_pMMConfig->GetSourceView()->GetViewFrame()->DoClose();
 564                 else
 565                     m_pMMConfig->GetSourceView()->GetViewFrame()->GetFrame()->Appear();
 566             }
 567             ExecutionFinished( true );
 568             break;
 569         }
 570
 571     } // switch
 572
 573     return 0L;
 574 }
 575
 576 IMPL_LINK( SwMailMergeWizardExecutor, DestroyDialogHdl, AbstractMailMergeWizard*, EMPTYARG )
 577 {
 578     delete m_pWizard;
 579     m_pWizard = 0;
 580
 581     release();
 582     return 0L;
 583 }
 584
 585 IMPL_LINK( SwMailMergeWizardExecutor, DestroyWizardHdl, AbstractMailMergeWizard*, pDialog )
 586 {
 587     delete pDialog;
 588     return 0L;
 589 }
 590
 591 IMPL_LINK( SwMailMergeWizardExecutor, CancelHdl, AbstractMailMergeWizard*, EMPTYARG )
 592 {
 593     if(m_pMMConfig->GetTargetView())
 594     {
 595         m_pMMConfig->GetTargetView()->GetViewFrame()->DoClose();
 596         m_pMMConfig->SetTargetView(0);
 597     }
 598     if(m_pMMConfig->GetSourceView())
 599         m_pMMConfig->GetSourceView()->GetViewFrame()->GetFrame()->AppearWithUpdate();
 600
 601     m_pMMConfig->Commit();
 602     delete m_pMMConfig;
 603     m_pMMConfig = 0;
 604     // m_pWizard already deleted by closing the target view
 605     m_pWizard = 0;
 606     release();
 607
 608     return 0L;
 609 }
 610
 611 IMPL_LINK( SwMailMergeWizardExecutor, CloseFrameHdl, AbstractMailMergeWizard*, EMPTYARG )
 612 {
 613     if ( m_pView2Close )
 614     {
 615         m_pView2Close->GetViewFrame()->DoClose();
 616         m_pView2Close = NULL;
 617     }
 618
 619     return 0L;
 620 }
 621
 622 } // namespace
 623
 624 void SwModule::ExecOther(SfxRequest& rReq)
 625 {
 626     const SfxItemSet *pArgs = rReq.GetArgs();
 627     const SfxPoolItem* pItem = 0;
 628
 629     sal_uInt16 nWhich = rReq.GetSlot();
 630     switch (nWhich)
 631     {
 632         case FN_ENVELOP:
 633             InsertEnv( rReq );
 634             break;
 635
 636         case FN_BUSINESS_CARD:
 637         case FN_LABEL:
 638             InsertLab(rReq, nWhich == FN_LABEL);
 639             break;
 640
 641         case FN_XFORMS_INIT:
 642             NewXForms( rReq );
 643             break;
 644
 645         case SID_ATTR_METRIC:
 646         if(pArgs && SFX_ITEM_SET == pArgs->GetItemState(nWhich, sal_False, &pItem))
 647         {
 648             FieldUnit eUnit = (FieldUnit)((const SfxUInt16Item*)pItem)->GetValue();
 649             switch( eUnit )
 650             {
 651                 case FUNIT_MM:
 652                 case FUNIT_CM:
 653                 case FUNIT_INCH:
 654                 case FUNIT_PICA:
 655                 case FUNIT_POINT:
 656                 {
 657                     SwView* pActView = ::GetActiveView();
 658                     sal_Bool bWebView = 0 != PTR_CAST(SwWebView, pActView);
 659                     ::SetDfltMetric(eUnit, bWebView);
 660                 }
 661                 break;
 662                 default:;//prevent warning
 663             }
 664         }
 665         break;
 666
 667         case FN_SET_MODOPT_TBLNUMFMT:
 668             {
 669                 sal_Bool bWebView = 0 != PTR_CAST(SwWebView, ::GetActiveView() ),
 670                      bSet;
 671
 672                 if( pArgs && SFX_ITEM_SET == pArgs->GetItemState(
 673                         nWhich, sal_False, &pItem ))
 674                     bSet = ((SfxBoolItem*)pItem)->GetValue();
 675                 else
 676                     bSet = !pModuleConfig->IsInsTblFormatNum( bWebView );
 677
 678                 pModuleConfig->SetInsTblFormatNum( bWebView, bSet );
 679             }
 680             break;
 681         case FN_MAILMERGE_WIZARD:
 682         {
 683             rtl::Reference< SwMailMergeWizardExecutor > xEx( new SwMailMergeWizardExecutor );
 684             xEx->ExecuteMailMergeWizard( pArgs );
 685         }
 686         break;
 687     }
 688 }
 689
 690 /*--------------------------------------------------------------------
 691     Beschreibung: Notifies abfangen
 692  --------------------------------------------------------------------*/
 693
 694
 695     // Hint abfangen fuer DocInfo
 696 void SwModule::Notify( SfxBroadcaster& /*rBC*/, const SfxHint& rHint )
 697 {
 698     if( rHint.ISA( SfxEventHint ) )
 699     {
 700         SfxEventHint& rEvHint = (SfxEventHint&) rHint;
 701         SwDocShell* pDocSh = PTR_CAST( SwDocShell, rEvHint.GetObjShell() );
 702         if( pDocSh )
 703         {
 704             SwWrtShell* pWrtSh = pDocSh ? pDocSh->GetWrtShell() : 0;
 705             switch( rEvHint.GetEventId() )
 706             {
 707 /*          MA 07. Mar. 96: UpdateInputFlds() nur noch bei Dokument neu.
 708                                 (Und bei Einfuegen Textbaust.)
 709                 case SFX_EVENT_OPENDOC:
 710                 // dann am aktuellen Dokument die Input-Fedler updaten
 711                 if( pWrtSh )
 712                     pWrtSh->UpdateInputFlds();
 713                 break;
 714 */
 715             case SFX_EVENT_CREATEDOC:
 716                 // alle FIX-Date/Time Felder auf akt. setzen
 717                 if( pWrtSh )
 718                 {
 719                     SFX_ITEMSET_ARG( pDocSh->GetMedium()->GetItemSet(), pUpdateDocItem, SfxUInt16Item, SID_UPDATEDOCMODE, sal_False);
 720                     sal_Bool bUpdateFields = sal_True;
 721                     if( pUpdateDocItem &&  pUpdateDocItem->GetValue() == document::UpdateDocMode::NO_UPDATE)
 722                         bUpdateFields = sal_False;
 723                     pWrtSh->SetFixFields();
 724                     if(bUpdateFields)
 725                     {
 726                         pWrtSh->UpdateInputFlds();
 727
 728                         // Sind Datenbankfelder enthalten?
 729                         // Erstmal alle verwendeten Datenbanken holen
 730                         SwDoc *pDoc = pDocSh->GetDoc();
 731                         SvStringsDtor aDBNameList;
 732                         pDoc->GetAllUsedDB( aDBNameList );
 733                         sal_uInt16 nCount = aDBNameList.Count();
 734                         if (nCount)
 735                         {   // Datenbankbeamer oeffnen
 736                             ShowDBObj(pWrtSh->GetView(), pDoc->GetDBData());
 737                         }
 738                     }
 739                 }
 740                 break;
 741             }
 742         }
 743     }
 744     else if(rHint.ISA(SfxItemSetHint))
 745     {
 746         if(     SFX_ITEM_SET == ((SfxItemSetHint&)rHint).GetItemSet().GetItemState(SID_ATTR_PATHNAME))
 747         {
 748             ::GetGlossaries()->UpdateGlosPath( sal_False );
 749             SwGlossaryList* pList = ::GetGlossaryList();
 750             if(pList->IsActive())
 751                 pList->Update();
 752         }
 753     }
 754     else if(rHint.ISA(SfxSimpleHint))
 755     {
 756         ULONG nHintId = ((SfxSimpleHint&)rHint).GetId();
 757         if(SFX_HINT_COLORS_CHANGED == nHintId ||
 758            SFX_HINT_ACCESSIBILITY_CHANGED == nHintId )
 759         {
 760             sal_Bool bAccessibility = sal_False;
 761             if(SFX_HINT_COLORS_CHANGED == nHintId)
 762                 SwViewOption::ApplyColorConfigValues(*pColorConfig);
 763             else
 764                 bAccessibility = sal_True;
 765
 766             //invalidate all edit windows
 767             const TypeId aSwViewTypeId = TYPE(SwView);
 768             const TypeId aSwPreViewTypeId = TYPE(SwPagePreView);
 769             const TypeId aSwSrcViewTypeId = TYPE(SwSrcView);
 770             SfxViewShell* pViewShell = SfxViewShell::GetFirst();
 771             while(pViewShell)
 772             {
 773                 if(pViewShell->GetWindow())
 774                 {
 775                     if((pViewShell->IsA(aSwViewTypeId) ||
 776                         pViewShell->IsA(aSwPreViewTypeId) ||
 777                         pViewShell->IsA(aSwSrcViewTypeId)))
 778                     {
 779                         if(bAccessibility)
 780                         {
 781                             if(pViewShell->IsA(aSwViewTypeId))
 782                                 ((SwView*)pViewShell)->ApplyAccessiblityOptions(*pAccessibilityOptions);
 783                             else if(pViewShell->IsA(aSwPreViewTypeId))
 784                                 ((SwPagePreView*)pViewShell)->ApplyAccessiblityOptions(*pAccessibilityOptions);
 785                         }
 786                         pViewShell->GetWindow()->Invalidate();
 787                     }
 788                 }
 789                 pViewShell = SfxViewShell::GetNext( *pViewShell );
 790             }
 791         }
 792         else if( SFX_HINT_CTL_SETTINGS_CHANGED == nHintId )
 793         {
 794             const SfxObjectShell* pObjSh = SfxObjectShell::GetFirst();
 795             while( pObjSh )
 796             {
 797                 if( pObjSh->IsA(TYPE(SwDocShell)) )
 798                 {
 799                     const SwDoc* pDoc = ((SwDocShell*)pObjSh)->GetDoc();
 800                     ViewShell* pVSh = 0;
 801                     pDoc->GetEditShell( &pVSh );
 802                     if ( pVSh )
 803                         pVSh->ChgNumberDigits();
 804                 }
 805                 pObjSh = SfxObjectShell::GetNext(*pObjSh);
 806             }
 807         }
 808         else if(SFX_HINT_USER_OPTIONS_CHANGED == nHintId)
 809         {
 810             bAuthorInitialised = FALSE;
 811         }
 812         else if(SFX_HINT_UNDO_OPTIONS_CHANGED == nHintId)
 813         {
 814             const int nNew = GetUndoOptions().GetUndoCount();
 815             const int nOld = SwEditShell::GetUndoActionCount();
 816             if(!nNew || !nOld)
 817             {
 818                 sal_Bool bUndo = nNew != 0;
 819                 //ueber DocShells iterieren und Undo umschalten
 820
 821                 TypeId aType(TYPE(SwDocShell));
 822                 SwDocShell* pDocShell = (SwDocShell*)SfxObjectShell::GetFirst(&aType);
 823                 while( pDocShell )
 824                 {
 825                     pDocShell->GetDoc()->DoUndo( bUndo );
 826                     pDocShell = (SwDocShell*)SfxObjectShell::GetNext(*pDocShell, &aType);
 827                 }
 828             }
 829             SwEditShell::SetUndoActionCount( static_cast< USHORT >(nNew));
 830         }
 831         else if(SFX_HINT_DEINITIALIZING == nHintId)
 832         {
 833             DELETEZ(pWebUsrPref);
 834             DELETEZ(pUsrPref)   ;
 835             DELETEZ(pModuleConfig);
 836             DELETEZ(pPrtOpt)      ;
 837             DELETEZ(pWebPrtOpt)   ;
 838             DELETEZ(pChapterNumRules);
 839             DELETEZ(pStdFontConfig)     ;
 840             DELETEZ(pNavigationConfig)  ;
 841             DELETEZ(pToolbarConfig)     ;
 842             DELETEZ(pWebToolbarConfig)  ;
 843             DELETEZ(pAuthorNames)       ;
 844             DELETEZ(pDBConfig);
 845             EndListening(*pColorConfig);
 846             DELETEZ(pColorConfig);
 847             EndListening(*pAccessibilityOptions);
 848             DELETEZ(pAccessibilityOptions);
 849             EndListening(*pCTLOptions);
 850             DELETEZ(pCTLOptions);
 851             EndListening(*pUserOptions);
 852             DELETEZ(pUserOptions);
 853             EndListening(*pUndoOptions);
 854             DELETEZ(pUndoOptions);
 855         }
 856     }
 857 }
 858
 859 /* -----------------------------20.02.01 12:43--------------------------------
 860
 861  ---------------------------------------------------------------------------*/
 862 SwDBConfig*     SwModule::GetDBConfig()
 863 {
 864     if(!pDBConfig)
 865         pDBConfig = new SwDBConfig;
 866     return pDBConfig;
 867 }
 868 /* -----------------------------11.04.2002 15:27------------------------------
 869
 870  ---------------------------------------------------------------------------*/
 871 svtools::ColorConfig& SwModule::GetColorConfig()
 872 {
 873     if(!pColorConfig)
 874     {
 875         pColorConfig = new svtools::ColorConfig;
 876         SwViewOption::ApplyColorConfigValues(*pColorConfig);
 877         StartListening(*pColorConfig);
 878     }
 879     return *pColorConfig;
 880 }
 881 /* -----------------------------06.05.2002 09:42------------------------------
 882
 883  ---------------------------------------------------------------------------*/
 884 SvtAccessibilityOptions& SwModule::GetAccessibilityOptions()
 885 {
 886     if(!pAccessibilityOptions)
 887     {
 888         pAccessibilityOptions = new SvtAccessibilityOptions;
 889         StartListening(*pAccessibilityOptions);
 890     }
 891     return *pAccessibilityOptions;
 892 }
 893 /* -----------------06.05.2003 14:52-----------------
 894
 895  --------------------------------------------------*/
 896 SvtCTLOptions& SwModule::GetCTLOptions()
 897 {
 898     if(!pCTLOptions)
 899     {
 900         pCTLOptions = new SvtCTLOptions;
 901         StartListening(*pCTLOptions);
 902     }
 903     return *pCTLOptions;
 904 }
 905 /* -----------------07.07.2003 09:31-----------------
 906
 907  --------------------------------------------------*/
 908 SvtUserOptions& SwModule::GetUserOptions()
 909 {
 910     if(!pUserOptions)
 911     {
 912         pUserOptions = new SvtUserOptions;
 913         StartListening(*pUserOptions);
 914     }
 915     return *pUserOptions;
 916 }
 917 /* -----------------18.07.2003 13:31-----------------
 918
 919  --------------------------------------------------*/
 920 SvtUndoOptions& SwModule::GetUndoOptions()
 921 {
 922     if(!pUndoOptions)
 923     {
 924         pUndoOptions = new SvtUndoOptions;
 925         StartListening(*pUndoOptions);
 926     }
 927     return *pUndoOptions;
 928 }
 929 /*-----------------30.01.97 08.30-------------------
 930
 931 --------------------------------------------------*/
 932 const SwMasterUsrPref *SwModule::GetUsrPref(sal_Bool bWeb) const
 933 {
 934     SwModule* pNonConstModule = (SwModule*)this;
 935     if(bWeb && !pWebUsrPref)
 936     {
 937         // im Load der SwMasterUsrPref wird der SpellChecker gebraucht, dort darf
 938         // er aber nicht angelegt werden #58256#
 939         pNonConstModule->pWebUsrPref = new SwMasterUsrPref(TRUE);
 940     }
 941     else if(!bWeb && !pUsrPref)
 942     {
 943         pNonConstModule->pUsrPref = new SwMasterUsrPref(FALSE);
 944     }
 945     return  bWeb ? pWebUsrPref : pUsrPref;
 946 }
 947
 948
 949
 950 void NewXForms( SfxRequest& rReq )
 951 {
 952     // copied & excerpted from SwModule::InsertLab(..)
 953
 954     // create new document
 955     SfxObjectShellRef xDocSh( new SwDocShell( SFX_CREATE_MODE_STANDARD) );
 956     xDocSh->DoInitNew( 0 );
 957
 958     // initialize XForms
 959     static_cast<SwDocShell*>( &xDocSh )->GetDoc()->initXForms( true );
 960
 961     // put document into frame
 962     const SfxItemSet* pArgs = rReq.GetArgs();
 963     DBG_ASSERT( pArgs, "no arguments in SfxRequest");
 964     if( pArgs != NULL )
 965     {
 966         const SfxPoolItem* pFrameItem = NULL;
 967         pArgs->GetItemState( SID_DOCFRAME, FALSE, &pFrameItem );
 968         if( pFrameItem != NULL )
 969         {
 970             SfxFrame* pFrame =
 971                 static_cast<const SfxFrameItem*>( pFrameItem )->GetFrame();
 972             DBG_ASSERT( pFrame != NULL, "no frame?" );
 973             pFrame->InsertDocument( xDocSh );
 974         }
 975     }
 976
 977     // set return value
 978     rReq.SetReturnValue( SfxVoidItem( rReq.GetSlot() ) );
 979 }