msi: Set the WindowsInstaller value in RegisterProduct instead of PublishProduct.
[wine] / dlls / msi / tests / format.c
1 /*
2  * Copyright (C) 2005 Mike McCormack for CodeWeavers
3  * Copyright (C) 2005 Aric Stewart for CodeWeavers
4  *
5  * A test program for MSI record formatting
6  *
7  * This library is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * This library is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with this library; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
20  */
21
22 #include <stdio.h>
23 #include <windows.h>
24 #include <msi.h>
25 #include <msiquery.h>
26
27 #include "wine/test.h"
28
29 static const char msifile[] = "winetest.msi";
30
31 static UINT run_query( MSIHANDLE hdb, const char *query )
32 {
33     MSIHANDLE hview = 0;
34     UINT r;
35
36     r = MsiDatabaseOpenView(hdb, query, &hview);
37     if( r != ERROR_SUCCESS )
38         return r;
39
40     r = MsiViewExecute(hview, 0);
41     if( r == ERROR_SUCCESS )
42         r = MsiViewClose(hview);
43     MsiCloseHandle(hview);
44     return r;
45 }
46
47 static UINT create_feature_table( MSIHANDLE hdb )
48 {
49     return run_query( hdb,
50             "CREATE TABLE `Feature` ( "
51             "`Feature` CHAR(38) NOT NULL, "
52             "`Feature_Parent` CHAR(38), "
53             "`Title` CHAR(64), "
54             "`Description` CHAR(255), "
55             "`Display` SHORT NOT NULL, "
56             "`Level` SHORT NOT NULL, "
57             "`Directory_` CHAR(72), "
58             "`Attributes` SHORT NOT NULL "
59             "PRIMARY KEY `Feature`)" );
60 }
61
62 static UINT create_component_table( MSIHANDLE hdb )
63 {
64     return run_query( hdb,
65             "CREATE TABLE `Component` ( "
66             "`Component` CHAR(72) NOT NULL, "
67             "`ComponentId` CHAR(38), "
68             "`Directory_` CHAR(72) NOT NULL, "
69             "`Attributes` SHORT NOT NULL, "
70             "`Condition` CHAR(255), "
71             "`KeyPath` CHAR(72) "
72             "PRIMARY KEY `Component`)" );
73 }
74
75 static UINT create_feature_components_table( MSIHANDLE hdb )
76 {
77     return run_query( hdb,
78             "CREATE TABLE `FeatureComponents` ( "
79             "`Feature_` CHAR(38) NOT NULL, "
80             "`Component_` CHAR(72) NOT NULL "
81             "PRIMARY KEY `Feature_`, `Component_` )" );
82 }
83
84 static UINT create_file_table( MSIHANDLE hdb )
85 {
86     return run_query( hdb,
87             "CREATE TABLE `File` ("
88             "`File` CHAR(72) NOT NULL, "
89             "`Component_` CHAR(72) NOT NULL, "
90             "`FileName` CHAR(255) NOT NULL, "
91             "`FileSize` LONG NOT NULL, "
92             "`Version` CHAR(72), "
93             "`Language` CHAR(20), "
94             "`Attributes` SHORT, "
95             "`Sequence` SHORT NOT NULL "
96             "PRIMARY KEY `File`)" );
97 }
98
99 static UINT create_custom_action_table( MSIHANDLE hdb )
100 {
101     return run_query( hdb,
102             "CREATE TABLE `CustomAction` ("
103             "`Action` CHAR(72) NOT NULL, "
104             "`Type` SHORT NOT NULL, "
105             "`Source` CHAR(75), "
106             "`Target` CHAR(255) "
107             "PRIMARY KEY `Action`)" );
108 }
109
110 static UINT add_feature_entry( MSIHANDLE hdb, const char *values )
111 {
112     char insert[] = "INSERT INTO `Feature` (`Feature`, `Feature_Parent`, "
113                     "`Title`, `Description`, `Display`, `Level`, `Directory_`, `Attributes`) VALUES( %s )";
114     char *query;
115     UINT sz, r;
116
117     sz = strlen(values) + sizeof insert;
118     query = HeapAlloc(GetProcessHeap(),0,sz);
119     sprintf(query,insert,values);
120     r = run_query( hdb, query );
121     HeapFree(GetProcessHeap(), 0, query);
122     return r;
123 }
124
125 static UINT add_component_entry( MSIHANDLE hdb, const char *values )
126 {
127     char insert[] = "INSERT INTO `Component`  "
128             "(`Component`, `ComponentId`, `Directory_`, `Attributes`, `Condition`, `KeyPath`) "
129             "VALUES( %s )";
130     char *query;
131     UINT sz, r;
132
133     sz = strlen(values) + sizeof insert;
134     query = HeapAlloc(GetProcessHeap(),0,sz);
135     sprintf(query,insert,values);
136     r = run_query( hdb, query );
137     HeapFree(GetProcessHeap(), 0, query);
138     return r;
139 }
140
141 static UINT add_feature_components_entry( MSIHANDLE hdb, const char *values )
142 {
143     char insert[] = "INSERT INTO `FeatureComponents` "
144             "(`Feature_`, `Component_`) "
145             "VALUES( %s )";
146     char *query;
147     UINT sz, r;
148
149     sz = strlen(values) + sizeof insert;
150     query = HeapAlloc(GetProcessHeap(),0,sz);
151     sprintf(query,insert,values);
152     r = run_query( hdb, query );
153     HeapFree(GetProcessHeap(), 0, query);
154     return r;
155 }
156
157 static UINT add_file_entry( MSIHANDLE hdb, const char *values )
158 {
159     char insert[] = "INSERT INTO `File` "
160             "(`File`, `Component_`, `FileName`, `FileSize`, `Version`, `Language`, `Attributes`, `Sequence`) "
161             "VALUES( %s )";
162     char *query;
163     UINT sz, r;
164
165     sz = strlen(values) + sizeof insert;
166     query = HeapAlloc(GetProcessHeap(),0,sz);
167     sprintf(query,insert,values);
168     r = run_query( hdb, query );
169     HeapFree(GetProcessHeap(), 0, query);
170     return r;
171 }
172
173 static UINT add_directory_entry( MSIHANDLE hdb, const char *values )
174 {
175     char insert[] = "INSERT INTO `Directory` (`Directory`,`Directory_Parent`,`DefaultDir`) VALUES( %s )";
176     char *query;
177     UINT sz, r;
178
179     sz = strlen(values) + sizeof insert;
180     query = HeapAlloc(GetProcessHeap(),0,sz);
181     sprintf(query,insert,values);
182     r = run_query( hdb, query );
183     HeapFree(GetProcessHeap(), 0, query);
184     return r;
185 }
186
187 static UINT add_custom_action_entry( MSIHANDLE hdb, const char *values )
188 {
189     char insert[] = "INSERT INTO `CustomAction` (`Action`, `Type`, `Source`, "
190                     "`Target`) VALUES( %s )";
191     char *query;
192     UINT sz, r;
193
194     sz = strlen(values) + sizeof insert;
195     query = HeapAlloc(GetProcessHeap(),0,sz);
196     sprintf(query,insert,values);
197     r = run_query( hdb, query );
198     HeapFree(GetProcessHeap(), 0, query);
199     return r;
200 }
201
202 static UINT set_summary_info(MSIHANDLE hdb)
203 {
204     UINT res;
205     MSIHANDLE suminfo;
206
207     /* build summmary info */
208     res = MsiGetSummaryInformation(hdb, NULL, 7, &suminfo);
209     ok( res == ERROR_SUCCESS , "Failed to open summaryinfo\n" );
210
211     res = MsiSummaryInfoSetProperty(suminfo,2, VT_LPSTR, 0,NULL,
212                         "Installation Database");
213     ok( res == ERROR_SUCCESS , "Failed to set summary info\n" );
214
215     res = MsiSummaryInfoSetProperty(suminfo,3, VT_LPSTR, 0,NULL,
216                         "Installation Database");
217     ok( res == ERROR_SUCCESS , "Failed to set summary info\n" );
218
219     res = MsiSummaryInfoSetProperty(suminfo,4, VT_LPSTR, 0,NULL,
220                         "Wine Hackers");
221     ok( res == ERROR_SUCCESS , "Failed to set summary info\n" );
222
223     res = MsiSummaryInfoSetProperty(suminfo,7, VT_LPSTR, 0,NULL,
224                     ";1033");
225     ok( res == ERROR_SUCCESS , "Failed to set summary info\n" );
226
227     res = MsiSummaryInfoSetProperty(suminfo,9, VT_LPSTR, 0,NULL,
228                     "{913B8D18-FBB6-4CAC-A239-C74C11E3FA74}");
229     ok( res == ERROR_SUCCESS , "Failed to set summary info\n" );
230
231     res = MsiSummaryInfoSetProperty(suminfo, 14, VT_I4, 100, NULL, NULL);
232     ok( res == ERROR_SUCCESS , "Failed to set summary info\n" );
233
234     res = MsiSummaryInfoSetProperty(suminfo, 15, VT_I4, 0, NULL, NULL);
235     ok( res == ERROR_SUCCESS , "Failed to set summary info\n" );
236
237     res = MsiSummaryInfoPersist(suminfo);
238     ok( res == ERROR_SUCCESS , "Failed to make summary info persist\n" );
239
240     res = MsiCloseHandle( suminfo);
241     ok( res == ERROR_SUCCESS , "Failed to close suminfo\n" );
242
243     return res;
244 }
245
246 static MSIHANDLE create_package_db(void)
247 {
248     MSIHANDLE hdb = 0;
249     UINT res;
250
251     DeleteFile(msifile);
252
253     /* create an empty database */
254     res = MsiOpenDatabase(msifile, MSIDBOPEN_CREATE, &hdb );
255     ok( res == ERROR_SUCCESS , "Failed to create database\n" );
256     if( res != ERROR_SUCCESS )
257         return hdb;
258
259     res = MsiDatabaseCommit( hdb );
260     ok( res == ERROR_SUCCESS , "Failed to commit database\n" );
261
262     res = set_summary_info(hdb);
263
264     res = run_query( hdb,
265             "CREATE TABLE `Directory` ( "
266             "`Directory` CHAR(255) NOT NULL, "
267             "`Directory_Parent` CHAR(255), "
268             "`DefaultDir` CHAR(255) NOT NULL "
269             "PRIMARY KEY `Directory`)" );
270     ok( res == ERROR_SUCCESS , "Failed to create directory table\n" );
271
272     return hdb;
273 }
274
275 static MSIHANDLE package_from_db(MSIHANDLE hdb)
276 {
277     UINT res;
278     CHAR szPackage[10];
279     MSIHANDLE hPackage;
280
281     sprintf(szPackage,"#%li",hdb);
282     res = MsiOpenPackage(szPackage,&hPackage);
283     ok( res == ERROR_SUCCESS , "Failed to open package\n" );
284
285     res = MsiCloseHandle(hdb);
286     ok( res == ERROR_SUCCESS , "Failed to close db handle\n" );
287
288     return hPackage;
289 }
290
291 static void create_test_file(const CHAR *name)
292 {
293     HANDLE file;
294     DWORD written;
295
296     file = CreateFileA(name, GENERIC_WRITE, 0, NULL, CREATE_ALWAYS, 0, NULL);
297     ok(file != INVALID_HANDLE_VALUE, "Failure to open file %s\n", name);
298     WriteFile(file, name, strlen(name), &written, NULL);
299     WriteFile(file, "\n", strlen("\n"), &written, NULL);
300     CloseHandle(file);
301 }
302
303 static MSIHANDLE helper_createpackage( const char *szName )
304 {
305     MSIHANDLE hdb = 0;
306     UINT res;
307     CHAR szPackage[10];
308     MSIHANDLE hPackage;
309     MSIHANDLE suminfo;
310
311     DeleteFile(szName);
312
313     /* create an empty database */
314     res = MsiOpenDatabase(szName, MSIDBOPEN_CREATE, &hdb );
315     ok( res == ERROR_SUCCESS , "Failed to create database\n" );
316
317     res = MsiDatabaseCommit( hdb );
318     ok( res == ERROR_SUCCESS , "Failed to commit database\n" );
319
320     /* build summmary info */
321     res = MsiGetSummaryInformation(hdb, NULL, 7, &suminfo);
322     ok( res == ERROR_SUCCESS , "Failed to open summaryinfo\n" );
323
324     res = MsiSummaryInfoSetProperty(suminfo,2, VT_LPSTR, 0,NULL,
325                         "Installation Database");
326     ok( res == ERROR_SUCCESS , "Failed to set summary info\n" );
327
328     res = MsiSummaryInfoSetProperty(suminfo,3, VT_LPSTR, 0,NULL,
329                         "Installation Database");
330     ok( res == ERROR_SUCCESS , "Failed to set summary info\n" );
331
332     res = MsiSummaryInfoSetProperty(suminfo,4, VT_LPSTR, 0,NULL,
333                         "Wine Hackers");
334     ok( res == ERROR_SUCCESS , "Failed to set summary info\n" );
335
336     res = MsiSummaryInfoSetProperty(suminfo,7, VT_LPSTR, 0,NULL,
337                     ";1033");
338     ok( res == ERROR_SUCCESS , "Failed to set summary info\n" );
339
340     res = MsiSummaryInfoSetProperty(suminfo,9, VT_LPSTR, 0,NULL,
341                     "{913B8D18-FBB6-4CAC-A239-C74C11E3FA74}");
342     ok( res == ERROR_SUCCESS , "Failed to set summary info\n" );
343
344     res = MsiSummaryInfoSetProperty(suminfo, 14, VT_I4, 100, NULL, NULL);
345     ok( res == ERROR_SUCCESS , "Failed to set summary info\n" );
346
347     res = MsiSummaryInfoSetProperty(suminfo, 15, VT_I4, 0, NULL, NULL);
348     ok( res == ERROR_SUCCESS , "Failed to set summary info\n" );
349
350     res = MsiSummaryInfoPersist(suminfo);
351     ok( res == ERROR_SUCCESS , "Failed to make summary info persist\n" );
352
353     res = MsiCloseHandle( suminfo);
354     ok( res == ERROR_SUCCESS , "Failed to close suminfo\n" );
355
356     sprintf(szPackage,"#%li",hdb);
357     res = MsiOpenPackage(szPackage,&hPackage);
358     ok( res == ERROR_SUCCESS , "Failed to open package\n" );
359
360     res = MsiCloseHandle( hdb );
361     ok( res == ERROR_SUCCESS , "Failed to close database\n" );
362
363     return hPackage;
364 }
365
366 static void test_createpackage(void)
367 {
368     static const CHAR filename[] = "winetest.msi";
369     MSIHANDLE hPackage = 0;
370     UINT res;
371
372     hPackage = helper_createpackage( filename );
373     ok ( hPackage != 0, " Failed to create package\n");
374
375     res = MsiCloseHandle( hPackage);
376     ok( res == ERROR_SUCCESS , "Failed to close package\n" );
377
378     DeleteFile( filename );
379 }
380
381 static void test_formatrecord(void)
382 {
383     char buffer[100];
384     MSIHANDLE hrec;
385     UINT r;
386     DWORD sz;
387
388     r = MsiFormatRecord(0, 0, NULL, NULL );
389     ok( r == ERROR_INVALID_HANDLE, "wrong error\n");
390
391     hrec = MsiCreateRecord(4);
392     ok( hrec, "failed to create record\n");
393
394     /* format an empty record */
395     r = MsiFormatRecord(0, hrec, NULL, NULL );
396     ok( r == ERROR_SUCCESS, "format failed\n");
397     buffer[0] = 'x';
398     buffer[1] = 0;
399     sz=0;
400     r = MsiFormatRecord(0, hrec, buffer+1, &sz);
401     ok( r == ERROR_MORE_DATA && buffer[0] == 'x', "format failed measuring with buffer\n");
402     ok( sz == 16, "size wrong\n");
403     sz=100;
404     r = MsiFormatRecord(0, hrec, buffer, &sz);
405     ok( r == ERROR_SUCCESS, "format failed with empty buffer\n");
406     ok( sz == 16, "size wrong\n");
407     ok( 0 == strcmp(buffer,"1:  2:  3:  4:  "), "wrong output\n");
408
409     r = MsiCloseHandle(hrec);
410     ok(r==ERROR_SUCCESS, "Unable to close record\n");
411
412     hrec = MsiCreateRecord(6);
413     ok( hrec, "failed to create record\n");
414
415     sz = 100;
416     buffer[0] = 'x';
417     buffer[1] = 0;
418     r = MsiFormatRecord(0, hrec, buffer, &sz);
419     ok( r == ERROR_SUCCESS, "format failed with empty buffer\n");
420     ok( sz == 24, "size wrong\n");
421     ok( 0 == strcmp(buffer,"1:  2:  3:  4:  5:  6:  "), "wrong output\n");
422
423
424     /* format a format string with everything else empty */
425     r = MsiRecordSetString(hrec, 0, "%1");
426     ok( r == ERROR_SUCCESS, "set string failed\n");
427     r = MsiFormatRecord(0, hrec, NULL, NULL );
428     ok( r == ERROR_SUCCESS, "format failed\n");
429     r = MsiFormatRecord(0, hrec, buffer, NULL);
430     ok( r == ERROR_INVALID_PARAMETER, "wrong error\n");
431
432     sz = 123;
433     r = MsiFormatRecord(0, hrec, NULL, &sz);
434     ok( r == ERROR_SUCCESS, "format failed with empty buffer\n");
435     ok( sz == 2, "size wrong (%i)\n",sz);
436     sz = sizeof buffer;
437     buffer[0] = 'x';
438     buffer[1] = 0;
439     r = MsiFormatRecord(0, hrec, buffer, &sz);
440     ok( r == ERROR_SUCCESS, "format failed with empty buffer\n");
441     ok( sz == 2, "size wrong\n");
442     ok( 0 == strcmp(buffer,"%1"), "wrong output\n");
443
444     /* make the buffer too small */
445     sz = 0;
446     buffer[0] = 'x';
447     buffer[1] = 0;
448     r = MsiFormatRecord(0, hrec, buffer, &sz);
449     ok( r == ERROR_MORE_DATA, "format failed with empty buffer\n");
450     ok( sz == 2, "size wrong\n");
451     ok( 0 == strcmp(buffer,"x"), "wrong output\n");
452
453     /* make the buffer a little bit bigger */
454     sz = 1;
455     buffer[0] = 'x';
456     buffer[1] = 0;
457     r = MsiFormatRecord(0, hrec, buffer, &sz);
458     ok( r == ERROR_MORE_DATA, "format failed with empty buffer\n");
459     ok( sz == 2, "size wrong\n");
460     ok( 0 == strcmp(buffer,""), "wrong output (%s)\n",buffer);
461
462     /* and again */
463     sz = 2;
464     buffer[0] = 'x';
465     buffer[1] = 0;
466     r = MsiFormatRecord(0, hrec, buffer, &sz);
467     ok( r == ERROR_MORE_DATA, "format failed with empty buffer\n");
468     ok( sz == 2, "size wrong\n");
469     ok( 0 == strcmp(buffer,"%"), "wrong output\n");
470
471     /* and again */
472     sz = 3;
473     buffer[0] = 'x';
474     buffer[1] = 0;
475     r = MsiFormatRecord(0, hrec, buffer, &sz);
476     ok( r == ERROR_SUCCESS, "format failed with empty buffer\n");
477     ok( sz == 2, "size wrong\n");
478     ok( 0 == strcmp(buffer,"%1"), "wrong output\n");
479
480     /* now try a real format string */
481     r = MsiRecordSetString(hrec, 0, "[1]");
482     ok( r == ERROR_SUCCESS, "set string failed\n");
483     sz = sizeof buffer;
484     r = MsiFormatRecord(0, hrec, buffer, &sz);
485     ok( r == ERROR_SUCCESS, "format failed\n");
486     ok( sz == 0, "size wrong\n");
487     ok( 0 == strcmp(buffer,""), "wrong output\n");
488
489     /* now put something in the first field */
490     r = MsiRecordSetString(hrec, 1, "boo hoo");
491     ok( r == ERROR_SUCCESS, "set string failed\n");
492     sz = sizeof buffer;
493     r = MsiFormatRecord(0, hrec, buffer, &sz);
494     ok( r == ERROR_SUCCESS, "format failed\n");
495     ok( sz == 7, "size wrong\n");
496     ok( 0 == strcmp(buffer,"boo hoo"), "wrong output\n");
497
498     /* now put something in the first field */
499     r = MsiRecordSetString(hrec, 0, "[1] [2]");
500     r = MsiRecordSetString(hrec, 1, "boo");
501     r = MsiRecordSetString(hrec, 2, "hoo");
502     ok( r == ERROR_SUCCESS, "set string failed\n");
503     sz = sizeof buffer;
504     r = MsiFormatRecord(0, hrec, buffer, &sz);
505     ok( r == ERROR_SUCCESS, "format failed\n");
506     ok( sz == 7, "size wrong\n");
507     ok( 0 == strcmp(buffer,"boo hoo"), "wrong output\n");
508
509
510     /* empty string */
511     r = MsiRecordSetString(hrec, 0, "");
512     sz = sizeof buffer;
513     r = MsiFormatRecord(0, hrec, buffer, &sz);
514     ok( r == ERROR_SUCCESS, "format failed\n");
515     ok( sz == 30, "size wrong %i\n",sz);
516     ok( 0 == strcmp(buffer,"1: boo 2: hoo 3:  4:  5:  6:  "), 
517                     "wrong output(%s)\n",buffer);
518
519     /* play games with recursive lookups */
520     r = MsiRecordSetString(hrec, 0, "[[1]] [2]");
521     r = MsiRecordSetString(hrec, 1, "2");
522     r = MsiRecordSetString(hrec, 2, "hey");
523     ok( r == ERROR_SUCCESS, "set string failed\n");
524     sz = sizeof buffer;
525     r = MsiFormatRecord(0, hrec, buffer, &sz);
526     ok( r == ERROR_SUCCESS, "format failed\n");
527     ok( sz == 7, "size wrong,(%i)\n",sz);
528     ok( 0 == strcmp(buffer,"hey hey"), "wrong output (%s)\n",buffer);
529
530     r = MsiRecordSetString(hrec, 0, "[[1]] [2]");
531     r = MsiRecordSetString(hrec, 1, "[2]");
532     r = MsiRecordSetString(hrec, 2, "hey");
533     ok( r == ERROR_SUCCESS, "set string failed\n");
534     sz = sizeof buffer;
535     r = MsiFormatRecord(0, hrec, buffer, &sz);
536     ok( r == ERROR_SUCCESS, "format failed\n");
537     ok( sz == 9, "size wrong,(%i)\n",sz);
538     ok( 0 == strcmp(buffer,"[[2]] hey"), "wrong output (%s)\n",buffer);
539
540     r = MsiRecordSetString(hrec, 0, "[[[3]]] [2]");
541     r = MsiRecordSetString(hrec, 1, "2");
542     r = MsiRecordSetString(hrec, 2, "hey");
543     r = MsiRecordSetString(hrec, 3, "1");
544     ok( r == ERROR_SUCCESS, "set string failed\n");
545     sz = sizeof buffer;
546     r = MsiFormatRecord(0, hrec, buffer, &sz);
547     ok( r == ERROR_SUCCESS, "format failed\n");
548     ok( sz == 7, "size wrong,(%i)\n",sz);
549     ok( 0 == strcmp(buffer,"hey hey"), "wrong output (%s)\n",buffer);
550
551     r = MsiCloseHandle(hrec);
552     ok(r==ERROR_SUCCESS, "Unable to close record\n");
553     hrec = MsiCreateRecord(12);
554     ok( hrec, "failed to create record\n");
555
556     r = MsiRecordSetString(hrec, 0, "[[3][1]] [2]");
557     r = MsiRecordSetString(hrec, 1, "2");
558     r = MsiRecordSetString(hrec, 2, "hey");
559     r = MsiRecordSetString(hrec, 3, "1");
560     r = MsiRecordSetString(hrec, 12, "big");
561     ok( r == ERROR_SUCCESS, "set string failed\n");
562     sz = sizeof buffer;
563     r = MsiFormatRecord(0, hrec, buffer, &sz);
564     ok( r == ERROR_SUCCESS, "format failed\n");
565     ok( sz == 7, "size wrong,(%i)\n",sz);
566     ok( 0 == strcmp(buffer,"big hey"), "wrong output (%s)\n",buffer);
567
568     r = MsiRecordSetString(hrec, 0, "[[3][4][1]] [2]");
569     r = MsiRecordSetString(hrec, 1, "2");
570     r = MsiRecordSetString(hrec, 2, "hey");
571     r = MsiRecordSetString(hrec, 3, "1");
572     r = MsiRecordSetString(hrec, 4, NULL);
573     r = MsiRecordSetString(hrec, 12, "big");
574     ok( r == ERROR_SUCCESS, "set string failed\n");
575     sz = sizeof buffer;
576     r = MsiFormatRecord(0, hrec, buffer, &sz);
577     ok( r == ERROR_SUCCESS, "format failed\n");
578     ok( sz == 7, "size wrong,(%i)\n",sz);
579     ok( 0 == strcmp(buffer,"big hey"), "wrong output (%s)\n",buffer);
580
581     r = MsiRecordSetString(hrec, 0, "[[3][[4]][1]] [2]");
582     r = MsiRecordSetString(hrec, 1, "2");
583     r = MsiRecordSetString(hrec, 2, "hey");
584     r = MsiRecordSetString(hrec, 3, "1");
585     r = MsiRecordSetString(hrec, 4, NULL);
586     r = MsiRecordSetString(hrec, 12, "big");
587     ok( r == ERROR_SUCCESS, "set string failed\n");
588     sz = sizeof buffer;
589     r = MsiFormatRecord(0, hrec, buffer, &sz);
590     ok( r == ERROR_SUCCESS, "format failed\n");
591     ok( sz == 10, "size wrong,(%i)\n",sz);
592     ok( 0 == strcmp(buffer,"[1[]2] hey"), "wrong output (%s)\n",buffer);
593
594     /* incorrect  formats */
595     r = MsiRecordSetString(hrec, 0, "[[[3][[4]][1]] [2]");
596     r = MsiRecordSetString(hrec, 1, "2");
597     r = MsiRecordSetString(hrec, 2, "hey");
598     r = MsiRecordSetString(hrec, 3, "1");
599     r = MsiRecordSetString(hrec, 4, NULL);
600     r = MsiRecordSetString(hrec, 12, "big");
601     ok( r == ERROR_SUCCESS, "set string failed\n");
602     sz = sizeof buffer;
603     r = MsiFormatRecord(0, hrec, buffer, &sz);
604     ok( r == ERROR_SUCCESS, "format failed\n");
605     ok( sz == 18, "size wrong,(%i)\n",sz);
606     ok( 0 == strcmp(buffer,"[[[3][[4]][1]] [2]"), "wrong output (%s)\n",buffer);
607
608     r = MsiRecordSetString(hrec, 0, "[[3][[4]][1]] [2]]");
609     r = MsiRecordSetString(hrec, 1, "2");
610     r = MsiRecordSetString(hrec, 2, "hey");
611     r = MsiRecordSetString(hrec, 3, "1");
612     r = MsiRecordSetString(hrec, 4, NULL);
613     r = MsiRecordSetString(hrec, 12, "big");
614     ok( r == ERROR_SUCCESS, "set string failed\n");
615     sz = sizeof buffer;
616     r = MsiFormatRecord(0, hrec, buffer, &sz);
617     ok( r == ERROR_SUCCESS, "format failed\n");
618     ok( sz == 11, "size wrong,(%i)\n",sz);
619     ok( 0 == strcmp(buffer,"[1[]2] hey]"), "wrong output (%s)\n",buffer);
620
621
622     /* play games with {} */
623
624     r = MsiRecordSetString(hrec, 0, "{[3][1]} [2]");
625     r = MsiRecordSetString(hrec, 1, "2");
626     r = MsiRecordSetString(hrec, 2, "hey");
627     r = MsiRecordSetString(hrec, 3, "1");
628     r = MsiRecordSetString(hrec, 4, NULL);
629     r = MsiRecordSetString(hrec, 12, "big");
630     ok( r == ERROR_SUCCESS, "set string failed\n");
631     sz = sizeof buffer;
632     r = MsiFormatRecord(0, hrec, buffer, &sz);
633     ok( r == ERROR_SUCCESS, "format failed\n");
634     ok( sz == 6, "size wrong,(%i)\n",sz);
635     ok( 0 == strcmp(buffer,"12 hey"), "wrong output (%s)\n",buffer);
636
637     r = MsiRecordSetString(hrec, 0, "[{[3][1]}] [2]");
638     r = MsiRecordSetString(hrec, 1, "2");
639     r = MsiRecordSetString(hrec, 2, "hey");
640     r = MsiRecordSetString(hrec, 3, "1");
641     r = MsiRecordSetString(hrec, 4, NULL);
642     r = MsiRecordSetString(hrec, 12, "big");
643     ok( r == ERROR_SUCCESS, "set string failed\n");
644     sz = sizeof buffer;
645     r = MsiFormatRecord(0, hrec, buffer, &sz);
646     ok( r == ERROR_SUCCESS, "format failed\n");
647     ok( sz == 8, "size wrong,(%i)\n",sz);
648     ok( 0 == strcmp(buffer,"[12] hey"), "wrong output (%s)\n",buffer);
649
650
651     r = MsiRecordSetString(hrec, 0, "{test} [2]");
652     r = MsiRecordSetString(hrec, 1, "2");
653     r = MsiRecordSetString(hrec, 2, "hey");
654     r = MsiRecordSetString(hrec, 3, "1");
655     r = MsiRecordSetString(hrec, 4, NULL);
656     r = MsiRecordSetString(hrec, 12, "big");
657     ok( r == ERROR_SUCCESS, "set string failed\n");
658     sz = sizeof buffer;
659     r = MsiFormatRecord(0, hrec, buffer, &sz);
660     ok( r == ERROR_SUCCESS, "format failed\n");
661     ok( sz == 10, "size wrong,(%i)\n",sz);
662     ok( 0 == strcmp(buffer,"{test} hey"), "wrong output (%s)\n",buffer);
663
664     r = MsiRecordSetString(hrec, 0, "{[test]} [2]");
665     r = MsiRecordSetString(hrec, 1, "2");
666     r = MsiRecordSetString(hrec, 2, "hey");
667     r = MsiRecordSetString(hrec, 3, "1");
668     r = MsiRecordSetString(hrec, 4, NULL);
669     r = MsiRecordSetString(hrec, 12, "big");
670     ok( r == ERROR_SUCCESS, "set string failed\n");
671     sz = sizeof buffer;
672     r = MsiFormatRecord(0, hrec, buffer, &sz);
673     ok( r == ERROR_SUCCESS, "format failed\n");
674     ok( sz == 12, "size wrong,(%i)\n",sz);
675     ok( 0 == strcmp(buffer,"{[test]} hey"), "wrong output (%s)\n",buffer);
676
677     r = MsiRecordSetString(hrec, 0, "{[1][2][3][4]} [2]");
678     r = MsiRecordSetString(hrec, 1, "2");
679     r = MsiRecordSetString(hrec, 2, "hey");
680     r = MsiRecordSetString(hrec, 3, "1");
681     r = MsiRecordSetString(hrec, 4, NULL);
682     r = MsiRecordSetString(hrec, 12, "big");
683     ok( r == ERROR_SUCCESS, "set string failed\n");
684     sz = sizeof buffer;
685     r = MsiFormatRecord(0, hrec, buffer, &sz);
686     ok( r == ERROR_SUCCESS, "format failed\n");
687     ok( sz == 4, "size wrong,(%i)\n",sz);
688     ok( 0 == strcmp(buffer," hey"), "wrong output (%s)\n",buffer);
689
690     r = MsiRecordSetString(hrec, 0, "{[1][2][3][dummy]} [2]");
691     r = MsiRecordSetString(hrec, 1, "2");
692     r = MsiRecordSetString(hrec, 2, "hey");
693     r = MsiRecordSetString(hrec, 3, "1");
694     r = MsiRecordSetString(hrec, 4, NULL);
695     r = MsiRecordSetString(hrec, 12, "big");
696     ok( r == ERROR_SUCCESS, "set string failed\n");
697     sz = sizeof buffer;
698     r = MsiFormatRecord(0, hrec, buffer, &sz);
699     ok( r == ERROR_SUCCESS, "format failed\n");
700     ok( sz == 18, "size wrong,(%i)\n",sz);
701     ok( 0 == strcmp(buffer,"{2hey1[dummy]} hey"), "wrong output (%s)\n",buffer);
702
703     r = MsiRecordSetString(hrec, 0, "{[1][2][3][4][dummy]} [2]");
704     r = MsiRecordSetString(hrec, 1, "2");
705     r = MsiRecordSetString(hrec, 2, "hey");
706     r = MsiRecordSetString(hrec, 3, "1");
707     r = MsiRecordSetString(hrec, 4, NULL);
708     r = MsiRecordSetString(hrec, 12, "big");
709     ok( r == ERROR_SUCCESS, "set string failed\n");
710     sz = sizeof buffer;
711     r = MsiFormatRecord(0, hrec, buffer, &sz);
712     ok( r == ERROR_SUCCESS, "format failed\n");
713     ok( sz == 18, "size wrong,(%i)\n",sz);
714     ok( 0 == strcmp(buffer,"{2hey1[dummy]} hey"), "wrong output (%s)\n",buffer);
715
716     r = MsiRecordSetString(hrec, 0, "{{[1][2]}[3][4][dummy]}");
717     r = MsiRecordSetString(hrec, 1, "2");
718     r = MsiRecordSetString(hrec, 2, "hey");
719     r = MsiRecordSetString(hrec, 3, "1");
720     r = MsiRecordSetString(hrec, 4, NULL);
721     r = MsiRecordSetString(hrec, 12, "big");
722     ok( r == ERROR_SUCCESS, "set string failed\n");
723     sz = sizeof buffer;
724     r = MsiFormatRecord(0, hrec, buffer, &sz);
725     ok( r == ERROR_SUCCESS, "format failed\n");
726
727     todo_wine{
728     ok( sz == 16, "size wrong,(%i)\n",sz);
729     ok( 0 == strcmp(buffer,"{{2hey}1[dummy]}"), "wrong output (%s)\n",buffer);
730     }
731
732     r = MsiRecordSetString(hrec, 0, "{{[1][2]}[3]{[4][dummy]}}");
733     r = MsiRecordSetString(hrec, 1, "2");
734     r = MsiRecordSetString(hrec, 2, "hey");
735     r = MsiRecordSetString(hrec, 3, "1");
736     r = MsiRecordSetString(hrec, 4, NULL);
737     r = MsiRecordSetString(hrec, 12, "big");
738     ok( r == ERROR_SUCCESS, "set string failed\n");
739     sz = sizeof buffer;
740     r = MsiFormatRecord(0, hrec, buffer, &sz);
741     ok( r == ERROR_SUCCESS, "format failed\n");
742     todo_wine{
743     ok( sz == 0, "size wrong,(%i)\n",sz);
744     ok( 0 == strcmp(buffer,""), "wrong output (%s)\n",buffer);
745     }
746
747     r = MsiRecordSetString(hrec, 0, "{{[1][2]}[3]} {[1][2]}");
748     r = MsiRecordSetString(hrec, 1, "1");
749     r = MsiRecordSetString(hrec, 2, "2");
750     r = MsiRecordSetString(hrec, 3, "3");
751     r = MsiRecordSetString(hrec, 4, NULL);
752     r = MsiRecordSetString(hrec, 12, "big");
753     ok( r == ERROR_SUCCESS, "set string failed\n");
754     sz = sizeof buffer;
755     r = MsiFormatRecord(0, hrec, buffer, &sz);
756     ok( r == ERROR_SUCCESS, "format failed\n");
757     todo_wine{
758     ok( sz == 12, "size wrong,(%i)\n",sz);
759     ok( 0 == strcmp(buffer,"{{12}3} {12}"), "wrong output (%s)\n",buffer);
760     }
761
762     r = MsiRecordSetString(hrec, 0, "{[1][2]} {{[1][2]}[3]} {[1][2]}");
763     r = MsiRecordSetString(hrec, 1, "1");
764     r = MsiRecordSetString(hrec, 2, "2");
765     r = MsiRecordSetString(hrec, 3, "3");
766     r = MsiRecordSetString(hrec, 4, NULL);
767     r = MsiRecordSetString(hrec, 12, "big");
768     ok( r == ERROR_SUCCESS, "set string failed\n");
769     sz = sizeof buffer;
770     r = MsiFormatRecord(0, hrec, buffer, &sz);
771     ok( r == ERROR_SUCCESS, "format failed\n");
772     todo_wine{
773     ok( sz == 15, "size wrong,(%i)\n",sz);
774     ok( 0 == strcmp(buffer,"12 {{12}3} {12}"), "wrong output (%s)\n",buffer);
775     }
776
777     r = MsiRecordSetString(hrec, 0, "{[4]}{[1][2]} {{[1][2]}[3]} {[1][2]}");
778     r = MsiRecordSetString(hrec, 1, "1");
779     r = MsiRecordSetString(hrec, 2, "2");
780     r = MsiRecordSetString(hrec, 3, "3");
781     r = MsiRecordSetString(hrec, 4, NULL);
782     r = MsiRecordSetString(hrec, 12, "big");
783     ok( r == ERROR_SUCCESS, "set string failed\n");
784     sz = sizeof buffer;
785     r = MsiFormatRecord(0, hrec, buffer, &sz);
786     ok( r == ERROR_SUCCESS, "format failed\n");
787     todo_wine{
788     ok( sz == 15, "size wrong,(%i)\n",sz);
789     ok( 0 == strcmp(buffer,"12 {{12}3} {12}"), "wrong output (%s)\n",buffer);
790     }
791
792
793     r = MsiRecordSetString(hrec, 0, "{blah} {[4]}{[1][2]} {{[1][2]}[3]} {[1][2]}");
794     r = MsiRecordSetString(hrec, 1, "1");
795     r = MsiRecordSetString(hrec, 2, "2");
796     r = MsiRecordSetString(hrec, 3, "3");
797     r = MsiRecordSetString(hrec, 4, NULL);
798     r = MsiRecordSetString(hrec, 12, "big");
799     ok( r == ERROR_SUCCESS, "set string failed\n");
800     sz = sizeof buffer;
801     r = MsiFormatRecord(0, hrec, buffer, &sz);
802     ok( r == ERROR_SUCCESS, "format failed\n");
803     todo_wine{
804     ok( sz == 22, "size wrong,(%i)\n",sz);
805     ok( 0 == strcmp(buffer,"{blah} 12 {{12}3} {12}"), "wrong output (%s)\n",buffer);
806     }
807
808     r = MsiRecordSetString(hrec, 0, "{{[1]}[2]} {[4]}{[1][2]}");
809     r = MsiRecordSetString(hrec, 1, "1");
810     r = MsiRecordSetString(hrec, 2, "2");
811     r = MsiRecordSetString(hrec, 3, "3");
812     r = MsiRecordSetString(hrec, 4, NULL);
813     r = MsiRecordSetString(hrec, 12, "big");
814     ok( r == ERROR_SUCCESS, "set string failed\n");
815     sz = sizeof buffer;
816     r = MsiFormatRecord(0, hrec, buffer, &sz);
817     ok( r == ERROR_SUCCESS, "format failed\n");
818     todo_wine{
819     ok( sz == 13, "size wrong,(%i)\n",sz);
820     ok( 0 == strcmp(buffer,"{{1}2} {}{12}"), "wrong output (%s)\n",buffer);
821     }
822
823     r = MsiRecordSetString(hrec, 0, "{{[1]}} {[4]}{[1][2]}");
824     r = MsiRecordSetString(hrec, 1, "1");
825     r = MsiRecordSetString(hrec, 2, "2");
826     r = MsiRecordSetString(hrec, 3, "3");
827     r = MsiRecordSetString(hrec, 4, NULL);
828     r = MsiRecordSetString(hrec, 12, "big");
829     ok( r == ERROR_SUCCESS, "set string failed\n");
830     sz = sizeof buffer;
831     r = MsiFormatRecord(0, hrec, buffer, &sz);
832     ok( r == ERROR_SUCCESS, "format failed\n");
833     todo_wine{
834     ok( sz == 3, "size wrong,(%i)\n",sz);
835     ok( 0 == strcmp(buffer," 12"), "wrong output (%s)\n",buffer);
836     }
837
838     r = MsiRecordSetString(hrec, 0, "{{{[1]}} {[4]}{[1][2]}");
839     r = MsiRecordSetString(hrec, 1, "1");
840     r = MsiRecordSetString(hrec, 2, "2");
841     r = MsiRecordSetString(hrec, 3, "3");
842     r = MsiRecordSetString(hrec, 4, NULL);
843     r = MsiRecordSetString(hrec, 12, "big");
844     ok( r == ERROR_SUCCESS, "set string failed\n");
845     sz = sizeof buffer;
846     r = MsiFormatRecord(0, hrec, buffer, &sz);
847     ok( r == ERROR_SUCCESS, "format failed\n");
848     todo_wine{
849     ok( sz == 3, "size wrong,(%i)\n",sz);
850     ok( 0 == strcmp(buffer," 12"), "wrong output (%s)\n",buffer);
851     }
852     
853     /* now put play games with escaping */
854     r = MsiRecordSetString(hrec, 0, "[1] [2] [\\3asdf]");
855     r = MsiRecordSetString(hrec, 1, "boo");
856     r = MsiRecordSetString(hrec, 2, "hoo");
857     ok( r == ERROR_SUCCESS, "set string failed\n");
858     sz = sizeof buffer;
859     r = MsiFormatRecord(0, hrec, buffer, &sz);
860     ok( r == ERROR_SUCCESS, "format failed\n");
861     ok( sz == 16, "size wrong\n");
862     ok( 0 == strcmp(buffer,"boo hoo [\\3asdf]"), "wrong output\n");
863
864     /* now put play games with escaping */
865     r = MsiRecordSetString(hrec, 0, "[1] [2] [\\x]");
866     r = MsiRecordSetString(hrec, 1, "boo");
867     r = MsiRecordSetString(hrec, 2, "hoo");
868     ok( r == ERROR_SUCCESS, "set string failed\n");
869     sz = sizeof buffer;
870     r = MsiFormatRecord(0, hrec, buffer, &sz);
871     ok( r == ERROR_SUCCESS, "format failed\n");
872     ok( sz == 12, "size wrong\n");
873     ok( 0 == strcmp(buffer,"boo hoo [\\x]"), "wrong output\n");
874
875     MsiRecordSetString(hrec, 0, "[\\x]");
876     sz = sizeof buffer;
877     r = MsiFormatRecord(0, hrec, buffer, &sz);
878     ok( r == ERROR_SUCCESS, "format failed\n");
879     ok( sz == 4, "size wrong: %d\n", sz);
880     ok( 0 == strcmp(buffer,"[\\x]"), "wrong output: %s\n", buffer);
881
882     MsiRecordSetString(hrec, 0, "{\\x}");
883     sz = sizeof buffer;
884     r = MsiFormatRecord(0, hrec, buffer, &sz);
885     ok( r == ERROR_SUCCESS, "format failed\n");
886     ok( sz == 4, "size wrong: %d\n", sz);
887     ok( 0 == strcmp(buffer,"{\\x}"), "wrong output: %s\n", buffer);
888
889     MsiRecordSetString(hrec, 0, "[abc\\x]");
890     sz = sizeof buffer;
891     r = MsiFormatRecord(0, hrec, buffer, &sz);
892     ok( r == ERROR_SUCCESS, "format failed\n");
893     ok( sz == 7, "size wrong: %d\n", sz);
894     ok( 0 == strcmp(buffer,"[abc\\x]"), "wrong output: %s\n", buffer);
895
896     MsiRecordSetString(hrec, 0, "[\\[]Bracket Text[\\]]");
897     sz = sizeof buffer;
898     r = MsiFormatRecord(0, hrec, buffer, &sz);
899     ok( r == ERROR_SUCCESS, "format failed\n");
900     ok( sz == 20, "size wrong: %d\n", sz);
901     ok( 0 == strcmp(buffer,"[\\[]Bracket Text[\\]]"), "wrong output: %s\n", buffer);
902
903     /* now try other formats without a package */
904     r = MsiRecordSetString(hrec, 0, "[1] [2] [property]");
905     r = MsiRecordSetString(hrec, 1, "boo");
906     r = MsiRecordSetString(hrec, 2, "hoo");
907     ok( r == ERROR_SUCCESS, "set string failed\n");
908     sz = sizeof buffer;
909     r = MsiFormatRecord(0, hrec, buffer, &sz);
910     ok( r == ERROR_SUCCESS, "format failed\n");
911     ok( sz == 18, "size wrong\n");
912     ok( 0 == strcmp(buffer,"boo hoo [property]"), "wrong output\n");
913
914     r = MsiRecordSetString(hrec, 0, "[1] [~] [2]");
915     r = MsiRecordSetString(hrec, 1, "boo");
916     r = MsiRecordSetString(hrec, 2, "hoo");
917     ok( r == ERROR_SUCCESS, "set string failed\n");
918     sz = sizeof buffer;
919     r = MsiFormatRecord(0, hrec, buffer, &sz);
920     ok( r == ERROR_SUCCESS, "format failed\n");
921     ok( sz == 11, "size wrong\n");
922     ok( 0 == strcmp(buffer,"boo [~] hoo"), "wrong output (%s)\n",buffer);
923
924     r = MsiRecordSetString(hrec, 0, "[1]");
925     r = MsiRecordSetInteger(hrec, 1, 123456);
926     ok( r == ERROR_SUCCESS, "set integer failed\n");
927     sz = sizeof buffer;
928     r = MsiFormatRecord(0, hrec, buffer, &sz);
929     ok( r == ERROR_SUCCESS, "format failed\n");
930     ok( sz == 6, "size wrong\n");
931     ok( 0 == strcmp(buffer,"123456"), "wrong output (%s)\n",buffer);
932
933     r = MsiRecordSetString(hrec, 0, "[~]");
934     sz = sizeof buffer;
935     r = MsiFormatRecord(0, hrec, buffer, &sz);
936     ok( sz == 3, "size wrong\n");
937     ok( 0 == strcmp(buffer,"[~]"), "wrong output\n");
938     ok( r == ERROR_SUCCESS, "format failed\n");
939
940     r = MsiRecordSetString(hrec, 0, "[]");
941     sz = sizeof buffer;
942     r = MsiFormatRecord(0, hrec, buffer, &sz);
943     ok( sz == 2, "size wrong\n");
944     ok( 0 == strcmp(buffer,"[]"), "wrong output\n");
945     ok( r == ERROR_SUCCESS, "format failed\n");
946
947     /* MsiFormatRecord doesn't seem to handle a negative too well */
948     r = MsiRecordSetString(hrec, 0, "[-1]");
949     sz = sizeof buffer;
950     r = MsiFormatRecord(0, hrec, buffer, &sz);
951     ok( sz == 4, "size wrong\n");
952     ok( 0 == strcmp(buffer,"[-1]"), "wrong output\n");
953     ok( r == ERROR_SUCCESS, "format failed\n");
954
955     r = MsiRecordSetString(hrec, 0, "{[]}");
956     sz = sizeof buffer;
957     r = MsiFormatRecord(0, hrec, buffer, &sz);
958     ok( sz == 4, "size wrong\n");
959     ok( 0 == strcmp(buffer,"{[]}"), "wrong output\n");
960     ok( r == ERROR_SUCCESS, "format failed\n");
961
962     r = MsiRecordSetString(hrec, 0, "[0]");
963     sz = sizeof buffer;
964     r = MsiFormatRecord(0, hrec, buffer, &sz);
965     ok( sz == 3, "size wrong\n");
966     ok( 0 == strcmp(buffer,"[0]"), "wrong output\n");
967     ok( r == ERROR_SUCCESS, "format failed\n");
968
969     r = MsiRecordSetString(hrec, 0, "[100]");
970     sz = sizeof buffer;
971     r = MsiFormatRecord(0, hrec, buffer, &sz);
972     ok( sz == 0, "size wrong\n");
973     ok( 0 == strcmp(buffer,""), "wrong output\n");
974     ok( r == ERROR_SUCCESS, "format failed\n");
975
976     r = MsiRecordSetString(hrec, 0, "{[1] [2]}");
977     r = MsiRecordSetString(hrec, 1, "boo");
978     r = MsiRecordSetString(hrec, 2, "hoo");
979     sz = sizeof buffer;
980     r = MsiFormatRecord(0, hrec, buffer, &sz);
981     ok( sz == 7, "size wrong\n");
982     ok( 0 == strcmp(buffer,"boo hoo"), "wrong output\n");
983     ok( r == ERROR_SUCCESS, "format failed\n");
984
985     r = MsiRecordSetString(hrec, 0, "{}");
986     sz = sizeof buffer;
987     r = MsiFormatRecord(0, hrec, buffer, &sz);
988     ok( sz == 0, "size wrong\n");
989     ok( 0 == strcmp(buffer,""), "wrong output\n");
990     ok( r == ERROR_SUCCESS, "format failed\n");
991
992     r = MsiRecordSetString(hrec, 0, "{foo}");
993     sz = sizeof buffer;
994     r = MsiFormatRecord(0, hrec, buffer, &sz);
995     ok( sz == 5, "size wrong\n");
996     ok( 0 == strcmp(buffer,"{foo}"), "wrong output\n");
997     ok( r == ERROR_SUCCESS, "format failed\n");
998
999     r = MsiRecordSetString(hrec, 0, "{boo [1]}");
1000     r = MsiRecordSetString(hrec, 1, "hoo");
1001     sz = sizeof buffer;
1002     r = MsiFormatRecord(0, hrec, buffer, &sz);
1003     ok( sz == 7, "size wrong\n");
1004     ok( 0 == strcmp(buffer,"boo hoo"), "wrong output\n");
1005     ok( r == ERROR_SUCCESS, "format failed\n");
1006
1007     todo_wine {
1008     r = MsiRecordSetString(hrec, 0, "{{[1]}}");
1009     r = MsiRecordSetString(hrec, 1, "hoo");
1010     sz = sizeof buffer;
1011     r = MsiFormatRecord(0, hrec, buffer, &sz);
1012     ok( sz == 0, "size wrong\n");
1013     ok( 0 == strcmp(buffer,""), "wrong output\n");
1014     }
1015     ok( r == ERROR_SUCCESS, "format failed\n");
1016
1017     r = MsiRecordSetString(hrec, 0, "{ {[1]}}");
1018     r = MsiRecordSetString(hrec, 1, "hoo");
1019     sz = sizeof buffer;
1020     r = MsiFormatRecord(0, hrec, buffer, &sz);
1021     ok( 0 == strcmp(buffer," {hoo}"), "wrong output\n");
1022     ok( sz == 6, "size wrong\n");
1023     ok( r == ERROR_SUCCESS, "format failed\n");
1024
1025     todo_wine {
1026     r = MsiRecordSetString(hrec, 0, "{{[1]} }");
1027     r = MsiRecordSetString(hrec, 1, "hoo");
1028     sz = sizeof buffer;
1029     r = MsiFormatRecord(0, hrec, buffer, &sz);
1030     ok( sz == 8, "size wrong\n");
1031     ok( 0 == strcmp(buffer,"{{hoo} }"), "wrong output\n");
1032     }
1033     ok( r == ERROR_SUCCESS, "format failed\n");
1034
1035     todo_wine {
1036     r = MsiRecordSetString(hrec, 0, "{{ [1]}}");
1037     r = MsiRecordSetString(hrec, 1, "hoo");
1038     sz = sizeof buffer;
1039     r = MsiFormatRecord(0, hrec, buffer, &sz);
1040     ok( sz == 0, "size wrong\n");
1041     ok( 0 == strcmp(buffer,""), "wrong output\n");
1042     }
1043     ok( r == ERROR_SUCCESS, "format failed\n");
1044
1045     todo_wine {
1046     r = MsiRecordSetString(hrec, 0, "{{[1] }}");
1047     r = MsiRecordSetString(hrec, 1, "hoo");
1048     sz = sizeof buffer;
1049     r = MsiFormatRecord(0, hrec, buffer, &sz);
1050     ok( sz == 0, "size wrong\n");
1051     ok( 0 == strcmp(buffer,""), "wrong output\n");
1052     }
1053     ok( r == ERROR_SUCCESS, "format failed\n");
1054
1055     todo_wine {
1056     r = MsiRecordSetString(hrec, 0, "{{a}{b}{c }{ d}{any text}}");
1057     sz = sizeof buffer;
1058     r = MsiFormatRecord(0, hrec, buffer, &sz);
1059     ok( sz == 0, "size wrong\n");
1060     ok( 0 == strcmp(buffer,""), "wrong output\n");
1061     }
1062     ok( r == ERROR_SUCCESS, "format failed\n");
1063
1064     r = MsiRecordSetString(hrec, 0, "{{a} }");
1065     sz = sizeof buffer;
1066     r = MsiFormatRecord(0, hrec, buffer, &sz);
1067     ok( sz == 6, "size wrong\n");
1068     ok( 0 == strcmp(buffer,"{{a} }"), "wrong output\n");
1069     ok( r == ERROR_SUCCESS, "format failed\n");
1070
1071     todo_wine {
1072     r = MsiRecordSetString(hrec, 0, "{{a} {b}}");
1073     sz = sizeof buffer;
1074     r = MsiFormatRecord(0, hrec, buffer, &sz);
1075     ok( sz == 0, "size wrong\n");
1076     ok( 0 == strcmp(buffer,""), "wrong output\n");
1077     }
1078     ok( r == ERROR_SUCCESS, "format failed\n");
1079
1080     todo_wine {
1081     r = MsiRecordSetString(hrec, 0, "{{a} b}}");
1082     sz = sizeof buffer;
1083     r = MsiFormatRecord(0, hrec, buffer, &sz);
1084     ok( sz == 0, "size wrong\n");
1085     ok( 0 == strcmp(buffer,""), "wrong output\n");
1086     }
1087     ok( r == ERROR_SUCCESS, "format failed\n");
1088
1089     todo_wine {
1090     r = MsiRecordSetString(hrec, 0, "{{a b}}");
1091     sz = sizeof buffer;
1092     r = MsiFormatRecord(0, hrec, buffer, &sz);
1093     ok( sz == 0, "size wrong\n");
1094     ok( 0 == strcmp(buffer,""), "wrong output\n");
1095     }
1096     ok( r == ERROR_SUCCESS, "format failed\n");
1097
1098     r = MsiRecordSetString(hrec, 0, "{ }");
1099     sz = sizeof buffer;
1100     r = MsiFormatRecord(0, hrec, buffer, &sz);
1101     ok( sz == 3, "size wrong\n");
1102     ok( 0 == strcmp(buffer,"{ }"), "wrong output\n");
1103     ok( r == ERROR_SUCCESS, "format failed\n");
1104
1105     todo_wine {
1106     r = MsiRecordSetString(hrec, 0, " {{a}}}");
1107     sz = sizeof buffer;
1108     r = MsiFormatRecord(0, hrec, buffer, &sz);
1109     ok( sz == 2, "size wrong\n");
1110     ok( 0 == strcmp(buffer," }"), "wrong output\n");
1111     }
1112     ok( r == ERROR_SUCCESS, "format failed\n");
1113
1114     todo_wine {
1115     r = MsiRecordSetString(hrec, 0, "{{ almost {{ any }} text }}");
1116     sz = sizeof buffer;
1117     r = MsiFormatRecord(0, hrec, buffer, &sz);
1118     ok( sz == 8, "size wrong\n");
1119     ok( 0 == strcmp(buffer," text }}"), "wrong output\n");
1120     }
1121     ok( r == ERROR_SUCCESS, "format failed\n");
1122
1123     todo_wine {
1124     r = MsiRecordSetString(hrec, 0, "{{ } { hidden ][ [ }}");
1125     sz = sizeof buffer;
1126     r = MsiFormatRecord(0, hrec, buffer, &sz);
1127     ok( sz == 0, "size wrong\n");
1128     ok( 0 == strcmp(buffer,""), "wrong output\n");
1129     }
1130     ok( r == ERROR_SUCCESS, "format failed\n");
1131
1132     r = MsiRecordSetString(hrec, 0, "[ 1]");
1133     r = MsiRecordSetString(hrec, 1, "hoo");
1134     sz = sizeof buffer;
1135     r = MsiFormatRecord(0, hrec, buffer, &sz);
1136     ok( sz == 4, "size wrong\n");
1137     ok( 0 == strcmp(buffer,"[ 1]"), "wrong output\n");
1138     ok( r == ERROR_SUCCESS, "format failed\n");
1139
1140     r = MsiRecordSetString(hrec, 0, "[01]");
1141     r = MsiRecordSetString(hrec, 1, "hoo");
1142     sz = sizeof buffer;
1143     r = MsiFormatRecord(0, hrec, buffer, &sz);
1144     ok( sz == 3, "size wrong\n");
1145     ok( 0 == strcmp(buffer,"hoo"), "wrong output\n");
1146     ok( r == ERROR_SUCCESS, "format failed\n");
1147
1148     todo_wine {
1149     r = MsiRecordSetString(hrec, 0, "{{test}} [01");
1150     r = MsiRecordSetString(hrec, 1, "hoo");
1151     sz = sizeof buffer;
1152     r = MsiFormatRecord(0, hrec, buffer, &sz);
1153     ok( sz == 4, "size wrong\n");
1154     ok( 0 == strcmp(buffer," [01"), "wrong output\n");
1155     }
1156     ok( r == ERROR_SUCCESS, "format failed\n");
1157
1158     r = MsiRecordSetString(hrec, 0, "[\\[]");
1159     r = MsiRecordSetString(hrec, 1, "hoo");
1160     sz = sizeof buffer;
1161     r = MsiFormatRecord(0, hrec, buffer, &sz);
1162     ok( sz == 4, "size wrong\n");
1163     ok( 0 == strcmp(buffer,"[\\[]"), "wrong output\n");
1164     ok( r == ERROR_SUCCESS, "format failed\n");
1165
1166     r = MsiRecordSetString(hrec, 0, "[foo]");
1167     r = MsiRecordSetString(hrec, 1, "hoo");
1168     sz = sizeof buffer;
1169     r = MsiFormatRecord(0, hrec, buffer, &sz);
1170     ok( sz == 5, "size wrong\n");
1171     ok( 0 == strcmp(buffer,"[foo]"), "wrong output\n");
1172     ok( r == ERROR_SUCCESS, "format failed\n");
1173
1174     r = MsiRecordSetString(hrec, 0, "[01.]");
1175     r = MsiRecordSetString(hrec, 1, "hoo");
1176     sz = sizeof buffer;
1177     r = MsiFormatRecord(0, hrec, buffer, &sz);
1178     ok( sz == 5, "size wrong\n");
1179     ok( 0 == strcmp(buffer,"[01.]"), "wrong output\n");
1180     ok( r == ERROR_SUCCESS, "format failed\n");
1181
1182     SetEnvironmentVariable("FOO", "BAR");
1183     r = MsiRecordSetString(hrec, 0, "[%FOO]");
1184     sz = sizeof buffer;
1185     r = MsiFormatRecord(0, hrec, buffer, &sz);
1186     ok( sz == 6, "size wrong\n");
1187     ok( 0 == strcmp(buffer,"[%FOO]"), "wrong output\n");
1188     ok( r == ERROR_SUCCESS, "format failed\n");
1189
1190     todo_wine {
1191     r = MsiRecordSetString(hrec, 0, "{{[1]}");
1192     r = MsiRecordSetString(hrec, 1, "hoo");
1193     sz = sizeof buffer;
1194     r = MsiFormatRecord(0, hrec, buffer, &sz);
1195     ok( sz == 6, "size wrong\n");
1196     ok( 0 == strcmp(buffer,"{{hoo}"), "wrong output\n");
1197     }
1198     ok( r == ERROR_SUCCESS, "format failed\n");
1199
1200     todo_wine {
1201     r = MsiRecordSetString(hrec, 0, "{{ {[1]}");
1202     r = MsiRecordSetString(hrec, 1, "hoo");
1203     sz = sizeof buffer;
1204     r = MsiFormatRecord(0, hrec, buffer, &sz);
1205     ok( sz == 8, "size wrong\n");
1206     ok( 0 == strcmp(buffer,"{{ {hoo}"), "wrong output\n");
1207     }
1208     ok( r == ERROR_SUCCESS, "format failed\n");
1209
1210     todo_wine {
1211     r = MsiRecordSetString(hrec, 0, "{{ {[1]}");
1212     r = MsiRecordSetString(hrec, 1, "hoo");
1213     sz = sizeof buffer;
1214     r = MsiFormatRecord(0, hrec, buffer, &sz);
1215     ok( sz == 8, "size wrong\n");
1216     ok( 0 == strcmp(buffer,"{{ {hoo}"), "wrong output\n");
1217     }
1218     ok( r == ERROR_SUCCESS, "format failed\n");
1219
1220     todo_wine {
1221     r = MsiRecordSetString(hrec, 0, "{{ {{[1]}");
1222     r = MsiRecordSetString(hrec, 1, "hoo");
1223     sz = sizeof buffer;
1224     r = MsiFormatRecord(0, hrec, buffer, &sz);
1225     ok( sz == 9, "size wrong\n");
1226     ok( 0 == strcmp(buffer,"{{ {{hoo}"), "wrong output\n");
1227     }
1228     ok( r == ERROR_SUCCESS, "format failed\n");
1229
1230     r = MsiRecordSetString(hrec, 0, "[1]}");
1231     r = MsiRecordSetString(hrec, 1, "hoo");
1232     sz = sizeof buffer;
1233     r = MsiFormatRecord(0, hrec, buffer, &sz);
1234     ok( sz == 4, "size wrong\n");
1235     ok( 0 == strcmp(buffer,"hoo}"), "wrong output\n");
1236     ok( r == ERROR_SUCCESS, "format failed\n");
1237
1238     r = MsiRecordSetString(hrec, 0, "{{ {{a}");
1239     sz = sizeof buffer;
1240     r = MsiFormatRecord(0, hrec, buffer, &sz);
1241     ok( sz == 7, "size wrong\n");
1242     ok( 0 == strcmp(buffer,"{{ {{a}"), "wrong output\n");
1243     ok( r == ERROR_SUCCESS, "format failed\n");
1244
1245     r = MsiRecordSetString(hrec, 0, "{{ {{a}");
1246     sz = sizeof buffer;
1247     r = MsiFormatRecord(0, hrec, buffer, &sz);
1248     ok( sz == 7, "size wrong\n");
1249     ok( 0 == strcmp(buffer,"{{ {{a}"), "wrong output\n");
1250     ok( r == ERROR_SUCCESS, "format failed\n");
1251
1252     r = MsiRecordSetString(hrec, 0, "0{1{2{3{4[1]5}6}7}8}9");
1253     r = MsiRecordSetString(hrec, 1, "hoo");
1254     sz = sizeof buffer;
1255     r = MsiFormatRecord(0, hrec, buffer, &sz);
1256     ok( sz == 19, "size wrong\n");
1257     ok( 0 == strcmp(buffer,"01{2{3{4hoo56}7}8}9"), "wrong output\n");
1258     ok( r == ERROR_SUCCESS, "format failed\n");
1259
1260     r = MsiRecordSetString(hrec, 0, "0{1{2[1]3}4");
1261     r = MsiRecordSetString(hrec, 1, "hoo");
1262     sz = sizeof buffer;
1263     r = MsiFormatRecord(0, hrec, buffer, &sz);
1264     ok( sz == 9, "size wrong\n");
1265     ok( 0 == strcmp(buffer,"01{2hoo34"), "wrong output\n");
1266     ok( r == ERROR_SUCCESS, "format failed\n");
1267
1268     r = MsiRecordSetString(hrec, 0, "0{1{2[1]3}4");
1269     r = MsiRecordSetString(hrec, 1, "hoo");
1270     sz = sizeof buffer;
1271     r = MsiFormatRecord(0, hrec, buffer, &sz);
1272     ok( sz == 9, "size wrong\n");
1273     ok( 0 == strcmp(buffer,"01{2hoo34"), "wrong output\n");
1274     ok( r == ERROR_SUCCESS, "format failed\n");
1275
1276     r = MsiRecordSetString(hrec, 0, "{[1.} [1]");
1277     r = MsiRecordSetString(hrec, 1, "hoo");
1278     sz = sizeof buffer;
1279     r = MsiFormatRecord(0, hrec, buffer, &sz);
1280     ok( sz == 9, "size wrong\n");
1281     ok( 0 == strcmp(buffer,"{[1.} hoo"), "wrong output\n");
1282     ok( r == ERROR_SUCCESS, "format failed\n");
1283
1284     r = MsiRecordSetString(hrec, 0, "{[{[1]}]}");
1285     r = MsiRecordSetString(hrec, 1, "2");
1286     r = MsiRecordSetString(hrec, 2, "foo");
1287     sz = sizeof buffer;
1288     r = MsiFormatRecord(0, hrec, buffer, &sz);
1289     ok( sz == 9, "size wrong\n");
1290     ok( 0 == strcmp(buffer,"{[{[1]}]}"), "wrong output\n");
1291     ok( r == ERROR_SUCCESS, "format failed\n");
1292
1293     r = MsiRecordSetString(hrec, 0, "{[1][}");
1294     r = MsiRecordSetString(hrec, 1, "2");
1295     r = MsiRecordSetString(hrec, 2, "foo");
1296     sz = sizeof buffer;
1297     r = MsiFormatRecord(0, hrec, buffer, &sz);
1298     ok( sz == 2, "size wrong\n");
1299     ok( 0 == strcmp(buffer,"2["), "wrong output\n");
1300     ok( r == ERROR_SUCCESS, "format failed\n");
1301
1302     r = MsiRecordSetString(hrec, 0, "[1]");
1303     r = MsiRecordSetString(hrec, 1, "[2]");
1304     r = MsiRecordSetString(hrec, 2, "foo");
1305     sz = sizeof buffer;
1306     r = MsiFormatRecord(0, hrec, buffer, &sz);
1307     ok( sz == 3, "size wrong\n");
1308     ok( 0 == strcmp(buffer,"[2]"), "wrong output\n");
1309     ok( r == ERROR_SUCCESS, "format failed\n");
1310
1311     todo_wine {
1312     r = MsiRecordSetString(hrec, 0, "[{{boo}}1]");
1313     r = MsiRecordSetString(hrec, 1, "hoo");
1314     sz = sizeof buffer;
1315     r = MsiFormatRecord(0, hrec, buffer, &sz);
1316     ok( sz == 3, "size wrong\n");
1317     ok( 0 == strcmp(buffer,"[1]"), "wrong output\n");
1318     }
1319     ok( r == ERROR_SUCCESS, "format failed\n");
1320
1321     todo_wine {
1322     r = MsiRecordSetString(hrec, 0, "[{{boo}}1]");
1323     r = MsiRecordSetString(hrec, 0, "[1{{boo}}]");
1324     r = MsiRecordSetString(hrec, 1, "hoo");
1325     sz = sizeof buffer;
1326     r = MsiFormatRecord(0, hrec, buffer, &sz);
1327     ok( sz == 3, "size wrong\n");
1328     ok( 0 == strcmp(buffer,"[1]"), "wrong output\n");
1329     }
1330     ok( r == ERROR_SUCCESS, "format failed\n");
1331
1332     r = MsiRecordSetString(hrec, 0, "{[1]{{boo} }}");
1333     r = MsiRecordSetString(hrec, 1, "hoo");
1334     sz = sizeof buffer;
1335     r = MsiFormatRecord(0, hrec, buffer, &sz);
1336     ok( sz == 11, "size wrong\n");
1337     ok( 0 == strcmp(buffer,"hoo{{boo }}"), "wrong output\n");
1338     ok( r == ERROR_SUCCESS, "format failed\n");
1339
1340     r = MsiRecordSetString(hrec, 0, "{[1{{boo}}]}");
1341     r = MsiRecordSetString(hrec, 1, "hoo");
1342     sz = sizeof buffer;
1343     r = MsiFormatRecord(0, hrec, buffer, &sz);
1344     ok( sz == 12, "size wrong: got %u, expected 12\n", sz);
1345     ok( 0 == strcmp(buffer,"{[1{{boo}}]}"), "wrong output: got %s, expected [1]\n", buffer);
1346     ok( r == ERROR_SUCCESS, "format failed\n");
1347
1348     todo_wine {
1349     r = MsiRecordSetString(hrec, 0, "{{[1]}");
1350     r = MsiRecordSetString(hrec, 1, "hoo");
1351     sz = sizeof buffer;
1352     r = MsiFormatRecord(0, hrec, buffer, &sz);
1353     ok( sz == 6, "size wrong: got %u, expected 3\n", sz);
1354     ok( 0 == strcmp(buffer,"{{hoo}"), "wrong output: got %s, expected [1]\n", buffer);
1355     }
1356     ok( r == ERROR_SUCCESS, "format failed\n");
1357
1358     r = MsiRecordSetString(hrec, 0, "{[1{{bo}o}}]}");
1359     r = MsiRecordSetString(hrec, 1, "hoo");
1360     sz = sizeof buffer;
1361     r = MsiFormatRecord(0, hrec, buffer, &sz);
1362     ok( sz == 13, "size wrong\n");
1363     ok( 0 == strcmp(buffer,"{[1{{bo}o}}]}"), "wrong output %s\n",buffer);
1364     ok( r == ERROR_SUCCESS, "format failed\n");
1365
1366     r = MsiRecordSetString(hrec, 0, "{[1{{b{o}o}}]}");
1367     sz = sizeof buffer;
1368     r = MsiFormatRecord(0, hrec, buffer, &sz);
1369     ok( sz == 14, "size wrong\n");
1370     ok( 0 == strcmp(buffer,"{[1{{b{o}o}}]}"), "wrong output %s\n",buffer);
1371     ok( r == ERROR_SUCCESS, "format failed\n");
1372
1373     r = MsiRecordSetString(hrec, 0, "{ {[1]}");
1374     r = MsiRecordSetString(hrec, 1, "hoo");
1375     sz = sizeof buffer;
1376     r = MsiFormatRecord(0, hrec, buffer, &sz);
1377     ok( sz == 5, "size wrong\n");
1378     ok( 0 == strcmp(buffer," {hoo"), "wrong output %s\n",buffer);
1379     ok( r == ERROR_SUCCESS, "format failed\n");
1380
1381     /* {} inside a substitution does strange things... */
1382     r = MsiRecordSetString(hrec, 0, "[[1]{}]");
1383     r = MsiRecordSetString(hrec, 1, "2");
1384     sz = sizeof buffer;
1385     r = MsiFormatRecord(0, hrec, buffer, &sz);
1386     ok( sz == 5, "size wrong\n");
1387     ok( 0 == strcmp(buffer,"[[1]]"), "wrong output %s\n",buffer);
1388     ok( r == ERROR_SUCCESS, "format failed\n");
1389
1390     r = MsiRecordSetString(hrec, 0, "[[1]{}[1]]");
1391     r = MsiRecordSetString(hrec, 1, "2");
1392     sz = sizeof buffer;
1393     r = MsiFormatRecord(0, hrec, buffer, &sz);
1394     ok( sz == 6, "size wrong\n");
1395     ok( 0 == strcmp(buffer,"[[1]2]"), "wrong output %s\n",buffer);
1396     ok( r == ERROR_SUCCESS, "format failed\n");
1397
1398     r = MsiRecordSetString(hrec, 0, "[a[1]b[1]c{}d[1]e]");
1399     r = MsiRecordSetString(hrec, 1, "2");
1400     sz = sizeof buffer;
1401     r = MsiFormatRecord(0, hrec, buffer, &sz);
1402     ok( sz == 14, "size wrong\n");
1403     ok( 0 == strcmp(buffer,"[a[1]b[1]cd2e]"), "wrong output %s\n",buffer);
1404     ok( r == ERROR_SUCCESS, "format failed\n");
1405
1406     r = MsiRecordSetString(hrec, 0, "[a[1]b");
1407     r = MsiRecordSetString(hrec, 1, "2");
1408     sz = sizeof buffer;
1409     r = MsiFormatRecord(0, hrec, buffer, &sz);
1410     ok( sz == 6, "size wrong\n");
1411     ok( 0 == strcmp(buffer,"[a[1]b"), "wrong output %s\n",buffer);
1412     ok( r == ERROR_SUCCESS, "format failed\n");
1413
1414     r = MsiRecordSetString(hrec, 0, "a[1]b]");
1415     r = MsiRecordSetString(hrec, 1, "2");
1416     sz = sizeof buffer;
1417     r = MsiFormatRecord(0, hrec, buffer, &sz);
1418     ok( sz == 4, "size wrong\n");
1419     ok( 0 == strcmp(buffer,"a2b]"), "wrong output %s\n",buffer);
1420     ok( r == ERROR_SUCCESS, "format failed\n");
1421
1422     r = MsiRecordSetString(hrec, 0, "]a[1]b");
1423     r = MsiRecordSetString(hrec, 1, "2");
1424     sz = sizeof buffer;
1425     r = MsiFormatRecord(0, hrec, buffer, &sz);
1426     ok( sz == 4, "size wrong\n");
1427     ok( 0 == strcmp(buffer,"]a2b"), "wrong output %s\n",buffer);
1428     ok( r == ERROR_SUCCESS, "format failed\n");
1429
1430     r = MsiRecordSetString(hrec, 0, "]a[1]b");
1431     r = MsiRecordSetString(hrec, 1, "2");
1432     sz = sizeof buffer;
1433     r = MsiFormatRecord(0, hrec, buffer, &sz);
1434     ok( sz == 4, "size wrong\n");
1435     ok( 0 == strcmp(buffer,"]a2b"), "wrong output %s\n",buffer);
1436     ok( r == ERROR_SUCCESS, "format failed\n");
1437
1438     r = MsiRecordSetString(hrec, 0, "\\[1]");
1439     r = MsiRecordSetString(hrec, 1, "2");
1440     sz = sizeof buffer;
1441     r = MsiFormatRecord(0, hrec, buffer, &sz);
1442     ok( sz == 2, "size wrong\n");
1443     ok( 0 == strcmp(buffer,"\\2"), "wrong output %s\n",buffer);
1444     ok( r == ERROR_SUCCESS, "format failed\n");
1445
1446     r = MsiRecordSetString(hrec, 0, "\\{[1]}");
1447     r = MsiRecordSetString(hrec, 1, "2");
1448     sz = sizeof buffer;
1449     r = MsiFormatRecord(0, hrec, buffer, &sz);
1450     ok( sz == 2, "size wrong\n");
1451     ok( 0 == strcmp(buffer,"\\2"), "wrong output %s\n",buffer);
1452     ok( r == ERROR_SUCCESS, "format failed\n");
1453
1454     r = MsiRecordSetString(hrec, 0, "a{b[1]c}d");
1455     r = MsiRecordSetString(hrec, 1, NULL);
1456     sz = sizeof buffer;
1457     r = MsiFormatRecord(0, hrec, buffer, &sz);
1458     ok( sz == 2, "size wrong\n");
1459     ok( 0 == strcmp(buffer,"ad"), "wrong output %s\n",buffer);
1460     ok( r == ERROR_SUCCESS, "format failed\n");
1461
1462     r = MsiRecordSetString(hrec, 0, "{a[0]b}");
1463     r = MsiRecordSetString(hrec, 1, "foo");
1464     sz = sizeof buffer;
1465     r = MsiFormatRecord(0, hrec, buffer, &sz);
1466     ok( sz == 9, "size wrong\n");
1467     ok( 0 == strcmp(buffer,"a{a[0]b}b"), "wrong output %s\n",buffer);
1468     ok( r == ERROR_SUCCESS, "format failed\n");
1469
1470     r = MsiRecordSetString(hrec, 0, "[foo]");
1471     sz = sizeof buffer;
1472     r = MsiFormatRecord(0, hrec, buffer, &sz);
1473     ok( sz == 5, "size wrong\n");
1474     ok( 0 == strcmp(buffer,"[foo]"), "wrong output %s\n",buffer);
1475     ok( r == ERROR_SUCCESS, "format failed\n");
1476
1477     r = MsiRecordSetString(hrec, 0, "{[1][-1][1]}");
1478     r = MsiRecordSetString(hrec, 1, "foo");
1479     sz = sizeof buffer;
1480     r = MsiFormatRecord(0, hrec, buffer, &sz);
1481     ok( sz == 12, "size wrong\n");
1482     ok( 0 == strcmp(buffer,"{foo[-1]foo}"), "wrong output %s\n",buffer);
1483     ok( r == ERROR_SUCCESS, "format failed\n");
1484
1485     /* nested braces */
1486     sz = sizeof buffer;
1487     MsiRecordSetString(hrec, 0, "{abcd}");
1488     r = MsiFormatRecord(0, hrec, buffer, &sz);
1489     ok( r == ERROR_SUCCESS, "format failed\n");
1490     ok( sz == 6, "size wrong(%i)\n",sz);
1491     ok( 0 == strcmp(buffer,"{abcd}"), "wrong output (%s)\n",buffer);
1492
1493     sz = sizeof buffer;
1494     MsiRecordSetString(hrec, 0, "{a[one]bc[two]de[one]f}");
1495     r = MsiFormatRecord(0, hrec, buffer, &sz);
1496     ok( r == ERROR_SUCCESS, "format failed\n");
1497     ok( sz == 23, "size wrong(%i)\n",sz);
1498     ok( 0 == strcmp(buffer,"{a[one]bc[two]de[one]f}"), "wrong output (%s)\n",buffer);
1499
1500     sz = sizeof buffer;
1501     MsiRecordSetString(hrec, 0, "{a[one]bc[bad]de[two]f}");
1502     r = MsiFormatRecord(0, hrec, buffer, &sz);
1503     ok( r == ERROR_SUCCESS, "format failed\n");
1504     ok( sz == 23, "size wrong(%i)\n",sz);
1505     ok( 0 == strcmp(buffer,"{a[one]bc[bad]de[two]f}"), "wrong output (%s)\n",buffer);
1506
1507     sz = sizeof buffer;
1508     MsiRecordSetString(hrec, 0, "{[bad]}");
1509     r = MsiFormatRecord(0, hrec, buffer, &sz);
1510     ok( r == ERROR_SUCCESS, "format failed\n");
1511     ok( sz == 7, "size wrong(%i)\n",sz);
1512     ok( 0 == strcmp(buffer,"{[bad]}"), "wrong output (%s)\n",buffer);
1513
1514     sz = sizeof buffer;
1515     MsiRecordSetString(hrec, 0, "{abc{d[one]ef}"); /* missing final brace */
1516     r = MsiFormatRecord(0, hrec, buffer, &sz);
1517     ok( r == ERROR_SUCCESS, "format failed\n");
1518     ok( sz == 14, "size wrong(%i)\n",sz);
1519     ok( 0 == strcmp(buffer,"{abc{d[one]ef}"), "wrong output (%s)\n",buffer);
1520
1521     sz = sizeof buffer;
1522     MsiRecordSetString(hrec, 0, "{abc{d[one]ef}}");
1523     r = MsiFormatRecord(0, hrec, buffer, &sz);
1524     ok( r == ERROR_SUCCESS, "format failed\n");
1525     ok( sz == 15, "size wrong(%i)\n",sz);
1526     ok( 0 == strcmp(buffer,"{abc{d[one]ef}}"), "wrong output (%s)\n",buffer);
1527
1528     sz = sizeof buffer;
1529     MsiRecordSetString(hrec, 0, "{abc}{{def}hi{j[one]k}}");
1530     r = MsiFormatRecord(0, hrec, buffer, &sz);
1531     ok( r == ERROR_SUCCESS, "format failed\n");
1532     todo_wine
1533     {
1534         ok( sz == 5, "size wrong(%i)\n",sz);
1535         ok( 0 == strcmp(buffer,"{abc}"), "wrong output (%s)\n",buffer);
1536     }
1537
1538     sz = sizeof buffer;
1539     MsiRecordSetString(hrec, 0, "{{def}hi{j[one]k}}");
1540     r = MsiFormatRecord(0, hrec, buffer, &sz);
1541     ok( r == ERROR_SUCCESS, "format failed\n");
1542     todo_wine
1543     {
1544         ok( sz == 0, "size wrong(%i)\n",sz);
1545         ok( 0 == strcmp(buffer,""), "wrong output (%s)\n",buffer);
1546     }
1547
1548     sz = sizeof buffer;
1549     MsiRecordSetString(hrec, 0, "{{def}hi{jk}}");
1550     r = MsiFormatRecord(0, hrec, buffer, &sz);
1551     ok( r == ERROR_SUCCESS, "format failed\n");
1552     todo_wine
1553     {
1554         ok( sz == 0, "size wrong(%i)\n",sz);
1555         ok( 0 == strcmp(buffer,""), "wrong output (%s)\n",buffer);
1556     }
1557
1558     sz = sizeof buffer;
1559     MsiRecordSetString(hrec, 0, "{{{def}}hi{jk}}");
1560     r = MsiFormatRecord(0, hrec, buffer, &sz);
1561     ok( r == ERROR_SUCCESS, "format failed\n");
1562     todo_wine
1563     {
1564         ok( sz == 7, "size wrong(%i)\n",sz);
1565         ok( 0 == strcmp(buffer,"hi{jk}}"), "wrong output (%s)\n",buffer);
1566     }
1567
1568     sz = sizeof buffer;
1569     MsiRecordSetString(hrec, 0, "{{def}hi{{jk}}}");
1570     r = MsiFormatRecord(0, hrec, buffer, &sz);
1571     ok( r == ERROR_SUCCESS, "format failed\n");
1572     todo_wine
1573     {
1574         ok( sz == 1, "size wrong(%i)\n",sz);
1575         ok( 0 == strcmp(buffer,"}"), "wrong output (%s)\n",buffer);
1576     }
1577
1578     sz = sizeof buffer;
1579     MsiRecordSetString(hrec, 0, "{{def}{jk}}");
1580     r = MsiFormatRecord(0, hrec, buffer, &sz);
1581     ok( r == ERROR_SUCCESS, "format failed\n");
1582     todo_wine
1583     {
1584         ok( sz == 0, "size wrong(%i)\n",sz);
1585         ok( 0 == strcmp(buffer,""), "wrong output (%s)\n",buffer);
1586     }
1587
1588     sz = sizeof buffer;
1589     MsiRecordSetString(hrec, 0, "{{def}}");
1590     r = MsiFormatRecord(0, hrec, buffer, &sz);
1591     ok( r == ERROR_SUCCESS, "format failed\n");
1592     todo_wine
1593     {
1594         ok( sz == 0, "size wrong(%i)\n",sz);
1595         ok( 0 == strcmp(buffer,""), "wrong output (%s)\n",buffer);
1596     }
1597
1598     sz = sizeof buffer;
1599     MsiRecordSetString(hrec, 0, "{a{b}c}");
1600     r = MsiFormatRecord(0, hrec, buffer, &sz);
1601     ok( r == ERROR_SUCCESS, "format failed\n");
1602     ok( sz == 7, "size wrong(%i)\n",sz);
1603     ok( 0 == strcmp(buffer,"{a{b}c}"), "wrong output (%s)\n",buffer);
1604
1605     sz = sizeof buffer;
1606     MsiRecordSetString(hrec, 0, "{a{b}}");
1607     r = MsiFormatRecord(0, hrec, buffer, &sz);
1608     ok( r == ERROR_SUCCESS, "format failed\n");
1609     ok( sz == 6, "size wrong(%i)\n",sz);
1610     ok( 0 == strcmp(buffer,"{a{b}}"), "wrong output (%s)\n",buffer);
1611
1612     sz = sizeof buffer;
1613     MsiRecordSetString(hrec, 0, "{{b}c}");
1614     r = MsiFormatRecord(0, hrec, buffer, &sz);
1615     ok( r == ERROR_SUCCESS, "format failed\n");
1616     ok( sz == 6, "size wrong(%i)\n",sz);
1617     ok( 0 == strcmp(buffer,"{{b}c}"), "wrong output (%s)\n",buffer);
1618
1619     sz = sizeof buffer;
1620     MsiRecordSetString(hrec, 0, "{{{{}}}}");
1621     r = MsiFormatRecord(0, hrec, buffer, &sz);
1622     ok( r == ERROR_SUCCESS, "format failed\n");
1623     todo_wine
1624     {
1625         ok( sz == 2, "size wrong(%i)\n",sz);
1626         ok( 0 == strcmp(buffer,"}}"), "wrong output (%s)\n",buffer);
1627     }
1628
1629     sz = sizeof buffer;
1630     MsiRecordSetInteger(hrec, 1, 100);
1631     MsiRecordSetInteger(hrec, 2, -100);
1632     MsiRecordSetString(hrec, 0, "[1] [2]");
1633     r = MsiFormatRecord(0, hrec, buffer, &sz);
1634     ok( r == ERROR_SUCCESS, "format failed\n");
1635     ok( sz == 8, "size wrong(%i)\n",sz);
1636     ok( 0 == strcmp(buffer,"100 -100"), "wrong output (%s)\n",buffer);
1637
1638     MsiCloseHandle( hrec );
1639 }
1640
1641 static void test_formatrecord_package(void)
1642 {
1643     static const CHAR filename[] = "winetest.msi";
1644     char buffer[100];
1645     MSIHANDLE hrec;
1646     MSIHANDLE package;
1647     UINT r;
1648     DWORD sz=100;
1649
1650     package = helper_createpackage( filename );
1651     ok(package!=0, "Unable to create package\n");
1652
1653     hrec = MsiCreateRecord(12);
1654     ok( hrec, "failed to create record\n");
1655
1656     r = MsiFormatRecord(package, 0, NULL, NULL );
1657     ok( r == ERROR_INVALID_HANDLE, "wrong error\n");
1658
1659     r = MsiFormatRecord(package, hrec, NULL, NULL );
1660     ok( r == ERROR_SUCCESS, "format failed\n");
1661
1662     r = MsiRecordSetString(hrec,0,NULL);
1663     r = MsiRecordSetString(hrec,1,NULL);
1664     r = MsiRecordSetString(hrec,2,NULL);
1665     r = MsiRecordSetString(hrec,3,NULL);
1666     r = MsiRecordSetString(hrec,4,NULL);
1667     r = MsiRecordSetString(hrec,5,NULL);
1668     r = MsiRecordSetString(hrec,6,NULL);
1669     r = MsiRecordSetString(hrec,7,NULL);
1670     r = MsiRecordSetString(hrec,8,NULL);
1671     r = MsiRecordSetString(hrec,9,NULL);
1672     r = MsiRecordSetString(hrec,10,NULL);
1673     r = MsiRecordSetString(hrec,11,NULL);
1674     r = MsiRecordSetString(hrec,12,NULL);
1675     ok( r == ERROR_SUCCESS, "set string failed\n");
1676
1677     sz = sizeof buffer;
1678     r = MsiFormatRecord(package, hrec, buffer, &sz);
1679     ok( r == ERROR_SUCCESS, "format failed with empty buffer (%i)\n",r);
1680     ok( sz == 51, "size wrong (%i)\n",sz);
1681     ok( 0 == strcmp(buffer,"1:  2:  3:  4:  5:  6:  7:  8:  9:  10:  11:  12:  "), "wrong output(%s)\n",buffer);
1682
1683     r = MsiSetProperty(package, "prop", "val");
1684     ok( r == ERROR_SUCCESS, "failed to set propertY: %d\n", r);
1685
1686     r = MsiRecordSetString(hrec, 0, NULL);
1687     r = MsiRecordSetString(hrec, 1, "[2]");
1688     r = MsiRecordSetString(hrec, 2, "stuff");
1689     r = MsiRecordSetString(hrec, 3, "prop");
1690     r = MsiRecordSetString(hrec, 4, "[prop]");
1691     r = MsiRecordSetString(hrec, 5, "[noprop]");
1692     sz = sizeof buffer;
1693     r = MsiFormatRecord(package, hrec, buffer, &sz);
1694     ok( r == ERROR_SUCCESS, "format failed with empty buffer (%i)\n",r);
1695     todo_wine
1696     {
1697         ok( sz == 66, "size wrong (%i)\n",sz);
1698         ok( 0 == strcmp(buffer,"1: [2] 2: stuff 3: prop 4: val 5:  6:  7:  8:  9:  10:  11:  12:  "), "wrong output(%s)\n",buffer);
1699     }
1700
1701     /* now put play games with escaping */
1702     r = MsiRecordSetString(hrec, 0, "[1] [2] [\\3asdf]");
1703     r = MsiRecordSetString(hrec, 1, "boo");
1704     r = MsiRecordSetString(hrec, 2, "hoo");
1705     ok( r == ERROR_SUCCESS, "set string failed\n");
1706     sz = sizeof buffer;
1707     r = MsiFormatRecord(package, hrec, buffer, &sz);
1708     ok( r == ERROR_SUCCESS, "format failed\n");
1709     ok( sz == 9, "size wrong(%i)\n",sz);
1710     ok( 0 == strcmp(buffer,"boo hoo 3"), "wrong output (%s)\n",buffer);
1711
1712     r = MsiRecordSetString(hrec, 0, "[1] [2] [\\x]");
1713     r = MsiRecordSetString(hrec, 1, "boo");
1714     r = MsiRecordSetString(hrec, 2, "hoo");
1715     ok( r == ERROR_SUCCESS, "set string failed\n");
1716     sz = sizeof buffer;
1717     r = MsiFormatRecord(package, hrec, buffer, &sz);
1718     ok( r == ERROR_SUCCESS, "format failed\n");
1719     ok( sz == 9, "size wrong(%i)\n",sz);
1720     ok( 0 == strcmp(buffer,"boo hoo x"), "wrong output (%s)\n",buffer);
1721
1722     MsiRecordSetString(hrec, 0, "[\\x]");
1723     sz = sizeof buffer;
1724     r = MsiFormatRecord(package, hrec, buffer, &sz);
1725     ok( r == ERROR_SUCCESS, "format failed\n");
1726     ok( sz == 1, "size wrong: %d\n", sz);
1727     ok( 0 == strcmp(buffer,"x"), "wrong output: %s\n", buffer);
1728
1729     MsiRecordSetString(hrec, 0, "{\\x}");
1730     sz = sizeof buffer;
1731     r = MsiFormatRecord(package, hrec, buffer, &sz);
1732     ok( r == ERROR_SUCCESS, "format failed\n");
1733     ok( sz == 4, "size wrong: %d\n", sz);
1734     ok( 0 == strcmp(buffer,"{\\x}"), "wrong output: %s\n", buffer);
1735
1736     MsiRecordSetString(hrec, 0, "[abc\\x]");
1737     sz = sizeof buffer;
1738     r = MsiFormatRecord(package, hrec, buffer, &sz);
1739     ok( r == ERROR_SUCCESS, "format failed\n");
1740     ok( sz == 0, "size wrong: %d\n", sz);
1741     ok( 0 == strcmp(buffer,""), "wrong output: %s\n", buffer);
1742
1743     MsiRecordSetString(hrec, 0, "[abc\\xdef]");
1744     sz = sizeof buffer;
1745     r = MsiFormatRecord(package, hrec, buffer, &sz);
1746     ok( r == ERROR_SUCCESS, "format failed\n");
1747     ok( sz == 0, "size wrong: %d\n", sz);
1748     ok( 0 == strcmp(buffer,""), "wrong output: %s\n", buffer);
1749
1750     MsiRecordSetString(hrec, 0, "[\\[]Bracket Text[\\]]");
1751     sz = sizeof buffer;
1752     r = MsiFormatRecord(package, hrec, buffer, &sz);
1753     ok( r == ERROR_SUCCESS, "format failed\n");
1754     ok( sz == 14, "size wrong: %d\n", sz);
1755     ok( 0 == strcmp(buffer,"[Bracket Text]"), "wrong output: %s\n", buffer);
1756
1757     /* null characters */
1758     r = MsiRecordSetString(hrec, 0, "[1] [~] [2]");
1759     r = MsiRecordSetString(hrec, 1, "boo");
1760     r = MsiRecordSetString(hrec, 2, "hoo");
1761     ok( r == ERROR_SUCCESS, "set string failed\n");
1762     sz = sizeof buffer;
1763     r = MsiFormatRecord(package, hrec, buffer, &sz);
1764     ok( r == ERROR_SUCCESS, "format failed\n");
1765     ok( sz == 9, "size wrong\n");
1766     ok( 0 == strcmp(buffer,"boo "), "wrong output\n");
1767
1768     /* properties */
1769     r = MsiSetProperty(package,"dummy","Bork");
1770     ok( r == ERROR_SUCCESS, "set property failed\n");
1771     r = MsiRecordSetString(hrec, 0, "[1] [dummy] [2]");
1772     r = MsiRecordSetString(hrec, 1, "boo");
1773     r = MsiRecordSetString(hrec, 2, "hoo");
1774     ok( r == ERROR_SUCCESS, "set string failed\n");
1775     sz = sizeof buffer;
1776     r = MsiFormatRecord(package, hrec, buffer, &sz);
1777     ok( r == ERROR_SUCCESS, "format failed\n");
1778     ok( sz == 12, "size wrong\n");
1779     ok( 0 == strcmp(buffer,"boo Bork hoo"), "wrong output\n");
1780
1781     r = MsiRecordSetString(hrec, 0, "[1] [invalid] [2]");
1782     r = MsiRecordSetString(hrec, 1, "boo");
1783     r = MsiRecordSetString(hrec, 2, "hoo");
1784     ok( r == ERROR_SUCCESS, "set string failed\n");
1785     sz = sizeof buffer;
1786     r = MsiFormatRecord(package, hrec, buffer, &sz);
1787     ok( r == ERROR_SUCCESS, "format failed\n");
1788     ok( sz == 8, "size wrong\n");
1789     ok( 0 == strcmp(buffer,"boo  hoo"), "wrong output\n");
1790
1791
1792     /* nesting tests */
1793     r = MsiSetProperty(package,"dummya","foo");
1794     r = MsiSetProperty(package,"dummyb","baa");
1795     r = MsiSetProperty(package,"adummyc","whoa");
1796     ok( r == ERROR_SUCCESS, "set property failed\n");
1797     r = MsiRecordSetString(hrec, 0, "[dummy[1]] [dummy[2]] [[1]dummy[3]]");
1798     r = MsiRecordSetString(hrec, 1, "a");
1799     r = MsiRecordSetString(hrec, 2, "b");
1800     r = MsiRecordSetString(hrec, 3, "c");
1801     ok( r == ERROR_SUCCESS, "set string failed\n");
1802     sz = sizeof buffer;
1803     r = MsiFormatRecord(package, hrec, buffer, &sz);
1804     ok( r == ERROR_SUCCESS, "format failed\n");
1805     ok( sz == 12, "size wrong(%i)\n",sz);
1806     ok( 0 == strcmp(buffer,"foo baa whoa"), "wrong output (%s)\n",buffer);
1807
1808
1809     r = MsiSetProperty(package,"dummya","1");
1810     r = MsiSetProperty(package,"dummyb","[2]");
1811     ok( r == ERROR_SUCCESS, "set property failed\n");
1812     r = MsiRecordSetString(hrec, 0, "[dummya] [[dummya]] [dummyb]");
1813     r = MsiRecordSetString(hrec, 1, "aaa");
1814     r = MsiRecordSetString(hrec, 2, "bbb");
1815     r = MsiRecordSetString(hrec, 3, "ccc");
1816     ok( r == ERROR_SUCCESS, "set string failed\n");
1817     sz = sizeof buffer;
1818     r = MsiFormatRecord(package, hrec, buffer, &sz);
1819     ok( r == ERROR_SUCCESS, "format failed\n");
1820     ok( sz == 9, "size wrong(%i)\n",sz);
1821     ok( 0 == strcmp(buffer,"1 [1] [2]"), "wrong output (%s)\n",buffer);
1822
1823     r = MsiSetProperty(package,"dummya","1");
1824     r = MsiSetProperty(package,"dummyb","a");
1825     r = MsiSetProperty(package,"dummyc","\\blath");
1826     r = MsiSetProperty(package,"dummyd","[\\blath]");
1827     ok( r == ERROR_SUCCESS, "set property failed\n");
1828     r = MsiRecordSetString(hrec, 0, "[dummyc] [[dummyc]] [dummy[dummyb]]");
1829     r = MsiRecordSetString(hrec, 1, "aaa");
1830     r = MsiRecordSetString(hrec, 2, "bbb");
1831     r = MsiRecordSetString(hrec, 3, "ccc");
1832     ok( r == ERROR_SUCCESS, "set string failed\n");
1833     sz = sizeof buffer;
1834     r = MsiFormatRecord(package, hrec, buffer, &sz);
1835     ok( r == ERROR_SUCCESS, "format failed\n");
1836     ok( sz == 10, "size wrong(%i)\n",sz);
1837     ok( 0 == strcmp(buffer,"\\blath b 1"), "wrong output (%s)\n",buffer);
1838
1839     r = MsiRecordSetString(hrec, 0, "[1] [2] [[\\3asdf]]");
1840     r = MsiRecordSetString(hrec, 1, "boo");
1841     r = MsiRecordSetString(hrec, 2, "hoo");
1842     r = MsiRecordSetString(hrec, 3, "yeah");
1843     ok( r == ERROR_SUCCESS, "set string failed\n");
1844     sz = sizeof buffer;
1845     r = MsiFormatRecord(package, hrec, buffer, &sz);
1846     ok( r == ERROR_SUCCESS, "format failed\n");
1847     ok( sz == 11, "size wrong(%i)\n",sz);
1848     ok( 0 == strcmp(buffer,"boo hoo [3]"), "wrong output (%s)\n",buffer);
1849
1850     r = MsiRecordSetString(hrec, 0, "[1] [2] [[3]]");
1851     r = MsiRecordSetString(hrec, 1, "boo");
1852     r = MsiRecordSetString(hrec, 2, "hoo");
1853     r = MsiRecordSetString(hrec, 3, "\\help");
1854     ok( r == ERROR_SUCCESS, "set string failed\n");
1855     sz = sizeof buffer;
1856     r = MsiFormatRecord(package, hrec, buffer, &sz);
1857     ok( r == ERROR_SUCCESS, "format failed\n");
1858     ok( sz == 9, "size wrong(%i)\n",sz);
1859     ok( 0 == strcmp(buffer,"boo hoo h"), "wrong output (%s)\n",buffer);
1860
1861     /* nested properties */
1862     MsiSetProperty(package, "PropA", "surprise");
1863     MsiSetProperty(package, "PropB", "[PropA]");
1864     MsiSetProperty(package, "PropC", "[PropB]");
1865     sz = sizeof buffer;
1866     MsiRecordSetString(hrec, 0, "[PropC]");
1867     r = MsiFormatRecord(package, hrec, buffer, &sz);
1868     ok( r == ERROR_SUCCESS, "format failed\n");
1869     ok( sz == 7, "size wrong(%i)\n",sz);
1870     ok( 0 == strcmp(buffer,"[PropB]"), "wrong output (%s)\n",buffer);
1871
1872     MsiSetProperty(package, "PropA", "surprise");
1873     MsiSetProperty(package, "PropB", "PropA");
1874     MsiSetProperty(package, "PropC", "PropB");
1875     sz = sizeof buffer;
1876     MsiRecordSetString(hrec, 0, "[PropC]");
1877     r = MsiFormatRecord(package, hrec, buffer, &sz);
1878     ok( r == ERROR_SUCCESS, "format failed\n");
1879     ok( sz == 5, "size wrong(%i)\n",sz);
1880     ok( 0 == strcmp(buffer,"PropB"), "wrong output (%s)\n",buffer);
1881
1882     MsiSetProperty(package, "PropA", "surprise");
1883     MsiSetProperty(package, "PropB", "[PropA]");
1884     MsiSetProperty(package, "PropC", "[PropB]");
1885     sz = sizeof buffer;
1886     MsiRecordSetString(hrec, 0, "[[PropC]]");
1887     r = MsiFormatRecord(package, hrec, buffer, &sz);
1888     ok( r == ERROR_SUCCESS, "format failed\n");
1889     ok( sz == 0, "size wrong(%i)\n",sz);
1890     ok( 0 == strcmp(buffer,""), "wrong output (%s)\n",buffer);
1891
1892     MsiSetProperty(package, "PropA", "surprise");
1893     MsiSetProperty(package, "PropB", "[PropA]");
1894     MsiSetProperty(package, "PropC", "PropB");
1895     sz = sizeof buffer;
1896     MsiRecordSetString(hrec, 0, "[[PropC]]");
1897     r = MsiFormatRecord(package, hrec, buffer, &sz);
1898     ok( r == ERROR_SUCCESS, "format failed\n");
1899     ok( sz == 7, "size wrong(%i)\n",sz);
1900     ok( 0 == strcmp(buffer,"[PropA]"), "wrong output (%s)\n",buffer);
1901
1902     MsiSetProperty(package, "PropA", "surprise");
1903     MsiSetProperty(package, "PropB", "PropA");
1904     MsiSetProperty(package, "PropC", "PropB");
1905     sz = sizeof buffer;
1906     MsiRecordSetString(hrec, 0, "[[PropC]]");
1907     r = MsiFormatRecord(package, hrec, buffer, &sz);
1908     ok( r == ERROR_SUCCESS, "format failed\n");
1909     ok( sz == 5, "size wrong(%i)\n",sz);
1910     ok( 0 == strcmp(buffer,"PropA"), "wrong output (%s)\n",buffer);
1911
1912     MsiSetProperty(package, "PropA", "surprise");
1913     MsiSetProperty(package, "PropB", "PropA");
1914     MsiSetProperty(package, "PropC", "PropB");
1915     sz = sizeof buffer;
1916     MsiRecordSetString(hrec, 0, "[[[PropC]]]");
1917     r = MsiFormatRecord(package, hrec, buffer, &sz);
1918     ok( r == ERROR_SUCCESS, "format failed\n");
1919     ok( sz == 8, "size wrong(%i)\n",sz);
1920     ok( 0 == strcmp(buffer,"surprise"), "wrong output (%s)\n",buffer);
1921
1922     /* properties inside braces */
1923     sz = sizeof buffer;
1924     MsiRecordSetString(hrec, 0, "{abcd}");
1925     r = MsiFormatRecord(package, hrec, buffer, &sz);
1926     ok( r == ERROR_SUCCESS, "format failed\n");
1927     ok( sz == 6, "size wrong(%i)\n",sz);
1928     ok( 0 == strcmp(buffer,"{abcd}"), "wrong output (%s)\n",buffer);
1929
1930     MsiSetProperty(package, "one", "mercury");
1931     MsiSetProperty(package, "two", "venus");
1932     sz = sizeof buffer;
1933     MsiRecordSetString(hrec, 0, "{a[one]bc[two]de[one]f}");
1934     r = MsiFormatRecord(package, hrec, buffer, &sz);
1935     ok( r == ERROR_SUCCESS, "format failed\n");
1936     ok( sz == 25, "size wrong(%i)\n",sz);
1937     ok( 0 == strcmp(buffer,"amercurybcvenusdemercuryf"), "wrong output (%s)\n",buffer);
1938
1939     MsiSetProperty(package, "one", "mercury");
1940     MsiSetProperty(package, "two", "venus");
1941     MsiSetProperty(package, "bad", "");
1942     sz = sizeof buffer;
1943     MsiRecordSetString(hrec, 0, "{a[one]bc[bad]de[two]f}");
1944     r = MsiFormatRecord(package, hrec, buffer, &sz);
1945     ok( r == ERROR_SUCCESS, "format failed\n");
1946     ok( sz == 0, "size wrong(%i)\n",sz);
1947     ok( 0 == strcmp(buffer,""), "wrong output (%s)\n",buffer);
1948
1949     MsiSetProperty(package, "bad", "");
1950     sz = sizeof buffer;
1951     MsiRecordSetString(hrec, 0, "{[bad]}");
1952     r = MsiFormatRecord(package, hrec, buffer, &sz);
1953     ok( r == ERROR_SUCCESS, "format failed\n");
1954     ok( sz == 0, "size wrong(%i)\n",sz);
1955     ok( 0 == strcmp(buffer,""), "wrong output (%s)\n",buffer);
1956
1957     MsiSetProperty(package, "one", "mercury");
1958     sz = sizeof buffer;
1959     MsiRecordSetString(hrec, 0, "{abc{d[one]ef}"); /* missing final brace */
1960     r = MsiFormatRecord(package, hrec, buffer, &sz);
1961     ok( r == ERROR_SUCCESS, "format failed\n");
1962     ok( sz == 14, "size wrong(%i)\n",sz);
1963     ok( 0 == strcmp(buffer,"abc{dmercuryef"), "wrong output (%s)\n",buffer);
1964
1965     MsiSetProperty(package, "one", "mercury");
1966     sz = sizeof buffer;
1967     MsiRecordSetString(hrec, 0, "{abc{d[one]ef}}");
1968     r = MsiFormatRecord(package, hrec, buffer, &sz);
1969     ok( r == ERROR_SUCCESS, "format failed\n");
1970     ok( sz == 15, "size wrong(%i)\n",sz);
1971     ok( 0 == strcmp(buffer,"abc{dmercuryef}"), "wrong output (%s)\n",buffer);
1972
1973     MsiSetProperty(package, "one", "mercury");
1974     sz = sizeof buffer;
1975     MsiRecordSetString(hrec, 0, "{abc}{{def}hi{j[one]k}}");
1976     r = MsiFormatRecord(package, hrec, buffer, &sz);
1977     ok( r == ERROR_SUCCESS, "format failed\n");
1978     todo_wine
1979     {
1980         ok( sz == 5, "size wrong(%i)\n",sz);
1981         ok( 0 == strcmp(buffer,"{abc}"), "wrong output (%s)\n",buffer);
1982     }
1983
1984     MsiSetProperty(package, "one", "mercury");
1985     sz = sizeof buffer;
1986     MsiRecordSetString(hrec, 0, "{{def}hi{j[one]k}}");
1987     r = MsiFormatRecord(package, hrec, buffer, &sz);
1988     ok( r == ERROR_SUCCESS, "format failed\n");
1989     todo_wine
1990     {
1991         ok( sz == 0, "size wrong(%i)\n",sz);
1992         ok( 0 == strcmp(buffer,""), "wrong output (%s)\n",buffer);
1993     }
1994
1995     MsiCloseHandle(hrec);
1996
1997     r = MsiCloseHandle(package);
1998     ok(r==ERROR_SUCCESS, "Unable to close package\n");
1999
2000     DeleteFile( filename );
2001 }
2002
2003 static void test_formatrecord_tables(void)
2004 {
2005     MSIHANDLE hdb, hpkg, hrec;
2006     CHAR buf[MAX_PATH];
2007     CHAR curr_dir[MAX_PATH];
2008     CHAR expected[MAX_PATH];
2009     DWORD size;
2010     UINT r;
2011
2012     GetCurrentDirectory( MAX_PATH, curr_dir );
2013
2014     hdb = create_package_db();
2015     ok ( hdb, "failed to create package database\n");
2016
2017     r = add_directory_entry( hdb, "'TARGETDIR', '', 'SourceDir'" );
2018     ok( r == ERROR_SUCCESS, "cannot add directory: %d\n", r);
2019
2020     r = add_directory_entry( hdb, "'ReallyLongDir', 'TARGETDIR', "
2021                              "'I am a really long directory'" );
2022     ok( r == ERROR_SUCCESS, "cannot add directory: %d\n", r);
2023
2024     r = create_feature_table( hdb );
2025     ok( r == ERROR_SUCCESS, "cannot create Feature table: %d\n", r);
2026
2027     r = add_feature_entry( hdb, "'occipitofrontalis', '', '', '', 2, 1, '', 0" );
2028     ok( r == ERROR_SUCCESS, "cannot add feature: %d\n", r );
2029
2030     r = create_component_table( hdb );
2031     ok( r == ERROR_SUCCESS, "cannot create Component table: %d\n", r);
2032
2033     r = add_component_entry( hdb, "'frontal', '', 'TARGETDIR', 0, '', 'frontal_file'" );
2034     ok( r == ERROR_SUCCESS, "cannot add component: %d\n", r);
2035
2036     r = add_component_entry( hdb, "'parietal', '', 'TARGETDIR', 1, '', 'parietal_file'" );
2037     ok( r == ERROR_SUCCESS, "cannot add component: %d\n", r);
2038
2039     r = add_component_entry( hdb, "'temporal', '', 'ReallyLongDir', 0, '', 'temporal_file'" );
2040     ok( r == ERROR_SUCCESS, "cannot add component: %d\n", r);
2041
2042     r = create_feature_components_table( hdb );
2043     ok( r == ERROR_SUCCESS, "cannot create FeatureComponents table: %d\n", r);
2044
2045     r = add_feature_components_entry( hdb, "'occipitofrontalis', 'frontal'" );
2046     ok( r == ERROR_SUCCESS, "cannot add feature components: %d\n", r);
2047
2048     r = add_feature_components_entry( hdb, "'occipitofrontalis', 'parietal'" );
2049     ok( r == ERROR_SUCCESS, "cannot add feature components: %d\n", r);
2050
2051     r = add_feature_components_entry( hdb, "'occipitofrontalis', 'temporal'" );
2052     ok( r == ERROR_SUCCESS, "cannot add feature components: %d\n", r);
2053
2054     r = create_file_table( hdb );
2055     ok( r == ERROR_SUCCESS, "cannot create File table: %d\n", r);
2056
2057     r = add_file_entry( hdb, "'frontal_file', 'frontal', 'frontal.txt', 0, '', '1033', 8192, 1" );
2058     ok( r == ERROR_SUCCESS, "cannot add file: %d\n", r);
2059
2060     r = add_file_entry( hdb, "'parietal_file', 'parietal', 'parietal.txt', 0, '', '1033', 8192, 1" );
2061     ok( r == ERROR_SUCCESS, "cannot add file: %d\n", r);
2062
2063     r = add_file_entry( hdb, "'temporal_file', 'temporal', 'temporal.txt', 0, '', '1033', 8192, 1" );
2064     ok( r == ERROR_SUCCESS, "cannot add file: %d\n", r);
2065
2066     r = create_custom_action_table( hdb );
2067     ok( r == ERROR_SUCCESS, "cannot create CustomAction table: %d\n", r);
2068
2069     r = add_custom_action_entry( hdb, "'MyCustom', 51, 'prop', '[!temporal_file]'" );
2070     ok( r == ERROR_SUCCESS, "cannt add custom action: %d\n", r);
2071
2072     r = add_custom_action_entry( hdb, "'EscapeIt1', 51, 'prop', '[\\[]Bracket Text[\\]]'" );
2073     ok( r == ERROR_SUCCESS, "cannt add custom action: %d\n", r);
2074
2075     r = add_custom_action_entry( hdb, "'EscapeIt2', 51, 'prop', '[\\xabcd]'" );
2076     ok( r == ERROR_SUCCESS, "cannt add custom action: %d\n", r);
2077
2078     r = add_custom_action_entry( hdb, "'EscapeIt3', 51, 'prop', '[abcd\\xefgh]'" );
2079     ok( r == ERROR_SUCCESS, "cannt add custom action: %d\n", r);
2080
2081     hpkg = package_from_db( hdb );
2082     ok( hpkg, "failed to create package\n");
2083
2084     MsiCloseHandle( hdb );
2085
2086     r = MsiSetPropertyA( hpkg, "imaprop", "ringer" );
2087     ok( r == ERROR_SUCCESS, "cannot set property: %d\n", r);
2088
2089     hrec = MsiCreateRecord( 1 );
2090
2091     /* property doesn't exist */
2092     size = MAX_PATH;
2093     /*MsiRecordSetString( hrec, 0, "[1]" ); */
2094     MsiRecordSetString( hrec, 1, "[idontexist]" );
2095     r = MsiFormatRecord( hpkg, hrec, buf, &size );
2096     ok( r == ERROR_SUCCESS, "format record failed: %d\n", r);
2097     ok( !lstrcmp( buf, "1:  " ), "Expected '1:  ', got %s\n", buf );
2098
2099     /* property exists */
2100     size = MAX_PATH;
2101     MsiRecordSetString( hrec, 1, "[imaprop]" );
2102     r = MsiFormatRecord( hpkg, hrec, buf, &size );
2103     ok( r == ERROR_SUCCESS, "format record failed: %d\n", r);
2104     ok( !lstrcmp( buf, "1: ringer " ), "Expected '1: ringer ', got %s\n", buf );
2105
2106     /* environment variable doesn't exist */
2107     size = MAX_PATH;
2108     MsiRecordSetString( hrec, 1, "[%idontexist]" );
2109     r = MsiFormatRecord( hpkg, hrec, buf, &size );
2110     ok( r == ERROR_SUCCESS, "format record failed: %d\n", r);
2111     ok( !lstrcmp( buf, "1:  " ), "Expected '1:  ', got %s\n", buf );
2112
2113     /* environment variable exists */
2114     size = MAX_PATH;
2115     SetEnvironmentVariable( "crazyvar", "crazyval" );
2116     MsiRecordSetString( hrec, 1, "[%crazyvar]" );
2117     r = MsiFormatRecord( hpkg, hrec, buf, &size );
2118     ok( r == ERROR_SUCCESS, "format record failed: %d\n", r);
2119     ok( !lstrcmp( buf, "1: crazyval " ), "Expected '1: crazyval ', got %s\n", buf );
2120
2121     /* file key before CostInitialize */
2122     size = MAX_PATH;
2123     MsiRecordSetString( hrec, 1, "[#frontal_file]" );
2124     r = MsiFormatRecord( hpkg, hrec, buf, &size );
2125     ok( r == ERROR_SUCCESS, "format record failed: %d\n", r);
2126     ok( !lstrcmp( buf, "1:  " ), "Expected '1:  ', got %s\n", buf );
2127
2128     r = MsiDoAction(hpkg, "CostInitialize");
2129     ok( r == ERROR_SUCCESS, "CostInitialize failed: %d\n", r);
2130
2131     r = MsiDoAction(hpkg, "FileCost");
2132     ok( r == ERROR_SUCCESS, "FileCost failed: %d\n", r);
2133
2134     r = MsiDoAction(hpkg, "CostFinalize");
2135     ok( r == ERROR_SUCCESS, "CostFinalize failed: %d\n", r);
2136
2137     /* frontal full file key */
2138     size = MAX_PATH;
2139     MsiRecordSetString( hrec, 1, "[#frontal_file]" );
2140     r = MsiFormatRecord( hpkg, hrec, buf, &size );
2141     ok( r == ERROR_SUCCESS, "format record failed: %d\n", r);
2142     ok( !lstrcmp( buf, "1: C:\\frontal.txt " ), "Expected '1: C:\\frontal.txt ', got %s\n", buf);
2143
2144     /* frontal short file key */
2145     size = MAX_PATH;
2146     MsiRecordSetString( hrec, 1, "[!frontal_file]" );
2147     r = MsiFormatRecord( hpkg, hrec, buf, &size );
2148     ok( r == ERROR_SUCCESS, "format record failed: %d\n", r);
2149     ok( !lstrcmp( buf, "1: C:\\frontal.txt " ), "Expected '1: C:\\frontal.txt ', got %s\n", buf);
2150
2151     /* temporal full file key */
2152     size = MAX_PATH;
2153     MsiRecordSetString( hrec, 1, "[#temporal_file]" );
2154     r = MsiFormatRecord( hpkg, hrec, buf, &size );
2155     ok( r == ERROR_SUCCESS, "format record failed: %d\n", r);
2156     ok( !lstrcmp( buf, "1: C:\\I am a really long directory\\temporal.txt " ),
2157         "Expected '1: C:\\I am a really long directory\\temporal.txt ', got %s\n", buf);
2158
2159     /* temporal short file key */
2160     size = MAX_PATH;
2161     MsiRecordSetString( hrec, 1, "[!temporal_file]" );
2162     r = MsiFormatRecord( hpkg, hrec, buf, &size );
2163     ok( r == ERROR_SUCCESS, "format record failed: %d\n", r);
2164     ok( !lstrcmp( buf, "1: C:\\I am a really long directory\\temporal.txt " ),
2165         "Expected '1: C:\\I am a really long directory\\temporal.txt ', got %s\n", buf);
2166
2167     /* custom action 51, files don't exist */
2168     r = MsiDoAction( hpkg, "MyCustom" );
2169     ok( r == ERROR_SUCCESS, "MyCustom failed: %d\n", r);
2170
2171     size = MAX_PATH;
2172     r = MsiGetProperty( hpkg, "prop", buf, &size );
2173     ok( r == ERROR_SUCCESS, "get property failed: %d\n", r);
2174     ok( !lstrcmp( buf, "C:\\I am a really long directory\\temporal.txt" ),
2175         "Expected 'C:\\I am a really long directory\\temporal.txt', got %s\n", buf);
2176
2177     CreateDirectory( "C:\\I am a really long directory", NULL );
2178     create_test_file( "C:\\I am a really long directory\\temporal.txt" );
2179
2180     /* custom action 51, files exist */
2181     r = MsiDoAction( hpkg, "MyCustom" );
2182     ok( r == ERROR_SUCCESS, "MyCustom failed: %d\n", r);
2183
2184     size = MAX_PATH;
2185     r = MsiGetProperty( hpkg, "prop", buf, &size );
2186     ok( r == ERROR_SUCCESS, "get property failed: %d\n", r);
2187     todo_wine
2188     {
2189         ok( !lstrcmp( buf, "C:\\I am a really long directory\\temporal.txt" ),
2190             "Expected 'C:\\I am a really long directory\\temporal.txt', got %s\n", buf);
2191     }
2192
2193     /* custom action 51, escaped text 1 */
2194     r = MsiDoAction( hpkg, "EscapeIt1" );
2195     ok( r == ERROR_SUCCESS, "EscapeIt failed: %d\n", r);
2196
2197     size = MAX_PATH;
2198     r = MsiGetProperty( hpkg, "prop", buf, &size );
2199     ok( r == ERROR_SUCCESS, "get property failed: %d\n", r);
2200     ok( !lstrcmp( buf, "[Bracket Text]" ), "Expected '[Bracket Text]', got %s\n", buf);
2201
2202     /* custom action 51, escaped text 2 */
2203     r = MsiDoAction( hpkg, "EscapeIt2" );
2204     ok( r == ERROR_SUCCESS, "EscapeIt failed: %d\n", r);
2205
2206     size = MAX_PATH;
2207     r = MsiGetProperty( hpkg, "prop", buf, &size );
2208     ok( r == ERROR_SUCCESS, "get property failed: %d\n", r);
2209     ok( !lstrcmp( buf, "x" ), "Expected 'x', got %s\n", buf);
2210
2211     /* custom action 51, escaped text 3 */
2212     r = MsiDoAction( hpkg, "EscapeIt3" );
2213     ok( r == ERROR_SUCCESS, "EscapeIt failed: %d\n", r);
2214
2215     size = MAX_PATH;
2216     r = MsiGetProperty( hpkg, "prop", buf, &size );
2217     ok( r == ERROR_SUCCESS, "get property failed: %d\n", r);
2218     ok( !lstrcmp( buf, "" ), "Expected '', got %s\n", buf);
2219
2220     /* component with INSTALLSTATE_LOCAL */
2221     size = MAX_PATH;
2222     MsiRecordSetString( hrec, 1, "[$temporal]" );
2223     r = MsiFormatRecord( hpkg, hrec, buf, &size );
2224     ok( r == ERROR_SUCCESS, "format record failed: %d\n", r);
2225     ok( !lstrcmp( buf, "1: C:\\I am a really long directory\\ " ),
2226         "Expected '1: C:\\I am a really long directory\\ ', got %s\n", buf);
2227
2228     r = MsiSetComponentState( hpkg, "temporal", INSTALLSTATE_SOURCE );
2229     ok( r == ERROR_SUCCESS, "failed to set install state: %d\n", r);
2230
2231     /* component with INSTALLSTATE_SOURCE */
2232     lstrcpy( expected, "1: " );
2233     lstrcat( expected, curr_dir );
2234     lstrcat( expected, "\\ " );
2235     size = MAX_PATH;
2236     MsiRecordSetString( hrec, 1, "[$parietal]" );
2237     r = MsiFormatRecord( hpkg, hrec, buf, &size );
2238     ok( r == ERROR_SUCCESS, "format record failed: %d\n", r);
2239     ok( !lstrcmp( buf, expected ), "Expected '%s', got %s\n", expected, buf);
2240
2241     DeleteFile( "C:\\I am a really long directory\\temporal.txt" );
2242     RemoveDirectory( "C:\\I am a really long directory" );
2243
2244     MsiCloseHandle( hrec );
2245     MsiCloseHandle( hpkg );
2246     DeleteFile( msifile );
2247 }
2248
2249 static void test_processmessage(void)
2250 {
2251     static const CHAR filename[] = "winetest.msi";
2252     MSIHANDLE hrec;
2253     MSIHANDLE package;
2254     int r;
2255
2256     package = helper_createpackage( filename );
2257     ok(package!=0, "Unable to create package\n");
2258
2259     hrec = MsiCreateRecord(3);
2260     ok( hrec, "failed to create record\n");
2261
2262     r = MsiRecordSetString(hrec, 1, "");
2263     ok( r == ERROR_SUCCESS, "set string failed\n");
2264
2265     r = MsiProcessMessage(package, INSTALLMESSAGE_ACTIONSTART, hrec);
2266     ok( r == IDOK, "expected IDOK, got %i\n", r);
2267
2268     MsiCloseHandle(hrec);
2269     MsiCloseHandle(package);
2270
2271     DeleteFile(filename);
2272 }
2273
2274 START_TEST(format)
2275 {
2276     test_createpackage();
2277     test_formatrecord();
2278     test_formatrecord_package();
2279     test_formatrecord_tables();
2280     test_processmessage();
2281 }