+ CheckXml(root.get(), "1", "A", "2", "B", "3", "C", NULL);
+}
+
+void XmlTestCase::LoadSave()
+{
+ // NB: this is not real XRC but rather some XRC-like XML fragment which
+ // exercises different XML constructs to check that they're saved back
+ // correctly
+ //
+ // Also note that there should be no blank lines here as they disappear
+ // after saving.
+ const char *xmlText =
+"<?xml version=\"1.0\" encoding=\"ISO-8859-1\"?>\n"
+"<resource xmlns=\"http://www.wxwidgets.org/wxxrc\" version=\"2.3.0.1\">\n"
+" <!-- Test comment -->\n"
+" <object class=\"wxDialog\" name=\"my_dialog\">\n"
+" <children>\n"
+" <grandchild id=\"1\"/>\n"
+" </children>\n"
+" <subobject/>\n"
+" </object>\n"
+"</resource>\n"
+ ;
+
+ wxStringInputStream sis(xmlText);
+
+ wxXmlDocument doc;
+ CPPUNIT_ASSERT( doc.Load(sis) );
+
+ wxStringOutputStream sos;
+ CPPUNIT_ASSERT( doc.Save(sos) );
+
+ CPPUNIT_ASSERT_EQUAL( xmlText, sos.GetString() );
+
+
+#if wxUSE_UNICODE
+ const char *utf8xmlText =
+"<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n"
+"<word>\n"
+" <lang name=\"fr\">\xc3\xa9t\xc3\xa9</lang>\n"
+" <lang name=\"ru\">\xd0\xbb\xd0\xb5\xd1\x82\xd0\xbe</lang>\n"
+"</word>\n"
+ ;
+
+ wxStringInputStream sis8(wxString::FromUTF8(utf8xmlText));
+ CPPUNIT_ASSERT( doc.Load(sis8) );
+
+ // this contents can't be represented in Latin-1 as it contains Cyrillic
+ // letters
+ doc.SetFileEncoding("ISO-8859-1");
+ CPPUNIT_ASSERT( !doc.Save(sos) );
+
+ // but it should work in UTF-8
+ wxStringOutputStream sos8;
+ doc.SetFileEncoding("UTF-8");
+ CPPUNIT_ASSERT( doc.Save(sos8) );
+ CPPUNIT_ASSERT_EQUAL( wxString(utf8xmlText),
+ wxString(sos8.GetString().ToUTF8()) );
+#endif // wxUSE_UNICODE
+
+ const char *xmlTextProlog =
+"<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n"
+"<!-- Prolog comment -->\n"
+"<?xml-stylesheet href=\"style.css\" type=\"text/css\"?>\n"
+"<resource xmlns=\"http://www.wxwidgets.org/wxxrc\" version=\"2.3.0.1\">\n"
+" <!-- Test comment -->\n"
+" <object class=\"wxDialog\" name=\"my_dialog\">\n"
+" <children>\n"
+" <grandchild id=\"1\"/>\n"
+" </children>\n"
+" <subobject/>\n"
+" </object>\n"
+"</resource>\n"
+"<!-- Trailing comment -->\n"
+ ;
+
+ wxStringInputStream sisp(xmlTextProlog);
+ CPPUNIT_ASSERT( doc.Load(sisp, "UTF-8") );
+
+ wxStringOutputStream sosp;
+ CPPUNIT_ASSERT( doc.Save(sosp) );
+
+ CPPUNIT_ASSERT_EQUAL( xmlTextProlog, sosp.GetString() );
+}
+
+void XmlTestCase::CDATA()
+{
+ const char *xmlText =
+ "<?xml version=\"1.0\" encoding=\"windows-1252\"?>\n"
+ "<name>\n"
+ " <![CDATA[Giovanni Mittone]]>\n"
+ "</name>\n"
+ ;
+
+ wxStringInputStream sis(xmlText);
+ wxXmlDocument doc;
+ CPPUNIT_ASSERT( doc.Load(sis) );
+
+ wxXmlNode *n = doc.GetRoot();
+ CPPUNIT_ASSERT( n );
+
+ n = n->GetChildren();
+ CPPUNIT_ASSERT( n );
+
+ // check that both leading (" ") and trailing white space is not part of
+ // the node contents when CDATA is used and wxXMLDOC_KEEP_WHITESPACE_NODES
+ // is not
+ CPPUNIT_ASSERT_EQUAL( "Giovanni Mittone", n->GetContent() );
+}
+
+void XmlTestCase::PI()
+{
+ const char *xmlText =
+ "<?xml version=\"1.0\" encoding=\"windows-1252\"?>\n"
+ "<root>\n"
+ " <?robot index=\"no\" follow=\"no\"?>\n"
+ "</root>\n"
+ ;
+
+ wxStringInputStream sis(xmlText);
+ wxXmlDocument doc;
+ CPPUNIT_ASSERT( doc.Load(sis) );
+
+ wxXmlNode *n = doc.GetRoot();
+ CPPUNIT_ASSERT( n );
+
+ n = n->GetChildren();
+ CPPUNIT_ASSERT( n );
+
+ CPPUNIT_ASSERT_EQUAL( "index=\"no\" follow=\"no\"", n->GetContent() );
+}
+
+void XmlTestCase::Escaping()
+{
+ // Verify that attribute values are escaped correctly, see
+ // http://trac.wxwidgets.org/ticket/12275
+
+ const char *xmlText =
+"<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n"
+"<root text=\"hello
this is a new line\">\n"
+" <x/>\n"
+"</root>\n"
+ ;
+
+ wxStringInputStream sis(xmlText);
+
+ wxXmlDocument doc;
+ CPPUNIT_ASSERT( doc.Load(sis) );
+
+ wxStringOutputStream sos;
+ CPPUNIT_ASSERT( doc.Save(sos) );
+
+ CPPUNIT_ASSERT_EQUAL( xmlText, sos.GetString() );
+}
+
+void XmlTestCase::DetachRoot()
+{
+ const char *xmlTextProlog =
+"<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n"
+"<!-- Prolog comment -->\n"
+"<?xml-stylesheet href=\"style.css\" type=\"text/css\"?>\n"
+"<resource xmlns=\"http://www.wxwidgets.org/wxxrc\" version=\"2.3.0.1\">\n"
+" <!-- Test comment -->\n"
+" <object class=\"wxDialog\" name=\"my_dialog\">\n"
+" <children>\n"
+" <grandchild id=\"1\"/>\n"
+" </children>\n"
+" <subobject/>\n"
+" </object>\n"
+"</resource>\n"
+"<!-- Trailing comment -->\n"
+ ;
+ const char *xmlTextHtm =
+"<?xml version=\"1.0\" encoding=\"windows-1252\"?>\n"
+"<html>\n"
+" <head>\n"
+" <title>Testing wxXml</title>\n"
+" </head>\n"
+" <body>\n"
+" <p>Some body text</p>\n"
+" </body>\n"
+"</html>\n"
+ ;
+ wxXmlDocument doc;
+
+ wxStringInputStream sish(xmlTextHtm);
+ CPPUNIT_ASSERT( doc.Load(sish) );
+
+ wxXmlNode *root = doc.DetachRoot();
+
+ wxStringInputStream sisp(xmlTextProlog);
+ CPPUNIT_ASSERT( doc.Load(sisp) );
+
+ doc.SetRoot(root);
+
+ wxStringOutputStream sos;
+ CPPUNIT_ASSERT( doc.Save(sos) );
+
+ const char *xmlTextResult1 =
+"<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n"
+"<!-- Prolog comment -->\n"
+"<?xml-stylesheet href=\"style.css\" type=\"text/css\"?>\n"
+"<html>\n"
+" <head>\n"
+" <title>Testing wxXml</title>\n"
+" </head>\n"
+" <body>\n"
+" <p>Some body text</p>\n"
+" </body>\n"
+"</html>\n"
+"<!-- Trailing comment -->\n"
+ ;
+ CPPUNIT_ASSERT_EQUAL( xmlTextResult1, sos.GetString() );
+
+ wxStringInputStream sisp2(xmlTextProlog);
+ CPPUNIT_ASSERT( doc.Load(sisp2) );
+
+ root = doc.DetachRoot();
+
+ wxStringInputStream sish2(xmlTextHtm);
+ CPPUNIT_ASSERT( doc.Load(sish2) );
+
+ doc.SetRoot(root);
+
+ wxStringOutputStream sos2;
+ CPPUNIT_ASSERT( doc.Save(sos2) );
+
+ const char *xmlTextResult2 =
+"<?xml version=\"1.0\" encoding=\"windows-1252\"?>\n"
+"<resource xmlns=\"http://www.wxwidgets.org/wxxrc\" version=\"2.3.0.1\">\n"
+" <!-- Test comment -->\n"
+" <object class=\"wxDialog\" name=\"my_dialog\">\n"
+" <children>\n"
+" <grandchild id=\"1\"/>\n"
+" </children>\n"
+" <subobject/>\n"
+" </object>\n"
+"</resource>\n"
+ ;
+ CPPUNIT_ASSERT_EQUAL( xmlTextResult2, sos2.GetString() );
+}
+
+void XmlTestCase::AppendToProlog()
+{
+ const char *xmlText =
+"<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n"
+"<root>\n"
+" <p>Some text</p>\n"
+"</root>\n"
+ ;
+ wxXmlDocument rootdoc;
+ wxStringInputStream sis(xmlText);
+ CPPUNIT_ASSERT( rootdoc.Load(sis) );
+ wxXmlNode *root = rootdoc.DetachRoot();
+
+ wxXmlNode *comment1 = new wxXmlNode(wxXML_COMMENT_NODE, "comment",
+ " 1st prolog entry ");
+ wxXmlNode *pi = new wxXmlNode(wxXML_PI_NODE, "xml-stylesheet",
+ "href=\"style.css\" type=\"text/css\"");
+ wxXmlNode *comment2 = new wxXmlNode(wxXML_COMMENT_NODE, "comment",
+ " 3rd prolog entry ");
+
+ wxXmlDocument doc;
+ doc.AppendToProlog( comment1 );
+ doc.AppendToProlog( pi );
+ doc.SetRoot( root );
+ doc.AppendToProlog( comment2 );
+
+ wxStringOutputStream sos;
+ CPPUNIT_ASSERT( doc.Save(sos) );
+
+ const char *xmlTextResult =
+"<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n"
+"<!-- 1st prolog entry -->\n"
+"<?xml-stylesheet href=\"style.css\" type=\"text/css\"?>\n"
+"<!-- 3rd prolog entry -->\n"
+"<root>\n"
+" <p>Some text</p>\n"
+"</root>\n"
+ ;
+ CPPUNIT_ASSERT_EQUAL( xmlTextResult, sos.GetString() );
+}
+
+void XmlTestCase::SetRoot()
+{
+ wxXmlDocument doc;
+ CPPUNIT_ASSERT( !doc.IsOk() );
+ wxXmlNode *root = new wxXmlNode(wxXML_ELEMENT_NODE, "root");
+
+ // Test for the problem of http://trac.wxwidgets.org/ticket/13135
+ doc.SetRoot( root );
+ wxXmlNode *docNode = doc.GetDocumentNode();
+ CPPUNIT_ASSERT( docNode && root == docNode->GetChildren() );
+ CPPUNIT_ASSERT( doc.IsOk() );
+
+ // Other tests.
+ CPPUNIT_ASSERT( docNode == root->GetParent() );
+ doc.SetRoot(NULL); // Removes from doc but dosn't free mem, doc node left.
+ CPPUNIT_ASSERT( !doc.IsOk() );
+
+ wxXmlNode *comment = new wxXmlNode(wxXML_COMMENT_NODE, "comment", "Prolog Comment");
+ wxXmlNode *pi = new wxXmlNode(wxXML_PI_NODE, "target", "PI instructions");
+ doc.AppendToProlog(comment);
+ doc.SetRoot( root );
+ doc.AppendToProlog(pi);
+ CPPUNIT_ASSERT( doc.IsOk() );
+ wxXmlNode *node = docNode->GetChildren();
+ CPPUNIT_ASSERT( node );
+ CPPUNIT_ASSERT( node->GetType() == wxXML_COMMENT_NODE );
+ CPPUNIT_ASSERT( node->GetParent() == docNode );
+ node = node->GetNext();
+ CPPUNIT_ASSERT( node );
+ CPPUNIT_ASSERT( node->GetType() == wxXML_PI_NODE );
+ CPPUNIT_ASSERT( node->GetParent() == docNode );
+ node = node->GetNext();
+ CPPUNIT_ASSERT( node );
+ CPPUNIT_ASSERT( node->GetType() == wxXML_ELEMENT_NODE );
+ CPPUNIT_ASSERT( node->GetParent() == docNode );
+ node = node->GetNext();
+ CPPUNIT_ASSERT( !node );
+ doc.SetRoot(NULL);
+ CPPUNIT_ASSERT( !doc.IsOk() );
+ doc.SetRoot(root);
+ CPPUNIT_ASSERT( doc.IsOk() );