X-Git-Url: https://git.saurik.com/wxWidgets.git/blobdiff_plain/f152b4b93f41c3eb0b343dca54fd59e4a50755dc..e1efca652844273c3e8d32c7e5f442b87e455ca7:/tests/controls/webtest.cpp
diff --git a/tests/controls/webtest.cpp b/tests/controls/webtest.cpp
index 74360c9c53..ae4cfe2245 100644
--- a/tests/controls/webtest.cpp
+++ b/tests/controls/webtest.cpp
@@ -39,6 +39,11 @@ private:
CPPUNIT_TEST( History );
CPPUNIT_TEST( HistoryEnable );
CPPUNIT_TEST( HistoryClear );
+ CPPUNIT_TEST( HistoryList );
+ CPPUNIT_TEST( Editable );
+ CPPUNIT_TEST( Selection );
+ CPPUNIT_TEST( Zoom );
+ CPPUNIT_TEST( RunScript );
CPPUNIT_TEST_SUITE_END();
void Title();
@@ -46,6 +51,12 @@ private:
void History();
void HistoryEnable();
void HistoryClear();
+ void HistoryList();
+ void Editable();
+ void Selection();
+ void Zoom();
+ void RunScript();
+ void LoadUrl(int times = 1);
wxWebView* m_browser;
@@ -61,6 +72,8 @@ CPPUNIT_TEST_SUITE_NAMED_REGISTRATION( WebTestCase, "WebTestCase" );
void WebTestCase::setUp()
{
m_browser = wxWebView::New(wxTheApp->GetTopWindow(), wxID_ANY);
+ //We yield to let the initial page load
+ wxYield();
}
void WebTestCase::tearDown()
@@ -68,40 +81,46 @@ void WebTestCase::tearDown()
wxDELETE(m_browser);
}
+void WebTestCase::LoadUrl(int times)
+{
+ //We alternate between urls as otherwise webkit merges them in the history
+ //we use about and about blank to avoid the need for a network connection
+ for(int i = 0; i < times; i++)
+ {
+ if(i % 2 == 1)
+ m_browser->LoadUrl("about:blank");
+ else
+ m_browser->LoadUrl("about:");
+ wxYield();
+ }
+}
+
void WebTestCase::Title()
{
CPPUNIT_ASSERT_EQUAL("", m_browser->GetCurrentTitle());
//Test title after loading raw html
- m_browser->SetPage("
Title", "");
+ m_browser->SetPage("TitleText", "");
+ wxYield();
CPPUNIT_ASSERT_EQUAL("Title", m_browser->GetCurrentTitle());
//Test title after loading a url, we yield to let events process
- m_browser->LoadUrl("about:blank");
- wxYield();
+ LoadUrl();
CPPUNIT_ASSERT_EQUAL("", m_browser->GetCurrentTitle());
}
void WebTestCase::Url()
{
- CPPUNIT_ASSERT_EQUAL("", m_browser->GetCurrentURL());
-
- m_browser->LoadUrl("about:blank");
- wxYield();
CPPUNIT_ASSERT_EQUAL("about:blank", m_browser->GetCurrentURL());
+
+ //After first loading about:blank the next in the sequence is about:
+ LoadUrl();
+ CPPUNIT_ASSERT_EQUAL("about:", m_browser->GetCurrentURL());
}
void WebTestCase::History()
{
- //We use about:blank to remove the need for a network connection
- m_browser->LoadUrl("about:blank");
- wxYield();
-
- m_browser->LoadUrl("about:blank");
- wxYield();
-
- m_browser->LoadUrl("about:blank");
- wxYield();
+ LoadUrl(3);
CPPUNIT_ASSERT(m_browser->CanGoBack());
CPPUNIT_ASSERT(!m_browser->CanGoForward());
@@ -121,16 +140,13 @@ void WebTestCase::History()
void WebTestCase::HistoryEnable()
{
- m_browser->LoadUrl("about:blank");
- wxYield();
-
+ LoadUrl();
m_browser->EnableHistory(false);
CPPUNIT_ASSERT(!m_browser->CanGoForward());
CPPUNIT_ASSERT(!m_browser->CanGoBack());
- m_browser->LoadUrl("about:blank");
- wxYield();
+ LoadUrl();
CPPUNIT_ASSERT(!m_browser->CanGoForward());
CPPUNIT_ASSERT(!m_browser->CanGoBack());
@@ -138,14 +154,11 @@ void WebTestCase::HistoryEnable()
void WebTestCase::HistoryClear()
{
- m_browser->LoadUrl("about:blank");
- wxYield();
-
- m_browser->LoadUrl("about:blank");
- wxYield();
+ LoadUrl(2);
//Now we are in the 'middle' of the history
m_browser->GoBack();
+ wxYield();
CPPUNIT_ASSERT(m_browser->CanGoForward());
CPPUNIT_ASSERT(m_browser->CanGoBack());
@@ -156,4 +169,79 @@ void WebTestCase::HistoryClear()
CPPUNIT_ASSERT(!m_browser->CanGoBack());
}
+void WebTestCase::HistoryList()
+{
+ LoadUrl(2);
+ m_browser->GoBack();
+
+ CPPUNIT_ASSERT_EQUAL(1, m_browser->GetBackwardHistory().size());
+ CPPUNIT_ASSERT_EQUAL(1, m_browser->GetForwardHistory().size());
+
+ m_browser->LoadHistoryItem(m_browser->GetForwardHistory()[0]);
+
+ CPPUNIT_ASSERT(!m_browser->CanGoForward());
+ CPPUNIT_ASSERT_EQUAL(2, m_browser->GetBackwardHistory().size());
+}
+
+void WebTestCase::Editable()
+{
+ CPPUNIT_ASSERT(!m_browser->IsEditable());
+
+ m_browser->SetEditable(true);
+
+ CPPUNIT_ASSERT(m_browser->IsEditable());
+
+ m_browser->SetEditable(false);
+
+ CPPUNIT_ASSERT(!m_browser->IsEditable());
+}
+
+void WebTestCase::Selection()
+{
+ m_browser->SetPage("Some strong text", "");
+ wxYield();
+ CPPUNIT_ASSERT(!m_browser->HasSelection());
+
+ m_browser->SelectAll();
+
+ CPPUNIT_ASSERT(m_browser->HasSelection());
+ CPPUNIT_ASSERT_EQUAL("Some strong text", m_browser->GetSelectedText());
+ //We lower case the result as ie returns tags in uppercase
+ CPPUNIT_ASSERT_EQUAL("some strong text",
+ m_browser->GetSelectedSource().Lower());
+
+ m_browser->ClearSelection();
+ CPPUNIT_ASSERT(!m_browser->HasSelection());
+}
+
+void WebTestCase::Zoom()
+{
+ if(m_browser->CanSetZoomType(wxWEB_VIEW_ZOOM_TYPE_LAYOUT))
+ {
+ m_browser->SetZoomType(wxWEB_VIEW_ZOOM_TYPE_LAYOUT);
+ CPPUNIT_ASSERT_EQUAL(wxWEB_VIEW_ZOOM_TYPE_LAYOUT, m_browser->GetZoomType());
+
+ m_browser->SetZoom(wxWEB_VIEW_ZOOM_TINY);
+ CPPUNIT_ASSERT_EQUAL(wxWEB_VIEW_ZOOM_TINY, m_browser->GetZoom());
+ }
+
+ //Reset the zoom level
+ m_browser->SetZoom(wxWEB_VIEW_ZOOM_MEDIUM);
+
+ if(m_browser->CanSetZoomType(wxWEB_VIEW_ZOOM_TYPE_TEXT))
+ {
+ m_browser->SetZoomType(wxWEB_VIEW_ZOOM_TYPE_TEXT);
+ CPPUNIT_ASSERT_EQUAL(wxWEB_VIEW_ZOOM_TYPE_TEXT, m_browser->GetZoomType());
+
+ m_browser->SetZoom(wxWEB_VIEW_ZOOM_TINY);
+ CPPUNIT_ASSERT_EQUAL(wxWEB_VIEW_ZOOM_TINY, m_browser->GetZoom());
+ }
+}
+
+void WebTestCase::RunScript()
+{
+ m_browser->RunScript("document.write(\"Hello World!\");");
+ CPPUNIT_ASSERT_EQUAL("Hello World!", m_browser->GetPageText());
+}
+
#endif //wxUSE_WEB