msi: only extract files from the cab as we need them

[Aric Stewart]

Change how we InstallFiles so that we extract files as we need them, 
cuts down on extraction time and unused files.
-------------- next part --------------
Index: dlls/msi/action.c
===================================================================
RCS file: /home/wine/wine/dlls/msi/action.c,v
retrieving revision 1.57
diff -u -r1.57 action.c
--- dlls/msi/action.c	3 Jan 2005 16:06:44 -0000	1.57
+++ dlls/msi/action.c	3 Jan 2005 19:24:00 -0000
@@ -2814,6 +2814,7 @@
 {
     MSIPACKAGE* package;
     LPCSTR cab_path;
+    LPCSTR file_name;
 } CabData;
 
 static void * cabinet_alloc(ULONG cb)
@@ -2889,13 +2890,17 @@
     {
         CabData *data = (CabData*) pfdin->pv;
         ULONG len = strlen(data->cab_path) + strlen(pfdin->psz1);
-        char *file = cabinet_alloc((len+1)*sizeof(char));
+        char *file;
 
         LPWSTR trackname;
         LPWSTR trackpath;
         LPWSTR tracknametmp;
         static const WCHAR tmpprefix[] = {'C','A','B','T','M','P','_',0};
+       
+        if (data->file_name && strcmp(data->file_name,pfdin->psz1))
+                return 0;
         
+        file = cabinet_alloc((len+1)*sizeof(char));
         strcpy(file, data->cab_path);
         strcat(file, pfdin->psz1);
 
@@ -2942,17 +2947,19 @@
  *
  * Extract files from a cab file.
  */
-static BOOL extract_cabinet_file(MSIPACKAGE* package, const WCHAR* source, 
-                                 const WCHAR* path)
+static BOOL extract_a_cabinet_file(MSIPACKAGE* package, const WCHAR* source, 
+                                 const WCHAR* path, const WCHAR* file)
 {
     HFDI hfdi;
     ERF erf;
     BOOL ret;
     char *cabinet;
     char *cab_path;
+    char *file_name;
     CabData data;
 
-    TRACE("Extracting %s to %s\n",debugstr_w(source), debugstr_w(path));
+    TRACE("Extracting %s (%s) to %s\n",debugstr_w(source), 
+                    debugstr_w(file), debugstr_w(path));
 
     hfdi = FDICreate(cabinet_alloc,
                      cabinet_free,
@@ -2983,6 +2990,8 @@
 
     data.package = package;
     data.cab_path = cab_path;
+    file_name = strdupWtoA(file);
+    data.file_name = file_name;
 
     ret = FDICopy(hfdi, cabinet, "", 0, cabinet_notify, NULL, &data);
 
@@ -2993,17 +3002,18 @@
 
     HeapFree(GetProcessHeap(), 0, cabinet);
     HeapFree(GetProcessHeap(), 0, cab_path);
+    HeapFree(GetProcessHeap(), 0, file_name);
 
     return ret;
 }
 
 static UINT ready_media_for_file(MSIPACKAGE *package, UINT sequence, 
-                                 WCHAR* path)
+                                 WCHAR* path, WCHAR* file)
 {
     UINT rc;
     MSIQUERY * view;
     MSIRECORD * row = 0;
-    WCHAR source[MAX_PATH];
+    static WCHAR source[MAX_PATH];
     static const WCHAR ExecSeqQuery[] = {
         's','e','l','e','c','t',' ','*',' ',
         'f','r','o','m',' ','M','e','d','i','a',' ',
@@ -3018,6 +3028,7 @@
     if (sequence <= last_sequence)
     {
         TRACE("Media already ready (%u, %u)\n",sequence,last_sequence);
+        extract_a_cabinet_file(package, source,path,file);
         return ERROR_SUCCESS;
     }
 
@@ -3076,7 +3087,7 @@
                     GetTempPathW(MAX_PATH,path);
             }
         }
-        rc = !extract_cabinet_file(package, source,path);
+        rc = !extract_a_cabinet_file(package, source,path,file);
     }
     msiobj_release(&row->hdr);
     MSI_ViewClose(view);
@@ -3141,7 +3152,8 @@
         if ((file->State == 1) || (file->State == 2))
         {
             TRACE("Installing %s\n",debugstr_w(file->File));
-            rc = ready_media_for_file(package,file->Sequence,path_to_source);
+            rc = ready_media_for_file(package,file->Sequence,path_to_source,
+                            file->File);
             /* 
              * WARNING!
              * our file table could change here because a new temp file