[wxWidgets.git] / tests / uris / uris.cpp

///////////////////////////////////////////////////////////////////////////////
// Name:        tests/uris/uris.cpp
// Purpose:     wxURI unit test
// Author:      Ryan Norton
// Created:     2004-08-14
// RCS-ID:      $Id$
// Copyright:   (c) 2004 Ryan Norton
///////////////////////////////////////////////////////////////////////////////

// ----------------------------------------------------------------------------
// headers
// ----------------------------------------------------------------------------

#include "testprec.h"

#ifdef __BORLANDC__
    #pragma hdrstop
#endif

#ifndef WX_PRECOMP
    #include "wx/wx.h"
#endif // WX_PRECOMP

#include "wx/uri.h"
#include "wx/url.h"

// Test wxURL & wxURI compat?
#define TEST_URL wxUSE_URL

// ----------------------------------------------------------------------------
// test class
// ----------------------------------------------------------------------------

class URITestCase : public CppUnit::TestCase
{
public:
    URITestCase();

private:
    CPPUNIT_TEST_SUITE( URITestCase );
        CPPUNIT_TEST( IPv4 );
        CPPUNIT_TEST( IPv6 );
        CPPUNIT_TEST( Server );
        CPPUNIT_TEST( Paths );
        CPPUNIT_TEST( UserAndPass );
        CPPUNIT_TEST( NormalResolving );
        CPPUNIT_TEST( ComplexResolving );
        CPPUNIT_TEST( ReallyComplexResolving );
        CPPUNIT_TEST( QueryFragmentResolving );
        CPPUNIT_TEST( BackwardsResolving );
        CPPUNIT_TEST( Assignment );
        CPPUNIT_TEST( Comparison );
        CPPUNIT_TEST( Unescaping );
        CPPUNIT_TEST( FileScheme );
#if TEST_URL
        CPPUNIT_TEST( URLCompat );
#if 0 && wxUSE_PROTOCOL_HTTP
        CPPUNIT_TEST( URLProxy  );
#endif
#endif
    CPPUNIT_TEST_SUITE_END();

    void IPv4();
    void IPv6();
    void Server();
    void Paths();
    void UserAndPass();
    void NormalResolving();
    void ComplexResolving();
    void ReallyComplexResolving();
    void QueryFragmentResolving();
    void BackwardsResolving();
    void Assignment();
    void Comparison();
    void Unescaping();
    void FileScheme();

#if TEST_URL
    void URLCompat();
#if 0 && wxUSE_PROTOCOL_HTTP
    void URLProxy();
#endif
#endif

    DECLARE_NO_COPY_CLASS(URITestCase)
};

// register in the unnamed registry so that these tests are run by default
CPPUNIT_TEST_SUITE_REGISTRATION( URITestCase );

// also include in its own registry so that these tests can be run alone
CPPUNIT_TEST_SUITE_NAMED_REGISTRATION( URITestCase, "URITestCase" );

URITestCase::URITestCase()
{
}

// apply the given accessor to the URI, check that the result is as expected
#define URI_ASSERT_PART_EQUAL(uri, expected, accessor) \
    CPPUNIT_ASSERT_EQUAL(expected, wxURI(uri).accessor)

#define URI_ASSERT_HOSTTYPE_EQUAL(uri, expected) \
    URI_ASSERT_PART_EQUAL((uri), (expected), GetHostType())

#define URI_ASSERT_SERVER_EQUAL(uri, expected) \
    URI_ASSERT_PART_EQUAL((uri), (expected), GetServer())

#define URI_ASSERT_PATH_EQUAL(uri, expected) \
    URI_ASSERT_PART_EQUAL((uri), (expected), GetPath())

#define URI_ASSERT_USER_EQUAL(uri, expected) \
    URI_ASSERT_PART_EQUAL((uri), (expected), GetUser())

void URITestCase::IPv4()
{
    URI_ASSERT_HOSTTYPE_EQUAL("http://user:password@192.168.1.100:5050/path",
                            wxURI_IPV4ADDRESS);

    URI_ASSERT_HOSTTYPE_EQUAL("http://user:password@192.255.1.100:5050/path",
                            wxURI_IPV4ADDRESS);

    // bogus ipv4
    CPPUNIT_ASSERT( wxURI("http://user:password@192.256.1.100:5050/path").
                    GetHostType() != wxURI_IPV4ADDRESS);
}

void URITestCase::IPv6()
{
    // IPv6address   =                            6( h16 ":" ) ls32
    //               /                       "::" 5( h16 ":" ) ls32
    //               / [               h16 ] "::" 4( h16 ":" ) ls32
    //               / [ *1( h16 ":" ) h16 ] "::" 3( h16 ":" ) ls32
    //               / [ *2( h16 ":" ) h16 ] "::" 2( h16 ":" ) ls32
    //               / [ *3( h16 ":" ) h16 ] "::"    h16 ":"   ls32
    //               / [ *4( h16 ":" ) h16 ] "::"              ls32
    //               / [ *5( h16 ":" ) h16 ] "::"              h16
    //               / [ *6( h16 ":" ) h16 ] "::"
    // ls32          = ( h16 ":" h16 ) / IPv4address

    URI_ASSERT_HOSTTYPE_EQUAL
    (
        "http://user:password@[aa:aa:aa:aa:aa:aa:192.168.1.100]:5050/path",
        wxURI_IPV6ADDRESS
    );

    URI_ASSERT_HOSTTYPE_EQUAL
    (
        "http://user:password@[aa:aa:aa:aa:aa:aa:aa:aa]:5050/path",
        wxURI_IPV6ADDRESS
    );

    URI_ASSERT_HOSTTYPE_EQUAL
    (
        "http://user:password@[aa:aa:aa:aa::192.168.1.100]:5050/path",
        wxURI_IPV6ADDRESS
    );

    URI_ASSERT_HOSTTYPE_EQUAL
    (
        "http://user:password@[aa:aa:aa:aa::aa:aa]:5050/path",
        wxURI_IPV6ADDRESS
    );
}

