777 lines
25 KiB
C
777 lines
25 KiB
C
/*
|
|
* Implementation of the Microsoft Installer (msi.dll)
|
|
*
|
|
* Copyright 2010 Hans Leidekker for CodeWeavers
|
|
*
|
|
* This library is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU Lesser General Public
|
|
* License as published by the Free Software Foundation; either
|
|
* version 2.1 of the License, or (at your option) any later version.
|
|
*
|
|
* This library is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
* Lesser General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public
|
|
* License along with this library; if not, write to the Free Software
|
|
* Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
|
|
*/
|
|
|
|
#include <stdarg.h>
|
|
|
|
#define COBJMACROS
|
|
|
|
#include "windef.h"
|
|
#include "winbase.h"
|
|
#include "winreg.h"
|
|
#include "wine/debug.h"
|
|
#include "wine/unicode.h"
|
|
#include "msipriv.h"
|
|
|
|
WINE_DEFAULT_DEBUG_CHANNEL(msi);
|
|
|
|
static HRESULT (WINAPI *pCreateAssemblyCacheNet10)( IAssemblyCache **, DWORD );
|
|
static HRESULT (WINAPI *pCreateAssemblyCacheNet11)( IAssemblyCache **, DWORD );
|
|
static HRESULT (WINAPI *pCreateAssemblyCacheNet20)( IAssemblyCache **, DWORD );
|
|
static HRESULT (WINAPI *pCreateAssemblyCacheNet40)( IAssemblyCache **, DWORD );
|
|
static HRESULT (WINAPI *pGetFileVersion)( LPCWSTR, LPWSTR, DWORD, DWORD * );
|
|
static HRESULT (WINAPI *pCreateAssemblyNameObject)( IAssemblyName **, LPCWSTR, DWORD, LPVOID );
|
|
static HRESULT (WINAPI *pCreateAssemblyEnum)( IAssemblyEnum **, IUnknown *, IAssemblyName *, DWORD, LPVOID );
|
|
|
|
static HMODULE hfusion10, hfusion11, hfusion20, hfusion40, hmscoree;
|
|
static BOOL assembly_caches_initialized;
|
|
|
|
static BOOL init_function_pointers( void )
|
|
{
|
|
static const WCHAR szFusion[] = {'f','u','s','i','o','n','.','d','l','l',0};
|
|
static const WCHAR szMscoree[] = {'\\','m','s','c','o','r','e','e','.','d','l','l',0};
|
|
static const WCHAR szVersion10[] = {'v','1','.','0','.','3','7','0','5',0};
|
|
static const WCHAR szVersion11[] = {'v','1','.','1','.','4','3','2','2',0};
|
|
static const WCHAR szVersion20[] = {'v','2','.','0','.','5','0','7','2','7',0};
|
|
static const WCHAR szVersion40[] = {'v','4','.','0','.','3','0','3','1','9',0};
|
|
HRESULT (WINAPI *pLoadLibraryShim)( LPCWSTR, LPCWSTR, LPVOID, HMODULE * );
|
|
WCHAR path[MAX_PATH];
|
|
DWORD len = GetSystemDirectoryW( path, MAX_PATH );
|
|
|
|
strcpyW( path + len, szMscoree );
|
|
if (hmscoree || !(hmscoree = LoadLibraryW( path ))) return TRUE;
|
|
pGetFileVersion = (void *)GetProcAddress( hmscoree, "GetFileVersion" ); /* missing from v1.0.3705 */
|
|
if (!(pLoadLibraryShim = (void *)GetProcAddress( hmscoree, "LoadLibraryShim" )))
|
|
{
|
|
FreeLibrary( hmscoree );
|
|
hmscoree = NULL;
|
|
return TRUE;
|
|
}
|
|
if (!pLoadLibraryShim( szFusion, szVersion10, NULL, &hfusion10 ))
|
|
pCreateAssemblyCacheNet10 = (void *)GetProcAddress( hfusion10, "CreateAssemblyCache" );
|
|
|
|
if (!pLoadLibraryShim( szFusion, szVersion11, NULL, &hfusion11 ))
|
|
pCreateAssemblyCacheNet11 = (void *)GetProcAddress( hfusion11, "CreateAssemblyCache" );
|
|
|
|
if (!pLoadLibraryShim( szFusion, szVersion20, NULL, &hfusion20 ))
|
|
pCreateAssemblyCacheNet20 = (void *)GetProcAddress( hfusion20, "CreateAssemblyCache" );
|
|
|
|
if (!pLoadLibraryShim( szFusion, szVersion40, NULL, &hfusion40 ))
|
|
{
|
|
pCreateAssemblyCacheNet40 = (void *)GetProcAddress( hfusion40, "CreateAssemblyCache" );
|
|
pCreateAssemblyNameObject = (void *)GetProcAddress( hfusion40, "CreateAssemblyNameObject" );
|
|
pCreateAssemblyEnum = (void *)GetProcAddress( hfusion40, "CreateAssemblyEnum" );
|
|
}
|
|
return TRUE;
|
|
}
|
|
|
|
BOOL msi_init_assembly_caches( MSIPACKAGE *package )
|
|
{
|
|
if (assembly_caches_initialized) return TRUE;
|
|
if (!init_function_pointers()) return FALSE;
|
|
|
|
if (CreateAssemblyCache( &package->cache_sxs, 0 ) != S_OK) return FALSE;
|
|
if (pCreateAssemblyCacheNet10) pCreateAssemblyCacheNet10( &package->cache_net[CLR_VERSION_V10], 0 );
|
|
if (pCreateAssemblyCacheNet11) pCreateAssemblyCacheNet11( &package->cache_net[CLR_VERSION_V11], 0 );
|
|
if (pCreateAssemblyCacheNet20) pCreateAssemblyCacheNet20( &package->cache_net[CLR_VERSION_V20], 0 );
|
|
if (pCreateAssemblyCacheNet40) pCreateAssemblyCacheNet40( &package->cache_net[CLR_VERSION_V40], 0 );
|
|
|
|
assembly_caches_initialized = TRUE;
|
|
return TRUE;
|
|
}
|
|
|
|
void msi_destroy_assembly_caches( MSIPACKAGE *package )
|
|
{
|
|
UINT i;
|
|
|
|
if (package->cache_sxs)
|
|
{
|
|
IAssemblyCache_Release( package->cache_sxs );
|
|
package->cache_sxs = NULL;
|
|
}
|
|
for (i = 0; i < CLR_VERSION_MAX; i++)
|
|
{
|
|
if (package->cache_net[i])
|
|
{
|
|
IAssemblyCache_Release( package->cache_net[i] );
|
|
package->cache_net[i] = NULL;
|
|
}
|
|
}
|
|
pCreateAssemblyCacheNet10 = NULL;
|
|
pCreateAssemblyCacheNet11 = NULL;
|
|
pCreateAssemblyCacheNet20 = NULL;
|
|
pCreateAssemblyCacheNet40 = NULL;
|
|
pGetFileVersion = NULL;
|
|
pCreateAssemblyNameObject = NULL;
|
|
pCreateAssemblyEnum = NULL;
|
|
FreeLibrary( hfusion10 );
|
|
FreeLibrary( hfusion11 );
|
|
FreeLibrary( hfusion20 );
|
|
FreeLibrary( hfusion40 );
|
|
FreeLibrary( hmscoree );
|
|
hfusion10 = NULL;
|
|
hfusion11 = NULL;
|
|
hfusion20 = NULL;
|
|
hfusion40 = NULL;
|
|
hmscoree = NULL;
|
|
}
|
|
|
|
static MSIRECORD *get_assembly_record( MSIPACKAGE *package, const WCHAR *comp )
|
|
{
|
|
static const WCHAR query[] = {
|
|
'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ',
|
|
'`','M','s','i','A','s','s','e','m','b','l','y','`',' ',
|
|
'W','H','E','R','E',' ','`','C','o','m','p','o','n','e','n','t','_','`',
|
|
' ','=',' ','\'','%','s','\'',0};
|
|
MSIQUERY *view;
|
|
MSIRECORD *rec;
|
|
UINT r;
|
|
|
|
r = MSI_OpenQuery( package->db, &view, query, comp );
|
|
if (r != ERROR_SUCCESS)
|
|
return NULL;
|
|
|
|
r = MSI_ViewExecute( view, NULL );
|
|
if (r != ERROR_SUCCESS)
|
|
{
|
|
msiobj_release( &view->hdr );
|
|
return NULL;
|
|
}
|
|
r = MSI_ViewFetch( view, &rec );
|
|
if (r != ERROR_SUCCESS)
|
|
{
|
|
msiobj_release( &view->hdr );
|
|
return NULL;
|
|
}
|
|
if (!MSI_RecordGetString( rec, 4 ))
|
|
TRACE("component is a global assembly\n");
|
|
|
|
msiobj_release( &view->hdr );
|
|
return rec;
|
|
}
|
|
|
|
struct assembly_name
|
|
{
|
|
UINT count;
|
|
UINT index;
|
|
WCHAR **attrs;
|
|
};
|
|
|
|
static UINT get_assembly_name_attribute( MSIRECORD *rec, LPVOID param )
|
|
{
|
|
static const WCHAR fmtW[] = {'%','s','=','"','%','s','"',0};
|
|
static const WCHAR nameW[] = {'n','a','m','e',0};
|
|
struct assembly_name *name = param;
|
|
const WCHAR *attr = MSI_RecordGetString( rec, 2 );
|
|
const WCHAR *value = MSI_RecordGetString( rec, 3 );
|
|
int len = strlenW( fmtW ) + strlenW( attr ) + strlenW( value );
|
|
|
|
if (!(name->attrs[name->index] = msi_alloc( len * sizeof(WCHAR) )))
|
|
return ERROR_OUTOFMEMORY;
|
|
|
|
if (!strcmpiW( attr, nameW )) strcpyW( name->attrs[name->index++], value );
|
|
else sprintfW( name->attrs[name->index++], fmtW, attr, value );
|
|
return ERROR_SUCCESS;
|
|
}
|
|
|
|
static WCHAR *get_assembly_display_name( MSIDATABASE *db, const WCHAR *comp, MSIASSEMBLY *assembly )
|
|
{
|
|
static const WCHAR commaW[] = {',',0};
|
|
static const WCHAR queryW[] = {
|
|
'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ',
|
|
'`','M','s','i','A','s','s','e','m','b','l','y','N','a','m','e','`',' ',
|
|
'W','H','E','R','E',' ','`','C','o','m','p','o','n','e','n','t','_','`',
|
|
' ','=',' ','\'','%','s','\'',0};
|
|
struct assembly_name name;
|
|
WCHAR *display_name = NULL;
|
|
MSIQUERY *view;
|
|
UINT i, r;
|
|
int len;
|
|
|
|
r = MSI_OpenQuery( db, &view, queryW, comp );
|
|
if (r != ERROR_SUCCESS)
|
|
return NULL;
|
|
|
|
name.count = 0;
|
|
name.index = 0;
|
|
name.attrs = NULL;
|
|
MSI_IterateRecords( view, &name.count, NULL, NULL );
|
|
if (!name.count) goto done;
|
|
|
|
name.attrs = msi_alloc( name.count * sizeof(WCHAR *) );
|
|
if (!name.attrs) goto done;
|
|
|
|
MSI_IterateRecords( view, NULL, get_assembly_name_attribute, &name );
|
|
|
|
len = 0;
|
|
for (i = 0; i < name.count; i++) len += strlenW( name.attrs[i] ) + 1;
|
|
|
|
display_name = msi_alloc( (len + 1) * sizeof(WCHAR) );
|
|
if (display_name)
|
|
{
|
|
display_name[0] = 0;
|
|
for (i = 0; i < name.count; i++)
|
|
{
|
|
strcatW( display_name, name.attrs[i] );
|
|
if (i < name.count - 1) strcatW( display_name, commaW );
|
|
}
|
|
}
|
|
|
|
done:
|
|
msiobj_release( &view->hdr );
|
|
if (name.attrs)
|
|
{
|
|
for (i = 0; i < name.count; i++) msi_free( name.attrs[i] );
|
|
msi_free( name.attrs );
|
|
}
|
|
return display_name;
|
|
}
|
|
|
|
static BOOL is_assembly_installed( IAssemblyCache *cache, const WCHAR *display_name )
|
|
{
|
|
HRESULT hr;
|
|
ASSEMBLY_INFO info;
|
|
|
|
if (!cache) return FALSE;
|
|
|
|
memset( &info, 0, sizeof(info) );
|
|
info.cbAssemblyInfo = sizeof(info);
|
|
hr = IAssemblyCache_QueryAssemblyInfo( cache, 0, display_name, &info );
|
|
if (hr == S_OK /* sxs version */ || hr == E_NOT_SUFFICIENT_BUFFER)
|
|
{
|
|
return (info.dwAssemblyFlags == ASSEMBLYINFO_FLAG_INSTALLED);
|
|
}
|
|
TRACE("QueryAssemblyInfo returned 0x%08x\n", hr);
|
|
return FALSE;
|
|
}
|
|
|
|
WCHAR *msi_get_assembly_path( MSIPACKAGE *package, const WCHAR *displayname )
|
|
{
|
|
HRESULT hr;
|
|
ASSEMBLY_INFO info;
|
|
IAssemblyCache *cache = package->cache_net[CLR_VERSION_V40];
|
|
|
|
if (!cache) return NULL;
|
|
|
|
memset( &info, 0, sizeof(info) );
|
|
info.cbAssemblyInfo = sizeof(info);
|
|
hr = IAssemblyCache_QueryAssemblyInfo( cache, 0, displayname, &info );
|
|
if (hr != E_NOT_SUFFICIENT_BUFFER) return NULL;
|
|
|
|
if (!(info.pszCurrentAssemblyPathBuf = msi_alloc( info.cchBuf * sizeof(WCHAR) ))) return NULL;
|
|
|
|
hr = IAssemblyCache_QueryAssemblyInfo( cache, 0, displayname, &info );
|
|
if (FAILED( hr ))
|
|
{
|
|
msi_free( info.pszCurrentAssemblyPathBuf );
|
|
return NULL;
|
|
}
|
|
TRACE("returning %s\n", debugstr_w(info.pszCurrentAssemblyPathBuf));
|
|
return info.pszCurrentAssemblyPathBuf;
|
|
}
|
|
|
|
IAssemblyEnum *msi_create_assembly_enum( MSIPACKAGE *package, const WCHAR *displayname )
|
|
{
|
|
HRESULT hr;
|
|
IAssemblyName *name;
|
|
IAssemblyEnum *ret;
|
|
WCHAR *str;
|
|
UINT len = 0;
|
|
|
|
if (!pCreateAssemblyNameObject || !pCreateAssemblyEnum) return NULL;
|
|
|
|
hr = pCreateAssemblyNameObject( &name, displayname, CANOF_PARSE_DISPLAY_NAME, NULL );
|
|
if (FAILED( hr )) return NULL;
|
|
|
|
hr = IAssemblyName_GetName( name, &len, NULL );
|
|
if (hr != E_NOT_SUFFICIENT_BUFFER || !(str = msi_alloc( len * sizeof(WCHAR) )))
|
|
{
|
|
IAssemblyName_Release( name );
|
|
return NULL;
|
|
}
|
|
|
|
hr = IAssemblyName_GetName( name, &len, str );
|
|
IAssemblyName_Release( name );
|
|
if (FAILED( hr ))
|
|
{
|
|
msi_free( str );
|
|
return NULL;
|
|
}
|
|
|
|
hr = pCreateAssemblyNameObject( &name, str, 0, NULL );
|
|
msi_free( str );
|
|
if (FAILED( hr )) return NULL;
|
|
|
|
hr = pCreateAssemblyEnum( &ret, NULL, name, ASM_CACHE_GAC, NULL );
|
|
IAssemblyName_Release( name );
|
|
if (FAILED( hr )) return NULL;
|
|
|
|
return ret;
|
|
}
|
|
|
|
static const WCHAR clr_version_v10[] = {'v','1','.','0','.','3','7','0','5',0};
|
|
static const WCHAR clr_version_v11[] = {'v','1','.','1','.','4','3','2','2',0};
|
|
static const WCHAR clr_version_v20[] = {'v','2','.','0','.','5','0','7','2','7',0};
|
|
static const WCHAR clr_version_v40[] = {'v','4','.','0','.','3','0','3','1','9',0};
|
|
static const WCHAR clr_version_unknown[] = {'u','n','k','n','o','w','n',0};
|
|
|
|
static const WCHAR *clr_version[] =
|
|
{
|
|
clr_version_v10,
|
|
clr_version_v11,
|
|
clr_version_v20,
|
|
clr_version_v40
|
|
};
|
|
|
|
static const WCHAR *get_clr_version_str( enum clr_version version )
|
|
{
|
|
if (version >= ARRAY_SIZE( clr_version )) return clr_version_unknown;
|
|
return clr_version[version];
|
|
}
|
|
|
|
/* assembly caches must be initialized */
|
|
MSIASSEMBLY *msi_load_assembly( MSIPACKAGE *package, MSICOMPONENT *comp )
|
|
{
|
|
MSIRECORD *rec;
|
|
MSIASSEMBLY *a;
|
|
|
|
if (!(rec = get_assembly_record( package, comp->Component ))) return NULL;
|
|
if (!(a = msi_alloc_zero( sizeof(MSIASSEMBLY) )))
|
|
{
|
|
msiobj_release( &rec->hdr );
|
|
return NULL;
|
|
}
|
|
a->feature = strdupW( MSI_RecordGetString( rec, 2 ) );
|
|
TRACE("feature %s\n", debugstr_w(a->feature));
|
|
|
|
a->manifest = strdupW( MSI_RecordGetString( rec, 3 ) );
|
|
TRACE("manifest %s\n", debugstr_w(a->manifest));
|
|
|
|
a->application = strdupW( MSI_RecordGetString( rec, 4 ) );
|
|
TRACE("application %s\n", debugstr_w(a->application));
|
|
|
|
a->attributes = MSI_RecordGetInteger( rec, 5 );
|
|
TRACE("attributes %u\n", a->attributes);
|
|
|
|
if (!(a->display_name = get_assembly_display_name( package->db, comp->Component, a )))
|
|
{
|
|
WARN("can't get display name\n");
|
|
msiobj_release( &rec->hdr );
|
|
msi_free( a->feature );
|
|
msi_free( a->manifest );
|
|
msi_free( a->application );
|
|
msi_free( a );
|
|
return NULL;
|
|
}
|
|
TRACE("display name %s\n", debugstr_w(a->display_name));
|
|
|
|
if (a->application)
|
|
{
|
|
/* We can't check the manifest here because the target path may still change.
|
|
So we assume that the assembly is not installed and lean on the InstallFiles
|
|
action to determine which files need to be installed.
|
|
*/
|
|
a->installed = FALSE;
|
|
}
|
|
else
|
|
{
|
|
if (a->attributes == msidbAssemblyAttributesWin32)
|
|
a->installed = is_assembly_installed( package->cache_sxs, a->display_name );
|
|
else
|
|
{
|
|
UINT i;
|
|
for (i = 0; i < CLR_VERSION_MAX; i++)
|
|
{
|
|
a->clr_version[i] = is_assembly_installed( package->cache_net[i], a->display_name );
|
|
if (a->clr_version[i])
|
|
{
|
|
TRACE("runtime version %s\n", debugstr_w(get_clr_version_str( i )));
|
|
a->installed = TRUE;
|
|
break;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
TRACE("assembly is %s\n", a->installed ? "installed" : "not installed");
|
|
msiobj_release( &rec->hdr );
|
|
return a;
|
|
}
|
|
|
|
static enum clr_version get_clr_version( const WCHAR *filename )
|
|
{
|
|
DWORD len;
|
|
HRESULT hr;
|
|
enum clr_version version = CLR_VERSION_V11;
|
|
WCHAR *strW;
|
|
|
|
if (!pGetFileVersion) return CLR_VERSION_V10;
|
|
|
|
hr = pGetFileVersion( filename, NULL, 0, &len );
|
|
if (hr != E_NOT_SUFFICIENT_BUFFER) return CLR_VERSION_V11;
|
|
if ((strW = msi_alloc( len * sizeof(WCHAR) )))
|
|
{
|
|
hr = pGetFileVersion( filename, strW, len, &len );
|
|
if (hr == S_OK)
|
|
{
|
|
UINT i;
|
|
for (i = 0; i < CLR_VERSION_MAX; i++)
|
|
if (!strcmpW( strW, clr_version[i] )) version = i;
|
|
}
|
|
msi_free( strW );
|
|
}
|
|
return version;
|
|
}
|
|
|
|
UINT msi_install_assembly( MSIPACKAGE *package, MSICOMPONENT *comp )
|
|
{
|
|
HRESULT hr;
|
|
const WCHAR *manifest;
|
|
IAssemblyCache *cache;
|
|
MSIASSEMBLY *assembly = comp->assembly;
|
|
MSIFEATURE *feature = NULL;
|
|
|
|
if (comp->assembly->feature)
|
|
feature = msi_get_loaded_feature( package, comp->assembly->feature );
|
|
|
|
if (assembly->application)
|
|
{
|
|
if (feature) feature->Action = INSTALLSTATE_LOCAL;
|
|
return ERROR_SUCCESS;
|
|
}
|
|
if (assembly->attributes == msidbAssemblyAttributesWin32)
|
|
{
|
|
if (!assembly->manifest)
|
|
{
|
|
WARN("no manifest\n");
|
|
return ERROR_FUNCTION_FAILED;
|
|
}
|
|
manifest = msi_get_loaded_file( package, assembly->manifest )->TargetPath;
|
|
cache = package->cache_sxs;
|
|
}
|
|
else
|
|
{
|
|
manifest = msi_get_loaded_file( package, comp->KeyPath )->TargetPath;
|
|
cache = package->cache_net[get_clr_version( manifest )];
|
|
if (!cache) return ERROR_SUCCESS;
|
|
}
|
|
TRACE("installing assembly %s\n", debugstr_w(manifest));
|
|
|
|
hr = IAssemblyCache_InstallAssembly( cache, 0, manifest, NULL );
|
|
if (hr != S_OK)
|
|
{
|
|
ERR("Failed to install assembly %s (0x%08x)\n", debugstr_w(manifest), hr);
|
|
return ERROR_FUNCTION_FAILED;
|
|
}
|
|
if (feature) feature->Action = INSTALLSTATE_LOCAL;
|
|
assembly->installed = TRUE;
|
|
return ERROR_SUCCESS;
|
|
}
|
|
|
|
UINT msi_uninstall_assembly( MSIPACKAGE *package, MSICOMPONENT *comp )
|
|
{
|
|
HRESULT hr;
|
|
IAssemblyCache *cache;
|
|
MSIASSEMBLY *assembly = comp->assembly;
|
|
MSIFEATURE *feature = NULL;
|
|
|
|
if (comp->assembly->feature)
|
|
feature = msi_get_loaded_feature( package, comp->assembly->feature );
|
|
|
|
if (assembly->application)
|
|
{
|
|
if (feature) feature->Action = INSTALLSTATE_ABSENT;
|
|
return ERROR_SUCCESS;
|
|
}
|
|
TRACE("removing %s\n", debugstr_w(assembly->display_name));
|
|
|
|
if (assembly->attributes == msidbAssemblyAttributesWin32)
|
|
{
|
|
cache = package->cache_sxs;
|
|
hr = IAssemblyCache_UninstallAssembly( cache, 0, assembly->display_name, NULL, NULL );
|
|
if (FAILED( hr )) WARN("failed to uninstall assembly 0x%08x\n", hr);
|
|
}
|
|
else
|
|
{
|
|
unsigned int i;
|
|
for (i = 0; i < CLR_VERSION_MAX; i++)
|
|
{
|
|
if (!assembly->clr_version[i]) continue;
|
|
cache = package->cache_net[i];
|
|
if (cache)
|
|
{
|
|
hr = IAssemblyCache_UninstallAssembly( cache, 0, assembly->display_name, NULL, NULL );
|
|
if (FAILED( hr )) WARN("failed to uninstall assembly 0x%08x\n", hr);
|
|
}
|
|
}
|
|
}
|
|
if (feature) feature->Action = INSTALLSTATE_ABSENT;
|
|
assembly->installed = FALSE;
|
|
return ERROR_SUCCESS;
|
|
}
|
|
|
|
static WCHAR *build_local_assembly_path( const WCHAR *filename )
|
|
{
|
|
UINT i;
|
|
WCHAR *ret;
|
|
|
|
if (!(ret = msi_alloc( (strlenW( filename ) + 1) * sizeof(WCHAR) )))
|
|
return NULL;
|
|
|
|
for (i = 0; filename[i]; i++)
|
|
{
|
|
if (filename[i] == '\\' || filename[i] == '/') ret[i] = '|';
|
|
else ret[i] = filename[i];
|
|
}
|
|
ret[i] = 0;
|
|
return ret;
|
|
}
|
|
|
|
static LONG open_assemblies_key( UINT context, BOOL win32, HKEY *hkey )
|
|
{
|
|
static const WCHAR path_win32[] =
|
|
{'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
|
|
'I','n','s','t','a','l','l','e','r','\\','W','i','n','3','2','A','s','s','e','m','b','l','i','e','s','\\',0};
|
|
static const WCHAR path_dotnet[] =
|
|
{'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
|
|
'I','n','s','t','a','l','l','e','r','\\','A','s','s','e','m','b','l','i','e','s','\\',0};
|
|
static const WCHAR classes_path_win32[] =
|
|
{'I','n','s','t','a','l','l','e','r','\\','W','i','n','3','2','A','s','s','e','m','b','l','i','e','s','\\',0};
|
|
static const WCHAR classes_path_dotnet[] =
|
|
{'I','n','s','t','a','l','l','e','r','\\','A','s','s','e','m','b','l','i','e','s','\\',0};
|
|
HKEY root;
|
|
const WCHAR *path;
|
|
|
|
if (context == MSIINSTALLCONTEXT_MACHINE)
|
|
{
|
|
root = HKEY_CLASSES_ROOT;
|
|
if (win32) path = classes_path_win32;
|
|
else path = classes_path_dotnet;
|
|
}
|
|
else
|
|
{
|
|
root = HKEY_CURRENT_USER;
|
|
if (win32) path = path_win32;
|
|
else path = path_dotnet;
|
|
}
|
|
return RegCreateKeyW( root, path, hkey );
|
|
}
|
|
|
|
static LONG open_local_assembly_key( UINT context, BOOL win32, const WCHAR *filename, HKEY *hkey )
|
|
{
|
|
LONG res;
|
|
HKEY root;
|
|
WCHAR *path;
|
|
|
|
if (!(path = build_local_assembly_path( filename )))
|
|
return ERROR_OUTOFMEMORY;
|
|
|
|
if ((res = open_assemblies_key( context, win32, &root )))
|
|
{
|
|
msi_free( path );
|
|
return res;
|
|
}
|
|
res = RegCreateKeyW( root, path, hkey );
|
|
RegCloseKey( root );
|
|
msi_free( path );
|
|
return res;
|
|
}
|
|
|
|
static LONG delete_local_assembly_key( UINT context, BOOL win32, const WCHAR *filename )
|
|
{
|
|
LONG res;
|
|
HKEY root;
|
|
WCHAR *path;
|
|
|
|
if (!(path = build_local_assembly_path( filename )))
|
|
return ERROR_OUTOFMEMORY;
|
|
|
|
if ((res = open_assemblies_key( context, win32, &root )))
|
|
{
|
|
msi_free( path );
|
|
return res;
|
|
}
|
|
res = RegDeleteKeyW( root, path );
|
|
RegCloseKey( root );
|
|
msi_free( path );
|
|
return res;
|
|
}
|
|
|
|
static LONG open_global_assembly_key( UINT context, BOOL win32, HKEY *hkey )
|
|
{
|
|
static const WCHAR path_win32[] =
|
|
{'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
|
|
'I','n','s','t','a','l','l','e','r','\\','W','i','n','3','2','A','s','s','e','m','b','l','i','e','s','\\',
|
|
'G','l','o','b','a','l',0};
|
|
static const WCHAR path_dotnet[] =
|
|
{'S','o','f','t','w','a','r','e','\\','M','i','c','r','o','s','o','f','t','\\',
|
|
'I','n','s','t','a','l','l','e','r','\\','A','s','s','e','m','b','l','i','e','s','\\',
|
|
'G','l','o','b','a','l',0};
|
|
static const WCHAR classes_path_win32[] =
|
|
{'I','n','s','t','a','l','l','e','r','\\','W','i','n','3','2','A','s','s','e','m','b','l','i','e','s','\\',
|
|
'G','l','o','b','a','l',0};
|
|
static const WCHAR classes_path_dotnet[] =
|
|
{'I','n','s','t','a','l','l','e','r','\\','A','s','s','e','m','b','l','i','e','s','\\','G','l','o','b','a','l',0};
|
|
HKEY root;
|
|
const WCHAR *path;
|
|
|
|
if (context == MSIINSTALLCONTEXT_MACHINE)
|
|
{
|
|
root = HKEY_CLASSES_ROOT;
|
|
if (win32) path = classes_path_win32;
|
|
else path = classes_path_dotnet;
|
|
}
|
|
else
|
|
{
|
|
root = HKEY_CURRENT_USER;
|
|
if (win32) path = path_win32;
|
|
else path = path_dotnet;
|
|
}
|
|
return RegCreateKeyW( root, path, hkey );
|
|
}
|
|
|
|
UINT ACTION_MsiPublishAssemblies( MSIPACKAGE *package )
|
|
{
|
|
MSICOMPONENT *comp;
|
|
|
|
if (package->script == SCRIPT_NONE)
|
|
return msi_schedule_action(package, SCRIPT_INSTALL, szMsiPublishAssemblies);
|
|
|
|
LIST_FOR_EACH_ENTRY(comp, &package->components, MSICOMPONENT, entry)
|
|
{
|
|
LONG res;
|
|
HKEY hkey;
|
|
GUID guid;
|
|
DWORD size;
|
|
WCHAR buffer[43];
|
|
MSIRECORD *uirow;
|
|
MSIASSEMBLY *assembly = comp->assembly;
|
|
BOOL win32;
|
|
|
|
if (!assembly || !comp->ComponentId) continue;
|
|
|
|
comp->Action = msi_get_component_action( package, comp );
|
|
if (comp->Action != INSTALLSTATE_LOCAL)
|
|
{
|
|
TRACE("component not scheduled for installation %s\n", debugstr_w(comp->Component));
|
|
continue;
|
|
}
|
|
TRACE("publishing %s\n", debugstr_w(comp->Component));
|
|
|
|
CLSIDFromString( package->ProductCode, &guid );
|
|
encode_base85_guid( &guid, buffer );
|
|
buffer[20] = '>';
|
|
CLSIDFromString( comp->ComponentId, &guid );
|
|
encode_base85_guid( &guid, buffer + 21 );
|
|
buffer[42] = 0;
|
|
|
|
win32 = assembly->attributes & msidbAssemblyAttributesWin32;
|
|
if (assembly->application)
|
|
{
|
|
MSIFILE *file = msi_get_loaded_file( package, assembly->application );
|
|
if (!file)
|
|
{
|
|
WARN("no matching file %s for local assembly\n", debugstr_w(assembly->application));
|
|
continue;
|
|
}
|
|
if ((res = open_local_assembly_key( package->Context, win32, file->TargetPath, &hkey )))
|
|
{
|
|
WARN("failed to open local assembly key %d\n", res);
|
|
return ERROR_FUNCTION_FAILED;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
if ((res = open_global_assembly_key( package->Context, win32, &hkey )))
|
|
{
|
|
WARN("failed to open global assembly key %d\n", res);
|
|
return ERROR_FUNCTION_FAILED;
|
|
}
|
|
}
|
|
size = sizeof(buffer);
|
|
if ((res = RegSetValueExW( hkey, assembly->display_name, 0, REG_MULTI_SZ, (const BYTE *)buffer, size )))
|
|
{
|
|
WARN("failed to set assembly value %d\n", res);
|
|
}
|
|
RegCloseKey( hkey );
|
|
|
|
uirow = MSI_CreateRecord( 2 );
|
|
MSI_RecordSetStringW( uirow, 2, assembly->display_name );
|
|
MSI_ProcessMessage(package, INSTALLMESSAGE_ACTIONDATA, uirow);
|
|
msiobj_release( &uirow->hdr );
|
|
}
|
|
return ERROR_SUCCESS;
|
|
}
|
|
|
|
UINT ACTION_MsiUnpublishAssemblies( MSIPACKAGE *package )
|
|
{
|
|
MSICOMPONENT *comp;
|
|
|
|
if (package->script == SCRIPT_NONE)
|
|
return msi_schedule_action(package, SCRIPT_INSTALL, szMsiUnpublishAssemblies);
|
|
|
|
LIST_FOR_EACH_ENTRY(comp, &package->components, MSICOMPONENT, entry)
|
|
{
|
|
LONG res;
|
|
MSIRECORD *uirow;
|
|
MSIASSEMBLY *assembly = comp->assembly;
|
|
BOOL win32;
|
|
|
|
if (!assembly || !comp->ComponentId) continue;
|
|
|
|
comp->Action = msi_get_component_action( package, comp );
|
|
if (comp->Action != INSTALLSTATE_ABSENT)
|
|
{
|
|
TRACE("component not scheduled for removal %s\n", debugstr_w(comp->Component));
|
|
continue;
|
|
}
|
|
TRACE("unpublishing %s\n", debugstr_w(comp->Component));
|
|
|
|
win32 = assembly->attributes & msidbAssemblyAttributesWin32;
|
|
if (assembly->application)
|
|
{
|
|
MSIFILE *file = msi_get_loaded_file( package, assembly->application );
|
|
if (!file)
|
|
{
|
|
WARN("no matching file %s for local assembly\n", debugstr_w(assembly->application));
|
|
continue;
|
|
}
|
|
if ((res = delete_local_assembly_key( package->Context, win32, file->TargetPath )))
|
|
WARN("failed to delete local assembly key %d\n", res);
|
|
}
|
|
else
|
|
{
|
|
HKEY hkey;
|
|
if ((res = open_global_assembly_key( package->Context, win32, &hkey )))
|
|
WARN("failed to delete global assembly key %d\n", res);
|
|
else
|
|
{
|
|
if ((res = RegDeleteValueW( hkey, assembly->display_name )))
|
|
WARN("failed to delete global assembly value %d\n", res);
|
|
RegCloseKey( hkey );
|
|
}
|
|
}
|
|
|
|
uirow = MSI_CreateRecord( 2 );
|
|
MSI_RecordSetStringW( uirow, 2, assembly->display_name );
|
|
MSI_ProcessMessage(package, INSTALLMESSAGE_ACTIONDATA, uirow);
|
|
msiobj_release( &uirow->hdr );
|
|
}
|
|
return ERROR_SUCCESS;
|
|
}
|