kernel32: Add a test for CreateFile when using OPEN_ALWAYS on directories.
[wine] / dlls / wininet / cookie.c
1 /*
2  * Wininet - cookie handling stuff
3  *
4  * Copyright 2002 TransGaming Technologies Inc.
5  *
6  * David Hammerton
7  *
8  * This library is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU Lesser General Public
10  * License as published by the Free Software Foundation; either
11  * version 2.1 of the License, or (at your option) any later version.
12  *
13  * This library is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
16  * Lesser General Public License for more details.
17  *
18  * You should have received a copy of the GNU Lesser General Public
19  * License along with this library; if not, write to the Free Software
20  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
21  */
22
23 #include "config.h"
24 #include "wine/port.h"
25
26 #include <stdarg.h>
27 #include <stdio.h>
28 #include <stdlib.h>
29 #include <string.h>
30 #ifdef HAVE_UNISTD_H
31 # include <unistd.h>
32 #endif
33
34 #include "windef.h"
35 #include "winbase.h"
36 #include "wininet.h"
37 #include "winerror.h"
38
39 #include "wine/debug.h"
40 #include "internet.h"
41
42 #define RESPONSE_TIMEOUT        30            /* FROM internet.c */
43
44
45 WINE_DEFAULT_DEBUG_CHANNEL(wininet);
46
47 /* FIXME
48  *     Cookies are currently memory only.
49  *     Cookies are NOT THREAD SAFE
50  *     Cookies could use A LOT OF MEMORY. We need some kind of memory management here!
51  *     Cookies should care about the expiry time
52  */
53
54 typedef struct _cookie_domain cookie_domain;
55 typedef struct _cookie cookie;
56
57 struct _cookie
58 {
59     struct list entry;
60
61     struct _cookie_domain *parent;
62
63     LPWSTR lpCookieName;
64     LPWSTR lpCookieData;
65     time_t expiry; /* FIXME: not used */
66 };
67
68 struct _cookie_domain
69 {
70     struct list entry;
71
72     LPWSTR lpCookieDomain;
73     LPWSTR lpCookiePath;
74     struct list cookie_list;
75 };
76
77 static struct list domain_list = LIST_INIT(domain_list);
78
79 static cookie *COOKIE_addCookie(cookie_domain *domain, LPCWSTR name, LPCWSTR data);
80 static cookie *COOKIE_findCookie(cookie_domain *domain, LPCWSTR lpszCookieName);
81 static void COOKIE_deleteCookie(cookie *deadCookie, BOOL deleteDomain);
82 static cookie_domain *COOKIE_addDomain(LPCWSTR domain, LPCWSTR path);
83 static void COOKIE_deleteDomain(cookie_domain *deadDomain);
84
85
86 /* adds a cookie to the domain */
87 static cookie *COOKIE_addCookie(cookie_domain *domain, LPCWSTR name, LPCWSTR data)
88 {
89     cookie *newCookie = HeapAlloc(GetProcessHeap(), 0, sizeof(cookie));
90
91     list_init(&newCookie->entry);
92     newCookie->lpCookieName = NULL;
93     newCookie->lpCookieData = NULL;
94
95     if (name)
96     {
97         newCookie->lpCookieName = HeapAlloc(GetProcessHeap(), 0, (strlenW(name) + 1)*sizeof(WCHAR));
98         lstrcpyW(newCookie->lpCookieName, name);
99     }
100     if (data)
101     {
102         newCookie->lpCookieData = HeapAlloc(GetProcessHeap(), 0, (strlenW(data) + 1)*sizeof(WCHAR));
103         lstrcpyW(newCookie->lpCookieData, data);
104     }
105
106     TRACE("added cookie %p (data is %s)\n", newCookie, debugstr_w(data) );
107
108     list_add_tail(&domain->cookie_list, &newCookie->entry);
109     newCookie->parent = domain;
110     return newCookie;
111 }
112
113
114 /* finds a cookie in the domain matching the cookie name */
115 static cookie *COOKIE_findCookie(cookie_domain *domain, LPCWSTR lpszCookieName)
116 {
117     struct list * cursor;
118     TRACE("(%p, %s)\n", domain, debugstr_w(lpszCookieName));
119
120     LIST_FOR_EACH(cursor, &domain->cookie_list)
121     {
122         cookie *searchCookie = LIST_ENTRY(cursor, cookie, entry);
123         BOOL candidate = TRUE;
124         if (candidate && lpszCookieName)
125         {
126             if (candidate && !searchCookie->lpCookieName)
127                 candidate = FALSE;
128             if (candidate && strcmpW(lpszCookieName, searchCookie->lpCookieName) != 0)
129                 candidate = FALSE;
130         }
131         if (candidate)
132             return searchCookie;
133     }
134     return NULL;
135 }
136
137 /* removes a cookie from the list, if its the last cookie we also remove the domain */
138 static void COOKIE_deleteCookie(cookie *deadCookie, BOOL deleteDomain)
139 {
140     HeapFree(GetProcessHeap(), 0, deadCookie->lpCookieName);
141     HeapFree(GetProcessHeap(), 0, deadCookie->lpCookieData);
142     list_remove(&deadCookie->entry);
143
144     /* special case: last cookie, lets remove the domain to save memory */
145     if (list_empty(&deadCookie->parent->cookie_list) && deleteDomain)
146         COOKIE_deleteDomain(deadCookie->parent);
147     HeapFree(GetProcessHeap(), 0, deadCookie);
148 }
149
150 /* allocates a domain and adds it to the end */
151 static cookie_domain *COOKIE_addDomain(LPCWSTR domain, LPCWSTR path)
152 {
153     cookie_domain *newDomain = HeapAlloc(GetProcessHeap(), 0, sizeof(cookie_domain));
154
155     list_init(&newDomain->entry);
156     list_init(&newDomain->cookie_list);
157     newDomain->lpCookieDomain = NULL;
158     newDomain->lpCookiePath = NULL;
159
160     if (domain)
161     {
162         newDomain->lpCookieDomain = HeapAlloc(GetProcessHeap(), 0, (strlenW(domain) + 1)*sizeof(WCHAR));
163         strcpyW(newDomain->lpCookieDomain, domain);
164     }
165     if (path)
166     {
167         newDomain->lpCookiePath = HeapAlloc(GetProcessHeap(), 0, (strlenW(path) + 1)*sizeof(WCHAR));
168         lstrcpyW(newDomain->lpCookiePath, path);
169     }
170
171     list_add_tail(&domain_list, &newDomain->entry);
172
173     TRACE("Adding domain: %p\n", newDomain);
174     return newDomain;
175 }
176
177 static BOOL COOKIE_crackUrlSimple(LPCWSTR lpszUrl, LPWSTR hostName, int hostNameLen, LPWSTR path, int pathLen)
178 {
179     URL_COMPONENTSW UrlComponents;
180
181     UrlComponents.lpszExtraInfo = NULL;
182     UrlComponents.lpszPassword = NULL;
183     UrlComponents.lpszScheme = NULL;
184     UrlComponents.lpszUrlPath = path;
185     UrlComponents.lpszUserName = NULL;
186     UrlComponents.lpszHostName = hostName;
187     UrlComponents.dwExtraInfoLength = 0;
188     UrlComponents.dwPasswordLength = 0;
189     UrlComponents.dwSchemeLength = 0;
190     UrlComponents.dwUserNameLength = 0;
191     UrlComponents.dwHostNameLength = hostNameLen;
192     UrlComponents.dwUrlPathLength = pathLen;
193
194     return InternetCrackUrlW(lpszUrl, 0, 0, &UrlComponents);
195 }
196
197 /* match a domain. domain must match if the domain is not NULL. path must match if the path is not NULL */
198 static BOOL COOKIE_matchDomain(LPCWSTR lpszCookieDomain, LPCWSTR lpszCookiePath,
199                                cookie_domain *searchDomain, BOOL allow_partial)
200 {
201     TRACE("searching on domain %p\n", searchDomain);
202         if (lpszCookieDomain)
203         {
204             if (!searchDomain->lpCookieDomain)
205             return FALSE;
206
207             TRACE("comparing domain %s with %s\n", 
208             debugstr_w(lpszCookieDomain), 
209             debugstr_w(searchDomain->lpCookieDomain));
210
211         if (allow_partial && !strstrW(lpszCookieDomain, searchDomain->lpCookieDomain))
212             return FALSE;
213         else if (!allow_partial && lstrcmpW(lpszCookieDomain, searchDomain->lpCookieDomain) != 0)
214             return FALSE;
215         }
216     if (lpszCookiePath)
217     {
218         TRACE("comparing paths: %s with %s\n", debugstr_w(lpszCookiePath), debugstr_w(searchDomain->lpCookiePath));
219         if (!searchDomain->lpCookiePath)
220             return FALSE;
221         if (strcmpW(lpszCookiePath, searchDomain->lpCookiePath))
222             return FALSE;
223         }
224         return TRUE;
225 }
226
227 /* remove a domain from the list and delete it */
228 static void COOKIE_deleteDomain(cookie_domain *deadDomain)
229 {
230     struct list * cursor;
231     while ((cursor = list_tail(&deadDomain->cookie_list)))
232     {
233         COOKIE_deleteCookie(LIST_ENTRY(cursor, cookie, entry), FALSE);
234         list_remove(cursor);
235     }
236
237     HeapFree(GetProcessHeap(), 0, deadDomain->lpCookieDomain);
238     HeapFree(GetProcessHeap(), 0, deadDomain->lpCookiePath);
239
240     list_remove(&deadDomain->entry);
241
242     HeapFree(GetProcessHeap(), 0, deadDomain);
243 }
244
245 /***********************************************************************
246  *           InternetGetCookieW (WININET.@)
247  *
248  * Retrieve cookie from the specified url
249  *
250  *  It should be noted that on windows the lpszCookieName parameter is "not implemented".
251  *    So it won't be implemented here.
252  *
253  * RETURNS
254  *    TRUE  on success
255  *    FALSE on failure
256  *
257  */
258 BOOL WINAPI InternetGetCookieW(LPCWSTR lpszUrl, LPCWSTR lpszCookieName,
259     LPWSTR lpCookieData, LPDWORD lpdwSize)
260 {
261     BOOL ret;
262     struct list * cursor;
263     unsigned int cnt = 0, domain_count = 0, cookie_count = 0;
264     WCHAR hostName[2048], path[2048];
265
266     TRACE("(%s, %s, %p, %p)\n", debugstr_w(lpszUrl),debugstr_w(lpszCookieName),
267           lpCookieData, lpdwSize);
268
269     if (!lpszUrl)
270     {
271         SetLastError(ERROR_INVALID_PARAMETER);
272         return FALSE;
273     }
274
275     hostName[0] = 0;
276     ret = COOKIE_crackUrlSimple(lpszUrl, hostName, sizeof(hostName)/sizeof(hostName[0]), path, sizeof(path)/sizeof(path[0]));
277     if (!ret || !hostName[0]) return FALSE;
278
279     LIST_FOR_EACH(cursor, &domain_list)
280     {
281         cookie_domain *cookiesDomain = LIST_ENTRY(cursor, cookie_domain, entry);
282         if (COOKIE_matchDomain(hostName, NULL /* FIXME: path */, cookiesDomain, TRUE))
283         {
284             struct list * cursor;
285             domain_count++;
286             TRACE("found domain %p\n", cookiesDomain);
287     
288             LIST_FOR_EACH(cursor, &cookiesDomain->cookie_list)
289             {
290                 cookie *thisCookie = LIST_ENTRY(cursor, cookie, entry);
291                 if (lpCookieData == NULL) /* return the size of the buffer required to lpdwSize */
292                 {
293                     unsigned int len;
294
295                     if (cookie_count) cnt += 2; /* '; ' */
296                     cnt += strlenW(thisCookie->lpCookieName);
297                     if ((len = strlenW(thisCookie->lpCookieData)))
298                     {
299                         cnt += 1; /* = */
300                         cnt += len;
301                     }
302                 }
303                 else
304                 {
305                     static const WCHAR szsc[] = { ';',' ',0 };
306                     static const WCHAR szname[] = { '%','s',0 };
307                     static const WCHAR szdata[] = { '=','%','s',0 };
308
309                     if (cookie_count) cnt += snprintfW(lpCookieData + cnt, *lpdwSize - cnt, szsc);
310                     cnt += snprintfW(lpCookieData + cnt, *lpdwSize - cnt, szname, thisCookie->lpCookieName);
311
312                     if (thisCookie->lpCookieData[0])
313                         cnt += snprintfW(lpCookieData + cnt, *lpdwSize - cnt, szdata, thisCookie->lpCookieData);
314
315                     TRACE("Cookie: %s\n", debugstr_w(lpCookieData));
316                 }
317                 cookie_count++;
318             }
319         }
320     }
321
322     if (!domain_count)
323     {
324         TRACE("no cookies found for %s\n", debugstr_w(hostName));
325         SetLastError(ERROR_NO_MORE_ITEMS);
326         return FALSE;
327     }
328
329     if (lpCookieData == NULL)
330     {
331         *lpdwSize = (cnt + 1) * sizeof(WCHAR);
332         TRACE("returning %u\n", *lpdwSize);
333         return TRUE;
334     }
335
336     *lpdwSize = cnt + 1;
337
338     TRACE("Returning %u (from %u domains): %s\n", cnt, domain_count,
339            debugstr_w(lpCookieData));
340
341     return (cnt ? TRUE : FALSE);
342 }
343
344
345 /***********************************************************************
346  *           InternetGetCookieA (WININET.@)
347  *
348  * Retrieve cookie from the specified url
349  *
350  * RETURNS
351  *    TRUE  on success
352  *    FALSE on failure
353  *
354  */
355 BOOL WINAPI InternetGetCookieA(LPCSTR lpszUrl, LPCSTR lpszCookieName,
356     LPSTR lpCookieData, LPDWORD lpdwSize)
357 {
358     DWORD len;
359     LPWSTR szCookieData = NULL, szUrl = NULL, szCookieName = NULL;
360     BOOL r;
361
362     TRACE("(%s,%s,%p)\n", debugstr_a(lpszUrl), debugstr_a(lpszCookieName),
363         lpCookieData);
364
365     if( lpszUrl )
366     {
367         len = MultiByteToWideChar( CP_ACP, 0, lpszUrl, -1, NULL, 0 );
368         szUrl = HeapAlloc( GetProcessHeap(), 0, len * sizeof(WCHAR) );
369         MultiByteToWideChar( CP_ACP, 0, lpszUrl, -1, szUrl, len );
370     }
371
372     if( lpszCookieName )
373     {
374         len = MultiByteToWideChar( CP_ACP, 0, lpszCookieName, -1, NULL, 0 );
375         szCookieName = HeapAlloc( GetProcessHeap(), 0, len * sizeof(WCHAR) );
376         MultiByteToWideChar( CP_ACP, 0, lpszCookieName, -1, szCookieName, len );
377     }
378
379     r = InternetGetCookieW( szUrl, szCookieName, NULL, &len );
380     if( r )
381     {
382         szCookieData = HeapAlloc( GetProcessHeap(), 0, len * sizeof(WCHAR) );
383         if( !szCookieData )
384         {
385             r = FALSE;
386         }
387         else
388         {
389             r = InternetGetCookieW( szUrl, szCookieName, szCookieData, &len );
390
391             *lpdwSize = WideCharToMultiByte( CP_ACP, 0, szCookieData, len,
392                                     lpCookieData, *lpdwSize, NULL, NULL );
393         }
394     }
395
396     HeapFree( GetProcessHeap(), 0, szCookieData );
397     HeapFree( GetProcessHeap(), 0, szCookieName );
398     HeapFree( GetProcessHeap(), 0, szUrl );
399
400     return r;
401 }
402
403 static BOOL set_cookie(LPCWSTR domain, LPCWSTR path, LPCWSTR cookie_name, LPCWSTR cookie_data)
404 {
405     cookie_domain *thisCookieDomain = NULL;
406     cookie *thisCookie;
407     struct list *cursor;
408
409     LIST_FOR_EACH(cursor, &domain_list)
410     {
411         thisCookieDomain = LIST_ENTRY(cursor, cookie_domain, entry);
412         if (COOKIE_matchDomain(domain, NULL /* FIXME: path */, thisCookieDomain, FALSE))
413             break;
414         thisCookieDomain = NULL;
415     }
416
417     if (!thisCookieDomain)
418         thisCookieDomain = COOKIE_addDomain(domain, path);
419
420     if ((thisCookie = COOKIE_findCookie(thisCookieDomain, cookie_name)))
421         COOKIE_deleteCookie(thisCookie, FALSE);
422
423     TRACE("setting cookie %s=%s for domain %s\n", debugstr_w(cookie_name),
424           debugstr_w(cookie_data), debugstr_w(thisCookieDomain->lpCookieDomain));
425
426     if (!COOKIE_addCookie(thisCookieDomain, cookie_name, cookie_data))
427         return FALSE;
428
429     return TRUE;
430 }
431
432 /***********************************************************************
433  *           InternetSetCookieW (WININET.@)
434  *
435  * Sets cookie for the specified url
436  *
437  * RETURNS
438  *    TRUE  on success
439  *    FALSE on failure
440  *
441  */
442 BOOL WINAPI InternetSetCookieW(LPCWSTR lpszUrl, LPCWSTR lpszCookieName,
443     LPCWSTR lpCookieData)
444 {
445     BOOL ret;
446     WCHAR hostName[2048], path[2048];
447
448     TRACE("(%s,%s,%s)\n", debugstr_w(lpszUrl),
449         debugstr_w(lpszCookieName), debugstr_w(lpCookieData));
450
451     if (!lpszUrl || !lpCookieData)
452     {
453         SetLastError(ERROR_INVALID_PARAMETER);
454         return FALSE;
455     }
456
457     hostName[0] = path[0] = 0;
458     ret = COOKIE_crackUrlSimple(lpszUrl, hostName, sizeof(hostName)/sizeof(hostName[0]), path, sizeof(path)/sizeof(path[0]));
459     if (!ret || !hostName[0]) return FALSE;
460
461     if (!lpszCookieName)
462     {
463         unsigned int len;
464         WCHAR *cookie, *data;
465
466         len = strlenW(lpCookieData);
467         if (!(cookie = HeapAlloc(GetProcessHeap(), 0, (len + 1) * sizeof(WCHAR))))
468         {
469             SetLastError(ERROR_OUTOFMEMORY);
470             return FALSE;
471         }
472         strcpyW(cookie, lpCookieData);
473
474         /* some apps (or is it us??) try to add a cookie with no cookie name, but
475          * the cookie data in the form of name[=data].
476          */
477         if (!(data = strchrW(cookie, '='))) data = cookie + len;
478         else data++;
479
480         ret = set_cookie(hostName, path, cookie, data);
481
482         HeapFree(GetProcessHeap(), 0, cookie);
483         return ret;
484     }
485     return set_cookie(hostName, path, lpszCookieName, lpCookieData);
486 }
487
488
489 /***********************************************************************
490  *           InternetSetCookieA (WININET.@)
491  *
492  * Sets cookie for the specified url
493  *
494  * RETURNS
495  *    TRUE  on success
496  *    FALSE on failure
497  *
498  */
499 BOOL WINAPI InternetSetCookieA(LPCSTR lpszUrl, LPCSTR lpszCookieName,
500     LPCSTR lpCookieData)
501 {
502     DWORD len;
503     LPWSTR szCookieData = NULL, szUrl = NULL, szCookieName = NULL;
504     BOOL r;
505
506     TRACE("(%s,%s,%s)\n", debugstr_a(lpszUrl),
507         debugstr_a(lpszCookieName), debugstr_a(lpCookieData));
508
509     if( lpszUrl )
510     {
511         len = MultiByteToWideChar( CP_ACP, 0, lpszUrl, -1, NULL, 0 );
512         szUrl = HeapAlloc( GetProcessHeap(), 0, len * sizeof(WCHAR) );
513         MultiByteToWideChar( CP_ACP, 0, lpszUrl, -1, szUrl, len );
514     }
515
516     if( lpszCookieName )
517     {
518         len = MultiByteToWideChar( CP_ACP, 0, lpszCookieName, -1, NULL, 0 );
519         szCookieName = HeapAlloc( GetProcessHeap(), 0, len * sizeof(WCHAR) );
520         MultiByteToWideChar( CP_ACP, 0, lpszCookieName, -1, szCookieName, len );
521     }
522
523     if( lpCookieData )
524     {
525         len = MultiByteToWideChar( CP_ACP, 0, lpCookieData, -1, NULL, 0 );
526         szCookieData = HeapAlloc( GetProcessHeap(), 0, len * sizeof(WCHAR) );
527         MultiByteToWideChar( CP_ACP, 0, lpCookieData, -1, szCookieData, len );
528     }
529
530     r = InternetSetCookieW( szUrl, szCookieName, szCookieData );
531
532     HeapFree( GetProcessHeap(), 0, szCookieData );
533     HeapFree( GetProcessHeap(), 0, szCookieName );
534     HeapFree( GetProcessHeap(), 0, szUrl );
535
536     return r;
537 }
538
539 /***********************************************************************
540  *           InternetSetCookieExA (WININET.@)
541  *
542  * See InternetSetCookieExW.
543  */
544 DWORD WINAPI InternetSetCookieExA( LPCSTR lpszURL, LPCSTR lpszCookieName, LPCSTR lpszCookieData,
545                                    DWORD dwFlags, DWORD_PTR dwReserved)
546 {
547     TRACE("(%s, %s, %s, 0x%08x, 0x%08lx)\n",
548           debugstr_a(lpszURL), debugstr_a(lpszCookieName), debugstr_a(lpszCookieData),
549           dwFlags, dwReserved);
550
551     if (dwFlags) FIXME("flags 0x%08x not supported\n", dwFlags);
552     return InternetSetCookieA(lpszURL, lpszCookieName, lpszCookieData);
553 }
554
555 /***********************************************************************
556  *           InternetSetCookieExW (WININET.@)
557  *
558  * Sets a cookie for the specified URL.
559  *
560  * RETURNS
561  *    TRUE  on success
562  *    FALSE on failure
563  *
564  */
565 DWORD WINAPI InternetSetCookieExW( LPCWSTR lpszURL, LPCWSTR lpszCookieName, LPCWSTR lpszCookieData,
566                                    DWORD dwFlags, DWORD_PTR dwReserved)
567 {
568     TRACE("(%s, %s, %s, 0x%08x, 0x%08lx)\n",
569           debugstr_w(lpszURL), debugstr_w(lpszCookieName), debugstr_w(lpszCookieData),
570           dwFlags, dwReserved);
571
572     if (dwFlags) FIXME("flags 0x%08x not supported\n", dwFlags);
573     return InternetSetCookieW(lpszURL, lpszCookieName, lpszCookieData);
574 }
575
576 /***********************************************************************
577  *           InternetGetCookieExA (WININET.@)
578  *
579  * See InternetGetCookieExW.
580  */
581 BOOL WINAPI InternetGetCookieExA( LPCSTR pchURL, LPCSTR pchCookieName, LPSTR pchCookieData,
582                                   LPDWORD pcchCookieData, DWORD dwFlags, LPVOID lpReserved)
583 {
584     TRACE("(%s, %s, %s, %p, 0x%08x, %p)\n",
585           debugstr_a(pchURL), debugstr_a(pchCookieName), debugstr_a(pchCookieData),
586           pcchCookieData, dwFlags, lpReserved);
587
588     if (dwFlags) FIXME("flags 0x%08x not supported\n", dwFlags);
589     return InternetGetCookieA(pchURL, pchCookieName, pchCookieData, pcchCookieData);
590 }
591
592 /***********************************************************************
593  *           InternetGetCookieExW (WININET.@)
594  *
595  * Retrieve cookie for the specified URL.
596  *
597  * RETURNS
598  *    TRUE  on success
599  *    FALSE on failure
600  *
601  */
602 BOOL WINAPI InternetGetCookieExW( LPCWSTR pchURL, LPCWSTR pchCookieName, LPWSTR pchCookieData,
603                                   LPDWORD pcchCookieData, DWORD dwFlags, LPVOID lpReserved)
604 {
605     TRACE("(%s, %s, %s, %p, 0x%08x, %p)\n",
606           debugstr_w(pchURL), debugstr_w(pchCookieName), debugstr_w(pchCookieData),
607           pcchCookieData, dwFlags, lpReserved);
608
609     if (dwFlags) FIXME("flags 0x%08x not supported\n", dwFlags);
610     return InternetGetCookieW(pchURL, pchCookieName, pchCookieData, pcchCookieData);
611 }
612
613 /***********************************************************************
614  *           InternetClearAllPerSiteCookieDecisions (WININET.@)
615  *
616  * Clears all per-site decisions about cookies.
617  *
618  * RETURNS
619  *    TRUE  on success
620  *    FALSE on failure
621  *
622  */
623 BOOL WINAPI InternetClearAllPerSiteCookieDecisions( VOID )
624 {
625     FIXME("stub\n");
626     return TRUE;
627 }
628
629 /***********************************************************************
630  *           InternetEnumPerSiteCookieDecisionA (WININET.@)
631  *
632  * See InternetEnumPerSiteCookieDecisionW.
633  */
634 BOOL WINAPI InternetEnumPerSiteCookieDecisionA( LPSTR pszSiteName, ULONG *pcSiteNameSize,
635                                                 ULONG *pdwDecision, ULONG dwIndex )
636 {
637     FIXME("(%s, %p, %p, 0x%08x) stub\n",
638           debugstr_a(pszSiteName), pcSiteNameSize, pdwDecision, dwIndex);
639     return FALSE;
640 }
641
642 /***********************************************************************
643  *           InternetEnumPerSiteCookieDecisionW (WININET.@)
644  *
645  * Enumerates all per-site decisions about cookies.
646  *
647  * RETURNS
648  *    TRUE  on success
649  *    FALSE on failure
650  *
651  */
652 BOOL WINAPI InternetEnumPerSiteCookieDecisionW( LPWSTR pszSiteName, ULONG *pcSiteNameSize,
653                                                 ULONG *pdwDecision, ULONG dwIndex )
654 {
655     FIXME("(%s, %p, %p, 0x%08x) stub\n",
656           debugstr_w(pszSiteName), pcSiteNameSize, pdwDecision, dwIndex);
657     return FALSE;
658 }
659
660 /***********************************************************************
661  *           InternetGetPerSiteCookieDecisionA (WININET.@)
662  */
663 BOOL WINAPI InternetGetPerSiteCookieDecisionA( LPCSTR pwchHostName, ULONG *pResult )
664 {
665     FIXME("(%s, %p) stub\n", debugstr_a(pwchHostName), pResult);
666     return FALSE;
667 }
668
669 /***********************************************************************
670  *           InternetGetPerSiteCookieDecisionW (WININET.@)
671  */
672 BOOL WINAPI InternetGetPerSiteCookieDecisionW( LPCWSTR pwchHostName, ULONG *pResult )
673 {
674     FIXME("(%s, %p) stub\n", debugstr_w(pwchHostName), pResult);
675     return FALSE;
676 }
677
678 /***********************************************************************
679  *           InternetSetPerSiteCookieDecisionA (WININET.@)
680  */
681 BOOL WINAPI InternetSetPerSiteCookieDecisionA( LPCSTR pchHostName, DWORD dwDecision )
682 {
683     FIXME("(%s, 0x%08x) stub\n", debugstr_a(pchHostName), dwDecision);
684     return FALSE;
685 }
686
687 /***********************************************************************
688  *           InternetSetPerSiteCookieDecisionW (WININET.@)
689  */
690 BOOL WINAPI InternetSetPerSiteCookieDecisionW( LPCWSTR pchHostName, DWORD dwDecision )
691 {
692     FIXME("(%s, 0x%08x) stub\n", debugstr_w(pchHostName), dwDecision);
693     return FALSE;
694 }