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