1 /////////////////////////////////////////////////////////////////////////////
2 // Name: src/html/htmlwin.cpp
3 // Purpose: wxHtmlWindow class for parsing & displaying HTML (implementation)
4 // Author: Vaclav Slavik
6 // Copyright: (c) 1999 Vaclav Slavik
7 // Licence: wxWindows licence
8 /////////////////////////////////////////////////////////////////////////////
10 #include "wx/wxprec.h"
16 #if wxUSE_HTML && wxUSE_STREAMS
22 #include "wx/dcclient.h"
24 #include "wx/dcmemory.h"
26 #include "wx/settings.h"
27 #include "wx/dataobj.h"
30 #include "wx/html/htmlwin.h"
31 #include "wx/html/htmlproc.h"
32 #include "wx/clipbrd.h"
34 #include "wx/arrimpl.cpp"
35 #include "wx/listimpl.cpp"
38 IMPLEMENT_DYNAMIC_CLASS(wxHtmlLinkEvent
, wxCommandEvent
)
39 IMPLEMENT_DYNAMIC_CLASS(wxHtmlCellEvent
, wxCommandEvent
)
41 DEFINE_EVENT_TYPE(wxEVT_COMMAND_HTML_CELL_CLICKED
)
42 DEFINE_EVENT_TYPE(wxEVT_COMMAND_HTML_CELL_HOVER
)
43 DEFINE_EVENT_TYPE(wxEVT_COMMAND_HTML_LINK_CLICKED
)
47 // ----------------------------------------------------------------------------
48 // wxHtmlWinAutoScrollTimer: the timer used to generate a stream of scroll
49 // events when a captured mouse is held outside the window
50 // ----------------------------------------------------------------------------
52 class wxHtmlWinAutoScrollTimer
: public wxTimer
55 wxHtmlWinAutoScrollTimer(wxScrolledWindow
*win
,
56 wxEventType eventTypeToSend
,
60 m_eventType
= eventTypeToSend
;
65 virtual void Notify();
68 wxScrolledWindow
*m_win
;
69 wxEventType m_eventType
;
73 DECLARE_NO_COPY_CLASS(wxHtmlWinAutoScrollTimer
)
76 void wxHtmlWinAutoScrollTimer::Notify()
78 // only do all this as long as the window is capturing the mouse
79 if ( wxWindow::GetCapture() != m_win
)
83 else // we still capture the mouse, continue generating events
85 // first scroll the window if we are allowed to do it
86 wxScrollWinEvent
event1(m_eventType
, m_pos
, m_orient
);
87 event1
.SetEventObject(m_win
);
88 if ( m_win
->GetEventHandler()->ProcessEvent(event1
) )
90 // and then send a pseudo mouse-move event to refresh the selection
91 wxMouseEvent
event2(wxEVT_MOTION
);
92 wxGetMousePosition(&event2
.m_x
, &event2
.m_y
);
94 // the mouse event coordinates should be client, not screen as
95 // returned by wxGetMousePosition
96 wxWindow
*parentTop
= m_win
;
97 while ( parentTop
->GetParent() )
98 parentTop
= parentTop
->GetParent();
99 wxPoint ptOrig
= parentTop
->GetPosition();
100 event2
.m_x
-= ptOrig
.x
;
101 event2
.m_y
-= ptOrig
.y
;
103 event2
.SetEventObject(m_win
);
105 // FIXME: we don't fill in the other members - ok?
106 m_win
->GetEventHandler()->ProcessEvent(event2
);
108 else // can't scroll further, stop
115 #endif // wxUSE_CLIPBOARD
119 //-----------------------------------------------------------------------------
121 //-----------------------------------------------------------------------------
123 // item of history list
124 class WXDLLIMPEXP_HTML wxHtmlHistoryItem
127 wxHtmlHistoryItem(const wxString
& p
, const wxString
& a
) {m_Page
= p
, m_Anchor
= a
, m_Pos
= 0;}
128 int GetPos() const {return m_Pos
;}
129 void SetPos(int p
) {m_Pos
= p
;}
130 const wxString
& GetPage() const {return m_Page
;}
131 const wxString
& GetAnchor() const {return m_Anchor
;}
140 //-----------------------------------------------------------------------------
141 // our private arrays:
142 //-----------------------------------------------------------------------------
144 WX_DECLARE_OBJARRAY(wxHtmlHistoryItem
, wxHtmlHistoryArray
);
145 WX_DEFINE_OBJARRAY(wxHtmlHistoryArray
)
147 WX_DECLARE_LIST(wxHtmlProcessor
, wxHtmlProcessorList
);
148 WX_DEFINE_LIST(wxHtmlProcessorList
)
150 //-----------------------------------------------------------------------------
151 // wxHtmlWindowMouseHelper
152 //-----------------------------------------------------------------------------
154 wxHtmlWindowMouseHelper::wxHtmlWindowMouseHelper(wxHtmlWindowInterface
*iface
)
155 : m_tmpMouseMoved(false),
162 void wxHtmlWindowMouseHelper::HandleMouseMoved()
164 m_tmpMouseMoved
= true;
167 bool wxHtmlWindowMouseHelper::HandleMouseClick(wxHtmlCell
*rootCell
,
169 const wxMouseEvent
& event
)
174 wxHtmlCell
*cell
= rootCell
->FindCellByPos(pos
.x
, pos
.y
);
175 // this check is needed because FindCellByPos returns terminal cell and
176 // containers may have empty borders -- in this case NULL will be
181 // adjust the coordinates to be relative to this cell:
182 wxPoint relpos
= pos
- cell
->GetAbsPos(rootCell
);
184 return OnCellClicked(cell
, relpos
.x
, relpos
.y
, event
);
187 void wxHtmlWindowMouseHelper::HandleIdle(wxHtmlCell
*rootCell
,
190 wxHtmlCell
*cell
= rootCell
? rootCell
->FindCellByPos(pos
.x
, pos
.y
) : NULL
;
192 if (cell
!= m_tmpLastCell
)
194 wxHtmlLinkInfo
*lnk
= NULL
;
197 // adjust the coordinates to be relative to this cell:
198 wxPoint relpos
= pos
- cell
->GetAbsPos(rootCell
);
199 lnk
= cell
->GetLink(relpos
.x
, relpos
.y
);
204 cur
= cell
->GetMouseCursor(m_interface
);
206 cur
= m_interface
->GetHTMLCursor(
207 wxHtmlWindowInterface::HTMLCursor_Default
);
209 m_interface
->GetHTMLWindow()->SetCursor(cur
);
211 if (lnk
!= m_tmpLastLink
)
214 m_interface
->SetHTMLStatusText(lnk
->GetHref());
216 m_interface
->SetHTMLStatusText(wxEmptyString
);
221 m_tmpLastCell
= cell
;
223 else // mouse moved but stayed in the same cell
227 OnCellMouseHover(cell
, pos
.x
, pos
.y
);
231 m_tmpMouseMoved
= false;
234 bool wxHtmlWindowMouseHelper::OnCellClicked(wxHtmlCell
*cell
,
235 wxCoord x
, wxCoord y
,
236 const wxMouseEvent
& event
)
238 wxHtmlCellEvent
ev(wxEVT_COMMAND_HTML_CELL_CLICKED
,
239 m_interface
->GetHTMLWindow()->GetId(),
240 cell
, wxPoint(x
,y
), event
);
242 if (!m_interface
->GetHTMLWindow()->GetEventHandler()->ProcessEvent(ev
))
244 // if the event wasn't handled, do the default processing here:
246 wxASSERT_MSG( cell
, _T("can't be called with NULL cell") );
248 cell
->ProcessMouseClick(m_interface
, ev
.GetPoint(), ev
.GetMouseEvent());
251 // true if a link was clicked, false otherwise
252 return ev
.GetLinkClicked();
255 void wxHtmlWindowMouseHelper::OnCellMouseHover(wxHtmlCell
* cell
,
259 wxHtmlCellEvent
ev(wxEVT_COMMAND_HTML_CELL_HOVER
,
260 m_interface
->GetHTMLWindow()->GetId(),
261 cell
, wxPoint(x
,y
), wxMouseEvent());
262 m_interface
->GetHTMLWindow()->GetEventHandler()->ProcessEvent(ev
);
268 //-----------------------------------------------------------------------------
270 //-----------------------------------------------------------------------------
272 wxList
wxHtmlWindow::m_Filters
;
273 wxHtmlFilter
*wxHtmlWindow::m_DefaultFilter
= NULL
;
274 wxHtmlProcessorList
*wxHtmlWindow::m_GlobalProcessors
= NULL
;
275 wxCursor
*wxHtmlWindow::ms_cursorLink
= NULL
;
276 wxCursor
*wxHtmlWindow::ms_cursorText
= NULL
;
278 void wxHtmlWindow::CleanUpStatics()
280 wxDELETE(m_DefaultFilter
);
281 WX_CLEAR_LIST(wxList
, m_Filters
);
282 if (m_GlobalProcessors
)
283 WX_CLEAR_LIST(wxHtmlProcessorList
, *m_GlobalProcessors
);
284 wxDELETE(m_GlobalProcessors
);
285 wxDELETE(ms_cursorLink
);
286 wxDELETE(ms_cursorText
);
289 void wxHtmlWindow::Init()
291 m_tmpCanDrawLocks
= 0;
292 m_FS
= new wxFileSystem();
294 m_RelatedStatusBar
= -1;
295 #endif // wxUSE_STATUSBAR
296 m_RelatedFrame
= NULL
;
297 m_TitleFormat
= wxT("%s");
298 m_OpenedPage
= m_OpenedAnchor
= m_OpenedPageTitle
= wxEmptyString
;
300 m_Parser
= new wxHtmlWinParser(this);
301 m_Parser
->SetFS(m_FS
);
304 m_History
= new wxHtmlHistoryArray
;
308 m_makingSelection
= false;
310 m_timerAutoScroll
= NULL
;
311 m_lastDoubleClick
= 0;
312 #endif // wxUSE_CLIPBOARD
314 m_eraseBgInOnPaint
= false;
315 m_tmpSelFromCell
= NULL
;
318 bool wxHtmlWindow::Create(wxWindow
*parent
, wxWindowID id
,
319 const wxPoint
& pos
, const wxSize
& size
,
320 long style
, const wxString
& name
)
322 if (!wxScrolledWindow::Create(parent
, id
, pos
, size
,
323 style
| wxVSCROLL
| wxHSCROLL
,
327 SetPage(wxT("<html><body></body></html>"));
332 wxHtmlWindow::~wxHtmlWindow()
336 #endif // wxUSE_CLIPBOARD
345 WX_CLEAR_LIST(wxHtmlProcessorList
, *m_Processors
);
357 void wxHtmlWindow::SetRelatedFrame(wxFrame
* frame
, const wxString
& format
)
359 m_RelatedFrame
= frame
;
360 m_TitleFormat
= format
;
366 void wxHtmlWindow::SetRelatedStatusBar(int bar
)
368 m_RelatedStatusBar
= bar
;
370 #endif // wxUSE_STATUSBAR
374 void wxHtmlWindow::SetFonts(const wxString
& normal_face
, const wxString
& fixed_face
, const int *sizes
)
376 m_Parser
->SetFonts(normal_face
, fixed_face
, sizes
);
378 // re-layout the page after changing fonts:
379 DoSetPage(*(m_Parser
->GetSource()));
382 void wxHtmlWindow::SetStandardFonts(int size
,
383 const wxString
& normal_face
,
384 const wxString
& fixed_face
)
386 m_Parser
->SetStandardFonts(size
, normal_face
, fixed_face
);
388 // re-layout the page after changing fonts:
389 DoSetPage(*(m_Parser
->GetSource()));
392 bool wxHtmlWindow::SetPage(const wxString
& source
)
394 m_OpenedPage
= m_OpenedAnchor
= m_OpenedPageTitle
= wxEmptyString
;
395 return DoSetPage(source
);
398 bool wxHtmlWindow::DoSetPage(const wxString
& source
)
400 wxString
newsrc(source
);
402 wxDELETE(m_selection
);
404 // we will soon delete all the cells, so clear pointers to them:
405 m_tmpSelFromCell
= NULL
;
407 // pass HTML through registered processors:
408 if (m_Processors
|| m_GlobalProcessors
)
410 wxHtmlProcessorList::compatibility_iterator nodeL
, nodeG
;
414 nodeL
= m_Processors
->GetFirst();
415 if ( m_GlobalProcessors
)
416 nodeG
= m_GlobalProcessors
->GetFirst();
418 // VS: there are two lists, global and local, both of them sorted by
419 // priority. Since we have to go through _both_ lists with
420 // decreasing priority, we "merge-sort" the lists on-line by
421 // processing that one of the two heads that has higher priority
422 // in every iteration
423 while (nodeL
|| nodeG
)
425 prL
= (nodeL
) ? nodeL
->GetData()->GetPriority() : -1;
426 prG
= (nodeG
) ? nodeG
->GetData()->GetPriority() : -1;
429 if (nodeL
->GetData()->IsEnabled())
430 newsrc
= nodeL
->GetData()->Process(newsrc
);
431 nodeL
= nodeL
->GetNext();
435 if (nodeG
->GetData()->IsEnabled())
436 newsrc
= nodeG
->GetData()->Process(newsrc
);
437 nodeG
= nodeG
->GetNext();
442 // ...and run the parser on it:
443 wxClientDC
*dc
= new wxClientDC(this);
444 dc
->SetMapMode(wxMM_TEXT
);
445 SetBackgroundColour(wxColour(0xFF, 0xFF, 0xFF));
446 SetBackgroundImage(wxNullBitmap
);
454 m_Cell
= (wxHtmlContainerCell
*) m_Parser
->Parse(newsrc
);
456 m_Cell
->SetIndent(m_Borders
, wxHTML_INDENT_ALL
, wxHTML_UNITS_PIXELS
);
457 m_Cell
->SetAlignHor(wxHTML_ALIGN_CENTER
);
459 if (m_tmpCanDrawLocks
== 0)
464 bool wxHtmlWindow::AppendToPage(const wxString
& source
)
466 return DoSetPage(*(GetParser()->GetSource()) + source
);
469 bool wxHtmlWindow::LoadPage(const wxString
& location
)
471 wxCHECK_MSG( !location
.empty(), false, "location must be non-empty" );
473 wxBusyCursor busyCursor
;
476 bool needs_refresh
= false;
479 if (m_HistoryOn
&& (m_HistoryPos
!= -1))
481 // store scroll position into history item:
483 GetViewStart(&x
, &y
);
484 (*m_History
)[m_HistoryPos
].SetPos(y
);
487 // first check if we're moving to an anchor in the same page
488 size_t posLocalAnchor
= location
.Find('#');
489 if ( posLocalAnchor
!= wxString::npos
&& posLocalAnchor
!= 0 )
491 // check if the part before the anchor is the same as the (either
492 // relative or absolute) URI of the current page
493 const wxString beforeAnchor
= location
.substr(0, posLocalAnchor
);
494 if ( beforeAnchor
!= m_OpenedPage
&&
495 m_FS
->GetPath() + beforeAnchor
!= m_OpenedPage
)
497 // indicate that we're not moving to a local anchor
498 posLocalAnchor
= wxString::npos
;
502 if ( posLocalAnchor
!= wxString::npos
)
505 rt_val
= ScrollToAnchor(location
.substr(posLocalAnchor
+ 1));
508 else // moving to another page
510 needs_refresh
= true;
513 if (m_RelatedStatusBar
!= -1)
515 m_RelatedFrame
->SetStatusText(_("Connecting..."), m_RelatedStatusBar
);
518 #endif // wxUSE_STATUSBAR
520 wxFSFile
*f
= m_Parser
->OpenURL(wxHTML_URL_PAGE
, location
);
522 // try to interpret 'location' as filename instead of URL:
525 wxFileName
fn(location
);
526 wxString location2
= wxFileSystem::FileNameToURL(fn
);
527 f
= m_Parser
->OpenURL(wxHTML_URL_PAGE
, location2
);
532 wxLogError(_("Unable to open requested HTML document: %s"), location
.c_str());
534 SetHTMLStatusText(wxEmptyString
);
540 wxList::compatibility_iterator node
;
541 wxString src
= wxEmptyString
;
544 if (m_RelatedStatusBar
!= -1)
546 wxString msg
= _("Loading : ") + location
;
547 m_RelatedFrame
->SetStatusText(msg
, m_RelatedStatusBar
);
550 #endif // wxUSE_STATUSBAR
552 node
= m_Filters
.GetFirst();
555 wxHtmlFilter
*h
= (wxHtmlFilter
*) node
->GetData();
558 src
= h
->ReadFile(*f
);
561 node
= node
->GetNext();
563 if (src
== wxEmptyString
)
565 if (m_DefaultFilter
== NULL
) m_DefaultFilter
= GetDefaultFilter();
566 src
= m_DefaultFilter
->ReadFile(*f
);
569 m_FS
->ChangePathTo(f
->GetLocation());
570 rt_val
= SetPage(src
);
571 m_OpenedPage
= f
->GetLocation();
572 if (f
->GetAnchor() != wxEmptyString
)
574 ScrollToAnchor(f
->GetAnchor());
580 if (m_RelatedStatusBar
!= -1)
581 m_RelatedFrame
->SetStatusText(_("Done"), m_RelatedStatusBar
);
582 #endif // wxUSE_STATUSBAR
586 if (m_HistoryOn
) // add this page to history there:
588 int c
= m_History
->GetCount() - (m_HistoryPos
+ 1);
590 if (m_HistoryPos
< 0 ||
591 (*m_History
)[m_HistoryPos
].GetPage() != m_OpenedPage
||
592 (*m_History
)[m_HistoryPos
].GetAnchor() != m_OpenedAnchor
)
595 for (int i
= 0; i
< c
; i
++)
596 m_History
->RemoveAt(m_HistoryPos
);
597 m_History
->Add(new wxHtmlHistoryItem(m_OpenedPage
, m_OpenedAnchor
));
601 if (m_OpenedPageTitle
== wxEmptyString
)
602 OnSetTitle(wxFileNameFromPath(m_OpenedPage
));
616 bool wxHtmlWindow::LoadFile(const wxFileName
& filename
)
618 wxString url
= wxFileSystem::FileNameToURL(filename
);
619 return LoadPage(url
);
623 bool wxHtmlWindow::ScrollToAnchor(const wxString
& anchor
)
625 const wxHtmlCell
*c
= m_Cell
->Find(wxHTML_COND_ISANCHOR
, &anchor
);
628 wxLogWarning(_("HTML anchor %s does not exist."), anchor
.c_str());
635 for (y
= 0; c
!= NULL
; c
= c
->GetParent()) y
+= c
->GetPosY();
636 Scroll(-1, y
/ wxHTML_SCROLL_STEP
);
637 m_OpenedAnchor
= anchor
;
643 void wxHtmlWindow::OnSetTitle(const wxString
& title
)
648 tit
.Printf(m_TitleFormat
, title
.c_str());
649 m_RelatedFrame
->SetTitle(tit
);
651 m_OpenedPageTitle
= title
;
658 void wxHtmlWindow::CreateLayout()
660 int ClientWidth
, ClientHeight
;
664 if ( HasFlag(wxHW_SCROLLBAR_NEVER
) )
666 SetScrollbars(1, 1, 0, 0); // always off
667 GetClientSize(&ClientWidth
, &ClientHeight
);
668 m_Cell
->Layout(ClientWidth
);
670 else // !wxHW_SCROLLBAR_NEVER
672 GetClientSize(&ClientWidth
, &ClientHeight
);
673 m_Cell
->Layout(ClientWidth
);
674 if (ClientHeight
< m_Cell
->GetHeight() + GetCharHeight())
677 wxHTML_SCROLL_STEP
, wxHTML_SCROLL_STEP
,
678 m_Cell
->GetWidth() / wxHTML_SCROLL_STEP
,
679 (m_Cell
->GetHeight() + GetCharHeight()) / wxHTML_SCROLL_STEP
680 /*cheat: top-level frag is always container*/);
682 else /* we fit into window, no need for scrollbars */
684 SetScrollbars(wxHTML_SCROLL_STEP
, 1, m_Cell
->GetWidth() / wxHTML_SCROLL_STEP
, 0); // disable...
685 GetClientSize(&ClientWidth
, &ClientHeight
);
686 m_Cell
->Layout(ClientWidth
); // ...and relayout
693 void wxHtmlWindow::ReadCustomization(wxConfigBase
*cfg
, wxString path
)
698 wxString p_fff
, p_ffn
;
700 if (path
!= wxEmptyString
)
702 oldpath
= cfg
->GetPath();
706 m_Borders
= cfg
->Read(wxT("wxHtmlWindow/Borders"), m_Borders
);
707 p_fff
= cfg
->Read(wxT("wxHtmlWindow/FontFaceFixed"), m_Parser
->m_FontFaceFixed
);
708 p_ffn
= cfg
->Read(wxT("wxHtmlWindow/FontFaceNormal"), m_Parser
->m_FontFaceNormal
);
709 for (int i
= 0; i
< 7; i
++)
711 tmp
.Printf(wxT("wxHtmlWindow/FontsSize%i"), i
);
712 p_fontsizes
[i
] = cfg
->Read(tmp
, m_Parser
->m_FontsSizes
[i
]);
714 SetFonts(p_ffn
, p_fff
, p_fontsizes
);
716 if (path
!= wxEmptyString
)
717 cfg
->SetPath(oldpath
);
722 void wxHtmlWindow::WriteCustomization(wxConfigBase
*cfg
, wxString path
)
727 if (path
!= wxEmptyString
)
729 oldpath
= cfg
->GetPath();
733 cfg
->Write(wxT("wxHtmlWindow/Borders"), (long) m_Borders
);
734 cfg
->Write(wxT("wxHtmlWindow/FontFaceFixed"), m_Parser
->m_FontFaceFixed
);
735 cfg
->Write(wxT("wxHtmlWindow/FontFaceNormal"), m_Parser
->m_FontFaceNormal
);
736 for (int i
= 0; i
< 7; i
++)
738 tmp
.Printf(wxT("wxHtmlWindow/FontsSize%i"), i
);
739 cfg
->Write(tmp
, (long) m_Parser
->m_FontsSizes
[i
]);
742 if (path
!= wxEmptyString
)
743 cfg
->SetPath(oldpath
);
748 bool wxHtmlWindow::HistoryBack()
752 if (m_HistoryPos
< 1) return false;
754 // store scroll position into history item:
756 GetViewStart(&x
, &y
);
757 (*m_History
)[m_HistoryPos
].SetPos(y
);
759 // go to previous position:
762 l
= (*m_History
)[m_HistoryPos
].GetPage();
763 a
= (*m_History
)[m_HistoryPos
].GetAnchor();
766 if (a
== wxEmptyString
) LoadPage(l
);
767 else LoadPage(l
+ wxT("#") + a
);
770 Scroll(0, (*m_History
)[m_HistoryPos
].GetPos());
775 bool wxHtmlWindow::HistoryCanBack()
777 if (m_HistoryPos
< 1) return false;
782 bool wxHtmlWindow::HistoryForward()
786 if (m_HistoryPos
== -1) return false;
787 if (m_HistoryPos
>= (int)m_History
->GetCount() - 1)return false;
789 m_OpenedPage
= wxEmptyString
; // this will disable adding new entry into history in LoadPage()
792 l
= (*m_History
)[m_HistoryPos
].GetPage();
793 a
= (*m_History
)[m_HistoryPos
].GetAnchor();
796 if (a
== wxEmptyString
) LoadPage(l
);
797 else LoadPage(l
+ wxT("#") + a
);
800 Scroll(0, (*m_History
)[m_HistoryPos
].GetPos());
805 bool wxHtmlWindow::HistoryCanForward()
807 if (m_HistoryPos
== -1) return false;
808 if (m_HistoryPos
>= (int)m_History
->GetCount() - 1)return false;
813 void wxHtmlWindow::HistoryClear()
819 void wxHtmlWindow::AddProcessor(wxHtmlProcessor
*processor
)
823 m_Processors
= new wxHtmlProcessorList
;
825 wxHtmlProcessorList::compatibility_iterator node
;
827 for (node
= m_Processors
->GetFirst(); node
; node
= node
->GetNext())
829 if (processor
->GetPriority() > node
->GetData()->GetPriority())
831 m_Processors
->Insert(node
, processor
);
835 m_Processors
->Append(processor
);
838 /*static */ void wxHtmlWindow::AddGlobalProcessor(wxHtmlProcessor
*processor
)
840 if (!m_GlobalProcessors
)
842 m_GlobalProcessors
= new wxHtmlProcessorList
;
844 wxHtmlProcessorList::compatibility_iterator node
;
846 for (node
= m_GlobalProcessors
->GetFirst(); node
; node
= node
->GetNext())
848 if (processor
->GetPriority() > node
->GetData()->GetPriority())
850 m_GlobalProcessors
->Insert(node
, processor
);
854 m_GlobalProcessors
->Append(processor
);
859 void wxHtmlWindow::AddFilter(wxHtmlFilter
*filter
)
861 m_Filters
.Append(filter
);
865 bool wxHtmlWindow::IsSelectionEnabled() const
868 return !HasFlag(wxHW_NO_SELECTION
);
876 wxString
wxHtmlWindow::DoSelectionToText(wxHtmlSelection
*sel
)
879 return wxEmptyString
;
883 const wxHtmlCell
*end
= sel
->GetToCell();
885 wxHtmlTerminalCellsInterator
i(sel
->GetFromCell(), end
);
888 text
<< i
->ConvertToText(sel
);
891 const wxHtmlCell
*prev
= *i
;
894 if ( prev
->GetParent() != i
->GetParent() )
896 text
<< i
->ConvertToText(*i
== end
? sel
: NULL
);
903 wxString
wxHtmlWindow::ToText()
908 sel
.Set(m_Cell
->GetFirstTerminal(), m_Cell
->GetLastTerminal());
909 return DoSelectionToText(&sel
);
912 return wxEmptyString
;
915 #endif // wxUSE_CLIPBOARD
917 bool wxHtmlWindow::CopySelection(ClipboardType t
)
922 #if defined(__UNIX__) && !defined(__WXMAC__)
923 wxTheClipboard
->UsePrimarySelection(t
== Primary
);
925 // Primary selection exists only under X11, so don't do anything under
926 // the other platforms when we try to access it
928 // TODO: this should be abstracted at wxClipboard level!
931 #endif // __UNIX__/!__UNIX__
933 if ( wxTheClipboard
->Open() )
935 const wxString
txt(SelectionToText());
936 wxTheClipboard
->SetData(new wxTextDataObject(txt
));
937 wxTheClipboard
->Close();
938 wxLogTrace(_T("wxhtmlselection"),
939 _("Copied to clipboard:\"%s\""), txt
.c_str());
946 #endif // wxUSE_CLIPBOARD
952 void wxHtmlWindow::OnLinkClicked(const wxHtmlLinkInfo
& link
)
954 wxHtmlLinkEvent
event(GetId(), link
);
955 event
.SetEventObject(this);
956 if (!GetEventHandler()->ProcessEvent(event
))
958 // the default behaviour is to load the URL in this window
959 const wxMouseEvent
*e
= event
.GetLinkInfo().GetEvent();
960 if (e
== NULL
|| e
->LeftUp())
961 LoadPage(event
.GetLinkInfo().GetHref());
965 void wxHtmlWindow::OnEraseBackground(wxEraseEvent
& event
)
969 // don't even skip the event, if we don't have a bg bitmap we're going
970 // to overwrite background in OnPaint() below anyhow, so letting the
971 // default handling take place would only result in flicker, just set a
972 // flag to erase the background below
973 m_eraseBgInOnPaint
= true;
977 wxDC
& dc
= *event
.GetDC();
979 // if the image is not fully opaque, we have to erase the background before
980 // drawing it, however avoid doing it for opaque images as this would just
981 // result in extra flicker without any other effect as background is
982 // completely covered anyhow
983 if ( m_bmpBg
.GetMask() )
985 dc
.SetBackground(wxBrush(GetBackgroundColour(), wxBRUSHSTYLE_SOLID
));
989 const wxSize
sizeWin(GetClientSize());
990 const wxSize
sizeBmp(m_bmpBg
.GetWidth(), m_bmpBg
.GetHeight());
991 for ( wxCoord x
= 0; x
< sizeWin
.x
; x
+= sizeBmp
.x
)
993 for ( wxCoord y
= 0; y
< sizeWin
.y
; y
+= sizeBmp
.y
)
995 dc
.DrawBitmap(m_bmpBg
, x
, y
, true /* use mask */);
1000 void wxHtmlWindow::OnPaint(wxPaintEvent
& WXUNUSED(event
))
1004 if (m_tmpCanDrawLocks
> 0 || m_Cell
== NULL
)
1008 GetViewStart(&x
, &y
);
1009 wxRect rect
= GetUpdateRegion().GetBox();
1010 wxSize sz
= GetSize();
1013 if ( !m_backBuffer
)
1014 m_backBuffer
= new wxBitmap(sz
.x
, sz
.y
);
1015 dcm
.SelectObject(*m_backBuffer
);
1017 if ( m_eraseBgInOnPaint
)
1019 dcm
.SetBackground(wxBrush(GetBackgroundColour(), wxBRUSHSTYLE_SOLID
));
1022 m_eraseBgInOnPaint
= false;
1024 else // someone has already erased the background, keep it
1026 // preserve the existing background, otherwise we'd erase anything the
1027 // user code had drawn in its EVT_ERASE_BACKGROUND handler when we do
1028 // the Blit back below
1029 dcm
.Blit(0, rect
.GetTop(),
1030 sz
.x
, rect
.GetBottom() - rect
.GetTop() + 1,
1036 dcm
.SetMapMode(wxMM_TEXT
);
1037 dcm
.SetBackgroundMode(wxBRUSHSTYLE_TRANSPARENT
);
1039 wxHtmlRenderingInfo rinfo
;
1040 wxDefaultHtmlRenderingStyle rstyle
;
1041 rinfo
.SetSelection(m_selection
);
1042 rinfo
.SetStyle(&rstyle
);
1043 m_Cell
->Draw(dcm
, 0, 0,
1044 y
* wxHTML_SCROLL_STEP
+ rect
.GetTop(),
1045 y
* wxHTML_SCROLL_STEP
+ rect
.GetBottom(),
1048 //#define DEBUG_HTML_SELECTION
1049 #ifdef DEBUG_HTML_SELECTION
1052 wxGetMousePosition(&xc
, &yc
);
1053 ScreenToClient(&xc
, &yc
);
1054 CalcUnscrolledPosition(xc
, yc
, &x
, &y
);
1055 wxHtmlCell
*at
= m_Cell
->FindCellByPos(x
, y
);
1056 wxHtmlCell
*before
=
1057 m_Cell
->FindCellByPos(x
, y
, wxHTML_FIND_NEAREST_BEFORE
);
1059 m_Cell
->FindCellByPos(x
, y
, wxHTML_FIND_NEAREST_AFTER
);
1061 dcm
.SetBrush(*wxTRANSPARENT_BRUSH
);
1062 dcm
.SetPen(*wxBLACK_PEN
);
1064 dcm
.DrawRectangle(at
->GetAbsPos(),
1065 wxSize(at
->GetWidth(),at
->GetHeight()));
1066 dcm
.SetPen(*wxGREEN_PEN
);
1068 dcm
.DrawRectangle(before
->GetAbsPos().x
+1, before
->GetAbsPos().y
+1,
1069 before
->GetWidth()-2,before
->GetHeight()-2);
1070 dcm
.SetPen(*wxRED_PEN
);
1072 dcm
.DrawRectangle(after
->GetAbsPos().x
+2, after
->GetAbsPos().y
+2,
1073 after
->GetWidth()-4,after
->GetHeight()-4);
1077 dcm
.SetDeviceOrigin(0,0);
1078 dc
.Blit(0, rect
.GetTop(),
1079 sz
.x
, rect
.GetBottom() - rect
.GetTop() + 1,
1087 void wxHtmlWindow::OnSize(wxSizeEvent
& event
)
1089 wxDELETE(m_backBuffer
);
1091 wxScrolledWindow::OnSize(event
);
1094 // Recompute selection if necessary:
1097 m_selection
->Set(m_selection
->GetFromCell(),
1098 m_selection
->GetToCell());
1099 m_selection
->ClearPrivPos();
1106 void wxHtmlWindow::OnMouseMove(wxMouseEvent
& WXUNUSED(event
))
1108 wxHtmlWindowMouseHelper::HandleMouseMoved();
1111 void wxHtmlWindow::OnMouseDown(wxMouseEvent
& event
)
1114 if ( event
.LeftDown() && IsSelectionEnabled() )
1116 const long TRIPLECLICK_LEN
= 200; // 0.2 sec after doubleclick
1117 if ( wxGetLocalTimeMillis() - m_lastDoubleClick
<= TRIPLECLICK_LEN
)
1119 SelectLine(CalcUnscrolledPosition(event
.GetPosition()));
1121 (void) CopySelection();
1125 m_makingSelection
= true;
1129 wxDELETE(m_selection
);
1132 m_tmpSelFromPos
= CalcUnscrolledPosition(event
.GetPosition());
1133 m_tmpSelFromCell
= NULL
;
1138 #endif // wxUSE_CLIPBOARD
1140 // in any case, let the default handler set focus to this window
1144 void wxHtmlWindow::OnMouseUp(wxMouseEvent
& event
)
1147 if ( m_makingSelection
)
1150 m_makingSelection
= false;
1152 // if m_selection=NULL, the user didn't move the mouse far enough from
1153 // starting point and the mouse up event is part of a click, the user
1154 // is not selecting text:
1157 CopySelection(Primary
);
1159 // we don't want mouse up event that ended selecting to be
1160 // handled as mouse click and e.g. follow hyperlink:
1164 #endif // wxUSE_CLIPBOARD
1166 wxPoint pos
= CalcUnscrolledPosition(event
.GetPosition());
1167 wxHtmlWindowMouseHelper::HandleMouseClick(m_Cell
, pos
, event
);
1171 void wxHtmlWindow::OnMouseCaptureLost(wxMouseCaptureLostEvent
& WXUNUSED(event
))
1173 if ( !m_makingSelection
)
1176 // discard the selecting operation
1177 m_makingSelection
= false;
1178 wxDELETE(m_selection
);
1179 m_tmpSelFromCell
= NULL
;
1182 #endif // wxUSE_CLIPBOARD
1185 void wxHtmlWindow::OnInternalIdle()
1187 wxWindow::OnInternalIdle();
1189 if (m_Cell
!= NULL
&& DidMouseMove())
1191 #ifdef DEBUG_HTML_SELECTION
1195 wxGetMousePosition(&xc
, &yc
);
1196 ScreenToClient(&xc
, &yc
);
1197 CalcUnscrolledPosition(xc
, yc
, &x
, &y
);
1199 wxHtmlCell
*cell
= m_Cell
->FindCellByPos(x
, y
);
1201 // handle selection update:
1202 if ( m_makingSelection
)
1204 if ( !m_tmpSelFromCell
)
1205 m_tmpSelFromCell
= m_Cell
->FindCellByPos(
1206 m_tmpSelFromPos
.x
,m_tmpSelFromPos
.y
);
1208 // NB: a trick - we adjust selFromPos to be upper left or bottom
1209 // right corner of the first cell of the selection depending
1210 // on whether the mouse is moving to the right or to the left.
1211 // This gives us more "natural" behaviour when selecting
1212 // a line (specifically, first cell of the next line is not
1213 // included if you drag selection from left to right over
1216 if ( !m_tmpSelFromCell
)
1218 dirFromPos
= m_tmpSelFromPos
;
1222 dirFromPos
= m_tmpSelFromCell
->GetAbsPos();
1223 if ( x
< m_tmpSelFromPos
.x
)
1225 dirFromPos
.x
+= m_tmpSelFromCell
->GetWidth();
1226 dirFromPos
.y
+= m_tmpSelFromCell
->GetHeight();
1229 bool goingDown
= dirFromPos
.y
< y
||
1230 (dirFromPos
.y
== y
&& dirFromPos
.x
< x
);
1232 // determine selection span:
1233 if ( /*still*/ !m_tmpSelFromCell
)
1237 m_tmpSelFromCell
= m_Cell
->FindCellByPos(
1238 m_tmpSelFromPos
.x
,m_tmpSelFromPos
.y
,
1239 wxHTML_FIND_NEAREST_AFTER
);
1240 if (!m_tmpSelFromCell
)
1241 m_tmpSelFromCell
= m_Cell
->GetFirstTerminal();
1245 m_tmpSelFromCell
= m_Cell
->FindCellByPos(
1246 m_tmpSelFromPos
.x
,m_tmpSelFromPos
.y
,
1247 wxHTML_FIND_NEAREST_BEFORE
);
1248 if (!m_tmpSelFromCell
)
1249 m_tmpSelFromCell
= m_Cell
->GetLastTerminal();
1253 wxHtmlCell
*selcell
= cell
;
1258 selcell
= m_Cell
->FindCellByPos(x
, y
,
1259 wxHTML_FIND_NEAREST_BEFORE
);
1261 selcell
= m_Cell
->GetLastTerminal();
1265 selcell
= m_Cell
->FindCellByPos(x
, y
,
1266 wxHTML_FIND_NEAREST_AFTER
);
1268 selcell
= m_Cell
->GetFirstTerminal();
1272 // NB: it may *rarely* happen that the code above didn't find one
1273 // of the cells, e.g. if wxHtmlWindow doesn't contain any
1275 if ( selcell
&& m_tmpSelFromCell
)
1279 // start selecting only if mouse movement was big enough
1280 // (otherwise it was meant as mouse click, not selection):
1281 const int PRECISION
= 2;
1282 wxPoint diff
= m_tmpSelFromPos
- wxPoint(x
,y
);
1283 if (abs(diff
.x
) > PRECISION
|| abs(diff
.y
) > PRECISION
)
1285 m_selection
= new wxHtmlSelection();
1290 if ( m_tmpSelFromCell
->IsBefore(selcell
) )
1292 m_selection
->Set(m_tmpSelFromPos
, m_tmpSelFromCell
,
1293 wxPoint(x
,y
), selcell
);
1297 m_selection
->Set(wxPoint(x
,y
), selcell
,
1298 m_tmpSelFromPos
, m_tmpSelFromCell
);
1300 m_selection
->ClearPrivPos();
1306 // handle cursor and status bar text changes:
1308 // NB: because we're passing in 'cell' and not 'm_Cell' (so that the
1309 // leaf cell lookup isn't done twice), we need to adjust the
1310 // position for the new root:
1311 wxPoint
posInCell(x
, y
);
1313 posInCell
-= cell
->GetAbsPos();
1314 wxHtmlWindowMouseHelper::HandleIdle(cell
, posInCell
);
1319 void wxHtmlWindow::StopAutoScrolling()
1321 if ( m_timerAutoScroll
)
1323 wxDELETE(m_timerAutoScroll
);
1327 void wxHtmlWindow::OnMouseEnter(wxMouseEvent
& event
)
1329 StopAutoScrolling();
1333 void wxHtmlWindow::OnMouseLeave(wxMouseEvent
& event
)
1335 // don't prevent the usual processing of the event from taking place
1338 // when a captured mouse leave a scrolled window we start generate
1339 // scrolling events to allow, for example, extending selection beyond the
1340 // visible area in some controls
1341 if ( wxWindow::GetCapture() == this )
1343 // where is the mouse leaving?
1345 wxPoint pt
= event
.GetPosition();
1348 orient
= wxHORIZONTAL
;
1351 else if ( pt
.y
< 0 )
1353 orient
= wxVERTICAL
;
1356 else // we're lower or to the right of the window
1358 wxSize size
= GetClientSize();
1359 if ( pt
.x
> size
.x
)
1361 orient
= wxHORIZONTAL
;
1362 pos
= GetVirtualSize().x
/ wxHTML_SCROLL_STEP
;
1364 else if ( pt
.y
> size
.y
)
1366 orient
= wxVERTICAL
;
1367 pos
= GetVirtualSize().y
/ wxHTML_SCROLL_STEP
;
1369 else // this should be impossible
1371 // but seems to happen sometimes under wxMSW - maybe it's a bug
1372 // there but for now just ignore it
1374 //wxFAIL_MSG( _T("can't understand where has mouse gone") );
1380 // only start the auto scroll timer if the window can be scrolled in
1382 if ( !HasScrollbar(orient
) )
1385 delete m_timerAutoScroll
;
1386 m_timerAutoScroll
= new wxHtmlWinAutoScrollTimer
1389 pos
== 0 ? wxEVT_SCROLLWIN_LINEUP
1390 : wxEVT_SCROLLWIN_LINEDOWN
,
1394 m_timerAutoScroll
->Start(50); // FIXME: make configurable
1398 void wxHtmlWindow::OnKeyUp(wxKeyEvent
& event
)
1400 if ( IsSelectionEnabled() &&
1401 (event
.GetKeyCode() == 'C' && event
.CmdDown()) )
1403 wxClipboardTextEvent
evt(wxEVT_COMMAND_TEXT_COPY
, GetId());
1405 evt
.SetEventObject(this);
1407 GetEventHandler()->ProcessEvent(evt
);
1411 void wxHtmlWindow::OnCopy(wxCommandEvent
& WXUNUSED(event
))
1413 (void) CopySelection();
1416 void wxHtmlWindow::OnClipboardEvent(wxClipboardTextEvent
& WXUNUSED(event
))
1418 (void) CopySelection();
1421 void wxHtmlWindow::OnDoubleClick(wxMouseEvent
& event
)
1423 // select word under cursor:
1424 if ( IsSelectionEnabled() )
1426 SelectWord(CalcUnscrolledPosition(event
.GetPosition()));
1428 (void) CopySelection(Primary
);
1430 m_lastDoubleClick
= wxGetLocalTimeMillis();
1436 void wxHtmlWindow::SelectWord(const wxPoint
& pos
)
1440 wxHtmlCell
*cell
= m_Cell
->FindCellByPos(pos
.x
, pos
.y
);
1444 m_selection
= new wxHtmlSelection();
1445 m_selection
->Set(cell
, cell
);
1446 RefreshRect(wxRect(CalcScrolledPosition(cell
->GetAbsPos()),
1447 wxSize(cell
->GetWidth(), cell
->GetHeight())));
1452 void wxHtmlWindow::SelectLine(const wxPoint
& pos
)
1456 wxHtmlCell
*cell
= m_Cell
->FindCellByPos(pos
.x
, pos
.y
);
1459 // We use following heuristic to find a "line": let the line be all
1460 // cells in same container as the cell under mouse cursor that are
1461 // neither completely above nor completely bellow the clicked cell
1462 // (i.e. are likely to be words positioned on same line of text).
1464 int y1
= cell
->GetAbsPos().y
;
1465 int y2
= y1
+ cell
->GetHeight();
1467 const wxHtmlCell
*c
;
1468 const wxHtmlCell
*before
= NULL
;
1469 const wxHtmlCell
*after
= NULL
;
1471 // find last cell of line:
1472 for ( c
= cell
->GetNext(); c
; c
= c
->GetNext())
1474 y
= c
->GetAbsPos().y
;
1475 if ( y
+ c
->GetHeight() > y1
&& y
< y2
)
1483 // find first cell of line:
1484 for ( c
= cell
->GetParent()->GetFirstChild();
1485 c
&& c
!= cell
; c
= c
->GetNext())
1487 y
= c
->GetAbsPos().y
;
1488 if ( y
+ c
->GetHeight() > y1
&& y
< y2
)
1500 m_selection
= new wxHtmlSelection();
1501 m_selection
->Set(before
, after
);
1508 void wxHtmlWindow::SelectAll()
1513 m_selection
= new wxHtmlSelection();
1514 m_selection
->Set(m_Cell
->GetFirstTerminal(), m_Cell
->GetLastTerminal());
1519 #endif // wxUSE_CLIPBOARD
1523 IMPLEMENT_ABSTRACT_CLASS(wxHtmlProcessor
,wxObject
)
1525 #if wxUSE_EXTENDED_RTTI
1526 IMPLEMENT_DYNAMIC_CLASS_XTI(wxHtmlWindow
, wxScrolledWindow
,"wx/html/htmlwin.h")
1528 wxBEGIN_PROPERTIES_TABLE(wxHtmlWindow
)
1531 style , wxHW_SCROLLBAR_AUTO
1532 borders , (dimension)
1536 wxEND_PROPERTIES_TABLE()
1538 wxBEGIN_HANDLERS_TABLE(wxHtmlWindow
)
1539 wxEND_HANDLERS_TABLE()
1541 wxCONSTRUCTOR_5( wxHtmlWindow
, wxWindow
* , Parent
, wxWindowID
, Id
, wxPoint
, Position
, wxSize
, Size
, long , WindowStyle
)
1543 IMPLEMENT_DYNAMIC_CLASS(wxHtmlWindow
,wxScrolledWindow
)
1546 BEGIN_EVENT_TABLE(wxHtmlWindow
, wxScrolledWindow
)
1547 EVT_SIZE(wxHtmlWindow::OnSize
)
1548 EVT_LEFT_DOWN(wxHtmlWindow::OnMouseDown
)
1549 EVT_LEFT_UP(wxHtmlWindow::OnMouseUp
)
1550 EVT_RIGHT_UP(wxHtmlWindow::OnMouseUp
)
1551 EVT_MOTION(wxHtmlWindow::OnMouseMove
)
1552 EVT_ERASE_BACKGROUND(wxHtmlWindow::OnEraseBackground
)
1553 EVT_PAINT(wxHtmlWindow::OnPaint
)
1555 EVT_LEFT_DCLICK(wxHtmlWindow::OnDoubleClick
)
1556 EVT_ENTER_WINDOW(wxHtmlWindow::OnMouseEnter
)
1557 EVT_LEAVE_WINDOW(wxHtmlWindow::OnMouseLeave
)
1558 EVT_MOUSE_CAPTURE_LOST(wxHtmlWindow::OnMouseCaptureLost
)
1559 EVT_KEY_UP(wxHtmlWindow::OnKeyUp
)
1560 EVT_MENU(wxID_COPY
, wxHtmlWindow::OnCopy
)
1561 EVT_TEXT_COPY(wxID_ANY
, wxHtmlWindow::OnClipboardEvent
)
1562 #endif // wxUSE_CLIPBOARD
1565 //-----------------------------------------------------------------------------
1566 // wxHtmlWindowInterface implementation in wxHtmlWindow
1567 //-----------------------------------------------------------------------------
1569 void wxHtmlWindow::SetHTMLWindowTitle(const wxString
& title
)
1574 void wxHtmlWindow::OnHTMLLinkClicked(const wxHtmlLinkInfo
& link
)
1576 OnLinkClicked(link
);
1579 wxHtmlOpeningStatus
wxHtmlWindow::OnHTMLOpeningURL(wxHtmlURLType type
,
1580 const wxString
& url
,
1581 wxString
*redirect
) const
1583 return OnOpeningURL(type
, url
, redirect
);
1586 wxPoint
wxHtmlWindow::HTMLCoordsToWindow(wxHtmlCell
*WXUNUSED(cell
),
1587 const wxPoint
& pos
) const
1589 return CalcScrolledPosition(pos
);
1592 wxWindow
* wxHtmlWindow::GetHTMLWindow()
1597 wxColour
wxHtmlWindow::GetHTMLBackgroundColour() const
1599 return GetBackgroundColour();
1602 void wxHtmlWindow::SetHTMLBackgroundColour(const wxColour
& clr
)
1604 SetBackgroundColour(clr
);
1607 void wxHtmlWindow::SetHTMLBackgroundImage(const wxBitmap
& bmpBg
)
1609 SetBackgroundImage(bmpBg
);
1612 void wxHtmlWindow::SetHTMLStatusText(const wxString
& text
)
1615 if (m_RelatedStatusBar
!= -1)
1616 m_RelatedFrame
->SetStatusText(text
, m_RelatedStatusBar
);
1619 #endif // wxUSE_STATUSBAR
1623 wxCursor
wxHtmlWindow::GetDefaultHTMLCursor(HTMLCursor type
)
1627 case HTMLCursor_Link
:
1628 if ( !ms_cursorLink
)
1629 ms_cursorLink
= new wxCursor(wxCURSOR_HAND
);
1630 return *ms_cursorLink
;
1632 case HTMLCursor_Text
:
1633 if ( !ms_cursorText
)
1634 ms_cursorText
= new wxCursor(wxCURSOR_IBEAM
);
1635 return *ms_cursorText
;
1637 case HTMLCursor_Default
:
1639 return *wxSTANDARD_CURSOR
;
1643 wxCursor
wxHtmlWindow::GetHTMLCursor(HTMLCursor type
) const
1645 return GetDefaultHTMLCursor(type
);
1649 //-----------------------------------------------------------------------------
1651 //-----------------------------------------------------------------------------
1653 // A module to allow initialization/cleanup
1654 // without calling these functions from app.cpp or from
1655 // the user's application.
1657 class wxHtmlWinModule
: public wxModule
1659 DECLARE_DYNAMIC_CLASS(wxHtmlWinModule
)
1661 wxHtmlWinModule() : wxModule() {}
1662 bool OnInit() { return true; }
1663 void OnExit() { wxHtmlWindow::CleanUpStatics(); }
1666 IMPLEMENT_DYNAMIC_CLASS(wxHtmlWinModule
, wxModule
)
1669 // This hack forces the linker to always link in m_* files
1670 // (wxHTML doesn't work without handlers from these files)
1671 #include "wx/html/forcelnk.h"
1672 FORCE_WXHTML_MODULES()
1674 #endif // wxUSE_HTML