git.oblomov.eu Git - wine/blob - 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     TRACE("%d %p\n", index, lpguid);
1143
1144     if (NULL == lpguid)
1145         return ERROR_INVALID_PARAMETER;
1146
1147     return MsiEnumProductsExW( NULL, szAllSid, MSIINSTALLCONTEXT_ALL, index, lpguid,
1148                                NULL, NULL, NULL );
1149 }
1150
1151 UINT WINAPI MsiEnumFeaturesA(LPCSTR szProduct, DWORD index,
1152       LPSTR szFeature, LPSTR szParent)
1153 {
1154     DWORD r;
1155     WCHAR szwFeature[GUID_SIZE], szwParent[GUID_SIZE];
1156     LPWSTR szwProduct = NULL;
1157
1158     TRACE("%s %d %p %p\n", debugstr_a(szProduct), index, szFeature, szParent);
1159
1160     if( szProduct )
1161     {
1162         szwProduct = strdupAtoW( szProduct );
1163         if( !szwProduct )
1164             return ERROR_OUTOFMEMORY;
1165     }
1166
1167     r = MsiEnumFeaturesW(szwProduct, index, szwFeature, szwParent);
1168     if( r == ERROR_SUCCESS )
1169     {
1170         WideCharToMultiByte(CP_ACP, 0, szwFeature, -1,
1171                             szFeature, GUID_SIZE, NULL, NULL);
1172         WideCharToMultiByte(CP_ACP, 0, szwParent, -1,
1173                             szParent, GUID_SIZE, NULL, NULL);
1174     }
1175
1176     msi_free( szwProduct);
1177
1178     return r;
1179 }
1180
1181 UINT WINAPI MsiEnumFeaturesW(LPCWSTR szProduct, DWORD index,
1182       LPWSTR szFeature, LPWSTR szParent)
1183 {
1184     HKEY hkeyProduct = 0;
1185     DWORD r, sz;
1186
1187     TRACE("%s %d %p %p\n", debugstr_w(szProduct), index, szFeature, szParent);
1188
1189     if( !szProduct )
1190         return ERROR_INVALID_PARAMETER;
1191
1192     r = MSIREG_OpenInstallerFeaturesKey(szProduct,&hkeyProduct,FALSE);
1193     if( r != ERROR_SUCCESS )
1194         return ERROR_NO_MORE_ITEMS;
1195
1196     sz = GUID_SIZE;
1197     r = RegEnumValueW(hkeyProduct, index, szFeature, &sz, NULL, NULL, NULL, NULL);
1198     RegCloseKey(hkeyProduct);
1199
1200     return r;
1201 }
1202
1203 UINT WINAPI MsiEnumComponentsA(DWORD index, LPSTR lpguid)
1204 {
1205     DWORD r;
1206     WCHAR szwGuid[GUID_SIZE];
1207
1208     TRACE("%u, %p\n", index, lpguid);
1209
1210     if (!lpguid) return ERROR_INVALID_PARAMETER;
1211
1212     r = MsiEnumComponentsW(index, szwGuid);
1213     if( r == ERROR_SUCCESS )
1214         WideCharToMultiByte(CP_ACP, 0, szwGuid, -1, lpguid, GUID_SIZE, NULL, NULL);
1215
1216     return r;
1217 }
1218
1219 UINT WINAPI MsiEnumComponentsW(DWORD index, LPWSTR lpguid)
1220 {
1221     TRACE("%u, %p\n", index, lpguid);
1222
1223     if (!lpguid) return ERROR_INVALID_PARAMETER;
1224
1225     return MsiEnumComponentsExW( szAllSid, MSIINSTALLCONTEXT_ALL, index, lpguid, NULL, NULL, NULL );
1226 }
1227
1228 UINT WINAPI MsiEnumComponentsExA( LPCSTR user_sid, DWORD ctx, DWORD index, CHAR guid[39],
1229                                   MSIINSTALLCONTEXT *installed_ctx, LPSTR sid, LPDWORD sid_len )
1230 {
1231     UINT r;
1232     WCHAR *user_sidW = NULL, *sidW = NULL, guidW[GUID_SIZE];
1233
1234     TRACE("%s, %u, %u, %p, %p, %p, %p\n", debugstr_a(user_sid), ctx, index, guid, installed_ctx,
1235           sid, sid_len);
1236
1237     if (sid && !sid_len) return ERROR_INVALID_PARAMETER;
1238     if (user_sid && !(user_sidW = strdupAtoW( user_sid ))) return ERROR_OUTOFMEMORY;
1239     if (sid && !(sidW = msi_alloc( *sid_len * sizeof(WCHAR) )))
1240     {
1241         msi_free( user_sidW );
1242         return ERROR_OUTOFMEMORY;
1243     }
1244     r = MsiEnumComponentsExW( user_sidW, ctx, index, guidW, installed_ctx, sidW, sid_len );
1245     if (r == ERROR_SUCCESS)
1246     {
1247         if (guid) WideCharToMultiByte( CP_ACP, 0, guidW, GUID_SIZE, guid, GUID_SIZE, NULL, NULL );
1248         if (sid) WideCharToMultiByte( CP_ACP, 0, sidW, *sid_len + 1, sid, *sid_len + 1, NULL, NULL );
1249     }
1250     msi_free( user_sidW );
1251     msi_free( sidW );
1252     return r;
1253 }
1254
1255 static UINT fetch_machine_component( DWORD ctx, DWORD index, DWORD *idx, WCHAR guid[39],
1256                                      MSIINSTALLCONTEXT *installed_ctx, LPWSTR sid, LPDWORD sid_len )
1257 {
1258     static const WCHAR componentsW[] =
1259         {'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
1260          'W','i','n','d','o','w','s','\\','C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
1261          'I','n','s','t','a','l','l','e','r','\\','U','s','e','r','D','a','t','a','\\',
1262          'S','-','1','-','5','-','1','8','\\','C','o','m','p','o','n','e','n','t','s',0};
1263     UINT r = ERROR_SUCCESS;
1264     WCHAR component[GUID_SIZE];
1265     DWORD i = 0, len_component;
1266     REGSAM access = KEY_ENUMERATE_SUB_KEYS | KEY_WOW64_64KEY;
1267     HKEY key_components;
1268
1269     if (RegOpenKeyExW( HKEY_LOCAL_MACHINE, componentsW, 0, access, &key_components ))
1270         return ERROR_NO_MORE_ITEMS;
1271
1272     len_component = sizeof(component)/sizeof(component[0]);
1273     while (!RegEnumKeyExW( key_components, i, component, &len_component, NULL, NULL, NULL, NULL ))
1274     {
1275         if (*idx == index) goto found;
1276         (*idx)++;
1277         len_component = sizeof(component)/sizeof(component[0]);
1278         i++;
1279     }
1280     RegCloseKey( key_components );
1281     return ERROR_NO_MORE_ITEMS;
1282
1283 found:
1284     if (sid_len)
1285     {
1286         if (*sid_len < 1)
1287         {
1288             *sid_len = 1;
1289             r = ERROR_MORE_DATA;
1290         }
1291         else if (sid)
1292         {
1293             *sid_len = 0;
1294             sid[0] = 0;
1295         }
1296     }
1297     if (guid) unsquash_guid( component, guid );
1298     if (installed_ctx) *installed_ctx = MSIINSTALLCONTEXT_MACHINE;
1299     RegCloseKey( key_components );
1300     return r;
1301 }
1302
1303 static UINT fetch_user_component( const WCHAR *usersid, DWORD ctx, DWORD index, DWORD *idx,
1304                                   WCHAR guid[39], MSIINSTALLCONTEXT *installed_ctx, LPWSTR sid,
1305                                   LPDWORD sid_len )
1306 {
1307     static const WCHAR userdataW[] =
1308         {'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
1309          'W','i','n','d','o','w','s','\\','C','u','r','r','e','n','t','V','e','r','s','i','o','n','\\',
1310          'I','n','s','t','a','l','l','e','r','\\','U','s','e','r','D','a','t','a',0};
1311     static const WCHAR componentsW[] = {'\\','C','o','m','p','o','n','e','n','t','s',0};
1312     UINT r = ERROR_SUCCESS;
1313     WCHAR path[MAX_PATH], component[GUID_SIZE], user[128];
1314     DWORD i = 0, j = 0, len_component, len_user;
1315     REGSAM access = KEY_ENUMERATE_SUB_KEYS | KEY_WOW64_64KEY;
1316     HKEY key_users, key_components;
1317
1318     if (ctx == MSIINSTALLCONTEXT_USERMANAGED) /* FIXME: were to find these? */
1319         return ERROR_NO_MORE_ITEMS;
1320
1321     if (RegOpenKeyExW( HKEY_LOCAL_MACHINE, userdataW, 0, access, &key_users ))
1322         return ERROR_NO_MORE_ITEMS;
1323
1324     len_user = sizeof(user)/sizeof(user[0]);
1325     while (!RegEnumKeyExW( key_users, i, user, &len_user, NULL, NULL, NULL, NULL ))
1326     {
1327         if ((strcmpW( usersid, szAllSid ) && strcmpW( usersid, user )) ||
1328             !strcmpW( szLocalSid, user ))
1329         {
1330             i++;
1331             len_user = sizeof(user)/sizeof(user[0]);
1332             continue;
1333         }
1334         strcpyW( path, user );
1335         strcatW( path, componentsW );
1336         if (RegOpenKeyExW( key_users, path, 0, access, &key_components ))
1337         {
1338             i++;
1339             len_user = sizeof(user)/sizeof(user[0]);
1340             continue;
1341         }
1342         len_component = sizeof(component)/sizeof(component[0]);
1343         while (!RegEnumKeyExW( key_components, j, component, &len_component, NULL, NULL, NULL, NULL ))
1344         {
1345             if (*idx == index) goto found;
1346             (*idx)++;
1347             len_component = sizeof(component)/sizeof(component[0]);
1348             j++;
1349         }
1350         RegCloseKey( key_components );
1351         len_user = sizeof(user)/sizeof(user[0]);
1352         i++;
1353     }
1354     RegCloseKey( key_users );
1355     return ERROR_NO_MORE_ITEMS;
1356
1357 found:
1358     if (sid_len)
1359     {
1360         if (*sid_len < len_user + 1)
1361         {
1362             *sid_len = len_user + 1;
1363             r = ERROR_MORE_DATA;
1364         }
1365         else if (sid)
1366         {
1367             *sid_len = len_user;
1368             strcpyW( sid, user );
1369         }
1370     }
1371     if (guid) unsquash_guid( component, guid );
1372     if (installed_ctx) *installed_ctx = ctx;
1373     RegCloseKey( key_components );
1374     RegCloseKey( key_users );
1375     return r;
1376 }
1377
1378 static UINT enum_components( const WCHAR *usersid, DWORD ctx, DWORD index, DWORD *idx, WCHAR guid[39],
1379                              MSIINSTALLCONTEXT *installed_ctx, LPWSTR sid, LPDWORD sid_len )
1380 {
1381     UINT r = ERROR_NO_MORE_ITEMS;
1382     WCHAR *user = NULL;
1383
1384     if (!usersid)
1385     {
1386         usersid = user = get_user_sid();
1387         if (!user) return ERROR_FUNCTION_FAILED;
1388     }
1389     if (ctx & MSIINSTALLCONTEXT_USERMANAGED)
1390     {
1391         r = fetch_user_component( usersid, MSIINSTALLCONTEXT_USERMANAGED, index, idx, guid,
1392                                   installed_ctx, sid, sid_len );
1393         if (r != ERROR_NO_MORE_ITEMS) goto done;
1394     }
1395     if (ctx & MSIINSTALLCONTEXT_USERUNMANAGED)
1396     {
1397         r = fetch_user_component( usersid, MSIINSTALLCONTEXT_USERUNMANAGED, index, idx, guid,
1398                                   installed_ctx, sid, sid_len );
1399         if (r != ERROR_NO_MORE_ITEMS) goto done;
1400     }
1401     if (ctx & MSIINSTALLCONTEXT_MACHINE)
1402     {
1403         r = fetch_machine_component( MSIINSTALLCONTEXT_MACHINE, index, idx, guid, installed_ctx,
1404                                      sid, sid_len );
1405         if (r != ERROR_NO_MORE_ITEMS) goto done;
1406     }
1407
1408 done:
1409     LocalFree( user );
1410     return r;
1411 }
1412
1413 UINT WINAPI MsiEnumComponentsExW( LPCWSTR user_sid, DWORD ctx, DWORD index, WCHAR guid[39],
1414                                   MSIINSTALLCONTEXT *installed_ctx, LPWSTR sid, LPDWORD sid_len )
1415 {
1416     UINT r;
1417     DWORD idx = 0;
1418     static DWORD last_index;
1419
1420     TRACE("%s, %u, %u, %p, %p, %p, %p\n", debugstr_w(user_sid), ctx, index, guid, installed_ctx,
1421           sid, sid_len);
1422
1423     if ((sid && !sid_len) || !ctx || (user_sid && ctx == MSIINSTALLCONTEXT_MACHINE))
1424         return ERROR_INVALID_PARAMETER;
1425
1426     if (index && index - last_index != 1)
1427         return ERROR_INVALID_PARAMETER;
1428
1429     if (!index) last_index = 0;
1430
1431     r = enum_components( user_sid, ctx, index, &idx, guid, installed_ctx, sid, sid_len );
1432     if (r == ERROR_SUCCESS)
1433         last_index = index;
1434     else
1435         last_index = 0;
1436
1437     return r;
1438 }
1439
1440 UINT WINAPI MsiEnumClientsA(LPCSTR szComponent, DWORD index, LPSTR szProduct)
1441 {
1442     DWORD r;
1443     WCHAR szwProduct[GUID_SIZE];
1444     LPWSTR szwComponent = NULL;
1445
1446     TRACE("%s %d %p\n", debugstr_a(szComponent), index, szProduct);
1447
1448     if ( !szProduct )
1449         return ERROR_INVALID_PARAMETER;
1450
1451     if( szComponent )
1452     {
1453         szwComponent = strdupAtoW( szComponent );
1454         if( !szwComponent )
1455             return ERROR_OUTOFMEMORY;
1456     }
1457
1458     r = MsiEnumClientsW(szComponent?szwComponent:NULL, index, szwProduct);
1459     if( r == ERROR_SUCCESS )
1460     {
1461         WideCharToMultiByte(CP_ACP, 0, szwProduct, -1,
1462                             szProduct, GUID_SIZE, NULL, NULL);
1463     }
1464
1465     msi_free( szwComponent);
1466
1467     return r;
1468 }
1469
1470 UINT WINAPI MsiEnumClientsW(LPCWSTR szComponent, DWORD index, LPWSTR szProduct)
1471 {
1472     HKEY hkeyComp = 0;
1473     DWORD r, sz;
1474     WCHAR szValName[SQUISH_GUID_SIZE];
1475
1476     TRACE("%s %d %p\n", debugstr_w(szComponent), index, szProduct);
1477
1478     if (!szComponent || !*szComponent || !szProduct)
1479         return ERROR_INVALID_PARAMETER;
1480
1481     if (MSIREG_OpenUserDataComponentKey(szComponent, NULL, &hkeyComp, FALSE) != ERROR_SUCCESS &&
1482         MSIREG_OpenUserDataComponentKey(szComponent, szLocalSid, &hkeyComp, FALSE) != ERROR_SUCCESS)
1483         return ERROR_UNKNOWN_COMPONENT;
1484
1485     /* see if there are any products at all */
1486     sz = SQUISH_GUID_SIZE;
1487     r = RegEnumValueW(hkeyComp, 0, szValName, &sz, NULL, NULL, NULL, NULL);
1488     if (r != ERROR_SUCCESS)
1489     {
1490         RegCloseKey(hkeyComp);
1491
1492         if (index != 0)
1493             return ERROR_INVALID_PARAMETER;
1494
1495         return ERROR_UNKNOWN_COMPONENT;
1496     }
1497
1498     sz = SQUISH_GUID_SIZE;
1499     r = RegEnumValueW(hkeyComp, index, szValName, &sz, NULL, NULL, NULL, NULL);
1500     if( r == ERROR_SUCCESS )
1501     {
1502         unsquash_guid(szValName, szProduct);
1503         TRACE("-> %s\n", debugstr_w(szProduct));
1504     }
1505     RegCloseKey(hkeyComp);
1506     return r;
1507 }
1508
1509 static UINT MSI_EnumComponentQualifiers( LPCWSTR szComponent, DWORD iIndex,
1510                 awstring *lpQualBuf, LPDWORD pcchQual,
1511                 awstring *lpAppBuf, LPDWORD pcchAppBuf )
1512 {
1513     DWORD name_sz, val_sz, name_max, val_max, type, ofs;
1514     LPWSTR name = NULL, val = NULL;
1515     UINT r, r2;
1516     HKEY key;
1517
1518     TRACE("%s %08x %p %p %p %p\n", debugstr_w(szComponent), iIndex,
1519           lpQualBuf, pcchQual, lpAppBuf, pcchAppBuf);
1520
1521     if (!szComponent)
1522         return ERROR_INVALID_PARAMETER;
1523
1524     r = MSIREG_OpenUserComponentsKey( szComponent, &key, FALSE );
1525     if (r != ERROR_SUCCESS)
1526         return ERROR_UNKNOWN_COMPONENT;
1527
1528     /* figure out how big the name is we want to return */
1529     name_max = 0x10;
1530     r = ERROR_OUTOFMEMORY;
1531     name = msi_alloc( name_max * sizeof(WCHAR) );
1532     if (!name)
1533         goto end;
1534
1535     val_max = 0x10;
1536     r = ERROR_OUTOFMEMORY;
1537     val = msi_alloc( val_max );
1538     if (!val)
1539         goto end;
1540
1541     /* loop until we allocate enough memory */
1542     while (1)
1543     {
1544         name_sz = name_max;
1545         val_sz = val_max;
1546         r = RegEnumValueW( key, iIndex, name, &name_sz,
1547                            NULL, &type, (LPBYTE)val, &val_sz );
1548         if (r == ERROR_SUCCESS)
1549             break;
1550         if (r != ERROR_MORE_DATA)
1551             goto end;
1552
1553         if (type != REG_MULTI_SZ)
1554         {
1555             ERR("component data has wrong type (%d)\n", type);
1556             goto end;
1557         }
1558
1559         r = ERROR_OUTOFMEMORY;
1560         if ((name_sz+1) >= name_max)
1561         {
1562             name_max *= 2;
1563             msi_free( name );
1564             name = msi_alloc( name_max * sizeof (WCHAR) );
1565             if (!name)
1566                 goto end;
1567             continue;
1568         }
1569         if (val_sz > val_max)
1570         {
1571             val_max = val_sz + sizeof (WCHAR);
1572             msi_free( val );
1573             val = msi_alloc( val_max * sizeof (WCHAR) );
1574             if (!val)
1575                 goto end;
1576             continue;
1577         }
1578         ERR("should be enough data, but isn't %d %d\n", name_sz, val_sz );
1579         goto end;
1580     }
1581
1582     ofs = 0;
1583     r = MsiDecomposeDescriptorW( val, NULL, NULL, NULL, &ofs );
1584     if (r != ERROR_SUCCESS)
1585         goto end;
1586
1587     TRACE("Providing %s and %s\n", debugstr_w(name), debugstr_w(val+ofs));
1588
1589     r = msi_strcpy_to_awstring( name, lpQualBuf, pcchQual );
1590     r2 = msi_strcpy_to_awstring( val+ofs, lpAppBuf, pcchAppBuf );
1591
1592     if (r2 != ERROR_SUCCESS)
1593         r = r2;
1594
1595 end:
1596     msi_free(val);
1597     msi_free(name);
1598     RegCloseKey(key);
1599
1600     return r;
1601 }
1602
1603 /*************************************************************************
1604  *  MsiEnumComponentQualifiersA [MSI.@]
1605  */
1606 UINT WINAPI MsiEnumComponentQualifiersA( LPCSTR szComponent, DWORD iIndex,
1607                 LPSTR lpQualifierBuf, LPDWORD pcchQualifierBuf,
1608                 LPSTR lpApplicationDataBuf, LPDWORD pcchApplicationDataBuf )
1609 {
1610     awstring qual, appdata;
1611     LPWSTR comp;
1612     UINT r;
1613
1614     TRACE("%s %08x %p %p %p %p\n", debugstr_a(szComponent), iIndex,
1615           lpQualifierBuf, pcchQualifierBuf, lpApplicationDataBuf,
1616           pcchApplicationDataBuf);
1617
1618     comp = strdupAtoW( szComponent );
1619     if (szComponent && !comp)
1620         return ERROR_OUTOFMEMORY;
1621
1622     qual.unicode = FALSE;
1623     qual.str.a = lpQualifierBuf;
1624
1625     appdata.unicode = FALSE;
1626     appdata.str.a = lpApplicationDataBuf;
1627
1628     r = MSI_EnumComponentQualifiers( comp, iIndex,
1629               &qual, pcchQualifierBuf, &appdata, pcchApplicationDataBuf );
1630     msi_free( comp );
1631     return r;
1632 }
1633
1634 /*************************************************************************
1635  *  MsiEnumComponentQualifiersW [MSI.@]
1636  */
1637 UINT WINAPI MsiEnumComponentQualifiersW( LPCWSTR szComponent, DWORD iIndex,
1638                 LPWSTR lpQualifierBuf, LPDWORD pcchQualifierBuf,
1639                 LPWSTR lpApplicationDataBuf, LPDWORD pcchApplicationDataBuf )
1640 {
1641     awstring qual, appdata;
1642
1643     TRACE("%s %08x %p %p %p %p\n", debugstr_w(szComponent), iIndex,
1644           lpQualifierBuf, pcchQualifierBuf, lpApplicationDataBuf,
1645           pcchApplicationDataBuf);
1646
1647     qual.unicode = TRUE;
1648     qual.str.w = lpQualifierBuf;
1649
1650     appdata.unicode = TRUE;
1651     appdata.str.w = lpApplicationDataBuf;
1652
1653     return MSI_EnumComponentQualifiers( szComponent, iIndex,
1654                  &qual, pcchQualifierBuf, &appdata, pcchApplicationDataBuf );
1655 }
1656
1657 /*************************************************************************
1658  *  MsiEnumRelatedProductsW   [MSI.@]
1659  *
1660  */
1661 UINT WINAPI MsiEnumRelatedProductsW(LPCWSTR szUpgradeCode, DWORD dwReserved,
1662                                     DWORD iProductIndex, LPWSTR lpProductBuf)
1663 {
1664     UINT r;
1665     HKEY hkey;
1666     DWORD dwSize = SQUISH_GUID_SIZE;
1667     WCHAR szKeyName[SQUISH_GUID_SIZE];
1668
1669     TRACE("%s %u %u %p\n", debugstr_w(szUpgradeCode), dwReserved,
1670           iProductIndex, lpProductBuf);
1671
1672     if (NULL == szUpgradeCode)
1673         return ERROR_INVALID_PARAMETER;
1674     if (NULL == lpProductBuf)
1675         return ERROR_INVALID_PARAMETER;
1676
1677     r = MSIREG_OpenUpgradeCodesKey(szUpgradeCode, &hkey, FALSE);
1678     if (r != ERROR_SUCCESS)
1679         return ERROR_NO_MORE_ITEMS;
1680
1681     r = RegEnumValueW(hkey, iProductIndex, szKeyName, &dwSize, NULL, NULL, NULL, NULL);
1682     if( r == ERROR_SUCCESS )
1683         unsquash_guid(szKeyName, lpProductBuf);
1684     RegCloseKey(hkey);
1685
1686     return r;
1687 }
1688
1689 /*************************************************************************
1690  *  MsiEnumRelatedProductsA   [MSI.@]
1691  *
1692  */
1693 UINT WINAPI MsiEnumRelatedProductsA(LPCSTR szUpgradeCode, DWORD dwReserved,
1694                                     DWORD iProductIndex, LPSTR lpProductBuf)
1695 {
1696     LPWSTR szwUpgradeCode = NULL;
1697     WCHAR productW[GUID_SIZE];
1698     UINT r;
1699
1700     TRACE("%s %u %u %p\n", debugstr_a(szUpgradeCode), dwReserved,
1701           iProductIndex, lpProductBuf);
1702
1703     if (szUpgradeCode)
1704     {
1705         szwUpgradeCode = strdupAtoW( szUpgradeCode );
1706         if( !szwUpgradeCode )
1707             return ERROR_OUTOFMEMORY;
1708     }
1709
1710     r = MsiEnumRelatedProductsW( szwUpgradeCode, dwReserved,
1711                                  iProductIndex, productW );
1712     if (r == ERROR_SUCCESS)
1713     {
1714         WideCharToMultiByte( CP_ACP, 0, productW, GUID_SIZE,
1715                              lpProductBuf, GUID_SIZE, NULL, NULL );
1716     }
1717     msi_free( szwUpgradeCode);
1718     return r;
1719 }
1720
1721 /***********************************************************************
1722  * MsiEnumPatchesExA            [MSI.@]
1723  */
1724 UINT WINAPI MsiEnumPatchesExA(LPCSTR szProductCode, LPCSTR szUserSid,
1725         DWORD dwContext, DWORD dwFilter, DWORD dwIndex, LPSTR szPatchCode,
1726         LPSTR szTargetProductCode, MSIINSTALLCONTEXT *pdwTargetProductContext,
1727         LPSTR szTargetUserSid, LPDWORD pcchTargetUserSid)
1728 {
1729     LPWSTR prodcode = NULL;
1730     LPWSTR usersid = NULL;
1731     LPWSTR targsid = NULL;
1732     WCHAR patch[GUID_SIZE];
1733     WCHAR targprod[GUID_SIZE];
1734     DWORD len;
1735     UINT r;
1736
1737     TRACE("(%s, %s, %d, %d, %d, %p, %p, %p, %p, %p)\n",
1738           debugstr_a(szProductCode), debugstr_a(szUserSid), dwContext, dwFilter,
1739           dwIndex, szPatchCode, szTargetProductCode, pdwTargetProductContext,
1740           szTargetUserSid, pcchTargetUserSid);
1741
1742     if (szTargetUserSid && !pcchTargetUserSid)
1743         return ERROR_INVALID_PARAMETER;
1744
1745     if (szProductCode) prodcode = strdupAtoW(szProductCode);
1746     if (szUserSid) usersid = strdupAtoW(szUserSid);
1747
1748     r = MsiEnumPatchesExW(prodcode, usersid, dwContext, dwFilter, dwIndex,
1749                           patch, targprod, pdwTargetProductContext,
1750                           NULL, &len);
1751     if (r != ERROR_SUCCESS)
1752         goto done;
1753
1754     WideCharToMultiByte(CP_ACP, 0, patch, -1, szPatchCode,
1755                         GUID_SIZE, NULL, NULL);
1756     WideCharToMultiByte(CP_ACP, 0, targprod, -1, szTargetProductCode,
1757                         GUID_SIZE, NULL, NULL);
1758
1759     if (!szTargetUserSid)
1760     {
1761         if (pcchTargetUserSid)
1762             *pcchTargetUserSid = len;
1763
1764         goto done;
1765     }
1766
1767     targsid = msi_alloc(++len * sizeof(WCHAR));
1768     if (!targsid)
1769     {
1770         r = ERROR_OUTOFMEMORY;
1771         goto done;
1772     }
1773
1774     r = MsiEnumPatchesExW(prodcode, usersid, dwContext, dwFilter, dwIndex,
1775                           patch, targprod, pdwTargetProductContext,
1776                           targsid, &len);
1777     if (r != ERROR_SUCCESS || !szTargetUserSid)
1778         goto done;
1779
1780     WideCharToMultiByte(CP_ACP, 0, targsid, -1, szTargetUserSid,
1781                         *pcchTargetUserSid, NULL, NULL);
1782
1783     len = lstrlenW(targsid);
1784     if (*pcchTargetUserSid < len + 1)
1785     {
1786         r = ERROR_MORE_DATA;
1787         *pcchTargetUserSid = len * sizeof(WCHAR);
1788     }
1789     else
1790         *pcchTargetUserSid = len;
1791
1792 done:
1793     msi_free(prodcode);
1794     msi_free(usersid);
1795     msi_free(targsid);
1796
1797     return r;
1798 }
1799
1800 static UINT msi_get_patch_state(LPCWSTR prodcode, LPCWSTR usersid,
1801                                 MSIINSTALLCONTEXT context,
1802                                 LPWSTR patch, MSIPATCHSTATE *state)
1803 {
1804     DWORD type, val, size;
1805     HKEY prod, hkey = 0;
1806     HKEY udpatch = 0;
1807     LONG res;
1808     UINT r = ERROR_NO_MORE_ITEMS;
1809
1810     *state = MSIPATCHSTATE_INVALID;
1811
1812     r = MSIREG_OpenUserDataProductKey(prodcode, context,
1813                                       usersid, &prod, FALSE);
1814     if (r != ERROR_SUCCESS)
1815         return ERROR_NO_MORE_ITEMS;
1816
1817     res = RegOpenKeyExW(prod, szPatches, 0, KEY_READ, &hkey);
1818     if (res != ERROR_SUCCESS)
1819         goto done;
1820
1821     res = RegOpenKeyExW(hkey, patch, 0, KEY_READ, &udpatch);
1822     if (res != ERROR_SUCCESS)
1823         goto done;
1824
1825     size = sizeof(DWORD);
1826     res = RegGetValueW(udpatch, NULL, szState, RRF_RT_DWORD, &type, &val, &size);
1827     if (res != ERROR_SUCCESS ||
1828         val < MSIPATCHSTATE_APPLIED || val > MSIPATCHSTATE_REGISTERED)
1829     {
1830         r = ERROR_BAD_CONFIGURATION;
1831         goto done;
1832     }
1833
1834     *state = val;
1835     r = ERROR_SUCCESS;
1836
1837 done:
1838     RegCloseKey(udpatch);
1839     RegCloseKey(hkey);
1840     RegCloseKey(prod);
1841
1842     return r;
1843 }
1844
1845 static UINT msi_check_product_patches(LPCWSTR prodcode, LPCWSTR usersid,
1846         MSIINSTALLCONTEXT context, DWORD filter, DWORD index, DWORD *idx,
1847         LPWSTR patch, LPWSTR targetprod, MSIINSTALLCONTEXT *targetctx,
1848         LPWSTR targetsid, DWORD *sidsize, LPWSTR *transforms)
1849 {
1850     MSIPATCHSTATE state = MSIPATCHSTATE_INVALID;
1851     LPWSTR ptr, patches = NULL;
1852     HKEY prod, patchkey = 0;
1853     HKEY localprod = 0, localpatch = 0;
1854     DWORD type, size;
1855     LONG res;
1856     UINT temp, r = ERROR_NO_MORE_ITEMS;
1857
1858     if (MSIREG_OpenProductKey(prodcode, usersid, context,
1859                               &prod, FALSE) != ERROR_SUCCESS)
1860         return ERROR_NO_MORE_ITEMS;
1861
1862     size = 0;
1863     res = RegGetValueW(prod, szPatches, szPatches, RRF_RT_ANY, &type, NULL,
1864                        &size);
1865     if (res != ERROR_SUCCESS)
1866         goto done;
1867
1868     if (type != REG_MULTI_SZ)
1869     {
1870         r = ERROR_BAD_CONFIGURATION;
1871         goto done;
1872     }
1873
1874     patches = msi_alloc(size);
1875     if (!patches)
1876     {
1877         r = ERROR_OUTOFMEMORY;
1878         goto done;
1879     }
1880
1881     res = RegGetValueW(prod, szPatches, szPatches, RRF_RT_ANY, &type,
1882                        patches, &size);
1883     if (res != ERROR_SUCCESS)
1884         goto done;
1885
1886     for (ptr = patches; *ptr && r == ERROR_NO_MORE_ITEMS; ptr += lstrlenW(ptr) + 1)
1887     {
1888         if (!unsquash_guid(ptr, patch))
1889         {
1890             r = ERROR_BAD_CONFIGURATION;
1891             goto done;
1892         }
1893
1894         size = 0;
1895         res = RegGetValueW(prod, szPatches, ptr, RRF_RT_REG_SZ,
1896                            &type, NULL, &size);
1897         if (res != ERROR_SUCCESS)
1898             continue;
1899
1900         if (transforms)
1901         {
1902             *transforms = msi_alloc(size);
1903             if (!*transforms)
1904             {
1905                 r = ERROR_OUTOFMEMORY;
1906                 goto done;
1907             }
1908
1909             res = RegGetValueW(prod, szPatches, ptr, RRF_RT_REG_SZ,
1910                                &type, *transforms, &size);
1911             if (res != ERROR_SUCCESS)
1912                 continue;
1913         }
1914
1915         if (context == MSIINSTALLCONTEXT_USERMANAGED)
1916         {
1917             if (!(filter & MSIPATCHSTATE_APPLIED))
1918             {
1919                 temp = msi_get_patch_state(prodcode, usersid, context,
1920                                            ptr, &state);
1921                 if (temp == ERROR_BAD_CONFIGURATION)
1922                 {
1923                     r = ERROR_BAD_CONFIGURATION;
1924                     goto done;
1925                 }
1926
1927                 if (temp != ERROR_SUCCESS || !(filter & state))
1928                     continue;
1929             }
1930         }
1931         else if (context == MSIINSTALLCONTEXT_USERUNMANAGED)
1932         {
1933             if (!(filter & MSIPATCHSTATE_APPLIED))
1934             {
1935                 temp = msi_get_patch_state(prodcode, usersid, context,
1936                                            ptr, &state);
1937                 if (temp == ERROR_BAD_CONFIGURATION)
1938                 {
1939                     r = ERROR_BAD_CONFIGURATION;
1940                     goto done;
1941                 }
1942
1943                 if (temp != ERROR_SUCCESS || !(filter & state))
1944                     continue;
1945             }
1946             else
1947             {
1948                 temp = MSIREG_OpenUserDataPatchKey(patch, context,
1949                                                    &patchkey, FALSE);
1950                 RegCloseKey(patchkey);
1951                 if (temp != ERROR_SUCCESS)
1952                     continue;
1953             }
1954         }
1955         else if (context == MSIINSTALLCONTEXT_MACHINE)
1956         {
1957             usersid = szEmpty;
1958
1959             if (MSIREG_OpenUserDataProductKey(prodcode, context, NULL, &localprod, FALSE) == ERROR_SUCCESS &&
1960                 RegOpenKeyExW(localprod, szPatches, 0, KEY_READ, &localpatch) == ERROR_SUCCESS &&
1961                 RegOpenKeyExW(localpatch, ptr, 0, KEY_READ, &patchkey) == ERROR_SUCCESS)
1962             {
1963                 res = RegGetValueW(patchkey, NULL, szState, RRF_RT_REG_DWORD,
1964                                    &type, &state, &size);
1965
1966                 if (!(filter & state))
1967                     res = ERROR_NO_MORE_ITEMS;
1968
1969                 RegCloseKey(patchkey);
1970             }
1971
1972             RegCloseKey(localpatch);
1973             RegCloseKey(localprod);
1974
1975             if (res != ERROR_SUCCESS)
1976                 continue;
1977         }
1978
1979         if (*idx < index)
1980         {
1981             (*idx)++;
1982             continue;
1983         }
1984
1985         r = ERROR_SUCCESS;
1986         if (targetprod)
1987             lstrcpyW(targetprod, prodcode);
1988
1989         if (targetctx)
1990             *targetctx = context;
1991
1992         if (targetsid)
1993         {
1994             lstrcpynW(targetsid, usersid, *sidsize);
1995             if (lstrlenW(usersid) >= *sidsize)
1996                 r = ERROR_MORE_DATA;
1997         }
1998
1999         if (sidsize)
2000         {
2001             *sidsize = lstrlenW(usersid);
2002             if (!targetsid)
2003                 *sidsize *= sizeof(WCHAR);
2004         }
2005     }
2006
2007 done:
2008     RegCloseKey(prod);
2009     msi_free(patches);
2010
2011     return r;
2012 }
2013
2014 static UINT msi_enum_patches(LPCWSTR szProductCode, LPCWSTR szUserSid,
2015         DWORD dwContext, DWORD dwFilter, DWORD dwIndex, DWORD *idx,
2016         LPWSTR szPatchCode, LPWSTR szTargetProductCode,
2017         MSIINSTALLCONTEXT *pdwTargetProductContext, LPWSTR szTargetUserSid,
2018         LPDWORD pcchTargetUserSid, LPWSTR *szTransforms)
2019 {
2020     LPWSTR usersid = NULL;
2021     UINT r = ERROR_INVALID_PARAMETER;
2022
2023     if (!szUserSid)
2024     {
2025         szUserSid = usersid = get_user_sid();
2026         if (!usersid) return ERROR_FUNCTION_FAILED;
2027     }
2028
2029     if (dwContext & MSIINSTALLCONTEXT_USERMANAGED)
2030     {
2031         r = msi_check_product_patches(szProductCode, szUserSid,
2032                                       MSIINSTALLCONTEXT_USERMANAGED, dwFilter,
2033                                       dwIndex, idx, szPatchCode,
2034                                       szTargetProductCode,
2035                                       pdwTargetProductContext, szTargetUserSid,
2036                                       pcchTargetUserSid, szTransforms);
2037         if (r != ERROR_NO_MORE_ITEMS)
2038             goto done;
2039     }
2040
2041     if (dwContext & MSIINSTALLCONTEXT_USERUNMANAGED)
2042     {
2043         r = msi_check_product_patches(szProductCode, szUserSid,
2044                                       MSIINSTALLCONTEXT_USERUNMANAGED, dwFilter,
2045                                       dwIndex, idx, szPatchCode,
2046                                       szTargetProductCode,
2047                                       pdwTargetProductContext, szTargetUserSid,
2048                                       pcchTargetUserSid, szTransforms);
2049         if (r != ERROR_NO_MORE_ITEMS)
2050             goto done;
2051     }
2052
2053     if (dwContext & MSIINSTALLCONTEXT_MACHINE)
2054     {
2055         r = msi_check_product_patches(szProductCode, szUserSid,
2056                                       MSIINSTALLCONTEXT_MACHINE, dwFilter,
2057                                       dwIndex, idx, szPatchCode,
2058                                       szTargetProductCode,
2059                                       pdwTargetProductContext, szTargetUserSid,
2060                                       pcchTargetUserSid, szTransforms);
2061         if (r != ERROR_NO_MORE_ITEMS)
2062             goto done;
2063     }
2064
2065 done:
2066     LocalFree(usersid);
2067     return r;
2068 }
2069
2070 /***********************************************************************
2071  * MsiEnumPatchesExW            [MSI.@]
2072  */
2073 UINT WINAPI MsiEnumPatchesExW(LPCWSTR szProductCode, LPCWSTR szUserSid,
2074         DWORD dwContext, DWORD dwFilter, DWORD dwIndex, LPWSTR szPatchCode,
2075         LPWSTR szTargetProductCode, MSIINSTALLCONTEXT *pdwTargetProductContext,
2076         LPWSTR szTargetUserSid, LPDWORD pcchTargetUserSid)
2077 {
2078     WCHAR squished_pc[GUID_SIZE];
2079     DWORD idx = 0;
2080     UINT r;
2081
2082     static DWORD last_index;
2083
2084     TRACE("(%s, %s, %d, %d, %d, %p, %p, %p, %p, %p)\n",
2085           debugstr_w(szProductCode), debugstr_w(szUserSid), dwContext, dwFilter,
2086           dwIndex, szPatchCode, szTargetProductCode, pdwTargetProductContext,
2087           szTargetUserSid, pcchTargetUserSid);
2088
2089     if (!szProductCode || !squash_guid(szProductCode, squished_pc))
2090         return ERROR_INVALID_PARAMETER;
2091
2092     if (szUserSid && !strcmpW( szUserSid, szLocalSid ))
2093         return ERROR_INVALID_PARAMETER;
2094
2095     if (dwContext & MSIINSTALLCONTEXT_MACHINE && szUserSid)
2096         return ERROR_INVALID_PARAMETER;
2097
2098     if (dwContext <= MSIINSTALLCONTEXT_NONE ||
2099         dwContext > MSIINSTALLCONTEXT_ALL)
2100         return ERROR_INVALID_PARAMETER;
2101
2102     if (dwFilter <= MSIPATCHSTATE_INVALID || dwFilter > MSIPATCHSTATE_ALL)
2103         return ERROR_INVALID_PARAMETER;
2104
2105     if (dwIndex && dwIndex - last_index != 1)
2106         return ERROR_INVALID_PARAMETER;
2107
2108     if (dwIndex == 0)
2109         last_index = 0;
2110
2111     r = msi_enum_patches(szProductCode, szUserSid, dwContext, dwFilter,
2112                          dwIndex, &idx, szPatchCode, szTargetProductCode,
2113                          pdwTargetProductContext, szTargetUserSid,
2114                          pcchTargetUserSid, NULL);
2115
2116     if (r == ERROR_SUCCESS)
2117         last_index = dwIndex;
2118     else
2119         last_index = 0;
2120
2121     return r;
2122 }
2123
2124 /***********************************************************************
2125  * MsiEnumPatchesA            [MSI.@]
2126  */
2127 UINT WINAPI MsiEnumPatchesA(LPCSTR szProduct, DWORD iPatchIndex,
2128         LPSTR lpPatchBuf, LPSTR lpTransformsBuf, LPDWORD pcchTransformsBuf)
2129 {
2130     LPWSTR product, transforms;
2131     WCHAR patch[GUID_SIZE];
2132     DWORD len;
2133     UINT r;
2134
2135     TRACE("(%s %d %p %p %p)\n", debugstr_a(szProduct), iPatchIndex,
2136           lpPatchBuf, lpTransformsBuf, pcchTransformsBuf);
2137
2138     if (!szProduct || !lpPatchBuf || !lpTransformsBuf || !pcchTransformsBuf)
2139         return ERROR_INVALID_PARAMETER;
2140
2141     product = strdupAtoW(szProduct);
2142     if (!product)
2143         return ERROR_OUTOFMEMORY;
2144
2145     len = *pcchTransformsBuf;
2146     transforms = msi_alloc( len * sizeof(WCHAR) );
2147     if (!transforms)
2148     {
2149         r = ERROR_OUTOFMEMORY;
2150         goto done;
2151     }
2152
2153     r = MsiEnumPatchesW(product, iPatchIndex, patch, transforms, &len);
2154     if (r != ERROR_SUCCESS && r != ERROR_MORE_DATA)
2155         goto done;
2156
2157     WideCharToMultiByte(CP_ACP, 0, patch, -1, lpPatchBuf,
2158                         GUID_SIZE, NULL, NULL);
2159
2160     if (!WideCharToMultiByte(CP_ACP, 0, transforms, -1, lpTransformsBuf,
2161                              *pcchTransformsBuf, NULL, NULL))
2162         r = ERROR_MORE_DATA;
2163
2164     if (r == ERROR_MORE_DATA)
2165     {
2166         lpTransformsBuf[*pcchTransformsBuf - 1] = '\0';
2167         *pcchTransformsBuf = len * 2;
2168     }
2169     else
2170         *pcchTransformsBuf = strlen( lpTransformsBuf );
2171
2172 done:
2173     msi_free(transforms);
2174     msi_free(product);
2175
2176     return r;
2177 }
2178
2179 /***********************************************************************
2180  * MsiEnumPatchesW            [MSI.@]
2181  */
2182 UINT WINAPI MsiEnumPatchesW(LPCWSTR szProduct, DWORD iPatchIndex,
2183         LPWSTR lpPatchBuf, LPWSTR lpTransformsBuf, LPDWORD pcchTransformsBuf)
2184 {
2185     WCHAR squished_pc[GUID_SIZE];
2186     LPWSTR transforms = NULL;
2187     HKEY prod;
2188     DWORD idx = 0;
2189     UINT r;
2190
2191     TRACE("(%s %d %p %p %p)\n", debugstr_w(szProduct), iPatchIndex,
2192           lpPatchBuf, lpTransformsBuf, pcchTransformsBuf);
2193
2194     if (!szProduct || !squash_guid(szProduct, squished_pc))
2195         return ERROR_INVALID_PARAMETER;
2196
2197     if (!lpPatchBuf || !lpTransformsBuf || !pcchTransformsBuf)
2198         return ERROR_INVALID_PARAMETER;
2199
2200     if (MSIREG_OpenProductKey(szProduct, NULL, MSIINSTALLCONTEXT_USERMANAGED,
2201                               &prod, FALSE) != ERROR_SUCCESS &&
2202         MSIREG_OpenProductKey(szProduct, NULL, MSIINSTALLCONTEXT_USERUNMANAGED,
2203                               &prod, FALSE) != ERROR_SUCCESS &&
2204         MSIREG_OpenProductKey(szProduct, NULL, MSIINSTALLCONTEXT_MACHINE,
2205                               &prod, FALSE) != ERROR_SUCCESS)
2206         return ERROR_UNKNOWN_PRODUCT;
2207
2208     RegCloseKey(prod);
2209
2210     r = msi_enum_patches(szProduct, NULL, MSIINSTALLCONTEXT_ALL,
2211                          MSIPATCHSTATE_ALL, iPatchIndex, &idx, lpPatchBuf,
2212                          NULL, NULL, NULL, NULL, &transforms);
2213     if (r != ERROR_SUCCESS)
2214         goto done;
2215
2216     lstrcpynW(lpTransformsBuf, transforms, *pcchTransformsBuf);
2217     if (*pcchTransformsBuf <= lstrlenW(transforms))
2218     {
2219         r = ERROR_MORE_DATA;
2220         *pcchTransformsBuf = lstrlenW(transforms);
2221     }
2222     else
2223         *pcchTransformsBuf = lstrlenW(transforms);
2224
2225 done:
2226     msi_free(transforms);
2227     return r;
2228 }
2229
2230 UINT WINAPI MsiEnumProductsExA( LPCSTR product, LPCSTR usersid, DWORD ctx, DWORD index,
2231                                 CHAR installed_product[GUID_SIZE],
2232                                 MSIINSTALLCONTEXT *installed_ctx, LPSTR sid, LPDWORD sid_len )
2233 {
2234     UINT r;
2235     WCHAR installed_productW[GUID_SIZE], *productW = NULL, *usersidW = NULL, *sidW = NULL;
2236
2237     TRACE("%s, %s, %u, %u, %p, %p, %p, %p\n", debugstr_a(product), debugstr_a(usersid),
2238           ctx, index, installed_product, installed_ctx, sid, sid_len);
2239
2240     if (sid && !sid_len) return ERROR_INVALID_PARAMETER;
2241     if (product && !(productW = strdupAtoW( product ))) return ERROR_OUTOFMEMORY;
2242     if (usersid && !(usersidW = strdupAtoW( usersid )))
2243     {
2244         msi_free( productW );
2245         return ERROR_OUTOFMEMORY;
2246     }
2247     if (sid && !(sidW = msi_alloc( *sid_len * sizeof(WCHAR) )))
2248     {
2249         msi_free( usersidW );
2250         msi_free( productW );
2251         return ERROR_OUTOFMEMORY;
2252     }
2253     r = MsiEnumProductsExW( productW, usersidW, ctx, index, installed_productW,
2254                             installed_ctx, sidW, sid_len );
2255     if (r == ERROR_SUCCESS)
2256     {
2257         if (installed_product) WideCharToMultiByte( CP_ACP, 0, installed_productW, GUID_SIZE,
2258                                                     installed_product, GUID_SIZE, NULL, NULL );
2259         if (sid) WideCharToMultiByte( CP_ACP, 0, sidW, *sid_len + 1, sid, *sid_len + 1, NULL, NULL );
2260     }
2261     msi_free( productW );
2262     msi_free( usersidW );
2263     msi_free( sidW );
2264     return r;
2265 }
2266
2267 static UINT fetch_machine_product( const WCHAR *match, DWORD index, DWORD *idx,
2268                                    WCHAR installed_product[GUID_SIZE],
2269                                    MSIINSTALLCONTEXT *installed_ctx, WCHAR *sid, DWORD *sid_len )
2270 {
2271     static const WCHAR productsW[] =
2272         {'S','o','f','t','w','a','r','e','\\','C','l','a','s','s','e','s','\\',
2273          'I','n','s','t','a','l','l','e','r','\\','P','r','o','d','u','c','t','s',0};
2274     UINT r;
2275     WCHAR product[GUID_SIZE];
2276     DWORD i = 0, len;
2277     REGSAM access = KEY_ENUMERATE_SUB_KEYS | KEY_WOW64_64KEY;
2278     HKEY key;
2279
2280     if (RegOpenKeyExW( HKEY_LOCAL_MACHINE, productsW, 0, access, &key ))
2281         return ERROR_NO_MORE_ITEMS;
2282
2283     len = sizeof(product)/sizeof(product[0]);
2284     while (!RegEnumKeyExW( key, i, product, &len, NULL, NULL, NULL, NULL ))
2285     {
2286         if (match && strcmpW( match, product ))
2287         {
2288             i++;
2289             len = sizeof(product)/sizeof(product[0]);
2290             continue;
2291         }
2292         if (*idx == index) goto found;
2293         (*idx)++;
2294         len = sizeof(product)/sizeof(product[0]);
2295         i++;
2296     }
2297     RegCloseKey( key );
2298     return ERROR_NO_MORE_ITEMS;
2299
2300 found:
2301     if (sid_len && *sid_len < 1)
2302     {
2303         *sid_len = 1;
2304         r = ERROR_MORE_DATA;
2305     }
2306     else
2307     {
2308         if (installed_product) unsquash_guid( product, installed_product );
2309         if (installed_ctx) *installed_ctx = MSIINSTALLCONTEXT_MACHINE;
2310         if (sid)
2311         {
2312             sid[0] = 0;
2313             *sid_len = 0;
2314         }
2315         r = ERROR_SUCCESS;
2316     }
2317     RegCloseKey( key );
2318     return r;
2319 }
2320
2321 static UINT fetch_user_product( const WCHAR *match, const WCHAR *usersid, DWORD ctx, DWORD index,
2322                                 DWORD *idx, WCHAR installed_product[GUID_SIZE],
2323                                 MSIINSTALLCONTEXT *installed_ctx, WCHAR *sid, DWORD *sid_len )
2324 {
2325     static const WCHAR managedW[] =
2326         {'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
2327          'W','i','n','d','o','w','s','\\','C','u','r','r','e','n','t','V','e','r','s',
2328          'i','o','n','\\','I','n','s','t','a','l','l','e','r','\\','M','a','n','a','g','e','d',0};
2329     static const WCHAR managed_productsW[] =
2330         {'\\','I','n','s','t','a','l','l','e','r','\\','P','r','o','d','u','c','t','s',0};
2331     static const WCHAR unmanaged_productsW[] =
2332         {'\\','S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
2333          'I','n','s','t','a','l','l','e','r','\\','P','r','o','d','u','c','t','s',0};
2334     UINT r;
2335     const WCHAR *subkey;
2336     WCHAR path[MAX_PATH], product[GUID_SIZE], user[128];
2337     DWORD i = 0, j = 0, len_product, len_user;
2338     REGSAM access = KEY_ENUMERATE_SUB_KEYS | KEY_WOW64_64KEY;
2339     HKEY key_users, key_products;
2340
2341     if (ctx == MSIINSTALLCONTEXT_USERMANAGED)
2342     {
2343         subkey = managed_productsW;
2344         if (RegOpenKeyExW( HKEY_LOCAL_MACHINE, managedW, 0, access, &key_users ))
2345             return ERROR_NO_MORE_ITEMS;
2346     }
2347     else if (ctx == MSIINSTALLCONTEXT_USERUNMANAGED)
2348     {
2349         subkey = unmanaged_productsW;
2350         if (RegOpenKeyExW( HKEY_USERS, NULL, 0, access, &key_users ))
2351             return ERROR_NO_MORE_ITEMS;
2352     }
2353     else return ERROR_INVALID_PARAMETER;
2354
2355     len_user = sizeof(user)/sizeof(user[0]);
2356     while (!RegEnumKeyExW( key_users, i, user, &len_user, NULL, NULL, NULL, NULL ))
2357     {
2358         if (strcmpW( usersid, user ) && strcmpW( usersid, szAllSid ))
2359         {
2360             i++;
2361             len_user = sizeof(user)/sizeof(user[0]);
2362             continue;
2363         }
2364         strcpyW( path, user );
2365         strcatW( path, subkey );
2366         if ((r = RegOpenKeyExW( key_users, path, 0, access, &key_products )))
2367         {
2368             i++;
2369             len_user = sizeof(user)/sizeof(user[0]);
2370             continue;
2371         }
2372         len_product = sizeof(product)/sizeof(product[0]);
2373         while (!RegEnumKeyExW( key_products, j, product, &len_product, NULL, NULL, NULL, NULL ))
2374         {
2375             if (match && strcmpW( match, product ))
2376             {
2377                 j++;
2378                 len_product = sizeof(product)/sizeof(product[0]);
2379                 continue;
2380             }
2381             if (*idx == index) goto found;
2382             (*idx)++;
2383             len_product = sizeof(product)/sizeof(product[0]);
2384             j++;
2385         }
2386         RegCloseKey( key_products );
2387         len_user = sizeof(user)/sizeof(user[0]);
2388         i++;
2389     }
2390     RegCloseKey( key_users );
2391     return ERROR_NO_MORE_ITEMS;
2392
2393 found:
2394     if (sid_len && *sid_len <= len_user)
2395     {
2396         *sid_len = len_user;
2397         r = ERROR_MORE_DATA;
2398     }
2399     else
2400     {
2401         if (installed_product) unsquash_guid( product, installed_product );
2402         if (installed_ctx) *installed_ctx = ctx;
2403         if (sid)
2404         {
2405             strcpyW( sid, user );
2406             *sid_len = len_user;
2407         }
2408         r = ERROR_SUCCESS;
2409     }
2410     RegCloseKey( key_products );
2411     RegCloseKey( key_users );
2412     return r;
2413 }
2414
2415 static UINT enum_products( const WCHAR *product, const WCHAR *usersid, DWORD ctx, DWORD index,
2416                            DWORD *idx, WCHAR installed_product[GUID_SIZE],
2417                            MSIINSTALLCONTEXT *installed_ctx, WCHAR *sid, DWORD *sid_len )
2418 {
2419     UINT r = ERROR_NO_MORE_ITEMS;
2420     WCHAR *user = NULL;
2421
2422     if (!usersid)
2423     {
2424         usersid = user = get_user_sid();
2425         if (!user) return ERROR_FUNCTION_FAILED;
2426     }
2427     if (ctx & MSIINSTALLCONTEXT_MACHINE)
2428     {
2429         r = fetch_machine_product( product, index, idx, installed_product, installed_ctx,
2430                                    sid, sid_len );
2431         if (r != ERROR_NO_MORE_ITEMS) goto done;
2432     }
2433     if (ctx & MSIINSTALLCONTEXT_USERUNMANAGED)
2434     {
2435         r = fetch_user_product( product, usersid, MSIINSTALLCONTEXT_USERUNMANAGED, index,
2436                                 idx, installed_product, installed_ctx, sid, sid_len );
2437         if (r != ERROR_NO_MORE_ITEMS) goto done;
2438     }
2439     if (ctx & MSIINSTALLCONTEXT_USERMANAGED)
2440     {
2441         r = fetch_user_product( product, usersid, MSIINSTALLCONTEXT_USERMANAGED, index,
2442                                 idx, installed_product, installed_ctx, sid, sid_len );
2443         if (r != ERROR_NO_MORE_ITEMS) goto done;
2444     }
2445
2446 done:
2447     LocalFree( user );
2448     return r;
2449 }
2450
2451 UINT WINAPI MsiEnumProductsExW( LPCWSTR product, LPCWSTR usersid, DWORD ctx, DWORD index,
2452                                 WCHAR installed_product[GUID_SIZE],
2453                                 MSIINSTALLCONTEXT *installed_ctx, LPWSTR sid, LPDWORD sid_len )
2454 {
2455     UINT r;
2456     DWORD idx = 0;
2457     static DWORD last_index;
2458
2459     TRACE("%s, %s, %u, %u, %p, %p, %p, %p\n", debugstr_w(product), debugstr_w(usersid),
2460           ctx, index, installed_product, installed_ctx, sid, sid_len);
2461
2462     if ((sid && !sid_len) || !ctx || (usersid && ctx == MSIINSTALLCONTEXT_MACHINE))
2463         return ERROR_INVALID_PARAMETER;
2464
2465     if (index && index - last_index != 1)
2466         return ERROR_INVALID_PARAMETER;
2467
2468     if (!index) last_index = 0;
2469
2470     r = enum_products( product, usersid, ctx, index, &idx, installed_product, installed_ctx,
2471                        sid, sid_len );
2472     if (r == ERROR_SUCCESS)
2473         last_index = index;
2474     else
2475         last_index = 0;
2476
2477     return r;
2478 }