2 * Implementation of the Microsoft Installer (msi.dll)
4 * Copyright 2004 Aric Stewart for CodeWeavers
6 * This library is free software; you can redistribute it and/or
7 * modify it under the terms of the GNU Lesser General Public
8 * License as published by the Free Software Foundation; either
9 * version 2.1 of the License, or (at your option) any later version.
11 * This library is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
14 * Lesser General Public License for more details.
16 * You should have received a copy of the GNU Lesser General Public
17 * License along with this library; if not, write to the Free Software
18 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
21 #define NONAMELESSUNION
22 #define NONAMELESSSTRUCT
32 #include "wine/debug.h"
42 #include "wine/unicode.h"
48 #include "msiserver.h"
50 WINE_DEFAULT_DEBUG_CHANNEL(msi);
52 static void MSI_FreePackage( MSIOBJECTHDR *arg)
54 MSIPACKAGE *package= (MSIPACKAGE*) arg;
57 msi_dialog_destroy( package->dialog );
59 msiobj_release( &package->db->hdr );
60 ACTION_free_package_structures(package);
63 static UINT create_temp_property_table(MSIPACKAGE *package)
65 MSIQUERY *view = NULL;
68 static const WCHAR CreateSql[] = {
69 'C','R','E','A','T','E',' ','T','A','B','L','E',' ','`','_','P','r','o',
70 'p','e','r','t','y','`',' ','(',' ','`','_','P','r','o','p','e','r','t',
71 'y','`',' ','C','H','A','R','(','5','6',')',' ','N','O','T',' ','N','U',
72 'L','L',' ','T','E','M','P','O','R','A','R','Y',',',' ','`','V','a','l',
73 'u','e','`',' ','C','H','A','R','(','9','8',')',' ','N','O','T',' ','N',
74 'U','L','L',' ','T','E','M','P','O','R','A','R','Y',' ','P','R','I','M',
75 'A','R','Y',' ','K','E','Y',' ','`','_','P','r','o','p','e','r','t','y',
78 rc = MSI_DatabaseOpenViewW(package->db, CreateSql, &view);
79 if (rc != ERROR_SUCCESS)
82 rc = MSI_ViewExecute(view, 0);
84 msiobj_release(&view->hdr);
88 UINT msi_clone_properties(MSIPACKAGE *package)
90 MSIQUERY *view = NULL;
93 static const WCHAR Query[] = {
94 'S','E','L','E','C','T',' ','*',' ',
95 'F','R','O','M',' ','`','P','r','o','p','e','r','t','y','`',0};
96 static const WCHAR Insert[] = {
97 'I','N','S','E','R','T',' ','i','n','t','o',' ',
98 '`','_','P','r','o','p','e','r','t','y','`',' ',
99 '(','`','_','P','r','o','p','e','r','t','y','`',',',
100 '`','V','a','l','u','e','`',')',' ',
101 'V','A','L','U','E','S',' ','(','?',',','?',')',0};
103 /* clone the existing properties */
104 rc = MSI_DatabaseOpenViewW(package->db, Query, &view);
105 if (rc != ERROR_SUCCESS)
108 rc = MSI_ViewExecute(view, 0);
109 if (rc != ERROR_SUCCESS)
112 msiobj_release(&view->hdr);
121 rc = MSI_ViewFetch(view, &row);
122 if (rc != ERROR_SUCCESS)
125 rc = MSI_DatabaseOpenViewW(package->db, Insert, &view2);
126 if (rc != ERROR_SUCCESS)
128 msiobj_release(&row->hdr);
132 MSI_ViewExecute(view2, row);
133 MSI_ViewClose(view2);
134 msiobj_release(&view2->hdr);
135 msiobj_release(&row->hdr);
139 msiobj_release(&view->hdr);
147 * Sets the "Installed" property to indicate that
148 * the product is installed for the current user.
150 static UINT set_installed_prop( MSIPACKAGE *package )
152 static const WCHAR szInstalled[] = {
153 'I','n','s','t','a','l','l','e','d',0 };
154 WCHAR val[2] = { '1', 0 };
158 r = MSIREG_OpenUninstallKey( package->ProductCode, &hkey, FALSE );
159 if (r == ERROR_SUCCESS)
162 MSI_SetPropertyW( package, szInstalled, val );
168 static UINT set_user_sid_prop( MSIPACKAGE *package )
172 LPWSTR sid_str = NULL, dom = NULL;
173 DWORD size, dom_size;
175 UINT r = ERROR_FUNCTION_FAILED;
177 static const WCHAR user_sid[] = {'U','s','e','r','S','I','D',0};
180 GetUserNameW( NULL, &size );
182 user_name = msi_alloc( (size + 1) * sizeof(WCHAR) );
184 return ERROR_OUTOFMEMORY;
186 if (!GetUserNameW( user_name, &size ))
191 LookupAccountNameW( NULL, user_name, NULL, &size, NULL, &dom_size, &use );
193 psid = msi_alloc( size );
194 dom = msi_alloc( dom_size*sizeof (WCHAR) );
197 r = ERROR_OUTOFMEMORY;
201 if (!LookupAccountNameW( NULL, user_name, psid, &size, dom, &dom_size, &use ))
204 if (!ConvertSidToStringSidW( psid, &sid_str ))
207 r = MSI_SetPropertyW( package, user_sid, sid_str );
210 LocalFree( sid_str );
213 msi_free( user_name );
218 static LPWSTR get_fusion_filename(MSIPACKAGE *package)
223 DWORD index = 0, size;
225 WCHAR name[MAX_PATH];
226 WCHAR windir[MAX_PATH];
228 static const WCHAR backslash[] = {'\\',0};
229 static const WCHAR fusion[] = {'f','u','s','i','o','n','.','d','l','l',0};
230 static const WCHAR sub[] = {
231 'S','o','f','t','w','a','r','e','\\',
232 'M','i','c','r','o','s','o','f','t','\\',
233 'N','E','T',' ','F','r','a','m','e','w','o','r','k',' ','S','e','t','u','p','\\',
236 static const WCHAR subdir[] = {
237 'M','i','c','r','o','s','o','f','t','.','N','E','T','\\',
238 'F','r','a','m','e','w','o','r','k','\\',0
241 res = RegOpenKeyExW(HKEY_LOCAL_MACHINE, sub, 0, KEY_ENUMERATE_SUB_KEYS, &netsetup);
242 if (res != ERROR_SUCCESS)
247 while (RegEnumKeyExW(netsetup, index, name, &size, NULL, NULL, NULL, NULL) == ERROR_SUCCESS)
250 if (lstrcmpW(ver, name) < 0)
254 RegCloseKey(netsetup);
259 GetWindowsDirectoryW(windir, MAX_PATH);
261 size = lstrlenW(windir) + lstrlenW(subdir) + lstrlenW(ver) +lstrlenW(fusion) + 3;
262 file = msi_alloc(size * sizeof(WCHAR));
266 lstrcpyW(file, windir);
267 lstrcatW(file, backslash);
268 lstrcatW(file, subdir);
270 lstrcatW(file, backslash);
271 lstrcatW(file, fusion);
276 typedef struct tagLANGANDCODEPAGE
282 static void set_msi_assembly_prop(MSIPACKAGE *package)
286 LPVOID version = NULL;
288 LPWSTR fusion, verstr;
289 LANGANDCODEPAGE *translate;
291 static const WCHAR netasm[] = {
292 'M','s','i','N','e','t','A','s','s','e','m','b','l','y','S','u','p','p','o','r','t',0
294 static const WCHAR translation[] = {
295 '\\','V','a','r','F','i','l','e','I','n','f','o',
296 '\\','T','r','a','n','s','l','a','t','i','o','n',0
298 static const WCHAR verfmt[] = {
299 '\\','S','t','r','i','n','g','F','i','l','e','I','n','f','o',
300 '\\','%','0','4','x','%','0','4','x',
301 '\\','P','r','o','d','u','c','t','V','e','r','s','i','o','n',0
304 fusion = get_fusion_filename(package);
308 size = GetFileVersionInfoSizeW(fusion, &handle);
311 version = msi_alloc(size);
312 if (!version) return;
314 if (!GetFileVersionInfoW(fusion, handle, size, version))
317 if (!VerQueryValueW(version, translation, (LPVOID *)&translate, &val_len))
320 sprintfW(buf, verfmt, translate[0].wLanguage, translate[0].wCodePage);
322 if (!VerQueryValueW(version, buf, (LPVOID *)&verstr, &val_len))
325 if (!val_len || !verstr)
328 MSI_SetPropertyW(package, netasm, verstr);
336 * There are a whole slew of these we need to set
339 http://msdn.microsoft.com/library/default.asp?url=/library/en-us/msi/setup/properties.asp
341 static VOID set_installer_properties(MSIPACKAGE *package)
345 OSVERSIONINFOEXW OSVersion;
348 WCHAR verstr[10], bufstr[20];
353 SYSTEM_INFO sys_info;
354 SYSTEMTIME systemtime;
356 static const WCHAR cszbs[]={'\\',0};
357 static const WCHAR CFF[] =
358 {'C','o','m','m','o','n','F','i','l','e','s','F','o','l','d','e','r',0};
359 static const WCHAR PFF[] =
360 {'P','r','o','g','r','a','m','F','i','l','e','s','F','o','l','d','e','r',0};
361 static const WCHAR CADF[] =
362 {'C','o','m','m','o','n','A','p','p','D','a','t','a','F','o','l','d','e','r',0};
363 static const WCHAR FaF[] =
364 {'F','a','v','o','r','i','t','e','s','F','o','l','d','e','r',0};
365 static const WCHAR FoF[] =
366 {'F','o','n','t','s','F','o','l','d','e','r',0};
367 static const WCHAR SendTF[] =
368 {'S','e','n','d','T','o','F','o','l','d','e','r',0};
369 static const WCHAR SMF[] =
370 {'S','t','a','r','t','M','e','n','u','F','o','l','d','e','r',0};
371 static const WCHAR StF[] =
372 {'S','t','a','r','t','u','p','F','o','l','d','e','r',0};
373 static const WCHAR TemplF[] =
374 {'T','e','m','p','l','a','t','e','F','o','l','d','e','r',0};
375 static const WCHAR DF[] =
376 {'D','e','s','k','t','o','p','F','o','l','d','e','r',0};
377 static const WCHAR PMF[] =
378 {'P','r','o','g','r','a','m','M','e','n','u','F','o','l','d','e','r',0};
379 static const WCHAR ATF[] =
380 {'A','d','m','i','n','T','o','o','l','s','F','o','l','d','e','r',0};
381 static const WCHAR ADF[] =
382 {'A','p','p','D','a','t','a','F','o','l','d','e','r',0};
383 static const WCHAR SF[] =
384 {'S','y','s','t','e','m','F','o','l','d','e','r',0};
385 static const WCHAR SF16[] =
386 {'S','y','s','t','e','m','1','6','F','o','l','d','e','r',0};
387 static const WCHAR LADF[] =
388 {'L','o','c','a','l','A','p','p','D','a','t','a','F','o','l','d','e','r',0};
389 static const WCHAR MPF[] =
390 {'M','y','P','i','c','t','u','r','e','s','F','o','l','d','e','r',0};
391 static const WCHAR PF[] =
392 {'P','e','r','s','o','n','a','l','F','o','l','d','e','r',0};
393 static const WCHAR WF[] =
394 {'W','i','n','d','o','w','s','F','o','l','d','e','r',0};
395 static const WCHAR WV[] =
396 {'W','i','n','d','o','w','s','V','o','l','u','m','e',0};
397 static const WCHAR TF[]=
398 {'T','e','m','p','F','o','l','d','e','r',0};
399 static const WCHAR szAdminUser[] =
400 {'A','d','m','i','n','U','s','e','r',0};
401 static const WCHAR szPriv[] =
402 {'P','r','i','v','i','l','e','g','e','d',0};
403 static const WCHAR szOne[] =
405 static const WCHAR v9x[] = { 'V','e','r','s','i','o','n','9','X',0 };
406 static const WCHAR vNT[] = { 'V','e','r','s','i','o','n','N','T',0 };
407 static const WCHAR szMsiNTProductType[] = { 'M','s','i','N','T','P','r','o','d','u','c','t','T','y','p','e',0 };
408 static const WCHAR szFormat[] = {'%','l','i',0};
409 static const WCHAR szWinBuild[] =
410 {'W','i','n','d','o','w','s','B','u','i','l','d', 0 };
411 static const WCHAR szSPL[] =
412 {'S','e','r','v','i','c','e','P','a','c','k','L','e','v','e','l',0 };
413 static const WCHAR szSix[] = {'6',0 };
415 static const WCHAR szVersionMsi[] = { 'V','e','r','s','i','o','n','M','s','i',0 };
416 static const WCHAR szVersionDatabase[] = { 'V','e','r','s','i','o','n','D','a','t','a','b','a','s','e',0 };
417 static const WCHAR szPhysicalMemory[] = { 'P','h','y','s','i','c','a','l','M','e','m','o','r','y',0 };
418 static const WCHAR szFormat2[] = {'%','l','i','.','%','l','i',0};
419 /* Screen properties */
420 static const WCHAR szScreenX[] = {'S','c','r','e','e','n','X',0};
421 static const WCHAR szScreenY[] = {'S','c','r','e','e','n','Y',0};
422 static const WCHAR szColorBits[] = {'C','o','l','o','r','B','i','t','s',0};
423 static const WCHAR szScreenFormat[] = {'%','d',0};
424 static const WCHAR szIntel[] = { 'I','n','t','e','l',0 };
425 static const WCHAR szAllUsers[] = { 'A','L','L','U','S','E','R','S',0 };
426 static const WCHAR szCurrentVersion[] = {
427 'S','O','F','T','W','A','R','E','\\',
428 'M','i','c','r','o','s','o','f','t','\\',
429 'W','i','n','d','o','w','s',' ','N','T','\\',
430 'C','u','r','r','e','n','t','V','e','r','s','i','o','n',0
432 static const WCHAR szRegisteredUser[] = {'R','e','g','i','s','t','e','r','e','d','O','w','n','e','r',0};
433 static const WCHAR szRegisteredOrg[] = {
434 'R','e','g','i','s','t','e','r','e','d','O','r','g','a','n','i','z','a','t','i','o','n',0
436 static const WCHAR szUSERNAME[] = {'U','S','E','R','N','A','M','E',0};
437 static const WCHAR szCOMPANYNAME[] = {'C','O','M','P','A','N','Y','N','A','M','E',0};
438 static const WCHAR szDate[] = {'D','a','t','e',0};
439 static const WCHAR szTime[] = {'T','i','m','e',0};
442 * Other things that probably should be set:
444 * SystemLanguageID ComputerName UserLanguageID LogonUser VirtualMemory
445 * ShellAdvSupport DefaultUIFont PackagecodeChanging
446 * ProductState CaptionHeight BorderTop BorderSide TextHeight
447 * RedirectedDllSupport
450 SHGetFolderPathW(NULL,CSIDL_PROGRAM_FILES_COMMON,NULL,0,pth);
452 MSI_SetPropertyW(package, CFF, pth);
454 SHGetFolderPathW(NULL,CSIDL_PROGRAM_FILES,NULL,0,pth);
456 MSI_SetPropertyW(package, PFF, pth);
458 SHGetFolderPathW(NULL,CSIDL_COMMON_APPDATA,NULL,0,pth);
460 MSI_SetPropertyW(package, CADF, pth);
462 SHGetFolderPathW(NULL,CSIDL_FAVORITES,NULL,0,pth);
464 MSI_SetPropertyW(package, FaF, pth);
466 SHGetFolderPathW(NULL,CSIDL_FONTS,NULL,0,pth);
468 MSI_SetPropertyW(package, FoF, pth);
470 SHGetFolderPathW(NULL,CSIDL_SENDTO,NULL,0,pth);
472 MSI_SetPropertyW(package, SendTF, pth);
474 SHGetFolderPathW(NULL,CSIDL_STARTMENU,NULL,0,pth);
476 MSI_SetPropertyW(package, SMF, pth);
478 SHGetFolderPathW(NULL,CSIDL_STARTUP,NULL,0,pth);
480 MSI_SetPropertyW(package, StF, pth);
482 SHGetFolderPathW(NULL,CSIDL_TEMPLATES,NULL,0,pth);
484 MSI_SetPropertyW(package, TemplF, pth);
486 SHGetFolderPathW(NULL,CSIDL_DESKTOP,NULL,0,pth);
488 MSI_SetPropertyW(package, DF, pth);
490 SHGetFolderPathW(NULL,CSIDL_PROGRAMS,NULL,0,pth);
492 MSI_SetPropertyW(package, PMF, pth);
494 SHGetFolderPathW(NULL,CSIDL_ADMINTOOLS,NULL,0,pth);
496 MSI_SetPropertyW(package, ATF, pth);
498 SHGetFolderPathW(NULL,CSIDL_APPDATA,NULL,0,pth);
500 MSI_SetPropertyW(package, ADF, pth);
502 SHGetFolderPathW(NULL,CSIDL_SYSTEM,NULL,0,pth);
504 MSI_SetPropertyW(package, SF, pth);
505 MSI_SetPropertyW(package, SF16, pth);
507 SHGetFolderPathW(NULL,CSIDL_LOCAL_APPDATA,NULL,0,pth);
509 MSI_SetPropertyW(package, LADF, pth);
511 SHGetFolderPathW(NULL,CSIDL_MYPICTURES,NULL,0,pth);
513 MSI_SetPropertyW(package, MPF, pth);
515 SHGetFolderPathW(NULL,CSIDL_PERSONAL,NULL,0,pth);
517 MSI_SetPropertyW(package, PF, pth);
519 SHGetFolderPathW(NULL,CSIDL_WINDOWS,NULL,0,pth);
521 MSI_SetPropertyW(package, WF, pth);
523 /* Physical Memory is specified in MB. Using total amount. */
524 msex.dwLength = sizeof(msex);
525 GlobalMemoryStatusEx( &msex );
526 sprintfW( bufstr, szScreenFormat, (int)(msex.ullTotalPhys/1024/1024));
527 MSI_SetPropertyW(package, szPhysicalMemory, bufstr);
529 SHGetFolderPathW(NULL,CSIDL_WINDOWS,NULL,0,pth);
530 ptr = strchrW(pth,'\\');
533 MSI_SetPropertyW(package, WV, pth);
535 GetTempPathW(MAX_PATH,pth);
536 MSI_SetPropertyW(package, TF, pth);
539 /* in a wine environment the user is always admin and privileged */
540 MSI_SetPropertyW(package,szAdminUser,szOne);
541 MSI_SetPropertyW(package,szPriv,szOne);
542 MSI_SetPropertyW(package, szAllUsers, szOne);
544 /* set the os things */
545 OSVersion.dwOSVersionInfoSize = sizeof(OSVERSIONINFOEXW);
546 GetVersionExW((OSVERSIONINFOW *)&OSVersion);
547 verval = OSVersion.dwMinorVersion+OSVersion.dwMajorVersion*100;
548 sprintfW(verstr,szFormat,verval);
549 switch (OSVersion.dwPlatformId)
551 case VER_PLATFORM_WIN32_WINDOWS:
552 MSI_SetPropertyW(package,v9x,verstr);
554 case VER_PLATFORM_WIN32_NT:
555 MSI_SetPropertyW(package,vNT,verstr);
556 sprintfW(verstr,szFormat,OSVersion.wProductType);
557 MSI_SetPropertyW(package,szMsiNTProductType,verstr);
560 sprintfW(verstr,szFormat,OSVersion.dwBuildNumber);
561 MSI_SetPropertyW(package,szWinBuild,verstr);
562 /* just fudge this */
563 MSI_SetPropertyW(package,szSPL,szSix);
565 sprintfW( bufstr, szFormat2, MSI_MAJORVERSION, MSI_MINORVERSION);
566 MSI_SetPropertyW( package, szVersionMsi, bufstr );
567 sprintfW( bufstr, szFormat, MSI_MAJORVERSION * 100);
568 MSI_SetPropertyW( package, szVersionDatabase, bufstr );
570 GetSystemInfo( &sys_info );
571 if (sys_info.u.s.wProcessorArchitecture == PROCESSOR_ARCHITECTURE_INTEL)
573 sprintfW( bufstr, szScreenFormat, sys_info.wProcessorLevel );
574 MSI_SetPropertyW( package, szIntel, bufstr );
577 /* Screen properties. */
579 sprintfW( bufstr, szScreenFormat, GetDeviceCaps( dc, HORZRES ) );
580 MSI_SetPropertyW( package, szScreenX, bufstr );
581 sprintfW( bufstr, szScreenFormat, GetDeviceCaps( dc, VERTRES ));
582 MSI_SetPropertyW( package, szScreenY, bufstr );
583 sprintfW( bufstr, szScreenFormat, GetDeviceCaps( dc, BITSPIXEL ));
584 MSI_SetPropertyW( package, szColorBits, bufstr );
587 /* USERNAME and COMPANYNAME */
588 res = RegOpenKeyW( HKEY_LOCAL_MACHINE, szCurrentVersion, &hkey );
589 if (res != ERROR_SUCCESS)
592 check = msi_dup_property( package, szUSERNAME );
595 LPWSTR user = msi_reg_get_val_str( hkey, szRegisteredUser );
596 MSI_SetPropertyW( package, szUSERNAME, user );
602 check = msi_dup_property( package, szCOMPANYNAME );
605 LPWSTR company = msi_reg_get_val_str( hkey, szRegisteredOrg );
606 MSI_SetPropertyW( package, szCOMPANYNAME, company );
610 if ( set_user_sid_prop( package ) != ERROR_SUCCESS)
611 ERR("Failed to set the UserSID property\n");
613 /* Date and time properties */
614 GetSystemTime( &systemtime );
615 if (GetDateFormatW( LOCALE_USER_DEFAULT, DATE_SHORTDATE, &systemtime,
616 NULL, bufstr, sizeof(bufstr)/sizeof(bufstr[0]) ))
617 MSI_SetPropertyW( package, szDate, bufstr );
619 ERR("Couldn't set Date property: GetDateFormat failed with error %d\n", GetLastError());
621 if (GetTimeFormatW( LOCALE_USER_DEFAULT,
622 TIME_FORCE24HOURFORMAT | TIME_NOTIMEMARKER,
623 &systemtime, NULL, bufstr,
624 sizeof(bufstr)/sizeof(bufstr[0]) ))
625 MSI_SetPropertyW( package, szTime, bufstr );
627 ERR("Couldn't set Time property: GetTimeFormat failed with error %d\n", GetLastError());
629 set_msi_assembly_prop( package );
635 static UINT msi_load_summary_properties( MSIPACKAGE *package )
639 MSIHANDLE hdb = alloc_msihandle( &package->db->hdr );
643 static const WCHAR szPackageCode[] = {
644 'P','a','c','k','a','g','e','C','o','d','e',0};
647 ERR("Unable to allocate handle\n");
648 return ERROR_OUTOFMEMORY;
651 rc = MsiGetSummaryInformationW( hdb, NULL, 0, &suminfo );
653 if (rc != ERROR_SUCCESS)
655 ERR("Unable to open Summary Information\n");
659 rc = MsiSummaryInfoGetPropertyW( suminfo, PID_PAGECOUNT, NULL,
660 &count, NULL, NULL, NULL );
661 if (rc != ERROR_SUCCESS)
663 WARN("Unable to query page count: %d\n", rc);
667 /* load package code property */
669 rc = MsiSummaryInfoGetPropertyW( suminfo, PID_REVNUMBER, NULL,
670 NULL, NULL, NULL, &len );
671 if (rc != ERROR_MORE_DATA)
673 WARN("Unable to query revision number: %d\n", rc);
674 rc = ERROR_FUNCTION_FAILED;
679 package_code = msi_alloc( len * sizeof(WCHAR) );
680 rc = MsiSummaryInfoGetPropertyW( suminfo, PID_REVNUMBER, NULL,
681 NULL, NULL, package_code, &len );
682 if (rc != ERROR_SUCCESS)
684 WARN("Unable to query rev number: %d\n", rc);
688 MSI_SetPropertyW( package, szPackageCode, package_code );
689 msi_free( package_code );
691 /* load package attributes */
693 MsiSummaryInfoGetPropertyW( suminfo, PID_WORDCOUNT, NULL,
694 &count, NULL, NULL, NULL );
695 package->WordCount = count;
698 MsiCloseHandle(suminfo);
702 static MSIPACKAGE *msi_alloc_package( void )
706 package = alloc_msiobject( MSIHANDLETYPE_PACKAGE, sizeof (MSIPACKAGE),
710 list_init( &package->components );
711 list_init( &package->features );
712 list_init( &package->files );
713 list_init( &package->tempfiles );
714 list_init( &package->folders );
715 list_init( &package->subscriptions );
716 list_init( &package->appids );
717 list_init( &package->classes );
718 list_init( &package->mimes );
719 list_init( &package->extensions );
720 list_init( &package->progids );
721 list_init( &package->RunningActions );
722 list_init( &package->sourcelist_info );
723 list_init( &package->sourcelist_media );
725 package->ActionFormat = NULL;
726 package->LastAction = NULL;
727 package->dialog = NULL;
728 package->next_dialog = NULL;
729 package->scheduled_action_running = FALSE;
730 package->commit_action_running = FALSE;
731 package->rollback_action_running = FALSE;
737 static UINT msi_load_admin_properties(MSIPACKAGE *package)
742 static const WCHAR stmname[] = {'A','d','m','i','n','P','r','o','p','e','r','t','i','e','s',0};
744 r = read_stream_data(package->db->storage, stmname, FALSE, &data, &sz);
745 if (r != ERROR_SUCCESS)
748 r = msi_parse_command_line(package, (WCHAR *)data);
754 MSIPACKAGE *MSI_CreatePackage( MSIDATABASE *db, LPCWSTR base_url )
756 static const WCHAR szLevel[] = { 'U','I','L','e','v','e','l',0 };
757 static const WCHAR szpi[] = {'%','i',0};
758 static const WCHAR szProductCode[] = {
759 'P','r','o','d','u','c','t','C','o','d','e',0};
766 package = msi_alloc_package();
769 msiobj_addref( &db->hdr );
772 package->WordCount = 0;
773 package->PackagePath = strdupW( db->path );
774 package->BaseURL = strdupW( base_url );
776 create_temp_property_table( package );
777 msi_clone_properties( package );
778 set_installer_properties(package);
779 sprintfW(uilevel,szpi,gUILevel);
780 MSI_SetPropertyW(package, szLevel, uilevel);
782 package->ProductCode = msi_dup_property( package, szProductCode );
783 set_installed_prop( package );
784 r = msi_load_summary_properties( package );
785 if (r != ERROR_SUCCESS)
787 msiobj_release( &package->hdr );
791 if (package->WordCount & MSIWORDCOUNT_ADMINISTRATIVE)
792 msi_load_admin_properties( package );
799 * copy_package_to_temp [internal]
801 * copy the msi file to a temp file to prevent locking a CD
802 * with a multi disc install
804 * FIXME: I think this is wrong, and instead of copying the package,
805 * we should read all the tables to memory, then open the
806 * database to read binary streams on demand.
808 static LPCWSTR copy_package_to_temp( LPCWSTR szPackage, LPWSTR filename )
810 WCHAR path[MAX_PATH];
811 static const WCHAR szMSI[] = {'m','s','i',0};
813 GetTempPathW( MAX_PATH, path );
814 GetTempFileNameW( path, szMSI, 0, filename );
816 if( !CopyFileW( szPackage, filename, FALSE ) )
818 DeleteFileW( filename );
819 ERR("failed to copy package %s\n", debugstr_w(szPackage) );
823 TRACE("Opening relocated package %s\n", debugstr_w( filename ));
827 LPCWSTR msi_download_file( LPCWSTR szUrl, LPWSTR filename )
829 LPINTERNET_CACHE_ENTRY_INFOW cache_entry;
833 /* call will always fail, becase size is 0,
834 * but will return ERROR_FILE_NOT_FOUND first
835 * if the file doesn't exist
837 GetUrlCacheEntryInfoW( szUrl, NULL, &size );
838 if ( GetLastError() != ERROR_FILE_NOT_FOUND )
840 cache_entry = HeapAlloc( GetProcessHeap(), 0, size );
841 if ( !GetUrlCacheEntryInfoW( szUrl, cache_entry, &size ) )
843 HeapFree( GetProcessHeap(), 0, cache_entry );
847 lstrcpyW( filename, cache_entry->lpszLocalFileName );
848 HeapFree( GetProcessHeap(), 0, cache_entry );
852 hr = URLDownloadToCacheFileW( NULL, szUrl, filename, MAX_PATH, 0, NULL );
859 UINT MSI_OpenPackageW(LPCWSTR szPackage, MSIPACKAGE **pPackage)
861 static const WCHAR OriginalDatabase[] =
862 {'O','r','i','g','i','n','a','l','D','a','t','a','b','a','s','e',0};
863 static const WCHAR Database[] = {'D','A','T','A','B','A','S','E',0};
864 MSIDATABASE *db = NULL;
867 LPWSTR ptr, base_url = NULL;
869 WCHAR temppath[MAX_PATH];
870 LPCWSTR file = szPackage;
872 TRACE("%s %p\n", debugstr_w(szPackage), pPackage);
874 if( szPackage[0] == '#' )
876 handle = atoiW(&szPackage[1]);
877 db = msihandle2msiinfo( handle, MSIHANDLETYPE_DATABASE );
880 IWineMsiRemoteDatabase *remote_database;
882 remote_database = (IWineMsiRemoteDatabase *)msi_get_remote( handle );
883 if ( !remote_database )
884 return ERROR_INVALID_HANDLE;
886 IWineMsiRemoteDatabase_Release( remote_database );
887 WARN("MsiOpenPackage not allowed during a custom action!\n");
889 return ERROR_FUNCTION_FAILED;
894 if ( UrlIsW( szPackage, URLIS_URL ) )
896 file = msi_download_file( szPackage, temppath );
898 base_url = strdupW( szPackage );
900 return ERROR_OUTOFMEMORY;
902 ptr = strrchrW( base_url, '/' );
903 if (ptr) *(ptr + 1) = '\0';
906 file = copy_package_to_temp( szPackage, temppath );
908 r = MSI_OpenDatabaseW( file, MSIDBOPEN_READONLY, &db );
909 if( r != ERROR_SUCCESS )
911 if (file != szPackage)
914 if (GetFileAttributesW(szPackage) == INVALID_FILE_ATTRIBUTES)
915 return ERROR_FILE_NOT_FOUND;
921 package = MSI_CreatePackage( db, base_url );
922 msi_free( base_url );
923 msiobj_release( &db->hdr );
926 if (file != szPackage)
929 return ERROR_INSTALL_PACKAGE_INVALID;
932 if( file != szPackage )
933 track_tempfile( package, file );
935 if( szPackage[0] != '#' )
937 MSI_SetPropertyW( package, OriginalDatabase, szPackage );
938 MSI_SetPropertyW( package, Database, szPackage );
942 MSI_SetPropertyW( package, OriginalDatabase, db->path );
943 MSI_SetPropertyW( package, Database, db->path );
948 return ERROR_SUCCESS;
951 UINT WINAPI MsiOpenPackageExW(LPCWSTR szPackage, DWORD dwOptions, MSIHANDLE *phPackage)
953 MSIPACKAGE *package = NULL;
956 TRACE("%s %08x %p\n", debugstr_w(szPackage), dwOptions, phPackage );
958 if( !szPackage || !phPackage )
959 return ERROR_INVALID_PARAMETER;
963 FIXME("Should create an empty database and package\n");
964 return ERROR_FUNCTION_FAILED;
968 FIXME("dwOptions %08x not supported\n", dwOptions);
970 ret = MSI_OpenPackageW( szPackage, &package );
971 if( ret == ERROR_SUCCESS )
973 *phPackage = alloc_msihandle( &package->hdr );
975 ret = ERROR_NOT_ENOUGH_MEMORY;
976 msiobj_release( &package->hdr );
982 UINT WINAPI MsiOpenPackageW(LPCWSTR szPackage, MSIHANDLE *phPackage)
984 return MsiOpenPackageExW( szPackage, 0, phPackage );
987 UINT WINAPI MsiOpenPackageExA(LPCSTR szPackage, DWORD dwOptions, MSIHANDLE *phPackage)
989 LPWSTR szwPack = NULL;
994 szwPack = strdupAtoW( szPackage );
996 return ERROR_OUTOFMEMORY;
999 ret = MsiOpenPackageExW( szwPack, dwOptions, phPackage );
1001 msi_free( szwPack );
1006 UINT WINAPI MsiOpenPackageA(LPCSTR szPackage, MSIHANDLE *phPackage)
1008 return MsiOpenPackageExA( szPackage, 0, phPackage );
1011 MSIHANDLE WINAPI MsiGetActiveDatabase(MSIHANDLE hInstall)
1013 MSIPACKAGE *package;
1014 MSIHANDLE handle = 0;
1015 IWineMsiRemotePackage *remote_package;
1017 TRACE("(%ld)\n",hInstall);
1019 package = msihandle2msiinfo( hInstall, MSIHANDLETYPE_PACKAGE);
1022 handle = alloc_msihandle( &package->db->hdr );
1023 msiobj_release( &package->hdr );
1025 else if ((remote_package = (IWineMsiRemotePackage *)msi_get_remote( hInstall )))
1027 IWineMsiRemotePackage_GetActiveDatabase(remote_package, &handle);
1028 IWineMsiRemotePackage_Release(remote_package);
1034 INT MSI_ProcessMessage( MSIPACKAGE *package, INSTALLMESSAGE eMessageType,
1037 static const WCHAR szActionData[] =
1038 {'A','c','t','i','o','n','D','a','t','a',0};
1039 static const WCHAR szSetProgress[] =
1040 {'S','e','t','P','r','o','g','r','e','s','s',0};
1041 static const WCHAR szActionText[] =
1042 {'A','c','t','i','o','n','T','e','x','t',0};
1046 DWORD total_size = 0;
1052 TRACE("%x\n", eMessageType);
1055 if ((eMessageType & 0xff000000) == INSTALLMESSAGE_ERROR)
1056 log_type |= INSTALLLOGMODE_ERROR;
1057 if ((eMessageType & 0xff000000) == INSTALLMESSAGE_WARNING)
1058 log_type |= INSTALLLOGMODE_WARNING;
1059 if ((eMessageType & 0xff000000) == INSTALLMESSAGE_USER)
1060 log_type |= INSTALLLOGMODE_USER;
1061 if ((eMessageType & 0xff000000) == INSTALLMESSAGE_INFO)
1062 log_type |= INSTALLLOGMODE_INFO;
1063 if ((eMessageType & 0xff000000) == INSTALLMESSAGE_COMMONDATA)
1064 log_type |= INSTALLLOGMODE_COMMONDATA;
1065 if ((eMessageType & 0xff000000) == INSTALLMESSAGE_ACTIONSTART)
1066 log_type |= INSTALLLOGMODE_ACTIONSTART;
1067 if ((eMessageType & 0xff000000) == INSTALLMESSAGE_ACTIONDATA)
1068 log_type |= INSTALLLOGMODE_ACTIONDATA;
1070 if ((eMessageType & 0xff000000) == INSTALLMESSAGE_PROGRESS)
1073 if ((eMessageType & 0xff000000) == INSTALLMESSAGE_ACTIONSTART)
1075 static const WCHAR template_s[]=
1076 {'A','c','t','i','o','n',' ','%','s',':',' ','%','s','.',' ',0};
1077 static const WCHAR format[] =
1078 {'H','H','\'',':','\'','m','m','\'',':','\'','s','s',0};
1080 LPCWSTR action_text, action;
1081 LPWSTR deformatted = NULL;
1083 GetTimeFormatW(LOCALE_USER_DEFAULT, 0, NULL, format, timet, 0x100);
1085 action = MSI_RecordGetString(record, 1);
1086 action_text = MSI_RecordGetString(record, 2);
1088 if (!action || !action_text)
1091 deformat_string(package, action_text, &deformatted);
1093 len = strlenW(timet) + strlenW(action) + strlenW(template_s);
1095 len += strlenW(deformatted);
1096 message = msi_alloc(len*sizeof(WCHAR));
1097 sprintfW(message, template_s, timet, action);
1099 strcatW(message, deformatted);
1100 msi_free(deformatted);
1105 message = msi_alloc(1*sizeof (WCHAR));
1107 msg_field = MSI_RecordGetFieldCount(record);
1108 for (i = 1; i <= msg_field; i++)
1112 static const WCHAR format[] = { '%','i',':',' ',0};
1113 static const WCHAR space[] = { ' ',0};
1115 MSI_RecordGetStringW(record,i,NULL,&sz);
1117 total_size+=sz*sizeof(WCHAR);
1118 tmp = msi_alloc(sz*sizeof(WCHAR));
1119 message = msi_realloc(message,total_size*sizeof (WCHAR));
1121 MSI_RecordGetStringW(record,i,tmp,&sz);
1125 sprintfW(number,format,i);
1126 strcatW(message,number);
1128 strcatW(message,tmp);
1130 strcatW(message,space);
1136 TRACE("(%p %x %x %s)\n", gUIHandlerA, gUIFilter, log_type,
1137 debugstr_w(message));
1139 /* convert it to ASCII */
1140 len = WideCharToMultiByte( CP_ACP, 0, message, -1,
1141 NULL, 0, NULL, NULL );
1142 msg = msi_alloc( len );
1143 WideCharToMultiByte( CP_ACP, 0, message, -1,
1144 msg, len, NULL, NULL );
1146 if (gUIHandlerA && (gUIFilter & log_type))
1148 rc = gUIHandlerA(gUIContext,eMessageType,msg);
1151 if ((!rc) && (gszLogFile[0]) && !((eMessageType & 0xff000000) ==
1152 INSTALLMESSAGE_PROGRESS))
1155 HANDLE log_file = CreateFileW(gszLogFile,GENERIC_WRITE, 0, NULL,
1156 OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
1158 if (log_file != INVALID_HANDLE_VALUE)
1160 SetFilePointer(log_file,0, NULL, FILE_END);
1161 WriteFile(log_file,msg,strlen(msg),&write,NULL);
1162 WriteFile(log_file,"\n",1,&write,NULL);
1163 CloseHandle(log_file);
1170 switch (eMessageType & 0xff000000)
1172 case INSTALLMESSAGE_ACTIONDATA:
1173 /* FIXME: format record here instead of in ui_actiondata to get the
1174 * correct action data for external scripts */
1175 ControlEvent_FireSubscribedEvent(package, szActionData, record);
1177 case INSTALLMESSAGE_ACTIONSTART:
1181 LPCWSTR action_text = MSI_RecordGetString(record, 2);
1183 deformat_string(package, action_text, &deformated);
1184 uirow = MSI_CreateRecord(1);
1185 MSI_RecordSetStringW(uirow, 1, deformated);
1186 TRACE("INSTALLMESSAGE_ACTIONSTART: %s\n", debugstr_w(deformated));
1187 msi_free(deformated);
1189 ControlEvent_FireSubscribedEvent(package, szActionText, uirow);
1191 msiobj_release(&uirow->hdr);
1194 case INSTALLMESSAGE_PROGRESS:
1195 ControlEvent_FireSubscribedEvent(package, szSetProgress, record);
1199 return ERROR_SUCCESS;
1202 INT WINAPI MsiProcessMessage( MSIHANDLE hInstall, INSTALLMESSAGE eMessageType,
1205 UINT ret = ERROR_INVALID_HANDLE;
1206 MSIPACKAGE *package = NULL;
1207 MSIRECORD *record = NULL;
1209 package = msihandle2msiinfo( hInstall, MSIHANDLETYPE_PACKAGE );
1213 IWineMsiRemotePackage *remote_package;
1215 remote_package = (IWineMsiRemotePackage *)msi_get_remote( hInstall );
1216 if (!remote_package)
1217 return ERROR_INVALID_HANDLE;
1219 hr = IWineMsiRemotePackage_ProcessMessage( remote_package, eMessageType, hRecord );
1221 IWineMsiRemotePackage_Release( remote_package );
1225 if (HRESULT_FACILITY(hr) == FACILITY_WIN32)
1226 return HRESULT_CODE(hr);
1228 return ERROR_FUNCTION_FAILED;
1231 return ERROR_SUCCESS;
1234 record = msihandle2msiinfo( hRecord, MSIHANDLETYPE_RECORD );
1238 ret = MSI_ProcessMessage( package, eMessageType, record );
1241 msiobj_release( &package->hdr );
1243 msiobj_release( &record->hdr );
1250 UINT WINAPI MsiSetPropertyA( MSIHANDLE hInstall, LPCSTR szName, LPCSTR szValue )
1252 LPWSTR szwName = NULL, szwValue = NULL;
1253 UINT r = ERROR_OUTOFMEMORY;
1255 szwName = strdupAtoW( szName );
1256 if( szName && !szwName )
1259 szwValue = strdupAtoW( szValue );
1260 if( szValue && !szwValue )
1263 r = MsiSetPropertyW( hInstall, szwName, szwValue);
1266 msi_free( szwName );
1267 msi_free( szwValue );
1272 UINT MSI_SetPropertyW( MSIPACKAGE *package, LPCWSTR szName, LPCWSTR szValue)
1275 MSIRECORD *row = NULL;
1280 static const WCHAR Insert[] = {
1281 'I','N','S','E','R','T',' ','i','n','t','o',' ',
1282 '`','_','P','r','o','p','e','r','t','y','`',' ','(',
1283 '`','_','P','r','o','p','e','r','t','y','`',',',
1284 '`','V','a','l','u','e','`',')',' ','V','A','L','U','E','S'
1285 ,' ','(','?',',','?',')',0};
1286 static const WCHAR Update[] = {
1287 'U','P','D','A','T','E',' ','`','_','P','r','o','p','e','r','t','y','`',
1288 ' ','s','e','t',' ','`','V','a','l','u','e','`',' ','=',' ','?',' ',
1289 'w','h','e','r','e',' ','`','_','P','r','o','p','e','r','t','y','`',
1290 ' ','=',' ','\'','%','s','\'',0};
1291 static const WCHAR Delete[] = {
1292 'D','E','L','E','T','E',' ','F','R','O','M',' ',
1293 '`','_','P','r','o','p','e','r','t','y','`',' ','W','H','E','R','E',' ',
1294 '`','_','P','r','o','p','e','r','t','y','`',' ','=',' ','\'','%','s','\'',0};
1296 TRACE("%p %s %s\n", package, debugstr_w(szName), debugstr_w(szValue));
1299 return ERROR_INVALID_PARAMETER;
1301 /* this one is weird... */
1303 return szValue ? ERROR_FUNCTION_FAILED : ERROR_SUCCESS;
1305 rc = MSI_GetPropertyW(package, szName, 0, &sz);
1306 if (!szValue || !*szValue)
1308 sprintfW(Query, Delete, szName);
1310 else if (rc == ERROR_MORE_DATA || rc == ERROR_SUCCESS)
1312 sprintfW(Query, Update, szName);
1314 row = MSI_CreateRecord(1);
1315 MSI_RecordSetStringW(row, 1, szValue);
1319 strcpyW(Query, Insert);
1321 row = MSI_CreateRecord(2);
1322 MSI_RecordSetStringW(row, 1, szName);
1323 MSI_RecordSetStringW(row, 2, szValue);
1326 rc = MSI_DatabaseOpenViewW(package->db, Query, &view);
1327 if (rc == ERROR_SUCCESS)
1329 rc = MSI_ViewExecute(view, row);
1330 MSI_ViewClose(view);
1331 msiobj_release(&view->hdr);
1334 msiobj_release(&row->hdr);
1339 UINT WINAPI MsiSetPropertyW( MSIHANDLE hInstall, LPCWSTR szName, LPCWSTR szValue)
1341 MSIPACKAGE *package;
1344 package = msihandle2msiinfo( hInstall, MSIHANDLETYPE_PACKAGE);
1348 BSTR name = NULL, value = NULL;
1349 IWineMsiRemotePackage *remote_package;
1351 remote_package = (IWineMsiRemotePackage *)msi_get_remote( hInstall );
1352 if (!remote_package)
1353 return ERROR_INVALID_HANDLE;
1355 name = SysAllocString( szName );
1356 value = SysAllocString( szValue );
1357 if ((!name && szName) || (!value && szValue))
1359 SysFreeString( name );
1360 SysFreeString( value );
1361 IWineMsiRemotePackage_Release( remote_package );
1362 return ERROR_OUTOFMEMORY;
1365 hr = IWineMsiRemotePackage_SetProperty( remote_package, name, value );
1367 SysFreeString( name );
1368 SysFreeString( value );
1369 IWineMsiRemotePackage_Release( remote_package );
1373 if (HRESULT_FACILITY(hr) == FACILITY_WIN32)
1374 return HRESULT_CODE(hr);
1376 return ERROR_FUNCTION_FAILED;
1379 return ERROR_SUCCESS;
1382 ret = MSI_SetPropertyW( package, szName, szValue);
1383 msiobj_release( &package->hdr );
1387 static MSIRECORD *MSI_GetPropertyRow( MSIPACKAGE *package, LPCWSTR name )
1389 static const WCHAR query[]= {
1390 'S','E','L','E','C','T',' ','`','V','a','l','u','e','`',' ',
1391 'F','R','O','M',' ' ,'`','_','P','r','o','p','e','r','t','y','`',
1392 ' ','W','H','E','R','E',' ' ,'`','_','P','r','o','p','e','r','t','y','`',
1393 '=','\'','%','s','\'',0};
1395 if (!name || !*name)
1398 return MSI_QueryGetRecord( package->db, query, name );
1401 /* internal function, not compatible with MsiGetPropertyW */
1402 UINT MSI_GetPropertyW( MSIPACKAGE *package, LPCWSTR szName,
1403 LPWSTR szValueBuf, LPDWORD pchValueBuf )
1406 UINT rc = ERROR_FUNCTION_FAILED;
1408 row = MSI_GetPropertyRow( package, szName );
1410 if (*pchValueBuf > 0)
1415 rc = MSI_RecordGetStringW(row, 1, szValueBuf, pchValueBuf);
1416 msiobj_release(&row->hdr);
1419 if (rc == ERROR_SUCCESS)
1420 TRACE("returning %s for property %s\n", debugstr_w(szValueBuf),
1421 debugstr_w(szName));
1422 else if (rc == ERROR_MORE_DATA)
1423 TRACE("need %d sized buffer for %s\n", *pchValueBuf,
1424 debugstr_w(szName));
1428 TRACE("property %s not found\n", debugstr_w(szName));
1434 LPWSTR msi_dup_property(MSIPACKAGE *package, LPCWSTR prop)
1440 r = MSI_GetPropertyW(package, prop, NULL, &sz);
1441 if (r != ERROR_SUCCESS && r != ERROR_MORE_DATA)
1445 str = msi_alloc(sz * sizeof(WCHAR));
1446 r = MSI_GetPropertyW(package, prop, str, &sz);
1447 if (r != ERROR_SUCCESS)
1456 int msi_get_property_int(MSIPACKAGE *package, LPCWSTR prop, int def)
1458 LPWSTR str = msi_dup_property(package, prop);
1459 int val = str ? atoiW(str) : def;
1464 static UINT MSI_GetProperty( MSIHANDLE handle, LPCWSTR name,
1465 awstring *szValueBuf, LPDWORD pchValueBuf )
1467 static const WCHAR empty[] = {0};
1468 MSIPACKAGE *package;
1469 MSIRECORD *row = NULL;
1470 UINT r = ERROR_FUNCTION_FAILED;
1473 TRACE("%lu %s %p %p\n", handle, debugstr_w(name),
1474 szValueBuf->str.w, pchValueBuf );
1477 return ERROR_INVALID_PARAMETER;
1479 package = msihandle2msiinfo( handle, MSIHANDLETYPE_PACKAGE );
1483 IWineMsiRemotePackage *remote_package;
1484 LPWSTR value = NULL;
1488 remote_package = (IWineMsiRemotePackage *)msi_get_remote( handle );
1489 if (!remote_package)
1490 return ERROR_INVALID_HANDLE;
1492 bname = SysAllocString( name );
1495 IWineMsiRemotePackage_Release( remote_package );
1496 return ERROR_OUTOFMEMORY;
1500 hr = IWineMsiRemotePackage_GetProperty( remote_package, bname, NULL, &len );
1505 value = msi_alloc(len * sizeof(WCHAR));
1508 r = ERROR_OUTOFMEMORY;
1512 hr = IWineMsiRemotePackage_GetProperty( remote_package, bname, (BSTR *)value, &len );
1516 r = msi_strcpy_to_awstring( value, szValueBuf, pchValueBuf );
1518 /* Bug required by Adobe installers */
1519 if (!szValueBuf->unicode && !szValueBuf->str.a)
1520 *pchValueBuf *= sizeof(WCHAR);
1523 IWineMsiRemotePackage_Release(remote_package);
1524 SysFreeString(bname);
1529 if (HRESULT_FACILITY(hr) == FACILITY_WIN32)
1530 return HRESULT_CODE(hr);
1532 return ERROR_FUNCTION_FAILED;
1538 row = MSI_GetPropertyRow( package, name );
1540 val = MSI_RecordGetString( row, 1 );
1545 r = msi_strcpy_to_awstring( val, szValueBuf, pchValueBuf );
1548 msiobj_release( &row->hdr );
1549 msiobj_release( &package->hdr );
1554 UINT WINAPI MsiGetPropertyA( MSIHANDLE hInstall, LPCSTR szName,
1555 LPSTR szValueBuf, LPDWORD pchValueBuf )
1561 val.unicode = FALSE;
1562 val.str.a = szValueBuf;
1564 name = strdupAtoW( szName );
1565 if (szName && !name)
1566 return ERROR_OUTOFMEMORY;
1568 r = MSI_GetProperty( hInstall, name, &val, pchValueBuf );
1573 UINT WINAPI MsiGetPropertyW( MSIHANDLE hInstall, LPCWSTR szName,
1574 LPWSTR szValueBuf, LPDWORD pchValueBuf )
1579 val.str.w = szValueBuf;
1581 return MSI_GetProperty( hInstall, szName, &val, pchValueBuf );
1584 typedef struct _msi_remote_package_impl {
1585 const IWineMsiRemotePackageVtbl *lpVtbl;
1588 } msi_remote_package_impl;
1590 static inline msi_remote_package_impl* mrp_from_IWineMsiRemotePackage( IWineMsiRemotePackage* iface )
1592 return (msi_remote_package_impl*) iface;
1595 static HRESULT WINAPI mrp_QueryInterface( IWineMsiRemotePackage *iface,
1596 REFIID riid,LPVOID *ppobj)
1598 if( IsEqualCLSID( riid, &IID_IUnknown ) ||
1599 IsEqualCLSID( riid, &IID_IWineMsiRemotePackage ) )
1601 IUnknown_AddRef( iface );
1606 return E_NOINTERFACE;
1609 static ULONG WINAPI mrp_AddRef( IWineMsiRemotePackage *iface )
1611 msi_remote_package_impl* This = mrp_from_IWineMsiRemotePackage( iface );
1613 return InterlockedIncrement( &This->refs );
1616 static ULONG WINAPI mrp_Release( IWineMsiRemotePackage *iface )
1618 msi_remote_package_impl* This = mrp_from_IWineMsiRemotePackage( iface );
1621 r = InterlockedDecrement( &This->refs );
1624 MsiCloseHandle( This->package );
1630 static HRESULT WINAPI mrp_SetMsiHandle( IWineMsiRemotePackage *iface, MSIHANDLE handle )
1632 msi_remote_package_impl* This = mrp_from_IWineMsiRemotePackage( iface );
1633 This->package = handle;
1637 HRESULT WINAPI mrp_GetActiveDatabase( IWineMsiRemotePackage *iface, MSIHANDLE *handle )
1639 msi_remote_package_impl* This = mrp_from_IWineMsiRemotePackage( iface );
1640 IWineMsiRemoteDatabase *rdb = NULL;
1644 hr = create_msi_remote_database( NULL, (LPVOID *)&rdb );
1645 if (FAILED(hr) || !rdb)
1647 ERR("Failed to create remote database\n");
1651 hdb = MsiGetActiveDatabase(This->package);
1653 hr = IWineMsiRemoteDatabase_SetMsiHandle( rdb, hdb );
1656 ERR("Failed to set the database handle\n");
1660 *handle = alloc_msi_remote_handle( (IUnknown *)rdb );
1664 HRESULT WINAPI mrp_GetProperty( IWineMsiRemotePackage *iface, BSTR property, BSTR *value, DWORD *size )
1666 msi_remote_package_impl* This = mrp_from_IWineMsiRemotePackage( iface );
1669 r = MsiGetPropertyW(This->package, (LPWSTR)property, (LPWSTR)value, size);
1670 if (r != ERROR_SUCCESS)
1671 return HRESULT_FROM_WIN32(r);
1676 HRESULT WINAPI mrp_SetProperty( IWineMsiRemotePackage *iface, BSTR property, BSTR value )
1678 msi_remote_package_impl* This = mrp_from_IWineMsiRemotePackage( iface );
1679 UINT r = MsiSetPropertyW(This->package, (LPWSTR)property, (LPWSTR)value);
1680 return HRESULT_FROM_WIN32(r);
1683 HRESULT WINAPI mrp_ProcessMessage( IWineMsiRemotePackage *iface, INSTALLMESSAGE message, MSIHANDLE record )
1685 msi_remote_package_impl* This = mrp_from_IWineMsiRemotePackage( iface );
1686 UINT r = MsiProcessMessage(This->package, message, record);
1687 return HRESULT_FROM_WIN32(r);
1690 HRESULT WINAPI mrp_DoAction( IWineMsiRemotePackage *iface, BSTR action )
1692 msi_remote_package_impl* This = mrp_from_IWineMsiRemotePackage( iface );
1693 UINT r = MsiDoActionW(This->package, (LPWSTR)action);
1694 return HRESULT_FROM_WIN32(r);
1697 HRESULT WINAPI mrp_Sequence( IWineMsiRemotePackage *iface, BSTR table, int sequence )
1699 msi_remote_package_impl* This = mrp_from_IWineMsiRemotePackage( iface );
1700 UINT r = MsiSequenceW(This->package, (LPWSTR)table, sequence);
1701 return HRESULT_FROM_WIN32(r);
1704 HRESULT WINAPI mrp_GetTargetPath( IWineMsiRemotePackage *iface, BSTR folder, BSTR *value, DWORD *size )
1706 msi_remote_package_impl* This = mrp_from_IWineMsiRemotePackage( iface );
1707 UINT r = MsiGetTargetPathW(This->package, (LPWSTR)folder, (LPWSTR)value, size);
1708 return HRESULT_FROM_WIN32(r);
1711 HRESULT WINAPI mrp_SetTargetPath( IWineMsiRemotePackage *iface, BSTR folder, BSTR value)
1713 msi_remote_package_impl* This = mrp_from_IWineMsiRemotePackage( iface );
1714 UINT r = MsiSetTargetPathW(This->package, (LPWSTR)folder, (LPWSTR)value);
1715 return HRESULT_FROM_WIN32(r);
1718 HRESULT WINAPI mrp_GetSourcePath( IWineMsiRemotePackage *iface, BSTR folder, BSTR *value, DWORD *size )
1720 msi_remote_package_impl* This = mrp_from_IWineMsiRemotePackage( iface );
1721 UINT r = MsiGetSourcePathW(This->package, (LPWSTR)folder, (LPWSTR)value, size);
1722 return HRESULT_FROM_WIN32(r);
1725 HRESULT WINAPI mrp_GetMode( IWineMsiRemotePackage *iface, MSIRUNMODE mode, BOOL *ret )
1727 msi_remote_package_impl* This = mrp_from_IWineMsiRemotePackage( iface );
1728 *ret = MsiGetMode(This->package, mode);
1732 HRESULT WINAPI mrp_GetFeatureState( IWineMsiRemotePackage *iface, BSTR feature,
1733 INSTALLSTATE *installed, INSTALLSTATE *action )
1735 msi_remote_package_impl* This = mrp_from_IWineMsiRemotePackage( iface );
1736 UINT r = MsiGetFeatureStateW(This->package, (LPWSTR)feature, installed, action);
1737 return HRESULT_FROM_WIN32(r);
1740 HRESULT WINAPI mrp_SetFeatureState( IWineMsiRemotePackage *iface, BSTR feature, INSTALLSTATE state )
1742 msi_remote_package_impl* This = mrp_from_IWineMsiRemotePackage( iface );
1743 UINT r = MsiSetFeatureStateW(This->package, (LPWSTR)feature, state);
1744 return HRESULT_FROM_WIN32(r);
1747 HRESULT WINAPI mrp_GetComponentState( IWineMsiRemotePackage *iface, BSTR component,
1748 INSTALLSTATE *installed, INSTALLSTATE *action )
1750 msi_remote_package_impl* This = mrp_from_IWineMsiRemotePackage( iface );
1751 UINT r = MsiGetComponentStateW(This->package, (LPWSTR)component, installed, action);
1752 return HRESULT_FROM_WIN32(r);
1755 HRESULT WINAPI mrp_SetComponentState( IWineMsiRemotePackage *iface, BSTR component, INSTALLSTATE state )
1757 msi_remote_package_impl* This = mrp_from_IWineMsiRemotePackage( iface );
1758 UINT r = MsiSetComponentStateW(This->package, (LPWSTR)component, state);
1759 return HRESULT_FROM_WIN32(r);
1762 HRESULT WINAPI mrp_GetLanguage( IWineMsiRemotePackage *iface, LANGID *language )
1764 msi_remote_package_impl* This = mrp_from_IWineMsiRemotePackage( iface );
1765 *language = MsiGetLanguage(This->package);
1769 HRESULT WINAPI mrp_SetInstallLevel( IWineMsiRemotePackage *iface, int level )
1771 msi_remote_package_impl* This = mrp_from_IWineMsiRemotePackage( iface );
1772 UINT r = MsiSetInstallLevel(This->package, level);
1773 return HRESULT_FROM_WIN32(r);
1776 HRESULT WINAPI mrp_FormatRecord( IWineMsiRemotePackage *iface, MSIHANDLE record,
1777 BSTR value, DWORD *size )
1779 msi_remote_package_impl* This = mrp_from_IWineMsiRemotePackage( iface );
1780 UINT r = MsiFormatRecordW(This->package, record, (LPWSTR)value, size);
1781 return HRESULT_FROM_WIN32(r);
1784 HRESULT WINAPI mrp_EvaluateCondition( IWineMsiRemotePackage *iface, BSTR condition )
1786 msi_remote_package_impl* This = mrp_from_IWineMsiRemotePackage( iface );
1787 UINT r = MsiEvaluateConditionW(This->package, (LPWSTR)condition);
1788 return HRESULT_FROM_WIN32(r);
1791 static const IWineMsiRemotePackageVtbl msi_remote_package_vtbl =
1797 mrp_GetActiveDatabase,
1807 mrp_GetFeatureState,
1808 mrp_SetFeatureState,
1809 mrp_GetComponentState,
1810 mrp_SetComponentState,
1812 mrp_SetInstallLevel,
1814 mrp_EvaluateCondition,
1817 HRESULT create_msi_remote_package( IUnknown *pOuter, LPVOID *ppObj )
1819 msi_remote_package_impl* This;
1821 This = msi_alloc( sizeof *This );
1823 return E_OUTOFMEMORY;
1825 This->lpVtbl = &msi_remote_package_vtbl;
1834 UINT msi_package_add_info(MSIPACKAGE *package, DWORD context, DWORD options,
1835 LPCWSTR property, LPWSTR value)
1837 MSISOURCELISTINFO *info;
1839 info = msi_alloc(sizeof(MSISOURCELISTINFO));
1841 return ERROR_OUTOFMEMORY;
1843 info->context = context;
1844 info->options = options;
1845 info->property = property;
1846 info->value = strdupW(value);
1847 list_add_head(&package->sourcelist_info, &info->entry);
1849 return ERROR_SUCCESS;
1852 UINT msi_package_add_media_disk(MSIPACKAGE *package, DWORD context, DWORD options,
1853 DWORD disk_id, LPWSTR volume_label, LPWSTR disk_prompt)
1857 disk = msi_alloc(sizeof(MSIMEDIADISK));
1859 return ERROR_OUTOFMEMORY;
1861 disk->context = context;
1862 disk->options = options;
1863 disk->disk_id = disk_id;
1864 disk->volume_label = strdupW(volume_label);
1865 disk->disk_prompt = strdupW(disk_prompt);
1866 list_add_head(&package->sourcelist_media, &disk->entry);
1868 return ERROR_SUCCESS;