2 * Copyright (C) 2005 Mike McCormack for CodeWeavers
4 * A test program for MSI database files.
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"
32 * The following are defined in Windows SDK's msidefs.h
33 * but that file doesn't exist in the msvc6 header set.
35 * Some are already defined in PropIdl.h - undefine them
42 #define PID_DICTIONARY 0
43 #define PID_CODEPAGE 1
47 #define PID_KEYWORDS 5
48 #define PID_COMMENTS 6
49 #define PID_TEMPLATE 7
50 #define PID_LASTAUTHOR 8
51 #define PID_REVNUMBER 9
52 #define PID_EDITTINE 10
53 #define PID_LASTPRINTED 11
54 #define PID_CREATE_DTM 12
55 #define PID_LASTSAVE_DTM 13
56 #define PID_PAGECOUNT 14
57 #define PID_WORDCOUNT 15
58 #define PID_CHARCOUNT 16
59 #define PID_THUMBNAIL 17
60 #define PID_APPNAME 18
61 #define PID_SECURITY 19
62 #define PID_MSIVERSION PID_PAGECOUNT
63 #define PID_MSISOURCE PID_WORDCOUNT
64 #define PID_MSIRESTRICT PID_CHARCOUNT
66 static void test_suminfo(void)
68 const char *msifile = "winetest.msi";
69 MSIHANDLE hdb = 0, hsuminfo;
78 /* just MsiOpenDatabase should not create a file */
79 r = MsiOpenDatabase(msifile, MSIDBOPEN_CREATE, &hdb);
80 ok(r == ERROR_SUCCESS, "MsiOpenDatabase failed\n");
82 r = MsiGetSummaryInformation(hdb, NULL, 0, NULL);
83 ok(r == ERROR_INVALID_PARAMETER, "MsiGetSummaryInformation wrong error\n");
85 r = MsiGetSummaryInformation(hdb, NULL, 0, &hsuminfo);
86 ok(r == ERROR_SUCCESS, "MsiGetSummaryInformation failed\n");
88 r = MsiSummaryInfoGetPropertyCount(0, NULL);
89 ok(r == ERROR_INVALID_HANDLE, "getpropcount failed\n");
91 r = MsiSummaryInfoGetPropertyCount(hsuminfo, NULL);
92 ok(r == ERROR_SUCCESS, "getpropcount failed\n");
95 r = MsiSummaryInfoGetPropertyCount(hsuminfo, &count);
96 ok(r == ERROR_SUCCESS, "getpropcount failed\n");
97 ok(count == 0, "count should be zero\n");
99 r = MsiSummaryInfoGetProperty(hsuminfo, 0, NULL, NULL, NULL, 0, NULL);
100 ok(r == ERROR_SUCCESS, "getpropcount failed\n");
102 r = MsiSummaryInfoGetProperty(hsuminfo, -1, NULL, NULL, NULL, 0, NULL);
103 ok(r == ERROR_UNKNOWN_PROPERTY, "MsiSummaryInfoGetProperty wrong error\n");
105 r = MsiSummaryInfoGetProperty(hsuminfo, PID_SECURITY+1, NULL, NULL, NULL, 0, NULL);
106 ok(r == ERROR_UNKNOWN_PROPERTY, "MsiSummaryInfoGetProperty wrong error\n");
109 r = MsiSummaryInfoGetProperty(hsuminfo, 0, &type, NULL, NULL, 0, NULL);
110 ok(r == ERROR_SUCCESS, "getpropcount failed\n");
111 ok(type == 0, "wrong type\n");
115 r = MsiSummaryInfoGetProperty(hsuminfo, 0, &type, &val, NULL, 0, NULL);
116 ok(r == ERROR_SUCCESS, "getpropcount failed\n");
117 ok(type == 0, "wrong type\n");
118 ok(val == 1234, "wrong val\n");
123 r = MsiSummaryInfoGetProperty(hsuminfo, PID_REVNUMBER, &type, &val, NULL, buf, &sz);
124 ok(r == ERROR_SUCCESS, "getpropcount failed\n");
125 ok(buf[0]=='x', "cleared buffer\n");
126 ok(sz == 0x10, "count wasn't zero\n");
127 ok(type == VT_EMPTY, "should be empty\n");
129 r = MsiSummaryInfoSetProperty(hsuminfo, PID_TITLE, VT_LPSTR, 0, NULL, "Mike");
130 ok(r == ERROR_FUNCTION_FAILED, "MsiSummaryInfoSetProperty wrong error\n");
132 r = MsiSummaryInfoSetProperty(hsuminfo, PID_TITLE, VT_LPSTR, 1, NULL, "JungAh");
133 ok(r == ERROR_FUNCTION_FAILED, "MsiSummaryInfoSetProperty wrong error\n");
135 r = MsiSummaryInfoSetProperty(hsuminfo, PID_TITLE, VT_LPSTR, 1, &ft, "Mike");
136 ok(r == ERROR_FUNCTION_FAILED, "MsiSummaryInfoSetProperty wrong error\n");
138 r = MsiSummaryInfoSetProperty(hsuminfo, PID_CODEPAGE, VT_I2, 1, &ft, "JungAh");
139 ok(r == ERROR_FUNCTION_FAILED, "MsiSummaryInfoSetProperty wrong error\n");
141 r = MsiCloseHandle(hsuminfo);
142 ok(r == ERROR_SUCCESS, "MsiCloseHandle failed\n");
144 /* try again with the update count set */
145 r = MsiGetSummaryInformation(hdb, NULL, 1, &hsuminfo);
146 ok(r == ERROR_SUCCESS, "MsiGetSummaryInformation failed\n");
148 r = MsiSummaryInfoSetProperty(hsuminfo, 0, VT_LPSTR, 1, NULL, NULL);
149 ok(r == ERROR_DATATYPE_MISMATCH, "MsiSummaryInfoSetProperty wrong error\n");
151 r = MsiSummaryInfoSetProperty(hsuminfo, PID_CODEPAGE, VT_LPSTR, 1, NULL, NULL);
152 ok(r == ERROR_DATATYPE_MISMATCH, "MsiSummaryInfoSetProperty wrong error\n");
154 r = MsiSummaryInfoSetProperty(hsuminfo, PID_TITLE, VT_I4, 0, NULL, "Mike");
155 ok(r == ERROR_DATATYPE_MISMATCH, "MsiSummaryInfoSetProperty wrong error\n");
157 r = MsiSummaryInfoSetProperty(hsuminfo, PID_AUTHOR, VT_I4, 0, NULL, "JungAh");
158 ok(r == ERROR_DATATYPE_MISMATCH, "MsiSummaryInfoSetProperty wrong error\n");
160 r = MsiSummaryInfoSetProperty(hsuminfo, PID_KEYWORDS, VT_I2, 0, NULL, "Mike");
161 ok(r == ERROR_DATATYPE_MISMATCH, "MsiSummaryInfoSetProperty wrong error\n");
163 r = MsiSummaryInfoSetProperty(hsuminfo, PID_COMMENTS, VT_FILETIME, 0, NULL, "JungAh");
164 ok(r == ERROR_DATATYPE_MISMATCH, "MsiSummaryInfoSetProperty wrong error\n");
166 r = MsiSummaryInfoSetProperty(hsuminfo, PID_TEMPLATE, VT_I2, 0, NULL, "Mike");
167 ok(r == ERROR_DATATYPE_MISMATCH, "MsiSummaryInfoSetProperty wrong error\n");
169 r = MsiSummaryInfoSetProperty(hsuminfo, PID_LASTAUTHOR, VT_LPSTR, 0, NULL, NULL);
170 ok(r == ERROR_INVALID_PARAMETER, "MsiSummaryInfoSetProperty wrong error\n");
172 r = MsiSummaryInfoSetProperty(hsuminfo, PID_LASTSAVE_DTM, VT_FILETIME, 0, NULL, NULL);
173 ok(r == ERROR_INVALID_PARAMETER, "MsiSummaryInfoSetProperty wrong error\n");
175 r = MsiSummaryInfoSetProperty(hsuminfo, PID_LASTAUTHOR, VT_LPWSTR, 0, NULL, "h\0i\0\0");
176 ok(r == ERROR_DATATYPE_MISMATCH, "MsiSummaryInfoSetProperty wrong error\n");
178 r = MsiSummaryInfoSetProperty(hsuminfo, PID_REVNUMBER, VT_I4, 0, NULL, "Jungah");
179 ok(r == ERROR_DATATYPE_MISMATCH, "MsiSummaryInfoSetProperty wrong error\n");
181 r = MsiSummaryInfoSetProperty(hsuminfo, PID_PAGECOUNT, VT_LPSTR, 1, NULL, NULL);
182 ok(r == ERROR_DATATYPE_MISMATCH, "MsiSummaryInfoSetProperty wrong error\n");
184 r = MsiSummaryInfoSetProperty(hsuminfo, PID_TITLE, VT_LPSTR, 0, NULL, "Mike");
185 ok(r == ERROR_SUCCESS, "MsiSummaryInfoSetProperty failed\n");
189 r = MsiSummaryInfoGetProperty(hsuminfo, PID_TITLE, &type, NULL, NULL, buf, &sz );
190 ok(r == ERROR_MORE_DATA, "MsiSummaryInfoSetProperty failed\n");
191 ok(sz == 4, "count was wrong\n");
192 ok(type == VT_LPSTR, "type was wrong\n");
193 ok(!strcmp(buf,"M"), "buffer was wrong\n");
197 r = MsiSummaryInfoGetProperty(hsuminfo, PID_TITLE, &type, NULL, NULL, buf, &sz );
198 ok(r == ERROR_MORE_DATA, "MsiSummaryInfoSetProperty failed\n");
199 ok(sz == 4, "count was wrong\n");
200 ok(type == VT_LPSTR, "type was wrong\n");
201 ok(!strcmp(buf,"Mik"), "buffer was wrong\n");
203 r = MsiSummaryInfoSetProperty(hsuminfo, PID_TITLE, VT_LPSTR, 0, NULL, "JungAh");
204 ok(r == ERROR_SUCCESS, "MsiSummaryInfoSetProperty failed\n");
206 r = MsiSummaryInfoSetProperty(hsuminfo, PID_CODEPAGE, VT_I2, 1, &ft, "Mike");
207 ok(r == ERROR_FUNCTION_FAILED, "MsiSummaryInfoSetProperty wrong error\n");
209 r = MsiCloseHandle(hsuminfo);
210 ok(r == ERROR_SUCCESS, "MsiCloseHandle failed\n");
212 /* try again with a higher update count */
213 r = MsiGetSummaryInformation(hdb, NULL, 10, &hsuminfo);
214 ok(r == ERROR_SUCCESS, "MsiGetSummaryInformation failed\n");
216 r = MsiSummaryInfoSetProperty(hsuminfo, PID_TITLE, VT_LPSTR, 0, NULL, "JungAh");
217 ok(r == ERROR_SUCCESS, "MsiSummaryInfoSetProperty failed\n");
219 r = MsiSummaryInfoSetProperty(hsuminfo, PID_CODEPAGE, VT_LPSTR, 1, NULL, NULL);
220 ok(r == ERROR_DATATYPE_MISMATCH, "MsiSummaryInfoSetProperty wrong error\n");
222 r = MsiSummaryInfoSetProperty(hsuminfo, PID_CODEPAGE, VT_I2, 1, NULL, NULL);
223 ok(r == ERROR_SUCCESS, "MsiSummaryInfoSetProperty wrong error\n");
225 r = MsiSummaryInfoSetProperty(hsuminfo, PID_CODEPAGE, VT_I2, 1, &ft, "Mike");
226 ok(r == ERROR_SUCCESS, "MsiSummaryInfoSetProperty wrong error\n");
228 r = MsiSummaryInfoSetProperty(hsuminfo, PID_AUTHOR, VT_LPSTR, 1, &ft, "Mike");
229 ok(r == ERROR_SUCCESS, "MsiSummaryInfoSetProperty wrong error\n");
231 r = MsiSummaryInfoPersist(hsuminfo);
232 ok(r == ERROR_SUCCESS, "MsiSummaryInfoPersist failed\n");
234 MsiDatabaseCommit(hdb);
236 r = MsiCloseHandle(hsuminfo);
237 ok(r == ERROR_SUCCESS, "MsiCloseHandle failed\n");
239 r = MsiCloseHandle(hdb);
240 ok(r == ERROR_SUCCESS, "MsiCloseHandle failed\n");
242 /* filename, non-zero update count */
243 MsiGetSummaryInformation(0, msifile, 1, &hsuminfo);
244 ok(r == ERROR_SUCCESS, "MsiGetSummaryInformation failed\n");
246 r = MsiSummaryInfoSetProperty(hsuminfo, PID_AUTHOR, VT_LPSTR, 1, &ft, "Mike");
247 ok(r == ERROR_SUCCESS, "MsiSummaryInfoSetProperty wrong error\n");
249 r = MsiSummaryInfoPersist(hsuminfo);
250 ok(r == ERROR_SUCCESS, "MsiSummaryInfoPersist failed %u\n", r);
252 r = MsiCloseHandle(hsuminfo);
253 ok(r == ERROR_SUCCESS, "MsiCloseHandle failed %u\n", r);
255 /* filename, zero update count */
256 MsiGetSummaryInformation(0, msifile, 0, &hsuminfo);
257 ok(r == ERROR_SUCCESS, "MsiGetSummaryInformation failed %u\n", r);
259 r = MsiSummaryInfoSetProperty(hsuminfo, PID_AUTHOR, VT_LPSTR, 1, &ft, "Mike");
260 todo_wine ok(r == ERROR_FUNCTION_FAILED, "MsiSummaryInfoSetProperty wrong error, %u\n", r);
262 r = MsiSummaryInfoPersist(hsuminfo);
263 ok(r == ERROR_FUNCTION_FAILED, "MsiSummaryInfoPersist wrong error %u\n", r);
265 r = MsiCloseHandle(hsuminfo);
266 ok(r == ERROR_SUCCESS, "MsiCloseHandle failed\n");
268 r = DeleteFile(msifile);
269 ok(r, "DeleteFile failed\n");
272 static const WCHAR tb[] = { 0x4840, 0x3f7f, 0x4164, 0x422f, 0x4836, 0 }; /* _Tables */
273 static const WCHAR sd[] = { 0x4840, 0x3f3f, 0x4577, 0x446c, 0x3b6a, 0x45e4, 0x4824, 0 }; /* _StringData */
274 static const WCHAR sp[] = { 0x4840, 0x3f3f, 0x4577, 0x446c, 0x3e6a, 0x44b2, 0x482f, 0 }; /* _StringPool */
276 #define LOSE_CONST(x) ((LPSTR)(UINT_PTR)(x))
278 static void test_create_database_binary(void)
280 static const CLSID CLSID_MsiDatabase =
281 { 0xc1084, 0, 0, {0xc0, 0, 0, 0, 0, 0, 0, 0x46 } };
282 static const CLSID IID_IPropertySetStorage =
283 { 0x13a, 0, 0, {0xc0, 0, 0, 0, 0, 0, 0, 0x46 } };
284 static const CLSID FMTID_SummaryInformation =
285 { 0xf29f85e0, 0x4ff9, 0x1068, {0xab, 0x91, 0x08, 0x00, 0x2b, 0x27, 0xb3, 0xd9}};
286 DWORD mode = STGM_CREATE | STGM_READWRITE | STGM_DIRECT | STGM_SHARE_EXCLUSIVE;
287 static const WCHAR msifile[] = {
288 'w','i','n','e','t','e','s','t','.','m','s','i',0 };
289 IPropertySetStorage *pss = NULL;
290 IPropertyStorage *ps = NULL;
291 IStorage *stg = NULL;
294 PROPSPEC propspec[10];
295 PROPVARIANT propvar[10];
296 USHORT data[2] = { 0, 0 };
298 r = StgCreateDocfile( msifile, mode, 0, &stg );
299 ok( r == S_OK, "failed to create database\n");
301 r = IStorage_SetClass( stg, &CLSID_MsiDatabase );
302 ok( r == S_OK, "failed to set clsid\n");
304 /* create the _StringData stream */
305 r = IStorage_CreateStream( stg, sd, STGM_WRITE | STGM_SHARE_EXCLUSIVE, 0, 0, &stm );
306 ok( r == S_OK, "failed to create stream\n");
308 IStream_Release( stm );
310 /* create the _StringPool stream */
311 r = IStorage_CreateStream( stg, sp, STGM_WRITE | STGM_SHARE_EXCLUSIVE, 0, 0, &stm );
312 ok( r == S_OK, "failed to create stream\n");
314 r = IStream_Write( stm, data, sizeof data, NULL );
315 ok( r == S_OK, "failed to write stream\n");
317 IStream_Release( stm );
319 /* create the _Tables stream */
320 r = IStorage_CreateStream( stg, tb, STGM_WRITE | STGM_SHARE_EXCLUSIVE, 0, 0, &stm );
321 ok( r == S_OK, "failed to create stream\n");
323 IStream_Release( stm );
325 r = IStorage_QueryInterface( stg, &IID_IPropertySetStorage, (void**) &pss );
326 ok( r == S_OK, "failed to set clsid\n");
328 r = IPropertySetStorage_Create( pss, &FMTID_SummaryInformation, NULL, 0, mode, &ps );
329 ok( r == S_OK, "failed to create property set\n");
331 r = IPropertyStorage_SetClass( ps, &FMTID_SummaryInformation );
332 ok( r == S_OK, "failed to set class\n");
334 propspec[0].ulKind = PRSPEC_PROPID;
335 U(propspec[0]).propid = PID_TITLE;
336 propvar[0].vt = VT_LPSTR;
337 U(propvar[0]).pszVal = LOSE_CONST("test title");
339 propspec[1].ulKind = PRSPEC_PROPID;
340 U(propspec[1]).propid = PID_SUBJECT;
341 propvar[1].vt = VT_LPSTR;
342 U(propvar[1]).pszVal = LOSE_CONST("msi suminfo / property storage test");
344 propspec[2].ulKind = PRSPEC_PROPID;
345 U(propspec[2]).propid = PID_AUTHOR;
346 propvar[2].vt = VT_LPSTR;
347 U(propvar[2]).pszVal = LOSE_CONST("mike_m");
349 propspec[3].ulKind = PRSPEC_PROPID;
350 U(propspec[3]).propid = PID_TEMPLATE;
351 propvar[3].vt = VT_LPSTR;
352 U(propvar[3]).pszVal = LOSE_CONST(";1033"); /* actually the string table's codepage */
354 propspec[4].ulKind = PRSPEC_PROPID;
355 U(propspec[4]).propid = PID_REVNUMBER;
356 propvar[4].vt = VT_LPSTR;
357 U(propvar[4]).pszVal = LOSE_CONST("{913B8D18-FBB6-4CAC-A239-C74C11E3FA74}");
359 propspec[5].ulKind = PRSPEC_PROPID;
360 U(propspec[5]).propid = PID_PAGECOUNT;
361 propvar[5].vt = VT_I4;
362 U(propvar[5]).lVal = 100;
364 propspec[6].ulKind = PRSPEC_PROPID;
365 U(propspec[6]).propid = PID_WORDCOUNT;
366 propvar[6].vt = VT_I4;
367 U(propvar[6]).lVal = 0;
369 /* MSDN says that PID_LASTPRINTED should be a VT_FILETIME... */
370 propspec[7].ulKind = PRSPEC_PROPID;
371 U(propspec[7]).propid = PID_LASTPRINTED;
372 propvar[7].vt = VT_LPSTR;
373 U(propvar[7]).pszVal = LOSE_CONST("7/1/1999 5:17");
375 r = IPropertyStorage_WriteMultiple( ps, 8, propspec, propvar, PID_FIRST_USABLE );
376 ok( r == S_OK, "failed to write properties\n");
378 IPropertyStorage_Commit( ps, STGC_DEFAULT );
380 IPropertyStorage_Release( ps );
381 IPropertySetStorage_Release( pss );
383 IStorage_Commit( stg, STGC_DEFAULT );
384 IStorage_Release( stg );
387 static void test_summary_binary(void)
389 const char *msifile = "winetest.msi";
390 MSIHANDLE hdb = 0, hsuminfo = 0;
396 DeleteFile( msifile );
398 test_create_database_binary();
400 ok( INVALID_FILE_ATTRIBUTES != GetFileAttributes(msifile), "file doesn't exist!\n");
402 /* just MsiOpenDatabase should not create a file */
403 r = MsiOpenDatabase(msifile, MSIDBOPEN_READONLY, &hdb);
404 ok(r == ERROR_SUCCESS, "MsiOpenDatabase failed\n");
406 r = MsiGetSummaryInformation(hdb, NULL, 0, &hsuminfo);
407 ok(r == ERROR_SUCCESS, "MsiGetSummaryInformation failed\n");
410 * Check what reading PID_LASTPRINTED does...
411 * The string value is written to the msi file
412 * but it appears that we're not allowed to read it back again.
413 * We can still read its type though...?
418 r = MsiSummaryInfoGetProperty(hsuminfo, PID_LASTPRINTED, &type, NULL, NULL, sval, &sz);
419 ok(r == ERROR_SUCCESS, "MsiSummaryInfoGetProperty failed\n");
420 ok(!lstrcmpA(sval, "") || !lstrcmpA(sval, "7"),
421 "Expected empty string or \"7\", got \"%s\"\n", sval);
423 ok(type == VT_LPSTR, "Expected VT_LPSTR, got %d\n", type);
424 ok(sz == 0 || sz == 1, "Expected 0 or 1, got %d\n", sz);
428 r = MsiSummaryInfoGetProperty(hsuminfo, PID_WORDCOUNT, &type, &ival, NULL, NULL, NULL);
429 ok(r == ERROR_SUCCESS, "MsiSummaryInfoGetProperty failed\n");
430 todo_wine ok( ival == 0, "value incorrect\n");
432 /* looks like msi adds some of its own values in here */
434 r = MsiSummaryInfoGetPropertyCount( hsuminfo, &count );
435 ok(r == ERROR_SUCCESS, "getpropcount failed\n");
436 todo_wine ok(count == 10, "prop count incorrect\n");
438 r = MsiSummaryInfoSetProperty( hsuminfo, PID_TITLE, VT_LPSTR, 0, NULL, "Mike" );
439 ok(r == ERROR_FUNCTION_FAILED, "MsiSummaryInfoSetProperty failed %u\n", r);
441 r = MsiSummaryInfoPersist( hsuminfo );
442 ok(r == ERROR_FUNCTION_FAILED, "MsiSummaryInfoPersist failed %u\n", r);
444 MsiCloseHandle( hsuminfo );
445 MsiCloseHandle( hdb );
447 DeleteFile( msifile );
453 test_summary_binary();