]> git.saurik.com Git - wxWidgets.git/blame_incremental - tests/controls/webtest.cpp
projects / wxWidgets.git / blame_incremental
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (non-incremental) | history | HEAD
adding a app-defined event seems to quit inner eventloops like eg the popup of the...
[wxWidgets.git] / tests / controls / webtest.cpp
... / ...
CommitLineData
1///////////////////////////////////////////////////////////////////////////////
2// Name: tests/controls/webtest.cpp
3// Purpose: wxWebView unit test
4// Author: Steven Lamerton
5// Created: 2011-07-08
6// RCS-ID: $Id$
7// Copyright: (c) 2011 Steven Lamerton
8///////////////////////////////////////////////////////////////////////////////
9
10#include "testprec.h"
11
12#if wxUSE_WEBVIEW && (wxUSE_WEBVIEW_WEBKIT || wxUSE_WEBVIEW_IE)
13
14#ifdef __BORLANDC__
15 #pragma hdrstop
16#endif
17
18#ifndef WX_PRECOMP
19 #include "wx/app.h"
20#endif // WX_PRECOMP
21
22#include "testableframe.h"
23#include "wx/uiaction.h"
24#include "wx/webview.h"
25#include "asserthelper.h"
26
27class WebTestCase : public CppUnit::TestCase
28{
29public:
30 WebTestCase() { }
31
32 void setUp();
33 void tearDown();
34
35private:
36 CPPUNIT_TEST_SUITE( WebTestCase );
37 CPPUNIT_TEST( Title );
38 CPPUNIT_TEST( Url );
39 CPPUNIT_TEST( History );
40 CPPUNIT_TEST( HistoryEnable );
41 CPPUNIT_TEST( HistoryClear );
42 CPPUNIT_TEST( HistoryList );
43 CPPUNIT_TEST( Editable );
44 CPPUNIT_TEST( Selection );
45 CPPUNIT_TEST( Zoom );
46 CPPUNIT_TEST( RunScript );
47 CPPUNIT_TEST( SetPage );
48 CPPUNIT_TEST_SUITE_END();
49
50 void Title();
51 void Url();
52 void History();
53 void HistoryEnable();
54 void HistoryClear();
55 void HistoryList();
56 void Editable();
57 void Selection();
58 void Zoom();
59 void RunScript();
60 void SetPage();
61 void LoadUrl(int times = 1);
62
63 wxWebView* m_browser;
64
65 DECLARE_NO_COPY_CLASS(WebTestCase)
66};
67
68// register in the unnamed registry so that these tests are run by default
69CPPUNIT_TEST_SUITE_REGISTRATION( WebTestCase );
70
71// also include in its own registry so that these tests can be run alone
72CPPUNIT_TEST_SUITE_NAMED_REGISTRATION( WebTestCase, "WebTestCase" );
73
74void WebTestCase::setUp()
75{
76 m_browser = wxWebView::New(wxTheApp->GetTopWindow(), wxID_ANY);
77 //We yield to let the initial page load
78 wxYield();
79}
80
81void WebTestCase::tearDown()
82{
83 wxDELETE(m_browser);
84}
85
86void WebTestCase::LoadUrl(int times)
87{
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++)
91 {
92 if(i % 2 == 1)
93 m_browser->LoadURL("about:blank");
94 else
95 m_browser->LoadURL("about:");
96 wxYield();
97 }
98}
99
100void WebTestCase::Title()
101{
102 CPPUNIT_ASSERT_EQUAL("", m_browser->GetCurrentTitle());
103
104 //Test title after loading raw html
105 m_browser->SetPage("<html><title>Title</title><body>Text</body></html>", "");
106 wxYield();
107 CPPUNIT_ASSERT_EQUAL("Title", m_browser->GetCurrentTitle());
108
109 //Test title after loading a url, we yield to let events process
110 LoadUrl();
111 CPPUNIT_ASSERT_EQUAL("", m_browser->GetCurrentTitle());
112}
113
114void WebTestCase::Url()
115{
116 // FIXME: This test fails on MSW buildbot slaves although works fine on
117 // development machine.
118 if ( wxGetUserId().Lower().Matches("buildslave*") )
119 return;
120
121 CPPUNIT_ASSERT_EQUAL("about:blank", m_browser->GetCurrentURL());
122
123 //After first loading about:blank the next in the sequence is about:
124 LoadUrl();
125 CPPUNIT_ASSERT_EQUAL("about:", m_browser->GetCurrentURL());
126}
127
128void WebTestCase::History()
129{
130 // FIXME: This test fails on MSW buildbot slaves although works fine on
131 // development machine.
132 if ( wxGetUserId().Lower().Matches("buildslave*") )
133 return;
134
135 LoadUrl(3);
136
137 CPPUNIT_ASSERT(m_browser->CanGoBack());
138 CPPUNIT_ASSERT(!m_browser->CanGoForward());
139
140 m_browser->GoBack();
141 wxYield();
142
143 CPPUNIT_ASSERT(m_browser->CanGoBack());
144 CPPUNIT_ASSERT(m_browser->CanGoForward());
145
146 m_browser->GoBack();
147 wxYield();
148 m_browser->GoBack();
149 wxYield();
150
151 //We should now be at the start of the history
152 CPPUNIT_ASSERT(!m_browser->CanGoBack());
153 CPPUNIT_ASSERT(m_browser->CanGoForward());
154}
155
156void WebTestCase::HistoryEnable()
157{
158 LoadUrl();
159 m_browser->EnableHistory(false);
160
161 CPPUNIT_ASSERT(!m_browser->CanGoForward());
162 CPPUNIT_ASSERT(!m_browser->CanGoBack());
163
164 LoadUrl();
165
166 CPPUNIT_ASSERT(!m_browser->CanGoForward());
167 CPPUNIT_ASSERT(!m_browser->CanGoBack());
168}
169
170void WebTestCase::HistoryClear()
171{
172 // FIXME: This test fails on MSW buildbot slaves although works fine on
173 // development machine.
174 if ( wxGetUserId().Lower().Matches("buildslave*") )
175 return;
176
177 LoadUrl(2);
178
179 //Now we are in the 'middle' of the history
180 m_browser->GoBack();
181 wxYield();
182
183 CPPUNIT_ASSERT(m_browser->CanGoForward());
184 CPPUNIT_ASSERT(m_browser->CanGoBack());
185
186 m_browser->ClearHistory();
187
188 CPPUNIT_ASSERT(!m_browser->CanGoForward());
189 CPPUNIT_ASSERT(!m_browser->CanGoBack());
190}
191
192void WebTestCase::HistoryList()
193{
194 // FIXME: This test fails on MSW buildbot slaves although works fine on
195 // development machine.
196 if ( wxGetUserId().Lower().Matches("buildslave*") )
197 return;
198
199 LoadUrl(2);
200 m_browser->GoBack();
201 wxYield();
202
203 CPPUNIT_ASSERT_EQUAL(1, m_browser->GetBackwardHistory().size());
204 CPPUNIT_ASSERT_EQUAL(1, m_browser->GetForwardHistory().size());
205
206 m_browser->LoadHistoryItem(m_browser->GetForwardHistory()[0]);
207 wxYield();
208
209 CPPUNIT_ASSERT(!m_browser->CanGoForward());
210 CPPUNIT_ASSERT_EQUAL(2, m_browser->GetBackwardHistory().size());
211}
212
213void WebTestCase::Editable()
214{
215 CPPUNIT_ASSERT(!m_browser->IsEditable());
216
217 m_browser->SetEditable(true);
218
219 CPPUNIT_ASSERT(m_browser->IsEditable());
220
221 m_browser->SetEditable(false);
222
223 CPPUNIT_ASSERT(!m_browser->IsEditable());
224}
225
226void WebTestCase::Selection()
227{
228 m_browser->SetPage("<html><body>Some <strong>strong</strong> text</body></html>", "");
229 wxYield();
230 CPPUNIT_ASSERT(!m_browser->HasSelection());
231
232 m_browser->SelectAll();
233
234 CPPUNIT_ASSERT(m_browser->HasSelection());
235 CPPUNIT_ASSERT_EQUAL("Some strong text", m_browser->GetSelectedText());
236 //We lower case the result as ie returns tags in uppercase
237 CPPUNIT_ASSERT_EQUAL("some <strong>strong</strong> text",
238 m_browser->GetSelectedSource().Lower());
239
240 m_browser->ClearSelection();
241 CPPUNIT_ASSERT(!m_browser->HasSelection());
242}
243
244void WebTestCase::Zoom()
245{
246 // FIXME: This test fails on MSW buildbot slaves although works fine on
247 // development machine.
248 if ( wxGetUserId().Lower().Matches("buildslave*") )
249 return;
250
251 if(m_browser->CanSetZoomType(wxWEB_VIEW_ZOOM_TYPE_LAYOUT))
252 {
253 m_browser->SetZoomType(wxWEB_VIEW_ZOOM_TYPE_LAYOUT);
254 CPPUNIT_ASSERT_EQUAL(wxWEB_VIEW_ZOOM_TYPE_LAYOUT, m_browser->GetZoomType());
255
256 m_browser->SetZoom(wxWEB_VIEW_ZOOM_TINY);
257 CPPUNIT_ASSERT_EQUAL(wxWEB_VIEW_ZOOM_TINY, m_browser->GetZoom());
258 }
259
260 //Reset the zoom level
261 m_browser->SetZoom(wxWEB_VIEW_ZOOM_MEDIUM);
262
263 if(m_browser->CanSetZoomType(wxWEB_VIEW_ZOOM_TYPE_TEXT))
264 {
265 m_browser->SetZoomType(wxWEB_VIEW_ZOOM_TYPE_TEXT);
266 CPPUNIT_ASSERT_EQUAL(wxWEB_VIEW_ZOOM_TYPE_TEXT, m_browser->GetZoomType());
267
268 m_browser->SetZoom(wxWEB_VIEW_ZOOM_TINY);
269 CPPUNIT_ASSERT_EQUAL(wxWEB_VIEW_ZOOM_TINY, m_browser->GetZoom());
270 }
271}
272
273void WebTestCase::RunScript()
274{
275 m_browser->RunScript("document.write(\"Hello World!\");");
276 CPPUNIT_ASSERT_EQUAL("Hello World!", m_browser->GetPageText());
277}
278
279void WebTestCase::SetPage()
280{
281 m_browser->SetPage("<html><body>text</body></html>", "");
282 CPPUNIT_ASSERT_EQUAL("text", m_browser->GetPageText());
283
284 m_browser->SetPage("<html><body>other text</body></html>", "");
285 CPPUNIT_ASSERT_EQUAL("other text", m_browser->GetPageText());
286}
287
288#endif //wxUSE_WEBVIEW && (wxUSE_WEBVIEW_WEBKIT || wxUSE_WEBVIEW_IE)
wxWidgets (Impactor)