xref: /AOO41X/main/sw/source/ui/app/docsh2.cxx (revision 03c97e340010506c11d4ffaab7f577e5f7050fe6)
1 /**************************************************************
2  *
3  * Licensed to the Apache Software Foundation (ASF) under one
4  * or more contributor license agreements.  See the NOTICE file
5  * distributed with this work for additional information
6  * regarding copyright ownership.  The ASF licenses this file
7  * to you under the Apache License, Version 2.0 (the
8  * "License"); you may not use this file except in compliance
9  * with the License.  You may obtain a copy of the License at
10  *
11  *   http://www.apache.org/licenses/LICENSE-2.0
12  *
13  * Unless required by applicable law or agreed to in writing,
14  * software distributed under the License is distributed on an
15  * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY
16  * KIND, either express or implied.  See the License for the
17  * specific language governing permissions and limitations
18  * under the License.
19  *
20  *************************************************************/
21 
22 
23 
24 // MARKER(update_precomp.py): autogen include statement, do not remove
25 #include "precompiled_sw.hxx"
26 
27 #include <com/sun/star/lang/XMultiServiceFactory.hpp>
28 #include <com/sun/star/frame/XDispatchHelper.hpp>
29 
30 #include <comphelper/processfactory.hxx>
31 
32 #include <hintids.hxx>
33 #include <tools/urlobj.hxx>
34 #include <unotools/tempfile.hxx>
35 #include <vcl/wrkwin.hxx>
36 #include <vcl/msgbox.hxx>
37 #include <svl/lckbitem.hxx>
38 #include <svl/eitem.hxx>
39 #include <svl/zforlist.hxx>
40 #include <svl/zformat.hxx>
41 #include <unotools/pathoptions.hxx>
42 #include <svtools/transfer.hxx>
43 #include <sfx2/dialogs.hrc>
44 #include <sfx2/dinfdlg.hxx>
45 #include <sfx2/request.hxx>
46 #include <sfx2/dispatch.hxx>
47 #include <sfx2/new.hxx>
48 #include <sfx2/filedlghelper.hxx>
49 #include <sfx2/printer.hxx>
50 #include <sfx2/evntconf.hxx>
51 #include <svtools/sfxecode.hxx>
52 #include <sfx2/docfile.hxx>
53 #include <sfx2/docfilt.hxx>
54 #include <svx/svxids.hrc>
55 #include <svx/drawitem.hxx>
56 #include <editeng/svxacorr.hxx>
57 #include <editeng/langitem.hxx>
58 #include <svx/fmshell.hxx>
59 
60 #include <svtools/htmlcfg.hxx>
61 #include <svx/ofaitem.hxx>
62 #include <SwSmartTagMgr.hxx>
63 #include <sfx2/app.hxx>
64 #include <basic/sbstar.hxx>
65 #include <basic/basmgr.hxx>
66 #include <sot/storage.hxx>
67 #include <sot/clsids.hxx>
68 #include <swunodef.hxx>
69 #include <fmtcol.hxx>
70 #include <swevent.hxx>
71 #include <view.hxx>         // fuer die aktuelle Sicht
72 #include <docsh.hxx>        // Dokumenterzeugung
73 #include <wrtsh.hxx>
74 #include <fldbas.hxx>
75 #include <viewopt.hxx>
76 #include <globdoc.hxx>
77 #include <fldwrap.hxx>
78 #include <redlndlg.hxx>
79 #include <docstyle.hxx>
80 #include <doc.hxx>
81 #include <IDocumentUndoRedo.hxx>
82 #include <pagedesc.hxx>
83 #include <shellio.hxx>
84 #include <pview.hxx>
85 #include <srcview.hxx>
86 #include <poolfmt.hxx>
87 #include <usrpref.hxx>
88 #include <wdocsh.hxx>
89 #include <unotxdoc.hxx>
90 #include <acmplwrd.hxx>
91 #include <swmodule.hxx>
92 #include <unobaseclass.hxx>
93 #include <swwait.hxx>
94 #include <swcli.hxx>
95 
96 #include <cmdid.h>
97 #include <globals.h>
98 #include <helpid.h>
99 #include <app.hrc>
100 #include <poolfmt.hrc>
101 #include <globals.hrc>
102 #include <com/sun/star/ui/dialogs/XFilePicker.hpp>
103 #include <com/sun/star/ui/dialogs/XFilterManager.hpp>
104 #include <com/sun/star/ui/dialogs/XFilePickerControlAccess.hpp>
105 #include <com/sun/star/ui/dialogs/ExtendedFilePickerElementIds.hpp>
106 #include <com/sun/star/ui/dialogs/ListboxControlActions.hpp>
107 #include <com/sun/star/ui/dialogs/CommonFilePickerElementIds.hpp>
108 #include "com/sun/star/ui/dialogs/TemplateDescription.hpp"
109 #ifdef FUTURE_VBA
110 #include <com/sun/star/script/vba/XVBAEventProcessor.hpp>
111 #include <com/sun/star/script/vba/VBAEventId.hpp>
112 #endif
113 #include <editeng/acorrcfg.hxx>
114 #include <SwStyleNameMapper.hxx>
115 
116 #include <sfx2/fcontnr.hxx>
117 
118 #include "swabstdlg.hxx"
119 #include "dialog.hrc"
120 #include "swabstdlg.hxx"
121 
122 #include <ndtxt.hxx>    //#outline level,add by zhaojianwei
123 
124 using namespace ::com::sun::star::ui::dialogs;
125 using namespace ::com::sun::star::lang;
126 using namespace ::com::sun::star::uno;
127 using namespace ::com::sun::star;
128 using ::rtl::OUString;
129 using namespace ::sfx2;
130 extern sal_Bool FindPhyStyle( SwDoc& , const String& , SfxStyleFamily );
131 
132 /*--------------------------------------------------------------------
133     Beschreibung:   DocInfo kreieren (virtuell)
134  --------------------------------------------------------------------*/
135 
136 SfxDocumentInfoDialog* SwDocShell::CreateDocumentInfoDialog(
137                                 Window *pParent, const SfxItemSet &rSet)
138 {
139     SfxDocumentInfoDialog* pDlg = new SfxDocumentInfoDialog(pParent, rSet);
140     //nur mit Statistik, wenn dieses Doc auch angezeigt wird, nicht
141     //aus dem Doc-Manager
142     SwDocShell* pDocSh = (SwDocShell*) SfxObjectShell::Current();
143     if( pDocSh == this )
144     {
145         //Nicht fuer SourceView.
146         SfxViewShell *pVSh = SfxViewShell::Current();
147         if ( pVSh && !pVSh->ISA(SwSrcView) )
148         {
149             SwAbstractDialogFactory* pFact = SwAbstractDialogFactory::Create();
150             DBG_ASSERT(pFact, "SwAbstractDialogFactory fail!");
151             pDlg->AddTabPage(TP_DOC_STAT, SW_RESSTR(STR_DOC_STAT),pFact->GetTabPageCreatorFunc( TP_DOC_STAT ),0);
152         }
153     }
154     return pDlg;
155 }
156 
157 // Disable "multiple layout"
158 
159 void    SwDocShell::ToggleBrowserMode(sal_Bool bSet, SwView* _pView )
160 {
161     GetDoc()->set(IDocumentSettingAccess::BROWSE_MODE, bSet );
162     UpdateFontList();
163     SwView* pTempView = _pView ? _pView : (SwView*)GetView();
164     if( pTempView )
165     {
166         pTempView->GetViewFrame()->GetBindings().Invalidate(FN_SHADOWCURSOR);
167         if( !GetDoc()->getPrinter( false ) )
168             pTempView->SetPrinter( GetDoc()->getPrinter( false ), SFX_PRINTER_PRINTER | SFX_PRINTER_JOBSETUP );
169         GetDoc()->CheckDefaultPageFmt();
170         SfxViewFrame *pTmpFrm = SfxViewFrame::GetFirst(this, sal_False);
171         do {
172             if( pTmpFrm != pTempView->GetViewFrame() )
173             {
174                 pTmpFrm->DoClose();
175                 pTmpFrm = SfxViewFrame::GetFirst(this, sal_False);
176             }
177             else
178                 pTmpFrm = pTmpFrm->GetNext(*pTmpFrm, this, sal_False);
179 
180         } while ( pTmpFrm );
181         const SwViewOption& rViewOptions = *pTempView->GetWrtShell().GetViewOptions();
182         pTempView->GetWrtShell().CheckBrowseView( sal_True );
183         pTempView->CheckVisArea();
184         if( bSet )
185         {
186             const SvxZoomType eType = (SvxZoomType)rViewOptions.GetZoomType();
187             if ( SVX_ZOOM_PERCENT != eType)
188                 ((SwView*)GetView())->SetZoom( eType );
189         }
190         pTempView->InvalidateBorder();
191         pTempView->SetNewWindowAllowed(!bSet);
192     }
193 }
194 // End of disabled "multiple layout"
195 
196 /// update text fields on document properties changes
197 void SwDocShell::DoFlushDocInfo()
198 {
199     if ( !pDoc ) return;
200 
201     bool bUnlockView(true);
202     if ( pWrtShell ) {
203         bUnlockView = !pWrtShell->IsViewLocked();
204         pWrtShell->LockView( sal_True );    // lock visible section
205         pWrtShell->StartAllAction();
206     }
207 
208     pDoc->DocInfoChgd();
209 
210     if ( pWrtShell ) {
211         pWrtShell->EndAllAction();
212         if ( bUnlockView ) {
213             pWrtShell->LockView( sal_False );
214         }
215     }
216 }
217 
218 #ifdef FUTURE_VBA
219 void lcl_processCompatibleSfxHint( const uno::Reference< script::vba::XVBAEventProcessor >& xVbaEvents, const SfxHint& rHint )
220 {
221     using namespace com::sun::star::script::vba::VBAEventId;
222     if ( rHint.ISA( SfxEventHint ) )
223     {
224         uno::Sequence< uno::Any > aArgs;
225         sal_uLong nEventId = ((SfxEventHint&)rHint).GetEventId();
226         switch( nEventId )
227         {
228             case SFX_EVENT_CREATEDOC:
229                 xVbaEvents->processVbaEvent( DOCUMENT_NEW, aArgs );
230             break;
231             case SFX_EVENT_OPENDOC:
232                 xVbaEvents->processVbaEvent( DOCUMENT_OPEN, aArgs );
233             break;
234         }
235     }
236 }
237 #endif
238 
239 /*--------------------------------------------------------------------
240     Beschreibung:   Benachrichtigung bei geaenderter DocInfo
241  --------------------------------------------------------------------*/
242 
243 void SwDocShell::Notify( SfxBroadcaster&, const SfxHint& rHint )
244 {
245     if( !pDoc )
246     {
247 //MA: Kommt bei der OLE-Registration vor!
248 //      ASSERT( !this, "DocShell ist nicht richtig initialisiert!" );
249         return ;
250     }
251 
252 #ifdef FUTURE_VBA
253     uno::Reference< script::vba::XVBAEventProcessor > xVbaEvents = pDoc->GetVbaEventProcessor();
254     if( xVbaEvents.is() )
255         lcl_processCompatibleSfxHint( xVbaEvents, rHint );
256 #endif
257 
258     sal_uInt16 nAction = 0;
259     if( rHint.ISA(SfxSimpleHint) )
260     {
261         // swithc for more actions
262         switch( ((SfxSimpleHint&) rHint).GetId() )
263         {
264             case SFX_HINT_TITLECHANGED:
265                 if( GetMedium() )
266                     nAction = 2;
267             break;
268         }
269     }
270     else if( rHint.ISA(SfxEventHint) &&
271         ((SfxEventHint&) rHint).GetEventId() == SFX_EVENT_LOADFINISHED )
272     {
273         // --> OD 2004-12-03 #i38126# - own action id
274         nAction = 3;
275         // <--
276     }
277 
278     if( nAction )
279     {
280         sal_Bool bUnlockView = sal_True; //initializing prevents warning
281         if( pWrtShell )
282         {
283             bUnlockView = !pWrtShell->IsViewLocked();
284             pWrtShell->LockView( sal_True );    //lock visible section
285             pWrtShell->StartAllAction();
286         }
287         switch( nAction )
288         {
289         case 2:
290             pDoc->GetSysFldType( RES_FILENAMEFLD )->UpdateFlds();
291             break;
292         // --> OD 2004-12-03 #i38126# - own action for event LOADFINISHED
293         // in order to avoid a modified document.
294         // --> OD 2005-02-01 #i41679# - Also for the instance of <SwDoc>
295         // it has to be assured, that it's not modified.
296         // Perform the same as for action id 1, but disable <SetModified>.
297         case 3:
298             {
299                 const bool bResetModified = IsEnableSetModified();
300                 if ( bResetModified )
301                     EnableSetModified( sal_False );
302                 // --> OD 2005-02-01 #i41679#
303                 const bool bIsDocModified = pDoc->IsModified();
304                 // <--
305 
306                 pDoc->DocInfoChgd( );
307 
308                 // --> OD 2005-02-01 #i41679#
309                 if ( !bIsDocModified )
310                     pDoc->ResetModified();
311                 // <--
312                 if ( bResetModified )
313                     EnableSetModified( sal_True );
314             }
315             break;
316         // <--
317         }
318 
319         if( pWrtShell )
320         {
321             pWrtShell->EndAllAction();
322             if( bUnlockView )
323                 pWrtShell->LockView( sal_False );
324         }
325     }
326 }
327 
328 /*--------------------------------------------------------------------
329     Beschreibung:   Benachrichtigung Doc schliessen
330  --------------------------------------------------------------------*/
331 
332 sal_uInt16 SwDocShell::PrepareClose( sal_Bool bUI, sal_Bool bForBrowsing )
333 {
334     sal_uInt16 nRet = SfxObjectShell::PrepareClose( bUI, bForBrowsing );
335 
336     if( sal_True == nRet ) //Unbedingt auf sal_True abfragen! (RET_NEWTASK)
337         EndListening( *this );
338 
339 #ifdef FUTURE_VBA
340     if( pDoc && IsInPrepareClose() )
341     {
342         uno::Reference< script::vba::XVBAEventProcessor > xVbaEvents = pDoc->GetVbaEventProcessor();
343         if( xVbaEvents.is() )
344         {
345             using namespace com::sun::star::script::vba::VBAEventId;
346             uno::Sequence< uno::Any > aArgs;
347             xVbaEvents->processVbaEvent( DOCUMENT_CLOSE, aArgs );
348         }
349     }
350 #endif
351     return nRet;
352 }
353 
354 /*--------------------------------------------------------------------
355     Beschreibung:   Organizer
356  --------------------------------------------------------------------*/
357 
358 sal_Bool SwDocShell::Insert( SfxObjectShell &rSource,
359     sal_uInt16  nSourceIdx1,        // SourcePool: oberste Inhaltsebene (Vorlagen/Makros)
360     sal_uInt16  nSourceIdx2,        // Index in den Inhalt
361     sal_uInt16  nSourceIdx3,        // Index in die Inhaltsebene
362     sal_uInt16 &rIdx1,              // und das gleiche fuer den DestinationPool
363     sal_uInt16 &rIdx2,              //      ""
364     sal_uInt16 &rIdx3,              //      ""
365     sal_uInt16 &rRemovedIdx )       // falls doppelte geloescht werden, Pos zurueck
366 {
367     // --> OD 2005-05-10 #i48949# - actions aren't undoable. Thus, allow no undo
368     // actions
369     // Note: The undo action stack is cleared at the end of this method.
370     ::sw::UndoGuard const undoGuard(GetDoc()->GetIDocumentUndoRedo());
371     // <--
372 
373     sal_Bool bRet = sal_False;
374 
375     if (INDEX_IGNORE == rIdx1 && CONTENT_STYLE == nSourceIdx1)
376         rIdx1 = CONTENT_STYLE;
377 
378     if (CONTENT_STYLE == nSourceIdx1 && CONTENT_STYLE == rIdx1)
379     {
380         SfxStyleSheetBasePool* pHisPool  = rSource.GetStyleSheetPool();
381         SwDocStyleSheetPool* pMyPool =
382             (SwDocStyleSheetPool*)GetStyleSheetPool();
383 
384         //  wir koennen nicht in uns selbst hin und her moven
385         if( pHisPool == pMyPool )
386             return sal_False;
387 
388         if( INDEX_IGNORE == rIdx2 )
389             rIdx2 = pMyPool->Count();
390 
391         // erstmal auf die Such-Maske "positionieren"
392         pHisPool->First();
393         SfxStyleSheetBase* pHisSheet = (*pHisPool)[nSourceIdx2];
394 
395         // wenn so eine Vorlage schon existiert: loeschen!
396         const String& rOldName = pHisSheet->GetName();
397         SfxStyleFamily eOldFamily( pHisSheet->GetFamily() );
398 
399         // dflt. PageDesc und StandardZeichenvorlage nie loeschen !!!
400         if( ( SFX_STYLE_FAMILY_PAGE == eOldFamily &&
401               const_cast<const SwDoc *>(pDoc)->GetPageDesc(0).GetName() ==
402               rOldName ) ||
403               ( SFX_STYLE_FAMILY_CHAR == eOldFamily &&
404                 rOldName == *SwStyleNameMapper::GetTextUINameArray()[ RES_POOLCOLL_STANDARD -
405                                                 RES_POOLCOLL_TEXT_BEGIN ] ))
406             return sal_False;
407 
408         SfxStyleFamily eMyOldFamily( pMyPool->GetSearchFamily() );
409         sal_uInt16 nMySrchMask = pMyPool->GetSearchMask();
410 
411         SfxStyleSheetBase* pExist;
412         if( ::FindPhyStyle( *pDoc, rOldName, eOldFamily ) )
413         {
414             // Bug 20365: nur uebernehmen, wenn das gewuenscht ist!
415             if( ERRCODE_BUTTON_OK != ErrorHandler::HandleError(
416                 *new MessageInfo( ERRCODE_SFXMSG_STYLEREPLACE, rOldName )) )
417             {
418                 return sal_False;
419             }
420 
421             // Da Replace den aStyleSheet-Member selbst benoetigt, muss
422             // das Ergebnis vom Find kopiert werden (s.u.))
423             rtl::Reference< SwDocStyleSheet > xExist( new SwDocStyleSheet(
424                     *(SwDocStyleSheet*)pMyPool->Find( rOldName, eOldFamily ) ) );
425             pMyPool->Replace( *pHisSheet, *xExist.get() );
426 
427             // An der Reihenfolge der Vorlagen im Pool aendert sich nichts.
428             rIdx2 = rIdx1 = INDEX_IGNORE;
429 
430             GetDoc()->SetModified();
431 
432             return sal_True;
433         }
434 
435         pMyPool->SetSearchMask( eOldFamily, nMySrchMask );
436 
437         // MIB 18.12.98: SwDocStyleSheetPool::Make liefert einen
438         // Pointer auf SwDocStyleSheetPool::aStyleSheet zurueck.
439         // Der gleiche Member von SwDocStyleSheetPool::Find benutzt.
440         // Deshalb muss hier mit einer Kopie gearbeitet werden.
441         // Vorsicht: SfxStyleSheetBase::SetFollow ruft seinerseits
442         // ein SwDocStyleSheetPool::Find auf, do dass es nicht genuegt
443         // die Find-Aufrufe in dieser Methode zu eleminieren.
444 
445         rtl::Reference< SwDocStyleSheet > xNewSheet( new SwDocStyleSheet( (SwDocStyleSheet&)pMyPool
446                 ->Make(rOldName, eOldFamily, pHisSheet->GetMask() ) ) );
447         if( SFX_STYLE_FAMILY_PAGE == eOldFamily && rSource.ISA(SwDocShell) )
448         {
449             // gesondert behandeln!!
450             SwPageDesc* pDestDsc = (SwPageDesc*)xNewSheet->GetPageDesc();
451             SwPageDesc* pCpyDsc = (SwPageDesc*)((SwDocStyleSheet*)pHisSheet)->GetPageDesc();
452             pDoc->CopyPageDesc( *pCpyDsc, *pDestDsc );
453         }
454         else
455             // die neue Vorlage mit den Attributen fuellen
456             xNewSheet->SetItemSet( pHisSheet->GetItemSet() );
457 
458         pMyPool->SetSearchMask( SFX_STYLE_FAMILY_ALL, nMySrchMask );
459 
460         if( xNewSheet->IsUserDefined() || xNewSheet->IsUsed() )
461         {
462             // Benutzte und Benutzer-definierte Vorlagen werden angezeigt.
463             // Dshalb muss hier der Index der neuen Vorlage im Pool
464             // ermittelt werden.
465             pExist = pMyPool->First();
466             sal_uInt16 nIdx = 0;
467             while( pExist )
468             {
469                 if( pExist->GetName() == rOldName &&
470                    eOldFamily == pExist->GetFamily() )
471                 {
472                     rIdx2 = nIdx;
473                     break;
474                 }
475                 pExist = pMyPool->Next();
476                 nIdx++;
477             }
478         }
479         else
480         {
481             // Andere Vorlagen werden nicht angezeigt.
482             rIdx1 = rIdx2 = INDEX_IGNORE;
483         }
484 
485 /*        pMyPool->Count();       //interne Liste neu fuellen lassen!!!!!
486 
487         // suchen, um die richige Insert-Position returnen zu koennen
488         pMyPool->Find( rOldName, SFX_STYLE_FAMILY_ALL, nMySrchMask );
489         rIdx2 = pMyPool->GetFindPos();*/
490 
491         // wer bekommt den Neuen als Parent? wer benutzt den Neuen als Follow?
492         // (immer nur ueber die Instanziierten!!!)
493         pMyPool->SetSearchMask( eOldFamily, nMySrchMask );
494         pMyPool->SetOrganizerMode( sal_True );
495         SfxStyleSheetBase* pTestSheet = pMyPool->First();
496         while (pTestSheet)
497         {
498             if (pTestSheet->GetFamily() == eOldFamily &&
499                 pTestSheet->HasParentSupport()        &&
500                 pTestSheet->GetParent() == rOldName)
501             {
502                 pTestSheet->SetParent(rOldName); // Verknuepfung neu aufbauen
503             }
504 
505             if (pTestSheet->GetFamily() == eOldFamily &&
506                 pTestSheet->HasFollowSupport()        &&
507                 pTestSheet->GetFollow() == rOldName)
508             {
509                 pTestSheet->SetFollow(rOldName); // Verknuepfung neu aufbauen
510             }
511 
512             pTestSheet = pMyPool->Next();
513         }
514         pMyPool->SetOrganizerMode( SFX_CREATE_MODE_ORGANIZER == GetCreateMode() );
515 
516         // hat der Neue einen Parent? wenn ja, mit gleichem Namen bei uns suchen
517         if (pHisSheet->HasParentSupport())
518         {
519             const String& rParentName = pHisSheet->GetParent();
520             if (0 != rParentName.Len())
521             {
522                 SfxStyleSheetBase* pParentOfNew = pMyPool->Find(rParentName,
523                                                                 eOldFamily);
524                 if (pParentOfNew)
525                 {
526                     xNewSheet->SetParent(rParentName);
527                 }
528                 pMyPool->SetSearchMask( eOldFamily, nMySrchMask );
529             }
530         }
531 
532         // hat der Neue einen Follow? wenn ja, mit gleichem Namen bei uns suchen
533         if (pHisSheet->HasFollowSupport())
534         {
535             const String& rFollowName = pHisSheet->GetFollow();
536             if (0 != rFollowName.Len())
537             {
538                 SfxStyleSheetBase* pFollowOfNew = pMyPool->Find(rFollowName,
539                                                                 eOldFamily);
540                 if (pFollowOfNew)
541                 {
542                     xNewSheet->SetFollow(rFollowName);
543                 }
544                 pMyPool->SetSearchMask( eOldFamily, nMySrchMask );
545             }
546         }
547 
548         // Bug 27347: alte Einstellung wieder setzen
549         pMyPool->SetSearchMask( eMyOldFamily, nMySrchMask );
550 
551         // Model geaendert
552         ASSERT(pDoc, "Doc fehlt");
553         GetDoc()->SetModified();
554 
555         bRet = sal_True;
556     }
557     else
558         bRet = SfxObjectShell::Insert( rSource,
559                     nSourceIdx1,
560                     nSourceIdx2,
561                     nSourceIdx3,
562                     rIdx1,
563                     rIdx2,
564                     rIdx3,
565                     rRemovedIdx);
566 
567     // --> OD 2005-05-10 #i48949# - actions aren't undoable and could have change
568     // the document node array. Thus, clear the undo action stack.
569     if (undoGuard.UndoWasEnabled())
570     {
571         GetDoc()->GetIDocumentUndoRedo().DelAllUndoObj();
572     }
573     // <--
574 
575     return bRet;
576 }
577 
578 /*--------------------------------------------------------------------
579     Beschreibung:   Vorlagen Remove
580  --------------------------------------------------------------------*/
581 
582 sal_Bool SwDocShell::Remove(sal_uInt16 nIdx1,       // siehe Insert
583                         sal_uInt16 nIdx2,
584                         sal_uInt16 nIdx3)
585 {
586     sal_Bool bRet = sal_False;
587 
588     if (CONTENT_STYLE == nIdx1)
589     {
590         SwDocStyleSheetPool* pMyPool = (SwDocStyleSheetPool*)GetStyleSheetPool();
591 
592         pMyPool->First();       // vorm Zugriff Pool aktualisieren!!
593         SfxStyleSheetBase* pMySheet = (*pMyPool)[nIdx2];
594 
595         String aName( pMySheet->GetName() );
596         SfxStyleFamily eFamily( pMySheet->GetFamily() );
597 
598         // dflt. PageDesc und StandardZeichenvorlage nie loeschen !!!
599         if( ( SFX_STYLE_FAMILY_PAGE == eFamily &&
600               const_cast<const SwDoc *>(pDoc)->GetPageDesc(0).GetName()
601               == aName ) ||
602               ( SFX_STYLE_FAMILY_CHAR == eFamily &&
603                 aName == *SwStyleNameMapper::GetTextUINameArray()[ RES_POOLCOLL_STANDARD -
604                                                 RES_POOLCOLL_TEXT_BEGIN ] ))
605             return sal_False;
606 
607         // also loeschen
608         pMyPool->Remove( pMySheet );
609 
610         // jetzt noch die Parents/Follows aller Instanziierten korrigieren
611         pMyPool->SetOrganizerMode( sal_True );
612         SfxStyleSheetBase* pTestSheet = pMyPool->First();
613         while (pTestSheet)
614         {
615             if (pTestSheet->GetFamily() == eFamily &&
616                 pTestSheet->HasParentSupport()     &&
617                 pTestSheet->GetParent() == aName)
618             {
619                 pTestSheet->SetParent( aEmptyStr ); // Verknuepfung aufloesen
620             }
621 
622             if (pTestSheet->GetFamily() == eFamily &&
623                 pTestSheet->HasFollowSupport()        &&
624                 pTestSheet->GetFollow() == aName)
625             {
626                 pTestSheet->SetFollow( aEmptyStr ); // Verknuepfung aufloesen
627             }
628 
629             pTestSheet = pMyPool->Next();
630         }
631         pMyPool->SetOrganizerMode( SFX_CREATE_MODE_ORGANIZER == GetCreateMode() );
632 
633         bRet = sal_True;
634     }
635     else
636         bRet = SfxObjectShell::Remove(  nIdx1,
637                                         nIdx2,
638                                         nIdx3 );
639 
640 
641     // Model geaendert
642     ASSERT(pDoc, "Doc fehlt");
643     GetDoc()->SetModified();
644 
645     return bRet;
646 }
647 
648 /*--------------------------------------------------------------------
649     Beschreibung:
650  --------------------------------------------------------------------*/
651 
652 void SwDocShell::Execute(SfxRequest& rReq)
653 {
654     const SfxItemSet* pArgs = rReq.GetArgs();
655     const SfxPoolItem* pItem;
656     sal_uInt16 nWhich = rReq.GetSlot();
657     sal_Bool bDone = sal_False;
658     switch ( nWhich )
659     {
660         case SID_AUTO_CORRECT_DLG:
661         {
662             SvxSwAutoFmtFlags* pAFlags = &SvxAutoCorrCfg::Get()->GetAutoCorrect()->GetSwFlags();
663             SwAutoCompleteWord& rACW = SwDoc::GetAutoCompleteWords();
664 
665             sal_Bool bOldLocked = rACW.IsLockWordLstLocked(),
666                  bOldAutoCmpltCollectWords = pAFlags->bAutoCmpltCollectWords;
667 
668             rACW.SetLockWordLstLocked( sal_True );
669 
670             SvStringsISortDtor aTmpLst;
671             aTmpLst.Insert( &rACW.GetWordList() );
672             pAFlags->pAutoCmpltList = &aTmpLst;
673 
674             SfxApplication* pApp = SFX_APP();
675             SfxRequest aAppReq(SID_AUTO_CORRECT_DLG, SFX_CALLMODE_SYNCHRON, pApp->GetPool());
676             SfxBoolItem aSwOptions( SID_AUTO_CORRECT_DLG, sal_True );
677             aAppReq.AppendItem(aSwOptions);
678 
679             // SMARTTAGS
680             pAFlags->pSmartTagMgr = &SwSmartTagMgr::Get();
681 
682             //pApp->ExecuteSlot(aAppReq);
683 
684             SfxItemSet aSet( pApp->GetPool(), SID_AUTO_CORRECT_DLG, SID_AUTO_CORRECT_DLG, SID_OPEN_SMARTTAGOPTIONS, SID_OPEN_SMARTTAGOPTIONS, 0 );
685             aSet.Put( aSwOptions );
686 
687             const SfxPoolItem* pOpenSmartTagOptionsItem = 0;
688             if( pArgs && SFX_ITEM_SET == pArgs->GetItemState( SID_OPEN_SMARTTAGOPTIONS, sal_False, &pOpenSmartTagOptionsItem ) )
689                 aSet.Put( *static_cast<const SfxBoolItem*>(pOpenSmartTagOptionsItem) );
690 
691             SfxAbstractDialogFactory* pFact = SfxAbstractDialogFactory::Create();
692             SfxAbstractTabDialog* pDlg = pFact->CreateTabDialog( RID_OFA_AUTOCORR_DLG, NULL, &aSet, NULL );
693             pDlg->Execute();
694             delete pDlg;
695 
696             rACW.SetLockWordLstLocked( bOldLocked );
697 
698             SwEditShell::SetAutoFmtFlags( pAFlags );
699             rACW.SetMinWordLen( pAFlags->nAutoCmpltWordLen );
700             rACW.SetMaxCount( pAFlags->nAutoCmpltListLen );
701             if( pAFlags->pAutoCmpltList )  // any changes?
702             {
703                 rACW.CheckChangedList( aTmpLst );
704                 // clear the temp WordList pointer
705                 pAFlags->pAutoCmpltList = 0;
706             }
707             // remove all pointer we never delete the strings
708             aTmpLst.Remove( (sal_uInt16)0, aTmpLst.Count() );
709 
710             if( !bOldAutoCmpltCollectWords && bOldAutoCmpltCollectWords !=
711                 pAFlags->bAutoCmpltCollectWords )
712             {
713                 // call on all Docs the idle formatter to start
714                 // the collection of Words
715                 TypeId aType = TYPE(SwDocShell);
716                 for( SwDocShell *pDocSh = (SwDocShell*)SfxObjectShell::GetFirst(&aType);
717                     pDocSh;
718                     pDocSh = (SwDocShell*)SfxObjectShell::GetNext( *pDocSh, &aType ) )
719                 {
720                     SwDoc* pTmp = pDocSh->GetDoc();
721                     if ( pTmp->GetCurrentViewShell() )  //swmod 071108//swmod 071225
722                         pTmp->InvalidateAutoCompleteFlag();
723                 }
724             }
725         }
726         break;
727 
728         case SID_PRINTPREVIEW:
729             {
730                 sal_Bool bSet = sal_False, bFound = sal_False, bOnly = sal_True;
731                 SfxViewFrame *pTmpFrm = SfxViewFrame::GetFirst(this);
732                 SfxViewShell* pViewShell = SfxViewShell::Current();
733                 SwView* pCurrView = dynamic_cast< SwView *> ( pViewShell );
734                 sal_Bool bCurrent = IS_TYPE( SwPagePreView, pViewShell );
735 
736                 while( pTmpFrm )    // search PreView
737                 {
738                     if( IS_TYPE( SwView, pTmpFrm->GetViewShell()) )
739                         bOnly = sal_False;
740                     else if( IS_TYPE( SwPagePreView, pTmpFrm->GetViewShell()))
741                     {
742                         pTmpFrm->GetFrame().Appear();
743                         bFound = sal_True;
744                     }
745                     if( bFound && !bOnly )
746                         break;
747                     pTmpFrm = pTmpFrm->GetNext(*pTmpFrm, this);
748                 }
749 
750                 if( pArgs && SFX_ITEM_SET ==
751                     pArgs->GetItemState( SID_PRINTPREVIEW, sal_False, &pItem ))
752                     bSet = ((SfxBoolItem*)pItem)->GetValue();
753                 else
754                     bSet = !bCurrent;
755 
756                 sal_uInt16 nSlotId = 0;
757                 if( bSet && !bFound )   // Keine gefunden, daher neue Preview anlegen
758                         nSlotId = SID_VIEWSHELL1;
759                 else if( bFound && !bSet )
760                     nSlotId = bOnly ? SID_VIEWSHELL0 : SID_VIEWSHELL1;
761 
762                 if( nSlotId )
763                 {
764                     //JP 23.8.2001: Bug 91360 - PagePreView in the WebDocShell
765                     //              is found under Id ViewShell2.
766                     if( ISA(SwWebDocShell) && SID_VIEWSHELL1 == nSlotId )
767                         nSlotId = SID_VIEWSHELL2;
768 
769                     if( pCurrView && pCurrView->GetDocShell() == this )
770                         pTmpFrm = pCurrView->GetViewFrame();
771                     else
772                         pTmpFrm = SfxViewFrame::GetFirst( this );
773 
774                     pTmpFrm->GetDispatcher()->Execute( nSlotId, 0, 0, SFX_CALLMODE_ASYNCHRON );
775                 }
776 
777                 rReq.SetReturnValue(SfxBoolItem(SID_PRINTPREVIEW, bSet ));
778             }
779             break;
780         case SID_TEMPLATE_LOAD:
781             {
782                 String aFileName;
783                 static sal_Bool bText = sal_True;
784                 static sal_Bool bFrame = sal_False;
785                 static sal_Bool bPage =  sal_False;
786                 static sal_Bool bNum =   sal_False;
787                 static sal_Bool bMerge = sal_False;
788                 sal_uInt16 nRet = USHRT_MAX;
789 
790                 sal_uInt16 nFlags = bFrame ? SFX_LOAD_FRAME_STYLES : 0;
791                 if(bPage)
792                     nFlags|= SFX_LOAD_PAGE_STYLES;
793                 if(bNum)
794                     nFlags|= SFX_LOAD_NUM_STYLES;
795                 if(!nFlags || bText)
796                     nFlags|= SFX_LOAD_TEXT_STYLES;
797                 if(bMerge)
798                     nFlags|= SFX_MERGE_STYLES;
799 
800                 if ( pArgs )
801                 {
802                     SFX_REQUEST_ARG( rReq, pTemplateItem, SfxStringItem, SID_TEMPLATE_NAME, sal_False );
803                     if ( pTemplateItem )
804                     {
805                         aFileName = pTemplateItem->GetValue();
806                         SFX_REQUEST_ARG( rReq, pFlagsItem, SfxInt32Item, SID_TEMPLATE_LOAD, sal_False );
807                         if ( pFlagsItem )
808                             nFlags = (sal_uInt16) pFlagsItem->GetValue();
809                     }
810                 }
811 
812                 if ( !aFileName.Len() )
813                 {
814                     SvtPathOptions aPathOpt;
815                     SfxNewFileDialog* pNewFileDlg =
816                         new SfxNewFileDialog(&GetView()->GetViewFrame()->GetWindow(), SFXWB_LOAD_TEMPLATE);
817                     pNewFileDlg->SetTemplateFlags(nFlags);
818 
819                     nRet = pNewFileDlg->Execute();
820                     if(RET_TEMPLATE_LOAD == nRet)
821                     {
822                         FileDialogHelper aDlgHelper( TemplateDescription::FILEOPEN_SIMPLE, 0 );
823                         uno::Reference < XFilePicker > xFP = aDlgHelper.GetFilePicker();
824 
825                         xFP->setDisplayDirectory( aPathOpt.GetWorkPath() );
826 
827                         SfxObjectFactory &rFact = GetFactory();
828                         SfxFilterMatcher aMatcher( String::CreateFromAscii(rFact.GetShortName()) );
829                         SfxFilterMatcherIter aIter( &aMatcher );
830                         uno::Reference<XFilterManager> xFltMgr(xFP, UNO_QUERY);
831                         const SfxFilter* pFlt = aIter.First();
832                         while( pFlt )
833                         {
834                             // --> OD #i117339#
835 //                            if( pFlt && pFlt->IsAllowedAsTemplate() )
836                             if( pFlt && pFlt->IsAllowedAsTemplate() &&
837                                 ( pFlt->GetUserData().EqualsAscii("CXML") ||
838                                   pFlt->GetUserData().EqualsAscii("CXMLV") ) )
839                             {
840                                 const String sWild = ((WildCard&)pFlt->GetWildcard()).GetWildCard();
841                                 xFltMgr->appendFilter( pFlt->GetUIName(), sWild );
842                             }
843                             pFlt = aIter.Next();
844                         }
845                         sal_Bool bWeb = 0 != dynamic_cast< SwWebDocShell *>( this );
846                         const SfxFilter *pOwnFlt =
847                                 SwDocShell::Factory().GetFilterContainer()->
848                                 GetFilter4FilterName(String::CreateFromAscii("writer8"));
849 
850                         //#b6439685# make sure the default file format is also available
851                         if(bWeb)
852                         {
853                             const String sWild = ((WildCard&)pOwnFlt->GetWildcard()).GetWildCard();
854                             xFltMgr->appendFilter( pOwnFlt->GetUIName(), sWild );
855                         }
856 
857                         bool bError = false;
858                         //#b6439685# catch expception if wrong filter is selected - should not happen anymore
859                         try
860                         {
861                             xFltMgr->setCurrentFilter( pOwnFlt->GetUIName() );
862                         }
863                         catch( const uno::Exception& )
864                         {
865                             bError = true;
866                         }
867 
868                         if( !bError && ERRCODE_NONE == aDlgHelper.Execute() )
869                         {
870                             aFileName = xFP->getFiles().getConstArray()[0];
871                         }
872                     }
873                     else if( RET_OK == nRet)
874                     {
875                         aFileName = pNewFileDlg->GetTemplateFileName();
876                     }
877 
878                     nFlags = pNewFileDlg->GetTemplateFlags();
879                     rReq.AppendItem( SfxStringItem( SID_TEMPLATE_NAME, aFileName ) );
880                     rReq.AppendItem( SfxInt32Item( SID_TEMPLATE_LOAD, (long) nFlags ) );
881                     delete pNewFileDlg;
882                 }
883 
884                 if( aFileName.Len() )
885                 {
886                     SwgReaderOption aOpt;
887                     aOpt.SetTxtFmts(    bText = (0 != (nFlags&SFX_LOAD_TEXT_STYLES) ));
888                     aOpt.SetFrmFmts(    bFrame = (0 != (nFlags&SFX_LOAD_FRAME_STYLES)));
889                     aOpt.SetPageDescs(  bPage = (0 != (nFlags&SFX_LOAD_PAGE_STYLES )));
890                     aOpt.SetNumRules(   bNum = (0 != (nFlags&SFX_LOAD_NUM_STYLES  )));
891                     //different meaning between SFX_MERGE_STYLES and aOpt.SetMerge!
892                     bMerge = 0 != (nFlags&SFX_MERGE_STYLES);
893                     aOpt.SetMerge( !bMerge );
894 
895                     SetError( LoadStylesFromFile( aFileName, aOpt, sal_False ), ::rtl::OUString( RTL_CONSTASCII_USTRINGPARAM( OSL_LOG_PREFIX ) ));
896                     if ( !GetError() )
897                         rReq.Done();
898                 }
899             }
900             break;
901             case SID_SOURCEVIEW:
902             {
903                 SfxViewShell* pViewShell = GetView()
904                                             ? (SfxViewShell*)GetView()
905                                             : SfxViewShell::Current();
906                 SfxViewFrame*  pViewFrm = pViewShell->GetViewFrame();
907                 SwSrcView* pSrcView = dynamic_cast< SwSrcView *>( pViewShell );
908                 if(!pSrcView)
909                 {
910                     // 3 possible state:
911                     // 1 - file unsaved -> save as HTML
912                     // 2 - file modified and HTML filter active -> save
913                     // 3 - file saved in non-HTML -> QueryBox to save as HTML
914                     const SfxFilter* pHtmlFlt =
915                                     SwIoSystem::GetFilterOfFormat(
916                                         String::CreateFromAscii("HTML"),
917                                         SwWebDocShell::Factory().GetFilterContainer() );
918                     sal_Bool bLocalHasName = HasName();
919                     if(bLocalHasName)
920                     {
921                         //check for filter type
922                         const SfxFilter* pFlt = GetMedium()->GetFilter();
923                         if(!pFlt || pFlt->GetUserData() != pHtmlFlt->GetUserData())
924                         {
925                             QueryBox aQuery(&pViewFrm->GetWindow(), SW_RES(MSG_SAVEAS_HTML_QUERY));
926                             if(RET_YES == aQuery.Execute())
927                                 bLocalHasName = sal_False;
928                             else
929                                 break;
930                         }
931                     }
932                     if(!bLocalHasName)
933                     {
934                         FileDialogHelper aDlgHelper( TemplateDescription::FILESAVE_AUTOEXTENSION, 0 );
935                         aDlgHelper.AddFilter( pHtmlFlt->GetFilterName(), pHtmlFlt->GetDefaultExtension() );
936                         aDlgHelper.SetCurrentFilter( pHtmlFlt->GetFilterName() );
937                         if( ERRCODE_NONE != aDlgHelper.Execute())
938                         {
939                             break;
940                         }
941                         String sPath = aDlgHelper.GetPath();
942                         SfxStringItem aName(SID_FILE_NAME, sPath);
943                         SfxStringItem aFilter(SID_FILTER_NAME, pHtmlFlt->GetName());
944                         const SfxBoolItem* pBool = (const SfxBoolItem*)
945                                 pViewFrm->GetDispatcher()->Execute(
946                                         SID_SAVEASDOC, SFX_CALLMODE_SYNCHRON, &aName, &aFilter, 0L );
947                         if(!pBool || !pBool->GetValue())
948                             break;
949                     }
950                 }
951 #ifdef DBG_UTIL
952                 {
953                     sal_Bool bWeb = 0 != dynamic_cast<SwWebDocShell*>(this);
954                     DBG_ASSERT(bWeb == sal_True, "SourceView nur in der WebDocShell");
955                 }
956 #endif
957                 // die SourceView ist fuer die SwWebDocShell die 1
958                 sal_uInt16 nSlot = SID_VIEWSHELL1;
959                 sal_Bool bSetModified = sal_False;
960                 SfxPrinter* pSavePrinter = 0;
961                 if( 0 != pSrcView)
962                 {
963                     SfxPrinter* pTemp = GetDoc()->getPrinter( false );
964                     if(pTemp)
965                         pSavePrinter = new SfxPrinter(*pTemp);
966                     bSetModified = IsModified() || pSrcView->IsModified();
967                     if(pSrcView->IsModified()||pSrcView->HasSourceSaved())
968                     {
969                         utl::TempFile aTempFile;
970                         aTempFile.EnableKillingFile();
971                         pSrcView->SaveContent(aTempFile.GetURL());
972                         bDone = sal_True;
973                         SvxMacro aMac(aEmptyStr, aEmptyStr, STARBASIC);
974                         SfxEventConfiguration::ConfigureEvent(GlobalEventConfig::GetEventName( STR_EVENT_OPENDOC ), aMac, this);
975                         SfxEventConfiguration::ConfigureEvent(GlobalEventConfig::GetEventName( STR_EVENT_PREPARECLOSEDOC ), aMac, this);
976                         SfxEventConfiguration::ConfigureEvent(GlobalEventConfig::GetEventName( STR_EVENT_ACTIVATEDOC ),     aMac, this);
977                         SfxEventConfiguration::ConfigureEvent(GlobalEventConfig::GetEventName( STR_EVENT_DEACTIVATEDOC ), aMac, this);
978                         ReloadFromHtml(aTempFile.GetURL(), pSrcView);
979                         nSlot = 0;
980                     }
981                     else
982                     {
983                         nSlot = SID_VIEWSHELL0;
984                     }
985                 }
986 /*   OS 10.04.97 14.20: Im Web-Writer gibt es keinen Unterschied zwischen
987                         Export in den SourceMode und dem Speichern des Docs
988                 else if(IsModified())
989                 {
990                     sal_uInt16 nRet = QueryBox( SFX_APPWINDOW ,SW_RES(MSG_SAVE_HTML_QUERY)).Execute();
991                     if(RET_YES == nRet)
992                     {
993                         S F X _DISPATCHER().Execute(SID_SAVEDOC,
994                                     SFX_CALLMODE_SYNCHRON);
995                         // der ReturnValue von SID_SAVEDOC ist etwas schwer verstaendlich
996                         if(IsModified())
997                             nSlot = 0;
998                     }
999                     else if( RET_CANCEL == nRet )
1000                     {
1001                         nSlot = 0;
1002                     }
1003                 }*/
1004                 if(nSlot)
1005                     pViewFrm->GetDispatcher()->Execute(nSlot, SFX_CALLMODE_SYNCHRON);
1006                 if(bSetModified)
1007                     GetDoc()->SetModified();
1008                 if(pSavePrinter)
1009                 {
1010                     GetDoc()->setPrinter( pSavePrinter, true, true);
1011                     //pSavePrinter darf nicht wieder geloescht werden
1012                 }
1013                 pViewFrm->GetBindings().SetState(SfxBoolItem(SID_SOURCEVIEW, nSlot == SID_VIEWSHELL2));
1014                 pViewFrm->GetBindings().Invalidate( SID_NEWWINDOW );
1015                 pViewFrm->GetBindings().Invalidate( SID_BROWSER_MODE );
1016                 pViewFrm->GetBindings().Invalidate( FN_PRINT_LAYOUT );
1017             }
1018             break;
1019             case SID_GET_COLORTABLE:
1020             {
1021                 SvxColorTableItem* pColItem = (SvxColorTableItem*)GetItem(SID_COLOR_TABLE);
1022                 XColorTable* pTable = pColItem->GetColorTable();
1023                 rReq.SetReturnValue(OfaPtrItem(SID_GET_COLORTABLE, pTable));
1024             }
1025             break;
1026         case FN_ABSTRACT_STARIMPRESS:
1027         case FN_ABSTRACT_NEWDOC:
1028         {
1029             SwAbstractDialogFactory* pFact = SwAbstractDialogFactory::Create();
1030             DBG_ASSERT(pFact, "SwAbstractDialogFactory fail!");
1031 
1032             AbstractSwInsertAbstractDlg* pDlg = pFact->CreateSwInsertAbstractDlg(0, DLG_INSERT_ABSTRACT );
1033             DBG_ASSERT(pDlg, "Dialogdiet fail!");
1034             if(RET_OK == pDlg->Execute())
1035             {
1036                 sal_uInt8 nLevel = pDlg->GetLevel();
1037                 sal_uInt8 nPara = pDlg->GetPara();
1038                 SwDoc* pSmryDoc = new SwDoc();
1039                 SfxObjectShellLock xDocSh( new SwDocShell( pSmryDoc, SFX_CREATE_MODE_STANDARD));
1040                 xDocSh->DoInitNew( 0 );
1041 
1042                 sal_Bool bImpress = FN_ABSTRACT_STARIMPRESS == nWhich;
1043                 pDoc->Summary( pSmryDoc, nLevel, nPara, bImpress );
1044                 if( bImpress )
1045                 {
1046                     WriterRef xWrt;
1047                     // mba: looks as if relative URLs don't make sense here
1048                     ::GetRTFWriter( aEmptyStr, String(), xWrt );
1049                     SvMemoryStream *pStrm = new SvMemoryStream();
1050                     pStrm->SetBufferSize( 16348 );
1051                     SwWriter aWrt( *pStrm, *pSmryDoc );
1052                     ErrCode eErr = aWrt.Write( xWrt );
1053                     if( !ERRCODE_TOERROR( eErr ) )
1054                     {
1055                         uno::Reference< lang::XMultiServiceFactory > xORB = ::comphelper::getProcessServiceFactory();
1056                         uno::Reference< frame::XDispatchProvider > xProv(
1057                             xORB->createInstance( ::rtl::OUString::createFromAscii("com.sun.star.drawing.ModuleDispatcher")), UNO_QUERY );
1058                         if ( xProv.is() )
1059                         {
1060                             ::rtl::OUString aCmd = ::rtl::OUString::createFromAscii( "SendOutlineToImpress" );
1061                             uno::Reference< frame::XDispatchHelper > xHelper(
1062                                 xORB->createInstance( ::rtl::OUString::createFromAscii("com.sun.star.frame.DispatchHelper")), UNO_QUERY );
1063                             if ( xHelper.is() )
1064                             {
1065                                 pStrm->Seek( STREAM_SEEK_TO_END );
1066                                 *pStrm << '\0';
1067                                 pStrm->Seek( STREAM_SEEK_TO_BEGIN );
1068 
1069                                 // Transfer ownership of stream to a lockbytes object
1070                                 SvLockBytes aLockBytes( pStrm, sal_True );
1071                                 SvLockBytesStat aStat;
1072                                 if ( aLockBytes.Stat( &aStat, SVSTATFLAG_DEFAULT ) == ERRCODE_NONE )
1073                                 {
1074                                     sal_uInt32 nLen = aStat.nSize;
1075                                     sal_uLong nRead = 0;
1076                                     uno::Sequence< sal_Int8 > aSeq( nLen );
1077                                     aLockBytes.ReadAt( 0, aSeq.getArray(), nLen, &nRead );
1078 
1079                                     uno::Sequence< beans::PropertyValue > aArgs(1);
1080                                     aArgs[0].Name = ::rtl::OUString::createFromAscii("RtfOutline");
1081                                     aArgs[0].Value <<= aSeq;
1082                                     xHelper->executeDispatch( xProv, aCmd, ::rtl::OUString(), 0, aArgs );
1083                                 }
1084                             }
1085                         }
1086                     }
1087                     else
1088                         ErrorHandler::HandleError(ErrCode( eErr ));
1089                 }
1090                 else
1091                 {
1092                     // Neues Dokument erzeugen.
1093                     SfxViewFrame *pFrame = SfxViewFrame::LoadDocument( *xDocSh, 0 );
1094                     SwView      *pCurrView = (SwView*) pFrame->GetViewShell();
1095 
1096                     // Dokumenttitel setzen
1097                     String aTmp( SW_RES(STR_ABSTRACT_TITLE) );
1098                     aTmp += GetTitle();
1099                     xDocSh->SetTitle( aTmp );
1100                     pCurrView->GetWrtShell().SetNewDoc();
1101                     pFrame->Show();
1102                     pSmryDoc->SetModified();
1103                 }
1104 
1105             }
1106             delete pDlg;
1107         }
1108         break;
1109         case FN_OUTLINE_TO_CLIPBOARD:
1110         case FN_OUTLINE_TO_IMPRESS:
1111             {
1112                 sal_Bool bEnable = IsEnableSetModified();
1113                 EnableSetModified( sal_False );
1114                 WriterRef xWrt;
1115                 // mba: looks as if relative URLs don't make sense here
1116                 ::GetRTFWriter( 'O', String(), xWrt );
1117                 SvMemoryStream *pStrm = new SvMemoryStream();
1118                 pStrm->SetBufferSize( 16348 );
1119                 SwWriter aWrt( *pStrm, *GetDoc() );
1120                 ErrCode eErr = aWrt.Write( xWrt );
1121                 EnableSetModified( bEnable );
1122                 if( !ERRCODE_TOERROR( eErr ) )
1123                 {
1124                     pStrm->Seek( STREAM_SEEK_TO_END );
1125                     *pStrm << '\0';
1126                     pStrm->Seek( STREAM_SEEK_TO_BEGIN );
1127                     if ( nWhich == FN_OUTLINE_TO_IMPRESS )
1128                     {
1129                         uno::Reference< lang::XMultiServiceFactory > xORB = ::comphelper::getProcessServiceFactory();
1130                         uno::Reference< frame::XDispatchProvider > xProv(
1131                             xORB->createInstance( ::rtl::OUString::createFromAscii("com.sun.star.drawing.ModuleDispatcher")), UNO_QUERY );
1132                         if ( xProv.is() )
1133                         {
1134                             ::rtl::OUString aCmd = ::rtl::OUString::createFromAscii( "SendOutlineToImpress" );
1135                             uno::Reference< frame::XDispatchHelper > xHelper(
1136                                 xORB->createInstance( ::rtl::OUString::createFromAscii("com.sun.star.frame.DispatchHelper")), UNO_QUERY );
1137                             if ( xHelper.is() )
1138                             {
1139                                 pStrm->Seek( STREAM_SEEK_TO_END );
1140                                 *pStrm << '\0';
1141                                 pStrm->Seek( STREAM_SEEK_TO_BEGIN );
1142 
1143                                 // Transfer ownership of stream to a lockbytes object
1144                                 SvLockBytes aLockBytes( pStrm, sal_True );
1145                                 SvLockBytesStat aStat;
1146                                 if ( aLockBytes.Stat( &aStat, SVSTATFLAG_DEFAULT ) == ERRCODE_NONE )
1147                                 {
1148                                     sal_uInt32 nLen = aStat.nSize;
1149                                     sal_uLong nRead = 0;
1150                                     uno::Sequence< sal_Int8 > aSeq( nLen );
1151                                     aLockBytes.ReadAt( 0, aSeq.getArray(), nLen, &nRead );
1152 
1153                                     uno::Sequence< beans::PropertyValue > aArgs(1);
1154                                     aArgs[0].Name = ::rtl::OUString::createFromAscii("RtfOutline");
1155                                     aArgs[0].Value <<= aSeq;
1156                                     xHelper->executeDispatch( xProv, aCmd, ::rtl::OUString(), 0, aArgs );
1157                                 }
1158                             }
1159                         }
1160                     }
1161                     else
1162                     {
1163                         TransferDataContainer* pClipCntnr =
1164                                                     new TransferDataContainer;
1165                         STAR_REFERENCE( datatransfer::XTransferable )
1166                                                         xRef( pClipCntnr );
1167 
1168                         pClipCntnr->CopyAnyData( FORMAT_RTF, (sal_Char*)
1169                                     pStrm->GetData(), pStrm->GetEndOfData() );
1170                         pClipCntnr->CopyToClipboard(
1171                             GetView()? (Window*)&GetView()->GetEditWin() : 0 );
1172                         delete pStrm;
1173                     }
1174                 }
1175                 else
1176                     ErrorHandler::HandleError(ErrCode( eErr ));
1177             }
1178             break;
1179             case SID_SPELLCHECKER_CHANGED:
1180                 //! sal_False, sal_True, sal_True is on the save side but a probably overdone
1181                 SW_MOD()->CheckSpellChanges(sal_False, sal_True, sal_True, sal_False );
1182             break;
1183 
1184         case SID_MAIL_PREPAREEXPORT:
1185         {
1186             //pWrtShell is not set in page preview
1187             if(pWrtShell)
1188                 pWrtShell->StartAllAction();
1189             pDoc->UpdateFlds( NULL, false );
1190             pDoc->EmbedAllLinks();
1191             pDoc->RemoveInvisibleContent();
1192             if(pWrtShell)
1193                 pWrtShell->EndAllAction();
1194         }
1195         break;
1196 
1197         case SID_MAIL_EXPORT_FINISHED:
1198         {
1199                 if(pWrtShell)
1200                     pWrtShell->StartAllAction();
1201                 //try to undo the removal of invisible content
1202                 pDoc->RestoreInvisibleContent();
1203                 if(pWrtShell)
1204                     pWrtShell->EndAllAction();
1205         }
1206         break;
1207         case FN_NEW_HTML_DOC:
1208         case FN_NEW_GLOBAL_DOC:
1209             {
1210                 bDone = sal_False;
1211                 sal_Bool bCreateHtml = FN_NEW_HTML_DOC == nWhich;
1212 
1213                 sal_Bool bCreateByOutlineLevel = false;     //#outline level,add by zhaojianwei
1214                 sal_Int32  nTemplateOutlineLevel = 0 ;      //#outline level,add by zhaojianwei
1215 
1216                 String aFileName, aTemplateName;
1217                 if( pArgs && SFX_ITEM_SET == pArgs->GetItemState( nWhich, sal_False, &pItem ) )
1218                 {
1219                     aFileName = ((const SfxStringItem*)pItem)->GetValue();
1220                     SFX_ITEMSET_ARG( pArgs, pTemplItem, SfxStringItem, SID_TEMPLATE_NAME, sal_False );
1221                     if ( pTemplItem )
1222                         aTemplateName = pTemplItem->GetValue();
1223                 }
1224                 bool bError = false;
1225                 if ( !aFileName.Len() )
1226                 {
1227                     FileDialogHelper aDlgHelper( TemplateDescription::FILESAVE_AUTOEXTENSION_TEMPLATE, 0 );
1228 
1229                     const sal_Int16 nControlIds[] = {
1230                         CommonFilePickerElementIds::PUSHBUTTON_OK,
1231                         CommonFilePickerElementIds::PUSHBUTTON_CANCEL,
1232                         CommonFilePickerElementIds::LISTBOX_FILTER,
1233                         CommonFilePickerElementIds::CONTROL_FILEVIEW,
1234                         CommonFilePickerElementIds::EDIT_FILEURL,
1235                         ExtendedFilePickerElementIds::CHECKBOX_AUTOEXTENSION,
1236                         ExtendedFilePickerElementIds::LISTBOX_TEMPLATE,
1237                         0
1238                     };
1239 
1240                     const char* aHTMLHelpIds[] =
1241                     {
1242                          HID_SEND_HTML_CTRL_PUSHBUTTON_OK,
1243                          HID_SEND_HTML_CTRL_PUSHBUTTON_CANCEL,
1244                          HID_SEND_HTML_CTRL_LISTBOX_FILTER,
1245                          HID_SEND_HTML_CTRL_CONTROL_FILEVIEW,
1246                          HID_SEND_HTML_CTRL_EDIT_FILEURL,
1247                          HID_SEND_HTML_CTRL_CHECKBOX_AUTOEXTENSION,
1248                          HID_SEND_HTML_CTRL_LISTBOX_TEMPLATE,
1249                          ""
1250                     };
1251 
1252                     const char* aMasterHelpIds[] =
1253                     {
1254                          HID_SEND_MASTER_CTRL_PUSHBUTTON_OK,
1255                          HID_SEND_MASTER_CTRL_PUSHBUTTON_CANCEL,
1256                          HID_SEND_MASTER_CTRL_LISTBOX_FILTER,
1257                          HID_SEND_MASTER_CTRL_CONTROL_FILEVIEW,
1258                          HID_SEND_MASTER_CTRL_EDIT_FILEURL,
1259                          HID_SEND_MASTER_CTRL_CHECKBOX_AUTOEXTENSION,
1260                          HID_SEND_MASTER_CTRL_LISTBOX_TEMPLATE,
1261                          ""
1262                     };
1263 
1264                     const char** pHelpIds = bCreateHtml ? aHTMLHelpIds : aMasterHelpIds;
1265                     aDlgHelper.SetControlHelpIds( nControlIds, pHelpIds );
1266                     uno::Reference < XFilePicker > xFP = aDlgHelper.GetFilePicker();
1267 
1268                     const SfxFilter* pFlt;
1269                     sal_uInt16 nStrId;
1270 
1271                     if( bCreateHtml )
1272                     {
1273                         // fuer HTML gibts es nur einen Filter!!
1274                         pFlt = SwIoSystem::GetFilterOfFormat(
1275                                 String::CreateFromAscii("HTML"),
1276                                 SwWebDocShell::Factory().GetFilterContainer() );
1277                         nStrId = STR_LOAD_HTML_DOC;
1278                     }
1279                     else
1280                     {
1281                         // Fuer Global-Dokumente bieten wir jetzt auch nur
1282                         // noch den aktuellen an.
1283                         pFlt = SwGlobalDocShell::Factory().GetFilterContainer()->
1284                                     GetFilter4Extension( String::CreateFromAscii("odm")  );
1285                         nStrId = STR_LOAD_GLOBAL_DOC;
1286                     }
1287 
1288                     if( pFlt )
1289                     {
1290                         uno::Reference<XFilterManager> xFltMgr(xFP, UNO_QUERY);
1291                         const String sWild = ((WildCard&)pFlt->GetWildcard()).GetWildCard();
1292                         xFltMgr->appendFilter( pFlt->GetUIName(), sWild );
1293                         try
1294                         {
1295                             xFltMgr->setCurrentFilter( pFlt->GetUIName() ) ;
1296                         }
1297                         catch( const uno::Exception& )
1298                         {
1299                             bError = true;
1300                         }
1301                     }
1302                     if(!bError)
1303                     {
1304                         uno::Reference<XFilePickerControlAccess> xCtrlAcc(xFP, UNO_QUERY);
1305 
1306                 //#removed by zhaojianwei
1307 
1308         //             const sal_uInt16 nCount = pDoc->GetTxtFmtColls()->Count();
1309         //                Sequence<OUString> aListBoxEntries(nCount);
1310         //                OUString* pEntries = aListBoxEntries.getArray();
1311         //                sal_Int32 nIdx = 0;
1312         //                sal_Int16 nSelect = 0;
1313         //                OUString sStartTemplate;
1314         //                SwTxtFmtColl *pFnd = 0, *pAny = 0;
1315         //                for(sal_uInt16 i = 0; i < nCount; ++i)
1316         //                {
1317         //                    SwTxtFmtColl &rTxtColl =
1318         //                                    *pDoc->GetTxtFmtColls()->GetObject( i );
1319         //                    if( !rTxtColl.IsDefault() && rTxtColl.IsAtDocNodeSet() )
1320         //                    {
1321         //                        //if( MAXLEVEL >= rTxtColl.GetOutlineLevel() && ( !pFnd ||            //#outline level,zhaojianwei
1322                                 //if(  rTxtColl.IsAssignedToListLevelOfOutlineStyle()  && ( !pFnd ||    //<-end,zhaojianwei
1323         //                            pFnd->GetAssignedOutlineStyleLevel() > rTxtColl.GetAssignedOutlineStyleLevel() ))
1324         //                        {
1325         //                                nSelect = (sal_Int16)nIdx;
1326         //                                pFnd = &rTxtColl;
1327         //                                sStartTemplate = rTxtColl.GetName();
1328         //                        }
1329         //                        else if( !pAny )
1330         //                            pAny = &rTxtColl;
1331         //                        //pEntries[nIdx++] = rTxtColl.GetName();          //#outline level,remove by zhaojianwei
1332         //                        pEntries[nIdx++] = sStyles + rTxtColl.GetName();  //#outline level,add by zhaojianwei
1333         //                    }
1334         //                }
1335         //                if(!sStartTemplate.getLength() && pAny)
1336         //                    sStartTemplate = pAny->GetName();
1337         //                aListBoxEntries.realloc(nIdx);
1338                 //<-end,zhaojianwei
1339 
1340 
1341                     //#outline level,add by zhaojianwei
1342                     /////////////////////////////////////////////////////////////////////
1343 
1344                         bool    bOutline[MAXLEVEL] = {false};
1345                         const SwOutlineNodes& rOutlNds = pDoc->GetNodes().GetOutLineNds();
1346                         if( rOutlNds.Count() )
1347                         {
1348                             int nLevel;
1349                             for(sal_uInt16 n = 0; n < rOutlNds.Count(); ++n )
1350                                 if( ( nLevel = rOutlNds[n]->GetTxtNode()->GetAttrOutlineLevel()) > 0 &&
1351                                     ! bOutline[nLevel-1] )
1352                                 {
1353                                     bOutline[nLevel-1] = true;
1354                                 }
1355                         }
1356 
1357                         const sal_uInt16 nStyleCount = pDoc->GetTxtFmtColls()->Count();
1358                         Sequence<OUString> aListBoxEntries( MAXLEVEL + nStyleCount);
1359                         OUString* pEntries = aListBoxEntries.getArray();
1360                         sal_Int32   nIdx = 0 ;
1361 
1362                         OUString    sOutline( SW_RESSTR(STR_FDLG_OUTLINE_LEVEL) );
1363                         for( sal_uInt16 i = 0; i < MAXLEVEL; ++i )
1364                         {
1365                             if( bOutline[i] )
1366                                 pEntries[nIdx++] = sOutline + String::CreateFromInt32( i+1 );
1367                         }
1368 
1369                         OUString    sStyle( SW_RESSTR(STR_FDLG_STYLE) );
1370                         for(sal_uInt16 i = 0; i < nStyleCount; ++i)
1371                         {
1372                             SwTxtFmtColl &rTxtColl =
1373                                 *pDoc->GetTxtFmtColls()->GetObject( i );
1374                             if( !rTxtColl.IsDefault() && rTxtColl.IsAtDocNodeSet() )
1375                             {
1376                                 pEntries[nIdx++] = sStyle + rTxtColl.GetName();
1377                             }
1378                         }
1379 
1380                         aListBoxEntries.realloc(nIdx);
1381                         sal_Int16 nSelect = 0;
1382                     /////////////////////////////////////////////////////////////////////
1383                     //<-end,zhaojianwei
1384 
1385                         try
1386                         {
1387                             Any aTemplates(&aListBoxEntries, ::getCppuType(&aListBoxEntries));
1388 
1389                             xCtrlAcc->setValue( ExtendedFilePickerElementIds::LISTBOX_TEMPLATE,
1390                                 ListboxControlActions::ADD_ITEMS , aTemplates );
1391                             Any aSelectPos(&nSelect, ::getCppuType(&nSelect));
1392                             xCtrlAcc->setValue( ExtendedFilePickerElementIds::LISTBOX_TEMPLATE,
1393                                 ListboxControlActions::SET_SELECT_ITEM, aSelectPos );
1394                             xCtrlAcc->setLabel( ExtendedFilePickerElementIds::LISTBOX_TEMPLATE,
1395                                                     String(SW_RES( STR_FDLG_TEMPLATE_NAME )));
1396                         }
1397                         catch(Exception& )
1398                         {
1399                             DBG_ERROR("control acces failed");
1400                         }
1401 
1402                         xFP->setTitle( SW_RESSTR( nStrId ));
1403                         SvtPathOptions aPathOpt;
1404                         xFP->setDisplayDirectory( aPathOpt.GetWorkPath() );
1405                         if( ERRCODE_NONE == aDlgHelper.Execute())
1406                         {
1407                             aFileName = xFP->getFiles().getConstArray()[0];
1408                             Any aTemplateValue = xCtrlAcc->getValue(
1409                                 ExtendedFilePickerElementIds::LISTBOX_TEMPLATE,
1410                                 ListboxControlActions::GET_SELECTED_ITEM );
1411                             OUString sTmpl;
1412                             aTemplateValue >>= sTmpl;
1413                             //aTemplateName = sTmpl;    //#outline level,removed by zhaojianwei
1414                             //#outline level,add by zhaojianwei
1415 
1416                             sal_Int32 nColonPos = sTmpl.indexOf( sal_Unicode(':') );
1417                             OUString sPrefix = sTmpl.copy( 0L, nColonPos );
1418                             if( sPrefix.equalsAscii("Style"))
1419                             {
1420                                 aTemplateName = sTmpl.copy( 7L );   //get string behind "Style: "
1421                             }
1422                             else if( sPrefix.equalsAscii("Outline"))
1423                             {
1424                                 nTemplateOutlineLevel = ( sTmpl.copy( 15L )).toInt32(); //get string behind "Outline: Leve  ";
1425                                 bCreateByOutlineLevel = true;
1426                             }
1427                             //<-end,zhaojianwei
1428 
1429                             if ( aFileName.Len() )
1430                             {
1431                                 rReq.AppendItem( SfxStringItem( nWhich, aFileName ) );
1432                                 if( aTemplateName.Len() )
1433                                     rReq.AppendItem( SfxStringItem( SID_TEMPLATE_NAME, aTemplateName ) );
1434                             }
1435                         }
1436                     }
1437                 }
1438 
1439                 //const SwTxtFmtColl* pSplitColl = 0;       //#outline level,removed by zhaojianwei
1440     //            if ( aTemplateName.Len() )
1441     //                pSplitColl = pDoc->FindTxtFmtCollByName(aTemplateName);
1442                                                             //<-end,zhaojianwei
1443                 if( aFileName.Len() )
1444                 {
1445                     if( PrepareClose( sal_False ) )
1446                     {
1447                         SwWait aWait( *this, sal_True );
1448 
1449                         //bDone = bCreateHtml           //#outline level,removed by zhaojianwei
1450                         //  ? pDoc->GenerateHTMLDoc( aFileName, pSplitColl )
1451                         //  : pDoc->GenerateGlobalDoc( aFileName, pSplitColl );
1452                         if ( bCreateByOutlineLevel )    //add by zhaojianwei
1453                         {
1454                             bDone = bCreateHtml         //#outline level,removed by zhaojianwei
1455                                 ? pDoc->GenerateHTMLDoc( aFileName, nTemplateOutlineLevel )
1456                                 : pDoc->GenerateGlobalDoc( aFileName, nTemplateOutlineLevel );
1457                         }
1458                         else
1459                         {
1460                             const SwTxtFmtColl* pSplitColl = 0;
1461                             if ( aTemplateName.Len() )
1462                                 pSplitColl = pDoc->FindTxtFmtCollByName(aTemplateName);
1463                             bDone = bCreateHtml         //#outline level,removed by zhaojianwei
1464                                 ? pDoc->GenerateHTMLDoc( aFileName, pSplitColl )
1465                                 : pDoc->GenerateGlobalDoc( aFileName, pSplitColl );
1466                         }
1467                         //<-end,zhaojianwei
1468                         if( bDone )
1469                         {
1470                             SfxStringItem aName( SID_FILE_NAME, aFileName );
1471                             SfxStringItem aReferer( SID_REFERER, aEmptyStr );
1472                             SfxViewShell* pViewShell = SfxViewShell::GetFirst();
1473                             while(pViewShell)
1474                             {
1475                                 //search for the view that created the call
1476                                 if(pViewShell->GetObjectShell() == this && pViewShell->GetDispatcher())
1477                                 {
1478                                     SfxFrameItem* pFrameItem = new SfxFrameItem( SID_DOCFRAME,
1479                                                         pViewShell->GetViewFrame() );
1480                                     SfxDispatcher* pDispatch = pViewShell->GetDispatcher();
1481                                     pDispatch->Execute(
1482                                             SID_OPENDOC,
1483                                             SFX_CALLMODE_ASYNCHRON,
1484                                             &aName,
1485                                             &aReferer,
1486                                             pFrameItem, 0L );
1487 
1488                                     delete pFrameItem;
1489                                     break;
1490                                 }
1491                                 pViewShell = SfxViewShell::GetNext(*pViewShell);
1492                             }
1493                         }
1494                     }
1495                     if( !bDone && !rReq.IsAPI() )
1496                     {
1497                         InfoBox( 0, SW_RESSTR( STR_CANTCREATE )).Execute();
1498                     }
1499                 }
1500             }
1501             rReq.SetReturnValue(SfxBoolItem( nWhich, bDone ));
1502             if (bDone)
1503                 rReq.Done();
1504             else
1505                 rReq.Ignore();
1506             break;
1507 
1508         case SID_ATTR_YEAR2000:
1509             if ( pArgs && SFX_ITEM_SET == pArgs->GetItemState( nWhich , sal_False, &pItem ))
1510             {
1511                 DBG_ASSERT(pItem->ISA(SfxUInt16Item), "falsches Item");
1512                 sal_uInt16 nYear2K = ((SfxUInt16Item*)pItem)->GetValue();
1513                 //ueber Views iterieren und den State an den FormShells setzen
1514 
1515                 SfxViewFrame* pVFrame = SfxViewFrame::GetFirst( this );
1516                 SfxViewShell* pViewShell = pVFrame ? pVFrame->GetViewShell() : 0;
1517                 SwView* pCurrView = dynamic_cast< SwView* >( pViewShell );
1518                 while(pCurrView)
1519                 {
1520                     FmFormShell* pFormShell = pCurrView->GetFormShell();
1521                     if(pFormShell)
1522                         pFormShell->SetY2KState(nYear2K);
1523                     pVFrame = SfxViewFrame::GetNext( *pVFrame, this );
1524                     pViewShell = pVFrame ? pVFrame->GetViewShell() : 0;
1525                     pCurrView = dynamic_cast<SwView*>( pViewShell );
1526                 }
1527                 pDoc->GetNumberFormatter(sal_True)->SetYear2000(nYear2K);
1528             }
1529         break;
1530 
1531         default: DBG_ERROR("falscher Dispatcher");
1532     }
1533 }
1534 
1535 
1536 /*--------------------------------------------------------------------
1537     Beschreibung:
1538  --------------------------------------------------------------------*/
1539 
1540 long SwDocShell::DdeGetData( const String& rItem, const String& rMimeType,
1541                                 uno::Any & rValue )
1542 {
1543     return pDoc->GetData( rItem, rMimeType, rValue );
1544 }
1545 
1546 
1547 /*--------------------------------------------------------------------
1548     Beschreibung:
1549  --------------------------------------------------------------------*/
1550 
1551 long SwDocShell::DdeSetData( const String& rItem, const String& rMimeType,
1552                             const uno::Any & rValue )
1553 {
1554     return pDoc->SetData( rItem, rMimeType, rValue );
1555 }
1556 
1557 
1558 /*--------------------------------------------------------------------
1559     Beschreibung:
1560  --------------------------------------------------------------------*/
1561 
1562 ::sfx2::SvLinkSource* SwDocShell::DdeCreateLinkSource( const String& rItem )
1563 {
1564     return pDoc->CreateLinkSource( rItem );
1565 }
1566 
1567 /*--------------------------------------------------------------------
1568     Beschreibung:
1569  --------------------------------------------------------------------*/
1570 
1571 void SwDocShell::FillClass( SvGlobalName * pClassName,
1572                                    sal_uInt32 * pClipFormat,
1573                                    String * /*pAppName*/,
1574                                    String * pLongUserName,
1575                                    String * pUserName,
1576                                    sal_Int32 nVersion,
1577                                    sal_Bool bTemplate /* = sal_False */) const
1578 {
1579     if (nVersion == SOFFICE_FILEFORMAT_60)
1580     {
1581         *pClassName     = SvGlobalName( SO3_SW_CLASSID_60 );
1582         *pClipFormat    = SOT_FORMATSTR_ID_STARWRITER_60;
1583         *pLongUserName = SW_RESSTR(STR_WRITER_DOCUMENT_FULLTYPE);
1584     }
1585     else if (nVersion == SOFFICE_FILEFORMAT_8)
1586     {
1587         *pClassName     = SvGlobalName( SO3_SW_CLASSID_60 );
1588         *pClipFormat    = bTemplate ? SOT_FORMATSTR_ID_STARWRITER_8_TEMPLATE : SOT_FORMATSTR_ID_STARWRITER_8;
1589         *pLongUserName = SW_RESSTR(STR_WRITER_DOCUMENT_FULLTYPE);
1590     }
1591 
1592     *pUserName = SW_RESSTR(STR_HUMAN_SWDOC_NAME);
1593 }
1594 
1595 
1596 /*--------------------------------------------------------------------
1597     Beschreibung:
1598  --------------------------------------------------------------------*/
1599 
1600 void SwDocShell::SetModified( sal_Bool bSet )
1601 {
1602     SfxObjectShell::SetModified( bSet );
1603     if( IsEnableSetModified())
1604     {
1605          if (!pDoc->IsInCallModified() )
1606          {
1607             EnableSetModified( sal_False );
1608             if( bSet )
1609             {
1610                 sal_Bool bOld = pDoc->IsModified();
1611                 pDoc->SetModified();
1612                 if( !bOld )
1613                 {
1614                     pDoc->GetIDocumentUndoRedo().SetUndoNoResetModified();
1615                 }
1616             }
1617             else
1618                 pDoc->ResetModified();
1619 
1620             EnableSetModified( sal_True );
1621          }
1622 
1623         UpdateChildWindows();
1624         Broadcast(SfxSimpleHint(SFX_HINT_DOCCHANGED));
1625     }
1626 }
1627 
1628 /*--------------------------------------------------------------------
1629     Beschreibung:
1630  --------------------------------------------------------------------*/
1631 
1632 void SwDocShell::UpdateChildWindows()
1633 {
1634     // Flddlg ggf neu initialisieren (z.B. fuer TYP_SETVAR)
1635     if(!GetView())
1636         return;
1637     SfxViewFrame* pVFrame = GetView()->GetViewFrame();
1638     SwFldDlgWrapper *pWrp = (SwFldDlgWrapper*)pVFrame->
1639             GetChildWindow( SwFldDlgWrapper::GetChildWindowId() );
1640     if( pWrp )
1641         pWrp->ReInitDlg( this );
1642 
1643     // RedlineDlg ggf neu initialisieren
1644     SwRedlineAcceptChild *pRed = (SwRedlineAcceptChild*)pVFrame->
1645             GetChildWindow( SwRedlineAcceptChild::GetChildWindowId() );
1646     if( pRed )
1647         pRed->ReInitDlg( this );
1648 }
1649 
1650 /*--------------------------------------------------------------------
1651     Beschreibung:
1652  --------------------------------------------------------------------*/
1653 // --> OD 2005-08-02 #i48748#
1654 class SwReloadFromHtmlReader : public SwReader
1655 {
1656     public:
1657         SwReloadFromHtmlReader( SfxMedium& _rTmpMedium,
1658                                 const String& _rFilename,
1659                                 SwDoc* _pDoc )
1660             : SwReader( _rTmpMedium, _rFilename, _pDoc )
1661         {
1662             SetBaseURL( _rFilename );
1663         }
1664 };
1665 // <--
1666 void SwDocShell::ReloadFromHtml( const String& rStreamName, SwSrcView* pSrcView )
1667 {
1668     sal_Bool bModified = IsModified();
1669 
1670     // MIB 23.6.97: Die HTTP-Header-Felder muessen geloescht werden,
1671     // sonst gibt es welche aus Meta-Tags hinter doppelt und dreifach.
1672     ClearHeaderAttributesForSourceViewHack();
1673 
1674     // MIB 24.07.97: Das Dokument-Basic muss auch noch d'ran glauben ...
1675     SvxHtmlOptions* pHtmlOptions = SvxHtmlOptions::Get();
1676     //#59620# HasBasic() zeigt an, dass es schon einen BasicManager an der DocShell
1677     //          gibt. Der wurde im HTML-Import immer angelegt, wenn Macros im Quelltext
1678     //          vorhanden sind.
1679     if( pHtmlOptions && pHtmlOptions->IsStarBasic() && HasBasic())
1680     {
1681         BasicManager *pBasicMan = GetBasicManager();
1682         if( pBasicMan && (pBasicMan != SFX_APP()->GetBasicManager()) )
1683         {
1684             sal_uInt16 nLibCount = pBasicMan->GetLibCount();
1685             while( nLibCount )
1686             {
1687                 StarBASIC *pBasic = pBasicMan->GetLib( --nLibCount );
1688                 if( pBasic )
1689                 {
1690                     // Die IDE benachrichtigen
1691                     SfxUsrAnyItem aShellItem( SID_BASICIDE_ARG_DOCUMENT_MODEL, makeAny( GetModel() ) );
1692                     String aLibName( pBasic->GetName() );
1693                     SfxStringItem aLibNameItem( SID_BASICIDE_ARG_LIBNAME, aLibName );
1694                     pSrcView->GetViewFrame()->GetDispatcher()->Execute(
1695                                             SID_BASICIDE_LIBREMOVED,
1696                                             SFX_CALLMODE_SYNCHRON,
1697                                             &aShellItem, &aLibNameItem, 0L );
1698 
1699                     // Aus der Standard-Lib werden nur die Module geloescht
1700                     if( nLibCount )
1701                         pBasicMan->RemoveLib( nLibCount, sal_True );
1702                     else
1703                         pBasic->Clear();
1704                 }
1705             }
1706 
1707             ASSERT( pBasicMan->GetLibCount() <= 1,
1708                     "Loschen des Basics hat nicht geklappt" );
1709         }
1710     }
1711     sal_Bool bWasBrowseMode = pDoc->get(IDocumentSettingAccess::BROWSE_MODE);
1712     RemoveLink();
1713 
1714     //jetzt muss auch das UNO-Model ueber das neue Doc informiert werden #51535#
1715     uno::Reference<text::XTextDocument> xDoc(GetBaseModel(), uno::UNO_QUERY);
1716     text::XTextDocument* pxDoc = xDoc.get();
1717     ((SwXTextDocument*)pxDoc)->InitNewDoc();
1718 
1719     AddLink();
1720     //#116402# update font list when new document is created
1721     UpdateFontList();
1722     pDoc->set(IDocumentSettingAccess::BROWSE_MODE, bWasBrowseMode);
1723     pSrcView->SetPool(&GetPool());
1724 
1725 
1726     const String& rMedname = GetMedium()->GetName();
1727 
1728     // fix #51032#: Die HTML-Vorlage muss noch gesetzt werden
1729     SetHTMLTemplate( *GetDoc() );   //Styles aus HTML.vor
1730 
1731     SfxViewShell* pViewShell = GetView() ? (SfxViewShell*)GetView()
1732                                          : SfxViewShell::Current();
1733     SfxViewFrame*  pViewFrm = pViewShell->GetViewFrame();
1734     pViewFrm->GetDispatcher()->Execute( SID_VIEWSHELL0, SFX_CALLMODE_SYNCHRON );
1735 
1736     SubInitNew();
1737 
1738     SfxMedium aMed( rStreamName, STREAM_READ, sal_False );
1739     // --> OD 2005-08-01 #i48748# - use class <SwReloadFromHtmlReader>, because
1740     // the base URL has to be set to the filename of the document <rMedname>
1741     // and not to the base URL of the temporary file <aMed> in order to get
1742     // the URLs of the linked graphics correctly resolved.
1743     SwReloadFromHtmlReader aReader( aMed, rMedname, pDoc );
1744     // <--
1745     aReader.Read( *ReadHTML );
1746 
1747     const SwView* pCurrView = GetView();
1748     //in print layout the first page(s) may have been formatted as a mix of browse
1749     //and print layout
1750     if(!bWasBrowseMode && pCurrView)
1751     {
1752         SwWrtShell& rWrtSh = pCurrView->GetWrtShell();
1753         if( rWrtSh.GetLayout())
1754             rWrtSh.CheckBrowseView( sal_True );
1755     }
1756 
1757 
1758     // MIB 23.6.97: Die HTTP-Header-Attribute wieder in die DokInfo
1759     // uebernehmen. Die Base-URL ist hier egal, da TLX zum absolutieren die
1760     // vom Dokument nimmt.
1761     SetHeaderAttributesForSourceViewHack();
1762 
1763     if(bModified && !IsReadOnly())
1764         SetModified();
1765     else
1766         pDoc->ResetModified();
1767 }
1768 
1769 sal_uLong SwDocShell::LoadStylesFromFile( const String& rURL,
1770                     SwgReaderOption& rOpt, sal_Bool bUnoCall )
1771 {
1772     sal_uLong nErr = 0;
1773 
1774     // Create a URL from filename
1775     INetURLObject aURLObj( rURL );
1776     String sURL( aURLObj.GetMainURL( INetURLObject::NO_DECODE ) );
1777 
1778     // Filter bestimmen:
1779 //  const SfxFilter* pFlt = SwIoSystem::GetFileFilter( rURL, aEmptyStr );
1780     String sFactory(String::CreateFromAscii(SwDocShell::Factory().GetShortName()));
1781     SfxFilterMatcher aMatcher( sFactory );
1782 
1783     //#b6445961#  search for filter in WebDocShell, too
1784     SfxMedium aMed( rURL, STREAM_STD_READ, sal_False );
1785     const SfxFilter* pFlt = 0;
1786     aMatcher.DetectFilter( aMed, &pFlt, sal_False, sal_False );
1787     if(!pFlt)
1788     {
1789         String sWebFactory(String::CreateFromAscii(SwWebDocShell::Factory().GetShortName()));
1790         SfxFilterMatcher aWebMatcher( sWebFactory );
1791         aWebMatcher.DetectFilter( aMed, &pFlt, sal_False, sal_False );
1792     }
1793     // --> OD #i117339# - trigger import only for own formats
1794 //    if( aMed.IsStorage() )
1795     bool bImport( false );
1796     {
1797         if ( aMed.IsStorage() )
1798         {
1799             // As <SfxMedium.GetFilter().IsOwnFormat() resp. IsOwnTemplateFormat()
1800             // does not work correct (e.g., MS Word 2007 XML Template),
1801             // use workaround provided by MAV.
1802             uno::Reference< embed::XStorage > xStorage = aMed.GetStorage();
1803             if ( xStorage.is() )
1804             {
1805                 // use <try-catch> on retrieving <MediaType> in order to check,
1806                 // if the storage is one of our own ones.
1807                 try
1808                 {
1809                     uno::Reference< beans::XPropertySet > xProps( xStorage, uno::UNO_QUERY_THROW );
1810                     const ::rtl::OUString aMediaTypePropName( RTL_CONSTASCII_USTRINGPARAM( "MediaType" ) );
1811                     xProps->getPropertyValue( aMediaTypePropName );
1812                     bImport = true;
1813                 }
1814                 catch( const uno::Exception& )
1815                 {
1816                     bImport = false;
1817                 }
1818             }
1819         }
1820     }
1821     if ( bImport )
1822     // <--
1823     {
1824         DBG_ASSERT((pFlt ? pFlt->GetVersion() : 0) >= SOFFICE_FILEFORMAT_60, "which file version?");
1825         SwRead pRead =  ReadXML;
1826         SwReader* pReader = 0;
1827         SwPaM* pPam = 0;
1828         // the SW3IO - Reader need the pam/wrtshell, because only then he
1829         // insert the styles!
1830         if( bUnoCall )
1831         {
1832             SwNodeIndex aIdx( pDoc->GetNodes().GetEndOfContent(), -1 );
1833             pPam = new SwPaM( aIdx );
1834             pReader = new SwReader( aMed, rURL, *pPam );
1835         }
1836         else
1837         {
1838             pReader = new SwReader( aMed, rURL, *pWrtShell->GetCrsr() );
1839         }
1840 
1841         pRead->GetReaderOpt().SetTxtFmts( rOpt.IsTxtFmts() );
1842         pRead->GetReaderOpt().SetFrmFmts( rOpt.IsFrmFmts() );
1843         pRead->GetReaderOpt().SetPageDescs( rOpt.IsPageDescs() );
1844         pRead->GetReaderOpt().SetNumRules( rOpt.IsNumRules() );
1845         pRead->GetReaderOpt().SetMerge( rOpt.IsMerge() );
1846 
1847         if( bUnoCall )
1848         {
1849             UnoActionContext aAction( pDoc );
1850             nErr = pReader->Read( *pRead );
1851         }
1852         else
1853         {
1854             pWrtShell->StartAllAction();
1855             nErr = pReader->Read( *pRead );
1856             pWrtShell->EndAllAction();
1857         }
1858         delete pPam;
1859         delete pReader;
1860     }
1861 
1862     return nErr;
1863 }
1864 
1865 /*--------------------------------------------------------------------
1866     Get a client for an embedded object if possible.
1867  --------------------------------------------------------------------*/
1868 SfxInPlaceClient* SwDocShell::GetIPClient( const ::svt::EmbeddedObjectRef& xObjRef )
1869 {
1870     SfxInPlaceClient* pResult = NULL;
1871 
1872     SwWrtShell* pShell = GetWrtShell();
1873     if ( pShell )
1874     {
1875         pResult = pShell->GetView().FindIPClient( xObjRef.GetObject(), (Window*)&pShell->GetView().GetEditWin() );
1876         if ( !pResult )
1877             pResult = new SwOleClient( &pShell->GetView(), &pShell->GetView().GetEditWin(), xObjRef );
1878     }
1879 
1880     return pResult;
1881 }
1882 
1883