/* * Implementation of the Microsoft Installer (msi.dll) * * Copyright 2005 Aric Stewart 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 */ /* Msi top level apis directly related to installs */ #define COBJMACROS #include <stdarg.h> #include "windef.h" #include "winbase.h" #include "winerror.h" #include "msi.h" #include "msidefs.h" #include "objbase.h" #include "oleauto.h" #include "msipriv.h" #include "winemsi.h" #include "wine/heap.h" #include "wine/debug.h" #include "wine/exception.h" WINE_DEFAULT_DEBUG_CHANNEL(msi); /*********************************************************************** * MsiDoActionA (MSI.@) */ UINT WINAPI MsiDoActionA( MSIHANDLE hInstall, LPCSTR szAction ) { LPWSTR szwAction; UINT ret; TRACE("%s\n", debugstr_a(szAction)); szwAction = strdupAtoW(szAction); if (szAction && !szwAction) return ERROR_FUNCTION_FAILED; ret = MsiDoActionW( hInstall, szwAction ); msi_free( szwAction ); return ret; } /*********************************************************************** * MsiDoActionW (MSI.@) */ UINT WINAPI MsiDoActionW( MSIHANDLE hInstall, LPCWSTR szAction ) { MSIPACKAGE *package; UINT ret; TRACE("%s\n",debugstr_w(szAction)); if (!szAction) return ERROR_INVALID_PARAMETER; package = msihandle2msiinfo( hInstall, MSIHANDLETYPE_PACKAGE ); if (!package) { MSIHANDLE remote; if (!(remote = msi_get_remote(hInstall))) return ERROR_INVALID_HANDLE; __TRY { ret = remote_DoAction(remote, szAction); } __EXCEPT(rpc_filter) { ret = GetExceptionCode(); } __ENDTRY return ret; } ret = ACTION_PerformAction(package, szAction); msiobj_release( &package->hdr ); return ret; } /*********************************************************************** * MsiSequenceA (MSI.@) */ UINT WINAPI MsiSequenceA( MSIHANDLE hInstall, LPCSTR szTable, INT iSequenceMode ) { LPWSTR szwTable; UINT ret; TRACE("%s, %d\n", debugstr_a(szTable), iSequenceMode); szwTable = strdupAtoW(szTable); if (szTable && !szwTable) return ERROR_FUNCTION_FAILED; ret = MsiSequenceW( hInstall, szwTable, iSequenceMode ); msi_free( szwTable ); return ret; } /*********************************************************************** * MsiSequenceW (MSI.@) */ UINT WINAPI MsiSequenceW( MSIHANDLE hInstall, LPCWSTR szTable, INT iSequenceMode ) { MSIPACKAGE *package; UINT ret; TRACE("%s, %d\n", debugstr_w(szTable), iSequenceMode); if (!szTable) return ERROR_INVALID_PARAMETER; package = msihandle2msiinfo( hInstall, MSIHANDLETYPE_PACKAGE ); if (!package) { MSIHANDLE remote; if (!(remote = msi_get_remote(hInstall))) return ERROR_INVALID_HANDLE; __TRY { ret = remote_Sequence(remote, szTable, iSequenceMode); } __EXCEPT(rpc_filter) { ret = GetExceptionCode(); } __ENDTRY return ret; } ret = MSI_Sequence( package, szTable ); msiobj_release( &package->hdr ); return ret; } UINT msi_strcpy_to_awstring( const WCHAR *str, int len, awstring *awbuf, DWORD *sz ) { UINT r = ERROR_SUCCESS; if (awbuf->str.w && !sz) return ERROR_INVALID_PARAMETER; if (!sz) return ERROR_SUCCESS; if (len < 0) len = lstrlenW( str ); if (awbuf->unicode && awbuf->str.w) { memcpy( awbuf->str.w, str, min(len + 1, *sz) * sizeof(WCHAR) ); if (*sz && len >= *sz) awbuf->str.w[*sz - 1] = 0; } else { int lenA = WideCharToMultiByte( CP_ACP, 0, str, len + 1, NULL, 0, NULL, NULL ); if (lenA) lenA--; WideCharToMultiByte( CP_ACP, 0, str, len + 1, awbuf->str.a, *sz, NULL, NULL ); if (awbuf->str.a && *sz && lenA >= *sz) awbuf->str.a[*sz - 1] = 0; len = lenA; } if (awbuf->str.w && len >= *sz) r = ERROR_MORE_DATA; *sz = len; return r; } UINT msi_strncpyWtoA(const WCHAR *str, int lenW, char *buf, DWORD *sz, BOOL remote) { UINT r = ERROR_SUCCESS; DWORD lenA; if (!sz) return buf ? ERROR_INVALID_PARAMETER : ERROR_SUCCESS; if (lenW < 0) lenW = lstrlenW(str); lenA = WideCharToMultiByte(CP_ACP, 0, str, lenW + 1, NULL, 0, NULL, NULL); WideCharToMultiByte(CP_ACP, 0, str, lenW + 1, buf, *sz, NULL, NULL); lenA--; if (buf && lenA >= *sz) { if (*sz) buf[*sz - 1] = 0; r = ERROR_MORE_DATA; } if (remote && lenA >= *sz) lenA *= 2; *sz = lenA; return r; } UINT msi_strncpyW(const WCHAR *str, int len, WCHAR *buf, DWORD *sz) { UINT r = ERROR_SUCCESS; if (!sz) return buf ? ERROR_INVALID_PARAMETER : ERROR_SUCCESS; if (len < 0) len = lstrlenW(str); if (buf) memcpy(buf, str, min(len + 1, *sz) * sizeof(WCHAR)); if (buf && len >= *sz) { if (*sz) buf[*sz - 1] = 0; r = ERROR_MORE_DATA; } *sz = len; return r; } const WCHAR *msi_get_target_folder( MSIPACKAGE *package, const WCHAR *name ) { MSIFOLDER *folder = msi_get_loaded_folder( package, name ); if (!folder) return NULL; if (!folder->ResolvedTarget) { MSIFOLDER *parent = folder; while (parent->Parent && wcscmp( parent->Parent, parent->Directory )) { parent = msi_get_loaded_folder( package, parent->Parent ); } msi_resolve_target_folder( package, parent->Directory, TRUE ); } return folder->ResolvedTarget; } /*********************************************************************** * MsiGetTargetPathA (MSI.@) */ UINT WINAPI MsiGetTargetPathA(MSIHANDLE hinst, const char *folder, char *buf, DWORD *sz) { MSIPACKAGE *package; const WCHAR *path; WCHAR *folderW; UINT r; TRACE("%s %p %p\n", debugstr_a(folder), buf, sz); if (!folder) return ERROR_INVALID_PARAMETER; if (!(folderW = strdupAtoW(folder))) return ERROR_OUTOFMEMORY; package = msihandle2msiinfo(hinst, MSIHANDLETYPE_PACKAGE); if (!package) { WCHAR *path = NULL; MSIHANDLE remote; if (!(remote = msi_get_remote(hinst))) { heap_free(folderW); return ERROR_INVALID_HANDLE; } __TRY { r = remote_GetTargetPath(remote, folderW, &path); } __EXCEPT(rpc_filter) { r = GetExceptionCode(); } __ENDTRY if (!r) r = msi_strncpyWtoA(path, -1, buf, sz, TRUE); midl_user_free(path); heap_free(folderW); return r; } path = msi_get_target_folder(package, folderW); if (path) r = msi_strncpyWtoA(path, -1, buf, sz, FALSE); else r = ERROR_DIRECTORY; heap_free(folderW); msiobj_release(&package->hdr); return r; } /*********************************************************************** * MsiGetTargetPathW (MSI.@) */ UINT WINAPI MsiGetTargetPathW(MSIHANDLE hinst, const WCHAR *folder, WCHAR *buf, DWORD *sz) { MSIPACKAGE *package; const WCHAR *path; UINT r; TRACE("%s %p %p\n", debugstr_w(folder), buf, sz); if (!folder) return ERROR_INVALID_PARAMETER; package = msihandle2msiinfo(hinst, MSIHANDLETYPE_PACKAGE); if (!package) { WCHAR *path = NULL; MSIHANDLE remote; if (!(remote = msi_get_remote(hinst))) return ERROR_INVALID_HANDLE; __TRY { r = remote_GetTargetPath(remote, folder, &path); } __EXCEPT(rpc_filter) { r = GetExceptionCode(); } __ENDTRY if (!r) r = msi_strncpyW(path, -1, buf, sz); midl_user_free(path); return r; } path = msi_get_target_folder(package, folder); if (path) r = msi_strncpyW(path, -1, buf, sz); else r = ERROR_DIRECTORY; msiobj_release(&package->hdr); return r; } static WCHAR *get_source_root( MSIPACKAGE *package ) { msi_set_sourcedir_props( package, FALSE ); return msi_dup_property( package->db, L"SourceDir" ); } WCHAR *msi_resolve_source_folder( MSIPACKAGE *package, const WCHAR *name, MSIFOLDER **folder ) { MSIFOLDER *f; LPWSTR p, path = NULL, parent; TRACE("working to resolve %s\n", debugstr_w(name)); if (!wcscmp( name, L"SourceDir" )) name = L"TARGETDIR"; if (!(f = msi_get_loaded_folder( package, name ))) return NULL; /* special resolving for root dir */ if (!wcscmp( name, L"TARGETDIR" ) && !f->ResolvedSource) { f->ResolvedSource = get_source_root( package ); } if (folder) *folder = f; if (f->ResolvedSource) { path = strdupW( f->ResolvedSource ); TRACE(" already resolved to %s\n", debugstr_w(path)); return path; } if (!f->Parent) return path; parent = f->Parent; TRACE(" ! parent is %s\n", debugstr_w(parent)); p = msi_resolve_source_folder( package, parent, NULL ); if (package->WordCount & msidbSumInfoSourceTypeCompressed) path = get_source_root( package ); else if (package->WordCount & msidbSumInfoSourceTypeSFN) path = msi_build_directory_name( 3, p, f->SourceShortPath, NULL ); else path = msi_build_directory_name( 3, p, f->SourceLongPath, NULL ); TRACE("-> %s\n", debugstr_w(path)); f->ResolvedSource = strdupW( path ); msi_free( p ); return path; } /*********************************************************************** * MsiGetSourcePathA (MSI.@) */ UINT WINAPI MsiGetSourcePathA(MSIHANDLE hinst, const char *folder, char *buf, DWORD *sz) { MSIPACKAGE *package; WCHAR *path, *folderW; UINT r; TRACE("%s %p %p\n", debugstr_a(folder), buf, sz); if (!folder) return ERROR_INVALID_PARAMETER; if (!(folderW = strdupAtoW(folder))) return ERROR_OUTOFMEMORY; package = msihandle2msiinfo(hinst, MSIHANDLETYPE_PACKAGE); if (!package) { WCHAR *path = NULL; MSIHANDLE remote; if (!(remote = msi_get_remote(hinst))) { heap_free(folderW); return ERROR_INVALID_HANDLE; } __TRY { r = remote_GetSourcePath(remote, folderW, &path); } __EXCEPT(rpc_filter) { r = GetExceptionCode(); } __ENDTRY if (!r) r = msi_strncpyWtoA(path, -1, buf, sz, TRUE); midl_user_free(path); heap_free(folderW); return r; } path = msi_resolve_source_folder(package, folderW, NULL); if (path) r = msi_strncpyWtoA(path, -1, buf, sz, FALSE); else r = ERROR_DIRECTORY; heap_free(path); heap_free(folderW); msiobj_release(&package->hdr); return r; } /*********************************************************************** * MsiGetSourcePathW (MSI.@) */ UINT WINAPI MsiGetSourcePathW(MSIHANDLE hinst, const WCHAR *folder, WCHAR *buf, DWORD *sz) { MSIPACKAGE *package; WCHAR *path; UINT r; TRACE("%s %p %p\n", debugstr_w(folder), buf, sz); if (!folder) return ERROR_INVALID_PARAMETER; package = msihandle2msiinfo(hinst, MSIHANDLETYPE_PACKAGE); if (!package) { WCHAR *path = NULL; MSIHANDLE remote; if (!(remote = msi_get_remote(hinst))) return ERROR_INVALID_HANDLE; __TRY { r = remote_GetSourcePath(remote, folder, &path); } __EXCEPT(rpc_filter) { r = GetExceptionCode(); } __ENDTRY if (!r) r = msi_strncpyW(path, -1, buf, sz); midl_user_free(path); return r; } path = msi_resolve_source_folder(package, folder, NULL); if (path) r = msi_strncpyW(path, -1, buf, sz); else r = ERROR_DIRECTORY; heap_free(path); msiobj_release(&package->hdr); return r; } /*********************************************************************** * MsiSetTargetPathA (MSI.@) */ UINT WINAPI MsiSetTargetPathA( MSIHANDLE hInstall, LPCSTR szFolder, LPCSTR szFolderPath ) { LPWSTR szwFolder = NULL, szwFolderPath = NULL; UINT rc = ERROR_OUTOFMEMORY; if ( !szFolder || !szFolderPath ) return ERROR_INVALID_PARAMETER; szwFolder = strdupAtoW(szFolder); szwFolderPath = strdupAtoW(szFolderPath); if (!szwFolder || !szwFolderPath) goto end; rc = MsiSetTargetPathW( hInstall, szwFolder, szwFolderPath ); end: msi_free(szwFolder); msi_free(szwFolderPath); return rc; } static void set_target_path( MSIPACKAGE *package, MSIFOLDER *folder, const WCHAR *path ) { FolderList *fl; MSIFOLDER *child; WCHAR *target_path; if (!(target_path = msi_normalize_path( path ))) return; if (wcscmp( target_path, folder->ResolvedTarget )) { msi_free( folder->ResolvedTarget ); folder->ResolvedTarget = target_path; msi_set_property( package->db, folder->Directory, folder->ResolvedTarget, -1 ); LIST_FOR_EACH_ENTRY( fl, &folder->children, FolderList, entry ) { child = fl->folder; msi_resolve_target_folder( package, child->Directory, FALSE ); } } else msi_free( target_path ); } UINT MSI_SetTargetPathW( MSIPACKAGE *package, LPCWSTR szFolder, LPCWSTR szFolderPath ) { DWORD attrib; MSIFOLDER *folder; MSIFILE *file; TRACE("%p %s %s\n", package, debugstr_w(szFolder), debugstr_w(szFolderPath)); attrib = msi_get_file_attributes( package, szFolderPath ); /* native MSI tests writeability by making temporary files at each drive */ if (attrib != INVALID_FILE_ATTRIBUTES && (attrib & FILE_ATTRIBUTE_OFFLINE || attrib & FILE_ATTRIBUTE_READONLY)) { return ERROR_FUNCTION_FAILED; } if (!(folder = msi_get_loaded_folder( package, szFolder ))) return ERROR_DIRECTORY; set_target_path( package, folder, szFolderPath ); LIST_FOR_EACH_ENTRY( file, &package->files, MSIFILE, entry ) { const WCHAR *dir; MSICOMPONENT *comp = file->Component; if (!comp->Enabled || msi_is_global_assembly( comp )) continue; dir = msi_get_target_folder( package, comp->Directory ); msi_free( file->TargetPath ); file->TargetPath = msi_build_directory_name( 2, dir, file->FileName ); } return ERROR_SUCCESS; } /*********************************************************************** * MsiSetTargetPathW (MSI.@) */ UINT WINAPI MsiSetTargetPathW(MSIHANDLE hInstall, LPCWSTR szFolder, LPCWSTR szFolderPath) { MSIPACKAGE *package; UINT ret; TRACE("%s %s\n",debugstr_w(szFolder),debugstr_w(szFolderPath)); if ( !szFolder || !szFolderPath ) return ERROR_INVALID_PARAMETER; package = msihandle2msiinfo(hInstall, MSIHANDLETYPE_PACKAGE); if (!package) { MSIHANDLE remote; if (!(remote = msi_get_remote(hInstall))) return ERROR_INVALID_HANDLE; __TRY { ret = remote_SetTargetPath(remote, szFolder, szFolderPath); } __EXCEPT(rpc_filter) { ret = GetExceptionCode(); } __ENDTRY return ret; } ret = MSI_SetTargetPathW( package, szFolder, szFolderPath ); msiobj_release( &package->hdr ); return ret; } /*********************************************************************** * MsiGetMode (MSI.@) * * Returns an internal installer state (if it is running in a mode iRunMode) * * PARAMS * hInstall [I] Handle to the installation * hRunMode [I] Checking run mode * MSIRUNMODE_ADMIN Administrative mode * MSIRUNMODE_ADVERTISE Advertisement mode * MSIRUNMODE_MAINTENANCE Maintenance mode * MSIRUNMODE_ROLLBACKENABLED Rollback is enabled * MSIRUNMODE_LOGENABLED Log file is writing * MSIRUNMODE_OPERATIONS Operations in progress?? * MSIRUNMODE_REBOOTATEND We need to reboot after installation completed * MSIRUNMODE_REBOOTNOW We need to reboot to continue the installation * MSIRUNMODE_CABINET Files from cabinet are installed * MSIRUNMODE_SOURCESHORTNAMES Long names in source files is suppressed * MSIRUNMODE_TARGETSHORTNAMES Long names in destination files is suppressed * MSIRUNMODE_RESERVED11 Reserved * MSIRUNMODE_WINDOWS9X Running under Windows95/98 * MSIRUNMODE_ZAWENABLED Demand installation is supported * MSIRUNMODE_RESERVED14 Reserved * MSIRUNMODE_RESERVED15 Reserved * MSIRUNMODE_SCHEDULED called from install script * MSIRUNMODE_ROLLBACK called from rollback script * MSIRUNMODE_COMMIT called from commit script * * RETURNS * In the state: TRUE * Not in the state: FALSE * */ BOOL WINAPI MsiGetMode(MSIHANDLE hInstall, MSIRUNMODE iRunMode) { MSIPACKAGE *package; BOOL r = FALSE; TRACE("%d %d\n", hInstall, iRunMode); package = msihandle2msiinfo(hInstall, MSIHANDLETYPE_PACKAGE); if (!package) { MSIHANDLE remote; if (!(remote = msi_get_remote(hInstall))) return FALSE; __TRY { r = remote_GetMode(remote, iRunMode); } __EXCEPT(rpc_filter) { r = FALSE; } __ENDTRY return r; } switch (iRunMode) { case MSIRUNMODE_ADMIN: FIXME("no support for administrative installs\n"); break; case MSIRUNMODE_ADVERTISE: FIXME("no support for advertised installs\n"); break; case MSIRUNMODE_WINDOWS9X: if (GetVersion() & 0x80000000) r = TRUE; break; case MSIRUNMODE_OPERATIONS: case MSIRUNMODE_RESERVED11: case MSIRUNMODE_RESERVED14: case MSIRUNMODE_RESERVED15: break; case MSIRUNMODE_SCHEDULED: r = package->scheduled_action_running; break; case MSIRUNMODE_ROLLBACK: r = package->rollback_action_running; break; case MSIRUNMODE_COMMIT: r = package->commit_action_running; break; case MSIRUNMODE_MAINTENANCE: r = msi_get_property_int( package->db, L"Installed", 0 ) != 0; break; case MSIRUNMODE_ROLLBACKENABLED: r = msi_get_property_int( package->db, L"RollbackDisabled", 0 ) == 0; break; case MSIRUNMODE_REBOOTATEND: r = package->need_reboot_at_end; break; case MSIRUNMODE_REBOOTNOW: r = package->need_reboot_now; break; case MSIRUNMODE_LOGENABLED: r = (package->log_file != INVALID_HANDLE_VALUE); break; default: FIXME("unimplemented run mode: %d\n", iRunMode); r = TRUE; } msiobj_release( &package->hdr ); return r; } /*********************************************************************** * MsiSetMode (MSI.@) */ UINT WINAPI MsiSetMode(MSIHANDLE hInstall, MSIRUNMODE iRunMode, BOOL fState) { MSIPACKAGE *package; UINT r; TRACE("%d %d %d\n", hInstall, iRunMode, fState); package = msihandle2msiinfo( hInstall, MSIHANDLETYPE_PACKAGE ); if (!package) { MSIHANDLE remote; if (!(remote = msi_get_remote(hInstall))) return FALSE; __TRY { r = remote_SetMode(remote, iRunMode, fState); } __EXCEPT(rpc_filter) { r = GetExceptionCode(); } __ENDTRY return r; } switch (iRunMode) { case MSIRUNMODE_REBOOTATEND: package->need_reboot_at_end = (fState != 0); r = ERROR_SUCCESS; break; case MSIRUNMODE_REBOOTNOW: package->need_reboot_now = (fState != 0); r = ERROR_SUCCESS; break; default: r = ERROR_ACCESS_DENIED; } msiobj_release( &package->hdr ); return r; } /*********************************************************************** * MsiSetFeatureStateA (MSI.@) * * According to the docs, when this is called it immediately recalculates * all the component states as well */ UINT WINAPI MsiSetFeatureStateA(MSIHANDLE hInstall, LPCSTR szFeature, INSTALLSTATE iState) { LPWSTR szwFeature = NULL; UINT rc; szwFeature = strdupAtoW(szFeature); rc = MsiSetFeatureStateW(hInstall,szwFeature, iState); msi_free(szwFeature); return rc; } /* update component state based on a feature change */ void ACTION_UpdateComponentStates( MSIPACKAGE *package, MSIFEATURE *feature ) { INSTALLSTATE newstate; ComponentList *cl; newstate = feature->ActionRequest; if (newstate == INSTALLSTATE_ABSENT) newstate = INSTALLSTATE_UNKNOWN; LIST_FOR_EACH_ENTRY(cl, &feature->Components, ComponentList, entry) { MSICOMPONENT *component = cl->component; if (!component->Enabled) continue; TRACE("Modifying (%d): Component %s (Installed %d, Action %d, Request %d)\n", newstate, debugstr_w(component->Component), component->Installed, component->Action, component->ActionRequest); if (newstate == INSTALLSTATE_LOCAL) { component->Action = INSTALLSTATE_LOCAL; component->ActionRequest = INSTALLSTATE_LOCAL; } else { ComponentList *clist; MSIFEATURE *f; component->hasLocalFeature = FALSE; component->Action = newstate; component->ActionRequest = newstate; /* if any other feature wants it local we need to set it local */ LIST_FOR_EACH_ENTRY(f, &package->features, MSIFEATURE, entry) { if ( f->ActionRequest != INSTALLSTATE_LOCAL && f->ActionRequest != INSTALLSTATE_SOURCE ) { continue; } LIST_FOR_EACH_ENTRY(clist, &f->Components, ComponentList, entry) { if (clist->component == component && (f->ActionRequest == INSTALLSTATE_LOCAL || f->ActionRequest == INSTALLSTATE_SOURCE)) { TRACE("Saved by %s\n", debugstr_w(f->Feature)); component->hasLocalFeature = TRUE; if (component->Attributes & msidbComponentAttributesOptional) { if (f->Attributes & msidbFeatureAttributesFavorSource) { component->Action = INSTALLSTATE_SOURCE; component->ActionRequest = INSTALLSTATE_SOURCE; } else { component->Action = INSTALLSTATE_LOCAL; component->ActionRequest = INSTALLSTATE_LOCAL; } } else if (component->Attributes & msidbComponentAttributesSourceOnly) { component->Action = INSTALLSTATE_SOURCE; component->ActionRequest = INSTALLSTATE_SOURCE; } else { component->Action = INSTALLSTATE_LOCAL; component->ActionRequest = INSTALLSTATE_LOCAL; } } } } } TRACE("Result (%d): Component %s (Installed %d, Action %d, Request %d)\n", newstate, debugstr_w(component->Component), component->Installed, component->Action, component->ActionRequest); } } UINT MSI_SetFeatureStateW( MSIPACKAGE *package, LPCWSTR szFeature, INSTALLSTATE iState ) { UINT rc = ERROR_SUCCESS; MSIFEATURE *feature, *child; TRACE("%s %i\n", debugstr_w(szFeature), iState); feature = msi_get_loaded_feature( package, szFeature ); if (!feature) return ERROR_UNKNOWN_FEATURE; if (iState == INSTALLSTATE_ADVERTISED && feature->Attributes & msidbFeatureAttributesDisallowAdvertise) return ERROR_FUNCTION_FAILED; feature->ActionRequest = iState; ACTION_UpdateComponentStates( package, feature ); /* update all the features that are children of this feature */ LIST_FOR_EACH_ENTRY( child, &package->features, MSIFEATURE, entry ) { if (child->Feature_Parent && !wcscmp( szFeature, child->Feature_Parent )) MSI_SetFeatureStateW(package, child->Feature, iState); } return rc; } /*********************************************************************** * MsiSetFeatureStateW (MSI.@) */ UINT WINAPI MsiSetFeatureStateW(MSIHANDLE hInstall, LPCWSTR szFeature, INSTALLSTATE iState) { MSIPACKAGE* package; UINT rc = ERROR_SUCCESS; TRACE("%s %i\n",debugstr_w(szFeature), iState); if (!szFeature) return ERROR_UNKNOWN_FEATURE; package = msihandle2msiinfo(hInstall, MSIHANDLETYPE_PACKAGE); if (!package) { MSIHANDLE remote; if (!(remote = msi_get_remote(hInstall))) return ERROR_INVALID_HANDLE; __TRY { rc = remote_SetFeatureState(remote, szFeature, iState); } __EXCEPT(rpc_filter) { rc = GetExceptionCode(); } __ENDTRY return rc; } rc = MSI_SetFeatureStateW(package,szFeature,iState); msiobj_release( &package->hdr ); return rc; } /*********************************************************************** * MsiSetFeatureAttributesA (MSI.@) */ UINT WINAPI MsiSetFeatureAttributesA( MSIHANDLE handle, LPCSTR feature, DWORD attrs ) { UINT r; WCHAR *featureW = NULL; TRACE("%u, %s, 0x%08x\n", handle, debugstr_a(feature), attrs); if (feature && !(featureW = strdupAtoW( feature ))) return ERROR_OUTOFMEMORY; r = MsiSetFeatureAttributesW( handle, featureW, attrs ); msi_free( featureW ); return r; } static DWORD unmap_feature_attributes( DWORD attrs ) { DWORD ret = 0; if (attrs & INSTALLFEATUREATTRIBUTE_FAVORLOCAL) ret = msidbFeatureAttributesFavorLocal; if (attrs & INSTALLFEATUREATTRIBUTE_FAVORSOURCE) ret |= msidbFeatureAttributesFavorSource; if (attrs & INSTALLFEATUREATTRIBUTE_FOLLOWPARENT) ret |= msidbFeatureAttributesFollowParent; if (attrs & INSTALLFEATUREATTRIBUTE_FAVORADVERTISE) ret |= msidbFeatureAttributesFavorAdvertise; if (attrs & INSTALLFEATUREATTRIBUTE_DISALLOWADVERTISE) ret |= msidbFeatureAttributesDisallowAdvertise; if (attrs & INSTALLFEATUREATTRIBUTE_NOUNSUPPORTEDADVERTISE) ret |= msidbFeatureAttributesNoUnsupportedAdvertise; return ret; } /*********************************************************************** * MsiSetFeatureAttributesW (MSI.@) */ UINT WINAPI MsiSetFeatureAttributesW( MSIHANDLE handle, LPCWSTR name, DWORD attrs ) { MSIPACKAGE *package; MSIFEATURE *feature; WCHAR *costing; TRACE("%u, %s, 0x%08x\n", handle, debugstr_w(name), attrs); if (!name || !name[0]) return ERROR_UNKNOWN_FEATURE; if (!(package = msihandle2msiinfo( handle, MSIHANDLETYPE_PACKAGE ))) return ERROR_INVALID_HANDLE; costing = msi_dup_property( package->db, L"CostingComplete" ); if (!costing || !wcscmp( costing, L"1" )) { msi_free( costing ); msiobj_release( &package->hdr ); return ERROR_FUNCTION_FAILED; } msi_free( costing ); if (!(feature = msi_get_loaded_feature( package, name ))) { msiobj_release( &package->hdr ); return ERROR_UNKNOWN_FEATURE; } feature->Attributes = unmap_feature_attributes( attrs ); msiobj_release( &package->hdr ); return ERROR_SUCCESS; } /*********************************************************************** * MsiGetFeatureStateA (MSI.@) */ UINT WINAPI MsiGetFeatureStateA(MSIHANDLE hInstall, LPCSTR szFeature, INSTALLSTATE *piInstalled, INSTALLSTATE *piAction) { LPWSTR szwFeature = NULL; UINT rc; if (szFeature && !(szwFeature = strdupAtoW(szFeature))) return ERROR_OUTOFMEMORY; rc = MsiGetFeatureStateW(hInstall, szwFeature, piInstalled, piAction); msi_free( szwFeature); return rc; } UINT MSI_GetFeatureStateW(MSIPACKAGE *package, LPCWSTR szFeature, INSTALLSTATE *piInstalled, INSTALLSTATE *piAction) { MSIFEATURE *feature; feature = msi_get_loaded_feature(package,szFeature); if (!feature) return ERROR_UNKNOWN_FEATURE; if (piInstalled) *piInstalled = feature->Installed; if (piAction) *piAction = feature->ActionRequest; TRACE("returning %i %i\n", feature->Installed, feature->ActionRequest); return ERROR_SUCCESS; } /*********************************************************************** * MsiGetFeatureStateW (MSI.@) */ UINT WINAPI MsiGetFeatureStateW(MSIHANDLE hInstall, LPCWSTR szFeature, INSTALLSTATE *piInstalled, INSTALLSTATE *piAction) { MSIPACKAGE* package; UINT ret; TRACE("%d %s %p %p\n", hInstall, debugstr_w(szFeature), piInstalled, piAction); if (!szFeature) return ERROR_UNKNOWN_FEATURE; package = msihandle2msiinfo(hInstall, MSIHANDLETYPE_PACKAGE); if (!package) { MSIHANDLE remote; if (!(remote = msi_get_remote(hInstall))) return ERROR_INVALID_HANDLE; __TRY { ret = remote_GetFeatureState(remote, szFeature, piInstalled, piAction); } __EXCEPT(rpc_filter) { ret = GetExceptionCode(); } __ENDTRY return ret; } ret = MSI_GetFeatureStateW(package, szFeature, piInstalled, piAction); msiobj_release( &package->hdr ); return ret; } /*********************************************************************** * MsiGetFeatureCostA (MSI.@) */ UINT WINAPI MsiGetFeatureCostA(MSIHANDLE hInstall, LPCSTR szFeature, MSICOSTTREE iCostTree, INSTALLSTATE iState, LPINT piCost) { LPWSTR szwFeature = NULL; UINT rc; szwFeature = strdupAtoW(szFeature); rc = MsiGetFeatureCostW(hInstall, szwFeature, iCostTree, iState, piCost); msi_free(szwFeature); return rc; } static INT feature_cost( MSIFEATURE *feature ) { INT cost = 0; ComponentList *cl; LIST_FOR_EACH_ENTRY( cl, &feature->Components, ComponentList, entry ) { cost += cl->component->Cost; } return cost; } UINT MSI_GetFeatureCost( MSIPACKAGE *package, MSIFEATURE *feature, MSICOSTTREE tree, INSTALLSTATE state, LPINT cost ) { TRACE("%s, %u, %d, %p\n", debugstr_w(feature->Feature), tree, state, cost); *cost = 0; switch (tree) { case MSICOSTTREE_CHILDREN: { MSIFEATURE *child; LIST_FOR_EACH_ENTRY( child, &feature->Children, MSIFEATURE, entry ) { if (child->ActionRequest == state) *cost += feature_cost( child ); } break; } case MSICOSTTREE_PARENTS: { const WCHAR *feature_parent = feature->Feature_Parent; for (;;) { MSIFEATURE *parent = msi_get_loaded_feature( package, feature_parent ); if (!parent) break; if (parent->ActionRequest == state) *cost += feature_cost( parent ); feature_parent = parent->Feature_Parent; } break; } case MSICOSTTREE_SELFONLY: if (feature->ActionRequest == state) *cost = feature_cost( feature ); break; default: WARN("unhandled cost tree %u\n", tree); break; } *cost /= 512; return ERROR_SUCCESS; } /*********************************************************************** * MsiGetFeatureCostW (MSI.@) */ UINT WINAPI MsiGetFeatureCostW(MSIHANDLE hInstall, LPCWSTR szFeature, MSICOSTTREE iCostTree, INSTALLSTATE iState, LPINT piCost) { MSIPACKAGE *package; MSIFEATURE *feature; UINT ret; TRACE("(%d %s %i %i %p)\n", hInstall, debugstr_w(szFeature), iCostTree, iState, piCost); if (!szFeature) return ERROR_INVALID_PARAMETER; package = msihandle2msiinfo(hInstall, MSIHANDLETYPE_PACKAGE); if (!package) { MSIHANDLE remote; if (!(remote = msi_get_remote(hInstall))) return ERROR_INVALID_HANDLE; __TRY { ret = remote_GetFeatureCost(remote, szFeature, iCostTree, iState, piCost); } __EXCEPT(rpc_filter) { ret = GetExceptionCode(); } __ENDTRY return ret; } if (!piCost) { msiobj_release( &package->hdr ); return ERROR_INVALID_PARAMETER; } feature = msi_get_loaded_feature(package, szFeature); if (feature) ret = MSI_GetFeatureCost(package, feature, iCostTree, iState, piCost); else ret = ERROR_UNKNOWN_FEATURE; msiobj_release( &package->hdr ); return ret; } /*********************************************************************** * MsiGetFeatureInfoA (MSI.@) */ UINT WINAPI MsiGetFeatureInfoA( MSIHANDLE handle, LPCSTR feature, LPDWORD attrs, LPSTR title, LPDWORD title_len, LPSTR help, LPDWORD help_len ) { UINT r; WCHAR *titleW = NULL, *helpW = NULL, *featureW = NULL; TRACE("%u, %s, %p, %p, %p, %p, %p\n", handle, debugstr_a(feature), attrs, title, title_len, help, help_len); if (feature && !(featureW = strdupAtoW( feature ))) return ERROR_OUTOFMEMORY; if (title && title_len && !(titleW = msi_alloc( *title_len * sizeof(WCHAR) ))) { msi_free( featureW ); return ERROR_OUTOFMEMORY; } if (help && help_len && !(helpW = msi_alloc( *help_len * sizeof(WCHAR) ))) { msi_free( featureW ); msi_free( titleW ); return ERROR_OUTOFMEMORY; } r = MsiGetFeatureInfoW( handle, featureW, attrs, titleW, title_len, helpW, help_len ); if (r == ERROR_SUCCESS) { if (titleW) WideCharToMultiByte( CP_ACP, 0, titleW, -1, title, *title_len + 1, NULL, NULL ); if (helpW) WideCharToMultiByte( CP_ACP, 0, helpW, -1, help, *help_len + 1, NULL, NULL ); } msi_free( titleW ); msi_free( helpW ); msi_free( featureW ); return r; } static DWORD map_feature_attributes( DWORD attrs ) { DWORD ret = 0; if (attrs == msidbFeatureAttributesFavorLocal) ret |= INSTALLFEATUREATTRIBUTE_FAVORLOCAL; if (attrs & msidbFeatureAttributesFavorSource) ret |= INSTALLFEATUREATTRIBUTE_FAVORSOURCE; if (attrs & msidbFeatureAttributesFollowParent) ret |= INSTALLFEATUREATTRIBUTE_FOLLOWPARENT; if (attrs & msidbFeatureAttributesFavorAdvertise) ret |= INSTALLFEATUREATTRIBUTE_FAVORADVERTISE; if (attrs & msidbFeatureAttributesDisallowAdvertise) ret |= INSTALLFEATUREATTRIBUTE_DISALLOWADVERTISE; if (attrs & msidbFeatureAttributesNoUnsupportedAdvertise) ret |= INSTALLFEATUREATTRIBUTE_NOUNSUPPORTEDADVERTISE; return ret; } static UINT MSI_GetFeatureInfo( MSIPACKAGE *package, LPCWSTR name, LPDWORD attrs, LPWSTR title, LPDWORD title_len, LPWSTR help, LPDWORD help_len ) { UINT r = ERROR_SUCCESS; MSIFEATURE *feature = msi_get_loaded_feature( package, name ); int len; if (!feature) return ERROR_UNKNOWN_FEATURE; if (attrs) *attrs = map_feature_attributes( feature->Attributes ); if (title_len) { if (feature->Title) len = lstrlenW( feature->Title ); else len = 0; if (*title_len <= len) { *title_len = len; if (title) r = ERROR_MORE_DATA; } else if (title) { if (feature->Title) lstrcpyW( title, feature->Title ); else *title = 0; *title_len = len; } } if (help_len) { if (feature->Description) len = lstrlenW( feature->Description ); else len = 0; if (*help_len <= len) { *help_len = len; if (help) r = ERROR_MORE_DATA; } else if (help) { if (feature->Description) lstrcpyW( help, feature->Description ); else *help = 0; *help_len = len; } } return r; } /*********************************************************************** * MsiGetFeatureInfoW (MSI.@) */ UINT WINAPI MsiGetFeatureInfoW( MSIHANDLE handle, LPCWSTR feature, LPDWORD attrs, LPWSTR title, LPDWORD title_len, LPWSTR help, LPDWORD help_len ) { UINT r; MSIPACKAGE *package; TRACE("%u, %s, %p, %p, %p, %p, %p\n", handle, debugstr_w(feature), attrs, title, title_len, help, help_len); if (!feature) return ERROR_INVALID_PARAMETER; if (!(package = msihandle2msiinfo( handle, MSIHANDLETYPE_PACKAGE ))) return ERROR_INVALID_HANDLE; /* features may not have been loaded yet */ msi_load_all_components( package ); msi_load_all_features( package ); r = MSI_GetFeatureInfo( package, feature, attrs, title, title_len, help, help_len ); msiobj_release( &package->hdr ); return r; } /*********************************************************************** * MsiSetComponentStateA (MSI.@) */ UINT WINAPI MsiSetComponentStateA(MSIHANDLE hInstall, LPCSTR szComponent, INSTALLSTATE iState) { UINT rc; LPWSTR szwComponent = strdupAtoW(szComponent); rc = MsiSetComponentStateW(hInstall, szwComponent, iState); msi_free(szwComponent); return rc; } /*********************************************************************** * MsiGetComponentStateA (MSI.@) */ UINT WINAPI MsiGetComponentStateA(MSIHANDLE hInstall, LPCSTR szComponent, INSTALLSTATE *piInstalled, INSTALLSTATE *piAction) { LPWSTR szwComponent= NULL; UINT rc; szwComponent= strdupAtoW(szComponent); rc = MsiGetComponentStateW(hInstall,szwComponent,piInstalled, piAction); msi_free( szwComponent); return rc; } static UINT MSI_SetComponentStateW(MSIPACKAGE *package, LPCWSTR szComponent, INSTALLSTATE iState) { MSICOMPONENT *comp; TRACE("%p %s %d\n", package, debugstr_w(szComponent), iState); comp = msi_get_loaded_component(package, szComponent); if (!comp) return ERROR_UNKNOWN_COMPONENT; if (comp->Enabled) comp->Action = iState; return ERROR_SUCCESS; } UINT MSI_GetComponentStateW(MSIPACKAGE *package, LPCWSTR szComponent, INSTALLSTATE *piInstalled, INSTALLSTATE *piAction) { MSICOMPONENT *comp; TRACE("%p %s %p %p\n", package, debugstr_w(szComponent), piInstalled, piAction); comp = msi_get_loaded_component(package,szComponent); if (!comp) return ERROR_UNKNOWN_COMPONENT; if (piInstalled) { if (comp->Enabled) *piInstalled = comp->Installed; else *piInstalled = INSTALLSTATE_UNKNOWN; } if (piAction) { if (comp->Enabled) *piAction = comp->Action; else *piAction = INSTALLSTATE_UNKNOWN; } TRACE("states (%i, %i)\n", comp->Installed, comp->Action ); return ERROR_SUCCESS; } /*********************************************************************** * MsiSetComponentStateW (MSI.@) */ UINT WINAPI MsiSetComponentStateW(MSIHANDLE hInstall, LPCWSTR szComponent, INSTALLSTATE iState) { MSIPACKAGE* package; UINT ret; if (!szComponent) return ERROR_UNKNOWN_COMPONENT; package = msihandle2msiinfo(hInstall, MSIHANDLETYPE_PACKAGE); if (!package) { MSIHANDLE remote; if (!(remote = msi_get_remote(hInstall))) return ERROR_INVALID_HANDLE; __TRY { ret = remote_SetComponentState(remote, szComponent, iState); } __EXCEPT(rpc_filter) { ret = GetExceptionCode(); } __ENDTRY return ret; } ret = MSI_SetComponentStateW(package, szComponent, iState); msiobj_release(&package->hdr); return ret; } /*********************************************************************** * MsiGetComponentStateW (MSI.@) */ UINT WINAPI MsiGetComponentStateW(MSIHANDLE hInstall, LPCWSTR szComponent, INSTALLSTATE *piInstalled, INSTALLSTATE *piAction) { MSIPACKAGE* package; UINT ret; TRACE("%d %s %p %p\n", hInstall, debugstr_w(szComponent), piInstalled, piAction); if (!szComponent) return ERROR_UNKNOWN_COMPONENT; package = msihandle2msiinfo(hInstall, MSIHANDLETYPE_PACKAGE); if (!package) { MSIHANDLE remote; if (!(remote = msi_get_remote(hInstall))) return ERROR_INVALID_HANDLE; __TRY { ret = remote_GetComponentState(remote, szComponent, piInstalled, piAction); } __EXCEPT(rpc_filter) { ret = GetExceptionCode(); } __ENDTRY return ret; } ret = MSI_GetComponentStateW( package, szComponent, piInstalled, piAction); msiobj_release( &package->hdr ); return ret; } /*********************************************************************** * MsiGetLanguage (MSI.@) */ LANGID WINAPI MsiGetLanguage(MSIHANDLE hInstall) { MSIPACKAGE* package; LANGID langid; package = msihandle2msiinfo(hInstall, MSIHANDLETYPE_PACKAGE); if (!package) { MSIHANDLE remote; if (!(remote = msi_get_remote(hInstall))) return ERROR_INVALID_HANDLE; __TRY { langid = remote_GetLanguage(remote); } __EXCEPT(rpc_filter) { langid = 0; } __ENDTRY return langid; } langid = msi_get_property_int( package->db, L"ProductLanguage", 0 ); msiobj_release( &package->hdr ); return langid; } UINT MSI_SetInstallLevel( MSIPACKAGE *package, int iInstallLevel ) { WCHAR level[6]; int len; UINT r; TRACE("%p %i\n", package, iInstallLevel); if (iInstallLevel > 32767) return ERROR_INVALID_PARAMETER; if (iInstallLevel < 1) return MSI_SetFeatureStates( package ); len = swprintf( level, ARRAY_SIZE(level), L"%d", iInstallLevel ); r = msi_set_property( package->db, L"INSTALLLEVEL", level, len ); if ( r == ERROR_SUCCESS ) r = MSI_SetFeatureStates( package ); return r; } /*********************************************************************** * MsiSetInstallLevel (MSI.@) */ UINT WINAPI MsiSetInstallLevel(MSIHANDLE hInstall, int iInstallLevel) { MSIPACKAGE* package; UINT r; TRACE("%d %i\n", hInstall, iInstallLevel); package = msihandle2msiinfo(hInstall, MSIHANDLETYPE_PACKAGE); if (!package) { MSIHANDLE remote; if (!(remote = msi_get_remote(hInstall))) return ERROR_INVALID_HANDLE; __TRY { r = remote_SetInstallLevel(remote, iInstallLevel); } __EXCEPT(rpc_filter) { r = GetExceptionCode(); } __ENDTRY return r; } r = MSI_SetInstallLevel( package, iInstallLevel ); msiobj_release( &package->hdr ); return r; } /*********************************************************************** * MsiGetFeatureValidStatesW (MSI.@) */ UINT WINAPI MsiGetFeatureValidStatesW(MSIHANDLE hInstall, LPCWSTR szFeature, LPDWORD pInstallState) { if(pInstallState) *pInstallState = 1<<INSTALLSTATE_LOCAL; FIXME("%d %s %p stub returning %d\n", hInstall, debugstr_w(szFeature), pInstallState, pInstallState ? *pInstallState : 0); return ERROR_SUCCESS; } /*********************************************************************** * MsiGetFeatureValidStatesA (MSI.@) */ UINT WINAPI MsiGetFeatureValidStatesA(MSIHANDLE hInstall, LPCSTR szFeature, LPDWORD pInstallState) { UINT ret; LPWSTR szwFeature = strdupAtoW(szFeature); ret = MsiGetFeatureValidStatesW(hInstall, szwFeature, pInstallState); msi_free(szwFeature); return ret; }