Line data Source code
1 : /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 4 -*- */
2 : /*
3 : * This file is part of the LibreOffice project.
4 : *
5 : * This Source Code Form is subject to the terms of the Mozilla Public
6 : * License, v. 2.0. If a copy of the MPL was not distributed with this
7 : * file, You can obtain one at http://mozilla.org/MPL/2.0/.
8 : *
9 : * This file incorporates work covered by the following license notice:
10 : *
11 : * Licensed to the Apache Software Foundation (ASF) under one or more
12 : * contributor license agreements. See the NOTICE file distributed
13 : * with this work for additional information regarding copyright
14 : * ownership. The ASF licenses this file to you under the Apache
15 : * License, Version 2.0 (the "License"); you may not use this file
16 : * except in compliance with the License. You may obtain a copy of
17 : * the License at http://www.apache.org/licenses/LICENSE-2.0 .
18 : */
19 :
20 : #include "sal/config.h"
21 :
22 : #include <hintids.hxx>
23 : #include <cmdid.h>
24 :
25 : #include <com/sun/star/beans/XMultiPropertySet.hpp>
26 : #include <com/sun/star/beans/XPropertiesChangeListener.hpp>
27 : #include <cppuhelper/implbase1.hxx>
28 : #include <officecfg/Office/Common.hxx>
29 : #include <rtl/ustring.hxx>
30 : #include <sal/log.hxx>
31 : #include <vcl/textview.hxx>
32 : #include <svx/svxids.hrc>
33 : #include <vcl/scrbar.hxx>
34 : #include <sfx2/dispatch.hxx>
35 : #include <sfx2/app.hxx>
36 : #include <svtools/htmltokn.h>
37 : #include <vcl/txtattr.hxx>
38 : #include <svtools/colorcfg.hxx>
39 : #include <editeng/flstitem.hxx>
40 : #include <vcl/metric.hxx>
41 : #include <svtools/ctrltool.hxx>
42 : #include <tools/time.hxx>
43 : #include <swmodule.hxx>
44 : #include <docsh.hxx>
45 : #include <srcview.hxx>
46 : #include <helpid.h>
47 : #include <deque>
48 :
49 : struct SwTextPortion
50 : {
51 : sal_uInt16 nLine;
52 : sal_uInt16 nStart, nEnd;
53 : svtools::ColorConfigEntry eType;
54 : };
55 :
56 : #define MAX_SYNTAX_HIGHLIGHT 20
57 : #define MAX_HIGHLIGHTTIME 200
58 : #define SYNTAX_HIGHLIGHT_TIMEOUT 200
59 :
60 : typedef std::deque<SwTextPortion> SwTextPortions;
61 :
62 0 : static void lcl_Highlight(const String& rSource, SwTextPortions& aPortionList)
63 : {
64 0 : const sal_Unicode cOpenBracket = '<';
65 0 : const sal_Unicode cCloseBracket= '>';
66 0 : const sal_Unicode cSlash = '/';
67 0 : const sal_Unicode cExclamation = '!';
68 0 : const sal_Unicode cMinus = '-';
69 0 : const sal_Unicode cSpace = ' ';
70 0 : const sal_Unicode cTab = 0x09;
71 0 : const sal_Unicode cLF = 0x0a;
72 0 : const sal_Unicode cCR = 0x0d;
73 :
74 :
75 0 : const sal_uInt16 nStrLen = rSource.Len();
76 0 : sal_uInt16 nInsert = 0; // number of inserted portions
77 0 : sal_uInt16 nActPos = 0; // position, where '<' was found
78 0 : sal_uInt16 nOffset = 0; // Offset of nActPos to '<'
79 0 : sal_uInt16 nPortStart = USHRT_MAX; // for the TextPortion
80 0 : sal_uInt16 nPortEnd = 0; //
81 : SwTextPortion aText;
82 0 : while(nActPos < nStrLen)
83 : {
84 0 : svtools::ColorConfigEntry eFoundType = svtools::HTMLUNKNOWN;
85 0 : if(rSource.GetChar(nActPos) == cOpenBracket && nActPos < nStrLen - 2 )
86 : {
87 : // insert 'empty' portion
88 0 : if(nPortEnd < nActPos - 1 )
89 : {
90 0 : aText.nLine = 0;
91 : // don't move at the beginning
92 0 : aText.nStart = nPortEnd;
93 0 : if(nInsert)
94 0 : aText.nStart += 1;
95 0 : aText.nEnd = nActPos - 1;
96 0 : aText.eType = svtools::HTMLUNKNOWN;
97 0 : aPortionList.push_back( aText );
98 0 : nInsert++;
99 : }
100 0 : sal_Unicode cFollowFirst = rSource.GetChar((xub_StrLen)(nActPos + 1));
101 0 : sal_Unicode cFollowNext = rSource.GetChar((xub_StrLen)(nActPos + 2));
102 0 : if(cExclamation == cFollowFirst)
103 : {
104 : // "<!" SGML or comment
105 0 : if(cMinus == cFollowNext &&
106 0 : nActPos < nStrLen - 3 && cMinus == rSource.GetChar((xub_StrLen)(nActPos + 3)))
107 : {
108 0 : eFoundType = svtools::HTMLCOMMENT;
109 : }
110 : else
111 0 : eFoundType = svtools::HTMLSGML;
112 0 : nPortStart = nActPos;
113 0 : nPortEnd = nActPos + 1;
114 : }
115 0 : else if(cSlash == cFollowFirst)
116 : {
117 : // "</" ignore slash
118 0 : nPortStart = nActPos;
119 0 : nActPos++;
120 0 : nOffset++;
121 : }
122 0 : if(svtools::HTMLUNKNOWN == eFoundType)
123 : {
124 : // now here a keyword could follow
125 0 : sal_uInt16 nSrchPos = nActPos;
126 0 : while(++nSrchPos < nStrLen - 1)
127 : {
128 0 : sal_Unicode cNext = rSource.GetChar(nSrchPos);
129 0 : if( cNext == cSpace ||
130 : cNext == cTab ||
131 : cNext == cLF ||
132 : cNext == cCR)
133 0 : break;
134 0 : else if(cNext == cCloseBracket)
135 : {
136 0 : break;
137 : }
138 : }
139 0 : if(nSrchPos > nActPos + 1)
140 : {
141 : // some string was found
142 0 : OUString sToken = rSource.Copy(nActPos + 1, nSrchPos - nActPos - 1 );
143 0 : sToken = sToken.toAsciiUpperCase();
144 0 : int nToken = ::GetHTMLToken(sToken);
145 0 : if(nToken)
146 : {
147 : // Token was found
148 0 : eFoundType = svtools::HTMLKEYWORD;
149 0 : nPortEnd = nSrchPos;
150 0 : nPortStart = nActPos;
151 : }
152 : else
153 : {
154 : // what was that?
155 : SAL_WARN(
156 : "sw.level2",
157 : "Token " << sToken
158 : << " not recognised!");
159 0 : }
160 :
161 : }
162 : }
163 : // now we still have to look for '>'
164 0 : if(svtools::HTMLUNKNOWN != eFoundType)
165 : {
166 0 : sal_Bool bFound = sal_False;
167 0 : for(sal_uInt16 i = nPortEnd; i < nStrLen; i++)
168 0 : if(cCloseBracket == rSource.GetChar(i))
169 : {
170 0 : bFound = sal_True;
171 0 : nPortEnd = i;
172 0 : break;
173 : }
174 0 : if(!bFound && (eFoundType == svtools::HTMLCOMMENT))
175 : {
176 : // comment without ending in this line
177 0 : bFound = sal_True;
178 0 : nPortEnd = nStrLen - 1;
179 : }
180 :
181 0 : if(bFound ||(eFoundType == svtools::HTMLCOMMENT))
182 : {
183 : SwTextPortion aTextPortion;
184 0 : aTextPortion.nLine = 0;
185 0 : aTextPortion.nStart = nPortStart + 1;
186 0 : aTextPortion.nEnd = nPortEnd;
187 0 : aTextPortion.eType = eFoundType;
188 0 : aPortionList.push_back( aTextPortion );
189 0 : nInsert++;
190 0 : eFoundType = svtools::HTMLUNKNOWN;
191 : }
192 :
193 : }
194 : }
195 0 : nActPos++;
196 : }
197 0 : if(nInsert && nPortEnd < nActPos - 1)
198 : {
199 0 : aText.nLine = 0;
200 0 : aText.nStart = nPortEnd + 1;
201 0 : aText.nEnd = nActPos - 1;
202 0 : aText.eType = svtools::HTMLUNKNOWN;
203 0 : aPortionList.push_back( aText );
204 0 : nInsert++;
205 : }
206 0 : }
207 :
208 : class SwSrcEditWindow::ChangesListener:
209 : public cppu::WeakImplHelper1< css::beans::XPropertiesChangeListener >
210 : {
211 : public:
212 0 : ChangesListener(SwSrcEditWindow & editor): editor_(editor) {}
213 :
214 : private:
215 0 : virtual ~ChangesListener() {}
216 :
217 0 : virtual void SAL_CALL disposing(css::lang::EventObject const &)
218 : throw (css::uno::RuntimeException)
219 : {
220 0 : osl::MutexGuard g(editor_.mutex_);
221 0 : editor_.notifier_.clear();
222 0 : }
223 :
224 0 : virtual void SAL_CALL propertiesChange(
225 : css::uno::Sequence< css::beans::PropertyChangeEvent > const &)
226 : throw (css::uno::RuntimeException)
227 : {
228 0 : SolarMutexGuard g;
229 0 : editor_.SetFont();
230 0 : }
231 :
232 : SwSrcEditWindow & editor_;
233 : };
234 :
235 0 : SwSrcEditWindow::SwSrcEditWindow( Window* pParent, SwSrcView* pParentView ) :
236 : Window( pParent, WB_BORDER|WB_CLIPCHILDREN ),
237 :
238 : pTextEngine(0),
239 :
240 : pOutWin(0),
241 : pHScrollbar(0),
242 : pVScrollbar(0),
243 :
244 : pSrcView(pParentView),
245 :
246 : nCurTextWidth(0),
247 : nStartLine(USHRT_MAX),
248 0 : eSourceEncoding(osl_getThreadTextEncoding()),
249 : bDoSyntaxHighlight(sal_True),
250 0 : bHighlighting(sal_False)
251 : {
252 0 : SetHelpId(HID_SOURCE_EDITWIN);
253 0 : CreateTextEngine();
254 :
255 : // Using "this" in ctor is a little fishy, but should work here at least as
256 : // long as there are no derivations:
257 0 : listener_ = new ChangesListener(*this);
258 : css::uno::Reference< css::beans::XMultiPropertySet > n(
259 : officecfg::Office::Common::Font::SourceViewFont::get(),
260 0 : css::uno::UNO_QUERY_THROW);
261 : {
262 0 : osl::MutexGuard g(mutex_);
263 0 : notifier_ = n;
264 : }
265 0 : css::uno::Sequence< rtl::OUString > s(2);
266 0 : s[0] = rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("FontHeight"));
267 0 : s[1] = rtl::OUString(RTL_CONSTASCII_USTRINGPARAM("FontName"));
268 0 : n->addPropertiesChangeListener(s, listener_.get());
269 0 : }
270 :
271 0 : SwSrcEditWindow::~SwSrcEditWindow()
272 : {
273 0 : css::uno::Reference< css::beans::XMultiPropertySet > n;
274 : {
275 0 : osl::MutexGuard g(mutex_);
276 0 : n = notifier_;
277 : }
278 0 : if (n.is()) {
279 0 : n->removePropertiesChangeListener(listener_.get());
280 : }
281 0 : aSyntaxIdleTimer.Stop();
282 0 : if ( pTextEngine )
283 : {
284 0 : EndListening( *pTextEngine );
285 0 : pTextEngine->RemoveView( pTextView );
286 :
287 0 : delete pHScrollbar;
288 0 : delete pVScrollbar;
289 :
290 0 : delete pTextView;
291 0 : delete pTextEngine;
292 : }
293 0 : delete pOutWin;
294 0 : }
295 :
296 0 : void SwSrcEditWindow::DataChanged( const DataChangedEvent& rDCEvt )
297 : {
298 0 : Window::DataChanged( rDCEvt );
299 :
300 0 : switch ( rDCEvt.GetType() )
301 : {
302 : case DATACHANGED_SETTINGS:
303 : // newly rearrange ScrollBars or trigger Resize, because
304 : // ScrollBar size could have changed. For this, in the
305 : // Resize handler the size of ScrollBars has to be queried
306 : // from the settings as well.
307 0 : if( rDCEvt.GetFlags() & SETTINGS_STYLE )
308 0 : Resize();
309 0 : break;
310 : }
311 0 : }
312 :
313 0 : void SwSrcEditWindow::Resize()
314 : {
315 : // ScrollBars, etc. happens in Adjust...
316 0 : if ( pTextView )
317 : {
318 0 : long nVisY = pTextView->GetStartDocPos().Y();
319 0 : pTextView->ShowCursor();
320 0 : Size aOutSz( GetOutputSizePixel() );
321 0 : long nMaxVisAreaStart = pTextView->GetTextEngine()->GetTextHeight() - aOutSz.Height();
322 0 : if ( nMaxVisAreaStart < 0 )
323 0 : nMaxVisAreaStart = 0;
324 0 : if ( pTextView->GetStartDocPos().Y() > nMaxVisAreaStart )
325 : {
326 0 : Point aStartDocPos( pTextView->GetStartDocPos() );
327 0 : aStartDocPos.Y() = nMaxVisAreaStart;
328 0 : pTextView->SetStartDocPos( aStartDocPos );
329 0 : pTextView->ShowCursor();
330 : }
331 0 : long nScrollStd = GetSettings().GetStyleSettings().GetScrollBarSize();
332 0 : Size aScrollSz(aOutSz.Width() - nScrollStd, nScrollStd );
333 0 : Point aScrollPos(0, aOutSz.Height() - nScrollStd);
334 :
335 0 : pHScrollbar->SetPosSizePixel( aScrollPos, aScrollSz);
336 :
337 0 : aScrollSz.Width() = aScrollSz.Height();
338 0 : aScrollSz.Height() = aOutSz.Height();
339 0 : aScrollPos = Point(aOutSz.Width() - nScrollStd, 0);
340 :
341 0 : pVScrollbar->SetPosSizePixel( aScrollPos, aScrollSz);
342 0 : aOutSz.Width() -= nScrollStd;
343 0 : aOutSz.Height() -= nScrollStd;
344 0 : pOutWin->SetOutputSizePixel(aOutSz);
345 0 : InitScrollBars();
346 :
347 : // set line in first Resize
348 0 : if(USHRT_MAX != nStartLine)
349 : {
350 0 : if(nStartLine < pTextEngine->GetParagraphCount())
351 : {
352 0 : TextSelection aSel(TextPaM( nStartLine, 0 ), TextPaM( nStartLine, 0x0 ));
353 0 : pTextView->SetSelection(aSel);
354 0 : pTextView->ShowCursor();
355 : }
356 0 : nStartLine = USHRT_MAX;
357 : }
358 :
359 0 : if ( nVisY != pTextView->GetStartDocPos().Y() )
360 0 : Invalidate();
361 : }
362 :
363 0 : }
364 :
365 0 : void TextViewOutWin::DataChanged( const DataChangedEvent& rDCEvt )
366 : {
367 0 : Window::DataChanged( rDCEvt );
368 :
369 0 : switch( rDCEvt.GetType() )
370 : {
371 : case DATACHANGED_SETTINGS:
372 : // query settings
373 0 : if( rDCEvt.GetFlags() & SETTINGS_STYLE )
374 : {
375 0 : const Color &rCol = GetSettings().GetStyleSettings().GetWindowColor();
376 0 : SetBackground( rCol );
377 0 : Font aFont( pTextView->GetTextEngine()->GetFont() );
378 0 : aFont.SetFillColor( rCol );
379 0 : pTextView->GetTextEngine()->SetFont( aFont );
380 : }
381 0 : break;
382 : }
383 0 : }
384 :
385 0 : void TextViewOutWin::MouseMove( const MouseEvent &rEvt )
386 : {
387 0 : if ( pTextView )
388 0 : pTextView->MouseMove( rEvt );
389 0 : }
390 :
391 0 : void TextViewOutWin::MouseButtonUp( const MouseEvent &rEvt )
392 : {
393 0 : if ( pTextView )
394 : {
395 0 : pTextView->MouseButtonUp( rEvt );
396 0 : SfxBindings& rBindings = ((SwSrcEditWindow*)GetParent())->GetSrcView()->GetViewFrame()->GetBindings();
397 0 : rBindings.Invalidate( SID_TABLE_CELL );
398 0 : rBindings.Invalidate( SID_CUT );
399 0 : rBindings.Invalidate( SID_COPY );
400 : }
401 0 : }
402 :
403 0 : void TextViewOutWin::MouseButtonDown( const MouseEvent &rEvt )
404 : {
405 0 : GrabFocus();
406 0 : if ( pTextView )
407 0 : pTextView->MouseButtonDown( rEvt );
408 0 : }
409 :
410 0 : void TextViewOutWin::Command( const CommandEvent& rCEvt )
411 : {
412 0 : switch(rCEvt.GetCommand())
413 : {
414 : case COMMAND_CONTEXTMENU:
415 0 : ((SwSrcEditWindow*)GetParent())->GetSrcView()->GetViewFrame()->
416 0 : GetDispatcher()->ExecutePopup();
417 0 : break;
418 : case COMMAND_WHEEL:
419 : case COMMAND_STARTAUTOSCROLL:
420 : case COMMAND_AUTOSCROLL:
421 : {
422 0 : const CommandWheelData* pWData = rCEvt.GetWheelData();
423 0 : if( !pWData || COMMAND_WHEEL_ZOOM != pWData->GetMode() )
424 : {
425 0 : ((SwSrcEditWindow*)GetParent())->HandleWheelCommand( rCEvt );
426 : }
427 : }
428 0 : break;
429 :
430 : default:
431 0 : if ( pTextView )
432 0 : pTextView->Command( rCEvt );
433 : else
434 0 : Window::Command(rCEvt);
435 : }
436 0 : }
437 :
438 0 : void TextViewOutWin::KeyInput( const KeyEvent& rKEvt )
439 : {
440 0 : sal_Bool bDone = sal_False;
441 0 : SwSrcEditWindow* pSrcEditWin = (SwSrcEditWindow*)GetParent();
442 0 : sal_Bool bChange = !pSrcEditWin->IsReadonly() || !TextEngine::DoesKeyChangeText( rKEvt );
443 0 : if(bChange)
444 0 : bDone = pTextView->KeyInput( rKEvt );
445 :
446 0 : SfxBindings& rBindings = ((SwSrcEditWindow*)GetParent())->GetSrcView()->GetViewFrame()->GetBindings();
447 0 : if ( !bDone )
448 : {
449 0 : if ( !SfxViewShell::Current()->KeyInput( rKEvt ) )
450 0 : Window::KeyInput( rKEvt );
451 : }
452 : else
453 : {
454 0 : rBindings.Invalidate( SID_TABLE_CELL );
455 0 : if ( rKEvt.GetKeyCode().GetGroup() == KEYGROUP_CURSOR )
456 0 : rBindings.Update( SID_BASICIDE_STAT_POS );
457 0 : if (pSrcEditWin->GetTextEngine()->IsModified() )
458 : {
459 0 : rBindings.Invalidate( SID_SAVEDOC );
460 0 : rBindings.Invalidate( SID_DOC_MODIFIED );
461 : }
462 0 : if( rKEvt.GetKeyCode().GetCode() == KEY_INSERT )
463 0 : rBindings.Invalidate( SID_ATTR_INSERT );
464 : }
465 :
466 0 : rBindings.Invalidate( SID_CUT );
467 0 : rBindings.Invalidate( SID_COPY );
468 :
469 0 : SwDocShell* pDocShell = pSrcEditWin->GetSrcView()->GetDocShell();
470 0 : if(pSrcEditWin->GetTextEngine()->IsModified())
471 : {
472 0 : pDocShell->SetModified();
473 : }
474 0 : }
475 :
476 0 : void TextViewOutWin::Paint( const Rectangle& rRect )
477 : {
478 0 : pTextView->Paint( rRect );
479 0 : }
480 :
481 0 : void SwSrcEditWindow::CreateTextEngine()
482 : {
483 0 : const Color &rCol = GetSettings().GetStyleSettings().GetWindowColor();
484 0 : pOutWin = new TextViewOutWin(this, 0);
485 0 : pOutWin->SetBackground(Wallpaper(rCol));
486 0 : pOutWin->SetPointer(Pointer(POINTER_TEXT));
487 0 : pOutWin->Show();
488 :
489 : // create Scrollbars
490 0 : pHScrollbar = new ScrollBar(this, WB_3DLOOK |WB_HSCROLL|WB_DRAG);
491 0 : pHScrollbar->EnableRTL( false ); // --- RTL --- no mirroring for scrollbars
492 0 : pHScrollbar->SetScrollHdl(LINK(this, SwSrcEditWindow, ScrollHdl));
493 0 : pHScrollbar->Show();
494 :
495 0 : pVScrollbar = new ScrollBar(this, WB_3DLOOK |WB_VSCROLL|WB_DRAG);
496 0 : pVScrollbar->EnableRTL( false ); // --- RTL --- no mirroring for scrollbars
497 0 : pVScrollbar->SetScrollHdl(LINK(this, SwSrcEditWindow, ScrollHdl));
498 0 : pHScrollbar->EnableDrag();
499 0 : pVScrollbar->Show();
500 :
501 0 : pTextEngine = new ExtTextEngine;
502 0 : pTextView = new ExtTextView( pTextEngine, pOutWin );
503 0 : pTextView->SetAutoIndentMode(sal_True);
504 0 : pOutWin->SetTextView(pTextView);
505 :
506 0 : pTextEngine->SetUpdateMode( sal_False );
507 0 : pTextEngine->InsertView( pTextView );
508 :
509 0 : Font aFont;
510 0 : aFont.SetTransparent( sal_False );
511 0 : aFont.SetFillColor( rCol );
512 0 : SetPointFont( aFont );
513 0 : aFont = GetFont();
514 0 : aFont.SetFillColor( rCol );
515 0 : pOutWin->SetFont( aFont );
516 0 : pTextEngine->SetFont( aFont );
517 :
518 0 : aSyntaxIdleTimer.SetTimeout( SYNTAX_HIGHLIGHT_TIMEOUT );
519 0 : aSyntaxIdleTimer.SetTimeoutHdl( LINK( this, SwSrcEditWindow, SyntaxTimerHdl ) );
520 :
521 0 : pTextEngine->EnableUndo( sal_True );
522 0 : pTextEngine->SetUpdateMode( sal_True );
523 :
524 0 : pTextView->ShowCursor( sal_True, sal_True );
525 0 : InitScrollBars();
526 0 : StartListening( *pTextEngine );
527 :
528 0 : SfxBindings& rBind = GetSrcView()->GetViewFrame()->GetBindings();
529 0 : rBind.Invalidate( SID_TABLE_CELL );
530 0 : }
531 :
532 0 : void SwSrcEditWindow::SetScrollBarRanges()
533 : {
534 : // Extra method, not InitScrollBars, because also for TextEngine events.
535 :
536 0 : pHScrollbar->SetRange( Range( 0, nCurTextWidth-1 ) );
537 0 : pVScrollbar->SetRange( Range(0, pTextEngine->GetTextHeight()-1) );
538 0 : }
539 :
540 0 : void SwSrcEditWindow::InitScrollBars()
541 : {
542 0 : SetScrollBarRanges();
543 :
544 0 : Size aOutSz( pOutWin->GetOutputSizePixel() );
545 0 : pVScrollbar->SetVisibleSize( aOutSz.Height() );
546 0 : pVScrollbar->SetPageSize( aOutSz.Height() * 8 / 10 );
547 0 : pVScrollbar->SetLineSize( pOutWin->GetTextHeight() );
548 0 : pVScrollbar->SetThumbPos( pTextView->GetStartDocPos().Y() );
549 0 : pHScrollbar->SetVisibleSize( aOutSz.Width() );
550 0 : pHScrollbar->SetPageSize( aOutSz.Width() * 8 / 10 );
551 0 : pHScrollbar->SetLineSize( pOutWin->GetTextWidth(rtl::OUString('x')) );
552 0 : pHScrollbar->SetThumbPos( pTextView->GetStartDocPos().X() );
553 :
554 0 : }
555 :
556 0 : IMPL_LINK(SwSrcEditWindow, ScrollHdl, ScrollBar*, pScroll)
557 : {
558 0 : if(pScroll == pVScrollbar)
559 : {
560 0 : long nDiff = pTextView->GetStartDocPos().Y() - pScroll->GetThumbPos();
561 0 : GetTextView()->Scroll( 0, nDiff );
562 0 : pTextView->ShowCursor( sal_False, sal_True );
563 0 : pScroll->SetThumbPos( pTextView->GetStartDocPos().Y() );
564 : }
565 : else
566 : {
567 0 : long nDiff = pTextView->GetStartDocPos().X() - pScroll->GetThumbPos();
568 0 : GetTextView()->Scroll( nDiff, 0 );
569 0 : pTextView->ShowCursor( sal_False, sal_True );
570 0 : pScroll->SetThumbPos( pTextView->GetStartDocPos().X() );
571 : }
572 0 : GetSrcView()->GetViewFrame()->GetBindings().Invalidate( SID_TABLE_CELL );
573 0 : return 0;
574 : }
575 :
576 0 : IMPL_LINK( SwSrcEditWindow, SyntaxTimerHdl, Timer *, pTimer )
577 : {
578 0 : Time aSyntaxCheckStart( Time::SYSTEM );
579 : SAL_WARN_IF(pTextView == 0, "sw", "No View yet, but syntax highlighting?!");
580 :
581 0 : bHighlighting = sal_True;
582 0 : sal_uInt16 nCount = 0;
583 : // at first the region around the cursor is processed
584 0 : TextSelection aSel = pTextView->GetSelection();
585 0 : sal_uInt16 nCur = (sal_uInt16)aSel.GetStart().GetPara();
586 0 : if(nCur > 40)
587 0 : nCur -= 40;
588 : else
589 0 : nCur = 0;
590 0 : if(!aSyntaxLineTable.empty())
591 0 : for(sal_uInt16 i = 0; i < 80 && nCount < 40; i++, nCur++)
592 : {
593 0 : if(aSyntaxLineTable.find(nCur) != aSyntaxLineTable.end())
594 : {
595 0 : DoSyntaxHighlight( nCur );
596 0 : aSyntaxLineTable.erase( nCur );
597 0 : nCount++;
598 0 : if(aSyntaxLineTable.empty())
599 0 : break;
600 0 : if((Time( Time::SYSTEM ).GetTime() - aSyntaxCheckStart.GetTime()) > MAX_HIGHLIGHTTIME )
601 : {
602 0 : pTimer->SetTimeout( 2 * SYNTAX_HIGHLIGHT_TIMEOUT );
603 0 : break;
604 : }
605 : }
606 : }
607 :
608 : // when there is still anything left by then, go on from the beginning
609 0 : while ( !aSyntaxLineTable.empty() && nCount < MAX_SYNTAX_HIGHLIGHT)
610 : {
611 0 : sal_uInt16 nLine = *aSyntaxLineTable.begin();
612 0 : DoSyntaxHighlight( nLine );
613 0 : aSyntaxLineTable.erase(nLine);
614 0 : nCount ++;
615 0 : if(Time( Time::SYSTEM ).GetTime() - aSyntaxCheckStart.GetTime() > MAX_HIGHLIGHTTIME)
616 : {
617 0 : pTimer->SetTimeout( 2 * SYNTAX_HIGHLIGHT_TIMEOUT );
618 : break;
619 : }
620 : }
621 :
622 0 : if(!aSyntaxLineTable.empty() && !pTimer->IsActive())
623 0 : pTimer->Start();
624 : // SyntaxTimerHdl is called when text changed
625 : // => good opportunity to determine text width!
626 0 : long nPrevTextWidth = nCurTextWidth;
627 0 : nCurTextWidth = pTextEngine->CalcTextWidth() + 25; // kleine Toleranz
628 0 : if ( nCurTextWidth != nPrevTextWidth )
629 0 : SetScrollBarRanges();
630 0 : bHighlighting = sal_False;
631 :
632 0 : return 0;
633 : }
634 :
635 0 : void SwSrcEditWindow::DoSyntaxHighlight( sal_uInt16 nPara )
636 : {
637 : // Because of DelayedSyntaxHighlight it could happen,
638 : // that the line doesn't exist anymore!
639 0 : if ( nPara < pTextEngine->GetParagraphCount() )
640 : {
641 0 : sal_Bool bTempModified = IsModified();
642 0 : pTextEngine->RemoveAttribs( nPara, (sal_Bool)sal_True );
643 0 : String aSource( pTextEngine->GetText( nPara ) );
644 0 : pTextEngine->SetUpdateMode( sal_False );
645 0 : ImpDoHighlight( aSource, nPara );
646 0 : TextView* pTmp = pTextEngine->GetActiveView();
647 0 : pTmp->SetAutoScroll(sal_False);
648 0 : pTextEngine->SetActiveView(0);
649 0 : pTextEngine->SetUpdateMode( sal_True );
650 0 : pTextEngine->SetActiveView(pTmp);
651 0 : pTmp->SetAutoScroll(sal_True);
652 0 : pTmp->ShowCursor( sal_False/*pTmp->IsAutoScroll()*/ );
653 :
654 0 : if(!bTempModified)
655 0 : ClearModifyFlag();
656 : }
657 0 : }
658 :
659 0 : void SwSrcEditWindow::DoDelayedSyntaxHighlight( sal_uInt16 nPara )
660 : {
661 0 : if ( !bHighlighting && bDoSyntaxHighlight )
662 : {
663 0 : aSyntaxLineTable.insert( nPara );
664 0 : aSyntaxIdleTimer.Start();
665 : }
666 0 : }
667 :
668 0 : void SwSrcEditWindow::ImpDoHighlight( const String& rSource, sal_uInt16 nLineOff )
669 : {
670 0 : SwTextPortions aPortionList;
671 0 : lcl_Highlight(rSource, aPortionList);
672 :
673 0 : size_t nCount = aPortionList.size();
674 0 : if ( !nCount )
675 : return;
676 :
677 0 : SwTextPortion& rLast = aPortionList[nCount-1];
678 0 : if ( rLast.nStart > rLast.nEnd ) // Only until Bug from MD is resolved
679 : {
680 0 : nCount--;
681 0 : aPortionList.pop_back();
682 0 : if ( !nCount )
683 : return;
684 : }
685 :
686 : // maybe optimize:
687 : // If frequently the same color, blank without color in between,
688 : // maybe summarize or at least the blank; for less attributes
689 0 : sal_Bool bOptimizeHighlight = sal_True; // war in der BasicIDE static
690 0 : if ( bOptimizeHighlight )
691 : {
692 : // Only blanks and tabs have to be attributed along.
693 : // When two identical attributes are placed consecutively,
694 : // it optimises the TextEngine.
695 0 : sal_uInt16 nLastEnd = 0;
696 :
697 0 : for ( size_t i = 0; i < nCount; i++ )
698 : {
699 0 : SwTextPortion& r = aPortionList[i];
700 : SAL_WARN_IF(
701 : r.nLine != aPortionList[0].nLine, "sw.level2",
702 : "multiple lines after all?");
703 0 : if ( r.nStart > r.nEnd ) // only until Bug from MD is resolved
704 0 : continue;
705 :
706 0 : if ( r.nStart > nLastEnd )
707 : {
708 : // Can I rely on the fact that all except blank and tab
709 : // are being highlighted?!
710 0 : r.nStart = nLastEnd;
711 : }
712 0 : nLastEnd = r.nEnd+1;
713 0 : if ( ( i == (nCount-1) ) && ( r.nEnd < rSource.Len() ) )
714 0 : r.nEnd = rSource.Len();
715 : }
716 : }
717 :
718 0 : for ( size_t i = 0; i < aPortionList.size(); i++ )
719 : {
720 0 : SwTextPortion& r = aPortionList[i];
721 0 : if ( r.nStart > r.nEnd ) // only until Bug from MD is resolved
722 0 : continue;
723 0 : if(r.eType != svtools::HTMLSGML &&
724 : r.eType != svtools::HTMLCOMMENT &&
725 : r.eType != svtools::HTMLKEYWORD &&
726 : r.eType != svtools::HTMLUNKNOWN)
727 0 : r.eType = svtools::HTMLUNKNOWN;
728 0 : Color aColor((ColorData)SW_MOD()->GetColorConfig().GetColorValue((svtools::ColorConfigEntry)r.eType).nColor);
729 0 : sal_uInt16 nLine = nLineOff+r.nLine; //
730 0 : pTextEngine->SetAttrib( TextAttribFontColor( aColor ), nLine, r.nStart, r.nEnd+1, sal_True );
731 0 : }
732 : }
733 :
734 0 : void SwSrcEditWindow::Notify( SfxBroadcaster& /*rBC*/, const SfxHint& rHint )
735 : {
736 0 : if ( rHint.ISA( TextHint ) )
737 : {
738 0 : const TextHint& rTextHint = (const TextHint&)rHint;
739 0 : if( rTextHint.GetId() == TEXT_HINT_VIEWSCROLLED )
740 : {
741 0 : pHScrollbar->SetThumbPos( pTextView->GetStartDocPos().X() );
742 0 : pVScrollbar->SetThumbPos( pTextView->GetStartDocPos().Y() );
743 : }
744 0 : else if( rTextHint.GetId() == TEXT_HINT_TEXTHEIGHTCHANGED )
745 : {
746 0 : if ( (long)pTextEngine->GetTextHeight() < pOutWin->GetOutputSizePixel().Height() )
747 0 : pTextView->Scroll( 0, pTextView->GetStartDocPos().Y() );
748 0 : pVScrollbar->SetThumbPos( pTextView->GetStartDocPos().Y() );
749 0 : SetScrollBarRanges();
750 : }
751 0 : else if( ( rTextHint.GetId() == TEXT_HINT_PARAINSERTED ) ||
752 0 : ( rTextHint.GetId() == TEXT_HINT_PARACONTENTCHANGED ) )
753 : {
754 0 : DoDelayedSyntaxHighlight( (sal_uInt16)rTextHint.GetValue() );
755 : }
756 : }
757 0 : }
758 :
759 0 : void SwSrcEditWindow::Invalidate(sal_uInt16 )
760 : {
761 0 : pOutWin->Invalidate();
762 0 : Window::Invalidate();
763 :
764 0 : }
765 :
766 0 : void SwSrcEditWindow::Command( const CommandEvent& rCEvt )
767 : {
768 0 : switch(rCEvt.GetCommand())
769 : {
770 : case COMMAND_WHEEL:
771 : case COMMAND_STARTAUTOSCROLL:
772 : case COMMAND_AUTOSCROLL:
773 : {
774 0 : const CommandWheelData* pWData = rCEvt.GetWheelData();
775 0 : if( !pWData || COMMAND_WHEEL_ZOOM != pWData->GetMode() )
776 0 : HandleScrollCommand( rCEvt, pHScrollbar, pVScrollbar );
777 : }
778 0 : break;
779 : default:
780 0 : Window::Command(rCEvt);
781 : }
782 0 : }
783 :
784 0 : void SwSrcEditWindow::HandleWheelCommand( const CommandEvent& rCEvt )
785 : {
786 0 : pTextView->Command(rCEvt);
787 0 : HandleScrollCommand( rCEvt, pHScrollbar, pVScrollbar );
788 0 : }
789 :
790 0 : void SwSrcEditWindow::GetFocus()
791 : {
792 0 : pOutWin->GrabFocus();
793 0 : }
794 :
795 0 : static sal_Bool lcl_GetLanguagesForEncoding(rtl_TextEncoding eEnc, LanguageType aLanguages[])
796 : {
797 0 : switch(eEnc)
798 : {
799 : case RTL_TEXTENCODING_UTF7 :
800 : case RTL_TEXTENCODING_UTF8 :
801 : // don#t fill - all LANGUAGE_SYSTEM means unicode font has to be used
802 0 : break;
803 :
804 :
805 : case RTL_TEXTENCODING_ISO_8859_3:
806 : case RTL_TEXTENCODING_ISO_8859_1 :
807 : case RTL_TEXTENCODING_MS_1252 :
808 : case RTL_TEXTENCODING_APPLE_ROMAN :
809 : case RTL_TEXTENCODING_IBM_850 :
810 : case RTL_TEXTENCODING_ISO_8859_14 :
811 : case RTL_TEXTENCODING_ISO_8859_15 :
812 : //fill with western languages
813 0 : aLanguages[0] = LANGUAGE_GERMAN;
814 0 : aLanguages[1] = LANGUAGE_FRENCH;
815 0 : aLanguages[2] = LANGUAGE_ITALIAN;
816 0 : aLanguages[3] = LANGUAGE_SPANISH;
817 0 : break;
818 :
819 : case RTL_TEXTENCODING_IBM_865 :
820 : //scandinavian
821 0 : aLanguages[0] = LANGUAGE_FINNISH;
822 0 : aLanguages[1] = LANGUAGE_NORWEGIAN;
823 0 : aLanguages[2] = LANGUAGE_SWEDISH;
824 0 : aLanguages[3] = LANGUAGE_DANISH;
825 0 : break;
826 :
827 : case RTL_TEXTENCODING_ISO_8859_10 :
828 : case RTL_TEXTENCODING_ISO_8859_13 :
829 : case RTL_TEXTENCODING_ISO_8859_2 :
830 : case RTL_TEXTENCODING_IBM_852 :
831 : case RTL_TEXTENCODING_MS_1250 :
832 : case RTL_TEXTENCODING_APPLE_CENTEURO :
833 0 : aLanguages[0] = LANGUAGE_POLISH;
834 0 : aLanguages[1] = LANGUAGE_CZECH;
835 0 : aLanguages[2] = LANGUAGE_HUNGARIAN;
836 0 : aLanguages[3] = LANGUAGE_SLOVAK;
837 0 : break;
838 :
839 : case RTL_TEXTENCODING_ISO_8859_4 :
840 : case RTL_TEXTENCODING_IBM_775 :
841 : case RTL_TEXTENCODING_MS_1257 :
842 0 : aLanguages[0] = LANGUAGE_LATVIAN ;
843 0 : aLanguages[1] = LANGUAGE_LITHUANIAN;
844 0 : aLanguages[2] = LANGUAGE_ESTONIAN ;
845 0 : break;
846 :
847 0 : case RTL_TEXTENCODING_IBM_863 : aLanguages[0] = LANGUAGE_FRENCH_CANADIAN; break;
848 0 : case RTL_TEXTENCODING_APPLE_FARSI : aLanguages[0] = LANGUAGE_FARSI; break;
849 0 : case RTL_TEXTENCODING_APPLE_ROMANIAN:aLanguages[0] = LANGUAGE_ROMANIAN; break;
850 :
851 : case RTL_TEXTENCODING_IBM_861 :
852 : case RTL_TEXTENCODING_APPLE_ICELAND :
853 0 : aLanguages[0] = LANGUAGE_ICELANDIC;
854 0 : break;
855 :
856 0 : case RTL_TEXTENCODING_APPLE_CROATIAN:aLanguages[0] = LANGUAGE_CROATIAN; break;
857 :
858 : case RTL_TEXTENCODING_IBM_437 :
859 0 : case RTL_TEXTENCODING_ASCII_US : aLanguages[0] = LANGUAGE_ENGLISH; break;
860 :
861 : case RTL_TEXTENCODING_IBM_862 :
862 : case RTL_TEXTENCODING_MS_1255 :
863 : case RTL_TEXTENCODING_APPLE_HEBREW :
864 : case RTL_TEXTENCODING_ISO_8859_8 :
865 0 : aLanguages[0] = LANGUAGE_HEBREW;
866 0 : break;
867 :
868 : case RTL_TEXTENCODING_IBM_857 :
869 : case RTL_TEXTENCODING_MS_1254 :
870 : case RTL_TEXTENCODING_APPLE_TURKISH:
871 : case RTL_TEXTENCODING_ISO_8859_9 :
872 0 : aLanguages[0] = LANGUAGE_TURKISH;
873 0 : break;
874 :
875 : case RTL_TEXTENCODING_IBM_860 :
876 0 : aLanguages[0] = LANGUAGE_PORTUGUESE;
877 0 : break;
878 :
879 : case RTL_TEXTENCODING_IBM_869 :
880 : case RTL_TEXTENCODING_MS_1253 :
881 : case RTL_TEXTENCODING_APPLE_GREEK :
882 : case RTL_TEXTENCODING_ISO_8859_7 :
883 : case RTL_TEXTENCODING_IBM_737 :
884 0 : aLanguages[0] = LANGUAGE_GREEK;
885 0 : break;
886 :
887 : case RTL_TEXTENCODING_KOI8_R :
888 : case RTL_TEXTENCODING_ISO_8859_5 :
889 : case RTL_TEXTENCODING_IBM_855 :
890 : case RTL_TEXTENCODING_MS_1251 :
891 : case RTL_TEXTENCODING_IBM_866 :
892 : case RTL_TEXTENCODING_APPLE_CYRILLIC :
893 0 : aLanguages[0] = LANGUAGE_RUSSIAN;
894 0 : break;
895 :
896 : case RTL_TEXTENCODING_APPLE_UKRAINIAN:
897 : case RTL_TEXTENCODING_KOI8_U:
898 0 : aLanguages[0] = LANGUAGE_UKRAINIAN;
899 0 : break;
900 :
901 : case RTL_TEXTENCODING_IBM_864 :
902 : case RTL_TEXTENCODING_MS_1256 :
903 : case RTL_TEXTENCODING_ISO_8859_6 :
904 : case RTL_TEXTENCODING_APPLE_ARABIC :
905 0 : aLanguages[0] = LANGUAGE_ARABIC_SAUDI_ARABIA;
906 0 : break;
907 :
908 : case RTL_TEXTENCODING_APPLE_CHINTRAD :
909 : case RTL_TEXTENCODING_MS_950 :
910 : case RTL_TEXTENCODING_GBT_12345 :
911 : case RTL_TEXTENCODING_BIG5 :
912 : case RTL_TEXTENCODING_EUC_TW :
913 : case RTL_TEXTENCODING_BIG5_HKSCS :
914 0 : aLanguages[0] = LANGUAGE_CHINESE_TRADITIONAL;
915 0 : break;
916 :
917 : case RTL_TEXTENCODING_EUC_JP :
918 : case RTL_TEXTENCODING_ISO_2022_JP :
919 : case RTL_TEXTENCODING_JIS_X_0201 :
920 : case RTL_TEXTENCODING_JIS_X_0208 :
921 : case RTL_TEXTENCODING_JIS_X_0212 :
922 : case RTL_TEXTENCODING_APPLE_JAPANESE :
923 : case RTL_TEXTENCODING_MS_932 :
924 : case RTL_TEXTENCODING_SHIFT_JIS :
925 0 : aLanguages[0] = LANGUAGE_JAPANESE;
926 0 : break;
927 :
928 : case RTL_TEXTENCODING_GB_2312 :
929 : case RTL_TEXTENCODING_MS_936 :
930 : case RTL_TEXTENCODING_GBK :
931 : case RTL_TEXTENCODING_GB_18030 :
932 : case RTL_TEXTENCODING_APPLE_CHINSIMP :
933 : case RTL_TEXTENCODING_EUC_CN :
934 : case RTL_TEXTENCODING_ISO_2022_CN :
935 0 : aLanguages[0] = LANGUAGE_CHINESE_SIMPLIFIED;
936 0 : break;
937 :
938 : case RTL_TEXTENCODING_APPLE_KOREAN :
939 : case RTL_TEXTENCODING_MS_949 :
940 : case RTL_TEXTENCODING_EUC_KR :
941 : case RTL_TEXTENCODING_ISO_2022_KR :
942 : case RTL_TEXTENCODING_MS_1361 :
943 0 : aLanguages[0] = LANGUAGE_KOREAN;
944 0 : break;
945 :
946 : case RTL_TEXTENCODING_APPLE_THAI :
947 : case RTL_TEXTENCODING_MS_874 :
948 : case RTL_TEXTENCODING_TIS_620 :
949 0 : aLanguages[0] = LANGUAGE_THAI;
950 0 : break;
951 0 : default: aLanguages[0] = Application::GetSettings().GetUILanguageTag().getLanguageType();
952 : }
953 0 : return aLanguages[0] != LANGUAGE_SYSTEM;
954 : }
955 0 : void SwSrcEditWindow::SetFont()
956 : {
957 : rtl::OUString sFontName(
958 : officecfg::Office::Common::Font::SourceViewFont::FontName::get().
959 0 : get_value_or(rtl::OUString()));
960 0 : if(sFontName.isEmpty())
961 : {
962 : LanguageType aLanguages[5] =
963 : {
964 : LANGUAGE_SYSTEM, LANGUAGE_SYSTEM, LANGUAGE_SYSTEM, LANGUAGE_SYSTEM, LANGUAGE_SYSTEM
965 0 : };
966 0 : Font aFont;
967 0 : if(lcl_GetLanguagesForEncoding(eSourceEncoding, aLanguages))
968 : {
969 : //TODO: check for multiple languages
970 0 : aFont = OutputDevice::GetDefaultFont(DEFAULTFONT_FIXED, aLanguages[0], 0, this);
971 : }
972 : else
973 : aFont = OutputDevice::GetDefaultFont(DEFAULTFONT_SANS_UNICODE,
974 0 : Application::GetSettings().GetLanguageTag().getLanguageType(), 0, this);
975 0 : sFontName = aFont.GetName();
976 : }
977 : const SvxFontListItem* pFontListItem =
978 0 : (const SvxFontListItem* )pSrcView->GetDocShell()->GetItem( SID_ATTR_CHAR_FONTLIST );
979 0 : const FontList* pList = pFontListItem->GetFontList();
980 0 : FontInfo aInfo = pList->Get(sFontName,WEIGHT_NORMAL, ITALIC_NONE);
981 :
982 0 : const Font& rFont = GetTextEngine()->GetFont();
983 0 : Font aFont(aInfo);
984 0 : Size aSize(rFont.GetSize());
985 : //font height is stored in point and set in twip
986 0 : aSize.Height() =
987 0 : officecfg::Office::Common::Font::SourceViewFont::FontHeight::get() * 20;
988 0 : aFont.SetSize(pOutWin->LogicToPixel(aSize, MAP_TWIP));
989 0 : GetTextEngine()->SetFont( aFont );
990 0 : pOutWin->SetFont(aFont);
991 0 : }
992 :
993 0 : void SwSrcEditWindow::SetTextEncoding(rtl_TextEncoding eEncoding)
994 : {
995 0 : eSourceEncoding = eEncoding;
996 0 : SetFont();
997 0 : }
998 :
999 : /* vim:set shiftwidth=4 softtabstop=4 expandtab: */
|
