2 * Copyright 2005 Jacek Caban
4 * This library is free software; you can redistribute it and/or
5 * modify it under the terms of the GNU Lesser General Public
6 * License as published by the Free Software Foundation; either
7 * version 2.1 of the License, or (at your option) any later version.
9 * This library is distributed in the hope that it will be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 * Lesser General Public License for more details.
14 * You should have received a copy of the GNU Lesser General Public
15 * License along with this library; if not, write to the Free Software
16 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
19 #include "urlmon_main.h"
20 #include "wine/debug.h"
22 WINE_DEFAULT_DEBUG_CHANNEL(urlmon
);
25 const IInternetProtocolVtbl
*lpInternetProtocolVtbl
;
26 const IInternetPriorityVtbl
*lpInternetPriorityVtbl
;
34 #define PROTOCOL(x) ((IInternetProtocol*) &(x)->lpInternetProtocolVtbl)
35 #define PRIORITY(x) ((IInternetPriority*) &(x)->lpInternetPriorityVtbl)
37 #define PROTOCOL_THIS(iface) DEFINE_THIS(FileProtocol, InternetProtocol, iface)
39 static HRESULT WINAPI
FileProtocol_QueryInterface(IInternetProtocol
*iface
, REFIID riid
, void **ppv
)
41 FileProtocol
*This
= PROTOCOL_THIS(iface
);
44 if(IsEqualGUID(&IID_IUnknown
, riid
)) {
45 TRACE("(%p)->(IID_IUnknown %p)\n", This
, ppv
);
46 *ppv
= PROTOCOL(This
);
47 }else if(IsEqualGUID(&IID_IInternetProtocolRoot
, riid
)) {
48 TRACE("(%p)->(IID_IInternetProtocolRoot %p)\n", This
, ppv
);
49 *ppv
= PROTOCOL(This
);
50 }else if(IsEqualGUID(&IID_IInternetProtocol
, riid
)) {
51 TRACE("(%p)->(IID_IInternetProtocol %p)\n", This
, ppv
);
52 *ppv
= PROTOCOL(This
);
53 }else if(IsEqualGUID(&IID_IInternetPriority
, riid
)) {
54 TRACE("(%p)->(IID_IInternetPriority %p)\n", This
, ppv
);
55 *ppv
= PRIORITY(This
);
59 IInternetProtocol_AddRef(iface
);
63 WARN("not supported interface %s\n", debugstr_guid(riid
));
67 static ULONG WINAPI
FileProtocol_AddRef(IInternetProtocol
*iface
)
69 FileProtocol
*This
= PROTOCOL_THIS(iface
);
70 LONG ref
= InterlockedIncrement(&This
->ref
);
71 TRACE("(%p) ref=%d\n", This
, ref
);
75 static ULONG WINAPI
FileProtocol_Release(IInternetProtocol
*iface
)
77 FileProtocol
*This
= PROTOCOL_THIS(iface
);
78 LONG ref
= InterlockedDecrement(&This
->ref
);
80 TRACE("(%p) ref=%d\n", This
, ref
);
84 CloseHandle(This
->file
);
87 URLMON_UnlockModule();
93 static HRESULT WINAPI
FileProtocol_Start(IInternetProtocol
*iface
, LPCWSTR szUrl
,
94 IInternetProtocolSink
*pOIProtSink
, IInternetBindInfo
*pOIBindInfo
,
95 DWORD grfPI
, DWORD dwReserved
)
97 FileProtocol
*This
= PROTOCOL_THIS(iface
);
102 LPWSTR url
, mime
= NULL
;
105 BOOL first_call
= FALSE
;
108 static const WCHAR wszFile
[] = {'f','i','l','e',':'};
110 TRACE("(%p)->(%s %p %p %08x %d)\n", This
, debugstr_w(szUrl
), pOIProtSink
,
111 pOIBindInfo
, grfPI
, dwReserved
);
113 memset(&bindinfo
, 0, sizeof(bindinfo
));
114 bindinfo
.cbSize
= sizeof(BINDINFO
);
115 hres
= IInternetBindInfo_GetBindInfo(pOIBindInfo
, &grfBINDF
, &bindinfo
);
117 WARN("GetBindInfo failed: %08x\n", hres
);
121 ReleaseBindInfo(&bindinfo
);
123 if(lstrlenW(szUrl
) < sizeof(wszFile
)/sizeof(WCHAR
)
124 || memcmp(szUrl
, wszFile
, sizeof(wszFile
)))
127 len
= lstrlenW(szUrl
)+16;
128 url
= heap_alloc(len
*sizeof(WCHAR
));
129 hres
= CoInternetParseUrl(szUrl
, PARSE_ENCODE
, 0, url
, len
, &len
, 0);
135 if(!(grfBINDF
& BINDF_FROMURLMON
))
136 IInternetProtocolSink_ReportProgress(pOIProtSink
, BINDSTATUS_DIRECTBIND
, NULL
);
141 IInternetProtocolSink_ReportProgress(pOIProtSink
, BINDSTATUS_SENDINGREQUEST
, &null_char
);
143 file_name
= url
+sizeof(wszFile
)/sizeof(WCHAR
);
144 if(file_name
[0] == '/' && file_name
[1] == '/')
146 if(*file_name
== '/')
149 This
->file
= CreateFileW(file_name
, GENERIC_READ
, FILE_SHARE_READ
, NULL
,
150 OPEN_EXISTING
, FILE_ATTRIBUTE_NORMAL
, NULL
);
152 if(This
->file
== INVALID_HANDLE_VALUE
) {
154 IInternetProtocolSink_ReportResult(pOIProtSink
, INET_E_RESOURCE_NOT_FOUND
,
155 GetLastError(), NULL
);
157 return INET_E_RESOURCE_NOT_FOUND
;
160 IInternetProtocolSink_ReportProgress(pOIProtSink
,
161 BINDSTATUS_CACHEFILENAMEAVAILABLE
, file_name
);
163 hres
= FindMimeFromData(NULL
, url
, NULL
, 0, NULL
, 0, &mime
, 0);
164 if(SUCCEEDED(hres
)) {
165 IInternetProtocolSink_ReportProgress(pOIProtSink
,
166 (grfBINDF
& BINDF_FROMURLMON
) ?
167 BINDSTATUS_VERIFIEDMIMETYPEAVAILABLE
: BINDSTATUS_MIMETYPEAVAILABLE
,
175 if(GetFileSizeEx(This
->file
, &size
))
176 IInternetProtocolSink_ReportData(pOIProtSink
,
177 BSCF_FIRSTDATANOTIFICATION
|BSCF_LASTDATANOTIFICATION
,
178 size
.u
.LowPart
, size
.u
.LowPart
);
181 IInternetProtocolSink_ReportResult(pOIProtSink
, S_OK
, 0, NULL
);
186 static HRESULT WINAPI
FileProtocol_Continue(IInternetProtocol
*iface
, PROTOCOLDATA
*pProtocolData
)
188 FileProtocol
*This
= PROTOCOL_THIS(iface
);
189 FIXME("(%p)->(%p)\n", This
, pProtocolData
);
193 static HRESULT WINAPI
FileProtocol_Abort(IInternetProtocol
*iface
, HRESULT hrReason
,
196 FileProtocol
*This
= PROTOCOL_THIS(iface
);
197 FIXME("(%p)->(%08x %08x)\n", This
, hrReason
, dwOptions
);
201 static HRESULT WINAPI
FileProtocol_Terminate(IInternetProtocol
*iface
, DWORD dwOptions
)
203 FileProtocol
*This
= PROTOCOL_THIS(iface
);
205 TRACE("(%p)->(%08x)\n", This
, dwOptions
);
210 static HRESULT WINAPI
FileProtocol_Suspend(IInternetProtocol
*iface
)
212 FileProtocol
*This
= PROTOCOL_THIS(iface
);
213 FIXME("(%p)\n", This
);
217 static HRESULT WINAPI
FileProtocol_Resume(IInternetProtocol
*iface
)
219 FileProtocol
*This
= PROTOCOL_THIS(iface
);
220 FIXME("(%p)\n", This
);
224 static HRESULT WINAPI
FileProtocol_Read(IInternetProtocol
*iface
, void *pv
,
225 ULONG cb
, ULONG
*pcbRead
)
227 FileProtocol
*This
= PROTOCOL_THIS(iface
);
230 TRACE("(%p)->(%p %u %p)\n", This
, pv
, cb
, pcbRead
);
233 return INET_E_DATA_NOT_AVAILABLE
;
235 ReadFile(This
->file
, pv
, cb
, &read
, NULL
);
240 return cb
== read
? S_OK
: S_FALSE
;
243 static HRESULT WINAPI
FileProtocol_Seek(IInternetProtocol
*iface
, LARGE_INTEGER dlibMove
,
244 DWORD dwOrigin
, ULARGE_INTEGER
*plibNewPosition
)
246 FileProtocol
*This
= PROTOCOL_THIS(iface
);
247 FIXME("(%p)->(%d %d %p)\n", This
, dlibMove
.u
.LowPart
, dwOrigin
, plibNewPosition
);
251 static HRESULT WINAPI
FileProtocol_LockRequest(IInternetProtocol
*iface
, DWORD dwOptions
)
253 FileProtocol
*This
= PROTOCOL_THIS(iface
);
255 TRACE("(%p)->(%08x)\n", This
, dwOptions
);
260 static HRESULT WINAPI
FileProtocol_UnlockRequest(IInternetProtocol
*iface
)
262 FileProtocol
*This
= PROTOCOL_THIS(iface
);
264 TRACE("(%p)\n", This
);
271 static const IInternetProtocolVtbl FileProtocolVtbl
= {
272 FileProtocol_QueryInterface
,
274 FileProtocol_Release
,
276 FileProtocol_Continue
,
278 FileProtocol_Terminate
,
279 FileProtocol_Suspend
,
283 FileProtocol_LockRequest
,
284 FileProtocol_UnlockRequest
287 #define PRIORITY_THIS(iface) DEFINE_THIS(FileProtocol, InternetPriority, iface)
289 static HRESULT WINAPI
FilePriority_QueryInterface(IInternetPriority
*iface
,
290 REFIID riid
, void **ppv
)
292 FileProtocol
*This
= PRIORITY_THIS(iface
);
293 return IInternetProtocol_QueryInterface(PROTOCOL(This
), riid
, ppv
);
296 static ULONG WINAPI
FilePriority_AddRef(IInternetPriority
*iface
)
298 FileProtocol
*This
= PRIORITY_THIS(iface
);
299 return IInternetProtocol_AddRef(PROTOCOL(This
));
302 static ULONG WINAPI
FilePriority_Release(IInternetPriority
*iface
)
304 FileProtocol
*This
= PRIORITY_THIS(iface
);
305 return IInternetProtocol_Release(PROTOCOL(This
));
308 static HRESULT WINAPI
FilePriority_SetPriority(IInternetPriority
*iface
, LONG nPriority
)
310 FileProtocol
*This
= PRIORITY_THIS(iface
);
312 TRACE("(%p)->(%d)\n", This
, nPriority
);
314 This
->priority
= nPriority
;
318 static HRESULT WINAPI
FilePriority_GetPriority(IInternetPriority
*iface
, LONG
*pnPriority
)
320 FileProtocol
*This
= PRIORITY_THIS(iface
);
322 TRACE("(%p)->(%p)\n", This
, pnPriority
);
324 *pnPriority
= This
->priority
;
330 static const IInternetPriorityVtbl FilePriorityVtbl
= {
331 FilePriority_QueryInterface
,
333 FilePriority_Release
,
334 FilePriority_SetPriority
,
335 FilePriority_GetPriority
338 HRESULT
FileProtocol_Construct(IUnknown
*pUnkOuter
, LPVOID
*ppobj
)
342 TRACE("(%p %p)\n", pUnkOuter
, ppobj
);
346 ret
= heap_alloc(sizeof(FileProtocol
));
348 ret
->lpInternetProtocolVtbl
= &FileProtocolVtbl
;
349 ret
->lpInternetPriorityVtbl
= &FilePriorityVtbl
;
354 *ppobj
= PROTOCOL(ret
);