mshtml: Added put_backgroundImage implementation.
[wine] / dlls / shlwapi / tests / url.c
1 /* Unit test suite for Path functions
2  *
3  * Copyright 2002 Matthew Mastracci
4  * Copyright 2007 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
35 static const char* TEST_URL_1 = "http://www.winehq.org/tests?date=10/10/1923";
36 static const char* TEST_URL_2 = "http://localhost:8080/tests%2e.html?date=Mon%2010/10/1923";
37 static const char* TEST_URL_3 = "http://foo:bar@localhost:21/internal.php?query=x&return=y";
38 static const WCHAR winehqW[] = {'h','t','t','p',':','/','/','w','w','w','.','w','i','n','e','h','q','.','o','r','g','/',0};
39 static const  CHAR winehqA[] = {'h','t','t','p',':','/','/','w','w','w','.','w','i','n','e','h','q','.','o','r','g','/',0};
40
41 /* ################ */
42
43 typedef struct _TEST_URL_CANONICALIZE {
44     const char *url;
45     DWORD flags;
46     HRESULT expectret;
47     const char *expecturl;
48     BOOL todo;
49 } TEST_URL_CANONICALIZE;
50
51 static const TEST_URL_CANONICALIZE TEST_CANONICALIZE[] = {
52     {"http://www.winehq.org/tests/../tests/../..", 0, S_OK, "http://www.winehq.org/", TRUE},
53     {"http://www.winehq.org/tests/../tests", 0, S_OK, "http://www.winehq.org/tests", FALSE},
54     {"http://www.winehq.org/tests\n", URL_WININET_COMPATIBILITY|URL_ESCAPE_SPACES_ONLY|URL_ESCAPE_UNSAFE, S_OK, "http://www.winehq.org/tests", FALSE},
55     {"http://www.winehq.org/tests\r", URL_WININET_COMPATIBILITY|URL_ESCAPE_SPACES_ONLY|URL_ESCAPE_UNSAFE, S_OK, "http://www.winehq.org/tests", FALSE},
56     {"http://www.winehq.org/tests\r", 0, S_OK, "http://www.winehq.org/tests", FALSE},
57     {"http://www.winehq.org/tests\r", URL_DONT_SIMPLIFY, S_OK, "http://www.winehq.org/tests", FALSE},
58     {"http://www.winehq.org/tests/../tests/", 0, S_OK, "http://www.winehq.org/tests/", FALSE},
59     {"http://www.winehq.org/tests/../tests/..", 0, S_OK, "http://www.winehq.org/", FALSE},
60     {"http://www.winehq.org/tests/../tests/../", 0, S_OK, "http://www.winehq.org/", FALSE},
61     {"http://www.winehq.org/tests/..", 0, S_OK, "http://www.winehq.org/", FALSE},
62     {"http://www.winehq.org/tests/../", 0, S_OK, "http://www.winehq.org/", FALSE},
63     {"http://www.winehq.org/tests/..?query=x&return=y", 0, S_OK, "http://www.winehq.org/?query=x&return=y", FALSE},
64     {"http://www.winehq.org/tests/../?query=x&return=y", 0, S_OK, "http://www.winehq.org/?query=x&return=y", FALSE},
65     {"http://www.winehq.org/tests/..#example", 0, S_OK, "http://www.winehq.org/#example", FALSE},
66     {"http://www.winehq.org/tests/../#example", 0, S_OK, "http://www.winehq.org/#example", FALSE},
67     {"http://www.winehq.org/tests\\../#example", 0, S_OK, "http://www.winehq.org/#example", FALSE},
68     {"http://www.winehq.org/tests/..\\#example", 0, S_OK, "http://www.winehq.org/#example", FALSE},
69     {"http://www.winehq.org\\tests/../#example", 0, S_OK, "http://www.winehq.org/#example", FALSE},
70     {"http://www.winehq.org/tests/../#example", URL_DONT_SIMPLIFY, S_OK, "http://www.winehq.org/tests/../#example", FALSE},
71     {"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},
72     {"http://www.winehq.org/tests/foo%20bar", URL_UNESCAPE , S_OK, "http://www.winehq.org/tests/foo bar", FALSE},
73     {"file:///c:/tests/foo%20bar", URL_UNESCAPE , S_OK, "file:///c:/tests/foo bar", FALSE},
74     {"file:///c:/tests\\foo%20bar", URL_UNESCAPE , S_OK, "file:///c:/tests/foo bar", FALSE},
75     {"file:///c:/tests/foo%20bar", 0, S_OK, "file:///c:/tests/foo%20bar", FALSE},
76     {"file:///c:/tests/foo%20bar", URL_FILE_USE_PATHURL, S_OK, "file://c:\\tests\\foo bar", FALSE},
77     {"file://c:/tests/../tests/foo%20bar", URL_FILE_USE_PATHURL, S_OK, "file://c:\\tests\\foo bar", FALSE},
78     {"file://c:/tests\\../tests/foo%20bar", URL_FILE_USE_PATHURL, S_OK, "file://c:\\tests\\foo bar", FALSE},
79     {"file://c:/tests/foo%20bar", URL_FILE_USE_PATHURL, S_OK, "file://c:\\tests\\foo bar", FALSE},
80     {"file:///c://tests/foo%20bar", URL_FILE_USE_PATHURL, S_OK, "file://c:\\\\tests\\foo bar", FALSE},
81     {"file:///c:\\tests\\foo bar", 0, S_OK, "file:///c:/tests/foo bar", FALSE},
82     {"file:///c:\\tests\\foo bar", URL_DONT_SIMPLIFY, S_OK, "file:///c:/tests/foo bar", FALSE},
83     {"http://www.winehq.org/site/about", URL_FILE_USE_PATHURL, S_OK, "http://www.winehq.org/site/about", FALSE},
84     {"file_://www.winehq.org/site/about", URL_FILE_USE_PATHURL, S_OK, "file_://www.winehq.org/site/about", FALSE},
85     {"c:\\dir\\file", 0, S_OK, "file:///c:/dir/file", FALSE},
86     {"file:///c:\\dir\\file", 0, S_OK, "file:///c:/dir/file", FALSE},
87     {"c:dir\\file", 0, S_OK, "file:///c:dir/file", FALSE},
88     {"c:\\tests\\foo bar", URL_FILE_USE_PATHURL, S_OK, "file://c:\\tests\\foo bar", FALSE},
89     {"c:\\tests\\foo bar", 0, S_OK, "file:///c:/tests/foo%20bar", FALSE},
90     {"res:///c:/tests/foo%20bar", URL_UNESCAPE , S_OK, "res:///c:/tests/foo bar", FALSE},
91     {"res:///c:/tests\\foo%20bar", URL_UNESCAPE , S_OK, "res:///c:/tests\\foo bar", TRUE},
92     {"res:///c:/tests/foo%20bar", 0, S_OK, "res:///c:/tests/foo%20bar", FALSE},
93     {"res:///c:/tests/foo%20bar", URL_FILE_USE_PATHURL, S_OK, "res:///c:/tests/foo%20bar", TRUE},
94     {"res://c:/tests/../tests/foo%20bar", URL_FILE_USE_PATHURL, S_OK, "res://c:/tests/foo%20bar", TRUE},
95     {"res://c:/tests\\../tests/foo%20bar", URL_FILE_USE_PATHURL, S_OK, "res://c:/tests/foo%20bar", TRUE},
96     {"res://c:/tests/foo%20bar", URL_FILE_USE_PATHURL, S_OK, "res://c:/tests/foo%20bar", TRUE},
97     {"res:///c://tests/foo%20bar", URL_FILE_USE_PATHURL, S_OK, "res:///c://tests/foo%20bar", TRUE},
98     {"res:///c:\\tests\\foo bar", 0, S_OK, "res:///c:\\tests\\foo bar", TRUE},
99     {"res:///c:\\tests\\foo bar", URL_DONT_SIMPLIFY, S_OK, "res:///c:\\tests\\foo bar", TRUE},
100     {"A", 0, S_OK, "A", FALSE},
101     {"/uri-res/N2R?urn:sha1:B3K", URL_DONT_ESCAPE_EXTRA_INFO | URL_WININET_COMPATIBILITY /*0x82000000*/, S_OK, "/uri-res/N2R?urn:sha1:B3K", TRUE} /*LimeWire online installer calls this*/,
102     {"", 0, S_OK, "", FALSE}
103 };
104
105 /* ################ */
106
107 typedef struct _TEST_URL_ESCAPE {
108     const char *url;
109     DWORD flags;
110     DWORD expectescaped;
111     HRESULT expectret;
112     const char *expecturl;
113 } TEST_URL_ESCAPE;
114
115 static const TEST_URL_ESCAPE TEST_ESCAPE[] = {
116     {"http://www.winehq.org/tests0", 0, 0, S_OK, "http://www.winehq.org/tests0"},
117     {"http://www.winehq.org/tests1\n", 0, 0, S_OK, "http://www.winehq.org/tests1%0A"},
118     {"http://www.winehq.org/tests2\r", 0, 0, S_OK, "http://www.winehq.org/tests2%0D"},
119     {"http://www.winehq.org/tests3\r", URL_ESCAPE_SPACES_ONLY|URL_ESCAPE_UNSAFE, 0, S_OK, "http://www.winehq.org/tests3\r"},
120     {"http://www.winehq.org/tests4\r", URL_ESCAPE_SPACES_ONLY, 0, S_OK, "http://www.winehq.org/tests4\r"},
121     {"http://www.winehq.org/tests5\r", URL_WININET_COMPATIBILITY|URL_ESCAPE_SPACES_ONLY, 0, S_OK, "http://www.winehq.org/tests5\r"},
122     {"/direct/swhelp/series6/6.2i_latestservicepack.dat\r", URL_ESCAPE_SPACES_ONLY, 0, S_OK, "/direct/swhelp/series6/6.2i_latestservicepack.dat\r"},
123
124     {"file://////foo/bar\\baz", 0, 0, S_OK, "file://foo/bar/baz"},
125     {"file://///foo/bar\\baz", 0, 0, S_OK, "file://foo/bar/baz"},
126     {"file:////foo/bar\\baz", 0, 0, S_OK, "file://foo/bar/baz"},
127     {"file:///localhost/foo/bar\\baz", 0, 0, S_OK, "file:///localhost/foo/bar/baz"},
128     {"file:///foo/bar\\baz", 0, 0, S_OK, "file:///foo/bar/baz"},
129     {"file://loCalHost/foo/bar\\baz", 0, 0, S_OK, "file:///foo/bar/baz"},
130     {"file://foo/bar\\baz", 0, 0, S_OK, "file://foo/bar/baz"},
131     {"file:/localhost/foo/bar\\baz", 0, 0, S_OK, "file:///localhost/foo/bar/baz"},
132     {"file:/foo/bar\\baz", 0, 0, S_OK, "file:///foo/bar/baz"},
133     {"file:foo/bar\\baz", 0, 0, S_OK, "file:foo/bar/baz"},
134     {"file:\\foo/bar\\baz", 0, 0, S_OK, "file:///foo/bar/baz"},
135     {"file:\\\\foo/bar\\baz", 0, 0, S_OK, "file://foo/bar/baz"},
136     {"file:\\\\\\foo/bar\\baz", 0, 0, S_OK, "file:///foo/bar/baz"},
137     {"file:\\\\localhost\\foo/bar\\baz", 0, 0, S_OK, "file:///foo/bar/baz"},
138     {"file:///f oo/b?a r\\baz", 0, 0, S_OK, "file:///f%20oo/b?a r\\baz"},
139     {"file:///foo/b#a r\\baz", 0, 0, S_OK, "file:///foo/b%23a%20r/baz"},
140     {"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"},
141     {"file:///f o%o/b?a r\\b%az", URL_ESCAPE_PERCENT, 0, S_OK, "file:///f%20o%25o/b?a r\\b%az"},
142     {"file:/foo/bar\\baz", URL_ESCAPE_SEGMENT_ONLY, 0, S_OK, "file:%2Ffoo%2Fbar%5Cbaz"},
143
144     {"foo/b%ar\\ba?z\\", URL_ESCAPE_SEGMENT_ONLY, 0, S_OK, "foo%2Fb%ar%5Cba%3Fz%5C"},
145     {"foo/b%ar\\ba?z\\", URL_ESCAPE_PERCENT | URL_ESCAPE_SEGMENT_ONLY, 0, S_OK, "foo%2Fb%25ar%5Cba%3Fz%5C"},
146     {"foo/bar\\ba?z\\", 0, 0, S_OK, "foo/bar%5Cba?z\\"},
147     {"/foo/bar\\ba?z\\", 0, 0, S_OK, "/foo/bar%5Cba?z\\"},
148     {"/foo/bar\\ba#z\\", 0, 0, S_OK, "/foo/bar%5Cba#z\\"},
149     {"/foo/%5C", 0, 0, S_OK, "/foo/%5C"},
150     {"/foo/%5C", URL_ESCAPE_PERCENT, 0, S_OK, "/foo/%255C"},
151
152     {"http://////foo/bar\\baz", 0, 0, S_OK, "http://////foo/bar/baz"},
153     {"http://///foo/bar\\baz", 0, 0, S_OK, "http://///foo/bar/baz"},
154     {"http:////foo/bar\\baz", 0, 0, S_OK, "http:////foo/bar/baz"},
155     {"http:///foo/bar\\baz", 0, 0, S_OK, "http:///foo/bar/baz"},
156     {"http://localhost/foo/bar\\baz", 0, 0, S_OK, "http://localhost/foo/bar/baz"},
157     {"http://foo/bar\\baz", 0, 0, S_OK, "http://foo/bar/baz"},
158     {"http:/foo/bar\\baz", 0, 0, S_OK, "http:/foo/bar/baz"},
159     {"http:foo/bar\\ba?z\\", 0, 0, S_OK, "http:foo%2Fbar%2Fba?z\\"},
160     {"http:foo/bar\\ba#z\\", 0, 0, S_OK, "http:foo%2Fbar%2Fba#z\\"},
161     {"http:\\foo/bar\\baz", 0, 0, S_OK, "http:/foo/bar/baz"},
162     {"http:\\\\foo/bar\\baz", 0, 0, S_OK, "http://foo/bar/baz"},
163     {"http:\\\\\\foo/bar\\baz", 0, 0, S_OK, "http:///foo/bar/baz"},
164     {"http:\\\\\\\\foo/bar\\baz", 0, 0, S_OK, "http:////foo/bar/baz"},
165     {"http:/fo ?o/b ar\\baz", 0, 0, S_OK, "http:/fo%20?o/b ar\\baz"},
166     {"http:fo ?o/b ar\\baz", 0, 0, S_OK, "http:fo%20?o/b ar\\baz"},
167     {"http:/foo/bar\\baz", URL_ESCAPE_SEGMENT_ONLY, 0, S_OK, "http:%2Ffoo%2Fbar%5Cbaz"},
168
169     {"https://foo/bar\\baz", 0, 0, S_OK, "https://foo/bar/baz"},
170     {"https:/foo/bar\\baz", 0, 0, S_OK, "https:/foo/bar/baz"},
171     {"https:\\foo/bar\\baz", 0, 0, S_OK, "https:/foo/bar/baz"},
172
173     {"foo:////foo/bar\\baz", 0, 0, S_OK, "foo:////foo/bar%5Cbaz"},
174     {"foo:///foo/bar\\baz", 0, 0, S_OK, "foo:///foo/bar%5Cbaz"},
175     {"foo://localhost/foo/bar\\baz", 0, 0, S_OK, "foo://localhost/foo/bar%5Cbaz"},
176     {"foo://foo/bar\\baz", 0, 0, S_OK, "foo://foo/bar%5Cbaz"},
177     {"foo:/foo/bar\\baz", 0, 0, S_OK, "foo:/foo/bar%5Cbaz"},
178     {"foo:foo/bar\\baz", 0, 0, S_OK, "foo:foo%2Fbar%5Cbaz"},
179     {"foo:\\foo/bar\\baz", 0, 0, S_OK, "foo:%5Cfoo%2Fbar%5Cbaz"},
180     {"foo:/foo/bar\\ba?\\z", 0, 0, S_OK, "foo:/foo/bar%5Cba?\\z"},
181     {"foo:/foo/bar\\ba#\\z", 0, 0, S_OK, "foo:/foo/bar%5Cba#\\z"},
182
183     {"mailto:/fo/o@b\\%a?\\r.b#\\az", 0, 0, S_OK, "mailto:%2Ffo%2Fo@b%5C%a%3F%5Cr.b%23%5Caz"},
184     {"mailto:fo/o@b\\%a?\\r.b#\\az", 0, 0, S_OK, "mailto:fo%2Fo@b%5C%a%3F%5Cr.b%23%5Caz"},
185     {"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"},
186
187     {"ftp:fo/o@bar.baz/foo/bar", 0, 0, S_OK, "ftp:fo%2Fo@bar.baz%2Ffoo%2Fbar"},
188     {"ftp:/fo/o@bar.baz/foo/bar", 0, 0, S_OK, "ftp:/fo/o@bar.baz/foo/bar"},
189     {"ftp://fo/o@bar.baz/fo?o\\bar", 0, 0, S_OK, "ftp://fo/o@bar.baz/fo?o\\bar"},
190     {"ftp://fo/o@bar.baz/fo#o\\bar", 0, 0, S_OK, "ftp://fo/o@bar.baz/fo#o\\bar"},
191     {"ftp://localhost/o@bar.baz/fo#o\\bar", 0, 0, S_OK, "ftp://localhost/o@bar.baz/fo#o\\bar"},
192     {"ftp:///fo/o@bar.baz/foo/bar", 0, 0, S_OK, "ftp:///fo/o@bar.baz/foo/bar"},
193     {"ftp:////fo/o@bar.baz/foo/bar", 0, 0, S_OK, "ftp:////fo/o@bar.baz/foo/bar"}
194 };
195
196 /* ################ */
197
198 typedef struct _TEST_URL_COMBINE {
199     const char *url1;
200     const char *url2;
201     DWORD flags;
202     HRESULT expectret;
203     const char *expecturl;
204 } TEST_URL_COMBINE;
205
206 static const TEST_URL_COMBINE TEST_COMBINE[] = {
207     {"http://www.winehq.org/tests", "tests1", 0, S_OK, "http://www.winehq.org/tests1"},
208     {"http://www.%77inehq.org/tests", "tests1", 0, S_OK, "http://www.%77inehq.org/tests1"},
209     /*FIXME {"http://www.winehq.org/tests", "../tests2", 0, S_OK, "http://www.winehq.org/tests2"},*/
210     {"http://www.winehq.org/tests/", "../tests3", 0, S_OK, "http://www.winehq.org/tests3"},
211     {"http://www.winehq.org/tests/test1", "test2", 0, S_OK, "http://www.winehq.org/tests/test2"},
212     {"http://www.winehq.org/tests/../tests", "tests4", 0, S_OK, "http://www.winehq.org/tests4"},
213     {"http://www.winehq.org/tests/../tests/", "tests5", 0, S_OK, "http://www.winehq.org/tests/tests5"},
214     {"http://www.winehq.org/tests/../tests/", "/tests6/..", 0, S_OK, "http://www.winehq.org/"},
215     {"http://www.winehq.org/tests/../tests/..", "tests7/..", 0, S_OK, "http://www.winehq.org/"},
216     {"http://www.winehq.org/tests/?query=x&return=y", "tests8", 0, S_OK, "http://www.winehq.org/tests/tests8"},
217     {"http://www.winehq.org/tests/#example", "tests9", 0, S_OK, "http://www.winehq.org/tests/tests9"},
218     {"http://www.winehq.org/tests/../tests/", "/tests10/..", URL_DONT_SIMPLIFY, S_OK, "http://www.winehq.org/tests10/.."},
219     {"http://www.winehq.org/tests/../", "tests11", URL_DONT_SIMPLIFY, S_OK, "http://www.winehq.org/tests/../tests11"},
220     {"file:///C:\\dir\\file.txt", "test.txt", 0, S_OK, "file:///C:/dir/test.txt"},
221     {"C:\\winehq\\winehq.txt", "C:\\Test\\test.txt", 0, S_OK, "file:///C:/Test/test.txt"},
222     {"http://www.winehq.org/test/", "test%20file.txt", 0, S_OK, "http://www.winehq.org/test/test%20file.txt"},
223     {"http://www.winehq.org/test/", "test%20file.txt", URL_FILE_USE_PATHURL, S_OK, "http://www.winehq.org/test/test%20file.txt"},
224     {"http://www.winehq.org%2ftest/", "test%20file.txt", URL_FILE_USE_PATHURL, S_OK, "http://www.winehq.org%2ftest/test%20file.txt"},
225     {"xxx:@MSITStore:file.chm/file.html", "dir/file", 0, S_OK, "xxx:dir/file"},
226     {"mk:@MSITStore:file.chm::/file.html", "/dir/file", 0, S_OK, "mk:@MSITStore:file.chm::/dir/file"},
227     {"mk:@MSITStore:file.chm::/file.html", "mk:@MSITStore:file.chm::/dir/file", 0, S_OK, "mk:@MSITStore:file.chm::/dir/file"},
228     {"foo:today", "foo:calendar", 0, S_OK, "foo:calendar"},
229     {"foo:today", "bar:calendar", 0, S_OK, "bar:calendar"},
230     {"foo:/today", "foo:calendar", 0, S_OK, "foo:/calendar"},
231     {"foo:/today/", "foo:calendar", 0, S_OK, "foo:/today/calendar"},
232 };
233
234 /* ################ */
235
236 static const struct {
237     const char *path;
238     const char *url;
239     DWORD ret;
240 } TEST_URLFROMPATH [] = {
241     {"foo", "file:foo", S_OK},
242     {"foo\\bar", "file:foo/bar", S_OK},
243     {"\\foo\\bar", "file:///foo/bar", S_OK},
244     {"c:\\foo\\bar", "file:///c:/foo/bar", S_OK},
245     {"c:foo\\bar", "file:///c:foo/bar", S_OK},
246     {"c:\\foo/b a%r", "file:///c:/foo/b%20a%25r", S_OK},
247     {"c:\\foo\\foo bar", "file:///c:/foo/foo%20bar", S_OK},
248 #if 0
249     /* The following test fails on native shlwapi as distributed with Win95/98.
250      * Wine matches the behaviour of later versions.
251      */
252     {"xx:c:\\foo\\bar", "xx:c:\\foo\\bar", S_FALSE}
253 #endif
254 };
255
256 /* ################ */
257
258 static struct {
259     char url[30];
260     const char *expect;
261 } TEST_URL_UNESCAPE[] = {
262     {"file://foo/bar", "file://foo/bar"},
263     {"file://fo%20o%5Ca/bar", "file://fo o\\a/bar"}
264 };
265
266 /* ################ */
267
268 static const  struct {
269     const char *path;
270     BOOL expect;
271 } TEST_PATH_IS_URL[] = {
272     {"http://foo/bar", TRUE},
273     {"c:\\foo\\bar", FALSE},
274     {"foo://foo/bar", TRUE},
275     {"foo\\bar", FALSE},
276     {"foo.bar", FALSE},
277     {"bogusscheme:", TRUE},
278     {"http:partial", TRUE}
279 };
280
281 /* ################ */
282
283 static const struct {
284     const char *url;
285     BOOL expectOpaque;
286     BOOL expectFile;
287 } TEST_URLIS_ATTRIBS[] = {
288     {   "ftp:",                                         FALSE,  FALSE   },
289     {   "http:",                                        FALSE,  FALSE   },
290     {   "gopher:",                                      FALSE,  FALSE   },
291     {   "mailto:",                                      TRUE,   FALSE   },
292     {   "news:",                                        FALSE,  FALSE   },
293     {   "nntp:",                                        FALSE,  FALSE   },
294     {   "telnet:",                                      FALSE,  FALSE   },
295     {   "wais:",                                        FALSE,  FALSE   },
296     {   "file:",                                        FALSE,  TRUE    },
297     {   "mk:",                                          FALSE,  FALSE   },
298     {   "https:",                                       FALSE,  FALSE   },
299     {   "shell:",                                       TRUE,   FALSE   },
300     {   "https:",                                       FALSE,  FALSE   },
301     {   "snews:",                                       FALSE,  FALSE   },
302     {   "local:",                                       FALSE,  FALSE   },
303     {   "javascript:",                                  TRUE,   FALSE   },
304     {   "vbscript:",                                    TRUE,   FALSE   },
305     {   "about:",                                       TRUE,   FALSE   },
306     {   "res:",                                         FALSE,  FALSE   },
307     {   "bogusscheme:",                                 FALSE,  FALSE   },
308     {   "file:\\\\e:\\b\\c",                            FALSE,  TRUE    },
309     {   "file://e:/b/c",                                FALSE,  TRUE    },
310     {   "http:partial",                                 FALSE,  FALSE   },
311     {   "mailto://www.winehq.org/test.html",            TRUE,   FALSE   },
312     {   "file:partial",                                 FALSE,  TRUE    }
313 };
314
315 /* ########################### */
316
317 static LPWSTR GetWideString(const char* szString)
318 {
319   LPWSTR wszString = HeapAlloc(GetProcessHeap(), 0, (2*INTERNET_MAX_URL_LENGTH) * sizeof(WCHAR));
320
321   MultiByteToWideChar(0, 0, szString, -1, wszString, INTERNET_MAX_URL_LENGTH);
322
323   return wszString;
324 }
325
326
327 static void FreeWideString(LPWSTR wszString)
328 {
329    HeapFree(GetProcessHeap(), 0, wszString);
330 }
331
332 /* ########################### */
333
334 static void hash_url(const char* szUrl)
335 {
336   LPCSTR szTestUrl = szUrl;
337   LPWSTR wszTestUrl = GetWideString(szTestUrl);
338
339   DWORD cbSize = sizeof(DWORD);
340   DWORD dwHash1, dwHash2;
341   ok(UrlHashA(szTestUrl, (LPBYTE)&dwHash1, cbSize) == S_OK, "UrlHashA didn't return S_OK\n");
342   ok(UrlHashW(wszTestUrl, (LPBYTE)&dwHash2, cbSize) == S_OK, "UrlHashW didn't return S_OK\n");
343
344   FreeWideString(wszTestUrl);
345
346   ok(dwHash1 == dwHash2, "Hashes didn't compare\n");
347 }
348
349 static void test_UrlHash(void)
350 {
351   hash_url(TEST_URL_1);
352   hash_url(TEST_URL_2);
353   hash_url(TEST_URL_3);
354 }
355
356 /* ########################### */
357
358 static void test_url_part(const char* szUrl, DWORD dwPart, DWORD dwFlags, const char* szExpected)
359 {
360   CHAR szPart[INTERNET_MAX_URL_LENGTH];
361   WCHAR wszPart[INTERNET_MAX_URL_LENGTH];
362   LPWSTR wszUrl = GetWideString(szUrl);
363   LPWSTR wszConvertedPart;
364
365   DWORD dwSize;
366
367   dwSize = INTERNET_MAX_URL_LENGTH;
368   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);
369   dwSize = INTERNET_MAX_URL_LENGTH;
370   ok( UrlGetPartW(wszUrl, wszPart, &dwSize, dwPart, dwFlags) == S_OK, "UrlGetPartW didn't return S_OK\n" );
371
372   wszConvertedPart = GetWideString(szPart);
373
374   ok(lstrcmpW(wszPart,wszConvertedPart)==0, "Strings didn't match between ascii and unicode UrlGetPart!\n");
375
376   FreeWideString(wszUrl);
377   FreeWideString(wszConvertedPart);
378
379   /* Note that v6.0 and later don't return '?' with the query */
380   ok(strcmp(szPart,szExpected)==0 ||
381      (*szExpected=='?' && !strcmp(szPart,szExpected+1)),
382          "Expected %s, but got %s\n", szExpected, szPart);
383 }
384
385 /* ########################### */
386
387 static void test_UrlGetPart(void)
388 {
389   CHAR szPart[INTERNET_MAX_URL_LENGTH];
390   DWORD dwSize;
391   HRESULT res;
392
393   dwSize = sizeof szPart;
394   szPart[0]='x'; szPart[1]=0;
395   res = UrlGetPartA("hi", szPart, &dwSize, URL_PART_SCHEME, 0);
396   todo_wine {
397   ok (res==S_FALSE, "UrlGetPartA(\"hi\") returned %08X\n", res);
398   ok(szPart[0]==0, "UrlGetPartA(\"hi\") return \"%s\" instead of \"\"\n", szPart);
399   }
400   dwSize = sizeof szPart;
401   szPart[0]='x'; szPart[1]=0;
402   res = UrlGetPartA("hi", szPart, &dwSize, URL_PART_QUERY, 0);
403   todo_wine {
404   ok (res==S_FALSE, "UrlGetPartA(\"hi\") returned %08X\n", res);
405   ok(szPart[0]==0, "UrlGetPartA(\"hi\") return \"%s\" instead of \"\"\n", szPart);
406   }
407
408   test_url_part(TEST_URL_3, URL_PART_HOSTNAME, 0, "localhost");
409   test_url_part(TEST_URL_3, URL_PART_PORT, 0, "21");
410   test_url_part(TEST_URL_3, URL_PART_USERNAME, 0, "foo");
411   test_url_part(TEST_URL_3, URL_PART_PASSWORD, 0, "bar");
412   test_url_part(TEST_URL_3, URL_PART_SCHEME, 0, "http");
413   test_url_part(TEST_URL_3, URL_PART_QUERY, 0, "?query=x&return=y");
414 }
415
416 /* ########################### */
417
418 static void test_url_escape(const char *szUrl, DWORD dwFlags, HRESULT dwExpectReturn, const char *szExpectUrl)
419 {
420     CHAR szReturnUrl[INTERNET_MAX_URL_LENGTH];
421     DWORD dwEscaped;
422     WCHAR ret_urlW[INTERNET_MAX_URL_LENGTH];
423     WCHAR *urlW, *expected_urlW;
424     dwEscaped=INTERNET_MAX_URL_LENGTH;
425
426     ok(UrlEscapeA(szUrl, szReturnUrl, &dwEscaped, dwFlags) == dwExpectReturn, "UrlEscapeA didn't return 0x%08x from \"%s\"\n", dwExpectReturn, szUrl);
427     ok(strcmp(szReturnUrl,szExpectUrl)==0, "Expected \"%s\", but got \"%s\" from \"%s\"\n", szExpectUrl, szReturnUrl, szUrl);
428
429     dwEscaped = INTERNET_MAX_URL_LENGTH;
430     urlW = GetWideString(szUrl);
431     expected_urlW = GetWideString(szExpectUrl);
432     ok(UrlEscapeW(urlW, ret_urlW, &dwEscaped, dwFlags) == dwExpectReturn, "UrlEscapeW didn't return 0x%08x from \"%s\"\n", dwExpectReturn, szUrl);
433     WideCharToMultiByte(CP_ACP,0,ret_urlW,-1,szReturnUrl,INTERNET_MAX_URL_LENGTH,0,0);
434     ok(lstrcmpW(ret_urlW, expected_urlW)==0, "Expected \"%s\", but got \"%s\" from \"%s\" flags %08x\n", szExpectUrl, szReturnUrl, szUrl, dwFlags);
435     FreeWideString(urlW);
436     FreeWideString(expected_urlW);
437
438 }
439
440 static void test_url_canonicalize(int index, const char *szUrl, DWORD dwFlags, HRESULT dwExpectReturn, const char *szExpectUrl, BOOL todo)
441 {
442     CHAR szReturnUrl[INTERNET_MAX_URL_LENGTH];
443     WCHAR wszReturnUrl[INTERNET_MAX_URL_LENGTH];
444     LPWSTR wszUrl = GetWideString(szUrl);
445     LPWSTR wszExpectUrl = GetWideString(szExpectUrl);
446     LPWSTR wszConvertedUrl;
447
448     DWORD dwSize;
449
450     dwSize = INTERNET_MAX_URL_LENGTH;
451     ok(UrlCanonicalizeA(szUrl, NULL, &dwSize, dwFlags) != dwExpectReturn, "Unexpected return for NULL buffer, index %d\n", index);
452     ok(UrlCanonicalizeA(szUrl, szReturnUrl, &dwSize, dwFlags) == dwExpectReturn, "UrlCanonicalizeA didn't return 0x%08x, index %d\n", dwExpectReturn, index);
453     if (todo)
454         todo_wine
455         ok(strcmp(szReturnUrl,szExpectUrl)==0, "UrlCanonicalizeA dwFlags 0x%08x url '%s' Expected \"%s\", but got \"%s\", index %d\n", dwFlags, szUrl, szExpectUrl, szReturnUrl, index);
456     else
457         ok(strcmp(szReturnUrl,szExpectUrl)==0, "UrlCanonicalizeA dwFlags 0x%08x url '%s' Expected \"%s\", but got \"%s\", index %d\n", dwFlags, szUrl, szExpectUrl, szReturnUrl, index);
458
459     dwSize = INTERNET_MAX_URL_LENGTH;
460     ok(UrlCanonicalizeW(wszUrl, NULL, &dwSize, dwFlags) != dwExpectReturn, "Unexpected return for NULL buffer, index %d\n", index);
461     ok(UrlCanonicalizeW(wszUrl, wszReturnUrl, &dwSize, dwFlags) == dwExpectReturn, "UrlCanonicalizeW didn't return 0x%08x, index %d\n", dwExpectReturn, index);
462     wszConvertedUrl = GetWideString(szReturnUrl);
463     ok(lstrcmpW(wszReturnUrl, wszConvertedUrl)==0, "Strings didn't match between ascii and unicode UrlCanonicalize, index %d!\n", index);
464     FreeWideString(wszConvertedUrl);
465
466
467     FreeWideString(wszUrl);
468     FreeWideString(wszExpectUrl);
469 }
470
471
472 static void test_UrlEscape(void)
473 {
474     DWORD size = 0;
475     HRESULT ret;
476     unsigned int i;
477     char empty_string[] = "";
478
479     ret = UrlEscapeA("/woningplan/woonkamer basis.swf", NULL, &size, URL_ESCAPE_SPACES_ONLY);
480     ok(ret == E_INVALIDARG, "got %x, expected %x\n", ret, E_INVALIDARG);
481     ok(size == 0, "got %d, expected %d\n", size, 0);
482
483     size = 0;
484     ret = UrlEscapeA("/woningplan/woonkamer basis.swf", empty_string, &size, URL_ESCAPE_SPACES_ONLY);
485     ok(ret == E_INVALIDARG, "got %x, expected %x\n", ret, E_INVALIDARG);
486     ok(size == 0, "got %d, expected %d\n", size, 0);
487
488     size = 1;
489     ret = UrlEscapeA("/woningplan/woonkamer basis.swf", NULL, &size, URL_ESCAPE_SPACES_ONLY);
490     ok(ret == E_INVALIDARG, "got %x, expected %x\n", ret, E_INVALIDARG);
491     ok(size == 1, "got %d, expected %d\n", size, 1);
492
493     size = 1;
494     ret = UrlEscapeA("/woningplan/woonkamer basis.swf", empty_string, NULL, URL_ESCAPE_SPACES_ONLY);
495     ok(ret == E_INVALIDARG, "got %x, expected %x\n", ret, E_INVALIDARG);
496     ok(size == 1, "got %d, expected %d\n", size, 1);
497
498     size = 1;
499     ret = UrlEscapeA("/woningplan/woonkamer basis.swf", empty_string, &size, URL_ESCAPE_SPACES_ONLY);
500     ok(ret == E_POINTER, "got %x, expected %x\n", ret, E_POINTER);
501     ok(size == 34, "got %d, expected %d\n", size, 34);
502
503     for(i=0; i<sizeof(TEST_ESCAPE)/sizeof(TEST_ESCAPE[0]); i++) {
504         test_url_escape(TEST_ESCAPE[i].url, TEST_ESCAPE[i].flags,
505                               TEST_ESCAPE[i].expectret, TEST_ESCAPE[i].expecturl);
506     }
507 }
508
509 /* ########################### */
510
511 static void test_UrlCanonicalizeA(void)
512 {
513     unsigned int i;
514     CHAR szReturnUrl[INTERNET_MAX_URL_LENGTH];
515     DWORD dwSize;
516     DWORD urllen;
517     HRESULT hr;
518
519     urllen = lstrlenA(winehqA);
520
521     /* buffer has no space for the result */
522     dwSize=urllen-1;
523     memset(szReturnUrl, '#', urllen+4);
524     szReturnUrl[urllen+4] = '\0';
525     SetLastError(0xdeadbeef);
526     hr = UrlCanonicalizeA(winehqA, szReturnUrl, &dwSize, URL_WININET_COMPATIBILITY  | URL_ESCAPE_UNSAFE);
527     ok( (hr == E_POINTER) && (dwSize == (urllen + 1)),
528         "got 0x%x with %u and size %u for '%s' and %u (expected 'E_POINTER' and size %u)\n",
529         hr, GetLastError(), dwSize, szReturnUrl, lstrlenA(szReturnUrl), urllen+1);
530
531     /* buffer has no space for the terminating '\0' */
532     dwSize=urllen;
533     memset(szReturnUrl, '#', urllen+4);
534     szReturnUrl[urllen+4] = '\0';
535     SetLastError(0xdeadbeef);
536     hr = UrlCanonicalizeA(winehqA, szReturnUrl, &dwSize, URL_WININET_COMPATIBILITY | URL_ESCAPE_UNSAFE);
537     ok( (hr == E_POINTER) && (dwSize == (urllen + 1)),
538         "got 0x%x with %u and size %u for '%s' and %u (expected 'E_POINTER' and size %u)\n",
539         hr, GetLastError(), dwSize, szReturnUrl, lstrlenA(szReturnUrl), urllen+1);
540
541     /* buffer has the required size */
542     dwSize=urllen+1;
543     memset(szReturnUrl, '#', urllen+4);
544     szReturnUrl[urllen+4] = '\0';
545     SetLastError(0xdeadbeef);
546     hr = UrlCanonicalizeA(winehqA, szReturnUrl, &dwSize, URL_WININET_COMPATIBILITY | URL_ESCAPE_UNSAFE);
547     ok( (hr == S_OK) && (dwSize == urllen),
548         "got 0x%x with %u and size %u for '%s' and %u (expected 'S_OK' and size %u)\n",
549         hr, GetLastError(), dwSize, szReturnUrl, lstrlenA(szReturnUrl), urllen);
550
551     /* buffer is larger as the required size */
552     dwSize=urllen+2;
553     memset(szReturnUrl, '#', urllen+4);
554     szReturnUrl[urllen+4] = '\0';
555     SetLastError(0xdeadbeef);
556     hr = UrlCanonicalizeA(winehqA, szReturnUrl, &dwSize, URL_WININET_COMPATIBILITY | URL_ESCAPE_UNSAFE);
557     ok( (hr == S_OK) && (dwSize == urllen),
558         "got 0x%x with %u and size %u for '%s' and %u (expected 'S_OK' and size %u)\n",
559         hr, GetLastError(), dwSize, szReturnUrl, lstrlenA(szReturnUrl), urllen);
560
561
562     /* test url-modification */
563     for(i=0; i<sizeof(TEST_CANONICALIZE)/sizeof(TEST_CANONICALIZE[0]); i++) {
564         test_url_canonicalize(i, TEST_CANONICALIZE[i].url, TEST_CANONICALIZE[i].flags,
565                               TEST_CANONICALIZE[i].expectret, TEST_CANONICALIZE[i].expecturl,
566                               TEST_CANONICALIZE[i].todo);
567     }
568 }
569
570 /* ########################### */
571
572 static void test_UrlCanonicalizeW(void)
573 {
574     WCHAR szReturnUrl[INTERNET_MAX_URL_LENGTH];
575     DWORD dwSize;
576     DWORD urllen;
577     HRESULT hr;
578
579
580     if (!pUrlCanonicalizeW) {
581         skip("UrlCanonicalizeW\n");
582         return;
583     }
584     urllen = lstrlenW(winehqW);
585
586     /* buffer has no space for the result */
587     dwSize = (urllen-1);
588     memset(szReturnUrl, '#', (urllen+4) * sizeof(WCHAR));
589     szReturnUrl[urllen+4] = '\0';
590     SetLastError(0xdeadbeef);
591     hr = pUrlCanonicalizeW(winehqW, szReturnUrl, &dwSize, URL_WININET_COMPATIBILITY | URL_ESCAPE_UNSAFE);
592     ok( (hr == E_POINTER) && (dwSize == (urllen + 1)),
593         "got 0x%x with %u and size %u for %u (expected 'E_POINTER' and size %u)\n",
594         hr, GetLastError(), dwSize, lstrlenW(szReturnUrl), urllen+1);
595
596
597     /* buffer has no space for the terminating '\0' */
598     dwSize = urllen;
599     memset(szReturnUrl, '#', (urllen+4) * sizeof(WCHAR));
600     szReturnUrl[urllen+4] = '\0';
601     SetLastError(0xdeadbeef);
602     hr = pUrlCanonicalizeW(winehqW, szReturnUrl, &dwSize, URL_WININET_COMPATIBILITY | URL_ESCAPE_UNSAFE);
603     ok( (hr == E_POINTER) && (dwSize == (urllen + 1)),
604         "got 0x%x with %u and size %u for %u (expected 'E_POINTER' and size %u)\n",
605         hr, GetLastError(), dwSize, lstrlenW(szReturnUrl), urllen+1);
606
607     /* buffer has the required size */
608     dwSize = urllen +1;
609     memset(szReturnUrl, '#', (urllen+4) * sizeof(WCHAR));
610     szReturnUrl[urllen+4] = '\0';
611     SetLastError(0xdeadbeef);
612     hr = pUrlCanonicalizeW(winehqW, szReturnUrl, &dwSize, URL_WININET_COMPATIBILITY | URL_ESCAPE_UNSAFE);
613     ok( (hr == S_OK) && (dwSize == urllen),
614         "got 0x%x with %u and size %u for %u (expected 'S_OK' and size %u)\n",
615         hr, GetLastError(), dwSize, lstrlenW(szReturnUrl), urllen);
616
617     /* buffer is larger as the required size */
618     dwSize = (urllen+2);
619     memset(szReturnUrl, '#', (urllen+4) * sizeof(WCHAR));
620     szReturnUrl[urllen+4] = '\0';
621     SetLastError(0xdeadbeef);
622     hr = pUrlCanonicalizeW(winehqW, szReturnUrl, &dwSize, URL_WININET_COMPATIBILITY | URL_ESCAPE_UNSAFE);
623     ok( (hr == S_OK) && (dwSize == urllen),
624         "got 0x%x with %u and size %u for %u (expected 'S_OK' and size %u)\n",
625         hr, GetLastError(), dwSize, lstrlenW(szReturnUrl), urllen);
626
627 }
628
629 /* ########################### */
630
631 static void test_url_combine(const char *szUrl1, const char *szUrl2, DWORD dwFlags, HRESULT dwExpectReturn, const char *szExpectUrl)
632 {
633     HRESULT hr;
634     CHAR szReturnUrl[INTERNET_MAX_URL_LENGTH];
635     WCHAR wszReturnUrl[INTERNET_MAX_URL_LENGTH];
636     LPWSTR wszUrl1 = GetWideString(szUrl1);
637     LPWSTR wszUrl2 = GetWideString(szUrl2);
638     LPWSTR wszExpectUrl = GetWideString(szExpectUrl);
639     LPWSTR wszConvertedUrl;
640
641     DWORD dwSize;
642     DWORD dwExpectLen = lstrlen(szExpectUrl);
643
644     hr = UrlCombineA(szUrl1, szUrl2, NULL, NULL, dwFlags);
645     ok(hr == E_INVALIDARG, "UrlCombineA returned 0x%08x, expected 0x%08x\n", hr, E_INVALIDARG);
646
647     dwSize = 0;
648     hr = UrlCombineA(szUrl1, szUrl2, NULL, &dwSize, dwFlags);
649     ok(hr == E_POINTER, "Checking length of string, return was 0x%08x, expected 0x%08x\n", hr, E_POINTER);
650     ok(dwSize == dwExpectLen+1, "Got length %d, expected %d\n", dwSize, dwExpectLen+1);
651
652     dwSize--;
653     hr = UrlCombineA(szUrl1, szUrl2, szReturnUrl, &dwSize, dwFlags);
654     ok(hr == E_POINTER, "UrlCombineA returned 0x%08x, expected 0x%08x\n", hr, E_POINTER);
655     ok(dwSize == dwExpectLen+1, "Got length %d, expected %d\n", dwSize, dwExpectLen+1);
656
657     hr = UrlCombineA(szUrl1, szUrl2, szReturnUrl, &dwSize, dwFlags);
658     ok(hr == dwExpectReturn, "UrlCombineA returned 0x%08x, expected 0x%08x\n", hr, dwExpectReturn);
659     ok(dwSize == dwExpectLen, "Got length %d, expected %d\n", dwSize, dwExpectLen);
660     if(SUCCEEDED(hr)) {
661         ok(strcmp(szReturnUrl,szExpectUrl)==0, "Expected %s, but got %s\n", szExpectUrl, szReturnUrl);
662     }
663
664     dwSize = 0;
665     hr = UrlCombineW(wszUrl1, wszUrl2, NULL, &dwSize, dwFlags);
666     ok(hr == E_POINTER, "Checking length of string, return was 0x%08x, expected 0x%08x\n", hr, E_POINTER);
667     ok(dwSize == dwExpectLen+1, "Got length %d, expected %d\n", dwSize, dwExpectLen+1);
668
669     dwSize--;
670     hr = UrlCombineW(wszUrl1, wszUrl2, wszReturnUrl, &dwSize, dwFlags);
671     ok(hr == E_POINTER, "UrlCombineA returned 0x%08x, expected 0x%08x\n", hr, E_POINTER);
672     ok(dwSize == dwExpectLen+1, "Got length %d, expected %d\n", dwSize, dwExpectLen+1);
673
674     hr = UrlCombineW(wszUrl1, wszUrl2, wszReturnUrl, &dwSize, dwFlags);
675     ok(hr == dwExpectReturn, "UrlCombineW returned 0x%08x, expected 0x%08x\n", hr, dwExpectReturn);
676     ok(dwSize == dwExpectLen, "Got length %d, expected %d\n", dwSize, dwExpectLen);
677     if(SUCCEEDED(hr)) {
678         wszConvertedUrl = GetWideString(szReturnUrl);
679         ok(lstrcmpW(wszReturnUrl, wszConvertedUrl)==0, "Strings didn't match between ascii and unicode UrlCombine!\n");
680         FreeWideString(wszConvertedUrl);
681     }
682
683     FreeWideString(wszUrl1);
684     FreeWideString(wszUrl2);
685     FreeWideString(wszExpectUrl);
686 }
687
688 /* ########################### */
689
690 static void test_UrlCombine(void)
691 {
692     unsigned int i;
693     for(i=0; i<sizeof(TEST_COMBINE)/sizeof(TEST_COMBINE[0]); i++) {
694         test_url_combine(TEST_COMBINE[i].url1, TEST_COMBINE[i].url2, TEST_COMBINE[i].flags,
695                          TEST_COMBINE[i].expectret, TEST_COMBINE[i].expecturl);
696     }
697 }
698
699 /* ########################### */
700
701 static void test_UrlCreateFromPath(void)
702 {
703     size_t i;
704     char ret_url[INTERNET_MAX_URL_LENGTH];
705     DWORD len, ret;
706     WCHAR ret_urlW[INTERNET_MAX_URL_LENGTH];
707     WCHAR *pathW, *urlW;
708
709     for(i = 0; i < sizeof(TEST_URLFROMPATH) / sizeof(TEST_URLFROMPATH[0]); i++) {
710         len = INTERNET_MAX_URL_LENGTH;
711         ret = UrlCreateFromPathA(TEST_URLFROMPATH[i].path, ret_url, &len, 0);
712         ok(ret == TEST_URLFROMPATH[i].ret, "ret %08x from path %s\n", ret, TEST_URLFROMPATH[i].path);
713         ok(!lstrcmpi(ret_url, TEST_URLFROMPATH[i].url), "url %s from path %s\n", ret_url, TEST_URLFROMPATH[i].path);
714         ok(len == strlen(ret_url), "ret len %d from path %s\n", len, TEST_URLFROMPATH[i].path);
715
716         len = INTERNET_MAX_URL_LENGTH;
717         pathW = GetWideString(TEST_URLFROMPATH[i].path);
718         urlW = GetWideString(TEST_URLFROMPATH[i].url);
719         ret = UrlCreateFromPathW(pathW, ret_urlW, &len, 0);
720         WideCharToMultiByte(CP_ACP, 0, ret_urlW, -1, ret_url, sizeof(ret_url),0,0);
721         ok(ret == TEST_URLFROMPATH[i].ret, "ret %08x from path L\"%s\", expected %08x\n",
722            ret, TEST_URLFROMPATH[i].path, TEST_URLFROMPATH[i].ret);
723         ok(!lstrcmpiW(ret_urlW, urlW), "got %s expected %s from path L\"%s\"\n", ret_url, TEST_URLFROMPATH[i].url, TEST_URLFROMPATH[i].path);
724         ok(len == lstrlenW(ret_urlW), "ret len %d from path L\"%s\"\n", len, TEST_URLFROMPATH[i].path);
725         FreeWideString(urlW);
726         FreeWideString(pathW);
727     }
728 }
729
730 /* ########################### */
731
732 static void test_UrlIs(void)
733 {
734     BOOL ret;
735     size_t i;
736     WCHAR wurl[80];
737
738     for(i = 0; i < sizeof(TEST_PATH_IS_URL) / sizeof(TEST_PATH_IS_URL[0]); i++) {
739         MultiByteToWideChar(CP_ACP, 0, TEST_PATH_IS_URL[i].path, -1, wurl, 80);
740
741         ret = UrlIsA( TEST_PATH_IS_URL[i].path, URLIS_URL );
742         ok( ret == TEST_PATH_IS_URL[i].expect,
743             "returned %d from path %s, expected %d\n", ret, TEST_PATH_IS_URL[i].path,
744             TEST_PATH_IS_URL[i].expect );
745
746         ret = UrlIsW( wurl, URLIS_URL );
747         ok( ret == TEST_PATH_IS_URL[i].expect,
748             "returned %d from path (UrlIsW) %s, expected %d\n", ret, TEST_PATH_IS_URL[i].path,
749             TEST_PATH_IS_URL[i].expect );
750     }
751     for(i = 0; i < sizeof(TEST_URLIS_ATTRIBS) / sizeof(TEST_URLIS_ATTRIBS[0]); i++) {
752         MultiByteToWideChar(CP_ACP, 0, TEST_URLIS_ATTRIBS[i].url, -1, wurl, 80);
753
754         ret = UrlIsA( TEST_URLIS_ATTRIBS[i].url, URLIS_OPAQUE);
755         ok( ret == TEST_URLIS_ATTRIBS[i].expectOpaque,
756             "returned %d for URLIS_OPAQUE, url \"%s\", expected %d\n", ret, TEST_URLIS_ATTRIBS[i].url,
757             TEST_URLIS_ATTRIBS[i].expectOpaque );
758         ret = UrlIsA( TEST_URLIS_ATTRIBS[i].url, URLIS_FILEURL);
759         ok( ret == TEST_URLIS_ATTRIBS[i].expectFile,
760             "returned %d for URLIS_FILEURL, url \"%s\", expected %d\n", ret, TEST_URLIS_ATTRIBS[i].url,
761             TEST_URLIS_ATTRIBS[i].expectFile );
762
763         ret = UrlIsW( wurl, URLIS_OPAQUE);
764         ok( ret == TEST_URLIS_ATTRIBS[i].expectOpaque,
765             "returned %d for URLIS_OPAQUE (UrlIsW), url \"%s\", expected %d\n", ret, TEST_URLIS_ATTRIBS[i].url,
766             TEST_URLIS_ATTRIBS[i].expectOpaque );
767         ret = UrlIsW( wurl, URLIS_FILEURL);
768         ok( ret == TEST_URLIS_ATTRIBS[i].expectFile,
769             "returned %d for URLIS_FILEURL (UrlIsW), url \"%s\", expected %d\n", ret, TEST_URLIS_ATTRIBS[i].url,
770             TEST_URLIS_ATTRIBS[i].expectFile );
771     }
772 }
773
774 /* ########################### */
775
776 static void test_UrlUnescape(void)
777 {
778     CHAR szReturnUrl[INTERNET_MAX_URL_LENGTH];
779     WCHAR ret_urlW[INTERNET_MAX_URL_LENGTH];
780     WCHAR *urlW, *expected_urlW;
781     DWORD dwEscaped;
782     size_t i;
783     static char inplace[] = "file:///C:/Program%20Files";
784     static WCHAR inplaceW[] = {'f','i','l','e',':','/','/','/','C',':','/',
785                                'P','r','o','g','r','a','m','%','2','0','F','i','l','e','s',0};
786
787     for(i=0; i<sizeof(TEST_URL_UNESCAPE)/sizeof(TEST_URL_UNESCAPE[0]); i++) {
788         dwEscaped=INTERNET_MAX_URL_LENGTH;
789         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);
790         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);
791
792         dwEscaped = INTERNET_MAX_URL_LENGTH;
793         urlW = GetWideString(TEST_URL_UNESCAPE[i].url);
794         expected_urlW = GetWideString(TEST_URL_UNESCAPE[i].expect);
795         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);
796         WideCharToMultiByte(CP_ACP,0,ret_urlW,-1,szReturnUrl,INTERNET_MAX_URL_LENGTH,0,0);
797         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);
798         FreeWideString(urlW);
799         FreeWideString(expected_urlW);
800     }
801
802     dwEscaped = sizeof(inplace);
803     ok(UrlUnescapeA(inplace, NULL, &dwEscaped, URL_UNESCAPE_INPLACE) == S_OK, "UrlUnescapeA failed unexpectedly\n");
804
805     dwEscaped = sizeof(inplaceW);
806     ok(UrlUnescapeW(inplaceW, NULL, &dwEscaped, URL_UNESCAPE_INPLACE) == S_OK, "UrlUnescapeW failed unexpectedly\n");
807 }
808
809 /* ########################### */
810
811 START_TEST(url)
812 {
813
814   hShlwapi = GetModuleHandleA("shlwapi.dll");
815   pUrlCanonicalizeW = (void *) GetProcAddress(hShlwapi, "UrlCanonicalizeW");
816
817   test_UrlHash();
818   test_UrlGetPart();
819   test_UrlCanonicalizeA();
820   test_UrlCanonicalizeW();
821   test_UrlEscape();
822   test_UrlCombine();
823   test_UrlCreateFromPath();
824   test_UrlIs();
825   test_UrlUnescape();
826
827 }