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_filter.hxx"
26 #include <com/sun/star/xml/sax/XDocumentHandler.hpp>
27 #include <com/sun/star/xml/sax/XErrorHandler.hpp>
28 #include <com/sun/star/xml/sax/SAXParseException.hpp>
29 #include <com/sun/star/xml/XImportFilter.hpp>
30 #include <com/sun/star/io/XActiveDataSource.hpp>
31 #include <comphelper/oslfile2streamwrap.hxx>
32 
33 #include <rtl/tencinfo.h>
34 #include <vcl/svapp.hxx>
35 #include <vos/mutex.hxx>
36 #include <svtools/textview.hxx>
37 #ifndef _SCRBAR_HXX //autogen
38 #include <vcl/scrbar.hxx>
39 #endif
40 #include <tools/stream.hxx>
41 #include <tools/time.hxx>
42 #include <osl/file.hxx>
43 #include <vcl/msgbox.hxx>
44 #include <svtools/colorcfg.hxx>
45 #include <svtools/htmltokn.h>
46 #include <svtools/txtattr.hxx>
47 
48 #include "xmlfilterdialogstrings.hrc"
49 #include "xmlfiltersettingsdialog.hxx"
50 #include "xmlfileview.hxx"
51 #include "xmlfileview.hrc"
52 #include "xmlfilterhelpids.hrc"
53 
54 #include <deque>
55 
56 using namespace rtl;
57 using namespace osl;
58 using namespace com::sun::star::lang;
59 using namespace com::sun::star::beans;
60 using namespace com::sun::star::uno;
61 using namespace com::sun::star::io;
62 using namespace com::sun::star::xml;
63 using namespace com::sun::star::xml::sax;
64 
65 
66 #define MAX_SYNTAX_HIGHLIGHT 20
67 #define MAX_HIGHLIGHTTIME 200
68 #define SYNTAX_HIGHLIGHT_TIMEOUT 200
69 
70 
71 struct SwTextPortion
72 {
73 	sal_uInt16 nLine;
74 	sal_uInt16 nStart, nEnd;
75 	svtools::ColorConfigEntry eType;
76 };
77 
78 typedef std::deque<SwTextPortion> SwTextPortions;
79 
80 class XMLErrorHandler : public ::cppu::WeakImplHelper1< XErrorHandler >
81 {
82 public:
83 	XMLErrorHandler( XMLSourceFileDialog* pParent, ListBox& rListBox );
84 
85     // Methods
86     virtual void SAL_CALL error( const Any& aSAXParseException ) throw (SAXException, RuntimeException);
87     virtual void SAL_CALL fatalError( const Any& aSAXParseException ) throw (SAXException, RuntimeException);
88     virtual void SAL_CALL warning( const Any& aSAXParseException ) throw (SAXException, RuntimeException);
89 
90 private:
91 	XMLSourceFileDialog*	mpParent;
92 	ListBox&	mrListBox;
93 };
94 
XMLErrorHandler(XMLSourceFileDialog * pParent,ListBox & rListBox)95 XMLErrorHandler::XMLErrorHandler( XMLSourceFileDialog* pParent, ListBox& rListBox )
96 :	mpParent( pParent ),
97 	mrListBox( rListBox )
98 {
99 }
100 
101 // XMLErrorHandler
error(const Any & aSAXParseException)102 void SAL_CALL XMLErrorHandler::error( const Any& aSAXParseException ) throw (SAXException, RuntimeException)
103 {
104 	vos::OGuard aGuard( Application::GetSolarMutex() );
105 
106 	SAXParseException e;
107 	if( aSAXParseException >>= e )
108 	{
109 		String sErr( String::CreateFromInt32( e.LineNumber ) );
110 		sErr += String( RTL_CONSTASCII_USTRINGPARAM( " : " ) );
111 		sErr += String( e.Message );
112 		sal_uInt16 nEntry = mrListBox.InsertEntry( sErr );
113 		mrListBox.SetEntryData( nEntry, (void*)e.LineNumber );
114 	}
115 }
116 
fatalError(const Any & aSAXParseException)117 void SAL_CALL XMLErrorHandler::fatalError( const Any& aSAXParseException ) throw (SAXException, RuntimeException)
118 {
119 	vos::OGuard aGuard( Application::GetSolarMutex() );
120 
121 	SAXParseException e;
122 	if( aSAXParseException >>= e )
123 	{
124 		String sErr( String::CreateFromInt32( e.LineNumber ) );
125 		sErr += String( RTL_CONSTASCII_USTRINGPARAM( " : " ) );
126 		sErr += String( e.Message );
127 		sal_uInt16 nEntry = mrListBox.InsertEntry( sErr );
128 		mrListBox.SetEntryData( nEntry, (void*)e.LineNumber );
129 	}
130 }
131 
warning(const Any &)132 void SAL_CALL XMLErrorHandler::warning( const Any& /* aSAXParseException */ ) throw (SAXException, RuntimeException)
133 {
134 /*
135 	SAXParseException e;
136 	if( aSAXParseException >>= e )
137 	{
138 		String sErr( String::CreateFromInt32( e.LineNumber ) );
139 		sErr += String( RTL_CONSTASCII_USTRINGPARAM( " : " ) );
140 		sErr += String( e.Message );
141 		sal_uInt16 nEntry = mrListBox.InsertEntry( sErr );
142 		mrListBox.SetEntryData( nEntry, (void*)e.LineNumber );
143 	}
144 */
145 }
146 
147 
XMLFileWindow(Window * pParent)148 XMLFileWindow::XMLFileWindow( Window* pParent ) :
149 	Window( pParent, WB_BORDER|WB_CLIPCHILDREN ),
150 	pTextEngine(0),
151 	pOutWin(0),
152 	pHScrollbar(0),
153 	pVScrollbar(0),
154 	nCurTextWidth(0),
155     nStartLine(USHRT_MAX),
156     eSourceEncoding(gsl_getSystemTextEncoding()),
157 	bHighlighting(false)
158 {
159 	CreateTextEngine();
160 }
161 
~XMLFileWindow()162 XMLFileWindow::~XMLFileWindow()
163 {
164 	if ( pTextEngine )
165 	{
166 		EndListening( *pTextEngine );
167 		pTextEngine->RemoveView( pTextView );
168 
169 		delete pHScrollbar;
170 		delete pVScrollbar;
171 
172 		delete pTextView;
173 		delete pTextEngine;
174 	}
175 	delete pOutWin;
176 }
177 
DataChanged(const DataChangedEvent & rDCEvt)178 void XMLFileWindow::DataChanged( const DataChangedEvent& rDCEvt )
179 {
180 	Window::DataChanged( rDCEvt );
181 
182 	switch ( rDCEvt.GetType() )
183 	{
184 	case DATACHANGED_SETTINGS:
185 		// ScrollBars neu anordnen bzw. Resize ausloesen, da sich
186 		// ScrollBar-Groesse geaendert haben kann. Dazu muss dann im
187 		// Resize-Handler aber auch die Groesse der ScrollBars aus
188 		// den Settings abgefragt werden.
189 		if( rDCEvt.GetFlags() & SETTINGS_STYLE )
190 			Resize();
191 		break;
192 	}
193 }
194 
Resize()195 void XMLFileWindow::Resize()
196 {
197 	// ScrollBars, etc. passiert in Adjust...
198 	if ( pTextView )
199 	{
200 		long nVisY = pTextView->GetStartDocPos().Y();
201 		pTextView->ShowCursor();
202 		Size aOutSz( GetOutputSizePixel() );
203 		long nMaxVisAreaStart = pTextView->GetTextEngine()->GetTextHeight() - aOutSz.Height();
204 		if ( nMaxVisAreaStart < 0 )
205 			nMaxVisAreaStart = 0;
206 		if ( pTextView->GetStartDocPos().Y() > nMaxVisAreaStart )
207 		{
208 			Point aStartDocPos( pTextView->GetStartDocPos() );
209 			aStartDocPos.Y() = nMaxVisAreaStart;
210 			pTextView->SetStartDocPos( aStartDocPos );
211 			pTextView->ShowCursor();
212 		}
213         long nScrollStd = GetSettings().GetStyleSettings().GetScrollBarSize();
214 		Size aScrollSz(aOutSz.Width() - nScrollStd, nScrollStd );
215 		Point aScrollPos(0, aOutSz.Height() - nScrollStd);
216 
217 		pHScrollbar->SetPosSizePixel( aScrollPos, aScrollSz);
218 
219 		aScrollSz.Width() = aScrollSz.Height();
220 		aScrollSz.Height() = aOutSz.Height() - aScrollSz.Height();
221 		aScrollPos = Point(aOutSz.Width() - nScrollStd, 0);
222 
223 		pVScrollbar->SetPosSizePixel( aScrollPos, aScrollSz);
224 		aOutSz.Width() 	-= nScrollStd;
225 		aOutSz.Height() 	-= nScrollStd;
226 		pOutWin->SetOutputSizePixel(aOutSz);
227         InitScrollBars();
228 
229         // Zeile im ersten Resize setzen
230 		if(USHRT_MAX != nStartLine)
231 		{
232 			if(nStartLine < pTextEngine->GetParagraphCount())
233 			{
234 				TextSelection aSel(TextPaM( nStartLine, 0 ), TextPaM( nStartLine, 0x0 ));
235 				pTextView->SetSelection(aSel);
236 				pTextView->ShowCursor();
237 			}
238 			nStartLine = USHRT_MAX;
239 		}
240 
241 		if ( nVisY != pTextView->GetStartDocPos().Y() )
242 			InvalidateWindow();
243 	}
244 
245 }
246 
DataChanged(const DataChangedEvent & rDCEvt)247 void TextViewOutWin::DataChanged( const DataChangedEvent& rDCEvt )
248 {
249 	Window::DataChanged( rDCEvt );
250 
251 	switch( rDCEvt.GetType() )
252 	{
253 	case DATACHANGED_SETTINGS:
254 		// den Settings abgefragt werden.
255 		if( rDCEvt.GetFlags() & SETTINGS_STYLE )
256 		{
257 			const Color &rCol = GetSettings().GetStyleSettings().GetWindowColor();
258 			SetBackground( rCol );
259 			Font aFont( pTextView->GetTextEngine()->GetFont() );
260 			aFont.SetFillColor( rCol );
261 			pTextView->GetTextEngine()->SetFont( aFont );
262 		}
263 		break;
264 	}
265 }
266 
MouseMove(const MouseEvent & rEvt)267 void TextViewOutWin::MouseMove( const MouseEvent &rEvt )
268 {
269 	if ( pTextView )
270 		pTextView->MouseMove( rEvt );
271 }
272 
MouseButtonUp(const MouseEvent & rEvt)273 void TextViewOutWin::MouseButtonUp( const MouseEvent &rEvt )
274 {
275 	if ( pTextView )
276 		pTextView->MouseButtonUp( rEvt );
277 }
278 
MouseButtonDown(const MouseEvent & rEvt)279 void TextViewOutWin::MouseButtonDown( const MouseEvent &rEvt )
280 {
281 	GrabFocus();
282 	if ( pTextView )
283 		pTextView->MouseButtonDown( rEvt );
284 }
285 
Command(const CommandEvent & rCEvt)286 void TextViewOutWin::Command( const CommandEvent& rCEvt )
287 {
288 	switch(rCEvt.GetCommand())
289 	{
290 		case COMMAND_CONTEXTMENU:
291 		break;
292 		case COMMAND_WHEEL:
293 		case COMMAND_STARTAUTOSCROLL:
294 		case COMMAND_AUTOSCROLL:
295 		{
296 			const CommandWheelData* pWData = rCEvt.GetWheelData();
297 			if( !pWData || COMMAND_WHEEL_ZOOM != pWData->GetMode() )
298 			{
299 				((XMLFileWindow*)GetParent())->HandleWheelCommand( rCEvt );
300 			}
301 		}
302 		break;
303 
304 		default:
305 			if ( pTextView )
306 				pTextView->Command( rCEvt );
307 		else
308 			Window::Command(rCEvt);
309 	}
310 }
311 
KeyInput(const KeyEvent & rKEvt)312 void TextViewOutWin::KeyInput( const KeyEvent& rKEvt )
313 {
314 	if(!TextEngine::DoesKeyChangeText( rKEvt ))
315 		pTextView->KeyInput( rKEvt );
316 }
317 
Paint(const Rectangle & rRect)318 void  TextViewOutWin::Paint( const Rectangle& rRect )
319 {
320 	pTextView->Paint( rRect );
321 }
322 
CreateTextEngine()323 void XMLFileWindow::CreateTextEngine()
324 {
325 	const Color &rCol = GetSettings().GetStyleSettings().GetWindowColor();
326 	pOutWin = new TextViewOutWin(this, 0);
327 	pOutWin->SetBackground(Wallpaper(rCol));
328 	pOutWin->SetPointer(Pointer(POINTER_TEXT));
329 	pOutWin->Show();
330 
331 	//Scrollbars anlegen
332 	pHScrollbar = new ScrollBar(this, WB_3DLOOK |WB_HSCROLL|WB_DRAG);
333 	pHScrollbar->SetScrollHdl(LINK(this, XMLFileWindow, ScrollHdl));
334 	pHScrollbar->Show();
335 
336 	pVScrollbar = new ScrollBar(this, WB_3DLOOK |WB_VSCROLL|WB_DRAG);
337 	pVScrollbar->SetScrollHdl(LINK(this, XMLFileWindow, ScrollHdl));
338 	pHScrollbar->EnableDrag();
339 	pVScrollbar->Show();
340 
341 	pTextEngine = new TextEngine;
342 	pTextView = new TextView( pTextEngine, pOutWin );
343 	pTextView->SetAutoIndentMode(sal_True);
344 	pOutWin->SetTextView(pTextView);
345 
346 	pTextEngine->SetUpdateMode( sal_False );
347 	pTextEngine->InsertView( pTextView );
348 
349 	Font aFont;
350 	aFont.SetTransparent( sal_False );
351 	aFont.SetFillColor( rCol );
352 	SetPointFont( aFont );
353 	aFont = GetFont();
354 	aFont.SetFillColor( rCol );
355 	pOutWin->SetFont( aFont );
356 	pTextEngine->SetFont( aFont );
357 
358     aSyntaxIdleTimer.SetTimeout( SYNTAX_HIGHLIGHT_TIMEOUT );
359 	aSyntaxIdleTimer.SetTimeoutHdl( LINK( this, XMLFileWindow, SyntaxTimerHdl ) );
360 
361 	pTextEngine->EnableUndo( sal_False );
362 	pTextEngine->SetUpdateMode( sal_True );
363 
364 //	pTextView->ShowCursor( sal_True, sal_True );
365 	pTextView->HideCursor();
366 
367 	InitScrollBars();
368 	StartListening( *pTextEngine );
369 }
370 
SetScrollBarRanges()371 void XMLFileWindow::SetScrollBarRanges()
372 {
373 	pHScrollbar->SetRange( Range( 0, nCurTextWidth-1 ) );
374 	pVScrollbar->SetRange( Range(0, pTextEngine->GetTextHeight()-1) );
375 }
376 
InitScrollBars()377 void XMLFileWindow::InitScrollBars()
378 {
379 	SetScrollBarRanges();
380 
381     Size aOutSz( pOutWin->GetOutputSizePixel() );
382     pVScrollbar->SetVisibleSize( aOutSz.Height() );
383 	pVScrollbar->SetPageSize(  aOutSz.Height() * 8 / 10 );
384 	pVScrollbar->SetLineSize( pOutWin->GetTextHeight() );
385 	pVScrollbar->SetThumbPos( pTextView->GetStartDocPos().Y() );
386 	pHScrollbar->SetVisibleSize( aOutSz.Width() );
387 	pHScrollbar->SetPageSize( aOutSz.Width() * 8 / 10 );
388 	pHScrollbar->SetLineSize( pOutWin->GetTextWidth( 'x' ) );
389 	pHScrollbar->SetThumbPos( pTextView->GetStartDocPos().X() );
390 
391 }
392 
IMPL_LINK(XMLFileWindow,ScrollHdl,ScrollBar *,pScroll)393 IMPL_LINK(XMLFileWindow, ScrollHdl, ScrollBar*, pScroll)
394 {
395 	if(pScroll == pVScrollbar)
396 	{
397 		long nDiff = pTextView->GetStartDocPos().Y() - pScroll->GetThumbPos();
398 		GetTextView()->Scroll( 0, nDiff );
399 		pTextView->ShowCursor( sal_False, sal_True );
400 		pScroll->SetThumbPos( pTextView->GetStartDocPos().Y() );
401 	}
402 	else
403 	{
404 		long nDiff = pTextView->GetStartDocPos().X() - pScroll->GetThumbPos();
405 		GetTextView()->Scroll( nDiff, 0 );
406 		pTextView->ShowCursor( sal_False, sal_True );
407 		pScroll->SetThumbPos( pTextView->GetStartDocPos().X() );
408 	}
409 	return 0;
410 }
411 
Notify(SfxBroadcaster &,const SfxHint & rHint)412 void XMLFileWindow::Notify( SfxBroadcaster& /* rBC */, const SfxHint& rHint )
413 {
414 	if ( rHint.ISA( TextHint ) )
415 	{
416 		const TextHint& rTextHint = (const TextHint&)rHint;
417 		if( rTextHint.GetId() == TEXT_HINT_VIEWSCROLLED )
418 		{
419 			pHScrollbar->SetThumbPos( pTextView->GetStartDocPos().X() );
420 			pVScrollbar->SetThumbPos( pTextView->GetStartDocPos().Y() );
421 		}
422 		else if( rTextHint.GetId() == TEXT_HINT_TEXTHEIGHTCHANGED )
423 		{
424 			if ( (long)pTextEngine->GetTextHeight() < pOutWin->GetOutputSizePixel().Height() )
425 				pTextView->Scroll( 0, pTextView->GetStartDocPos().Y() );
426 			pVScrollbar->SetThumbPos( pTextView->GetStartDocPos().Y() );
427 			SetScrollBarRanges();
428 		}
429 		else if( rTextHint.GetId() == TEXT_HINT_FORMATPARA )
430 		{
431             DoDelayedSyntaxHighlight( (sal_uInt16)rTextHint.GetValue() );
432 		}
433 	}
434 }
435 
InvalidateWindow()436 void XMLFileWindow::InvalidateWindow()
437 {
438 	pOutWin->Invalidate();
439 	Window::Invalidate();
440 
441 }
442 
Command(const CommandEvent & rCEvt)443 void XMLFileWindow::Command( const CommandEvent& rCEvt )
444 {
445 	switch(rCEvt.GetCommand())
446 	{
447 		case COMMAND_WHEEL:
448 		case COMMAND_STARTAUTOSCROLL:
449 		case COMMAND_AUTOSCROLL:
450 		{
451 			const CommandWheelData* pWData = rCEvt.GetWheelData();
452 			if( !pWData || COMMAND_WHEEL_ZOOM != pWData->GetMode() )
453 				HandleScrollCommand( rCEvt, pHScrollbar, pVScrollbar );
454 		}
455 		break;
456 		default:
457 			Window::Command(rCEvt);
458 	}
459 }
460 
HandleWheelCommand(const CommandEvent & rCEvt)461 void XMLFileWindow::HandleWheelCommand( const CommandEvent& rCEvt )
462 {
463 	pTextView->Command(rCEvt);
464 	HandleScrollCommand( rCEvt, pHScrollbar, pVScrollbar );
465 }
466 
GetFocus()467 void XMLFileWindow::GetFocus()
468 {
469 	pOutWin->GrabFocus();
470 }
471 
ShowWindow(const rtl::OUString & rFileName)472 void XMLFileWindow::ShowWindow( const rtl::OUString& rFileName )
473 {
474 	String aFileName( rFileName );
475 	SvFileStream aStream( aFileName, STREAM_READ );
476 
477 	// since the xml files we load are utf-8 encoded, we need to set
478 	// this encoding at the SvFileStream, else the TextEngine will
479 	// use its default encoding which is not UTF8
480 	const sal_Char *pCharSet = rtl_getBestMimeCharsetFromTextEncoding( RTL_TEXTENCODING_UTF8 );
481 	rtl_TextEncoding eDestEnc = rtl_getTextEncodingFromMimeCharset( pCharSet );
482 	aStream.SetStreamCharSet( eDestEnc );
483 
484 	if( Read( aStream ) )
485 	{
486 		long nPrevTextWidth = nCurTextWidth;
487 		nCurTextWidth = pTextEngine->CalcTextWidth() + 25;	// kleine Toleranz
488 		if ( nCurTextWidth != nPrevTextWidth )
489 			SetScrollBarRanges();
490 
491 		TextPaM aPaM( pTextView->CursorStartOfDoc() );
492 		TextSelection aSelection( aPaM, aPaM );
493 		pTextView->SetSelection( aSelection, true );
494 
495 		Window::Show();
496 	}
497 }
498 
showLine(sal_Int32 nLine)499 void XMLFileWindow::showLine( sal_Int32 nLine )
500 {
501 	TextPaM aPaM( pTextView->CursorStartOfDoc() );
502 	while( nLine-- )
503 		aPaM = pTextView->CursorDown( aPaM );
504 
505 	TextSelection aSelection( pTextView->CursorEndOfLine( aPaM ), aPaM );
506 	pTextView->SetSelection( aSelection, true );
507 }
508 
509 
XMLSourceFileDialog(Window * pParent,ResMgr & rResMgr,const com::sun::star::uno::Reference<com::sun::star::lang::XMultiServiceFactory> & rxMSF)510 XMLSourceFileDialog::XMLSourceFileDialog( Window* pParent, ResMgr& rResMgr, const com::sun::star::uno::Reference< com::sun::star::lang::XMultiServiceFactory >& rxMSF  )
511 :	WorkWindow( pParent, ResId( DLG_XML_SOURCE_FILE_DIALOG, rResMgr ) ),
512 	mnOutputHeight( LogicToPixel( Size( 80, 80 ), MAP_APPFONT ).Height() ),
513 	mxMSF( rxMSF ),
514 	mrResMgr( rResMgr ),
515 	maLBOutput( this ),
516 	maPBValidate( this, ResId( PB_VALIDATE, rResMgr ) )
517 {
518 
519 	FreeResource();
520 
521 	maPBValidate.SetClickHdl(LINK( this, XMLSourceFileDialog, ClickHdl_Impl ) );
522 	maLBOutput.SetSelectHdl(LINK(this, XMLSourceFileDialog, SelectHdl_Impl ) );
523 	mpTextWindow = new XMLFileWindow( this );
524 	mpTextWindow->SetHelpId( HID_XML_FILTER_OUTPUT_WINDOW );
525 	maLBOutput.SetHelpId( HID_XML_FILTER_TEST_VALIDATE_OUPUT );
526 
527 	Resize();
528 }
529 
~XMLSourceFileDialog()530 XMLSourceFileDialog::~XMLSourceFileDialog()
531 {
532 	if( maFileURL.getLength() )
533 		osl::File::remove( maFileURL );
534 
535 	delete mpTextWindow;
536 }
537 
ShowWindow(const rtl::OUString & rFileName,const filter_info_impl * pFilterInfo)538 void XMLSourceFileDialog::ShowWindow( const rtl::OUString& rFileName, const filter_info_impl* pFilterInfo )
539 {
540 	EnterWait();
541 	if( maFileURL.getLength() )
542 	{
543 		osl::File::remove( maFileURL );
544 		delete mpTextWindow;
545 		mpTextWindow = new XMLFileWindow( this );
546 		maLBOutput.Hide();
547 		maLBOutput.Clear();
548 		maPBValidate.Enable(sal_True);
549 		Resize();
550 	}
551 
552 	mpFilterInfo = pFilterInfo;
553 	maFileURL = rFileName;
554 	mpTextWindow->ShowWindow( rFileName );
555 	WorkWindow::Show();
556 	LeaveWait();
557 }
558 
Resize()559 void XMLSourceFileDialog::Resize()
560 {
561 	bool bOutputVisible = maLBOutput.IsVisible() != 0;
562 
563 	Point aSpacing( LogicToPixel( Point( 6, 6 ), MAP_APPFONT ) );
564 	Size aButton( maPBValidate.GetSizePixel() );
565 
566 	Size aDialogSize( GetOutputSizePixel() );
567 
568 //	Point aButtonPos( aSpacing.X(), aSpacing.Y() );
569 //	maPBValidate.SetPosSizePixel( aButtonPos, aButton );
570 
571 	Size aOutputSize( aDialogSize.Width(), bOutputVisible ? mnOutputHeight : 0 );
572 
573 	Point aTextWindowPos( 0, 2* aSpacing.Y() + aButton.Height() );
574 	Size aTextWindowSize( aDialogSize.Width(), aDialogSize.Height() - aTextWindowPos.Y() - aOutputSize.Height()  );
575 
576 	mpTextWindow->SetPosSizePixel( aTextWindowPos, aTextWindowSize );
577 
578 	if( bOutputVisible )
579 	{
580 		Point aOutputPos( 0, aTextWindowPos.Y() + aTextWindowSize.Height() );
581 		maLBOutput.SetPosSizePixel( aOutputPos, aOutputSize );
582 	}
583 }
584 
585 
IMPL_LINK(XMLSourceFileDialog,SelectHdl_Impl,ListBox *,pListBox)586 IMPL_LINK(XMLSourceFileDialog, SelectHdl_Impl, ListBox *, pListBox )
587 {
588 	sal_uInt16 nEntry = pListBox->GetSelectEntryPos();
589 	if( LISTBOX_ENTRY_NOTFOUND != nEntry )
590 	{
591 		int nLine = (int)(sal_IntPtr)pListBox->GetEntryData(nEntry);
592 		if( -1 != nLine )
593 		{
594 			if( nLine > 0 )
595 				nLine--;
596 
597 			showLine( nLine );
598 		}
599 	}
600 	return 0;
601 }
602 
603 IMPL_LINK(XMLSourceFileDialog, ClickHdl_Impl, PushButton *, /* pButton */ )
604 {
605 	onValidate();
606 	return 0;
607 }
608 
onValidate()609 void XMLSourceFileDialog::onValidate()
610 {
611 	EnterWait();
612 
613 	maLBOutput.Show();
614 	maPBValidate.Enable(sal_False);
615 	Resize();
616 
617 	try
618 	{
619 		Reference< XImportFilter > xImporter( mxMSF->createInstance( OUString::createFromAscii( "com.sun.star.documentconversion.XSLTValidate" ) ), UNO_QUERY );
620 		if( xImporter.is() )
621 		{
622 			osl::File aInputFile( maFileURL );
623 			/* osl::File::RC rc = */ aInputFile.open( OpenFlag_Read );
624 
625 			Reference< XInputStream > xIS( new comphelper::OSLInputStreamWrapper( aInputFile ) );
626 
627 			Sequence< PropertyValue > aSourceData(3);
628 			aSourceData[0].Name = OUString( RTL_CONSTASCII_USTRINGPARAM( "InputStream" ) );
629 			aSourceData[0].Value <<= xIS;
630 
631 			aSourceData[1].Name = OUString( RTL_CONSTASCII_USTRINGPARAM( "FileName" ) );
632 			aSourceData[1].Value <<= maFileURL;
633 
634 			aSourceData[2].Name = OUString( RTL_CONSTASCII_USTRINGPARAM( "ErrorHandler" ) );
635 			Reference< XErrorHandler > xHandle( new XMLErrorHandler( this, maLBOutput ) );
636 			aSourceData[2].Value <<= xHandle;
637 
638 			Reference< XDocumentHandler > xWriter( mxMSF->createInstance( OUString( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.xml.sax.Writer" ) ) ), UNO_QUERY );
639 			Reference< XOutputStream > xOS( mxMSF->createInstance( OUString( RTL_CONSTASCII_USTRINGPARAM( "com.sun.star.io.Pipe" ) ) ), UNO_QUERY );
640 			Reference< XActiveDataSource > xDocSrc( xWriter, UNO_QUERY );
641 			xDocSrc->setOutputStream( xOS );
642 
643 			Sequence< OUString > aFilterUserData( mpFilterInfo->getFilterUserData() );
644 			xImporter->importer( aSourceData, xWriter, aFilterUserData );
645 		}
646 	}
647 	catch(Exception& e)
648 	{
649 		String sErr( e.Message );
650 		sal_uInt16 nEntry = maLBOutput.InsertEntry( sErr );
651 		maLBOutput.SetEntryData( nEntry, (void*)-1 );
652 	}
653 
654 	if( 0 == maLBOutput.GetEntryCount() )
655 	{
656 		String sErr( RESID( STR_NO_ERRORS_FOUND ) );
657 		sal_uInt16 nEntry = maLBOutput.InsertEntry( sErr );
658 		maLBOutput.SetEntryData( nEntry, (void*)-1 );
659 	}
660 
661 	LeaveWait();
662 }
663 
showLine(sal_Int32 nLine)664 void XMLSourceFileDialog::showLine( sal_Int32 nLine )
665 {
666 	mpTextWindow->showLine( nLine );
667 }
668 
669 
670 ///////////////////////////////////////////////////////////////////////
671 
lcl_Highlight(const String & rSource,SwTextPortions & aPortionList)672 void lcl_Highlight(const String& rSource, SwTextPortions& aPortionList)
673 {
674 	const sal_Unicode cOpenBracket = '<';
675 	const sal_Unicode cCloseBracket= '>';
676 	const sal_Unicode cSlash		= '/';
677 	const sal_Unicode cExclamation = '!';
678 //	const sal_Unicode cQuote		= '"';
679 //	const sal_Unicode cSQuote      = '\'';
680 	const sal_Unicode cMinus		= '-';
681 	const sal_Unicode cSpace		= ' ';
682 	const sal_Unicode cTab			= 0x09;
683 	const sal_Unicode cLF          = 0x0a;
684 	const sal_Unicode cCR          = 0x0d;
685 
686 
687 	const sal_uInt16 nStrLen = rSource.Len();
688 	sal_uInt16 nInsert = 0;			// Number of inserted Portions
689 	sal_uInt16 nActPos = 0;			// Position, at the '<' was found
690 	sal_uInt16 nOffset = 0; 		// Offset of nActPos for '<'
691 	sal_uInt16 nPortStart = USHRT_MAX; 	// For the TextPortion
692 	sal_uInt16 nPortEnd  = 	0;  //
693 	SwTextPortion aText;
694 	while(nActPos < nStrLen)
695 	{
696 		svtools::ColorConfigEntry eFoundType = svtools::HTMLUNKNOWN;
697 		if(rSource.GetChar(nActPos) == cOpenBracket && nActPos < nStrLen - 2 )
698 		{
699 			// 'leere' Portion einfuegen
700 			if(nPortEnd < nActPos - 1 )
701 			{
702 				aText.nLine = 0;
703 				// am Anfang nicht verschieben
704 				aText.nStart = nPortEnd;
705 				if(nInsert)
706 					aText.nStart += 1;
707 				aText.nEnd = nActPos - 1;
708 				aText.eType = svtools::HTMLUNKNOWN;
709 				aPortionList.push_back( aText );
710 				nInsert++;
711 			}
712 			sal_Unicode cFollowFirst = rSource.GetChar((xub_StrLen)(nActPos + 1));
713 			sal_Unicode cFollowNext = rSource.GetChar((xub_StrLen)(nActPos + 2));
714 			if(cExclamation == cFollowFirst)
715 			{
716 				// "<!" SGML oder Kommentar
717 				if(cMinus == cFollowNext &&
718 					nActPos < nStrLen - 3 && cMinus == rSource.GetChar((xub_StrLen)(nActPos + 3)))
719 				{
720 					eFoundType = svtools::HTMLCOMMENT;
721 				}
722 				else
723 					eFoundType = svtools::HTMLSGML;
724 				nPortStart = nActPos;
725 				nPortEnd = nActPos + 1;
726 			}
727 			else if(cSlash == cFollowFirst)
728 			{
729 				// "</" Slash ignorieren
730 				nPortStart = nActPos;
731 				nActPos++;
732 				nOffset++;
733 			}
734 			if(svtools::HTMLUNKNOWN == eFoundType)
735 			{
736 				//jetzt koennte hier ein keyword folgen
737 				sal_uInt16 nSrchPos = nActPos;
738 				while(++nSrchPos < nStrLen - 1)
739 				{
740 					sal_Unicode cNext = rSource.GetChar(nSrchPos);
741 					if( cNext == cSpace	||
742 						cNext == cTab 	||
743 						cNext == cLF 	||
744 						cNext == cCR)
745 						break;
746 					else if(cNext == cCloseBracket)
747 					{
748 						break;
749 					}
750 				}
751 				if(nSrchPos > nActPos + 1)
752 				{
753 					//irgend ein String wurde gefunden
754 					String sToken = rSource.Copy(nActPos + 1, nSrchPos - nActPos - 1 );
755 					sToken.ToUpperAscii();
756 //					int nToken = ::GetHTMLToken(sToken);
757 //					if(nToken)
758 					{
759 						//Token gefunden
760 						eFoundType = svtools::HTMLKEYWORD;
761 						nPortEnd = nSrchPos;
762 						nPortStart = nActPos;
763 					}
764 /*
765 					else
766 					{
767 						//was war das denn?
768 #ifdef DEBUG
769 						DBG_ERROR("Token nicht erkannt!")
770 						DBG_ERROR(ByteString(sToken, gsl_getSystemTextEncoding()).GetBuffer())
771 #endif
772 					}
773 */
774 
775 				}
776 			}
777 			// jetzt muss noch '>' gesucht werden
778 			if(svtools::HTMLUNKNOWN != eFoundType)
779 			{
780 				sal_Bool bFound = sal_False;
781 				for(sal_uInt16 i = nPortEnd; i < nStrLen; i++)
782 					if(cCloseBracket == rSource.GetChar(i))
783 					{
784 						bFound = sal_True;
785 						nPortEnd = i;
786 						break;
787 					}
788 				if(!bFound && (eFoundType == svtools::HTMLCOMMENT))
789 				{
790 					// Kommentar ohne Ende in dieser Zeile
791 					bFound  = sal_True;
792 					nPortEnd = nStrLen - 1;
793 				}
794 
795 				if(bFound ||(eFoundType == svtools::HTMLCOMMENT))
796 				{
797 					SwTextPortion aText2;
798 					aText2.nLine = 0;
799 					aText2.nStart = nPortStart + 1;
800 					aText2.nEnd = nPortEnd;
801 					aText2.eType = eFoundType;
802 					aPortionList.push_back( aText2 );
803 					nInsert++;
804 					eFoundType = svtools::HTMLUNKNOWN;
805 				}
806 
807 			}
808 		}
809 		nActPos++;
810 	}
811 	if(nInsert && nPortEnd < nActPos - 1)
812 	{
813 		aText.nLine = 0;
814 		aText.nStart = nPortEnd + 1;
815 		aText.nEnd = nActPos - 1;
816 		aText.eType = svtools::HTMLUNKNOWN;
817 		aPortionList.push_back( aText );
818 		nInsert++;
819 	}
820 }
821 
DoDelayedSyntaxHighlight(sal_uInt16 nPara)822 void XMLFileWindow::DoDelayedSyntaxHighlight( sal_uInt16 nPara )
823 {
824 	if ( !bHighlighting )
825 	{
826 		aSyntaxLineTable.Insert( nPara, (void*)(sal_uInt16)1 );
827 		aSyntaxIdleTimer.Start();
828 	}
829 }
830 
ImpDoHighlight(const String & rSource,sal_uInt16 nLineOff)831 void XMLFileWindow::ImpDoHighlight( const String& rSource, sal_uInt16 nLineOff )
832 {
833 	SwTextPortions aPortionList;
834 	lcl_Highlight(rSource, aPortionList);
835 
836 	size_t nCount = aPortionList.size();
837 	if ( !nCount )
838 		return;
839 
840 	SwTextPortion& rLast = aPortionList[nCount-1];
841 	if ( rLast.nStart > rLast.nEnd ) 	// Nur bis Bug von MD behoeben
842 	{
843 		nCount--;
844 		aPortionList.pop_back();
845 		if ( !nCount )
846 			return;
847 	}
848 
849 	// Evtl. Optimieren:
850 	// Wenn haufig gleiche Farbe, dazwischen Blank ohne Farbe,
851 	// ggf. zusammenfassen, oder zumindest das Blank,
852 	// damit weniger Attribute
853 	sal_Bool bOptimizeHighlight = sal_True; // war in der BasicIDE static
854 	if ( bOptimizeHighlight )
855 	{
856 		// Es muessen nur die Blanks und Tabs mit attributiert werden.
857 		// Wenn zwei gleiche Attribute hintereinander eingestellt werden,
858 		// optimiert das die TextEngine.
859 		sal_uInt16 nLastEnd = 0;
860 		for ( size_t i = 0; i < nCount; i++ )
861 		{
862 			SwTextPortion& r = aPortionList[i];
863 			DBG_ASSERT( r.nLine == aPortionList[0].nLine, "doch mehrere Zeilen ?" );
864 			if ( r.nStart > r.nEnd ) 	// Nur bis Bug von MD behoeben
865 				continue;
866 
867 			if ( r.nStart > nLastEnd )
868 			{
869 				// Kann ich mich drauf verlassen, dass alle ausser
870 				// Blank und Tab gehighlightet wird ?!
871 				r.nStart = nLastEnd;
872 			}
873 			nLastEnd = r.nEnd+1;
874 			if ( ( i == (nCount-1) ) && ( r.nEnd < rSource.Len() ) )
875 				r.nEnd = rSource.Len();
876 		}
877 	}
878 
879 	svtools::ColorConfig aConfig;
880 	for ( size_t i = 0; i < aPortionList.size(); i++ )
881 	{
882 		SwTextPortion& r = aPortionList[i];
883 		if ( r.nStart > r.nEnd ) 	// Nur bis Bug von MD behoeben
884 			continue;
885 //		sal_uInt16 nCol = r.eType;
886         if(r.eType !=  svtools::HTMLSGML    &&
887             r.eType != svtools::HTMLCOMMENT &&
888             r.eType != svtools::HTMLKEYWORD &&
889             r.eType != svtools::HTMLUNKNOWN)
890                 r.eType = (svtools::ColorConfigEntry)svtools::HTMLUNKNOWN;
891         Color aColor((ColorData)aConfig.GetColorValue((svtools::ColorConfigEntry)r.eType).nColor);
892         sal_uInt16 nLine = nLineOff+r.nLine; //
893         pTextEngine->SetAttrib( TextAttribFontColor( aColor ), nLine, r.nStart, r.nEnd+1 );
894 	}
895 }
896 
IMPL_LINK(XMLFileWindow,SyntaxTimerHdl,Timer *,pTimer)897 IMPL_LINK( XMLFileWindow, SyntaxTimerHdl, Timer *, pTimer )
898 {
899     Time aSyntaxCheckStart;
900     DBG_ASSERT( pTextView, "Noch keine View, aber Syntax-Highlight ?!" );
901 	pTextEngine->SetUpdateMode( sal_False );
902 
903 	bHighlighting = sal_True;
904 	sal_uInt16 nLine;
905 	sal_uInt16 nCount  = 0;
906 	// zuerst wird der Bereich um dem Cursor bearbeitet
907 	TextSelection aSel = pTextView->GetSelection();
908     sal_uInt16 nCur = (sal_uInt16)aSel.GetStart().GetPara();
909 	if(nCur > 40)
910 		nCur -= 40;
911 	else
912 		nCur = 0;
913 	if(aSyntaxLineTable.Count())
914 		for(sal_uInt16 i = 0; i < 80 && nCount < 40; i++, nCur++)
915 		{
916 			void * p = aSyntaxLineTable.Get(nCur);
917 			if(p)
918 			{
919 				DoSyntaxHighlight( nCur );
920 				aSyntaxLineTable.Remove( nCur );
921 				nCount++;
922                 if(!aSyntaxLineTable.Count())
923                     break;
924                 if((Time().GetTime() - aSyntaxCheckStart.GetTime()) > MAX_HIGHLIGHTTIME )
925                 {
926                     pTimer->SetTimeout( 2 * SYNTAX_HIGHLIGHT_TIMEOUT );
927                     break;
928                 }
929             }
930 		}
931 
932 	// wenn dann noch etwas frei ist, wird von Beginn an weitergearbeitet
933 	void* p = aSyntaxLineTable.First();
934 	while ( p && nCount < MAX_SYNTAX_HIGHLIGHT)
935 	{
936 		nLine = (sal_uInt16)aSyntaxLineTable.GetCurKey();
937 		DoSyntaxHighlight( nLine );
938 		sal_uInt16 nC = (sal_uInt16)aSyntaxLineTable.GetCurKey();
939 		p = aSyntaxLineTable.Next();
940 		aSyntaxLineTable.Remove(nC);
941 		nCount ++;
942         if(Time().GetTime() - aSyntaxCheckStart.GetTime() > MAX_HIGHLIGHTTIME)
943         {
944             pTimer->SetTimeout( 2 * SYNTAX_HIGHLIGHT_TIMEOUT );
945             break;
946         }
947 	}
948 	// os: #43050# hier wird ein TextView-Problem umpopelt:
949 	// waehrend des Highlightings funktionierte das Scrolling nicht
950 	TextView* pTmp = pTextEngine->GetActiveView();
951 	pTextEngine->SetActiveView(0);
952 	pTextEngine->SetUpdateMode( sal_True );
953 	pTextEngine->SetActiveView(pTmp);
954 	pTextView->ShowCursor(sal_False, sal_False);
955 
956 	if(aSyntaxLineTable.Count() && !pTimer->IsActive())
957 		pTimer->Start();
958 	// SyntaxTimerHdl wird gerufen, wenn Text-Aenderung
959 	// => gute Gelegenheit, Textbreite zu ermitteln!
960 	long nPrevTextWidth = nCurTextWidth;
961 	nCurTextWidth = pTextEngine->CalcTextWidth() + 25;	// kleine Toleranz
962 	if ( nCurTextWidth != nPrevTextWidth )
963 		SetScrollBarRanges();
964 	bHighlighting = sal_False;
965 
966     return 0;
967 }
968 
DoSyntaxHighlight(sal_uInt16 nPara)969 void XMLFileWindow::DoSyntaxHighlight( sal_uInt16 nPara )
970 {
971 	// Durch das DelayedSyntaxHighlight kann es passieren,
972 	// dass die Zeile nicht mehr existiert!
973 	if ( nPara < pTextEngine->GetParagraphCount() )
974 	{
975 		pTextEngine->RemoveAttribs( nPara );
976 		String aSource( pTextEngine->GetText( nPara ) );
977 		pTextEngine->SetUpdateMode( sal_False );
978 		ImpDoHighlight( aSource, nPara );
979 		// os: #43050# hier wird ein TextView-Problem umpopelt:
980 		// waehrend des Highlightings funktionierte das Scrolling nicht
981 		TextView* pTmp = pTextEngine->GetActiveView();
982 		pTmp->SetAutoScroll(sal_False);
983 		pTextEngine->SetActiveView(0);
984 		pTextEngine->SetUpdateMode( sal_True );
985 		pTextEngine->SetActiveView(pTmp);
986 		// Bug 72887 show the cursor
987 		pTmp->SetAutoScroll(sal_True);
988 		pTmp->ShowCursor( sal_False/*pTmp->IsAutoScroll()*/ );
989 	}
990 }
991