1 /* PROJECT: ReactOS Applications Manager
2 * LICENSE: GPL - See COPYING in the top level directory
3 * FILE: base/applications/rapps/loaddlg.c
4 * PURPOSE: Displaying a download dialog
5 * COPYRIGHT: Copyright 2001 John R. Sheets (for CodeWeavers)
6 * Copyright 2004 Mike McCormack (for CodeWeavers)
7 * Copyright 2005 Ge van Geldorp (gvg@reactos.org)
8 * Copyright 2009 Dmitry Chapyshev (dmitry@reactos.org)
11 * Based on Wine dlls/shdocvw/shdocvw_main.c
13 * This library is free software; you can redistribute it and/or
14 * modify it under the terms of the GNU Lesser General Public
15 * License as published by the Free Software Foundation; either
16 * version 2.1 of the License, or (at your option) any later version.
18 * This library is distributed in the hope that it will be useful,
19 * but WITHOUT ANY WARRANTY; without even the implied warranty of
20 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
21 * Lesser General Public License for more details.
23 * You should have received a copy of the GNU Lesser General Public
24 * License along with this library; if not, write to the Free Software
25 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
32 static PAPPLICATION_INFO AppInfo
;
33 static HICON hIcon
= NULL
;
35 typedef struct _IBindStatusCallbackImpl
37 const IBindStatusCallbackVtbl
*vtbl
;
41 } IBindStatusCallbackImpl
;
45 dlQueryInterface(IBindStatusCallback
* This
, REFIID riid
, void** ppvObject
)
47 if (!ppvObject
) return E_POINTER
;
49 if (IsEqualIID(riid
, &IID_IUnknown
) || IsEqualIID(riid
, &IID_IBindStatusCallback
))
51 IBindStatusCallback_AddRef(This
);
61 dlAddRef(IBindStatusCallback
* iface
)
63 IBindStatusCallbackImpl
*This
= (IBindStatusCallbackImpl
*) iface
;
64 return InterlockedIncrement(&This
->ref
);
69 dlRelease(IBindStatusCallback
* iface
)
71 IBindStatusCallbackImpl
*This
= (IBindStatusCallbackImpl
*) iface
;
72 DWORD ref
= InterlockedDecrement(&This
->ref
);
76 DestroyWindow(This
->hDialog
);
77 HeapFree(GetProcessHeap(), 0, This
);
85 dlOnStartBinding(IBindStatusCallback
* iface
, DWORD dwReserved
, IBinding
* pib
)
92 dlGetPriority(IBindStatusCallback
* iface
, LONG
* pnPriority
)
99 dlOnLowResource( IBindStatusCallback
* iface
, DWORD reserved
)
106 dlOnProgress(IBindStatusCallback
* iface
,
110 LPCWSTR szStatusText
)
112 IBindStatusCallbackImpl
*This
= (IBindStatusCallbackImpl
*) iface
;
117 Item
= GetDlgItem(This
->hDialog
, IDC_DOWNLOAD_PROGRESS
);
118 if (Item
&& ulProgressMax
)
120 SendMessageW(Item
, PBM_SETPOS
, ((ULONGLONG
)ulProgress
* 100) / ulProgressMax
, 0);
123 Item
= GetDlgItem(This
->hDialog
, IDC_DOWNLOAD_STATUS
);
124 if (Item
&& szStatusText
)
126 SendMessageW(Item
, WM_GETTEXT
, sizeof(OldText
) / sizeof(OldText
[0]), (LPARAM
) OldText
);
127 if (sizeof(OldText
) / sizeof(OldText
[0]) - 1 <= wcslen(OldText
) || 0 != wcscmp(OldText
, szStatusText
))
129 SendMessageW(Item
, WM_SETTEXT
, 0, (LPARAM
) szStatusText
);
134 r
= GetWindowLongPtrW(This
->hDialog
, GWLP_USERDATA
);
135 if (0 != r
|| 0 != GetLastError())
137 *This
->pbCancelled
= TRUE
;
146 dlOnStopBinding(IBindStatusCallback
* iface
, HRESULT hresult
, LPCWSTR szError
)
153 dlGetBindInfo(IBindStatusCallback
* iface
, DWORD
* grfBINDF
, BINDINFO
* pbindinfo
)
160 dlOnDataAvailable(IBindStatusCallback
* iface
, DWORD grfBSCF
,
161 DWORD dwSize
, FORMATETC
* pformatetc
, STGMEDIUM
* pstgmed
)
168 dlOnObjectAvailable(IBindStatusCallback
* iface
, REFIID riid
, IUnknown
* punk
)
173 static const IBindStatusCallbackVtbl dlVtbl
=
188 static IBindStatusCallback
*
189 CreateDl(HWND Dlg
, BOOL
*pbCancelled
)
191 IBindStatusCallbackImpl
*This
;
193 This
= HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY
, sizeof(IBindStatusCallbackImpl
));
194 if (!This
) return NULL
;
196 This
->vtbl
= &dlVtbl
;
199 This
->pbCancelled
= pbCancelled
;
201 return (IBindStatusCallback
*) This
;
206 ThreadFunc(LPVOID Context
)
208 IBindStatusCallback
*dl
= NULL
;
209 WCHAR path
[MAX_PATH
];
211 HWND Dlg
= (HWND
) Context
;
212 DWORD len
, dwContentLen
, dwBytesWritten
, dwBytesRead
;
213 DWORD dwCurrentBytesRead
= 0;
214 DWORD dwBufLen
= sizeof(dwContentLen
);
215 BOOL bCancelled
= FALSE
;
216 BOOL bTempfile
= FALSE
;
218 HINTERNET hOpen
= NULL
;
219 HINTERNET hFile
= NULL
;
220 HANDLE hOut
= INVALID_HANDLE_VALUE
;
221 unsigned char lpBuffer
[4096];
222 const LPWSTR lpszAgent
= L
"RApps/1.0";
224 /* built the path for the download */
225 p
= wcsrchr(AppInfo
->szUrlDownload
, L
'/');
228 len
= wcslen(AppInfo
->szUrlDownload
);
231 if (AppInfo
->szUrlDownload
[len
- 4] == '.' &&
232 AppInfo
->szUrlDownload
[len
- 3] == 'c' &&
233 AppInfo
->szUrlDownload
[len
- 2] == 'a' &&
234 AppInfo
->szUrlDownload
[len
- 1] == 'b')
237 if (!GetStorageDirectory(path
, sizeof(path
) / sizeof(path
[0])))
242 if (FAILED(StringCbCopyW(path
, sizeof(path
),
243 SettingsInfo
.szDownloadDir
)))
251 if (GetFileAttributesW(path
) == INVALID_FILE_ATTRIBUTES
)
253 if (!CreateDirectoryW(path
, NULL
))
257 if (FAILED(StringCbCatW(path
, sizeof(path
), L
"\\")))
259 if (FAILED(StringCbCatW(path
, sizeof(path
), p
+ 1)))
264 dl
= CreateDl(Context
, &bCancelled
);
265 if (dl
== NULL
) goto end
;
267 hOpen
= InternetOpenW(lpszAgent
, INTERNET_OPEN_TYPE_PRECONFIG
, NULL
, NULL
, 0);
268 if (!hOpen
) goto end
;
270 hFile
= InternetOpenUrlW(hOpen
, AppInfo
->szUrlDownload
, NULL
, 0, INTERNET_FLAG_PRAGMA_NOCACHE
|INTERNET_FLAG_KEEP_CONNECTION
, 0);
273 hOut
= CreateFileW(path
, GENERIC_WRITE
, FILE_SHARE_READ
| FILE_SHARE_WRITE
, NULL
, CREATE_ALWAYS
, 0, NULL
);
274 if (hOut
== INVALID_HANDLE_VALUE
) goto end
;
276 HttpQueryInfo(hFile
, HTTP_QUERY_CONTENT_LENGTH
| HTTP_QUERY_FLAG_NUMBER
, &dwContentLen
, &dwBufLen
, 0);
280 if (!InternetReadFile(hFile
, lpBuffer
, _countof(lpBuffer
), &dwBytesRead
)) goto end
;
281 if (!WriteFile(hOut
, &lpBuffer
[0], dwBytesRead
, &dwBytesWritten
, NULL
)) goto end
;
282 dwCurrentBytesRead
+= dwBytesRead
;
283 IBindStatusCallback_OnProgress(dl
, dwCurrentBytesRead
, dwContentLen
, 0, AppInfo
->szUrlDownload
);
288 hOut
= INVALID_HANDLE_VALUE
;
290 if (bCancelled
) goto end
;
292 ShowWindow(Dlg
, SW_HIDE
);
297 ShellExecuteW( NULL
, L
"open", path
, NULL
, NULL
, SW_SHOWNORMAL
);
300 if (hOut
!= INVALID_HANDLE_VALUE
) CloseHandle(hOut
);
301 InternetCloseHandle(hFile
);
302 InternetCloseHandle(hOpen
);
304 if (dl
) IBindStatusCallback_Release(dl
);
308 if (bCancelled
|| (SettingsInfo
.bDelInstaller
&& !bCab
))
319 DownloadDlgProc(HWND Dlg
, UINT Msg
, WPARAM wParam
, LPARAM lParam
)
329 hIcon
= LoadIconW(hInst
, MAKEINTRESOURCEW(IDI_MAIN
));
332 SendMessageW(Dlg
, WM_SETICON
, ICON_BIG
, (LPARAM
) hIcon
);
333 SendMessageW(Dlg
, WM_SETICON
, ICON_SMALL
, (LPARAM
) hIcon
);
336 SetWindowLongPtrW(Dlg
, GWLP_USERDATA
, 0);
337 Item
= GetDlgItem(Dlg
, IDC_DOWNLOAD_PROGRESS
);
340 SendMessageW(Item
, PBM_SETRANGE
, 0, MAKELPARAM(0, 100));
341 SendMessageW(Item
, PBM_SETPOS
, 0, 0);
344 Thread
= CreateThread(NULL
, 0, ThreadFunc
, Dlg
, 0, &ThreadId
);
345 if (!Thread
) return FALSE
;
350 if (wParam
== IDCANCEL
)
352 SetWindowLongPtrW(Dlg
, GWLP_USERDATA
, 1);
353 PostMessageW(Dlg
, WM_CLOSE
, 0, 0);
358 if (hIcon
) DestroyIcon(hIcon
);
368 DownloadApplication(INT Index
)
370 if (!IS_AVAILABLE_ENUM(SelectedEnumType
))
373 AppInfo
= (PAPPLICATION_INFO
) ListViewGetlParam(Index
);
374 if (!AppInfo
) return FALSE
;
376 WriteLogMessage(EVENTLOG_SUCCESS
, MSG_SUCCESS_INSTALL
, AppInfo
->szName
);
379 MAKEINTRESOURCEW(IDD_DOWNLOAD_DIALOG
),
387 DownloadApplicationsDB(LPWSTR lpUrl
)
389 APPLICATION_INFO IntInfo
;
391 ZeroMemory(&IntInfo
, sizeof(APPLICATION_INFO
));
392 if (FAILED(StringCbCopyW(IntInfo
.szUrlDownload
,
393 sizeof(IntInfo
.szUrlDownload
),
402 MAKEINTRESOURCEW(IDD_DOWNLOAD_DIALOG
),