2 * Implementation of the Microsoft Installer (msi.dll)
4 * Copyright 2002,2003,2004,2005 Mike McCormack 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
24 #define NONAMELESSUNION
31 #include "wine/debug.h"
42 #include "wine/unicode.h"
44 WINE_DEFAULT_DEBUG_CHANNEL(msi
);
46 static const WCHAR installerW
[] = {'\\','I','n','s','t','a','l','l','e','r',0};
48 static UINT
msi_locate_product(LPCWSTR szProduct
, MSIINSTALLCONTEXT
*context
)
52 *context
= MSIINSTALLCONTEXT_NONE
;
54 if (MSIREG_OpenProductKey(szProduct
, NULL
, MSIINSTALLCONTEXT_USERMANAGED
,
55 &hkey
, FALSE
) == ERROR_SUCCESS
)
56 *context
= MSIINSTALLCONTEXT_USERMANAGED
;
57 else if (MSIREG_OpenProductKey(szProduct
, NULL
, MSIINSTALLCONTEXT_MACHINE
,
58 &hkey
, FALSE
) == ERROR_SUCCESS
)
59 *context
= MSIINSTALLCONTEXT_MACHINE
;
60 else if (MSIREG_OpenProductKey(szProduct
, NULL
,
61 MSIINSTALLCONTEXT_USERUNMANAGED
,
62 &hkey
, FALSE
) == ERROR_SUCCESS
)
63 *context
= MSIINSTALLCONTEXT_USERUNMANAGED
;
67 if (*context
== MSIINSTALLCONTEXT_NONE
)
68 return ERROR_UNKNOWN_PRODUCT
;
73 UINT WINAPI
MsiOpenProductA(LPCSTR szProduct
, MSIHANDLE
*phProduct
)
76 LPWSTR szwProd
= NULL
;
78 TRACE("%s %p\n",debugstr_a(szProduct
), phProduct
);
82 szwProd
= strdupAtoW( szProduct
);
84 return ERROR_OUTOFMEMORY
;
87 r
= MsiOpenProductW( szwProd
, phProduct
);
94 static UINT
MSI_OpenProductW(LPCWSTR szProduct
, MSIPACKAGE
**package
)
99 MSIINSTALLCONTEXT context
;
101 static const WCHAR managed
[] = {
102 'M','a','n','a','g','e','d','L','o','c','a','l','P','a','c','k','a','g','e',0};
103 static const WCHAR local
[] = {'L','o','c','a','l','P','a','c','k','a','g','e',0};
105 TRACE("%s %p\n", debugstr_w(szProduct
), package
);
107 r
= msi_locate_product(szProduct
, &context
);
108 if (r
!= ERROR_SUCCESS
)
111 r
= MSIREG_OpenInstallProps(szProduct
, context
, NULL
, &props
, FALSE
);
112 if (r
!= ERROR_SUCCESS
)
113 return ERROR_UNKNOWN_PRODUCT
;
115 if (context
== MSIINSTALLCONTEXT_USERMANAGED
)
116 path
= msi_reg_get_val_str(props
, managed
);
118 path
= msi_reg_get_val_str(props
, local
);
120 r
= ERROR_UNKNOWN_PRODUCT
;
122 if (!path
|| GetFileAttributesW(path
) == INVALID_FILE_ATTRIBUTES
)
125 if (PathIsRelativeW(path
))
127 r
= ERROR_INSTALL_PACKAGE_OPEN_FAILED
;
131 r
= MSI_OpenPackageW(path
, package
);
139 UINT WINAPI
MsiOpenProductW(LPCWSTR szProduct
, MSIHANDLE
*phProduct
)
141 MSIPACKAGE
*package
= NULL
;
142 WCHAR squished_pc
[GUID_SIZE
];
145 if (!szProduct
|| !squash_guid(szProduct
, squished_pc
))
146 return ERROR_INVALID_PARAMETER
;
149 return ERROR_INVALID_PARAMETER
;
151 r
= MSI_OpenProductW(szProduct
, &package
);
152 if (r
!= ERROR_SUCCESS
)
155 *phProduct
= alloc_msihandle(&package
->hdr
);
157 r
= ERROR_NOT_ENOUGH_MEMORY
;
159 msiobj_release(&package
->hdr
);
163 UINT WINAPI
MsiAdvertiseProductA(LPCSTR szPackagePath
, LPCSTR szScriptfilePath
,
164 LPCSTR szTransforms
, LANGID lgidLanguage
)
166 FIXME("%s %s %s %08x\n",debugstr_a(szPackagePath
),
167 debugstr_a(szScriptfilePath
), debugstr_a(szTransforms
), lgidLanguage
);
168 return ERROR_CALL_NOT_IMPLEMENTED
;
171 UINT WINAPI
MsiAdvertiseProductW(LPCWSTR szPackagePath
, LPCWSTR szScriptfilePath
,
172 LPCWSTR szTransforms
, LANGID lgidLanguage
)
174 FIXME("%s %s %s %08x\n",debugstr_w(szPackagePath
),
175 debugstr_w(szScriptfilePath
), debugstr_w(szTransforms
), lgidLanguage
);
176 return ERROR_CALL_NOT_IMPLEMENTED
;
179 UINT WINAPI
MsiAdvertiseProductExA(LPCSTR szPackagePath
, LPCSTR szScriptfilePath
,
180 LPCSTR szTransforms
, LANGID lgidLanguage
, DWORD dwPlatform
, DWORD dwOptions
)
182 FIXME("%s %s %s %08x %08x %08x\n", debugstr_a(szPackagePath
),
183 debugstr_a(szScriptfilePath
), debugstr_a(szTransforms
),
184 lgidLanguage
, dwPlatform
, dwOptions
);
185 return ERROR_CALL_NOT_IMPLEMENTED
;
188 UINT WINAPI
MsiAdvertiseProductExW( LPCWSTR szPackagePath
, LPCWSTR szScriptfilePath
,
189 LPCWSTR szTransforms
, LANGID lgidLanguage
, DWORD dwPlatform
, DWORD dwOptions
)
191 FIXME("%s %s %s %08x %08x %08x\n", debugstr_w(szPackagePath
),
192 debugstr_w(szScriptfilePath
), debugstr_w(szTransforms
),
193 lgidLanguage
, dwPlatform
, dwOptions
);
194 return ERROR_CALL_NOT_IMPLEMENTED
;
197 UINT WINAPI
MsiInstallProductA(LPCSTR szPackagePath
, LPCSTR szCommandLine
)
199 LPWSTR szwPath
= NULL
, szwCommand
= NULL
;
200 UINT r
= ERROR_OUTOFMEMORY
;
202 TRACE("%s %s\n",debugstr_a(szPackagePath
), debugstr_a(szCommandLine
));
206 szwPath
= strdupAtoW( szPackagePath
);
213 szwCommand
= strdupAtoW( szCommandLine
);
218 r
= MsiInstallProductW( szwPath
, szwCommand
);
222 msi_free( szwCommand
);
227 UINT WINAPI
MsiInstallProductW(LPCWSTR szPackagePath
, LPCWSTR szCommandLine
)
229 MSIPACKAGE
*package
= NULL
;
232 TRACE("%s %s\n",debugstr_w(szPackagePath
), debugstr_w(szCommandLine
));
235 return ERROR_INVALID_PARAMETER
;
238 return ERROR_PATH_NOT_FOUND
;
240 r
= MSI_OpenPackageW( szPackagePath
, &package
);
241 if (r
== ERROR_SUCCESS
)
243 r
= MSI_InstallPackage( package
, szPackagePath
, szCommandLine
);
244 msiobj_release( &package
->hdr
);
250 UINT WINAPI
MsiReinstallProductA(LPCSTR szProduct
, DWORD dwReinstallMode
)
255 TRACE("%s %08x\n", debugstr_a(szProduct
), dwReinstallMode
);
257 wszProduct
= strdupAtoW(szProduct
);
259 rc
= MsiReinstallProductW(wszProduct
, dwReinstallMode
);
261 msi_free(wszProduct
);
265 UINT WINAPI
MsiReinstallProductW(LPCWSTR szProduct
, DWORD dwReinstallMode
)
267 TRACE("%s %08x\n", debugstr_w(szProduct
), dwReinstallMode
);
269 return MsiReinstallFeatureW(szProduct
, szAll
, dwReinstallMode
);
272 UINT WINAPI
MsiApplyPatchA(LPCSTR szPatchPackage
, LPCSTR szInstallPackage
,
273 INSTALLTYPE eInstallType
, LPCSTR szCommandLine
)
275 LPWSTR patch_package
= NULL
;
276 LPWSTR install_package
= NULL
;
277 LPWSTR command_line
= NULL
;
278 UINT r
= ERROR_OUTOFMEMORY
;
280 TRACE("%s %s %d %s\n", debugstr_a(szPatchPackage
), debugstr_a(szInstallPackage
),
281 eInstallType
, debugstr_a(szCommandLine
));
283 if (szPatchPackage
&& !(patch_package
= strdupAtoW(szPatchPackage
)))
286 if (szInstallPackage
&& !(install_package
= strdupAtoW(szInstallPackage
)))
289 if (szCommandLine
&& !(command_line
= strdupAtoW(szCommandLine
)))
292 r
= MsiApplyPatchW(patch_package
, install_package
, eInstallType
, command_line
);
295 msi_free(patch_package
);
296 msi_free(install_package
);
297 msi_free(command_line
);
302 static UINT
MSI_ApplyPatchW(LPCWSTR szPatchPackage
, LPCWSTR szProductCode
, LPCWSTR szCommandLine
)
304 MSIHANDLE patch
= 0, info
= 0;
305 UINT r
= ERROR_SUCCESS
, type
;
307 LPCWSTR cmd_ptr
= szCommandLine
;
308 LPCWSTR product_code
= szProductCode
;
310 LPWSTR cmd
= NULL
, codes
= NULL
;
312 static const WCHAR patcheq
[] = {'P','A','T','C','H','=',0};
313 static WCHAR empty
[] = {0};
315 if (!szPatchPackage
|| !szPatchPackage
[0])
316 return ERROR_INVALID_PARAMETER
;
320 r
= MsiOpenDatabaseW(szPatchPackage
, MSIDBOPEN_READONLY
, &patch
);
321 if (r
!= ERROR_SUCCESS
)
324 r
= MsiGetSummaryInformationW(patch
, NULL
, 0, &info
);
325 if (r
!= ERROR_SUCCESS
)
328 r
= MsiSummaryInfoGetPropertyW(info
, PID_TEMPLATE
, &type
, NULL
, NULL
, empty
, &size
);
329 if (r
!= ERROR_MORE_DATA
|| !size
|| type
!= VT_LPSTR
)
331 ERR("Failed to read product codes from patch\n");
335 codes
= msi_alloc(++size
* sizeof(WCHAR
));
338 r
= ERROR_OUTOFMEMORY
;
342 r
= MsiSummaryInfoGetPropertyW(info
, PID_TEMPLATE
, &type
, NULL
, NULL
, codes
, &size
);
343 if (r
!= ERROR_SUCCESS
)
346 product_code
= codes
;
352 size
= lstrlenW(cmd_ptr
) + lstrlenW(patcheq
) + lstrlenW(szPatchPackage
) + 1;
353 cmd
= msi_alloc(size
* sizeof(WCHAR
));
356 r
= ERROR_OUTOFMEMORY
;
360 lstrcpyW(cmd
, cmd_ptr
);
361 if (szCommandLine
) lstrcatW(cmd
, szSpace
);
362 lstrcatW(cmd
, patcheq
);
363 lstrcatW(cmd
, szPatchPackage
);
366 while ((end
= strchrW(beg
, '}')))
370 r
= MsiConfigureProductExW(beg
, INSTALLLEVEL_DEFAULT
, INSTALLSTATE_DEFAULT
, cmd
);
371 if (r
!= ERROR_SUCCESS
)
381 MsiCloseHandle(info
);
382 MsiCloseHandle(patch
);
387 UINT WINAPI
MsiApplyPatchW(LPCWSTR szPatchPackage
, LPCWSTR szInstallPackage
,
388 INSTALLTYPE eInstallType
, LPCWSTR szCommandLine
)
390 TRACE("%s %s %d %s\n", debugstr_w(szPatchPackage
), debugstr_w(szInstallPackage
),
391 eInstallType
, debugstr_w(szCommandLine
));
393 if (szInstallPackage
|| eInstallType
== INSTALLTYPE_NETWORK_IMAGE
||
394 eInstallType
== INSTALLTYPE_SINGLE_INSTANCE
)
396 FIXME("Only reading target products from patch\n");
397 return ERROR_CALL_NOT_IMPLEMENTED
;
400 return MSI_ApplyPatchW(szPatchPackage
, NULL
, szCommandLine
);
403 UINT WINAPI
MsiApplyMultiplePatchesA(LPCSTR szPatchPackages
,
404 LPCSTR szProductCode
, LPCSTR szPropertiesList
)
406 LPWSTR patch_packages
= NULL
;
407 LPWSTR product_code
= NULL
;
408 LPWSTR properties_list
= NULL
;
409 UINT r
= ERROR_OUTOFMEMORY
;
411 TRACE("%s %s %s\n", debugstr_a(szPatchPackages
), debugstr_a(szProductCode
),
412 debugstr_a(szPropertiesList
));
414 if (!szPatchPackages
|| !szPatchPackages
[0])
415 return ERROR_INVALID_PARAMETER
;
417 if (!(patch_packages
= strdupAtoW(szPatchPackages
)))
418 return ERROR_OUTOFMEMORY
;
420 if (szProductCode
&& !(product_code
= strdupAtoW(szProductCode
)))
423 if (szPropertiesList
&& !(properties_list
= strdupAtoW(szPropertiesList
)))
426 r
= MsiApplyMultiplePatchesW(patch_packages
, product_code
, properties_list
);
429 msi_free(patch_packages
);
430 msi_free(product_code
);
431 msi_free(properties_list
);
436 UINT WINAPI
MsiApplyMultiplePatchesW(LPCWSTR szPatchPackages
,
437 LPCWSTR szProductCode
, LPCWSTR szPropertiesList
)
439 UINT r
= ERROR_SUCCESS
;
442 TRACE("%s %s %s\n", debugstr_w(szPatchPackages
), debugstr_w(szProductCode
),
443 debugstr_w(szPropertiesList
));
445 if (!szPatchPackages
|| !szPatchPackages
[0])
446 return ERROR_INVALID_PARAMETER
;
448 beg
= end
= szPatchPackages
;
454 while (*beg
== ' ') beg
++;
455 while (*end
&& *end
!= ';') end
++;
458 while (len
&& beg
[len
- 1] == ' ') len
--;
460 if (!len
) return ERROR_INVALID_NAME
;
462 patch
= msi_alloc((len
+ 1) * sizeof(WCHAR
));
464 return ERROR_OUTOFMEMORY
;
466 memcpy(patch
, beg
, len
* sizeof(WCHAR
));
469 r
= MSI_ApplyPatchW(patch
, szProductCode
, szPropertiesList
);
472 if (r
!= ERROR_SUCCESS
)
480 UINT WINAPI
MsiDetermineApplicablePatchesA(LPCSTR szProductPackagePath
,
481 DWORD cPatchInfo
, PMSIPATCHSEQUENCEINFOA pPatchInfo
)
483 FIXME("(%s, %d, %p): stub!\n", debugstr_a(szProductPackagePath
),
484 cPatchInfo
, pPatchInfo
);
486 return ERROR_CALL_NOT_IMPLEMENTED
;
489 static UINT
MSI_ApplicablePatchW( MSIPACKAGE
*package
, LPCWSTR patch
)
492 MSIDATABASE
*patch_db
;
493 UINT r
= ERROR_SUCCESS
;
495 r
= MSI_OpenDatabaseW( patch
, MSIDBOPEN_READONLY
, &patch_db
);
496 if (r
!= ERROR_SUCCESS
)
498 WARN("failed to open patch file %s\n", debugstr_w(patch
));
502 si
= MSI_GetSummaryInformationW( patch_db
->storage
, 0 );
505 r
= ERROR_FUNCTION_FAILED
;
509 r
= msi_check_patch_applicable( package
, si
);
510 if (r
!= ERROR_SUCCESS
)
511 TRACE("patch not applicable\n");
514 msiobj_release( &patch_db
->hdr
);
515 msiobj_release( &si
->hdr
);
519 UINT WINAPI
MsiDetermineApplicablePatchesW(LPCWSTR szProductPackagePath
,
520 DWORD cPatchInfo
, PMSIPATCHSEQUENCEINFOW pPatchInfo
)
522 UINT i
, r
, ret
= ERROR_FUNCTION_FAILED
;
525 TRACE("(%s, %d, %p)\n", debugstr_w(szProductPackagePath
), cPatchInfo
, pPatchInfo
);
527 r
= MSI_OpenPackageW( szProductPackagePath
, &package
);
528 if (r
!= ERROR_SUCCESS
)
530 ERR("failed to open package %u\n", r
);
534 for (i
= 0; i
< cPatchInfo
; i
++)
536 switch (pPatchInfo
[i
].ePatchDataType
)
538 case MSIPATCH_DATATYPE_PATCHFILE
:
540 FIXME("patch ordering not supported\n");
541 r
= MSI_ApplicablePatchW( package
, pPatchInfo
[i
].szPatchData
);
542 if (r
!= ERROR_SUCCESS
)
544 pPatchInfo
[i
].dwOrder
= ~0u;
545 pPatchInfo
[i
].uStatus
= ERROR_PATCH_TARGET_NOT_FOUND
;
549 pPatchInfo
[i
].dwOrder
= i
;
550 pPatchInfo
[i
].uStatus
= ret
= ERROR_SUCCESS
;
556 FIXME("patch data type %u not supported\n", pPatchInfo
[i
].ePatchDataType
);
557 pPatchInfo
[i
].dwOrder
= ~0u;
558 pPatchInfo
[i
].uStatus
= ERROR_PATCH_TARGET_NOT_FOUND
;
563 TRACE(" szPatchData: %s\n", debugstr_w(pPatchInfo
[i
].szPatchData
));
564 TRACE("ePatchDataType: %u\n", pPatchInfo
[i
].ePatchDataType
);
565 TRACE(" dwOrder: %u\n", pPatchInfo
[i
].dwOrder
);
566 TRACE(" uStatus: %u\n", pPatchInfo
[i
].uStatus
);
571 UINT WINAPI
MsiDeterminePatchSequenceA(LPCSTR szProductCode
, LPCSTR szUserSid
,
572 MSIINSTALLCONTEXT dwContext
, DWORD cPatchInfo
, PMSIPATCHSEQUENCEINFOA pPatchInfo
)
574 FIXME("(%s, %s, %d, %d, %p): stub!\n", debugstr_a(szProductCode
),
575 debugstr_a(szUserSid
), dwContext
, cPatchInfo
, pPatchInfo
);
577 return ERROR_CALL_NOT_IMPLEMENTED
;
580 UINT WINAPI
MsiDeterminePatchSequenceW(LPCWSTR szProductCode
, LPCWSTR szUserSid
,
581 MSIINSTALLCONTEXT dwContext
, DWORD cPatchInfo
, PMSIPATCHSEQUENCEINFOW pPatchInfo
)
583 FIXME("(%s, %s, %d, %d, %p): stub!\n", debugstr_w(szProductCode
),
584 debugstr_w(szUserSid
), dwContext
, cPatchInfo
, pPatchInfo
);
586 return ERROR_CALL_NOT_IMPLEMENTED
;
589 static UINT
msi_open_package(LPCWSTR product
, MSIINSTALLCONTEXT context
,
590 MSIPACKAGE
**package
)
596 WCHAR sourcepath
[MAX_PATH
];
597 WCHAR filename
[MAX_PATH
];
599 static const WCHAR szLocalPackage
[] = {
600 'L','o','c','a','l','P','a','c','k','a','g','e',0};
603 r
= MSIREG_OpenInstallProps(product
, context
, NULL
, &props
, FALSE
);
604 if (r
!= ERROR_SUCCESS
)
605 return ERROR_BAD_CONFIGURATION
;
607 localpack
= msi_reg_get_val_str(props
, szLocalPackage
);
610 lstrcpyW(sourcepath
, localpack
);
614 if (!localpack
|| GetFileAttributesW(sourcepath
) == INVALID_FILE_ATTRIBUTES
)
616 sz
= sizeof(sourcepath
);
617 MsiSourceListGetInfoW(product
, NULL
, context
, MSICODE_PRODUCT
,
618 INSTALLPROPERTY_LASTUSEDSOURCEW
, sourcepath
, &sz
);
620 sz
= sizeof(filename
);
621 MsiSourceListGetInfoW(product
, NULL
, context
, MSICODE_PRODUCT
,
622 INSTALLPROPERTY_PACKAGENAMEW
, filename
, &sz
);
624 lstrcatW(sourcepath
, filename
);
627 if (GetFileAttributesW(sourcepath
) == INVALID_FILE_ATTRIBUTES
)
628 return ERROR_INSTALL_SOURCE_ABSENT
;
630 return MSI_OpenPackageW(sourcepath
, package
);
633 UINT WINAPI
MsiConfigureProductExW(LPCWSTR szProduct
, int iInstallLevel
,
634 INSTALLSTATE eInstallState
, LPCWSTR szCommandLine
)
636 MSIPACKAGE
* package
= NULL
;
637 MSIINSTALLCONTEXT context
;
640 WCHAR sourcepath
[MAX_PATH
], filename
[MAX_PATH
];
643 static const WCHAR szInstalled
[] = {
644 ' ','I','n','s','t','a','l','l','e','d','=','1',0};
645 static const WCHAR szRemoveAll
[] = {
646 ' ','R','E','M','O','V','E','=','A','L','L',0};
647 static const WCHAR szMachine
[] = {
648 ' ','A','L','L','U','S','E','R','S','=','1',0};
650 TRACE("%s %d %d %s\n",debugstr_w(szProduct
), iInstallLevel
, eInstallState
,
651 debugstr_w(szCommandLine
));
653 if (!szProduct
|| lstrlenW(szProduct
) != GUID_SIZE
- 1)
654 return ERROR_INVALID_PARAMETER
;
656 if (eInstallState
== INSTALLSTATE_ADVERTISED
||
657 eInstallState
== INSTALLSTATE_SOURCE
)
659 FIXME("State %d not implemented\n", eInstallState
);
660 return ERROR_CALL_NOT_IMPLEMENTED
;
663 r
= msi_locate_product(szProduct
, &context
);
664 if (r
!= ERROR_SUCCESS
)
667 r
= msi_open_package(szProduct
, context
, &package
);
668 if (r
!= ERROR_SUCCESS
)
671 sz
= lstrlenW(szInstalled
) + 1;
674 sz
+= lstrlenW(szCommandLine
);
676 if (eInstallState
== INSTALLSTATE_ABSENT
)
677 sz
+= lstrlenW(szRemoveAll
);
679 if (context
== MSIINSTALLCONTEXT_MACHINE
)
680 sz
+= lstrlenW(szMachine
);
682 commandline
= msi_alloc(sz
* sizeof(WCHAR
));
685 r
= ERROR_OUTOFMEMORY
;
691 lstrcpyW(commandline
,szCommandLine
);
693 if (eInstallState
== INSTALLSTATE_ABSENT
)
694 lstrcatW(commandline
, szRemoveAll
);
696 if (context
== MSIINSTALLCONTEXT_MACHINE
)
697 lstrcatW(commandline
, szMachine
);
699 sz
= sizeof(sourcepath
);
700 MsiSourceListGetInfoW(szProduct
, NULL
, context
, MSICODE_PRODUCT
,
701 INSTALLPROPERTY_LASTUSEDSOURCEW
, sourcepath
, &sz
);
703 sz
= sizeof(filename
);
704 MsiSourceListGetInfoW(szProduct
, NULL
, context
, MSICODE_PRODUCT
,
705 INSTALLPROPERTY_PACKAGENAMEW
, filename
, &sz
);
707 strcatW(sourcepath
, filename
);
709 r
= MSI_InstallPackage( package
, sourcepath
, commandline
);
711 msi_free(commandline
);
714 msiobj_release( &package
->hdr
);
719 UINT WINAPI
MsiConfigureProductExA(LPCSTR szProduct
, int iInstallLevel
,
720 INSTALLSTATE eInstallState
, LPCSTR szCommandLine
)
722 LPWSTR szwProduct
= NULL
;
723 LPWSTR szwCommandLine
= NULL
;
724 UINT r
= ERROR_OUTOFMEMORY
;
728 szwProduct
= strdupAtoW( szProduct
);
735 szwCommandLine
= strdupAtoW( szCommandLine
);
740 r
= MsiConfigureProductExW( szwProduct
, iInstallLevel
, eInstallState
,
743 msi_free( szwProduct
);
744 msi_free( szwCommandLine
);
749 UINT WINAPI
MsiConfigureProductA(LPCSTR szProduct
, int iInstallLevel
,
750 INSTALLSTATE eInstallState
)
752 LPWSTR szwProduct
= NULL
;
755 TRACE("%s %d %d\n",debugstr_a(szProduct
), iInstallLevel
, eInstallState
);
759 szwProduct
= strdupAtoW( szProduct
);
761 return ERROR_OUTOFMEMORY
;
764 r
= MsiConfigureProductW( szwProduct
, iInstallLevel
, eInstallState
);
765 msi_free( szwProduct
);
770 UINT WINAPI
MsiConfigureProductW(LPCWSTR szProduct
, int iInstallLevel
,
771 INSTALLSTATE eInstallState
)
773 return MsiConfigureProductExW(szProduct
, iInstallLevel
, eInstallState
, NULL
);
776 UINT WINAPI
MsiGetProductCodeA(LPCSTR szComponent
, LPSTR szBuffer
)
778 LPWSTR szwComponent
= NULL
;
780 WCHAR szwBuffer
[GUID_SIZE
];
782 TRACE("%s %s\n",debugstr_a(szComponent
), debugstr_a(szBuffer
));
786 szwComponent
= strdupAtoW( szComponent
);
788 return ERROR_OUTOFMEMORY
;
792 r
= MsiGetProductCodeW( szwComponent
, szwBuffer
);
795 WideCharToMultiByte(CP_ACP
, 0, szwBuffer
, -1, szBuffer
, GUID_SIZE
, NULL
, NULL
);
797 msi_free( szwComponent
);
802 UINT WINAPI
MsiGetProductCodeW(LPCWSTR szComponent
, LPWSTR szBuffer
)
805 HKEY compkey
, prodkey
;
806 WCHAR squished_comp
[GUID_SIZE
];
807 WCHAR squished_prod
[GUID_SIZE
];
808 DWORD sz
= GUID_SIZE
;
810 TRACE("%s %p\n", debugstr_w(szComponent
), szBuffer
);
812 if (!szComponent
|| !*szComponent
)
813 return ERROR_INVALID_PARAMETER
;
815 if (!squash_guid(szComponent
, squished_comp
))
816 return ERROR_INVALID_PARAMETER
;
818 if (MSIREG_OpenUserDataComponentKey(szComponent
, NULL
, &compkey
, FALSE
) != ERROR_SUCCESS
&&
819 MSIREG_OpenUserDataComponentKey(szComponent
, szLocalSid
, &compkey
, FALSE
) != ERROR_SUCCESS
)
821 return ERROR_UNKNOWN_COMPONENT
;
824 rc
= RegEnumValueW(compkey
, 0, squished_prod
, &sz
, NULL
, NULL
, NULL
, NULL
);
825 if (rc
!= ERROR_SUCCESS
)
827 RegCloseKey(compkey
);
828 return ERROR_UNKNOWN_COMPONENT
;
831 /* check simple case, only one product */
832 rc
= RegEnumValueW(compkey
, 1, squished_prod
, &sz
, NULL
, NULL
, NULL
, NULL
);
833 if (rc
== ERROR_NO_MORE_ITEMS
)
840 while ((rc
= RegEnumValueW(compkey
, index
, squished_prod
, &sz
,
841 NULL
, NULL
, NULL
, NULL
)) != ERROR_NO_MORE_ITEMS
)
845 unsquash_guid(squished_prod
, szBuffer
);
847 if (MSIREG_OpenProductKey(szBuffer
, NULL
,
848 MSIINSTALLCONTEXT_USERMANAGED
,
849 &prodkey
, FALSE
) == ERROR_SUCCESS
||
850 MSIREG_OpenProductKey(szBuffer
, NULL
,
851 MSIINSTALLCONTEXT_USERUNMANAGED
,
852 &prodkey
, FALSE
) == ERROR_SUCCESS
||
853 MSIREG_OpenProductKey(szBuffer
, NULL
,
854 MSIINSTALLCONTEXT_MACHINE
,
855 &prodkey
, FALSE
) == ERROR_SUCCESS
)
857 RegCloseKey(prodkey
);
863 rc
= ERROR_INSTALL_FAILURE
;
866 RegCloseKey(compkey
);
867 unsquash_guid(squished_prod
, szBuffer
);
871 static LPWSTR
msi_reg_get_value(HKEY hkey
, LPCWSTR name
, DWORD
*type
)
877 static const WCHAR format
[] = {'%','d',0};
879 res
= RegQueryValueExW(hkey
, name
, NULL
, type
, NULL
, NULL
);
880 if (res
!= ERROR_SUCCESS
)
884 return msi_reg_get_val_str(hkey
, name
);
886 if (!msi_reg_get_val_dword(hkey
, name
, &dval
))
889 sprintfW(temp
, format
, dval
);
890 return strdupW(temp
);
893 static UINT
MSI_GetProductInfo(LPCWSTR szProduct
, LPCWSTR szAttribute
,
894 awstring
*szValue
, LPDWORD pcchValueBuf
)
896 MSIINSTALLCONTEXT context
= MSIINSTALLCONTEXT_USERUNMANAGED
;
897 UINT r
= ERROR_UNKNOWN_PROPERTY
;
898 HKEY prodkey
, userdata
, source
;
900 WCHAR squished_pc
[GUID_SIZE
];
901 WCHAR packagecode
[GUID_SIZE
];
902 BOOL badconfig
= FALSE
;
904 DWORD type
= REG_NONE
;
906 static WCHAR empty
[] = {0};
907 static const WCHAR sourcelist
[] = {
908 'S','o','u','r','c','e','L','i','s','t',0};
909 static const WCHAR display_name
[] = {
910 'D','i','s','p','l','a','y','N','a','m','e',0};
911 static const WCHAR display_version
[] = {
912 'D','i','s','p','l','a','y','V','e','r','s','i','o','n',0};
913 static const WCHAR assignment
[] = {
914 'A','s','s','i','g','n','m','e','n','t',0};
916 TRACE("%s %s %p %p\n", debugstr_w(szProduct
),
917 debugstr_w(szAttribute
), szValue
, pcchValueBuf
);
919 if ((szValue
->str
.w
&& !pcchValueBuf
) || !szProduct
|| !szAttribute
)
920 return ERROR_INVALID_PARAMETER
;
922 if (!squash_guid(szProduct
, squished_pc
))
923 return ERROR_INVALID_PARAMETER
;
925 if ((r
= MSIREG_OpenProductKey(szProduct
, NULL
,
926 MSIINSTALLCONTEXT_USERMANAGED
,
927 &prodkey
, FALSE
)) != ERROR_SUCCESS
&&
928 (r
= MSIREG_OpenProductKey(szProduct
, NULL
,
929 MSIINSTALLCONTEXT_USERUNMANAGED
,
930 &prodkey
, FALSE
)) != ERROR_SUCCESS
&&
931 (r
= MSIREG_OpenProductKey(szProduct
, NULL
,
932 MSIINSTALLCONTEXT_MACHINE
,
933 &prodkey
, FALSE
)) == ERROR_SUCCESS
)
935 context
= MSIINSTALLCONTEXT_MACHINE
;
938 MSIREG_OpenInstallProps(szProduct
, context
, NULL
, &userdata
, FALSE
);
940 if (!lstrcmpW(szAttribute
, INSTALLPROPERTY_HELPLINKW
) ||
941 !lstrcmpW(szAttribute
, INSTALLPROPERTY_HELPTELEPHONEW
) ||
942 !lstrcmpW(szAttribute
, INSTALLPROPERTY_INSTALLDATEW
) ||
943 !lstrcmpW(szAttribute
, INSTALLPROPERTY_INSTALLEDPRODUCTNAMEW
) ||
944 !lstrcmpW(szAttribute
, INSTALLPROPERTY_INSTALLLOCATIONW
) ||
945 !lstrcmpW(szAttribute
, INSTALLPROPERTY_INSTALLSOURCEW
) ||
946 !lstrcmpW(szAttribute
, INSTALLPROPERTY_LOCALPACKAGEW
) ||
947 !lstrcmpW(szAttribute
, INSTALLPROPERTY_PUBLISHERW
) ||
948 !lstrcmpW(szAttribute
, INSTALLPROPERTY_URLINFOABOUTW
) ||
949 !lstrcmpW(szAttribute
, INSTALLPROPERTY_URLUPDATEINFOW
) ||
950 !lstrcmpW(szAttribute
, INSTALLPROPERTY_VERSIONMINORW
) ||
951 !lstrcmpW(szAttribute
, INSTALLPROPERTY_VERSIONMAJORW
) ||
952 !lstrcmpW(szAttribute
, INSTALLPROPERTY_VERSIONSTRINGW
) ||
953 !lstrcmpW(szAttribute
, INSTALLPROPERTY_PRODUCTIDW
) ||
954 !lstrcmpW(szAttribute
, INSTALLPROPERTY_REGCOMPANYW
) ||
955 !lstrcmpW(szAttribute
, INSTALLPROPERTY_REGOWNERW
))
959 r
= ERROR_UNKNOWN_PRODUCT
;
964 return ERROR_UNKNOWN_PROPERTY
;
966 if (!lstrcmpW(szAttribute
, INSTALLPROPERTY_INSTALLEDPRODUCTNAMEW
))
967 szAttribute
= display_name
;
968 else if (!lstrcmpW(szAttribute
, INSTALLPROPERTY_VERSIONSTRINGW
))
969 szAttribute
= display_version
;
971 val
= msi_reg_get_value(userdata
, szAttribute
, &type
);
975 else if (!lstrcmpW(szAttribute
, INSTALLPROPERTY_INSTANCETYPEW
) ||
976 !lstrcmpW(szAttribute
, INSTALLPROPERTY_TRANSFORMSW
) ||
977 !lstrcmpW(szAttribute
, INSTALLPROPERTY_LANGUAGEW
) ||
978 !lstrcmpW(szAttribute
, INSTALLPROPERTY_PRODUCTNAMEW
) ||
979 !lstrcmpW(szAttribute
, INSTALLPROPERTY_ASSIGNMENTTYPEW
) ||
980 !lstrcmpW(szAttribute
, INSTALLPROPERTY_PACKAGECODEW
) ||
981 !lstrcmpW(szAttribute
, INSTALLPROPERTY_VERSIONW
) ||
982 !lstrcmpW(szAttribute
, INSTALLPROPERTY_PRODUCTICONW
) ||
983 !lstrcmpW(szAttribute
, INSTALLPROPERTY_PACKAGENAMEW
) ||
984 !lstrcmpW(szAttribute
, INSTALLPROPERTY_AUTHORIZED_LUA_APPW
))
988 r
= ERROR_UNKNOWN_PRODUCT
;
992 if (!lstrcmpW(szAttribute
, INSTALLPROPERTY_ASSIGNMENTTYPEW
))
993 szAttribute
= assignment
;
995 if (!lstrcmpW(szAttribute
, INSTALLPROPERTY_PACKAGENAMEW
))
997 res
= RegOpenKeyW(prodkey
, sourcelist
, &source
);
998 if (res
!= ERROR_SUCCESS
)
1000 r
= ERROR_UNKNOWN_PRODUCT
;
1004 val
= msi_reg_get_value(source
, szAttribute
, &type
);
1008 RegCloseKey(source
);
1012 val
= msi_reg_get_value(prodkey
, szAttribute
, &type
);
1017 if (val
!= empty
&& type
!= REG_DWORD
&&
1018 !lstrcmpW(szAttribute
, INSTALLPROPERTY_PACKAGECODEW
))
1020 if (lstrlenW(val
) != SQUISH_GUID_SIZE
- 1)
1024 unsquash_guid(val
, packagecode
);
1026 val
= strdupW(packagecode
);
1033 r
= ERROR_UNKNOWN_PROPERTY
;
1039 /* If szBuffer (szValue->str) is NULL, there's no need to copy the value
1040 * out. Also, *pcchValueBuf may be uninitialized in this case, so we
1041 * can't rely on its value.
1043 if (szValue
->str
.a
|| szValue
->str
.w
)
1045 DWORD size
= *pcchValueBuf
;
1046 if (strlenW(val
) < size
)
1047 r
= msi_strcpy_to_awstring(val
, szValue
, &size
);
1050 r
= ERROR_MORE_DATA
;
1055 *pcchValueBuf
= lstrlenW(val
);
1059 r
= ERROR_BAD_CONFIGURATION
;
1065 RegCloseKey(prodkey
);
1066 RegCloseKey(userdata
);
1070 UINT WINAPI
MsiGetProductInfoA(LPCSTR szProduct
, LPCSTR szAttribute
,
1071 LPSTR szBuffer
, LPDWORD pcchValueBuf
)
1073 LPWSTR szwProduct
, szwAttribute
= NULL
;
1074 UINT r
= ERROR_OUTOFMEMORY
;
1077 TRACE("%s %s %p %p\n", debugstr_a(szProduct
), debugstr_a(szAttribute
),
1078 szBuffer
, pcchValueBuf
);
1080 szwProduct
= strdupAtoW( szProduct
);
1081 if( szProduct
&& !szwProduct
)
1084 szwAttribute
= strdupAtoW( szAttribute
);
1085 if( szAttribute
&& !szwAttribute
)
1088 buffer
.unicode
= FALSE
;
1089 buffer
.str
.a
= szBuffer
;
1091 r
= MSI_GetProductInfo( szwProduct
, szwAttribute
,
1092 &buffer
, pcchValueBuf
);
1095 msi_free( szwProduct
);
1096 msi_free( szwAttribute
);
1101 UINT WINAPI
MsiGetProductInfoW(LPCWSTR szProduct
, LPCWSTR szAttribute
,
1102 LPWSTR szBuffer
, LPDWORD pcchValueBuf
)
1106 TRACE("%s %s %p %p\n", debugstr_w(szProduct
), debugstr_w(szAttribute
),
1107 szBuffer
, pcchValueBuf
);
1109 buffer
.unicode
= TRUE
;
1110 buffer
.str
.w
= szBuffer
;
1112 return MSI_GetProductInfo( szProduct
, szAttribute
,
1113 &buffer
, pcchValueBuf
);
1116 UINT WINAPI
MsiGetProductInfoExA(LPCSTR szProductCode
, LPCSTR szUserSid
,
1117 MSIINSTALLCONTEXT dwContext
, LPCSTR szProperty
,
1118 LPSTR szValue
, LPDWORD pcchValue
)
1120 LPWSTR product
= NULL
;
1121 LPWSTR usersid
= NULL
;
1122 LPWSTR property
= NULL
;
1123 LPWSTR value
= NULL
;
1127 TRACE("(%s, %s, %d, %s, %p, %p)\n", debugstr_a(szProductCode
),
1128 debugstr_a(szUserSid
), dwContext
, debugstr_a(szProperty
),
1129 szValue
, pcchValue
);
1131 if (szValue
&& !pcchValue
)
1132 return ERROR_INVALID_PARAMETER
;
1134 if (szProductCode
) product
= strdupAtoW(szProductCode
);
1135 if (szUserSid
) usersid
= strdupAtoW(szUserSid
);
1136 if (szProperty
) property
= strdupAtoW(szProperty
);
1138 r
= MsiGetProductInfoExW(product
, usersid
, dwContext
, property
,
1140 if (r
!= ERROR_SUCCESS
)
1143 value
= msi_alloc(++len
* sizeof(WCHAR
));
1146 r
= ERROR_OUTOFMEMORY
;
1150 r
= MsiGetProductInfoExW(product
, usersid
, dwContext
, property
,
1152 if (r
!= ERROR_SUCCESS
)
1158 len
= WideCharToMultiByte(CP_ACP
, 0, value
, -1, NULL
, 0, NULL
, NULL
);
1159 if (*pcchValue
>= len
)
1160 WideCharToMultiByte(CP_ACP
, 0, value
, -1, szValue
, len
, NULL
, NULL
);
1163 r
= ERROR_MORE_DATA
;
1168 if (*pcchValue
<= len
|| !szValue
)
1169 len
= len
* sizeof(WCHAR
) - 1;
1171 *pcchValue
= len
- 1;
1182 static UINT
msi_copy_outval(LPWSTR val
, LPWSTR out
, LPDWORD size
)
1187 return ERROR_UNKNOWN_PROPERTY
;
1191 if (strlenW(val
) >= *size
)
1193 r
= ERROR_MORE_DATA
;
1202 *size
= lstrlenW(val
);
1204 return ERROR_SUCCESS
;
1207 UINT WINAPI
MsiGetProductInfoExW(LPCWSTR szProductCode
, LPCWSTR szUserSid
,
1208 MSIINSTALLCONTEXT dwContext
, LPCWSTR szProperty
,
1209 LPWSTR szValue
, LPDWORD pcchValue
)
1211 WCHAR squished_pc
[GUID_SIZE
];
1213 LPCWSTR package
= NULL
;
1214 HKEY props
= NULL
, prod
;
1215 HKEY classes
= NULL
, managed
;
1218 UINT r
= ERROR_UNKNOWN_PRODUCT
;
1220 static const WCHAR five
[] = {'5',0};
1221 static const WCHAR displayname
[] = {
1222 'D','i','s','p','l','a','y','N','a','m','e',0};
1223 static const WCHAR displayversion
[] = {
1224 'D','i','s','p','l','a','y','V','e','r','s','i','o','n',0};
1225 static const WCHAR managed_local_package
[] = {
1226 'M','a','n','a','g','e','d','L','o','c','a','l',
1227 'P','a','c','k','a','g','e',0};
1229 TRACE("(%s, %s, %d, %s, %p, %p)\n", debugstr_w(szProductCode
),
1230 debugstr_w(szUserSid
), dwContext
, debugstr_w(szProperty
),
1231 szValue
, pcchValue
);
1233 if (!szProductCode
|| !squash_guid(szProductCode
, squished_pc
))
1234 return ERROR_INVALID_PARAMETER
;
1236 if (szValue
&& !pcchValue
)
1237 return ERROR_INVALID_PARAMETER
;
1239 if (dwContext
!= MSIINSTALLCONTEXT_USERUNMANAGED
&&
1240 dwContext
!= MSIINSTALLCONTEXT_USERMANAGED
&&
1241 dwContext
!= MSIINSTALLCONTEXT_MACHINE
)
1242 return ERROR_INVALID_PARAMETER
;
1244 if (!szProperty
|| !*szProperty
)
1245 return ERROR_INVALID_PARAMETER
;
1247 if (dwContext
== MSIINSTALLCONTEXT_MACHINE
&& szUserSid
)
1248 return ERROR_INVALID_PARAMETER
;
1250 /* FIXME: dwContext is provided, no need to search for it */
1251 MSIREG_OpenProductKey(szProductCode
, NULL
,MSIINSTALLCONTEXT_USERMANAGED
,
1253 MSIREG_OpenProductKey(szProductCode
, NULL
, MSIINSTALLCONTEXT_USERUNMANAGED
,
1256 MSIREG_OpenInstallProps(szProductCode
, dwContext
, NULL
, &props
, FALSE
);
1258 if (dwContext
== MSIINSTALLCONTEXT_USERUNMANAGED
)
1260 package
= INSTALLPROPERTY_LOCALPACKAGEW
;
1262 if (!props
&& !prod
)
1265 else if (dwContext
== MSIINSTALLCONTEXT_USERMANAGED
)
1267 package
= managed_local_package
;
1269 if (!props
&& !managed
)
1272 else if (dwContext
== MSIINSTALLCONTEXT_MACHINE
)
1274 package
= INSTALLPROPERTY_LOCALPACKAGEW
;
1275 MSIREG_OpenProductKey(szProductCode
, NULL
, dwContext
, &classes
, FALSE
);
1277 if (!props
&& !classes
)
1281 if (!lstrcmpW(szProperty
, INSTALLPROPERTY_HELPLINKW
) ||
1282 !lstrcmpW(szProperty
, INSTALLPROPERTY_HELPTELEPHONEW
) ||
1283 !lstrcmpW(szProperty
, INSTALLPROPERTY_INSTALLDATEW
) ||
1284 !lstrcmpW(szProperty
, INSTALLPROPERTY_INSTALLEDPRODUCTNAMEW
) ||
1285 !lstrcmpW(szProperty
, INSTALLPROPERTY_INSTALLLOCATIONW
) ||
1286 !lstrcmpW(szProperty
, INSTALLPROPERTY_INSTALLSOURCEW
) ||
1287 !lstrcmpW(szProperty
, INSTALLPROPERTY_LOCALPACKAGEW
) ||
1288 !lstrcmpW(szProperty
, INSTALLPROPERTY_PUBLISHERW
) ||
1289 !lstrcmpW(szProperty
, INSTALLPROPERTY_URLINFOABOUTW
) ||
1290 !lstrcmpW(szProperty
, INSTALLPROPERTY_URLUPDATEINFOW
) ||
1291 !lstrcmpW(szProperty
, INSTALLPROPERTY_VERSIONMINORW
) ||
1292 !lstrcmpW(szProperty
, INSTALLPROPERTY_VERSIONMAJORW
) ||
1293 !lstrcmpW(szProperty
, INSTALLPROPERTY_VERSIONSTRINGW
) ||
1294 !lstrcmpW(szProperty
, INSTALLPROPERTY_PRODUCTIDW
) ||
1295 !lstrcmpW(szProperty
, INSTALLPROPERTY_REGCOMPANYW
) ||
1296 !lstrcmpW(szProperty
, INSTALLPROPERTY_REGOWNERW
) ||
1297 !lstrcmpW(szProperty
, INSTALLPROPERTY_INSTANCETYPEW
))
1299 val
= msi_reg_get_value(props
, package
, &type
);
1302 if (prod
|| classes
)
1303 r
= ERROR_UNKNOWN_PROPERTY
;
1310 if (!lstrcmpW(szProperty
, INSTALLPROPERTY_INSTALLEDPRODUCTNAMEW
))
1311 szProperty
= displayname
;
1312 else if (!lstrcmpW(szProperty
, INSTALLPROPERTY_VERSIONSTRINGW
))
1313 szProperty
= displayversion
;
1315 val
= msi_reg_get_value(props
, szProperty
, &type
);
1317 val
= strdupW(szEmpty
);
1319 r
= msi_copy_outval(val
, szValue
, pcchValue
);
1321 else if (!lstrcmpW(szProperty
, INSTALLPROPERTY_TRANSFORMSW
) ||
1322 !lstrcmpW(szProperty
, INSTALLPROPERTY_LANGUAGEW
) ||
1323 !lstrcmpW(szProperty
, INSTALLPROPERTY_PRODUCTNAMEW
) ||
1324 !lstrcmpW(szProperty
, INSTALLPROPERTY_PACKAGECODEW
) ||
1325 !lstrcmpW(szProperty
, INSTALLPROPERTY_VERSIONW
) ||
1326 !lstrcmpW(szProperty
, INSTALLPROPERTY_PRODUCTICONW
) ||
1327 !lstrcmpW(szProperty
, INSTALLPROPERTY_PACKAGENAMEW
) ||
1328 !lstrcmpW(szProperty
, INSTALLPROPERTY_AUTHORIZED_LUA_APPW
))
1330 if (!prod
&& !classes
)
1333 if (dwContext
== MSIINSTALLCONTEXT_USERUNMANAGED
)
1335 else if (dwContext
== MSIINSTALLCONTEXT_USERMANAGED
)
1337 else if (dwContext
== MSIINSTALLCONTEXT_MACHINE
)
1340 val
= msi_reg_get_value(hkey
, szProperty
, &type
);
1342 val
= strdupW(szEmpty
);
1344 r
= msi_copy_outval(val
, szValue
, pcchValue
);
1346 else if (!lstrcmpW(szProperty
, INSTALLPROPERTY_PRODUCTSTATEW
))
1348 if (dwContext
== MSIINSTALLCONTEXT_MACHINE
)
1352 val
= msi_reg_get_value(props
, package
, &type
);
1357 val
= strdupW(five
);
1360 val
= strdupW(szOne
);
1362 r
= msi_copy_outval(val
, szValue
, pcchValue
);
1365 else if (props
&& (val
= msi_reg_get_value(props
, package
, &type
)))
1368 val
= strdupW(five
);
1369 r
= msi_copy_outval(val
, szValue
, pcchValue
);
1373 if (prod
|| managed
)
1374 val
= strdupW(szOne
);
1378 r
= msi_copy_outval(val
, szValue
, pcchValue
);
1380 else if (!lstrcmpW(szProperty
, INSTALLPROPERTY_ASSIGNMENTTYPEW
))
1382 if (!prod
&& !classes
)
1386 val
= strdupW(szEmpty
);
1387 r
= msi_copy_outval(val
, szValue
, pcchValue
);
1390 r
= ERROR_UNKNOWN_PROPERTY
;
1395 RegCloseKey(managed
);
1396 RegCloseKey(classes
);
1402 UINT WINAPI
MsiGetPatchInfoExA(LPCSTR szPatchCode
, LPCSTR szProductCode
,
1403 LPCSTR szUserSid
, MSIINSTALLCONTEXT dwContext
,
1404 LPCSTR szProperty
, LPSTR lpValue
, DWORD
*pcchValue
)
1406 LPWSTR patch
= NULL
, product
= NULL
, usersid
= NULL
;
1407 LPWSTR property
= NULL
, val
= NULL
;
1411 TRACE("(%s, %s, %s, %d, %s, %p, %p)\n", debugstr_a(szPatchCode
),
1412 debugstr_a(szProductCode
), debugstr_a(szUserSid
), dwContext
,
1413 debugstr_a(szProperty
), lpValue
, pcchValue
);
1415 if (lpValue
&& !pcchValue
)
1416 return ERROR_INVALID_PARAMETER
;
1418 if (szPatchCode
) patch
= strdupAtoW(szPatchCode
);
1419 if (szProductCode
) product
= strdupAtoW(szProductCode
);
1420 if (szUserSid
) usersid
= strdupAtoW(szUserSid
);
1421 if (szProperty
) property
= strdupAtoW(szProperty
);
1424 r
= MsiGetPatchInfoExW(patch
, product
, usersid
, dwContext
, property
,
1426 if (r
!= ERROR_SUCCESS
)
1429 val
= msi_alloc(++len
* sizeof(WCHAR
));
1432 r
= ERROR_OUTOFMEMORY
;
1436 r
= MsiGetPatchInfoExW(patch
, product
, usersid
, dwContext
, property
,
1438 if (r
!= ERROR_SUCCESS
|| !pcchValue
)
1442 WideCharToMultiByte(CP_ACP
, 0, val
, -1, lpValue
,
1443 *pcchValue
- 1, NULL
, NULL
);
1445 len
= lstrlenW(val
);
1446 if ((*val
&& *pcchValue
< len
+ 1) || !lpValue
)
1450 r
= ERROR_MORE_DATA
;
1451 lpValue
[*pcchValue
- 1] = '\0';
1454 *pcchValue
= len
* sizeof(WCHAR
);
1469 UINT WINAPI
MsiGetPatchInfoExW(LPCWSTR szPatchCode
, LPCWSTR szProductCode
,
1470 LPCWSTR szUserSid
, MSIINSTALLCONTEXT dwContext
,
1471 LPCWSTR szProperty
, LPWSTR lpValue
, DWORD
*pcchValue
)
1473 WCHAR squished_pc
[GUID_SIZE
];
1474 WCHAR squished_patch
[GUID_SIZE
];
1475 HKEY udprod
= 0, prod
= 0, props
= 0;
1476 HKEY patch
= 0, patches
= 0;
1477 HKEY udpatch
= 0, datakey
= 0;
1478 HKEY prodpatches
= 0;
1480 UINT r
= ERROR_UNKNOWN_PRODUCT
;
1484 static const WCHAR szManagedPackage
[] = {'M','a','n','a','g','e','d',
1485 'L','o','c','a','l','P','a','c','k','a','g','e',0};
1487 TRACE("(%s, %s, %s, %d, %s, %p, %p)\n", debugstr_w(szPatchCode
),
1488 debugstr_w(szProductCode
), debugstr_w(szUserSid
), dwContext
,
1489 debugstr_w(szProperty
), lpValue
, pcchValue
);
1491 if (!szProductCode
|| !squash_guid(szProductCode
, squished_pc
))
1492 return ERROR_INVALID_PARAMETER
;
1494 if (!szPatchCode
|| !squash_guid(szPatchCode
, squished_patch
))
1495 return ERROR_INVALID_PARAMETER
;
1498 return ERROR_INVALID_PARAMETER
;
1500 if (lpValue
&& !pcchValue
)
1501 return ERROR_INVALID_PARAMETER
;
1503 if (dwContext
!= MSIINSTALLCONTEXT_USERMANAGED
&&
1504 dwContext
!= MSIINSTALLCONTEXT_USERUNMANAGED
&&
1505 dwContext
!= MSIINSTALLCONTEXT_MACHINE
)
1506 return ERROR_INVALID_PARAMETER
;
1508 if (dwContext
== MSIINSTALLCONTEXT_MACHINE
&& szUserSid
)
1509 return ERROR_INVALID_PARAMETER
;
1511 if (!lstrcmpW(szUserSid
, szLocalSid
))
1512 return ERROR_INVALID_PARAMETER
;
1514 if (MSIREG_OpenUserDataProductKey(szProductCode
, dwContext
, NULL
,
1515 &udprod
, FALSE
) != ERROR_SUCCESS
)
1518 if (MSIREG_OpenInstallProps(szProductCode
, dwContext
, NULL
,
1519 &props
, FALSE
) != ERROR_SUCCESS
)
1522 r
= ERROR_UNKNOWN_PATCH
;
1524 res
= RegOpenKeyExW(udprod
, szPatches
, 0, KEY_READ
, &patches
);
1525 if (res
!= ERROR_SUCCESS
)
1528 res
= RegOpenKeyExW(patches
, squished_patch
, 0, KEY_READ
, &patch
);
1529 if (res
!= ERROR_SUCCESS
)
1532 if (!lstrcmpW(szProperty
, INSTALLPROPERTY_TRANSFORMSW
))
1534 if (MSIREG_OpenProductKey(szProductCode
, NULL
, dwContext
,
1535 &prod
, FALSE
) != ERROR_SUCCESS
)
1538 res
= RegOpenKeyExW(prod
, szPatches
, 0, KEY_ALL_ACCESS
, &prodpatches
);
1539 if (res
!= ERROR_SUCCESS
)
1542 datakey
= prodpatches
;
1543 szProperty
= squished_patch
;
1547 if (MSIREG_OpenUserDataPatchKey(szPatchCode
, dwContext
,
1548 &udpatch
, FALSE
) != ERROR_SUCCESS
)
1551 if (!lstrcmpW(szProperty
, INSTALLPROPERTY_LOCALPACKAGEW
))
1553 if (dwContext
== MSIINSTALLCONTEXT_USERMANAGED
)
1554 szProperty
= szManagedPackage
;
1557 else if (!lstrcmpW(szProperty
, INSTALLPROPERTY_INSTALLDATEW
))
1560 szProperty
= szInstalled
;
1562 else if (!lstrcmpW(szProperty
, INSTALLPROPERTY_LOCALPACKAGEW
))
1566 else if (!lstrcmpW(szProperty
, INSTALLPROPERTY_UNINSTALLABLEW
) ||
1567 !lstrcmpW(szProperty
, INSTALLPROPERTY_PATCHSTATEW
) ||
1568 !lstrcmpW(szProperty
, INSTALLPROPERTY_DISPLAYNAMEW
) ||
1569 !lstrcmpW(szProperty
, INSTALLPROPERTY_MOREINFOURLW
))
1575 r
= ERROR_UNKNOWN_PROPERTY
;
1580 val
= msi_reg_get_val_str(datakey
, szProperty
);
1582 val
= strdupW(szEmpty
);
1590 lstrcpynW(lpValue
, val
, *pcchValue
);
1592 len
= lstrlenW(val
);
1593 if ((*val
&& *pcchValue
< len
+ 1) || !lpValue
)
1596 r
= ERROR_MORE_DATA
;
1598 *pcchValue
= len
* sizeof(WCHAR
);
1605 RegCloseKey(prodpatches
);
1608 RegCloseKey(patches
);
1609 RegCloseKey(udpatch
);
1611 RegCloseKey(udprod
);
1616 UINT WINAPI
MsiGetPatchInfoA( LPCSTR patch
, LPCSTR attr
, LPSTR buffer
, LPDWORD buflen
)
1618 UINT r
= ERROR_OUTOFMEMORY
;
1620 LPWSTR patchW
= NULL
, attrW
= NULL
, bufferW
= NULL
;
1622 TRACE("%s %s %p %p\n", debugstr_a(patch
), debugstr_a(attr
), buffer
, buflen
);
1624 if (!patch
|| !attr
)
1625 return ERROR_INVALID_PARAMETER
;
1627 if (!(patchW
= strdupAtoW( patch
)))
1630 if (!(attrW
= strdupAtoW( attr
)))
1634 r
= MsiGetPatchInfoW( patchW
, attrW
, NULL
, &size
);
1635 if (r
!= ERROR_SUCCESS
)
1639 if (!(bufferW
= msi_alloc( size
* sizeof(WCHAR
) )))
1641 r
= ERROR_OUTOFMEMORY
;
1645 r
= MsiGetPatchInfoW( patchW
, attrW
, bufferW
, &size
);
1646 if (r
== ERROR_SUCCESS
)
1648 int len
= WideCharToMultiByte( CP_ACP
, 0, bufferW
, -1, NULL
, 0, NULL
, NULL
);
1650 r
= ERROR_MORE_DATA
;
1652 WideCharToMultiByte( CP_ACP
, 0, bufferW
, -1, buffer
, *buflen
, NULL
, NULL
);
1660 msi_free( bufferW
);
1664 UINT WINAPI
MsiGetPatchInfoW( LPCWSTR patch
, LPCWSTR attr
, LPWSTR buffer
, LPDWORD buflen
)
1667 WCHAR product
[GUID_SIZE
];
1670 TRACE("%s %s %p %p\n", debugstr_w(patch
), debugstr_w(attr
), buffer
, buflen
);
1672 if (!patch
|| !attr
)
1673 return ERROR_INVALID_PARAMETER
;
1675 if (strcmpW( INSTALLPROPERTY_LOCALPACKAGEW
, attr
))
1676 return ERROR_UNKNOWN_PROPERTY
;
1681 r
= MsiEnumProductsW( index
, product
);
1682 if (r
!= ERROR_SUCCESS
)
1685 r
= MsiGetPatchInfoExW( patch
, product
, NULL
, MSIINSTALLCONTEXT_USERMANAGED
, attr
, buffer
, buflen
);
1686 if (r
== ERROR_SUCCESS
|| r
== ERROR_MORE_DATA
)
1689 r
= MsiGetPatchInfoExW( patch
, product
, NULL
, MSIINSTALLCONTEXT_USERUNMANAGED
, attr
, buffer
, buflen
);
1690 if (r
== ERROR_SUCCESS
|| r
== ERROR_MORE_DATA
)
1693 r
= MsiGetPatchInfoExW( patch
, product
, NULL
, MSIINSTALLCONTEXT_MACHINE
, attr
, buffer
, buflen
);
1694 if (r
== ERROR_SUCCESS
|| r
== ERROR_MORE_DATA
)
1700 return ERROR_UNKNOWN_PRODUCT
;
1703 UINT WINAPI
MsiEnableLogA(DWORD dwLogMode
, LPCSTR szLogFile
, DWORD attributes
)
1705 LPWSTR szwLogFile
= NULL
;
1708 TRACE("%08x %s %08x\n", dwLogMode
, debugstr_a(szLogFile
), attributes
);
1712 szwLogFile
= strdupAtoW( szLogFile
);
1714 return ERROR_OUTOFMEMORY
;
1716 r
= MsiEnableLogW( dwLogMode
, szwLogFile
, attributes
);
1717 msi_free( szwLogFile
);
1721 UINT WINAPI
MsiEnableLogW(DWORD dwLogMode
, LPCWSTR szLogFile
, DWORD attributes
)
1723 HANDLE file
= INVALID_HANDLE_VALUE
;
1725 TRACE("%08x %s %08x\n", dwLogMode
, debugstr_w(szLogFile
), attributes
);
1729 lstrcpyW(gszLogFile
,szLogFile
);
1730 if (!(attributes
& INSTALLLOGATTRIBUTES_APPEND
))
1731 DeleteFileW(szLogFile
);
1732 file
= CreateFileW(szLogFile
, GENERIC_WRITE
, 0, NULL
, OPEN_ALWAYS
,
1733 FILE_ATTRIBUTE_NORMAL
, NULL
);
1734 if (file
!= INVALID_HANDLE_VALUE
)
1737 ERR("Unable to enable log %s\n",debugstr_w(szLogFile
));
1740 gszLogFile
[0] = '\0';
1742 return ERROR_SUCCESS
;
1745 UINT WINAPI
MsiEnumComponentCostsW(MSIHANDLE hInstall
, LPCWSTR szComponent
,
1746 DWORD dwIndex
, INSTALLSTATE iState
,
1747 LPWSTR lpDriveBuf
, DWORD
*pcchDriveBuf
,
1748 int *piCost
, int *pTempCost
)
1750 FIXME("(%d, %s, %d, %d, %p, %p, %p %p): stub!\n", hInstall
,
1751 debugstr_w(szComponent
), dwIndex
, iState
, lpDriveBuf
,
1752 pcchDriveBuf
, piCost
, pTempCost
);
1754 return ERROR_NO_MORE_ITEMS
;
1757 UINT WINAPI
MsiQueryComponentStateA(LPCSTR szProductCode
,
1758 LPCSTR szUserSid
, MSIINSTALLCONTEXT dwContext
,
1759 LPCSTR szComponent
, INSTALLSTATE
*pdwState
)
1761 LPWSTR prodcode
= NULL
, usersid
= NULL
, comp
= NULL
;
1764 TRACE("(%s, %s, %d, %s, %p)\n", debugstr_a(szProductCode
),
1765 debugstr_a(szUserSid
), dwContext
, debugstr_a(szComponent
), pdwState
);
1767 if (szProductCode
&& !(prodcode
= strdupAtoW(szProductCode
)))
1768 return ERROR_OUTOFMEMORY
;
1770 if (szUserSid
&& !(usersid
= strdupAtoW(szUserSid
)))
1771 return ERROR_OUTOFMEMORY
;
1773 if (szComponent
&& !(comp
= strdupAtoW(szComponent
)))
1774 return ERROR_OUTOFMEMORY
;
1776 r
= MsiQueryComponentStateW(prodcode
, usersid
, dwContext
, comp
, pdwState
);
1785 static BOOL
msi_comp_find_prod_key(LPCWSTR prodcode
, MSIINSTALLCONTEXT context
)
1790 r
= MSIREG_OpenProductKey(prodcode
, NULL
, context
, &hkey
, FALSE
);
1792 return (r
== ERROR_SUCCESS
);
1795 static BOOL
msi_comp_find_package(LPCWSTR prodcode
, MSIINSTALLCONTEXT context
)
1803 static const WCHAR local_package
[] = {'L','o','c','a','l','P','a','c','k','a','g','e',0};
1804 static const WCHAR managed_local_package
[] = {
1805 'M','a','n','a','g','e','d','L','o','c','a','l','P','a','c','k','a','g','e',0
1808 r
= MSIREG_OpenInstallProps(prodcode
, context
, NULL
, &hkey
, FALSE
);
1809 if (r
!= ERROR_SUCCESS
)
1812 if (context
== MSIINSTALLCONTEXT_USERMANAGED
)
1813 package
= managed_local_package
;
1815 package
= local_package
;
1818 res
= RegQueryValueExW(hkey
, package
, NULL
, NULL
, NULL
, &sz
);
1821 return (res
== ERROR_SUCCESS
);
1824 static BOOL
msi_comp_find_prodcode(LPWSTR squished_pc
,
1825 MSIINSTALLCONTEXT context
,
1826 LPCWSTR comp
, LPWSTR val
, DWORD
*sz
)
1832 if (context
== MSIINSTALLCONTEXT_MACHINE
)
1833 r
= MSIREG_OpenUserDataComponentKey(comp
, szLocalSid
, &hkey
, FALSE
);
1835 r
= MSIREG_OpenUserDataComponentKey(comp
, NULL
, &hkey
, FALSE
);
1837 if (r
!= ERROR_SUCCESS
)
1840 res
= RegQueryValueExW(hkey
, squished_pc
, NULL
, NULL
, (BYTE
*)val
, sz
);
1841 if (res
!= ERROR_SUCCESS
)
1848 UINT WINAPI
MsiQueryComponentStateW(LPCWSTR szProductCode
,
1849 LPCWSTR szUserSid
, MSIINSTALLCONTEXT dwContext
,
1850 LPCWSTR szComponent
, INSTALLSTATE
*pdwState
)
1852 WCHAR squished_pc
[GUID_SIZE
];
1853 WCHAR val
[MAX_PATH
];
1857 TRACE("(%s, %s, %d, %s, %p)\n", debugstr_w(szProductCode
),
1858 debugstr_w(szUserSid
), dwContext
, debugstr_w(szComponent
), pdwState
);
1860 if (!pdwState
|| !szComponent
)
1861 return ERROR_INVALID_PARAMETER
;
1863 if (!szProductCode
|| !*szProductCode
|| lstrlenW(szProductCode
) != GUID_SIZE
- 1)
1864 return ERROR_INVALID_PARAMETER
;
1866 if (!squash_guid(szProductCode
, squished_pc
))
1867 return ERROR_INVALID_PARAMETER
;
1869 found
= msi_comp_find_prod_key(szProductCode
, dwContext
);
1871 if (!msi_comp_find_package(szProductCode
, dwContext
))
1875 *pdwState
= INSTALLSTATE_UNKNOWN
;
1876 return ERROR_UNKNOWN_COMPONENT
;
1879 return ERROR_UNKNOWN_PRODUCT
;
1882 *pdwState
= INSTALLSTATE_UNKNOWN
;
1885 if (!msi_comp_find_prodcode(squished_pc
, dwContext
, szComponent
, val
, &sz
))
1886 return ERROR_UNKNOWN_COMPONENT
;
1889 *pdwState
= INSTALLSTATE_NOTUSED
;
1892 if (lstrlenW(val
) > 2 &&
1893 val
[0] >= '0' && val
[0] <= '9' && val
[1] >= '0' && val
[1] <= '9')
1895 *pdwState
= INSTALLSTATE_SOURCE
;
1898 *pdwState
= INSTALLSTATE_LOCAL
;
1901 return ERROR_SUCCESS
;
1904 INSTALLSTATE WINAPI
MsiQueryProductStateA(LPCSTR szProduct
)
1906 LPWSTR szwProduct
= NULL
;
1911 szwProduct
= strdupAtoW( szProduct
);
1913 return ERROR_OUTOFMEMORY
;
1915 r
= MsiQueryProductStateW( szwProduct
);
1916 msi_free( szwProduct
);
1920 INSTALLSTATE WINAPI
MsiQueryProductStateW(LPCWSTR szProduct
)
1922 MSIINSTALLCONTEXT context
= MSIINSTALLCONTEXT_USERUNMANAGED
;
1923 INSTALLSTATE state
= INSTALLSTATE_ADVERTISED
;
1924 HKEY prodkey
= 0, userdata
= 0;
1928 static const WCHAR szWindowsInstaller
[] = {
1929 'W','i','n','d','o','w','s','I','n','s','t','a','l','l','e','r',0};
1931 TRACE("%s\n", debugstr_w(szProduct
));
1933 if (!szProduct
|| !*szProduct
)
1934 return INSTALLSTATE_INVALIDARG
;
1936 if (lstrlenW(szProduct
) != GUID_SIZE
- 1)
1937 return INSTALLSTATE_INVALIDARG
;
1939 if (MSIREG_OpenProductKey(szProduct
, NULL
, MSIINSTALLCONTEXT_USERMANAGED
,
1940 &prodkey
, FALSE
) != ERROR_SUCCESS
&&
1941 MSIREG_OpenProductKey(szProduct
, NULL
, MSIINSTALLCONTEXT_USERUNMANAGED
,
1942 &prodkey
, FALSE
) != ERROR_SUCCESS
&&
1943 MSIREG_OpenProductKey(szProduct
, NULL
, MSIINSTALLCONTEXT_MACHINE
,
1944 &prodkey
, FALSE
) == ERROR_SUCCESS
)
1946 context
= MSIINSTALLCONTEXT_MACHINE
;
1949 r
= MSIREG_OpenInstallProps(szProduct
, context
, NULL
, &userdata
, FALSE
);
1950 if (r
!= ERROR_SUCCESS
)
1953 if (!msi_reg_get_val_dword(userdata
, szWindowsInstaller
, &val
))
1957 state
= INSTALLSTATE_DEFAULT
;
1959 state
= INSTALLSTATE_UNKNOWN
;
1964 state
= INSTALLSTATE_UNKNOWN
;
1967 state
= INSTALLSTATE_ABSENT
;
1970 RegCloseKey(prodkey
);
1971 RegCloseKey(userdata
);
1975 INSTALLUILEVEL WINAPI
MsiSetInternalUI(INSTALLUILEVEL dwUILevel
, HWND
*phWnd
)
1977 INSTALLUILEVEL old
= gUILevel
;
1978 HWND oldwnd
= gUIhwnd
;
1980 TRACE("%08x %p\n", dwUILevel
, phWnd
);
1982 gUILevel
= dwUILevel
;
1991 INSTALLUI_HANDLERA WINAPI
MsiSetExternalUIA(INSTALLUI_HANDLERA puiHandler
,
1992 DWORD dwMessageFilter
, LPVOID pvContext
)
1994 INSTALLUI_HANDLERA prev
= gUIHandlerA
;
1996 TRACE("%p %08x %p\n", puiHandler
, dwMessageFilter
, pvContext
);
1998 gUIHandlerA
= puiHandler
;
2000 gUIFilter
= dwMessageFilter
;
2001 gUIContext
= pvContext
;
2006 INSTALLUI_HANDLERW WINAPI
MsiSetExternalUIW(INSTALLUI_HANDLERW puiHandler
,
2007 DWORD dwMessageFilter
, LPVOID pvContext
)
2009 INSTALLUI_HANDLERW prev
= gUIHandlerW
;
2011 TRACE("%p %08x %p\n", puiHandler
, dwMessageFilter
, pvContext
);
2014 gUIHandlerW
= puiHandler
;
2015 gUIFilter
= dwMessageFilter
;
2016 gUIContext
= pvContext
;
2021 /******************************************************************
2022 * MsiLoadStringW [MSI.@]
2024 * Loads a string from MSI's string resources.
2028 * handle [I] only -1 is handled currently
2029 * id [I] id of the string to be loaded
2030 * lpBuffer [O] buffer for the string to be written to
2031 * nBufferMax [I] maximum size of the buffer in characters
2032 * lang [I] the preferred language for the string
2036 * If successful, this function returns the language id of the string loaded
2037 * If the function fails, the function returns zero.
2041 * The type of the first parameter is unknown. LoadString's prototype
2042 * suggests that it might be a module handle. I have made it an MSI handle
2043 * for starters, as -1 is an invalid MSI handle, but not an invalid module
2044 * handle. Maybe strings can be stored in an MSI database somehow.
2046 LANGID WINAPI
MsiLoadStringW( MSIHANDLE handle
, UINT id
, LPWSTR lpBuffer
,
2047 int nBufferMax
, LANGID lang
)
2054 TRACE("%d %u %p %d %d\n", handle
, id
, lpBuffer
, nBufferMax
, lang
);
2057 FIXME("don't know how to deal with handle = %08x\n", handle
);
2060 lang
= GetUserDefaultLangID();
2062 hres
= FindResourceExW( msi_hInstance
, (LPCWSTR
) RT_STRING
,
2066 hResData
= LoadResource( msi_hInstance
, hres
);
2069 p
= LockResource( hResData
);
2073 for (i
= 0; i
< (id
&0xf); i
++)
2077 if( nBufferMax
<= len
)
2080 memcpy( lpBuffer
, p
+1, len
* sizeof(WCHAR
));
2081 lpBuffer
[ len
] = 0;
2083 TRACE("found -> %s\n", debugstr_w(lpBuffer
));
2088 LANGID WINAPI
MsiLoadStringA( MSIHANDLE handle
, UINT id
, LPSTR lpBuffer
,
2089 int nBufferMax
, LANGID lang
)
2095 bufW
= msi_alloc(nBufferMax
*sizeof(WCHAR
));
2096 r
= MsiLoadStringW(handle
, id
, bufW
, nBufferMax
, lang
);
2099 len
= WideCharToMultiByte(CP_ACP
, 0, bufW
, -1, NULL
, 0, NULL
, NULL
);
2100 if( len
<= nBufferMax
)
2101 WideCharToMultiByte( CP_ACP
, 0, bufW
, -1,
2102 lpBuffer
, nBufferMax
, NULL
, NULL
);
2110 INSTALLSTATE WINAPI
MsiLocateComponentA(LPCSTR szComponent
, LPSTR lpPathBuf
,
2113 char szProduct
[GUID_SIZE
];
2115 TRACE("%s %p %p\n", debugstr_a(szComponent
), lpPathBuf
, pcchBuf
);
2117 if (MsiGetProductCodeA( szComponent
, szProduct
) != ERROR_SUCCESS
)
2118 return INSTALLSTATE_UNKNOWN
;
2120 return MsiGetComponentPathA( szProduct
, szComponent
, lpPathBuf
, pcchBuf
);
2123 INSTALLSTATE WINAPI
MsiLocateComponentW(LPCWSTR szComponent
, LPWSTR lpPathBuf
,
2126 WCHAR szProduct
[GUID_SIZE
];
2128 TRACE("%s %p %p\n", debugstr_w(szComponent
), lpPathBuf
, pcchBuf
);
2130 if (MsiGetProductCodeW( szComponent
, szProduct
) != ERROR_SUCCESS
)
2131 return INSTALLSTATE_UNKNOWN
;
2133 return MsiGetComponentPathW( szProduct
, szComponent
, lpPathBuf
, pcchBuf
);
2136 UINT WINAPI
MsiMessageBoxA(HWND hWnd
, LPCSTR lpText
, LPCSTR lpCaption
, UINT uType
,
2137 WORD wLanguageId
, DWORD f
)
2139 FIXME("%p %s %s %u %08x %08x\n", hWnd
, debugstr_a(lpText
), debugstr_a(lpCaption
),
2140 uType
, wLanguageId
, f
);
2141 return MessageBoxExA(hWnd
,lpText
,lpCaption
,uType
,wLanguageId
);
2144 UINT WINAPI
MsiMessageBoxW(HWND hWnd
, LPCWSTR lpText
, LPCWSTR lpCaption
, UINT uType
,
2145 WORD wLanguageId
, DWORD f
)
2147 FIXME("%p %s %s %u %08x %08x\n", hWnd
, debugstr_w(lpText
), debugstr_w(lpCaption
),
2148 uType
, wLanguageId
, f
);
2149 return MessageBoxExW(hWnd
,lpText
,lpCaption
,uType
,wLanguageId
);
2152 UINT WINAPI
MsiMessageBoxExA(HWND hWnd
, LPCSTR lpText
, LPCSTR lpCaption
, UINT uType
,
2153 DWORD unknown
, WORD wLanguageId
, DWORD f
)
2155 FIXME("(%p, %s, %s, %u, 0x%08x, 0x%08x, 0x%08x): semi-stub\n", hWnd
, debugstr_a(lpText
),
2156 debugstr_a(lpCaption
), uType
, unknown
, wLanguageId
, f
);
2157 return MessageBoxExA(hWnd
, lpText
, lpCaption
, uType
, wLanguageId
);
2160 UINT WINAPI
MsiMessageBoxExW(HWND hWnd
, LPCWSTR lpText
, LPCWSTR lpCaption
, UINT uType
,
2161 DWORD unknown
, WORD wLanguageId
, DWORD f
)
2163 FIXME("(%p, %s, %s, %u, 0x%08x, 0x%08x, 0x%08x): semi-stub\n", hWnd
, debugstr_w(lpText
),
2164 debugstr_w(lpCaption
), uType
, unknown
, wLanguageId
, f
);
2165 return MessageBoxExW(hWnd
, lpText
, lpCaption
, uType
, wLanguageId
);
2168 UINT WINAPI
MsiProvideAssemblyA( LPCSTR szAssemblyName
, LPCSTR szAppContext
,
2169 DWORD dwInstallMode
, DWORD dwAssemblyInfo
, LPSTR lpPathBuf
,
2170 LPDWORD pcchPathBuf
)
2172 FIXME("%s %s %08x %08x %p %p\n", debugstr_a(szAssemblyName
),
2173 debugstr_a(szAppContext
), dwInstallMode
, dwAssemblyInfo
, lpPathBuf
,
2175 return ERROR_CALL_NOT_IMPLEMENTED
;
2178 UINT WINAPI
MsiProvideAssemblyW( LPCWSTR szAssemblyName
, LPCWSTR szAppContext
,
2179 DWORD dwInstallMode
, DWORD dwAssemblyInfo
, LPWSTR lpPathBuf
,
2180 LPDWORD pcchPathBuf
)
2182 FIXME("%s %s %08x %08x %p %p\n", debugstr_w(szAssemblyName
),
2183 debugstr_w(szAppContext
), dwInstallMode
, dwAssemblyInfo
, lpPathBuf
,
2185 return ERROR_CALL_NOT_IMPLEMENTED
;
2188 UINT WINAPI
MsiProvideComponentFromDescriptorA( LPCSTR szDescriptor
,
2189 LPSTR szPath
, LPDWORD pcchPath
, LPDWORD pcchArgs
)
2191 FIXME("%s %p %p %p\n", debugstr_a(szDescriptor
), szPath
, pcchPath
, pcchArgs
);
2192 return ERROR_CALL_NOT_IMPLEMENTED
;
2195 UINT WINAPI
MsiProvideComponentFromDescriptorW( LPCWSTR szDescriptor
,
2196 LPWSTR szPath
, LPDWORD pcchPath
, LPDWORD pcchArgs
)
2198 FIXME("%s %p %p %p\n", debugstr_w(szDescriptor
), szPath
, pcchPath
, pcchArgs
);
2199 return ERROR_CALL_NOT_IMPLEMENTED
;
2202 HRESULT WINAPI
MsiGetFileSignatureInformationA( LPCSTR szSignedObjectPath
,
2203 DWORD dwFlags
, PCCERT_CONTEXT
* ppcCertContext
, LPBYTE pbHashData
,
2204 LPDWORD pcbHashData
)
2206 FIXME("%s %08x %p %p %p\n", debugstr_a(szSignedObjectPath
), dwFlags
,
2207 ppcCertContext
, pbHashData
, pcbHashData
);
2208 return ERROR_CALL_NOT_IMPLEMENTED
;
2211 HRESULT WINAPI
MsiGetFileSignatureInformationW( LPCWSTR szSignedObjectPath
,
2212 DWORD dwFlags
, PCCERT_CONTEXT
* ppcCertContext
, LPBYTE pbHashData
,
2213 LPDWORD pcbHashData
)
2215 FIXME("%s %08x %p %p %p\n", debugstr_w(szSignedObjectPath
), dwFlags
,
2216 ppcCertContext
, pbHashData
, pcbHashData
);
2217 return ERROR_CALL_NOT_IMPLEMENTED
;
2220 /******************************************************************
2221 * MsiGetProductPropertyA [MSI.@]
2223 UINT WINAPI
MsiGetProductPropertyA(MSIHANDLE hProduct
, LPCSTR szProperty
,
2224 LPSTR szValue
, LPDWORD pccbValue
)
2226 LPWSTR prop
= NULL
, val
= NULL
;
2230 TRACE("(%d, %s, %p, %p)\n", hProduct
, debugstr_a(szProperty
),
2231 szValue
, pccbValue
);
2233 if (szValue
&& !pccbValue
)
2234 return ERROR_INVALID_PARAMETER
;
2236 if (szProperty
) prop
= strdupAtoW(szProperty
);
2239 r
= MsiGetProductPropertyW(hProduct
, prop
, NULL
, &len
);
2240 if (r
!= ERROR_SUCCESS
&& r
!= ERROR_MORE_DATA
)
2243 if (r
== ERROR_SUCCESS
)
2245 if (szValue
) *szValue
= '\0';
2246 if (pccbValue
) *pccbValue
= 0;
2250 val
= msi_alloc(++len
* sizeof(WCHAR
));
2253 r
= ERROR_OUTOFMEMORY
;
2257 r
= MsiGetProductPropertyW(hProduct
, prop
, val
, &len
);
2258 if (r
!= ERROR_SUCCESS
)
2261 len
= WideCharToMultiByte(CP_ACP
, 0, val
, -1, NULL
, 0, NULL
, NULL
);
2264 WideCharToMultiByte(CP_ACP
, 0, val
, -1, szValue
,
2265 *pccbValue
, NULL
, NULL
);
2269 if (len
> *pccbValue
)
2270 r
= ERROR_MORE_DATA
;
2272 *pccbValue
= len
- 1;
2282 /******************************************************************
2283 * MsiGetProductPropertyW [MSI.@]
2285 UINT WINAPI
MsiGetProductPropertyW(MSIHANDLE hProduct
, LPCWSTR szProperty
,
2286 LPWSTR szValue
, LPDWORD pccbValue
)
2288 MSIPACKAGE
*package
;
2289 MSIQUERY
*view
= NULL
;
2290 MSIRECORD
*rec
= NULL
;
2294 static const WCHAR query
[] = {
2295 'S','E','L','E','C','T',' ','*',' ','F','R','O','M',' ',
2296 '`','P','r','o','p','e','r','t','y','`',' ','W','H','E','R','E',' ',
2297 '`','P','r','o','p','e','r','t','y','`','=','\'','%','s','\'',0};
2299 TRACE("(%d, %s, %p, %p)\n", hProduct
, debugstr_w(szProperty
),
2300 szValue
, pccbValue
);
2303 return ERROR_INVALID_PARAMETER
;
2305 if (szValue
&& !pccbValue
)
2306 return ERROR_INVALID_PARAMETER
;
2308 package
= msihandle2msiinfo(hProduct
, MSIHANDLETYPE_PACKAGE
);
2310 return ERROR_INVALID_HANDLE
;
2312 r
= MSI_OpenQuery(package
->db
, &view
, query
, szProperty
);
2313 if (r
!= ERROR_SUCCESS
)
2316 r
= MSI_ViewExecute(view
, 0);
2317 if (r
!= ERROR_SUCCESS
)
2320 r
= MSI_ViewFetch(view
, &rec
);
2321 if (r
!= ERROR_SUCCESS
)
2324 val
= MSI_RecordGetString(rec
, 2);
2328 if (lstrlenW(val
) >= *pccbValue
)
2330 lstrcpynW(szValue
, val
, *pccbValue
);
2331 *pccbValue
= lstrlenW(val
);
2332 r
= ERROR_MORE_DATA
;
2336 lstrcpyW(szValue
, val
);
2337 *pccbValue
= lstrlenW(val
);
2344 MSI_ViewClose(view
);
2345 msiobj_release(&view
->hdr
);
2346 if (rec
) msiobj_release(&rec
->hdr
);
2351 if (szValue
) *szValue
= '\0';
2352 if (pccbValue
) *pccbValue
= 0;
2359 UINT WINAPI
MsiVerifyPackageA( LPCSTR szPackage
)
2362 LPWSTR szPack
= NULL
;
2364 TRACE("%s\n", debugstr_a(szPackage
) );
2368 szPack
= strdupAtoW( szPackage
);
2370 return ERROR_OUTOFMEMORY
;
2373 r
= MsiVerifyPackageW( szPack
);
2380 UINT WINAPI
MsiVerifyPackageW( LPCWSTR szPackage
)
2385 TRACE("%s\n", debugstr_w(szPackage
) );
2387 r
= MsiOpenDatabaseW( szPackage
, MSIDBOPEN_READONLY
, &handle
);
2388 MsiCloseHandle( handle
);
2393 static INSTALLSTATE
MSI_GetComponentPath(LPCWSTR szProduct
, LPCWSTR szComponent
,
2394 awstring
* lpPathBuf
, LPDWORD pcchBuf
)
2396 WCHAR squished_pc
[GUID_SIZE
];
2397 WCHAR squished_comp
[GUID_SIZE
];
2403 static const WCHAR wininstaller
[] = {
2404 'W','i','n','d','o','w','s','I','n','s','t','a','l','l','e','r',0};
2406 TRACE("%s %s %p %p\n", debugstr_w(szProduct
),
2407 debugstr_w(szComponent
), lpPathBuf
->str
.w
, pcchBuf
);
2409 if (!szProduct
|| !szComponent
)
2410 return INSTALLSTATE_INVALIDARG
;
2412 if (lpPathBuf
->str
.w
&& !pcchBuf
)
2413 return INSTALLSTATE_INVALIDARG
;
2415 if (!squash_guid(szProduct
, squished_pc
) ||
2416 !squash_guid(szComponent
, squished_comp
))
2417 return INSTALLSTATE_INVALIDARG
;
2419 state
= INSTALLSTATE_UNKNOWN
;
2421 if (MSIREG_OpenUserDataComponentKey(szComponent
, szLocalSid
, &hkey
, FALSE
) == ERROR_SUCCESS
||
2422 MSIREG_OpenUserDataComponentKey(szComponent
, NULL
, &hkey
, FALSE
) == ERROR_SUCCESS
)
2424 path
= msi_reg_get_val_str(hkey
, squished_pc
);
2427 state
= INSTALLSTATE_ABSENT
;
2429 if ((MSIREG_OpenInstallProps(szProduct
, MSIINSTALLCONTEXT_MACHINE
, NULL
,
2430 &hkey
, FALSE
) == ERROR_SUCCESS
||
2431 MSIREG_OpenUserDataProductKey(szProduct
, MSIINSTALLCONTEXT_USERUNMANAGED
,
2432 NULL
, &hkey
, FALSE
) == ERROR_SUCCESS
) &&
2433 msi_reg_get_val_dword(hkey
, wininstaller
, &version
) &&
2434 GetFileAttributesW(path
) != INVALID_FILE_ATTRIBUTES
)
2437 state
= INSTALLSTATE_LOCAL
;
2441 if (state
!= INSTALLSTATE_LOCAL
&&
2442 (MSIREG_OpenProductKey(szProduct
, NULL
,
2443 MSIINSTALLCONTEXT_USERUNMANAGED
,
2444 &hkey
, FALSE
) == ERROR_SUCCESS
||
2445 MSIREG_OpenProductKey(szProduct
, NULL
, MSIINSTALLCONTEXT_MACHINE
,
2446 &hkey
, FALSE
) == ERROR_SUCCESS
))
2450 if (MSIREG_OpenUserDataComponentKey(szComponent
, szLocalSid
, &hkey
, FALSE
) == ERROR_SUCCESS
||
2451 MSIREG_OpenUserDataComponentKey(szComponent
, NULL
, &hkey
, FALSE
) == ERROR_SUCCESS
)
2454 path
= msi_reg_get_val_str(hkey
, squished_pc
);
2457 state
= INSTALLSTATE_ABSENT
;
2459 if (GetFileAttributesW(path
) != INVALID_FILE_ATTRIBUTES
)
2460 state
= INSTALLSTATE_LOCAL
;
2465 return INSTALLSTATE_UNKNOWN
;
2467 if (state
== INSTALLSTATE_LOCAL
&& !*path
)
2468 state
= INSTALLSTATE_NOTUSED
;
2470 msi_strcpy_to_awstring(path
, lpPathBuf
, pcchBuf
);
2475 /******************************************************************
2476 * MsiGetComponentPathW [MSI.@]
2478 INSTALLSTATE WINAPI
MsiGetComponentPathW(LPCWSTR szProduct
, LPCWSTR szComponent
,
2479 LPWSTR lpPathBuf
, LPDWORD pcchBuf
)
2483 path
.unicode
= TRUE
;
2484 path
.str
.w
= lpPathBuf
;
2486 return MSI_GetComponentPath( szProduct
, szComponent
, &path
, pcchBuf
);
2489 /******************************************************************
2490 * MsiGetComponentPathA [MSI.@]
2492 INSTALLSTATE WINAPI
MsiGetComponentPathA(LPCSTR szProduct
, LPCSTR szComponent
,
2493 LPSTR lpPathBuf
, LPDWORD pcchBuf
)
2495 LPWSTR szwProduct
, szwComponent
= NULL
;
2496 INSTALLSTATE r
= INSTALLSTATE_UNKNOWN
;
2499 szwProduct
= strdupAtoW( szProduct
);
2500 if( szProduct
&& !szwProduct
)
2503 szwComponent
= strdupAtoW( szComponent
);
2504 if( szComponent
&& !szwComponent
)
2507 path
.unicode
= FALSE
;
2508 path
.str
.a
= lpPathBuf
;
2510 r
= MSI_GetComponentPath( szwProduct
, szwComponent
, &path
, pcchBuf
);
2513 msi_free( szwProduct
);
2514 msi_free( szwComponent
);
2519 /******************************************************************
2520 * MsiQueryFeatureStateA [MSI.@]
2522 INSTALLSTATE WINAPI
MsiQueryFeatureStateA(LPCSTR szProduct
, LPCSTR szFeature
)
2524 LPWSTR szwProduct
= NULL
, szwFeature
= NULL
;
2525 INSTALLSTATE rc
= INSTALLSTATE_UNKNOWN
;
2527 szwProduct
= strdupAtoW( szProduct
);
2528 if ( szProduct
&& !szwProduct
)
2531 szwFeature
= strdupAtoW( szFeature
);
2532 if ( szFeature
&& !szwFeature
)
2535 rc
= MsiQueryFeatureStateW(szwProduct
, szwFeature
);
2538 msi_free( szwProduct
);
2539 msi_free( szwFeature
);
2544 /******************************************************************
2545 * MsiQueryFeatureStateW [MSI.@]
2547 * Checks the state of a feature
2550 * szProduct [I] Product's GUID string
2551 * szFeature [I] Feature's GUID string
2554 * INSTALLSTATE_LOCAL Feature is installed and usable
2555 * INSTALLSTATE_ABSENT Feature is absent
2556 * INSTALLSTATE_ADVERTISED Feature should be installed on demand
2557 * INSTALLSTATE_UNKNOWN An error occurred
2558 * INSTALLSTATE_INVALIDARG One of the GUIDs was invalid
2561 INSTALLSTATE WINAPI
MsiQueryFeatureStateW(LPCWSTR szProduct
, LPCWSTR szFeature
)
2563 WCHAR squishProduct
[33], comp
[GUID_SIZE
];
2565 LPWSTR components
, p
, parent_feature
, path
;
2569 BOOL missing
= FALSE
;
2570 BOOL machine
= FALSE
;
2571 BOOL source
= FALSE
;
2573 TRACE("%s %s\n", debugstr_w(szProduct
), debugstr_w(szFeature
));
2575 if (!szProduct
|| !szFeature
)
2576 return INSTALLSTATE_INVALIDARG
;
2578 if (!squash_guid( szProduct
, squishProduct
))
2579 return INSTALLSTATE_INVALIDARG
;
2581 if (MSIREG_OpenFeaturesKey(szProduct
, MSIINSTALLCONTEXT_USERMANAGED
,
2582 &hkey
, FALSE
) != ERROR_SUCCESS
&&
2583 MSIREG_OpenFeaturesKey(szProduct
, MSIINSTALLCONTEXT_USERUNMANAGED
,
2584 &hkey
, FALSE
) != ERROR_SUCCESS
)
2586 rc
= MSIREG_OpenFeaturesKey(szProduct
, MSIINSTALLCONTEXT_MACHINE
,
2588 if (rc
!= ERROR_SUCCESS
)
2589 return INSTALLSTATE_UNKNOWN
;
2594 parent_feature
= msi_reg_get_val_str( hkey
, szFeature
);
2597 if (!parent_feature
)
2598 return INSTALLSTATE_UNKNOWN
;
2600 r
= (parent_feature
[0] == 6) ? INSTALLSTATE_ABSENT
: INSTALLSTATE_LOCAL
;
2601 msi_free(parent_feature
);
2602 if (r
== INSTALLSTATE_ABSENT
)
2606 rc
= MSIREG_OpenUserDataFeaturesKey(szProduct
,
2607 MSIINSTALLCONTEXT_MACHINE
,
2610 rc
= MSIREG_OpenUserDataFeaturesKey(szProduct
,
2611 MSIINSTALLCONTEXT_USERUNMANAGED
,
2614 if (rc
!= ERROR_SUCCESS
)
2615 return INSTALLSTATE_ADVERTISED
;
2617 components
= msi_reg_get_val_str( hkey
, szFeature
);
2620 TRACE("rc = %d buffer = %s\n", rc
, debugstr_w(components
));
2623 return INSTALLSTATE_ADVERTISED
;
2625 for( p
= components
; *p
&& *p
!= 2 ; p
+= 20)
2627 if (!decode_base85_guid( p
, &guid
))
2629 if (p
!= components
)
2632 msi_free(components
);
2633 return INSTALLSTATE_BADCONFIG
;
2636 StringFromGUID2(&guid
, comp
, GUID_SIZE
);
2639 rc
= MSIREG_OpenUserDataComponentKey(comp
, szLocalSid
, &hkey
, FALSE
);
2641 rc
= MSIREG_OpenUserDataComponentKey(comp
, NULL
, &hkey
, FALSE
);
2643 if (rc
!= ERROR_SUCCESS
)
2645 msi_free(components
);
2646 return INSTALLSTATE_ADVERTISED
;
2649 path
= msi_reg_get_val_str(hkey
, squishProduct
);
2652 else if (lstrlenW(path
) > 2 &&
2653 path
[0] >= '0' && path
[0] <= '9' &&
2654 path
[1] >= '0' && path
[1] <= '9')
2662 TRACE("%s %s -> %d\n", debugstr_w(szProduct
), debugstr_w(szFeature
), r
);
2663 msi_free(components
);
2666 return INSTALLSTATE_ADVERTISED
;
2669 return INSTALLSTATE_SOURCE
;
2671 return INSTALLSTATE_LOCAL
;
2674 /******************************************************************
2675 * MsiGetFileVersionA [MSI.@]
2677 UINT WINAPI
MsiGetFileVersionA(LPCSTR szFilePath
, LPSTR lpVersionBuf
,
2678 LPDWORD pcchVersionBuf
, LPSTR lpLangBuf
, LPDWORD pcchLangBuf
)
2680 LPWSTR szwFilePath
= NULL
, lpwVersionBuff
= NULL
, lpwLangBuff
= NULL
;
2681 UINT ret
= ERROR_OUTOFMEMORY
;
2683 if ((lpVersionBuf
&& !pcchVersionBuf
) ||
2684 (lpLangBuf
&& !pcchLangBuf
))
2685 return ERROR_INVALID_PARAMETER
;
2689 szwFilePath
= strdupAtoW( szFilePath
);
2694 if( lpVersionBuf
&& pcchVersionBuf
&& *pcchVersionBuf
)
2696 lpwVersionBuff
= msi_alloc(*pcchVersionBuf
*sizeof(WCHAR
));
2697 if( !lpwVersionBuff
)
2701 if( lpLangBuf
&& pcchLangBuf
&& *pcchLangBuf
)
2703 lpwLangBuff
= msi_alloc(*pcchLangBuf
*sizeof(WCHAR
));
2708 ret
= MsiGetFileVersionW(szwFilePath
, lpwVersionBuff
, pcchVersionBuf
,
2709 lpwLangBuff
, pcchLangBuf
);
2711 if( (ret
== ERROR_SUCCESS
|| ret
== ERROR_MORE_DATA
) && lpwVersionBuff
)
2712 WideCharToMultiByte(CP_ACP
, 0, lpwVersionBuff
, -1,
2713 lpVersionBuf
, *pcchVersionBuf
+ 1, NULL
, NULL
);
2714 if( (ret
== ERROR_SUCCESS
|| ret
== ERROR_MORE_DATA
) && lpwLangBuff
)
2715 WideCharToMultiByte(CP_ACP
, 0, lpwLangBuff
, -1,
2716 lpLangBuf
, *pcchLangBuf
+ 1, NULL
, NULL
);
2719 msi_free(szwFilePath
);
2720 msi_free(lpwVersionBuff
);
2721 msi_free(lpwLangBuff
);
2726 /******************************************************************
2727 * MsiGetFileVersionW [MSI.@]
2729 UINT WINAPI
MsiGetFileVersionW(LPCWSTR szFilePath
, LPWSTR lpVersionBuf
,
2730 LPDWORD pcchVersionBuf
, LPWSTR lpLangBuf
, LPDWORD pcchLangBuf
)
2732 static const WCHAR szVersionResource
[] = {'\\',0};
2733 static const WCHAR szVersionFormat
[] = {
2734 '%','d','.','%','d','.','%','d','.','%','d',0};
2735 static const WCHAR szLangResource
[] = {
2736 '\\','V','a','r','F','i','l','e','I','n','f','o','\\',
2737 'T','r','a','n','s','l','a','t','i','o','n',0};
2738 static const WCHAR szLangFormat
[] = {'%','d',0};
2740 DWORD dwVerLen
, gle
;
2741 LPVOID lpVer
= NULL
;
2742 VS_FIXEDFILEINFO
*ffi
;
2747 TRACE("%s %p %d %p %d\n", debugstr_w(szFilePath
),
2748 lpVersionBuf
, pcchVersionBuf
?*pcchVersionBuf
:0,
2749 lpLangBuf
, pcchLangBuf
?*pcchLangBuf
:0);
2751 if ((lpVersionBuf
&& !pcchVersionBuf
) ||
2752 (lpLangBuf
&& !pcchLangBuf
))
2753 return ERROR_INVALID_PARAMETER
;
2755 dwVerLen
= GetFileVersionInfoSizeW(szFilePath
, NULL
);
2758 gle
= GetLastError();
2759 if (gle
== ERROR_BAD_PATHNAME
)
2760 return ERROR_FILE_NOT_FOUND
;
2761 else if (gle
== ERROR_RESOURCE_DATA_NOT_FOUND
)
2762 return ERROR_FILE_INVALID
;
2767 lpVer
= msi_alloc(dwVerLen
);
2770 ret
= ERROR_OUTOFMEMORY
;
2774 if( !GetFileVersionInfoW(szFilePath
, 0, dwVerLen
, lpVer
) )
2776 ret
= GetLastError();
2782 if( VerQueryValueW(lpVer
, szVersionResource
, (LPVOID
*)&ffi
, &puLen
) &&
2785 wsprintfW(tmp
, szVersionFormat
,
2786 HIWORD(ffi
->dwFileVersionMS
), LOWORD(ffi
->dwFileVersionMS
),
2787 HIWORD(ffi
->dwFileVersionLS
), LOWORD(ffi
->dwFileVersionLS
));
2788 if (lpVersionBuf
) lstrcpynW(lpVersionBuf
, tmp
, *pcchVersionBuf
);
2790 if (strlenW(tmp
) >= *pcchVersionBuf
)
2791 ret
= ERROR_MORE_DATA
;
2793 *pcchVersionBuf
= lstrlenW(tmp
);
2797 if (lpVersionBuf
) *lpVersionBuf
= 0;
2798 *pcchVersionBuf
= 0;
2804 if (VerQueryValueW(lpVer
, szLangResource
, (LPVOID
*)&lang
, &puLen
) &&
2807 wsprintfW(tmp
, szLangFormat
, *lang
);
2808 if (lpLangBuf
) lstrcpynW(lpLangBuf
, tmp
, *pcchLangBuf
);
2810 if (strlenW(tmp
) >= *pcchLangBuf
)
2811 ret
= ERROR_MORE_DATA
;
2813 *pcchLangBuf
= lstrlenW(tmp
);
2817 if (lpLangBuf
) *lpLangBuf
= 0;
2827 /***********************************************************************
2828 * MsiGetFeatureUsageW [MSI.@]
2830 UINT WINAPI
MsiGetFeatureUsageW( LPCWSTR szProduct
, LPCWSTR szFeature
,
2831 LPDWORD pdwUseCount
, LPWORD pwDateUsed
)
2833 FIXME("%s %s %p %p\n",debugstr_w(szProduct
), debugstr_w(szFeature
),
2834 pdwUseCount
, pwDateUsed
);
2835 return ERROR_CALL_NOT_IMPLEMENTED
;
2838 /***********************************************************************
2839 * MsiGetFeatureUsageA [MSI.@]
2841 UINT WINAPI
MsiGetFeatureUsageA( LPCSTR szProduct
, LPCSTR szFeature
,
2842 LPDWORD pdwUseCount
, LPWORD pwDateUsed
)
2844 LPWSTR prod
= NULL
, feat
= NULL
;
2845 UINT ret
= ERROR_OUTOFMEMORY
;
2847 TRACE("%s %s %p %p\n", debugstr_a(szProduct
), debugstr_a(szFeature
),
2848 pdwUseCount
, pwDateUsed
);
2850 prod
= strdupAtoW( szProduct
);
2851 if (szProduct
&& !prod
)
2854 feat
= strdupAtoW( szFeature
);
2855 if (szFeature
&& !feat
)
2858 ret
= MsiGetFeatureUsageW( prod
, feat
, pdwUseCount
, pwDateUsed
);
2867 /***********************************************************************
2868 * MsiUseFeatureExW [MSI.@]
2870 INSTALLSTATE WINAPI
MsiUseFeatureExW( LPCWSTR szProduct
, LPCWSTR szFeature
,
2871 DWORD dwInstallMode
, DWORD dwReserved
)
2875 TRACE("%s %s %i %i\n", debugstr_w(szProduct
), debugstr_w(szFeature
),
2876 dwInstallMode
, dwReserved
);
2878 state
= MsiQueryFeatureStateW( szProduct
, szFeature
);
2881 return INSTALLSTATE_INVALIDARG
;
2883 if (state
== INSTALLSTATE_LOCAL
&& dwInstallMode
!= INSTALLMODE_NODETECTION
)
2885 FIXME("mark product %s feature %s as used\n",
2886 debugstr_w(szProduct
), debugstr_w(szFeature
) );
2892 /***********************************************************************
2893 * MsiUseFeatureExA [MSI.@]
2895 INSTALLSTATE WINAPI
MsiUseFeatureExA( LPCSTR szProduct
, LPCSTR szFeature
,
2896 DWORD dwInstallMode
, DWORD dwReserved
)
2898 INSTALLSTATE ret
= INSTALLSTATE_UNKNOWN
;
2899 LPWSTR prod
= NULL
, feat
= NULL
;
2901 TRACE("%s %s %i %i\n", debugstr_a(szProduct
), debugstr_a(szFeature
),
2902 dwInstallMode
, dwReserved
);
2904 prod
= strdupAtoW( szProduct
);
2905 if (szProduct
&& !prod
)
2908 feat
= strdupAtoW( szFeature
);
2909 if (szFeature
&& !feat
)
2912 ret
= MsiUseFeatureExW( prod
, feat
, dwInstallMode
, dwReserved
);
2921 /***********************************************************************
2922 * MsiUseFeatureW [MSI.@]
2924 INSTALLSTATE WINAPI
MsiUseFeatureW( LPCWSTR szProduct
, LPCWSTR szFeature
)
2926 return MsiUseFeatureExW(szProduct
, szFeature
, 0, 0);
2929 /***********************************************************************
2930 * MsiUseFeatureA [MSI.@]
2932 INSTALLSTATE WINAPI
MsiUseFeatureA( LPCSTR szProduct
, LPCSTR szFeature
)
2934 return MsiUseFeatureExA(szProduct
, szFeature
, 0, 0);
2937 /***********************************************************************
2938 * MSI_ProvideQualifiedComponentEx [internal]
2940 static UINT
MSI_ProvideQualifiedComponentEx(LPCWSTR szComponent
,
2941 LPCWSTR szQualifier
, DWORD dwInstallMode
, LPCWSTR szProduct
,
2942 DWORD Unused1
, DWORD Unused2
, awstring
*lpPathBuf
,
2943 LPDWORD pcchPathBuf
)
2945 WCHAR product
[MAX_FEATURE_CHARS
+1], component
[MAX_FEATURE_CHARS
+1],
2946 feature
[MAX_FEATURE_CHARS
+1];
2952 TRACE("%s %s %i %s %i %i %p %p\n", debugstr_w(szComponent
),
2953 debugstr_w(szQualifier
), dwInstallMode
, debugstr_w(szProduct
),
2954 Unused1
, Unused2
, lpPathBuf
, pcchPathBuf
);
2956 rc
= MSIREG_OpenUserComponentsKey(szComponent
, &hkey
, FALSE
);
2957 if (rc
!= ERROR_SUCCESS
)
2958 return ERROR_INDEX_ABSENT
;
2960 info
= msi_reg_get_val_str( hkey
, szQualifier
);
2964 return ERROR_INDEX_ABSENT
;
2966 MsiDecomposeDescriptorW(info
, product
, feature
, component
, &sz
);
2969 rc
= MSI_GetComponentPath(product
, component
, lpPathBuf
, pcchPathBuf
);
2971 rc
= MSI_GetComponentPath(szProduct
, component
, lpPathBuf
, pcchPathBuf
);
2975 if (rc
!= INSTALLSTATE_LOCAL
)
2976 return ERROR_FILE_NOT_FOUND
;
2978 return ERROR_SUCCESS
;
2981 /***********************************************************************
2982 * MsiProvideQualifiedComponentExW [MSI.@]
2984 UINT WINAPI
MsiProvideQualifiedComponentExW(LPCWSTR szComponent
,
2985 LPCWSTR szQualifier
, DWORD dwInstallMode
, LPCWSTR szProduct
,
2986 DWORD Unused1
, DWORD Unused2
, LPWSTR lpPathBuf
,
2987 LPDWORD pcchPathBuf
)
2991 path
.unicode
= TRUE
;
2992 path
.str
.w
= lpPathBuf
;
2994 return MSI_ProvideQualifiedComponentEx(szComponent
, szQualifier
,
2995 dwInstallMode
, szProduct
, Unused1
, Unused2
, &path
, pcchPathBuf
);
2998 /***********************************************************************
2999 * MsiProvideQualifiedComponentExA [MSI.@]
3001 UINT WINAPI
MsiProvideQualifiedComponentExA(LPCSTR szComponent
,
3002 LPCSTR szQualifier
, DWORD dwInstallMode
, LPCSTR szProduct
,
3003 DWORD Unused1
, DWORD Unused2
, LPSTR lpPathBuf
,
3004 LPDWORD pcchPathBuf
)
3006 LPWSTR szwComponent
, szwQualifier
= NULL
, szwProduct
= NULL
;
3007 UINT r
= ERROR_OUTOFMEMORY
;
3010 TRACE("%s %s %u %s %u %u %p %p\n", debugstr_a(szComponent
),
3011 debugstr_a(szQualifier
), dwInstallMode
, debugstr_a(szProduct
),
3012 Unused1
, Unused2
, lpPathBuf
, pcchPathBuf
);
3014 szwComponent
= strdupAtoW( szComponent
);
3015 if (szComponent
&& !szwComponent
)
3018 szwQualifier
= strdupAtoW( szQualifier
);
3019 if (szQualifier
&& !szwQualifier
)
3022 szwProduct
= strdupAtoW( szProduct
);
3023 if (szProduct
&& !szwProduct
)
3026 path
.unicode
= FALSE
;
3027 path
.str
.a
= lpPathBuf
;
3029 r
= MSI_ProvideQualifiedComponentEx(szwComponent
, szwQualifier
,
3030 dwInstallMode
, szwProduct
, Unused1
,
3031 Unused2
, &path
, pcchPathBuf
);
3033 msi_free(szwProduct
);
3034 msi_free(szwComponent
);
3035 msi_free(szwQualifier
);
3040 /***********************************************************************
3041 * MsiProvideQualifiedComponentW [MSI.@]
3043 UINT WINAPI
MsiProvideQualifiedComponentW( LPCWSTR szComponent
,
3044 LPCWSTR szQualifier
, DWORD dwInstallMode
, LPWSTR lpPathBuf
,
3045 LPDWORD pcchPathBuf
)
3047 return MsiProvideQualifiedComponentExW(szComponent
, szQualifier
,
3048 dwInstallMode
, NULL
, 0, 0, lpPathBuf
, pcchPathBuf
);
3051 /***********************************************************************
3052 * MsiProvideQualifiedComponentA [MSI.@]
3054 UINT WINAPI
MsiProvideQualifiedComponentA( LPCSTR szComponent
,
3055 LPCSTR szQualifier
, DWORD dwInstallMode
, LPSTR lpPathBuf
,
3056 LPDWORD pcchPathBuf
)
3058 return MsiProvideQualifiedComponentExA(szComponent
, szQualifier
,
3059 dwInstallMode
, NULL
, 0, 0, lpPathBuf
, pcchPathBuf
);
3062 /***********************************************************************
3063 * MSI_GetUserInfo [internal]
3065 static USERINFOSTATE
MSI_GetUserInfo(LPCWSTR szProduct
,
3066 awstring
*lpUserNameBuf
, LPDWORD pcchUserNameBuf
,
3067 awstring
*lpOrgNameBuf
, LPDWORD pcchOrgNameBuf
,
3068 awstring
*lpSerialBuf
, LPDWORD pcchSerialBuf
)
3070 WCHAR squished_pc
[SQUISH_GUID_SIZE
];
3071 LPWSTR user
, org
, serial
;
3072 USERINFOSTATE state
;
3077 TRACE("%s %p %p %p %p %p %p\n", debugstr_w(szProduct
), lpUserNameBuf
,
3078 pcchUserNameBuf
, lpOrgNameBuf
, pcchOrgNameBuf
, lpSerialBuf
,
3081 if (!szProduct
|| !squash_guid(szProduct
, squished_pc
))
3082 return USERINFOSTATE_INVALIDARG
;
3084 if (MSIREG_OpenProductKey(szProduct
, NULL
, MSIINSTALLCONTEXT_USERMANAGED
,
3085 &hkey
, FALSE
) != ERROR_SUCCESS
&&
3086 MSIREG_OpenProductKey(szProduct
, NULL
, MSIINSTALLCONTEXT_USERUNMANAGED
,
3087 &hkey
, FALSE
) != ERROR_SUCCESS
&&
3088 MSIREG_OpenProductKey(szProduct
, NULL
, MSIINSTALLCONTEXT_MACHINE
,
3089 &hkey
, FALSE
) != ERROR_SUCCESS
)
3091 return USERINFOSTATE_UNKNOWN
;
3094 if (MSIREG_OpenInstallProps(szProduct
, MSIINSTALLCONTEXT_USERUNMANAGED
,
3095 NULL
, &props
, FALSE
) != ERROR_SUCCESS
&&
3096 MSIREG_OpenInstallProps(szProduct
, MSIINSTALLCONTEXT_MACHINE
,
3097 NULL
, &props
, FALSE
) != ERROR_SUCCESS
)
3100 return USERINFOSTATE_ABSENT
;
3103 user
= msi_reg_get_val_str(props
, INSTALLPROPERTY_REGOWNERW
);
3104 org
= msi_reg_get_val_str(props
, INSTALLPROPERTY_REGCOMPANYW
);
3105 serial
= msi_reg_get_val_str(props
, INSTALLPROPERTY_PRODUCTIDW
);
3106 state
= USERINFOSTATE_ABSENT
;
3112 state
= USERINFOSTATE_PRESENT
;
3114 if (pcchUserNameBuf
)
3116 if (lpUserNameBuf
&& !user
)
3118 (*pcchUserNameBuf
)--;
3122 r
= msi_strcpy_to_awstring(user
, lpUserNameBuf
, pcchUserNameBuf
);
3123 if (r
== ERROR_MORE_DATA
)
3125 state
= USERINFOSTATE_MOREDATA
;
3133 if (!orgptr
) orgptr
= szEmpty
;
3135 r
= msi_strcpy_to_awstring(orgptr
, lpOrgNameBuf
, pcchOrgNameBuf
);
3136 if (r
== ERROR_MORE_DATA
)
3138 state
= USERINFOSTATE_MOREDATA
;
3151 r
= msi_strcpy_to_awstring(serial
, lpSerialBuf
, pcchSerialBuf
);
3152 if (r
== ERROR_MORE_DATA
)
3153 state
= USERINFOSTATE_MOREDATA
;
3164 /***********************************************************************
3165 * MsiGetUserInfoW [MSI.@]
3167 USERINFOSTATE WINAPI
MsiGetUserInfoW(LPCWSTR szProduct
,
3168 LPWSTR lpUserNameBuf
, LPDWORD pcchUserNameBuf
,
3169 LPWSTR lpOrgNameBuf
, LPDWORD pcchOrgNameBuf
,
3170 LPWSTR lpSerialBuf
, LPDWORD pcchSerialBuf
)
3172 awstring user
, org
, serial
;
3174 if ((lpUserNameBuf
&& !pcchUserNameBuf
) ||
3175 (lpOrgNameBuf
&& !pcchOrgNameBuf
) ||
3176 (lpSerialBuf
&& !pcchSerialBuf
))
3177 return USERINFOSTATE_INVALIDARG
;
3179 user
.unicode
= TRUE
;
3180 user
.str
.w
= lpUserNameBuf
;
3182 org
.str
.w
= lpOrgNameBuf
;
3183 serial
.unicode
= TRUE
;
3184 serial
.str
.w
= lpSerialBuf
;
3186 return MSI_GetUserInfo( szProduct
, &user
, pcchUserNameBuf
,
3187 &org
, pcchOrgNameBuf
,
3188 &serial
, pcchSerialBuf
);
3191 USERINFOSTATE WINAPI
MsiGetUserInfoA(LPCSTR szProduct
,
3192 LPSTR lpUserNameBuf
, LPDWORD pcchUserNameBuf
,
3193 LPSTR lpOrgNameBuf
, LPDWORD pcchOrgNameBuf
,
3194 LPSTR lpSerialBuf
, LPDWORD pcchSerialBuf
)
3196 awstring user
, org
, serial
;
3200 if ((lpUserNameBuf
&& !pcchUserNameBuf
) ||
3201 (lpOrgNameBuf
&& !pcchOrgNameBuf
) ||
3202 (lpSerialBuf
&& !pcchSerialBuf
))
3203 return USERINFOSTATE_INVALIDARG
;
3205 prod
= strdupAtoW( szProduct
);
3206 if (szProduct
&& !prod
)
3207 return ERROR_OUTOFMEMORY
;
3209 user
.unicode
= FALSE
;
3210 user
.str
.a
= lpUserNameBuf
;
3211 org
.unicode
= FALSE
;
3212 org
.str
.a
= lpOrgNameBuf
;
3213 serial
.unicode
= FALSE
;
3214 serial
.str
.a
= lpSerialBuf
;
3216 r
= MSI_GetUserInfo( prod
, &user
, pcchUserNameBuf
,
3217 &org
, pcchOrgNameBuf
,
3218 &serial
, pcchSerialBuf
);
3225 UINT WINAPI
MsiCollectUserInfoW(LPCWSTR szProduct
)
3229 MSIPACKAGE
*package
;
3230 static const WCHAR szFirstRun
[] = {'F','i','r','s','t','R','u','n',0};
3232 TRACE("(%s)\n",debugstr_w(szProduct
));
3234 rc
= MsiOpenProductW(szProduct
,&handle
);
3235 if (rc
!= ERROR_SUCCESS
)
3236 return ERROR_INVALID_PARAMETER
;
3238 /* MsiCollectUserInfo cannot be called from a custom action. */
3239 package
= msihandle2msiinfo(handle
, MSIHANDLETYPE_PACKAGE
);
3241 return ERROR_CALL_NOT_IMPLEMENTED
;
3243 rc
= ACTION_PerformUIAction(package
, szFirstRun
, -1);
3244 msiobj_release( &package
->hdr
);
3246 MsiCloseHandle(handle
);
3251 UINT WINAPI
MsiCollectUserInfoA(LPCSTR szProduct
)
3255 MSIPACKAGE
*package
;
3256 static const WCHAR szFirstRun
[] = {'F','i','r','s','t','R','u','n',0};
3258 TRACE("(%s)\n",debugstr_a(szProduct
));
3260 rc
= MsiOpenProductA(szProduct
,&handle
);
3261 if (rc
!= ERROR_SUCCESS
)
3262 return ERROR_INVALID_PARAMETER
;
3264 /* MsiCollectUserInfo cannot be called from a custom action. */
3265 package
= msihandle2msiinfo(handle
, MSIHANDLETYPE_PACKAGE
);
3267 return ERROR_CALL_NOT_IMPLEMENTED
;
3269 rc
= ACTION_PerformUIAction(package
, szFirstRun
, -1);
3270 msiobj_release( &package
->hdr
);
3272 MsiCloseHandle(handle
);
3277 /***********************************************************************
3278 * MsiConfigureFeatureA [MSI.@]
3280 UINT WINAPI
MsiConfigureFeatureA(LPCSTR szProduct
, LPCSTR szFeature
, INSTALLSTATE eInstallState
)
3282 LPWSTR prod
, feat
= NULL
;
3283 UINT r
= ERROR_OUTOFMEMORY
;
3285 TRACE("%s %s %i\n", debugstr_a(szProduct
), debugstr_a(szFeature
), eInstallState
);
3287 prod
= strdupAtoW( szProduct
);
3288 if (szProduct
&& !prod
)
3291 feat
= strdupAtoW( szFeature
);
3292 if (szFeature
&& !feat
)
3295 r
= MsiConfigureFeatureW(prod
, feat
, eInstallState
);
3304 /***********************************************************************
3305 * MsiConfigureFeatureW [MSI.@]
3307 UINT WINAPI
MsiConfigureFeatureW(LPCWSTR szProduct
, LPCWSTR szFeature
, INSTALLSTATE eInstallState
)
3309 static const WCHAR szCostInit
[] = { 'C','o','s','t','I','n','i','t','i','a','l','i','z','e',0 };
3310 MSIPACKAGE
*package
= NULL
;
3312 WCHAR sourcepath
[MAX_PATH
], filename
[MAX_PATH
];
3315 TRACE("%s %s %i\n", debugstr_w(szProduct
), debugstr_w(szFeature
), eInstallState
);
3317 if (!szProduct
|| !szFeature
)
3318 return ERROR_INVALID_PARAMETER
;
3320 switch (eInstallState
)
3322 case INSTALLSTATE_DEFAULT
:
3323 /* FIXME: how do we figure out the default location? */
3324 eInstallState
= INSTALLSTATE_LOCAL
;
3326 case INSTALLSTATE_LOCAL
:
3327 case INSTALLSTATE_SOURCE
:
3328 case INSTALLSTATE_ABSENT
:
3329 case INSTALLSTATE_ADVERTISED
:
3332 return ERROR_INVALID_PARAMETER
;
3335 r
= MSI_OpenProductW( szProduct
, &package
);
3336 if (r
!= ERROR_SUCCESS
)
3339 sz
= sizeof(sourcepath
);
3340 MsiSourceListGetInfoW(szProduct
, NULL
, MSIINSTALLCONTEXT_USERUNMANAGED
,
3341 MSICODE_PRODUCT
, INSTALLPROPERTY_LASTUSEDSOURCEW
, sourcepath
, &sz
);
3343 sz
= sizeof(filename
);
3344 MsiSourceListGetInfoW(szProduct
, NULL
, MSIINSTALLCONTEXT_USERUNMANAGED
,
3345 MSICODE_PRODUCT
, INSTALLPROPERTY_PACKAGENAMEW
, filename
, &sz
);
3347 lstrcatW( sourcepath
, filename
);
3349 MsiSetInternalUI( INSTALLUILEVEL_BASIC
, NULL
);
3351 r
= ACTION_PerformUIAction( package
, szCostInit
, -1 );
3352 if (r
!= ERROR_SUCCESS
)
3355 r
= MSI_SetFeatureStateW( package
, szFeature
, eInstallState
);
3356 if (r
!= ERROR_SUCCESS
)
3359 r
= MSI_InstallPackage( package
, sourcepath
, NULL
);
3362 msiobj_release( &package
->hdr
);
3367 /***********************************************************************
3368 * MsiCreateAndVerifyInstallerDirectory [MSI.@]
3370 * Notes: undocumented
3372 UINT WINAPI
MsiCreateAndVerifyInstallerDirectory(DWORD dwReserved
)
3374 WCHAR path
[MAX_PATH
];
3376 TRACE("%d\n", dwReserved
);
3380 FIXME("dwReserved=%d\n", dwReserved
);
3381 return ERROR_INVALID_PARAMETER
;
3384 if (!GetWindowsDirectoryW(path
, MAX_PATH
))
3385 return ERROR_FUNCTION_FAILED
;
3387 lstrcatW(path
, installerW
);
3389 if (!CreateDirectoryW(path
, NULL
))
3390 return ERROR_FUNCTION_FAILED
;
3392 return ERROR_SUCCESS
;
3395 /***********************************************************************
3396 * MsiGetShortcutTargetA [MSI.@]
3398 UINT WINAPI
MsiGetShortcutTargetA( LPCSTR szShortcutTarget
,
3399 LPSTR szProductCode
, LPSTR szFeatureId
,
3400 LPSTR szComponentCode
)
3403 const int len
= MAX_FEATURE_CHARS
+1;
3404 WCHAR product
[MAX_FEATURE_CHARS
+1], feature
[MAX_FEATURE_CHARS
+1], component
[MAX_FEATURE_CHARS
+1];
3407 target
= strdupAtoW( szShortcutTarget
);
3408 if (szShortcutTarget
&& !target
)
3409 return ERROR_OUTOFMEMORY
;
3413 r
= MsiGetShortcutTargetW( target
, product
, feature
, component
);
3415 if (r
== ERROR_SUCCESS
)
3417 WideCharToMultiByte( CP_ACP
, 0, product
, -1, szProductCode
, len
, NULL
, NULL
);
3418 WideCharToMultiByte( CP_ACP
, 0, feature
, -1, szFeatureId
, len
, NULL
, NULL
);
3419 WideCharToMultiByte( CP_ACP
, 0, component
, -1, szComponentCode
, len
, NULL
, NULL
);
3424 /***********************************************************************
3425 * MsiGetShortcutTargetW [MSI.@]
3427 UINT WINAPI
MsiGetShortcutTargetW( LPCWSTR szShortcutTarget
,
3428 LPWSTR szProductCode
, LPWSTR szFeatureId
,
3429 LPWSTR szComponentCode
)
3431 IShellLinkDataList
*dl
= NULL
;
3432 IPersistFile
*pf
= NULL
;
3433 LPEXP_DARWIN_LINK darwin
= NULL
;
3436 TRACE("%s %p %p %p\n", debugstr_w(szShortcutTarget
),
3437 szProductCode
, szFeatureId
, szComponentCode
);
3439 init
= CoInitialize(NULL
);
3441 r
= CoCreateInstance( &CLSID_ShellLink
, NULL
, CLSCTX_INPROC_SERVER
,
3442 &IID_IPersistFile
, (LPVOID
*) &pf
);
3443 if( SUCCEEDED( r
) )
3445 r
= IPersistFile_Load( pf
, szShortcutTarget
,
3446 STGM_READ
| STGM_SHARE_DENY_WRITE
);
3447 if( SUCCEEDED( r
) )
3449 r
= IPersistFile_QueryInterface( pf
, &IID_IShellLinkDataList
,
3451 if( SUCCEEDED( r
) )
3453 IShellLinkDataList_CopyDataBlock( dl
, EXP_DARWIN_ID_SIG
,
3455 IShellLinkDataList_Release( dl
);
3458 IPersistFile_Release( pf
);
3461 if (SUCCEEDED(init
))
3464 TRACE("darwin = %p\n", darwin
);
3471 ret
= MsiDecomposeDescriptorW( darwin
->szwDarwinID
,
3472 szProductCode
, szFeatureId
, szComponentCode
, &sz
);
3473 LocalFree( darwin
);
3477 return ERROR_FUNCTION_FAILED
;
3480 UINT WINAPI
MsiReinstallFeatureW( LPCWSTR szProduct
, LPCWSTR szFeature
,
3481 DWORD dwReinstallMode
)
3483 MSIPACKAGE
* package
= NULL
;
3485 WCHAR sourcepath
[MAX_PATH
];
3486 WCHAR filename
[MAX_PATH
];
3487 static const WCHAR szLogVerbose
[] = {
3488 ' ','L','O','G','V','E','R','B','O','S','E',0 };
3489 WCHAR reinstallmode
[11];
3493 FIXME("%s %s %i\n", debugstr_w(szProduct
), debugstr_w(szFeature
),
3496 ptr
= reinstallmode
;
3498 if (dwReinstallMode
& REINSTALLMODE_FILEMISSING
)
3500 if (dwReinstallMode
& REINSTALLMODE_FILEOLDERVERSION
)
3502 if (dwReinstallMode
& REINSTALLMODE_FILEEQUALVERSION
)
3504 if (dwReinstallMode
& REINSTALLMODE_FILEEXACT
)
3506 if (dwReinstallMode
& REINSTALLMODE_FILEVERIFY
)
3508 if (dwReinstallMode
& REINSTALLMODE_FILEREPLACE
)
3510 if (dwReinstallMode
& REINSTALLMODE_USERDATA
)
3512 if (dwReinstallMode
& REINSTALLMODE_MACHINEDATA
)
3514 if (dwReinstallMode
& REINSTALLMODE_SHORTCUT
)
3516 if (dwReinstallMode
& REINSTALLMODE_PACKAGE
)
3520 sz
= sizeof(sourcepath
);
3521 MsiSourceListGetInfoW(szProduct
, NULL
, MSIINSTALLCONTEXT_USERUNMANAGED
,
3522 MSICODE_PRODUCT
, INSTALLPROPERTY_LASTUSEDSOURCEW
, sourcepath
, &sz
);
3524 sz
= sizeof(filename
);
3525 MsiSourceListGetInfoW(szProduct
, NULL
, MSIINSTALLCONTEXT_USERUNMANAGED
,
3526 MSICODE_PRODUCT
, INSTALLPROPERTY_PACKAGENAMEW
, filename
, &sz
);
3528 lstrcatW( sourcepath
, filename
);
3530 if (dwReinstallMode
& REINSTALLMODE_PACKAGE
)
3531 r
= MSI_OpenPackageW( sourcepath
, &package
);
3533 r
= MSI_OpenProductW( szProduct
, &package
);
3535 if (r
!= ERROR_SUCCESS
)
3538 MSI_SetPropertyW( package
, szReinstallMode
, reinstallmode
);
3539 MSI_SetPropertyW( package
, szInstalled
, szOne
);
3540 MSI_SetPropertyW( package
, szLogVerbose
, szOne
);
3541 MSI_SetPropertyW( package
, szReinstall
, szFeature
);
3543 r
= MSI_InstallPackage( package
, sourcepath
, NULL
);
3545 msiobj_release( &package
->hdr
);
3550 UINT WINAPI
MsiReinstallFeatureA( LPCSTR szProduct
, LPCSTR szFeature
,
3551 DWORD dwReinstallMode
)
3557 TRACE("%s %s %i\n", debugstr_a(szProduct
), debugstr_a(szFeature
),
3560 wszProduct
= strdupAtoW(szProduct
);
3561 wszFeature
= strdupAtoW(szFeature
);
3563 rc
= MsiReinstallFeatureW(wszProduct
, wszFeature
, dwReinstallMode
);
3565 msi_free(wszProduct
);
3566 msi_free(wszFeature
);
3573 unsigned int buf
[4];
3574 unsigned char in
[64];
3575 unsigned char digest
[16];
3578 extern VOID WINAPI
MD5Init( MD5_CTX
*);
3579 extern VOID WINAPI
MD5Update( MD5_CTX
*, const unsigned char *, unsigned int );
3580 extern VOID WINAPI
MD5Final( MD5_CTX
*);
3582 /***********************************************************************
3583 * MsiGetFileHashW [MSI.@]
3585 UINT WINAPI
MsiGetFileHashW( LPCWSTR szFilePath
, DWORD dwOptions
,
3586 PMSIFILEHASHINFO pHash
)
3588 HANDLE handle
, mapping
;
3591 UINT r
= ERROR_FUNCTION_FAILED
;
3593 TRACE("%s %08x %p\n", debugstr_w(szFilePath
), dwOptions
, pHash
);
3596 return ERROR_INVALID_PARAMETER
;
3599 return ERROR_PATH_NOT_FOUND
;
3602 return ERROR_INVALID_PARAMETER
;
3604 return ERROR_INVALID_PARAMETER
;
3605 if (pHash
->dwFileHashInfoSize
< sizeof *pHash
)
3606 return ERROR_INVALID_PARAMETER
;
3608 handle
= CreateFileW( szFilePath
, GENERIC_READ
,
3609 FILE_SHARE_READ
| FILE_SHARE_DELETE
, NULL
, OPEN_EXISTING
, 0, NULL
);
3610 if (handle
== INVALID_HANDLE_VALUE
)
3611 return ERROR_FILE_NOT_FOUND
;
3613 length
= GetFileSize( handle
, NULL
);
3615 mapping
= CreateFileMappingW( handle
, NULL
, PAGE_READONLY
, 0, 0, NULL
);
3618 p
= MapViewOfFile( mapping
, FILE_MAP_READ
, 0, 0, length
);
3624 MD5Update( &ctx
, p
, length
);
3626 UnmapViewOfFile( p
);
3628 memcpy( pHash
->dwData
, ctx
.digest
, sizeof pHash
->dwData
);
3631 CloseHandle( mapping
);
3633 CloseHandle( handle
);
3638 /***********************************************************************
3639 * MsiGetFileHashA [MSI.@]
3641 UINT WINAPI
MsiGetFileHashA( LPCSTR szFilePath
, DWORD dwOptions
,
3642 PMSIFILEHASHINFO pHash
)
3647 TRACE("%s %08x %p\n", debugstr_a(szFilePath
), dwOptions
, pHash
);
3649 file
= strdupAtoW( szFilePath
);
3650 if (szFilePath
&& !file
)
3651 return ERROR_OUTOFMEMORY
;
3653 r
= MsiGetFileHashW( file
, dwOptions
, pHash
);
3658 /***********************************************************************
3659 * MsiAdvertiseScriptW [MSI.@]
3661 UINT WINAPI
MsiAdvertiseScriptW( LPCWSTR szScriptFile
, DWORD dwFlags
,
3662 PHKEY phRegData
, BOOL fRemoveItems
)
3664 FIXME("%s %08x %p %d\n",
3665 debugstr_w( szScriptFile
), dwFlags
, phRegData
, fRemoveItems
);
3666 return ERROR_CALL_NOT_IMPLEMENTED
;
3669 /***********************************************************************
3670 * MsiAdvertiseScriptA [MSI.@]
3672 UINT WINAPI
MsiAdvertiseScriptA( LPCSTR szScriptFile
, DWORD dwFlags
,
3673 PHKEY phRegData
, BOOL fRemoveItems
)
3675 FIXME("%s %08x %p %d\n",
3676 debugstr_a( szScriptFile
), dwFlags
, phRegData
, fRemoveItems
);
3677 return ERROR_CALL_NOT_IMPLEMENTED
;
3680 /***********************************************************************
3681 * MsiIsProductElevatedW [MSI.@]
3683 UINT WINAPI
MsiIsProductElevatedW( LPCWSTR szProduct
, BOOL
*pfElevated
)
3685 FIXME("%s %p - stub\n",
3686 debugstr_w( szProduct
), pfElevated
);
3688 return ERROR_SUCCESS
;
3691 /***********************************************************************
3692 * MsiIsProductElevatedA [MSI.@]
3694 UINT WINAPI
MsiIsProductElevatedA( LPCSTR szProduct
, BOOL
*pfElevated
)
3696 FIXME("%s %p - stub\n",
3697 debugstr_a( szProduct
), pfElevated
);
3699 return ERROR_SUCCESS
;
3702 /***********************************************************************
3703 * MsiSetExternalUIRecord [MSI.@]
3705 UINT WINAPI
MsiSetExternalUIRecord( INSTALLUI_HANDLER_RECORD handler
,
3706 DWORD filter
, LPVOID context
,
3707 PINSTALLUI_HANDLER_RECORD prev
)
3709 TRACE("%p %08x %p %p\n", handler
, filter
, context
, prev
);
3712 *prev
= gUIHandlerRecord
;
3714 gUIHandlerRecord
= handler
;
3716 gUIContext
= context
;
3718 return ERROR_SUCCESS
;
3721 /***********************************************************************
3722 * MsiInstallMissingComponentW [MSI.@]
3724 UINT WINAPI
MsiInstallMissingComponentW(LPCWSTR szProduct
, LPCWSTR szComponent
, INSTALLSTATE eInstallState
)
3726 FIXME("(%s %s %d\n", debugstr_w(szProduct
), debugstr_w(szComponent
), eInstallState
);
3727 return ERROR_SUCCESS
;