void URITestCase::Server()
{
    URI_ASSERT_SERVER_EQUAL("http://foo/", "foo");
    URI_ASSERT_SERVER_EQUAL("http://foo-bar/", "foo-bar");
    URI_ASSERT_SERVER_EQUAL("http://foo/bar/", "foo");
    URI_ASSERT_SERVER_EQUAL("http://192.168.1.0/", "192.168.1.0");
    URI_ASSERT_SERVER_EQUAL("http://192.168.1.17/", "192.168.1.17");
    URI_ASSERT_SERVER_EQUAL("http://192.168.1.255/", "192.168.1.255");
    URI_ASSERT_SERVER_EQUAL("http://192.168.1.1/index.html", "192.168.1.1");
    URI_ASSERT_SERVER_EQUAL("http://[aa:aa:aa:aa::aa:aa]/foo", "aa:aa:aa:aa::aa:aa");
}

void URITestCase::Paths()
{
    URI_ASSERT_PATH_EQUAL("http://user:password@192.256.1.100:5050/../path",
                          "/path");

    URI_ASSERT_PATH_EQUAL("http://user:password@192.256.1.100:5050/path/../",
                          "/");

    URI_ASSERT_PATH_EQUAL("http://user:password@192.256.1.100:5050/path/.",
                          "/path/");

    URI_ASSERT_PATH_EQUAL("http://user:password@192.256.1.100:5050/path/./",
                          "/path/");

    URI_ASSERT_PART_EQUAL("path/john/../../../joe",
                          "../joe", BuildURI());
}

void URITestCase::UserAndPass()
{
    URI_ASSERT_USER_EQUAL("http://user:pass@host/path/", "user");
    URI_ASSERT_USER_EQUAL("http://user@host/path/", "user");
    URI_ASSERT_USER_EQUAL("http://host/path/", "");
}

#define URI_TEST_RESOLVE_IMPL(string, eq, strict) \
    { \
        wxURI uri(string); \
        uri.Resolve(masteruri, strict); \
        CPPUNIT_ASSERT_EQUAL(eq, uri.BuildURI()); \
    }

#define URI_TEST_RESOLVE(string, eq) \
        URI_TEST_RESOLVE_IMPL(string, eq, true);

#define URI_TEST_RESOLVE_LAX(string, eq) \
        URI_TEST_RESOLVE_IMPL(string, eq, false);


//examples taken from RFC 2396.bis

void URITestCase::NormalResolving()
{
    wxURI masteruri("http://a/b/c/d;p?q");

    URI_TEST_RESOLVE("g:h"  ,"g:h")
    URI_TEST_RESOLVE("g"    ,"http://a/b/c/g")
    URI_TEST_RESOLVE("./g"  ,"http://a/b/c/g")
    URI_TEST_RESOLVE("g/"   ,"http://a/b/c/g/")
    URI_TEST_RESOLVE("/g"   ,"http://a/g")
    URI_TEST_RESOLVE("//g"  ,"http://g")
    URI_TEST_RESOLVE("?y"   ,"http://a/b/c/d;p?y")
    URI_TEST_RESOLVE("g?y"  ,"http://a/b/c/g?y")
    URI_TEST_RESOLVE("#s"   ,"http://a/b/c/d;p?q#s")
    URI_TEST_RESOLVE("g#s"  ,"http://a/b/c/g#s")
    URI_TEST_RESOLVE("g?y#s","http://a/b/c/g?y#s")
    URI_TEST_RESOLVE(";x"   ,"http://a/b/c/;x")
    URI_TEST_RESOLVE("g;x"  ,"http://a/b/c/g;x")
    URI_TEST_RESOLVE("g;x?y#s","http://a/b/c/g;x?y#s")

    URI_TEST_RESOLVE(""     ,"http://a/b/c/d;p?q")
    URI_TEST_RESOLVE("."    ,"http://a/b/c/")
    URI_TEST_RESOLVE("./"   ,"http://a/b/c/")
    URI_TEST_RESOLVE(".."   ,"http://a/b/")
    URI_TEST_RESOLVE("../"  ,"http://a/b/")
    URI_TEST_RESOLVE("../g" ,"http://a/b/g")
    URI_TEST_RESOLVE("../..","http://a/")
    URI_TEST_RESOLVE("../../"        ,  "http://a/")
    URI_TEST_RESOLVE("../../g"       ,  "http://a/g")
}

