2 * Implementation of the Microsoft Installer (msi.dll)
4 * Copyright 2005 Aric Stewart for CodeWeavers
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
21 /* Msi top level apis directly related to installs */
30 #include "wine/debug.h"
37 #include "msiserver.h"
38 #include "wine/unicode.h"
40 WINE_DEFAULT_DEBUG_CHANNEL(msi);
42 /***********************************************************************
43 * MsiDoActionA (MSI.@)
45 UINT WINAPI MsiDoActionA( MSIHANDLE hInstall, LPCSTR szAction )
50 TRACE("%s\n", debugstr_a(szAction));
52 szwAction = strdupAtoW(szAction);
53 if (szAction && !szwAction)
54 return ERROR_FUNCTION_FAILED;
56 ret = MsiDoActionW( hInstall, szwAction );
57 msi_free( szwAction );
61 /***********************************************************************
62 * MsiDoActionW (MSI.@)
64 UINT WINAPI MsiDoActionW( MSIHANDLE hInstall, LPCWSTR szAction )
69 TRACE("%s\n",debugstr_w(szAction));
72 return ERROR_INVALID_PARAMETER;
74 package = msihandle2msiinfo( hInstall, MSIHANDLETYPE_PACKAGE );
79 IWineMsiRemotePackage *remote_package;
81 remote_package = (IWineMsiRemotePackage *)msi_get_remote( hInstall );
83 return ERROR_INVALID_HANDLE;
85 action = SysAllocString( szAction );
88 IWineMsiRemotePackage_Release( remote_package );
89 return ERROR_OUTOFMEMORY;
92 hr = IWineMsiRemotePackage_DoAction( remote_package, action );
94 SysFreeString( action );
95 IWineMsiRemotePackage_Release( remote_package );
99 if (HRESULT_FACILITY(hr) == FACILITY_WIN32)
100 return HRESULT_CODE(hr);
102 return ERROR_FUNCTION_FAILED;
105 return ERROR_SUCCESS;
108 ret = ACTION_PerformUIAction( package, szAction, -1 );
109 msiobj_release( &package->hdr );
114 /***********************************************************************
115 * MsiSequenceA (MSI.@)
117 UINT WINAPI MsiSequenceA( MSIHANDLE hInstall, LPCSTR szTable, INT iSequenceMode )
122 TRACE("%s\n", debugstr_a(szTable));
124 szwTable = strdupAtoW(szTable);
125 if (szTable && !szwTable)
126 return ERROR_FUNCTION_FAILED;
128 ret = MsiSequenceW( hInstall, szwTable, iSequenceMode );
129 msi_free( szwTable );
133 /***********************************************************************
134 * MsiSequenceW (MSI.@)
136 UINT WINAPI MsiSequenceW( MSIHANDLE hInstall, LPCWSTR szTable, INT iSequenceMode )
141 TRACE("%s\n", debugstr_w(szTable));
143 package = msihandle2msiinfo( hInstall, MSIHANDLETYPE_PACKAGE );
148 IWineMsiRemotePackage *remote_package;
150 remote_package = (IWineMsiRemotePackage *)msi_get_remote( hInstall );
152 return ERROR_INVALID_HANDLE;
154 table = SysAllocString( szTable );
157 IWineMsiRemotePackage_Release( remote_package );
158 return ERROR_OUTOFMEMORY;
161 hr = IWineMsiRemotePackage_Sequence( remote_package, table, iSequenceMode );
163 SysFreeString( table );
164 IWineMsiRemotePackage_Release( remote_package );
168 if (HRESULT_FACILITY(hr) == FACILITY_WIN32)
169 return HRESULT_CODE(hr);
171 return ERROR_FUNCTION_FAILED;
174 return ERROR_SUCCESS;
177 ret = MSI_Sequence( package, szTable, iSequenceMode );
178 msiobj_release( &package->hdr );
183 UINT msi_strcpy_to_awstring( LPCWSTR str, awstring *awbuf, DWORD *sz )
185 UINT len, r = ERROR_SUCCESS;
187 if (awbuf->str.w && !sz )
188 return ERROR_INVALID_PARAMETER;
195 len = lstrlenW( str );
197 lstrcpynW( awbuf->str.w, str, *sz );
201 len = WideCharToMultiByte( CP_ACP, 0, str, -1, NULL, 0, NULL, NULL );
204 WideCharToMultiByte( CP_ACP, 0, str, -1, awbuf->str.a, *sz, NULL, NULL );
205 if ( awbuf->str.a && *sz && (len >= *sz) )
206 awbuf->str.a[*sz - 1] = 0;
209 if (awbuf->str.w && len >= *sz)
215 /***********************************************************************
216 * MsiGetTargetPath (internal)
218 static UINT MSI_GetTargetPath( MSIHANDLE hInstall, LPCWSTR szFolder,
219 awstring *szPathBuf, LPDWORD pcchPathBuf )
223 UINT r = ERROR_FUNCTION_FAILED;
226 return ERROR_INVALID_PARAMETER;
228 package = msihandle2msiinfo( hInstall, MSIHANDLETYPE_PACKAGE );
232 IWineMsiRemotePackage *remote_package;
237 remote_package = (IWineMsiRemotePackage *)msi_get_remote( hInstall );
239 return ERROR_INVALID_HANDLE;
241 folder = SysAllocString( szFolder );
244 IWineMsiRemotePackage_Release( remote_package );
245 return ERROR_OUTOFMEMORY;
249 hr = IWineMsiRemotePackage_GetTargetPath( remote_package, folder,
255 value = msi_alloc(len * sizeof(WCHAR));
258 r = ERROR_OUTOFMEMORY;
262 hr = IWineMsiRemotePackage_GetTargetPath( remote_package, folder,
263 (BSTR *)value, &len);
267 r = msi_strcpy_to_awstring( value, szPathBuf, pcchPathBuf );
270 IWineMsiRemotePackage_Release( remote_package );
271 SysFreeString( folder );
276 if (HRESULT_FACILITY(hr) == FACILITY_WIN32)
277 return HRESULT_CODE(hr);
279 return ERROR_FUNCTION_FAILED;
285 path = resolve_folder( package, szFolder, FALSE, FALSE, TRUE, NULL );
286 msiobj_release( &package->hdr );
289 return ERROR_DIRECTORY;
291 r = msi_strcpy_to_awstring( path, szPathBuf, pcchPathBuf );
296 /***********************************************************************
297 * MsiGetTargetPathA (MSI.@)
299 UINT WINAPI MsiGetTargetPathA( MSIHANDLE hInstall, LPCSTR szFolder,
300 LPSTR szPathBuf, LPDWORD pcchPathBuf )
306 TRACE("%s %p %p\n", debugstr_a(szFolder), szPathBuf, pcchPathBuf);
308 szwFolder = strdupAtoW(szFolder);
309 if (szFolder && !szwFolder)
310 return ERROR_FUNCTION_FAILED;
312 path.unicode = FALSE;
313 path.str.a = szPathBuf;
315 r = MSI_GetTargetPath( hInstall, szwFolder, &path, pcchPathBuf );
317 msi_free( szwFolder );
322 /***********************************************************************
323 * MsiGetTargetPathW (MSI.@)
325 UINT WINAPI MsiGetTargetPathW( MSIHANDLE hInstall, LPCWSTR szFolder,
326 LPWSTR szPathBuf, LPDWORD pcchPathBuf )
330 TRACE("%s %p %p\n", debugstr_w(szFolder), szPathBuf, pcchPathBuf);
333 path.str.w = szPathBuf;
335 return MSI_GetTargetPath( hInstall, szFolder, &path, pcchPathBuf );
338 /***********************************************************************
339 * MsiGetSourcePath (internal)
341 static UINT MSI_GetSourcePath( MSIHANDLE hInstall, LPCWSTR szFolder,
342 awstring *szPathBuf, LPDWORD pcchPathBuf )
346 UINT r = ERROR_FUNCTION_FAILED;
348 TRACE("%s %p %p\n", debugstr_w(szFolder), szPathBuf, pcchPathBuf );
351 return ERROR_INVALID_PARAMETER;
353 package = msihandle2msiinfo( hInstall, MSIHANDLETYPE_PACKAGE );
357 IWineMsiRemotePackage *remote_package;
362 remote_package = (IWineMsiRemotePackage *)msi_get_remote( hInstall );
364 return ERROR_INVALID_HANDLE;
366 folder = SysAllocString( szFolder );
369 IWineMsiRemotePackage_Release( remote_package );
370 return ERROR_OUTOFMEMORY;
374 hr = IWineMsiRemotePackage_GetSourcePath( remote_package, folder,
380 value = msi_alloc(len * sizeof(WCHAR));
383 r = ERROR_OUTOFMEMORY;
387 hr = IWineMsiRemotePackage_GetSourcePath( remote_package, folder,
388 (BSTR *)value, &len);
392 r = msi_strcpy_to_awstring( value, szPathBuf, pcchPathBuf );
395 IWineMsiRemotePackage_Release( remote_package );
396 SysFreeString( folder );
401 if (HRESULT_FACILITY(hr) == FACILITY_WIN32)
402 return HRESULT_CODE(hr);
404 return ERROR_FUNCTION_FAILED;
410 if (szPathBuf->str.w && !pcchPathBuf )
412 msiobj_release( &package->hdr );
413 return ERROR_INVALID_PARAMETER;
416 path = resolve_folder(package, szFolder, TRUE, FALSE, TRUE, NULL);
417 msiobj_release( &package->hdr );
419 TRACE("path = %s\n",debugstr_w(path));
421 return ERROR_DIRECTORY;
423 r = msi_strcpy_to_awstring( path, szPathBuf, pcchPathBuf );
428 /***********************************************************************
429 * MsiGetSourcePathA (MSI.@)
431 UINT WINAPI MsiGetSourcePathA( MSIHANDLE hInstall, LPCSTR szFolder,
432 LPSTR szPathBuf, LPDWORD pcchPathBuf )
438 TRACE("%s %p %p\n", szFolder, debugstr_a(szPathBuf), pcchPathBuf);
441 str.str.a = szPathBuf;
443 folder = strdupAtoW( szFolder );
444 r = MSI_GetSourcePath( hInstall, folder, &str, pcchPathBuf );
450 /***********************************************************************
451 * MsiGetSourcePathW (MSI.@)
453 UINT WINAPI MsiGetSourcePathW( MSIHANDLE hInstall, LPCWSTR szFolder,
454 LPWSTR szPathBuf, LPDWORD pcchPathBuf )
458 TRACE("%s %p %p\n", debugstr_w(szFolder), szPathBuf, pcchPathBuf );
461 str.str.w = szPathBuf;
463 return MSI_GetSourcePath( hInstall, szFolder, &str, pcchPathBuf );
466 /***********************************************************************
467 * MsiSetTargetPathA (MSI.@)
469 UINT WINAPI MsiSetTargetPathA( MSIHANDLE hInstall, LPCSTR szFolder,
470 LPCSTR szFolderPath )
472 LPWSTR szwFolder = NULL, szwFolderPath = NULL;
473 UINT rc = ERROR_OUTOFMEMORY;
475 if ( !szFolder || !szFolderPath )
476 return ERROR_INVALID_PARAMETER;
478 szwFolder = strdupAtoW(szFolder);
479 szwFolderPath = strdupAtoW(szFolderPath);
480 if (!szwFolder || !szwFolderPath)
483 rc = MsiSetTargetPathW( hInstall, szwFolder, szwFolderPath );
487 msi_free(szwFolderPath);
493 * Ok my original interpretation of this was wrong. And it looks like msdn has
494 * changed a bit also. The given folder path does not have to actually already
495 * exist, it just cannot be read only and must be a legal folder path.
497 UINT MSI_SetTargetPathW(MSIPACKAGE *package, LPCWSTR szFolder,
498 LPCWSTR szFolderPath)
506 TRACE("%p %s %s\n",package, debugstr_w(szFolder),debugstr_w(szFolderPath));
508 attrib = GetFileAttributesW(szFolderPath);
509 /* native MSI tests writeability by making temporary files at each drive */
510 if ( attrib != INVALID_FILE_ATTRIBUTES &&
511 (attrib & FILE_ATTRIBUTE_OFFLINE ||
512 attrib & FILE_ATTRIBUTE_READONLY))
513 return ERROR_FUNCTION_FAILED;
515 path = resolve_folder(package,szFolder,FALSE,FALSE,FALSE,&folder);
517 return ERROR_DIRECTORY;
519 msi_free(folder->Property);
520 folder->Property = build_directory_name(2, szFolderPath, NULL);
522 if (lstrcmpiW(path, folder->Property) == 0)
525 * Resolved Target has not really changed, so just
526 * set this folder and do not recalculate everything.
528 msi_free(folder->ResolvedTarget);
529 folder->ResolvedTarget = NULL;
530 path2 = resolve_folder(package,szFolder,FALSE,TRUE,FALSE,NULL);
537 LIST_FOR_EACH_ENTRY( f, &package->folders, MSIFOLDER, entry )
539 msi_free(f->ResolvedTarget);
540 f->ResolvedTarget=NULL;
543 LIST_FOR_EACH_ENTRY( f, &package->folders, MSIFOLDER, entry )
545 path2 = resolve_folder(package, f->Directory, FALSE, TRUE, FALSE, NULL);
549 LIST_FOR_EACH_ENTRY( file, &package->files, MSIFILE, entry )
551 MSICOMPONENT *comp = file->Component;
557 p = resolve_folder(package, comp->Directory, FALSE, FALSE, FALSE, NULL);
558 msi_free(file->TargetPath);
560 file->TargetPath = build_directory_name(2, p, file->FileName);
566 return ERROR_SUCCESS;
569 /***********************************************************************
570 * MsiSetTargetPathW (MSI.@)
572 UINT WINAPI MsiSetTargetPathW(MSIHANDLE hInstall, LPCWSTR szFolder,
573 LPCWSTR szFolderPath)
578 TRACE("%s %s\n",debugstr_w(szFolder),debugstr_w(szFolderPath));
580 if ( !szFolder || !szFolderPath )
581 return ERROR_INVALID_PARAMETER;
583 package = msihandle2msiinfo(hInstall, MSIHANDLETYPE_PACKAGE);
588 IWineMsiRemotePackage *remote_package;
590 remote_package = (IWineMsiRemotePackage *)msi_get_remote( hInstall );
592 return ERROR_INVALID_HANDLE;
594 folder = SysAllocString( szFolder );
595 path = SysAllocString( szFolderPath );
596 if (!folder || !path)
598 SysFreeString(folder);
600 IWineMsiRemotePackage_Release( remote_package );
601 return ERROR_OUTOFMEMORY;
604 hr = IWineMsiRemotePackage_SetTargetPath( remote_package, folder, path );
606 SysFreeString(folder);
608 IWineMsiRemotePackage_Release( remote_package );
612 if (HRESULT_FACILITY(hr) == FACILITY_WIN32)
613 return HRESULT_CODE(hr);
615 return ERROR_FUNCTION_FAILED;
618 return ERROR_SUCCESS;
621 ret = MSI_SetTargetPathW( package, szFolder, szFolderPath );
622 msiobj_release( &package->hdr );
626 /***********************************************************************
629 * Returns an internal installer state (if it is running in a mode iRunMode)
632 * hInstall [I] Handle to the installation
633 * hRunMode [I] Checking run mode
634 * MSIRUNMODE_ADMIN Administrative mode
635 * MSIRUNMODE_ADVERTISE Advertisement mode
636 * MSIRUNMODE_MAINTENANCE Maintenance mode
637 * MSIRUNMODE_ROLLBACKENABLED Rollback is enabled
638 * MSIRUNMODE_LOGENABLED Log file is writing
639 * MSIRUNMODE_OPERATIONS Operations in progress??
640 * MSIRUNMODE_REBOOTATEND We need to reboot after installation completed
641 * MSIRUNMODE_REBOOTNOW We need to reboot to continue the installation
642 * MSIRUNMODE_CABINET Files from cabinet are installed
643 * MSIRUNMODE_SOURCESHORTNAMES Long names in source files is suppressed
644 * MSIRUNMODE_TARGETSHORTNAMES Long names in destination files is suppressed
645 * MSIRUNMODE_RESERVED11 Reserved
646 * MSIRUNMODE_WINDOWS9X Running under Windows95/98
647 * MSIRUNMODE_ZAWENABLED Demand installation is supported
648 * MSIRUNMODE_RESERVED14 Reserved
649 * MSIRUNMODE_RESERVED15 Reserved
650 * MSIRUNMODE_SCHEDULED called from install script
651 * MSIRUNMODE_ROLLBACK called from rollback script
652 * MSIRUNMODE_COMMIT called from commit script
656 * Not in the state: FALSE
659 BOOL WINAPI MsiGetMode(MSIHANDLE hInstall, MSIRUNMODE iRunMode)
664 TRACE("%d %d\n", hInstall, iRunMode);
666 package = msihandle2msiinfo(hInstall, MSIHANDLETYPE_PACKAGE);
671 IWineMsiRemotePackage *remote_package;
673 remote_package = (IWineMsiRemotePackage *)msi_get_remote(hInstall);
677 hr = IWineMsiRemotePackage_GetMode(remote_package, iRunMode, &ret);
678 IWineMsiRemotePackage_Release(remote_package);
688 case MSIRUNMODE_WINDOWS9X:
689 if (GetVersion() & 0x80000000)
693 case MSIRUNMODE_OPERATIONS:
694 case MSIRUNMODE_RESERVED11:
695 case MSIRUNMODE_RESERVED14:
696 case MSIRUNMODE_RESERVED15:
699 case MSIRUNMODE_SCHEDULED:
700 r = package->scheduled_action_running;
703 case MSIRUNMODE_ROLLBACK:
704 r = package->rollback_action_running;
707 case MSIRUNMODE_COMMIT:
708 r = package->commit_action_running;
711 case MSIRUNMODE_MAINTENANCE:
712 r = msi_get_property_int( package->db, szInstalled, 0 ) != 0;
715 case MSIRUNMODE_REBOOTATEND:
716 r = package->need_reboot;
720 FIXME("unimplemented run mode: %d\n", iRunMode);
724 msiobj_release( &package->hdr );
728 /***********************************************************************
731 UINT WINAPI MsiSetMode(MSIHANDLE hInstall, MSIRUNMODE iRunMode, BOOL fState)
736 TRACE("%d %d %d\n", hInstall, iRunMode, fState);
738 package = msihandle2msiinfo( hInstall, MSIHANDLETYPE_PACKAGE );
742 IWineMsiRemotePackage *remote_package;
744 remote_package = (IWineMsiRemotePackage *)msi_get_remote( hInstall );
748 hr = IWineMsiRemotePackage_SetMode( remote_package, iRunMode, fState );
749 IWineMsiRemotePackage_Release( remote_package );
753 if (HRESULT_FACILITY(hr) == FACILITY_WIN32)
754 return HRESULT_CODE(hr);
756 return ERROR_FUNCTION_FAILED;
759 return ERROR_SUCCESS;
764 case MSIRUNMODE_REBOOTATEND:
765 package->need_reboot = 1;
769 case MSIRUNMODE_REBOOTNOW:
770 FIXME("unimplemented run mode: %d\n", iRunMode);
771 r = ERROR_FUNCTION_FAILED;
775 r = ERROR_ACCESS_DENIED;
778 msiobj_release( &package->hdr );
782 /***********************************************************************
783 * MsiSetFeatureStateA (MSI.@)
785 * According to the docs, when this is called it immediately recalculates
786 * all the component states as well
788 UINT WINAPI MsiSetFeatureStateA(MSIHANDLE hInstall, LPCSTR szFeature,
791 LPWSTR szwFeature = NULL;
794 szwFeature = strdupAtoW(szFeature);
797 return ERROR_FUNCTION_FAILED;
799 rc = MsiSetFeatureStateW(hInstall,szwFeature, iState);
801 msi_free(szwFeature);
808 UINT WINAPI MSI_SetFeatureStateW(MSIPACKAGE* package, LPCWSTR szFeature,
811 UINT rc = ERROR_SUCCESS;
812 MSIFEATURE *feature, *child;
814 TRACE("%s %i\n", debugstr_w(szFeature), iState);
816 feature = get_loaded_feature(package,szFeature);
818 return ERROR_UNKNOWN_FEATURE;
820 if (iState == INSTALLSTATE_ADVERTISED &&
821 feature->Attributes & msidbFeatureAttributesDisallowAdvertise)
822 return ERROR_FUNCTION_FAILED;
824 msi_feature_set_state(package, feature, iState);
826 ACTION_UpdateComponentStates(package,szFeature);
828 /* update all the features that are children of this feature */
829 LIST_FOR_EACH_ENTRY( child, &package->features, MSIFEATURE, entry )
831 if (lstrcmpW(szFeature, child->Feature_Parent) == 0)
832 MSI_SetFeatureStateW(package, child->Feature, iState);
838 /***********************************************************************
839 * MsiSetFeatureStateW (MSI.@)
841 UINT WINAPI MsiSetFeatureStateW(MSIHANDLE hInstall, LPCWSTR szFeature,
845 UINT rc = ERROR_SUCCESS;
847 TRACE("%s %i\n",debugstr_w(szFeature), iState);
849 package = msihandle2msiinfo(hInstall, MSIHANDLETYPE_PACKAGE);
854 IWineMsiRemotePackage *remote_package;
856 remote_package = (IWineMsiRemotePackage *)msi_get_remote(hInstall);
858 return ERROR_INVALID_HANDLE;
860 feature = SysAllocString(szFeature);
863 IWineMsiRemotePackage_Release(remote_package);
864 return ERROR_OUTOFMEMORY;
867 hr = IWineMsiRemotePackage_SetFeatureState(remote_package, feature, iState);
869 SysFreeString(feature);
870 IWineMsiRemotePackage_Release(remote_package);
874 if (HRESULT_FACILITY(hr) == FACILITY_WIN32)
875 return HRESULT_CODE(hr);
877 return ERROR_FUNCTION_FAILED;
880 return ERROR_SUCCESS;
883 rc = MSI_SetFeatureStateW(package,szFeature,iState);
885 msiobj_release( &package->hdr );
889 /***********************************************************************
890 * MsiGetFeatureStateA (MSI.@)
892 UINT WINAPI MsiGetFeatureStateA(MSIHANDLE hInstall, LPCSTR szFeature,
893 INSTALLSTATE *piInstalled, INSTALLSTATE *piAction)
895 LPWSTR szwFeature = NULL;
898 szwFeature = strdupAtoW(szFeature);
900 rc = MsiGetFeatureStateW(hInstall,szwFeature,piInstalled, piAction);
902 msi_free( szwFeature);
907 UINT MSI_GetFeatureStateW(MSIPACKAGE *package, LPCWSTR szFeature,
908 INSTALLSTATE *piInstalled, INSTALLSTATE *piAction)
912 feature = get_loaded_feature(package,szFeature);
914 return ERROR_UNKNOWN_FEATURE;
917 *piInstalled = feature->Installed;
920 *piAction = feature->Action;
922 TRACE("returning %i %i\n", feature->Installed, feature->Action);
924 return ERROR_SUCCESS;
927 /***********************************************************************
928 * MsiGetFeatureStateW (MSI.@)
930 UINT WINAPI MsiGetFeatureStateW(MSIHANDLE hInstall, LPCWSTR szFeature,
931 INSTALLSTATE *piInstalled, INSTALLSTATE *piAction)
936 TRACE("%d %s %p %p\n", hInstall, debugstr_w(szFeature), piInstalled, piAction);
938 package = msihandle2msiinfo(hInstall, MSIHANDLETYPE_PACKAGE);
943 IWineMsiRemotePackage *remote_package;
945 remote_package = (IWineMsiRemotePackage *)msi_get_remote(hInstall);
947 return ERROR_INVALID_HANDLE;
949 feature = SysAllocString(szFeature);
952 IWineMsiRemotePackage_Release(remote_package);
953 return ERROR_OUTOFMEMORY;
956 hr = IWineMsiRemotePackage_GetFeatureState(remote_package, feature,
957 piInstalled, piAction);
959 SysFreeString(feature);
960 IWineMsiRemotePackage_Release(remote_package);
964 if (HRESULT_FACILITY(hr) == FACILITY_WIN32)
965 return HRESULT_CODE(hr);
967 return ERROR_FUNCTION_FAILED;
970 return ERROR_SUCCESS;
973 ret = MSI_GetFeatureStateW(package, szFeature, piInstalled, piAction);
974 msiobj_release( &package->hdr );
978 /***********************************************************************
979 * MsiGetFeatureCostA (MSI.@)
981 UINT WINAPI MsiGetFeatureCostA(MSIHANDLE hInstall, LPCSTR szFeature,
982 MSICOSTTREE iCostTree, INSTALLSTATE iState, LPINT piCost)
984 LPWSTR szwFeature = NULL;
987 szwFeature = strdupAtoW(szFeature);
989 rc = MsiGetFeatureCostW(hInstall, szwFeature, iCostTree, iState, piCost);
991 msi_free(szwFeature);
996 static INT feature_cost( MSIFEATURE *feature )
1001 LIST_FOR_EACH_ENTRY( comp, &feature->Components, MSICOMPONENT, entry )
1008 UINT MSI_GetFeatureCost( MSIPACKAGE *package, MSIFEATURE *feature, MSICOSTTREE tree,
1009 INSTALLSTATE state, LPINT cost )
1011 TRACE("%s, %u, %d, %p\n", debugstr_w(feature->Feature), tree, state, cost);
1016 case MSICOSTTREE_CHILDREN:
1020 LIST_FOR_EACH_ENTRY( child, &feature->Children, MSIFEATURE, entry )
1022 if (child->ActionRequest == state)
1023 *cost += feature_cost( child );
1027 case MSICOSTTREE_PARENTS:
1029 const WCHAR *feature_parent = feature->Feature_Parent;
1032 MSIFEATURE *parent = get_loaded_feature( package, feature_parent );
1036 if (parent->ActionRequest == state)
1037 *cost += feature_cost( parent );
1039 feature_parent = parent->Feature_Parent;
1043 case MSICOSTTREE_SELFONLY:
1044 if (feature->ActionRequest == state)
1045 *cost = feature_cost( feature );
1049 WARN("unhandled cost tree %u\n", tree);
1054 return ERROR_SUCCESS;
1057 /***********************************************************************
1058 * MsiGetFeatureCostW (MSI.@)
1060 UINT WINAPI MsiGetFeatureCostW(MSIHANDLE hInstall, LPCWSTR szFeature,
1061 MSICOSTTREE iCostTree, INSTALLSTATE iState, LPINT piCost)
1063 MSIPACKAGE *package;
1064 MSIFEATURE *feature;
1067 TRACE("(%d %s %i %i %p)\n", hInstall, debugstr_w(szFeature),
1068 iCostTree, iState, piCost);
1070 package = msihandle2msiinfo(hInstall, MSIHANDLETYPE_PACKAGE);
1075 IWineMsiRemotePackage *remote_package;
1077 remote_package = (IWineMsiRemotePackage *)msi_get_remote(hInstall);
1078 if (!remote_package)
1079 return ERROR_INVALID_HANDLE;
1081 feature = SysAllocString(szFeature);
1084 IWineMsiRemotePackage_Release(remote_package);
1085 return ERROR_OUTOFMEMORY;
1088 hr = IWineMsiRemotePackage_GetFeatureCost(remote_package, feature,
1089 iCostTree, iState, piCost);
1091 SysFreeString(feature);
1092 IWineMsiRemotePackage_Release(remote_package);
1096 if (HRESULT_FACILITY(hr) == FACILITY_WIN32)
1097 return HRESULT_CODE(hr);
1099 return ERROR_FUNCTION_FAILED;
1102 return ERROR_SUCCESS;
1105 feature = get_loaded_feature(package, szFeature);
1108 ret = MSI_GetFeatureCost(package, feature, iCostTree, iState, piCost);
1110 ret = ERROR_UNKNOWN_FEATURE;
1112 msiobj_release( &package->hdr );
1116 /***********************************************************************
1117 * MsiSetComponentStateA (MSI.@)
1119 UINT WINAPI MsiSetComponentStateA(MSIHANDLE hInstall, LPCSTR szComponent,
1120 INSTALLSTATE iState)
1123 LPWSTR szwComponent = strdupAtoW(szComponent);
1125 rc = MsiSetComponentStateW(hInstall, szwComponent, iState);
1127 msi_free(szwComponent);
1132 /***********************************************************************
1133 * MsiGetComponentStateA (MSI.@)
1135 UINT WINAPI MsiGetComponentStateA(MSIHANDLE hInstall, LPCSTR szComponent,
1136 INSTALLSTATE *piInstalled, INSTALLSTATE *piAction)
1138 LPWSTR szwComponent= NULL;
1141 szwComponent= strdupAtoW(szComponent);
1143 rc = MsiGetComponentStateW(hInstall,szwComponent,piInstalled, piAction);
1145 msi_free( szwComponent);
1150 static UINT MSI_SetComponentStateW(MSIPACKAGE *package, LPCWSTR szComponent,
1151 INSTALLSTATE iState)
1155 TRACE("%p %s %d\n", package, debugstr_w(szComponent), iState);
1157 comp = get_loaded_component(package, szComponent);
1159 return ERROR_UNKNOWN_COMPONENT;
1161 comp->Installed = iState;
1163 return ERROR_SUCCESS;
1166 UINT MSI_GetComponentStateW(MSIPACKAGE *package, LPCWSTR szComponent,
1167 INSTALLSTATE *piInstalled, INSTALLSTATE *piAction)
1171 TRACE("%p %s %p %p\n", package, debugstr_w(szComponent),
1172 piInstalled, piAction);
1174 comp = get_loaded_component(package,szComponent);
1176 return ERROR_UNKNOWN_COMPONENT;
1179 *piInstalled = comp->Installed;
1182 *piAction = comp->Action;
1184 TRACE("states (%i, %i)\n", comp->Installed, comp->Action );
1186 return ERROR_SUCCESS;
1189 /***********************************************************************
1190 * MsiSetComponentStateW (MSI.@)
1192 UINT WINAPI MsiSetComponentStateW(MSIHANDLE hInstall, LPCWSTR szComponent,
1193 INSTALLSTATE iState)
1195 MSIPACKAGE* package;
1198 package = msihandle2msiinfo(hInstall, MSIHANDLETYPE_PACKAGE);
1203 IWineMsiRemotePackage *remote_package;
1205 remote_package = (IWineMsiRemotePackage *)msi_get_remote(hInstall);
1206 if (!remote_package)
1207 return ERROR_INVALID_HANDLE;
1209 component = SysAllocString(szComponent);
1212 IWineMsiRemotePackage_Release(remote_package);
1213 return ERROR_OUTOFMEMORY;
1216 hr = IWineMsiRemotePackage_SetComponentState(remote_package, component, iState);
1218 SysFreeString(component);
1219 IWineMsiRemotePackage_Release(remote_package);
1223 if (HRESULT_FACILITY(hr) == FACILITY_WIN32)
1224 return HRESULT_CODE(hr);
1226 return ERROR_FUNCTION_FAILED;
1229 return ERROR_SUCCESS;
1232 ret = MSI_SetComponentStateW(package, szComponent, iState);
1233 msiobj_release(&package->hdr);
1237 /***********************************************************************
1238 * MsiGetComponentStateW (MSI.@)
1240 UINT WINAPI MsiGetComponentStateW(MSIHANDLE hInstall, LPCWSTR szComponent,
1241 INSTALLSTATE *piInstalled, INSTALLSTATE *piAction)
1243 MSIPACKAGE* package;
1246 TRACE("%d %s %p %p\n", hInstall, debugstr_w(szComponent),
1247 piInstalled, piAction);
1249 package = msihandle2msiinfo(hInstall, MSIHANDLETYPE_PACKAGE);
1254 IWineMsiRemotePackage *remote_package;
1256 remote_package = (IWineMsiRemotePackage *)msi_get_remote(hInstall);
1257 if (!remote_package)
1258 return ERROR_INVALID_HANDLE;
1260 component = SysAllocString(szComponent);
1263 IWineMsiRemotePackage_Release(remote_package);
1264 return ERROR_OUTOFMEMORY;
1267 hr = IWineMsiRemotePackage_GetComponentState(remote_package, component,
1268 piInstalled, piAction);
1270 SysFreeString(component);
1271 IWineMsiRemotePackage_Release(remote_package);
1275 if (HRESULT_FACILITY(hr) == FACILITY_WIN32)
1276 return HRESULT_CODE(hr);
1278 return ERROR_FUNCTION_FAILED;
1281 return ERROR_SUCCESS;
1284 ret = MSI_GetComponentStateW( package, szComponent, piInstalled, piAction);
1285 msiobj_release( &package->hdr );
1289 /***********************************************************************
1290 * MsiGetLanguage (MSI.@)
1292 LANGID WINAPI MsiGetLanguage(MSIHANDLE hInstall)
1294 MSIPACKAGE* package;
1296 static const WCHAR szProductLanguage[] =
1297 {'P','r','o','d','u','c','t','L','a','n','g','u','a','g','e',0};
1299 package = msihandle2msiinfo(hInstall, MSIHANDLETYPE_PACKAGE);
1304 IWineMsiRemotePackage *remote_package;
1306 remote_package = (IWineMsiRemotePackage *)msi_get_remote(hInstall);
1307 if (!remote_package)
1308 return ERROR_INVALID_HANDLE;
1310 hr = IWineMsiRemotePackage_GetLanguage(remote_package, &lang);
1318 langid = msi_get_property_int( package->db, szProductLanguage, 0 );
1319 msiobj_release( &package->hdr );
1323 UINT MSI_SetInstallLevel( MSIPACKAGE *package, int iInstallLevel )
1325 static const WCHAR szInstallLevel[] = {
1326 'I','N','S','T','A','L','L','L','E','V','E','L',0 };
1327 static const WCHAR fmt[] = { '%','d',0 };
1331 TRACE("%p %i\n", package, iInstallLevel);
1333 if (iInstallLevel > 32767)
1334 return ERROR_INVALID_PARAMETER;
1336 if (iInstallLevel < 1)
1337 return MSI_SetFeatureStates( package );
1339 sprintfW( level, fmt, iInstallLevel );
1340 r = msi_set_property( package->db, szInstallLevel, level );
1341 if ( r == ERROR_SUCCESS )
1342 r = MSI_SetFeatureStates( package );
1347 /***********************************************************************
1348 * MsiSetInstallLevel (MSI.@)
1350 UINT WINAPI MsiSetInstallLevel(MSIHANDLE hInstall, int iInstallLevel)
1352 MSIPACKAGE* package;
1355 TRACE("%d %i\n", hInstall, iInstallLevel);
1357 package = msihandle2msiinfo(hInstall, MSIHANDLETYPE_PACKAGE);
1361 IWineMsiRemotePackage *remote_package;
1363 remote_package = (IWineMsiRemotePackage *)msi_get_remote(hInstall);
1364 if (!remote_package)
1365 return ERROR_INVALID_HANDLE;
1367 hr = IWineMsiRemotePackage_SetInstallLevel(remote_package, iInstallLevel);
1369 IWineMsiRemotePackage_Release(remote_package);
1373 if (HRESULT_FACILITY(hr) == FACILITY_WIN32)
1374 return HRESULT_CODE(hr);
1376 return ERROR_FUNCTION_FAILED;
1379 return ERROR_SUCCESS;
1382 r = MSI_SetInstallLevel( package, iInstallLevel );
1384 msiobj_release( &package->hdr );
1389 /***********************************************************************
1390 * MsiGetFeatureValidStatesW (MSI.@)
1392 UINT WINAPI MsiGetFeatureValidStatesW(MSIHANDLE hInstall, LPCWSTR szFeature,
1393 LPDWORD pInstallState)
1395 if(pInstallState) *pInstallState = 1<<INSTALLSTATE_LOCAL;
1396 FIXME("%d %s %p stub returning %d\n",
1397 hInstall, debugstr_w(szFeature), pInstallState, pInstallState ? *pInstallState : 0);
1399 return ERROR_SUCCESS;
1402 /***********************************************************************
1403 * MsiGetFeatureValidStatesA (MSI.@)
1405 UINT WINAPI MsiGetFeatureValidStatesA(MSIHANDLE hInstall, LPCSTR szFeature,
1406 LPDWORD pInstallState)
1409 LPWSTR szwFeature = strdupAtoW(szFeature);
1411 ret = MsiGetFeatureValidStatesW(hInstall, szwFeature, pInstallState);
1413 msi_free(szwFeature);