git.oblomov.eu Git - wine/blob - dlls/shlwapi/tests/url.c

   1 /* Unit test suite for Path functions
   2  *
   3  * Copyright 2002 Matthew Mastracci
   4  * Copyright 2007,2008 Detlef Riekenberg
   5  *
   6  * This library is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU Lesser General Public
   8  * License as published by the Free Software Foundation; either
   9  * version 2.1 of the License, or (at your option) any later version.
  10  *
  11  * This library is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * Lesser General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU Lesser General Public
  17  * License along with this library; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
  19  */
  20
  21 #include <stdarg.h>
  22 #include <stdio.h>
  23
  24 #include "wine/test.h"
  25 #include "windef.h"
  26 #include "winbase.h"
  27 #include "winreg.h"
  28 #include "shlwapi.h"
  29 #include "wininet.h"
  30
  31 /* ################ */
  32 static HMODULE hShlwapi;
  33 static HRESULT (WINAPI *pUrlCanonicalizeW)(LPCWSTR, LPWSTR, LPDWORD, DWORD);
  34 static HRESULT (WINAPI *pParseURLA)(LPCSTR,PARSEDURLA*);
  35 static HRESULT (WINAPI *pParseURLW)(LPCWSTR,PARSEDURLW*);
  36
  37 static const char* TEST_URL_1 = "http://www.winehq.org/tests?date=10/10/1923";
  38 static const char* TEST_URL_2 = "http://localhost:8080/tests%2e.html?date=Mon%2010/10/1923";
  39 static const char* TEST_URL_3 = "http://foo:bar@localhost:21/internal.php?query=x&return=y";
  40 static const WCHAR winehqW[] = {'h','t','t','p',':','/','/','w','w','w','.','w','i','n','e','h','q','.','o','r','g','/',0};
  41 static const  CHAR winehqA[] = {'h','t','t','p',':','/','/','w','w','w','.','w','i','n','e','h','q','.','o','r','g','/',0};
  42
  43 /* ################ */
  44
  45 static const CHAR untouchedA[] = "untouched";
  46
  47 #define TEST_APPLY_MAX_LENGTH INTERNET_MAX_URL_LENGTH
  48
  49 typedef struct _TEST_URL_APPLY {
  50     const char * url;
  51     DWORD flags;
  52     HRESULT res;
  53     DWORD newlen;
  54     const char * newurl;
  55 } TEST_URL_APPLY;
  56
  57 static const TEST_URL_APPLY TEST_APPLY[] = {
  58     {"www.winehq.org", URL_APPLY_GUESSSCHEME | URL_APPLY_DEFAULT, S_OK, 21, "http://www.winehq.org"},
  59     {"www.winehq.org", URL_APPLY_GUESSSCHEME, S_OK, 21, "http://www.winehq.org"},
  60     {"www.winehq.org", URL_APPLY_DEFAULT, S_OK, 21, "http://www.winehq.org"},
  61     {"ftp.winehq.org", URL_APPLY_GUESSSCHEME | URL_APPLY_DEFAULT, S_OK, 20, "ftp://ftp.winehq.org"},
  62     {"ftp.winehq.org", URL_APPLY_GUESSSCHEME, S_OK, 20, "ftp://ftp.winehq.org"},
  63     {"ftp.winehq.org", URL_APPLY_DEFAULT, S_OK, 21, "http://ftp.winehq.org"},
  64     {"winehq.org", URL_APPLY_GUESSSCHEME | URL_APPLY_DEFAULT, S_OK, 17, "http://winehq.org"},
  65     {"winehq.org", URL_APPLY_GUESSSCHEME, S_FALSE, TEST_APPLY_MAX_LENGTH, untouchedA},
  66     {"winehq.org", URL_APPLY_DEFAULT, S_OK, 17, "http://winehq.org"},
  67     {"", URL_APPLY_GUESSSCHEME | URL_APPLY_DEFAULT, S_OK, 7, "http://"},
  68     {"", URL_APPLY_GUESSSCHEME, S_FALSE, TEST_APPLY_MAX_LENGTH, untouchedA},
  69     {"", URL_APPLY_DEFAULT, S_OK, 7, "http://"}
  70 };
  71
  72 /* ################ */
  73
  74 typedef struct _TEST_URL_CANONICALIZE {
  75     const char *url;
  76     DWORD flags;
  77     HRESULT expectret;
  78     const char *expecturl;
  79     BOOL todo;
  80 } TEST_URL_CANONICALIZE;
  81
  82 static const TEST_URL_CANONICALIZE TEST_CANONICALIZE[] = {
  83     {"http://www.winehq.org/tests/../tests/../..", 0, S_OK, "http://www.winehq.org/", TRUE},
  84     {"http://www.winehq.org/tests/../tests", 0, S_OK, "http://www.winehq.org/tests", FALSE},
  85     {"http://www.winehq.org/tests\n", URL_WININET_COMPATIBILITY|URL_ESCAPE_SPACES_ONLY|URL_ESCAPE_UNSAFE, S_OK, "http://www.winehq.org/tests", FALSE},
  86     {"http://www.winehq.org/tests\r", URL_WININET_COMPATIBILITY|URL_ESCAPE_SPACES_ONLY|URL_ESCAPE_UNSAFE, S_OK, "http://www.winehq.org/tests", FALSE},
  87     {"http://www.winehq.org/tests\r", 0, S_OK, "http://www.winehq.org/tests", FALSE},
  88     {"http://www.winehq.org/tests\r", URL_DONT_SIMPLIFY, S_OK, "http://www.winehq.org/tests", FALSE},
  89     {"http://www.winehq.org/tests/../tests/", 0, S_OK, "http://www.winehq.org/tests/", FALSE},
  90     {"http://www.winehq.org/tests/../tests/..", 0, S_OK, "http://www.winehq.org/", FALSE},
  91     {"http://www.winehq.org/tests/../tests/../", 0, S_OK, "http://www.winehq.org/", FALSE},
  92     {"http://www.winehq.org/tests/..", 0, S_OK, "http://www.winehq.org/", FALSE},
  93     {"http://www.winehq.org/tests/../", 0, S_OK, "http://www.winehq.org/", FALSE},
  94     {"http://www.winehq.org/tests/..?query=x&return=y", 0, S_OK, "http://www.winehq.org/?query=x&return=y", FALSE},
  95     {"http://www.winehq.org/tests/../?query=x&return=y", 0, S_OK, "http://www.winehq.org/?query=x&return=y", FALSE},
  96     {"http://www.winehq.org/tests/..#example", 0, S_OK, "http://www.winehq.org/#example", FALSE},
  97     {"http://www.winehq.org/tests/../#example", 0, S_OK, "http://www.winehq.org/#example", FALSE},
  98     {"http://www.winehq.org/tests\\../#example", 0, S_OK, "http://www.winehq.org/#example", FALSE},
  99     {"http://www.winehq.org/tests/..\\#example", 0, S_OK, "http://www.winehq.org/#example", FALSE},
 100     {"http://www.winehq.org\\tests/../#example", 0, S_OK, "http://www.winehq.org/#example", FALSE},
 101     {"http://www.winehq.org/tests/../#example", URL_DONT_SIMPLIFY, S_OK, "http://www.winehq.org/tests/../#example", FALSE},
 102     {"http://www.winehq.org/tests/foo bar", URL_ESCAPE_SPACES_ONLY| URL_DONT_ESCAPE_EXTRA_INFO , S_OK, "http://www.winehq.org/tests/foo%20bar", FALSE},
 103     {"http://www.winehq.org/tests/foo%20bar", URL_UNESCAPE , S_OK, "http://www.winehq.org/tests/foo bar", FALSE},
 104     {"file:///c:/tests/foo%20bar", URL_UNESCAPE , S_OK, "file:///c:/tests/foo bar", FALSE},
 105     {"file:///c:/tests\\foo%20bar", URL_UNESCAPE , S_OK, "file:///c:/tests/foo bar", FALSE},
 106     {"file:///c:/tests/foo%20bar", 0, S_OK, "file:///c:/tests/foo%20bar", FALSE},
 107     {"file:///c:/tests/foo%20bar", URL_FILE_USE_PATHURL, S_OK, "file://c:\\tests\\foo bar", FALSE},
 108     {"file://localhost/c:/tests/../tests/foo%20bar", URL_FILE_USE_PATHURL, S_OK, "file://c:\\tests\\foo bar", FALSE},
 109     {"file://localhost\\c:/tests/../tests/foo%20bar", URL_FILE_USE_PATHURL, S_OK, "file://c:\\tests\\foo bar", FALSE},
 110     {"file://localhost\\\\c:/tests/../tests/foo%20bar", URL_FILE_USE_PATHURL, S_OK, "file://c:\\tests\\foo bar", FALSE},
 111     {"file://localhost\\c:\\tests/../tests/foo%20bar", URL_FILE_USE_PATHURL, S_OK, "file://c:\\tests\\foo bar", FALSE},
 112     {"file://c:/tests/../tests/foo%20bar", URL_FILE_USE_PATHURL, S_OK, "file://c:\\tests\\foo bar", FALSE},
 113     {"file://c:/tests\\../tests/foo%20bar", URL_FILE_USE_PATHURL, S_OK, "file://c:\\tests\\foo bar", FALSE},
 114     {"file://c:/tests/foo%20bar", URL_FILE_USE_PATHURL, S_OK, "file://c:\\tests\\foo bar", FALSE},
 115     {"file:///c://tests/foo%20bar", URL_FILE_USE_PATHURL, S_OK, "file://c:\\\\tests\\foo bar", FALSE},
 116     {"file:///c:\\tests\\foo bar", 0, S_OK, "file:///c:/tests/foo bar", FALSE},
 117     {"file:///c:\\tests\\foo bar", URL_DONT_SIMPLIFY, S_OK, "file:///c:/tests/foo bar", FALSE},
 118     {"http://www.winehq.org/site/about", URL_FILE_USE_PATHURL, S_OK, "http://www.winehq.org/site/about", FALSE},
 119     {"file_://www.winehq.org/site/about", URL_FILE_USE_PATHURL, S_OK, "file_://www.winehq.org/site/about", FALSE},
 120     {"c:\\dir\\file", 0, S_OK, "file:///c:/dir/file", FALSE},
 121     {"file:///c:\\dir\\file", 0, S_OK, "file:///c:/dir/file", FALSE},
 122     {"c:dir\\file", 0, S_OK, "file:///c:dir/file", FALSE},
 123     {"c:\\tests\\foo bar", URL_FILE_USE_PATHURL, S_OK, "file://c:\\tests\\foo bar", FALSE},
 124     {"c:\\tests\\foo bar", 0, S_OK, "file:///c:/tests/foo%20bar", FALSE},
 125     {"res:///c:/tests/foo%20bar", URL_UNESCAPE , S_OK, "res:///c:/tests/foo bar", FALSE},
 126     {"res:///c:/tests\\foo%20bar", URL_UNESCAPE , S_OK, "res:///c:/tests\\foo bar", TRUE},
 127     {"res:///c:/tests/foo%20bar", 0, S_OK, "res:///c:/tests/foo%20bar", FALSE},
 128     {"res:///c:/tests/foo%20bar", URL_FILE_USE_PATHURL, S_OK, "res:///c:/tests/foo%20bar", TRUE},
 129     {"res://c:/tests/../tests/foo%20bar", URL_FILE_USE_PATHURL, S_OK, "res://c:/tests/foo%20bar", TRUE},
 130     {"res://c:/tests\\../tests/foo%20bar", URL_FILE_USE_PATHURL, S_OK, "res://c:/tests/foo%20bar", TRUE},
 131     {"res://c:/tests/foo%20bar", URL_FILE_USE_PATHURL, S_OK, "res://c:/tests/foo%20bar", TRUE},
 132     {"res:///c://tests/foo%20bar", URL_FILE_USE_PATHURL, S_OK, "res:///c://tests/foo%20bar", TRUE},
 133     {"res:///c:\\tests\\foo bar", 0, S_OK, "res:///c:\\tests\\foo bar", TRUE},
 134     {"res:///c:\\tests\\foo bar", URL_DONT_SIMPLIFY, S_OK, "res:///c:\\tests\\foo bar", TRUE},
 135     {"A", 0, S_OK, "A", FALSE},
 136     {"/uri-res/N2R?urn:sha1:B3K", URL_DONT_ESCAPE_EXTRA_INFO | URL_WININET_COMPATIBILITY /*0x82000000*/, S_OK, "/uri-res/N2R?urn:sha1:B3K", FALSE} /*LimeWire online installer calls this*/,
 137     {"http:www.winehq.org/dir/../index.html", 0, S_OK, "http:www.winehq.org/index.html"},
 138 };
 139
 140 /* ################ */
 141
 142 typedef struct _TEST_URL_ESCAPE {
 143     const char *url;
 144     DWORD flags;
 145     DWORD expectescaped;
 146     HRESULT expectret;
 147     const char *expecturl;
 148 } TEST_URL_ESCAPE;
 149
 150 static const TEST_URL_ESCAPE TEST_ESCAPE[] = {
 151     {"http://www.winehq.org/tests0", 0, 0, S_OK, "http://www.winehq.org/tests0"},
 152     {"http://www.winehq.org/tests1\n", 0, 0, S_OK, "http://www.winehq.org/tests1%0A"},
 153     {"http://www.winehq.org/tests2\r", 0, 0, S_OK, "http://www.winehq.org/tests2%0D"},
 154     {"http://www.winehq.org/tests3\r", URL_ESCAPE_SPACES_ONLY|URL_ESCAPE_UNSAFE, 0, S_OK, "http://www.winehq.org/tests3\r"},
 155     {"http://www.winehq.org/tests4\r", URL_ESCAPE_SPACES_ONLY, 0, S_OK, "http://www.winehq.org/tests4\r"},
 156     {"http://www.winehq.org/tests5\r", URL_WININET_COMPATIBILITY|URL_ESCAPE_SPACES_ONLY, 0, S_OK, "http://www.winehq.org/tests5\r"},
 157     {"/direct/swhelp/series6/6.2i_latestservicepack.dat\r", URL_ESCAPE_SPACES_ONLY, 0, S_OK, "/direct/swhelp/series6/6.2i_latestservicepack.dat\r"},
 158
 159     {"file://////foo/bar\\baz", 0, 0, S_OK, "file://foo/bar/baz"},
 160     {"file://///foo/bar\\baz", 0, 0, S_OK, "file://foo/bar/baz"},
 161     {"file:////foo/bar\\baz", 0, 0, S_OK, "file://foo/bar/baz"},
 162     {"file:///localhost/foo/bar\\baz", 0, 0, S_OK, "file:///localhost/foo/bar/baz"},
 163     {"file:///foo/bar\\baz", 0, 0, S_OK, "file:///foo/bar/baz"},
 164     {"file://loCalHost/foo/bar\\baz", 0, 0, S_OK, "file:///foo/bar/baz"},
 165     {"file://foo/bar\\baz", 0, 0, S_OK, "file://foo/bar/baz"},
 166     {"file:/localhost/foo/bar\\baz", 0, 0, S_OK, "file:///localhost/foo/bar/baz"},
 167     {"file:/foo/bar\\baz", 0, 0, S_OK, "file:///foo/bar/baz"},
 168     {"file:foo/bar\\baz", 0, 0, S_OK, "file:foo/bar/baz"},
 169     {"file:\\foo/bar\\baz", 0, 0, S_OK, "file:///foo/bar/baz"},
 170     {"file:\\\\foo/bar\\baz", 0, 0, S_OK, "file://foo/bar/baz"},
 171     {"file:\\\\\\foo/bar\\baz", 0, 0, S_OK, "file:///foo/bar/baz"},
 172     {"file:\\\\localhost\\foo/bar\\baz", 0, 0, S_OK, "file:///foo/bar/baz"},
 173     {"file:///f oo/b?a r\\baz", 0, 0, S_OK, "file:///f%20oo/b?a r\\baz"},
 174     {"file:///foo/b#a r\\baz", 0, 0, S_OK, "file:///foo/b%23a%20r/baz"},
 175     {"file:///f o^&`{}|][\"<>\\%o/b#a r\\baz", 0, 0, S_OK, "file:///f%20o%5E%26%60%7B%7D%7C%5D%5B%22%3C%3E/%o/b%23a%20r/baz"},
 176     {"file:///f o%o/b?a r\\b%az", URL_ESCAPE_PERCENT, 0, S_OK, "file:///f%20o%25o/b?a r\\b%az"},
 177     {"file:/foo/bar\\baz", URL_ESCAPE_SEGMENT_ONLY, 0, S_OK, "file:%2Ffoo%2Fbar%5Cbaz"},
 178
 179     {"foo/b%ar\\ba?z\\", URL_ESCAPE_SEGMENT_ONLY, 0, S_OK, "foo%2Fb%ar%5Cba%3Fz%5C"},
 180     {"foo/b%ar\\ba?z\\", URL_ESCAPE_PERCENT | URL_ESCAPE_SEGMENT_ONLY, 0, S_OK, "foo%2Fb%25ar%5Cba%3Fz%5C"},
 181     {"foo/bar\\ba?z\\", 0, 0, S_OK, "foo/bar%5Cba?z\\"},
 182     {"/foo/bar\\ba?z\\", 0, 0, S_OK, "/foo/bar%5Cba?z\\"},
 183     {"/foo/bar\\ba#z\\", 0, 0, S_OK, "/foo/bar%5Cba#z\\"},
 184     {"/foo/%5C", 0, 0, S_OK, "/foo/%5C"},
 185     {"/foo/%5C", URL_ESCAPE_PERCENT, 0, S_OK, "/foo/%255C"},
 186
 187     {"http://////foo/bar\\baz", 0, 0, S_OK, "http://////foo/bar/baz"},
 188     {"http://///foo/bar\\baz", 0, 0, S_OK, "http://///foo/bar/baz"},
 189     {"http:////foo/bar\\baz", 0, 0, S_OK, "http:////foo/bar/baz"},
 190     {"http:///foo/bar\\baz", 0, 0, S_OK, "http:///foo/bar/baz"},
 191     {"http://localhost/foo/bar\\baz", 0, 0, S_OK, "http://localhost/foo/bar/baz"},
 192     {"http://foo/bar\\baz", 0, 0, S_OK, "http://foo/bar/baz"},
 193     {"http:/foo/bar\\baz", 0, 0, S_OK, "http:/foo/bar/baz"},
 194     {"http:foo/bar\\ba?z\\", 0, 0, S_OK, "http:foo%2Fbar%2Fba?z\\"},
 195     {"http:foo/bar\\ba#z\\", 0, 0, S_OK, "http:foo%2Fbar%2Fba#z\\"},
 196     {"http:\\foo/bar\\baz", 0, 0, S_OK, "http:/foo/bar/baz"},
 197     {"http:\\\\foo/bar\\baz", 0, 0, S_OK, "http://foo/bar/baz"},
 198     {"http:\\\\\\foo/bar\\baz", 0, 0, S_OK, "http:///foo/bar/baz"},
 199     {"http:\\\\\\\\foo/bar\\baz", 0, 0, S_OK, "http:////foo/bar/baz"},
 200     {"http:/fo ?o/b ar\\baz", 0, 0, S_OK, "http:/fo%20?o/b ar\\baz"},
 201     {"http:fo ?o/b ar\\baz", 0, 0, S_OK, "http:fo%20?o/b ar\\baz"},
 202     {"http:/foo/bar\\baz", URL_ESCAPE_SEGMENT_ONLY, 0, S_OK, "http:%2Ffoo%2Fbar%5Cbaz"},
 203
 204     {"https://foo/bar\\baz", 0, 0, S_OK, "https://foo/bar/baz"},
 205     {"https:/foo/bar\\baz", 0, 0, S_OK, "https:/foo/bar/baz"},
 206     {"https:\\foo/bar\\baz", 0, 0, S_OK, "https:/foo/bar/baz"},
 207
 208     {"foo:////foo/bar\\baz", 0, 0, S_OK, "foo:////foo/bar%5Cbaz"},
 209     {"foo:///foo/bar\\baz", 0, 0, S_OK, "foo:///foo/bar%5Cbaz"},
 210     {"foo://localhost/foo/bar\\baz", 0, 0, S_OK, "foo://localhost/foo/bar%5Cbaz"},
 211     {"foo://foo/bar\\baz", 0, 0, S_OK, "foo://foo/bar%5Cbaz"},
 212     {"foo:/foo/bar\\baz", 0, 0, S_OK, "foo:/foo/bar%5Cbaz"},
 213     {"foo:foo/bar\\baz", 0, 0, S_OK, "foo:foo%2Fbar%5Cbaz"},
 214     {"foo:\\foo/bar\\baz", 0, 0, S_OK, "foo:%5Cfoo%2Fbar%5Cbaz"},
 215     {"foo:/foo/bar\\ba?\\z", 0, 0, S_OK, "foo:/foo/bar%5Cba?\\z"},
 216     {"foo:/foo/bar\\ba#\\z", 0, 0, S_OK, "foo:/foo/bar%5Cba#\\z"},
 217
 218     {"mailto:/fo/o@b\\%a?\\r.b#\\az", 0, 0, S_OK, "mailto:%2Ffo%2Fo@b%5C%a%3F%5Cr.b%23%5Caz"},
 219     {"mailto:fo/o@b\\%a?\\r.b#\\az", 0, 0, S_OK, "mailto:fo%2Fo@b%5C%a%3F%5Cr.b%23%5Caz"},
 220     {"mailto:fo/o@b\\%a?\\r.b#\\az", URL_ESCAPE_PERCENT, 0, S_OK, "mailto:fo%2Fo@b%5C%25a%3F%5Cr.b%23%5Caz"},
 221
 222     {"ftp:fo/o@bar.baz/foo/bar", 0, 0, S_OK, "ftp:fo%2Fo@bar.baz%2Ffoo%2Fbar"},
 223     {"ftp:/fo/o@bar.baz/foo/bar", 0, 0, S_OK, "ftp:/fo/o@bar.baz/foo/bar"},
 224     {"ftp://fo/o@bar.baz/fo?o\\bar", 0, 0, S_OK, "ftp://fo/o@bar.baz/fo?o\\bar"},
 225     {"ftp://fo/o@bar.baz/fo#o\\bar", 0, 0, S_OK, "ftp://fo/o@bar.baz/fo#o\\bar"},
 226     {"ftp://localhost/o@bar.baz/fo#o\\bar", 0, 0, S_OK, "ftp://localhost/o@bar.baz/fo#o\\bar"},
 227     {"ftp:///fo/o@bar.baz/foo/bar", 0, 0, S_OK, "ftp:///fo/o@bar.baz/foo/bar"},
 228     {"ftp:////fo/o@bar.baz/foo/bar", 0, 0, S_OK, "ftp:////fo/o@bar.baz/foo/bar"}
 229 };
 230
 231 /* ################ */
 232
 233 typedef struct _TEST_URL_COMBINE {
 234     const char *url1;
 235     const char *url2;
 236     DWORD flags;
 237     HRESULT expectret;
 238     const char *expecturl;
 239 } TEST_URL_COMBINE;
 240
 241 static const TEST_URL_COMBINE TEST_COMBINE[] = {
 242     {"http://www.winehq.org/tests", "tests1", 0, S_OK, "http://www.winehq.org/tests1"},
 243     {"http://www.%77inehq.org/tests", "tests1", 0, S_OK, "http://www.%77inehq.org/tests1"},
 244     /*FIXME {"http://www.winehq.org/tests", "../tests2", 0, S_OK, "http://www.winehq.org/tests2"},*/
 245     {"http://www.winehq.org/tests/", "../tests3", 0, S_OK, "http://www.winehq.org/tests3"},
 246     {"http://www.winehq.org/tests/test1", "test2", 0, S_OK, "http://www.winehq.org/tests/test2"},
 247     {"http://www.winehq.org/tests/../tests", "tests4", 0, S_OK, "http://www.winehq.org/tests4"},
 248     {"http://www.winehq.org/tests/../tests/", "tests5", 0, S_OK, "http://www.winehq.org/tests/tests5"},
 249     {"http://www.winehq.org/tests/../tests/", "/tests6/..", 0, S_OK, "http://www.winehq.org/"},
 250     {"http://www.winehq.org/tests/../tests/..", "tests7/..", 0, S_OK, "http://www.winehq.org/"},
 251     {"http://www.winehq.org/tests/?query=x&return=y", "tests8", 0, S_OK, "http://www.winehq.org/tests/tests8"},
 252     {"http://www.winehq.org/tests/#example", "tests9", 0, S_OK, "http://www.winehq.org/tests/tests9"},
 253     {"http://www.winehq.org/tests/../tests/", "/tests10/..", URL_DONT_SIMPLIFY, S_OK, "http://www.winehq.org/tests10/.."},
 254     {"http://www.winehq.org/tests/../", "tests11", URL_DONT_SIMPLIFY, S_OK, "http://www.winehq.org/tests/../tests11"},
 255     {"file:///C:\\dir\\file.txt", "test.txt", 0, S_OK, "file:///C:/dir/test.txt"},
 256     {"C:\\winehq\\winehq.txt", "C:\\Test\\test.txt", 0, S_OK, "file:///C:/Test/test.txt"},
 257     {"http://www.winehq.org/test/", "test%20file.txt", 0, S_OK, "http://www.winehq.org/test/test%20file.txt"},
 258     {"http://www.winehq.org/test/", "test%20file.txt", URL_FILE_USE_PATHURL, S_OK, "http://www.winehq.org/test/test%20file.txt"},
 259     {"http://www.winehq.org%2ftest/", "test%20file.txt", URL_FILE_USE_PATHURL, S_OK, "http://www.winehq.org%2ftest/test%20file.txt"},
 260     {"xxx:@MSITStore:file.chm/file.html", "dir/file", 0, S_OK, "xxx:dir/file"},
 261     {"mk:@MSITStore:file.chm::/file.html", "/dir/file", 0, S_OK, "mk:@MSITStore:file.chm::/dir/file"},
 262     {"mk:@MSITStore:file.chm::/file.html", "mk:@MSITStore:file.chm::/dir/file", 0, S_OK, "mk:@MSITStore:file.chm::/dir/file"},
 263     {"foo:today", "foo:calendar", 0, S_OK, "foo:calendar"},
 264     {"foo:today", "bar:calendar", 0, S_OK, "bar:calendar"},
 265     {"foo:/today", "foo:calendar", 0, S_OK, "foo:/calendar"},
 266     {"foo:/today/", "foo:calendar", 0, S_OK, "foo:/today/calendar"},
 267     {"mk:@MSITStore:dir/test.chm::dir/index.html", "image.jpg", 0, S_OK, "mk:@MSITStore:dir/test.chm::dir/image.jpg"},
 268     {"mk:@MSITStore:dir/test.chm::dir/dir2/index.html", "../image.jpg", 0, S_OK, "mk:@MSITStore:dir/test.chm::dir/image.jpg"},
 269     /* UrlCombine case 2 tests.  Schemes do not match */
 270     {"outbind://xxxxxxxxx","http://wine1/dir",0, S_OK,"http://wine1/dir"},
 271     {"xxxx://xxxxxxxxx","http://wine2/dir",0, S_OK,"http://wine2/dir"},
 272     {"ftp://xxxxxxxxx/","http://wine3/dir",0, S_OK,"http://wine3/dir"},
 273     {"outbind://xxxxxxxxx","http://wine4/dir",URL_PLUGGABLE_PROTOCOL, S_OK,"http://wine4/dir"},
 274     {"xxx://xxxxxxxxx","http://wine5/dir",URL_PLUGGABLE_PROTOCOL, S_OK,"http://wine5/dir"},
 275     {"ftp://xxxxxxxxx/","http://wine6/dir",URL_PLUGGABLE_PROTOCOL, S_OK,"http://wine6/dir"},
 276     {"http://xxxxxxxxx","outbind://wine7/dir",0, S_OK,"outbind://wine7/dir"},
 277     {"xxx://xxxxxxxxx","ftp://wine8/dir",0, S_OK,"ftp://wine8/dir"},
 278     {"ftp://xxxxxxxxx/","xxx://wine9/dir",0, S_OK,"xxx://wine9/dir"},
 279     {"http://xxxxxxxxx","outbind://wine10/dir",URL_PLUGGABLE_PROTOCOL, S_OK,"outbind://wine10/dir"},
 280     {"xxx://xxxxxxxxx","ftp://wine11/dir",URL_PLUGGABLE_PROTOCOL, S_OK,"ftp://wine11/dir"},
 281     {"ftp://xxxxxxxxx/","xxx://wine12/dir",URL_PLUGGABLE_PROTOCOL, S_OK,"xxx://wine12/dir"},
 282     {"http://xxxxxxxxx","outbind:wine13/dir",0, S_OK,"outbind:wine13/dir"},
 283     {"xxx://xxxxxxxxx","ftp:wine14/dir",0, S_OK,"ftp:wine14/dir"},
 284     {"ftp://xxxxxxxxx/","xxx:wine15/dir",0, S_OK,"xxx:wine15/dir"},
 285     {"outbind://xxxxxxxxx/","http:wine16/dir",0, S_OK,"http:wine16/dir"},
 286     {"http://xxxxxxxxx","outbind:wine17/dir",URL_PLUGGABLE_PROTOCOL, S_OK,"outbind:wine17/dir"},
 287     {"xxx://xxxxxxxxx","ftp:wine18/dir",URL_PLUGGABLE_PROTOCOL, S_OK,"ftp:wine18/dir"},
 288     {"ftp://xxxxxxxxx/","xxx:wine19/dir",URL_PLUGGABLE_PROTOCOL, S_OK,"xxx:wine19/dir"},
 289     {"outbind://xxxxxxxxx/","http:wine20/dir",URL_PLUGGABLE_PROTOCOL, S_OK,"http:wine20/dir"},
 290     {"file:///c:/dir/file.txt","index.html?test=c:/abc",URL_ESCAPE_SPACES_ONLY|URL_DONT_ESCAPE_EXTRA_INFO,S_OK,"file:///c:/dir/index.html?test=c:/abc"}
 291 };
 292
 293 /* ################ */
 294
 295 static const struct {
 296     const char *path;
 297     const char *url;
 298     DWORD ret;
 299 } TEST_URLFROMPATH [] = {
 300     {"foo", "file:foo", S_OK},
 301     {"foo\\bar", "file:foo/bar", S_OK},
 302     {"\\foo\\bar", "file:///foo/bar", S_OK},
 303     {"c:\\foo\\bar", "file:///c:/foo/bar", S_OK},
 304     {"c:foo\\bar", "file:///c:foo/bar", S_OK},
 305     {"c:\\foo/b a%r", "file:///c:/foo/b%20a%25r", S_OK},
 306     {"c:\\foo\\foo bar", "file:///c:/foo/foo%20bar", S_OK},
 307 #if 0
 308     /* The following test fails on native shlwapi as distributed with Win95/98.
 309      * Wine matches the behaviour of later versions.
 310      */
 311     {"xx:c:\\foo\\bar", "xx:c:\\foo\\bar", S_FALSE}
 312 #endif
 313 };
 314
 315 /* ################ */
 316
 317 static struct {
 318     char url[30];
 319     const char *expect;
 320 } TEST_URL_UNESCAPE[] = {
 321     {"file://foo/bar", "file://foo/bar"},
 322     {"file://fo%20o%5Ca/bar", "file://fo o\\a/bar"},
 323     {"file://%24%25foobar", "file://$%foobar"}
 324 };
 325
 326 /* ################ */
 327
 328 static const  struct {
 329     const char *path;
 330     BOOL expect;
 331 } TEST_PATH_IS_URL[] = {
 332     {"http://foo/bar", TRUE},
 333     {"c:\\foo\\bar", FALSE},
 334     {"foo://foo/bar", TRUE},
 335     {"foo\\bar", FALSE},
 336     {"foo.bar", FALSE},
 337     {"bogusscheme:", TRUE},
 338     {"http:partial", TRUE}
 339 };
 340
 341 /* ################ */
 342
 343 static const struct {
 344     const char *url;
 345     BOOL expectOpaque;
 346     BOOL expectFile;
 347 } TEST_URLIS_ATTRIBS[] = {
 348     {   "ftp:",                                         FALSE,  FALSE   },
 349     {   "http:",                                        FALSE,  FALSE   },
 350     {   "gopher:",                                      FALSE,  FALSE   },
 351     {   "mailto:",                                      TRUE,   FALSE   },
 352     {   "news:",                                        FALSE,  FALSE   },
 353     {   "nntp:",                                        FALSE,  FALSE   },
 354     {   "telnet:",                                      FALSE,  FALSE   },
 355     {   "wais:",                                        FALSE,  FALSE   },
 356     {   "file:",                                        FALSE,  TRUE    },
 357     {   "mk:",                                          FALSE,  FALSE   },
 358     {   "https:",                                       FALSE,  FALSE   },
 359     {   "shell:",                                       TRUE,   FALSE   },
 360     {   "https:",                                       FALSE,  FALSE   },
 361     {   "snews:",                                       FALSE,  FALSE   },
 362     {   "local:",                                       FALSE,  FALSE   },
 363     {   "javascript:",                                  TRUE,   FALSE   },
 364     {   "vbscript:",                                    TRUE,   FALSE   },
 365     {   "about:",                                       TRUE,   FALSE   },
 366     {   "res:",                                         FALSE,  FALSE   },
 367     {   "bogusscheme:",                                 FALSE,  FALSE   },
 368     {   "file:\\\\e:\\b\\c",                            FALSE,  TRUE    },
 369     {   "file://e:/b/c",                                FALSE,  TRUE    },
 370     {   "http:partial",                                 FALSE,  FALSE   },
 371     {   "mailto://www.winehq.org/test.html",            TRUE,   FALSE   },
 372     {   "file:partial",                                 FALSE,  TRUE    }
 373 };
 374
 375 /* ########################### */
 376
 377 static LPWSTR GetWideString(const char* szString)
 378 {
 379   LPWSTR wszString = HeapAlloc(GetProcessHeap(), 0, (2*INTERNET_MAX_URL_LENGTH) * sizeof(WCHAR));
 380
 381   MultiByteToWideChar(0, 0, szString, -1, wszString, INTERNET_MAX_URL_LENGTH);
 382
 383   return wszString;
 384 }
 385
 386
 387 static void FreeWideString(LPWSTR wszString)
 388 {
 389    HeapFree(GetProcessHeap(), 0, wszString);
 390 }
 391
 392 /* ########################### */
 393
 394 static void test_UrlApplyScheme(void)
 395 {
 396     CHAR newurl[TEST_APPLY_MAX_LENGTH];
 397     WCHAR urlW[TEST_APPLY_MAX_LENGTH];
 398     WCHAR newurlW[TEST_APPLY_MAX_LENGTH];
 399     HRESULT res;
 400     DWORD len;
 401     DWORD i;
 402
 403     for(i = 0; i < sizeof(TEST_APPLY)/sizeof(TEST_APPLY[0]); i++) {
 404         len = TEST_APPLY_MAX_LENGTH;
 405         lstrcpyA(newurl, untouchedA);
 406         res = UrlApplySchemeA(TEST_APPLY[i].url, newurl, &len, TEST_APPLY[i].flags);
 407         ok( res == TEST_APPLY[i].res,
 408             "#%dA: got HRESULT 0x%x (expected 0x%x)\n", i, res, TEST_APPLY[i].res);
 409
 410         ok( len == TEST_APPLY[i].newlen,
 411             "#%dA: got len %d (expected %d)\n", i, len, TEST_APPLY[i].newlen);
 412
 413         ok( !lstrcmpA(newurl, TEST_APPLY[i].newurl),
 414             "#%dA: got '%s' (expected '%s')\n", i, newurl, TEST_APPLY[i].newurl);
 415
 416         /* returned length is in character */
 417         len = TEST_APPLY_MAX_LENGTH;
 418         lstrcpyA(newurl, untouchedA);
 419         MultiByteToWideChar(CP_ACP, 0, newurl, -1, newurlW, len);
 420         MultiByteToWideChar(CP_ACP, 0, TEST_APPLY[i].url, -1, urlW, len);
 421
 422         res = UrlApplySchemeW(urlW, newurlW, &len, TEST_APPLY[i].flags);
 423         WideCharToMultiByte(CP_ACP, 0, newurlW, -1, newurl, TEST_APPLY_MAX_LENGTH, NULL, NULL);
 424         ok( res == TEST_APPLY[i].res,
 425             "#%dW: got HRESULT 0x%x (expected 0x%x)\n", i, res, TEST_APPLY[i].res);
 426
 427         ok( len == TEST_APPLY[i].newlen,
 428             "#%dW: got len %d (expected %d)\n", i, len, TEST_APPLY[i].newlen);
 429
 430         ok( !lstrcmpA(newurl, TEST_APPLY[i].newurl),
 431             "#%dW: got '%s' (expected '%s')\n", i, newurl, TEST_APPLY[i].newurl);
 432
 433     }
 434
 435     /* buffer too small */
 436     lstrcpyA(newurl, untouchedA);
 437     len = lstrlenA(TEST_APPLY[0].newurl);
 438     res = UrlApplySchemeA(TEST_APPLY[0].url, newurl, &len, TEST_APPLY[0].flags);
 439     ok(res == E_POINTER, "got HRESULT 0x%x (expected E_POINTER)\n", res);
 440     /* The returned length include the space for the terminating 0 */
 441     i = lstrlenA(TEST_APPLY[0].newurl)+1;
 442     ok(len == i, "got len %d (expected %d)\n", len, i);
 443     ok(!lstrcmpA(newurl, untouchedA), "got '%s' (expected '%s')\n", newurl, untouchedA);
 444
 445     /* NULL as parameter. The length and the buffer are not modified */
 446     lstrcpyA(newurl, untouchedA);
 447     len = TEST_APPLY_MAX_LENGTH;
 448     res = UrlApplySchemeA(NULL, newurl, &len, TEST_APPLY[0].flags);
 449     ok(res == E_INVALIDARG, "got HRESULT 0x%x (expected E_INVALIDARG)\n", res);
 450     ok(len == TEST_APPLY_MAX_LENGTH, "got len %d\n", len);
 451     ok(!lstrcmpA(newurl, untouchedA), "got '%s' (expected '%s')\n", newurl, untouchedA);
 452
 453     len = TEST_APPLY_MAX_LENGTH;
 454     res = UrlApplySchemeA(TEST_APPLY[0].url, NULL, &len, TEST_APPLY[0].flags);
 455     ok(res == E_INVALIDARG, "got HRESULT 0x%x (expected E_INVALIDARG)\n", res);
 456     ok(len == TEST_APPLY_MAX_LENGTH, "got len %d\n", len);
 457
 458     lstrcpyA(newurl, untouchedA);
 459     res = UrlApplySchemeA(TEST_APPLY[0].url, newurl, NULL, TEST_APPLY[0].flags);
 460     ok(res == E_INVALIDARG, "got HRESULT 0x%x (expected E_INVALIDARG)\n", res);
 461     ok(!lstrcmpA(newurl, untouchedA), "got '%s' (expected '%s')\n", newurl, untouchedA);
 462
 463 }
 464
 465 /* ########################### */
 466
 467 static void hash_url(const char* szUrl)
 468 {
 469   LPCSTR szTestUrl = szUrl;
 470   LPWSTR wszTestUrl = GetWideString(szTestUrl);
 471
 472   DWORD cbSize = sizeof(DWORD);
 473   DWORD dwHash1, dwHash2;
 474   ok(UrlHashA(szTestUrl, (LPBYTE)&dwHash1, cbSize) == S_OK, "UrlHashA didn't return S_OK\n");
 475   ok(UrlHashW(wszTestUrl, (LPBYTE)&dwHash2, cbSize) == S_OK, "UrlHashW didn't return S_OK\n");
 476
 477   FreeWideString(wszTestUrl);
 478
 479   ok(dwHash1 == dwHash2, "Hashes didn't compare\n");
 480 }
 481
 482 static void test_UrlHash(void)
 483 {
 484   hash_url(TEST_URL_1);
 485   hash_url(TEST_URL_2);
 486   hash_url(TEST_URL_3);
 487 }
 488
 489 /* ########################### */
 490
 491 static void test_url_part(const char* szUrl, DWORD dwPart, DWORD dwFlags, const char* szExpected)
 492 {
 493   CHAR szPart[INTERNET_MAX_URL_LENGTH];
 494   WCHAR wszPart[INTERNET_MAX_URL_LENGTH];
 495   LPWSTR wszUrl = GetWideString(szUrl);
 496   LPWSTR wszConvertedPart;
 497
 498   DWORD dwSize;
 499
 500   dwSize = INTERNET_MAX_URL_LENGTH;
 501   ok( UrlGetPartA(szUrl, szPart, &dwSize, dwPart, dwFlags) == S_OK, "UrlGetPartA for \"%s\" part 0x%08x didn't return S_OK but \"%s\"\n", szUrl, dwPart, szPart);
 502   dwSize = INTERNET_MAX_URL_LENGTH;
 503   ok( UrlGetPartW(wszUrl, wszPart, &dwSize, dwPart, dwFlags) == S_OK, "UrlGetPartW didn't return S_OK\n" );
 504
 505   wszConvertedPart = GetWideString(szPart);
 506
 507   ok(lstrcmpW(wszPart,wszConvertedPart)==0, "Strings didn't match between ascii and unicode UrlGetPart!\n");
 508
 509   FreeWideString(wszUrl);
 510   FreeWideString(wszConvertedPart);
 511
 512   /* Note that v6.0 and later don't return '?' with the query */
 513   ok(strcmp(szPart,szExpected)==0 ||
 514      (*szExpected=='?' && !strcmp(szPart,szExpected+1)),
 515          "Expected %s, but got %s\n", szExpected, szPart);
 516 }
 517
 518 /* ########################### */
 519
 520 static void test_UrlGetPart(void)
 521 {
 522   CHAR szPart[INTERNET_MAX_URL_LENGTH];
 523   DWORD dwSize;
 524   HRESULT res;
 525
 526   dwSize = sizeof szPart;
 527   szPart[0]='x'; szPart[1]=0;
 528   res = UrlGetPartA("hi", szPart, &dwSize, URL_PART_SCHEME, 0);
 529   todo_wine {
 530   ok (res==S_FALSE, "UrlGetPartA(\"hi\") returned %08X\n", res);
 531   ok(szPart[0]==0, "UrlGetPartA(\"hi\") return \"%s\" instead of \"\"\n", szPart);
 532   }
 533   dwSize = sizeof szPart;
 534   szPart[0]='x'; szPart[1]=0;
 535   res = UrlGetPartA("hi", szPart, &dwSize, URL_PART_QUERY, 0);
 536   todo_wine {
 537   ok (res==S_FALSE, "UrlGetPartA(\"hi\") returned %08X\n", res);
 538   ok(szPart[0]==0, "UrlGetPartA(\"hi\") return \"%s\" instead of \"\"\n", szPart);
 539   }
 540
 541   test_url_part(TEST_URL_3, URL_PART_HOSTNAME, 0, "localhost");
 542   test_url_part(TEST_URL_3, URL_PART_PORT, 0, "21");
 543   test_url_part(TEST_URL_3, URL_PART_USERNAME, 0, "foo");
 544   test_url_part(TEST_URL_3, URL_PART_PASSWORD, 0, "bar");
 545   test_url_part(TEST_URL_3, URL_PART_SCHEME, 0, "http");
 546   test_url_part(TEST_URL_3, URL_PART_QUERY, 0, "?query=x&return=y");
 547 }
 548
 549 /* ########################### */
 550
 551 static void test_url_escape(const char *szUrl, DWORD dwFlags, HRESULT dwExpectReturn, const char *szExpectUrl)
 552 {
 553     CHAR szReturnUrl[INTERNET_MAX_URL_LENGTH];
 554     DWORD dwEscaped;
 555     WCHAR ret_urlW[INTERNET_MAX_URL_LENGTH];
 556     WCHAR *urlW, *expected_urlW;
 557     dwEscaped=INTERNET_MAX_URL_LENGTH;
 558
 559     ok(UrlEscapeA(szUrl, szReturnUrl, &dwEscaped, dwFlags) == dwExpectReturn, "UrlEscapeA didn't return 0x%08x from \"%s\"\n", dwExpectReturn, szUrl);
 560     ok(strcmp(szReturnUrl,szExpectUrl)==0, "Expected \"%s\", but got \"%s\" from \"%s\"\n", szExpectUrl, szReturnUrl, szUrl);
 561
 562     dwEscaped = INTERNET_MAX_URL_LENGTH;
 563     urlW = GetWideString(szUrl);
 564     expected_urlW = GetWideString(szExpectUrl);
 565     ok(UrlEscapeW(urlW, ret_urlW, &dwEscaped, dwFlags) == dwExpectReturn, "UrlEscapeW didn't return 0x%08x from \"%s\"\n", dwExpectReturn, szUrl);
 566     WideCharToMultiByte(CP_ACP,0,ret_urlW,-1,szReturnUrl,INTERNET_MAX_URL_LENGTH,0,0);
 567     ok(lstrcmpW(ret_urlW, expected_urlW)==0, "Expected \"%s\", but got \"%s\" from \"%s\" flags %08x\n", szExpectUrl, szReturnUrl, szUrl, dwFlags);
 568     FreeWideString(urlW);
 569     FreeWideString(expected_urlW);
 570
 571 }
 572
 573 static void test_url_canonicalize(int index, const char *szUrl, DWORD dwFlags, HRESULT dwExpectReturn, HRESULT dwExpectReturnAlt, const char *szExpectUrl, BOOL todo)
 574 {
 575     CHAR szReturnUrl[INTERNET_MAX_URL_LENGTH];
 576     WCHAR wszReturnUrl[INTERNET_MAX_URL_LENGTH];
 577     LPWSTR wszUrl = GetWideString(szUrl);
 578     LPWSTR wszExpectUrl = GetWideString(szExpectUrl);
 579     LPWSTR wszConvertedUrl;
 580     HRESULT ret;
 581
 582     DWORD dwSize;
 583
 584     dwSize = INTERNET_MAX_URL_LENGTH;
 585     ok(UrlCanonicalizeA(szUrl, NULL, &dwSize, dwFlags) != dwExpectReturn, "Unexpected return for NULL buffer, index %d\n", index);
 586     ret = UrlCanonicalizeA(szUrl, szReturnUrl, &dwSize, dwFlags);
 587     ok(ret == dwExpectReturn || ret == dwExpectReturnAlt,
 588        "UrlCanonicalizeA failed: expected=0x%08x or 0x%08x, got=0x%08x, index %d\n",
 589        dwExpectReturn, dwExpectReturnAlt, ret, index);
 590     if (todo)
 591         todo_wine
 592         ok(strcmp(szReturnUrl,szExpectUrl)==0, "UrlCanonicalizeA dwFlags 0x%08x url '%s' Expected \"%s\", but got \"%s\", index %d\n", dwFlags, szUrl, szExpectUrl, szReturnUrl, index);
 593     else
 594         ok(strcmp(szReturnUrl,szExpectUrl)==0, "UrlCanonicalizeA dwFlags 0x%08x url '%s' Expected \"%s\", but got \"%s\", index %d\n", dwFlags, szUrl, szExpectUrl, szReturnUrl, index);
 595
 596     dwSize = INTERNET_MAX_URL_LENGTH;
 597     ok(UrlCanonicalizeW(wszUrl, NULL, &dwSize, dwFlags) != dwExpectReturn, "Unexpected return for NULL buffer, index %d\n", index);
 598     ok(UrlCanonicalizeW(wszUrl, wszReturnUrl, &dwSize, dwFlags) == dwExpectReturn, "UrlCanonicalizeW didn't return 0x%08x, index %d\n", dwExpectReturn, index);
 599     wszConvertedUrl = GetWideString(szReturnUrl);
 600     ok(lstrcmpW(wszReturnUrl, wszConvertedUrl)==0, "Strings didn't match between ascii and unicode UrlCanonicalize, index %d!\n", index);
 601     FreeWideString(wszConvertedUrl);
 602
 603
 604     FreeWideString(wszUrl);
 605     FreeWideString(wszExpectUrl);
 606 }
 607
 608
 609 static void test_UrlEscape(void)
 610 {
 611     DWORD size = 0;
 612     HRESULT ret;
 613     unsigned int i;
 614     char empty_string[] = "";
 615
 616     ret = UrlEscapeA("/woningplan/woonkamer basis.swf", NULL, &size, URL_ESCAPE_SPACES_ONLY);
 617     ok(ret == E_INVALIDARG, "got %x, expected %x\n", ret, E_INVALIDARG);
 618     ok(size == 0, "got %d, expected %d\n", size, 0);
 619
 620     size = 0;
 621     ret = UrlEscapeA("/woningplan/woonkamer basis.swf", empty_string, &size, URL_ESCAPE_SPACES_ONLY);
 622     ok(ret == E_INVALIDARG, "got %x, expected %x\n", ret, E_INVALIDARG);
 623     ok(size == 0, "got %d, expected %d\n", size, 0);
 624
 625     size = 1;
 626     ret = UrlEscapeA("/woningplan/woonkamer basis.swf", NULL, &size, URL_ESCAPE_SPACES_ONLY);
 627     ok(ret == E_INVALIDARG, "got %x, expected %x\n", ret, E_INVALIDARG);
 628     ok(size == 1, "got %d, expected %d\n", size, 1);
 629
 630     size = 1;
 631     ret = UrlEscapeA("/woningplan/woonkamer basis.swf", empty_string, NULL, URL_ESCAPE_SPACES_ONLY);
 632     ok(ret == E_INVALIDARG, "got %x, expected %x\n", ret, E_INVALIDARG);
 633     ok(size == 1, "got %d, expected %d\n", size, 1);
 634
 635     size = 1;
 636     ret = UrlEscapeA("/woningplan/woonkamer basis.swf", empty_string, &size, URL_ESCAPE_SPACES_ONLY);
 637     ok(ret == E_POINTER, "got %x, expected %x\n", ret, E_POINTER);
 638     ok(size == 34, "got %d, expected %d\n", size, 34);
 639
 640     for(i=0; i<sizeof(TEST_ESCAPE)/sizeof(TEST_ESCAPE[0]); i++) {
 641         test_url_escape(TEST_ESCAPE[i].url, TEST_ESCAPE[i].flags,
 642                               TEST_ESCAPE[i].expectret, TEST_ESCAPE[i].expecturl);
 643     }
 644 }
 645
 646 /* ########################### */
 647
 648 static void test_UrlCanonicalizeA(void)
 649 {
 650     unsigned int i;
 651     CHAR szReturnUrl[INTERNET_MAX_URL_LENGTH];
 652     DWORD dwSize;
 653     DWORD urllen;
 654     HRESULT hr;
 655
 656     urllen = lstrlenA(winehqA);
 657
 658     /* buffer has no space for the result */
 659     dwSize=urllen-1;
 660     memset(szReturnUrl, '#', urllen+4);
 661     szReturnUrl[urllen+4] = '\0';
 662     SetLastError(0xdeadbeef);
 663     hr = UrlCanonicalizeA(winehqA, szReturnUrl, &dwSize, URL_WININET_COMPATIBILITY  | URL_ESCAPE_UNSAFE);
 664     ok( (hr == E_POINTER) && (dwSize == (urllen + 1)),
 665         "got 0x%x with %u and size %u for '%s' and %u (expected 'E_POINTER' and size %u)\n",
 666         hr, GetLastError(), dwSize, szReturnUrl, lstrlenA(szReturnUrl), urllen+1);
 667
 668     /* buffer has no space for the terminating '\0' */
 669     dwSize=urllen;
 670     memset(szReturnUrl, '#', urllen+4);
 671     szReturnUrl[urllen+4] = '\0';
 672     SetLastError(0xdeadbeef);
 673     hr = UrlCanonicalizeA(winehqA, szReturnUrl, &dwSize, URL_WININET_COMPATIBILITY | URL_ESCAPE_UNSAFE);
 674     ok( (hr == E_POINTER) && (dwSize == (urllen + 1)),
 675         "got 0x%x with %u and size %u for '%s' and %u (expected 'E_POINTER' and size %u)\n",
 676         hr, GetLastError(), dwSize, szReturnUrl, lstrlenA(szReturnUrl), urllen+1);
 677
 678     /* buffer has the required size */
 679     dwSize=urllen+1;
 680     memset(szReturnUrl, '#', urllen+4);
 681     szReturnUrl[urllen+4] = '\0';
 682     SetLastError(0xdeadbeef);
 683     hr = UrlCanonicalizeA(winehqA, szReturnUrl, &dwSize, URL_WININET_COMPATIBILITY | URL_ESCAPE_UNSAFE);
 684     ok( (hr == S_OK) && (dwSize == urllen),
 685         "got 0x%x with %u and size %u for '%s' and %u (expected 'S_OK' and size %u)\n",
 686         hr, GetLastError(), dwSize, szReturnUrl, lstrlenA(szReturnUrl), urllen);
 687
 688     /* buffer is larger as the required size */
 689     dwSize=urllen+2;
 690     memset(szReturnUrl, '#', urllen+4);
 691     szReturnUrl[urllen+4] = '\0';
 692     SetLastError(0xdeadbeef);
 693     hr = UrlCanonicalizeA(winehqA, szReturnUrl, &dwSize, URL_WININET_COMPATIBILITY | URL_ESCAPE_UNSAFE);
 694     ok( (hr == S_OK) && (dwSize == urllen),
 695         "got 0x%x with %u and size %u for '%s' and %u (expected 'S_OK' and size %u)\n",
 696         hr, GetLastError(), dwSize, szReturnUrl, lstrlenA(szReturnUrl), urllen);
 697
 698     test_url_canonicalize(-1, "", 0, S_OK, S_FALSE /* Vista/win2k8 */, "", FALSE);
 699
 700     /* test url-modification */
 701     for(i=0; i<sizeof(TEST_CANONICALIZE)/sizeof(TEST_CANONICALIZE[0]); i++) {
 702         test_url_canonicalize(i, TEST_CANONICALIZE[i].url, TEST_CANONICALIZE[i].flags,
 703                               TEST_CANONICALIZE[i].expectret, TEST_CANONICALIZE[i].expectret, TEST_CANONICALIZE[i].expecturl,
 704                               TEST_CANONICALIZE[i].todo);
 705     }
 706 }
 707
 708 /* ########################### */
 709
 710 static void test_UrlCanonicalizeW(void)
 711 {
 712     WCHAR szReturnUrl[INTERNET_MAX_URL_LENGTH];
 713     DWORD dwSize;
 714     DWORD urllen;
 715     HRESULT hr;
 716     int i;
 717
 718
 719     if (!pUrlCanonicalizeW) {
 720         skip("UrlCanonicalizeW\n");
 721         return;
 722     }
 723     urllen = lstrlenW(winehqW);
 724
 725     /* buffer has no space for the result */
 726     dwSize = (urllen-1);
 727     memset(szReturnUrl, '#', (urllen+4) * sizeof(WCHAR));
 728     szReturnUrl[urllen+4] = '\0';
 729     SetLastError(0xdeadbeef);
 730     hr = pUrlCanonicalizeW(winehqW, szReturnUrl, &dwSize, URL_WININET_COMPATIBILITY | URL_ESCAPE_UNSAFE);
 731     ok( (hr == E_POINTER) && (dwSize == (urllen + 1)),
 732         "got 0x%x with %u and size %u for %u (expected 'E_POINTER' and size %u)\n",
 733         hr, GetLastError(), dwSize, lstrlenW(szReturnUrl), urllen+1);
 734
 735
 736     /* buffer has no space for the terminating '\0' */
 737     dwSize = urllen;
 738     memset(szReturnUrl, '#', (urllen+4) * sizeof(WCHAR));
 739     szReturnUrl[urllen+4] = '\0';
 740     SetLastError(0xdeadbeef);
 741     hr = pUrlCanonicalizeW(winehqW, szReturnUrl, &dwSize, URL_WININET_COMPATIBILITY | URL_ESCAPE_UNSAFE);
 742     ok( (hr == E_POINTER) && (dwSize == (urllen + 1)),
 743         "got 0x%x with %u and size %u for %u (expected 'E_POINTER' and size %u)\n",
 744         hr, GetLastError(), dwSize, lstrlenW(szReturnUrl), urllen+1);
 745
 746     /* buffer has the required size */
 747     dwSize = urllen +1;
 748     memset(szReturnUrl, '#', (urllen+4) * sizeof(WCHAR));
 749     szReturnUrl[urllen+4] = '\0';
 750     SetLastError(0xdeadbeef);
 751     hr = pUrlCanonicalizeW(winehqW, szReturnUrl, &dwSize, URL_WININET_COMPATIBILITY | URL_ESCAPE_UNSAFE);
 752     ok( (hr == S_OK) && (dwSize == urllen),
 753         "got 0x%x with %u and size %u for %u (expected 'S_OK' and size %u)\n",
 754         hr, GetLastError(), dwSize, lstrlenW(szReturnUrl), urllen);
 755
 756     /* buffer is larger as the required size */
 757     dwSize = (urllen+2);
 758     memset(szReturnUrl, '#', (urllen+4) * sizeof(WCHAR));
 759     szReturnUrl[urllen+4] = '\0';
 760     SetLastError(0xdeadbeef);
 761     hr = pUrlCanonicalizeW(winehqW, szReturnUrl, &dwSize, URL_WININET_COMPATIBILITY | URL_ESCAPE_UNSAFE);
 762     ok( (hr == S_OK) && (dwSize == urllen),
 763         "got 0x%x with %u and size %u for %u (expected 'S_OK' and size %u)\n",
 764         hr, GetLastError(), dwSize, lstrlenW(szReturnUrl), urllen);
 765
 766     /* check that the characters 1..32 are chopped from the end of the string */
 767     for (i = 1; i < 65536; i++)
 768     {
 769         WCHAR szUrl[128];
 770         BOOL choped;
 771         int pos;
 772
 773         MultiByteToWideChar(CP_ACP, 0, "http://www.winehq.org/X", -1, szUrl, 128);
 774         pos = lstrlenW(szUrl) - 1;
 775         szUrl[pos] = i;
 776         urllen = INTERNET_MAX_URL_LENGTH;
 777         pUrlCanonicalizeW(szUrl, szReturnUrl, &urllen, 0);
 778         choped = lstrlenW(szReturnUrl) < lstrlenW(szUrl);
 779         ok(choped == (i <= 32), "Incorrect char chopping for char %d\n", i);
 780     }
 781 }
 782
 783 /* ########################### */
 784
 785 static void test_url_combine(const char *szUrl1, const char *szUrl2, DWORD dwFlags, HRESULT dwExpectReturn, const char *szExpectUrl)
 786 {
 787     HRESULT hr;
 788     CHAR szReturnUrl[INTERNET_MAX_URL_LENGTH];
 789     WCHAR wszReturnUrl[INTERNET_MAX_URL_LENGTH];
 790     LPWSTR wszUrl1 = GetWideString(szUrl1);
 791     LPWSTR wszUrl2 = GetWideString(szUrl2);
 792     LPWSTR wszExpectUrl = GetWideString(szExpectUrl);
 793     LPWSTR wszConvertedUrl;
 794
 795     DWORD dwSize;
 796     DWORD dwExpectLen = lstrlen(szExpectUrl);
 797
 798     hr = UrlCombineA(szUrl1, szUrl2, NULL, NULL, dwFlags);
 799     ok(hr == E_INVALIDARG, "UrlCombineA returned 0x%08x, expected 0x%08x\n", hr, E_INVALIDARG);
 800
 801     dwSize = 0;
 802     hr = UrlCombineA(szUrl1, szUrl2, NULL, &dwSize, dwFlags);
 803     ok(hr == E_POINTER, "Checking length of string, return was 0x%08x, expected 0x%08x\n", hr, E_POINTER);
 804     ok(dwSize == dwExpectLen+1, "Got length %d, expected %d\n", dwSize, dwExpectLen+1);
 805
 806     dwSize--;
 807     hr = UrlCombineA(szUrl1, szUrl2, szReturnUrl, &dwSize, dwFlags);
 808     ok(hr == E_POINTER, "UrlCombineA returned 0x%08x, expected 0x%08x\n", hr, E_POINTER);
 809     ok(dwSize == dwExpectLen+1, "Got length %d, expected %d\n", dwSize, dwExpectLen+1);
 810
 811     hr = UrlCombineA(szUrl1, szUrl2, szReturnUrl, &dwSize, dwFlags);
 812     ok(hr == dwExpectReturn, "UrlCombineA returned 0x%08x, expected 0x%08x\n", hr, dwExpectReturn);
 813     ok(dwSize == dwExpectLen, "Got length %d, expected %d\n", dwSize, dwExpectLen);
 814     if(SUCCEEDED(hr)) {
 815         ok(strcmp(szReturnUrl,szExpectUrl)==0, "Expected %s, but got %s\n", szExpectUrl, szReturnUrl);
 816     }
 817
 818     dwSize = 0;
 819     hr = UrlCombineW(wszUrl1, wszUrl2, NULL, &dwSize, dwFlags);
 820     ok(hr == E_POINTER, "Checking length of string, return was 0x%08x, expected 0x%08x\n", hr, E_POINTER);
 821     ok(dwSize == dwExpectLen+1, "Got length %d, expected %d\n", dwSize, dwExpectLen+1);
 822
 823     dwSize--;
 824     hr = UrlCombineW(wszUrl1, wszUrl2, wszReturnUrl, &dwSize, dwFlags);
 825     ok(hr == E_POINTER, "UrlCombineA returned 0x%08x, expected 0x%08x\n", hr, E_POINTER);
 826     ok(dwSize == dwExpectLen+1, "Got length %d, expected %d\n", dwSize, dwExpectLen+1);
 827
 828     hr = UrlCombineW(wszUrl1, wszUrl2, wszReturnUrl, &dwSize, dwFlags);
 829     ok(hr == dwExpectReturn, "UrlCombineW returned 0x%08x, expected 0x%08x\n", hr, dwExpectReturn);
 830     ok(dwSize == dwExpectLen, "Got length %d, expected %d\n", dwSize, dwExpectLen);
 831     if(SUCCEEDED(hr)) {
 832         wszConvertedUrl = GetWideString(szReturnUrl);
 833         ok(lstrcmpW(wszReturnUrl, wszConvertedUrl)==0, "Strings didn't match between ascii and unicode UrlCombine!\n");
 834         FreeWideString(wszConvertedUrl);
 835     }
 836
 837     FreeWideString(wszUrl1);
 838     FreeWideString(wszUrl2);
 839     FreeWideString(wszExpectUrl);
 840 }
 841
 842 /* ########################### */
 843
 844 static void test_UrlCombine(void)
 845 {
 846     unsigned int i;
 847     for(i=0; i<sizeof(TEST_COMBINE)/sizeof(TEST_COMBINE[0]); i++) {
 848         test_url_combine(TEST_COMBINE[i].url1, TEST_COMBINE[i].url2, TEST_COMBINE[i].flags,
 849                          TEST_COMBINE[i].expectret, TEST_COMBINE[i].expecturl);
 850     }
 851 }
 852
 853 /* ########################### */
 854
 855 static void test_UrlCreateFromPath(void)
 856 {
 857     size_t i;
 858     char ret_url[INTERNET_MAX_URL_LENGTH];
 859     DWORD len, ret;
 860     WCHAR ret_urlW[INTERNET_MAX_URL_LENGTH];
 861     WCHAR *pathW, *urlW;
 862
 863     for(i = 0; i < sizeof(TEST_URLFROMPATH) / sizeof(TEST_URLFROMPATH[0]); i++) {
 864         len = INTERNET_MAX_URL_LENGTH;
 865         ret = UrlCreateFromPathA(TEST_URLFROMPATH[i].path, ret_url, &len, 0);
 866         ok(ret == TEST_URLFROMPATH[i].ret, "ret %08x from path %s\n", ret, TEST_URLFROMPATH[i].path);
 867         ok(!lstrcmpi(ret_url, TEST_URLFROMPATH[i].url), "url %s from path %s\n", ret_url, TEST_URLFROMPATH[i].path);
 868         ok(len == strlen(ret_url), "ret len %d from path %s\n", len, TEST_URLFROMPATH[i].path);
 869
 870         len = INTERNET_MAX_URL_LENGTH;
 871         pathW = GetWideString(TEST_URLFROMPATH[i].path);
 872         urlW = GetWideString(TEST_URLFROMPATH[i].url);
 873         ret = UrlCreateFromPathW(pathW, ret_urlW, &len, 0);
 874         WideCharToMultiByte(CP_ACP, 0, ret_urlW, -1, ret_url, sizeof(ret_url),0,0);
 875         ok(ret == TEST_URLFROMPATH[i].ret, "ret %08x from path L\"%s\", expected %08x\n",
 876            ret, TEST_URLFROMPATH[i].path, TEST_URLFROMPATH[i].ret);
 877         ok(!lstrcmpiW(ret_urlW, urlW), "got %s expected %s from path L\"%s\"\n", ret_url, TEST_URLFROMPATH[i].url, TEST_URLFROMPATH[i].path);
 878         ok(len == lstrlenW(ret_urlW), "ret len %d from path L\"%s\"\n", len, TEST_URLFROMPATH[i].path);
 879         FreeWideString(urlW);
 880         FreeWideString(pathW);
 881     }
 882 }
 883
 884 /* ########################### */
 885
 886 static void test_UrlIs(void)
 887 {
 888     BOOL ret;
 889     size_t i;
 890     WCHAR wurl[80];
 891
 892     for(i = 0; i < sizeof(TEST_PATH_IS_URL) / sizeof(TEST_PATH_IS_URL[0]); i++) {
 893         MultiByteToWideChar(CP_ACP, 0, TEST_PATH_IS_URL[i].path, -1, wurl, 80);
 894
 895         ret = UrlIsA( TEST_PATH_IS_URL[i].path, URLIS_URL );
 896         ok( ret == TEST_PATH_IS_URL[i].expect,
 897             "returned %d from path %s, expected %d\n", ret, TEST_PATH_IS_URL[i].path,
 898             TEST_PATH_IS_URL[i].expect );
 899
 900         ret = UrlIsW( wurl, URLIS_URL );
 901         ok( ret == TEST_PATH_IS_URL[i].expect,
 902             "returned %d from path (UrlIsW) %s, expected %d\n", ret, TEST_PATH_IS_URL[i].path,
 903             TEST_PATH_IS_URL[i].expect );
 904     }
 905     for(i = 0; i < sizeof(TEST_URLIS_ATTRIBS) / sizeof(TEST_URLIS_ATTRIBS[0]); i++) {
 906         MultiByteToWideChar(CP_ACP, 0, TEST_URLIS_ATTRIBS[i].url, -1, wurl, 80);
 907
 908         ret = UrlIsA( TEST_URLIS_ATTRIBS[i].url, URLIS_OPAQUE);
 909         ok( ret == TEST_URLIS_ATTRIBS[i].expectOpaque,
 910             "returned %d for URLIS_OPAQUE, url \"%s\", expected %d\n", ret, TEST_URLIS_ATTRIBS[i].url,
 911             TEST_URLIS_ATTRIBS[i].expectOpaque );
 912         ret = UrlIsA( TEST_URLIS_ATTRIBS[i].url, URLIS_FILEURL);
 913         ok( ret == TEST_URLIS_ATTRIBS[i].expectFile,
 914             "returned %d for URLIS_FILEURL, url \"%s\", expected %d\n", ret, TEST_URLIS_ATTRIBS[i].url,
 915             TEST_URLIS_ATTRIBS[i].expectFile );
 916
 917         ret = UrlIsW( wurl, URLIS_OPAQUE);
 918         ok( ret == TEST_URLIS_ATTRIBS[i].expectOpaque,
 919             "returned %d for URLIS_OPAQUE (UrlIsW), url \"%s\", expected %d\n", ret, TEST_URLIS_ATTRIBS[i].url,
 920             TEST_URLIS_ATTRIBS[i].expectOpaque );
 921         ret = UrlIsW( wurl, URLIS_FILEURL);
 922         ok( ret == TEST_URLIS_ATTRIBS[i].expectFile,
 923             "returned %d for URLIS_FILEURL (UrlIsW), url \"%s\", expected %d\n", ret, TEST_URLIS_ATTRIBS[i].url,
 924             TEST_URLIS_ATTRIBS[i].expectFile );
 925     }
 926 }
 927
 928 /* ########################### */
 929
 930 static void test_UrlUnescape(void)
 931 {
 932     CHAR szReturnUrl[INTERNET_MAX_URL_LENGTH];
 933     WCHAR ret_urlW[INTERNET_MAX_URL_LENGTH];
 934     WCHAR *urlW, *expected_urlW;
 935     DWORD dwEscaped;
 936     size_t i;
 937     static char inplace[] = "file:///C:/Program%20Files";
 938     static char another_inplace[] = "file:///C:/Program%20Files";
 939     static const char expected[] = "file:///C:/Program Files";
 940     static WCHAR inplaceW[] = {'f','i','l','e',':','/','/','/','C',':','/','P','r','o','g','r','a','m',' ','F','i','l','e','s',0};
 941     static WCHAR another_inplaceW[] = {'f','i','l','e',':','/','/','/','C',':','/','P','r','o','g','r','a','m','%','2','0','F','i','l','e','s',0};
 942
 943     for(i=0; i<sizeof(TEST_URL_UNESCAPE)/sizeof(TEST_URL_UNESCAPE[0]); i++) {
 944         dwEscaped=INTERNET_MAX_URL_LENGTH;
 945         ok(UrlUnescapeA(TEST_URL_UNESCAPE[i].url, szReturnUrl, &dwEscaped, 0) == S_OK, "UrlUnescapeA didn't return 0x%08x from \"%s\"\n", S_OK, TEST_URL_UNESCAPE[i].url);
 946         ok(strcmp(szReturnUrl,TEST_URL_UNESCAPE[i].expect)==0, "Expected \"%s\", but got \"%s\" from \"%s\"\n", TEST_URL_UNESCAPE[i].expect, szReturnUrl, TEST_URL_UNESCAPE[i].url);
 947
 948         ZeroMemory(szReturnUrl, sizeof(szReturnUrl));
 949         /* if we set the bufferpointer to NULL here UrlUnescape  fails and string gets not converted */
 950         ok(UrlUnescapeA(TEST_URL_UNESCAPE[i].url, szReturnUrl, NULL, 0) == E_INVALIDARG, "UrlUnescapeA didn't return 0x%08x from \"%s\"\n", E_INVALIDARG ,TEST_URL_UNESCAPE[i].url);
 951         ok(strcmp(szReturnUrl,"")==0, "Expected empty string\n");
 952
 953         dwEscaped = INTERNET_MAX_URL_LENGTH;
 954         urlW = GetWideString(TEST_URL_UNESCAPE[i].url);
 955         expected_urlW = GetWideString(TEST_URL_UNESCAPE[i].expect);
 956         ok(UrlUnescapeW(urlW, ret_urlW, &dwEscaped, 0) == S_OK, "UrlUnescapeW didn't return 0x%08x from \"%s\"\n", S_OK, TEST_URL_UNESCAPE[i].url);
 957         WideCharToMultiByte(CP_ACP,0,ret_urlW,-1,szReturnUrl,INTERNET_MAX_URL_LENGTH,0,0);
 958         ok(lstrcmpW(ret_urlW, expected_urlW)==0, "Expected \"%s\", but got \"%s\" from \"%s\" flags %08lx\n", TEST_URL_UNESCAPE[i].expect, szReturnUrl, TEST_URL_UNESCAPE[i].url, 0L);
 959         FreeWideString(urlW);
 960         FreeWideString(expected_urlW);
 961     }
 962
 963     dwEscaped = sizeof(inplace);
 964     ok(UrlUnescapeA(inplace, NULL, &dwEscaped, URL_UNESCAPE_INPLACE) == S_OK, "UrlUnescapeA failed unexpectedly\n");
 965     ok(!strcmp(inplace, expected), "got %s expected %s\n", inplace, expected);
 966     ok(dwEscaped == 27, "got %d expected 27\n", dwEscaped);
 967
 968     /* if we set the bufferpointer to NULL, the string apparently still gets converted (Google Lively does this)) */
 969     ok(UrlUnescapeA(another_inplace, NULL, NULL, URL_UNESCAPE_INPLACE) == S_OK, "UrlUnescapeA failed unexpectedly\n");
 970     ok(!strcmp(another_inplace, expected), "got %s expected %s\n", another_inplace, expected);
 971
 972     dwEscaped = sizeof(inplaceW);
 973     ok(UrlUnescapeW(inplaceW, NULL, &dwEscaped, URL_UNESCAPE_INPLACE) == S_OK, "UrlUnescapeW failed unexpectedly\n");
 974     ok(dwEscaped == 50, "got %d expected 50\n", dwEscaped);
 975
 976     /* if we set the bufferpointer to NULL, the string apparently still gets converted (Google Lively does this)) */
 977     ok(UrlUnescapeW(another_inplaceW, NULL, NULL, URL_UNESCAPE_INPLACE) == S_OK, "UrlUnescapeW failed unexpectedly\n");
 978     ok(lstrlenW(another_inplaceW) == 24, "got %d expected 24\n", lstrlenW(another_inplaceW));
 979
 980 }
 981
 982 static const struct parse_url_test_t {
 983     const char *url;
 984     HRESULT hres;
 985     UINT protocol_len;
 986     UINT scheme;
 987 } parse_url_tests[] = {
 988     {"http://www.winehq.org/",S_OK,4,URL_SCHEME_HTTP},
 989     {"https://www.winehq.org/",S_OK,5,URL_SCHEME_HTTPS},
 990     {"ftp://www.winehq.org/",S_OK,3,URL_SCHEME_FTP},
 991     {"test.txt?test=c:/dir",0x80041001},
 992     {"test.txt",0x80041001},
 993     {"xxx://www.winehq.org/",S_OK,3,URL_SCHEME_UNKNOWN},
 994     {"1xx://www.winehq.org/",S_OK,3,URL_SCHEME_UNKNOWN},
 995     {"-xx://www.winehq.org/",S_OK,3,URL_SCHEME_UNKNOWN},
 996     {"xx0://www.winehq.org/",S_OK,3,URL_SCHEME_UNKNOWN},
 997     {"x://www.winehq.org/",0x80041001},
 998     {"xx$://www.winehq.org/",0x80041001},
 999     {"htt?p://www.winehq.org/",0x80041001},
1000     {"ab-://www.winehq.org/",S_OK,3,URL_SCHEME_UNKNOWN},
1001     {" http://www.winehq.org/",0x80041001},
1002 };
1003
1004 static void test_ParseURL(void)
1005 {
1006     const struct parse_url_test_t *test;
1007     WCHAR url[INTERNET_MAX_URL_LENGTH];
1008     PARSEDURLA parseda;
1009     PARSEDURLW parsedw;
1010     HRESULT hres;
1011
1012     for(test = parse_url_tests; test < parse_url_tests + sizeof(parse_url_tests)/sizeof(*parse_url_tests); test++) {
1013         memset(&parseda, 0xd0, sizeof(parseda));
1014         parseda.cbSize = sizeof(parseda);
1015         hres = pParseURLA(test->url, &parseda);
1016         ok(hres == test->hres, "ParseURL failed: %08x, expected %08x\n", hres, test->hres);
1017         if(hres == S_OK) {
1018             ok(parseda.pszProtocol == test->url, "parseda.pszProtocol = %s, expected %s\n",
1019                parseda.pszProtocol, test->url);
1020             ok(parseda.cchProtocol == test->protocol_len, "parseda.cchProtocol = %d, expected %d\n",
1021                parseda.cchProtocol, test->protocol_len);
1022             ok(parseda.pszSuffix == test->url+test->protocol_len+1, "parseda.pszSuffix = %s, expected %s\n",
1023                parseda.pszSuffix, test->url+test->protocol_len+1);
1024             ok(parseda.cchSuffix == strlen(test->url+test->protocol_len+1),
1025                "parseda.pszSuffix = %d, expected %d\n",
1026                parseda.cchSuffix, strlen(test->url+test->protocol_len+1));
1027             ok(parseda.nScheme == test->scheme, "parseda.nScheme = %d, expected %d\n",
1028                parseda.nScheme, test->scheme);
1029         }else {
1030             ok(!parseda.pszProtocol, "parseda.pszProtocol = %p\n", parseda.pszProtocol);
1031             ok(parseda.nScheme == 0xd0d0d0d0, "nScheme = %d\n", parseda.nScheme);
1032         }
1033
1034         MultiByteToWideChar(CP_ACP, 0, test->url, -1, url, sizeof(url)/sizeof(WCHAR));
1035
1036         memset(&parsedw, 0xd0, sizeof(parsedw));
1037         parsedw.cbSize = sizeof(parsedw);
1038         hres = pParseURLW(url, &parsedw);
1039         ok(hres == test->hres, "ParseURL failed: %08x, expected %08x\n", hres, test->hres);
1040         if(hres == S_OK) {
1041             ok(parsedw.pszProtocol == url, "parsedw.pszProtocol = %s, expected %s\n",
1042                wine_dbgstr_w(parsedw.pszProtocol), wine_dbgstr_w(url));
1043             ok(parsedw.cchProtocol == test->protocol_len, "parsedw.cchProtocol = %d, expected %d\n",
1044                parsedw.cchProtocol, test->protocol_len);
1045             ok(parsedw.pszSuffix == url+test->protocol_len+1, "parsedw.pszSuffix = %s, expected %s\n",
1046                wine_dbgstr_w(parsedw.pszSuffix), wine_dbgstr_w(url+test->protocol_len+1));
1047             ok(parsedw.cchSuffix == strlen(test->url+test->protocol_len+1),
1048                "parsedw.pszSuffix = %d, expected %d\n",
1049                parsedw.cchSuffix, strlen(test->url+test->protocol_len+1));
1050             ok(parsedw.nScheme == test->scheme, "parsedw.nScheme = %d, expected %d\n",
1051                parsedw.nScheme, test->scheme);
1052         }else {
1053             ok(!parsedw.pszProtocol, "parsedw.pszProtocol = %p\n", parseda.pszProtocol);
1054             ok(parsedw.nScheme == 0xd0d0d0d0, "nScheme = %d\n", parsedw.nScheme);
1055         }
1056     }
1057 }
1058
1059 /* ########################### */
1060
1061 START_TEST(url)
1062 {
1063
1064   hShlwapi = GetModuleHandleA("shlwapi.dll");
1065   pUrlCanonicalizeW = (void *) GetProcAddress(hShlwapi, "UrlCanonicalizeW");
1066   pParseURLA = (void*)GetProcAddress(hShlwapi, (LPCSTR)1);
1067   pParseURLW = (void*)GetProcAddress(hShlwapi, (LPCSTR)2);
1068
1069   test_UrlApplyScheme();
1070   test_UrlHash();
1071   test_UrlGetPart();
1072   test_UrlCanonicalizeA();
1073   test_UrlCanonicalizeW();
1074   test_UrlEscape();
1075   test_UrlCombine();
1076   test_UrlCreateFromPath();
1077   test_UrlIs();
1078   test_UrlUnescape();
1079   test_ParseURL();
1080
1081 }