void URITestCase::ComplexResolving()
{
    wxURI masteruri("http://a/b/c/d;p?q");

    //odd path examples
    URI_TEST_RESOLVE("../../../g"   , "http://a/g")
    URI_TEST_RESOLVE("../../../../g", "http://a/g")

    URI_TEST_RESOLVE("/./g"   ,"http://a/g")
    URI_TEST_RESOLVE("/../g"  ,"http://a/g")
    URI_TEST_RESOLVE("g."     ,"http://a/b/c/g.")
    URI_TEST_RESOLVE(".g"     ,"http://a/b/c/.g")
    URI_TEST_RESOLVE("g.."    ,"http://a/b/c/g..")
    URI_TEST_RESOLVE("..g"    ,"http://a/b/c/..g")
}

void URITestCase::ReallyComplexResolving()
{
    wxURI masteruri("http://a/b/c/d;p?q");

    //even more odder path examples
    URI_TEST_RESOLVE("./../g" ,"http://a/b/g")
    URI_TEST_RESOLVE("./g/."  ,"http://a/b/c/g/")
    URI_TEST_RESOLVE("g/./h"  ,"http://a/b/c/g/h")
    URI_TEST_RESOLVE("g/../h" ,"http://a/b/c/h")
    URI_TEST_RESOLVE("g;x=1/./y"     ,  "http://a/b/c/g;x=1/y")
    URI_TEST_RESOLVE("g;x=1/../y"    ,  "http://a/b/c/y")
}

void URITestCase::QueryFragmentResolving()
{
    wxURI masteruri("http://a/b/c/d;p?q");

    //query/fragment ambigiousness
    URI_TEST_RESOLVE("g?y/./x","http://a/b/c/g?y/./x")
    URI_TEST_RESOLVE("g?y/../x"      ,  "http://a/b/c/g?y/../x")
    URI_TEST_RESOLVE("g#s/./x","http://a/b/c/g#s/./x")
    URI_TEST_RESOLVE("g#s/../x"      ,  "http://a/b/c/g#s/../x")
}

void URITestCase::BackwardsResolving()
{
    wxURI masteruri("http://a/b/c/d;p?q");

    //"NEW"
    URI_TEST_RESOLVE("http:g" ,  "http:g")         //strict
    //bw compat
    URI_TEST_RESOLVE_LAX("http:g", "http://a/b/c/g");
}

void URITestCase::Assignment()
{
    wxURI uri1("http://mysite.com"),
          uri2("http://mysite2.com");

    uri2 = uri1;

    CPPUNIT_ASSERT_EQUAL(uri1.BuildURI(), uri2.BuildURI());
}

void URITestCase::Comparison()
{
    CPPUNIT_ASSERT(wxURI("http://mysite.com") == wxURI("http://mysite.com"));
}

void URITestCase::Unescaping()
{
    wxString escaped,
             unescaped;

    escaped = "http://test.com/of/file%3A%2F%2FC%3A%5Curi%5C"
              "escaping%5Cthat%5Cseems%5Cbroken%5Csadly%5B1%5D.rss";

    unescaped = wxURI(escaped).BuildUnescapedURI();

    CPPUNIT_ASSERT_EQUAL( "http://test.com/of/file://C:\\uri\\"
                          "escaping\\that\\seems\\broken\\sadly[1].rss",
                          unescaped );

    CPPUNIT_ASSERT_EQUAL( unescaped, wxURI::Unescape(escaped) );


#if wxUSE_UNICODE
    escaped = "http://ru.wikipedia.org/wiki/"
              "%D0%A6%D0%B5%D0%BB%D0%BE%D0%B5_%D1%87%D0%B8%D1%81%D0%BB%D0%BE";

    unescaped = wxURI::Unescape(escaped);

    CPPUNIT_ASSERT_EQUAL( wxString::FromUTF8(
                            "http://ru.wikipedia.org/wiki/"
                            "\xD0\xA6\xD0\xB5\xD0\xBB\xD0\xBE\xD0\xB5_"
                            "\xD1\x87\xD0\xB8\xD1\x81\xD0\xBB\xD0\xBE"
                          ),
                          unescaped );
#endif // wxUSE_UNICODE
}

void URITestCase::FileScheme()
{
    //file:// variety (NOT CONFORMING TO THE RFC)
    URI_ASSERT_PATH_EQUAL( "file://e:/wxcode/script1.xml",
                    "e:/wxcode/script1.xml" );

    //file:/// variety
    URI_ASSERT_PATH_EQUAL( "file:///e:/wxcode/script1.xml",
                    "/e:/wxcode/script1.xml" );

    //file:/ variety
    URI_ASSERT_PATH_EQUAL( "file:/e:/wxcode/script1.xml",
                    "/e:/wxcode/script1.xml" );

    //file: variety
    URI_ASSERT_PATH_EQUAL( "file:e:/wxcode/script1.xml",
                    "e:/wxcode/script1.xml" );
}

#if TEST_URL

#include "wx/url.h"
#include "wx/file.h"

