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 <hintids.hxx>
28 #include <com/sun/star/util/SearchOptions.hpp>
29 #include <com/sun/star/util/SearchFlags.hpp>
30 #include <com/sun/star/i18n/TransliterationModules.hpp>
31 #include <com/sun/star/ui/dialogs/TemplateDescription.hpp>
32 #include <unotools/tempfile.hxx>
33 #include <tools/urlobj.hxx>
34 #include <vcl/print.hxx>
35 #include <vcl/msgbox.hxx>
36 #include <vcl/wrkwin.hxx>
37 #include <vcl/metric.hxx>
38 #include <svtools/ctrltool.hxx>
39 #include <svl/intitem.hxx>
40 #include <svl/stritem.hxx>
41 #include <unotools/pathoptions.hxx>
42 #include <svl/undo.hxx>
43 #include <svtools/txtcmp.hxx>
44 #include <svl/eitem.hxx>
45 #include <svl/whiter.hxx>
46 #include <unotools/saveopt.hxx>
47 #include <svtools/transfer.hxx>
48 #include <svtools/svtools.hrc>
49 #include <svtools/svtdata.hxx>
50 #include <svx/svxids.hrc>
51 #include <svtools/htmlcfg.hxx>
52 #include <sfx2/app.hxx>
53 #include <sfx2/objface.hxx>
54 #include <sfx2/viewfrm.hxx>
55 #include <sfx2/bindings.hxx>
56 #include <sfx2/docfilt.hxx>
57 #include <sfx2/fcontnr.hxx>
58 #include <sfx2/request.hxx>
59 #include <sfx2/prnmon.hxx>
60 #include <sfx2/docfile.hxx>
61 #include <editeng/fhgtitem.hxx>
62 #include <svx/srchdlg.hxx>
63 #include <svl/srchitem.hxx>
64 #include <editeng/fontitem.hxx>
65 #include <editeng/flstitem.hxx>
66 #include "editeng/unolingu.hxx"
67 #include <sfx2/sfxhtml.hxx>
68 #include <swtypes.hxx>
69 #include <swmodule.hxx>
70 #include <docsh.hxx>
71 #include <wdocsh.hxx>
72 #include <srcview.hxx>
73 #include <viewfunc.hxx>
74 #include <doc.hxx>
75 #include <sfx2/msg.hxx>
76 #include <shellio.hxx>
77
78 #include <cmdid.h> // FN_ ...
79 #include <helpid.h>
80 #include <globals.hrc>
81 #include <shells.hrc>
82 #include <popup.hrc>
83 #include <web.hrc>
84 #include <view.hrc>
85 #include <com/sun/star/ui/dialogs/XFilePicker.hpp>
86 #include <com/sun/star/ui/dialogs/XFilterManager.hpp>
87 #include <sfx2/filedlghelper.hxx>
88 #define SwSrcView
89 #include "swslots.hxx"
90
91 #include <unomid.h>
92
93 #include <com/sun/star/document/XDocumentProperties.hpp>
94 #include <com/sun/star/document/XDocumentPropertiesSupplier.hpp>
95
96 using namespace ::com::sun::star;
97 using namespace ::com::sun::star::i18n;
98 using namespace ::com::sun::star::lang;
99 using namespace ::com::sun::star::uno;
100 using namespace ::com::sun::star::ui::dialogs;
101 using namespace ::com::sun::star::i18n;
102 using namespace ::com::sun::star::lang;
103 using namespace ::sfx2;
104 using ::rtl::OUString;
105 using ::com::sun::star::util::SearchOptions;
106
107
108 #define SWSRCVIEWFLAGS ( SFX_VIEW_CAN_PRINT|\
109 SFX_VIEW_NO_NEWWINDOW )
110
111 #define SRC_SEARCHOPTIONS (0xFFFF & ~(SEARCH_OPTIONS_FORMAT|SEARCH_OPTIONS_FAMILIES|SEARCH_OPTIONS_SEARCH_ALL))
112
113 // Druckraender -> wie Basic - Ide
114 #define LMARGPRN 1700
115 #define RMARGPRN 900
116 #define TMARGPRN 2000
117 #define BMARGPRN 1000
118 #define BORDERPRN 300
119
120 SFX_IMPL_NAMED_VIEWFACTORY(SwSrcView, "SourceView")
121 {
122 SFX_VIEW_REGISTRATION(SwWebDocShell);
123 }
124
125 SFX_IMPL_INTERFACE( SwSrcView, SfxViewShell, SW_RES(0) )
126 {
127 SFX_POPUPMENU_REGISTRATION(SW_RES(MN_SRCVIEW_POPUPMENU));
128 SFX_OBJECTBAR_REGISTRATION( SFX_OBJECTBAR_TOOLS|
129 SFX_VISIBILITY_STANDARD|SFX_VISIBILITY_SERVER,
130 SW_RES(RID_WEBTOOLS_TOOLBOX) );
131 SFX_CHILDWINDOW_REGISTRATION(SvxSearchDialogWrapper::GetChildWindowId());
132 }
133
TYPEINIT1(SwSrcView,SfxViewShell)134 TYPEINIT1(SwSrcView, SfxViewShell)
135
136 /*-----------------18.11.96 08.05-------------------
137
138 --------------------------------------------------*/
139
140
141 void lcl_PrintHeader( OutputDevice &rOutDev, sal_uInt16 nPages, sal_uInt16 nCurPage, const String& rTitle )
142 {
143 short nLeftMargin = LMARGPRN;
144 Size aSz = rOutDev.GetOutputSize();
145 short nBorder = BORDERPRN;
146
147 Color aOldFillColor( rOutDev.GetFillColor() );
148 Font aOldFont( rOutDev.GetFont() );
149
150 rOutDev.SetFillColor( Color(COL_TRANSPARENT) );
151
152 Font aFont( aOldFont );
153 aFont.SetWeight( WEIGHT_BOLD );
154 aFont.SetAlign( ALIGN_BOTTOM );
155 rOutDev.SetFont( aFont );
156
157 long nFontHeight = rOutDev.GetTextHeight();
158
159 // 1.Border => Strich, 2+3 Border = Freiraum.
160 long nYTop = TMARGPRN-3*nBorder-nFontHeight;
161
162 long nXLeft = nLeftMargin-nBorder;
163 long nXRight = aSz.Width()-RMARGPRN+nBorder;
164
165 rOutDev.DrawRect( Rectangle(
166 Point( nXLeft, nYTop ),
167 Size( nXRight-nXLeft, aSz.Height() - nYTop - BMARGPRN + nBorder ) ) );
168
169
170 long nY = TMARGPRN-2*nBorder;
171 Point aPos( nLeftMargin, nY );
172 rOutDev.DrawText( aPos, rTitle );
173 if ( nPages != 1 )
174 {
175 aFont.SetWeight( WEIGHT_NORMAL );
176 rOutDev.SetFont( aFont );
177 String aPageStr( C2S(" [") );
178 aPageStr += String( SW_RES( STR_PAGE ) );
179 aPageStr += ' ';
180 aPageStr += String::CreateFromInt32( nCurPage );
181 aPageStr += ']';
182 aPos.X() += rOutDev.GetTextWidth( rTitle );
183 rOutDev.DrawText( aPos, aPageStr );
184 }
185
186
187 nY = TMARGPRN-nBorder;
188
189 rOutDev.DrawLine( Point( nXLeft, nY ), Point( nXRight, nY ) );
190
191 rOutDev.SetFont( aOldFont );
192 rOutDev.SetFillColor( aOldFillColor );
193 }
194 /* -----------------13.11.2003 16:24-----------------
195
196 --------------------------------------------------*/
lcl_GetStreamCharSet(rtl_TextEncoding eLoadEncoding)197 rtl_TextEncoding lcl_GetStreamCharSet(rtl_TextEncoding eLoadEncoding)
198 {
199 rtl_TextEncoding eRet = eLoadEncoding;
200 if(RTL_TEXTENCODING_DONTKNOW == eRet)
201 {
202 SvxHtmlOptions* pHtmlOptions = SvxHtmlOptions::Get();
203 const sal_Char *pCharSet =
204 rtl_getBestMimeCharsetFromTextEncoding( pHtmlOptions->GetTextEncoding() );
205 eRet = rtl_getTextEncodingFromMimeCharset( pCharSet );
206 }
207 return eRet;
208 }
209 /*-----------------18.11.96 08.21-------------------
210
211 --------------------------------------------------*/
212
lcl_ConvertTabsToSpaces(String & rLine)213 void lcl_ConvertTabsToSpaces( String& rLine )
214 {
215 if ( rLine.Len() )
216 {
217 sal_uInt16 nPos = 0;
218 sal_uInt16 nMax = rLine.Len();
219 while ( nPos < nMax )
220 {
221 if ( rLine.GetChar(nPos) == '\t' )
222 {
223 // Nicht 4 Blanks, sondern an 4er TabPos:
224 String aBlanker;
225 aBlanker.Fill( ( 4 - ( nPos % 4 ) ), ' ' );
226 rLine.Erase( nPos, 1 );
227 rLine.Insert( aBlanker, nPos );
228 nMax = rLine.Len();
229 }
230 nPos++; // Nicht optimal, falls Tab, aber auch nicht verkehrt...
231 }
232 }
233 }
234
235 /*--------------------------------------------------------------------
236 Beschreibung:
237 --------------------------------------------------------------------*/
238
239
SwSrcView(SfxViewFrame * pViewFrame,SfxViewShell *)240 SwSrcView::SwSrcView(SfxViewFrame* pViewFrame, SfxViewShell*) :
241 SfxViewShell( pViewFrame, SWSRCVIEWFLAGS ),
242 aEditWin( &pViewFrame->GetWindow(), this ),
243 pSearchItem(0),
244 bSourceSaved(sal_False),
245 eLoadEncoding(RTL_TEXTENCODING_DONTKNOW)
246 {
247 Init();
248 }
249
250 /*--------------------------------------------------------------------
251 Beschreibung:
252 --------------------------------------------------------------------*/
253
254
~SwSrcView()255 SwSrcView::~SwSrcView()
256 {
257 SwDocShell* pDocShell = GetDocShell();
258 DBG_ASSERT(PTR_CAST(SwWebDocShell, pDocShell), "Wieso keine WebDocShell?");
259 const TextSelection& rSel = aEditWin.GetTextView()->GetSelection();
260 ((SwWebDocShell*)pDocShell)->SetSourcePara( static_cast< sal_uInt16 >( rSel.GetStart().GetPara() ) );
261
262 uno::Reference<document::XDocumentPropertiesSupplier> xDPS(
263 pDocShell->GetModel(), uno::UNO_QUERY_THROW);
264 uno::Reference<document::XDocumentProperties> xDocProps
265 = xDPS->getDocumentProperties();
266 ::rtl::OUString url = xDocProps->getAutoloadURL();
267 sal_Int32 delay = xDocProps->getAutoloadSecs();
268 pDocShell->SetAutoLoad(INetURLObject(url), delay,
269 (delay != 0) || !url.equalsAscii(""));
270 // EndListening(*GetViewFrame());
271 EndListening(*pDocShell);
272 delete pSearchItem;
273 }
274
275 /*-----------------24.04.97 10:37-------------------
276
277 --------------------------------------------------*/
SaveContentTo(SfxMedium & rMed)278 void SwSrcView::SaveContentTo(SfxMedium& rMed)
279 {
280 SvStream* pOutStream = rMed.GetOutStream();
281 pOutStream->SetStreamCharSet(lcl_GetStreamCharSet(eLoadEncoding));
282 aEditWin.Write( *pOutStream );//, EE_FORMAT_TEXT);
283 }
284
285 /*--------------------------------------------------------------------
286 Beschreibung:
287 --------------------------------------------------------------------*/
288
289
Init()290 void SwSrcView::Init()
291 {
292 SetHelpId(SW_SRC_VIEWSHELL);
293 SetName(C2S("Source"));
294 SetWindow( &aEditWin );
295 SwDocShell* pDocShell = GetDocShell();
296 // wird das Doc noch geladen, dann muss die DocShell das Load
297 // anwerfen, wenn das Laden abgeschlossen ist
298 if(!pDocShell->IsLoading())
299 Load(pDocShell);
300 else
301 {
302 aEditWin.SetReadonly(sal_True);
303 }
304
305 SetNewWindowAllowed( sal_False );
306 StartListening(*pDocShell,sal_True);
307 }
308
309 /*--------------------------------------------------------------------
310 Beschreibung:
311 --------------------------------------------------------------------*/
312
GetDocShell()313 SwDocShell* SwSrcView::GetDocShell()
314 {
315 SfxObjectShell* pObjShell = GetViewFrame()->GetObjectShell();
316 return PTR_CAST(SwDocShell, pObjShell);
317 }
318
319 /*--------------------------------------------------------------------
320 Beschreibung:
321 --------------------------------------------------------------------*/
322
323
SaveContent(const String & rTmpFile)324 void SwSrcView::SaveContent(const String& rTmpFile)
325 {
326 SfxMedium aMedium( rTmpFile, STREAM_WRITE, sal_True);
327 SvStream* pOutStream = aMedium.GetOutStream();
328 pOutStream->SetStreamCharSet( lcl_GetStreamCharSet(eLoadEncoding) );
329 aEditWin.Write(*pOutStream);//, EE_FORMAT_TEXT);
330 aMedium.Commit();
331 }
332
333 /*--------------------------------------------------------------------
334 Beschreibung:
335 --------------------------------------------------------------------*/
336
337
Execute(SfxRequest & rReq)338 void SwSrcView::Execute(SfxRequest& rReq)
339 {
340 sal_uInt16 nSlot = rReq.GetSlot();
341 TextView* pTextView = aEditWin.GetTextView();
342 switch( nSlot )
343 {
344 case SID_SAVEASDOC:
345 {
346 SvtPathOptions aPathOpt;
347 // filesave dialog with autoextension
348 FileDialogHelper aDlgHelper(
349 TemplateDescription::FILESAVE_AUTOEXTENSION,
350 TemplateDescription::FILESAVE_SIMPLE );
351 uno::Reference < XFilePicker > xFP = aDlgHelper.GetFilePicker();
352 // pFileDlg->SetHelpId(HID_FILEDLG_SRCVIEW);
353 uno::Reference<XFilterManager> xFltMgr(xFP, UNO_QUERY);
354
355 // search for an html filter for export
356 SfxFilterContainer* pFilterCont = GetObjectShell()->GetFactory().GetFilterContainer();
357 const SfxFilter* pFilter =
358 pFilterCont->GetFilter4Extension( C2S("html"), SFX_FILTER_EXPORT );
359 if ( pFilter )
360 {
361 // filter found -> use its uiname and wildcard
362 const String& rUIName = pFilter->GetUIName();
363 const WildCard& rCard = pFilter->GetWildcard();
364 xFltMgr->appendFilter( rUIName, rCard() );
365 xFltMgr->setCurrentFilter( rUIName ) ;
366 }
367 else
368 {
369 // filter not found
370 String sHtml(C2S("HTML"));
371 xFltMgr->appendFilter( sHtml, C2S("*.html;*.htm") );
372 xFltMgr->setCurrentFilter( sHtml ) ;
373 }
374
375 xFP->setDisplayDirectory( aPathOpt.GetWorkPath() );
376 if( aDlgHelper.Execute() == ERRCODE_NONE)
377 {
378 SfxMedium aMedium( xFP->getFiles().getConstArray()[0],
379 STREAM_WRITE | STREAM_SHARE_DENYNONE,
380 sal_False );
381 SvStream* pOutStream = aMedium.GetOutStream();
382 pOutStream->SetStreamCharSet(lcl_GetStreamCharSet(eLoadEncoding));
383 aEditWin.Write( *pOutStream );
384 aMedium.Commit();
385 }
386 }
387 break;
388 case SID_SAVEDOC:
389 {
390 SwDocShell* pDocShell = GetDocShell();
391 SfxMedium* pMed = 0;
392 if(pDocShell->HasName())
393 pMed = pDocShell->GetMedium();
394 else
395 {
396 SfxBoolItem* pItem = (SfxBoolItem*)pDocShell->ExecuteSlot(rReq, pDocShell->GetInterface());
397 if(pItem && pItem->GetValue())
398 pMed = pDocShell->GetMedium();
399 }
400 if(pMed)
401 {
402 SvStream* pOutStream = pMed->GetOutStream();
403 pOutStream->Seek(0);
404 pOutStream->SetStreamSize(0);
405 pOutStream->SetStreamCharSet(lcl_GetStreamCharSet(eLoadEncoding));
406 aEditWin.Write( *pOutStream );
407 pMed->CloseOutStream();
408 pMed->Commit();
409 pDocShell->GetDoc()->ResetModified();
410 SourceSaved();
411 aEditWin.ClearModifyFlag();
412 }
413 }
414 break;
415 case FID_SEARCH_NOW:
416 {
417 const SfxItemSet* pTmpArgs = rReq.GetArgs();
418
419 sal_uInt16 nWhich = pTmpArgs->GetWhichByPos( 0 );
420 DBG_ASSERT( nWhich, "Wich fuer SearchItem ?" );
421 const SfxPoolItem& rItem = pTmpArgs->Get( nWhich );
422 SetSearchItem( (const SvxSearchItem&)rItem);
423 StartSearchAndReplace( (const SvxSearchItem&)rItem, sal_False, rReq.IsAPI() );
424 if(aEditWin.IsModified())
425 GetDocShell()->GetDoc()->SetModified();
426 }
427 break;
428 case FN_REPEAT_SEARCH:
429 {
430 SvxSearchItem* pSrchItem = GetSearchItem();
431 if(pSrchItem)
432 {
433 StartSearchAndReplace( *pSrchItem, sal_False, rReq.IsAPI() );
434 if(aEditWin.IsModified())
435 GetDocShell()->GetDoc()->SetModified();
436 }
437 }
438 break;
439 case SID_PRINTDOC:
440 case SID_PRINTDOCDIRECT:
441 {
442 SfxViewShell::ExecuteSlot( rReq, SfxViewShell::GetInterface() );
443 }
444 break;
445 case SID_UNDO:
446 pTextView->Undo();
447 GetViewFrame()->GetBindings().InvalidateAll(sal_False);
448 break;
449 case SID_REDO:
450 pTextView->Redo();
451 GetViewFrame()->GetBindings().InvalidateAll(sal_False);
452 break;
453 case SID_REPEAT:
454 break;
455 case SID_CUT:
456 if(pTextView->HasSelection())
457 pTextView->Cut();
458 break;
459 case SID_COPY:
460 if(pTextView->HasSelection())
461 pTextView->Copy();
462 break;
463 case SID_PASTE:
464 pTextView->Paste();
465 break;
466 case SID_SELECTALL:
467 pTextView->SetSelection( TextSelection( TextPaM( 0, 0 ), TextPaM( 0xFFFFFFFF, 0xFFFF ) ) );
468 break;
469 }
470 aEditWin.Invalidate();
471 }
472
473 /*--------------------------------------------------------------------
474 Beschreibung:
475 --------------------------------------------------------------------*/
476
477
GetState(SfxItemSet & rSet)478 void SwSrcView::GetState(SfxItemSet& rSet)
479 {
480 SfxWhichIter aIter(rSet);
481 sal_uInt16 nWhich = aIter.FirstWhich();
482 TextView* pTextView = aEditWin.GetTextView();
483
484 while(nWhich)
485 {
486 switch(nWhich)
487 {
488 case SID_SAVEASDOC:
489 rSet.Put(SfxStringItem(nWhich, String(SW_RES(STR_SAVEAS_SRC))));
490 break;
491 case SID_SAVEDOC:
492 {
493 SwDocShell* pDocShell = GetDocShell();
494 if(!pDocShell->IsModified())
495 rSet.DisableItem(nWhich);
496 }
497 break;
498 case SID_PRINTDOC:
499 case SID_PRINTDOCDIRECT:
500 break;
501 case SID_TABLE_CELL:
502 {
503 String aPos( SW_RES(STR_SRCVIEW_ROW) );
504 TextSelection aSel = pTextView->GetSelection();
505 aPos += String::CreateFromInt32( aSel.GetEnd().GetPara()+1 );
506 aPos +=C2S(" : ");
507 aPos += String(SW_RES(STR_SRCVIEW_COL));
508 aPos += String::CreateFromInt32( aSel.GetEnd().GetIndex()+1 );
509 SfxStringItem aItem( nWhich, aPos );
510 rSet.Put( aItem );
511 }
512 break;
513 case SID_SEARCH_OPTIONS:
514 {
515 sal_uInt16 nOpt = SRC_SEARCHOPTIONS;
516 if(GetDocShell()->IsReadOnly())
517 nOpt &= ~(SEARCH_OPTIONS_REPLACE|SEARCH_OPTIONS_REPLACE_ALL);
518
519 rSet.Put( SfxUInt16Item( SID_SEARCH_OPTIONS, nOpt) );
520 }
521 break;
522 case SID_SEARCH_ITEM:
523 {
524 String sSelected;
525 if ( !pTextView->HasSelection() )
526 {
527 const TextSelection& rSel = pTextView->GetSelection();
528 sSelected = aEditWin.GetTextEngine()->GetWord( rSel.GetStart());
529 }
530 else
531 {
532 sSelected = pTextView->GetSelected();
533 }
534 SvxSearchItem * pSrchItem = GetSearchItem();
535 pSrchItem->SetSearchString( sSelected );
536 rSet.Put( *pSrchItem );
537 }
538 break;
539 case FN_REPEAT_SEARCH:
540 {
541 if(!GetSearchItem())
542 rSet.DisableItem(nWhich);
543 };
544 break;
545 case SID_UNDO:
546 case SID_REDO:
547 {
548 ::svl::IUndoManager& rMgr = pTextView->GetTextEngine()->GetUndoManager();
549 sal_uInt16 nCount = 0;
550 if(nWhich == SID_UNDO)
551 {
552 nCount = rMgr.GetUndoActionCount();
553 if(nCount)
554 {
555 String aStr(SvtResId( STR_UNDO));;
556 aStr += rMgr.GetUndoActionComment(--nCount);
557 rSet.Put(SfxStringItem(nWhich, aStr));
558 }
559 else
560 rSet.DisableItem(nWhich);
561 }
562 else
563 {
564 nCount = rMgr.GetRedoActionCount();
565 if(nCount)
566 {
567 String aStr(SvtResId( STR_REDO));;
568 aStr += rMgr.GetRedoActionComment(--nCount);
569 rSet.Put(SfxStringItem(nWhich,aStr));
570 }
571 else
572 rSet.DisableItem(nWhich);
573 }
574 }
575 break;
576 case SID_MAIL_SENDDOCASPDF:
577 case SID_MAIL_SENDDOC :
578 case SID_EXPORTDOCASPDF:
579 case SID_DIRECTEXPORTDOCASPDF:
580 case SID_EXPORTDOC:
581 case SID_REPEAT:
582 case SID_BROWSER_MODE:
583 case FN_PRINT_LAYOUT:
584 rSet.DisableItem(nWhich);
585 break;
586 case SID_CUT:
587 case SID_COPY:
588 if(!pTextView->HasSelection())
589 rSet.DisableItem(nWhich);
590 break;
591 case SID_PASTE:
592 {
593 TransferableDataHelper aDataHelper(
594 TransferableDataHelper::CreateFromSystemClipboard(
595 &aEditWin) );
596 sal_Bool bDisable = !aDataHelper.GetXTransferable().is() ||
597 0 == aDataHelper.GetFormatCount();
598 if( bDisable )
599 rSet.DisableItem(nWhich);
600 }
601 break;
602 }
603 nWhich = aIter.NextWhich();
604 }
605 }
606
607 /*--------------------------------------------------------------------
608 Beschreibung:
609 --------------------------------------------------------------------*/
610
611
GetSearchItem()612 SvxSearchItem* SwSrcView::GetSearchItem()
613 {
614 if(!pSearchItem)
615 {
616 pSearchItem = new SvxSearchItem(SID_SEARCH_ITEM);
617 }
618 return pSearchItem;
619 }
620
621 /*--------------------------------------------------------------------
622 Beschreibung:
623 --------------------------------------------------------------------*/
624
625
SetSearchItem(const SvxSearchItem & rItem)626 void SwSrcView::SetSearchItem( const SvxSearchItem& rItem )
627 {
628 delete pSearchItem;
629 pSearchItem = (SvxSearchItem*)rItem.Clone();
630 }
631
632 /*--------------------------------------------------------------------
633 Beschreibung:
634 --------------------------------------------------------------------*/
635
636
StartSearchAndReplace(const SvxSearchItem & rSearchItem,sal_Bool bFromStart,sal_Bool bApi,sal_Bool bRecursive)637 sal_uInt16 SwSrcView::StartSearchAndReplace(const SvxSearchItem& rSearchItem,
638 sal_Bool bFromStart,
639 sal_Bool bApi,
640 sal_Bool bRecursive)
641 {
642 ExtTextView* pTextView = aEditWin.GetTextView();
643 TextSelection aSel;
644 TextPaM aPaM;
645
646 sal_Bool bForward = !rSearchItem.GetBackward();
647 sal_Bool bAtStart = pTextView->GetSelection() == TextSelection( aPaM, aPaM );
648
649 if( !bForward )
650 aPaM = TextPaM( (sal_uLong)-1, (sal_uInt16)-1 );
651
652 if( bFromStart )
653 {
654 aSel = pTextView->GetSelection();
655 pTextView->SetSelection( TextSelection( aPaM, aPaM ));
656 }
657
658 util::SearchOptions aSearchOpt( rSearchItem.GetSearchOptions() );
659 aSearchOpt.Locale = SvxCreateLocale(
660 static_cast< LanguageType >( GetAppLanguage() ) );
661
662 sal_uInt16 nFound;
663 sal_Bool bAll = sal_False;
664 switch( rSearchItem.GetCommand() )
665 {
666 case SVX_SEARCHCMD_FIND:
667 case SVX_SEARCHCMD_FIND_ALL:
668 nFound = pTextView->Search( aSearchOpt, bForward );
669 break;
670
671 case SVX_SEARCHCMD_REPLACE_ALL: bAll = sal_True;
672 case SVX_SEARCHCMD_REPLACE:
673 nFound = pTextView->Replace( aSearchOpt, bAll, bForward );
674 break;
675
676 default:
677 nFound = 0;
678 }
679
680 if( !nFound )
681 {
682 sal_Bool bNotFoundMessage = sal_False;
683 if(!bRecursive)
684 {
685 if(!bFromStart)
686 {
687 bNotFoundMessage = bAtStart;
688 }
689 else
690 {
691 bNotFoundMessage = sal_True;
692 pTextView->SetSelection( aSel );
693 }
694 }
695 else if(bAtStart)
696 {
697 bNotFoundMessage = sal_True;
698 }
699
700
701 if(!bApi)
702 {
703 if(bNotFoundMessage)
704 {
705 InfoBox( 0, SW_RES(MSG_NOT_FOUND)).Execute();
706 }
707 else if(!bRecursive && RET_YES ==
708 QueryBox(0, SW_RES( bForward ? MSG_SEARCH_END
709 : MSG_SEARCH_START)).Execute())
710 {
711 pTextView->SetSelection( TextSelection( aPaM, aPaM ) );
712 StartSearchAndReplace( rSearchItem, sal_False, sal_False, sal_True );
713 }
714 }
715 }
716 return nFound;
717 }
718
719 /*--------------------------------------------------------------------
720 Beschreibung:
721 --------------------------------------------------------------------*/
722
SetPrinter(SfxPrinter * pNew,sal_uInt16 nDiffFlags,bool)723 sal_uInt16 SwSrcView::SetPrinter(SfxPrinter* pNew, sal_uInt16 nDiffFlags, bool )
724 {
725 SwDocShell* pDocSh = GetDocShell();
726 if ( (SFX_PRINTER_JOBSETUP | SFX_PRINTER_PRINTER) & nDiffFlags )
727 {
728 pDocSh->GetDoc()->setPrinter( pNew, true, true );
729 if ( nDiffFlags & SFX_PRINTER_PRINTER )
730 pDocSh->SetModified();
731 }
732 if ( nDiffFlags & SFX_PRINTER_OPTIONS )
733 ::SetPrinter( pDocSh->getIDocumentDeviceAccess(), pNew, sal_True );
734
735 const sal_Bool bChgOri = nDiffFlags & SFX_PRINTER_CHG_ORIENTATION ? sal_True : sal_False;
736 const sal_Bool bChgSize= nDiffFlags & SFX_PRINTER_CHG_SIZE ? sal_True : sal_False;
737 if ( bChgOri || bChgSize )
738 {
739 pDocSh->SetModified();
740 }
741 return 0;
742 }
743
744 /*--------------------------------------------------------------------
745 Beschreibung:
746 --------------------------------------------------------------------*/
747
GetPrinter(sal_Bool bCreate)748 SfxPrinter* SwSrcView::GetPrinter( sal_Bool bCreate )
749 {
750 return GetDocShell()->GetDoc()->getPrinter( bCreate );
751 }
752
753 /*--------------------------------------------------------------------
754 Beschreibung:
755 --------------------------------------------------------------------*/
PrintSource(OutputDevice * pOutDev,sal_Int32 nPage,bool bCalcNumPagesOnly)756 sal_Int32 SwSrcView::PrintSource(
757 OutputDevice *pOutDev,
758 sal_Int32 nPage,
759 bool bCalcNumPagesOnly )
760 {
761 if (!pOutDev || nPage <= 0)
762 return 0;
763
764 //! this a lgorithm for printing the n-th page is very poor since it
765 //! needs to go over the text of all previous pages to get to the correct one.
766 //! But since HTML source code is expected to be just a small number of pages
767 //! even this poor algorithm should be enough...
768
769 pOutDev->Push();
770
771 TextEngine* pTextEngine = aEditWin.GetTextEngine();
772 pOutDev->SetMapMode( MAP_100TH_MM );
773 Font aFont( aEditWin.GetOutWin()->GetFont() );
774 Size aSize( aFont.GetSize() );
775 aSize = aEditWin.GetOutWin()->PixelToLogic( aSize, MAP_100TH_MM );
776 aFont.SetSize( aSize );
777 aFont.SetColor( COL_BLACK );
778 pOutDev->SetFont( aFont );
779
780 String aTitle( GetViewFrame()->GetWindow().GetText() );
781
782 sal_uInt16 nLineHeight = (sal_uInt16) pOutDev->GetTextHeight(); // etwas mehr.
783 sal_uInt16 nParaSpace = 10;
784
785 Size aPaperSz = pOutDev->GetOutputSize();
786 aPaperSz.Width() -= (LMARGPRN + RMARGPRN);
787 aPaperSz.Height() -= (TMARGPRN + BMARGPRN);
788
789 // nLinepPage stimmt nicht, wenn Zeilen umgebrochen werden muessen...
790 sal_uInt16 nLinespPage = (sal_uInt16) (aPaperSz.Height() / nLineHeight);
791 sal_uInt16 nCharspLine = (sal_uInt16) (aPaperSz.Width() / pOutDev->GetTextWidth( 'X' ));
792 sal_uInt32 nParas = pTextEngine->GetParagraphCount();
793
794 sal_uInt16 nPages = (sal_uInt16) (nParas / nLinespPage + 1 );
795 sal_uInt16 nCurPage = 1;
796
797 // Header drucken...
798 if (!bCalcNumPagesOnly && nPage == nCurPage)
799 lcl_PrintHeader( *pOutDev, nPages, nCurPage, aTitle );
800 const Point aStartPos( LMARGPRN, TMARGPRN );
801 Point aPos( aStartPos );
802 for ( sal_uInt32 nPara = 0; nPara < nParas; ++nPara )
803 {
804 String aLine( pTextEngine->GetText( nPara ) );
805 lcl_ConvertTabsToSpaces( aLine );
806 sal_uInt16 nLines = aLine.Len() / nCharspLine + 1;
807 for ( sal_uInt16 nLine = 0; nLine < nLines; ++nLine )
808 {
809 String aTmpLine( aLine, nLine * nCharspLine, nCharspLine );
810 aPos.Y() += nLineHeight;
811 if ( aPos.Y() > ( aPaperSz.Height() + TMARGPRN - nLineHeight/2 ) )
812 {
813 ++nCurPage;
814 if (!bCalcNumPagesOnly && nPage == nCurPage)
815 lcl_PrintHeader( *pOutDev, nPages, nCurPage, aTitle );
816 aPos = aStartPos;
817 }
818 if (!bCalcNumPagesOnly && nPage == nCurPage)
819 pOutDev->DrawText( aPos, aTmpLine );
820 }
821 aPos.Y() += nParaSpace;
822 }
823
824 pOutDev->Pop();
825
826 DBG_ASSERT( bCalcNumPagesOnly || nPage <= nCurPage, "page number out of range" );
827 return nCurPage;
828 }
829
830
831 /*--------------------------------------------------------------------
832 Beschreibung:
833 --------------------------------------------------------------------*/
834
835
Notify(SfxBroadcaster & rBC,const SfxHint & rHint)836 void SwSrcView::Notify( SfxBroadcaster& rBC, const SfxHint& rHint )
837 {
838 if ( rHint.ISA(SfxSimpleHint) &&
839 (
840 ((SfxSimpleHint&) rHint).GetId() == SFX_HINT_MODECHANGED ||
841 (
842 ((SfxSimpleHint&) rHint).GetId() == SFX_HINT_TITLECHANGED &&
843 !GetDocShell()->IsReadOnly() && aEditWin.IsReadonly()
844 )
845 )
846 )
847 {
848 // Broadcast kommt nur einmal!
849 const SwDocShell* pDocSh = GetDocShell();
850 const sal_Bool bReadonly = pDocSh->IsReadOnly();
851 aEditWin.SetReadonly(bReadonly);
852 }
853 SfxViewShell::Notify(rBC, rHint);
854 }
855
856 /*-----------------19.04.97 10:19-------------------
857
858 --------------------------------------------------*/
Load(SwDocShell * pDocShell)859 void SwSrcView::Load(SwDocShell* pDocShell)
860 {
861 SvxHtmlOptions* pHtmlOptions = SvxHtmlOptions::Get();
862 const sal_Char *pCharSet =
863 rtl_getBestMimeCharsetFromTextEncoding( pHtmlOptions->GetTextEncoding() );
864 rtl_TextEncoding eDestEnc = rtl_getTextEncodingFromMimeCharset( pCharSet );
865
866 aEditWin.SetReadonly(pDocShell->IsReadOnly());
867 aEditWin.SetTextEncoding(eDestEnc);
868 SfxMedium* pMedium = pDocShell->GetMedium();
869
870 const SfxFilter* pFilter = pMedium->GetFilter();
871 sal_Bool bHtml = pFilter && pFilter->GetUserData().EqualsAscii("HTML");
872 sal_Bool bDocModified = pDocShell->IsModified();
873 if(bHtml && !bDocModified && pDocShell->HasName())
874 {
875 SvStream* pStream = pMedium->GetInStream();
876 if(pStream && 0 == pStream->GetError() )
877 {
878 rtl_TextEncoding eHeaderEnc =
879 SfxHTMLParser::GetEncodingByHttpHeader(
880 pDocShell->GetHeaderAttributes() );
881 if( RTL_TEXTENCODING_DONTKNOW == eHeaderEnc )
882 {
883 const sal_Char *pTmpCharSet =
884 rtl_getBestMimeCharsetFromTextEncoding( RTL_TEXTENCODING_ISO_8859_1 );
885 eHeaderEnc = rtl_getTextEncodingFromMimeCharset( pTmpCharSet );
886 }
887 if( RTL_TEXTENCODING_DONTKNOW != eHeaderEnc &&
888 eDestEnc != eHeaderEnc )
889 {
890 eDestEnc = eHeaderEnc;
891 aEditWin.SetTextEncoding(eDestEnc);
892 }
893 pStream->SetStreamCharSet( eDestEnc );
894 pStream->Seek(0);
895 TextEngine* pTextEngine = aEditWin.GetTextEngine();
896 pTextEngine->EnableUndo(sal_False);
897 aEditWin.Read(*pStream);//, EE_FORMAT_TEXT);
898 pTextEngine->EnableUndo(sal_True);
899 }
900 else
901 {
902 Window *pTmpWindow = &GetViewFrame()->GetWindow();
903 InfoBox(pTmpWindow, SW_RES(MSG_ERR_SRCSTREAM)).Execute();
904 }
905 }
906 else
907 {
908 utl::TempFile aTempFile;
909 aTempFile.EnableKillingFile();
910 String sFileURL( aTempFile.GetURL() );
911 SvtSaveOptions aOpt;
912
913 {
914 SfxMedium aMedium( sFileURL,STREAM_READWRITE, sal_True );
915 SwWriter aWriter( aMedium, *pDocShell->GetDoc() );
916 WriterRef xWriter;
917 ::GetHTMLWriter(aEmptyStr, aMedium.GetBaseURL( true ), xWriter);
918 String sWriteName = pDocShell->HasName() ?
919 pMedium->GetName() :
920 (const String&) sFileURL;
921 sal_uLong nRes = aWriter.Write(xWriter, &sWriteName);
922 if(nRes)
923 {
924 ErrorHandler::HandleError(ErrCode(nRes));
925 aEditWin.SetReadonly(sal_True);
926 }
927 aMedium.Commit();
928 SvStream* pInStream = aMedium.GetInStream();
929 pInStream->Seek(0);
930 pInStream->SetStreamCharSet( eDestEnc );
931
932
933 aEditWin.Read(*pInStream);//, EE_FORMAT_TEXT);
934 }
935 }
936 aEditWin.ClearModifyFlag();
937
938 eLoadEncoding = eDestEnc;
939
940 if(bDocModified)
941 pDocShell->SetModified();// das Flag wird zwischendurch zurueckgesetzt
942 // AutoLoad abschalten
943 pDocShell->SetAutoLoad(INetURLObject(), 0, sal_False);
944 DBG_ASSERT(PTR_CAST(SwWebDocShell, pDocShell), "Wieso keine WebDocShell?");
945 sal_uInt16 nLine = ((SwWebDocShell*)pDocShell)->GetSourcePara();
946 aEditWin.SetStartLine(nLine);
947 aEditWin.GetTextEngine()->ResetUndo();
948 aEditWin.GetOutWin()->GrabFocus();
949 }
950
951
952