2 * Implementation of the Microsoft Installer (msi.dll)
4 * Copyright 2005 Aric Stewart for CodeWeavers
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., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
23 * Actions dealing with files These are
29 * RemoveDuplicateFiles(TODO)
38 #include "wine/debug.h"
42 #include "msvcrt/fcntl.h"
45 #include "wine/unicode.h"
48 WINE_DEFAULT_DEBUG_CHANNEL(msi);
50 extern const WCHAR szInstallFiles[];
51 extern const WCHAR szDuplicateFiles[];
52 extern const WCHAR szMoveFiles[];
53 extern const WCHAR szPatchFiles[];
54 extern const WCHAR szRemoveDuplicateFiles[];
55 extern const WCHAR szRemoveFiles[];
57 static const WCHAR cszTempFolder[]= {'T','e','m','p','F','o','l','d','e','r',0};
61 * This is a helper function for handling embedded cabinet media
63 static UINT writeout_cabinet_stream(MSIPACKAGE *package, LPCWSTR stream_name,
73 rc = read_raw_stream_data(package->db,stream_name,&data,&size);
74 if (rc != ERROR_SUCCESS)
78 if (MSI_GetPropertyW(package, cszTempFolder, tmp, &write))
79 GetTempPathW(MAX_PATH,tmp);
81 GetTempFileNameW(tmp,stream_name,0,source);
83 track_tempfile(package,strrchrW(source,'\\'), source);
84 the_file = CreateFileW(source, GENERIC_WRITE, 0, NULL, CREATE_ALWAYS,
85 FILE_ATTRIBUTE_NORMAL, NULL);
87 if (the_file == INVALID_HANDLE_VALUE)
89 ERR("Unable to create file %s\n",debugstr_w(source));
90 rc = ERROR_FUNCTION_FAILED;
94 WriteFile(the_file,data,size,&write,NULL);
95 CloseHandle(the_file);
96 TRACE("wrote %li bytes to %s\n",write,debugstr_w(source));
103 /* Support functions for FDI functions */
110 static void * cabinet_alloc(ULONG cb)
112 return msi_alloc(cb);
115 static void cabinet_free(void *pv)
120 static INT_PTR cabinet_open(char *pszFile, int oflag, int pmode)
124 DWORD dwShareMode = 0;
125 DWORD dwCreateDisposition = OPEN_EXISTING;
126 switch (oflag & _O_ACCMODE)
129 dwAccess = GENERIC_READ;
130 dwShareMode = FILE_SHARE_READ | FILE_SHARE_DELETE;
133 dwAccess = GENERIC_WRITE;
134 dwShareMode = FILE_SHARE_READ | FILE_SHARE_WRITE | FILE_SHARE_DELETE;
137 dwAccess = GENERIC_READ | GENERIC_WRITE;
138 dwShareMode = FILE_SHARE_READ | FILE_SHARE_WRITE | FILE_SHARE_DELETE;
141 if ((oflag & (_O_CREAT | _O_EXCL)) == (_O_CREAT | _O_EXCL))
142 dwCreateDisposition = CREATE_NEW;
143 else if (oflag & _O_CREAT)
144 dwCreateDisposition = CREATE_ALWAYS;
145 handle = CreateFileA( pszFile, dwAccess, dwShareMode, NULL,
146 dwCreateDisposition, 0, NULL );
147 if (handle == INVALID_HANDLE_VALUE)
149 return (INT_PTR) handle;
152 static UINT cabinet_read(INT_PTR hf, void *pv, UINT cb)
154 HANDLE handle = (HANDLE) hf;
156 if (ReadFile(handle, pv, cb, &dwRead, NULL))
161 static UINT cabinet_write(INT_PTR hf, void *pv, UINT cb)
163 HANDLE handle = (HANDLE) hf;
165 if (WriteFile(handle, pv, cb, &dwWritten, NULL))
170 static int cabinet_close(INT_PTR hf)
172 HANDLE handle = (HANDLE) hf;
173 return CloseHandle(handle) ? 0 : -1;
176 static long cabinet_seek(INT_PTR hf, long dist, int seektype)
178 HANDLE handle = (HANDLE) hf;
179 /* flags are compatible and so are passed straight through */
180 return SetFilePointer(handle, dist, NULL, seektype);
183 static void msi_file_update_ui( MSIPACKAGE *package, MSIFILE *f )
189 uirow = MSI_CreateRecord( 9 );
190 MSI_RecordSetStringW( uirow, 1, f->FileName );
191 uipath = strdupW( f->TargetPath );
192 p = strrchrW(uipath,'\\');
195 MSI_RecordSetStringW( uirow, 9, uipath);
196 MSI_RecordSetInteger( uirow, 6, f->FileSize );
197 ui_actiondata( package, szInstallFiles, uirow);
198 msiobj_release( &uirow->hdr );
200 ui_progress( package, 2, f->FileSize, 0, 0);
203 static INT_PTR cabinet_notify(FDINOTIFICATIONTYPE fdint, PFDINOTIFICATION pfdin)
209 CabData *data = (CabData*) pfdin->pv;
210 ULONG len = strlen(data->cab_path) + strlen(pfdin->psz1);
217 static const WCHAR tmpprefix[] = {'C','A','B','T','M','P','_',0};
222 given_file = strdupAtoW(pfdin->psz1);
223 f = get_loaded_file(data->package, given_file);
224 msi_free(given_file);
228 ERR("Unknown File in Cabinet (%s)\n",debugstr_a(pfdin->psz1));
232 if (!((f->State == 1 || f->State == 2)))
234 TRACE("Skipping extraction of %s\n",debugstr_a(pfdin->psz1));
238 file = msi_alloc((len+1)*sizeof(char));
239 strcpy(file, data->cab_path);
240 strcat(file, pfdin->psz1);
242 TRACE("file: %s\n", debugstr_a(file));
244 /* track this file so it can be deleted if not installed */
245 trackpath=strdupAtoW(file);
246 tracknametmp=strdupAtoW(strrchr(file,'\\')+1);
247 trackname = msi_alloc((strlenW(tracknametmp) +
248 strlenW(tmpprefix)+1) * sizeof(WCHAR));
250 strcpyW(trackname,tmpprefix);
251 strcatW(trackname,tracknametmp);
253 track_tempfile(data->package, trackname, trackpath);
257 msi_free(tracknametmp);
259 msi_file_update_ui( data->package, f );
261 handle = cabinet_open(file, _O_WRONLY | _O_CREAT, 0);
265 case fdintCLOSE_FILE_INFO:
269 HANDLE handle = (HANDLE) pfdin->hf;
271 if (!DosDateTimeToFileTime(pfdin->date, pfdin->time, &ft))
273 if (!LocalFileTimeToFileTime(&ft, &ftLocal))
275 if (!SetFileTime(handle, &ftLocal, 0, &ftLocal))
285 /***********************************************************************
286 * extract_cabinet_file
288 * Extract files from a cab file.
290 static BOOL extract_cabinet_file(MSIPACKAGE* package, LPCWSTR source,
300 TRACE("Extracting %s to %s\n",debugstr_w(source), debugstr_w(path));
302 hfdi = FDICreate(cabinet_alloc,
313 ERR("FDICreate failed\n");
317 if (!(cabinet = strdupWtoA( source )))
322 if (!(cab_path = strdupWtoA( path )))
329 data.package = package;
330 data.cab_path = cab_path;
332 ret = FDICopy(hfdi, cabinet, "", 0, cabinet_notify, NULL, &data);
335 ERR("FDICopy failed\n");
345 static VOID set_file_source(MSIPACKAGE* package, MSIFILE* file, MSICOMPONENT*
348 if (file->Attributes & msidbFileAttributesNoncompressed)
351 p = resolve_folder(package, comp->Directory, TRUE, FALSE, NULL);
352 file->SourcePath = build_directory_name(2, p, file->ShortName);
356 file->SourcePath = build_directory_name(2, path, file->File);
359 static BOOL check_volume(LPCWSTR path, LPCWSTR want_volume, LPWSTR volume,
363 WCHAR name[MAX_PATH];
366 if (!(path[0] && path[1] == ':'))
373 TRACE("Checking volume %s .. (%s)\n",debugstr_w(drive), debugstr_w(want_volume));
374 type = GetDriveTypeW(drive);
375 TRACE("drive is of type %x\n",type);
377 if (type == DRIVE_UNKNOWN || type == DRIVE_NO_ROOT_DIR ||
378 type == DRIVE_FIXED || type == DRIVE_RAMDISK)
381 GetVolumeInformationW(drive, name, MAX_PATH, NULL, NULL, NULL, NULL, 0);
382 TRACE("Drive contains %s\n", debugstr_w(name));
383 volume = strdupW(name);
386 return (strcmpiW(want_volume,name)==0);
389 static BOOL check_for_sourcefile(LPCWSTR source)
391 DWORD attrib = GetFileAttributesW(source);
392 return (!(attrib == INVALID_FILE_ATTRIBUTES));
395 static UINT ready_volume(MSIPACKAGE* package, LPCWSTR path, LPWSTR last_volume,
396 MSIRECORD *row,UINT *type )
398 LPWSTR volume = NULL;
399 LPCWSTR want_volume = MSI_RecordGetString(row, 5);
400 BOOL ok = check_volume(path, want_volume, volume, type);
402 TRACE("Readying Volume for %s (%s, %s)\n",debugstr_w(path), debugstr_w(want_volume), debugstr_w(last_volume));
404 if (check_for_sourcefile(path) && !ok)
406 FIXME("Found the Sourcefile but not on the correct volume.(%s,%s,%s)\n",
407 debugstr_w(path),debugstr_w(want_volume), debugstr_w(volume));
408 return ERROR_SUCCESS;
417 prompt = MSI_RecordGetString(row,3);
418 msg = generate_error_string(package, 1302, 1, prompt);
419 rc = MessageBoxW(NULL,msg,NULL,MB_OKCANCEL);
423 ok = check_for_sourcefile(path);
425 return ERROR_INSTALL_USEREXIT;
428 msi_free(last_volume);
429 last_volume = strdupW(volume);
430 return ERROR_SUCCESS;
438 WCHAR source[MAX_PATH];
441 static struct media_info *create_media_info( void )
443 struct media_info *mi;
445 mi = msi_alloc( sizeof *mi );
448 mi->last_sequence = 0;
449 mi->last_volume = NULL;
450 mi->last_path = NULL;
458 static void free_media_info( struct media_info *mi )
460 msi_free( mi->last_path );
464 static UINT ready_media_for_file( MSIPACKAGE *package, struct media_info *mi,
467 UINT rc = ERROR_SUCCESS;
469 static const WCHAR ExecSeqQuery[] =
470 {'S','E','L','E','C','T',' ','*',' ', 'F','R','O','M',' ',
471 '`','M','e','d','i','a','`',' ','W','H','E','R','E',' ',
472 '`','L','a','s','t','S','e','q','u','e','n','c','e','`',' ','>','=',
473 ' ','%', 'i',' ','O','R','D','E','R',' ','B','Y',' ',
474 '`','L','a','s','t','S','e','q','u','e','n','c','e','`',0};
480 MSICOMPONENT *comp = file->Component;
482 if (file->Sequence <= mi->last_sequence)
484 set_file_source(package,file,comp,mi->last_path);
485 TRACE("Media already ready (%u, %u)\n",file->Sequence,mi->last_sequence);
486 return ERROR_SUCCESS;
490 row = MSI_QueryGetRecord(package->db, ExecSeqQuery, file->Sequence);
493 TRACE("Unable to query row\n");
494 return ERROR_FUNCTION_FAILED;
497 seq = MSI_RecordGetInteger(row,2);
498 mi->last_sequence = seq;
500 volume = MSI_RecordGetString(row, 5);
501 prompt = MSI_RecordGetString(row, 3);
503 msi_free(mi->last_path);
504 mi->last_path = NULL;
506 if (file->Attributes & msidbFileAttributesNoncompressed)
508 mi->last_path = resolve_folder(package, comp->Directory, TRUE, FALSE, NULL);
509 set_file_source(package,file,comp,mi->last_path);
510 rc = ready_volume(package, file->SourcePath, mi->last_volume, row,&type);
512 MsiSourceListAddMediaDiskW(package->ProductCode, NULL,
513 MSIINSTALLCONTEXT_USERMANAGED, MSICODE_PRODUCT, mi->count, volume,
516 if (type == DRIVE_REMOVABLE || type == DRIVE_CDROM ||
517 type == DRIVE_RAMDISK)
518 MsiSourceListSetInfoW(package->ProductCode, NULL,
519 MSIINSTALLCONTEXT_USERMANAGED,
520 MSICODE_PRODUCT|MSISOURCETYPE_MEDIA,
521 INSTALLPROPERTY_LASTUSEDSOURCEW, mi->last_path);
523 MsiSourceListSetInfoW(package->ProductCode, NULL,
524 MSIINSTALLCONTEXT_USERMANAGED,
525 MSICODE_PRODUCT|MSISOURCETYPE_NETWORK,
526 INSTALLPROPERTY_LASTUSEDSOURCEW, mi->last_path);
527 msiobj_release(&row->hdr);
531 cab = MSI_RecordGetString(row,4);
534 TRACE("Source is CAB %s\n",debugstr_w(cab));
535 /* the stream does not contain the # character */
540 writeout_cabinet_stream(package,&cab[1],mi->source);
541 mi->last_path = strdupW(mi->source);
542 *(strrchrW(mi->last_path,'\\')+1)=0;
544 path = msi_dup_property( package, cszSourceDir );
546 MsiSourceListAddMediaDiskW(package->ProductCode, NULL,
547 MSIINSTALLCONTEXT_USERMANAGED, MSICODE_PRODUCT, mi->count,
550 MsiSourceListSetInfoW(package->ProductCode, NULL,
551 MSIINSTALLCONTEXT_USERMANAGED,
552 MSICODE_PRODUCT|MSISOURCETYPE_NETWORK,
553 INSTALLPROPERTY_LASTUSEDSOURCEW, path);
560 mi->last_path = msi_alloc(MAX_PATH*sizeof(WCHAR));
561 if (MSI_GetPropertyW(package, cszSourceDir, mi->source, &sz))
563 ERR("No Source dir defined \n");
564 rc = ERROR_FUNCTION_FAILED;
568 strcpyW(mi->last_path,mi->source);
569 strcatW(mi->source,cab);
571 rc = ready_volume(package, mi->source, mi->last_volume, row, &type);
572 if (type == DRIVE_REMOVABLE || type == DRIVE_CDROM ||
573 type == DRIVE_RAMDISK)
574 MsiSourceListSetInfoW(package->ProductCode, NULL,
575 MSIINSTALLCONTEXT_USERMANAGED,
576 MSICODE_PRODUCT|MSISOURCETYPE_MEDIA,
577 INSTALLPROPERTY_LASTUSEDSOURCEW, mi->last_path);
579 MsiSourceListSetInfoW(package->ProductCode, NULL,
580 MSIINSTALLCONTEXT_USERMANAGED,
581 MSICODE_PRODUCT|MSISOURCETYPE_NETWORK,
582 INSTALLPROPERTY_LASTUSEDSOURCEW, mi->last_path);
584 /* extract the cab file into a folder in the temp folder */
586 if (MSI_GetPropertyW(package, cszTempFolder,mi->last_path, &sz)
588 GetTempPathW(MAX_PATH,mi->last_path);
591 rc = !extract_cabinet_file(package, mi->source, mi->last_path);
596 mi->last_path = msi_alloc(MAX_PATH*sizeof(WCHAR));
597 MSI_GetPropertyW(package,cszSourceDir,mi->source,&sz);
598 strcpyW(mi->last_path,mi->source);
599 rc = ready_volume(package, mi->last_path, mi->last_volume, row, &type);
601 if (type == DRIVE_REMOVABLE || type == DRIVE_CDROM ||
602 type == DRIVE_RAMDISK)
603 MsiSourceListSetInfoW(package->ProductCode, NULL,
604 MSIINSTALLCONTEXT_USERMANAGED,
605 MSICODE_PRODUCT|MSISOURCETYPE_MEDIA,
606 INSTALLPROPERTY_LASTUSEDSOURCEW, mi->last_path);
608 MsiSourceListSetInfoW(package->ProductCode, NULL,
609 MSIINSTALLCONTEXT_USERMANAGED,
610 MSICODE_PRODUCT|MSISOURCETYPE_NETWORK,
611 INSTALLPROPERTY_LASTUSEDSOURCEW, mi->last_path);
613 set_file_source(package, file, comp, mi->last_path);
615 MsiSourceListAddMediaDiskW(package->ProductCode, NULL,
616 MSIINSTALLCONTEXT_USERMANAGED, MSICODE_PRODUCT, mi->count, volume,
619 msiobj_release(&row->hdr);
624 static UINT get_file_target(MSIPACKAGE *package, LPCWSTR file_key,
630 return ERROR_INVALID_HANDLE;
632 LIST_FOR_EACH_ENTRY( file, &package->files, MSIFILE, entry )
634 if (lstrcmpW( file_key, file->File )==0)
636 if (file->State >= 2)
638 *file_source = strdupW( file->TargetPath );
639 return ERROR_SUCCESS;
642 return ERROR_FILE_NOT_FOUND;
646 return ERROR_FUNCTION_FAILED;
650 * In order to make this work more effeciencly I am going to do this in 2
652 * Pass 1) Correct all the TargetPaths and determin what files are to be
654 * Pass 2) Extract Cabinents and copy files.
656 UINT ACTION_InstallFiles(MSIPACKAGE *package)
658 struct media_info *mi;
659 UINT rc = ERROR_SUCCESS;
664 return ERROR_INVALID_HANDLE;
666 /* increment progress bar each time action data is sent */
667 ui_progress(package,1,1,0,0);
669 /* handle the keys for the SouceList */
670 ptr = strrchrW(package->PackagePath,'\\');
674 MsiSourceListSetInfoW(package->ProductCode, NULL,
675 MSIINSTALLCONTEXT_USERMANAGED,
677 INSTALLPROPERTY_PACKAGENAMEW, ptr);
679 FIXME("Write DiskPrompt\n");
682 LIST_FOR_EACH_ENTRY( file, &package->files, MSIFILE, entry )
684 if (!ACTION_VerifyComponentForAction(package, file->Component,
687 ui_progress(package,2,file->FileSize,0,0);
688 TRACE("File %s is not scheduled for install\n",
689 debugstr_w(file->File));
695 mi = create_media_info();
698 LIST_FOR_EACH_ENTRY( file, &package->files, MSIFILE, entry )
700 if ((file->State == 1) || (file->State == 2))
702 TRACE("Pass 2: %s\n",debugstr_w(file->File));
704 rc = ready_media_for_file( package, mi, file );
705 if (rc != ERROR_SUCCESS)
707 ERR("Unable to ready media\n");
708 rc = ERROR_FUNCTION_FAILED;
712 TRACE("file paths %s to %s\n",debugstr_w(file->SourcePath),
713 debugstr_w(file->TargetPath));
715 if (file->Attributes & msidbFileAttributesNoncompressed)
716 rc = CopyFileW(file->SourcePath,file->TargetPath,FALSE);
718 rc = MoveFileW(file->SourcePath, file->TargetPath);
723 ERR("Unable to move/copy file (%s -> %s) (error %d)\n",
724 debugstr_w(file->SourcePath), debugstr_w(file->TargetPath),
726 if (rc == ERROR_ALREADY_EXISTS && file->State == 2)
728 if (!CopyFileW(file->SourcePath,file->TargetPath,FALSE))
729 ERR("Unable to copy file (%s -> %s) (error %ld)\n",
730 debugstr_w(file->SourcePath),
731 debugstr_w(file->TargetPath), GetLastError());
732 if (!(file->Attributes & msidbFileAttributesNoncompressed))
733 DeleteFileW(file->SourcePath);
736 else if (rc == ERROR_FILE_NOT_FOUND)
738 ERR("Source File Not Found! Continuing\n");
741 else if (file->Attributes & msidbFileAttributesVital)
743 ERR("Ignoring Error and continuing (nonvital file)...\n");
756 free_media_info( mi );
760 static UINT ITERATE_DuplicateFiles(MSIRECORD *row, LPVOID param)
762 MSIPACKAGE *package = (MSIPACKAGE*)param;
763 WCHAR *file_source = NULL;
764 WCHAR dest_name[0x100];
765 LPWSTR dest_path, dest;
766 LPCWSTR file_key, component;
771 component = MSI_RecordGetString(row,2);
772 comp = get_loaded_component(package,component);
774 if (!ACTION_VerifyComponentForAction(package, comp, INSTALLSTATE_LOCAL))
776 TRACE("Skipping copy due to disabled component %s\n",
777 debugstr_w(component));
779 /* the action taken was the same as the current install state */
780 comp->Action = comp->Installed;
782 return ERROR_SUCCESS;
785 comp->Action = INSTALLSTATE_LOCAL;
787 file_key = MSI_RecordGetString(row,3);
790 ERR("Unable to get file key\n");
791 return ERROR_FUNCTION_FAILED;
794 rc = get_file_target(package,file_key,&file_source);
796 if (rc != ERROR_SUCCESS)
798 ERR("Original file unknown %s\n",debugstr_w(file_key));
799 msi_free(file_source);
800 return ERROR_SUCCESS;
803 if (MSI_RecordIsNull(row,4))
804 strcpyW(dest_name,strrchrW(file_source,'\\')+1);
808 MSI_RecordGetStringW(row,4,dest_name,&sz);
809 reduce_to_longfilename(dest_name);
812 if (MSI_RecordIsNull(row,5))
815 dest_path = strdupW(file_source);
816 p = strrchrW(dest_path,'\\');
823 destkey = MSI_RecordGetString(row,5);
824 dest_path = resolve_folder(package, destkey, FALSE,FALSE,NULL);
828 dest_path = msi_dup_property( package, destkey );
831 FIXME("Unable to get destination folder, try AppSearch properties\n");
832 msi_free(file_source);
833 return ERROR_SUCCESS;
838 dest = build_directory_name(2, dest_path, dest_name);
840 TRACE("Duplicating file %s to %s\n",debugstr_w(file_source),
843 if (strcmpW(file_source,dest))
844 rc = !CopyFileW(file_source,dest,TRUE);
848 if (rc != ERROR_SUCCESS)
849 ERR("Failed to copy file %s -> %s, last error %ld\n", debugstr_w(file_source), debugstr_w(dest_path), GetLastError());
851 FIXME("We should track these duplicate files as well\n");
855 msi_free(file_source);
857 return ERROR_SUCCESS;
860 UINT ACTION_DuplicateFiles(MSIPACKAGE *package)
864 static const WCHAR ExecSeqQuery[] =
865 {'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ',
866 '`','D','u','p','l','i','c','a','t','e','F','i','l','e','`',0};
869 return ERROR_INVALID_HANDLE;
871 rc = MSI_DatabaseOpenViewW(package->db, ExecSeqQuery, &view);
872 if (rc != ERROR_SUCCESS)
873 return ERROR_SUCCESS;
875 rc = MSI_IterateRecords(view, NULL, ITERATE_DuplicateFiles, package);
876 msiobj_release(&view->hdr);