void URITestCase::URLCompat()
{
    wxURL url("http://user:password@wxwidgets.org");

    CPPUNIT_ASSERT( url.GetError() == wxURL_NOERR );
    CPPUNIT_ASSERT( url == wxURL("http://user:password@wxwidgets.org") );

    wxURI uri("http://user:password@wxwidgets.org");

    CPPUNIT_ASSERT( url == uri );

    wxURL urlcopy(uri);

    CPPUNIT_ASSERT( urlcopy == url );
    CPPUNIT_ASSERT( urlcopy == uri );

    wxURI uricopy(url);

    CPPUNIT_ASSERT( uricopy == url );
    CPPUNIT_ASSERT( uricopy == urlcopy );
    CPPUNIT_ASSERT( uricopy == uri );
    CPPUNIT_ASSERT_EQUAL( " A ", wxURI::Unescape("%20%41%20") );

    wxURI test("file:\"myf\"ile.txt");

    CPPUNIT_ASSERT_EQUAL( "file:%22myf%22ile.txt" , test.BuildURI() );
    CPPUNIT_ASSERT_EQUAL( "file", test.GetScheme() );
    CPPUNIT_ASSERT_EQUAL( "%22myf%22ile.txt", test.GetPath() );

    // these could be put under a named registry since they take some
    // time to complete
#if 0
    // Test problem urls (reported not to work some time ago by a user...)
    const wxChar* pszProblemUrls[] = { "http://www.csdn.net",
                                       "http://www.163.com",
                                       "http://www.sina.com.cn" };

    for ( size_t i = 0; i < WXSIZEOF(pszProblemUrls); ++i )
    {
        wxURL urlProblem(pszProblemUrls[i]);
        CPPUNIT_ASSERT(urlProblem.GetError() == wxURL_NOERR);

        wxInputStream* is = urlProblem.GetInputStream();
        CPPUNIT_ASSERT(is != NULL);

        wxFile fOut(wxT("test.html"), wxFile::write);
        wxASSERT(fOut.IsOpened());

        char buf[1001];
        for( ;; )
        {
            is->Read(buf, 1000);
            size_t n = is->LastRead();
            if ( n == 0 )
                break;
            buf[n] = 0;
            fOut.Write(buf, n);
        }

        delete is;
    }
#endif
}

// the purpose of this test is unclear, it seems to be unfinished so disabling
// it for now
#if 0 && wxUSE_PROTOCOL_HTTP
void URITestCase::URLProxy()
{
    wxURL url(wxT("http://www.asite.com/index.html"));
    url.SetProxy(wxT("pserv:3122"));

    wxURL::SetDefaultProxy(wxT("fol.singnet.com.sg:8080"));
    wxURL url2(wxT("http://server-name/path/to/file?query_data=value"));
    wxInputStream *data = url2.GetInputStream();
    CPPUNIT_ASSERT(data != NULL);
}
#endif // wxUSE_PROTOCOL_HTTP

#endif // TEST_URL
Commit	Line	Data
dd65d8c8 RN	1	///////////////////////////////////////////////////////////////////////////////
	2	// Name: tests/uris/uris.cpp
	3	// Purpose: wxURI unit test
	4	// Author: Ryan Norton
	5	// Created: 2004-08-14
	6	// RCS-ID: $Id$
	7	// Copyright: (c) 2004 Ryan Norton
	8	///////////////////////////////////////////////////////////////////////////////
	9
	10	// ----------------------------------------------------------------------------
	11	// headers
	12	// ----------------------------------------------------------------------------
	13
8899b155	14	#include "testprec.h"
dd65d8c8 RN	15
	16	#ifdef __BORLANDC__
	17	#pragma hdrstop
	18	#endif
	19
	20	#ifndef WX_PRECOMP
	21	#include "wx/wx.h"
	22	#endif // WX_PRECOMP
	23
	24	#include "wx/uri.h"
2b9afe40	25	#include "wx/url.h"
dd65d8c8	26
b60b2ec8	27	// Test wxURL & wxURI compat?
9fc7a1d2 VZ	28	#define TEST_URL wxUSE_URL
9fc7a1d2 VZ	29
dd65d8c8 RN	30	// ----------------------------------------------------------------------------
	31	// test class
	32	// ----------------------------------------------------------------------------
	33
	34	class URITestCase : public CppUnit::TestCase
	35	{
	36	public:
	37	URITestCase();
	38
	39	private:
	40	CPPUNIT_TEST_SUITE( URITestCase );
	41	CPPUNIT_TEST( IPv4 );
	42	CPPUNIT_TEST( IPv6 );
c4dbb953	43	CPPUNIT_TEST( Server );
dd65d8c8	44	CPPUNIT_TEST( Paths );
62e3e6c2	45	CPPUNIT_TEST( UserAndPass );
dd65d8c8 RN	46	CPPUNIT_TEST( NormalResolving );
	47	CPPUNIT_TEST( ComplexResolving );
	48	CPPUNIT_TEST( ReallyComplexResolving );
	49	CPPUNIT_TEST( QueryFragmentResolving );
	50	CPPUNIT_TEST( BackwardsResolving );
	51	CPPUNIT_TEST( Assignment );
	52	CPPUNIT_TEST( Comparison );
24ca04e7	53	CPPUNIT_TEST( Unescaping );
97ad053b	54	CPPUNIT_TEST( FileScheme );
b60b2ec8 RN	55	#if TEST_URL
b60b2ec8 RN	56	CPPUNIT_TEST( URLCompat );
402ccadc	57	#if 0 && wxUSE_PROTOCOL_HTTP
e605541c	58	CPPUNIT_TEST( URLProxy );
26531700	59	#endif
b60b2ec8	60	#endif
dd65d8c8 RN	61	CPPUNIT_TEST_SUITE_END();
	62
	63	void IPv4();
	64	void IPv6();
c4dbb953	65	void Server();
dd65d8c8	66	void Paths();
62e3e6c2	67	void UserAndPass();
dd65d8c8 RN	68	void NormalResolving();
	69	void ComplexResolving();
	70	void ReallyComplexResolving();
	71	void QueryFragmentResolving();
	72	void BackwardsResolving();
	73	void Assignment();
	74	void Comparison();
24ca04e7	75	void Unescaping();
97ad053b	76	void FileScheme();
dd65d8c8	77
86470d43	78	#if TEST_URL
b60b2ec8	79	void URLCompat();
402ccadc	80	#if 0 && wxUSE_PROTOCOL_HTTP
e605541c	81	void URLProxy();
402ccadc	82	#endif
b60b2ec8 RN	83	#endif
b60b2ec8 RN	84
dd65d8c8 RN	85	DECLARE_NO_COPY_CLASS(URITestCase)
	86	};
	87
	88	// register in the unnamed registry so that these tests are run by default
	89	CPPUNIT_TEST_SUITE_REGISTRATION( URITestCase );
	90
