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
);