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);
65 DECLARE_NO_COPY_CLASS(WebTestCase
)
68 // register in the unnamed registry so that these tests are run by default
69 CPPUNIT_TEST_SUITE_REGISTRATION( WebTestCase
);
71 // also include in its own registry so that these tests can be run alone
72 CPPUNIT_TEST_SUITE_NAMED_REGISTRATION( WebTestCase
, "WebTestCase" );
74 void WebTestCase::setUp()
76 m_browser
= wxWebView::New(wxTheApp
->GetTopWindow(), wxID_ANY
);
77 //We yield to let the initial page load
81 void WebTestCase::tearDown()
86 void WebTestCase::LoadUrl(int times
)
88 //We alternate between urls as otherwise webkit merges them in the history
89 //we use about and about blank to avoid the need for a network connection
90 for(int i
= 0; i
< times
; i
++)
93 m_browser
->LoadURL("about:blank");
95 m_browser
->LoadURL("about:");
100 void WebTestCase::Title()
102 CPPUNIT_ASSERT_EQUAL("", m_browser
->GetCurrentTitle());
104 //Test title after loading raw html
105 m_browser
->SetPage("<html><title>Title</title><body>Text</body></html>", "");
107 CPPUNIT_ASSERT_EQUAL("Title", m_browser
->GetCurrentTitle());
109 //Test title after loading a url, we yield to let events process
111 CPPUNIT_ASSERT_EQUAL("", m_browser
->GetCurrentTitle());
114 void WebTestCase::Url()
116 CPPUNIT_ASSERT_EQUAL("about:blank", m_browser
->GetCurrentURL());
118 //After first loading about:blank the next in the sequence is about:
120 CPPUNIT_ASSERT_EQUAL("about:", m_browser
->GetCurrentURL());
123 void WebTestCase::History()
127 CPPUNIT_ASSERT(m_browser
->CanGoBack());
128 CPPUNIT_ASSERT(!m_browser
->CanGoForward());
132 CPPUNIT_ASSERT(m_browser
->CanGoBack());
133 CPPUNIT_ASSERT(m_browser
->CanGoForward());
138 //We should now be at the start of the history
139 CPPUNIT_ASSERT(!m_browser
->CanGoBack());
140 CPPUNIT_ASSERT(m_browser
->CanGoForward());
143 void WebTestCase::HistoryEnable()
146 m_browser
->EnableHistory(false);
148 CPPUNIT_ASSERT(!m_browser
->CanGoForward());
149 CPPUNIT_ASSERT(!m_browser
->CanGoBack());
153 CPPUNIT_ASSERT(!m_browser
->CanGoForward());
154 CPPUNIT_ASSERT(!m_browser
->CanGoBack());
157 void WebTestCase::HistoryClear()
161 //Now we are in the 'middle' of the history
165 CPPUNIT_ASSERT(m_browser
->CanGoForward());
166 CPPUNIT_ASSERT(m_browser
->CanGoBack());
168 m_browser
->ClearHistory();
170 CPPUNIT_ASSERT(!m_browser
->CanGoForward());
171 CPPUNIT_ASSERT(!m_browser
->CanGoBack());
174 void WebTestCase::HistoryList()
179 CPPUNIT_ASSERT_EQUAL(1, m_browser
->GetBackwardHistory().size());
180 CPPUNIT_ASSERT_EQUAL(1, m_browser
->GetForwardHistory().size());
182 m_browser
->LoadHistoryItem(m_browser
->GetForwardHistory()[0]);
184 CPPUNIT_ASSERT(!m_browser
->CanGoForward());
185 CPPUNIT_ASSERT_EQUAL(2, m_browser
->GetBackwardHistory().size());
188 void WebTestCase::Editable()
190 CPPUNIT_ASSERT(!m_browser
->IsEditable());
192 m_browser
->SetEditable(true);
194 CPPUNIT_ASSERT(m_browser
->IsEditable());
196 m_browser
->SetEditable(false);
198 CPPUNIT_ASSERT(!m_browser
->IsEditable());
201 void WebTestCase::Selection()
203 m_browser
->SetPage("<html><body>Some <strong>strong</strong> text</body></html>", "");
205 CPPUNIT_ASSERT(!m_browser
->HasSelection());
207 m_browser
->SelectAll();
209 CPPUNIT_ASSERT(m_browser
->HasSelection());
210 CPPUNIT_ASSERT_EQUAL("Some strong text", m_browser
->GetSelectedText());
211 //We lower case the result as ie returns tags in uppercase
212 CPPUNIT_ASSERT_EQUAL("some <strong>strong</strong> text",
213 m_browser
->GetSelectedSource().Lower());
215 m_browser
->ClearSelection();
216 CPPUNIT_ASSERT(!m_browser
->HasSelection());
219 void WebTestCase::Zoom()
221 if(m_browser
->CanSetZoomType(wxWEB_VIEW_ZOOM_TYPE_LAYOUT
))
223 m_browser
->SetZoomType(wxWEB_VIEW_ZOOM_TYPE_LAYOUT
);
224 CPPUNIT_ASSERT_EQUAL(wxWEB_VIEW_ZOOM_TYPE_LAYOUT
, m_browser
->GetZoomType());
226 m_browser
->SetZoom(wxWEB_VIEW_ZOOM_TINY
);
227 CPPUNIT_ASSERT_EQUAL(wxWEB_VIEW_ZOOM_TINY
, m_browser
->GetZoom());
230 //Reset the zoom level
231 m_browser
->SetZoom(wxWEB_VIEW_ZOOM_MEDIUM
);
233 if(m_browser
->CanSetZoomType(wxWEB_VIEW_ZOOM_TYPE_TEXT
))
235 m_browser
->SetZoomType(wxWEB_VIEW_ZOOM_TYPE_TEXT
);
236 CPPUNIT_ASSERT_EQUAL(wxWEB_VIEW_ZOOM_TYPE_TEXT
, m_browser
->GetZoomType());
238 m_browser
->SetZoom(wxWEB_VIEW_ZOOM_TINY
);
239 CPPUNIT_ASSERT_EQUAL(wxWEB_VIEW_ZOOM_TINY
, m_browser
->GetZoom());
243 void WebTestCase::RunScript()
245 m_browser
->RunScript("document.write(\"Hello World!\");");
246 CPPUNIT_ASSERT_EQUAL("Hello World!", m_browser
->GetPageText());
249 void WebTestCase::SetPage()
251 m_browser
->SetPage("<html><body>text</body></html>", "");
252 CPPUNIT_ASSERT_EQUAL("text", m_browser
->GetPageText());
254 m_browser
->SetPage("<html><body>other text</body></html>", "");
255 CPPUNIT_ASSERT_EQUAL("other text", m_browser
->GetPageText());
258 #endif //wxUSE_WEBVIEW && (wxUSE_WEBVIEW_WEBKIT || wxUSE_WEBVIEW_IE)