e3778b4d	91	// also include in its own registry so that these tests can be run alone
dd65d8c8 RN	92	CPPUNIT_TEST_SUITE_NAMED_REGISTRATION( URITestCase, "URITestCase" );
	93
	94	URITestCase::URITestCase()
	95	{
	96	}
	97
5c3d5ef2	98	// apply the given accessor to the URI, check that the result is as expected
c3a65218	99	#define URI_ASSERT_PART_EQUAL(uri, expected, accessor) \
5c3d5ef2	100	CPPUNIT_ASSERT_EQUAL(expected, wxURI(uri).accessor)
dd65d8c8	101
c3a65218 VZ	102	#define URI_ASSERT_HOSTTYPE_EQUAL(uri, expected) \
	103	URI_ASSERT_PART_EQUAL((uri), (expected), GetHostType())
	104
c4dbb953 VZ	105	#define URI_ASSERT_SERVER_EQUAL(uri, expected) \
	106	URI_ASSERT_PART_EQUAL((uri), (expected), GetServer())
	107
c3a65218 VZ	108	#define URI_ASSERT_PATH_EQUAL(uri, expected) \
	109	URI_ASSERT_PART_EQUAL((uri), (expected), GetPath())
	110
62e3e6c2 VZ	111	#define URI_ASSERT_USER_EQUAL(uri, expected) \
	112	URI_ASSERT_PART_EQUAL((uri), (expected), GetUser())
	113
dd65d8c8 RN	114	void URITestCase::IPv4()
dd65d8c8 RN	115	{
c3a65218 VZ	116	URI_ASSERT_HOSTTYPE_EQUAL("http://user:password@192.168.1.100:5050/path",
c3a65218 VZ	117	wxURI_IPV4ADDRESS);
dd65d8c8	118
c3a65218 VZ	119	URI_ASSERT_HOSTTYPE_EQUAL("http://user:password@192.255.1.100:5050/path",
c3a65218 VZ	120	wxURI_IPV4ADDRESS);
dd65d8c8	121
c3a65218	122	// bogus ipv4
5c3d5ef2 VZ	123	CPPUNIT_ASSERT( wxURI("http://user:password@192.256.1.100:5050/path").
5c3d5ef2 VZ	124	GetHostType() != wxURI_IPV4ADDRESS);
dd65d8c8 RN	125	}
	126
	127	void URITestCase::IPv6()
	128	{
dd65d8c8 RN	129	// IPv6address = 6( h16 ":" ) ls32
	130	// / "::" 5( h16 ":" ) ls32
	131	// / [ h16 ] "::" 4( h16 ":" ) ls32
	132	// / [ *1( h16 ":" ) h16 ] "::" 3( h16 ":" ) ls32
	133	// / [ *2( h16 ":" ) h16 ] "::" 2( h16 ":" ) ls32
	134	// / [ *3( h16 ":" ) h16 ] "::" h16 ":" ls32
	135	// / [ *4( h16 ":" ) h16 ] "::" ls32
	136	// / [ *5( h16 ":" ) h16 ] "::" h16
	137	// / [ *6( h16 ":" ) h16 ] "::"
	138	// ls32 = ( h16 ":" h16 ) / IPv4address
2b9afe40	139
c3a65218 VZ	140	URI_ASSERT_HOSTTYPE_EQUAL
	141	(
	142	"http://user:password@[aa:aa:aa:aa:aa:aa:192.168.1.100]:5050/path",
	143	wxURI_IPV6ADDRESS
	144	);
	145
	146	URI_ASSERT_HOSTTYPE_EQUAL
	147	(
	148	"http://user:password@[aa:aa:aa:aa:aa:aa:aa:aa]:5050/path",
	149	wxURI_IPV6ADDRESS
	150	);
	151
	152	URI_ASSERT_HOSTTYPE_EQUAL
	153	(
	154	"http://user:password@[aa:aa:aa:aa::192.168.1.100]:5050/path",
	155	wxURI_IPV6ADDRESS
	156	);
	157
	158	URI_ASSERT_HOSTTYPE_EQUAL
	159	(
	160	"http://user:password@[aa:aa:aa:aa::aa:aa]:5050/path",
	161	wxURI_IPV6ADDRESS
	162	);
dd65d8c8 RN	163	}
dd65d8c8 RN	164
c4dbb953 VZ	165	void URITestCase::Server()
	166	{
	167	URI_ASSERT_SERVER_EQUAL("http://foo/", "foo");
	168	URI_ASSERT_SERVER_EQUAL("http://foo-bar/", "foo-bar");
	169	URI_ASSERT_SERVER_EQUAL("http://foo/bar/", "foo");
	170	URI_ASSERT_SERVER_EQUAL("http://192.168.1.0/", "192.168.1.0");
	171	URI_ASSERT_SERVER_EQUAL("http://192.168.1.17/", "192.168.1.17");
	172	URI_ASSERT_SERVER_EQUAL("http://192.168.1.255/", "192.168.1.255");
	173	URI_ASSERT_SERVER_EQUAL("http://192.168.1.1/index.html", "192.168.1.1");
	174	URI_ASSERT_SERVER_EQUAL("http://[aa:aa:aa:aa::aa:aa]/foo", "aa:aa:aa:aa::aa:aa");
	175	}
	176
