1 ///////////////////////////////////////////////////////////////////////////////
2 // Name: tests/controls/webtest.cpp
3 // Purpose: wxWebView unit test
4 // Author: Steven Lamerton
7 // Copyright: (c) 2011 Steven Lamerton
8 ///////////////////////////////////////////////////////////////////////////////
12 #if wxUSE_WEBVIEW && (wxUSE_WEBVIEW_WEBKIT || wxUSE_WEBVIEW_IE)
22 #include "testableframe.h"
23 #include "wx/uiaction.h"
24 #include "wx/webview.h"
25 #include "asserthelper.h"
27 class WebTestCase
: public CppUnit::TestCase
36 CPPUNIT_TEST_SUITE( WebTestCase
);
37 CPPUNIT_TEST( Title
);
39 CPPUNIT_TEST( History
);
40 CPPUNIT_TEST( HistoryEnable
);
41 CPPUNIT_TEST( HistoryClear
);
42 CPPUNIT_TEST( HistoryList
);
43 CPPUNIT_TEST( Editable
);
44 CPPUNIT_TEST( Selection
);
46 CPPUNIT_TEST( RunScript
);
47 CPPUNIT_TEST( SetPage
);
48 CPPUNIT_TEST_SUITE_END();
61 void LoadUrl(int times
= 1);
64 EventCounter
* m_loaded
;
66 DECLARE_NO_COPY_CLASS(WebTestCase
)
70 #define ENSURE_LOADED WX_ASSERT_EVENT_OCCURS((*m_loaded), 1)
72 // register in the unnamed registry so that these tests are run by default
73 CPPUNIT_TEST_SUITE_REGISTRATION( WebTestCase
);
75 // also include in its own registry so that these tests can be run alone
76 CPPUNIT_TEST_SUITE_NAMED_REGISTRATION( WebTestCase
, "WebTestCase" );
78 void WebTestCase::setUp()
80 m_browser
= wxWebView::New(wxTheApp
->GetTopWindow(), wxID_ANY
);
82 m_loaded
= new EventCounter(m_browser
, wxEVT_COMMAND_WEB_VIEW_LOADED
);
86 void WebTestCase::tearDown()
92 void WebTestCase::LoadUrl(int times
)
94 //We alternate between urls as otherwise webkit merges them in the history
95 //we use about and about blank to avoid the need for a network connection
96 for(int i
= 0; i
< times
; i
++)
99 m_browser
->LoadURL("about:blank");
101 m_browser
->LoadURL("about:");
106 void WebTestCase::Title()
108 CPPUNIT_ASSERT_EQUAL("", m_browser
->GetCurrentTitle());
110 //Test title after loading raw html
111 m_browser
->SetPage("<html><title>Title</title><body>Text</body></html>", "");
113 CPPUNIT_ASSERT_EQUAL("Title", m_browser
->GetCurrentTitle());
115 //Test title after loading a url, we yield to let events process
117 CPPUNIT_ASSERT_EQUAL("", m_browser
->GetCurrentTitle());
120 void WebTestCase::Url()
122 CPPUNIT_ASSERT_EQUAL("about:blank", m_browser
->GetCurrentURL());
124 //After first loading about:blank the next in the sequence is about:
126 CPPUNIT_ASSERT_EQUAL("about:", m_browser
->GetCurrentURL());
129 void WebTestCase::History()
133 CPPUNIT_ASSERT(m_browser
->CanGoBack());
134 CPPUNIT_ASSERT(!m_browser
->CanGoForward());
139 CPPUNIT_ASSERT(m_browser
->CanGoBack());
140 CPPUNIT_ASSERT(m_browser
->CanGoForward());
147 //We should now be at the start of the history
148 CPPUNIT_ASSERT(!m_browser
->CanGoBack());
149 CPPUNIT_ASSERT(m_browser
->CanGoForward());
152 void WebTestCase::HistoryEnable()
155 m_browser
->EnableHistory(false);
157 CPPUNIT_ASSERT(!m_browser
->CanGoForward());
158 CPPUNIT_ASSERT(!m_browser
->CanGoBack());
162 CPPUNIT_ASSERT(!m_browser
->CanGoForward());
163 CPPUNIT_ASSERT(!m_browser
->CanGoBack());
166 void WebTestCase::HistoryClear()
170 //Now we are in the 'middle' of the history
174 CPPUNIT_ASSERT(m_browser
->CanGoForward());
175 CPPUNIT_ASSERT(m_browser
->CanGoBack());
177 m_browser
->ClearHistory();
179 CPPUNIT_ASSERT(!m_browser
->CanGoForward());
180 CPPUNIT_ASSERT(!m_browser
->CanGoBack());
183 void WebTestCase::HistoryList()
189 CPPUNIT_ASSERT_EQUAL(1, m_browser
->GetBackwardHistory().size());
190 CPPUNIT_ASSERT_EQUAL(1, m_browser
->GetForwardHistory().size());
192 m_browser
->LoadHistoryItem(m_browser
->GetForwardHistory()[0]);
195 CPPUNIT_ASSERT(!m_browser
->CanGoForward());
196 CPPUNIT_ASSERT_EQUAL(2, m_browser
->GetBackwardHistory().size());
199 void WebTestCase::Editable()
201 CPPUNIT_ASSERT(!m_browser
->IsEditable());
203 m_browser
->SetEditable(true);
205 CPPUNIT_ASSERT(m_browser
->IsEditable());
207 m_browser
->SetEditable(false);
209 CPPUNIT_ASSERT(!m_browser
->IsEditable());
212 void WebTestCase::Selection()
214 m_browser
->SetPage("<html><body>Some <strong>strong</strong> text</body></html>", "");
216 CPPUNIT_ASSERT(!m_browser
->HasSelection());
218 m_browser
->SelectAll();
220 CPPUNIT_ASSERT(m_browser
->HasSelection());
221 CPPUNIT_ASSERT_EQUAL("Some strong text", m_browser
->GetSelectedText());
222 //We lower case the result as ie returns tags in uppercase
223 CPPUNIT_ASSERT_EQUAL("some <strong>strong</strong> text",
224 m_browser
->GetSelectedSource().Lower());
226 m_browser
->ClearSelection();
227 CPPUNIT_ASSERT(!m_browser
->HasSelection());
230 void WebTestCase::Zoom()
232 if(m_browser
->CanSetZoomType(wxWEB_VIEW_ZOOM_TYPE_LAYOUT
))
234 m_browser
->SetZoomType(wxWEB_VIEW_ZOOM_TYPE_LAYOUT
);
235 CPPUNIT_ASSERT_EQUAL(wxWEB_VIEW_ZOOM_TYPE_LAYOUT
, m_browser
->GetZoomType());
237 m_browser
->SetZoom(wxWEB_VIEW_ZOOM_TINY
);
238 CPPUNIT_ASSERT_EQUAL(wxWEB_VIEW_ZOOM_TINY
, m_browser
->GetZoom());
241 //Reset the zoom level
242 m_browser
->SetZoom(wxWEB_VIEW_ZOOM_MEDIUM
);
244 if(m_browser
->CanSetZoomType(wxWEB_VIEW_ZOOM_TYPE_TEXT
))
246 m_browser
->SetZoomType(wxWEB_VIEW_ZOOM_TYPE_TEXT
);
247 CPPUNIT_ASSERT_EQUAL(wxWEB_VIEW_ZOOM_TYPE_TEXT
, m_browser
->GetZoomType());
249 m_browser
->SetZoom(wxWEB_VIEW_ZOOM_TINY
);
250 CPPUNIT_ASSERT_EQUAL(wxWEB_VIEW_ZOOM_TINY
, m_browser
->GetZoom());
254 void WebTestCase::RunScript()
256 m_browser
->RunScript("document.write(\"Hello World!\");");
257 CPPUNIT_ASSERT_EQUAL("Hello World!", m_browser
->GetPageText());
260 void WebTestCase::SetPage()
262 m_browser
->SetPage("<html><body>text</body></html>", "");
264 CPPUNIT_ASSERT_EQUAL("text", m_browser
->GetPageText());
266 m_browser
->SetPage("<html><body>other text</body></html>", "");
268 CPPUNIT_ASSERT_EQUAL("other text", m_browser
->GetPageText());
271 #endif //wxUSE_WEBVIEW && (wxUSE_WEBVIEW_WEBKIT || wxUSE_WEBVIEW_IE)