user32: Pass a NULL rectangle in the ClipCursor entry point when clipping is reset...
[wine] / dlls / msi / registry.c
1 /*
2  * Implementation of the Microsoft Installer (msi.dll)
3  *
4  * Copyright 2005 Mike McCormack for CodeWeavers
5  * Copyright 2005 Aric Stewart for CodeWeavers
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 <stdarg.h>
23
24 #define COBJMACROS
25 #define NONAMELESSUNION
26
27 #include "windef.h"
28 #include "winbase.h"
29 #include "winreg.h"
30 #include "winnls.h"
31 #include "shlwapi.h"
32 #include "wine/debug.h"
33 #include "msi.h"
34 #include "msipriv.h"
35 #include "wincrypt.h"
36 #include "wine/unicode.h"
37 #include "winver.h"
38 #include "winuser.h"
39 #include "sddl.h"
40
41 WINE_DEFAULT_DEBUG_CHANNEL(msi);
42
43 /* 
44  * This module will be all the helper functions for registry access by the
45  * installer bits. 
46  */
47
48 static const WCHAR szUserDataFeatures_fmt[] = {
49     'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
50     'W','i','n','d','o','w','s','\\','C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
51     'I','n','s','t','a','l','l','e','r','\\','U','s','e','r','D','a','t','a','\\',
52     '%','s','\\','P','r','o','d','u','c','t','s','\\','%','s','\\','F','e','a','t','u','r','e','s',0};
53
54 static const WCHAR szUserDataComp_fmt[] = {
55     'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
56     'W','i','n','d','o','w','s','\\','C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
57     'I','n','s','t','a','l','l','e','r','\\','U','s','e','r','D','a','t','a','\\',
58     '%','s','\\','C','o','m','p','o','n','e','n','t','s','\\','%','s',0};
59
60 static const WCHAR szUserDataComponents_fmt[] = {
61     'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
62     'W','i','n','d','o','w','s','\\','C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
63     'I','n','s','t','a','l','l','e','r','\\','U','s','e','r','D','a','t','a','\\',
64     '%','s','\\','C','o','m','p','o','n','e','n','t','s',0};
65
66 static const WCHAR szUserDataProd_fmt[] = {
67     'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
68     'W','i','n','d','o','w','s','\\','C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
69     'I','n','s','t','a','l','l','e','r','\\','U','s','e','r','D','a','t','a','\\',
70     '%','s','\\','P','r','o','d','u','c','t','s','\\','%','s',0};
71
72 static const WCHAR szUserDataProducts_fmt[] = {
73     'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
74     'W','i','n','d','o','w','s','\\','C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
75     'I','n','s','t','a','l','l','e','r','\\','U','s','e','r','D','a','t','a','\\',
76     '%','s','\\','P','r','o','d','u','c','t','s',0};
77
78 static const WCHAR szUserDataPatch_fmt[] = {
79     'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
80     'W','i','n','d','o','w','s','\\','C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
81     'I','n','s','t','a','l','l','e','r','\\','U','s','e','r','D','a','t','a','\\',
82     '%','s','\\','P','a','t','c','h','e','s','\\','%','s',0};
83
84 static const WCHAR szUserDataPatches_fmt[] = {
85     'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
86     'W','i','n','d','o','w','s','\\','C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
87     'I','n','s','t','a','l','l','e','r','\\','U','s','e','r','D','a','t','a','\\',
88     '%','s','\\','P','a','t','c','h','e','s',0};
89
90 static const WCHAR szUserDataProductPatches_fmt[] = {
91     'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
92     'W','i','n','d','o','w','s','\\','C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
93     'I','n','s','t','a','l','l','e','r','\\','U','s','e','r','D','a','t','a','\\',
94     '%','s','\\','P','r','o','d','u','c','t','s','\\','%','s','\\','P','a','t','c','h','e','s',0};
95
96 static const WCHAR szInstallProperties_fmt[] = {
97     'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
98     'W','i','n','d','o','w','s','\\','C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
99     'I','n','s','t','a','l','l','e','r','\\','U','s','e','r','D','a','t','a','\\',
100     '%','s','\\','P','r','o','d','u','c','t','s','\\','%','s','\\',
101     'I','n','s','t','a','l','l','P','r','o','p','e','r','t','i','e','s',0};
102
103 static const WCHAR szInstaller_LocalManaged_fmt[] = {
104     'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
105     'W','i','n','d','o','w','s','\\','C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
106     'I','n','s','t','a','l','l','e','r','\\','M','a','n','a','g','e','d','\\','%','s','\\',
107     'I','n','s','t','a','l','l','e','r','\\','P','r','o','d','u','c','t','s',0};
108
109 static const WCHAR szInstaller_LocalManagedProd_fmt[] = {
110     'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
111     'W','i','n','d','o','w','s','\\','C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
112     'I','n','s','t','a','l','l','e','r','\\','M','a','n','a','g','e','d','\\','%','s','\\',
113     'I','n','s','t','a','l','l','e','r','\\','P','r','o','d','u','c','t','s','\\','%','s',0};
114
115 static const WCHAR szInstaller_LocalManagedFeat_fmt[] = {
116     'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
117     'W','i','n','d','o','w','s','\\','C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
118     'I','n','s','t','a','l','l','e','r','\\','M','a','n','a','g','e','d','\\','%','s','\\',
119     'I','n','s','t','a','l','l','e','r','\\','F','e','a','t','u','r','e','s','\\','%','s',0};
120
121 static const WCHAR szInstaller_Products[] = {
122     'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
123     'W','i','n','d','o','w','s','\\','C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
124     'I','n','s','t','a','l','l','e','r','\\','P','r','o','d','u','c','t','s',0};
125
126 static const WCHAR szInstaller_Patches[] = {
127     'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
128     'W','i','n','d','o','w','s','\\','C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
129     'I','n','s','t','a','l','l','e','r','\\','P','a','t','c','h','e','s',0};
130
131 static const WCHAR szInstaller_Components[] = {
132     'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
133     'W','i','n','d','o','w','s','\\','C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
134     'I','n','s','t','a','l','l','e','r','\\','C','o','m','p','o','n','e','n','t','s',0};
135
136 static const WCHAR szInstaller_LocalClassesProducts[] = {
137     'S','o','f','t','w','a','r','e','\\','C','l','a','s','s','e','s','\\',
138     'I','n','s','t','a','l','l','e','r','\\','P','r','o','d','u','c','t','s',0};
139
140 static const WCHAR szInstaller_LocalClassesFeatures[] = {
141     'S','o','f','t','w','a','r','e','\\','C','l','a','s','s','e','s','\\',
142     'I','n','s','t','a','l','l','e','r','\\','F','e','a','t','u','r','e','s',0};
143
144 static const WCHAR szInstaller_LocalClassesProd[] = {
145     'S','o','f','t','w','a','r','e','\\','C','l','a','s','s','e','s','\\',
146     'I','n','s','t','a','l','l','e','r','\\','P','r','o','d','u','c','t','s','\\',0};
147
148 static const WCHAR szInstaller_LocalClassesFeat[] = {
149     'S','o','f','t','w','a','r','e','\\','C','l','a','s','s','e','s','\\',
150     'I','n','s','t','a','l','l','e','r','\\','F','e','a','t','u','r','e','s','\\',0};
151
152 static const WCHAR szInstaller_ClassesUpgradeCode[] = {
153     'S','o','f','t','w','a','r','e','\\','C','l','a','s','s','e','s','\\',
154     'I','n','s','t','a','l','l','e','r','\\','U','p','g','r','a','d','e','C','o','d','e','s','\\',0};
155
156 static const WCHAR szInstaller_ClassesUpgradeCodes[] = {
157     'S','o','f','t','w','a','r','e','\\','C','l','a','s','s','e','s','\\',
158     'I','n','s','t','a','l','l','e','r','\\','U','p','g','r','a','d','e','C','o','d','e','s',0};
159
160 static const WCHAR szInstaller_Features[] = {
161     'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
162     'W','i','n','d','o','w','s','\\','C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
163     'I','n','s','t','a','l','l','e','r','\\','F','e','a','t','u','r','e','s','\\',0};
164
165 static const WCHAR szInstaller_UpgradeCodes[] = {
166     'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
167     'W','i','n','d','o','w','s','\\','C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
168     'I','n','s','t','a','l','l','e','r','\\','U','p','g','r','a','d','e','C','o','d','e','s','\\',0};
169
170 static const WCHAR szInstaller_UserUpgradeCodes[] = {
171     'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
172     'I','n','s','t','a','l','l','e','r','\\','U','p','g','r','a','d','e','C','o','d','e','s','\\',0};
173
174 static const WCHAR szUninstall[] = {
175     'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
176     'W','i','n','d','o','w','s','\\','C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
177     'U','n','i','n','s','t','a','l','l','\\',0};
178
179 static const WCHAR szUninstall_32node[] = {
180     'S','o','f','t','w','a','r','e','\\','W','o','w','6','4','3','2','N','o','d','e','\\',
181     'M','i','c','r','o','s','o','f','t','\\','W','i','n','d','o','w','s','\\',
182     'C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\','U','n','i','n','s','t','a','l','l','\\',0};
183
184 static const WCHAR szUserComponents[] = {
185     'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
186     'I','n','s','t','a','l','l','e','r','\\','C','o','m','p','o','n','e','n','t','s','\\',0};
187
188 static const WCHAR szUserFeatures[] = {
189     'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
190     'I','n','s','t','a','l','l','e','r','\\','F','e','a','t','u','r','e','s','\\',0};
191
192 static const WCHAR szUserProducts[] = {
193     'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
194     'I','n','s','t','a','l','l','e','r','\\','P','r','o','d','u','c','t','s','\\',0};
195
196 static const WCHAR szUserPatches[] = {
197     'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
198     'I','n','s','t','a','l','l','e','r','\\','P','a','t','c','h','e','s','\\',0};
199
200 BOOL unsquash_guid(LPCWSTR in, LPWSTR out)
201 {
202     DWORD i,n=0;
203
204     if (lstrlenW(in) != 32)
205         return FALSE;
206
207     out[n++]='{';
208     for(i=0; i<8; i++)
209         out[n++] = in[7-i];
210     out[n++]='-';
211     for(i=0; i<4; i++)
212         out[n++] = in[11-i];
213     out[n++]='-';
214     for(i=0; i<4; i++)
215         out[n++] = in[15-i];
216     out[n++]='-';
217     for(i=0; i<2; i++)
218     {
219         out[n++] = in[17+i*2];
220         out[n++] = in[16+i*2];
221     }
222     out[n++]='-';
223     for( ; i<8; i++)
224     {
225         out[n++] = in[17+i*2];
226         out[n++] = in[16+i*2];
227     }
228     out[n++]='}';
229     out[n]=0;
230     return TRUE;
231 }
232
233 BOOL squash_guid(LPCWSTR in, LPWSTR out)
234 {
235     DWORD i,n=1;
236     GUID guid;
237
238     out[0] = 0;
239
240     if (FAILED(CLSIDFromString((LPCOLESTR)in, &guid)))
241         return FALSE;
242
243     for(i=0; i<8; i++)
244         out[7-i] = in[n++];
245     n++;
246     for(i=0; i<4; i++)
247         out[11-i] = in[n++];
248     n++;
249     for(i=0; i<4; i++)
250         out[15-i] = in[n++];
251     n++;
252     for(i=0; i<2; i++)
253     {
254         out[17+i*2] = in[n++];
255         out[16+i*2] = in[n++];
256     }
257     n++;
258     for( ; i<8; i++)
259     {
260         out[17+i*2] = in[n++];
261         out[16+i*2] = in[n++];
262     }
263     out[32]=0;
264     return TRUE;
265 }
266
267
268 /* tables for encoding and decoding base85 */
269 static const unsigned char table_dec85[0x80] = {
270 0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,
271 0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff,
272 0xff,0x00,0xff,0xff,0x01,0x02,0x03,0x04,0x05,0x06,0x07,0x08,0x09,0x0a,0x0b,0xff,
273 0x0c,0x0d,0x0e,0x0f,0x10,0x11,0x12,0x13,0x14,0x15,0xff,0xff,0xff,0x16,0xff,0x17,
274 0x18,0x19,0x1a,0x1b,0x1c,0x1d,0x1e,0x1f,0x20,0x21,0x22,0x23,0x24,0x25,0x26,0x27,
275 0x28,0x29,0x2a,0x2b,0x2c,0x2d,0x2e,0x2f,0x30,0x31,0x32,0x33,0xff,0x34,0x35,0x36,
276 0x37,0x38,0x39,0x3a,0x3b,0x3c,0x3d,0x3e,0x3f,0x40,0x41,0x42,0x43,0x44,0x45,0x46,
277 0x47,0x48,0x49,0x4a,0x4b,0x4c,0x4d,0x4e,0x4f,0x50,0x51,0x52,0xff,0x53,0x54,0xff,
278 };
279
280 static const char table_enc85[] =
281 "!$%&'()*+,-.0123456789=?@ABCDEFGHIJKLMNO"
282 "PQRSTUVWXYZ[]^_`abcdefghijklmnopqrstuvwx"
283 "yz{}~";
284
285 /*
286  *  Converts a base85 encoded guid into a GUID pointer
287  *  Base85 encoded GUIDs should be 20 characters long.
288  *
289  *  returns TRUE if successful, FALSE if not
290  */
291 BOOL decode_base85_guid( LPCWSTR str, GUID *guid )
292 {
293     DWORD i, val = 0, base = 1, *p;
294
295     if (!str)
296         return FALSE;
297
298     p = (DWORD*) guid;
299     for( i=0; i<20; i++ )
300     {
301         if( (i%5) == 0 )
302         {
303             val = 0;
304             base = 1;
305         }
306         val += table_dec85[str[i]] * base;
307         if( str[i] >= 0x80 )
308             return FALSE;
309         if( table_dec85[str[i]] == 0xff )
310             return FALSE;
311         if( (i%5) == 4 )
312             p[i/5] = val;
313         base *= 85;
314     }
315     return TRUE;
316 }
317
318 /*
319  *  Encodes a base85 guid given a GUID pointer
320  *  Caller should provide a 21 character buffer for the encoded string.
321  *
322  *  returns TRUE if successful, FALSE if not
323  */
324 BOOL encode_base85_guid( GUID *guid, LPWSTR str )
325 {
326     unsigned int x, *p, i;
327
328     p = (unsigned int*) guid;
329     for( i=0; i<4; i++ )
330     {
331         x = p[i];
332         *str++ = table_enc85[x%85];
333         x = x/85;
334         *str++ = table_enc85[x%85];
335         x = x/85;
336         *str++ = table_enc85[x%85];
337         x = x/85;
338         *str++ = table_enc85[x%85];
339         x = x/85;
340         *str++ = table_enc85[x%85];
341     }
342     *str = 0;
343
344     return TRUE;
345 }
346
347 DWORD msi_version_str_to_dword(LPCWSTR p)
348 {
349     DWORD major, minor = 0, build = 0, version = 0;
350
351     if (!p)
352         return version;
353
354     major = atoiW(p);
355
356     p = strchrW(p, '.');
357     if (p)
358     {
359         minor = atoiW(p+1);
360         p = strchrW(p+1, '.');
361         if (p)
362             build = atoiW(p+1);
363     }
364
365     return MAKELONG(build, MAKEWORD(minor, major));
366 }
367
368 LONG msi_reg_set_val_str( HKEY hkey, LPCWSTR name, LPCWSTR value )
369 {
370     DWORD len;
371     if (!value) value = szEmpty;
372     len = (lstrlenW(value) + 1) * sizeof (WCHAR);
373     return RegSetValueExW( hkey, name, 0, REG_SZ, (const BYTE *)value, len );
374 }
375
376 LONG msi_reg_set_val_multi_str( HKEY hkey, LPCWSTR name, LPCWSTR value )
377 {
378     LPCWSTR p = value;
379     while (*p) p += lstrlenW(p) + 1;
380     return RegSetValueExW( hkey, name, 0, REG_MULTI_SZ,
381                            (const BYTE *)value, (p + 1 - value) * sizeof(WCHAR) );
382 }
383
384 LONG msi_reg_set_val_dword( HKEY hkey, LPCWSTR name, DWORD val )
385 {
386     return RegSetValueExW( hkey, name, 0, REG_DWORD, (LPBYTE)&val, sizeof (DWORD) );
387 }
388
389 LONG msi_reg_set_subkey_val( HKEY hkey, LPCWSTR path, LPCWSTR name, LPCWSTR val )
390 {
391     HKEY hsubkey = 0;
392     LONG r;
393
394     r = RegCreateKeyW( hkey, path, &hsubkey );
395     if (r != ERROR_SUCCESS)
396         return r;
397     r = msi_reg_set_val_str( hsubkey, name, val );
398     RegCloseKey( hsubkey );
399     return r;
400 }
401
402 LPWSTR msi_reg_get_val_str( HKEY hkey, LPCWSTR name )
403 {
404     DWORD len = 0;
405     LPWSTR val;
406     LONG r;
407
408     r = RegQueryValueExW(hkey, name, NULL, NULL, NULL, &len);
409     if (r != ERROR_SUCCESS)
410         return NULL;
411
412     len += sizeof (WCHAR);
413     val = msi_alloc( len );
414     if (!val)
415         return NULL;
416     val[0] = 0;
417     RegQueryValueExW(hkey, name, NULL, NULL, (LPBYTE) val, &len);
418     return val;
419 }
420
421 BOOL msi_reg_get_val_dword( HKEY hkey, LPCWSTR name, DWORD *val)
422 {
423     DWORD type, len = sizeof (DWORD);
424     LONG r = RegQueryValueExW(hkey, name, NULL, &type, (LPBYTE) val, &len);
425     return r == ERROR_SUCCESS && type == REG_DWORD;
426 }
427
428 static WCHAR *get_user_sid(void)
429 {
430     HANDLE token;
431     DWORD size = 256;
432     TOKEN_USER *user;
433     WCHAR *ret;
434
435     if (!OpenProcessToken( GetCurrentProcess(), TOKEN_QUERY, &token )) return NULL;
436     if (!(user = msi_alloc( size )))
437     {
438         CloseHandle( token );
439         return NULL;
440     }
441     if (!GetTokenInformation( token, TokenUser, user, size, &size ))
442     {
443         msi_free( user );
444         if (GetLastError() != ERROR_INSUFFICIENT_BUFFER || !(user = msi_alloc( size )))
445         {
446             CloseHandle( token );
447             return NULL;
448         }
449         GetTokenInformation( token, TokenUser, user, size, &size );
450     }
451     CloseHandle( token );
452     if (!ConvertSidToStringSidW( user->User.Sid, &ret ))
453     {
454         msi_free( user );
455         return NULL;
456     }
457     msi_free( user );
458     return ret;
459 }
460
461 UINT MSIREG_OpenUninstallKey(const WCHAR *product, enum platform platform, HKEY *key, BOOL create)
462 {
463     WCHAR keypath[0x200];
464
465     TRACE("%s\n", debugstr_w(product));
466
467     if (is_64bit && platform == PLATFORM_INTEL)
468     {
469         strcpyW(keypath, szUninstall_32node);
470         strcatW(keypath, product);
471     }
472     else
473     {
474         strcpyW(keypath, szUninstall);
475         strcatW(keypath, product);
476     }
477     if (create) return RegCreateKeyExW(HKEY_LOCAL_MACHINE, keypath, 0, NULL, 0, KEY_ALL_ACCESS, NULL, key, NULL);
478     return RegOpenKeyExW(HKEY_LOCAL_MACHINE, keypath, 0, KEY_ALL_ACCESS, key);
479 }
480
481 UINT MSIREG_DeleteUninstallKey(const WCHAR *product, enum platform platform)
482 {
483     WCHAR keypath[0x200];
484
485     TRACE("%s\n", debugstr_w(product));
486
487     if (is_64bit && platform == PLATFORM_INTEL)
488     {
489         strcpyW(keypath, szUninstall_32node);
490         strcatW(keypath, product);
491     }
492     else
493     {
494         strcpyW(keypath, szUninstall);
495         strcatW(keypath, product);
496     }
497     return RegDeleteTreeW(HKEY_LOCAL_MACHINE, keypath);
498 }
499
500 UINT MSIREG_OpenProductKey(LPCWSTR szProduct, LPCWSTR szUserSid, MSIINSTALLCONTEXT context, HKEY *key, BOOL create)
501 {
502     LPWSTR usersid = NULL;
503     HKEY root = HKEY_LOCAL_MACHINE;
504     REGSAM access = KEY_WOW64_64KEY | KEY_ALL_ACCESS;
505     WCHAR squished_pc[GUID_SIZE], keypath[MAX_PATH];
506
507     if (!squash_guid(szProduct, squished_pc)) return ERROR_FUNCTION_FAILED;
508     TRACE("%s squished %s\n", debugstr_w(szProduct), debugstr_w(squished_pc));
509
510     if (context == MSIINSTALLCONTEXT_MACHINE)
511     {
512         strcpyW(keypath, szInstaller_LocalClassesProd);
513         strcatW(keypath, squished_pc);
514     }
515     else if (context == MSIINSTALLCONTEXT_USERUNMANAGED)
516     {
517         root = HKEY_CURRENT_USER;
518         strcpyW(keypath, szUserProducts);
519         strcatW(keypath, squished_pc);
520     }
521     else
522     {
523         if (!szUserSid)
524         {
525             if (!(usersid = get_user_sid()))
526             {
527                 ERR("Failed to retrieve user SID\n");
528                 return ERROR_FUNCTION_FAILED;
529             }
530             szUserSid = usersid;
531         }
532         sprintfW(keypath, szInstaller_LocalManagedProd_fmt, szUserSid, squished_pc);
533         LocalFree(usersid);
534     }
535     if (create) return RegCreateKeyExW(root, keypath, 0, NULL, 0, access, NULL, key, NULL);
536     return RegOpenKeyExW(root, keypath, 0, access, key);
537 }
538
539 UINT MSIREG_DeleteUserProductKey(LPCWSTR szProduct)
540 {
541     WCHAR squished_pc[GUID_SIZE], keypath[0x200];
542
543     if (!squash_guid(szProduct, squished_pc)) return ERROR_FUNCTION_FAILED;
544     TRACE("%s squished %s\n", debugstr_w(szProduct), debugstr_w(squished_pc));
545
546     strcpyW(keypath, szUserProducts);
547     strcatW(keypath, squished_pc);
548     return RegDeleteTreeW(HKEY_CURRENT_USER, keypath);
549 }
550
551 UINT MSIREG_OpenUserPatchesKey(LPCWSTR szPatch, HKEY *key, BOOL create)
552 {
553     WCHAR squished_pc[GUID_SIZE], keypath[0x200];
554
555     if (!squash_guid(szPatch, squished_pc)) return ERROR_FUNCTION_FAILED;
556     TRACE("%s squished %s\n", debugstr_w(szPatch), debugstr_w(squished_pc));
557
558     strcpyW(keypath, szUserPatches);
559     strcatW(keypath, squished_pc);
560
561     if (create) return RegCreateKeyW(HKEY_CURRENT_USER, keypath, key);
562     return RegOpenKeyW(HKEY_CURRENT_USER, keypath, key);
563 }
564
565 UINT MSIREG_OpenFeaturesKey(LPCWSTR szProduct, MSIINSTALLCONTEXT context, HKEY *key, BOOL create)
566 {
567     LPWSTR usersid;
568     HKEY root = HKEY_LOCAL_MACHINE;
569     REGSAM access = KEY_WOW64_64KEY | KEY_ALL_ACCESS;
570     WCHAR squished_pc[GUID_SIZE], keypath[MAX_PATH];
571
572     if (!squash_guid(szProduct, squished_pc)) return ERROR_FUNCTION_FAILED;
573     TRACE("%s squished %s\n", debugstr_w(szProduct), debugstr_w(squished_pc));
574
575     if (context == MSIINSTALLCONTEXT_MACHINE)
576     {
577         strcpyW(keypath, szInstaller_LocalClassesFeat);
578         strcatW(keypath, squished_pc);
579     }
580     else if (context == MSIINSTALLCONTEXT_USERUNMANAGED)
581     {
582         root = HKEY_CURRENT_USER;
583         strcpyW(keypath, szUserFeatures);
584         strcatW(keypath, squished_pc);
585     }
586     else
587     {
588         if (!(usersid = get_user_sid()))
589         {
590             ERR("Failed to retrieve user SID\n");
591             return ERROR_FUNCTION_FAILED;
592         }
593         sprintfW(keypath, szInstaller_LocalManagedFeat_fmt, usersid, squished_pc);
594         LocalFree(usersid);
595     }
596     if (create) return RegCreateKeyExW(root, keypath, 0, NULL, 0, access, NULL, key, NULL);
597     return RegOpenKeyExW(root, keypath, 0, access, key);
598 }
599
600 UINT MSIREG_DeleteUserFeaturesKey(LPCWSTR szProduct)
601 {
602     WCHAR squished_pc[GUID_SIZE], keypath[0x200];
603
604     if (!squash_guid(szProduct, squished_pc)) return ERROR_FUNCTION_FAILED;
605     TRACE("%s squished %s\n", debugstr_w(szProduct), debugstr_w(squished_pc));
606
607     strcpyW(keypath, szUserFeatures);
608     strcatW(keypath, squished_pc);
609     return RegDeleteTreeW(HKEY_CURRENT_USER, keypath);
610 }
611
612 static UINT MSIREG_OpenInstallerFeaturesKey(LPCWSTR szProduct, HKEY *key, BOOL create)
613 {
614     REGSAM access = KEY_WOW64_64KEY | KEY_ALL_ACCESS;
615     WCHAR squished_pc[GUID_SIZE], keypath[0x200];
616
617     if (!squash_guid(szProduct, squished_pc)) return ERROR_FUNCTION_FAILED;
618     TRACE("%s squished %s\n", debugstr_w(szProduct), debugstr_w(squished_pc));
619
620     strcpyW(keypath, szInstaller_Features);
621     strcatW(keypath, squished_pc);
622
623     if (create) return RegCreateKeyExW(HKEY_LOCAL_MACHINE, keypath, 0, NULL, 0, access, NULL, key, NULL);
624     return RegOpenKeyExW(HKEY_LOCAL_MACHINE, keypath, 0, access, key);
625 }
626
627 UINT MSIREG_OpenUserDataFeaturesKey(LPCWSTR szProduct, MSIINSTALLCONTEXT context, HKEY *key, BOOL create)
628 {
629     LPWSTR usersid;
630     REGSAM access = KEY_WOW64_64KEY | KEY_ALL_ACCESS;
631     WCHAR squished_pc[GUID_SIZE], keypath[0x200];
632
633     if (!squash_guid(szProduct, squished_pc)) return ERROR_FUNCTION_FAILED;
634     TRACE("%s squished %s\n", debugstr_w(szProduct), debugstr_w(squished_pc));
635
636     if (context == MSIINSTALLCONTEXT_MACHINE)
637     {
638         sprintfW(keypath, szUserDataFeatures_fmt, szLocalSid, squished_pc);
639     }
640     else
641     {
642         if (!(usersid = get_user_sid()))
643         {
644             ERR("Failed to retrieve user SID\n");
645             return ERROR_FUNCTION_FAILED;
646         }
647         sprintfW(keypath, szUserDataFeatures_fmt, usersid, squished_pc);
648         LocalFree(usersid);
649     }
650     if (create) return RegCreateKeyExW(HKEY_LOCAL_MACHINE, keypath, 0, NULL, 0, access, NULL, key, NULL);
651     return RegOpenKeyExW(HKEY_LOCAL_MACHINE, keypath, 0, access, key);
652 }
653
654 UINT MSIREG_OpenUserComponentsKey(LPCWSTR szComponent, HKEY *key, BOOL create)
655 {
656     WCHAR squished_cc[GUID_SIZE], keypath[0x200];
657
658     if (!squash_guid(szComponent, squished_cc)) return ERROR_FUNCTION_FAILED;
659     TRACE("%s squished %s\n", debugstr_w(szComponent), debugstr_w(squished_cc));
660
661     strcpyW(keypath, szUserComponents);
662     strcatW(keypath, squished_cc);
663
664     if (create) return RegCreateKeyW(HKEY_CURRENT_USER, keypath, key);
665     return RegOpenKeyW(HKEY_CURRENT_USER, keypath, key);
666 }
667
668 UINT MSIREG_OpenUserDataComponentKey(LPCWSTR szComponent, LPCWSTR szUserSid, HKEY *key, BOOL create)
669 {
670     REGSAM access = KEY_WOW64_64KEY | KEY_ALL_ACCESS;
671     WCHAR comp[GUID_SIZE], keypath[0x200];
672     LPWSTR usersid;
673
674     if (!squash_guid(szComponent, comp)) return ERROR_FUNCTION_FAILED;
675     TRACE("%s squished %s\n", debugstr_w(szComponent), debugstr_w(comp));
676
677     if (!szUserSid)
678     {
679         if (!(usersid = get_user_sid()))
680         {
681             ERR("Failed to retrieve user SID\n");
682             return ERROR_FUNCTION_FAILED;
683         }
684         sprintfW(keypath, szUserDataComp_fmt, usersid, comp);
685         LocalFree(usersid);
686     }
687     else
688         sprintfW(keypath, szUserDataComp_fmt, szUserSid, comp);
689
690     if (create) return RegCreateKeyExW(HKEY_LOCAL_MACHINE, keypath, 0, NULL, 0, access, NULL, key, NULL);
691     return RegOpenKeyExW(HKEY_LOCAL_MACHINE, keypath, 0, access, key);
692 }
693
694 UINT MSIREG_DeleteUserDataComponentKey(LPCWSTR szComponent, LPCWSTR szUserSid)
695 {
696     REGSAM access = KEY_WOW64_64KEY | KEY_ALL_ACCESS;
697     WCHAR comp[GUID_SIZE], keypath[0x200];
698     LPWSTR usersid;
699     HKEY hkey;
700     LONG r;
701
702     if (!squash_guid(szComponent, comp)) return ERROR_FUNCTION_FAILED;
703     TRACE("%s squished %s\n", debugstr_w(szComponent), debugstr_w(comp));
704
705     if (!szUserSid)
706     {
707         if (!(usersid = get_user_sid()))
708         {
709             ERR("Failed to retrieve user SID\n");
710             return ERROR_FUNCTION_FAILED;
711         }
712         sprintfW(keypath, szUserDataComponents_fmt, usersid);
713         LocalFree(usersid);
714     }
715     else
716         sprintfW(keypath, szUserDataComponents_fmt, szUserSid);
717
718     if (RegOpenKeyExW(HKEY_LOCAL_MACHINE, keypath, 0, access, &hkey)) return ERROR_SUCCESS;
719     r = RegDeleteTreeW(hkey, comp);
720     RegCloseKey(hkey);
721     return r;
722 }
723
724 UINT MSIREG_OpenUserDataProductKey(LPCWSTR szProduct, MSIINSTALLCONTEXT dwContext, LPCWSTR szUserSid, HKEY *key, BOOL create)
725 {
726     REGSAM access = KEY_WOW64_64KEY | KEY_ALL_ACCESS;
727     WCHAR squished_pc[GUID_SIZE], keypath[0x200];
728     LPWSTR usersid;
729
730     if (!squash_guid(szProduct, squished_pc)) return ERROR_FUNCTION_FAILED;
731     TRACE("%s squished %s\n", debugstr_w(szProduct), debugstr_w(squished_pc));
732
733     if (dwContext == MSIINSTALLCONTEXT_MACHINE)
734         sprintfW(keypath, szUserDataProd_fmt, szLocalSid, squished_pc);
735     else if (szUserSid)
736         sprintfW(keypath, szUserDataProd_fmt, szUserSid, squished_pc);
737     else
738     {
739         if (!(usersid = get_user_sid()))
740         {
741             ERR("Failed to retrieve user SID\n");
742             return ERROR_FUNCTION_FAILED;
743         }
744         sprintfW(keypath, szUserDataProd_fmt, usersid, squished_pc);
745         LocalFree(usersid);
746     }
747     if (create) return RegCreateKeyExW(HKEY_LOCAL_MACHINE, keypath, 0, NULL, 0, access, NULL, key, NULL);
748     return RegOpenKeyExW(HKEY_LOCAL_MACHINE, keypath, 0, access, key);
749 }
750
751 UINT MSIREG_OpenUserDataPatchKey(LPCWSTR szPatch, MSIINSTALLCONTEXT dwContext, HKEY *key, BOOL create)
752 {
753     REGSAM access = KEY_WOW64_64KEY | KEY_ALL_ACCESS;
754     WCHAR squished_patch[GUID_SIZE], keypath[0x200];
755     LPWSTR usersid;
756
757     if (!squash_guid(szPatch, squished_patch)) return ERROR_FUNCTION_FAILED;
758     TRACE("%s squished %s\n", debugstr_w(szPatch), debugstr_w(squished_patch));
759
760     if (dwContext == MSIINSTALLCONTEXT_MACHINE)
761         sprintfW(keypath, szUserDataPatch_fmt, szLocalSid, squished_patch);
762     else
763     {
764         if (!(usersid = get_user_sid()))
765         {
766             ERR("Failed to retrieve user SID\n");
767             return ERROR_FUNCTION_FAILED;
768         }
769         sprintfW(keypath, szUserDataPatch_fmt, usersid, squished_patch);
770         LocalFree(usersid);
771     }
772     if (create) return RegCreateKeyExW(HKEY_LOCAL_MACHINE, keypath, 0, NULL, 0, access, NULL, key, NULL);
773     return RegOpenKeyExW(HKEY_LOCAL_MACHINE, keypath, 0, access, key);
774 }
775
776 UINT MSIREG_DeleteUserDataPatchKey(LPCWSTR patch, MSIINSTALLCONTEXT context)
777 {
778     REGSAM access = KEY_WOW64_64KEY | KEY_ALL_ACCESS;
779     WCHAR squished_patch[GUID_SIZE], keypath[0x200];
780     LPWSTR usersid;
781     HKEY hkey;
782     LONG r;
783
784     if (!squash_guid(patch, squished_patch)) return ERROR_FUNCTION_FAILED;
785     TRACE("%s squished %s\n", debugstr_w(patch), debugstr_w(squished_patch));
786
787     if (context == MSIINSTALLCONTEXT_MACHINE)
788         sprintfW(keypath, szUserDataPatches_fmt, szLocalSid);
789     else
790     {
791         if (!(usersid = get_user_sid()))
792         {
793             ERR("Failed to retrieve user SID\n");
794             return ERROR_FUNCTION_FAILED;
795         }
796         sprintfW(keypath, szUserDataPatches_fmt, usersid);
797         LocalFree(usersid);
798     }
799     if (RegOpenKeyExW(HKEY_LOCAL_MACHINE, keypath, 0, access, &hkey)) return ERROR_SUCCESS;
800     r = RegDeleteTreeW(hkey, squished_patch);
801     RegCloseKey(hkey);
802     return r;
803 }
804
805 UINT MSIREG_OpenUserDataProductPatchesKey(LPCWSTR product, MSIINSTALLCONTEXT context, HKEY *key, BOOL create)
806 {
807     REGSAM access = KEY_WOW64_64KEY | KEY_ALL_ACCESS;
808     WCHAR squished_product[GUID_SIZE], keypath[0x200];
809     LPWSTR usersid;
810
811     if (!squash_guid(product, squished_product)) return ERROR_FUNCTION_FAILED;
812     TRACE("%s squished %s\n", debugstr_w(product), debugstr_w(squished_product));
813
814     if (context == MSIINSTALLCONTEXT_MACHINE)
815         sprintfW(keypath, szUserDataProductPatches_fmt, szLocalSid, squished_product);
816     else
817     {
818         if (!(usersid = get_user_sid()))
819         {
820             ERR("Failed to retrieve user SID\n");
821             return ERROR_FUNCTION_FAILED;
822         }
823         sprintfW(keypath, szUserDataProductPatches_fmt, usersid, squished_product);
824         LocalFree(usersid);
825     }
826     if (create) return RegCreateKeyExW(HKEY_LOCAL_MACHINE, keypath, 0, NULL, 0, access, NULL, key, NULL);
827     return RegOpenKeyExW(HKEY_LOCAL_MACHINE, keypath, 0, access, key);
828 }
829
830 UINT MSIREG_OpenInstallProps(LPCWSTR szProduct, MSIINSTALLCONTEXT dwContext, LPCWSTR szUserSid, HKEY *key, BOOL create)
831 {
832     LPWSTR usersid;
833     REGSAM access = KEY_WOW64_64KEY | KEY_ALL_ACCESS;
834     WCHAR squished_pc[GUID_SIZE], keypath[0x200];
835
836     if (!squash_guid(szProduct, squished_pc)) return ERROR_FUNCTION_FAILED;
837     TRACE("%s squished %s\n", debugstr_w(szProduct), debugstr_w(squished_pc));
838
839     if (dwContext == MSIINSTALLCONTEXT_MACHINE)
840         sprintfW(keypath, szInstallProperties_fmt, szLocalSid, squished_pc);
841     else if (szUserSid)
842         sprintfW(keypath, szInstallProperties_fmt, szUserSid, squished_pc);
843     else
844     {
845         if (!(usersid = get_user_sid()))
846         {
847             ERR("Failed to retrieve user SID\n");
848             return ERROR_FUNCTION_FAILED;
849         }
850         sprintfW(keypath, szInstallProperties_fmt, usersid, squished_pc);
851         LocalFree(usersid);
852     }
853     if (create) return RegCreateKeyExW(HKEY_LOCAL_MACHINE, keypath, 0, NULL, 0, access, NULL, key, NULL);
854     return RegOpenKeyExW(HKEY_LOCAL_MACHINE, keypath, 0, access, key);
855 }
856
857 UINT MSIREG_DeleteUserDataProductKey(LPCWSTR szProduct)
858 {
859     REGSAM access = KEY_WOW64_64KEY | KEY_ALL_ACCESS;
860     WCHAR squished_pc[GUID_SIZE], keypath[0x200];
861     LPWSTR usersid;
862     HKEY hkey;
863     LONG r;
864
865     if (!squash_guid(szProduct, squished_pc)) return ERROR_FUNCTION_FAILED;
866     TRACE("%s squished %s\n", debugstr_w(szProduct), debugstr_w(squished_pc));
867
868     if (!(usersid = get_user_sid()))
869     {
870         ERR("Failed to retrieve user SID\n");
871         return ERROR_FUNCTION_FAILED;
872     }
873     sprintfW(keypath, szUserDataProducts_fmt, usersid);
874     LocalFree(usersid);
875
876     if (RegOpenKeyExW(HKEY_LOCAL_MACHINE, keypath, 0, access, &hkey)) return ERROR_SUCCESS;
877     r = RegDeleteTreeW(hkey, squished_pc);
878     RegCloseKey(hkey);
879     return r;
880 }
881
882 UINT MSIREG_DeleteProductKey(LPCWSTR szProduct)
883 {
884     REGSAM access = KEY_WOW64_64KEY | KEY_ALL_ACCESS;
885     WCHAR squished_pc[GUID_SIZE];
886     HKEY hkey;
887     LONG r;
888
889     if (!squash_guid(szProduct, squished_pc)) return ERROR_FUNCTION_FAILED;
890     TRACE("%s squished %s\n", debugstr_w(szProduct), debugstr_w(squished_pc));
891
892     if (RegOpenKeyExW(HKEY_LOCAL_MACHINE, szInstaller_Products, 0, access, &hkey)) return ERROR_SUCCESS;
893     r = RegDeleteTreeW(hkey, squished_pc);
894     RegCloseKey(hkey);
895     return r;
896 }
897
898 UINT MSIREG_OpenPatchesKey(LPCWSTR szPatch, HKEY *key, BOOL create)
899 {
900     REGSAM access = KEY_WOW64_64KEY | KEY_ALL_ACCESS;
901     WCHAR squished_pc[GUID_SIZE], keypath[0x200];
902
903     if (!squash_guid(szPatch, squished_pc)) return ERROR_FUNCTION_FAILED;
904     TRACE("%s squished %s\n", debugstr_w(szPatch), debugstr_w(squished_pc));
905
906     sprintfW(keypath, szInstaller_Patches, squished_pc);
907
908     if (create) return RegCreateKeyExW(HKEY_LOCAL_MACHINE, keypath, 0, NULL, 0, access, NULL, key, NULL);
909     return RegOpenKeyExW(HKEY_LOCAL_MACHINE, keypath, 0, access, key);
910 }
911
912 UINT MSIREG_OpenUpgradeCodesKey(LPCWSTR szUpgradeCode, HKEY *key, BOOL create)
913 {
914     REGSAM access = KEY_WOW64_64KEY | KEY_ALL_ACCESS;
915     WCHAR squished_pc[GUID_SIZE], keypath[0x200];
916
917     if (!squash_guid(szUpgradeCode, squished_pc)) return ERROR_FUNCTION_FAILED;
918     TRACE("%s squished %s\n", debugstr_w(szUpgradeCode), debugstr_w(squished_pc));
919
920     strcpyW(keypath, szInstaller_UpgradeCodes);
921     strcatW(keypath, squished_pc);
922
923     if (create) return RegCreateKeyExW(HKEY_LOCAL_MACHINE, keypath, 0, NULL, 0, access, NULL, key, NULL);
924     return RegOpenKeyExW(HKEY_LOCAL_MACHINE, keypath, 0, access, key);
925 }
926
927 UINT MSIREG_OpenUserUpgradeCodesKey(LPCWSTR szUpgradeCode, HKEY* key, BOOL create)
928 {
929     WCHAR squished_pc[GUID_SIZE], keypath[0x200];
930
931     if (!squash_guid(szUpgradeCode, squished_pc)) return ERROR_FUNCTION_FAILED;
932     TRACE("%s squished %s\n", debugstr_w(szUpgradeCode), debugstr_w(squished_pc));
933
934     strcpyW(keypath, szInstaller_UserUpgradeCodes);
935     strcatW(keypath, squished_pc);
936
937     if (create) return RegCreateKeyW(HKEY_CURRENT_USER, keypath, key);
938     return RegOpenKeyW(HKEY_CURRENT_USER, keypath, key);
939 }
940
941 UINT MSIREG_DeleteUserUpgradeCodesKey(LPCWSTR szUpgradeCode)
942 {
943     WCHAR squished_pc[GUID_SIZE], keypath[0x200];
944
945     if (!squash_guid(szUpgradeCode, squished_pc)) return ERROR_FUNCTION_FAILED;
946     TRACE("%s squished %s\n", debugstr_w(szUpgradeCode), debugstr_w(squished_pc));
947
948     strcpyW(keypath, szInstaller_UserUpgradeCodes);
949     strcatW(keypath, squished_pc);
950     return RegDeleteTreeW(HKEY_CURRENT_USER, keypath);
951 }
952
953 UINT MSIREG_DeleteLocalClassesProductKey(LPCWSTR szProductCode)
954 {
955     REGSAM access = KEY_WOW64_64KEY | KEY_ALL_ACCESS;
956     WCHAR squished_pc[GUID_SIZE];
957     HKEY hkey;
958     LONG r;
959
960     if (!squash_guid(szProductCode, squished_pc)) return ERROR_FUNCTION_FAILED;
961     TRACE("%s squished %s\n", debugstr_w(szProductCode), debugstr_w(squished_pc));
962
963     if (RegOpenKeyExW(HKEY_LOCAL_MACHINE, szInstaller_LocalClassesProducts, 0, access, &hkey)) return ERROR_SUCCESS;
964     r = RegDeleteTreeW(hkey, squished_pc);
965     RegCloseKey(hkey);
966     return r;
967 }
968
969 UINT MSIREG_DeleteLocalClassesFeaturesKey(LPCWSTR szProductCode)
970 {
971     REGSAM access = KEY_WOW64_64KEY | KEY_ALL_ACCESS;
972     WCHAR squished_pc[GUID_SIZE];
973     HKEY hkey;
974     LONG r;
975
976     if (!squash_guid(szProductCode, squished_pc)) return ERROR_FUNCTION_FAILED;
977     TRACE("%s squished %s\n", debugstr_w(szProductCode), debugstr_w(squished_pc));
978
979     if (RegOpenKeyExW(HKEY_LOCAL_MACHINE, szInstaller_LocalClassesFeatures, 0, access, &hkey)) return ERROR_SUCCESS;
980     r = RegDeleteTreeW(hkey, squished_pc);
981     RegCloseKey(hkey);
982     return r;
983 }
984
985 UINT MSIREG_OpenClassesUpgradeCodesKey(LPCWSTR szUpgradeCode, HKEY *key, BOOL create)
986 {
987     REGSAM access = KEY_WOW64_64KEY | KEY_ALL_ACCESS;
988     WCHAR squished_pc[GUID_SIZE], keypath[0x200];
989
990     if (!squash_guid(szUpgradeCode, squished_pc)) return ERROR_FUNCTION_FAILED;
991     TRACE("%s squished %s\n", debugstr_w(szUpgradeCode), debugstr_w(squished_pc));
992
993     strcpyW(keypath, szInstaller_ClassesUpgradeCode);
994     strcatW(keypath, squished_pc);
995
996     if (create) return RegCreateKeyExW(HKEY_LOCAL_MACHINE, keypath, 0, NULL, 0, access, NULL, key, NULL);
997     return RegOpenKeyExW(HKEY_LOCAL_MACHINE, keypath, 0, access, key);
998 }
999
1000 UINT MSIREG_DeleteClassesUpgradeCodesKey(LPCWSTR szUpgradeCode)
1001 {
1002     REGSAM access = KEY_WOW64_64KEY | KEY_ALL_ACCESS;
1003     WCHAR squished_pc[GUID_SIZE];
1004     HKEY hkey;
1005     LONG r;
1006
1007     if (!squash_guid(szUpgradeCode, squished_pc)) return ERROR_FUNCTION_FAILED;
1008     TRACE("%s squished %s\n", debugstr_w(szUpgradeCode), debugstr_w(squished_pc));
1009
1010     if (RegOpenKeyExW(HKEY_LOCAL_MACHINE, szInstaller_ClassesUpgradeCodes, 0, access, &hkey)) return ERROR_SUCCESS;
1011     r = RegDeleteTreeW(hkey, squished_pc);
1012     RegCloseKey(hkey);
1013     return r;
1014 }
1015
1016 /*************************************************************************
1017  *  MsiDecomposeDescriptorW   [MSI.@]
1018  *
1019  * Decomposes an MSI descriptor into product, feature and component parts.
1020  * An MSI descriptor is a string of the form:
1021  *   [base 85 guid] [feature code] '>' [base 85 guid]
1022  *
1023  * PARAMS
1024  *   szDescriptor  [I]  the descriptor to decompose
1025  *   szProduct     [O]  buffer of MAX_FEATURE_CHARS+1 for the product guid
1026  *   szFeature     [O]  buffer of MAX_FEATURE_CHARS+1 for the feature code
1027  *   szComponent   [O]  buffer of MAX_FEATURE_CHARS+1 for the component guid
1028  *   pUsed         [O]  the length of the descriptor
1029  *
1030  * RETURNS
1031  *   ERROR_SUCCESS             if everything worked correctly
1032  *   ERROR_INVALID_PARAMETER   if the descriptor was invalid
1033  *
1034  */
1035 UINT WINAPI MsiDecomposeDescriptorW( LPCWSTR szDescriptor, LPWSTR szProduct,
1036                 LPWSTR szFeature, LPWSTR szComponent, LPDWORD pUsed )
1037 {
1038     UINT r, len;
1039     LPWSTR p;
1040     GUID product, component;
1041
1042     TRACE("%s %p %p %p %p\n", debugstr_w(szDescriptor), szProduct,
1043           szFeature, szComponent, pUsed);
1044
1045     r = decode_base85_guid( szDescriptor, &product );
1046     if( !r )
1047         return ERROR_INVALID_PARAMETER;
1048
1049     TRACE("product %s\n", debugstr_guid( &product ));
1050
1051     p = strchrW(&szDescriptor[20],'>');
1052     if( !p )
1053         return ERROR_INVALID_PARAMETER;
1054
1055     len = (p - &szDescriptor[20]);
1056     if( len > MAX_FEATURE_CHARS )
1057         return ERROR_INVALID_PARAMETER;
1058
1059     TRACE("feature %s\n", debugstr_wn( &szDescriptor[20], len ));
1060
1061     r = decode_base85_guid( p+1, &component );
1062     if( !r )
1063         return ERROR_INVALID_PARAMETER;
1064
1065     TRACE("component %s\n", debugstr_guid( &component ));
1066
1067     if (szProduct)
1068         StringFromGUID2( &product, szProduct, MAX_FEATURE_CHARS+1 );
1069     if (szComponent)
1070         StringFromGUID2( &component, szComponent, MAX_FEATURE_CHARS+1 );
1071     if (szFeature)
1072     {
1073         memcpy( szFeature, &szDescriptor[20], len*sizeof(WCHAR) );
1074         szFeature[len] = 0;
1075     }
1076     len = ( &p[21] - szDescriptor );
1077
1078     TRACE("length = %d\n", len);
1079     if (pUsed) *pUsed = len;
1080
1081     return ERROR_SUCCESS;
1082 }
1083
1084 UINT WINAPI MsiDecomposeDescriptorA( LPCSTR szDescriptor, LPSTR szProduct,
1085                 LPSTR szFeature, LPSTR szComponent, LPDWORD pUsed )
1086 {
1087     WCHAR product[MAX_FEATURE_CHARS+1];
1088     WCHAR feature[MAX_FEATURE_CHARS+1];
1089     WCHAR component[MAX_FEATURE_CHARS+1];
1090     LPWSTR str = NULL, p = NULL, f = NULL, c = NULL;
1091     UINT r;
1092
1093     TRACE("%s %p %p %p %p\n", debugstr_a(szDescriptor), szProduct,
1094           szFeature, szComponent, pUsed);
1095
1096     str = strdupAtoW( szDescriptor );
1097     if( szDescriptor && !str )
1098         return ERROR_OUTOFMEMORY;
1099
1100     if (szProduct)
1101         p = product;
1102     if (szFeature)
1103         f = feature;
1104     if (szComponent)
1105         c = component;
1106
1107     r = MsiDecomposeDescriptorW( str, p, f, c, pUsed );
1108
1109     if (r == ERROR_SUCCESS)
1110     {
1111         WideCharToMultiByte( CP_ACP, 0, p, -1,
1112                              szProduct, MAX_FEATURE_CHARS+1, NULL, NULL );
1113         WideCharToMultiByte( CP_ACP, 0, f, -1,
1114                              szFeature, MAX_FEATURE_CHARS+1, NULL, NULL );
1115         WideCharToMultiByte( CP_ACP, 0, c, -1,
1116                              szComponent, MAX_FEATURE_CHARS+1, NULL, NULL );
1117     }
1118
1119     msi_free( str );
1120
1121     return r;
1122 }
1123
1124 UINT WINAPI MsiEnumProductsA(DWORD index, LPSTR lpguid)
1125 {
1126     DWORD r;
1127     WCHAR szwGuid[GUID_SIZE];
1128
1129     TRACE("%d %p\n", index, lpguid);
1130
1131     if (NULL == lpguid)
1132         return ERROR_INVALID_PARAMETER;
1133     r = MsiEnumProductsW(index, szwGuid);
1134     if( r == ERROR_SUCCESS )
1135         WideCharToMultiByte(CP_ACP, 0, szwGuid, -1, lpguid, GUID_SIZE, NULL, NULL);
1136
1137     return r;
1138 }
1139
1140 UINT WINAPI MsiEnumProductsW(DWORD index, LPWSTR lpguid)
1141 {
1142     static const WCHAR pathW[] = {
1143         'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
1144         'I','n','s','t','a','l','l','e','r','\\','P','r','o','d','u','c','t','s',0};
1145     UINT r;
1146     WCHAR szKeyName[SQUISH_GUID_SIZE];
1147     HKEY key;
1148     REGSAM access = KEY_WOW64_64KEY | KEY_ALL_ACCESS;
1149     DWORD machine_count, managed_count, unmanaged_count;
1150     WCHAR keypath[MAX_PATH];
1151     LPWSTR usersid = NULL;
1152
1153     static DWORD last_index;
1154
1155     TRACE("%d %p\n", index, lpguid);
1156
1157     if (NULL == lpguid)
1158         return ERROR_INVALID_PARAMETER;
1159
1160     if (index && index - last_index != 1)
1161         return ERROR_INVALID_PARAMETER;
1162
1163     key = 0;
1164     r = RegCreateKeyExW(HKEY_LOCAL_MACHINE, szInstaller_LocalClassesProducts, 0, NULL, 0, access, NULL, &key, NULL);
1165     if( r != ERROR_SUCCESS ) goto failed;
1166
1167     r = RegQueryInfoKeyW(key, NULL, NULL, NULL, &machine_count, NULL, NULL,
1168                          NULL, NULL, NULL, NULL, NULL);
1169     if( r != ERROR_SUCCESS ) goto failed;
1170
1171     if (machine_count && index <= machine_count)
1172     {
1173         r = RegEnumKeyW(key, index, szKeyName, SQUISH_GUID_SIZE);
1174         if( r == ERROR_SUCCESS )
1175         {
1176             unsquash_guid(szKeyName, lpguid);
1177             last_index = index;
1178             RegCloseKey(key);
1179             return ERROR_SUCCESS;
1180         }
1181     }
1182     RegCloseKey(key);
1183
1184     key = 0;
1185     if (!(usersid = get_user_sid()))
1186     {
1187         ERR("Failed to retrieve user SID\n");
1188         last_index = 0;
1189         return ERROR_FUNCTION_FAILED;
1190     }
1191     sprintfW(keypath, szInstaller_LocalManaged_fmt, usersid);
1192     LocalFree(usersid);
1193
1194     r = RegCreateKeyExW(HKEY_LOCAL_MACHINE, keypath, 0, NULL, 0, access, NULL, &key, NULL);
1195     if( r != ERROR_SUCCESS ) goto failed;
1196
1197     r = RegQueryInfoKeyW(key, NULL, NULL, NULL, &managed_count, NULL, NULL,
1198                          NULL, NULL, NULL, NULL, NULL);
1199     if( r != ERROR_SUCCESS ) goto failed;
1200
1201     if (managed_count && index <= machine_count + managed_count)
1202     {
1203         r = RegEnumKeyW(key, index - machine_count, szKeyName, SQUISH_GUID_SIZE);
1204         if( r == ERROR_SUCCESS )
1205         {
1206             unsquash_guid(szKeyName, lpguid);
1207             last_index = index;
1208             RegCloseKey(key);
1209             return ERROR_SUCCESS;
1210         }
1211     }
1212     RegCloseKey(key);
1213
1214     key = 0;
1215     r = RegCreateKeyW(HKEY_CURRENT_USER, pathW, &key);
1216     if( r != ERROR_SUCCESS ) goto failed;
1217
1218     r = RegQueryInfoKeyW(key, NULL, NULL, NULL, &unmanaged_count, NULL, NULL,
1219                          NULL, NULL, NULL, NULL, NULL);
1220     if( r != ERROR_SUCCESS ) goto failed;
1221
1222     if (unmanaged_count && index <= machine_count + managed_count + unmanaged_count)
1223     {
1224         r = RegEnumKeyW(key, index - machine_count - managed_count, szKeyName, SQUISH_GUID_SIZE);
1225         if( r == ERROR_SUCCESS )
1226         {
1227             unsquash_guid(szKeyName, lpguid);
1228             last_index = index;
1229             RegCloseKey(key);
1230             return ERROR_SUCCESS;
1231         }
1232     }
1233 failed:
1234     RegCloseKey(key);
1235     last_index = 0;
1236     return ERROR_NO_MORE_ITEMS;
1237 }
1238
1239 UINT WINAPI MsiEnumFeaturesA(LPCSTR szProduct, DWORD index, 
1240       LPSTR szFeature, LPSTR szParent)
1241 {
1242     DWORD r;
1243     WCHAR szwFeature[GUID_SIZE], szwParent[GUID_SIZE];
1244     LPWSTR szwProduct = NULL;
1245
1246     TRACE("%s %d %p %p\n", debugstr_a(szProduct), index, szFeature, szParent);
1247
1248     if( szProduct )
1249     {
1250         szwProduct = strdupAtoW( szProduct );
1251         if( !szwProduct )
1252             return ERROR_OUTOFMEMORY;
1253     }
1254
1255     r = MsiEnumFeaturesW(szwProduct, index, szwFeature, szwParent);
1256     if( r == ERROR_SUCCESS )
1257     {
1258         WideCharToMultiByte(CP_ACP, 0, szwFeature, -1,
1259                             szFeature, GUID_SIZE, NULL, NULL);
1260         WideCharToMultiByte(CP_ACP, 0, szwParent, -1,
1261                             szParent, GUID_SIZE, NULL, NULL);
1262     }
1263
1264     msi_free( szwProduct);
1265
1266     return r;
1267 }
1268
1269 UINT WINAPI MsiEnumFeaturesW(LPCWSTR szProduct, DWORD index, 
1270       LPWSTR szFeature, LPWSTR szParent)
1271 {
1272     HKEY hkeyProduct = 0;
1273     DWORD r, sz;
1274
1275     TRACE("%s %d %p %p\n", debugstr_w(szProduct), index, szFeature, szParent);
1276
1277     if( !szProduct )
1278         return ERROR_INVALID_PARAMETER;
1279
1280     r = MSIREG_OpenInstallerFeaturesKey(szProduct,&hkeyProduct,FALSE);
1281     if( r != ERROR_SUCCESS )
1282         return ERROR_NO_MORE_ITEMS;
1283
1284     sz = GUID_SIZE;
1285     r = RegEnumValueW(hkeyProduct, index, szFeature, &sz, NULL, NULL, NULL, NULL);
1286     RegCloseKey(hkeyProduct);
1287
1288     return r;
1289 }
1290
1291 UINT WINAPI MsiEnumComponentsA(DWORD index, LPSTR lpguid)
1292 {
1293     DWORD r;
1294     WCHAR szwGuid[GUID_SIZE];
1295
1296     TRACE("%d %p\n", index, lpguid);
1297
1298     r = MsiEnumComponentsW(index, szwGuid);
1299     if( r == ERROR_SUCCESS )
1300         WideCharToMultiByte(CP_ACP, 0, szwGuid, -1, lpguid, GUID_SIZE, NULL, NULL);
1301
1302     return r;
1303 }
1304
1305 UINT WINAPI MsiEnumComponentsW(DWORD index, LPWSTR lpguid)
1306 {
1307     HKEY hkey;
1308     REGSAM access = KEY_WOW64_64KEY | KEY_ALL_ACCESS;
1309     WCHAR szKeyName[SQUISH_GUID_SIZE];
1310     DWORD r;
1311
1312     TRACE("%d %p\n", index, lpguid);
1313
1314     r = RegCreateKeyExW(HKEY_LOCAL_MACHINE, szInstaller_Components, 0, NULL, 0, access, NULL, &hkey, NULL);
1315     if( r != ERROR_SUCCESS )
1316         return ERROR_NO_MORE_ITEMS;
1317
1318     r = RegEnumKeyW(hkey, index, szKeyName, SQUISH_GUID_SIZE);
1319     if( r == ERROR_SUCCESS )
1320         unsquash_guid(szKeyName, lpguid);
1321
1322     RegCloseKey(hkey);
1323     return r;
1324 }
1325
1326 UINT WINAPI MsiEnumClientsA(LPCSTR szComponent, DWORD index, LPSTR szProduct)
1327 {
1328     DWORD r;
1329     WCHAR szwProduct[GUID_SIZE];
1330     LPWSTR szwComponent = NULL;
1331
1332     TRACE("%s %d %p\n", debugstr_a(szComponent), index, szProduct);
1333
1334     if ( !szProduct )
1335         return ERROR_INVALID_PARAMETER;
1336
1337     if( szComponent )
1338     {
1339         szwComponent = strdupAtoW( szComponent );
1340         if( !szwComponent )
1341             return ERROR_OUTOFMEMORY;
1342     }
1343
1344     r = MsiEnumClientsW(szComponent?szwComponent:NULL, index, szwProduct);
1345     if( r == ERROR_SUCCESS )
1346     {
1347         WideCharToMultiByte(CP_ACP, 0, szwProduct, -1,
1348                             szProduct, GUID_SIZE, NULL, NULL);
1349     }
1350
1351     msi_free( szwComponent);
1352
1353     return r;
1354 }
1355
1356 UINT WINAPI MsiEnumClientsW(LPCWSTR szComponent, DWORD index, LPWSTR szProduct)
1357 {
1358     HKEY hkeyComp = 0;
1359     DWORD r, sz;
1360     WCHAR szValName[SQUISH_GUID_SIZE];
1361
1362     TRACE("%s %d %p\n", debugstr_w(szComponent), index, szProduct);
1363
1364     if (!szComponent || !*szComponent || !szProduct)
1365         return ERROR_INVALID_PARAMETER;
1366
1367     if (MSIREG_OpenUserDataComponentKey(szComponent, NULL, &hkeyComp, FALSE) != ERROR_SUCCESS &&
1368         MSIREG_OpenUserDataComponentKey(szComponent, szLocalSid, &hkeyComp, FALSE) != ERROR_SUCCESS)
1369         return ERROR_UNKNOWN_COMPONENT;
1370
1371     /* see if there are any products at all */
1372     sz = SQUISH_GUID_SIZE;
1373     r = RegEnumValueW(hkeyComp, 0, szValName, &sz, NULL, NULL, NULL, NULL);
1374     if (r != ERROR_SUCCESS)
1375     {
1376         RegCloseKey(hkeyComp);
1377
1378         if (index != 0)
1379             return ERROR_INVALID_PARAMETER;
1380
1381         return ERROR_UNKNOWN_COMPONENT;
1382     }
1383
1384     sz = SQUISH_GUID_SIZE;
1385     r = RegEnumValueW(hkeyComp, index, szValName, &sz, NULL, NULL, NULL, NULL);
1386     if( r == ERROR_SUCCESS )
1387     {
1388         unsquash_guid(szValName, szProduct);
1389         TRACE("-> %s\n", debugstr_w(szProduct));
1390     }
1391     RegCloseKey(hkeyComp);
1392     return r;
1393 }
1394
1395 static UINT MSI_EnumComponentQualifiers( LPCWSTR szComponent, DWORD iIndex,
1396                 awstring *lpQualBuf, LPDWORD pcchQual,
1397                 awstring *lpAppBuf, LPDWORD pcchAppBuf )
1398 {
1399     DWORD name_sz, val_sz, name_max, val_max, type, ofs;
1400     LPWSTR name = NULL, val = NULL;
1401     UINT r, r2;
1402     HKEY key;
1403
1404     TRACE("%s %08x %p %p %p %p\n", debugstr_w(szComponent), iIndex,
1405           lpQualBuf, pcchQual, lpAppBuf, pcchAppBuf);
1406
1407     if (!szComponent)
1408         return ERROR_INVALID_PARAMETER;
1409
1410     r = MSIREG_OpenUserComponentsKey( szComponent, &key, FALSE );
1411     if (r != ERROR_SUCCESS)
1412         return ERROR_UNKNOWN_COMPONENT;
1413
1414     /* figure out how big the name is we want to return */
1415     name_max = 0x10;
1416     r = ERROR_OUTOFMEMORY;
1417     name = msi_alloc( name_max * sizeof(WCHAR) );
1418     if (!name)
1419         goto end;
1420
1421     val_max = 0x10;
1422     r = ERROR_OUTOFMEMORY;
1423     val = msi_alloc( val_max );
1424     if (!val)
1425         goto end;
1426
1427     /* loop until we allocate enough memory */
1428     while (1)
1429     {
1430         name_sz = name_max;
1431         val_sz = val_max;
1432         r = RegEnumValueW( key, iIndex, name, &name_sz,
1433                            NULL, &type, (LPBYTE)val, &val_sz );
1434         if (r == ERROR_SUCCESS)
1435             break;
1436         if (r != ERROR_MORE_DATA)
1437             goto end;
1438  
1439         if (type != REG_MULTI_SZ)
1440         {
1441             ERR("component data has wrong type (%d)\n", type);
1442             goto end;
1443         }
1444
1445         r = ERROR_OUTOFMEMORY;
1446         if ((name_sz+1) >= name_max)
1447         {
1448             name_max *= 2;
1449             msi_free( name );
1450             name = msi_alloc( name_max * sizeof (WCHAR) );
1451             if (!name)
1452                 goto end;
1453             continue;
1454         }
1455         if (val_sz > val_max)
1456         {
1457             val_max = val_sz + sizeof (WCHAR);
1458             msi_free( val );
1459             val = msi_alloc( val_max * sizeof (WCHAR) );
1460             if (!val)
1461                 goto end;
1462             continue;
1463         }
1464         ERR("should be enough data, but isn't %d %d\n", name_sz, val_sz );
1465         goto end;
1466     }
1467
1468     ofs = 0;
1469     r = MsiDecomposeDescriptorW( val, NULL, NULL, NULL, &ofs );
1470     if (r != ERROR_SUCCESS)
1471         goto end;
1472
1473     TRACE("Providing %s and %s\n", debugstr_w(name), debugstr_w(val+ofs));
1474
1475     r = msi_strcpy_to_awstring( name, lpQualBuf, pcchQual );
1476     r2 = msi_strcpy_to_awstring( val+ofs, lpAppBuf, pcchAppBuf );
1477
1478     if (r2 != ERROR_SUCCESS)
1479         r = r2;
1480
1481 end:
1482     msi_free(val);
1483     msi_free(name);
1484     RegCloseKey(key);
1485
1486     return r;
1487 }
1488
1489 /*************************************************************************
1490  *  MsiEnumComponentQualifiersA [MSI.@]
1491  */
1492 UINT WINAPI MsiEnumComponentQualifiersA( LPCSTR szComponent, DWORD iIndex,
1493                 LPSTR lpQualifierBuf, LPDWORD pcchQualifierBuf,
1494                 LPSTR lpApplicationDataBuf, LPDWORD pcchApplicationDataBuf )
1495 {
1496     awstring qual, appdata;
1497     LPWSTR comp;
1498     UINT r;
1499
1500     TRACE("%s %08x %p %p %p %p\n", debugstr_a(szComponent), iIndex,
1501           lpQualifierBuf, pcchQualifierBuf, lpApplicationDataBuf,
1502           pcchApplicationDataBuf);
1503
1504     comp = strdupAtoW( szComponent );
1505     if (szComponent && !comp)
1506         return ERROR_OUTOFMEMORY;
1507
1508     qual.unicode = FALSE;
1509     qual.str.a = lpQualifierBuf;
1510
1511     appdata.unicode = FALSE;
1512     appdata.str.a = lpApplicationDataBuf;
1513
1514     r = MSI_EnumComponentQualifiers( comp, iIndex,
1515               &qual, pcchQualifierBuf, &appdata, pcchApplicationDataBuf );
1516     msi_free( comp );
1517     return r;
1518 }
1519
1520 /*************************************************************************
1521  *  MsiEnumComponentQualifiersW [MSI.@]
1522  */
1523 UINT WINAPI MsiEnumComponentQualifiersW( LPCWSTR szComponent, DWORD iIndex,
1524                 LPWSTR lpQualifierBuf, LPDWORD pcchQualifierBuf,
1525                 LPWSTR lpApplicationDataBuf, LPDWORD pcchApplicationDataBuf )
1526 {
1527     awstring qual, appdata;
1528
1529     TRACE("%s %08x %p %p %p %p\n", debugstr_w(szComponent), iIndex,
1530           lpQualifierBuf, pcchQualifierBuf, lpApplicationDataBuf,
1531           pcchApplicationDataBuf);
1532
1533     qual.unicode = TRUE;
1534     qual.str.w = lpQualifierBuf;
1535
1536     appdata.unicode = TRUE;
1537     appdata.str.w = lpApplicationDataBuf;
1538
1539     return MSI_EnumComponentQualifiers( szComponent, iIndex,
1540                  &qual, pcchQualifierBuf, &appdata, pcchApplicationDataBuf );
1541 }
1542
1543 /*************************************************************************
1544  *  MsiEnumRelatedProductsW   [MSI.@]
1545  *
1546  */
1547 UINT WINAPI MsiEnumRelatedProductsW(LPCWSTR szUpgradeCode, DWORD dwReserved,
1548                                     DWORD iProductIndex, LPWSTR lpProductBuf)
1549 {
1550     UINT r;
1551     HKEY hkey;
1552     DWORD dwSize = SQUISH_GUID_SIZE;
1553     WCHAR szKeyName[SQUISH_GUID_SIZE];
1554
1555     TRACE("%s %u %u %p\n", debugstr_w(szUpgradeCode), dwReserved,
1556           iProductIndex, lpProductBuf);
1557
1558     if (NULL == szUpgradeCode)
1559         return ERROR_INVALID_PARAMETER;
1560     if (NULL == lpProductBuf)
1561         return ERROR_INVALID_PARAMETER;
1562
1563     r = MSIREG_OpenUpgradeCodesKey(szUpgradeCode, &hkey, FALSE);
1564     if (r != ERROR_SUCCESS)
1565         return ERROR_NO_MORE_ITEMS;
1566
1567     r = RegEnumValueW(hkey, iProductIndex, szKeyName, &dwSize, NULL, NULL, NULL, NULL);
1568     if( r == ERROR_SUCCESS )
1569         unsquash_guid(szKeyName, lpProductBuf);
1570     RegCloseKey(hkey);
1571
1572     return r;
1573 }
1574
1575 /*************************************************************************
1576  *  MsiEnumRelatedProductsA   [MSI.@]
1577  *
1578  */
1579 UINT WINAPI MsiEnumRelatedProductsA(LPCSTR szUpgradeCode, DWORD dwReserved,
1580                                     DWORD iProductIndex, LPSTR lpProductBuf)
1581 {
1582     LPWSTR szwUpgradeCode = NULL;
1583     WCHAR productW[GUID_SIZE];
1584     UINT r;
1585
1586     TRACE("%s %u %u %p\n", debugstr_a(szUpgradeCode), dwReserved,
1587           iProductIndex, lpProductBuf);
1588
1589     if (szUpgradeCode)
1590     {
1591         szwUpgradeCode = strdupAtoW( szUpgradeCode );
1592         if( !szwUpgradeCode )
1593             return ERROR_OUTOFMEMORY;
1594     }
1595
1596     r = MsiEnumRelatedProductsW( szwUpgradeCode, dwReserved,
1597                                  iProductIndex, productW );
1598     if (r == ERROR_SUCCESS)
1599     {
1600         WideCharToMultiByte( CP_ACP, 0, productW, GUID_SIZE,
1601                              lpProductBuf, GUID_SIZE, NULL, NULL );
1602     }
1603     msi_free( szwUpgradeCode);
1604     return r;
1605 }
1606
1607 /***********************************************************************
1608  * MsiEnumPatchesExA            [MSI.@]
1609  */
1610 UINT WINAPI MsiEnumPatchesExA(LPCSTR szProductCode, LPCSTR szUserSid,
1611         DWORD dwContext, DWORD dwFilter, DWORD dwIndex, LPSTR szPatchCode,
1612         LPSTR szTargetProductCode, MSIINSTALLCONTEXT *pdwTargetProductContext,
1613         LPSTR szTargetUserSid, LPDWORD pcchTargetUserSid)
1614 {
1615     LPWSTR prodcode = NULL;
1616     LPWSTR usersid = NULL;
1617     LPWSTR targsid = NULL;
1618     WCHAR patch[GUID_SIZE];
1619     WCHAR targprod[GUID_SIZE];
1620     DWORD len;
1621     UINT r;
1622
1623     TRACE("(%s, %s, %d, %d, %d, %p, %p, %p, %p, %p)\n",
1624           debugstr_a(szProductCode), debugstr_a(szUserSid), dwContext, dwFilter,
1625           dwIndex, szPatchCode, szTargetProductCode, pdwTargetProductContext,
1626           szTargetUserSid, pcchTargetUserSid);
1627
1628     if (szTargetUserSid && !pcchTargetUserSid)
1629         return ERROR_INVALID_PARAMETER;
1630
1631     if (szProductCode) prodcode = strdupAtoW(szProductCode);
1632     if (szUserSid) usersid = strdupAtoW(szUserSid);
1633
1634     r = MsiEnumPatchesExW(prodcode, usersid, dwContext, dwFilter, dwIndex,
1635                           patch, targprod, pdwTargetProductContext,
1636                           NULL, &len);
1637     if (r != ERROR_SUCCESS)
1638         goto done;
1639
1640     WideCharToMultiByte(CP_ACP, 0, patch, -1, szPatchCode,
1641                         GUID_SIZE, NULL, NULL);
1642     WideCharToMultiByte(CP_ACP, 0, targprod, -1, szTargetProductCode,
1643                         GUID_SIZE, NULL, NULL);
1644
1645     if (!szTargetUserSid)
1646     {
1647         if (pcchTargetUserSid)
1648             *pcchTargetUserSid = len;
1649
1650         goto done;
1651     }
1652
1653     targsid = msi_alloc(++len * sizeof(WCHAR));
1654     if (!targsid)
1655     {
1656         r = ERROR_OUTOFMEMORY;
1657         goto done;
1658     }
1659
1660     r = MsiEnumPatchesExW(prodcode, usersid, dwContext, dwFilter, dwIndex,
1661                           patch, targprod, pdwTargetProductContext,
1662                           targsid, &len);
1663     if (r != ERROR_SUCCESS || !szTargetUserSid)
1664         goto done;
1665
1666     WideCharToMultiByte(CP_ACP, 0, targsid, -1, szTargetUserSid,
1667                         *pcchTargetUserSid, NULL, NULL);
1668
1669     len = lstrlenW(targsid);
1670     if (*pcchTargetUserSid < len + 1)
1671     {
1672         r = ERROR_MORE_DATA;
1673         *pcchTargetUserSid = len * sizeof(WCHAR);
1674     }
1675     else
1676         *pcchTargetUserSid = len;
1677
1678 done:
1679     msi_free(prodcode);
1680     msi_free(usersid);
1681     msi_free(targsid);
1682
1683     return r;
1684 }
1685
1686 static UINT msi_get_patch_state(LPCWSTR prodcode, LPCWSTR usersid,
1687                                 MSIINSTALLCONTEXT context,
1688                                 LPWSTR patch, MSIPATCHSTATE *state)
1689 {
1690     DWORD type, val, size;
1691     HKEY prod, hkey = 0;
1692     HKEY udpatch = 0;
1693     LONG res;
1694     UINT r = ERROR_NO_MORE_ITEMS;
1695
1696     *state = MSIPATCHSTATE_INVALID;
1697
1698     r = MSIREG_OpenUserDataProductKey(prodcode, context,
1699                                       usersid, &prod, FALSE);
1700     if (r != ERROR_SUCCESS)
1701         return ERROR_NO_MORE_ITEMS;
1702
1703     res = RegOpenKeyExW(prod, szPatches, 0, KEY_READ, &hkey);
1704     if (res != ERROR_SUCCESS)
1705         goto done;
1706
1707     res = RegOpenKeyExW(hkey, patch, 0, KEY_READ, &udpatch);
1708     if (res != ERROR_SUCCESS)
1709         goto done;
1710
1711     size = sizeof(DWORD);
1712     res = RegGetValueW(udpatch, NULL, szState, RRF_RT_DWORD, &type, &val, &size);
1713     if (res != ERROR_SUCCESS ||
1714         val < MSIPATCHSTATE_APPLIED || val > MSIPATCHSTATE_REGISTERED)
1715     {
1716         r = ERROR_BAD_CONFIGURATION;
1717         goto done;
1718     }
1719
1720     *state = val;
1721     r = ERROR_SUCCESS;
1722
1723 done:
1724     RegCloseKey(udpatch);
1725     RegCloseKey(hkey);
1726     RegCloseKey(prod);
1727
1728     return r;
1729 }
1730
1731 static UINT msi_check_product_patches(LPCWSTR prodcode, LPCWSTR usersid,
1732         MSIINSTALLCONTEXT context, DWORD filter, DWORD index, DWORD *idx,
1733         LPWSTR patch, LPWSTR targetprod, MSIINSTALLCONTEXT *targetctx,
1734         LPWSTR targetsid, DWORD *sidsize, LPWSTR *transforms)
1735 {
1736     MSIPATCHSTATE state = MSIPATCHSTATE_INVALID;
1737     LPWSTR ptr, patches = NULL;
1738     HKEY prod, patchkey = 0;
1739     HKEY localprod = 0, localpatch = 0;
1740     DWORD type, size;
1741     LONG res;
1742     UINT temp, r = ERROR_NO_MORE_ITEMS;
1743
1744     if (MSIREG_OpenProductKey(prodcode, usersid, context,
1745                               &prod, FALSE) != ERROR_SUCCESS)
1746         return ERROR_NO_MORE_ITEMS;
1747
1748     size = 0;
1749     res = RegGetValueW(prod, szPatches, szPatches, RRF_RT_ANY, &type, NULL,
1750                        &size);
1751     if (res != ERROR_SUCCESS)
1752         goto done;
1753
1754     if (type != REG_MULTI_SZ)
1755     {
1756         r = ERROR_BAD_CONFIGURATION;
1757         goto done;
1758     }
1759
1760     patches = msi_alloc(size);
1761     if (!patches)
1762     {
1763         r = ERROR_OUTOFMEMORY;
1764         goto done;
1765     }
1766
1767     res = RegGetValueW(prod, szPatches, szPatches, RRF_RT_ANY, &type,
1768                        patches, &size);
1769     if (res != ERROR_SUCCESS)
1770         goto done;
1771
1772     ptr = patches;
1773     for (ptr = patches; *ptr && r == ERROR_NO_MORE_ITEMS; ptr += lstrlenW(ptr) + 1)
1774     {
1775         if (!unsquash_guid(ptr, patch))
1776         {
1777             r = ERROR_BAD_CONFIGURATION;
1778             goto done;
1779         }
1780
1781         size = 0;
1782         res = RegGetValueW(prod, szPatches, ptr, RRF_RT_REG_SZ,
1783                            &type, NULL, &size);
1784         if (res != ERROR_SUCCESS)
1785             continue;
1786
1787         if (transforms)
1788         {
1789             *transforms = msi_alloc(size);
1790             if (!*transforms)
1791             {
1792                 r = ERROR_OUTOFMEMORY;
1793                 goto done;
1794             }
1795
1796             res = RegGetValueW(prod, szPatches, ptr, RRF_RT_REG_SZ,
1797                                &type, *transforms, &size);
1798             if (res != ERROR_SUCCESS)
1799                 continue;
1800         }
1801
1802         if (context == MSIINSTALLCONTEXT_USERMANAGED)
1803         {
1804             if (!(filter & MSIPATCHSTATE_APPLIED))
1805             {
1806                 temp = msi_get_patch_state(prodcode, usersid, context,
1807                                            ptr, &state);
1808                 if (temp == ERROR_BAD_CONFIGURATION)
1809                 {
1810                     r = ERROR_BAD_CONFIGURATION;
1811                     goto done;
1812                 }
1813
1814                 if (temp != ERROR_SUCCESS || !(filter & state))
1815                     continue;
1816             }
1817         }
1818         else if (context == MSIINSTALLCONTEXT_USERUNMANAGED)
1819         {
1820             if (!(filter & MSIPATCHSTATE_APPLIED))
1821             {
1822                 temp = msi_get_patch_state(prodcode, usersid, context,
1823                                            ptr, &state);
1824                 if (temp == ERROR_BAD_CONFIGURATION)
1825                 {
1826                     r = ERROR_BAD_CONFIGURATION;
1827                     goto done;
1828                 }
1829
1830                 if (temp != ERROR_SUCCESS || !(filter & state))
1831                     continue;
1832             }
1833             else
1834             {
1835                 temp = MSIREG_OpenUserDataPatchKey(patch, context,
1836                                                    &patchkey, FALSE);
1837                 RegCloseKey(patchkey);
1838                 if (temp != ERROR_SUCCESS)
1839                     continue;
1840             }
1841         }
1842         else if (context == MSIINSTALLCONTEXT_MACHINE)
1843         {
1844             usersid = szEmpty;
1845
1846             if (MSIREG_OpenUserDataProductKey(prodcode, context, NULL, &localprod, FALSE) == ERROR_SUCCESS &&
1847                 RegOpenKeyExW(localprod, szPatches, 0, KEY_READ, &localpatch) == ERROR_SUCCESS &&
1848                 RegOpenKeyExW(localpatch, ptr, 0, KEY_READ, &patchkey) == ERROR_SUCCESS)
1849             {
1850                 res = RegGetValueW(patchkey, NULL, szState, RRF_RT_REG_DWORD,
1851                                    &type, &state, &size);
1852
1853                 if (!(filter & state))
1854                     res = ERROR_NO_MORE_ITEMS;
1855
1856                 RegCloseKey(patchkey);
1857             }
1858
1859             RegCloseKey(localpatch);
1860             RegCloseKey(localprod);
1861
1862             if (res != ERROR_SUCCESS)
1863                 continue;
1864         }
1865
1866         if (*idx < index)
1867         {
1868             (*idx)++;
1869             continue;
1870         }
1871
1872         r = ERROR_SUCCESS;
1873         if (targetprod)
1874             lstrcpyW(targetprod, prodcode);
1875
1876         if (targetctx)
1877             *targetctx = context;
1878
1879         if (targetsid)
1880         {
1881             lstrcpynW(targetsid, usersid, *sidsize);
1882             if (lstrlenW(usersid) >= *sidsize)
1883                 r = ERROR_MORE_DATA;
1884         }
1885
1886         if (sidsize)
1887         {
1888             *sidsize = lstrlenW(usersid);
1889             if (!targetsid)
1890                 *sidsize *= sizeof(WCHAR);
1891         }
1892     }
1893
1894 done:
1895     RegCloseKey(prod);
1896     msi_free(patches);
1897
1898     return r;
1899 }
1900
1901 static UINT msi_enum_patches(LPCWSTR szProductCode, LPCWSTR szUserSid,
1902         DWORD dwContext, DWORD dwFilter, DWORD dwIndex, DWORD *idx,
1903         LPWSTR szPatchCode, LPWSTR szTargetProductCode,
1904         MSIINSTALLCONTEXT *pdwTargetProductContext, LPWSTR szTargetUserSid,
1905         LPDWORD pcchTargetUserSid, LPWSTR *szTransforms)
1906 {
1907     LPWSTR usersid = NULL;
1908     UINT r = ERROR_INVALID_PARAMETER;
1909
1910     if (!szUserSid)
1911     {
1912         szUserSid = usersid = get_user_sid();
1913         if (!usersid) return ERROR_FUNCTION_FAILED;
1914     }
1915
1916     if (dwContext & MSIINSTALLCONTEXT_USERMANAGED)
1917     {
1918         r = msi_check_product_patches(szProductCode, szUserSid,
1919                                       MSIINSTALLCONTEXT_USERMANAGED, dwFilter,
1920                                       dwIndex, idx, szPatchCode,
1921                                       szTargetProductCode,
1922                                       pdwTargetProductContext, szTargetUserSid,
1923                                       pcchTargetUserSid, szTransforms);
1924         if (r != ERROR_NO_MORE_ITEMS)
1925             goto done;
1926     }
1927
1928     if (dwContext & MSIINSTALLCONTEXT_USERUNMANAGED)
1929     {
1930         r = msi_check_product_patches(szProductCode, szUserSid,
1931                                       MSIINSTALLCONTEXT_USERUNMANAGED, dwFilter,
1932                                       dwIndex, idx, szPatchCode,
1933                                       szTargetProductCode,
1934                                       pdwTargetProductContext, szTargetUserSid,
1935                                       pcchTargetUserSid, szTransforms);
1936         if (r != ERROR_NO_MORE_ITEMS)
1937             goto done;
1938     }
1939
1940     if (dwContext & MSIINSTALLCONTEXT_MACHINE)
1941     {
1942         r = msi_check_product_patches(szProductCode, szUserSid,
1943                                       MSIINSTALLCONTEXT_MACHINE, dwFilter,
1944                                       dwIndex, idx, szPatchCode,
1945                                       szTargetProductCode,
1946                                       pdwTargetProductContext, szTargetUserSid,
1947                                       pcchTargetUserSid, szTransforms);
1948         if (r != ERROR_NO_MORE_ITEMS)
1949             goto done;
1950     }
1951
1952 done:
1953     LocalFree(usersid);
1954     return r;
1955 }
1956
1957 /***********************************************************************
1958  * MsiEnumPatchesExW            [MSI.@]
1959  */
1960 UINT WINAPI MsiEnumPatchesExW(LPCWSTR szProductCode, LPCWSTR szUserSid,
1961         DWORD dwContext, DWORD dwFilter, DWORD dwIndex, LPWSTR szPatchCode,
1962         LPWSTR szTargetProductCode, MSIINSTALLCONTEXT *pdwTargetProductContext,
1963         LPWSTR szTargetUserSid, LPDWORD pcchTargetUserSid)
1964 {
1965     WCHAR squished_pc[GUID_SIZE];
1966     DWORD idx = 0;
1967     UINT r;
1968
1969     static DWORD last_index;
1970
1971     TRACE("(%s, %s, %d, %d, %d, %p, %p, %p, %p, %p)\n",
1972           debugstr_w(szProductCode), debugstr_w(szUserSid), dwContext, dwFilter,
1973           dwIndex, szPatchCode, szTargetProductCode, pdwTargetProductContext,
1974           szTargetUserSid, pcchTargetUserSid);
1975
1976     if (!szProductCode || !squash_guid(szProductCode, squished_pc))
1977         return ERROR_INVALID_PARAMETER;
1978
1979     if (szUserSid && !strcmpW( szUserSid, szLocalSid ))
1980         return ERROR_INVALID_PARAMETER;
1981
1982     if (dwContext & MSIINSTALLCONTEXT_MACHINE && szUserSid)
1983         return ERROR_INVALID_PARAMETER;
1984
1985     if (dwContext <= MSIINSTALLCONTEXT_NONE ||
1986         dwContext > MSIINSTALLCONTEXT_ALL)
1987         return ERROR_INVALID_PARAMETER;
1988
1989     if (dwFilter <= MSIPATCHSTATE_INVALID || dwFilter > MSIPATCHSTATE_ALL)
1990         return ERROR_INVALID_PARAMETER;
1991
1992     if (dwIndex && dwIndex - last_index != 1)
1993         return ERROR_INVALID_PARAMETER;
1994
1995     if (dwIndex == 0)
1996         last_index = 0;
1997
1998     r = msi_enum_patches(szProductCode, szUserSid, dwContext, dwFilter,
1999                          dwIndex, &idx, szPatchCode, szTargetProductCode,
2000                          pdwTargetProductContext, szTargetUserSid,
2001                          pcchTargetUserSid, NULL);
2002
2003     if (r == ERROR_SUCCESS)
2004         last_index = dwIndex;
2005     else
2006         last_index = 0;
2007
2008     return r;
2009 }
2010
2011 /***********************************************************************
2012  * MsiEnumPatchesA            [MSI.@]
2013  */
2014 UINT WINAPI MsiEnumPatchesA(LPCSTR szProduct, DWORD iPatchIndex,
2015         LPSTR lpPatchBuf, LPSTR lpTransformsBuf, LPDWORD pcchTransformsBuf)
2016 {
2017     LPWSTR product, transforms;
2018     WCHAR patch[GUID_SIZE];
2019     DWORD len;
2020     UINT r;
2021
2022     TRACE("(%s %d %p %p %p)\n", debugstr_a(szProduct), iPatchIndex,
2023           lpPatchBuf, lpTransformsBuf, pcchTransformsBuf);
2024
2025     if (!szProduct || !lpPatchBuf || !lpTransformsBuf || !pcchTransformsBuf)
2026         return ERROR_INVALID_PARAMETER;
2027
2028     product = strdupAtoW(szProduct);
2029     if (!product)
2030         return ERROR_OUTOFMEMORY;
2031
2032     len = *pcchTransformsBuf;
2033     transforms = msi_alloc( len * sizeof(WCHAR) );
2034     if (!transforms)
2035     {
2036         r = ERROR_OUTOFMEMORY;
2037         goto done;
2038     }
2039
2040     r = MsiEnumPatchesW(product, iPatchIndex, patch, transforms, &len);
2041     if (r != ERROR_SUCCESS && r != ERROR_MORE_DATA)
2042         goto done;
2043
2044     WideCharToMultiByte(CP_ACP, 0, patch, -1, lpPatchBuf,
2045                         GUID_SIZE, NULL, NULL);
2046
2047     if (!WideCharToMultiByte(CP_ACP, 0, transforms, -1, lpTransformsBuf,
2048                              *pcchTransformsBuf, NULL, NULL))
2049         r = ERROR_MORE_DATA;
2050
2051     if (r == ERROR_MORE_DATA)
2052     {
2053         lpTransformsBuf[*pcchTransformsBuf - 1] = '\0';
2054         *pcchTransformsBuf = len * 2;
2055     }
2056     else
2057         *pcchTransformsBuf = strlen( lpTransformsBuf );
2058
2059 done:
2060     msi_free(transforms);
2061     msi_free(product);
2062
2063     return r;
2064 }
2065
2066 /***********************************************************************
2067  * MsiEnumPatchesW            [MSI.@]
2068  */
2069 UINT WINAPI MsiEnumPatchesW(LPCWSTR szProduct, DWORD iPatchIndex,
2070         LPWSTR lpPatchBuf, LPWSTR lpTransformsBuf, LPDWORD pcchTransformsBuf)
2071 {
2072     WCHAR squished_pc[GUID_SIZE];
2073     LPWSTR transforms = NULL;
2074     HKEY prod;
2075     DWORD idx = 0;
2076     UINT r;
2077
2078     TRACE("(%s %d %p %p %p)\n", debugstr_w(szProduct), iPatchIndex,
2079           lpPatchBuf, lpTransformsBuf, pcchTransformsBuf);
2080
2081     if (!szProduct || !squash_guid(szProduct, squished_pc))
2082         return ERROR_INVALID_PARAMETER;
2083
2084     if (!lpPatchBuf || !lpTransformsBuf || !pcchTransformsBuf)
2085         return ERROR_INVALID_PARAMETER;
2086
2087     if (MSIREG_OpenProductKey(szProduct, NULL, MSIINSTALLCONTEXT_USERMANAGED,
2088                               &prod, FALSE) != ERROR_SUCCESS &&
2089         MSIREG_OpenProductKey(szProduct, NULL, MSIINSTALLCONTEXT_USERUNMANAGED,
2090                               &prod, FALSE) != ERROR_SUCCESS &&
2091         MSIREG_OpenProductKey(szProduct, NULL, MSIINSTALLCONTEXT_MACHINE,
2092                               &prod, FALSE) != ERROR_SUCCESS)
2093         return ERROR_UNKNOWN_PRODUCT;
2094
2095     RegCloseKey(prod);
2096
2097     r = msi_enum_patches(szProduct, NULL, MSIINSTALLCONTEXT_ALL,
2098                          MSIPATCHSTATE_ALL, iPatchIndex, &idx, lpPatchBuf,
2099                          NULL, NULL, NULL, NULL, &transforms);
2100     if (r != ERROR_SUCCESS)
2101         goto done;
2102
2103     lstrcpynW(lpTransformsBuf, transforms, *pcchTransformsBuf);
2104     if (*pcchTransformsBuf <= lstrlenW(transforms))
2105     {
2106         r = ERROR_MORE_DATA;
2107         *pcchTransformsBuf = lstrlenW(transforms);
2108     }
2109     else
2110         *pcchTransformsBuf = lstrlenW(transforms);
2111
2112 done:
2113     msi_free(transforms);
2114     return r;
2115 }
2116
2117 UINT WINAPI MsiEnumProductsExA( LPCSTR szProductCode, LPCSTR szUserSid,
2118         DWORD dwContext, DWORD dwIndex, CHAR szInstalledProductCode[39],
2119         MSIINSTALLCONTEXT* pdwInstalledContext, LPSTR szSid, LPDWORD pcchSid)
2120 {
2121     FIXME("%s %s %d %d %p %p %p %p\n", debugstr_a(szProductCode), debugstr_a(szUserSid),
2122           dwContext, dwIndex, szInstalledProductCode, pdwInstalledContext,
2123           szSid, pcchSid);
2124     return ERROR_NO_MORE_ITEMS;
2125 }
2126
2127 UINT WINAPI MsiEnumProductsExW( LPCWSTR szProductCode, LPCWSTR szUserSid,
2128         DWORD dwContext, DWORD dwIndex, WCHAR szInstalledProductCode[39],
2129         MSIINSTALLCONTEXT* pdwInstalledContext, LPWSTR szSid, LPDWORD pcchSid)
2130 {
2131     FIXME("%s %s %d %d %p %p %p %p\n", debugstr_w(szProductCode), debugstr_w(szUserSid),
2132           dwContext, dwIndex, szInstalledProductCode, pdwInstalledContext,
2133           szSid, pcchSid);
2134     return ERROR_NO_MORE_ITEMS;
2135 }