modules/rostests/winetests/msi/suminfo.c

   1 /*
   2  * Copyright (C) 2005 Mike McCormack for CodeWeavers
   3  *
   4  * A test program for MSI database files.
   5  *
   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.
  10  *
  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.
  15  *
  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
  19  */
  20
  21 #define COBJMACROS
  22
  23 #include <stdio.h>
  24 #include <windows.h>
  25 #include <msi.h>
  26 #include <msiquery.h>
  27 #include <objidl.h>
  28
  29 #include "wine/test.h"
  30
  31 /*
  32  * The following are defined in Windows SDK's msidefs.h
  33  * but that file doesn't exist in the msvc6 header set.
  34  *
  35  * Some are already defined in PropIdl.h - undefine them
  36  */
  37 #undef PID_DICTIONARY
  38 #undef PID_CODEPAGE
  39 #undef PID_SUBJECT
  40 #undef PID_SECURITY
  41
  42 #define PID_DICTIONARY 0
  43 #define PID_CODEPAGE 1
  44 #define PID_TITLE 2
  45 #define PID_SUBJECT 3
  46 #define PID_AUTHOR 4
  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
  65
  66 static const char *msifile = "winetest-suminfo.msi";
  67 static const WCHAR msifileW[] = {
  68     'w','i','n','e','t','e','s','t','-','s','u','m','i','n','f','o','.','m','s','i',0 };
  69
  70 static void test_suminfo(void)
  71 {
  72     MSIHANDLE hdb = 0, hsuminfo;
  73     UINT r, count, type;
  74     DWORD sz;
  75     INT val;
  76     FILETIME ft;
  77     char buf[0x10];
  78
  79     DeleteFileA(msifile);
  80
  81     /* just MsiOpenDatabase should not create a file */
  82     r = MsiOpenDatabaseW(msifileW, MSIDBOPEN_CREATE, &hdb);
  83     ok(r == ERROR_SUCCESS, "MsiOpenDatabase failed\n");
  84
  85     r = MsiGetSummaryInformationA(hdb, NULL, 0, NULL);
  86     ok(r == ERROR_INVALID_PARAMETER, "MsiGetSummaryInformation wrong error\n");
  87
  88     r = MsiGetSummaryInformationA(hdb, NULL, 0, &hsuminfo);
  89     ok(r == ERROR_SUCCESS, "MsiGetSummaryInformation failed %u\n", r);
  90
  91     r = MsiCloseHandle(hsuminfo);
  92     ok(r == ERROR_SUCCESS, "MsiCloseHandle failed\n");
  93
  94     r = MsiGetSummaryInformationA(0, "", 0, &hsuminfo);
  95     todo_wine
  96     ok(r == ERROR_INSTALL_PACKAGE_INVALID || r == ERROR_INSTALL_PACKAGE_OPEN_FAILED,
  97        "MsiGetSummaryInformation failed %u\n", r);
  98
  99     r = MsiGetSummaryInformationA(hdb, "", 0, &hsuminfo);
 100     ok(r == ERROR_SUCCESS, "MsiGetSummaryInformation failed %u\n", r);
 101
 102     r = MsiSummaryInfoGetPropertyCount(0, NULL);
 103     ok(r == ERROR_INVALID_HANDLE, "getpropcount failed\n");
 104
 105     r = MsiSummaryInfoGetPropertyCount(hsuminfo, NULL);
 106     ok(r == ERROR_SUCCESS, "getpropcount failed\n");
 107
 108     count = -1;
 109     r = MsiSummaryInfoGetPropertyCount(hsuminfo, &count);
 110     ok(r == ERROR_SUCCESS, "getpropcount failed\n");
 111     ok(count == 0, "count should be zero\n");
 112
 113     r = MsiSummaryInfoGetPropertyA(hsuminfo, 0, NULL, NULL, NULL, 0, NULL);
 114     ok(r == ERROR_SUCCESS, "getpropcount failed\n");
 115
 116     r = MsiSummaryInfoGetPropertyA(hsuminfo, -1, NULL, NULL, NULL, 0, NULL);
 117     ok(r == ERROR_UNKNOWN_PROPERTY, "MsiSummaryInfoGetProperty wrong error\n");
 118
 119     r = MsiSummaryInfoGetPropertyA(hsuminfo, PID_SECURITY+1, NULL, NULL, NULL, 0, NULL);
 120     ok(r == ERROR_UNKNOWN_PROPERTY, "MsiSummaryInfoGetProperty wrong error\n");
 121
 122     type = -1;
 123     r = MsiSummaryInfoGetPropertyA(hsuminfo, 0, &type, NULL, NULL, 0, NULL);
 124     ok(r == ERROR_SUCCESS, "getpropcount failed\n");
 125     ok(type == 0, "wrong type\n");
 126
 127     type = -1;
 128     val = 1234;
 129     r = MsiSummaryInfoGetPropertyA(hsuminfo, 0, &type, &val, NULL, 0, NULL);
 130     ok(r == ERROR_SUCCESS, "getpropcount failed\n");
 131     ok(type == 0, "wrong type\n");
 132     ok(val == 1234, "wrong val\n");
 133
 134     buf[0]='x';
 135     buf[1]=0;
 136     sz = 0x10;
 137     r = MsiSummaryInfoGetPropertyA(hsuminfo, PID_REVNUMBER, &type, &val, NULL, buf, &sz);
 138     ok(r == ERROR_SUCCESS, "getpropcount failed\n");
 139     ok(buf[0]=='x', "cleared buffer\n");
 140     ok(sz == 0x10, "count wasn't zero\n");
 141     ok(type == VT_EMPTY, "should be empty\n");
 142
 143     r = MsiSummaryInfoSetPropertyA(hsuminfo, PID_TITLE, VT_LPSTR, 0, NULL, "Mike");
 144     ok(r == ERROR_FUNCTION_FAILED, "MsiSummaryInfoSetProperty wrong error\n");
 145
 146     r = MsiSummaryInfoSetPropertyA(hsuminfo, PID_TITLE, VT_LPSTR, 1, NULL, "JungAh");
 147     ok(r == ERROR_FUNCTION_FAILED, "MsiSummaryInfoSetProperty wrong error\n");
 148
 149     r = MsiSummaryInfoSetPropertyA(hsuminfo, PID_TITLE, VT_LPSTR, 1, &ft, "Mike");
 150     ok(r == ERROR_FUNCTION_FAILED, "MsiSummaryInfoSetProperty wrong error\n");
 151
 152     r = MsiSummaryInfoSetPropertyA(hsuminfo, PID_CODEPAGE, VT_I2, 1, &ft, "JungAh");
 153     ok(r == ERROR_FUNCTION_FAILED, "MsiSummaryInfoSetProperty wrong error\n");
 154
 155     r = MsiCloseHandle(hsuminfo);
 156     ok(r == ERROR_SUCCESS, "MsiCloseHandle failed\n");
 157
 158     /* try again with the update count set */
 159     r = MsiGetSummaryInformationA(hdb, NULL, 1, &hsuminfo);
 160     ok(r == ERROR_SUCCESS, "MsiGetSummaryInformation failed\n");
 161
 162     r = MsiSummaryInfoSetPropertyA(hsuminfo, 0, VT_LPSTR, 1, NULL, NULL);
 163     ok(r == ERROR_DATATYPE_MISMATCH, "MsiSummaryInfoSetProperty wrong error\n");
 164
 165     r = MsiSummaryInfoSetPropertyA(hsuminfo, PID_CODEPAGE, VT_LPSTR, 1, NULL, NULL);
 166     ok(r == ERROR_DATATYPE_MISMATCH, "MsiSummaryInfoSetProperty wrong error\n");
 167
 168     r = MsiSummaryInfoSetPropertyA(hsuminfo, PID_TITLE, VT_I4, 0, NULL, "Mike");
 169     ok(r == ERROR_DATATYPE_MISMATCH, "MsiSummaryInfoSetProperty wrong error\n");
 170
 171     r = MsiSummaryInfoSetPropertyA(hsuminfo, PID_AUTHOR, VT_I4, 0, NULL, "JungAh");
 172     ok(r == ERROR_DATATYPE_MISMATCH, "MsiSummaryInfoSetProperty wrong error\n");
 173
 174     r = MsiSummaryInfoSetPropertyA(hsuminfo, PID_KEYWORDS, VT_I2, 0, NULL, "Mike");
 175     ok(r == ERROR_DATATYPE_MISMATCH, "MsiSummaryInfoSetProperty wrong error\n");
 176
 177     r = MsiSummaryInfoSetPropertyA(hsuminfo, PID_COMMENTS, VT_FILETIME, 0, NULL, "JungAh");
 178     ok(r == ERROR_DATATYPE_MISMATCH, "MsiSummaryInfoSetProperty wrong error\n");
 179
 180     r = MsiSummaryInfoSetPropertyA(hsuminfo, PID_TEMPLATE, VT_I2, 0, NULL, "Mike");
 181     ok(r == ERROR_DATATYPE_MISMATCH, "MsiSummaryInfoSetProperty wrong error\n");
 182
 183     r = MsiSummaryInfoSetPropertyA(hsuminfo, PID_LASTAUTHOR, VT_LPSTR, 0, NULL, NULL);
 184     ok(r == ERROR_INVALID_PARAMETER, "MsiSummaryInfoSetProperty wrong error\n");
 185
 186     r = MsiSummaryInfoSetPropertyA(hsuminfo, PID_LASTSAVE_DTM, VT_FILETIME, 0, NULL, NULL);
 187     ok(r == ERROR_INVALID_PARAMETER, "MsiSummaryInfoSetProperty wrong error\n");
 188
 189     r = MsiSummaryInfoSetPropertyA(hsuminfo, PID_LASTAUTHOR, VT_LPWSTR, 0, NULL, "h\0i\0\0");
 190     ok(r == ERROR_DATATYPE_MISMATCH, "MsiSummaryInfoSetProperty wrong error\n");
 191
 192     r = MsiSummaryInfoSetPropertyA(hsuminfo, PID_REVNUMBER, VT_I4, 0, NULL, "Jungah");
 193     ok(r == ERROR_DATATYPE_MISMATCH, "MsiSummaryInfoSetProperty wrong error\n");
 194
 195     r = MsiSummaryInfoSetPropertyA(hsuminfo, PID_PAGECOUNT, VT_LPSTR, 1, NULL, NULL);
 196     ok(r == ERROR_DATATYPE_MISMATCH, "MsiSummaryInfoSetProperty wrong error\n");
 197
 198     r = MsiSummaryInfoSetPropertyA(hsuminfo, PID_TITLE, VT_LPSTR, 0, NULL, "Mike");
 199     ok(r == ERROR_SUCCESS, "MsiSummaryInfoSetProperty failed\n");
 200
 201     sz = 2;
 202     strcpy(buf,"x");
 203     r = MsiSummaryInfoGetPropertyA(hsuminfo, PID_TITLE, &type, NULL, NULL, buf, &sz );
 204     ok(r == ERROR_MORE_DATA, "MsiSummaryInfoSetProperty failed\n");
 205     ok(sz == 4, "count was wrong\n");
 206     ok(type == VT_LPSTR, "type was wrong\n");
 207     ok(!strcmp(buf,"M"), "buffer was wrong\n");
 208
 209     sz = 4;
 210     strcpy(buf,"x");
 211     r = MsiSummaryInfoGetPropertyA(hsuminfo, PID_TITLE, &type, NULL, NULL, buf, &sz );
 212     ok(r == ERROR_MORE_DATA, "MsiSummaryInfoSetProperty failed\n");
 213     ok(sz == 4, "count was wrong\n");
 214     ok(type == VT_LPSTR, "type was wrong\n");
 215     ok(!strcmp(buf,"Mik"), "buffer was wrong\n");
 216
 217     r = MsiSummaryInfoSetPropertyA(hsuminfo, PID_TITLE, VT_LPSTR, 0, NULL, "JungAh");
 218     ok(r == ERROR_SUCCESS, "MsiSummaryInfoSetProperty failed\n");
 219
 220     r = MsiSummaryInfoSetPropertyA(hsuminfo, PID_CODEPAGE, VT_I2, 1, &ft, "Mike");
 221     ok(r == ERROR_FUNCTION_FAILED, "MsiSummaryInfoSetProperty wrong error\n");
 222
 223     r = MsiCloseHandle(hsuminfo);
 224     ok(r == ERROR_SUCCESS, "MsiCloseHandle failed\n");
 225
 226     /* try again with a higher update count */
 227     r = MsiGetSummaryInformationA(hdb, NULL, 10, &hsuminfo);
 228     ok(r == ERROR_SUCCESS, "MsiGetSummaryInformation failed\n");
 229
 230     r = MsiSummaryInfoSetPropertyA(hsuminfo, PID_TITLE, VT_LPSTR, 0, NULL, "JungAh");
 231     ok(r == ERROR_SUCCESS, "MsiSummaryInfoSetProperty failed\n");
 232
 233     r = MsiSummaryInfoSetPropertyA(hsuminfo, PID_CODEPAGE, VT_LPSTR, 1, NULL, NULL);
 234     ok(r == ERROR_DATATYPE_MISMATCH, "MsiSummaryInfoSetProperty wrong error\n");
 235
 236     r = MsiSummaryInfoSetPropertyA(hsuminfo, PID_CODEPAGE, VT_I2, 1, NULL, NULL);
 237     ok(r == ERROR_SUCCESS, "MsiSummaryInfoSetProperty wrong error\n");
 238
 239     r = MsiSummaryInfoSetPropertyA(hsuminfo, PID_CODEPAGE, VT_I2, 1, &ft, "Mike");
 240     ok(r == ERROR_SUCCESS, "MsiSummaryInfoSetProperty wrong error\n");
 241
 242     r = MsiSummaryInfoSetPropertyA(hsuminfo, PID_AUTHOR, VT_LPSTR, 1, &ft, "Mike");
 243     ok(r == ERROR_SUCCESS, "MsiSummaryInfoSetProperty wrong error\n");
 244
 245     r = MsiSummaryInfoPersist(hsuminfo);
 246     ok(r == ERROR_SUCCESS, "MsiSummaryInfoPersist failed\n");
 247
 248     MsiDatabaseCommit(hdb);
 249
 250     r = MsiCloseHandle(hsuminfo);
 251     ok(r == ERROR_SUCCESS, "MsiCloseHandle failed\n");
 252
 253     r = MsiCloseHandle(hdb);
 254     ok(r == ERROR_SUCCESS, "MsiCloseHandle failed\n");
 255
 256     /* filename, non-zero update count */
 257     r = MsiGetSummaryInformationA(0, msifile, 1, &hsuminfo);
 258     ok(r == ERROR_SUCCESS, "MsiGetSummaryInformation failed\n");
 259
 260     r = MsiSummaryInfoSetPropertyA(hsuminfo, PID_AUTHOR, VT_LPSTR, 1, &ft, "Mike");
 261     ok(r == ERROR_SUCCESS, "MsiSummaryInfoSetProperty wrong error\n");
 262
 263     r = MsiSummaryInfoPersist(hsuminfo);
 264     ok(r == ERROR_SUCCESS, "MsiSummaryInfoPersist failed %u\n", r);
 265
 266     r = MsiCloseHandle(hsuminfo);
 267     ok(r == ERROR_SUCCESS, "MsiCloseHandle failed %u\n", r);
 268
 269     /* filename, zero update count */
 270     r = MsiGetSummaryInformationA(0, msifile, 0, &hsuminfo);
 271     ok(r == ERROR_SUCCESS, "MsiGetSummaryInformation failed %u\n", r);
 272
 273     r = MsiSummaryInfoSetPropertyA(hsuminfo, PID_AUTHOR, VT_LPSTR, 1, &ft, "Mike");
 274     todo_wine ok(r == ERROR_FUNCTION_FAILED, "MsiSummaryInfoSetProperty wrong error, %u\n", r);
 275
 276     r = MsiSummaryInfoPersist(hsuminfo);
 277     ok(r == ERROR_FUNCTION_FAILED, "MsiSummaryInfoPersist wrong error %u\n", r);
 278
 279     r = MsiCloseHandle(hsuminfo);
 280     ok(r == ERROR_SUCCESS, "MsiCloseHandle failed\n");
 281
 282     r = DeleteFileA(msifile);
 283     ok(r, "DeleteFile failed\n");
 284 }
 285
 286 static const WCHAR tb[] = { 0x4840, 0x3f7f, 0x4164, 0x422f, 0x4836, 0 }; /* _Tables */
 287 static const WCHAR sd[] = { 0x4840, 0x3f3f, 0x4577, 0x446c, 0x3b6a, 0x45e4, 0x4824, 0 }; /* _StringData */
 288 static const WCHAR sp[] = { 0x4840, 0x3f3f, 0x4577, 0x446c, 0x3e6a, 0x44b2, 0x482f, 0 }; /* _StringPool */
 289
 290 #define LOSE_CONST(x) ((LPSTR)(UINT_PTR)(x))
 291
 292 static void test_create_database_binary(void)
 293 {
 294     static const CLSID CLSID_MsiDatabase =
 295         { 0xc1084, 0, 0, {0xc0, 0, 0, 0, 0, 0, 0, 0x46 } };
 296     static const CLSID IID_IPropertySetStorage =
 297         { 0x13a, 0, 0, {0xc0, 0, 0, 0, 0, 0, 0, 0x46 } };
 298     static const CLSID FMTID_SummaryInformation =
 299         { 0xf29f85e0, 0x4ff9, 0x1068, {0xab, 0x91, 0x08, 0x00, 0x2b, 0x27, 0xb3, 0xd9}};
 300     DWORD mode = STGM_CREATE | STGM_READWRITE | STGM_DIRECT | STGM_SHARE_EXCLUSIVE;
 301     IPropertySetStorage *pss = NULL;
 302     IPropertyStorage *ps = NULL;
 303     IStorage *stg = NULL;
 304     IStream *stm = NULL;
 305     HRESULT r;
 306     PROPSPEC propspec[10];
 307     PROPVARIANT propvar[10];
 308     USHORT data[2] = { 0, 0 };
 309
 310     r = StgCreateDocfile( msifileW, mode, 0, &stg );
 311     ok( r == S_OK, "failed to create database\n");
 312
 313     r = IStorage_SetClass( stg, &CLSID_MsiDatabase );
 314     ok( r == S_OK, "failed to set clsid\n");
 315
 316     /* create the _StringData stream */
 317     r = IStorage_CreateStream( stg, sd, STGM_WRITE | STGM_SHARE_EXCLUSIVE, 0, 0, &stm );
 318     ok( r == S_OK, "failed to create stream\n");
 319
 320     IStream_Release( stm );
 321
 322     /* create the _StringPool stream */
 323     r = IStorage_CreateStream( stg, sp, STGM_WRITE | STGM_SHARE_EXCLUSIVE, 0, 0, &stm );
 324     ok( r == S_OK, "failed to create stream\n");
 325
 326     r = IStream_Write( stm, data, sizeof data, NULL );
 327     ok( r == S_OK, "failed to write stream\n");
 328
 329     IStream_Release( stm );
 330
 331     /* create the _Tables stream */
 332     r = IStorage_CreateStream( stg, tb, STGM_WRITE | STGM_SHARE_EXCLUSIVE, 0, 0, &stm );
 333     ok( r == S_OK, "failed to create stream\n");
 334
 335     IStream_Release( stm );
 336
 337     r = IStorage_QueryInterface( stg, &IID_IPropertySetStorage, (void**) &pss );
 338     ok( r == S_OK, "failed to set clsid\n");
 339
 340     r = IPropertySetStorage_Create( pss, &FMTID_SummaryInformation, NULL, 0, mode, &ps );
 341     ok( r == S_OK, "failed to create property set\n");
 342
 343     r = IPropertyStorage_SetClass( ps, &FMTID_SummaryInformation );
 344     ok( r == S_OK, "failed to set class\n");
 345
 346     propspec[0].ulKind = PRSPEC_PROPID;
 347     U(propspec[0]).propid = PID_TITLE;
 348     propvar[0].vt = VT_LPSTR;
 349     U(propvar[0]).pszVal = LOSE_CONST("test title");
 350
 351     propspec[1].ulKind = PRSPEC_PROPID;
 352     U(propspec[1]).propid = PID_SUBJECT;
 353     propvar[1].vt = VT_LPSTR;
 354     U(propvar[1]).pszVal = LOSE_CONST("msi suminfo / property storage test");
 355
 356     propspec[2].ulKind = PRSPEC_PROPID;
 357     U(propspec[2]).propid = PID_AUTHOR;
 358     propvar[2].vt = VT_LPSTR;
 359     U(propvar[2]).pszVal = LOSE_CONST("mike_m");
 360
 361     propspec[3].ulKind = PRSPEC_PROPID;
 362     U(propspec[3]).propid = PID_TEMPLATE;
 363     propvar[3].vt = VT_LPSTR;
 364     U(propvar[3]).pszVal = LOSE_CONST(";1033");  /* actually the string table's codepage */
 365
 366     propspec[4].ulKind = PRSPEC_PROPID;
 367     U(propspec[4]).propid = PID_REVNUMBER;
 368     propvar[4].vt = VT_LPSTR;
 369     U(propvar[4]).pszVal = LOSE_CONST("{913B8D18-FBB6-4CAC-A239-C74C11E3FA74}");
 370
 371     propspec[5].ulKind = PRSPEC_PROPID;
 372     U(propspec[5]).propid = PID_PAGECOUNT;
 373     propvar[5].vt = VT_I4;
 374     U(propvar[5]).lVal = 100;
 375
 376     propspec[6].ulKind = PRSPEC_PROPID;
 377     U(propspec[6]).propid = PID_WORDCOUNT;
 378     propvar[6].vt = VT_I4;
 379     U(propvar[6]).lVal = 0;
 380
 381     /* MSDN says that PID_LASTPRINTED should be a VT_FILETIME... */
 382     propspec[7].ulKind = PRSPEC_PROPID;
 383     U(propspec[7]).propid = PID_LASTPRINTED;
 384     propvar[7].vt = VT_LPSTR;
 385     U(propvar[7]).pszVal = LOSE_CONST("7/1/1999 5:17");
 386
 387     r = IPropertyStorage_WriteMultiple( ps, 8, propspec, propvar, PID_FIRST_USABLE );
 388     ok( r == S_OK, "failed to write properties\n");
 389
 390     IPropertyStorage_Commit( ps, STGC_DEFAULT );
 391
 392     IPropertyStorage_Release( ps );
 393     IPropertySetStorage_Release( pss );
 394
 395     IStorage_Commit( stg, STGC_DEFAULT );
 396     IStorage_Release( stg );
 397 }
 398
 399 static void test_summary_binary(void)
 400 {
 401     MSIHANDLE hdb = 0, hsuminfo = 0;
 402     UINT r, type, count;
 403     INT ival;
 404     DWORD sz;
 405     char sval[20];
 406
 407     DeleteFileA( msifile );
 408
 409     test_create_database_binary();
 410
 411     ok(GetFileAttributesA(msifile) != INVALID_FILE_ATTRIBUTES, "file doesn't exist!\n");
 412
 413     /* just MsiOpenDatabase should not create a file */
 414     r = MsiOpenDatabaseW(msifileW, MSIDBOPEN_READONLY, &hdb);
 415     ok(r == ERROR_SUCCESS, "MsiOpenDatabase failed\n");
 416
 417     r = MsiGetSummaryInformationA(hdb, NULL, 0, &hsuminfo);
 418     ok(r == ERROR_SUCCESS, "MsiGetSummaryInformation failed\n");
 419
 420     /*
 421      * Check what reading PID_LASTPRINTED does...
 422      * The string value is written to the msi file
 423      * but it appears that we're not allowed to read it back again.
 424      * We can still read its type though...?
 425      */
 426     sz = sizeof sval;
 427     sval[0] = 0;
 428     type = 0;
 429     r = MsiSummaryInfoGetPropertyA(hsuminfo, PID_LASTPRINTED, &type, NULL, NULL, sval, &sz);
 430     ok(r == ERROR_SUCCESS, "MsiSummaryInfoGetProperty failed\n");
 431     ok(!lstrcmpA(sval, "") || !lstrcmpA(sval, "7"),
 432         "Expected empty string or \"7\", got \"%s\"\n", sval);
 433     todo_wine {
 434     ok(type == VT_LPSTR, "Expected VT_LPSTR, got %d\n", type);
 435     ok(sz == 0 || sz == 1, "Expected 0 or 1, got %d\n", sz);
 436     }
 437
 438     ival = -1;
 439     r = MsiSummaryInfoGetPropertyA(hsuminfo, PID_WORDCOUNT, &type, &ival, NULL, NULL, NULL);
 440     ok(r == ERROR_SUCCESS, "MsiSummaryInfoGetProperty failed\n");
 441     todo_wine ok( ival == 0, "value incorrect\n");
 442
 443     /* looks like msi adds some of its own values in here */
 444     count = 0;
 445     r = MsiSummaryInfoGetPropertyCount( hsuminfo, &count );
 446     ok(r == ERROR_SUCCESS, "getpropcount failed\n");
 447     todo_wine ok(count == 10, "prop count incorrect\n");
 448
 449     r = MsiSummaryInfoSetPropertyA( hsuminfo, PID_TITLE, VT_LPSTR, 0, NULL, "Mike" );
 450     ok(r == ERROR_FUNCTION_FAILED, "MsiSummaryInfoSetProperty failed %u\n", r);
 451
 452     r = MsiSummaryInfoPersist( hsuminfo );
 453     ok(r == ERROR_FUNCTION_FAILED, "MsiSummaryInfoPersist failed %u\n", r);
 454
 455     MsiCloseHandle( hsuminfo );
 456     MsiCloseHandle( hdb );
 457
 458     DeleteFileA( msifile );
 459 }
 460
 461 START_TEST(suminfo)
 462 {
 463     test_suminfo();
 464     test_summary_binary();
 465 }