[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

// Define this as 1 to test network connections, this is disabled by default as
// some machines running automatic builds don't allow outgoing connections and
// so the tests fail
#define TEST_NETWORK 0

// ----------------------------------------------------------------------------
// 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 it's 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) );


    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 );
}

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);

#if TEST_NETWORK
    wxInputStream* pInput = url.GetInputStream();

    CPPUNIT_ASSERT( pInput != NULL );
#endif

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