dd65d8c8 RN	177	void URITestCase::Paths()
dd65d8c8 RN	178	{
c3a65218 VZ	179	URI_ASSERT_PATH_EQUAL("http://user:password@192.256.1.100:5050/../path",
c3a65218 VZ	180	"/path");
dd65d8c8	181
c3a65218 VZ	182	URI_ASSERT_PATH_EQUAL("http://user:password@192.256.1.100:5050/path/../",
c3a65218 VZ	183	"/");
dd65d8c8	184
c3a65218 VZ	185	URI_ASSERT_PATH_EQUAL("http://user:password@192.256.1.100:5050/path/.",
c3a65218 VZ	186	"/path/");
dd65d8c8	187
c3a65218 VZ	188	URI_ASSERT_PATH_EQUAL("http://user:password@192.256.1.100:5050/path/./",
c3a65218 VZ	189	"/path/");
dd65d8c8	190
c3a65218 VZ	191	URI_ASSERT_PART_EQUAL("path/john/../../../joe",
c3a65218 VZ	192	"../joe", BuildURI());
dd65d8c8	193	}
dd65d8c8	194
62e3e6c2 VZ	195	void URITestCase::UserAndPass()
	196	{
	197	URI_ASSERT_USER_EQUAL("http://user:pass@host/path/", "user");
	198	URI_ASSERT_USER_EQUAL("http://user@host/path/", "user");
	199	URI_ASSERT_USER_EQUAL("http://host/path/", "");
	200	}
	201
5c3d5ef2	202	#define URI_TEST_RESOLVE_IMPL(string, eq, strict) \
2186321f VZ	203	{ \
	204	wxURI uri(string); \
	205	uri.Resolve(masteruri, strict); \
	206	CPPUNIT_ASSERT_EQUAL(eq, uri.BuildURI()); \
	207	}
dd65d8c8	208
5c3d5ef2 VZ	209	#define URI_TEST_RESOLVE(string, eq) \
	210	URI_TEST_RESOLVE_IMPL(string, eq, true);
	211
	212	#define URI_TEST_RESOLVE_LAX(string, eq) \
	213	URI_TEST_RESOLVE_IMPL(string, eq, false);
