2 * Implementation of the Microsoft Installer (msi.dll)
4 * Copyright 2008 James Hawkins
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.
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.
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
25 WINE_DEFAULT_DEBUG_CHANNEL(msi
);
27 /* from msvcrt/fcntl.h */
31 #define _O_ACCMODE (_O_RDONLY|_O_WRONLY|_O_RDWR)
32 #define _O_APPEND 0x0008
33 #define _O_RANDOM 0x0010
34 #define _O_SEQUENTIAL 0x0020
35 #define _O_TEMPORARY 0x0040
36 #define _O_NOINHERIT 0x0080
37 #define _O_CREAT 0x0100
38 #define _O_TRUNC 0x0200
39 #define _O_EXCL 0x0400
40 #define _O_SHORT_LIVED 0x1000
41 #define _O_TEXT 0x4000
42 #define _O_BINARY 0x8000
44 static BOOL
source_matches_volume(MSIMEDIAINFO
*mi
, LPCWSTR source_root
)
46 WCHAR volume_name
[MAX_PATH
+ 1];
47 WCHAR root
[MAX_PATH
+ 1];
49 strcpyW(root
, source_root
);
50 PathStripToRootW(root
);
51 PathAddBackslashW(root
);
53 if (!GetVolumeInformationW(root
, volume_name
, MAX_PATH
+ 1, NULL
, NULL
, NULL
, NULL
, 0))
55 WARN("failed to get volume information for %s (%u)\n", debugstr_w(root
), GetLastError());
58 return !strcmpiW( mi
->volume_label
, volume_name
);
61 static UINT
msi_change_media(MSIPACKAGE
*package
, MSIMEDIAINFO
*mi
)
63 LPWSTR error
, error_dialog
;
65 UINT r
= ERROR_SUCCESS
;
67 static const WCHAR error_prop
[] = {'E','r','r','o','r','D','i','a','l','o','g',0};
69 if ((package
->ui_level
& INSTALLUILEVEL_MASK
) == INSTALLUILEVEL_NONE
&&
70 !gUIHandlerA
&& !gUIHandlerW
&& !gUIHandlerRecord
) return ERROR_SUCCESS
;
72 error
= msi_build_error_string(package
, 1302, 1, mi
->disk_prompt
);
73 error_dialog
= msi_dup_property(package
->db
, error_prop
);
74 source_dir
= msi_dup_property(package
->db
, szSourceDir
);
76 while (r
== ERROR_SUCCESS
&& !source_matches_volume(mi
, source_dir
))
78 r
= msi_spawn_error_dialog(package
, error_dialog
, error
);
82 gUIHandlerW(gUIContext
, MB_RETRYCANCEL
| INSTALLMESSAGE_ERROR
, error
);
86 char *msg
= strdupWtoA(error
);
87 gUIHandlerA(gUIContext
, MB_RETRYCANCEL
| INSTALLMESSAGE_ERROR
, msg
);
90 else if (gUIHandlerRecord
)
92 MSIHANDLE rec
= MsiCreateRecord(1);
93 MsiRecordSetStringW(rec
, 0, error
);
94 gUIHandlerRecord(gUIContext
, MB_RETRYCANCEL
| INSTALLMESSAGE_ERROR
, rec
);
100 msi_free(error_dialog
);
101 msi_free(source_dir
);
106 static MSICABINETSTREAM
*msi_get_cabinet_stream( MSIPACKAGE
*package
, UINT disk_id
)
108 MSICABINETSTREAM
*cab
;
110 LIST_FOR_EACH_ENTRY( cab
, &package
->cabinet_streams
, MSICABINETSTREAM
, entry
)
112 if (cab
->disk_id
== disk_id
) return cab
;
117 static void * CDECL
cabinet_alloc(ULONG cb
)
119 return msi_alloc(cb
);
122 static void CDECL
cabinet_free(void *pv
)
127 static INT_PTR CDECL
cabinet_open(char *pszFile
, int oflag
, int pmode
)
130 DWORD dwShareMode
= 0;
131 DWORD dwCreateDisposition
= OPEN_EXISTING
;
133 switch (oflag
& _O_ACCMODE
)
136 dwAccess
= GENERIC_READ
;
137 dwShareMode
= FILE_SHARE_READ
| FILE_SHARE_DELETE
;
140 dwAccess
= GENERIC_WRITE
;
141 dwShareMode
= FILE_SHARE_READ
| FILE_SHARE_WRITE
| FILE_SHARE_DELETE
;
144 dwAccess
= GENERIC_READ
| GENERIC_WRITE
;
145 dwShareMode
= FILE_SHARE_READ
| FILE_SHARE_WRITE
| FILE_SHARE_DELETE
;
149 if ((oflag
& (_O_CREAT
| _O_EXCL
)) == (_O_CREAT
| _O_EXCL
))
150 dwCreateDisposition
= CREATE_NEW
;
151 else if (oflag
& _O_CREAT
)
152 dwCreateDisposition
= CREATE_ALWAYS
;
154 return (INT_PTR
)CreateFileA(pszFile
, dwAccess
, dwShareMode
, NULL
,
155 dwCreateDisposition
, 0, NULL
);
158 static UINT CDECL
cabinet_read(INT_PTR hf
, void *pv
, UINT cb
)
160 HANDLE handle
= (HANDLE
)hf
;
163 if (ReadFile(handle
, pv
, cb
, &read
, NULL
))
169 static UINT CDECL
cabinet_write(INT_PTR hf
, void *pv
, UINT cb
)
171 HANDLE handle
= (HANDLE
)hf
;
174 if (WriteFile(handle
, pv
, cb
, &written
, NULL
))
180 static int CDECL
cabinet_close(INT_PTR hf
)
182 HANDLE handle
= (HANDLE
)hf
;
183 return CloseHandle(handle
) ? 0 : -1;
186 static LONG CDECL
cabinet_seek(INT_PTR hf
, LONG dist
, int seektype
)
188 HANDLE handle
= (HANDLE
)hf
;
189 /* flags are compatible and so are passed straight through */
190 return SetFilePointer(handle
, dist
, NULL
, seektype
);
199 static struct package_disk package_disk
;
201 static INT_PTR CDECL
cabinet_open_stream( char *pszFile
, int oflag
, int pmode
)
203 MSICABINETSTREAM
*cab
;
208 cab
= msi_get_cabinet_stream( package_disk
.package
, package_disk
.id
);
211 WARN("failed to get cabinet stream\n");
214 if (!cab
->stream
[0] || !(encoded
= encode_streamname( FALSE
, cab
->stream
+ 1 )))
216 WARN("failed to encode stream name\n");
219 hr
= IStorage_OpenStream( cab
->storage
, encoded
, NULL
, STGM_READ
|STGM_SHARE_EXCLUSIVE
, 0, &stream
);
222 WARN("failed to open stream 0x%08x\n", hr
);
227 return (INT_PTR
)stream
;
230 static UINT CDECL
cabinet_read_stream( INT_PTR hf
, void *pv
, UINT cb
)
232 IStream
*stm
= (IStream
*)hf
;
236 hr
= IStream_Read( stm
, pv
, cb
, &read
);
237 if (hr
== S_OK
|| hr
== S_FALSE
)
243 static int CDECL
cabinet_close_stream( INT_PTR hf
)
245 IStream
*stm
= (IStream
*)hf
;
246 IStream_Release( stm
);
250 static LONG CDECL
cabinet_seek_stream( INT_PTR hf
, LONG dist
, int seektype
)
252 IStream
*stm
= (IStream
*)hf
;
254 ULARGE_INTEGER newpos
;
257 move
.QuadPart
= dist
;
258 hr
= IStream_Seek( stm
, move
, seektype
, &newpos
);
261 if (newpos
.QuadPart
<= MAXLONG
) return newpos
.QuadPart
;
267 static UINT CDECL
msi_media_get_disk_info(MSIPACKAGE
*package
, MSIMEDIAINFO
*mi
)
271 static const WCHAR query
[] = {
272 'S','E','L','E','C','T',' ','*',' ', 'F','R','O','M',' ',
273 '`','M','e','d','i','a','`',' ','W','H','E','R','E',' ',
274 '`','D','i','s','k','I','d','`',' ','=',' ','%','i',0};
276 row
= MSI_QueryGetRecord(package
->db
, query
, mi
->disk_id
);
279 TRACE("Unable to query row\n");
280 return ERROR_FUNCTION_FAILED
;
283 mi
->disk_prompt
= strdupW(MSI_RecordGetString(row
, 3));
284 mi
->cabinet
= strdupW(MSI_RecordGetString(row
, 4));
285 mi
->volume_label
= strdupW(MSI_RecordGetString(row
, 5));
287 msiobj_release(&row
->hdr
);
288 return ERROR_SUCCESS
;
291 static INT_PTR
cabinet_partial_file(FDINOTIFICATIONTYPE fdint
,
292 PFDINOTIFICATION pfdin
)
294 MSICABDATA
*data
= pfdin
->pv
;
295 data
->mi
->is_continuous
= FALSE
;
299 static WCHAR
*get_cabinet_filename(MSIMEDIAINFO
*mi
)
304 len
= strlenW(mi
->sourcedir
) + strlenW(mi
->cabinet
) + 1;
305 if (!(ret
= msi_alloc(len
* sizeof(WCHAR
)))) return NULL
;
306 strcpyW(ret
, mi
->sourcedir
);
307 strcatW(ret
, mi
->cabinet
);
311 static INT_PTR
cabinet_next_cabinet(FDINOTIFICATIONTYPE fdint
,
312 PFDINOTIFICATION pfdin
)
314 MSICABDATA
*data
= pfdin
->pv
;
315 MSIMEDIAINFO
*mi
= data
->mi
;
316 LPWSTR cabinet_file
= NULL
, cab
= strdupAtoW(pfdin
->psz1
);
320 msi_free(mi
->disk_prompt
);
321 msi_free(mi
->cabinet
);
322 msi_free(mi
->volume_label
);
323 mi
->disk_prompt
= NULL
;
325 mi
->volume_label
= NULL
;
328 mi
->is_continuous
= TRUE
;
330 rc
= msi_media_get_disk_info(data
->package
, mi
);
331 if (rc
!= ERROR_SUCCESS
)
333 ERR("Failed to get next cabinet information: %d\n", rc
);
337 if (strcmpiW( mi
->cabinet
, cab
))
342 WARN("Continuous cabinet %s does not match the next cabinet %s in the media table => use latter one\n", debugstr_w(cab
), debugstr_w(mi
->cabinet
));
344 /* Use cabinet name from the media table */
345 next_cab
= strdupWtoA(mi
->cabinet
);
346 /* Modify path to cabinet file with full filename (psz3 points to a 256 bytes buffer that can be modified contrary to psz1 and psz2) */
347 length
= strlen(pfdin
->psz3
) + 1 + strlen(next_cab
) + 1;
350 WARN("Cannot update next cabinet filename with a string size %u > 256\n", length
);
356 strcat(pfdin
->psz3
, "\\");
357 strcat(pfdin
->psz3
, next_cab
);
359 /* Path psz3 and cabinet psz1 are concatenated by FDI so just reset psz1 */
364 if (!(cabinet_file
= get_cabinet_filename(mi
)))
367 TRACE("Searching for %s\n", debugstr_w(cabinet_file
));
370 if (GetFileAttributesW(cabinet_file
) == INVALID_FILE_ATTRIBUTES
)
372 if (msi_change_media(data
->package
, mi
) != ERROR_SUCCESS
)
378 msi_free(cabinet_file
);
382 static INT_PTR
cabinet_next_cabinet_stream( FDINOTIFICATIONTYPE fdint
,
383 PFDINOTIFICATION pfdin
)
385 MSICABDATA
*data
= pfdin
->pv
;
386 MSIMEDIAINFO
*mi
= data
->mi
;
389 msi_free( mi
->disk_prompt
);
390 msi_free( mi
->cabinet
);
391 msi_free( mi
->volume_label
);
392 mi
->disk_prompt
= NULL
;
394 mi
->volume_label
= NULL
;
397 mi
->is_continuous
= TRUE
;
399 rc
= msi_media_get_disk_info( data
->package
, mi
);
400 if (rc
!= ERROR_SUCCESS
)
402 ERR("Failed to get next cabinet information: %u\n", rc
);
405 package_disk
.id
= mi
->disk_id
;
407 TRACE("next cabinet is %s disk id %u\n", debugstr_w(mi
->cabinet
), mi
->disk_id
);
411 static INT_PTR
cabinet_copy_file(FDINOTIFICATIONTYPE fdint
,
412 PFDINOTIFICATION pfdin
)
414 MSICABDATA
*data
= pfdin
->pv
;
419 data
->curfile
= strdupAtoW(pfdin
->psz1
);
420 if (!data
->cb(data
->package
, data
->curfile
, MSICABEXTRACT_BEGINEXTRACT
, &path
,
423 /* We're not extracting this file, so free the filename. */
424 msi_free(data
->curfile
);
425 data
->curfile
= NULL
;
429 TRACE("extracting %s -> %s\n", debugstr_w(data
->curfile
), debugstr_w(path
));
431 attrs
= attrs
& (FILE_ATTRIBUTE_READONLY
|FILE_ATTRIBUTE_HIDDEN
|FILE_ATTRIBUTE_SYSTEM
);
432 if (!attrs
) attrs
= FILE_ATTRIBUTE_NORMAL
;
434 handle
= CreateFileW(path
, GENERIC_READ
| GENERIC_WRITE
, 0,
435 NULL
, CREATE_ALWAYS
, attrs
, NULL
);
436 if (handle
== INVALID_HANDLE_VALUE
)
438 DWORD err
= GetLastError();
439 DWORD attrs2
= GetFileAttributesW(path
);
441 if (attrs2
== INVALID_FILE_ATTRIBUTES
)
443 ERR("failed to create %s (error %d)\n", debugstr_w(path
), err
);
446 else if (err
== ERROR_ACCESS_DENIED
&& (attrs2
& FILE_ATTRIBUTE_READONLY
))
448 TRACE("removing read-only attribute on %s\n", debugstr_w(path
));
449 SetFileAttributesW( path
, attrs2
& ~FILE_ATTRIBUTE_READONLY
);
450 handle
= CreateFileW(path
, GENERIC_READ
| GENERIC_WRITE
, 0, NULL
, CREATE_ALWAYS
, attrs2
, NULL
);
452 if (handle
!= INVALID_HANDLE_VALUE
) goto done
;
453 err
= GetLastError();
455 if (err
== ERROR_SHARING_VIOLATION
|| err
== ERROR_USER_MAPPED_FILE
)
457 WCHAR
*tmpfileW
, *tmppathW
, *p
;
460 TRACE("file in use, scheduling rename operation\n");
462 if (!(tmppathW
= strdupW( path
))) return ERROR_OUTOFMEMORY
;
463 if ((p
= strrchrW(tmppathW
, '\\'))) *p
= 0;
464 len
= strlenW( tmppathW
) + 16;
465 if (!(tmpfileW
= msi_alloc(len
* sizeof(WCHAR
))))
467 msi_free( tmppathW
);
468 return ERROR_OUTOFMEMORY
;
470 if (!GetTempFileNameW(tmppathW
, szMsi
, 0, tmpfileW
)) tmpfileW
[0] = 0;
471 msi_free( tmppathW
);
473 handle
= CreateFileW(tmpfileW
, GENERIC_READ
| GENERIC_WRITE
, 0, NULL
, CREATE_ALWAYS
, attrs
, NULL
);
475 if (handle
!= INVALID_HANDLE_VALUE
&&
476 MoveFileExW(path
, NULL
, MOVEFILE_DELAY_UNTIL_REBOOT
) &&
477 MoveFileExW(tmpfileW
, path
, MOVEFILE_DELAY_UNTIL_REBOOT
))
479 data
->package
->need_reboot_at_end
= 1;
483 WARN("failed to schedule rename operation %s (error %d)\n", debugstr_w(path
), GetLastError());
484 DeleteFileW( tmpfileW
);
489 WARN("failed to create %s (error %d)\n", debugstr_w(path
), err
);
495 return (INT_PTR
)handle
;
498 static INT_PTR
cabinet_close_file_info(FDINOTIFICATIONTYPE fdint
,
499 PFDINOTIFICATION pfdin
)
501 MSICABDATA
*data
= pfdin
->pv
;
504 HANDLE handle
= (HANDLE
)pfdin
->hf
;
506 data
->mi
->is_continuous
= FALSE
;
508 if (!DosDateTimeToFileTime(pfdin
->date
, pfdin
->time
, &ft
))
510 if (!LocalFileTimeToFileTime(&ft
, &ftLocal
))
512 if (!SetFileTime(handle
, &ftLocal
, 0, &ftLocal
))
517 data
->cb(data
->package
, data
->curfile
, MSICABEXTRACT_FILEEXTRACTED
, NULL
, NULL
,
520 msi_free(data
->curfile
);
521 data
->curfile
= NULL
;
526 static INT_PTR CDECL
cabinet_notify(FDINOTIFICATIONTYPE fdint
, PFDINOTIFICATION pfdin
)
530 case fdintPARTIAL_FILE
:
531 return cabinet_partial_file(fdint
, pfdin
);
533 case fdintNEXT_CABINET
:
534 return cabinet_next_cabinet(fdint
, pfdin
);
537 return cabinet_copy_file(fdint
, pfdin
);
539 case fdintCLOSE_FILE_INFO
:
540 return cabinet_close_file_info(fdint
, pfdin
);
547 static INT_PTR CDECL
cabinet_notify_stream( FDINOTIFICATIONTYPE fdint
, PFDINOTIFICATION pfdin
)
551 case fdintPARTIAL_FILE
:
552 return cabinet_partial_file( fdint
, pfdin
);
554 case fdintNEXT_CABINET
:
555 return cabinet_next_cabinet_stream( fdint
, pfdin
);
558 return cabinet_copy_file( fdint
, pfdin
);
560 case fdintCLOSE_FILE_INFO
:
561 return cabinet_close_file_info( fdint
, pfdin
);
563 case fdintCABINET_INFO
:
567 ERR("Unexpected notification %d\n", fdint
);
572 static BOOL
extract_cabinet( MSIPACKAGE
* package
, MSIMEDIAINFO
*mi
, LPVOID data
)
574 LPSTR cabinet
, cab_path
= NULL
;
579 TRACE("extracting %s disk id %u\n", debugstr_w(mi
->cabinet
), mi
->disk_id
);
581 hfdi
= FDICreate( cabinet_alloc
, cabinet_free
, cabinet_open
, cabinet_read
,
582 cabinet_write
, cabinet_close
, cabinet_seek
, 0, &erf
);
585 ERR("FDICreate failed\n");
589 cabinet
= strdupWtoA( mi
->cabinet
);
593 cab_path
= strdupWtoA( mi
->sourcedir
);
597 ret
= FDICopy( hfdi
, cabinet
, cab_path
, 0, cabinet_notify
, NULL
, data
);
599 ERR("FDICopy failed\n");
604 msi_free( cab_path
);
607 mi
->is_extracted
= TRUE
;
612 static BOOL
extract_cabinet_stream( MSIPACKAGE
*package
, MSIMEDIAINFO
*mi
, LPVOID data
)
614 static char filename
[] = {'<','S','T','R','E','A','M','>',0};
619 TRACE("extracting %s disk id %u\n", debugstr_w(mi
->cabinet
), mi
->disk_id
);
621 hfdi
= FDICreate( cabinet_alloc
, cabinet_free
, cabinet_open_stream
, cabinet_read_stream
,
622 cabinet_write
, cabinet_close_stream
, cabinet_seek_stream
, 0, &erf
);
625 ERR("FDICreate failed\n");
629 package_disk
.package
= package
;
630 package_disk
.id
= mi
->disk_id
;
632 ret
= FDICopy( hfdi
, filename
, NULL
, 0, cabinet_notify_stream
, NULL
, data
);
633 if (!ret
) ERR("FDICopy failed\n");
636 if (ret
) mi
->is_extracted
= TRUE
;
640 /***********************************************************************
643 * Extract files from a cabinet file or stream.
645 BOOL
msi_cabextract(MSIPACKAGE
* package
, MSIMEDIAINFO
*mi
, LPVOID data
)
647 if (mi
->cabinet
[0] == '#')
649 return extract_cabinet_stream( package
, mi
, data
);
651 return extract_cabinet( package
, mi
, data
);
654 void msi_free_media_info(MSIMEDIAINFO
*mi
)
656 msi_free(mi
->disk_prompt
);
657 msi_free(mi
->cabinet
);
658 msi_free(mi
->volume_label
);
662 static UINT
get_drive_type(const WCHAR
*path
)
664 WCHAR root
[MAX_PATH
+ 1];
667 PathStripToRootW(root
);
668 PathAddBackslashW(root
);
670 return GetDriveTypeW(root
);
673 UINT
msi_load_media_info(MSIPACKAGE
*package
, UINT Sequence
, MSIMEDIAINFO
*mi
)
675 static const WCHAR query
[] = {
676 'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ','`','M','e','d','i','a','`',' ',
677 'W','H','E','R','E',' ','`','L','a','s','t','S','e','q','u','e','n','c','e','`',' ',
678 '>','=',' ','%','i',' ','O','R','D','E','R',' ','B','Y',' ','`','D','i','s','k','I','d','`',0};
680 LPWSTR source_dir
, source
;
683 if (Sequence
<= mi
->last_sequence
) /* already loaded */
684 return ERROR_SUCCESS
;
686 row
= MSI_QueryGetRecord(package
->db
, query
, Sequence
);
689 TRACE("Unable to query row\n");
690 return ERROR_FUNCTION_FAILED
;
693 mi
->is_extracted
= FALSE
;
694 mi
->disk_id
= MSI_RecordGetInteger(row
, 1);
695 mi
->last_sequence
= MSI_RecordGetInteger(row
, 2);
696 msi_free(mi
->disk_prompt
);
697 mi
->disk_prompt
= strdupW(MSI_RecordGetString(row
, 3));
698 msi_free(mi
->cabinet
);
699 mi
->cabinet
= strdupW(MSI_RecordGetString(row
, 4));
700 msi_free(mi
->volume_label
);
701 mi
->volume_label
= strdupW(MSI_RecordGetString(row
, 5));
702 msiobj_release(&row
->hdr
);
704 msi_set_sourcedir_props(package
, FALSE
);
705 source_dir
= msi_dup_property(package
->db
, szSourceDir
);
706 lstrcpyW(mi
->sourcedir
, source_dir
);
707 PathAddBackslashW(mi
->sourcedir
);
708 mi
->type
= get_drive_type(source_dir
);
710 options
= MSICODE_PRODUCT
;
711 if (mi
->type
== DRIVE_CDROM
|| mi
->type
== DRIVE_REMOVABLE
)
714 options
|= MSISOURCETYPE_MEDIA
;
716 else if (package
->BaseURL
&& UrlIsW(package
->BaseURL
, URLIS_URL
))
718 source
= package
->BaseURL
;
719 options
|= MSISOURCETYPE_URL
;
723 source
= mi
->sourcedir
;
724 options
|= MSISOURCETYPE_NETWORK
;
727 msi_package_add_media_disk(package
, package
->Context
,
728 MSICODE_PRODUCT
, mi
->disk_id
,
729 mi
->volume_label
, mi
->disk_prompt
);
731 msi_package_add_info(package
, package
->Context
,
732 options
, INSTALLPROPERTY_LASTUSEDSOURCEW
, source
);
734 msi_free(source_dir
);
735 TRACE("sequence %u -> cabinet %s disk id %u\n", Sequence
, debugstr_w(mi
->cabinet
), mi
->disk_id
);
736 return ERROR_SUCCESS
;
739 /* FIXME: search URL sources as well */
740 static UINT
find_published_source(MSIPACKAGE
*package
, MSIMEDIAINFO
*mi
)
742 WCHAR source
[MAX_PATH
];
743 WCHAR volume
[MAX_PATH
];
744 WCHAR prompt
[MAX_PATH
];
745 DWORD volumesz
, promptsz
;
746 DWORD index
, size
, id
;
751 r
= MsiSourceListGetInfoW(package
->ProductCode
, NULL
,
752 package
->Context
, MSICODE_PRODUCT
,
753 INSTALLPROPERTY_LASTUSEDTYPEW
, last_type
, &size
);
754 if (r
!= ERROR_SUCCESS
)
758 r
= MsiSourceListGetInfoW(package
->ProductCode
, NULL
,
759 package
->Context
, MSICODE_PRODUCT
,
760 INSTALLPROPERTY_LASTUSEDSOURCEW
, source
, &size
);
761 if (r
!= ERROR_SUCCESS
)
764 if (last_type
[0] == 'n')
766 WCHAR cabinet_file
[MAX_PATH
];
767 BOOL check_all
= FALSE
;
773 while (MsiSourceListEnumSourcesW(package
->ProductCode
, NULL
,
775 MSISOURCETYPE_NETWORK
, index
++,
776 volume
, &volumesz
) == ERROR_SUCCESS
)
778 if (check_all
|| !strncmpiW(source
, volume
, strlenW(source
)))
780 lstrcpyW(cabinet_file
, volume
);
781 PathAddBackslashW(cabinet_file
);
782 lstrcatW(cabinet_file
, mi
->cabinet
);
784 if (GetFileAttributesW(cabinet_file
) == INVALID_FILE_ATTRIBUTES
)
792 lstrcpyW(mi
->sourcedir
, volume
);
793 PathAddBackslashW(mi
->sourcedir
);
794 TRACE("Found network source %s\n", debugstr_w(mi
->sourcedir
));
795 return ERROR_SUCCESS
;
809 while (MsiSourceListEnumMediaDisksW(package
->ProductCode
, NULL
,
811 MSICODE_PRODUCT
, index
++, &id
,
812 volume
, &volumesz
, prompt
, &promptsz
) == ERROR_SUCCESS
)
815 msi_free( mi
->volume_label
);
816 if (!(mi
->volume_label
= msi_alloc( ++volumesz
* sizeof(WCHAR
) ))) return ERROR_OUTOFMEMORY
;
817 strcpyW( mi
->volume_label
, volume
);
819 msi_free( mi
->disk_prompt
);
820 if (!(mi
->disk_prompt
= msi_alloc( ++promptsz
* sizeof(WCHAR
) ))) return ERROR_OUTOFMEMORY
;
821 strcpyW( mi
->disk_prompt
, prompt
);
823 if (source_matches_volume(mi
, source
))
825 /* FIXME: what about SourceDir */
826 lstrcpyW(mi
->sourcedir
, source
);
827 PathAddBackslashW(mi
->sourcedir
);
828 TRACE("Found disk source %s\n", debugstr_w(mi
->sourcedir
));
829 return ERROR_SUCCESS
;
833 return ERROR_FUNCTION_FAILED
;
836 UINT
ready_media( MSIPACKAGE
*package
, BOOL compressed
, MSIMEDIAINFO
*mi
)
839 WCHAR
*cabinet_file
= NULL
;
841 /* media info for continuous cabinet is already loaded */
842 if (mi
->is_continuous
) return ERROR_SUCCESS
;
846 /* cabinet is internal, no checks needed */
847 if (mi
->cabinet
[0] == '#') return ERROR_SUCCESS
;
849 if (!(cabinet_file
= get_cabinet_filename( mi
))) return ERROR_OUTOFMEMORY
;
851 /* package should be downloaded */
852 if (compressed
&& GetFileAttributesW( cabinet_file
) == INVALID_FILE_ATTRIBUTES
&&
853 package
->BaseURL
&& UrlIsW( package
->BaseURL
, URLIS_URL
))
855 WCHAR temppath
[MAX_PATH
], *p
;
857 if ((rc
= msi_download_file( cabinet_file
, temppath
)) != ERROR_SUCCESS
)
859 ERR("failed to download %s (%u)\n", debugstr_w(cabinet_file
), rc
);
860 msi_free( cabinet_file
);
863 if ((p
= strrchrW( temppath
, '\\' ))) *p
= 0;
864 strcpyW( mi
->sourcedir
, temppath
);
865 PathAddBackslashW( mi
->sourcedir
);
866 msi_free( mi
->cabinet
);
867 mi
->cabinet
= strdupW( p
+ 1 );
868 msi_free( cabinet_file
);
869 return ERROR_SUCCESS
;
872 /* check volume matches, change media if not */
873 if (mi
->volume_label
&& mi
->disk_id
> 1)
875 WCHAR
*source
= msi_dup_property( package
->db
, szSourceDir
);
876 BOOL match
= source_matches_volume( mi
, source
);
879 if (!match
&& (mi
->type
== DRIVE_CDROM
|| mi
->type
== DRIVE_REMOVABLE
))
881 if ((rc
= msi_change_media( package
, mi
)) != ERROR_SUCCESS
)
883 msi_free( cabinet_file
);
890 if (compressed
&& GetFileAttributesW( cabinet_file
) == INVALID_FILE_ATTRIBUTES
)
892 if ((rc
= find_published_source( package
, mi
)) != ERROR_SUCCESS
)
894 ERR("cabinet not found: %s\n", debugstr_w(cabinet_file
));
895 msi_free( cabinet_file
);
896 return ERROR_INSTALL_FAILURE
;
900 msi_free( cabinet_file
);
901 return ERROR_SUCCESS
;
904 UINT
msi_add_cabinet_stream( MSIPACKAGE
*package
, UINT disk_id
, IStorage
*storage
, const WCHAR
*name
)
906 MSICABINETSTREAM
*cab
, *item
;
908 TRACE("%p, %u, %p, %s\n", package
, disk_id
, storage
, debugstr_w(name
));
910 LIST_FOR_EACH_ENTRY( item
, &package
->cabinet_streams
, MSICABINETSTREAM
, entry
)
912 if (item
->disk_id
== disk_id
)
914 TRACE("duplicate disk id %u\n", disk_id
);
915 return ERROR_FUNCTION_FAILED
;
918 if (!(cab
= msi_alloc( sizeof(*cab
) ))) return ERROR_OUTOFMEMORY
;
919 if (!(cab
->stream
= msi_alloc( (strlenW( name
) + 1) * sizeof(WCHAR
) )))
922 return ERROR_OUTOFMEMORY
;
924 strcpyW( cab
->stream
, name
);
925 cab
->disk_id
= disk_id
;
926 cab
->storage
= storage
;
927 IStorage_AddRef( storage
);
928 list_add_tail( &package
->cabinet_streams
, &cab
->entry
);
930 return ERROR_SUCCESS
;