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
24 #define NONAMELESSUNION
31 #include "wine/debug.h"
38 #include "wine/unicode.h"
41 WINE_DEFAULT_DEBUG_CHANNEL(msi);
44 * These apis are defined in MSI 3.0
47 typedef struct tagMediaInfo
55 static UINT OpenSourceKey(LPCWSTR szProduct, HKEY* key, DWORD dwOptions,
56 MSIINSTALLCONTEXT context, BOOL create)
59 UINT rc = ERROR_FUNCTION_FAILED;
61 if (context == MSIINSTALLCONTEXT_USERUNMANAGED)
63 if (dwOptions & MSICODE_PATCH)
64 rc = MSIREG_OpenUserPatchesKey(szProduct, &rootkey, create);
66 rc = MSIREG_OpenProductKey(szProduct, NULL, context,
69 else if (context == MSIINSTALLCONTEXT_USERMANAGED)
71 if (dwOptions & MSICODE_PATCH)
72 rc = MSIREG_OpenUserPatchesKey(szProduct, &rootkey, create);
74 rc = MSIREG_OpenProductKey(szProduct, NULL, context,
77 else if (context == MSIINSTALLCONTEXT_MACHINE)
79 if (dwOptions & MSICODE_PATCH)
80 rc = MSIREG_OpenPatchesKey(szProduct, &rootkey, create);
82 rc = MSIREG_OpenProductKey(szProduct, NULL, context,
86 if (rc != ERROR_SUCCESS)
88 if (dwOptions & MSICODE_PATCH)
89 return ERROR_UNKNOWN_PATCH;
91 return ERROR_UNKNOWN_PRODUCT;
95 rc = RegCreateKeyW(rootkey, szSourceList, key);
98 rc = RegOpenKeyW(rootkey,szSourceList, key);
99 if (rc != ERROR_SUCCESS)
100 rc = ERROR_BAD_CONFIGURATION;
106 static UINT OpenMediaSubkey(HKEY rootkey, HKEY *key, BOOL create)
109 static const WCHAR media[] = {'M','e','d','i','a',0};
112 rc = RegCreateKeyW(rootkey, media, key);
114 rc = RegOpenKeyW(rootkey,media, key);
119 static UINT OpenNetworkSubkey(HKEY rootkey, HKEY *key, BOOL create)
122 static const WCHAR net[] = {'N','e','t',0};
125 rc = RegCreateKeyW(rootkey, net, key);
127 rc = RegOpenKeyW(rootkey, net, key);
132 static UINT OpenURLSubkey(HKEY rootkey, HKEY *key, BOOL create)
135 static const WCHAR URL[] = {'U','R','L',0};
138 rc = RegCreateKeyW(rootkey, URL, key);
140 rc = RegOpenKeyW(rootkey, URL, key);
145 /******************************************************************
146 * MsiSourceListEnumMediaDisksA (MSI.@)
148 UINT WINAPI MsiSourceListEnumMediaDisksA(LPCSTR szProductCodeOrPatchCode,
149 LPCSTR szUserSid, MSIINSTALLCONTEXT dwContext,
150 DWORD dwOptions, DWORD dwIndex, LPDWORD pdwDiskId,
151 LPSTR szVolumeLabel, LPDWORD pcchVolumeLabel,
152 LPSTR szDiskPrompt, LPDWORD pcchDiskPrompt)
154 LPWSTR product = NULL;
155 LPWSTR usersid = NULL;
156 LPWSTR volume = NULL;
157 LPWSTR prompt = NULL;
158 UINT r = ERROR_INVALID_PARAMETER;
160 TRACE("(%s, %s, %d, %d, %d, %p, %p, %p, %p, %p)\n", debugstr_a(szProductCodeOrPatchCode),
161 debugstr_a(szUserSid), dwContext, dwOptions, dwIndex, pdwDiskId,
162 szVolumeLabel, pcchVolumeLabel, szDiskPrompt, pcchDiskPrompt);
164 if (szDiskPrompt && !pcchDiskPrompt)
165 return ERROR_INVALID_PARAMETER;
167 if (szProductCodeOrPatchCode) product = strdupAtoW(szProductCodeOrPatchCode);
168 if (szUserSid) usersid = strdupAtoW(szUserSid);
170 /* FIXME: add tests for an invalid format */
173 volume = msi_alloc(*pcchVolumeLabel * sizeof(WCHAR));
176 prompt = msi_alloc(*pcchDiskPrompt * sizeof(WCHAR));
178 if (volume) *volume = '\0';
179 if (prompt) *prompt = '\0';
180 r = MsiSourceListEnumMediaDisksW(product, usersid, dwContext, dwOptions,
181 dwIndex, pdwDiskId, volume, pcchVolumeLabel,
182 prompt, pcchDiskPrompt);
183 if (r != ERROR_SUCCESS)
186 if (szVolumeLabel && pcchVolumeLabel)
187 WideCharToMultiByte(CP_ACP, 0, volume, -1, szVolumeLabel,
188 *pcchVolumeLabel + 1, NULL, NULL);
191 WideCharToMultiByte(CP_ACP, 0, prompt, -1, szDiskPrompt,
192 *pcchDiskPrompt + 1, NULL, NULL);
203 /******************************************************************
204 * MsiSourceListEnumMediaDisksW (MSI.@)
206 UINT WINAPI MsiSourceListEnumMediaDisksW(LPCWSTR szProductCodeOrPatchCode,
207 LPCWSTR szUserSid, MSIINSTALLCONTEXT dwContext,
208 DWORD dwOptions, DWORD dwIndex, LPDWORD pdwDiskId,
209 LPWSTR szVolumeLabel, LPDWORD pcchVolumeLabel,
210 LPWSTR szDiskPrompt, LPDWORD pcchDiskPrompt)
212 WCHAR squished_pc[GUID_SIZE];
218 DWORD valuesz, datasz = 0;
223 static DWORD index = 0;
225 static const WCHAR fmt[] = {'#','%','d',0};
227 TRACE("(%s, %s, %d, %d, %d, %p, %p, %p, %p)\n", debugstr_w(szProductCodeOrPatchCode),
228 debugstr_w(szUserSid), dwContext, dwOptions, dwIndex, szVolumeLabel,
229 pcchVolumeLabel, szDiskPrompt, pcchDiskPrompt);
231 if (!szProductCodeOrPatchCode ||
232 !squash_guid(szProductCodeOrPatchCode, squished_pc))
233 return ERROR_INVALID_PARAMETER;
235 if (dwContext == MSIINSTALLCONTEXT_MACHINE && szUserSid)
236 return ERROR_INVALID_PARAMETER;
238 if (dwOptions != MSICODE_PRODUCT && dwOptions != MSICODE_PATCH)
239 return ERROR_INVALID_PARAMETER;
241 if (szDiskPrompt && !pcchDiskPrompt)
242 return ERROR_INVALID_PARAMETER;
247 if (dwIndex != index)
248 return ERROR_INVALID_PARAMETER;
250 r = OpenSourceKey(szProductCodeOrPatchCode, &source,
251 dwOptions, dwContext, FALSE);
252 if (r != ERROR_SUCCESS)
255 r = OpenMediaSubkey(source, &media, FALSE);
256 if (r != ERROR_SUCCESS)
259 return ERROR_NO_MORE_ITEMS;
262 if (!pcchVolumeLabel && !pcchDiskPrompt)
264 r = RegEnumValueW(media, dwIndex, NULL, NULL, NULL,
269 res = RegQueryInfoKeyW(media, NULL, NULL, NULL, NULL, NULL,
270 NULL, &numvals, &valuesz, &datasz, NULL, NULL);
271 if (res != ERROR_SUCCESS)
273 r = ERROR_BAD_CONFIGURATION;
277 value = msi_alloc(++valuesz * sizeof(WCHAR));
278 data = msi_alloc(++datasz * sizeof(WCHAR));
281 r = ERROR_OUTOFMEMORY;
285 r = RegEnumValueW(media, dwIndex, value, &valuesz,
286 NULL, &type, (LPBYTE)data, &datasz);
287 if (r != ERROR_SUCCESS)
291 *pdwDiskId = atolW(value);
294 ptr = strchrW(data, ';');
302 if (type == REG_DWORD)
304 sprintfW(convert, fmt, *data);
305 size = lstrlenW(convert);
309 size = lstrlenW(data);
311 if (size >= *pcchVolumeLabel)
313 else if (szVolumeLabel)
314 lstrcpyW(szVolumeLabel, ptr2);
316 *pcchVolumeLabel = size;
324 if (type == REG_DWORD)
326 sprintfW(convert, fmt, *ptr);
327 size = lstrlenW(convert);
331 size = lstrlenW(ptr);
333 size = lstrlenW(ptr);
334 if (size >= *pcchDiskPrompt)
336 else if (szDiskPrompt)
337 lstrcpyW(szDiskPrompt, ptr);
339 *pcchDiskPrompt = size;
352 /******************************************************************
353 * MsiSourceListEnumSourcesA (MSI.@)
355 UINT WINAPI MsiSourceListEnumSourcesA(LPCSTR szProductCodeOrPatch, LPCSTR szUserSid,
356 MSIINSTALLCONTEXT dwContext,
357 DWORD dwOptions, DWORD dwIndex,
358 LPSTR szSource, LPDWORD pcchSource)
360 LPWSTR product = NULL;
361 LPWSTR usersid = NULL;
362 LPWSTR source = NULL;
364 UINT r = ERROR_INVALID_PARAMETER;
365 static DWORD index = 0;
367 TRACE("(%s, %s, %d, %d, %d, %p, %p)\n", debugstr_a(szProductCodeOrPatch),
368 debugstr_a(szUserSid), dwContext, dwOptions, dwIndex, szSource, pcchSource);
373 if (szSource && !pcchSource)
376 if (dwIndex != index)
379 if (szProductCodeOrPatch) product = strdupAtoW(szProductCodeOrPatch);
380 if (szUserSid) usersid = strdupAtoW(szUserSid);
382 r = MsiSourceListEnumSourcesW(product, usersid, dwContext, dwOptions,
383 dwIndex, NULL, &len);
384 if (r != ERROR_SUCCESS)
387 source = msi_alloc(++len * sizeof(WCHAR));
390 r = ERROR_OUTOFMEMORY;
395 r = MsiSourceListEnumSourcesW(product, usersid, dwContext, dwOptions,
396 dwIndex, source, &len);
397 if (r != ERROR_SUCCESS)
400 len = WideCharToMultiByte(CP_ACP, 0, source, -1, NULL, 0, NULL, NULL);
401 if (pcchSource && *pcchSource >= len)
402 WideCharToMultiByte(CP_ACP, 0, source, -1, szSource, len, NULL, NULL);
407 *pcchSource = len - 1;
414 if (r == ERROR_SUCCESS)
416 if (szSource || !pcchSource) index++;
418 else if (dwIndex > index)
424 /******************************************************************
425 * MsiSourceListEnumSourcesW (MSI.@)
427 UINT WINAPI MsiSourceListEnumSourcesW(LPCWSTR szProductCodeOrPatch, LPCWSTR szUserSid,
428 MSIINSTALLCONTEXT dwContext,
429 DWORD dwOptions, DWORD dwIndex,
430 LPWSTR szSource, LPDWORD pcchSource)
432 WCHAR squished_pc[GUID_SIZE];
437 UINT r = ERROR_INVALID_PARAMETER;
438 static DWORD index = 0;
440 static const WCHAR format[] = {'%','d',0};
442 TRACE("(%s, %s, %d, %d, %d, %p, %p)\n", debugstr_w(szProductCodeOrPatch),
443 debugstr_w(szUserSid), dwContext, dwOptions, dwIndex, szSource, pcchSource);
448 if (!szProductCodeOrPatch || !squash_guid(szProductCodeOrPatch, squished_pc))
451 if (szSource && !pcchSource)
454 if (!(dwOptions & (MSISOURCETYPE_NETWORK | MSISOURCETYPE_URL)))
457 if ((dwOptions & MSISOURCETYPE_NETWORK) && (dwOptions & MSISOURCETYPE_URL))
460 if (dwContext == MSIINSTALLCONTEXT_MACHINE && szUserSid)
463 if (dwIndex != index)
466 r = OpenSourceKey(szProductCodeOrPatch, &source,
467 dwOptions, dwContext, FALSE);
468 if (r != ERROR_SUCCESS)
471 if (dwOptions & MSISOURCETYPE_NETWORK)
472 r = OpenNetworkSubkey(source, &subkey, FALSE);
473 else if (dwOptions & MSISOURCETYPE_URL)
474 r = OpenURLSubkey(source, &subkey, FALSE);
476 if (r != ERROR_SUCCESS)
478 r = ERROR_NO_MORE_ITEMS;
482 sprintfW(name, format, dwIndex + 1);
484 res = RegQueryValueExW(subkey, name, 0, 0, (LPBYTE)szSource, pcchSource);
485 if (res != ERROR_SUCCESS && res != ERROR_MORE_DATA)
486 r = ERROR_NO_MORE_ITEMS;
492 if (r == ERROR_SUCCESS)
494 if (szSource || !pcchSource) index++;
496 else if (dwIndex > index)
502 /******************************************************************
503 * MsiSourceListGetInfoA (MSI.@)
505 UINT WINAPI MsiSourceListGetInfoA( LPCSTR szProduct, LPCSTR szUserSid,
506 MSIINSTALLCONTEXT dwContext, DWORD dwOptions,
507 LPCSTR szProperty, LPSTR szValue,
511 LPWSTR product = NULL;
512 LPWSTR usersid = NULL;
513 LPWSTR property = NULL;
517 if (szValue && !pcchValue)
518 return ERROR_INVALID_PARAMETER;
520 if (szProduct) product = strdupAtoW(szProduct);
521 if (szUserSid) usersid = strdupAtoW(szUserSid);
522 if (szProperty) property = strdupAtoW(szProperty);
524 ret = MsiSourceListGetInfoW(product, usersid, dwContext, dwOptions,
525 property, NULL, &len);
526 if (ret != ERROR_SUCCESS)
529 value = msi_alloc(++len * sizeof(WCHAR));
531 return ERROR_OUTOFMEMORY;
534 ret = MsiSourceListGetInfoW(product, usersid, dwContext, dwOptions,
535 property, value, &len);
536 if (ret != ERROR_SUCCESS)
539 len = WideCharToMultiByte(CP_ACP, 0, value, -1, NULL, 0, NULL, NULL);
540 if (*pcchValue >= len)
541 WideCharToMultiByte(CP_ACP, 0, value, -1, szValue, len, NULL, NULL);
543 ret = ERROR_MORE_DATA;
545 *pcchValue = len - 1;
555 /******************************************************************
556 * MsiSourceListGetInfoW (MSI.@)
558 UINT WINAPI MsiSourceListGetInfoW( LPCWSTR szProduct, LPCWSTR szUserSid,
559 MSIINSTALLCONTEXT dwContext, DWORD dwOptions,
560 LPCWSTR szProperty, LPWSTR szValue,
563 WCHAR squished_pc[GUID_SIZE];
564 HKEY sourcekey, media;
569 static const WCHAR mediapack[] = {
570 'M','e','d','i','a','P','a','c','k','a','g','e',0};
572 TRACE("%s %s\n", debugstr_w(szProduct), debugstr_w(szProperty));
574 if (!szProduct || !squash_guid(szProduct, squished_pc))
575 return ERROR_INVALID_PARAMETER;
577 if (szValue && !pcchValue)
578 return ERROR_INVALID_PARAMETER;
580 if (dwContext != MSIINSTALLCONTEXT_USERMANAGED &&
581 dwContext != MSIINSTALLCONTEXT_USERUNMANAGED &&
582 dwContext != MSIINSTALLCONTEXT_MACHINE)
583 return ERROR_INVALID_PARAMETER;
586 return ERROR_INVALID_PARAMETER;
589 FIXME("Unhandled UserSid %s\n",debugstr_w(szUserSid));
591 rc = OpenSourceKey(szProduct, &sourcekey, dwOptions, dwContext, FALSE);
592 if (rc != ERROR_SUCCESS)
595 if (!lstrcmpW(szProperty, INSTALLPROPERTY_MEDIAPACKAGEPATHW) ||
596 !lstrcmpW(szProperty, INSTALLPROPERTY_DISKPROMPTW))
598 rc = OpenMediaSubkey(sourcekey, &media, FALSE);
599 if (rc != ERROR_SUCCESS)
601 RegCloseKey(sourcekey);
602 return ERROR_SUCCESS;
605 if (!lstrcmpW(szProperty, INSTALLPROPERTY_MEDIAPACKAGEPATHW))
606 szProperty = mediapack;
608 RegQueryValueExW(media, szProperty, 0, 0, (LPBYTE)szValue, pcchValue);
611 else if (!lstrcmpW(szProperty, INSTALLPROPERTY_LASTUSEDSOURCEW) ||
612 !lstrcmpW(szProperty, INSTALLPROPERTY_LASTUSEDTYPEW))
614 rc = RegQueryValueExW(sourcekey, INSTALLPROPERTY_LASTUSEDSOURCEW,
616 if (rc != ERROR_SUCCESS)
618 RegCloseKey(sourcekey);
619 return ERROR_SUCCESS;
622 source = msi_alloc(size);
623 RegQueryValueExW(sourcekey, INSTALLPROPERTY_LASTUSEDSOURCEW,
624 0, 0, (LPBYTE)source, &size);
629 RegCloseKey(sourcekey);
630 return ERROR_SUCCESS;
633 if (!lstrcmpW(szProperty, INSTALLPROPERTY_LASTUSEDTYPEW))
635 if (*source != 'n' && *source != 'u' && *source != 'm')
638 RegCloseKey(sourcekey);
639 return ERROR_SUCCESS;
647 ptr = strrchrW(source, ';');
656 if (strlenW(ptr) < *pcchValue)
657 lstrcpyW(szValue, ptr);
659 rc = ERROR_MORE_DATA;
662 *pcchValue = lstrlenW(ptr);
665 else if (strcmpW(INSTALLPROPERTY_PACKAGENAMEW, szProperty)==0)
667 *pcchValue = *pcchValue * sizeof(WCHAR);
668 rc = RegQueryValueExW(sourcekey, INSTALLPROPERTY_PACKAGENAMEW, 0, 0,
669 (LPBYTE)szValue, pcchValue);
670 if (rc != ERROR_SUCCESS && rc != ERROR_MORE_DATA)
678 *pcchValue = (*pcchValue - 1) / sizeof(WCHAR);
680 szValue[*pcchValue] = '\0';
685 FIXME("Unknown property %s\n",debugstr_w(szProperty));
686 rc = ERROR_UNKNOWN_PROPERTY;
689 RegCloseKey(sourcekey);
693 /******************************************************************
694 * MsiSourceListSetInfoA (MSI.@)
696 UINT WINAPI MsiSourceListSetInfoA(LPCSTR szProduct, LPCSTR szUserSid,
697 MSIINSTALLCONTEXT dwContext, DWORD dwOptions,
698 LPCSTR szProperty, LPCSTR szValue)
701 LPWSTR product = NULL;
702 LPWSTR usersid = NULL;
703 LPWSTR property = NULL;
706 if (szProduct) product = strdupAtoW(szProduct);
707 if (szUserSid) usersid = strdupAtoW(szUserSid);
708 if (szProperty) property = strdupAtoW(szProperty);
709 if (szValue) value = strdupAtoW(szValue);
711 ret = MsiSourceListSetInfoW(product, usersid, dwContext, dwOptions,
722 UINT msi_set_last_used_source(LPCWSTR product, LPCWSTR usersid,
723 MSIINSTALLCONTEXT context, DWORD options,
733 static const WCHAR format[] = {'%','c',';','%','i',';','%','s',0};
735 if (options & MSISOURCETYPE_NETWORK)
737 else if (options & MSISOURCETYPE_URL)
739 else if (options & MSISOURCETYPE_MEDIA)
742 return ERROR_INVALID_PARAMETER;
744 if (!(options & MSISOURCETYPE_MEDIA))
746 r = MsiSourceListAddSourceExW(product, usersid, context,
748 if (r != ERROR_SUCCESS)
752 while ((r = MsiSourceListEnumSourcesW(product, usersid, context, options,
753 index, NULL, NULL)) == ERROR_SUCCESS)
756 if (r != ERROR_NO_MORE_ITEMS)
760 size = (lstrlenW(format) + lstrlenW(value) + 7) * sizeof(WCHAR);
761 buffer = msi_alloc(size);
763 return ERROR_OUTOFMEMORY;
765 r = OpenSourceKey(product, &source, MSICODE_PRODUCT, context, FALSE);
766 if (r != ERROR_SUCCESS)
769 sprintfW(buffer, format, typechar, index, value);
771 size = (lstrlenW(buffer) + 1) * sizeof(WCHAR);
772 r = RegSetValueExW(source, INSTALLPROPERTY_LASTUSEDSOURCEW, 0,
773 REG_SZ, (LPBYTE)buffer, size);
780 /******************************************************************
781 * MsiSourceListSetInfoW (MSI.@)
783 UINT WINAPI MsiSourceListSetInfoW( LPCWSTR szProduct, LPCWSTR szUserSid,
784 MSIINSTALLCONTEXT dwContext, DWORD dwOptions,
785 LPCWSTR szProperty, LPCWSTR szValue)
787 WCHAR squished_pc[GUID_SIZE];
788 HKEY sourcekey, media;
792 static const WCHAR media_package[] = {
793 'M','e','d','i','a','P','a','c','k','a','g','e',0
796 TRACE("%s %s %x %x %s %s\n", debugstr_w(szProduct), debugstr_w(szUserSid),
797 dwContext, dwOptions, debugstr_w(szProperty), debugstr_w(szValue));
799 if (!szProduct || !squash_guid(szProduct, squished_pc))
800 return ERROR_INVALID_PARAMETER;
803 return ERROR_INVALID_PARAMETER;
806 return ERROR_UNKNOWN_PROPERTY;
808 if (dwContext == MSIINSTALLCONTEXT_MACHINE && szUserSid)
809 return ERROR_INVALID_PARAMETER;
811 if (dwOptions & MSICODE_PATCH)
813 FIXME("Unhandled options MSICODE_PATCH\n");
814 return ERROR_UNKNOWN_PATCH;
817 property = szProperty;
818 if (!lstrcmpW(szProperty, INSTALLPROPERTY_MEDIAPACKAGEPATHW))
819 property = media_package;
821 rc = OpenSourceKey(szProduct, &sourcekey, MSICODE_PRODUCT, dwContext, FALSE);
822 if (rc != ERROR_SUCCESS)
825 if (lstrcmpW(szProperty, INSTALLPROPERTY_LASTUSEDSOURCEW) &&
826 dwOptions & (MSISOURCETYPE_NETWORK | MSISOURCETYPE_URL))
828 RegCloseKey(sourcekey);
829 return ERROR_INVALID_PARAMETER;
832 if (!lstrcmpW(szProperty, INSTALLPROPERTY_MEDIAPACKAGEPATHW) ||
833 !lstrcmpW(szProperty, INSTALLPROPERTY_DISKPROMPTW))
835 rc = OpenMediaSubkey(sourcekey, &media, TRUE);
836 if (rc == ERROR_SUCCESS)
838 rc = msi_reg_set_val_str(media, property, szValue);
842 else if (strcmpW(INSTALLPROPERTY_PACKAGENAMEW, szProperty)==0)
844 DWORD size = (lstrlenW(szValue) + 1) * sizeof(WCHAR);
845 rc = RegSetValueExW(sourcekey, INSTALLPROPERTY_PACKAGENAMEW, 0,
846 REG_SZ, (const BYTE *)szValue, size);
847 if (rc != ERROR_SUCCESS)
848 rc = ERROR_UNKNOWN_PROPERTY;
850 else if (!lstrcmpW(szProperty, INSTALLPROPERTY_LASTUSEDSOURCEW))
852 if (!(dwOptions & (MSISOURCETYPE_NETWORK | MSISOURCETYPE_URL)))
853 rc = ERROR_INVALID_PARAMETER;
855 rc = msi_set_last_used_source(szProduct, szUserSid, dwContext,
859 rc = ERROR_UNKNOWN_PROPERTY;
861 RegCloseKey(sourcekey);
865 /******************************************************************
866 * MsiSourceListAddSourceW (MSI.@)
868 UINT WINAPI MsiSourceListAddSourceW( LPCWSTR szProduct, LPCWSTR szUserName,
869 DWORD dwReserved, LPCWSTR szSource)
871 WCHAR squished_pc[GUID_SIZE];
873 LPWSTR sidstr = NULL;
880 TRACE("%s %s %s\n", debugstr_w(szProduct), debugstr_w(szUserName), debugstr_w(szSource));
882 if (!szSource || !*szSource)
883 return ERROR_INVALID_PARAMETER;
886 return ERROR_INVALID_PARAMETER;
888 if (!szProduct || !squash_guid(szProduct, squished_pc))
889 return ERROR_INVALID_PARAMETER;
891 if (!szUserName || !*szUserName)
892 context = MSIINSTALLCONTEXT_MACHINE;
895 if (LookupAccountNameW(NULL, szUserName, NULL, &sidsize, NULL, &domsize, NULL))
897 PSID psid = msi_alloc(sidsize);
899 if (LookupAccountNameW(NULL, szUserName, psid, &sidsize, NULL, &domsize, NULL))
900 ConvertSidToStringSidW(psid, &sidstr);
905 r = MSIREG_OpenProductKey(szProduct, NULL,
906 MSIINSTALLCONTEXT_USERMANAGED, &hkey, FALSE);
907 if (r == ERROR_SUCCESS)
908 context = MSIINSTALLCONTEXT_USERMANAGED;
911 r = MSIREG_OpenProductKey(szProduct, NULL,
912 MSIINSTALLCONTEXT_USERUNMANAGED,
914 if (r != ERROR_SUCCESS)
915 return ERROR_UNKNOWN_PRODUCT;
917 context = MSIINSTALLCONTEXT_USERUNMANAGED;
923 ret = MsiSourceListAddSourceExW(szProduct, sidstr,
924 context, MSISOURCETYPE_NETWORK, szSource, 0);
932 /******************************************************************
933 * MsiSourceListAddSourceA (MSI.@)
935 UINT WINAPI MsiSourceListAddSourceA( LPCSTR szProduct, LPCSTR szUserName,
936 DWORD dwReserved, LPCSTR szSource)
943 szwproduct = strdupAtoW( szProduct );
944 szwusername = strdupAtoW( szUserName );
945 szwsource = strdupAtoW( szSource );
947 ret = MsiSourceListAddSourceW(szwproduct, szwusername, dwReserved, szwsource);
949 msi_free(szwproduct);
950 msi_free(szwusername);
956 /******************************************************************
957 * MsiSourceListAddSourceExA (MSI.@)
959 UINT WINAPI MsiSourceListAddSourceExA(LPCSTR szProduct, LPCSTR szUserSid,
960 MSIINSTALLCONTEXT dwContext, DWORD dwOptions, LPCSTR szSource, DWORD dwIndex)
963 LPWSTR product, usersid, source;
965 product = strdupAtoW(szProduct);
966 usersid = strdupAtoW(szUserSid);
967 source = strdupAtoW(szSource);
969 ret = MsiSourceListAddSourceExW(product, usersid, dwContext,
970 dwOptions, source, dwIndex);
979 static void free_source_list(struct list *sourcelist)
981 while (!list_empty(sourcelist))
983 media_info *info = LIST_ENTRY(list_head(sourcelist), media_info, entry);
984 list_remove(&info->entry);
985 msi_free(info->path);
990 static void add_source_to_list(struct list *sourcelist, media_info *info,
995 static const WCHAR fmt[] = {'%','i',0};
997 if (index) *index = 0;
999 if (list_empty(sourcelist))
1001 list_add_head(sourcelist, &info->entry);
1005 LIST_FOR_EACH_ENTRY(iter, sourcelist, media_info, entry)
1007 if (!found && info->index < iter->index)
1010 list_add_before(&iter->entry, &info->entry);
1013 /* update the rest of the list */
1015 sprintfW(iter->szIndex, fmt, ++iter->index);
1021 list_add_after(&iter->entry, &info->entry);
1024 static UINT fill_source_list(struct list *sourcelist, HKEY sourcekey, DWORD *count)
1026 UINT r = ERROR_SUCCESS;
1029 DWORD size, val_size;
1034 while (r == ERROR_SUCCESS)
1036 size = sizeof(name) / sizeof(name[0]);
1037 r = RegEnumValueW(sourcekey, index, name, &size, NULL, NULL, NULL, &val_size);
1038 if (r != ERROR_SUCCESS)
1041 entry = msi_alloc(sizeof(media_info));
1045 entry->path = msi_alloc(val_size);
1052 lstrcpyW(entry->szIndex, name);
1053 entry->index = atoiW(name);
1056 r = RegEnumValueW(sourcekey, index, name, &size, NULL,
1057 NULL, (LPBYTE)entry->path, &val_size);
1058 if (r != ERROR_SUCCESS)
1060 msi_free(entry->path);
1066 add_source_to_list(sourcelist, entry, NULL);
1071 free_source_list(sourcelist);
1072 return ERROR_OUTOFMEMORY;
1075 /******************************************************************
1076 * MsiSourceListAddSourceExW (MSI.@)
1078 UINT WINAPI MsiSourceListAddSourceExW( LPCWSTR szProduct, LPCWSTR szUserSid,
1079 MSIINSTALLCONTEXT dwContext, DWORD dwOptions, LPCWSTR szSource,
1085 struct list sourcelist;
1087 WCHAR squished_pc[GUID_SIZE];
1094 static const WCHAR fmt[] = {'%','i',0};
1096 TRACE("%s %s %x %x %s %i\n", debugstr_w(szProduct), debugstr_w(szUserSid),
1097 dwContext, dwOptions, debugstr_w(szSource), dwIndex);
1099 if (!szProduct || !squash_guid(szProduct, squished_pc))
1100 return ERROR_INVALID_PARAMETER;
1102 if (!szSource || !*szSource)
1103 return ERROR_INVALID_PARAMETER;
1105 if (!(dwOptions & (MSISOURCETYPE_NETWORK | MSISOURCETYPE_URL)))
1106 return ERROR_INVALID_PARAMETER;
1108 if (dwOptions & MSICODE_PATCH)
1110 FIXME("Unhandled options MSICODE_PATCH\n");
1111 return ERROR_FUNCTION_FAILED;
1114 if (szUserSid && (dwContext & MSIINSTALLCONTEXT_MACHINE))
1115 return ERROR_INVALID_PARAMETER;
1117 rc = OpenSourceKey(szProduct, &sourcekey, MSICODE_PRODUCT, dwContext, FALSE);
1118 if (rc != ERROR_SUCCESS)
1121 if (dwOptions & MSISOURCETYPE_NETWORK)
1122 rc = OpenNetworkSubkey(sourcekey, &typekey, TRUE);
1123 else if (dwOptions & MSISOURCETYPE_URL)
1124 rc = OpenURLSubkey(sourcekey, &typekey, TRUE);
1125 else if (dwOptions & MSISOURCETYPE_MEDIA)
1126 rc = OpenMediaSubkey(sourcekey, &typekey, TRUE);
1129 ERR("unknown media type: %08x\n", dwOptions);
1130 RegCloseKey(sourcekey);
1131 return ERROR_FUNCTION_FAILED;
1134 postfix = (dwOptions & MSISOURCETYPE_NETWORK) ? szBackSlash : szForwardSlash;
1135 if (szSource[lstrlenW(szSource) - 1] == *postfix)
1136 source = strdupW(szSource);
1139 size = lstrlenW(szSource) + 2;
1140 source = msi_alloc(size * sizeof(WCHAR));
1141 lstrcpyW(source, szSource);
1142 lstrcatW(source, postfix);
1145 list_init(&sourcelist);
1146 rc = fill_source_list(&sourcelist, typekey, &count);
1147 if (rc != ERROR_NO_MORE_ITEMS)
1150 size = (lstrlenW(source) + 1) * sizeof(WCHAR);
1154 rc = RegSetValueExW(typekey, szOne, 0, REG_EXPAND_SZ, (LPBYTE)source, size);
1157 else if (dwIndex > count || dwIndex == 0)
1159 sprintfW(name, fmt, count + 1);
1160 rc = RegSetValueExW(typekey, name, 0, REG_EXPAND_SZ, (LPBYTE)source, size);
1165 sprintfW(name, fmt, dwIndex);
1166 info = msi_alloc(sizeof(media_info));
1169 rc = ERROR_OUTOFMEMORY;
1173 info->path = strdupW(source);
1174 lstrcpyW(info->szIndex, name);
1175 info->index = dwIndex;
1176 add_source_to_list(&sourcelist, info, &index);
1178 LIST_FOR_EACH_ENTRY(info, &sourcelist, media_info, entry)
1180 if (info->index < index)
1183 size = (lstrlenW(info->path) + 1) * sizeof(WCHAR);
1184 rc = RegSetValueExW(typekey, info->szIndex, 0,
1185 REG_EXPAND_SZ, (LPBYTE)info->path, size);
1186 if (rc != ERROR_SUCCESS)
1192 free_source_list(&sourcelist);
1194 RegCloseKey(typekey);
1195 RegCloseKey(sourcekey);
1199 /******************************************************************
1200 * MsiSourceListAddMediaDiskA (MSI.@)
1202 UINT WINAPI MsiSourceListAddMediaDiskA(LPCSTR szProduct, LPCSTR szUserSid,
1203 MSIINSTALLCONTEXT dwContext, DWORD dwOptions, DWORD dwDiskId,
1204 LPCSTR szVolumeLabel, LPCSTR szDiskPrompt)
1207 LPWSTR product = NULL;
1208 LPWSTR usersid = NULL;
1209 LPWSTR volume = NULL;
1210 LPWSTR prompt = NULL;
1212 if (szProduct) product = strdupAtoW(szProduct);
1213 if (szUserSid) usersid = strdupAtoW(szUserSid);
1214 if (szVolumeLabel) volume = strdupAtoW(szVolumeLabel);
1215 if (szDiskPrompt) prompt = strdupAtoW(szDiskPrompt);
1217 r = MsiSourceListAddMediaDiskW(product, usersid, dwContext, dwOptions,
1218 dwDiskId, volume, prompt);
1228 /******************************************************************
1229 * MsiSourceListAddMediaDiskW (MSI.@)
1231 UINT WINAPI MsiSourceListAddMediaDiskW(LPCWSTR szProduct, LPCWSTR szUserSid,
1232 MSIINSTALLCONTEXT dwContext, DWORD dwOptions, DWORD dwDiskId,
1233 LPCWSTR szVolumeLabel, LPCWSTR szDiskPrompt)
1239 WCHAR squished_pc[GUID_SIZE];
1243 static const WCHAR fmt[] = {'%','i',0};
1245 TRACE("%s %s %x %x %i %s %s\n", debugstr_w(szProduct),
1246 debugstr_w(szUserSid), dwContext, dwOptions, dwDiskId,
1247 debugstr_w(szVolumeLabel), debugstr_w(szDiskPrompt));
1249 if (!szProduct || !squash_guid(szProduct, squished_pc))
1250 return ERROR_INVALID_PARAMETER;
1252 if (dwOptions != MSICODE_PRODUCT && dwOptions != MSICODE_PATCH)
1253 return ERROR_INVALID_PARAMETER;
1255 if ((szVolumeLabel && !*szVolumeLabel) || (szDiskPrompt && !*szDiskPrompt))
1256 return ERROR_INVALID_PARAMETER;
1258 if ((dwContext & MSIINSTALLCONTEXT_MACHINE) && szUserSid)
1259 return ERROR_INVALID_PARAMETER;
1261 if (dwOptions & MSICODE_PATCH)
1263 FIXME("Unhandled options MSICODE_PATCH\n");
1264 return ERROR_FUNCTION_FAILED;
1267 rc = OpenSourceKey(szProduct, &sourcekey, MSICODE_PRODUCT, dwContext, FALSE);
1268 if (rc != ERROR_SUCCESS)
1271 OpenMediaSubkey(sourcekey, &mediakey, TRUE);
1273 sprintfW(szIndex, fmt, dwDiskId);
1276 if (szVolumeLabel) size += lstrlenW(szVolumeLabel);
1277 if (szDiskPrompt) size += lstrlenW(szDiskPrompt);
1279 size *= sizeof(WCHAR);
1280 buffer = msi_alloc(size);
1283 if (szVolumeLabel) lstrcpyW(buffer, szVolumeLabel);
1284 lstrcatW(buffer, szSemiColon);
1285 if (szDiskPrompt) lstrcatW(buffer, szDiskPrompt);
1287 RegSetValueExW(mediakey, szIndex, 0, REG_SZ, (LPBYTE)buffer, size);
1290 RegCloseKey(sourcekey);
1291 RegCloseKey(mediakey);
1293 return ERROR_SUCCESS;
1296 /******************************************************************
1297 * MsiSourceListClearAllA (MSI.@)
1299 UINT WINAPI MsiSourceListClearAllA( LPCSTR szProduct, LPCSTR szUserName, DWORD dwReserved )
1301 FIXME("(%s %s %d)\n", debugstr_a(szProduct), debugstr_a(szUserName), dwReserved);
1302 return ERROR_SUCCESS;
1305 /******************************************************************
1306 * MsiSourceListClearAllW (MSI.@)
1308 UINT WINAPI MsiSourceListClearAllW( LPCWSTR szProduct, LPCWSTR szUserName, DWORD dwReserved )
1310 FIXME("(%s %s %d)\n", debugstr_w(szProduct), debugstr_w(szUserName), dwReserved);
1311 return ERROR_SUCCESS;
1314 /******************************************************************
1315 * MsiSourceListClearAllExA (MSI.@)
1317 UINT WINAPI MsiSourceListClearAllExA( LPCSTR szProduct, LPCSTR szUserSid,
1318 MSIINSTALLCONTEXT dwContext, DWORD dwOptions )
1320 FIXME("(%s %s %d %08x)\n", debugstr_a(szProduct), debugstr_a(szUserSid),
1321 dwContext, dwOptions);
1322 return ERROR_SUCCESS;
1325 /******************************************************************
1326 * MsiSourceListClearAllExW (MSI.@)
1328 UINT WINAPI MsiSourceListClearAllExW( LPCWSTR szProduct, LPCWSTR szUserSid,
1329 MSIINSTALLCONTEXT dwContext, DWORD dwOptions )
1331 FIXME("(%s %s %d %08x)\n", debugstr_w(szProduct), debugstr_w(szUserSid),
1332 dwContext, dwOptions);
1333 return ERROR_SUCCESS;
1336 /******************************************************************
1337 * MsiSourceListClearSourceA (MSI.@)
1339 UINT WINAPI MsiSourceListClearSourceA(LPCSTR szProductCodeOrPatchCode, LPCSTR szUserSid,
1340 MSIINSTALLCONTEXT dwContext, DWORD dwOptions,
1343 FIXME("(%s %s %x %x %s)\n", debugstr_a(szProductCodeOrPatchCode), debugstr_a(szUserSid),
1344 dwContext, dwOptions, debugstr_a(szSource));
1345 return ERROR_SUCCESS;
1348 /******************************************************************
1349 * MsiSourceListClearSourceW (MSI.@)
1351 UINT WINAPI MsiSourceListClearSourceW(LPCWSTR szProductCodeOrPatchCode, LPCWSTR szUserSid,
1352 MSIINSTALLCONTEXT dwContext, DWORD dwOptions,
1355 FIXME("(%s %s %x %x %s)\n", debugstr_w(szProductCodeOrPatchCode), debugstr_w(szUserSid),
1356 dwContext, dwOptions, debugstr_w(szSource));
1357 return ERROR_SUCCESS;