dd65d8c8 RN	214
	215
	216	//examples taken from RFC 2396.bis
	217
	218	void URITestCase::NormalResolving()
	219	{
2186321f	220	wxURI masteruri("http://a/b/c/d;p?q");
2b9afe40	221
5c3d5ef2 VZ	222	URI_TEST_RESOLVE("g:h" ,"g:h")
	223	URI_TEST_RESOLVE("g" ,"http://a/b/c/g")
	224	URI_TEST_RESOLVE("./g" ,"http://a/b/c/g")
	225	URI_TEST_RESOLVE("g/" ,"http://a/b/c/g/")
	226	URI_TEST_RESOLVE("/g" ,"http://a/g")
	227	URI_TEST_RESOLVE("//g" ,"http://g")
	228	URI_TEST_RESOLVE("?y" ,"http://a/b/c/d;p?y")
	229	URI_TEST_RESOLVE("g?y" ,"http://a/b/c/g?y")
	230	URI_TEST_RESOLVE("#s" ,"http://a/b/c/d;p?q#s")
	231	URI_TEST_RESOLVE("g#s" ,"http://a/b/c/g#s")
	232	URI_TEST_RESOLVE("g?y#s","http://a/b/c/g?y#s")
	233	URI_TEST_RESOLVE(";x" ,"http://a/b/c/;x")
	234	URI_TEST_RESOLVE("g;x" ,"http://a/b/c/g;x")
	235	URI_TEST_RESOLVE("g;x?y#s","http://a/b/c/g;x?y#s")
	236
	237	URI_TEST_RESOLVE("" ,"http://a/b/c/d;p?q")
	238	URI_TEST_RESOLVE("." ,"http://a/b/c/")
	239	URI_TEST_RESOLVE("./" ,"http://a/b/c/")
	240	URI_TEST_RESOLVE(".." ,"http://a/b/")
	241	URI_TEST_RESOLVE("../" ,"http://a/b/")
	242	URI_TEST_RESOLVE("../g" ,"http://a/b/g")
	243	URI_TEST_RESOLVE("../..","http://a/")
	244	URI_TEST_RESOLVE("../../" , "http://a/")
	245	URI_TEST_RESOLVE("../../g" , "http://a/g")
dd65d8c8 RN	246	}
	247
	248	void URITestCase::ComplexResolving()
	249	{
2186321f	250	wxURI masteruri("http://a/b/c/d;p?q");
dd65d8c8 RN	251
dd65d8c8 RN	252	//odd path examples
2186321f VZ	253	URI_TEST_RESOLVE("../../../g" , "http://a/g")
	254	URI_TEST_RESOLVE("../../../../g", "http://a/g")
	255
5c3d5ef2 VZ	256	URI_TEST_RESOLVE("/./g" ,"http://a/g")
	257	URI_TEST_RESOLVE("/../g" ,"http://a/g")
	258	URI_TEST_RESOLVE("g." ,"http://a/b/c/g.")
	259	URI_TEST_RESOLVE(".g" ,"http://a/b/c/.g")
	260	URI_TEST_RESOLVE("g.." ,"http://a/b/c/g..")
	261	URI_TEST_RESOLVE("..g" ,"http://a/b/c/..g")
dd65d8c8	262	}
dd65d8c8 RN	263
	264	void URITestCase::ReallyComplexResolving()
	265	{
2186321f	266	wxURI masteruri("http://a/b/c/d;p?q");
dd65d8c8 RN	267
dd65d8c8 RN	268	//even more odder path examples
5c3d5ef2 VZ	269	URI_TEST_RESOLVE("./../g" ,"http://a/b/g")
	270	URI_TEST_RESOLVE("./g/." ,"http://a/b/c/g/")
	271	URI_TEST_RESOLVE("g/./h" ,"http://a/b/c/g/h")
	272	URI_TEST_RESOLVE("g/../h" ,"http://a/b/c/h")
	273	URI_TEST_RESOLVE("g;x=1/./y" , "http://a/b/c/g;x=1/y")
	274	URI_TEST_RESOLVE("g;x=1/../y" , "http://a/b/c/y")
dd65d8c8 RN	275	}
	276
	277	void URITestCase::QueryFragmentResolving()
	278	{
2186321f	279	wxURI masteruri("http://a/b/c/d;p?q");
dd65d8c8	280
2b9afe40	281	//query/fragment ambigiousness
5c3d5ef2 VZ	282	URI_TEST_RESOLVE("g?y/./x","http://a/b/c/g?y/./x")
	283	URI_TEST_RESOLVE("g?y/../x" , "http://a/b/c/g?y/../x")
	284	URI_TEST_RESOLVE("g#s/./x","http://a/b/c/g#s/./x")
	285	URI_TEST_RESOLVE("g#s/../x" , "http://a/b/c/g#s/../x")
dd65d8c8 RN	286	}
	287
	288	void URITestCase::BackwardsResolving()
	289	{
2186321f	290	wxURI masteruri("http://a/b/c/d;p?q");
dd65d8c8	291
2b9afe40	292	//"NEW"
5c3d5ef2	293	URI_TEST_RESOLVE("http:g" , "http:g") //strict
2b9afe40	294	//bw compat
5c3d5ef2	295	URI_TEST_RESOLVE_LAX("http:g", "http://a/b/c/g");
dd65d8c8 RN	296	}
	297
	298	void URITestCase::Assignment()
	299	{
2186321f VZ	300	wxURI uri1("http://mysite.com"),
2186321f VZ	301	uri2("http://mysite2.com");
dd65d8c8 RN	302
	303	uri2 = uri1;
	304
2186321f	305	CPPUNIT_ASSERT_EQUAL(uri1.BuildURI(), uri2.BuildURI());
dd65d8c8 RN	306	}
	307
	308	void URITestCase::Comparison()
	309	{
2186321f	310	CPPUNIT_ASSERT(wxURI("http://mysite.com") == wxURI("http://mysite.com"));
dd65d8c8	311	}
b60b2ec8	312
24ca04e7 VZ	313	void URITestCase::Unescaping()
24ca04e7 VZ	314	{
2186321f VZ	315	wxString escaped,
	316	unescaped;
	317
	318	escaped = "http://test.com/of/file%3A%2F%2FC%3A%5Curi%5C"
	319	"escaping%5Cthat%5Cseems%5Cbroken%5Csadly%5B1%5D.rss";
	320
	321	unescaped = wxURI(escaped).BuildUnescapedURI();
24ca04e7	322
2186321f VZ	323	CPPUNIT_ASSERT_EQUAL( "http://test.com/of/file://C:\\uri\\"
	324	"escaping\\that\\seems\\broken\\sadly[1].rss",
	325	unescaped );
24ca04e7	326
2186321f	327	CPPUNIT_ASSERT_EQUAL( unescaped, wxURI::Unescape(escaped) );
24ca04e7	328
24ca04e7	329
87f528f1	330	#if wxUSE_UNICODE
2186321f VZ	331	escaped = "http://ru.wikipedia.org/wiki/"
2186321f VZ	332	"%D0%A6%D0%B5%D0%BB%D0%BE%D0%B5_%D1%87%D0%B8%D1%81%D0%BB%D0%BE";
24ca04e7	333
2186321f	334	unescaped = wxURI::Unescape(escaped);
24ca04e7	335
2186321f VZ	336	CPPUNIT_ASSERT_EQUAL( wxString::FromUTF8(
	337	"http://ru.wikipedia.org/wiki/"
	338	"\xD0\xA6\xD0\xB5\xD0\xBB\xD0\xBE\xD0\xB5_"
	339	"\xD1\x87\xD0\xB8\xD1\x81\xD0\xBB\xD0\xBE"
	340	),
	341	unescaped );
87f528f1	342	#endif // wxUSE_UNICODE
24ca04e7	343	}
97ad053b VZ	344
	345	void URITestCase::FileScheme()
	346	{
c3a65218 VZ	347	//file:// variety (NOT CONFORMING TO THE RFC)
	348	URI_ASSERT_PATH_EQUAL( "file://e:/wxcode/script1.xml",
	349	"e:/wxcode/script1.xml" );
97ad053b VZ	350
97ad053b VZ	351	//file:/// variety
c3a65218 VZ	352	URI_ASSERT_PATH_EQUAL( "file:///e:/wxcode/script1.xml",
c3a65218 VZ	353	"/e:/wxcode/script1.xml" );
97ad053b VZ	354
97ad053b VZ	355	//file:/ variety
c3a65218 VZ	356	URI_ASSERT_PATH_EQUAL( "file:/e:/wxcode/script1.xml",
c3a65218 VZ	357	"/e:/wxcode/script1.xml" );
97ad053b VZ	358
97ad053b VZ	359	//file: variety
c3a65218 VZ	360	URI_ASSERT_PATH_EQUAL( "file:e:/wxcode/script1.xml",
c3a65218 VZ	361	"e:/wxcode/script1.xml" );
97ad053b VZ	362	}
97ad053b VZ	363
b60b2ec8 RN	364	#if TEST_URL
	365
	366	#include "wx/url.h"
