2 * Copyright (C) 2006 James Hawkins
4 * A test program for installing MSI products.
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
29 #include "wine/test.h"
31 static const char *msifile = "winetest.msi";
32 CHAR CURR_DIR[MAX_PATH];
33 CHAR PROG_FILES_DIR[MAX_PATH];
35 /* msi database data */
37 static const CHAR admin_exec_seq_dat[] = "Action\tCondition\tSequence\n"
39 "AdminExecuteSequence\tAction\n"
40 "CostFinalize\t\t1000\n"
41 "CostInitialize\t\t800\n"
43 "InstallAdminPackage\t\t3900\n"
44 "InstallFiles\t\t4000\n"
45 "InstallFinalize\t\t6600\n"
46 "InstallInitialize\t\t1500\n"
47 "InstallValidate\t\t1400";
49 static const CHAR advt_exec_seq_dat[] = "Action\tCondition\tSequence\n"
51 "AdvtExecuteSequence\tAction\n"
52 "CostFinalize\t\t1000\n"
53 "CostInitialize\t\t800\n"
54 "CreateShortcuts\t\t4500\n"
55 "InstallFinalize\t\t6600\n"
56 "InstallInitialize\t\t1500\n"
57 "InstallValidate\t\t1400\n"
58 "PublishComponents\t\t6200\n"
59 "PublishFeatures\t\t6300\n"
60 "PublishProduct\t\t6400\n"
61 "RegisterClassInfo\t\t4600\n"
62 "RegisterExtensionInfo\t\t4700\n"
63 "RegisterMIMEInfo\t\t4900\n"
64 "RegisterProgIdInfo\t\t4800";
66 static const CHAR component_dat[] = "Component\tComponentId\tDirectory_\tAttributes\tCondition\tKeyPath\n"
67 "s72\tS38\ts72\ti2\tS255\tS72\n"
68 "Component\tComponent\n"
69 "Five\t{8CC92E9D-14B2-4CA4-B2AA-B11D02078087}\tNEWDIR\t2\t\tfive.txt\n"
70 "Four\t{FD37B4EA-7209-45C0-8917-535F35A2F080}\tCABOUTDIR\t2\t\tfour.txt\n"
71 "One\t{783B242E-E185-4A56-AF86-C09815EC053C}\tMSITESTDIR\t2\t\tone.txt\n"
72 "Three\t{010B6ADD-B27D-4EDD-9B3D-34C4F7D61684}\tCHANGEDDIR\t2\t\tthree.txt\n"
73 "Two\t{BF03D1A6-20DA-4A65-82F3-6CAC995915CE}\tFIRSTDIR\t2\t\ttwo.txt\n"
74 "dangler\t{6091DF25-EF96-45F1-B8E9-A9B1420C7A3C}\tTARGETDIR\t4\t\tregdata";
76 static const CHAR directory_dat[] = "Directory\tDirectory_Parent\tDefaultDir\n"
78 "Directory\tDirectory\n"
79 "CABOUTDIR\tMSITESTDIR\tcabout\n"
80 "CHANGEDDIR\tMSITESTDIR\tchanged:second\n"
81 "FIRSTDIR\tMSITESTDIR\tfirst\n"
82 "MSITESTDIR\tProgramFilesFolder\tmsitest\n"
83 "NEWDIR\tCABOUTDIR\tnew\n"
84 "ProgramFilesFolder\tTARGETDIR\t.\n"
85 "TARGETDIR\t\tSourceDir";
87 static const CHAR feature_dat[] = "Feature\tFeature_Parent\tTitle\tDescription\tDisplay\tLevel\tDirectory_\tAttributes\n"
88 "s38\tS38\tL64\tL255\tI2\ti2\tS72\ti2\n"
90 "Five\t\tFive\tThe Five Feature\t5\t3\tNEWDIR\t0\n"
91 "Four\t\tFour\tThe Four Feature\t4\t3\tCABOUTDIR\t0\n"
92 "One\t\tOne\tThe One Feature\t1\t3\tMSITESTDIR\t0\n"
93 "Three\t\tThree\tThe Three Feature\t3\t3\tCHANGEDDIR\t0\n"
94 "Two\t\tTwo\tThe Two Feature\t2\t3\tFIRSTDIR\t0";
96 static const CHAR feature_comp_dat[] = "Feature_\tComponent_\n"
98 "FeatureComponents\tFeature_\tComponent_\n"
105 static const CHAR file_dat[] = "File\tComponent_\tFileName\tFileSize\tVersion\tLanguage\tAttributes\tSequence\n"
106 "s72\ts72\tl255\ti4\tS72\tS20\tI2\ti2\n"
108 "five.txt\tFive\tfive.txt\t1000\t\t\t16384\t5\n"
109 "four.txt\tFour\tfour.txt\t1000\t\t\t16384\t4\n"
110 "one.txt\tOne\tone.txt\t1000\t\t\t0\t1\n"
111 "three.txt\tThree\tthree.txt\t1000\t\t\t0\t3\n"
112 "two.txt\tTwo\ttwo.txt\t1000\t\t\t0\t2";
114 static const CHAR install_exec_seq_dat[] = "Action\tCondition\tSequence\n"
116 "InstallExecuteSequence\tAction\n"
117 "AllocateRegistrySpace\tNOT Installed\t1550\n"
118 "CostFinalize\t\t1000\n"
119 "CostInitialize\t\t800\n"
121 "InstallFiles\t\t4000\n"
122 "InstallFinalize\t\t6600\n"
123 "InstallInitialize\t\t1500\n"
124 "InstallValidate\t\t1400\n"
125 "LaunchConditions\t\t100\n"
126 "WriteRegistryValues\t\t5000";
128 static const CHAR media_dat[] = "DiskId\tLastSequence\tDiskPrompt\tCabinet\tVolumeLabel\tSource\n"
129 "i2\ti2\tL64\tS255\tS32\tS72\n"
131 "1\t3\t\t\tDISK1\t\n"
132 "2\t5\t\tmsitest.cab\tDISK2\t\n";
134 static const CHAR property_dat[] = "Property\tValue\n"
136 "Property\tProperty\n"
137 "DefaultUIFont\tDlgFont8\n"
139 "InstallMode\tTypical\n"
140 "Manufacturer\tWine\n"
141 "PIDTemplate\t12345<###-%%%%%%%>@@@@@\n"
142 "ProductCode\t{F1C3AF50-8B56-4A69-A00C-00773FE42F30}\n"
144 "ProductLanguage\t1033\n"
145 "ProductName\tMSITEST\n"
146 "ProductVersion\t1.1.1\n"
147 "PROMPTROLLBACKCOST\tP\n"
149 "UpgradeCode\t{CE067E8D-2E1A-4367-B734-4EB2BDAD6565}";
151 static const CHAR registry_dat[] = "Registry\tRoot\tKey\tName\tValue\tComponent_\n"
152 "s72\ti2\tl255\tL255\tL0\ts72\n"
153 "Registry\tRegistry\n"
154 "Apples\t2\tSOFTWARE\\Wine\\msitest\tName\timaname\tOne\n"
155 "Oranges\t2\tSOFTWARE\\Wine\\msitest\tnumber\t#314\tTwo\n"
156 "regdata\t2\tSOFTWARE\\Wine\\msitest\tblah\tbad\tdangler";
158 typedef struct _msi_table
160 const CHAR *filename;
165 #define ADD_TABLE(x) {#x".idt", x##_dat, sizeof(x##_dat)}
167 static const msi_table tables[] =
169 ADD_TABLE(admin_exec_seq),
170 ADD_TABLE(advt_exec_seq),
171 ADD_TABLE(component),
172 ADD_TABLE(directory),
174 ADD_TABLE(feature_comp),
176 ADD_TABLE(install_exec_seq),
182 /* cabinet definitions */
184 /* make the max size large so there is only one cab file */
185 #define MEDIA_SIZE 999999999
186 #define FOLDER_THRESHOLD 900000
188 /* The following defintions were copied from dlls/cabinet/cabinet.h
189 * because they are undocumented in windows.
192 /* EXTRACTdest flags */
193 #define EXTRACT_FILLFILELIST 0x00000001
194 #define EXTRACT_EXTRACTFILES 0x00000002
196 struct ExtractFileList {
198 struct ExtractFileList *next;
199 BOOL unknown; /* always 1L */
202 /* the first parameter of the function extract */
204 long result1; /* 0x000 */
205 long unknown1[3]; /* 0x004 */
206 struct ExtractFileList *filelist; /* 0x010 */
207 long filecount; /* 0x014 */
208 long flags; /* 0x018 */
209 char directory[0x104]; /* 0x01c */
210 char lastfile[0x20c]; /* 0x120 */
213 /* cabinet function pointers */
215 static HRESULT (WINAPI *pExtract)(EXTRACTDEST*, LPCSTR);
217 /* the FCI callbacks */
219 static void *mem_alloc(ULONG cb)
221 return HeapAlloc(GetProcessHeap(), 0, cb);
224 static void mem_free(void *memory)
226 HeapFree(GetProcessHeap(), 0, memory);
229 static BOOL get_next_cabinet(PCCAB pccab, ULONG cbPrevCab, void *pv)
234 static long progress(UINT typeStatus, ULONG cb1, ULONG cb2, void *pv)
239 static int file_placed(PCCAB pccab, char *pszFile, long cbFile,
240 BOOL fContinuation, void *pv)
245 static INT_PTR fci_open(char *pszFile, int oflag, int pmode, int *err, void *pv)
249 DWORD dwShareMode = 0;
250 DWORD dwCreateDisposition = OPEN_EXISTING;
252 dwAccess = GENERIC_READ | GENERIC_WRITE;
253 dwShareMode = FILE_SHARE_READ | FILE_SHARE_WRITE | FILE_SHARE_DELETE;
255 if (GetFileAttributesA(pszFile) != INVALID_FILE_ATTRIBUTES)
256 dwCreateDisposition = OPEN_EXISTING;
258 dwCreateDisposition = CREATE_NEW;
260 handle = CreateFileA(pszFile, dwAccess, dwShareMode, NULL,
261 dwCreateDisposition, 0, NULL);
263 ok(handle != INVALID_HANDLE_VALUE, "Failed to CreateFile %s\n", pszFile);
265 return (INT_PTR)handle;
268 static UINT fci_read(INT_PTR hf, void *memory, UINT cb, int *err, void *pv)
270 HANDLE handle = (HANDLE)hf;
274 res = ReadFile(handle, memory, cb, &dwRead, NULL);
275 ok(res, "Failed to ReadFile\n");
280 static UINT fci_write(INT_PTR hf, void *memory, UINT cb, int *err, void *pv)
282 HANDLE handle = (HANDLE)hf;
286 res = WriteFile(handle, memory, cb, &dwWritten, NULL);
287 ok(res, "Failed to WriteFile\n");
292 static int fci_close(INT_PTR hf, int *err, void *pv)
294 HANDLE handle = (HANDLE)hf;
295 ok(CloseHandle(handle), "Failed to CloseHandle\n");
300 static long fci_seek(INT_PTR hf, long dist, int seektype, int *err, void *pv)
302 HANDLE handle = (HANDLE)hf;
305 ret = SetFilePointer(handle, dist, NULL, seektype);
306 ok(ret != INVALID_SET_FILE_POINTER, "Failed to SetFilePointer\n");
311 static int fci_delete(char *pszFile, int *err, void *pv)
313 BOOL ret = DeleteFileA(pszFile);
314 ok(ret, "Failed to DeleteFile %s\n", pszFile);
319 static BOOL get_temp_file(char *pszTempName, int cbTempName, void *pv)
323 tempname = HeapAlloc(GetProcessHeap(), 0, MAX_PATH);
324 GetTempFileNameA(".", "xx", 0, tempname);
326 if (tempname && (strlen(tempname) < (unsigned)cbTempName))
328 lstrcpyA(pszTempName, tempname);
329 HeapFree(GetProcessHeap(), 0, tempname);
333 HeapFree(GetProcessHeap(), 0, tempname);
338 static INT_PTR get_open_info(char *pszName, USHORT *pdate, USHORT *ptime,
339 USHORT *pattribs, int *err, void *pv)
341 BY_HANDLE_FILE_INFORMATION finfo;
347 handle = CreateFile(pszName, GENERIC_READ, FILE_SHARE_READ, NULL,
348 OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL | FILE_FLAG_SEQUENTIAL_SCAN, NULL);
350 ok(handle != INVALID_HANDLE_VALUE, "Failed to CreateFile %s\n", pszName);
352 res = GetFileInformationByHandle(handle, &finfo);
353 ok(res, "Expected GetFileInformationByHandle to succeed\n");
355 FileTimeToLocalFileTime(&finfo.ftLastWriteTime, &filetime);
356 FileTimeToDosDateTime(&filetime, pdate, ptime);
358 attrs = GetFileAttributes(pszName);
359 ok(attrs != INVALID_FILE_ATTRIBUTES, "Failed to GetFileAttributes\n");
361 return (INT_PTR)handle;
364 static void add_file(HFCI hfci, char *file)
369 lstrcpyA(path, CURR_DIR);
370 lstrcatA(path, "\\");
371 lstrcatA(path, file);
373 res = FCIAddFile(hfci, path, file, FALSE, get_next_cabinet, progress,
374 get_open_info, tcompTYPE_MSZIP);
375 ok(res, "Expected FCIAddFile to succeed\n");
378 static void set_cab_parameters(PCCAB pCabParams, const CHAR *name)
380 ZeroMemory(pCabParams, sizeof(CCAB));
382 pCabParams->cb = MEDIA_SIZE;
383 pCabParams->cbFolderThresh = FOLDER_THRESHOLD;
384 pCabParams->setID = 0xbeef;
385 lstrcpyA(pCabParams->szCabPath, CURR_DIR);
386 lstrcatA(pCabParams->szCabPath, "\\");
387 lstrcpyA(pCabParams->szCab, name);
390 static void create_cab_file(const CHAR *name)
397 set_cab_parameters(&cabParams, name);
399 hfci = FCICreate(&erf, file_placed, mem_alloc, mem_free, fci_open,
400 fci_read, fci_write, fci_close, fci_seek, fci_delete,
401 get_temp_file, &cabParams, NULL);
403 ok(hfci != NULL, "Failed to create an FCI context\n");
405 add_file(hfci, "four.txt");
406 add_file(hfci, "five.txt");
408 res = FCIFlushCabinet(hfci, FALSE, get_next_cabinet, progress);
409 ok(res, "Failed to flush the cabinet\n");
411 res = FCIDestroy(hfci);
412 ok(res, "Failed to destroy the cabinet\n");
415 static BOOL init_function_pointers(void)
417 hCabinet = LoadLibraryA("cabinet.dll");
421 pExtract = (void *)GetProcAddress(hCabinet, "Extract");
428 static BOOL get_program_files_dir(LPSTR buf)
432 DWORD type = REG_EXPAND_SZ, size;
434 if (RegOpenKey(HKEY_LOCAL_MACHINE,
435 "Software\\Microsoft\\Windows\\CurrentVersion", &hkey))
439 if (RegQueryValueEx(hkey, "ProgramFilesPath", 0, &type, (LPBYTE)temp, &size))
442 ExpandEnvironmentStrings(temp, buf, MAX_PATH);
448 static void create_file(const CHAR *name)
453 file = CreateFileA(name, GENERIC_WRITE, 0, NULL, CREATE_ALWAYS, 0, NULL);
454 ok(file != INVALID_HANDLE_VALUE, "Failure to open file %s\n", name);
455 WriteFile(file, name, strlen(name), &written, NULL);
456 WriteFile(file, "\n", strlen("\n"), &written, NULL);
460 static void create_test_files(void)
464 GetCurrentDirectoryA(MAX_PATH, CURR_DIR);
465 len = lstrlenA(CURR_DIR);
467 if(len && (CURR_DIR[len-1] == '\\'))
468 CURR_DIR[len - 1] = 0;
470 get_program_files_dir(PROG_FILES_DIR);
472 CreateDirectoryA("msitest", NULL);
473 create_file("msitest\\one.txt");
474 CreateDirectoryA("msitest\\first", NULL);
475 create_file("msitest\\first\\two.txt");
476 CreateDirectoryA("msitest\\second", NULL);
477 create_file("msitest\\second\\three.txt");
479 create_file("four.txt");
480 create_file("five.txt");
481 create_cab_file("msitest.cab");
483 DeleteFileA("four.txt");
484 DeleteFileA("five.txt");
487 static BOOL delete_pf(const CHAR *rel_path, BOOL is_file)
491 lstrcpyA(path, PROG_FILES_DIR);
492 lstrcatA(path, "\\");
493 lstrcatA(path, rel_path);
496 return DeleteFileA(path);
498 return RemoveDirectoryA(path);
501 static void delete_test_files(void)
503 DeleteFileA("msitest.msi");
504 DeleteFileA("msitest.cab");
505 DeleteFileA("msitest\\second\\three.txt");
506 DeleteFileA("msitest\\first\\two.txt");
507 DeleteFileA("msitest\\one.txt");
508 RemoveDirectoryA("msitest\\second");
509 RemoveDirectoryA("msitest\\first");
510 RemoveDirectoryA("msitest");
513 static void write_file(const CHAR *filename, const char *data, int data_size)
517 HANDLE hf = CreateFile(filename, GENERIC_WRITE, 0, NULL,
518 CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL);
520 WriteFile(hf, data, data_size, &size, NULL);
524 static void write_msi_summary_info(MSIHANDLE db)
529 r = MsiGetSummaryInformationA(db, NULL, 4, &summary);
530 ok(r == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %u\n", r);
532 r = MsiSummaryInfoSetPropertyA(summary, PID_TEMPLATE, VT_LPSTR, 0, NULL, ";1033");
533 ok(r == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %u\n", r);
535 r = MsiSummaryInfoSetPropertyA(summary, PID_REVNUMBER, VT_LPSTR, 0, NULL,
536 "{004757CA-5092-49c2-AD20-28E1CE0DF5F2}");
537 ok(r == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %u\n", r);
539 r = MsiSummaryInfoSetPropertyA(summary, PID_PAGECOUNT, VT_I4, 100, NULL, NULL);
540 ok(r == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %u\n", r);
542 r = MsiSummaryInfoSetPropertyA(summary, PID_WORDCOUNT, VT_I4, 0, NULL, NULL);
543 ok(r == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %u\n", r);
545 /* write the summary changes back to the stream */
546 r = MsiSummaryInfoPersist(summary);
547 ok(r == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %u\n", r);
549 MsiCloseHandle(summary);
552 static void create_database(const CHAR *name, const msi_table *tables, int num_tables)
558 r = MsiOpenDatabaseA(name, MSIDBOPEN_CREATE, &db);
559 ok(r == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %u\n", r);
561 /* import the tables into the database */
562 for (j = 0; j < num_tables; j++)
564 const msi_table *table = &tables[j];
566 write_file(table->filename, table->data, (table->size - 1) * sizeof(char));
568 r = MsiDatabaseImportA(db, CURR_DIR, table->filename);
571 ok(r == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %u\n", r);
574 DeleteFileA(table->filename);
577 write_msi_summary_info(db);
579 r = MsiDatabaseCommit(db);
580 ok(r == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %u\n", r);
585 static void test_MsiInstallProduct(void)
591 DWORD num, size, type;
593 r = MsiInstallProductA(msifile, NULL);
596 ok(r == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %u\n", r);
601 ok(delete_pf("msitest\\cabout\\new\\five.txt", TRUE), "File not installed\n");
602 ok(delete_pf("msitest\\cabout\\new", FALSE), "File not installed\n");
603 ok(delete_pf("msitest\\cabout\\four.txt", TRUE), "File not installed\n");
604 ok(delete_pf("msitest\\cabout", FALSE), "File not installed\n");
605 ok(delete_pf("msitest\\changed\\three.txt", TRUE), "File not installed\n");
606 ok(delete_pf("msitest\\changed", FALSE), "File not installed\n");
607 ok(delete_pf("msitest\\first\\two.txt", TRUE), "File not installed\n");
608 ok(delete_pf("msitest\\first", FALSE), "File not installed\n");
609 ok(delete_pf("msitest\\one.txt", TRUE), "File not installed\n");
610 ok(delete_pf("msitest", FALSE), "File not installed\n");
613 res = RegOpenKey(HKEY_LOCAL_MACHINE, "SOFTWARE\\Wine\\msitest", &hkey);
616 ok(res == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %ld\n", res);
621 res = RegQueryValueExA(hkey, "Name", NULL, &type, (LPBYTE)path, &size);
624 ok(res == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %ld\n", res);
625 ok(!lstrcmpA(path, "imaname"), "Expected imaname, got %s\n", path);
630 res = RegQueryValueExA(hkey, "blah", NULL, &type, (LPBYTE)path, &size);
633 ok(res == ERROR_FILE_NOT_FOUND, "Expected ERROR_FILE_NOT_FOUND, got %ld\n", res);
638 res = RegQueryValueExA(hkey, "number", NULL, &type, (LPBYTE)&num, &size);
641 ok(res == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %ld\n", res);
642 ok(num == 314, "Expected 314, got %ld\n", num);
645 RegDeleteKeyA(HKEY_LOCAL_MACHINE, "SOFTWARE\\Wine\\msitest");
648 static void test_MsiSetComponentState(void)
656 lstrcpy(path, CURR_DIR);
658 lstrcat(path, msifile);
660 r = MsiOpenPackage(path, &package);
661 ok(r == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %u\n", r);
663 r = MsiDoAction(package, "CostInitialize");
664 ok(r == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %u\n", r);
666 r = MsiDoAction(package, "FileCost");
667 ok(r == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %u\n", r);
669 r = MsiDoAction(package, "CostFinalize");
670 ok(r == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %u\n", r);
672 r = MsiSetComponentState(package, "dangler", INSTALLSTATE_SOURCE);
675 ok(r == ERROR_SUCCESS, "Expected ERROR_SUCCESS, got %u\n", r);
678 MsiCloseHandle(package);
684 if (!init_function_pointers())
688 create_database(msifile, tables, sizeof(tables) / sizeof(msi_table));
690 test_MsiInstallProduct();
691 test_MsiSetComponentState();