24ca04e7	367	#include "wx/file.h"
b60b2ec8 RN	368
	369	void URITestCase::URLCompat()
	370	{
2186321f	371	wxURL url("http://user:password@wxwidgets.org");
b60b2ec8	372
1f51673b	373	CPPUNIT_ASSERT( url.GetError() == wxURL_NOERR );
2186321f	374	CPPUNIT_ASSERT( url == wxURL("http://user:password@wxwidgets.org") );
b60b2ec8	375
2186321f	376	wxURI uri("http://user:password@wxwidgets.org");
b60b2ec8 RN	377
	378	CPPUNIT_ASSERT( url == uri );
	379
	380	wxURL urlcopy(uri);
	381
	382	CPPUNIT_ASSERT( urlcopy == url );
	383	CPPUNIT_ASSERT( urlcopy == uri );
	384
	385	wxURI uricopy(url);
	386
	387	CPPUNIT_ASSERT( uricopy == url );
	388	CPPUNIT_ASSERT( uricopy == urlcopy );
	389	CPPUNIT_ASSERT( uricopy == uri );
2186321f	390	CPPUNIT_ASSERT_EQUAL( " A ", wxURI::Unescape("%20%41%20") );
113e181a	391
2186321f	392	wxURI test("file:\"myf\"ile.txt");
113e181a	393
2186321f VZ	394	CPPUNIT_ASSERT_EQUAL( "file:%22myf%22ile.txt" , test.BuildURI() );
	395	CPPUNIT_ASSERT_EQUAL( "file", test.GetScheme() );
	396	CPPUNIT_ASSERT_EQUAL( "%22myf%22ile.txt", test.GetPath() );
24fec908	397
6c1a7bc4 MW	398	// these could be put under a named registry since they take some
	399	// time to complete
	400	#if 0
24fec908	401	// Test problem urls (reported not to work some time ago by a user...)
2186321f VZ	402	const wxChar* pszProblemUrls[] = { "http://www.csdn.net",
	403	"http://www.163.com",
	404	"http://www.sina.com.cn" };
	405
24fec908 VZ	406	for ( size_t i = 0; i < WXSIZEOF(pszProblemUrls); ++i )
	407	{
	408	wxURL urlProblem(pszProblemUrls[i]);
	409	CPPUNIT_ASSERT(urlProblem.GetError() == wxURL_NOERR);
	410
	411	wxInputStream* is = urlProblem.GetInputStream();
	412	CPPUNIT_ASSERT(is != NULL);
	413
9a83f860	414	wxFile fOut(wxT("test.html"), wxFile::write);
24fec908 VZ	415	wxASSERT(fOut.IsOpened());
	416
	417	char buf[1001];
	418	for( ;; )
	419	{
	420	is->Read(buf, 1000);
	421	size_t n = is->LastRead();
	422	if ( n == 0 )
	423	break;
	424	buf[n] = 0;
	425	fOut.Write(buf, n);
	426	}
	427
	428	delete is;
	429	}
6c1a7bc4	430	#endif
b60b2ec8 RN	431	}
b60b2ec8 RN	432
402ccadc VZ	433	// the purpose of this test is unclear, it seems to be unfinished so disabling
	434	// it for now
	435	#if 0 && wxUSE_PROTOCOL_HTTP
e605541c RN	436	void URITestCase::URLProxy()
e605541c RN	437	{
6ca3a322 WS	438	wxURL url(wxT("http://www.asite.com/index.html"));
6ca3a322 WS	439	url.SetProxy(wxT("pserv:3122"));
fd725bce WS	440
	441	wxURL::SetDefaultProxy(wxT("fol.singnet.com.sg:8080"));
	442	wxURL url2(wxT("http://server-name/path/to/file?query_data=value"));
	443	wxInputStream *data = url2.GetInputStream();
	444	CPPUNIT_ASSERT(data != NULL);
e605541c	445	}
26531700	446	#endif // wxUSE_PROTOCOL_HTTP
24ca04e7 VZ	447
24ca04e7 VZ	448	#endif // TEST_URL