100 files changed, 22827 insertions, 0 deletions

diff --git a/src/ext/ComPlus/CSharp.Build.props b/src/ext/ComPlus/CSharp.Build.props
new file mode 100644
index 00000000..b12f4c6e
--- /dev/null
+++ b/src/ext/ComPlus/CSharp.Build.props
@@ -0,0 +1,11 @@
+<!-- Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information. -->
+<!--
+  Do NOT modify this file. Update the canonical version in Home\repo-template\src\CSharp.Build.props
+  then update all of the repos.
+-->
+<Project>
+  <PropertyGroup>
+    <SignAssembly>true</SignAssembly>
+    <AssemblyOriginatorKeyFile>$([System.IO.Path]::GetFullPath($(MSBuildThisFileDirectory)wix.snk))</AssemblyOriginatorKeyFile>
+  </PropertyGroup>
+</Project>
diff --git a/src/ext/ComPlus/ComPlus.wixext.sln b/src/ext/ComPlus/ComPlus.wixext.sln
new file mode 100644
index 00000000..9fab25f2
--- /dev/null
+++ b/src/ext/ComPlus/ComPlus.wixext.sln
@@ -0,0 +1,64 @@
+
+Microsoft Visual Studio Solution File, Format Version 12.00
+# Visual Studio Version 16
+VisualStudioVersion = 16.0.30611.23
+MinimumVisualStudioVersion = 10.0.40219.1
+Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "complusca", "src\ca\complusca.vcxproj", "{BDEF51ED-E242-4FA2-801A-01B127DF851A}"
+EndProject
+Project("{930C7802-8A8C-48F9-8165-68863BCCD9DD}") = "complus", "src\wixlib\complus.wixproj", "{E191E61E-E098-4F71-888F-51A79F952022}"
+        ProjectSection(ProjectDependencies) = postProject
+                {BDEF51ED-E242-4FA2-801A-01B127DF851A} = {BDEF51ED-E242-4FA2-801A-01B127DF851A}
+        EndProjectSection
+EndProject
+Project("{9A19103F-16F7-4668-BE54-9A1E7A4F7556}") = "WixToolset.ComPlus.wixext", "src\wixext\WixToolset.ComPlus.wixext.csproj", "{1497B777-330B-4CFE-927A-22850CD24D64}"
+EndProject
+Project("{9A19103F-16F7-4668-BE54-9A1E7A4F7556}") = "WixToolsetTest.ComPlus", "src\test\WixToolsetTest.ComPlus\WixToolsetTest.ComPlus.csproj", "{2FC5F039-EACF-428B-BA87-8CDE1D25E121}"
+EndProject
+Global
+        GlobalSection(SolutionConfigurationPlatforms) = preSolution
+                Debug|Any CPU = Debug|Any CPU
+                Debug|x86 = Debug|x86
+                Release|Any CPU = Release|Any CPU
+                Release|x86 = Release|x86
+        EndGlobalSection
+        GlobalSection(ProjectConfigurationPlatforms) = postSolution
+                {BDEF51ED-E242-4FA2-801A-01B127DF851A}.Debug|Any CPU.ActiveCfg = Debug|Win32
+                {BDEF51ED-E242-4FA2-801A-01B127DF851A}.Debug|Any CPU.Build.0 = Debug|Win32
+                {BDEF51ED-E242-4FA2-801A-01B127DF851A}.Debug|x86.ActiveCfg = Debug|Win32
+                {BDEF51ED-E242-4FA2-801A-01B127DF851A}.Debug|x86.Build.0 = Debug|Win32
+                {BDEF51ED-E242-4FA2-801A-01B127DF851A}.Release|Any CPU.ActiveCfg = Release|Win32
+                {BDEF51ED-E242-4FA2-801A-01B127DF851A}.Release|Any CPU.Build.0 = Release|Win32
+                {BDEF51ED-E242-4FA2-801A-01B127DF851A}.Release|x86.ActiveCfg = Release|Win32
+                {BDEF51ED-E242-4FA2-801A-01B127DF851A}.Release|x86.Build.0 = Release|Win32
+                {E191E61E-E098-4F71-888F-51A79F952022}.Debug|Any CPU.ActiveCfg = Debug|x86
+                {E191E61E-E098-4F71-888F-51A79F952022}.Debug|Any CPU.Build.0 = Debug|x86
+                {E191E61E-E098-4F71-888F-51A79F952022}.Debug|x86.ActiveCfg = Debug|x86
+                {E191E61E-E098-4F71-888F-51A79F952022}.Debug|x86.Build.0 = Debug|x86
+                {E191E61E-E098-4F71-888F-51A79F952022}.Release|Any CPU.ActiveCfg = Release|x86
+                {E191E61E-E098-4F71-888F-51A79F952022}.Release|Any CPU.Build.0 = Release|x86
+                {E191E61E-E098-4F71-888F-51A79F952022}.Release|x86.ActiveCfg = Release|x86
+                {E191E61E-E098-4F71-888F-51A79F952022}.Release|x86.Build.0 = Release|x86
+                {1497B777-330B-4CFE-927A-22850CD24D64}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
+                {1497B777-330B-4CFE-927A-22850CD24D64}.Debug|Any CPU.Build.0 = Debug|Any CPU
+                {1497B777-330B-4CFE-927A-22850CD24D64}.Debug|x86.ActiveCfg = Debug|Any CPU
+                {1497B777-330B-4CFE-927A-22850CD24D64}.Debug|x86.Build.0 = Debug|Any CPU
+                {1497B777-330B-4CFE-927A-22850CD24D64}.Release|Any CPU.ActiveCfg = Release|Any CPU
+                {1497B777-330B-4CFE-927A-22850CD24D64}.Release|Any CPU.Build.0 = Release|Any CPU
+                {1497B777-330B-4CFE-927A-22850CD24D64}.Release|x86.ActiveCfg = Release|Any CPU
+                {1497B777-330B-4CFE-927A-22850CD24D64}.Release|x86.Build.0 = Release|Any CPU
+                {2FC5F039-EACF-428B-BA87-8CDE1D25E121}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
+                {2FC5F039-EACF-428B-BA87-8CDE1D25E121}.Debug|Any CPU.Build.0 = Debug|Any CPU
+                {2FC5F039-EACF-428B-BA87-8CDE1D25E121}.Debug|x86.ActiveCfg = Debug|Any CPU
+                {2FC5F039-EACF-428B-BA87-8CDE1D25E121}.Debug|x86.Build.0 = Debug|Any CPU
+                {2FC5F039-EACF-428B-BA87-8CDE1D25E121}.Release|Any CPU.ActiveCfg = Release|Any CPU
+                {2FC5F039-EACF-428B-BA87-8CDE1D25E121}.Release|Any CPU.Build.0 = Release|Any CPU
+                {2FC5F039-EACF-428B-BA87-8CDE1D25E121}.Release|x86.ActiveCfg = Release|Any CPU
+                {2FC5F039-EACF-428B-BA87-8CDE1D25E121}.Release|x86.Build.0 = Release|Any CPU
+        EndGlobalSection
+        GlobalSection(SolutionProperties) = preSolution
+                HideSolutionNode = FALSE
+        EndGlobalSection
+        GlobalSection(ExtensibilityGlobals) = postSolution
+                SolutionGuid = {3E1857C4-5EE1-4C9E-9390-9954E041546D}
+        EndGlobalSection
+EndGlobal
diff --git a/src/ext/ComPlus/Cpp.Build.props b/src/ext/ComPlus/Cpp.Build.props
new file mode 100644
index 00000000..9551e76f
--- /dev/null
+++ b/src/ext/ComPlus/Cpp.Build.props
@@ -0,0 +1,88 @@
+<?xml version="1.0" encoding="utf-8"?>
+<!-- Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information. -->
+
+<Project>
+  <PropertyGroup>
+    <Platform Condition=" '$(Platform)' == '' OR '$(Platform)' == 'AnyCPU' OR '$(Platform)' == 'x86' ">Win32</Platform>
+    <NormalizedPlatform Condition=" '$(Platform)'=='Win32' ">x86</NormalizedPlatform>
+    <NormalizedPlatform Condition=" '$(NormalizedPlatform)'=='' ">$(Platform)</NormalizedPlatform>
+    <IntDir>$(BaseIntermediateOutputPath)$(Configuration)\$(NormalizedPlatform)\</IntDir>
+    <OutDir>$(OutputPath)$(NormalizedPlatform)\</OutDir>
+  </PropertyGroup>
+
+  <PropertyGroup Condition="'$(WindowsTargetPlatformVersion)'=='' AND '$(VisualStudioVersion)'>='15.0'">
+    <WindowsTargetPlatformVersion>$([Microsoft.Build.Utilities.ToolLocationHelper]::GetLatestSDKTargetPlatformVersion('Windows', '10.0'))</WindowsTargetPlatformVersion>
+  </PropertyGroup>
+
+  <ItemDefinitionGroup>
+    <ClCompile>
+      <DisableSpecificWarnings>$(DisableSpecificCompilerWarnings)</DisableSpecificWarnings>
+      <WarningLevel>Level4</WarningLevel>
+      <AdditionalIncludeDirectories>$(ProjectDir)inc;$(MSBuildProjectDirectory);$(IntDir);$(SqlCESdkIncludePath);$(ProjectAdditionalIncludeDirectories);%(AdditionalIncludeDirectories)</AdditionalIncludeDirectories>
+      <PreprocessorDefinitions>WIN32;_WINDOWS;_WIN32_MSI=500;_WIN32_WINNT=0x0501;$(ArmPreprocessorDefinitions);$(UnicodePreprocessorDefinitions);_CRT_STDIO_LEGACY_WIDE_SPECIFIERS;_WINSOCK_DEPRECATED_NO_WARNINGS;%(PreprocessorDefinitions)</PreprocessorDefinitions>
+      <PrecompiledHeader>Use</PrecompiledHeader>
+      <PrecompiledHeaderFile>precomp.h</PrecompiledHeaderFile>
+      <CallingConvention Condition="'$(Platform)'=='Win32'">StdCall</CallingConvention>
+      <TreatWarningAsError>true</TreatWarningAsError>
+      <ExceptionHandling>false</ExceptionHandling>
+      <AdditionalOptions>-YlprecompDefine</AdditionalOptions>
+      <AdditionalOptions Condition=" $(PlatformToolset.StartsWith('v14')) ">/Zc:threadSafeInit- %(AdditionalOptions)</AdditionalOptions>
+      <MultiProcessorCompilation Condition=" $(NUMBER_OF_PROCESSORS) &gt; 4 ">true</MultiProcessorCompilation>
+    </ClCompile>
+    <ResourceCompile>
+      <PreprocessorDefinitions>$(ArmPreprocessorDefinitions);%(PreprocessorDefinitions)</PreprocessorDefinitions>
+      <AdditionalIncludeDirectories>$(ProjectAdditionalResourceIncludeDirectories);%(AdditionalIncludeDirectories)</AdditionalIncludeDirectories>
+    </ResourceCompile>
+    <Lib>
+      <AdditionalLibraryDirectories>$(OutDir);$(AdditionalMultiTargetLibraryPath);$(ProjectAdditionalLibraryDirectories);%(AdditionalLibraryDirectories)</AdditionalLibraryDirectories>
+    </Lib>
+    <Link>
+      <SubSystem>$(ProjectSubSystem)</SubSystem>
+      <ModuleDefinitionFile>$(ProjectModuleDefinitionFile)</ModuleDefinitionFile>
+      <NoEntryPoint>$(ResourceOnlyDll)</NoEntryPoint>
+      <GenerateDebugInformation>true</GenerateDebugInformation>
+      <AdditionalDependencies>$(ProjectAdditionalLinkLibraries);advapi32.lib;comdlg32.lib;user32.lib;oleaut32.lib;gdi32.lib;shell32.lib;ole32.lib;version.lib;%(AdditionalDependencies)</AdditionalDependencies>
+      <AdditionalLibraryDirectories>$(OutDir);$(AdditionalMultiTargetLibraryPath);$(ArmLibraryDirectories);$(ProjectAdditionalLinkLibraryDirectories);%(AdditionalLibraryDirectories)</AdditionalLibraryDirectories>
+      <AdditionalOptions Condition=" $(PlatformToolset.StartsWith('v14')) ">/IGNORE:4099 %(AdditionalOptions)</AdditionalOptions>
+    </Link>
+  </ItemDefinitionGroup>
+
+  <ItemDefinitionGroup Condition=" '$(Platform)'=='Win32' and '$(PlatformToolset)'!='v100'">
+    <ClCompile>
+      <EnableEnhancedInstructionSet>NoExtensions</EnableEnhancedInstructionSet>
+    </ClCompile>
+  </ItemDefinitionGroup>
+  <ItemDefinitionGroup Condition=" '$(Platform)'=='arm' ">
+    <ClCompile>
+      <CallingConvention>CDecl</CallingConvention>
+    </ClCompile>
+  </ItemDefinitionGroup>
+  <ItemDefinitionGroup Condition=" '$(ConfigurationType)'=='StaticLibrary' ">
+    <ClCompile>
+      <DebugInformationFormat>OldStyle</DebugInformationFormat>
+      <OmitDefaultLibName>true</OmitDefaultLibName>
+      <IgnoreAllDefaultLibraries>true</IgnoreAllDefaultLibraries>
+    </ClCompile>
+  </ItemDefinitionGroup>
+  <ItemDefinitionGroup Condition=" '$(Configuration)'=='Debug' ">
+    <ClCompile>
+      <Optimization>Disabled</Optimization>
+      <BasicRuntimeChecks>EnableFastChecks</BasicRuntimeChecks>
+      <PreprocessorDefinitions>_DEBUG;DEBUG;%(PreprocessorDefinitions)</PreprocessorDefinitions>
+      <RuntimeLibrary>MultiThreadedDebug</RuntimeLibrary>
+    </ClCompile>
+  </ItemDefinitionGroup>
+  <ItemDefinitionGroup Condition=" '$(Configuration)'=='Release' ">
+    <ClCompile>
+      <Optimization>MinSpace</Optimization>
+      <PreprocessorDefinitions>NDEBUG;%(PreprocessorDefinitions)</PreprocessorDefinitions>
+      <FunctionLevelLinking>true</FunctionLevelLinking>
+      <IntrinsicFunctions>true</IntrinsicFunctions>
+      <RuntimeLibrary>MultiThreaded</RuntimeLibrary>
+    </ClCompile>
+    <Link>
+      <EnableCOMDATFolding>true</EnableCOMDATFolding>
+      <OptimizeReferences>true</OptimizeReferences>
+    </Link>
+  </ItemDefinitionGroup>
+</Project>
diff --git a/src/ext/ComPlus/Directory.Build.props b/src/ext/ComPlus/Directory.Build.props
new file mode 100644
index 00000000..b3c6287c
--- /dev/null
+++ b/src/ext/ComPlus/Directory.Build.props
@@ -0,0 +1,27 @@
+<?xml version="1.0" encoding="utf-8"?>
+<!-- Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information. -->
+<!--
+  Do NOT modify this file. Update the canonical version in Home\repo-template\src\Directory.Build.props
+  then update all of the repos.
+-->
+<Project>
+  <PropertyGroup>
+    <Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
+    <EnableSourceLink Condition=" '$(NCrunch)' == '1' ">false</EnableSourceLink>
+    <MSBuildWarningsAsMessages>MSB3246</MSBuildWarningsAsMessages>
+
+    <ProjectName Condition=" '$(ProjectName)' == '' ">$(MSBuildProjectName)</ProjectName>
+    <BaseOutputPath>$([System.IO.Path]::GetFullPath($(MSBuildThisFileDirectory)..\build\))</BaseOutputPath>
+    <BaseIntermediateOutputPath>$(BaseOutputPath)obj\$(ProjectName)\</BaseIntermediateOutputPath>
+    <OutputPath>$(BaseOutputPath)$(Configuration)\</OutputPath>
+
+    <Authors>WiX Toolset Team</Authors>
+    <Company>WiX Toolset</Company>
+    <Copyright>Copyright (c) .NET Foundation and contributors. All rights reserved.</Copyright>
+    <PackageLicenseExpression>MS-RL</PackageLicenseExpression>
+    <Product>WiX Toolset</Product>
+  </PropertyGroup>
+
+  <Import Project="Directory$(MSBuildProjectExtension).props" Condition=" Exists('Directory$(MSBuildProjectExtension).props') " />
+  <Import Project="Custom.Build.props" Condition=" Exists('Custom.Build.props') " />
+</Project>
diff --git a/src/ext/ComPlus/Directory.Build.targets b/src/ext/ComPlus/Directory.Build.targets
new file mode 100644
index 00000000..2fcc765a
--- /dev/null
+++ b/src/ext/ComPlus/Directory.Build.targets
@@ -0,0 +1,51 @@
+<?xml version="1.0" encoding="utf-8"?>
+<!-- Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information. -->
+<!--
+  Do NOT modify this file. Update the canonical version in Home\repo-template\src\Directory.Build.targets
+  then update all of the repos.
+-->
+<!--
+  Replace PackageReferences with ProjectReferences when the projects can be found in .sln.
+  See the original here: https://github.com/dotnet/sdk/issues/1151#issuecomment-385133284
+-->
+<Project>
+  <PropertyGroup>
+    <ReplacePackageReferences>true</ReplacePackageReferences>
+    <TheSolutionPath Condition=" '$(NCrunch)'=='' ">$(SolutionPath)</TheSolutionPath>
+    <TheSolutionPath Condition=" '$(NCrunch)'=='1' ">$(NCrunchOriginalSolutionPath)</TheSolutionPath>
+  </PropertyGroup>
+
+  <Choose>
+    <When Condition="$(ReplacePackageReferences) AND '$(TheSolutionPath)' != '' AND '$(TheSolutionPath)' != '*undefined*' AND Exists('$(TheSolutionPath)')">
+
+      <PropertyGroup>
+        <SolutionFileContent>$([System.IO.File]::ReadAllText($(TheSolutionPath)))</SolutionFileContent>
+        <SmartSolutionDir>$([System.IO.Path]::GetDirectoryName( $(TheSolutionPath) ))</SmartSolutionDir>
+        <RegexPattern>(?&lt;="[PackageName]", ")(.*)(?=", ")</RegexPattern>
+      </PropertyGroup>
+
+      <ItemGroup>
+        <!-- Keep the identity of the PackageReference -->
+        <SmartPackageReference Include="@(PackageReference)">
+          <PackageName>%(Identity)</PackageName>
+          <InSolution>$(SolutionFileContent.Contains('\%(Identity).csproj'))</InSolution>
+        </SmartPackageReference>
+
+        <!-- Filter them by mapping them to another ItemGroup using the WithMetadataValue item function -->
+        <PackageInSolution Include="@(SmartPackageReference->WithMetadataValue('InSolution', True))">
+          <Pattern>$(RegexPattern.Replace('[PackageName]','%(PackageName)') )</Pattern>
+          <SmartPath>$([System.Text.RegularExpressions.Regex]::Match('$(SolutionFileContent)', '%(Pattern)'))</SmartPath>
+        </PackageInSolution>
+
+        <ProjectReference  Include="@(PackageInSolution->'$(SmartSolutionDir)\%(SmartPath)' )"/>
+
+        <!-- Remove the package references that are now referenced as projects -->
+        <PackageReference Remove="@(PackageInSolution->'%(PackageName)')"/>
+      </ItemGroup>
+
+    </When>
+  </Choose>
+
+  <Import Project="Directory$(MSBuildProjectExtension).targets" Condition=" Exists('Directory$(MSBuildProjectExtension).targets') " />
+  <Import Project="Custom.Build.targets" Condition=" Exists('Custom.Build.targets') " />
+</Project>
diff --git a/src/ext/ComPlus/Directory.csproj.props b/src/ext/ComPlus/Directory.csproj.props
new file mode 100644
index 00000000..81d24ad1
--- /dev/null
+++ b/src/ext/ComPlus/Directory.csproj.props
@@ -0,0 +1,13 @@
+<!-- Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information. -->
+<!--
+  Do NOT modify this file. Update the canonical version in Home\repo-template\src\CSharp.Build.props
+  then update all of the repos.
+-->
+<Project>
+  <PropertyGroup>
+    <CheckForOverflowUnderflow>true</CheckForOverflowUnderflow>
+    <SignAssembly>true</SignAssembly>
+    <AssemblyOriginatorKeyFile>$([System.IO.Path]::GetFullPath($(MSBuildThisFileDirectory)wix.snk))</AssemblyOriginatorKeyFile>
+    <NBGV_EmitThisAssemblyClass>false</NBGV_EmitThisAssemblyClass>
+  </PropertyGroup>
+</Project>
diff --git a/src/ext/ComPlus/Directory.csproj.targets b/src/ext/ComPlus/Directory.csproj.targets
new file mode 100644
index 00000000..c3270426
--- /dev/null
+++ b/src/ext/ComPlus/Directory.csproj.targets
@@ -0,0 +1,26 @@
+<!-- Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information. -->
+<!--
+  Do NOT modify this file. Update the canonical version in Home\repo-template\src\Directory.csproj.targets
+  then update all of the repos.
+-->
+<Project>
+  <PropertyGroup>
+    <CreateDocumentation Condition=" '$(CreateDocumentationFile)'!='true' ">false</CreateDocumentation>
+    <DocumentationFile Condition=" '$(CreateDocumentationFile)'=='true' ">$(OutputPath)\$(AssemblyName).xml</DocumentationFile>
+  </PropertyGroup>
+
+  <Target Name="SetNuspecProperties" DependsOnTargets="InitializeSourceControlInformation" AfterTargets="GetBuildVersion"
+          Condition=" Exists('$(MSBuildProjectName).nuspec') ">
+    <PropertyGroup>
+      <ProjectUrl Condition=" '$(ProjectUrl)'=='' and '$(PrivateRepositoryUrl)'!='' ">$(PrivateRepositoryUrl.Replace('.git',''))</ProjectUrl>
+
+      <NuspecFile>$(MSBuildProjectName).nuspec</NuspecFile>
+      <NuspecBasePath Condition=" '$(NuspecBasePath)'=='' ">$(OutputPath)..\</NuspecBasePath>
+      <NuspecProperties>$(NuspecProperties);Id=$(PackageId);Authors=$(Authors);Copyright=$(Copyright);Description=$(Description);Title=$(Title)</NuspecProperties>
+      <NuspecProperties>$(NuspecProperties);Version=$(PackageVersion);RepositoryCommit=$(SourceRevisionId);RepositoryType=$(RepositoryType);RepositoryUrl=$(PrivateRepositoryUrl);ProjectFolder=$(MSBuildProjectDirectory)\;ProjectUrl=$(ProjectUrl)</NuspecProperties>
+      <PublishRepositoryUrl>true</PublishRepositoryUrl>
+      <SymbolPackageFormat>snupkg</SymbolPackageFormat>
+    </PropertyGroup>
+  </Target>
+
+</Project>
diff --git a/src/ext/ComPlus/Directory.vcxproj.props b/src/ext/ComPlus/Directory.vcxproj.props
new file mode 100644
index 00000000..664bc1d8
--- /dev/null
+++ b/src/ext/ComPlus/Directory.vcxproj.props
@@ -0,0 +1,93 @@
+<?xml version="1.0" encoding="utf-8"?>
+<!-- Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information. -->
+
+<Project>
+  <PropertyGroup>
+    <Platform Condition=" '$(Platform)' == '' OR '$(Platform)' == 'AnyCPU' ">Win32</Platform>
+    <IntDir>$(BaseIntermediateOutputPath)$(Configuration)\$(Platform)\</IntDir>
+    <OutDir>$(OutputPath)$(Platform)\</OutDir>
+
+    <!-- NBGV properties -->
+    <AssemblyCompany>$(Company)</AssemblyCompany>
+    <AssemblyCopyright>$(Copyright)</AssemblyCopyright>
+
+    <RuntimeIdentifiers>win-x86;win-x64;win-arm64</RuntimeIdentifiers>
+    <NuGetTargetMoniker>native,Version=v0.0</NuGetTargetMoniker>
+  </PropertyGroup>
+
+  <PropertyGroup Condition="'$(WindowsTargetPlatformVersion)'=='' AND '$(VisualStudioVersion)'>='15.0'">
+    <WindowsTargetPlatformVersion>$([Microsoft.Build.Utilities.ToolLocationHelper]::GetLatestSDKTargetPlatformVersion('Windows', '10.0'))</WindowsTargetPlatformVersion>
+  </PropertyGroup>
+
+  <ItemDefinitionGroup>
+    <ClCompile>
+      <DisableSpecificWarnings>$(DisableSpecificCompilerWarnings)</DisableSpecificWarnings>
+      <WarningLevel>Level4</WarningLevel>
+      <AdditionalIncludeDirectories>$(ProjectDir)inc;$(MSBuildProjectDirectory);$(IntDir);$(SqlCESdkIncludePath);$(ProjectAdditionalIncludeDirectories);%(AdditionalIncludeDirectories)</AdditionalIncludeDirectories>
+      <PreprocessorDefinitions>WIN32;_WINDOWS;_WIN32_MSI=500;_WIN32_WINNT=0x0501;$(ArmPreprocessorDefinitions);$(UnicodePreprocessorDefinitions);_CRT_STDIO_LEGACY_WIDE_SPECIFIERS;_WINSOCK_DEPRECATED_NO_WARNINGS;%(PreprocessorDefinitions)</PreprocessorDefinitions>
+      <PrecompiledHeader>Use</PrecompiledHeader>
+      <PrecompiledHeaderFile>precomp.h</PrecompiledHeaderFile>
+      <CallingConvention Condition="'$(Platform)'=='Win32'">StdCall</CallingConvention>
+      <TreatWarningAsError>true</TreatWarningAsError>
+      <ExceptionHandling>false</ExceptionHandling>
+      <AdditionalOptions>-YlprecompDefine</AdditionalOptions>
+      <AdditionalOptions Condition=" $(PlatformToolset.StartsWith('v14')) ">/Zc:threadSafeInit- %(AdditionalOptions)</AdditionalOptions>
+      <MultiProcessorCompilation Condition=" $(NUMBER_OF_PROCESSORS) &gt; 4 ">true</MultiProcessorCompilation>
+    </ClCompile>
+    <ResourceCompile>
+      <PreprocessorDefinitions>$(ArmPreprocessorDefinitions);%(PreprocessorDefinitions)</PreprocessorDefinitions>
+      <AdditionalIncludeDirectories>$(ProjectAdditionalResourceIncludeDirectories);%(AdditionalIncludeDirectories)</AdditionalIncludeDirectories>
+    </ResourceCompile>
+    <Lib>
+      <AdditionalLibraryDirectories>$(OutDir);$(AdditionalMultiTargetLibraryPath);$(ProjectAdditionalLibraryDirectories);%(AdditionalLibraryDirectories)</AdditionalLibraryDirectories>
+    </Lib>
+    <Link>
+      <SubSystem>$(ProjectSubSystem)</SubSystem>
+      <ModuleDefinitionFile>$(ProjectModuleDefinitionFile)</ModuleDefinitionFile>
+      <NoEntryPoint>$(ResourceOnlyDll)</NoEntryPoint>
+      <GenerateDebugInformation>true</GenerateDebugInformation>
+      <AdditionalDependencies>$(ProjectAdditionalLinkLibraries);advapi32.lib;comdlg32.lib;user32.lib;oleaut32.lib;gdi32.lib;shell32.lib;ole32.lib;version.lib;%(AdditionalDependencies)</AdditionalDependencies>
+      <AdditionalLibraryDirectories>$(OutDir);$(AdditionalMultiTargetLibraryPath);$(ArmLibraryDirectories);$(ProjectAdditionalLinkLibraryDirectories);%(AdditionalLibraryDirectories)</AdditionalLibraryDirectories>
+      <AdditionalOptions Condition=" $(PlatformToolset.StartsWith('v14')) ">/IGNORE:4099 %(AdditionalOptions)</AdditionalOptions>
+    </Link>
+  </ItemDefinitionGroup>
+
+  <ItemDefinitionGroup Condition=" '$(Platform)'=='Win32' and '$(PlatformToolset)'!='v100'">
+    <ClCompile>
+      <EnableEnhancedInstructionSet>NoExtensions</EnableEnhancedInstructionSet>
+    </ClCompile>
+  </ItemDefinitionGroup>
+  <ItemDefinitionGroup Condition=" '$(Platform)'=='arm' ">
+    <ClCompile>
+      <CallingConvention>CDecl</CallingConvention>
+    </ClCompile>
+  </ItemDefinitionGroup>
+  <ItemDefinitionGroup Condition=" '$(ConfigurationType)'=='StaticLibrary' ">
+    <ClCompile>
+      <DebugInformationFormat>OldStyle</DebugInformationFormat>
+      <OmitDefaultLibName>true</OmitDefaultLibName>
+      <IgnoreAllDefaultLibraries>true</IgnoreAllDefaultLibraries>
+    </ClCompile>
+  </ItemDefinitionGroup>
+  <ItemDefinitionGroup Condition=" '$(Configuration)'=='Debug' ">
+    <ClCompile>
+      <Optimization>Disabled</Optimization>
+      <BasicRuntimeChecks>EnableFastChecks</BasicRuntimeChecks>
+      <PreprocessorDefinitions>_DEBUG;DEBUG;%(PreprocessorDefinitions)</PreprocessorDefinitions>
+      <RuntimeLibrary>MultiThreadedDebug</RuntimeLibrary>
+    </ClCompile>
+  </ItemDefinitionGroup>
+  <ItemDefinitionGroup Condition=" '$(Configuration)'=='Release' ">
+    <ClCompile>
+      <Optimization>MinSpace</Optimization>
+      <PreprocessorDefinitions>NDEBUG;%(PreprocessorDefinitions)</PreprocessorDefinitions>
+      <FunctionLevelLinking>true</FunctionLevelLinking>
+      <IntrinsicFunctions>true</IntrinsicFunctions>
+      <RuntimeLibrary>MultiThreaded</RuntimeLibrary>
+    </ClCompile>
+    <Link>
+      <EnableCOMDATFolding>true</EnableCOMDATFolding>
+      <OptimizeReferences>true</OptimizeReferences>
+    </Link>
+  </ItemDefinitionGroup>
+</Project>
diff --git a/src/ext/ComPlus/README.md b/src/ext/ComPlus/README.md
new file mode 100644
index 00000000..8604c104
--- /dev/null
+++ b/src/ext/ComPlus/README.md
@@ -0,0 +1,2 @@
+# ComPlus.wixext
+WixToolset.ComPlus.wixext - COM+ WiX Toolset Extension
diff --git a/src/ext/ComPlus/Wix.Build.props b/src/ext/ComPlus/Wix.Build.props
new file mode 100644
index 00000000..a81c9615
--- /dev/null
+++ b/src/ext/ComPlus/Wix.Build.props
@@ -0,0 +1,31 @@
+<?xml version="1.0" encoding="utf-8" ?>
+<!-- Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information. -->
+
+<Project>
+  <PropertyGroup>
+    <DefineConstants>$(DefineConstants);CompanyName=$(Company)</DefineConstants>
+    <OutputPath_x86>$(OutputPath)x86\</OutputPath_x86>
+    <OutputPath_x64>$(OutputPath)x64\</OutputPath_x64>
+    <OutputPath_arm>$(OutputPath)ARM\</OutputPath_arm>
+    <OutputPath_arm64>$(OutputPath)ARM64\</OutputPath_arm64>
+    <OutputPath_win32>$(OutputPath)Win32\</OutputPath_win32>
+  </PropertyGroup>
+
+  <ItemGroup>
+    <BindInputPaths Include="$(OutputPath_x86)">
+      <BindName>x86</BindName>
+    </BindInputPaths>
+    <BindInputPaths Include="$(OutputPath_x64)">
+      <BindName>x64</BindName>
+    </BindInputPaths>
+    <BindInputPaths Include="$(OutputPath_arm)">
+      <BindName>arm</BindName>
+    </BindInputPaths>
+    <BindInputPaths Include="$(OutputPath_arm64)">
+      <BindName>arm64</BindName>
+    </BindInputPaths>
+    <BindInputPaths Include="$(OutputPath_win32)">
+      <BindName>win32</BindName>
+    </BindInputPaths>
+  </ItemGroup>
+</Project>
diff --git a/src/ext/ComPlus/appveyor.cmd b/src/ext/ComPlus/appveyor.cmd
new file mode 100644
index 00000000..17900d31
--- /dev/null
+++ b/src/ext/ComPlus/appveyor.cmd
@@ -0,0 +1,22 @@
+@setlocal
+@pushd %~dp0
+@set _C=Release
+@if /i "%1"=="debug" set _C=Debug
+
+:: Restore
+msbuild -p:Configuration=%_C% -t:Restore || exit /b
+
+::msbuild -p:Configuration=%_C% -p:Platform=Win32 src\ca\complusca.vcxproj || exit /b
+::msbuild -p:Configuration=%_C% -p:Platform=x64 src\ca\complusca.vcxproj || exit /b
+
+:: Build
+msbuild -p:Configuration=%_C% src\test\WixToolsetTest.ComPlus\WixToolsetTest.ComPlus.csproj || exit /b
+
+:: Test
+dotnet test -c %_C% --no-build src\test\WixToolsetTest.ComPlus || exit /b
+
+:: Pack
+msbuild -p:Configuration=%_C% -p:NoBuild=true -t:Pack src\wixext\WixToolset.ComPlus.wixext.csproj || exit /b
+
+@popd
+@endlocal
\ No newline at end of file
diff --git a/src/ext/ComPlus/appveyor.yml b/src/ext/ComPlus/appveyor.yml
new file mode 100644
index 00000000..c53cc9cc
--- /dev/null
+++ b/src/ext/ComPlus/appveyor.yml
@@ -0,0 +1,42 @@
+# Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+#
+#  Do NOT modify this file. Update the canonical version in Home\repo-template\src\appveyor.yml
+#  then update all of the repos.
+
+branches:
+  only:
+    - master
+    - develop
+
+image: Visual Studio 2019
+
+version: 0.0.0.{build}
+configuration: Release
+
+environment:
+  DOTNET_SKIP_FIRST_TIME_EXPERIENCE: true
+  DOTNET_CLI_TELEMETRY_OPTOUT: 1
+  NUGET_XMLDOC_MODE: skip
+
+build_script:
+  - appveyor.cmd
+
+pull_requests:
+  do_not_increment_build_number: true
+
+nuget:
+  disable_publish_on_pr: true
+
+skip_branch_with_pr: true
+skip_tags: true
+
+artifacts:
+- path: build\Release\**\*.nupkg
+  name: nuget
+- path: build\Release\**\*.snupkg
+  name: snupkg
+
+notifications:
+- provider: Slack
+  incoming_webhook:
+    secure: p5xuu+4x2JHfwGDMDe5KcG1k7gZxqYc4jWVwvyNZv5cvkubPD2waJs5yXMAXZNN7Z63/3PWHb7q4KoY/99AjauYa1nZ4c5qYqRPFRBKTHfA=
diff --git a/src/ext/ComPlus/ca/complusca.def b/src/ext/ComPlus/ca/complusca.def
new file mode 100644
index 00000000..7c475759
--- /dev/null
+++ b/src/ext/ComPlus/ca/complusca.def
@@ -0,0 +1,15 @@
+; Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+
+LIBRARY      "complusca"
+
+EXPORTS
+        ComPlusPrepare
+        ComPlusCleanup
+        ComPlusInstallExecute
+        ComPlusInstallExecuteCommit
+        ComPlusRollbackInstallExecute
+        ComPlusUninstallExecute
+        ComPlusRollbackUninstallExecute
+        ConfigureComPlusInstall
+        ConfigureComPlusUninstall
diff --git a/src/ext/ComPlus/ca/complusca.vcxproj b/src/ext/ComPlus/ca/complusca.vcxproj
new file mode 100644
index 00000000..3a7f6e64
--- /dev/null
+++ b/src/ext/ComPlus/ca/complusca.vcxproj
@@ -0,0 +1,95 @@
+<?xml version="1.0" encoding="utf-8"?>
+<!-- Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information. -->
+
+<Project DefaultTargets="Build" ToolsVersion="15.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <ItemGroup Label="ProjectConfigurations">
+    <ProjectConfiguration Include="Debug|Win32">
+      <Configuration>Debug</Configuration>
+      <Platform>Win32</Platform>
+    </ProjectConfiguration>
+    <ProjectConfiguration Include="Release|Win32">
+      <Configuration>Release</Configuration>
+      <Platform>Win32</Platform>
+    </ProjectConfiguration>
+    <ProjectConfiguration Include="Debug|x64">
+      <Configuration>Debug</Configuration>
+      <Platform>x64</Platform>
+    </ProjectConfiguration>
+    <ProjectConfiguration Include="Release|x64">
+      <Configuration>Release</Configuration>
+      <Platform>x64</Platform>
+    </ProjectConfiguration>
+  </ItemGroup>
+
+  <PropertyGroup Label="Globals">
+    <ProjectGuid>{BDEF51ED-E242-4FA2-801A-01B127DF851A}</ProjectGuid>
+    <ConfigurationType>DynamicLibrary</ConfigurationType>
+    <PlatformToolset>v142</PlatformToolset>
+    <CharacterSet>Unicode</CharacterSet>
+    <TargetName>complusca</TargetName>
+    <ProjectModuleDefinitionFile>complusca.def</ProjectModuleDefinitionFile>
+    <Description>WiX Toolset ComPlus CustomAction</Description>
+    <WindowsTargetPlatformVersion>10.0</WindowsTargetPlatformVersion>
+  </PropertyGroup>
+
+  <Import Project="$(VCTargetsPath)\Microsoft.Cpp.Default.props" />
+  <Import Project="$(VCTargetsPath)\Microsoft.Cpp.props" />
+
+  <PropertyGroup>
+    <ProjectAdditionalLinkLibraries>msi.lib</ProjectAdditionalLinkLibraries>
+  </PropertyGroup>
+
+  <ItemGroup>
+    <ClCompile Include="cpappexec.cpp" />
+    <ClCompile Include="cpapproleexec.cpp" />
+    <ClCompile Include="cpapprolesched.cpp" />
+    <ClCompile Include="cpappsched.cpp" />
+    <ClCompile Include="cpasmexec.cpp" />
+    <ClCompile Include="cpasmsched.cpp" />
+    <ClCompile Include="cpexec.cpp" />
+    <ClCompile Include="cppartexec.cpp" />
+    <ClCompile Include="cppartroleexec.cpp" />
+    <ClCompile Include="cppartrolesched.cpp" />
+    <ClCompile Include="cppartsched.cpp" />
+    <ClCompile Include="cpsched.cpp" />
+    <ClCompile Include="cpsubsexec.cpp" />
+    <ClCompile Include="cpsubssched.cpp" />
+    <ClCompile Include="cputilexec.cpp" />
+    <ClCompile Include="cputilsched.cpp" />
+    <ClCompile Include="dllmain.cpp">
+      <PrecompiledHeader>Create</PrecompiledHeader>
+    </ClCompile>
+  </ItemGroup>
+
+  <ItemGroup>
+    <ClInclude Include="cpappexec.h" />
+    <ClInclude Include="cpapproleexec.h" />
+    <ClInclude Include="cpapprolesched.h" />
+    <ClInclude Include="cpappsched.h" />
+    <ClInclude Include="cpasmexec.h" />
+    <ClInclude Include="cpasmsched.h" />
+    <ClInclude Include="cpcost.h" />
+    <ClInclude Include="cppartexec.h" />
+    <ClInclude Include="cppartroleexec.h" />
+    <ClInclude Include="cppartrolesched.h" />
+    <ClInclude Include="cppartsched.h" />
+    <ClInclude Include="cpsubsexec.h" />
+    <ClInclude Include="cpsubssched.h" />
+    <ClInclude Include="cputilexec.h" />
+    <ClInclude Include="cputilsched.h" />
+    <ClInclude Include="precomp.h" />
+  </ItemGroup>
+
+  <ItemGroup>
+    <None Include="complusca.def" />
+  </ItemGroup>
+
+  <ItemGroup>
+    <PackageReference Include="WixToolset.Dutil" Version="4.0.62" />
+    <PackageReference Include="WixToolset.WcaUtil" Version="4.0.18" />
+    <PackageReference Include="Microsoft.SourceLink.GitHub" Version="1.0.0" />
+    <PackageReference Include="Nerdbank.GitVersioning" Version="3.3.37" />
+  </ItemGroup>
+
+  <Import Project="$(VCTargetsPath)\Microsoft.Cpp.targets" />
+</Project>
\ No newline at end of file
diff --git a/src/ext/ComPlus/ca/cpappexec.cpp b/src/ext/ComPlus/ca/cpappexec.cpp
new file mode 100644
index 00000000..48948210
--- /dev/null
+++ b/src/ext/ComPlus/ca/cpappexec.cpp
@@ -0,0 +1,344 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+#include "precomp.h"
+
+
+// private structs
+
+struct CPI_APPLICATION_ATTRIBUTES
+{
+    int iActionType;
+    int iActionCost;
+    LPWSTR pwzKey;
+    LPWSTR pwzID;
+    LPWSTR pwzName;
+    LPWSTR pwzPartID;
+    CPI_PROPERTY* pPropList;
+};
+
+
+// prototypes for private helper functions
+
+static HRESULT ReadApplicationAttributes(
+    LPWSTR* ppwzData,
+    CPI_APPLICATION_ATTRIBUTES* pAttrs
+    );
+static void FreeApplicationAttributes(
+    CPI_APPLICATION_ATTRIBUTES* pAttrs
+    );
+static HRESULT CreateApplication(
+    CPI_APPLICATION_ATTRIBUTES* pAttrs
+    );
+static HRESULT RemoveApplication(
+    CPI_APPLICATION_ATTRIBUTES* pAttrs
+    );
+
+
+// function definitions
+
+HRESULT CpiConfigureApplications(
+    LPWSTR* ppwzData,
+    HANDLE hRollbackFile
+    )
+{
+    HRESULT hr = S_OK;
+
+    CPI_APPLICATION_ATTRIBUTES attrs;
+    ::ZeroMemory(&attrs, sizeof(attrs));
+
+    // read action text
+    hr = CpiActionStartMessage(ppwzData, FALSE);
+    ExitOnFailure(hr, "Failed to send action start message");
+
+    // get count
+    int iCnt = 0;
+    hr = WcaReadIntegerFromCaData(ppwzData, &iCnt);
+    ExitOnFailure(hr, "Failed to read count");
+
+    // write count to rollback file
+    hr = CpiWriteIntegerToRollbackFile(hRollbackFile, iCnt);
+    ExitOnFailure(hr, "Failed to write count to rollback file");
+
+    for (int i = 0; i < iCnt; i++)
+    {
+        // read attributes from CustomActionData
+        hr = ReadApplicationAttributes(ppwzData, &attrs);
+        ExitOnFailure(hr, "Failed to read attributes");
+
+        // progress message
+        hr = CpiActionDataMessage(1, attrs.pwzName);
+        ExitOnFailure(hr, "Failed to send progress messages");
+
+        if (S_FALSE == hr)
+            ExitFunction();
+
+        // write key to rollback file
+        hr = CpiWriteKeyToRollbackFile(hRollbackFile, attrs.pwzKey);
+        ExitOnFailure(hr, "Failed to write key to rollback file");
+
+        // action
+        switch (attrs.iActionType)
+        {
+        case atCreate:
+            hr = CreateApplication(&attrs);
+            ExitOnFailure(hr, "Failed to create application, key: %S", attrs.pwzKey);
+            break;
+        case atRemove:
+            hr = RemoveApplication(&attrs);
+            ExitOnFailure(hr, "Failed to remove application, key: %S", attrs.pwzKey);
+            break;
+        }
+
+        // write completion status to rollback file
+        hr = CpiWriteIntegerToRollbackFile(hRollbackFile, 1);
+        ExitOnFailure(hr, "Failed to write completion status to rollback file");
+
+        // progress
+        hr = WcaProgressMessage(attrs.iActionCost, FALSE);
+        ExitOnFailure(hr, "Failed to update progress");
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    FreeApplicationAttributes(&attrs);
+
+    return hr;
+}
+
+HRESULT CpiRollbackConfigureApplications(
+    LPWSTR* ppwzData,
+    CPI_ROLLBACK_DATA* pRollbackDataList
+    )
+{
+    HRESULT hr = S_OK;
+
+    int iRollbackStatus;
+
+    CPI_APPLICATION_ATTRIBUTES attrs;
+    ::ZeroMemory(&attrs, sizeof(attrs));
+
+    // read action text
+    hr = CpiActionStartMessage(ppwzData, NULL == pRollbackDataList);
+    ExitOnFailure(hr, "Failed to send action start message");
+
+    // get count
+    int iCnt = 0;
+    hr = WcaReadIntegerFromCaData(ppwzData, &iCnt);
+    ExitOnFailure(hr, "Failed to read count");
+
+    for (int i = 0; i < iCnt; i++)
+    {
+        // read attributes from CustomActionData
+        hr = ReadApplicationAttributes(ppwzData, &attrs);
+        ExitOnFailure(hr, "Failed to read attributes");
+
+        // rollback status
+        hr = CpiFindRollbackStatus(pRollbackDataList, attrs.pwzKey, &iRollbackStatus);
+
+        if (S_FALSE == hr)
+            continue; // not found, nothing to rollback
+
+        // progress message
+        hr = CpiActionDataMessage(1, attrs.pwzName);
+        ExitOnFailure(hr, "Failed to send progress messages");
+
+        if (S_FALSE == hr)
+            ExitFunction();
+
+        // action
+        switch (attrs.iActionType)
+        {
+        case atCreate:
+            hr = CreateApplication(&attrs);
+            if (FAILED(hr))
+                WcaLog(LOGMSG_STANDARD, "Failed to create application, hr: 0x%x, key: %S", hr, attrs.pwzKey);
+            break;
+        case atRemove:
+            hr = RemoveApplication(&attrs);
+            if (FAILED(hr))
+                WcaLog(LOGMSG_STANDARD, "Failed to remove application, hr: 0x%x, key: %S", hr, attrs.pwzKey);
+            break;
+        }
+
+        // check rollback status
+        if (0 == iRollbackStatus)
+            continue; // operation did not complete, skip progress
+
+        // progress
+        hr = WcaProgressMessage(attrs.iActionCost, FALSE);
+        ExitOnFailure(hr, "Failed to update progress");
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    FreeApplicationAttributes(&attrs);
+
+    return hr;
+}
+
+
+// helper function definitions
+
+static HRESULT ReadApplicationAttributes(
+    LPWSTR* ppwzData,
+    CPI_APPLICATION_ATTRIBUTES* pAttrs
+    )
+{
+    HRESULT hr = S_OK;
+
+    hr = WcaReadIntegerFromCaData(ppwzData, &pAttrs->iActionType);
+    ExitOnFailure(hr, "Failed to read action type");
+    hr = WcaReadIntegerFromCaData(ppwzData, &pAttrs->iActionCost);
+    ExitOnFailure(hr, "Failed to read action cost");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzKey);
+    ExitOnFailure(hr, "Failed to read key");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzID);
+    ExitOnFailure(hr, "Failed to read id");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzName);
+    ExitOnFailure(hr, "Failed to read name");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzPartID);
+    ExitOnFailure(hr, "Failed to read partition id");
+    hr = CpiReadPropertyList(ppwzData, &pAttrs->pPropList);
+    ExitOnFailure(hr, "Failed to read properties");
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+static void FreeApplicationAttributes(
+    CPI_APPLICATION_ATTRIBUTES* pAttrs
+    )
+{
+    ReleaseStr(pAttrs->pwzKey);
+    ReleaseStr(pAttrs->pwzID);
+    ReleaseStr(pAttrs->pwzName);
+    ReleaseStr(pAttrs->pwzPartID);
+
+    if (pAttrs->pPropList)
+        CpiFreePropertyList(pAttrs->pPropList);
+}
+
+static HRESULT CreateApplication(
+    CPI_APPLICATION_ATTRIBUTES* pAttrs
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICatalogCollection* piAppColl = NULL;
+    ICatalogObject* piAppObj = NULL;
+
+    long lChanges = 0;
+
+    // log
+    WcaLog(LOGMSG_VERBOSE, "Creating application, key: %S", pAttrs->pwzKey);
+
+    // get applications collection
+    hr = CpiExecGetApplicationsCollection(pAttrs->pwzPartID, &piAppColl);
+    if (S_FALSE == hr)
+        hr = HRESULT_FROM_WIN32(ERROR_NOT_FOUND);
+    ExitOnFailure(hr, "Failed to get applications collection");
+
+    // check if application exists
+    hr = CpiFindCollectionObjectByStringKey(piAppColl, pAttrs->pwzID, &piAppObj);
+    ExitOnFailure(hr, "Failed to find application");
+
+    if (S_FALSE == hr)
+    {
+        // create application
+        hr = CpiAddCollectionObject(piAppColl, &piAppObj);
+        ExitOnFailure(hr, "Failed to add application to collection");
+
+        hr = CpiPutCollectionObjectValue(piAppObj, L"ID", pAttrs->pwzID);
+        ExitOnFailure(hr, "Failed to set application id property");
+
+        hr = CpiPutCollectionObjectValue(piAppObj, L"Name", pAttrs->pwzName);
+        ExitOnFailure(hr, "Failed to set application name property");
+
+        // save changes
+        hr = piAppColl->SaveChanges(&lChanges);
+        if (COMADMIN_E_OBJECTERRORS == hr)
+            CpiLogCatalogErrorInfo();
+        ExitOnFailure(hr, "Failed to add application");
+    }
+
+    // properties
+    hr = CpiPutCollectionObjectValues(piAppObj, pAttrs->pPropList);
+    ExitOnFailure(hr, "Failed to write properties");
+
+    // save changes
+    hr = piAppColl->SaveChanges(&lChanges);
+    if (COMADMIN_E_OBJECTERRORS == hr)
+        CpiLogCatalogErrorInfo();
+    ExitOnFailure(hr, "Failed to save changes");
+
+    // log
+    WcaLog(LOGMSG_VERBOSE, "%d changes saved to catalog, key: %S", lChanges, pAttrs->pwzKey);
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piAppColl);
+    ReleaseObject(piAppObj);
+
+    return hr;
+}
+
+static HRESULT RemoveApplication(
+    CPI_APPLICATION_ATTRIBUTES* pAttrs
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICatalogCollection* piAppColl = NULL;
+
+    long lChanges = 0;
+
+    // log
+    WcaLog(LOGMSG_VERBOSE, "Removing application, key: %S", pAttrs->pwzKey);
+
+    // get applications collection
+    hr = CpiExecGetApplicationsCollection(pAttrs->pwzPartID, &piAppColl);
+    ExitOnFailure(hr, "Failed to get applications collection");
+
+    if (S_FALSE == hr)
+    {
+        // applications collection not found
+        WcaLog(LOGMSG_VERBOSE, "Unable to retrieve applications collection, nothing to delete, key: %S", pAttrs->pwzKey);
+        ExitFunction1(hr = S_OK);
+    }
+
+    // remove
+    hr = CpiRemoveCollectionObject(piAppColl, pAttrs->pwzID, NULL, TRUE);
+    ExitOnFailure(hr, "Failed to remove application");
+
+    if (S_FALSE == hr)
+    {
+        // application not found
+        WcaLog(LOGMSG_VERBOSE, "Application not found, nothing to delete, key: %S", pAttrs->pwzKey);
+        ExitFunction1(hr = S_OK);
+    }
+
+    // save changes
+    hr = piAppColl->SaveChanges(&lChanges);
+    if (COMADMIN_E_OBJECTERRORS == hr)
+        CpiLogCatalogErrorInfo();
+    ExitOnFailure(hr, "Failed to save changes");
+
+    // log
+    WcaLog(LOGMSG_VERBOSE, "%d changes saved to catalog, key: %S", lChanges, pAttrs->pwzKey);
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piAppColl);
+
+    return hr;
+}
diff --git a/src/ext/ComPlus/ca/cpappexec.h b/src/ext/ComPlus/ca/cpappexec.h
new file mode 100644
index 00000000..5003b046
--- /dev/null
+++ b/src/ext/ComPlus/ca/cpappexec.h
@@ -0,0 +1,12 @@
+#pragma once
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+
+HRESULT CpiConfigureApplications(
+    LPWSTR* ppwzData,
+    HANDLE hRollbackFile
+    );
+HRESULT CpiRollbackConfigureApplications(
+    LPWSTR* ppwzData,
+    CPI_ROLLBACK_DATA* pRollbackDataList
+    );
diff --git a/src/ext/ComPlus/ca/cpapproleexec.cpp b/src/ext/ComPlus/ca/cpapproleexec.cpp
new file mode 100644
index 00000000..e3b71e93
--- /dev/null
+++ b/src/ext/ComPlus/ca/cpapproleexec.cpp
@@ -0,0 +1,720 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+#include "precomp.h"
+
+
+// private structs
+
+struct CPI_APPLICATION_ROLE_ATTRIBUTES
+{
+    int iActionType;
+    int iActionCost;
+    LPWSTR pwzKey;
+    LPWSTR pwzName;
+    LPWSTR pwzAppID;
+    LPWSTR pwzPartID;
+    CPI_PROPERTY* pPropList;
+};
+
+struct CPI_USER_IN_APPLICATION_ROLE_ATTRIBUTES
+{
+    int iActionType;
+    int iActionCost;
+    LPWSTR pwzKey;
+    LPWSTR pwzRoleName;
+    LPWSTR pwzAccount;
+    LPWSTR pwzAppID;
+    LPWSTR pwzPartID;
+};
+
+
+// prototypes for private helper functions
+
+static HRESULT ReadApplicationRoleAttributes(
+    LPWSTR* ppwzData,
+    CPI_APPLICATION_ROLE_ATTRIBUTES* pAttrs
+    );
+static void FreeApplicationRoleAttributes(
+    CPI_APPLICATION_ROLE_ATTRIBUTES* pAttrs
+    );
+static HRESULT CreateApplicationRole(
+    CPI_APPLICATION_ROLE_ATTRIBUTES* pAttrs
+    );
+static HRESULT RemoveApplicationRole(
+    CPI_APPLICATION_ROLE_ATTRIBUTES* pAttrs
+    );
+static HRESULT ReadUsersInApplicationRoleAttributes(
+    LPWSTR* ppwzData,
+    CPI_USER_IN_APPLICATION_ROLE_ATTRIBUTES* pAttrs
+    );
+static void FreeUsersInApplicationRoleAttributes(
+    CPI_USER_IN_APPLICATION_ROLE_ATTRIBUTES* pAttrs
+    );
+static HRESULT CreateUsersInApplicationRole(
+    CPI_USER_IN_APPLICATION_ROLE_ATTRIBUTES* pAttrs
+    );
+static HRESULT RemoveUsersInApplicationRole(
+    CPI_USER_IN_APPLICATION_ROLE_ATTRIBUTES* pAttrs
+    );
+
+
+// function definitions
+
+HRESULT CpiConfigureApplicationRoles(
+    LPWSTR* ppwzData,
+    HANDLE hRollbackFile
+    )
+{
+    HRESULT hr = S_OK;
+
+    CPI_APPLICATION_ROLE_ATTRIBUTES attrs;
+    ::ZeroMemory(&attrs, sizeof(attrs));
+
+    // read action text
+    hr = CpiActionStartMessage(ppwzData, FALSE);
+    ExitOnFailure(hr, "Failed to send action start message");
+
+    // ger count
+    int iCnt = 0;
+    hr = WcaReadIntegerFromCaData(ppwzData, &iCnt);
+    ExitOnFailure(hr, "Failed to read count");
+
+    // write count to rollback file
+    hr = CpiWriteIntegerToRollbackFile(hRollbackFile, iCnt);
+    ExitOnFailure(hr, "Failed to write count to rollback file");
+
+    for (int i = 0; i < iCnt; i++)
+    {
+        // read attributes from CustomActionData
+        hr = ReadApplicationRoleAttributes(ppwzData, &attrs);
+        ExitOnFailure(hr, "Failed to read attributes");
+
+        // progress message
+        hr = CpiActionDataMessage(1, attrs.pwzName);
+        ExitOnFailure(hr, "Failed to send progress messages");
+
+        if (S_FALSE == hr)
+            ExitFunction();
+
+        // write key to rollback file
+        hr = CpiWriteKeyToRollbackFile(hRollbackFile, attrs.pwzKey);
+        ExitOnFailure(hr, "Failed to write key to rollback file");
+
+        // action
+        switch (attrs.iActionType)
+        {
+        case atCreate:
+            hr = CreateApplicationRole(&attrs);
+            ExitOnFailure(hr, "Failed to create application role, key: %S", attrs.pwzKey);
+            break;
+        case atRemove:
+            hr = RemoveApplicationRole(&attrs);
+            ExitOnFailure(hr, "Failed to remove application role, key: %S", attrs.pwzKey);
+            break;
+        }
+
+        // write completion status to rollback file
+        hr = CpiWriteIntegerToRollbackFile(hRollbackFile, 1);
+        ExitOnFailure(hr, "Failed to write completion status to rollback file");
+
+        // progress
+        hr = WcaProgressMessage(attrs.iActionCost, FALSE);
+        ExitOnFailure(hr, "Failed to update progress");
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    FreeApplicationRoleAttributes(&attrs);
+
+    return hr;
+}
+
+HRESULT CpiRollbackConfigureApplicationRoles(
+    LPWSTR* ppwzData,
+    CPI_ROLLBACK_DATA* pRollbackDataList
+    )
+{
+    HRESULT hr = S_OK;
+
+    int iRollbackStatus;
+
+    CPI_APPLICATION_ROLE_ATTRIBUTES attrs;
+    ::ZeroMemory(&attrs, sizeof(attrs));
+
+    // read action text
+    hr = CpiActionStartMessage(ppwzData, NULL == pRollbackDataList);
+    ExitOnFailure(hr, "Failed to send action start message");
+
+    // get count
+    int iCnt = 0;
+    hr = WcaReadIntegerFromCaData(ppwzData, &iCnt);
+    ExitOnFailure(hr, "Failed to read count");
+
+    for (int i = 0; i < iCnt; i++)
+    {
+        // read attributes from CustomActionData
+        hr = ReadApplicationRoleAttributes(ppwzData, &attrs);
+        ExitOnFailure(hr, "Failed to read attributes");
+
+        // rollback status
+        hr = CpiFindRollbackStatus(pRollbackDataList, attrs.pwzKey, &iRollbackStatus);
+
+        if (S_FALSE == hr)
+            continue; // not found, nothing to rollback
+
+        // progress message
+        hr = CpiActionDataMessage(1, attrs.pwzName);
+        ExitOnFailure(hr, "Failed to send progress messages");
+
+        if (S_FALSE == hr)
+            ExitFunction();
+
+        // action
+        switch (attrs.iActionType)
+        {
+        case atCreate:
+            hr = CreateApplicationRole(&attrs);
+            if (FAILED(hr))
+                WcaLog(LOGMSG_STANDARD, "Failed to create application role, hr: 0x%x, key: %S", hr, attrs.pwzKey);
+            break;
+        case atRemove:
+            hr = RemoveApplicationRole(&attrs);
+            if (FAILED(hr))
+                WcaLog(LOGMSG_STANDARD, "Failed to remove application role, hr: 0x%x, key: %S", hr, attrs.pwzKey);
+            break;
+        }
+
+        // check rollback status
+        if (0 == iRollbackStatus)
+            continue; // operation did not complete, skip progress
+
+        // progress
+        hr = WcaProgressMessage(attrs.iActionCost, FALSE);
+        ExitOnFailure(hr, "Failed to update progress");
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    FreeApplicationRoleAttributes(&attrs);
+
+    return hr;
+}
+
+HRESULT CpiConfigureUsersInApplicationRoles(
+    LPWSTR* ppwzData,
+    HANDLE hRollbackFile
+    )
+{
+    HRESULT hr = S_OK;
+
+    CPI_USER_IN_APPLICATION_ROLE_ATTRIBUTES attrs;
+    ::ZeroMemory(&attrs, sizeof(attrs));
+
+    // read action text
+    hr = CpiActionStartMessage(ppwzData, FALSE);
+    ExitOnFailure(hr, "Failed to send action start message");
+
+    // ger count
+    int iCnt = 0;
+    hr = WcaReadIntegerFromCaData(ppwzData, &iCnt);
+    ExitOnFailure(hr, "Failed to read count");
+
+    // write count to rollback file
+    hr = CpiWriteIntegerToRollbackFile(hRollbackFile, iCnt);
+    ExitOnFailure(hr, "Failed to write count to rollback file");
+
+    for (int i = 0; i < iCnt; i++)
+    {
+        // read attributes from CustomActionData
+        hr = ReadUsersInApplicationRoleAttributes(ppwzData, &attrs);
+        ExitOnFailure(hr, "Failed to read attributes");
+
+        // progress message
+        hr = CpiActionDataMessage(1, attrs.pwzRoleName);
+        ExitOnFailure(hr, "Failed to send progress messages");
+
+        if (S_FALSE == hr)
+            ExitFunction();
+
+        // write key to rollback file
+        hr = CpiWriteKeyToRollbackFile(hRollbackFile, attrs.pwzKey);
+        ExitOnFailure(hr, "Failed to write key to rollback file");
+
+        // action
+        switch (attrs.iActionType)
+        {
+        case atCreate:
+            hr = CreateUsersInApplicationRole(&attrs);
+            ExitOnFailure(hr, "Failed to create user in application role, key: %S", attrs.pwzKey);
+            break;
+        case atRemove:
+            hr = RemoveUsersInApplicationRole(&attrs);
+            ExitOnFailure(hr, "Failed to remove user from application role, key: %S", attrs.pwzKey);
+            break;
+        }
+
+        // write completion status to rollback file
+        hr = CpiWriteIntegerToRollbackFile(hRollbackFile, 1);
+        ExitOnFailure(hr, "Failed to write completion status to rollback file");
+
+        // progress
+        hr = WcaProgressMessage(attrs.iActionCost, FALSE);
+        ExitOnFailure(hr, "Failed to update progress");
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    FreeUsersInApplicationRoleAttributes(&attrs);
+
+    return hr;
+}
+
+HRESULT CpiRollbackConfigureUsersInApplicationRoles(
+    LPWSTR* ppwzData,
+    CPI_ROLLBACK_DATA* pRollbackDataList
+    )
+{
+    HRESULT hr = S_OK;
+
+    int iRollbackStatus;
+
+    CPI_USER_IN_APPLICATION_ROLE_ATTRIBUTES attrs;
+    ::ZeroMemory(&attrs, sizeof(attrs));
+
+    // read action text
+    hr = CpiActionStartMessage(ppwzData, NULL == pRollbackDataList);
+    ExitOnFailure(hr, "Failed to send action start message");
+
+    // get count
+    int iCnt = 0;
+    hr = WcaReadIntegerFromCaData(ppwzData, &iCnt);
+    ExitOnFailure(hr, "Failed to read count");
+
+    for (int i = 0; i < iCnt; i++)
+    {
+        // read attributes from CustomActionData
+        hr = ReadUsersInApplicationRoleAttributes(ppwzData, &attrs);
+        ExitOnFailure(hr, "Failed to read attributes");
+
+        // rollback status
+        hr = CpiFindRollbackStatus(pRollbackDataList, attrs.pwzKey, &iRollbackStatus);
+
+        if (S_FALSE == hr)
+            continue; // not found, nothing to rollback
+
+        // progress message
+        hr = CpiActionDataMessage(1, attrs.pwzRoleName);
+        ExitOnFailure(hr, "Failed to send progress messages");
+
+        if (S_FALSE == hr)
+            ExitFunction();
+
+        // action
+        switch (attrs.iActionType)
+        {
+        case atCreate:
+            hr = CreateUsersInApplicationRole(&attrs);
+            if (FAILED(hr))
+                WcaLog(LOGMSG_STANDARD, "Failed to add user to application role, hr: 0x%x, key: %S", hr, attrs.pwzKey);
+            break;
+        case atRemove:
+            hr = RemoveUsersInApplicationRole(&attrs);
+            if (FAILED(hr))
+                WcaLog(LOGMSG_STANDARD, "Failed to remove user from application role, hr: 0x%x, key: %S", hr, attrs.pwzKey);
+            break;
+        }
+
+        // check rollback status
+        if (0 == iRollbackStatus)
+            continue; // operation did not complete, skip progress
+
+        // progress
+        hr = WcaProgressMessage(attrs.iActionCost, FALSE);
+        ExitOnFailure(hr, "Failed to update progress");
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    FreeUsersInApplicationRoleAttributes(&attrs);
+
+    return hr;
+}
+
+
+// helper function definitions
+
+static HRESULT ReadApplicationRoleAttributes(
+    LPWSTR* ppwzData,
+    CPI_APPLICATION_ROLE_ATTRIBUTES* pAttrs
+    )
+{
+    HRESULT hr = S_OK;
+
+    hr = WcaReadIntegerFromCaData(ppwzData, &pAttrs->iActionType);
+    ExitOnFailure(hr, "Failed to read action type");
+    hr = WcaReadIntegerFromCaData(ppwzData, &pAttrs->iActionCost);
+    ExitOnFailure(hr, "Failed to read action cost");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzKey);
+    ExitOnFailure(hr, "Failed to read key");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzName);
+    ExitOnFailure(hr, "Failed to read name");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzAppID);
+    ExitOnFailure(hr, "Failed to read application id");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzPartID);
+    ExitOnFailure(hr, "Failed to read partition id");
+    hr = CpiReadPropertyList(ppwzData, &pAttrs->pPropList);
+    ExitOnFailure(hr, "Failed to read properties");
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+static void FreeApplicationRoleAttributes(
+    CPI_APPLICATION_ROLE_ATTRIBUTES* pAttrs
+    )
+{
+    ReleaseStr(pAttrs->pwzKey);
+    ReleaseStr(pAttrs->pwzName);
+    ReleaseStr(pAttrs->pwzAppID);
+    ReleaseStr(pAttrs->pwzPartID);
+
+    if (pAttrs->pPropList)
+        CpiFreePropertyList(pAttrs->pPropList);
+}
+
+static HRESULT CreateApplicationRole(
+    CPI_APPLICATION_ROLE_ATTRIBUTES* pAttrs
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICatalogCollection* piRolesColl = NULL;
+    ICatalogObject* piRoleObj = NULL;
+
+    long lChanges = 0;
+
+    // log
+    WcaLog(LOGMSG_VERBOSE, "Creating application role, key: %S", pAttrs->pwzKey);
+
+    // get roles collection
+    hr = CpiGetRolesCollection(pAttrs->pwzPartID, pAttrs->pwzAppID, &piRolesColl);
+    if (S_FALSE == hr)
+        hr = HRESULT_FROM_WIN32(ERROR_NOT_FOUND);
+    ExitOnFailure(hr, "Failed to get roles collection");
+
+    // check if role exists
+    hr = CpiFindCollectionObjectByName(piRolesColl, pAttrs->pwzName, &piRoleObj);
+    ExitOnFailure(hr, "Failed to find role");
+
+    if (S_FALSE == hr)
+    {
+        // create role
+        hr = CpiAddCollectionObject(piRolesColl, &piRoleObj);
+        ExitOnFailure(hr, "Failed to add role to collection");
+
+        hr = CpiPutCollectionObjectValue(piRoleObj, L"Name", pAttrs->pwzName);
+        ExitOnFailure(hr, "Failed to set role name property");
+    }
+
+    // properties
+    hr = CpiPutCollectionObjectValues(piRoleObj, pAttrs->pPropList);
+    ExitOnFailure(hr, "Failed to write properties");
+
+    // save changes
+    hr = piRolesColl->SaveChanges(&lChanges);
+    if (COMADMIN_E_OBJECTERRORS == hr)
+        CpiLogCatalogErrorInfo();
+    ExitOnFailure(hr, "Failed to save changes");
+
+    // log
+    WcaLog(LOGMSG_VERBOSE, "%d changes saved to catalog, key: %S", lChanges, pAttrs->pwzKey);
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piRolesColl);
+    ReleaseObject(piRoleObj);
+
+    return hr;
+}
+
+static HRESULT RemoveApplicationRole(
+    CPI_APPLICATION_ROLE_ATTRIBUTES* pAttrs
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICatalogCollection* piRolesColl = NULL;
+
+    long lChanges = 0;
+
+    // log
+    WcaLog(LOGMSG_VERBOSE, "Removing application role, key: %S", pAttrs->pwzKey);
+
+    // get roles collection
+    hr = CpiGetRolesCollection(pAttrs->pwzPartID, pAttrs->pwzAppID, &piRolesColl);
+    ExitOnFailure(hr, "Failed to get roles collection");
+
+    if (S_FALSE == hr)
+    {
+        // roles collection not found
+        WcaLog(LOGMSG_VERBOSE, "Unable to retrieve roles collection, nothing to delete, key: %S", pAttrs->pwzKey);
+        ExitFunction1(hr = S_OK);
+    }
+
+    // remove
+    hr = CpiRemoveCollectionObject(piRolesColl, NULL, pAttrs->pwzName, FALSE);
+    ExitOnFailure(hr, "Failed to remove role");
+
+    if (S_FALSE == hr)
+    {
+        // role not found
+        WcaLog(LOGMSG_VERBOSE, "Role not found, nothing to delete, key: %S", pAttrs->pwzKey);
+        ExitFunction1(hr = S_OK);
+    }
+
+    // save changes
+    hr = piRolesColl->SaveChanges(&lChanges);
+    if (COMADMIN_E_OBJECTERRORS == hr)
+        CpiLogCatalogErrorInfo();
+    ExitOnFailure(hr, "Failed to save changes");
+
+    // log
+    WcaLog(LOGMSG_VERBOSE, "%d changes saved to catalog, key: %S", lChanges, pAttrs->pwzKey);
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piRolesColl);
+
+    return hr;
+}
+
+static HRESULT ReadUsersInApplicationRoleAttributes(
+    LPWSTR* ppwzData,
+    CPI_USER_IN_APPLICATION_ROLE_ATTRIBUTES* pAttrs
+    )
+{
+    HRESULT hr = S_OK;
+
+    hr = WcaReadIntegerFromCaData(ppwzData, &pAttrs->iActionType);
+    ExitOnFailure(hr, "Failed to read action type");
+    hr = WcaReadIntegerFromCaData(ppwzData, &pAttrs->iActionCost);
+    ExitOnFailure(hr, "Failed to read action cost");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzKey);
+    ExitOnFailure(hr, "Failed to read key");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzRoleName);
+    ExitOnFailure(hr, "Failed to read role name");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzAccount);
+    ExitOnFailure(hr, "Failed to read account name");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzAppID);
+    ExitOnFailure(hr, "Failed to read application id");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzPartID);
+    ExitOnFailure(hr, "Failed to read partition id");
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+static void FreeUsersInApplicationRoleAttributes(
+    CPI_USER_IN_APPLICATION_ROLE_ATTRIBUTES* pAttrs
+    )
+{
+    ReleaseStr(pAttrs->pwzKey);
+    ReleaseStr(pAttrs->pwzRoleName);
+    ReleaseStr(pAttrs->pwzAccount);
+    ReleaseStr(pAttrs->pwzAppID);
+    ReleaseStr(pAttrs->pwzPartID);
+}
+
+static HRESULT CreateUsersInApplicationRole(
+    CPI_USER_IN_APPLICATION_ROLE_ATTRIBUTES* pAttrs
+    )
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+
+    ICatalogCollection* piUsrInRoleColl = NULL;
+    ICatalogObject* piUsrInRoleObj = NULL;
+
+    PSID pSid = NULL;
+    long lChanges = 0;
+
+    // log
+    WcaLog(LOGMSG_VERBOSE, "Adding user to application role, key: %S", pAttrs->pwzKey);
+
+    // get users in role collection
+    hr = CpiGetUsersInRoleCollection(pAttrs->pwzPartID, pAttrs->pwzAppID, pAttrs->pwzRoleName, &piUsrInRoleColl);
+    if (S_FALSE == hr)
+        hr = HRESULT_FROM_WIN32(ERROR_NOT_FOUND);
+    ExitOnFailure(hr, "Failed to get users in role collection");
+
+    // get SID for account
+    do {
+        er = ERROR_SUCCESS;
+        hr = CpiAccountNameToSid(pAttrs->pwzAccount, &pSid);
+        if (HRESULT_FROM_WIN32(ERROR_NONE_MAPPED) == hr && !::MsiGetMode(WcaGetInstallHandle(), MSIRUNMODE_ROLLBACK))
+        {
+            WcaLog(LOGMSG_STANDARD, "Failed to lookup account name, hr: 0x%x, account: '%S'", hr, pAttrs->pwzAccount);
+            er = WcaErrorMessage(msierrComPlusFailedLookupNames, hr, INSTALLMESSAGE_ERROR | MB_ABORTRETRYIGNORE, 0);
+            switch (er)
+            {
+            case IDABORT:
+                ExitFunction(); // exit with error code from CpiAccountNameToSid()
+            case IDRETRY:
+                break;
+            case IDIGNORE:
+            default:
+                ExitFunction1(hr = S_OK);
+            }
+        }
+        else
+            ExitOnFailure(hr, "Failed to get SID for account");
+    } while (IDRETRY == er);
+
+    // find any existing entry
+    hr = CpiFindUserCollectionObject(piUsrInRoleColl, pSid, NULL);
+    if (HRESULT_FROM_WIN32(ERROR_NONE_MAPPED) == hr || HRESULT_FROM_WIN32(ERROR_SOME_NOT_MAPPED) == hr)
+        WcaLog(LOGMSG_STANDARD, "Failed to lookup account names, hr: 0x%x", hr);
+    else
+        ExitOnFailure(hr, "Failed to find user in application role");
+
+    if (S_OK == hr)
+    {
+        WcaLog(LOGMSG_VERBOSE, "User already assigned to application role, key: %S", pAttrs->pwzKey);
+        ExitFunction(); // exit with hr = S_OK
+    }
+
+    // convert SID back to account name
+    hr = CpiSidToAccountName(pSid, &pAttrs->pwzAccount);
+    ExitOnFailure(hr, "Failed to convert SID to account name");
+
+    // add user
+    hr = CpiAddCollectionObject(piUsrInRoleColl, &piUsrInRoleObj);
+    ExitOnFailure(hr, "Failed to add user in role to collection");
+
+    hr = CpiPutCollectionObjectValue(piUsrInRoleObj, L"User", pAttrs->pwzAccount);
+    ExitOnFailure(hr, "Failed to set role name property");
+
+    // save changes
+    hr = piUsrInRoleColl->SaveChanges(&lChanges);
+    if (COMADMIN_E_OBJECTERRORS == hr)
+        CpiLogCatalogErrorInfo();
+    ExitOnFailure(hr, "Failed to save changes");
+
+    // log
+    WcaLog(LOGMSG_VERBOSE, "%d changes saved to catalog, key: %S", lChanges, pAttrs->pwzKey);
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piUsrInRoleColl);
+    ReleaseObject(piUsrInRoleObj);
+
+    if (pSid)
+        ::HeapFree(::GetProcessHeap(), 0, pSid);
+
+    return hr;
+}
+
+static HRESULT RemoveUsersInApplicationRole(
+    CPI_USER_IN_APPLICATION_ROLE_ATTRIBUTES* pAttrs
+    )
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+
+    ICatalogCollection* piUsrInRoleColl = NULL;
+
+    PSID pSid = NULL;
+    long lChanges = 0;
+
+    // log
+    WcaLog(LOGMSG_VERBOSE, "Removing user from application role, key: %S", pAttrs->pwzKey);
+
+    // get users in role collection
+    hr = CpiGetUsersInRoleCollection(pAttrs->pwzPartID, pAttrs->pwzAppID, pAttrs->pwzRoleName, &piUsrInRoleColl);
+    ExitOnFailure(hr, "Failed to get users in role collection");
+
+    if (S_FALSE == hr)
+    {
+        // users in role collection not found
+        WcaLog(LOGMSG_VERBOSE, "Unable to retrieve users in role collection, nothing to delete, key: %S", pAttrs->pwzKey);
+        ExitFunction1(hr = S_OK);
+    }
+
+    // get SID for account
+    do {
+        er = ERROR_SUCCESS;
+        hr = CpiAccountNameToSid(pAttrs->pwzAccount, &pSid);
+        if (HRESULT_FROM_WIN32(ERROR_NONE_MAPPED) == hr && !::MsiGetMode(WcaGetInstallHandle(), MSIRUNMODE_ROLLBACK))
+        {
+            WcaLog(LOGMSG_STANDARD, "Failed to lookup account name, hr: 0x%x, account: '%S'", hr, pAttrs->pwzAccount);
+            er = WcaErrorMessage(msierrComPlusFailedLookupNames, hr, INSTALLMESSAGE_ERROR | MB_ABORTRETRYIGNORE, 0);
+            switch (er)
+            {
+            case IDABORT:
+                ExitFunction(); // exit with error code from CpiAccountNameToSid()
+            case IDRETRY:
+                break;
+            case IDIGNORE:
+            default:
+                ExitFunction1(hr = S_OK);
+            }
+        }
+        else
+            ExitOnFailure(hr, "Failed to get SID for account");
+    } while (IDRETRY == er);
+
+    // remove
+    hr = CpiRemoveUserCollectionObject(piUsrInRoleColl, pSid);
+    if (HRESULT_FROM_WIN32(ERROR_NONE_MAPPED) == hr || HRESULT_FROM_WIN32(ERROR_SOME_NOT_MAPPED) == hr)
+    {
+        WcaLog(LOGMSG_STANDARD, "Failed to lookup account names, hr: 0x%x", hr);
+        hr = S_FALSE;
+    }
+    else
+        ExitOnFailure(hr, "Failed to remove user");
+
+    if (S_FALSE == hr)
+    {
+        // role not found
+        WcaLog(LOGMSG_VERBOSE, "User not found for application role, nothing to delete, key: %S", pAttrs->pwzKey);
+        ExitFunction1(hr = S_OK);
+    }
+
+    // save changes
+    hr = piUsrInRoleColl->SaveChanges(&lChanges);
+    if (COMADMIN_E_OBJECTERRORS == hr)
+        CpiLogCatalogErrorInfo();
+    ExitOnFailure(hr, "Failed to save changes");
+
+    // log
+    WcaLog(LOGMSG_VERBOSE, "%d changes saved to catalog, key: %S", lChanges, pAttrs->pwzKey);
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piUsrInRoleColl);
+
+    if (pSid)
+        ::HeapFree(::GetProcessHeap(), 0, pSid);
+
+    return hr;
+}
diff --git a/src/ext/ComPlus/ca/cpapproleexec.h b/src/ext/ComPlus/ca/cpapproleexec.h
new file mode 100644
index 00000000..1251cbdb
--- /dev/null
+++ b/src/ext/ComPlus/ca/cpapproleexec.h
@@ -0,0 +1,20 @@
+#pragma once
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+
+HRESULT CpiConfigureApplicationRoles(
+    LPWSTR* ppwzData,
+    HANDLE hRollbackFile
+    );
+HRESULT CpiRollbackConfigureApplicationRoles(
+    LPWSTR* ppwzData,
+    CPI_ROLLBACK_DATA* pRollbackDataList
+    );
+HRESULT CpiConfigureUsersInApplicationRoles(
+    LPWSTR* ppwzData,
+    HANDLE hRollbackFile
+    );
+HRESULT CpiRollbackConfigureUsersInApplicationRoles(
+    LPWSTR* ppwzData,
+    CPI_ROLLBACK_DATA* pRollbackDataList
+    );
diff --git a/src/ext/ComPlus/ca/cpapprolesched.cpp b/src/ext/ComPlus/ca/cpapprolesched.cpp
new file mode 100644
index 00000000..a268d156
--- /dev/null
+++ b/src/ext/ComPlus/ca/cpapprolesched.cpp
@@ -0,0 +1,843 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+#include "precomp.h"
+
+
+// sql queries
+
+LPCWSTR vcsApplicationRoleQuery =
+    L"SELECT `ApplicationRole`, `Application_`, `Component_`, `Name` FROM `ComPlusApplicationRole`";
+enum eApplicationRoleQuery { arqApplicationRole = 1, arqApplication, arqComponent, arqName };
+
+LPCWSTR vcsUserInApplicationRoleQuery =
+    L"SELECT `UserInApplicationRole`, `ApplicationRole_`, `ComPlusUserInApplicationRole`.`Component_`, `Domain`, `Name` FROM `ComPlusUserInApplicationRole`, `User` WHERE `User_` = `User`";
+LPCWSTR vcsGroupInApplicationRoleQuery =
+    L"SELECT `GroupInApplicationRole`, `ApplicationRole_`, `ComPlusGroupInApplicationRole`.`Component_`, `Domain`, `Name` FROM `ComPlusGroupInApplicationRole`, `Group` WHERE `Group_` = `Group`";
+enum eTrusteeInApplicationRoleQuery { tiarqUserInApplicationRole = 1, tiarqApplicationRole, tiarqComponent, tiarqDomain, tiarqName };
+
+LPCWSTR vcsApplicationRolePropertyQuery =
+    L"SELECT `Name`, `Value` FROM `ComPlusApplicationRoleProperty` WHERE `ApplicationRole_` = ?";
+
+
+// property definitions
+
+CPI_PROPERTY_DEFINITION pdlApplicationRoleProperties[] =
+{
+    {L"Description", cpptString, 500},
+    {NULL,           cpptNone,   0}
+};
+
+
+// prototypes for private helper functions
+
+static HRESULT TrusteesInApplicationRolesRead(
+    LPCWSTR pwzQuery,
+    CPI_APPLICATION_ROLE_LIST* pAppRoleList,
+    CPI_USER_IN_APPLICATION_ROLE_LIST* pUsrInAppRoleList
+    );
+static void FreeApplicationRole(
+    CPI_APPLICATION_ROLE* pItm
+    );
+static void FreeUserInApplicationRole(
+    CPI_USER_IN_APPLICATION_ROLE* pItm
+    );
+//static HRESULT GetUsersCollForApplicationRole(
+//    CPI_APPLICATION_ROLE* pAppRole,
+//    ICatalogCollection** ppiUsersColl
+//    );
+static HRESULT FindObjectForApplicationRole(
+    CPI_APPLICATION_ROLE* pItm,
+    ICatalogObject** ppiRoleObj
+    );
+static HRESULT AddApplicationRoleToActionData(
+    CPI_APPLICATION_ROLE* pItm,
+    int iActionType,
+    int iActionCost,
+    LPWSTR* ppwzActionData
+    );
+static HRESULT AddUserInApplicationRoleToActionData(
+    CPI_USER_IN_APPLICATION_ROLE* pItm,
+    int iActionType,
+    int iActionCost,
+    LPWSTR* ppwzActionData
+    );
+
+
+// function definitions
+
+void CpiApplicationRoleListFree(
+    CPI_APPLICATION_ROLE_LIST* pList
+    )
+{
+    CPI_APPLICATION_ROLE* pItm = pList->pFirst;
+
+    while (pItm)
+    {
+        CPI_APPLICATION_ROLE* pDelete = pItm;
+        pItm = pItm->pNext;
+        FreeApplicationRole(pDelete);
+    }
+}
+
+HRESULT CpiApplicationRolesRead(
+    CPI_APPLICATION_LIST* pAppList,
+    CPI_APPLICATION_ROLE_LIST* pAppRoleList
+    )
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+
+    PMSIHANDLE hView, hRec;
+
+    CPI_APPLICATION_ROLE* pItm = NULL;
+    LPWSTR pwzData = NULL;
+    BOOL fMatchingArchitecture = FALSE;
+
+    // loop through all application roles
+    hr = WcaOpenExecuteView(vcsApplicationRoleQuery, &hView);
+    ExitOnFailure(hr, "Failed to execute view on ComPlusApplicationRole table");
+
+    while (S_OK == (hr = WcaFetchRecord(hView, &hRec)))
+    {
+        // get component
+        hr = WcaGetRecordString(hRec, arqComponent, &pwzData);
+        ExitOnFailure(hr, "Failed to get component");
+
+        // check if the component is our processor architecture
+        if (pwzData && *pwzData)
+        {
+            hr = CpiVerifyComponentArchitecure(pwzData, &fMatchingArchitecture);
+            ExitOnFailure(hr, "Failed to get component architecture.");
+
+            if (!fMatchingArchitecture)
+            {
+                continue; // not the same architecture, ignore
+            }
+        }
+
+        // create entry
+        pItm = (CPI_APPLICATION_ROLE*)::HeapAlloc(::GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(CPI_APPLICATION_ROLE));
+        if (!pItm)
+            ExitFunction1(hr = E_OUTOFMEMORY);
+
+        // get component install state
+        if (pwzData && *pwzData)
+        {
+            pItm->fHasComponent = TRUE;
+
+            er = ::MsiGetComponentStateW(WcaGetInstallHandle(), pwzData, &pItm->isInstalled, &pItm->isAction);
+            ExitOnFailure(hr = HRESULT_FROM_WIN32(er), "Failed to get component state");
+        }
+
+        // get key
+        hr = WcaGetRecordString(hRec, arqApplicationRole, &pwzData);
+        ExitOnFailure(hr, "Failed to get key");
+        StringCchCopyW(pItm->wzKey, countof(pItm->wzKey), pwzData);
+
+        // get application
+        hr = WcaGetRecordString(hRec, arqApplication, &pwzData);
+        ExitOnFailure(hr, "Failed to get application");
+
+        hr = CpiApplicationFindByKey(pAppList, pwzData, &pItm->pApplication);
+        if (S_FALSE == hr)
+            hr = HRESULT_FROM_WIN32(ERROR_NOT_FOUND);
+        ExitOnFailure(hr, "Failed to find application, key: %S", pwzData);
+
+        // get name
+        hr = WcaGetRecordFormattedString(hRec, arqName, &pwzData);
+        ExitOnFailure(hr, "Failed to get name");
+        StringCchCopyW(pItm->wzName, countof(pItm->wzName), pwzData);
+
+        // get properties
+        if (CpiTableExists(cptComPlusApplicationRoleProperty))
+        {
+            hr = CpiPropertiesRead(vcsApplicationRolePropertyQuery, pItm->wzKey, pdlApplicationRoleProperties, &pItm->pProperties, &pItm->iPropertyCount);
+            ExitOnFailure(hr, "Failed to get properties");
+        }
+
+        // set references & increment counters
+        if (pItm->fHasComponent)
+        {
+            if (WcaIsInstalling(pItm->isInstalled, pItm->isAction))
+            {
+                CpiApplicationAddReferenceInstall(pItm->pApplication);
+                pAppRoleList->iInstallCount++;
+            }
+            if (WcaIsUninstalling(pItm->isInstalled, pItm->isAction))
+            {
+                CpiApplicationAddReferenceUninstall(pItm->pApplication);
+                pAppRoleList->iUninstallCount++;
+            }
+        }
+
+        // add entry
+        if (pAppRoleList->pFirst)
+            pItm->pNext = pAppRoleList->pFirst;
+        pAppRoleList->pFirst = pItm;
+        pItm = NULL;
+    }
+
+    if (E_NOMOREITEMS == hr)
+        hr = S_OK;
+
+LExit:
+    // clean up
+    if (pItm)
+        FreeApplicationRole(pItm);
+
+    ReleaseStr(pwzData);
+
+    return hr;
+}
+
+HRESULT CpiApplicationRolesVerifyInstall(
+    CPI_APPLICATION_ROLE_LIST* pList
+    )
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+
+    ICatalogObject* piRoleObj = NULL;
+
+    for (CPI_APPLICATION_ROLE* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        // referenced locaters or roles that are being installed
+        if (!pItm->fReferencedForInstall && !(pItm->fHasComponent && WcaIsInstalling(pItm->isInstalled, pItm->isAction)))
+            continue;
+
+        // if the role is referensed and is not a locater, it must be installed
+        if (pItm->fReferencedForInstall && pItm->fHasComponent && !CpiWillBeInstalled(pItm->isInstalled, pItm->isAction))
+            MessageExitOnFailure(hr = E_FAIL, msierrComPlusApplicationRoleDependency, "An application role is used by another entity being installed, but is not installed itself, key: %S", pItm->wzKey);
+
+        // role is a locater
+        if (!pItm->fHasComponent)
+        {
+            // get collection object for role
+            hr = FindObjectForApplicationRole(pItm, &piRoleObj);
+            ExitOnFailure(hr, "Failed to find collection object for role");
+
+            // if the role was not found
+            if (S_FALSE == hr)
+                MessageExitOnFailure(hr = HRESULT_FROM_WIN32(ERROR_NOT_FOUND), msierrComPlusApplicationRoleNotFound, "An application role required by this installation was not found, key: %S", pItm->wzKey);
+        }
+
+        // role is supposed to be created
+        else if (!CpiIsInstalled(pItm->isInstalled))
+        {
+            do {
+                // find roles with conflicting name or id
+                hr = FindObjectForApplicationRole(pItm, NULL);
+                ExitOnFailure(hr, "Failed to find collection object for role");
+
+                if (S_OK == hr)
+                {
+                    er = WcaErrorMessage(msierrComPlusApplicationRoleConflict, hr, INSTALLMESSAGE_ERROR | MB_ABORTRETRYIGNORE, 0);
+                    switch (er)
+                    {
+                    case IDABORT:
+                        ExitOnFailure(hr = E_FAIL, "An application with a conflictiong name exists, key: %S", pItm->wzKey);
+                        break;
+                    case IDRETRY:
+                        break;
+                    case IDIGNORE:
+                    default:
+                        hr = S_FALSE; // indicate that this is not a conflict
+                    }
+                }
+            } while (S_OK == hr); // hr = S_FALSE if we don't have any conflicts
+        }
+
+        // clean up
+        ReleaseNullObject(piRoleObj);
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piRoleObj);
+
+    return hr;
+}
+
+HRESULT CpiApplicationRolesVerifyUninstall(
+    CPI_APPLICATION_ROLE_LIST* pList
+    )
+{
+    HRESULT hr = S_OK;
+
+    for (CPI_APPLICATION_ROLE* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        // referenced locaters or roles that are being installed
+        if (!pItm->fReferencedForUninstall && !(pItm->fHasComponent && WcaIsUninstalling(pItm->isInstalled, pItm->isAction)))
+            continue;
+
+        // get collection object for role
+        hr = FindObjectForApplicationRole(pItm, NULL);
+        ExitOnFailure(hr, "Failed to find collection object for role");
+
+        // if the role was not found
+        if (S_FALSE == hr)
+        {
+            pItm->fObjectNotFound = TRUE;
+            if (pItm->fHasComponent)
+                pList->iUninstallCount--; // elements with the fObjectNotFound flag set will not be scheduled for uninstall
+        }
+    }
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+void CpiApplicationRoleAddReferenceInstall(
+    CPI_APPLICATION_ROLE* pItm
+    )
+{
+    pItm->fReferencedForInstall = TRUE;
+    CpiApplicationAddReferenceInstall(pItm->pApplication);
+}
+
+void CpiApplicationRoleAddReferenceUninstall(
+    CPI_APPLICATION_ROLE* pItm
+    )
+{
+    pItm->fReferencedForUninstall = TRUE;
+    CpiApplicationAddReferenceUninstall(pItm->pApplication);
+}
+
+HRESULT CpiApplicationRolesInstall(
+    CPI_APPLICATION_ROLE_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    )
+{
+    HRESULT hr = S_OK;
+
+    int iActionType;
+
+    // add action text
+    hr = CpiAddActionTextToActionData(L"CreateComPlusApplicationRoles", ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action text to custom action data");
+
+    // add count to action data
+    hr = WcaWriteIntegerToCaData(pList->iInstallCount, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add count to custom action data");
+
+    // add roles to custom action data
+    for (CPI_APPLICATION_ROLE* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        // roles that are being installed only
+        if (!WcaIsInstalling(pItm->isInstalled, pItm->isAction))
+            continue;
+
+        // action type
+        if (rmRollback == iRunMode)
+        {
+            if (CpiIsInstalled(pItm->isInstalled))
+                iActionType = atNoOp;
+            else
+                iActionType = atRemove;
+        }
+        else
+            iActionType = atCreate;
+
+        // add to action data
+        hr = AddApplicationRoleToActionData(pItm, iActionType, COST_APPLICATION_ROLE_CREATE, ppwzActionData);
+        ExitOnFailure(hr, "Failed to add application role to custom action data, key: %S", pItm->wzKey);
+    }
+
+    // add progress tics
+    if (piProgress)
+        *piProgress += COST_APPLICATION_ROLE_CREATE * pList->iInstallCount;
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiApplicationRolesUninstall(
+    CPI_APPLICATION_ROLE_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    )
+{
+    HRESULT hr = S_OK;
+
+    int iActionType;
+
+    // add action text
+    hr = CpiAddActionTextToActionData(L"RemoveComPlusApplicationRoles", ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action text to custom action data");
+
+    // add count to action data
+    hr = WcaWriteIntegerToCaData(pList->iUninstallCount, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add count to custom action data");
+
+    // add roles to custom action data
+    for (CPI_APPLICATION_ROLE* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        // roles that are being uninstalled only
+        if (pItm->fObjectNotFound || !WcaIsUninstalling(pItm->isInstalled, pItm->isAction))
+            continue;
+
+        // action type
+        if (rmRollback == iRunMode)
+            iActionType = atCreate;
+        else
+            iActionType = atRemove;
+
+        // add to action data
+        hr = AddApplicationRoleToActionData(pItm, iActionType, COST_APPLICATION_ROLE_DELETE, ppwzActionData);
+        ExitOnFailure(hr, "Failed to add application role to custom action data, key: %S", pItm->wzKey);
+    }
+
+    // add progress tics
+    if (piProgress)
+        *piProgress += COST_APPLICATION_ROLE_DELETE * pList->iUninstallCount;
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiApplicationRoleFindByKey(
+    CPI_APPLICATION_ROLE_LIST* pList,
+    LPCWSTR pwzKey,
+    CPI_APPLICATION_ROLE** ppAppRole
+    )
+{
+    for (CPI_APPLICATION_ROLE* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        if (0 == lstrcmpW(pItm->wzKey, pwzKey))
+        {
+            *ppAppRole = pItm;
+            return S_OK;
+        }
+    }
+
+    return S_FALSE;
+}
+
+void CpiUserInApplicationRoleListFree(
+    CPI_USER_IN_APPLICATION_ROLE_LIST* pList
+    )
+{
+    CPI_USER_IN_APPLICATION_ROLE* pItm = pList->pFirst;
+
+    while (pItm)
+    {
+        CPI_USER_IN_APPLICATION_ROLE* pDelete = pItm;
+        pItm = pItm->pNext;
+        FreeUserInApplicationRole(pDelete);
+    }
+}
+
+HRESULT CpiUsersInApplicationRolesRead(
+    CPI_APPLICATION_ROLE_LIST* pAppRoleList,
+    CPI_USER_IN_APPLICATION_ROLE_LIST* pUsrInAppRoleList
+    )
+{
+    HRESULT hr = S_OK;
+
+    // read users in application roles
+    if (CpiTableExists(cptComPlusUserInApplicationRole))
+    {
+        hr = TrusteesInApplicationRolesRead(vcsUserInApplicationRoleQuery, pAppRoleList, pUsrInAppRoleList);
+        ExitOnFailure(hr, "Failed to read users in application roles");
+    }
+
+    // read groups in application roles
+    if (CpiTableExists(cptComPlusGroupInApplicationRole))
+    {
+        hr = TrusteesInApplicationRolesRead(vcsGroupInApplicationRoleQuery, pAppRoleList, pUsrInAppRoleList);
+        ExitOnFailure(hr, "Failed to read groups in application roles");
+    }
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiUsersInApplicationRolesInstall(
+    CPI_USER_IN_APPLICATION_ROLE_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    )
+{
+    HRESULT hr = S_OK;
+
+    int iActionType;
+
+    // add action text
+    hr = CpiAddActionTextToActionData(L"AddUsersToComPlusApplicationRoles", ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action text to custom action data");
+
+    // add count to action data
+    hr = WcaWriteIntegerToCaData(pList->iInstallCount, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add count to custom action data");
+
+    // add roles to custom action data
+    for (CPI_USER_IN_APPLICATION_ROLE* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        // roles that are being installed only
+        if (!WcaIsInstalling(pItm->isInstalled, pItm->isAction))
+            continue;
+
+        // action type
+        if (rmRollback == iRunMode)
+        {
+            if (CpiIsInstalled(pItm->isInstalled))
+                iActionType = atNoOp;
+            else
+                iActionType = atRemove;
+        }
+        else
+            iActionType = atCreate;
+
+        // add to action data
+        hr = AddUserInApplicationRoleToActionData(pItm, iActionType, COST_USER_IN_APPLICATION_ROLE_CREATE, ppwzActionData);
+        ExitOnFailure(hr, "Failed to add user in application role to custom action data, key: %S", pItm->wzKey);
+    }
+
+    // add progress tics
+    if (piProgress)
+        *piProgress += COST_USER_IN_APPLICATION_ROLE_CREATE * pList->iInstallCount;
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiUsersInApplicationRolesUninstall(
+    CPI_USER_IN_APPLICATION_ROLE_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    )
+{
+    HRESULT hr = S_OK;
+
+    int iActionType;
+
+    // add action text
+    hr = CpiAddActionTextToActionData(L"RemoveUsersFromComPlusAppRoles", ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action text to custom action data");
+
+    // add count to action data
+    hr = WcaWriteIntegerToCaData(pList->iUninstallCount, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add count to custom action data");
+
+    // add roles to custom action data
+    for (CPI_USER_IN_APPLICATION_ROLE* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        // roles that are being uninstalled only
+        if (!WcaIsUninstalling(pItm->isInstalled, pItm->isAction))
+            continue;
+
+        // action type
+        if (rmRollback == iRunMode)
+            iActionType = atCreate;
+        else
+            iActionType = atRemove;
+
+        // add to action data
+        hr = AddUserInApplicationRoleToActionData(pItm, iActionType, COST_USER_IN_APPLICATION_ROLE_DELETE, ppwzActionData);
+        ExitOnFailure(hr, "Failed to add user in application role to custom action data, key: %S", pItm->wzKey);
+    }
+
+    // add progress tics
+    if (piProgress)
+        *piProgress += COST_USER_IN_APPLICATION_ROLE_DELETE * pList->iUninstallCount;
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+
+// helper function definitions
+
+static HRESULT TrusteesInApplicationRolesRead(
+    LPCWSTR pwzQuery,
+    CPI_APPLICATION_ROLE_LIST* pAppRoleList,
+    CPI_USER_IN_APPLICATION_ROLE_LIST* pUsrInAppRoleList
+    )
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+
+    PMSIHANDLE hView, hRec;
+
+    CPI_USER_IN_APPLICATION_ROLE* pItm = NULL;
+    LPWSTR pwzData = NULL;
+    LPWSTR pwzDomain = NULL;
+    LPWSTR pwzName = NULL;
+    BOOL fMatchingArchitecture = FALSE;
+
+    // loop through all application roles
+    hr = WcaOpenExecuteView(pwzQuery, &hView);
+    ExitOnFailure(hr, "Failed to execute view on table");
+
+    while (S_OK == (hr = WcaFetchRecord(hView, &hRec)))
+    {
+        // get component
+        hr = WcaGetRecordString(hRec, tiarqComponent, &pwzData);
+        ExitOnFailure(hr, "Failed to get component");
+
+        // check if the component is our processor architecture
+        hr = CpiVerifyComponentArchitecure(pwzData, &fMatchingArchitecture);
+        ExitOnFailure(hr, "Failed to get component architecture.");
+
+        if (!fMatchingArchitecture)
+        {
+            continue; // not the same architecture, ignore
+        }
+
+        // create entry
+        pItm = (CPI_USER_IN_APPLICATION_ROLE*)::HeapAlloc(::GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(CPI_USER_IN_APPLICATION_ROLE));
+        if (!pItm)
+            ExitFunction1(hr = E_OUTOFMEMORY);
+
+        // get component install state
+        er = ::MsiGetComponentStateW(WcaGetInstallHandle(), pwzData, &pItm->isInstalled, &pItm->isAction);
+        ExitOnFailure(hr = HRESULT_FROM_WIN32(er), "Failed to get component state");
+
+        // get key
+        hr = WcaGetRecordString(hRec, tiarqUserInApplicationRole, &pwzData);
+        ExitOnFailure(hr, "Failed to get key");
+        StringCchCopyW(pItm->wzKey, countof(pItm->wzKey), pwzData);
+
+        // get application role
+        hr = WcaGetRecordString(hRec, tiarqApplicationRole, &pwzData);
+        ExitOnFailure(hr, "Failed to get application role");
+
+        hr = CpiApplicationRoleFindByKey(pAppRoleList, pwzData, &pItm->pApplicationRole);
+        if (S_FALSE == hr)
+            hr = HRESULT_FROM_WIN32(ERROR_NOT_FOUND);
+        ExitOnFailure(hr, "Failed to find application role, key: %S", pwzData);
+
+        // get user domain
+        hr = WcaGetRecordFormattedString(hRec, tiarqDomain, &pwzDomain);
+        ExitOnFailure(hr, "Failed to get domain");
+
+        // get user name
+        hr = WcaGetRecordFormattedString(hRec, tiarqName, &pwzName);
+        ExitOnFailure(hr, "Failed to get name");
+
+        // build account name
+        hr = CpiBuildAccountName(pwzDomain, pwzName, &pItm->pwzAccount);
+        ExitOnFailure(hr, "Failed to build account name");
+
+        // set references & increment counters
+        if (WcaIsInstalling(pItm->isInstalled, pItm->isAction))
+        {
+            CpiApplicationRoleAddReferenceInstall(pItm->pApplicationRole);
+            pUsrInAppRoleList->iInstallCount++;
+        }
+        if (WcaIsUninstalling(pItm->isInstalled, pItm->isAction))
+        {
+            CpiApplicationRoleAddReferenceUninstall(pItm->pApplicationRole);
+            pUsrInAppRoleList->iUninstallCount++;
+        }
+
+        // add entry
+        if (pUsrInAppRoleList->pFirst)
+            pItm->pNext = pUsrInAppRoleList->pFirst;
+        pUsrInAppRoleList->pFirst = pItm;
+        pItm = NULL;
+    }
+
+    if (E_NOMOREITEMS == hr)
+        hr = S_OK;
+
+LExit:
+    // clean up
+    if (pItm)
+        FreeUserInApplicationRole(pItm);
+
+    ReleaseStr(pwzData);
+    ReleaseStr(pwzDomain);
+    ReleaseStr(pwzName);
+
+    return hr;
+}
+
+static void FreeApplicationRole(
+    CPI_APPLICATION_ROLE* pItm
+    )
+{
+    if (pItm->pProperties)
+        CpiPropertiesFreeList(pItm->pProperties);
+
+    ReleaseObject(pItm->piUsersColl);
+
+    ::HeapFree(::GetProcessHeap(), 0, pItm);
+}
+
+static void FreeUserInApplicationRole(
+    CPI_USER_IN_APPLICATION_ROLE* pItm
+    )
+{
+    ReleaseStr(pItm->pwzAccount);
+
+    ::HeapFree(::GetProcessHeap(), 0, pItm);
+}
+
+//static HRESULT GetUsersCollForApplicationRole(
+//    CPI_APPLICATION_ROLE* pAppRole,
+//    ICatalogCollection** ppiUsersColl
+//    )
+//{
+//    HRESULT hr = S_OK;
+//
+//    ICatalogCollection* piRoleColl = NULL;
+//    ICatalogObject* piRoleObj = NULL;
+//
+//    // if a previous attempt to locate the collection object failed
+//    if (pAppRole->fObjectNotFound)
+//        ExitFunction1(hr = S_FALSE);
+//
+//    // get applications collection
+//    if (!pAppRole->piUsersColl)
+//    {
+//        // get collection object for role
+//        hr = FindObjectForApplicationRole(pAppRole, &piRoleObj);
+//        ExitOnFailure(hr, "Failed to find collection object for role");
+//
+//        if (S_FALSE == hr)
+//            ExitFunction(); // exit with hr = S_FALSE
+//
+//        // get users collection
+//        hr = CpiGetCatalogCollection(piRoleColl, piRoleObj, L"UsersInRole", &pAppRole->piUsersColl);
+//        ExitOnFailure(hr, "Failed to get users in role collection");
+//    }
+//
+//    // return value
+//    *ppiUsersColl = pAppRole->piUsersColl;
+//    (*ppiUsersColl)->AddRef();
+//
+//    hr = S_OK;
+//
+//LExit:
+//    // clean up
+//    ReleaseObject(piRoleColl);
+//    ReleaseObject(piRoleObj);
+//
+//    return hr;
+//}
+
+static HRESULT FindObjectForApplicationRole(
+    CPI_APPLICATION_ROLE* pItm,
+    ICatalogObject** ppiRoleObj
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICatalogCollection* piRoleColl = NULL;
+
+    // get roles collection
+    hr = CpiGetRolesCollForApplication(pItm->pApplication, &piRoleColl);
+    ExitOnFailure(hr, "Failed to get collection");
+
+    if (S_FALSE == hr)
+        ExitFunction(); // exit with hr = S_FALSE
+
+    // find role object
+    hr = CpiFindCollectionObject(piRoleColl, NULL, pItm->wzName, ppiRoleObj);
+    ExitOnFailure(hr, "Failed to find object");
+
+    // exit with hr from CpiFindCollectionObject()
+
+LExit:
+    // clean up
+    ReleaseObject(piRoleColl);
+
+    return hr;
+}
+
+static HRESULT AddApplicationRoleToActionData(
+    CPI_APPLICATION_ROLE* pItm,
+    int iActionType,
+    int iActionCost,
+    LPWSTR* ppwzActionData
+    )
+{
+    HRESULT hr = S_OK;
+
+    // add action information to custom action data
+    hr = WcaWriteIntegerToCaData(iActionType, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action type to custom action data");
+    hr = WcaWriteIntegerToCaData(iActionCost, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action cost to custom action data");
+
+    // add application role information to custom action data
+    hr = WcaWriteStringToCaData(pItm->wzKey, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add application role key to custom action data");
+    hr = WcaWriteStringToCaData(pItm->wzName, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add application role name to custom action data");
+
+    // add application information to custom action data
+    hr = WcaWriteStringToCaData(pItm->pApplication->wzID, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add application id to custom action data");
+
+    // add partition information to custom action data
+    hr = WcaWriteStringToCaData(pItm->pApplication->pPartition ? pItm->pApplication->pPartition->wzID : L"", ppwzActionData);
+    ExitOnFailure(hr, "Failed to add partition id to custom action data");
+
+    // add properties to custom action data
+    hr = CpiAddPropertiesToActionData(atCreate == iActionType ? pItm->iPropertyCount : 0, pItm->pProperties, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add properties to custom action data");
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+static HRESULT AddUserInApplicationRoleToActionData(
+    CPI_USER_IN_APPLICATION_ROLE* pItm,
+    int iActionType,
+    int iActionCost,
+    LPWSTR* ppwzActionData
+    )
+{
+    HRESULT hr = S_OK;
+
+    // add action information to custom action data
+    hr = WcaWriteIntegerToCaData(iActionType, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action type to custom action data");
+    hr = WcaWriteIntegerToCaData(iActionCost, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action cost to custom action data");
+
+    // add application role information to custom action data
+    hr = WcaWriteStringToCaData(pItm->wzKey, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add key to custom action data");
+    hr = WcaWriteStringToCaData(pItm->pApplicationRole->wzName, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add role name to custom action data");
+    hr = WcaWriteStringToCaData(pItm->pwzAccount, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add user account to custom action data");
+
+    // add application information to custom action data
+    CPI_APPLICATION* pApplication = pItm->pApplicationRole->pApplication;
+    hr = WcaWriteStringToCaData(pApplication->wzID, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add application id to custom action data");
+
+    // add partition information to custom action data
+    hr = WcaWriteStringToCaData(pApplication->pPartition ? pApplication->pPartition->wzID : L"", ppwzActionData);
+    ExitOnFailure(hr, "Failed to add partition id to custom action data");
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
diff --git a/src/ext/ComPlus/ca/cpapprolesched.h b/src/ext/ComPlus/ca/cpapprolesched.h
new file mode 100644
index 00000000..02852eef
--- /dev/null
+++ b/src/ext/ComPlus/ca/cpapprolesched.h
@@ -0,0 +1,112 @@
+#pragma once
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+
+struct CPI_APPLICATION_ROLE
+{
+    WCHAR wzKey[MAX_DARWIN_KEY + 1];
+    WCHAR wzName[MAX_DARWIN_COLUMN + 1];
+
+    int iPropertyCount;
+    CPI_PROPERTY* pProperties;
+
+    BOOL fHasComponent;
+    BOOL fReferencedForInstall;
+    BOOL fReferencedForUninstall;
+    BOOL fObjectNotFound;
+
+    INSTALLSTATE isInstalled, isAction;
+
+    CPI_APPLICATION* pApplication;
+
+    ICatalogCollection* piUsersColl;
+
+    CPI_APPLICATION_ROLE* pNext;
+};
+
+struct CPI_APPLICATION_ROLE_LIST
+{
+    CPI_APPLICATION_ROLE* pFirst;
+
+    int iInstallCount;
+    int iUninstallCount;
+};
+
+struct CPI_USER_IN_APPLICATION_ROLE
+{
+    WCHAR wzKey[MAX_DARWIN_KEY + 1];
+    LPWSTR pwzAccount;
+
+    INSTALLSTATE isInstalled, isAction;
+
+    CPI_APPLICATION_ROLE* pApplicationRole;
+
+    CPI_USER_IN_APPLICATION_ROLE* pNext;
+};
+
+struct CPI_USER_IN_APPLICATION_ROLE_LIST
+{
+    CPI_USER_IN_APPLICATION_ROLE* pFirst;
+
+    int iInstallCount;
+    int iUninstallCount;
+};
+
+
+// function prototypes
+
+void CpiApplicationRoleListFree(
+    CPI_APPLICATION_ROLE_LIST* pList
+    );
+HRESULT CpiApplicationRolesRead(
+    CPI_APPLICATION_LIST* pAppList,
+    CPI_APPLICATION_ROLE_LIST* pAppRoleList
+    );
+HRESULT CpiApplicationRolesVerifyInstall(
+    CPI_APPLICATION_ROLE_LIST* pList
+    );
+HRESULT CpiApplicationRolesVerifyUninstall(
+    CPI_APPLICATION_ROLE_LIST* pList
+    );
+void CpiApplicationRoleAddReferenceInstall(
+    CPI_APPLICATION_ROLE* pItm
+    );
+void CpiApplicationRoleAddReferenceUninstall(
+    CPI_APPLICATION_ROLE* pItm
+    );
+HRESULT CpiApplicationRolesInstall(
+    CPI_APPLICATION_ROLE_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    );
+HRESULT CpiApplicationRolesUninstall(
+    CPI_APPLICATION_ROLE_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    );
+HRESULT CpiApplicationRoleFindByKey(
+    CPI_APPLICATION_ROLE_LIST* pList,
+    LPCWSTR pwzKey,
+    CPI_APPLICATION_ROLE** ppAppRole
+    );
+void CpiUserInApplicationRoleListFree(
+    CPI_USER_IN_APPLICATION_ROLE_LIST* pList
+    );
+HRESULT CpiUsersInApplicationRolesRead(
+    CPI_APPLICATION_ROLE_LIST* pAppRoleList,
+    CPI_USER_IN_APPLICATION_ROLE_LIST* pUsrInAppRoleList
+    );
+HRESULT CpiUsersInApplicationRolesInstall(
+    CPI_USER_IN_APPLICATION_ROLE_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    );
+HRESULT CpiUsersInApplicationRolesUninstall(
+    CPI_USER_IN_APPLICATION_ROLE_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    );
diff --git a/src/ext/ComPlus/ca/cpappsched.cpp b/src/ext/ComPlus/ca/cpappsched.cpp
new file mode 100644
index 00000000..1fb2203b
--- /dev/null
+++ b/src/ext/ComPlus/ca/cpappsched.cpp
@@ -0,0 +1,752 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+#include "precomp.h"
+
+
+// sql queries
+
+LPCWSTR vcsApplicationQuery =
+    L"SELECT `Application`, `Component_`, `Partition_`, `Id`, `Name` FROM `ComPlusApplication`";
+enum eApplicationQuery { aqApplication = 1, aqComponent, aqPartition, aqID, aqName };
+
+LPCWSTR vcsApplicationPropertyQuery =
+    L"SELECT `Name`, `Value` FROM `ComPlusApplicationProperty` WHERE `Application_` = ?";
+
+
+// property definitions
+
+CPI_PROPERTY_DEFINITION pdlApplicationProperties[] =
+{
+    {L"3GigSupportEnabled",             cpptBoolean, 500},
+    {L"AccessChecksLevel",              cpptInteger, 500},
+    {L"Activation",                     cpptInteger, 500},
+    {L"ApplicationAccessChecksEnabled", cpptBoolean, 500},
+    {L"ApplicationDirectory",           cpptString,  501},
+    {L"Authentication",                 cpptInteger, 500},
+    {L"AuthenticationCapability",       cpptInteger, 500},
+    {L"Changeable",                     cpptBoolean, 500},
+    {L"CommandLine",                    cpptString,  500},
+    {L"ConcurrentApps",                 cpptInteger, 501},
+    {L"CreatedBy",                      cpptString,  500},
+    {L"CRMEnabled",                     cpptBoolean, 500},
+    {L"CRMLogFile",                     cpptString,  500},
+    {L"Deleteable",                     cpptBoolean, 500},
+    {L"Description",                    cpptString,  500},
+    {L"DumpEnabled",                    cpptBoolean, 501},
+    {L"DumpOnException",                cpptBoolean, 501},
+    {L"DumpOnFailfast",                 cpptBoolean, 501},
+    {L"DumpPath",                       cpptString,  501},
+    {L"EventsEnabled",                  cpptBoolean, 500},
+    {L"Identity",                       cpptString,  500},
+    {L"ImpersonationLevel",             cpptInteger, 500},
+    {L"IsEnabled",                      cpptBoolean, 501},
+    {L"MaxDumpCount",                   cpptInteger, 501},
+    {L"Password",                       cpptString,  500},
+    {L"QCAuthenticateMsgs",             cpptInteger, 501},
+    {L"QCListenerMaxThreads",           cpptInteger, 501},
+    {L"QueueListenerEnabled",           cpptBoolean, 500},
+    {L"QueuingEnabled",                 cpptBoolean, 500},
+    {L"RecycleActivationLimit",         cpptInteger, 501},
+    {L"RecycleCallLimit",               cpptInteger, 501},
+    {L"RecycleExpirationTimeout",       cpptInteger, 501},
+    {L"RecycleLifetimeLimit",           cpptInteger, 501},
+    {L"RecycleMemoryLimit",             cpptInteger, 501},
+    {L"Replicable",                     cpptBoolean, 501},
+    {L"RunForever",                     cpptBoolean, 500},
+    {L"ShutdownAfter",                  cpptInteger, 500},
+    {L"SoapActivated",                  cpptBoolean, 502},
+    {L"SoapBaseUrl",                    cpptString,  502},
+    {L"SoapMailTo",                     cpptString,  502},
+    {L"SoapVRoot",                      cpptString,  502},
+    {L"SRPEnabled",                     cpptBoolean, 501},
+    {L"SRPTrustLevel",                  cpptInteger, 501},
+    {NULL,                              cpptNone,    0}
+};
+
+
+// prototypes for private helper functions
+
+static void FreeApplication(
+    CPI_APPLICATION* pItm
+    );
+static HRESULT FindObjectForApplication(
+    CPI_APPLICATION* pItm,
+    BOOL fFindId,
+    BOOL fFindName,
+    ICatalogObject** ppiAppObj
+    );
+static HRESULT AddApplicationToActionData(
+    CPI_APPLICATION* pItm,
+    int iActionType,
+    int iActionCost,
+    LPWSTR* ppwzActionData
+    );
+
+
+// function definitions
+
+void CpiApplicationListFree(
+    CPI_APPLICATION_LIST* pList
+    )
+{
+    CPI_APPLICATION* pItm = pList->pFirst;
+
+    while (pItm)
+    {
+        CPI_APPLICATION* pDelete = pItm;
+        pItm = pItm->pNext;
+        FreeApplication(pDelete);
+    }
+}
+
+HRESULT CpiApplicationsRead(
+    CPI_PARTITION_LIST* pPartList,
+    CPI_APPLICATION_LIST* pAppList
+    )
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+
+    int iVersionNT = 0;
+
+    PMSIHANDLE hView, hRec;
+
+    CPI_APPLICATION* pItm = NULL;
+    LPWSTR pwzData = NULL;
+    BOOL fMatchingArchitecture = FALSE;
+
+    // get NT version
+    hr = WcaGetIntProperty(L"VersionNT", &iVersionNT);
+    ExitOnFailure(hr, "Failed to get VersionNT property");
+
+    // loop through all applications
+    hr = WcaOpenExecuteView(vcsApplicationQuery, &hView);
+    ExitOnFailure(hr, "Failed to execute view on ComPlusApplication table");
+
+    while (S_OK == (hr = WcaFetchRecord(hView, &hRec)))
+    {
+        // get component
+        hr = WcaGetRecordString(hRec, aqComponent, &pwzData);
+        ExitOnFailure(hr, "Failed to get component");
+
+        // check if the component is our processor architecture
+        if (pwzData && *pwzData)
+        {
+            hr = CpiVerifyComponentArchitecure(pwzData, &fMatchingArchitecture);
+            ExitOnFailure(hr, "Failed to get component architecture.");
+
+            if (!fMatchingArchitecture)
+            {
+                continue; // not the same architecture, ignore
+            }
+        }
+
+        // create entry
+        pItm = (CPI_APPLICATION*)::HeapAlloc(::GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(CPI_APPLICATION));
+        if (!pItm)
+            ExitFunction1(hr = E_OUTOFMEMORY);
+
+        // get component install state
+        if (pwzData && *pwzData)
+        {
+            pItm->fHasComponent = TRUE;
+
+            er = ::MsiGetComponentStateW(WcaGetInstallHandle(), pwzData, &pItm->isInstalled, &pItm->isAction);
+            ExitOnFailure(hr = HRESULT_FROM_WIN32(er), "Failed to get component state");
+        }
+
+        // get key
+        hr = WcaGetRecordString(hRec, aqApplication, &pwzData);
+        ExitOnFailure(hr, "Failed to get key");
+        StringCchCopyW(pItm->wzKey, countof(pItm->wzKey), pwzData);
+
+        // get partition
+        if (502 <= iVersionNT)
+        {
+            hr = WcaGetRecordString(hRec, aqPartition, &pwzData);
+            ExitOnFailure(hr, "Failed to get partition");
+
+            if (pwzData && *pwzData)
+            {
+                hr = CpiPartitionFindByKey(pPartList, pwzData, &pItm->pPartition);
+                ExitOnFailure(hr, "Failed to find partition, key: %S", pwzData);
+            }
+        }
+
+        // get id
+        hr = WcaGetRecordFormattedString(hRec, aqID, &pwzData);
+        ExitOnFailure(hr, "Failed to get id");
+
+        if (pwzData && *pwzData)
+        {
+            hr = PcaGuidToRegFormat(pwzData, pItm->wzID, countof(pItm->wzID));
+            ExitOnFailure(hr, "Failed to parse id guid value, key: %S, value: '%S'", pItm->wzKey, pwzData);
+        }
+
+        // get name
+        hr = WcaGetRecordFormattedString(hRec, aqName, &pwzData);
+        ExitOnFailure(hr, "Failed to get name");
+        StringCchCopyW(pItm->wzName, countof(pItm->wzName), pwzData);
+
+        // if application is a locater, either an id or a name must be provided
+        if (!pItm->fHasComponent && !*pItm->wzID && !*pItm->wzName)
+            ExitOnFailure(hr = E_FAIL, "An application locater must have either an id or a name associated, key: %S", pItm->wzKey);
+
+        // if application is not a locater, an name must be provided
+        if (pItm->fHasComponent && !*pItm->wzName)
+            ExitOnFailure(hr = E_FAIL, "An application must have a name associated, key: %S", pItm->wzKey);
+
+        // get properties
+        if (CpiTableExists(cptComPlusApplicationProperty) && pItm->fHasComponent)
+        {
+            hr = CpiPropertiesRead(vcsApplicationPropertyQuery, pItm->wzKey, pdlApplicationProperties, &pItm->pProperties, &pItm->iPropertyCount);
+            ExitOnFailure(hr, "Failed to get properties");
+        }
+
+        // set references & increment counters
+        if (pItm->fHasComponent)
+        {
+            if (WcaIsInstalling(pItm->isInstalled, pItm->isAction))
+            {
+                if (pItm->pPartition)
+                    CpiPartitionAddReferenceInstall(pItm->pPartition);
+                pAppList->iInstallCount++;
+            }
+            if (WcaIsUninstalling(pItm->isInstalled, pItm->isAction))
+            {
+                if (pItm->pPartition)
+                    CpiPartitionAddReferenceUninstall(pItm->pPartition);
+                pAppList->iUninstallCount++;
+            }
+        }
+
+        // add entry
+        if (pAppList->pFirst)
+            pItm->pNext = pAppList->pFirst;
+        pAppList->pFirst = pItm;
+        pItm = NULL;
+    }
+
+    if (E_NOMOREITEMS == hr)
+        hr = S_OK;
+
+LExit:
+    // clean up
+    if (pItm)
+        FreeApplication(pItm);
+
+    ReleaseStr(pwzData);
+
+    return hr;
+}
+
+HRESULT CpiApplicationsVerifyInstall(
+    CPI_APPLICATION_LIST* pList
+    )
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+
+    ICatalogObject* piAppObj = NULL;
+
+    for (CPI_APPLICATION* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        // referenced locaters or applications that are being installed
+        if (!pItm->fReferencedForInstall && !(pItm->fHasComponent && WcaIsInstalling(pItm->isInstalled, pItm->isAction)))
+            continue;
+
+        // if the application is referensed and is not a locater, it must be installed
+        if (pItm->fReferencedForInstall && pItm->fHasComponent && !CpiWillBeInstalled(pItm->isInstalled, pItm->isAction))
+            MessageExitOnFailure(hr = E_FAIL, msierrComPlusApplicationDependency, "An application is used by another entity being installed, but is not installed itself, key: %S", pItm->wzKey);
+
+        // application is supposed to exist
+        if (!pItm->fHasComponent || CpiIsInstalled(pItm->isInstalled))
+        {
+            // get collection object for application
+            hr = FindObjectForApplication(pItm, 0 != *pItm->wzID, 0 == *pItm->wzID, &piAppObj);
+            ExitOnFailure(hr, "Failed to find collection object for application");
+
+            // if the application was found
+            if (S_OK == hr)
+            {
+                // if we don't have an id, copy id from object
+                if (!*pItm->wzID)
+                {
+                    hr = CpiGetKeyForObject(piAppObj, pItm->wzID, countof(pItm->wzID));
+                    ExitOnFailure(hr, "Failed to get id");
+                }
+            }
+
+            // if the application was not found
+            else
+            {
+                // if the application is a locater, this is an error
+                if (!pItm->fHasComponent)
+                    MessageExitOnFailure(hr = HRESULT_FROM_WIN32(ERROR_NOT_FOUND), msierrComPlusApplicationNotFound, "An application required by this installation was not found, key: %S", pItm->wzKey);
+
+                // create a new id if one is missing
+                if (!*pItm->wzID)
+                {
+                    hr = CpiCreateId(pItm->wzID, countof(pItm->wzID));
+                    ExitOnFailure(hr, "Failed to create id");
+                }
+            }
+        }
+
+        // application is supposed to be created
+        else
+        {
+            // check for conflicts
+            do {
+                if (*pItm->wzID)
+                {
+                    // find applications with conflicting id
+                    hr = FindObjectForApplication(pItm, TRUE, FALSE, &piAppObj);
+                    ExitOnFailure(hr, "Failed to find collection object for application");
+
+                    if (S_FALSE == hr)
+                    {
+                        // find applications with conflicting name
+                        hr = FindObjectForApplication(pItm, FALSE, TRUE, &piAppObj);
+                        ExitOnFailure(hr, "Failed to find collection object for application");
+
+                        if (S_OK == hr)
+                            // "A application with a conflictiong name exists. retry cancel"
+                            er = WcaErrorMessage(msierrComPlusApplicationNameConflict, hr, INSTALLMESSAGE_ERROR | MB_RETRYCANCEL, 0);
+                        else
+                            break; // no conflicting entry found, break loop
+                    }
+                    else
+                        // "A application with a conflicting id exists. abort retry ignore"
+                        er = WcaErrorMessage(msierrComPlusApplicationIdConflict, hr, INSTALLMESSAGE_ERROR | MB_ABORTRETRYIGNORE, 0);
+                }
+                else
+                {
+                    // find applications with conflicting name
+                    hr = FindObjectForApplication(pItm, FALSE, TRUE, &piAppObj);
+                    ExitOnFailure(hr, "Failed to find collection object for application");
+
+                    if (S_OK == hr)
+                        // "A subscription with a conflictiong name exists. abort retry ignore"
+                        er = WcaErrorMessage(msierrComPlusApplicationNameConflict, hr, INSTALLMESSAGE_ERROR | MB_ABORTRETRYIGNORE, 0);
+                    else
+                        break; // no conflicting entry found, break loop
+                }
+
+                switch (er)
+                {
+                case IDCANCEL:
+                case IDABORT:
+                    ExitOnFailure(hr = E_FAIL, "An application with a conflictiong name or id exists, key: %S", pItm->wzKey);
+                    break;
+                case IDRETRY:
+                    break;
+                case IDIGNORE:
+                default:
+                    // if we don't have an id, copy id from object
+                    if (!*pItm->wzID)
+                    {
+                        hr = CpiGetKeyForObject(piAppObj, pItm->wzID, countof(pItm->wzID));
+                        ExitOnFailure(hr, "Failed to get id");
+                    }
+                    hr = S_FALSE; // indicate that this is not a conflict
+                }
+            } while (S_OK == hr); // hr = S_FALSE if we don't have any conflicts
+
+            // create a new id if one is missing
+            if (!*pItm->wzID)
+            {
+                hr = CpiCreateId(pItm->wzID, countof(pItm->wzID));
+                ExitOnFailure(hr, "Failed to create id");
+            }
+        }
+
+        // clean up
+        ReleaseNullObject(piAppObj);
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piAppObj);
+
+    return hr;
+}
+
+HRESULT CpiApplicationsVerifyUninstall(
+    CPI_APPLICATION_LIST* pList
+    )
+{
+    HRESULT hr = S_OK;
+    ICatalogObject* piAppObj = NULL;
+
+    for (CPI_APPLICATION* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        // referenced locaters or applications that are being installed
+        if (!pItm->fReferencedForUninstall && !(pItm->fHasComponent && WcaIsUninstalling(pItm->isInstalled, pItm->isAction)))
+            continue;
+
+        // get collection object for application
+        hr = FindObjectForApplication(pItm, 0 != *pItm->wzID, 0 == *pItm->wzID, &piAppObj);
+        ExitOnFailure(hr, "Failed to find collection object for application");
+
+        // if the application was found
+        if (S_OK == hr)
+        {
+            // if we don't have an id, copy id from object
+            if (!*pItm->wzID)
+            {
+                hr = CpiGetKeyForObject(piAppObj, pItm->wzID, countof(pItm->wzID));
+                ExitOnFailure(hr, "Failed to get id");
+            }
+        }
+
+        // if the application was not found
+        else
+        {
+            pItm->fObjectNotFound = TRUE;
+            if (pItm->fHasComponent)
+                pList->iUninstallCount--; // elements with the fObjectNotFound flag set will not be scheduled for uninstall
+        }
+
+        // clean up
+        ReleaseNullObject(piAppObj);
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piAppObj);
+
+    return hr;
+}
+
+void CpiApplicationAddReferenceInstall(
+    CPI_APPLICATION* pItm
+    )
+{
+    pItm->fReferencedForInstall = TRUE;
+    if (pItm->pPartition)
+        CpiPartitionAddReferenceInstall(pItm->pPartition);
+}
+
+void CpiApplicationAddReferenceUninstall(
+    CPI_APPLICATION* pItm
+    )
+{
+    pItm->fReferencedForUninstall = TRUE;
+    if (pItm->pPartition)
+        CpiPartitionAddReferenceUninstall(pItm->pPartition);
+}
+
+HRESULT CpiApplicationsInstall(
+    CPI_APPLICATION_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    )
+{
+    HRESULT hr = S_OK;
+
+    int iActionType;
+
+    // add action text
+    hr = CpiAddActionTextToActionData(L"CreateComPlusApplications", ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action text to custom action data");
+
+    // add applicaton count to action data
+    hr = WcaWriteIntegerToCaData(pList->iInstallCount, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add count to custom action data");
+
+    // add applications to custom action data
+    for (CPI_APPLICATION* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        // applications that are being installed only
+        if (!pItm->fHasComponent || !WcaIsInstalling(pItm->isInstalled, pItm->isAction))
+            continue;
+
+        // action type
+        if (rmRollback == iRunMode)
+        {
+            if (CpiIsInstalled(pItm->isInstalled))
+                iActionType = atNoOp;
+            else
+                iActionType = atRemove;
+        }
+        else
+            iActionType = atCreate;
+
+        // add to action data
+        hr = AddApplicationToActionData(pItm, iActionType, COST_APPLICATION_CREATE, ppwzActionData);
+        ExitOnFailure(hr, "Failed to add applicaton to custom action data, key: %S", pItm->wzKey);
+    }
+
+    // add progress tics
+    if (piProgress)
+        *piProgress += COST_APPLICATION_CREATE * pList->iInstallCount;
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiApplicationsUninstall(
+    CPI_APPLICATION_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    )
+{
+    HRESULT hr = S_OK;
+
+    int iActionType;
+
+    // add action text
+    hr = CpiAddActionTextToActionData(L"RemoveComPlusApplications", ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action text to custom action data");
+
+    // add applicaton count to action data
+    hr = WcaWriteIntegerToCaData(pList->iUninstallCount, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add count to custom action data");
+
+    // add applications to custom action data
+    for (CPI_APPLICATION* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        // applications that are being uninstalled only
+        if (!pItm->fHasComponent || !WcaIsUninstalling(pItm->isInstalled, pItm->isAction))
+            continue;
+
+        // action type
+        if (rmRollback == iRunMode)
+            iActionType = atCreate;
+        else
+            iActionType = atRemove;
+
+        // add to action data
+        hr = AddApplicationToActionData(pItm, iActionType, COST_APPLICATION_DELETE, ppwzActionData);
+        ExitOnFailure(hr, "Failed to add applicaton to custom action data, key: %S", pItm->wzKey);
+    }
+
+    // add progress tics
+    if (piProgress)
+        *piProgress += COST_APPLICATION_DELETE * pList->iUninstallCount;
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiApplicationFindByKey(
+    CPI_APPLICATION_LIST* pList,
+    LPCWSTR pwzKey,
+    CPI_APPLICATION** ppApp
+    )
+{
+    for (CPI_APPLICATION* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        if (0 == lstrcmpW(pItm->wzKey, pwzKey))
+        {
+            *ppApp = pItm;
+            return S_OK;
+        }
+    }
+
+    return S_FALSE;
+}
+
+HRESULT CpiGetRolesCollForApplication(
+    CPI_APPLICATION* pApp,
+    ICatalogCollection** ppiRolesColl
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICatalogCollection* piAppColl = NULL;
+    ICatalogObject* piAppObj = NULL;
+
+    // if a previous attempt to locate the collection object failed
+    if (pApp->fObjectNotFound)
+        ExitFunction1(hr = S_FALSE);
+
+    // get applications collection
+    if (!pApp->piRolesColl)
+    {
+        // get applications collection
+        if (pApp->pPartition)
+            hr = CpiGetApplicationsCollForPartition(pApp->pPartition, &piAppColl);
+        else
+            hr = CpiSchedGetApplicationsCollection(&piAppColl);
+        ExitOnFailure(hr, "Failed to get applications collection");
+
+        if (S_FALSE == hr)
+            ExitFunction(); // exit with hr = S_FALSE
+
+        // find application object
+        hr = CpiFindCollectionObject(piAppColl, pApp->wzID, *pApp->wzID ? NULL : pApp->wzName, &piAppObj);
+        ExitOnFailure(hr, "Failed to find application object");
+
+        if (S_FALSE == hr)
+            ExitFunction(); // exit with hr = S_FALSE
+
+        // get roles collection
+        hr = CpiSchedGetCatalogCollection(piAppColl, piAppObj, L"Roles", &pApp->piRolesColl);
+        ExitOnFailure(hr, "Failed to get roles collection");
+    }
+
+    // return value
+    *ppiRolesColl = pApp->piRolesColl;
+    (*ppiRolesColl)->AddRef();
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piAppColl);
+    ReleaseObject(piAppObj);
+
+    return hr;
+}
+
+HRESULT CpiGetComponentsCollForApplication(
+    CPI_APPLICATION* pApp,
+    ICatalogCollection** ppiCompsColl
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICatalogCollection* piAppColl = NULL;
+    ICatalogObject* piAppObj = NULL;
+
+    // if a previous attempt to locate the collection object failed
+    if (pApp->fObjectNotFound)
+        ExitFunction1(hr = S_FALSE);
+
+    // get applications collection
+    if (!pApp->piCompsColl)
+    {
+        // get applications collection
+        if (pApp->pPartition)
+            hr = CpiGetApplicationsCollForPartition(pApp->pPartition, &piAppColl);
+        else
+            hr = CpiSchedGetApplicationsCollection(&piAppColl);
+        ExitOnFailure(hr, "Failed to get applications collection");
+
+        if (S_FALSE == hr)
+            ExitFunction(); // exit with hr = S_FALSE
+
+        // find application object
+        hr = CpiFindCollectionObject(piAppColl, pApp->wzID, *pApp->wzID ? NULL : pApp->wzName, &piAppObj);
+        ExitOnFailure(hr, "Failed to find application object");
+
+        if (S_FALSE == hr)
+            ExitFunction(); // exit with hr = S_FALSE
+
+        // get roles collection
+        hr = CpiSchedGetCatalogCollection(piAppColl, piAppObj, L"Components", &pApp->piCompsColl);
+        ExitOnFailure(hr, "Failed to get components collection");
+    }
+
+    // return value
+    *ppiCompsColl = pApp->piCompsColl;
+    (*ppiCompsColl)->AddRef();
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piAppColl);
+    ReleaseObject(piAppObj);
+
+    return hr;
+}
+
+
+// helper function definitions
+
+static void FreeApplication(
+    CPI_APPLICATION* pItm
+    )
+{
+    if (pItm->pProperties)
+        CpiPropertiesFreeList(pItm->pProperties);
+
+    ReleaseObject(pItm->piRolesColl);
+    ReleaseObject(pItm->piCompsColl);
+
+    ::HeapFree(::GetProcessHeap(), 0, pItm);
+}
+
+static HRESULT FindObjectForApplication(
+    CPI_APPLICATION* pItm,
+    BOOL fFindId,
+    BOOL fFindName,
+    ICatalogObject** ppiAppObj
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICatalogCollection* piAppColl = NULL;
+
+    // get applications collection
+    if (pItm->pPartition)
+        hr = CpiGetApplicationsCollForPartition(pItm->pPartition, &piAppColl);
+    else
+        hr = CpiSchedGetApplicationsCollection(&piAppColl);
+    ExitOnFailure(hr, "Failed to get applications collection");
+
+    if (S_FALSE == hr)
+        ExitFunction(); // exit with hr = S_FALSE
+
+    // find application object
+    hr = CpiFindCollectionObject(piAppColl, fFindId ? pItm->wzID : NULL, fFindName ? pItm->wzName : NULL, ppiAppObj);
+        ExitOnFailure(hr, "Failed to find application object");
+
+    // exit with hr from CpiFindCollectionObject()
+
+LExit:
+    // clean up
+    ReleaseObject(piAppColl);
+
+    return hr;
+}
+
+static HRESULT AddApplicationToActionData(
+    CPI_APPLICATION* pItm,
+    int iActionType,
+    int iActionCost,
+    LPWSTR* ppwzActionData
+    )
+{
+    HRESULT hr = S_OK;
+
+    // add action information to custom action data
+    hr = WcaWriteIntegerToCaData(iActionType, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action type to custom action data");
+    hr = WcaWriteIntegerToCaData(iActionCost, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action cost to custom action data");
+
+    // add application information to custom action data
+    hr = WcaWriteStringToCaData(pItm->wzKey, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add application key to custom action data");
+    hr = WcaWriteStringToCaData(pItm->wzID, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add application id to custom action data");
+    hr = WcaWriteStringToCaData(pItm->wzName, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add application name to custom action data");
+
+    // add partition information to custom action data
+    hr = WcaWriteStringToCaData(pItm->pPartition ? pItm->pPartition->wzID : L"", ppwzActionData);
+    ExitOnFailure(hr, "Failed to add partition id to custom action data");
+
+    // add properties to custom action data
+    hr = CpiAddPropertiesToActionData(atCreate == iActionType ? pItm->iPropertyCount : 0, pItm->pProperties, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add properties to custom action data");
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
diff --git a/src/ext/ComPlus/ca/cpappsched.h b/src/ext/ComPlus/ca/cpappsched.h
new file mode 100644
index 00000000..2cd6a0ee
--- /dev/null
+++ b/src/ext/ComPlus/ca/cpappsched.h
@@ -0,0 +1,83 @@
+#pragma once
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+
+struct CPI_APPLICATION
+{
+    WCHAR wzKey[MAX_DARWIN_KEY + 1];
+    WCHAR wzID[CPI_MAX_GUID + 1];
+    WCHAR wzName[MAX_DARWIN_COLUMN + 1];
+
+    int iPropertyCount;
+    CPI_PROPERTY* pProperties;
+
+    BOOL fHasComponent;
+    BOOL fReferencedForInstall;
+    BOOL fReferencedForUninstall;
+    BOOL fObjectNotFound;
+
+    INSTALLSTATE isInstalled, isAction;
+
+    CPI_PARTITION* pPartition;
+
+    ICatalogCollection* piRolesColl;
+    ICatalogCollection* piCompsColl;
+
+    CPI_APPLICATION* pNext;
+};
+
+struct CPI_APPLICATION_LIST
+{
+    CPI_APPLICATION* pFirst;
+
+    int iInstallCount;
+    int iUninstallCount;
+};
+
+
+// function prototypes
+
+void CpiApplicationListFree(
+    CPI_APPLICATION_LIST* pList
+    );
+HRESULT CpiApplicationsRead(
+    CPI_PARTITION_LIST* pPartList,
+    CPI_APPLICATION_LIST* pAppList
+    );
+HRESULT CpiApplicationsVerifyInstall(
+    CPI_APPLICATION_LIST* pList
+    );
+HRESULT CpiApplicationsVerifyUninstall(
+    CPI_APPLICATION_LIST* pList
+    );
+void CpiApplicationAddReferenceInstall(
+    CPI_APPLICATION* pItm
+    );
+void CpiApplicationAddReferenceUninstall(
+    CPI_APPLICATION* pItm
+    );
+HRESULT CpiApplicationsInstall(
+    CPI_APPLICATION_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    );
+HRESULT CpiApplicationsUninstall(
+    CPI_APPLICATION_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    );
+HRESULT CpiApplicationFindByKey(
+    CPI_APPLICATION_LIST* pList,
+    LPCWSTR pwzKey,
+    CPI_APPLICATION** ppApp
+    );
+HRESULT CpiGetRolesCollForApplication(
+    CPI_APPLICATION* pApp,
+    ICatalogCollection** ppiRolesColl
+    );
+HRESULT CpiGetComponentsCollForApplication(
+    CPI_APPLICATION* pApp,
+    ICatalogCollection** ppiCompsColl
+    );
diff --git a/src/ext/ComPlus/ca/cpasmexec.cpp b/src/ext/ComPlus/ca/cpasmexec.cpp
new file mode 100644
index 00000000..3d140027
--- /dev/null
+++ b/src/ext/ComPlus/ca/cpasmexec.cpp
@@ -0,0 +1,1877 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+#include "precomp.h"
+
+
+// GAC related declarations
+
+typedef struct _FUSION_INSTALL_REFERENCE_
+{
+    DWORD cbSize;
+    DWORD dwFlags;
+    GUID guidScheme;
+    LPCWSTR szIdentifier;
+    LPCWSTR szNonCannonicalData;
+} FUSION_INSTALL_REFERENCE;
+
+typedef struct _FUSION_INSTALL_REFERENCE_ *LPFUSION_INSTALL_REFERENCE;
+
+typedef const FUSION_INSTALL_REFERENCE *LPCFUSION_INSTALL_REFERENCE;
+
+typedef struct _ASSEMBLY_INFO
+{
+    ULONG cbAssemblyInfo;
+    DWORD dwAssemblyFlags;
+    ULARGE_INTEGER uliAssemblySizeInKB;
+    LPWSTR pszCurrentAssemblyPathBuf;
+    ULONG cchBuf;
+} ASSEMBLY_INFO;
+
+typedef interface IAssemblyCacheItem IAssemblyCacheItem;
+
+MIDL_INTERFACE("e707dcde-d1cd-11d2-bab9-00c04f8eceae")
+IAssemblyCache : public IUnknown
+{
+public:
+    virtual HRESULT STDMETHODCALLTYPE UninstallAssembly( 
+        /* [in] */ DWORD dwFlags,
+        /* [in] */ LPCWSTR pszAssemblyName,
+        /* [in] */ LPCFUSION_INSTALL_REFERENCE pRefData,
+        /* [optional][out] */ ULONG *pulDisposition) = 0;
+
+    virtual HRESULT STDMETHODCALLTYPE QueryAssemblyInfo( 
+        /* [in] */ DWORD dwFlags,
+        /* [in] */ LPCWSTR pszAssemblyName,
+        /* [out][in] */ ASSEMBLY_INFO *pAsmInfo) = 0;
+
+    virtual HRESULT STDMETHODCALLTYPE CreateAssemblyCacheItem( 
+        /* [in] */ DWORD dwFlags,
+        /* [in] */ PVOID pvReserved,
+        /* [out] */ IAssemblyCacheItem **ppAsmItem,
+        /* [optional][in] */ LPCWSTR pszAssemblyName) = 0;
+
+    virtual HRESULT STDMETHODCALLTYPE CreateAssemblyScavenger( 
+        /* [out] */ IUnknown **ppUnkReserved) = 0;
+
+    virtual HRESULT STDMETHODCALLTYPE InstallAssembly( 
+        /* [in] */ DWORD dwFlags,
+        /* [in] */ LPCWSTR pszManifestFilePath,
+        /* [in] */ LPCFUSION_INSTALL_REFERENCE pRefData) = 0;
+};
+
+typedef HRESULT (__stdcall *LoadLibraryShimFunc)(LPCWSTR szDllName, LPCWSTR szVersion, LPVOID pvReserved, HMODULE *phModDll);
+typedef HRESULT (__stdcall *CreateAssemblyCacheFunc)(IAssemblyCache **ppAsmCache, DWORD dwReserved);
+
+
+// RegistrationHelper related declarations
+
+static const GUID CLSID_RegistrationHelper =
+    { 0x89a86e7b, 0xc229, 0x4008, { 0x9b, 0xaa, 0x2f, 0x5c, 0x84, 0x11, 0xd7, 0xe0 } };
+
+enum eInstallationFlags {
+    ifConfigureComponentsOnly = 16,
+    ifFindOrCreateTargetApplication = 4,
+    ifExpectExistingTypeLib = 1
+};
+
+
+// private structs
+
+struct CPIEXEC_ROLE_ASSIGNMENT
+{
+    WCHAR wzKey[MAX_DARWIN_KEY + 1];
+    WCHAR wzRoleName[MAX_DARWIN_COLUMN + 1];
+
+    CPIEXEC_ROLE_ASSIGNMENT* pNext;
+};
+
+struct CPIEXEC_METHOD
+{
+    WCHAR wzIndex[11 + 1];
+    WCHAR wzName[MAX_DARWIN_COLUMN + 1];
+
+    CPI_PROPERTY* pPropertyList;
+    CPIEXEC_ROLE_ASSIGNMENT* pRoleAssignmentList;
+
+    CPIEXEC_METHOD* pNext;
+};
+
+struct CPIEXEC_INTERFACE
+{
+    WCHAR wzIID[CPI_MAX_GUID + 1];
+
+    CPI_PROPERTY* pPropertyList;
+    CPIEXEC_ROLE_ASSIGNMENT* pRoleAssignmentList;
+    CPIEXEC_METHOD* pMethodList;
+
+    CPIEXEC_INTERFACE* pNext;
+};
+
+struct CPIEXEC_COMPONENT
+{
+    WCHAR wzCLSID[CPI_MAX_GUID + 1];
+
+    CPI_PROPERTY* pPropertyList;
+    CPIEXEC_ROLE_ASSIGNMENT* pRoleAssignmentList;
+    CPIEXEC_INTERFACE* pInterfaceList;
+
+    CPIEXEC_COMPONENT* pNext;
+};
+
+struct CPI_ASSEMBLY_ATTRIBUTES
+{
+    int iActionType;
+    int iActionCost;
+    LPWSTR pwzKey;
+    LPWSTR pwzAssemblyName;
+    LPWSTR pwzDllPath;
+    LPWSTR pwzTlbPath;
+    LPWSTR pwzPSDllPath;
+    LPWSTR pwzAppID;
+    LPWSTR pwzPartID;
+    int iAttributes;
+    CPIEXEC_COMPONENT* pCompList;
+};
+
+struct CPI_ROLE_ASSIGNMENTS_ATTRIBUTES
+{
+    int iActionType;
+    int iActionCost;
+    LPWSTR pwzKey;
+    LPWSTR pwzAppID;
+    LPWSTR pwzPartID;
+    int iRoleCount;
+    CPIEXEC_COMPONENT* pCompList;
+};
+
+
+// prototypes for private helper functions
+
+static HRESULT RegisterAssembly(
+    CPI_ASSEMBLY_ATTRIBUTES* pAttrs
+    );
+static HRESULT UnregisterAssembly(
+    CPI_ASSEMBLY_ATTRIBUTES* pAttrs
+    );
+static void InitAssemblyExec();
+static void UninitAssemblyExec();
+static HRESULT GetRegistrationHelper(
+    IDispatch** ppiRegHlp
+    );
+static HRESULT GetAssemblyCacheObject(
+    IAssemblyCache** ppAssemblyCache
+    );
+static HRESULT GetAssemblyPathFromGAC(
+    LPCWSTR pwzAssemblyName,
+    LPWSTR* ppwzAssemblyPath
+    );
+static HRESULT RegisterDotNetAssembly(
+    CPI_ASSEMBLY_ATTRIBUTES* pAttrs
+    );
+static HRESULT RegisterNativeAssembly(
+    CPI_ASSEMBLY_ATTRIBUTES* pAttrs
+    );
+static HRESULT UnregisterDotNetAssembly(
+    CPI_ASSEMBLY_ATTRIBUTES* pAttrs
+    );
+static HRESULT RemoveComponents(
+    ICatalogCollection* piCompColl,
+    CPIEXEC_COMPONENT* pCompList
+    );
+static HRESULT ReadAssemblyAttributes(
+    LPWSTR* ppwzData,
+    CPI_ASSEMBLY_ATTRIBUTES* pAttrs
+    );
+static void FreeAssemblyAttributes(
+    CPI_ASSEMBLY_ATTRIBUTES* pAttrs
+    );
+static HRESULT ReadRoleAssignmentsAttributes(
+    LPWSTR* ppwzData,
+    CPI_ROLE_ASSIGNMENTS_ATTRIBUTES* pAttrs
+    );
+static void FreeRoleAssignmentsAttributes(
+    CPI_ROLE_ASSIGNMENTS_ATTRIBUTES* pAttrs
+    );
+static HRESULT ConfigureComponents(
+    LPCWSTR pwzPartID,
+    LPCWSTR pwzAppID,
+    CPIEXEC_COMPONENT* pCompList,
+    BOOL fCreate,
+    BOOL fProgress
+    );
+static HRESULT ConfigureInterfaces(
+    ICatalogCollection* piCompColl,
+    ICatalogObject* piCompObj,
+    CPIEXEC_INTERFACE* pIntfList,
+    BOOL fCreate
+    );
+static HRESULT ConfigureMethods(
+    ICatalogCollection* piIntfColl,
+    ICatalogObject* piIntfObj,
+    CPIEXEC_METHOD* pMethList,
+    BOOL fCreate
+    );
+static HRESULT ConfigureRoleAssignments(
+    LPCWSTR pwzCollName,
+    ICatalogCollection* piCompColl,
+    ICatalogObject* piCompObj,
+    CPIEXEC_ROLE_ASSIGNMENT* pRoleList,
+    BOOL fCreate
+    );
+static HRESULT ReadComponentList(
+    LPWSTR* ppwzData,
+    CPIEXEC_COMPONENT** ppCompList
+    );
+static HRESULT ReadInterfaceList(
+    LPWSTR* ppwzData,
+    CPIEXEC_INTERFACE** ppIntfList
+    );
+static HRESULT ReadMethodList(
+    LPWSTR* ppwzData,
+    CPIEXEC_METHOD** ppMethList
+    );
+static HRESULT ReadRoleAssignmentList(
+    LPWSTR* ppwzData,
+    CPIEXEC_ROLE_ASSIGNMENT** ppRoleList
+    );
+static void FreeComponentList(
+    CPIEXEC_COMPONENT* pList
+    );
+static void FreeInterfaceList(
+    CPIEXEC_INTERFACE* pList
+    );
+static void FreeMethodList(
+    CPIEXEC_METHOD* pList
+    );
+static void FreeRoleAssignmentList(
+    CPIEXEC_ROLE_ASSIGNMENT* pList
+    );
+
+
+// variables
+
+static IDispatch* gpiRegHlp;
+static IAssemblyCache* gpAssemblyCache;
+static HMODULE ghMscoree;
+static HMODULE ghFusion;
+
+
+// function definitions
+
+HRESULT CpiConfigureAssemblies(
+    LPWSTR* ppwzData,
+    HANDLE hRollbackFile
+    )
+{
+    HRESULT hr = S_OK;
+
+    CPI_ASSEMBLY_ATTRIBUTES attrs;
+    ::ZeroMemory(&attrs, sizeof(attrs));
+
+    // initialize
+    InitAssemblyExec();
+
+    // read action text
+    hr = CpiActionStartMessage(ppwzData, FALSE);
+    ExitOnFailure(hr, "Failed to send action start message");
+
+    // get count
+    int iCnt = 0;
+    hr = WcaReadIntegerFromCaData(ppwzData, &iCnt);
+    ExitOnFailure(hr, "Failed to read count");
+
+    // write count to rollback file
+    hr = CpiWriteIntegerToRollbackFile(hRollbackFile, iCnt);
+    ExitOnFailure(hr, "Failed to write count to rollback file");
+
+    for (int i = 0; i < iCnt; i++)
+    {
+        // read attributes from CustomActionData
+        hr = ReadAssemblyAttributes(ppwzData, &attrs);
+        ExitOnFailure(hr, "Failed to read assembly attributes");
+
+        // write key to rollback file
+        hr = CpiWriteKeyToRollbackFile(hRollbackFile, attrs.pwzKey);
+        ExitOnFailure(hr, "Failed to write key to rollback file");
+
+        // action
+        switch (attrs.iActionType)
+        {
+        case atCreate:
+            hr = RegisterAssembly(&attrs);
+            ExitOnFailure(hr, "Failed to register assembly, key: %S", attrs.pwzKey);
+            break;
+        case atRemove:
+            hr = UnregisterAssembly(&attrs);
+            ExitOnFailure(hr, "Failed to unregister assembly, key: %S", attrs.pwzKey);
+            break;
+        default:
+            hr = S_OK;
+            break;
+        }
+
+        if (S_FALSE == hr)
+            ExitFunction(); // aborted by user
+
+        // write completion status to rollback file
+        hr = CpiWriteIntegerToRollbackFile(hRollbackFile, 1);
+        ExitOnFailure(hr, "Failed to write completion status to rollback file");
+
+        // progress
+        hr = WcaProgressMessage(attrs.iActionCost, FALSE);
+        ExitOnFailure(hr, "Failed to update progress");
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    FreeAssemblyAttributes(&attrs);
+
+    // uninitialize
+    UninitAssemblyExec();
+
+    return hr;
+}
+
+HRESULT CpiRollbackConfigureAssemblies(
+    LPWSTR* ppwzData,
+    CPI_ROLLBACK_DATA* pRollbackDataList
+    )
+{
+    HRESULT hr = S_OK;
+
+    int iRollbackStatus;
+
+    CPI_ASSEMBLY_ATTRIBUTES attrs;
+    ::ZeroMemory(&attrs, sizeof(attrs));
+
+    // initialize
+    InitAssemblyExec();
+
+    // read action text
+    hr = CpiActionStartMessage(ppwzData, NULL == pRollbackDataList);
+    ExitOnFailure(hr, "Failed to send action start message");
+
+    // get count
+    int iCnt = 0;
+    hr = WcaReadIntegerFromCaData(ppwzData, &iCnt);
+    ExitOnFailure(hr, "Failed to read count");
+
+    for (int i = 0; i < iCnt; i++)
+    {
+        // read attributes from CustomActionData
+        hr = ReadAssemblyAttributes(ppwzData, &attrs);
+        ExitOnFailure(hr, "Failed to read assembly attributes");
+
+        // rollback status
+        hr = CpiFindRollbackStatus(pRollbackDataList, attrs.pwzKey, &iRollbackStatus);
+
+        if (S_FALSE == hr)
+            continue; // not found, nothing to rollback
+
+        // action
+        switch (attrs.iActionType)
+        {
+        case atCreate:
+            hr = RegisterAssembly(&attrs);
+            if (FAILED(hr))
+                WcaLog(LOGMSG_STANDARD, "Failed to register assembly, hr: 0x%x, key: %S", hr, attrs.pwzKey);
+            break;
+        case atRemove:
+            hr = UnregisterAssembly(&attrs);
+            if (FAILED(hr))
+                WcaLog(LOGMSG_STANDARD, "Failed to unregister assembly, hr: 0x%x, key: %S", hr, attrs.pwzKey);
+            break;
+        }
+
+        // check rollback status
+        if (0 == iRollbackStatus)
+            continue; // operation did not complete, skip progress
+
+        // progress
+        hr = WcaProgressMessage(attrs.iActionCost, FALSE);
+        ExitOnFailure(hr, "Failed to update progress");
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    FreeAssemblyAttributes(&attrs);
+
+    // uninitialize
+    UninitAssemblyExec();
+
+    return hr;
+}
+
+HRESULT CpiConfigureRoleAssignments(
+    LPWSTR* ppwzData,
+    HANDLE hRollbackFile
+    )
+{
+    HRESULT hr = S_OK;
+
+    CPI_ROLE_ASSIGNMENTS_ATTRIBUTES attrs;
+    ::ZeroMemory(&attrs, sizeof(attrs));
+
+    // read action text
+    hr = CpiActionStartMessage(ppwzData, FALSE);
+    ExitOnFailure(hr, "Failed to send action start message");
+
+    // get count
+    int iCnt = 0;
+    hr = WcaReadIntegerFromCaData(ppwzData, &iCnt);
+    ExitOnFailure(hr, "Failed to read count");
+
+    // write count to rollback file
+    hr = CpiWriteIntegerToRollbackFile(hRollbackFile, iCnt);
+    ExitOnFailure(hr, "Failed to write count to rollback file");
+
+    for (int i = 0; i < iCnt; i++)
+    {
+        // read attributes from CustomActionData
+        hr = ReadRoleAssignmentsAttributes(ppwzData, &attrs);
+        ExitOnFailure(hr, "Failed to read role assignments attributes");
+
+        // write key to rollback file
+        hr = CpiWriteKeyToRollbackFile(hRollbackFile, attrs.pwzKey);
+        ExitOnFailure(hr, "Failed to write key to rollback file");
+
+        // action
+        if (atNoOp != attrs.iActionType)
+        {
+            hr = ConfigureComponents(attrs.pwzPartID, attrs.pwzAppID, attrs.pCompList, atCreate == attrs.iActionType, TRUE);
+            ExitOnFailure(hr, "Failed to configure components");
+
+            if (S_FALSE == hr)
+                ExitFunction(); // aborted by user
+        }
+
+        // write completion status to rollback file
+        hr = CpiWriteIntegerToRollbackFile(hRollbackFile, 1);
+        ExitOnFailure(hr, "Failed to write completion status to rollback file");
+
+        // progress
+        hr = WcaProgressMessage(attrs.iActionCost * attrs.iRoleCount, FALSE);
+        ExitOnFailure(hr, "Failed to update progress");
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    FreeRoleAssignmentsAttributes(&attrs);
+
+    return hr;
+}
+
+HRESULT CpiRollbackConfigureRoleAssignments(
+    LPWSTR* ppwzData,
+    CPI_ROLLBACK_DATA* pRollbackDataList
+    )
+{
+    HRESULT hr = S_OK;
+
+    int iRollbackStatus;
+
+    CPI_ROLE_ASSIGNMENTS_ATTRIBUTES attrs;
+    ::ZeroMemory(&attrs, sizeof(attrs));
+
+    // read action text
+    hr = CpiActionStartMessage(ppwzData, NULL == pRollbackDataList);
+    ExitOnFailure(hr, "Failed to send action start message");
+
+    // get count
+    int iCnt = 0;
+    hr = WcaReadIntegerFromCaData(ppwzData, &iCnt);
+    ExitOnFailure(hr, "Failed to read count");
+
+    for (int i = 0; i < iCnt; i++)
+    {
+        // read attributes from CustomActionData
+        hr = ReadRoleAssignmentsAttributes(ppwzData, &attrs);
+        ExitOnFailure(hr, "Failed to read role assignments attributes");
+
+        // rollback status
+        hr = CpiFindRollbackStatus(pRollbackDataList, attrs.pwzKey, &iRollbackStatus);
+
+        if (S_FALSE == hr)
+            continue; // not found, nothing to rollback
+
+        // action
+        if (atNoOp != attrs.iActionType)
+        {
+            hr = ConfigureComponents(attrs.pwzPartID, attrs.pwzAppID, attrs.pCompList, atCreate == attrs.iActionType, TRUE);
+            ExitOnFailure(hr, "Failed to configure components");
+
+            if (S_FALSE == hr)
+                ExitFunction(); // aborted by user
+        }
+
+        // check rollback status
+        if (0 == iRollbackStatus)
+            continue; // operation did not complete, skip progress
+
+        // progress
+        hr = WcaProgressMessage(attrs.iActionCost * attrs.iRoleCount, FALSE);
+        ExitOnFailure(hr, "Failed to update progress");
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    FreeRoleAssignmentsAttributes(&attrs);
+
+    return hr;
+}
+
+
+// helper function definitions
+
+static HRESULT RegisterAssembly(
+    CPI_ASSEMBLY_ATTRIBUTES* pAttrs
+    )
+{
+    HRESULT hr = S_OK;
+
+    // progress message
+    hr = CpiActionDataMessage(1, (pAttrs->iAttributes & aaPathFromGAC) ? pAttrs->pwzAssemblyName : pAttrs->pwzDllPath);
+    ExitOnFailure(hr, "Failed to send progress messages");
+
+    if (S_FALSE == hr)
+        ExitFunction(); // aborted by user
+
+    // log
+    WcaLog(LOGMSG_VERBOSE, "Registering assembly, key: %S", pAttrs->pwzKey);
+
+    // extract path from GAC
+    if (pAttrs->iAttributes & aaPathFromGAC)
+    {
+        hr = GetAssemblyPathFromGAC(pAttrs->pwzAssemblyName, &pAttrs->pwzDllPath);
+        if (S_FALSE == hr)
+            hr = HRESULT_FROM_WIN32(ERROR_NOT_FOUND);
+        ExitOnFailure(hr, "Failed to get path for assembly from GAC");
+
+        // log
+        WcaLog(LOGMSG_VERBOSE, "Assembly path extracted from GAC, key: %S, path: '%S'", pAttrs->pwzKey, pAttrs->pwzDllPath);
+    }
+
+    // .net assembly
+    if (pAttrs->iAttributes & aaDotNetAssembly)
+    {
+        hr = RegisterDotNetAssembly(pAttrs);
+        ExitOnFailure(hr, "Failed to register .NET assembly");
+    }
+
+    // native assembly
+    else
+    {
+        hr = RegisterNativeAssembly(pAttrs);
+        ExitOnFailure(hr, "Failed to register native assembly");
+    }
+
+    // configure components
+    if (pAttrs->pCompList)
+    {
+        hr = ConfigureComponents(pAttrs->pwzPartID, pAttrs->pwzAppID, pAttrs->pCompList, TRUE, FALSE);
+        ExitOnFailure(hr, "Failed to configure components");
+    }
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+static HRESULT UnregisterAssembly(
+    CPI_ASSEMBLY_ATTRIBUTES* pAttrs
+    )
+{
+    HRESULT hr = S_OK;
+
+    long lChanges = 0;
+
+    ICatalogCollection* piColl = NULL;
+    ICatalogObject* piObj = NULL;
+
+    // progress message
+    hr = CpiActionDataMessage(1, (pAttrs->iAttributes & aaPathFromGAC) ? pAttrs->pwzAssemblyName : pAttrs->pwzDllPath);
+    ExitOnFailure(hr, "Failed to send progress messages");
+
+    if (S_FALSE == hr)
+        ExitFunction(); // aborted by user
+
+    // log
+    WcaLog(LOGMSG_VERBOSE, "Unregistering assembly, key: %S", pAttrs->pwzKey);
+
+    // extract path from GAC
+    if (pAttrs->iAttributes & aaPathFromGAC)
+    {
+        hr = GetAssemblyPathFromGAC(pAttrs->pwzAssemblyName, &pAttrs->pwzDllPath);
+        ExitOnFailure(hr, "Failed to get path for assembly from GAC");
+
+        if (S_FALSE == hr)
+        {
+            WcaLog(LOGMSG_VERBOSE, "Unable to locate assembly in GAC, assembly will not be unregistered from COM+, key: %S", pAttrs->pwzKey);
+            ExitFunction1(hr = S_OK);
+        }
+
+        // log
+        WcaLog(LOGMSG_VERBOSE, "Assembly path extracted from GAC, key: %S, path: '%S'", pAttrs->pwzKey, pAttrs->pwzDllPath);
+    }
+
+    // .NET assembly
+    if (pAttrs->iAttributes & aaDotNetAssembly)
+    {
+        if (pAttrs->pwzAppID && *pAttrs->pwzAppID)
+        {
+            // When unregistering a .net assembly using the RegistrationHelper class, and the application is
+            // left empty after all components in the assembly are removed, the RegistrationHelper class also
+            // attempts to remove the application for some reason. However, it does not handle the situation
+            // when the application has its deleteable property set to false, and will simply fail if this is
+            // the case. This is the reason we are clearing the deleatable property of the application here.
+            //
+            // TODO: handle rollbacks
+
+            // get applications collection
+            hr = CpiExecGetApplicationsCollection(pAttrs->pwzPartID, &piColl);
+            ExitOnFailure(hr, "Failed to get applications collection");
+
+            if (S_FALSE == hr)
+            {
+                // applications collection not found
+                WcaLog(LOGMSG_VERBOSE, "Unable to retrieve applications collection, nothing to delete, key: %S", pAttrs->pwzKey);
+                ExitFunction1(hr = S_OK);
+            }
+
+            // find application object
+            hr = CpiFindCollectionObjectByStringKey(piColl, pAttrs->pwzAppID, &piObj);
+            ExitOnFailure(hr, "Failed to find application object");
+
+            if (S_FALSE == hr)
+            {
+                // application not found
+                WcaLog(LOGMSG_VERBOSE, "Unable to find application object, nothing to delete, key: %S", pAttrs->pwzKey);
+                ExitFunction1(hr = S_OK);
+            }
+
+            // reset deleteable property
+            hr = CpiResetObjectProperty(piColl, piObj, L"Deleteable");
+            ExitOnFailure(hr, "Failed to reset deleteable property");
+        }
+
+        // unregister assembly
+        hr = UnregisterDotNetAssembly(pAttrs);
+        ExitOnFailure(hr, "Failed to unregister .NET assembly");
+    }
+
+    // native assembly
+    else
+    {
+        // get components collection
+        hr = CpiGetComponentsCollection(pAttrs->pwzPartID, pAttrs->pwzAppID, &piColl);
+        ExitOnFailure(hr, "Failed to get components collection");
+
+        if (S_FALSE == hr)
+        {
+            // components collection not found
+            WcaLog(LOGMSG_VERBOSE, "Unable to retrieve components collection, nothing to delete, key: %S", pAttrs->pwzKey);
+            ExitFunction1(hr = S_OK);
+        }
+
+        // remove components
+        hr = RemoveComponents(piColl, pAttrs->pCompList);
+        ExitOnFailure(hr, "Failed to get remove components");
+
+        // save changes
+        hr = piColl->SaveChanges(&lChanges);
+        if (COMADMIN_E_OBJECTERRORS == hr)
+            CpiLogCatalogErrorInfo();
+        ExitOnFailure(hr, "Failed to save changes");
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piColl);
+    ReleaseObject(piObj);
+
+    return hr;
+}
+
+static void InitAssemblyExec()
+{
+    gpiRegHlp = NULL;
+    gpAssemblyCache = NULL;
+    ghMscoree = NULL;
+    ghFusion = NULL;
+}
+
+static void UninitAssemblyExec()
+{
+    ReleaseObject(gpiRegHlp);
+    ReleaseObject(gpAssemblyCache);
+    if (ghFusion)
+        ::FreeLibrary(ghFusion);
+    if (ghMscoree)
+        ::FreeLibrary(ghMscoree);
+}
+
+static HRESULT GetRegistrationHelper(
+    IDispatch** ppiRegHlp
+    )
+{
+    HRESULT hr = S_OK;
+
+    if (!gpiRegHlp)
+    {
+        // create registration helper object
+        hr = ::CoCreateInstance(CLSID_RegistrationHelper, NULL, CLSCTX_ALL, IID_IDispatch, (void**)&gpiRegHlp); 
+        ExitOnFailure(hr, "Failed to create registration helper object");
+    }
+
+    gpiRegHlp->AddRef();
+    *ppiRegHlp = gpiRegHlp;
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+static HRESULT GetAssemblyCacheObject(
+    IAssemblyCache** ppAssemblyCache
+    )
+{
+    HRESULT hr = S_OK;
+
+    if (!gpAssemblyCache)
+    {
+        // mscoree.dll
+        if (!ghMscoree)
+        {
+            // load mscoree.dll
+            ghMscoree = ::LoadLibraryW(L"mscoree.dll");
+            ExitOnNull(ghMscoree, hr, E_FAIL, "Failed to load mscoree.dll");
+        }
+
+        // fusion.dll
+        if (!ghFusion)
+        {
+            // get LoadLibraryShim function address
+            LoadLibraryShimFunc pfnLoadLibraryShim = (LoadLibraryShimFunc)::GetProcAddress(ghMscoree, "LoadLibraryShim");
+            ExitOnNull(pfnLoadLibraryShim, hr, HRESULT_FROM_WIN32(::GetLastError()), "Failed get address for LoadLibraryShim() function");
+
+            // load fusion.dll
+            hr = pfnLoadLibraryShim(L"fusion.dll", NULL, NULL, &ghFusion);
+            ExitOnFailure(hr, "Failed to load fusion.dll");
+        }
+
+        // get CreateAssemblyCache function address
+        CreateAssemblyCacheFunc pfnCreateAssemblyCache = (CreateAssemblyCacheFunc)::GetProcAddress(ghFusion, "CreateAssemblyCache");
+        ExitOnNull(pfnCreateAssemblyCache, hr, HRESULT_FROM_WIN32(::GetLastError()), "Failed get address for CreateAssemblyCache() function");
+
+        // create AssemblyCache object
+        hr = pfnCreateAssemblyCache(&gpAssemblyCache, 0);
+        ExitOnFailure(hr, "Failed to create AssemblyCache object");
+    }
+
+    gpAssemblyCache->AddRef();
+    *ppAssemblyCache = gpAssemblyCache;
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+static HRESULT GetAssemblyPathFromGAC(
+    LPCWSTR pwzAssemblyName,
+    LPWSTR* ppwzAssemblyPath
+    )
+{
+    HRESULT hr = S_OK;
+
+    IAssemblyCache* pAssemblyCache = NULL;
+
+    ASSEMBLY_INFO assemblyInfo;
+    WCHAR wzPathBuf[MAX_PATH];
+
+    ::ZeroMemory(&assemblyInfo, sizeof(ASSEMBLY_INFO));
+    ::ZeroMemory(wzPathBuf, countof(wzPathBuf));
+
+    // get AssemblyCache object
+    hr = GetAssemblyCacheObject(&pAssemblyCache);
+    ExitOnFailure(hr, "Failed to get AssemblyCache object");
+
+    // get assembly info
+    assemblyInfo.cbAssemblyInfo = sizeof(ASSEMBLY_INFO);
+    assemblyInfo.pszCurrentAssemblyPathBuf = wzPathBuf;
+    assemblyInfo.cchBuf = countof(wzPathBuf);
+
+    hr = pAssemblyCache->QueryAssemblyInfo(0, pwzAssemblyName, &assemblyInfo);
+    if (HRESULT_FROM_WIN32(ERROR_FILE_NOT_FOUND) == hr)
+        ExitFunction1(hr = S_FALSE);
+    ExitOnFailure(hr, "Failed to get assembly info");
+
+    // copy assembly path
+    hr = StrAllocString(ppwzAssemblyPath, wzPathBuf, 0);
+    ExitOnFailure(hr, "Failed to copy assembly path");
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(pAssemblyCache);
+
+    return hr;
+}
+
+static HRESULT RegisterDotNetAssembly(
+    CPI_ASSEMBLY_ATTRIBUTES* pAttrs
+    )
+{
+    HRESULT hr = S_OK;
+
+    IDispatch* piRegHlp = NULL;
+
+    DISPID dispid;
+    BSTR bstrMember = NULL;
+
+    long lInstallationFlags = 0;
+
+    VARIANTARG rgvarg[5];
+    DISPPARAMS dispparams;
+    EXCEPINFO excepInfo;
+
+    BSTR bstrPartName = NULL;
+    BSTR bstrAppName = NULL;
+    BSTR bstrDllPath = NULL;
+    BSTR bstrTlbPath = NULL;
+
+    ::ZeroMemory(rgvarg, sizeof(rgvarg));
+    ::ZeroMemory(&dispparams, sizeof(dispparams));
+    ::ZeroMemory(&excepInfo, sizeof(excepInfo));
+
+    bstrMember = ::SysAllocString(L"InstallAssembly_2");
+    ExitOnNull(bstrMember, hr, E_OUTOFMEMORY, "Failed to allocate BSTR for method name");
+
+    // create BSTRs for parameters
+    if (pAttrs->pwzPartID && *pAttrs->pwzPartID)
+    {
+        bstrPartName = ::SysAllocString(pAttrs->pwzPartID);
+        ExitOnNull(bstrPartName, hr, E_OUTOFMEMORY, "Failed to allocate BSTR for partition id");
+    }
+
+    if (pAttrs->pwzAppID && *pAttrs->pwzAppID)
+    {
+        bstrAppName = ::SysAllocString(pAttrs->pwzAppID);
+        ExitOnNull(bstrAppName, hr, E_OUTOFMEMORY, "Failed to allocate BSTR for application id");
+    }
+
+    bstrDllPath = ::SysAllocString(pAttrs->pwzDllPath);
+    ExitOnNull(bstrDllPath, hr, E_OUTOFMEMORY, "Failed to allocate BSTR for dll path");
+
+    if (pAttrs->pwzTlbPath && *pAttrs->pwzTlbPath)
+    {
+        bstrTlbPath = ::SysAllocString(pAttrs->pwzTlbPath);
+        ExitOnNull(bstrTlbPath, hr, E_OUTOFMEMORY, "Failed to allocate BSTR for tlb path");
+    }
+
+    // get registration helper object
+    hr = GetRegistrationHelper(&piRegHlp);
+    ExitOnFailure(hr, "Failed to get registration helper object");
+
+    // get dispatch id of InstallAssembly() method
+    hr = piRegHlp->GetIDsOfNames(IID_NULL, &bstrMember, 1, LOCALE_USER_DEFAULT, &dispid);
+    ExitOnFailure(hr, "Failed to get dispatch id of InstallAssembly() method");
+
+    // set installation flags
+    lInstallationFlags = ifExpectExistingTypeLib;
+
+    if (!bstrAppName)
+        lInstallationFlags |= ifFindOrCreateTargetApplication;
+
+    // invoke InstallAssembly() method
+    rgvarg[0].vt = VT_I4;
+    rgvarg[0].lVal = lInstallationFlags;
+    rgvarg[1].vt = VT_BYREF|VT_BSTR;
+    rgvarg[1].pbstrVal = &bstrTlbPath;
+    rgvarg[2].vt = VT_BSTR;
+    rgvarg[2].bstrVal = bstrPartName;
+    rgvarg[3].vt = VT_BYREF|VT_BSTR;
+    rgvarg[3].pbstrVal = &bstrAppName;
+    rgvarg[4].vt = VT_BSTR;
+    rgvarg[4].bstrVal = bstrDllPath;
+    dispparams.rgvarg = rgvarg;
+    dispparams.cArgs = 5;
+    dispparams.cNamedArgs = 0;
+
+    hr = piRegHlp->Invoke(dispid, IID_NULL, LOCALE_USER_DEFAULT, DISPATCH_METHOD, &dispparams, NULL, &excepInfo, NULL);
+    if (DISP_E_EXCEPTION == hr)
+    {
+        // log exception information
+        if (!excepInfo.pfnDeferredFillIn || (excepInfo.pfnDeferredFillIn && SUCCEEDED(excepInfo.pfnDeferredFillIn(&excepInfo))))
+        {
+            WcaLog(LOGMSG_STANDARD, "ExceptionInfo: Code='%hu', Source='%S', Description='%S', HelpFile='%S', HelpContext='%u'",
+                excepInfo.wCode, excepInfo.bstrSource,
+                excepInfo.bstrDescription ? excepInfo.bstrDescription : L"",
+                excepInfo.bstrHelpFile ? excepInfo.bstrHelpFile : L"",
+                excepInfo.dwHelpContext);
+        }
+    }
+    ExitOnFailure(hr, "Failed to invoke RegistrationHelper.InstallAssembly() method");
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piRegHlp);
+
+    ReleaseBSTR(bstrMember);
+
+    ReleaseBSTR(excepInfo.bstrSource);
+    ReleaseBSTR(excepInfo.bstrDescription);
+    ReleaseBSTR(excepInfo.bstrHelpFile);
+
+    ReleaseBSTR(bstrPartName);
+    ReleaseBSTR(bstrAppName);
+    ReleaseBSTR(bstrDllPath);
+    ReleaseBSTR(bstrTlbPath);
+
+    return hr;
+}
+
+static HRESULT RegisterNativeAssembly(
+    CPI_ASSEMBLY_ATTRIBUTES* pAttrs
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICOMAdminCatalog* piCatalog = NULL;
+    ICOMAdminCatalog2* piCatalog2 = NULL;
+    BSTR bstrGlobPartID = NULL;
+
+    BSTR bstrPartID = NULL;
+    BSTR bstrAppID = NULL;
+    BSTR bstrDllPath = NULL;
+    BSTR bstrTlbPath = NULL;
+    BSTR bstrPSDllPath = NULL;
+
+    // create BSTRs for parameters
+    if (pAttrs->pwzPartID && *pAttrs->pwzPartID)
+    {
+        bstrPartID = ::SysAllocString(pAttrs->pwzPartID);
+        ExitOnNull(bstrPartID, hr, E_OUTOFMEMORY, "Failed to allocate BSTR for partition id");
+    }
+
+    bstrAppID = ::SysAllocString(pAttrs->pwzAppID);
+    ExitOnNull(bstrAppID, hr, E_OUTOFMEMORY, "Failed to allocate BSTR for application id");
+
+    bstrDllPath = ::SysAllocString(pAttrs->pwzDllPath);
+    ExitOnNull(bstrDllPath, hr, E_OUTOFMEMORY, "Failed to allocate BSTR for dll path");
+
+    bstrTlbPath = ::SysAllocString(pAttrs->pwzTlbPath ? pAttrs->pwzTlbPath : L"");
+    ExitOnNull(bstrTlbPath, hr, E_OUTOFMEMORY, "Failed to allocate BSTR for tlb path");
+
+    bstrPSDllPath = ::SysAllocString(pAttrs->pwzPSDllPath ? pAttrs->pwzPSDllPath : L"");
+    ExitOnNull(bstrPSDllPath, hr, E_OUTOFMEMORY, "Failed to allocate BSTR for tlb path");
+
+    // get catalog
+    hr = CpiExecGetAdminCatalog(&piCatalog);
+    ExitOnFailure(hr, "Failed to get COM+ admin catalog");
+
+    // get ICOMAdminCatalog2 interface
+    hr = piCatalog->QueryInterface(IID_ICOMAdminCatalog2, (void**)&piCatalog2);
+
+    // COM+ 1.5 or later
+    if (E_NOINTERFACE != hr)
+    {
+        ExitOnFailure(hr, "Failed to get IID_ICOMAdminCatalog2 interface");
+
+        // partition id
+        if (!bstrPartID)
+        {
+            // get global partition id
+            hr = piCatalog2->get_GlobalPartitionID(&bstrGlobPartID);
+            ExitOnFailure(hr, "Failed to get global partition id");
+        }
+
+        // set current partition
+        hr = piCatalog2->put_CurrentPartition(bstrPartID ? bstrPartID : bstrGlobPartID);
+        ExitOnFailure(hr, "Failed to set current partition");
+    }
+
+    // COM+ pre 1.5
+    else
+    {
+        // this version of COM+ does not support partitions, make sure a partition was not specified
+        if (bstrPartID)
+            ExitOnFailure(hr = E_FAIL, "Partitions are not supported by this version of COM+");
+    }
+
+    // install event classes
+    if (pAttrs->iAttributes & aaEventClass)
+    {
+        hr = piCatalog->InstallEventClass(bstrAppID, bstrDllPath, bstrTlbPath, bstrPSDllPath);
+        if (COMADMIN_E_OBJECTERRORS == hr)
+            CpiLogCatalogErrorInfo();
+        ExitOnFailure(hr, "Failed to install event classes");
+    }
+
+    // install components
+    else
+    {
+        hr = piCatalog->InstallComponent(bstrAppID, bstrDllPath, bstrTlbPath, bstrPSDllPath);
+        if (COMADMIN_E_OBJECTERRORS == hr)
+            CpiLogCatalogErrorInfo();
+        ExitOnFailure(hr, "Failed to install components");
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piCatalog);
+    ReleaseObject(piCatalog2);
+    ReleaseBSTR(bstrGlobPartID);
+
+    ReleaseBSTR(bstrPartID);
+    ReleaseBSTR(bstrAppID);
+    ReleaseBSTR(bstrDllPath);
+    ReleaseBSTR(bstrTlbPath);
+    ReleaseBSTR(bstrPSDllPath);
+
+    return hr;
+}
+
+static HRESULT UnregisterDotNetAssembly(
+    CPI_ASSEMBLY_ATTRIBUTES* pAttrs
+    )
+{
+    HRESULT hr = S_OK;
+
+    IDispatch* piRegHlp = NULL;
+
+    DISPID dispid;
+    BSTR bstrMember = NULL;
+
+    VARIANTARG rgvarg[3];
+    DISPPARAMS dispparams;
+    EXCEPINFO excepInfo;
+
+    BSTR bstrPartName = NULL;
+    BSTR bstrAppName = NULL;
+    BSTR bstrDllPath = NULL;
+
+    ::ZeroMemory(rgvarg, sizeof(rgvarg));
+    ::ZeroMemory(&dispparams, sizeof(dispparams));
+    ::ZeroMemory(&excepInfo, sizeof(excepInfo));
+
+    bstrMember = ::SysAllocString(L"UninstallAssembly_2");
+    ExitOnNull(bstrMember, hr, E_OUTOFMEMORY, "Failed to allocate BSTR for method name");
+
+    // create BSTRs for parameters
+    if (pAttrs->pwzPartID && *pAttrs->pwzPartID)
+    {
+        bstrPartName = ::SysAllocString(pAttrs->pwzPartID);
+        ExitOnNull(bstrPartName, hr, E_OUTOFMEMORY, "Failed to allocate BSTR for partition id");
+    }
+
+    bstrAppName = ::SysAllocString(pAttrs->pwzAppID);
+    ExitOnNull(bstrAppName, hr, E_OUTOFMEMORY, "Failed to allocate BSTR for application id");
+
+    bstrDllPath = ::SysAllocString(pAttrs->pwzDllPath);
+    ExitOnNull(bstrDllPath, hr, E_OUTOFMEMORY, "Failed to allocate BSTR for dll path");
+
+    // get registration helper object
+    hr = GetRegistrationHelper(&piRegHlp);
+    ExitOnFailure(hr, "Failed to get registration helper object");
+
+    // get dispatch id of UninstallAssembly() method
+    hr = piRegHlp->GetIDsOfNames(IID_NULL, &bstrMember, 1, LOCALE_USER_DEFAULT, &dispid);
+    ExitOnFailure(hr, "Failed to get dispatch id of UninstallAssembly() method");
+
+    // invoke UninstallAssembly() method
+    rgvarg[0].vt = VT_BSTR;
+    rgvarg[0].bstrVal = bstrPartName;
+    rgvarg[1].vt = VT_BSTR;
+    rgvarg[1].bstrVal = bstrAppName;
+    rgvarg[2].vt = VT_BSTR;
+    rgvarg[2].bstrVal = bstrDllPath;
+    dispparams.rgvarg = rgvarg;
+    dispparams.cArgs = 3;
+    dispparams.cNamedArgs = 0;
+
+    hr = piRegHlp->Invoke(dispid, IID_NULL, LOCALE_USER_DEFAULT, DISPATCH_METHOD, &dispparams, NULL, &excepInfo, NULL);
+    if (DISP_E_EXCEPTION == hr)
+    {
+        // log exception information
+        if (!excepInfo.pfnDeferredFillIn || (excepInfo.pfnDeferredFillIn && SUCCEEDED(excepInfo.pfnDeferredFillIn(&excepInfo))))
+        {
+            WcaLog(LOGMSG_STANDARD, "ExceptionInfo: Code='%hu', Source='%S', Description='%S', HelpFile='%S', HelpContext='%u'",
+                excepInfo.wCode, excepInfo.bstrSource,
+                excepInfo.bstrDescription ? excepInfo.bstrDescription : L"",
+                excepInfo.bstrHelpFile ? excepInfo.bstrHelpFile : L"",
+                excepInfo.dwHelpContext);
+        }
+    }
+    ExitOnFailure(hr, "Failed to invoke RegistrationHelper.UninstallAssembly() method");
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piRegHlp);
+
+    ReleaseBSTR(bstrMember);
+
+    ReleaseBSTR(excepInfo.bstrSource);
+    ReleaseBSTR(excepInfo.bstrDescription);
+    ReleaseBSTR(excepInfo.bstrHelpFile);
+
+    ReleaseBSTR(bstrPartName);
+    ReleaseBSTR(bstrAppName);
+    ReleaseBSTR(bstrDllPath);
+
+    return hr;
+}
+
+static HRESULT RemoveComponents(
+    ICatalogCollection* piCompColl,
+    CPIEXEC_COMPONENT* pCompList
+    )
+{
+    HRESULT hr = S_OK;
+
+    for (CPIEXEC_COMPONENT* pItm = pCompList; pItm; pItm = pItm->pNext)
+    {
+        // remove
+        hr = CpiRemoveCollectionObject(piCompColl, pItm->wzCLSID, NULL, FALSE);
+        ExitOnFailure(hr, "Failed to remove component");
+
+        if (S_FALSE == hr)
+            WcaLog(LOGMSG_VERBOSE, "Component not found, nothing to delete, key: %S", pItm->wzCLSID);
+    }
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+static HRESULT ReadAssemblyAttributes(
+    LPWSTR* ppwzData,
+    CPI_ASSEMBLY_ATTRIBUTES* pAttrs
+    )
+{
+    HRESULT hr = S_OK;
+
+    // read attributes
+    hr = WcaReadIntegerFromCaData(ppwzData, &pAttrs->iActionType);
+    ExitOnFailure(hr, "Failed to read action type");
+    hr = WcaReadIntegerFromCaData(ppwzData, &pAttrs->iActionCost);
+    ExitOnFailure(hr, "Failed to read action cost");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzKey);
+    ExitOnFailure(hr, "Failed to read key");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzAssemblyName);
+    ExitOnFailure(hr, "Failed to read assembly name");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzDllPath);
+    ExitOnFailure(hr, "Failed to read dll path");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzTlbPath);
+    ExitOnFailure(hr, "Failed to read tlb path");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzPSDllPath);
+    ExitOnFailure(hr, "Failed to read proxy-stub dll path");
+    hr = WcaReadIntegerFromCaData(ppwzData, &pAttrs->iAttributes);
+    ExitOnFailure(hr, "Failed to read attributes");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzAppID);
+    ExitOnFailure(hr, "Failed to read application id");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzPartID);
+    ExitOnFailure(hr, "Failed to read partition id");
+
+    // free existing component list
+    if (pAttrs->pCompList)
+    {
+        FreeComponentList(pAttrs->pCompList);
+        pAttrs->pCompList = NULL;
+    }
+
+    // read components
+    hr = ReadComponentList(ppwzData, &pAttrs->pCompList);
+    ExitOnFailure(hr, "Failed to read components");
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+static void FreeAssemblyAttributes(
+    CPI_ASSEMBLY_ATTRIBUTES* pAttrs
+    )
+{
+    ReleaseStr(pAttrs->pwzKey);
+    ReleaseStr(pAttrs->pwzAssemblyName);
+    ReleaseStr(pAttrs->pwzDllPath);
+    ReleaseStr(pAttrs->pwzTlbPath);
+    ReleaseStr(pAttrs->pwzPSDllPath);
+    ReleaseStr(pAttrs->pwzAppID);
+    ReleaseStr(pAttrs->pwzPartID);
+
+    if (pAttrs->pCompList)
+        FreeComponentList(pAttrs->pCompList);
+}
+
+static HRESULT ReadRoleAssignmentsAttributes(
+    LPWSTR* ppwzData,
+    CPI_ROLE_ASSIGNMENTS_ATTRIBUTES* pAttrs
+    )
+{
+    HRESULT hr = S_OK;
+
+    // read attributes
+    hr = WcaReadIntegerFromCaData(ppwzData, &pAttrs->iActionType);
+    ExitOnFailure(hr, "Failed to read action type");
+    hr = WcaReadIntegerFromCaData(ppwzData, &pAttrs->iActionCost);
+    ExitOnFailure(hr, "Failed to read action cost");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzKey);
+    ExitOnFailure(hr, "Failed to read key");
+    hr = WcaReadIntegerFromCaData(ppwzData, &pAttrs->iRoleCount);
+    ExitOnFailure(hr, "Failed to read role assignments count");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzAppID);
+    ExitOnFailure(hr, "Failed to read application id");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzPartID);
+    ExitOnFailure(hr, "Failed to read partition id");
+
+    // free existing component list
+    if (pAttrs->pCompList)
+    {
+        FreeComponentList(pAttrs->pCompList);
+        pAttrs->pCompList = NULL;
+    }
+
+    // read components
+    hr = ReadComponentList(ppwzData, &pAttrs->pCompList);
+    ExitOnFailure(hr, "Failed to read components");
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+static void FreeRoleAssignmentsAttributes(
+    CPI_ROLE_ASSIGNMENTS_ATTRIBUTES* pAttrs
+    )
+{
+    ReleaseStr(pAttrs->pwzKey);
+    ReleaseStr(pAttrs->pwzAppID);
+    ReleaseStr(pAttrs->pwzPartID);
+
+    if (pAttrs->pCompList)
+        FreeComponentList(pAttrs->pCompList);
+}
+
+
+static HRESULT ConfigureComponents(
+    LPCWSTR pwzPartID,
+    LPCWSTR pwzAppID,
+    CPIEXEC_COMPONENT* pCompList,
+    BOOL fCreate,
+    BOOL fProgress
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICatalogCollection* piCompColl = NULL;
+    ICatalogObject* piCompObj = NULL;
+
+    long lChanges = 0;
+
+    // get components collection
+    hr = CpiGetComponentsCollection(pwzPartID, pwzAppID, &piCompColl);
+    if (S_FALSE == hr)
+        if (fCreate)
+            hr = HRESULT_FROM_WIN32(ERROR_NOT_FOUND);
+        else
+            ExitFunction1(hr = S_OK);
+    ExitOnFailure(hr, "Failed to get components collection");
+
+    // read components
+    for (CPIEXEC_COMPONENT* pItm = pCompList; pItm; pItm = pItm->pNext)
+    {
+        // progress message
+        if (fProgress)
+        {
+            hr = CpiActionDataMessage(1, pItm->wzCLSID);
+            ExitOnFailure(hr, "Failed to send progress messages");
+
+            if (S_FALSE == hr)
+                ExitFunction(); // aborted by user
+        }
+
+        // find component
+        hr = CpiFindCollectionObjectByStringKey(piCompColl, pItm->wzCLSID, &piCompObj);
+        if (S_FALSE == hr)
+            if (fCreate)
+                hr = HRESULT_FROM_WIN32(ERROR_NOT_FOUND);
+            else
+                continue;
+        ExitOnFailure(hr, "Failed to find component object");
+
+        // properties
+        hr = CpiPutCollectionObjectValues(piCompObj, pItm->pPropertyList);
+        ExitOnFailure(hr, "Failed to write properties");
+
+        // read roles
+        if (pItm->pRoleAssignmentList)
+        {
+            hr = ConfigureRoleAssignments(L"RolesForComponent", piCompColl, piCompObj, pItm->pRoleAssignmentList, fCreate);
+            ExitOnFailure(hr, "Failed to read roles");
+        }
+
+        // read interfaces
+        if (pItm->pInterfaceList)
+        {
+            hr = ConfigureInterfaces(piCompColl, piCompObj, pItm->pInterfaceList, fCreate);
+            ExitOnFailure(hr, "Failed to read interfaces");
+        }
+
+        // clean up
+        ReleaseNullObject(piCompObj);
+    }
+
+    // save changes
+    hr = piCompColl->SaveChanges(&lChanges);
+    if (COMADMIN_E_OBJECTERRORS == hr)
+        CpiLogCatalogErrorInfo();
+    ExitOnFailure(hr, "Failed to save changes");
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piCompColl);
+    ReleaseObject(piCompObj);
+
+    return hr;
+}
+
+static HRESULT ConfigureInterfaces(
+    ICatalogCollection* piCompColl,
+    ICatalogObject* piCompObj,
+    CPIEXEC_INTERFACE* pIntfList,
+    BOOL fCreate
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICatalogCollection* piIntfColl = NULL;
+    ICatalogObject* piIntfObj = NULL;
+
+    long lChanges = 0;
+
+    // get interfaces collection
+    hr = CpiGetInterfacesCollection(piCompColl, piCompObj, &piIntfColl);
+    if (S_FALSE == hr)
+        if (fCreate)
+            hr = HRESULT_FROM_WIN32(ERROR_NOT_FOUND);
+        else
+            ExitFunction1(hr = S_OK);
+    ExitOnFailure(hr, "Failed to get interfaces collection");
+
+    // read interfaces
+    for (CPIEXEC_INTERFACE* pItm = pIntfList; pItm; pItm = pItm->pNext)
+    {
+        // find interface
+        hr = CpiFindCollectionObjectByStringKey(piIntfColl, pItm->wzIID, &piIntfObj);
+        if (S_FALSE == hr)
+            if (fCreate)
+                hr = HRESULT_FROM_WIN32(ERROR_NOT_FOUND);
+            else
+                continue;
+        ExitOnFailure(hr, "Failed to find interface object");
+
+        // properties
+        hr = CpiPutCollectionObjectValues(piIntfObj, pItm->pPropertyList);
+        ExitOnFailure(hr, "Failed to write properties");
+
+        // read roles
+        if (pItm->pRoleAssignmentList)
+        {
+            hr = ConfigureRoleAssignments(L"RolesForInterface", piIntfColl, piIntfObj, pItm->pRoleAssignmentList, fCreate);
+            ExitOnFailure(hr, "Failed to read roles");
+        }
+
+        // read methods
+        if (pItm->pMethodList)
+        {
+            hr = ConfigureMethods(piIntfColl, piIntfObj, pItm->pMethodList, fCreate);
+            ExitOnFailure(hr, "Failed to read methods");
+        }
+
+        // clean up
+        ReleaseNullObject(piIntfObj);
+    }
+
+    // save changes
+    hr = piIntfColl->SaveChanges(&lChanges);
+    if (COMADMIN_E_OBJECTERRORS == hr)
+        CpiLogCatalogErrorInfo();
+    ExitOnFailure(hr, "Failed to save changes");
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piIntfColl);
+    ReleaseObject(piIntfObj);
+
+    return hr;
+}
+
+static HRESULT ConfigureMethods(
+    ICatalogCollection* piIntfColl,
+    ICatalogObject* piIntfObj,
+    CPIEXEC_METHOD* pMethList,
+    BOOL fCreate
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICatalogCollection* piMethColl = NULL;
+    ICatalogObject* piMethObj = NULL;
+
+    long lChanges = 0;
+
+    // get methods collection
+    hr = CpiGetMethodsCollection(piIntfColl, piIntfObj, &piMethColl);
+    if (S_FALSE == hr)
+        if (fCreate)
+            hr = HRESULT_FROM_WIN32(ERROR_NOT_FOUND);
+        else
+            ExitFunction1(hr = S_OK);
+    ExitOnFailure(hr, "Failed to get methods collection");
+
+    // read methods
+    for (CPIEXEC_METHOD* pItm = pMethList; pItm; pItm = pItm->pNext)
+    {
+        // find method
+        if (*pItm->wzIndex)
+            hr = CpiFindCollectionObjectByIntegerKey(piMethColl, _wtol(pItm->wzIndex), &piMethObj);
+        else
+            hr = CpiFindCollectionObjectByName(piMethColl, pItm->wzName, &piMethObj);
+
+        if (S_FALSE == hr)
+            if (fCreate)
+                hr = HRESULT_FROM_WIN32(ERROR_NOT_FOUND);
+            else
+                continue;
+        ExitOnFailure(hr, "Failed to find method object");
+
+        // properties
+        hr = CpiPutCollectionObjectValues(piMethObj, pItm->pPropertyList);
+        ExitOnFailure(hr, "Failed to write properties");
+
+        // read roles
+        if (pItm->pRoleAssignmentList)
+        {
+            hr = ConfigureRoleAssignments(L"RolesForMethod", piMethColl, piMethObj, pItm->pRoleAssignmentList, fCreate);
+            ExitOnFailure(hr, "Failed to read roles");
+        }
+
+        // clean up
+        ReleaseNullObject(piMethObj);
+    }
+
+    // save changes
+    hr = piMethColl->SaveChanges(&lChanges);
+    if (COMADMIN_E_OBJECTERRORS == hr)
+        CpiLogCatalogErrorInfo();
+    ExitOnFailure(hr, "Failed to save changes");
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piMethColl);
+    ReleaseObject(piMethObj);
+
+    return hr;
+}
+
+static HRESULT ConfigureRoleAssignments(
+    LPCWSTR pwzCollName,
+    ICatalogCollection* piCompColl,
+    ICatalogObject* piCompObj,
+    CPIEXEC_ROLE_ASSIGNMENT* pRoleList,
+    BOOL fCreate
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICatalogCollection* piRoleColl = NULL;
+    ICatalogObject* piRoleObj = NULL;
+
+    long lChanges = 0;
+
+    // get roles collection
+    hr = CpiExecGetCatalogCollection(piCompColl, piCompObj, pwzCollName, &piRoleColl);
+    if (S_FALSE == hr)
+        if (fCreate)
+            hr = HRESULT_FROM_WIN32(ERROR_NOT_FOUND);
+        else
+            ExitFunction1(hr = S_OK);
+    ExitOnFailure(hr, "Failed to get role assignments collection");
+
+    // read roles
+    for (CPIEXEC_ROLE_ASSIGNMENT* pItm = pRoleList; pItm; pItm = pItm->pNext)
+    {
+        if (fCreate)
+        {
+            // find existing role
+            hr = CpiFindCollectionObjectByName(piRoleColl, pItm->wzRoleName, NULL);
+            ExitOnFailure(hr, "Failed to find role, key: %S", pItm->wzKey);
+
+            if (S_OK == hr)
+                continue; // role already exists
+
+            // add object
+            hr = CpiAddCollectionObject(piRoleColl, &piRoleObj);
+            ExitOnFailure(hr, "Failed to add role assignment to collection");
+
+            // role name
+            hr = CpiPutCollectionObjectValue(piRoleObj, L"Name", pItm->wzRoleName);
+            ExitOnFailure(hr, "Failed to set role name property, key: %S", pItm->wzKey);
+
+            // clean up
+            ReleaseNullObject(piRoleObj);
+        }
+        else
+        {
+            // remove role
+            hr = CpiRemoveCollectionObject(piRoleColl, NULL, pItm->wzRoleName, FALSE);
+            ExitOnFailure(hr, "Failed to remove role, key: %S", pItm->wzKey);
+        }
+    }
+
+    // save changes
+    hr = piRoleColl->SaveChanges(&lChanges);
+    if (COMADMIN_E_OBJECTERRORS == hr)
+        CpiLogCatalogErrorInfo();
+    ExitOnFailure(hr, "Failed to save changes");
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piRoleColl);
+    ReleaseObject(piRoleObj);
+
+    return hr;
+}
+
+static HRESULT ReadComponentList(
+    LPWSTR* ppwzData,
+    CPIEXEC_COMPONENT** ppCompList
+    )
+{
+    HRESULT hr = S_OK;
+
+    LPWSTR pwzData = NULL;
+
+    CPIEXEC_COMPONENT* pItm = NULL;
+
+    int iCnt = 0;
+
+    // read count
+    hr = WcaReadIntegerFromCaData(ppwzData, &iCnt);
+    ExitOnFailure(hr, "Failed to read count");
+
+    // read components
+    for (int i = 0; i < iCnt; i++)
+    {
+        pItm = (CPIEXEC_COMPONENT*)::HeapAlloc(::GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(CPIEXEC_COMPONENT));
+        if (!pItm)
+            ExitFunction1(hr = E_OUTOFMEMORY);
+
+        // read clsid
+        hr = WcaReadStringFromCaData(ppwzData, &pwzData);
+        ExitOnFailure(hr, "Failed to read clsid");
+        StringCchCopyW(pItm->wzCLSID, countof(pItm->wzCLSID), pwzData);
+
+        // read properties
+        hr = CpiReadPropertyList(ppwzData, &pItm->pPropertyList);
+        ExitOnFailure(hr, "Failed to read properties");
+
+        // read role assignments
+        hr = ReadRoleAssignmentList(ppwzData, &pItm->pRoleAssignmentList);
+        ExitOnFailure(hr, "Failed to read role assignments");
+
+        // read interfaces
+        hr = ReadInterfaceList(ppwzData, &pItm->pInterfaceList);
+        ExitOnFailure(hr, "Failed to read interfaces");
+
+        // add to list
+        if (*ppCompList)
+            pItm->pNext = *ppCompList;
+        *ppCompList = pItm;
+        pItm = NULL;
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseStr(pwzData);
+
+    if (pItm)
+        FreeComponentList(pItm);
+
+    return hr;
+}
+
+static HRESULT ReadInterfaceList(
+    LPWSTR* ppwzData,
+    CPIEXEC_INTERFACE** ppIntfList
+    )
+{
+    HRESULT hr = S_OK;
+
+    LPWSTR pwzData = NULL;
+
+    CPIEXEC_INTERFACE* pItm = NULL;
+
+    int iCnt = 0;
+
+    // read count
+    hr = WcaReadIntegerFromCaData(ppwzData, &iCnt);
+    ExitOnFailure(hr, "Failed to read count");
+
+    // read interfaces
+    for (int i = 0; i < iCnt; i++)
+    {
+        pItm = (CPIEXEC_INTERFACE*)::HeapAlloc(::GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(CPIEXEC_INTERFACE));
+        if (!pItm)
+            ExitFunction1(hr = E_OUTOFMEMORY);
+
+        // read iid
+        hr = WcaReadStringFromCaData(ppwzData, &pwzData);
+        ExitOnFailure(hr, "Failed to read iid");
+        StringCchCopyW(pItm->wzIID, countof(pItm->wzIID), pwzData);
+
+        // read properties
+        hr = CpiReadPropertyList(ppwzData, &pItm->pPropertyList);
+        ExitOnFailure(hr, "Failed to read properties");
+
+        // read role assignments
+        hr = ReadRoleAssignmentList(ppwzData, &pItm->pRoleAssignmentList);
+        ExitOnFailure(hr, "Failed to read role assignments");
+
+        // read methods
+        hr = ReadMethodList(ppwzData, &pItm->pMethodList);
+        ExitOnFailure(hr, "Failed to read methods");
+
+        // add to list
+        if (*ppIntfList)
+            pItm->pNext = *ppIntfList;
+        *ppIntfList = pItm;
+        pItm = NULL;
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseStr(pwzData);
+
+    if (pItm)
+        FreeInterfaceList(pItm);
+
+    return hr;
+}
+
+static HRESULT ReadMethodList(
+    LPWSTR* ppwzData,
+    CPIEXEC_METHOD** ppMethList
+    )
+{
+    HRESULT hr = S_OK;
+
+    LPWSTR pwzData = NULL;
+
+    CPIEXEC_METHOD* pItm = NULL;
+
+    int iCnt = 0;
+
+    // read count
+    hr = WcaReadIntegerFromCaData(ppwzData, &iCnt);
+    ExitOnFailure(hr, "Failed to read count");
+
+    // read methods
+    for (int i = 0; i < iCnt; i++)
+    {
+        pItm = (CPIEXEC_METHOD*)::HeapAlloc(::GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(CPIEXEC_METHOD));
+        if (!pItm)
+            ExitFunction1(hr = E_OUTOFMEMORY);
+
+        // read index
+        hr = WcaReadStringFromCaData(ppwzData, &pwzData);
+        ExitOnFailure(hr, "Failed to read index");
+        StringCchCopyW(pItm->wzIndex, countof(pItm->wzIndex), pwzData);
+
+        // read name
+        hr = WcaReadStringFromCaData(ppwzData, &pwzData);
+        ExitOnFailure(hr, "Failed to read name");
+        StringCchCopyW(pItm->wzName, countof(pItm->wzName), pwzData);
+
+        // read properties
+        hr = CpiReadPropertyList(ppwzData, &pItm->pPropertyList);
+        ExitOnFailure(hr, "Failed to read properties");
+
+        // read role assignments
+        hr = ReadRoleAssignmentList(ppwzData, &pItm->pRoleAssignmentList);
+        ExitOnFailure(hr, "Failed to read role assignments");
+
+        // add to list
+        if (*ppMethList)
+            pItm->pNext = *ppMethList;
+        *ppMethList = pItm;
+        pItm = NULL;
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseStr(pwzData);
+
+    if (pItm)
+        FreeMethodList(pItm);
+
+    return hr;
+}
+
+static HRESULT ReadRoleAssignmentList(
+    LPWSTR* ppwzData,
+    CPIEXEC_ROLE_ASSIGNMENT** ppRoleList
+    )
+{
+    HRESULT hr = S_OK;
+
+    LPWSTR pwzData = NULL;
+
+    CPIEXEC_ROLE_ASSIGNMENT* pItm = NULL;
+
+    int iCnt = 0;
+
+    // read role count
+    hr = WcaReadIntegerFromCaData(ppwzData, &iCnt);
+    ExitOnFailure(hr, "Failed to read role assignments count");
+
+    // read roles
+    for (int i = 0; i < iCnt; i++)
+    {
+        pItm = (CPIEXEC_ROLE_ASSIGNMENT*)::HeapAlloc(::GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(CPIEXEC_ROLE_ASSIGNMENT));
+        if (!pItm)
+            ExitFunction1(hr = E_OUTOFMEMORY);
+
+        // read key
+        hr = WcaReadStringFromCaData(ppwzData, &pwzData);
+        ExitOnFailure(hr, "Failed to read key");
+        StringCchCopyW(pItm->wzKey, countof(pItm->wzKey), pwzData);
+
+        // read role name
+        hr = WcaReadStringFromCaData(ppwzData, &pwzData);
+        ExitOnFailure(hr, "Failed to read role name");
+        StringCchCopyW(pItm->wzRoleName, countof(pItm->wzRoleName), pwzData);
+
+        // add to list
+        if (*ppRoleList)
+            pItm->pNext = *ppRoleList;
+        *ppRoleList = pItm;
+        pItm = NULL;
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseStr(pwzData);
+
+    if (pItm)
+        FreeRoleAssignmentList(pItm);
+
+    return hr;
+}
+
+static void FreeComponentList(
+    CPIEXEC_COMPONENT* pList
+    )
+{
+    while (pList)
+    {
+        if (pList->pPropertyList)
+            CpiFreePropertyList(pList->pPropertyList);
+        if (pList->pRoleAssignmentList)
+            FreeRoleAssignmentList(pList->pRoleAssignmentList);
+        if (pList->pInterfaceList)
+            FreeInterfaceList(pList->pInterfaceList);
+
+        CPIEXEC_COMPONENT* pDelete = pList;
+        pList = pList->pNext;
+        ::HeapFree(::GetProcessHeap(), 0, pDelete);
+    }
+}
+
+static void FreeInterfaceList(
+    CPIEXEC_INTERFACE* pList
+    )
+{
+    while (pList)
+    {
+        if (pList->pPropertyList)
+            CpiFreePropertyList(pList->pPropertyList);
+        if (pList->pRoleAssignmentList)
+            FreeRoleAssignmentList(pList->pRoleAssignmentList);
+        if (pList->pMethodList)
+            FreeMethodList(pList->pMethodList);
+
+        CPIEXEC_INTERFACE* pDelete = pList;
+        pList = pList->pNext;
+        ::HeapFree(::GetProcessHeap(), 0, pDelete);
+    }
+}
+
+static void FreeMethodList(
+    CPIEXEC_METHOD* pList
+    )
+{
+    while (pList)
+    {
+        if (pList->pPropertyList)
+            CpiFreePropertyList(pList->pPropertyList);
+        if (pList->pRoleAssignmentList)
+            FreeRoleAssignmentList(pList->pRoleAssignmentList);
+
+        CPIEXEC_METHOD* pDelete = pList;
+        pList = pList->pNext;
+        ::HeapFree(::GetProcessHeap(), 0, pDelete);
+    }
+}
+
+static void FreeRoleAssignmentList(
+    CPIEXEC_ROLE_ASSIGNMENT* pList
+    )
+{
+    while (pList)
+    {
+        CPIEXEC_ROLE_ASSIGNMENT* pDelete = pList;
+        pList = pList->pNext;
+        ::HeapFree(::GetProcessHeap(), 0, pDelete);
+    }
+}
diff --git a/src/ext/ComPlus/ca/cpasmexec.h b/src/ext/ComPlus/ca/cpasmexec.h
new file mode 100644
index 00000000..56184c01
--- /dev/null
+++ b/src/ext/ComPlus/ca/cpasmexec.h
@@ -0,0 +1,20 @@
+#pragma once
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+
+HRESULT CpiConfigureAssemblies(
+    LPWSTR* ppwzData,
+    HANDLE hRollbackFile
+    );
+HRESULT CpiRollbackConfigureAssemblies(
+    LPWSTR* ppwzData,
+    CPI_ROLLBACK_DATA* pRollbackDataList
+    );
+HRESULT CpiConfigureRoleAssignments(
+    LPWSTR* ppwzData,
+    HANDLE hRollbackFile
+    );
+HRESULT CpiRollbackConfigureRoleAssignments(
+    LPWSTR* ppwzData,
+    CPI_ROLLBACK_DATA* pRollbackDataList
+    );
diff --git a/src/ext/ComPlus/ca/cpasmsched.cpp b/src/ext/ComPlus/ca/cpasmsched.cpp
new file mode 100644
index 00000000..2d0573a5
--- /dev/null
+++ b/src/ext/ComPlus/ca/cpasmsched.cpp
@@ -0,0 +1,2135 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+#include "precomp.h"
+
+
+// sql queries
+
+LPCWSTR vcsMsiAssemblyNameQuery =
+    L"SELECT `Name`, `Value` FROM `MsiAssemblyName` WHERE `Component_` = ?";
+enum eMsiAssemblyNameQuery { manqName = 1, manqValue };
+
+LPCWSTR vcsModuleQuery =
+    L"SELECT `ModuleID` FROM `ModuleSignature`";
+enum eModuleQuery { mqModule = 1 };
+
+LPCWSTR vcsAssemblyQuery =
+    L"SELECT `Assembly`, `Component_`, `Application_`, `AssemblyName`, `DllPath`, `TlbPath`, `PSDllPath`, `Attributes` FROM `ComPlusAssembly`";
+enum eAssemblyQuery { aqAssembly = 1, aqComponent, aqApplication, aqAssemblyName, aqDllPath, aqTlbPath, aqPSDllPath, aqAttributes };
+
+LPCWSTR vcsComponentQuery =
+    L"SELECT `ComPlusComponent`, `CLSID` FROM `ComPlusComponent` WHERE `Assembly_` = ?";
+enum eComponentQuery { cqComponent = 1, cqCLSID };
+
+LPCWSTR vcsComponentPropertyQuery =
+    L"SELECT `Name`, `Value` FROM `ComPlusComponentProperty` WHERE `ComPlusComponent_` = ?";
+
+LPCWSTR vcsInterfaceQuery =
+    L"SELECT `Interface`, `IID` FROM `ComPlusInterface` WHERE `ComPlusComponent_` = ?";
+enum eInterfaceQuery { iqInterface = 1, iqIID };
+
+LPCWSTR vcsInterfacePropertyQuery =
+    L"SELECT `Name`, `Value` FROM `ComPlusInterfaceProperty` WHERE `Interface_` = ?";
+
+LPCWSTR vcsMethodQuery =
+    L"SELECT `Method`, `Index`, `Name` FROM `ComPlusMethod` WHERE `Interface_` = ?";
+enum eMethodQuery { mqMethod = 1, mqIndex, mqName };
+
+LPCWSTR vcsMethodPropertyQuery =
+    L"SELECT `Name`, `Value` FROM `ComPlusMethodProperty` WHERE `Method_` = ?";
+
+LPCWSTR vcsRoleForComponentQuery =
+    L"SELECT `RoleForComponent`, `ApplicationRole_`, `Component_` FROM `ComPlusRoleForComponent` WHERE `ComPlusComponent_` = ?";
+LPCWSTR vcsRoleForInterfaceQuery =
+    L"SELECT `RoleForInterface`, `ApplicationRole_`, `Component_` FROM `ComPlusRoleForInterface` WHERE `Interface_` = ?";
+LPCWSTR vcsRoleForMethodQuery =
+    L"SELECT `RoleForMethod`, `ApplicationRole_`, `Component_` FROM `ComPlusRoleForMethod` WHERE `Method_` = ?";
+
+enum eRoleAssignmentQuery { raqKey = 1, raqApplicationRole, raqComponent };
+
+LPCWSTR vcsModuleComponentsQuery =
+    L"SELECT `Component`, `ModuleID` FROM `ModuleComponents`";
+LPCWSTR vcsModuleDependencyQuery =
+    L"SELECT `ModuleID`, `RequiredID` FROM `ModuleDependency`";
+LPCWSTR vcsAssemblyDependencyQuery =
+    L"SELECT `Assembly_`, `RequiredAssembly_` FROM `ComPlusAssemblyDependency`";
+
+enum eKeyPairQuery { kpqFirstKey = 1, kpqSecondKey };
+
+
+// private structs
+
+struct CPI_KEY_PAIR
+{
+    WCHAR wzFirstKey[MAX_DARWIN_KEY + 1];
+    WCHAR wzSecondKey[MAX_DARWIN_KEY + 1];
+
+    CPI_KEY_PAIR* pNext;
+};
+
+struct CPI_DEPENDENCY_CHAIN
+{
+    LPCWSTR pwzKey;
+
+    CPI_DEPENDENCY_CHAIN* pPrev;
+};
+
+struct CPI_MODULE
+{
+    WCHAR wzKey[MAX_DARWIN_KEY + 1];
+
+    CPI_MODULE* pPrev;
+    CPI_MODULE* pNext;
+};
+
+struct CPI_MODULE_LIST
+{
+    CPI_MODULE* pFirst;
+    CPI_MODULE* pLast;
+};
+
+
+// property definitions
+
+CPI_PROPERTY_DEFINITION pdlComponentProperties[] =
+{
+    {L"AllowInprocSubscribers",             cpptBoolean, 500},
+    {L"ComponentAccessChecksEnabled",       cpptBoolean, 500},
+    {L"ComponentTransactionTimeout",        cpptInteger, 500},
+    {L"ComponentTransactionTimeoutEnabled", cpptBoolean, 500},
+    {L"COMTIIntrinsics",                    cpptBoolean, 500},
+    {L"ConstructionEnabled",                cpptBoolean, 500},
+    {L"ConstructorString",                  cpptString,  500},
+    {L"CreationTimeout",                    cpptInteger, 500},
+    {L"Description",                        cpptString,  500},
+    {L"EventTrackingEnabled",               cpptBoolean, 500},
+    {L"ExceptionClass",                     cpptString,  500},
+    {L"FireInParallel",                     cpptBoolean, 500},
+    {L"IISIntrinsics",                      cpptBoolean, 500},
+    {L"InitializesServerApplication",       cpptBoolean, 500},
+    {L"IsEnabled",                          cpptBoolean, 501},
+    {L"IsPrivateComponent",                 cpptBoolean, 501},
+    {L"JustInTimeActivation",               cpptBoolean, 500},
+    {L"LoadBalancingSupported",             cpptBoolean, 500},
+    {L"MaxPoolSize",                        cpptInteger, 500},
+    {L"MinPoolSize",                        cpptInteger, 500},
+    {L"MultiInterfacePublisherFilterCLSID", cpptString,  500},
+    {L"MustRunInClientContext",             cpptBoolean, 500},
+    {L"MustRunInDefaultContext",            cpptBoolean, 501},
+    {L"ObjectPoolingEnabled",               cpptBoolean, 500},
+    {L"PublisherID",                        cpptString,  500},
+    {L"SoapAssemblyName",                   cpptString,  502},
+    {L"SoapTypeName",                       cpptString,  502},
+    {L"Synchronization",                    cpptInteger, 500},
+    {L"Transaction",                        cpptInteger, 500},
+    {L"TxIsolationLevel",                   cpptInteger, 501},
+    {NULL,                                  cpptNone,    0}
+};
+
+CPI_PROPERTY_DEFINITION pdlInterfaceProperties[] =
+{
+    {L"Description",    cpptString,  500},
+    {L"QueuingEnabled", cpptBoolean, 500},
+    {NULL,              cpptNone,    0}
+};
+
+CPI_PROPERTY_DEFINITION pdlMethodProperties[] =
+{
+    {L"AutoComplete", cpptBoolean, 500},
+    {L"Description",  cpptString,  500},
+    {NULL,            cpptNone,    0}
+};
+
+
+// prototypes for private helper functions
+
+static HRESULT GetAssemblyName(
+    LPCWSTR pwzComponent,
+    LPWSTR* ppwzAssemblyName
+    );
+static HRESULT KeyPairsRead(
+    LPCWSTR pwzQuery,
+    CPI_KEY_PAIR** ppKeyPairList
+    );
+static HRESULT ModulesRead(
+    CPI_MODULE_LIST* pModList
+    );
+static HRESULT AssembliesRead(
+    CPI_KEY_PAIR* pModCompList,
+    CPI_APPLICATION_LIST* pAppList,
+    CPI_APPLICATION_ROLE_LIST* pAppRoleList,
+    CPI_ASSEMBLY_LIST* pAsmList
+    );
+static HRESULT ComponentsRead(
+    LPCWSTR pwzAsmKey,
+    CPI_APPLICATION_ROLE_LIST* pAppRoleList,
+    CPI_ASSEMBLY* pAsm
+    );
+static HRESULT InterfacesRead(
+    LPCWSTR pwzCompKey,
+    CPI_APPLICATION_ROLE_LIST* pAppRoleList,
+    CPI_ASSEMBLY* pAsm,
+    CPISCHED_COMPONENT* pComp
+    );
+static HRESULT MethodsRead(
+    LPCWSTR pwzIntfKey,
+    CPI_APPLICATION_ROLE_LIST* pAppRoleList,
+    CPI_ASSEMBLY* pAsm,
+    CPISCHED_INTERFACE* pIntf
+    );
+static HRESULT RoleAssignmentsRead(
+    LPCWSTR pwzQuery,
+    LPCWSTR pwzKey,
+    CPI_APPLICATION_ROLE_LIST* pAppRoleList,
+    CPISCHED_ROLE_ASSIGNMENT** ppRoleList,
+    int* piInstallCount,
+    int* piUninstallCount
+    );
+static HRESULT TopSortModuleList(
+    CPI_KEY_PAIR* pDepList,
+    CPI_MODULE_LIST* pList
+    );
+static HRESULT SwapDependentModules(
+    CPI_DEPENDENCY_CHAIN* pdcPrev,
+    CPI_KEY_PAIR* pDepList,
+    CPI_MODULE_LIST* pList,
+    CPI_MODULE* pRoot,
+    CPI_MODULE* pItm
+    );
+static HRESULT ModuleFindByKey(
+    CPI_MODULE* pItm,
+    LPCWSTR pwzKey,
+    BOOL fReverse,
+    CPI_MODULE** ppItm
+    );
+static void SortAssemblyListByModule(
+    CPI_MODULE_LIST* pModList,
+    CPI_ASSEMBLY_LIST* pAsmList
+    );
+static HRESULT TopSortAssemblyList(
+    CPI_KEY_PAIR* pDepList,
+    CPI_ASSEMBLY_LIST* pList
+    );
+static HRESULT SwapDependentAssemblies(
+    CPI_DEPENDENCY_CHAIN* pdcPrev,
+    CPI_KEY_PAIR* pDepList,
+    CPI_ASSEMBLY_LIST* pList,
+    CPI_ASSEMBLY* pRoot,
+    CPI_ASSEMBLY* pItm
+    );
+static HRESULT AssemblyFindByKey(
+    CPI_ASSEMBLY* pItm,
+    LPCWSTR pwzKey,
+    BOOL fReverse,
+    CPI_ASSEMBLY** ppItm
+    );
+static HRESULT AddAssemblyToActionData(
+    CPI_ASSEMBLY* pItm,
+    BOOL fInstall,
+    int iActionType,
+    int iActionCost,
+    LPWSTR* ppwzActionData
+    );
+static HRESULT AddRoleAssignmentsToActionData(
+    CPI_ASSEMBLY* pItm,
+    BOOL fInstall,
+    int iActionType,
+    int iActionCost,
+    LPWSTR* ppwzActionData
+    );
+static HRESULT AddComponentToActionData(
+    CPISCHED_COMPONENT* pItm,
+    BOOL fInstall,
+    BOOL fProps,
+    BOOL fRoles,
+    LPWSTR* ppwzActionData
+    );
+static HRESULT AddInterfaceToActionData(
+    CPISCHED_INTERFACE* pItm,
+    BOOL fInstall,
+    BOOL fProps,
+    BOOL fRoles,
+    LPWSTR* ppwzActionData
+    );
+static HRESULT AddMethodToActionData(
+    CPISCHED_METHOD* pItm,
+    BOOL fInstall,
+    BOOL fProps,
+    BOOL fRoles,
+    LPWSTR* ppwzActionData
+    );
+static HRESULT AddRolesToActionData(
+    int iRoleInstallCount,
+    int iRoleUninstallCount,
+    CPISCHED_ROLE_ASSIGNMENT* pRoleList,
+    BOOL fInstall,
+    BOOL fRoles,
+    LPWSTR* ppwzActionData
+    );
+static HRESULT KeyPairFindByFirstKey(
+    CPI_KEY_PAIR* pList,
+    LPCWSTR pwzKey,
+    CPI_KEY_PAIR** ppItm
+    );
+static void AssemblyFree(
+    CPI_ASSEMBLY* pItm
+    );
+static void KeyPairsFreeList(
+    CPI_KEY_PAIR* pList
+    );
+void ModuleListFree(
+    CPI_MODULE_LIST* pList
+    );
+static void ModuleFree(
+    CPI_MODULE* pItm
+    );
+static void ComponentsFreeList(
+    CPISCHED_COMPONENT* pList
+    );
+static void InterfacesFreeList(
+    CPISCHED_INTERFACE* pList
+    );
+static void MethodsFreeList(
+    CPISCHED_METHOD* pList
+    );
+static void RoleAssignmentsFreeList(
+    CPISCHED_ROLE_ASSIGNMENT* pList
+    );
+
+
+// function definitions
+
+void CpiAssemblyListFree(
+    CPI_ASSEMBLY_LIST* pList
+    )
+{
+    CPI_ASSEMBLY* pItm = pList->pFirst;
+
+    while (pItm)
+    {
+        CPI_ASSEMBLY* pDelete = pItm;
+        pItm = pItm->pNext;
+        AssemblyFree(pDelete);
+    }
+}
+
+HRESULT CpiAssembliesRead(
+    CPI_APPLICATION_LIST* pAppList,
+    CPI_APPLICATION_ROLE_LIST* pAppRoleList,
+    CPI_ASSEMBLY_LIST* pAsmList
+    )
+{
+    HRESULT hr = S_OK;
+    CPI_MODULE_LIST modList;
+    CPI_KEY_PAIR* pModCompList = NULL;
+    CPI_KEY_PAIR* pModDepList = NULL;
+    CPI_KEY_PAIR* pAsmDepList = NULL;
+
+    ::ZeroMemory(&modList, sizeof(CPI_MODULE_LIST));
+
+    BOOL fModuleSignatureTable = (S_OK == WcaTableExists(L"ModuleSignature"));
+    BOOL fModuleComponentsTable = (S_OK == WcaTableExists(L"ModuleComponents"));
+    BOOL fModuleDependencyTable = (S_OK == WcaTableExists(L"ModuleDependency"));
+
+    // read modules
+    if (fModuleSignatureTable)
+    {
+        hr = ModulesRead(&modList);
+        ExitOnFailure(hr, "Failed to read ModuleSignature table");
+    }
+
+    // read module components
+    if (fModuleComponentsTable)
+    {
+        hr = KeyPairsRead(vcsModuleComponentsQuery, &pModCompList);
+        ExitOnFailure(hr, "Failed to read ModuleComponents table");
+    }
+
+    // read module dependencies
+    if (fModuleDependencyTable)
+    {
+        hr = KeyPairsRead(vcsModuleDependencyQuery, &pModDepList);
+        ExitOnFailure(hr, "Failed to read ModuleDependency table");
+    }
+
+    // read assemblies
+    hr = AssembliesRead(pModCompList, pAppList, pAppRoleList, pAsmList);
+    ExitOnFailure(hr, "Failed to read ComPlusAssembly table");
+
+    // read assembly dependencies
+    if (CpiTableExists(cptComPlusAssemblyDependency))
+    {
+        hr = KeyPairsRead(vcsAssemblyDependencyQuery, &pAsmDepList);
+        ExitOnFailure(hr, "Failed to read ComPlusAssemblyDependency table");
+    }
+
+    // sort modules
+    if (modList.pFirst && pModDepList)
+    {
+        hr = TopSortModuleList(pModDepList, &modList);
+        ExitOnFailure(hr, "Failed to sort modules");
+    }
+
+    // sort assemblies by module
+    if (pAsmList->pFirst && modList.pFirst && pModDepList)
+        SortAssemblyListByModule(&modList, pAsmList);
+
+    // sort assemblies by dependency
+    if (pAsmList->pFirst && pAsmDepList)
+    {
+        hr = TopSortAssemblyList(pAsmDepList, pAsmList);
+        ExitOnFailure(hr, "Failed to sort assemblies");
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ModuleListFree(&modList);
+    if (pModCompList)
+        KeyPairsFreeList(pModCompList);
+    if (pModDepList)
+        KeyPairsFreeList(pModDepList);
+    if (pAsmDepList)
+        KeyPairsFreeList(pAsmDepList);
+
+    return hr;
+}
+
+HRESULT CpiAssembliesVerifyInstall(
+    CPI_ASSEMBLY_LIST* pList
+    )
+{
+    HRESULT hr = S_OK;
+
+    for (CPI_ASSEMBLY* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        // assemblies that are being installed
+        if (!pItm->fReferencedForInstall && !pItm->iRoleAssignmentsInstallCount && !WcaIsInstalling(pItm->isInstalled, pItm->isAction))
+            continue;
+
+        // if the assembly is referensed, it must be installed
+        if ((pItm->fReferencedForInstall || pItm->iRoleAssignmentsInstallCount) && !CpiWillBeInstalled(pItm->isInstalled, pItm->isAction))
+            MessageExitOnFailure(hr = E_FAIL, msierrComPlusAssemblyDependency, "An assembly is used by another entity being installed, but is not installed itself, key: %S", pItm->wzKey);
+    }
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiAssembliesVerifyUninstall(
+    CPI_ASSEMBLY_LIST* pList
+    )
+{
+    HRESULT hr = S_OK;
+
+    for (CPI_ASSEMBLY* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        // assemblies that are being uninstalled
+        if (!pItm->fReferencedForUninstall && !pItm->iRoleAssignmentsUninstallCount && (!WcaIsUninstalling(pItm->isInstalled, pItm->isAction) && !WcaIsReInstalling(pItm->isInstalled, pItm->isAction)))
+            continue;
+
+        // if the application is not present, there is no need to remove the components
+        if (pItm->pApplication && pItm->pApplication->fObjectNotFound)
+        {
+            pItm->fIgnore = TRUE;
+            pList->iUninstallCount--; // elements with the fIgnore flag set will not be scheduled for uninstall
+            pList->iRoleUninstallCount--;
+        }
+    }
+
+    hr = S_OK;
+
+//LExit:
+    return hr;
+}
+
+HRESULT CpiAssembliesInstall(
+    CPI_ASSEMBLY_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    )
+{
+    HRESULT hr = S_OK;
+
+    int iActionType;
+    int iCount = 0;
+
+    // add action text
+    hr = CpiAddActionTextToActionData(L"RegisterComPlusAssemblies", ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action text to custom action data");
+
+    // assembly count
+    switch (iRunMode)
+    {
+    case rmDeferred:
+        iCount = pList->iInstallCount - pList->iCommitCount;
+        break;
+    case rmCommit:
+        iCount = pList->iCommitCount;
+        break;
+    case rmRollback:
+        iCount = pList->iInstallCount;
+        break;
+    }
+
+    // add assembly count to action data
+    hr = WcaWriteIntegerToCaData(iCount, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add count to custom action data");
+
+    // add assemblies to custom action data in forward order
+    for (CPI_ASSEMBLY* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        // assemblies that are being installed, or contains roll assignments to install
+        if (!WcaIsInstalling(pItm->isInstalled, pItm->isAction))
+            continue;
+
+        // assemblies that are being installed must be scheduled during the right type of action
+        BOOL fRunInCommit = 0 != (pItm->iAttributes & aaRunInCommit);
+        if (((rmCommit == iRunMode && !fRunInCommit) || (rmDeferred == iRunMode && fRunInCommit)))
+            continue;
+
+        // action type
+        if (rmRollback == iRunMode)
+        {
+            if (CpiIsInstalled(pItm->isInstalled))
+                iActionType = atNoOp;
+            else
+                iActionType = atRemove;
+        }
+        else
+            iActionType = atCreate;
+
+        // add to action data
+        hr = AddAssemblyToActionData(pItm, TRUE, iActionType, COST_ASSEMBLY_REGISTER, ppwzActionData);
+        ExitOnFailure(hr, "Failed to add assembly to custom action data, key: %S", pItm->wzKey);
+    }
+
+    // add progress tics
+    if (piProgress)
+        *piProgress += COST_ASSEMBLY_REGISTER * iCount;
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiAssembliesUninstall(
+    CPI_ASSEMBLY_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    )
+{
+    HRESULT hr = S_OK;
+
+    int iActionType;
+
+    // add action text
+    hr = CpiAddActionTextToActionData(L"UnregisterComPlusAssemblies", ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action text to custom action data");
+
+    // add assembly count to action data
+    hr = WcaWriteIntegerToCaData(pList->iUninstallCount, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add count to custom action data");
+
+    // add assemblies to custom action data in reverse order
+    for (CPI_ASSEMBLY* pItm = pList->pLast; pItm; pItm = pItm->pPrev)
+    {
+        // assemblies that are being uninstalled
+        if (pItm->fIgnore || (!WcaIsUninstalling(pItm->isInstalled, pItm->isAction) && !WcaIsReInstalling(pItm->isInstalled, pItm->isAction)))
+            continue;
+
+        // action type
+        if (rmRollback == iRunMode)
+            iActionType = atCreate;
+        else
+            iActionType = atRemove;
+
+        // add to action data
+        hr = AddAssemblyToActionData(pItm, FALSE, iActionType, COST_ASSEMBLY_UNREGISTER, ppwzActionData);
+        ExitOnFailure(hr, "Failed to add assembly to custom action data, key: %S", pItm->wzKey);
+    }
+
+    // add progress tics
+    if (piProgress)
+        *piProgress += COST_ASSEMBLY_UNREGISTER * pList->iUninstallCount;
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiRoleAssignmentsInstall(
+    CPI_ASSEMBLY_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    )
+{
+    HRESULT hr = S_OK;
+
+    int iActionType;
+    int iCount = 0;
+
+    // add action text
+    hr = CpiAddActionTextToActionData(L"AddComPlusRoleAssignments", ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action text to custom action data");
+
+    // assembly count
+    switch (iRunMode)
+    {
+    case rmDeferred:
+        iCount = pList->iRoleInstallCount - pList->iRoleCommitCount;
+        break;
+    case rmCommit:
+        iCount = pList->iRoleCommitCount;
+        break;
+    case rmRollback:
+        iCount = pList->iRoleInstallCount;
+        break;
+    }
+
+    // add assembly count to action data
+    hr = WcaWriteIntegerToCaData(iCount, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add count to custom action data");
+
+    // add assemblies to custom action data in forward order
+    for (CPI_ASSEMBLY* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        // assemblies that are being installed, or contains roll assignments to install
+        if (!pItm->iRoleAssignmentsInstallCount)
+            continue;
+
+        // assemblies that are being installed must be scheduled during the right type of action
+        BOOL fRunInCommit = 0 != (pItm->iAttributes & aaRunInCommit);
+        if (((rmCommit == iRunMode && !fRunInCommit) || (rmDeferred == iRunMode && fRunInCommit)))
+            continue;
+
+        // action type
+        if (rmRollback == iRunMode)
+        {
+            if (CpiIsInstalled(pItm->isInstalled))
+                iActionType = atNoOp;
+            else
+                iActionType = atRemove;
+        }
+        else
+            iActionType = atCreate;
+
+        // add to action data
+        hr = AddRoleAssignmentsToActionData(pItm, TRUE, iActionType, COST_ROLLASSIGNMENT_CREATE, ppwzActionData);
+        ExitOnFailure(hr, "Failed to add assembly to custom action data, key: %S", pItm->wzKey);
+
+        // add progress tics
+        if (piProgress)
+            *piProgress += COST_ROLLASSIGNMENT_CREATE * pItm->iRoleAssignmentsInstallCount;
+    }
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiRoleAssignmentsUninstall(
+    CPI_ASSEMBLY_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    )
+{
+    HRESULT hr = S_OK;
+
+    int iActionType;
+
+    // add action text
+    hr = CpiAddActionTextToActionData(L"RemoveComPlusRoleAssignments", ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action text to custom action data");
+
+    // add assembly count to action data
+    hr = WcaWriteIntegerToCaData(pList->iRoleUninstallCount, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add count to custom action data");
+
+    // add assemblies to custom action data in reverse order
+    for (CPI_ASSEMBLY* pItm = pList->pLast; pItm; pItm = pItm->pPrev)
+    {
+        // assemblies that are being uninstalled
+        if (pItm->fIgnore || !pItm->iRoleAssignmentsUninstallCount)
+            continue;
+
+        // action type
+        if (rmRollback == iRunMode)
+            iActionType = atCreate;
+        else
+            iActionType = atRemove;
+
+        // add to action data
+        hr = AddRoleAssignmentsToActionData(pItm, FALSE, iActionType, COST_ROLLASSIGNMENT_DELETE, ppwzActionData);
+        ExitOnFailure(hr, "Failed to add assembly to custom action data, key: %S", pItm->wzKey);
+
+        // add progress tics
+        if (piProgress)
+            *piProgress += COST_ROLLASSIGNMENT_DELETE * pItm->iRoleAssignmentsUninstallCount;
+    }
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiGetSubscriptionsCollForComponent(
+    CPI_ASSEMBLY* pAsm,
+    CPISCHED_COMPONENT* pComp,
+    ICatalogCollection** ppiSubsColl
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICatalogCollection* piCompColl = NULL;
+    ICatalogObject* piCompObj = NULL;
+
+    // get applications collection
+    if (!pComp->piSubsColl)
+    {
+        // get components collection for application
+        hr = CpiGetComponentsCollForApplication(pAsm->pApplication, &piCompColl);
+        ExitOnFailure(hr, "Failed to get components collection for application");
+
+        if (S_FALSE == hr)
+            ExitFunction(); // exit with hr = S_FALSE
+
+        // find component object
+        hr = CpiFindCollectionObject(piCompColl, pComp->wzCLSID, NULL, &piCompObj);
+        ExitOnFailure(hr, "Failed to find component object");
+
+        if (S_FALSE == hr)
+            ExitFunction(); // exit with hr = S_FALSE
+
+        // get roles collection
+        hr = CpiSchedGetCatalogCollection(piCompColl, piCompObj, L"SubscriptionsForComponent", &pComp->piSubsColl);
+        ExitOnFailure(hr, "Failed to get subscriptions collection");
+    }
+
+    // return value
+    *ppiSubsColl = pComp->piSubsColl;
+    (*ppiSubsColl)->AddRef();
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piCompColl);
+    ReleaseObject(piCompObj);
+
+    return hr;
+}
+
+
+// helper function definitions
+
+static HRESULT GetAssemblyName(
+    LPCWSTR pwzComponent,
+    LPWSTR* ppwzAssemblyName
+    )
+{
+    HRESULT hr = S_OK;
+
+    PMSIHANDLE hView, hRecKey, hRec;
+
+    LPWSTR pwzKey = NULL;
+
+    LPWSTR pwzName = NULL;
+    LPWSTR pwzVersion = NULL;
+    LPWSTR pwzCulture = NULL;
+    LPWSTR pwzPublicKeyToken = NULL;
+
+    // create parameter record
+    hRecKey = ::MsiCreateRecord(1);
+    ExitOnNull(hRecKey, hr, E_OUTOFMEMORY, "Failed to create record");
+    hr = WcaSetRecordString(hRecKey, 1, pwzComponent);
+    ExitOnFailure(hr, "Failed to set record string");
+
+    // open view
+    hr = WcaOpenView(vcsMsiAssemblyNameQuery, &hView);
+    ExitOnFailure(hr, "Failed to open view on MsiAssemblyName table");
+    hr = WcaExecuteView(hView, hRecKey);
+    ExitOnFailure(hr, "Failed to execute view on MsiAssemblyName table");
+
+    while (S_OK == (hr = WcaFetchRecord(hView, &hRec)))
+    {
+        // read key
+        hr = WcaGetRecordString(hRec, manqName, &pwzKey);
+        ExitOnFailure(hr, "Failed to get name");
+
+        // read value
+        if (0 == lstrcmpiW(L"name", pwzKey))
+            hr = WcaGetRecordString(hRec, manqValue, &pwzName);
+        else if (0 == lstrcmpiW(L"version", pwzKey))
+            hr = WcaGetRecordString(hRec, manqValue, &pwzVersion);
+        else if (0 == lstrcmpiW(L"culture", pwzKey))
+            hr = WcaGetRecordString(hRec, manqValue, &pwzCulture);
+        else if (0 == lstrcmpiW(L"publicKeyToken", pwzKey))
+            hr = WcaGetRecordString(hRec, manqValue, &pwzPublicKeyToken);
+        else
+        {
+            WcaLog(LOGMSG_VERBOSE, "Unknown name in MsiAssemblyName table: %S, %S", pwzComponent, pwzKey);
+            hr = S_OK;
+        }
+
+        ExitOnFailure(hr, "Failed to get value");
+    }
+
+    if (E_NOMOREITEMS != hr)
+        ExitOnFailure(hr, "Failed to fetch record");
+
+    // verify
+    if (!(pwzName && *pwzName) || !(pwzVersion && *pwzVersion))
+        ExitOnFailure(hr = E_FAIL, "Incomplete assembly name");
+
+    // build name string
+    hr = StrAllocFormatted(ppwzAssemblyName, L"%s, Version=%s, Culture=%s, PublicKeyToken=%s",
+        pwzName, pwzVersion,
+        pwzCulture && *pwzCulture ? pwzCulture : L"Neutral",
+        pwzPublicKeyToken && *pwzPublicKeyToken ? pwzPublicKeyToken : L"null");
+    ExitOnFailure(hr, "Failed to build assembly name string");
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseStr(pwzKey);
+    ReleaseStr(pwzName);
+    ReleaseStr(pwzVersion);
+    ReleaseStr(pwzCulture);
+    ReleaseStr(pwzPublicKeyToken);
+
+    return hr;
+}
+
+static HRESULT KeyPairsRead(
+    LPCWSTR pwzQuery,
+    CPI_KEY_PAIR** ppKeyPairList
+    )
+{
+    HRESULT hr = S_OK;
+
+    PMSIHANDLE hView, hRec;
+
+    CPI_KEY_PAIR* pItm = NULL;
+    LPWSTR pwzData = NULL;
+
+    // loop through all dependencies
+    hr = WcaOpenExecuteView(pwzQuery, &hView);
+    ExitOnFailure(hr, "Failed to execute view on table");
+
+    while (S_OK == (hr = WcaFetchRecord(hView, &hRec)))
+    {
+        // create entry
+        pItm = (CPI_KEY_PAIR*)::HeapAlloc(::GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(CPI_KEY_PAIR));
+        if (!pItm)
+            ExitFunction1(hr = E_OUTOFMEMORY);
+
+        // get key
+        hr = WcaGetRecordString(hRec, kpqFirstKey, &pwzData);
+        ExitOnFailure(hr, "Failed to get first key");
+        StringCchCopyW(pItm->wzFirstKey, countof(pItm->wzFirstKey), pwzData);
+
+        // get key
+        hr = WcaGetRecordString(hRec, kpqSecondKey, &pwzData);
+        ExitOnFailure(hr, "Failed to get second key");
+        StringCchCopyW(pItm->wzSecondKey, countof(pItm->wzSecondKey), pwzData);
+
+        // add entry
+        if (*ppKeyPairList)
+            pItm->pNext = *ppKeyPairList;
+        *ppKeyPairList = pItm;
+        pItm = NULL;
+    }
+
+    if (E_NOMOREITEMS == hr)
+        hr = S_OK;
+
+LExit:
+    // clean up
+    if (pItm)
+        KeyPairsFreeList(pItm);
+
+    ReleaseStr(pwzData);
+
+    return hr;
+}
+
+static HRESULT ModulesRead(
+    CPI_MODULE_LIST* pModList
+    )
+{
+    HRESULT hr = S_OK;
+
+    PMSIHANDLE hView, hRec;
+
+    CPI_MODULE* pItm = NULL;
+    LPWSTR pwzData = NULL;
+
+    // loop through all modules
+    hr = WcaOpenExecuteView(vcsModuleQuery, &hView);
+    ExitOnFailure(hr, "Failed to execute view on ModuleSignature table");
+
+    while (S_OK == (hr = WcaFetchRecord(hView, &hRec)))
+    {
+        // create entry
+        pItm = (CPI_MODULE*)::HeapAlloc(::GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(CPI_MODULE));
+        if (!pItm)
+            ExitFunction1(hr = E_OUTOFMEMORY);
+
+        // get key
+        hr = WcaGetRecordString(hRec, mqModule, &pwzData);
+        ExitOnFailure(hr, "Failed to get key");
+        StringCchCopyW(pItm->wzKey, countof(pItm->wzKey), pwzData);
+
+        // add entry
+        if (pModList->pLast)
+        {
+            pModList->pLast->pNext = pItm;
+            pItm->pPrev = pModList->pLast;
+        }
+        else
+            pModList->pFirst = pItm;
+        pModList->pLast = pItm;
+        pItm = NULL;
+    }
+
+    if (E_NOMOREITEMS == hr)
+        hr = S_OK;
+
+LExit:
+    // clean up
+    if (pItm)
+        ModuleFree(pItm);
+
+    ReleaseStr(pwzData);
+
+    return hr;
+}
+
+static HRESULT AssembliesRead(
+    CPI_KEY_PAIR* pModCompList,
+    CPI_APPLICATION_LIST* pAppList,
+    CPI_APPLICATION_ROLE_LIST* pAppRoleList,
+    CPI_ASSEMBLY_LIST* pAsmList
+    )
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+
+    PMSIHANDLE hView, hRec;
+
+    CPI_ASSEMBLY* pItm = NULL;
+    CPI_KEY_PAIR* pModComp;
+    LPWSTR pwzData = NULL;
+    LPWSTR pwzComponent = NULL;
+    BOOL fMatchingArchitecture = FALSE;
+
+    // loop through all assemblies
+    hr = WcaOpenExecuteView(vcsAssemblyQuery, &hView);
+    ExitOnFailure(hr, "Failed to execute view on ComPlusAssembly table");
+
+    while (S_OK == (hr = WcaFetchRecord(hView, &hRec)))
+    {
+        // get component
+        hr = WcaGetRecordString(hRec, aqComponent, &pwzComponent);
+        ExitOnFailure(hr, "Failed to get component");
+
+        // check if the component is our processor architecture
+        hr = CpiVerifyComponentArchitecure(pwzComponent, &fMatchingArchitecture);
+        ExitOnFailure(hr, "Failed to get component architecture.");
+
+        if (!fMatchingArchitecture)
+        {
+            continue; // not the same architecture, ignore
+        }
+
+        // create entry
+        pItm = (CPI_ASSEMBLY*)::HeapAlloc(::GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(CPI_ASSEMBLY));
+        if (!pItm)
+            ExitFunction1(hr = E_OUTOFMEMORY);
+
+        // get component install state
+        er = ::MsiGetComponentStateW(WcaGetInstallHandle(), pwzComponent, &pItm->isInstalled, &pItm->isAction);
+        ExitOnFailure(hr = HRESULT_FROM_WIN32(er), "Failed to get component state");
+
+        // get key
+        hr = WcaGetRecordString(hRec, aqAssembly, &pwzData);
+        ExitOnFailure(hr, "Failed to get key");
+        StringCchCopyW(pItm->wzKey, countof(pItm->wzKey), pwzData);
+
+        // get attributes
+        hr = WcaGetRecordInteger(hRec, aqAttributes, &pItm->iAttributes);
+        ExitOnFailure(hr, "Failed to get attributes");
+
+        // get assembly name
+        hr = WcaGetRecordFormattedString(hRec, aqAssemblyName, &pItm->pwzAssemblyName);
+        ExitOnFailure(hr, "Failed to get assembly name");
+
+        if (!*pItm->pwzAssemblyName && (pItm->iAttributes & aaPathFromGAC))
+        {
+            // get assembly name for component
+            hr = GetAssemblyName(pwzComponent, &pItm->pwzAssemblyName);
+            ExitOnFailure(hr, "Failed to get assembly name for component");
+        }
+
+        // get dll path
+        hr = WcaGetRecordFormattedString(hRec, aqDllPath, &pItm->pwzDllPath);
+        ExitOnFailure(hr, "Failed to get assembly dll path");
+
+        // get module
+        // TODO: if there is a very large number of components belonging to modules, this search might be slow
+        hr = KeyPairFindByFirstKey(pModCompList, pwzData, &pModComp);
+
+        if (S_OK == hr)
+            StringCchCopyW(pItm->wzModule, countof(pItm->wzModule), pModComp->wzSecondKey);
+
+        // get application
+        hr = WcaGetRecordString(hRec, aqApplication, &pwzData);
+        ExitOnFailure(hr, "Failed to get application");
+
+        if (pwzData && *pwzData)
+        {
+            hr = CpiApplicationFindByKey(pAppList, pwzData, &pItm->pApplication);
+            if (S_FALSE == hr)
+                hr = HRESULT_FROM_WIN32(ERROR_NOT_FOUND);
+            ExitOnFailure(hr, "Failed to find application, key: %S", pwzData);
+        }
+
+        // get tlb path
+        hr = WcaGetRecordFormattedString(hRec, aqTlbPath, &pItm->pwzTlbPath);
+        ExitOnFailure(hr, "Failed to get assembly tlb path");
+
+        // get proxy-stub dll path
+        hr = WcaGetRecordFormattedString(hRec, aqPSDllPath, &pItm->pwzPSDllPath);
+        ExitOnFailure(hr, "Failed to get assembly proxy-stub DLL path");
+
+        // read components
+        if (CpiTableExists(cptComPlusComponent))
+        {
+            hr = ComponentsRead(pItm->wzKey, pAppRoleList, pItm);
+            ExitOnFailure(hr, "Failed to read components for assembly");
+        }
+
+        // set references & increment counters
+        if (WcaIsInstalling(pItm->isInstalled, pItm->isAction))
+        {
+            pAsmList->iInstallCount++;
+            if (pItm->iAttributes & aaRunInCommit)
+                pAsmList->iCommitCount++;
+        }
+        if (WcaIsUninstalling(pItm->isInstalled, pItm->isAction) || WcaIsReInstalling(pItm->isInstalled, pItm->isAction))
+            pAsmList->iUninstallCount++;
+
+        if (pItm->iRoleAssignmentsInstallCount)
+        {
+            pAsmList->iRoleInstallCount++;
+            if (pItm->iAttributes & aaRunInCommit)
+                pAsmList->iRoleCommitCount++;
+        }
+        if (pItm->iRoleAssignmentsUninstallCount)
+            pAsmList->iRoleUninstallCount++;
+
+        if (pItm->pApplication)
+        {
+            if (pItm->iRoleAssignmentsInstallCount || WcaIsInstalling(pItm->isInstalled, pItm->isAction))
+                CpiApplicationAddReferenceInstall(pItm->pApplication);
+            if (pItm->iRoleAssignmentsUninstallCount || WcaIsUninstalling(pItm->isInstalled, pItm->isAction) || WcaIsReInstalling(pItm->isInstalled, pItm->isAction))
+                CpiApplicationAddReferenceUninstall(pItm->pApplication);
+        }
+
+        // add entry
+        if (pAsmList->pLast)
+        {
+            pAsmList->pLast->pNext = pItm;
+            pItm->pPrev = pAsmList->pLast;
+        }
+        else
+            pAsmList->pFirst = pItm;
+        pAsmList->pLast = pItm;
+        pItm = NULL;
+    }
+
+    if (E_NOMOREITEMS == hr)
+        hr = S_OK;
+
+LExit:
+    // clean up
+    if (pItm)
+        AssemblyFree(pItm);
+
+    ReleaseStr(pwzData);
+    ReleaseStr(pwzComponent);
+
+    return hr;
+}
+
+static HRESULT TopSortModuleList(
+    CPI_KEY_PAIR* pDepList,
+    CPI_MODULE_LIST* pList
+    )
+{
+    HRESULT hr = S_OK;
+
+    // top sort list
+    for (CPI_MODULE* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        // append module
+        hr = SwapDependentModules(NULL, pDepList, pList, pItm, pItm);
+        ExitOnFailure(hr, "Failed to swap dependent modules");
+    }
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+static HRESULT SwapDependentModules(
+    CPI_DEPENDENCY_CHAIN* pdcPrev, // list containing the entire dependency chain
+    CPI_KEY_PAIR* pDepList,        // module dependency list
+    CPI_MODULE_LIST* pList,        // module list being sorted
+    CPI_MODULE* pRoot,             // first module in the chain
+    CPI_MODULE* pItm               // current module to test for dependencies
+    )
+{
+    HRESULT hr = S_OK;
+
+    CPI_MODULE* pDepItm;
+
+    // find dependencies
+    for (CPI_KEY_PAIR* pDep = pDepList; pDep; pDep = pDep->pNext)
+    {
+        if (0 == lstrcmpW(pItm->wzKey, pDep->wzFirstKey))
+        {
+            CPI_DEPENDENCY_CHAIN dcItm;
+            dcItm.pwzKey = pItm->wzKey;
+            dcItm.pPrev = pdcPrev;
+
+            // check for circular dependencies
+            for (CPI_DEPENDENCY_CHAIN* pdcItm = &dcItm; pdcItm; pdcItm = pdcItm->pPrev)
+            {
+                if (0 == lstrcmpW(pdcItm->pwzKey, pDep->wzSecondKey))
+                {
+                    // circular dependency found
+                    ExitOnFailure(hr = E_FAIL, "Circular module dependency found, key: %S", pDep->wzSecondKey);
+                }
+            }
+
+            // make sure the item is not already in the list
+            hr = ModuleFindByKey(pRoot->pPrev, pDep->wzSecondKey, TRUE, &pDepItm); // find in reverse order
+
+            if (S_OK == hr)
+                continue; // item found, move on
+
+            // find item in the list
+            hr = ModuleFindByKey(pRoot->pNext, pDep->wzSecondKey, FALSE, &pDepItm); // find in forward order
+
+            if (S_FALSE == hr)
+            {
+                // not found
+                ExitOnFailure(hr = E_FAIL, "Module dependency not found, key: %S", pDep->wzSecondKey);
+            }
+
+            // if this item in turn has dependencies, they have to be swaped first
+            hr = SwapDependentModules(&dcItm, pDepList, pList, pRoot, pDepItm);
+            ExitOnFailure(hr, "Failed to swap dependent module");
+
+            // remove item from its current position
+            pDepItm->pPrev->pNext = pDepItm->pNext; // pDepItm can never be the first item, no need to check pPrev
+            if (pDepItm->pNext)
+                pDepItm->pNext->pPrev = pDepItm->pPrev;
+            else
+            {
+                pList->pLast = pDepItm->pPrev;
+                pList->pLast->pNext = NULL;
+            }
+
+            // insert before the current item
+            if (pRoot->pPrev)
+                pRoot->pPrev->pNext = pDepItm;
+            else
+                pList->pFirst = pDepItm;
+            pDepItm->pPrev = pRoot->pPrev;
+            pRoot->pPrev = pDepItm;
+            pDepItm->pNext = pRoot;
+        }
+    }
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+static HRESULT ModuleFindByKey(
+    CPI_MODULE* pItm,
+    LPCWSTR pwzKey,
+    BOOL fReverse,
+    CPI_MODULE** ppItm
+    )
+{
+    for (; pItm; pItm = fReverse ? pItm->pPrev : pItm->pNext)
+    {
+        if (0 == lstrcmpW(pItm->wzKey, pwzKey))
+        {
+            *ppItm = pItm;
+            return S_OK;
+        }
+    }
+
+    return S_FALSE;
+}
+
+static void SortAssemblyListByModule(
+    CPI_MODULE_LIST* pModList,
+    CPI_ASSEMBLY_LIST* pAsmList
+    )
+{
+    CPI_ASSEMBLY* pMoved = NULL; // first moved item
+
+    // loop modules in reverse order
+    for (CPI_MODULE* pMod = pModList->pLast; pMod; pMod = pMod->pPrev)
+    {
+        // loop assemblies in forward order, starting with the first unmoved item
+        CPI_ASSEMBLY* pAsm = pMoved ? pMoved->pNext : pAsmList->pFirst;
+        while (pAsm)
+        {
+            CPI_ASSEMBLY* pNext = pAsm->pNext;
+
+            // check if assembly belongs to the current module
+            if (0 == lstrcmpW(pMod->wzKey, pAsm->wzModule))
+            {
+                // if the item is not already first in the list
+                if (pAsm->pPrev)
+                {
+                    // remove item from it's current position
+                    pAsm->pPrev->pNext = pAsm->pNext;
+                    if (pAsm->pNext)
+                        pAsm->pNext->pPrev = pAsm->pPrev;
+                    else
+                        pAsmList->pLast = pAsm->pPrev;
+
+                    // insert item first in the list
+                    pAsmList->pFirst->pPrev = pAsm;
+                    pAsm->pNext = pAsmList->pFirst;
+                    pAsm->pPrev = NULL;
+                    pAsmList->pFirst = pAsm;
+                }
+
+                // if we haven't moved any items yet, this is the first moved item
+                if (!pMoved)
+                    pMoved = pAsm;
+            }
+
+            pAsm = pNext;
+        }
+    }
+}
+
+static HRESULT TopSortAssemblyList(
+    CPI_KEY_PAIR* pDepList,
+    CPI_ASSEMBLY_LIST* pList
+    )
+{
+    HRESULT hr = S_OK;
+
+    // top sort list
+    for (CPI_ASSEMBLY* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        // append module
+        hr = SwapDependentAssemblies(NULL, pDepList, pList, pItm, pItm);
+        ExitOnFailure(hr, "Failed to swap dependent assemblies");
+    }
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+static HRESULT SwapDependentAssemblies(
+    CPI_DEPENDENCY_CHAIN* pdcPrev, // list containing the entire dependency chain
+    CPI_KEY_PAIR* pDepList,        // assembly dependency list
+    CPI_ASSEMBLY_LIST* pList,      // assembly list being sorted
+    CPI_ASSEMBLY* pRoot,           // first assembly in the chain
+    CPI_ASSEMBLY* pItm             // current assembly to test for dependencies
+    )
+{
+    HRESULT hr = S_OK;
+
+    CPI_ASSEMBLY* pDepItm;
+
+    // find dependencies
+    for (CPI_KEY_PAIR* pDep = pDepList; pDep; pDep = pDep->pNext)
+    {
+        if (0 == lstrcmpW(pItm->wzKey, pDep->wzFirstKey))
+        {
+            CPI_DEPENDENCY_CHAIN dcItm;
+            dcItm.pwzKey = pItm->wzKey;
+            dcItm.pPrev = pdcPrev;
+
+            // check for circular dependencies
+            for (CPI_DEPENDENCY_CHAIN* pdcItm = &dcItm; pdcItm; pdcItm = pdcItm->pPrev)
+            {
+                if (0 == lstrcmpW(pdcItm->pwzKey, pDep->wzSecondKey))
+                {
+                    // circular dependency found
+                    ExitOnFailure(hr = E_FAIL, "Circular assembly dependency found, key: %S", pDep->wzSecondKey);
+                }
+            }
+
+            // make sure the item is not already in the list
+            hr = AssemblyFindByKey(pRoot->pPrev, pDep->wzSecondKey, TRUE, &pDepItm); // find in reverse order
+
+            if (S_OK == hr)
+                continue; // item found, move on
+
+            // find item in the list
+            hr = AssemblyFindByKey(pRoot->pNext, pDep->wzSecondKey, FALSE, &pDepItm); // find in forward order
+
+            if (S_FALSE == hr)
+            {
+                // not found
+                ExitOnFailure(hr = E_FAIL, "Assembly dependency not found, key: %S", pDep->wzSecondKey);
+            }
+
+            // if the root item belongs to a module, this item must also belong to the same module
+            if (*pItm->wzModule)
+            {
+                if (0 != lstrcmpW(pDepItm->wzModule, pItm->wzModule))
+                    ExitOnFailure(hr = E_FAIL, "An assembly dependency can only exist between two assemblies not belonging to modules, or belonging to the same module. assembly: %S, required assembly: %S", pItm->wzKey, pDepItm->wzKey);
+            }
+
+            // if this item in turn has dependencies, they have to be swaped first
+            hr = SwapDependentAssemblies(&dcItm, pDepList, pList, pRoot, pDepItm);
+            ExitOnFailure(hr, "Failed to swap dependent assemblies");
+
+            // remove item from its current position
+            pDepItm->pPrev->pNext = pDepItm->pNext; // pDepItm can never be the first item, no need to check pPrev
+            if (pDepItm->pNext)
+                pDepItm->pNext->pPrev = pDepItm->pPrev;
+            else
+            {
+                pList->pLast = pDepItm->pPrev;
+                pList->pLast->pNext = NULL;
+            }
+
+            // insert before the current item
+            if (pRoot->pPrev)
+                pRoot->pPrev->pNext = pDepItm;
+            else
+                pList->pFirst = pDepItm;
+            pDepItm->pPrev = pRoot->pPrev;
+            pRoot->pPrev = pDepItm;
+            pDepItm->pNext = pRoot;
+        }
+    }
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+static HRESULT AssemblyFindByKey(
+    CPI_ASSEMBLY* pItm,
+    LPCWSTR pwzKey,
+    BOOL fReverse,
+    CPI_ASSEMBLY** ppItm
+    )
+{
+    for (; pItm; pItm = fReverse ? pItm->pPrev : pItm->pNext)
+    {
+        if (0 == lstrcmpW(pItm->wzKey, pwzKey))
+        {
+            *ppItm = pItm;
+            return S_OK;
+        }
+    }
+
+    return S_FALSE;
+}
+
+static HRESULT ComponentsRead(
+    LPCWSTR pwzAsmKey,
+    CPI_APPLICATION_ROLE_LIST* pAppRoleList,
+    CPI_ASSEMBLY* pAsm
+    )
+{
+    HRESULT hr = S_OK;
+    PMSIHANDLE hView;
+    PMSIHANDLE hRec;
+    PMSIHANDLE hRecKey;
+    CPISCHED_COMPONENT* pItm = NULL;
+    LPWSTR pwzData = NULL;
+
+    // create parameter record
+    hRecKey = ::MsiCreateRecord(1);
+    ExitOnNull(hRecKey, hr, E_OUTOFMEMORY, "Failed to create record");
+    hr = WcaSetRecordString(hRecKey, 1, pwzAsmKey);
+    ExitOnFailure(hr, "Failed to set record string");
+
+    // open view
+    hr = WcaOpenView(vcsComponentQuery, &hView);
+    ExitOnFailure(hr, "Failed to open view on ComPlusComponent table");
+    hr = WcaExecuteView(hView, hRecKey);
+    ExitOnFailure(hr, "Failed to execute view on ComPlusComponent table");
+
+    while (S_OK == (hr = WcaFetchRecord(hView, &hRec)))
+    {
+        // create entry
+        pItm = (CPISCHED_COMPONENT*)::HeapAlloc(::GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(CPISCHED_COMPONENT));
+        if (!pItm)
+            ExitFunction1(hr = E_OUTOFMEMORY);
+
+        // get key
+        hr = WcaGetRecordString(hRec, cqComponent, &pwzData);
+        ExitOnFailure(hr, "Failed to get key");
+        StringCchCopyW(pItm->wzKey, countof(pItm->wzKey), pwzData);
+
+        // get clsid
+        hr = WcaGetRecordFormattedString(hRec, cqCLSID, &pwzData);
+        ExitOnFailure(hr, "Failed to get clsid");
+        StringCchCopyW(pItm->wzCLSID, countof(pItm->wzCLSID), pwzData);
+
+        // read properties
+        if (CpiTableExists(cptComPlusComponentProperty))
+        {
+            hr = CpiPropertiesRead(vcsComponentPropertyQuery, pItm->wzKey, pdlComponentProperties, &pItm->pProperties, &pItm->iPropertyCount);
+            ExitOnFailure(hr, "Failed to get component properties");
+        }
+
+        // read roles
+        if (CpiTableExists(cptComPlusRoleForComponent))
+        {
+            hr = RoleAssignmentsRead(vcsRoleForComponentQuery, pItm->wzKey, pAppRoleList, &pItm->pRoles, &pItm->iRoleInstallCount, &pItm->iRoleUninstallCount);
+            ExitOnFailure(hr, "Failed to get roles for component");
+        }
+
+        if (pItm->iRoleInstallCount)
+            pAsm->iRoleAssignmentsInstallCount++;
+        if (pItm->iRoleUninstallCount)
+            pAsm->iRoleAssignmentsUninstallCount++;
+
+        // read interfaces
+        if (CpiTableExists(cptComPlusInterface))
+        {
+            hr = InterfacesRead(pItm->wzKey, pAppRoleList, pAsm, pItm);
+            ExitOnFailure(hr, "Failed to get interfaces for component");
+        }
+
+        // add entry
+        pAsm->iComponentCount++;
+        if (pAsm->pComponents)
+            pItm->pNext = pAsm->pComponents;
+        pAsm->pComponents = pItm;
+        pItm = NULL;
+    }
+
+    if (E_NOMOREITEMS == hr)
+        hr = S_OK;
+
+LExit:
+    // clean up
+    if (pItm)
+        ComponentsFreeList(pItm);
+
+    ReleaseStr(pwzData);
+
+    return hr;
+}
+
+static HRESULT InterfacesRead(
+    LPCWSTR pwzCompKey,
+    CPI_APPLICATION_ROLE_LIST* pAppRoleList,
+    CPI_ASSEMBLY* pAsm,
+    CPISCHED_COMPONENT* pComp
+    )
+{
+    HRESULT hr = S_OK;
+    PMSIHANDLE hView;
+    PMSIHANDLE hRec;
+    PMSIHANDLE hRecKey;
+    CPISCHED_INTERFACE* pItm = NULL;
+    LPWSTR pwzData = NULL;
+
+    // create parameter record
+    hRecKey = ::MsiCreateRecord(1);
+    ExitOnNull(hRecKey, hr, E_OUTOFMEMORY, "Failed to create record");
+    hr = WcaSetRecordString(hRecKey, 1, pwzCompKey);
+    ExitOnFailure(hr, "Failed to set record string");
+
+    // open view
+    hr = WcaOpenView(vcsInterfaceQuery, &hView);
+    ExitOnFailure(hr, "Failed to open view on ComPlusInterface table");
+    hr = WcaExecuteView(hView, hRecKey);
+    ExitOnFailure(hr, "Failed to execute view on ComPlusInterface table");
+
+    while (S_OK == (hr = WcaFetchRecord(hView, &hRec)))
+    {
+        // create entry
+        pItm = (CPISCHED_INTERFACE*)::HeapAlloc(::GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(CPISCHED_INTERFACE));
+        if (!pItm)
+            ExitFunction1(hr = E_OUTOFMEMORY);
+
+        // get key
+        hr = WcaGetRecordString(hRec, iqInterface, &pwzData);
+        ExitOnFailure(hr, "Failed to get key");
+        StringCchCopyW(pItm->wzKey, countof(pItm->wzKey), pwzData);
+
+        // get iid
+        hr = WcaGetRecordFormattedString(hRec, iqIID, &pwzData);
+        ExitOnFailure(hr, "Failed to get iid");
+        StringCchCopyW(pItm->wzIID, countof(pItm->wzIID), pwzData);
+
+        // read properties
+        if (CpiTableExists(cptComPlusInterfaceProperty))
+        {
+            hr = CpiPropertiesRead(vcsInterfacePropertyQuery, pItm->wzKey, pdlInterfaceProperties, &pItm->pProperties, &pItm->iPropertyCount);
+            ExitOnFailure(hr, "Failed to get interface properties");
+        }
+
+        // read roles
+        if (CpiTableExists(cptComPlusRoleForInterface))
+        {
+            hr = RoleAssignmentsRead(vcsRoleForInterfaceQuery, pItm->wzKey, pAppRoleList, &pItm->pRoles, &pItm->iRoleInstallCount, &pItm->iRoleUninstallCount);
+            ExitOnFailure(hr, "Failed to get roles for interface");
+        }
+
+        if (pItm->iRoleInstallCount)
+            pAsm->iRoleAssignmentsInstallCount++;
+        if (pItm->iRoleUninstallCount)
+            pAsm->iRoleAssignmentsUninstallCount++;
+
+        // read methods
+        if (CpiTableExists(cptComPlusMethod))
+        {
+            hr = MethodsRead(pItm->wzKey, pAppRoleList, pAsm, pItm);
+            ExitOnFailure(hr, "Failed to get methods for interface");
+        }
+
+        // add entry
+        pComp->iInterfaceCount++;
+        if (pComp->pInterfaces)
+            pItm->pNext = pComp->pInterfaces;
+        pComp->pInterfaces = pItm;
+        pItm = NULL;
+    }
+
+    if (E_NOMOREITEMS == hr)
+        hr = S_OK;
+
+LExit:
+    // clean up
+    if (pItm)
+        InterfacesFreeList(pItm);
+
+    ReleaseStr(pwzData);
+
+    return hr;
+}
+
+static HRESULT MethodsRead(
+    LPCWSTR pwzIntfKey,
+    CPI_APPLICATION_ROLE_LIST* pAppRoleList,
+    CPI_ASSEMBLY* pAsm,
+    CPISCHED_INTERFACE* pIntf
+    )
+{
+    HRESULT hr = S_OK;
+    PMSIHANDLE hView, hRec, hRecKey;
+    CPISCHED_METHOD* pItm = NULL;
+    LPWSTR pwzData = NULL;
+
+    // create parameter record
+    hRecKey = ::MsiCreateRecord(1);
+    ExitOnNull(hRecKey, hr, E_OUTOFMEMORY, "Failed to create record");
+    hr = WcaSetRecordString(hRecKey, 1, pwzIntfKey);
+    ExitOnFailure(hr, "Failed to set record string");
+
+    // open view
+    hr = WcaOpenView(vcsMethodQuery, &hView);
+    ExitOnFailure(hr, "Failed to open view on ComPlusMethod table");
+    hr = WcaExecuteView(hView, hRecKey);
+    ExitOnFailure(hr, "Failed to execute view on ComPlusMethod table");
+
+    while (S_OK == (hr = WcaFetchRecord(hView, &hRec)))
+    {
+        // create entry
+        pItm = (CPISCHED_METHOD*)::HeapAlloc(::GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(CPISCHED_METHOD));
+        if (!pItm)
+            ExitFunction1(hr = E_OUTOFMEMORY);
+
+        // get key
+        hr = WcaGetRecordString(hRec, iqInterface, &pwzData);
+        ExitOnFailure(hr, "Failed to get key");
+        StringCchCopyW(pItm->wzKey, countof(pItm->wzKey), pwzData);
+
+        // get index
+        hr = WcaGetRecordFormattedString(hRec, mqIndex, &pwzData);
+        ExitOnFailure(hr, "Failed to get index");
+        StringCchCopyW(pItm->wzIndex, countof(pItm->wzIndex), pwzData);
+
+        // get name
+        hr = WcaGetRecordFormattedString(hRec, mqName, &pwzData);
+        ExitOnFailure(hr, "Failed to get name");
+        StringCchCopyW(pItm->wzName, countof(pItm->wzName), pwzData);
+
+        // either an index or a name must be provided
+        if (!*pItm->wzIndex && !*pItm->wzName)
+            ExitOnFailure(hr = E_FAIL, "A method must have either an index or a name associated, key: %S", pItm->wzKey);
+
+        // read properties
+        if (CpiTableExists(cptComPlusMethodProperty))
+        {
+            hr = CpiPropertiesRead(vcsMethodPropertyQuery, pItm->wzKey, pdlMethodProperties, &pItm->pProperties, &pItm->iPropertyCount);
+            ExitOnFailure(hr, "Failed to get method properties");
+        }
+
+        // read roles
+        if (CpiTableExists(cptComPlusRoleForMethod))
+        {
+            hr = RoleAssignmentsRead(vcsRoleForMethodQuery, pItm->wzKey, pAppRoleList, &pItm->pRoles, &pItm->iRoleInstallCount, &pItm->iRoleUninstallCount);
+            ExitOnFailure(hr, "Failed to get roles for method");
+        }
+
+        if (pItm->iRoleInstallCount)
+            pAsm->iRoleAssignmentsInstallCount++;
+        if (pItm->iRoleUninstallCount)
+            pAsm->iRoleAssignmentsUninstallCount++;
+
+        // add entry
+        pIntf->iMethodCount++;
+        if (pIntf->pMethods)
+            pItm->pNext = pIntf->pMethods;
+        pIntf->pMethods = pItm;
+        pItm = NULL;
+    }
+
+    if (E_NOMOREITEMS == hr)
+        hr = S_OK;
+
+LExit:
+    // clean up
+    if (pItm)
+        MethodsFreeList(pItm);
+
+    ReleaseStr(pwzData);
+
+    return hr;
+}
+
+static HRESULT RoleAssignmentsRead(
+    LPCWSTR pwzQuery,
+    LPCWSTR pwzKey,
+    CPI_APPLICATION_ROLE_LIST* pAppRoleList,
+    CPISCHED_ROLE_ASSIGNMENT** ppRoleList,
+    int* piInstallCount,
+    int* piUninstallCount
+    )
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+
+    PMSIHANDLE hView, hRec, hRecKey;
+
+    CPISCHED_ROLE_ASSIGNMENT* pItm = NULL;
+    LPWSTR pwzData = NULL;
+    BOOL fMatchingArchitecture = FALSE;
+
+    // create parameter record
+    hRecKey = ::MsiCreateRecord(1);
+    ExitOnNull(hRecKey, hr, E_OUTOFMEMORY, "Failed to create record");
+    hr = WcaSetRecordString(hRecKey, 1, pwzKey);
+    ExitOnFailure(hr, "Failed to set record string");
+
+    // open view
+    hr = WcaOpenView(pwzQuery, &hView);
+    ExitOnFailure(hr, "Failed to open view on role assignment table");
+    hr = WcaExecuteView(hView, hRecKey);
+    ExitOnFailure(hr, "Failed to execute view on role assignment table");
+
+    while (S_OK == (hr = WcaFetchRecord(hView, &hRec)))
+    {
+        // get component
+        hr = WcaGetRecordString(hRec, raqComponent, &pwzData);
+        ExitOnFailure(hr, "Failed to get assembly component");
+
+        // check if the component is our processor architecture
+        hr = CpiVerifyComponentArchitecure(pwzData, &fMatchingArchitecture);
+        ExitOnFailure(hr, "Failed to get component architecture.");
+
+        if (!fMatchingArchitecture)
+        {
+            continue; // not the same architecture, ignore
+        }
+
+        // create entry
+        pItm = (CPISCHED_ROLE_ASSIGNMENT*)::HeapAlloc(::GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(CPISCHED_ROLE_ASSIGNMENT));
+        if (!pItm)
+            ExitFunction1(hr = E_OUTOFMEMORY);
+
+        // get component install state
+        er = ::MsiGetComponentStateW(WcaGetInstallHandle(), pwzData, &pItm->isInstalled, &pItm->isAction);
+        ExitOnFailure(hr = HRESULT_FROM_WIN32(er), "Failed to get component state");
+
+        // get key
+        hr = WcaGetRecordString(hRec, raqKey, &pwzData);
+        ExitOnFailure(hr, "Failed to get key");
+        StringCchCopyW(pItm->wzKey, countof(pItm->wzKey), pwzData);
+
+        // get application role
+        hr = WcaGetRecordString(hRec, raqApplicationRole, &pwzData);
+        ExitOnFailure(hr, "Failed to get application role");
+
+        hr = CpiApplicationRoleFindByKey(pAppRoleList, pwzData, &pItm->pApplicationRole);
+        if (S_FALSE == hr)
+            hr = HRESULT_FROM_WIN32(ERROR_NOT_FOUND);
+        ExitOnFailure(hr, "Failed to find application, key: %S", pwzData);
+
+        // set references & increment counters
+        if (WcaIsInstalling(pItm->isInstalled, pItm->isAction))
+        {
+            CpiApplicationRoleAddReferenceInstall(pItm->pApplicationRole);
+            ++*piInstallCount;
+        }
+        if (WcaIsUninstalling(pItm->isInstalled, pItm->isAction))
+        {
+            CpiApplicationRoleAddReferenceUninstall(pItm->pApplicationRole);
+            ++*piUninstallCount;
+        }
+
+        // add entry
+        if (*ppRoleList)
+            pItm->pNext = *ppRoleList;
+        *ppRoleList = pItm;
+        pItm = NULL;
+    }
+
+    if (E_NOMOREITEMS == hr)
+        hr = S_OK;
+
+LExit:
+    // clean up
+    if (pItm)
+        RoleAssignmentsFreeList(pItm);
+
+    ReleaseStr(pwzData);
+
+    return hr;
+}
+
+static HRESULT AddAssemblyToActionData(
+    CPI_ASSEMBLY* pItm,
+    BOOL fInstall,
+    int iActionType,
+    int iActionCost,
+    LPWSTR* ppwzActionData
+    )
+{
+    HRESULT hr = S_OK;
+
+    // add action information to custom action data
+    hr = WcaWriteIntegerToCaData(iActionType, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action type to custom action data");
+    hr = WcaWriteIntegerToCaData(iActionCost, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action cost to custom action data");
+
+    // add assembly information to custom action data
+    hr = WcaWriteStringToCaData(pItm->wzKey, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add assembly key to custom action data");
+    hr = WcaWriteStringToCaData(pItm->pwzAssemblyName, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add assembly name to custom action data");
+    hr = WcaWriteStringToCaData(pItm->pwzDllPath, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add assembly dll path to custom action data");
+    hr = WcaWriteStringToCaData(atCreate == iActionType ? pItm->pwzTlbPath : L"", ppwzActionData);
+    ExitOnFailure(hr, "Failed to add assembly tlb path to custom action data");
+    hr = WcaWriteStringToCaData(atCreate == iActionType ? pItm->pwzPSDllPath : L"", ppwzActionData);
+    ExitOnFailure(hr, "Failed to add assembly proxy-stub dll path to custom action data");
+    hr = WcaWriteIntegerToCaData(pItm->iAttributes, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add assembly attributes to custom action data");
+
+    // add application information to custom action data
+    hr = WcaWriteStringToCaData(pItm->pApplication ? pItm->pApplication->wzID : L"", ppwzActionData);
+    ExitOnFailure(hr, "Failed to add application id to custom action data");
+
+    // add partition information to custom action data
+    LPCWSTR pwzPartID = pItm->pApplication && pItm->pApplication->pPartition ? pItm->pApplication->pPartition->wzID : L"";
+    hr = WcaWriteStringToCaData(pwzPartID, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add partition id to custom action data");
+
+    // add components to custom action data
+    //
+    // components are needed acording to the following table:
+    //
+    //             Native    .NET
+    // --------------------------------------------
+    //  NoOp     |  No     |  No
+    //  Create   |  Yes    |  Yes
+    //  Remove   |  Yes    |  No
+    //
+    int iCompCount = (atCreate == iActionType || (atRemove == iActionType && 0 == (pItm->iAttributes & aaDotNetAssembly))) ? pItm->iComponentCount : 0;
+    hr = WcaWriteIntegerToCaData(iCompCount, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add component count to custom action data, key: %S", pItm->wzKey);
+
+    if (iCompCount)
+    {
+        for (CPISCHED_COMPONENT* pComp = pItm->pComponents; pComp; pComp = pComp->pNext)
+        {
+            hr = AddComponentToActionData(pComp, fInstall, atCreate == iActionType, FALSE, ppwzActionData);
+            ExitOnFailure(hr, "Failed to add component to custom action data, component: %S", pComp->wzKey);
+        }
+    }
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+static HRESULT AddRoleAssignmentsToActionData(
+    CPI_ASSEMBLY* pItm,
+    BOOL fInstall,
+    int iActionType,
+    int iActionCost,
+    LPWSTR* ppwzActionData
+    )
+{
+    HRESULT hr = S_OK;
+
+    // add action information to custom action data
+    hr = WcaWriteIntegerToCaData(iActionType, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action type to custom action data");
+    hr = WcaWriteIntegerToCaData(iActionCost, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action cost to custom action data");
+
+    // add assembly information to custom action data
+    hr = WcaWriteStringToCaData(pItm->wzKey, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add assembly key to custom action data");
+    hr = WcaWriteIntegerToCaData(fInstall ? pItm->iRoleAssignmentsInstallCount : pItm->iRoleAssignmentsUninstallCount, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add role assignments count to custom action data");
+
+    // add application information to custom action data
+    hr = WcaWriteStringToCaData(pItm->pApplication ? pItm->pApplication->wzID : L"", ppwzActionData);
+    ExitOnFailure(hr, "Failed to add application id to custom action data");
+
+    // add partition information to custom action data
+    LPCWSTR pwzPartID = pItm->pApplication && pItm->pApplication->pPartition ? pItm->pApplication->pPartition->wzID : L"";
+    hr = WcaWriteStringToCaData(pwzPartID, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add partition id to custom action data");
+
+    // add components to custom action data
+    hr = WcaWriteIntegerToCaData(pItm->iComponentCount, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add component count to custom action data");
+
+    for (CPISCHED_COMPONENT* pComp = pItm->pComponents; pComp; pComp = pComp->pNext)
+    {
+        hr = AddComponentToActionData(pComp, fInstall, FALSE, TRUE, ppwzActionData);
+        ExitOnFailure(hr, "Failed to add component to custom action data, component: %S", pComp->wzKey);
+    }
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+static HRESULT AddComponentToActionData(
+    CPISCHED_COMPONENT* pItm,
+    BOOL fInstall,
+    BOOL fProps,
+    BOOL fRoles,
+    LPWSTR* ppwzActionData
+    )
+{
+    HRESULT hr = S_OK;
+
+    // add component information to custom action data
+    hr = WcaWriteStringToCaData(pItm->wzCLSID, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add component CLSID to custom action data");
+
+    // add properties to custom action data
+    hr = CpiAddPropertiesToActionData(fProps ? pItm->iPropertyCount : 0, pItm->pProperties, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add properties to custom action data");
+
+    // add roles to custom action data
+    hr = AddRolesToActionData(pItm->iRoleInstallCount, pItm->iRoleUninstallCount, pItm->pRoles, fInstall, fRoles, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add roles to custom action data");
+
+    // add interfaces to custom action data
+    int iIntfCount = (fProps || fRoles) ? pItm->iInterfaceCount : 0;
+    hr = WcaWriteIntegerToCaData(iIntfCount, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add interface count to custom action data");
+
+    if (iIntfCount)
+    {
+        for (CPISCHED_INTERFACE* pIntf = pItm->pInterfaces; pIntf; pIntf = pIntf->pNext)
+        {
+            hr = AddInterfaceToActionData(pIntf, fInstall, fProps, fRoles, ppwzActionData);
+            ExitOnFailure(hr, "Failed to add interface custom action data, interface: %S", pIntf->wzKey);
+        }
+    }
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+static HRESULT AddInterfaceToActionData(
+    CPISCHED_INTERFACE* pItm,
+    BOOL fInstall,
+    BOOL fProps,
+    BOOL fRoles,
+    LPWSTR* ppwzActionData
+    )
+{
+    HRESULT hr = S_OK;
+
+    // add interface information to custom action data
+    hr = WcaWriteStringToCaData(pItm->wzIID, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add interface IID to custom action data");
+
+    // add properties to custom action data
+    hr = CpiAddPropertiesToActionData(fProps ? pItm->iPropertyCount : 0, pItm->pProperties, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add properties to custom action data");
+
+    // add roles to custom action data
+    hr = AddRolesToActionData(pItm->iRoleInstallCount, pItm->iRoleUninstallCount, pItm->pRoles, fInstall, fRoles, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add roles to custom action data");
+
+    // add methods to custom action data
+    hr = WcaWriteIntegerToCaData(pItm->iMethodCount, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add method count to custom action data");
+
+    for (CPISCHED_METHOD* pMeth = pItm->pMethods; pMeth; pMeth = pMeth->pNext)
+    {
+        hr = AddMethodToActionData(pMeth, fInstall, fProps, fRoles, ppwzActionData);
+        ExitOnFailure(hr, "Failed to add method custom action data, method: %S", pMeth->wzKey);
+    }
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+static HRESULT AddMethodToActionData(
+    CPISCHED_METHOD* pItm,
+    BOOL fInstall,
+    BOOL fProps,
+    BOOL fRoles,
+    LPWSTR* ppwzActionData
+    )
+{
+    HRESULT hr = S_OK;
+
+    // add interface information to custom action data
+    hr = WcaWriteStringToCaData(pItm->wzIndex, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add method index to custom action data");
+
+    hr = WcaWriteStringToCaData(pItm->wzName, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add method name to custom action data");
+
+    // add properties to custom action data
+    hr = CpiAddPropertiesToActionData(fProps ? pItm->iPropertyCount : 0, pItm->pProperties, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add properties to custom action data");
+
+    // add roles to custom action data
+    hr = AddRolesToActionData(pItm->iRoleInstallCount, pItm->iRoleUninstallCount, pItm->pRoles, fInstall, fRoles, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add roles to custom action data");
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+static HRESULT AddRolesToActionData(
+    int iRoleInstallCount,
+    int iRoleUninstallCount,
+    CPISCHED_ROLE_ASSIGNMENT* pRoleList,
+    BOOL fInstall,
+    BOOL fRoles,
+    LPWSTR* ppwzActionData
+    )
+{
+    HRESULT hr = S_OK;
+
+    int iRoleCount = fRoles ? (fInstall ? iRoleInstallCount : iRoleUninstallCount) : 0;
+    hr = WcaWriteIntegerToCaData(iRoleCount, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add role count to custom action data");
+
+    if (iRoleCount)
+    {
+        for (CPISCHED_ROLE_ASSIGNMENT* pRole = pRoleList; pRole; pRole = pRole->pNext)
+        {
+            // make sure the install state matches the create flag
+            if (fInstall ? !WcaIsInstalling(pRole->isInstalled, pRole->isAction) : !WcaIsUninstalling(pRole->isInstalled, pRole->isAction))
+                continue;
+
+            hr = WcaWriteStringToCaData(pRole->pApplicationRole->wzKey, ppwzActionData);
+            ExitOnFailure(hr, "Failed to add key to custom action data, role: %S", pRole->wzKey);
+
+            hr = WcaWriteStringToCaData(pRole->pApplicationRole->wzName, ppwzActionData);
+            ExitOnFailure(hr, "Failed to add role name to custom action data, role: %S", pRole->wzKey);
+        }
+    }
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+static HRESULT KeyPairFindByFirstKey(
+    CPI_KEY_PAIR* pList,
+    LPCWSTR pwzKey,
+    CPI_KEY_PAIR** ppItm
+    )
+{
+    for (; pList; pList = pList->pNext)
+    {
+        if (0 == lstrcmpW(pList->wzFirstKey, pwzKey))
+        {
+            *ppItm = pList;
+            return S_OK;
+        }
+    }
+
+    return S_FALSE;
+}
+
+static void AssemblyFree(
+    CPI_ASSEMBLY* pItm
+    )
+{
+    ReleaseStr(pItm->pwzAssemblyName);
+    ReleaseStr(pItm->pwzDllPath);
+    ReleaseStr(pItm->pwzTlbPath);
+    ReleaseStr(pItm->pwzPSDllPath);
+
+    if (pItm->pComponents)
+        ComponentsFreeList(pItm->pComponents);
+
+    ::HeapFree(::GetProcessHeap(), 0, pItm);
+}
+
+static void KeyPairsFreeList(
+    CPI_KEY_PAIR* pList
+    )
+{
+    while (pList)
+    {
+        CPI_KEY_PAIR* pDelete = pList;
+        pList = pList->pNext;
+        ::HeapFree(::GetProcessHeap(), 0, pDelete);
+    }
+}
+
+void ModuleListFree(
+    CPI_MODULE_LIST* pList
+    )
+{
+    CPI_MODULE* pItm = pList->pFirst;
+
+    while (pItm)
+    {
+        CPI_MODULE* pDelete = pItm;
+        pItm = pItm->pNext;
+        ModuleFree(pDelete);
+    }
+}
+
+static void ModuleFree(
+    CPI_MODULE* pItm
+    )
+{
+    ::HeapFree(::GetProcessHeap(), 0, pItm);
+}
+
+static void ComponentsFreeList(
+    CPISCHED_COMPONENT* pList
+    )
+{
+    while (pList)
+    {
+        if (pList->pProperties)
+            CpiPropertiesFreeList(pList->pProperties);
+
+        if (pList->pRoles)
+            RoleAssignmentsFreeList(pList->pRoles);
+
+        if (pList->pInterfaces)
+            InterfacesFreeList(pList->pInterfaces);
+
+        ReleaseObject(pList->piSubsColl);
+
+        CPISCHED_COMPONENT* pDelete = pList;
+        pList = pList->pNext;
+        ::HeapFree(::GetProcessHeap(), 0, pDelete);
+    }
+}
+
+static void InterfacesFreeList(
+    CPISCHED_INTERFACE* pList
+    )
+{
+    while (pList)
+    {
+        if (pList->pProperties)
+            CpiPropertiesFreeList(pList->pProperties);
+
+        if (pList->pRoles)
+            RoleAssignmentsFreeList(pList->pRoles);
+
+        if (pList->pMethods)
+            MethodsFreeList(pList->pMethods);
+
+        CPISCHED_INTERFACE* pDelete = pList;
+        pList = pList->pNext;
+        ::HeapFree(::GetProcessHeap(), 0, pDelete);
+    }
+}
+
+static void MethodsFreeList(
+    CPISCHED_METHOD* pList
+    )
+{
+    while (pList)
+    {
+        if (pList->pProperties)
+            CpiPropertiesFreeList(pList->pProperties);
+
+        if (pList->pRoles)
+            RoleAssignmentsFreeList(pList->pRoles);
+
+        CPISCHED_METHOD* pDelete = pList;
+        pList = pList->pNext;
+        ::HeapFree(::GetProcessHeap(), 0, pDelete);
+    }
+}
+
+static void RoleAssignmentsFreeList(
+    CPISCHED_ROLE_ASSIGNMENT* pList
+    )
+{
+    while (pList)
+    {
+        CPISCHED_ROLE_ASSIGNMENT* pDelete = pList;
+        pList = pList->pNext;
+        ::HeapFree(::GetProcessHeap(), 0, pDelete);
+    }
+}
diff --git a/src/ext/ComPlus/ca/cpasmsched.h b/src/ext/ComPlus/ca/cpasmsched.h
new file mode 100644
index 00000000..ddf4b6c0
--- /dev/null
+++ b/src/ext/ComPlus/ca/cpasmsched.h
@@ -0,0 +1,168 @@
+#pragma once
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+
+enum eAssemblyAttributes
+{
+    aaEventClass     = (1 << 0),
+    aaDotNetAssembly = (1 << 1),
+    aaPathFromGAC    = (1 << 2),
+    aaRunInCommit    = (1 << 3)
+};
+
+
+// structs
+
+struct CPISCHED_ROLE_ASSIGNMENT
+{
+    WCHAR wzKey[MAX_DARWIN_KEY + 1];
+
+    INSTALLSTATE isInstalled, isAction;
+
+    CPI_APPLICATION_ROLE* pApplicationRole;
+
+    CPISCHED_ROLE_ASSIGNMENT* pNext;
+};
+
+struct CPISCHED_METHOD
+{
+    WCHAR wzKey[MAX_DARWIN_KEY + 1];
+    WCHAR wzIndex[11 + 1];
+    WCHAR wzName[MAX_DARWIN_COLUMN + 1];
+
+    int iPropertyCount;
+    CPI_PROPERTY* pProperties;
+
+    int iRoleInstallCount;
+    int iRoleUninstallCount;
+    CPISCHED_ROLE_ASSIGNMENT* pRoles;
+
+    CPISCHED_METHOD* pNext;
+};
+
+struct CPISCHED_INTERFACE
+{
+    WCHAR wzKey[MAX_DARWIN_KEY + 1];
+    WCHAR wzIID[CPI_MAX_GUID + 1];
+
+    int iPropertyCount;
+    CPI_PROPERTY* pProperties;
+
+    int iRoleInstallCount;
+    int iRoleUninstallCount;
+    CPISCHED_ROLE_ASSIGNMENT* pRoles;
+
+    int iMethodCount;
+    CPISCHED_METHOD* pMethods;
+
+    CPISCHED_INTERFACE* pNext;
+};
+
+struct CPISCHED_COMPONENT
+{
+    WCHAR wzKey[MAX_DARWIN_KEY + 1];
+    WCHAR wzCLSID[CPI_MAX_GUID + 1];
+
+    int iPropertyCount;
+    CPI_PROPERTY* pProperties;
+
+    int iRoleInstallCount;
+    int iRoleUninstallCount;
+    CPISCHED_ROLE_ASSIGNMENT* pRoles;
+
+    int iInterfaceCount;
+    CPISCHED_INTERFACE* pInterfaces;
+
+    ICatalogCollection* piSubsColl;
+
+    CPISCHED_COMPONENT* pNext;
+};
+
+struct CPI_ASSEMBLY
+{
+    WCHAR wzKey[MAX_DARWIN_KEY + 1];
+    WCHAR wzModule[MAX_DARWIN_KEY + 1];
+    LPWSTR pwzAssemblyName;
+    LPWSTR pwzDllPath;
+    LPWSTR pwzTlbPath;
+    LPWSTR pwzPSDllPath;
+    int iAttributes;
+
+    int iComponentCount;
+    CPISCHED_COMPONENT* pComponents;
+
+    BOOL fReferencedForInstall;
+    BOOL fReferencedForUninstall;
+    BOOL fIgnore;
+
+    int iRoleAssignmentsInstallCount;
+    int iRoleAssignmentsUninstallCount;
+
+    INSTALLSTATE isInstalled, isAction;
+
+    CPI_APPLICATION* pApplication;
+
+    CPI_ASSEMBLY* pPrev;
+    CPI_ASSEMBLY* pNext;
+};
+
+struct CPI_ASSEMBLY_LIST
+{
+    CPI_ASSEMBLY* pFirst;
+    CPI_ASSEMBLY* pLast;
+
+    int iInstallCount;
+    int iCommitCount;
+    int iUninstallCount;
+
+    int iRoleInstallCount;
+    int iRoleCommitCount;
+    int iRoleUninstallCount;
+};
+
+
+// function prototypes
+
+void CpiAssemblyListFree(
+    CPI_ASSEMBLY_LIST* pList
+    );
+HRESULT CpiAssembliesRead(
+    CPI_APPLICATION_LIST* pAppList,
+    CPI_APPLICATION_ROLE_LIST* pAppRoleList,
+    CPI_ASSEMBLY_LIST* pAsmList
+    );
+HRESULT CpiAssembliesVerifyInstall(
+    CPI_ASSEMBLY_LIST* pList
+    );
+HRESULT CpiAssembliesVerifyUninstall(
+    CPI_ASSEMBLY_LIST* pList
+    );
+HRESULT CpiAssembliesInstall(
+    CPI_ASSEMBLY_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    );
+HRESULT CpiAssembliesUninstall(
+    CPI_ASSEMBLY_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    );
+HRESULT CpiRoleAssignmentsInstall(
+    CPI_ASSEMBLY_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    );
+HRESULT CpiRoleAssignmentsUninstall(
+    CPI_ASSEMBLY_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    );
+HRESULT CpiGetSubscriptionsCollForComponent(
+    CPI_ASSEMBLY* pAsm,
+    CPISCHED_COMPONENT* pComp,
+    ICatalogCollection** ppiSubsColl
+    );
diff --git a/src/ext/ComPlus/ca/cpcost.h b/src/ext/ComPlus/ca/cpcost.h
new file mode 100644
index 00000000..7a23e03b
--- /dev/null
+++ b/src/ext/ComPlus/ca/cpcost.h
@@ -0,0 +1,30 @@
+#pragma once
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+
+#define COST_PARTITION_CREATE 10000
+#define COST_PARTITION_DELETE 10000
+
+#define COST_PARTITION_USER_CREATE 10000
+#define COST_PARTITION_USER_DELETE 10000
+
+#define COST_USER_IN_PARTITION_ROLE_CREATE 10000
+#define COST_USER_IN_PARTITION_ROLE_DELETE 10000
+
+#define COST_APPLICATION_CREATE 10000
+#define COST_APPLICATION_DELETE 10000
+
+#define COST_APPLICATION_ROLE_CREATE 10000
+#define COST_APPLICATION_ROLE_DELETE 10000
+
+#define COST_USER_IN_APPLICATION_ROLE_CREATE 10000
+#define COST_USER_IN_APPLICATION_ROLE_DELETE 10000
+
+#define COST_ASSEMBLY_REGISTER   50000
+#define COST_ASSEMBLY_UNREGISTER 10000
+
+#define COST_ROLLASSIGNMENT_CREATE 10000
+#define COST_ROLLASSIGNMENT_DELETE 10000
+
+#define COST_SUBSCRIPTION_CREATE 10000
+#define COST_SUBSCRIPTION_DELETE 10000
diff --git a/src/ext/ComPlus/ca/cpexec.cpp b/src/ext/ComPlus/ca/cpexec.cpp
new file mode 100644
index 00000000..9b1691fc
--- /dev/null
+++ b/src/ext/ComPlus/ca/cpexec.cpp
@@ -0,0 +1,681 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+#include "precomp.h"
+
+/********************************************************************
+ ComPlusPrepare - CUSTOM ACTION ENTRY POINT
+
+  Input:  deferred CustomActionData - ComPlusPrepare
+********************************************************************/
+extern "C" UINT __stdcall ComPlusPrepare(MSIHANDLE hInstall)
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+
+    LPWSTR pwzCustomActionData = NULL;
+    LPWSTR pwzData = NULL;
+
+    HANDLE hRollbackFile = INVALID_HANDLE_VALUE;
+
+    // initialize
+    hr = WcaInitialize(hInstall, "ComPlusPrepare");
+    ExitOnFailure(hr, "Failed to initialize ComPlusPrepare");
+
+    // get custom action data
+    hr = WcaGetProperty(L"CustomActionData", &pwzCustomActionData);
+    ExitOnFailure(hr, "Failed to get CustomActionData");
+    pwzData = pwzCustomActionData;
+
+    // create rollback file
+    hRollbackFile = ::CreateFileW(pwzData, GENERIC_WRITE, 0, NULL, CREATE_NEW, FILE_ATTRIBUTE_TEMPORARY, NULL);
+    if (INVALID_HANDLE_VALUE == hRollbackFile)
+        ExitOnFailure(hr = HRESULT_FROM_WIN32(::GetLastError()), "Failed to create rollback file, name: %S", pwzData);
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseStr(pwzCustomActionData);
+
+    if (INVALID_HANDLE_VALUE != hRollbackFile)
+        ::CloseHandle(hRollbackFile);
+
+    er = SUCCEEDED(hr) ? ERROR_SUCCESS : ERROR_INSTALL_FAILURE;
+    return WcaFinalize(er);
+}
+
+/********************************************************************
+ ComPlusCleanup - CUSTOM ACTION ENTRY POINT
+
+  Input:  deferred CustomActionData - ComPlusCleanup
+********************************************************************/
+extern "C" UINT __stdcall ComPlusCleanup(MSIHANDLE hInstall)
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+
+    LPWSTR pwzCustomActionData = NULL;
+    LPWSTR pwzData = NULL;
+
+    // initialize
+    hr = WcaInitialize(hInstall, "ComPlusCleanup");
+    ExitOnFailure(hr, "Failed to initialize ComPlusCleanup");
+
+    // get custom action data
+    hr = WcaGetProperty(L"CustomActionData", &pwzCustomActionData);
+    ExitOnFailure(hr, "Failed to get CustomActionData");
+    pwzData = pwzCustomActionData;
+
+    // delete rollback file
+    if (!::DeleteFileW(pwzData))
+    {
+        // error, but not a showstopper
+        hr = HRESULT_FROM_WIN32(::GetLastError());
+        WcaLog(LOGMSG_STANDARD, "Failed to delete rollback file, hr: 0x%x, name: %S", hr, pwzData);
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseStr(pwzCustomActionData);
+
+    er = SUCCEEDED(hr) ? ERROR_SUCCESS : ERROR_INSTALL_FAILURE;
+    return WcaFinalize(er);
+}
+
+/********************************************************************
+ ComPlusInstallExecute - CUSTOM ACTION ENTRY POINT
+
+  Input:  deferred CustomActionData - ComPlusInstallExecute
+********************************************************************/
+extern "C" UINT __stdcall ComPlusInstallExecute(MSIHANDLE hInstall)
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+
+    LPWSTR pwzCustomActionData = NULL;
+    LPWSTR pwzData = NULL;
+    LPWSTR pwzRollbackFileName = NULL;
+
+    HANDLE hRollbackFile = INVALID_HANDLE_VALUE;
+
+    BOOL fInitializedCom = FALSE;
+
+    // initialize
+    hr = WcaInitialize(hInstall, "ComPlusInstallExecute");
+    ExitOnFailure(hr, "Failed to initialize ComPlusInstallExecute");
+
+    hr = ::CoInitialize(NULL);
+    ExitOnFailure(hr, "Failed to initialize COM");
+    fInitializedCom = TRUE;
+
+    CpiExecInitialize();
+
+    // get custom action data
+    hr = WcaGetProperty(L"CustomActionData", &pwzCustomActionData);
+    ExitOnFailure(hr, "Failed to get CustomActionData");
+    pwzData = pwzCustomActionData;
+
+    // open rollback file
+    hr = WcaReadStringFromCaData(&pwzData, &pwzRollbackFileName);
+    ExitOnFailure(hr, "Failed to read rollback file name");
+
+    hRollbackFile = ::CreateFileW(pwzRollbackFileName, GENERIC_WRITE, FILE_SHARE_READ, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_TEMPORARY, NULL);
+    if (INVALID_HANDLE_VALUE == hRollbackFile)
+        ExitOnFailure(hr = HRESULT_FROM_WIN32(::GetLastError()), "Failed to open rollback file, name: %S", pwzRollbackFileName);
+
+    // create partitions
+    hr = CpiConfigurePartitions(&pwzData, hRollbackFile);
+    ExitOnFailure(hr, "Failed to create partitions");
+    if (S_FALSE == hr) ExitFunction();
+
+    // create users in partition roles
+    hr = CpiConfigureUsersInPartitionRoles(&pwzData, hRollbackFile);
+    ExitOnFailure(hr, "Failed to create users in partition roles");
+    if (S_FALSE == hr) ExitFunction();
+
+    // create partition users
+    hr = CpiConfigurePartitionUsers(&pwzData, hRollbackFile);
+    ExitOnFailure(hr, "Failed to add partition users");
+    if (S_FALSE == hr) ExitFunction();
+
+    // create applications
+    hr = CpiConfigureApplications(&pwzData, hRollbackFile);
+    ExitOnFailure(hr, "Failed to create applications");
+    if (S_FALSE == hr) ExitFunction();
+
+    // create application roles
+    hr = CpiConfigureApplicationRoles(&pwzData, hRollbackFile);
+    ExitOnFailure(hr, "Failed to create application roles");
+    if (S_FALSE == hr) ExitFunction();
+
+    // create users in application roles
+    hr = CpiConfigureUsersInApplicationRoles(&pwzData, hRollbackFile);
+    ExitOnFailure(hr, "Failed to create users in application roles");
+    if (S_FALSE == hr) ExitFunction();
+
+    // register assemblies
+    hr = CpiConfigureAssemblies(&pwzData, hRollbackFile);
+    ExitOnFailure(hr, "Failed to register assemblies");
+    if (S_FALSE == hr) ExitFunction();
+
+    // create role assignments
+    hr = CpiConfigureRoleAssignments(&pwzData, hRollbackFile);
+    ExitOnFailure(hr, "Failed to create role assignments");
+    if (S_FALSE == hr) ExitFunction();
+
+    // create subscriptions
+    hr = CpiConfigureSubscriptions(&pwzData, hRollbackFile);
+    ExitOnFailure(hr, "Failed to create subscriptions");
+    if (S_FALSE == hr) ExitFunction();
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseStr(pwzCustomActionData);
+    ReleaseStr(pwzRollbackFileName);
+
+    if (INVALID_HANDLE_VALUE != hRollbackFile)
+        ::CloseHandle(hRollbackFile);
+
+    // unitialize
+    CpiExecFinalize();
+
+    if (fInitializedCom)
+        ::CoUninitialize();
+
+    er = SUCCEEDED(hr) ? ERROR_SUCCESS : ERROR_INSTALL_FAILURE;
+    return WcaFinalize(er);
+}
+
+/********************************************************************
+ ComPlusInstallExecuteCommit - CUSTOM ACTION ENTRY POINT
+
+  Input:  deferred CustomActionData - ComPlusInstallExecuteCommit
+********************************************************************/
+extern "C" UINT __stdcall ComPlusInstallExecuteCommit(MSIHANDLE hInstall)
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+
+    LPWSTR pwzCustomActionData = NULL;
+    LPWSTR pwzData = NULL;
+    LPWSTR pwzRollbackFileName = NULL;
+
+    HANDLE hRollbackFile = INVALID_HANDLE_VALUE;
+
+    BOOL fInitializedCom = FALSE;
+
+    // initialize
+    hr = WcaInitialize(hInstall, "ComPlusInstallExecuteCommit");
+    ExitOnFailure(hr, "Failed to initialize ComPlusInstallExecuteCommit");
+
+    hr = ::CoInitialize(NULL);
+    ExitOnFailure(hr, "Failed to initialize COM");
+    fInitializedCom = TRUE;
+
+    CpiExecInitialize();
+
+    // get custom action data
+    hr = WcaGetProperty(L"CustomActionData", &pwzCustomActionData);
+    ExitOnFailure(hr, "Failed to get CustomActionData");
+    pwzData = pwzCustomActionData;
+
+    // open rollback file
+    hr = WcaReadStringFromCaData(&pwzData, &pwzRollbackFileName);
+    ExitOnFailure(hr, "Failed to read rollback file name");
+
+    hRollbackFile = ::CreateFileW(pwzRollbackFileName, GENERIC_WRITE, FILE_SHARE_READ, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_TEMPORARY, NULL);
+    if (INVALID_HANDLE_VALUE == hRollbackFile)
+        ExitOnFailure(hr = HRESULT_FROM_WIN32(::GetLastError()), "Failed to open rollback file, name: %S", pwzRollbackFileName);
+
+    if (INVALID_SET_FILE_POINTER == ::SetFilePointer(hRollbackFile, 0, NULL, FILE_END))
+        ExitOnFailure(hr = HRESULT_FROM_WIN32(::GetLastError()), "Failed to set file pointer");
+
+    // register assemblies
+    hr = CpiConfigureAssemblies(&pwzData, hRollbackFile);
+    ExitOnFailure(hr, "Failed to register assemblies");
+    if (S_FALSE == hr) ExitFunction();
+
+    // create role assignments
+    hr = CpiConfigureRoleAssignments(&pwzData, hRollbackFile);
+    ExitOnFailure(hr, "Failed to create role assignments");
+    if (S_FALSE == hr) ExitFunction();
+
+    // create subscriptions
+    hr = CpiConfigureSubscriptions(&pwzData, hRollbackFile);
+    ExitOnFailure(hr, "Failed to create subscriptions");
+    if (S_FALSE == hr) ExitFunction();
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseStr(pwzCustomActionData);
+
+    if (INVALID_HANDLE_VALUE != hRollbackFile)
+        ::CloseHandle(hRollbackFile);
+
+    // unitialize
+    CpiExecFinalize();
+
+    if (fInitializedCom)
+        ::CoUninitialize();
+
+    er = SUCCEEDED(hr) ? ERROR_SUCCESS : ERROR_INSTALL_FAILURE;
+    return WcaFinalize(er);
+}
+
+/********************************************************************
+ ComPlusRollbackInstallExecute - CUSTOM ACTION ENTRY POINT
+
+  Input:  deferred CustomActionData - ComPlusRollbackInstallExecute
+********************************************************************/
+extern "C" UINT __stdcall ComPlusRollbackInstallExecute(MSIHANDLE hInstall)
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+
+    LPWSTR pwzCustomActionData = NULL;
+    LPWSTR pwzData = NULL;
+    LPWSTR pwzRollbackFileName = NULL;
+
+    HANDLE hRollbackFile = INVALID_HANDLE_VALUE;
+
+    CPI_ROLLBACK_DATA* prdPartitions = NULL;
+    CPI_ROLLBACK_DATA* prdUsersInPartitionRoles = NULL;
+    CPI_ROLLBACK_DATA* prdPartitionUsers = NULL;
+    CPI_ROLLBACK_DATA* prdApplications = NULL;
+    CPI_ROLLBACK_DATA* prdApplicationRoles = NULL;
+    CPI_ROLLBACK_DATA* prdUsersApplicationRoles = NULL;
+    CPI_ROLLBACK_DATA* prdAssemblies = NULL;
+    CPI_ROLLBACK_DATA* prdRoleAssignments = NULL;
+    CPI_ROLLBACK_DATA* prdSubscriptions = NULL;
+
+    BOOL fInitializedCom = FALSE;
+
+    // initialize
+    hr = WcaInitialize(hInstall, "ComPlusRollbackInstallExecute");
+    ExitOnFailure(hr, "Failed to initialize ComPlusRollbackInstallExecute");
+
+    hr = ::CoInitialize(NULL);
+    ExitOnFailure(hr, "Failed to initialize COM");
+    fInitializedCom = TRUE;
+
+    CpiExecInitialize();
+
+    // get custom action data
+    hr = WcaGetProperty(L"CustomActionData", &pwzCustomActionData);
+    ExitOnFailure(hr, "Failed to get CustomActionData");
+    pwzData = pwzCustomActionData;
+
+    // open rollback file
+    hr = WcaReadStringFromCaData(&pwzData, &pwzRollbackFileName);
+    ExitOnFailure(hr, "Failed to read rollback file name");
+
+    hRollbackFile = ::CreateFileW(pwzRollbackFileName, GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_TEMPORARY, NULL);
+    if (INVALID_HANDLE_VALUE == hRollbackFile)
+        ExitOnFailure(hr = HRESULT_FROM_WIN32(::GetLastError()), "Failed to open rollback file, name: %S", pwzRollbackFileName);
+
+    // read rollback data (execute)
+    hr = CpiReadRollbackDataList(hRollbackFile, &prdPartitions);
+    ExitOnFailure(hr, "Failed to read partitions rollback data");
+    hr = CpiReadRollbackDataList(hRollbackFile, &prdUsersInPartitionRoles);
+    ExitOnFailure(hr, "Failed to read users in partition roles rollback data");
+    hr = CpiReadRollbackDataList(hRollbackFile, &prdPartitionUsers);
+    ExitOnFailure(hr, "Failed to read partition users rollback data");
+    hr = CpiReadRollbackDataList(hRollbackFile, &prdApplications);
+    ExitOnFailure(hr, "Failed to read applications rollback data");
+    hr = CpiReadRollbackDataList(hRollbackFile, &prdApplicationRoles);
+    ExitOnFailure(hr, "Failed to read application roles rollback data");
+    hr = CpiReadRollbackDataList(hRollbackFile, &prdUsersApplicationRoles);
+    ExitOnFailure(hr, "Failed to read users in application roles rollback data");
+    hr = CpiReadRollbackDataList(hRollbackFile, &prdAssemblies);
+    ExitOnFailure(hr, "Failed to read assemblies rollback data");
+    hr = CpiReadRollbackDataList(hRollbackFile, &prdRoleAssignments);
+    ExitOnFailure(hr, "Failed to read role assignments rollback data");
+    hr = CpiReadRollbackDataList(hRollbackFile, &prdSubscriptions);
+    ExitOnFailure(hr, "Failed to read subscription rollback data");
+
+    // read rollback data (commit)
+    hr = CpiReadRollbackDataList(hRollbackFile, &prdAssemblies);
+    ExitOnFailure(hr, "Failed to read assemblies rollback data (commit)");
+    hr = CpiReadRollbackDataList(hRollbackFile, &prdRoleAssignments);
+    ExitOnFailure(hr, "Failed to read role assignments rollback data");
+    hr = CpiReadRollbackDataList(hRollbackFile, &prdSubscriptions);
+    ExitOnFailure(hr, "Failed to read subscription rollback data (commit)");
+
+    ::CloseHandle(hRollbackFile);
+    hRollbackFile = INVALID_HANDLE_VALUE;
+
+    // rollback create subscriptions
+    hr = CpiRollbackConfigureSubscriptions(&pwzData, prdSubscriptions);
+    ExitOnFailure(hr, "Failed to rollback create subscriptions");
+
+    // rollback create role assignments
+    hr = CpiRollbackConfigureRoleAssignments(&pwzData, prdRoleAssignments);
+    ExitOnFailure(hr, "Failed to rollback create role assignments");
+
+    // rollback register assemblies
+    hr = CpiRollbackConfigureAssemblies(&pwzData, prdAssemblies);
+    ExitOnFailure(hr, "Failed to rollback register assemblies");
+
+    // rollback create users in application roles
+    hr = CpiRollbackConfigureUsersInApplicationRoles(&pwzData, prdUsersApplicationRoles);
+    ExitOnFailure(hr, "Failed to rollback create users in application roles");
+
+    // rollback create application roles
+    hr = CpiRollbackConfigureApplicationRoles(&pwzData, prdApplicationRoles);
+    ExitOnFailure(hr, "Failed to rollback create application roles");
+
+    // rollback create applications
+    hr = CpiRollbackConfigureApplications(&pwzData, prdApplications);
+    ExitOnFailure(hr, "Failed to rollback create applications");
+
+    // rollback create partition users
+    hr = CpiRollbackConfigurePartitionUsers(&pwzData, prdPartitionUsers);
+    ExitOnFailure(hr, "Failed to rollback create partition users");
+
+    // rollback create users in partition roles
+    hr = CpiRollbackConfigureUsersInPartitionRoles(&pwzData, prdUsersInPartitionRoles);
+    ExitOnFailure(hr, "Failed to rollback create users in partition roles");
+
+    // rollback create partitions
+    hr = CpiRollbackConfigurePartitions(&pwzData, prdPartitions);
+    ExitOnFailure(hr, "Failed to rollback create partitions");
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseStr(pwzCustomActionData);
+    ReleaseStr(pwzRollbackFileName);
+
+    if (INVALID_HANDLE_VALUE != hRollbackFile)
+        ::CloseHandle(hRollbackFile);
+
+    if (prdPartitions)
+        CpiFreeRollbackDataList(prdPartitions);
+    if (prdUsersInPartitionRoles)
+        CpiFreeRollbackDataList(prdUsersInPartitionRoles);
+    if (prdPartitionUsers)
+        CpiFreeRollbackDataList(prdPartitionUsers);
+    if (prdApplications)
+        CpiFreeRollbackDataList(prdApplications);
+    if (prdApplicationRoles)
+        CpiFreeRollbackDataList(prdApplicationRoles);
+    if (prdUsersApplicationRoles)
+        CpiFreeRollbackDataList(prdUsersApplicationRoles);
+    if (prdAssemblies)
+        CpiFreeRollbackDataList(prdAssemblies);
+    if (prdRoleAssignments)
+        CpiFreeRollbackDataList(prdRoleAssignments);
+    if (prdSubscriptions)
+        CpiFreeRollbackDataList(prdSubscriptions);
+
+    // unitialize
+    CpiExecFinalize();
+
+    if (fInitializedCom)
+        ::CoUninitialize();
+
+    er = SUCCEEDED(hr) ? ERROR_SUCCESS : ERROR_INSTALL_FAILURE;
+    return WcaFinalize(er);
+}
+
+/********************************************************************
+ ComPlusUninstallExecute - CUSTOM ACTION ENTRY POINT
+
+  Input:  deferred CustomActionData - ComPlusUninstallExecute
+********************************************************************/
+extern "C" UINT __stdcall ComPlusUninstallExecute(MSIHANDLE hInstall)
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+
+    LPWSTR pwzCustomActionData = NULL;
+    LPWSTR pwzData = NULL;
+    LPWSTR pwzRollbackFileName = NULL;
+
+    HANDLE hRollbackFile = INVALID_HANDLE_VALUE;
+
+    BOOL fInitializedCom = FALSE;
+
+    // initialize
+    hr = WcaInitialize(hInstall, "ComPlusUninstallExecute");
+    ExitOnFailure(hr, "Failed to initialize ComPlusUninstallExecute");
+
+    hr = ::CoInitialize(NULL);
+    ExitOnFailure(hr, "Failed to initialize COM");
+    fInitializedCom = TRUE;
+
+    CpiExecInitialize();
+
+    // get custom action data
+    hr = WcaGetProperty(L"CustomActionData", &pwzCustomActionData);
+    ExitOnFailure(hr, "Failed to get CustomActionData");
+    pwzData = pwzCustomActionData;
+
+    // open rollback file
+    hr = WcaReadStringFromCaData(&pwzData, &pwzRollbackFileName);
+    ExitOnFailure(hr, "Failed to read rollback file name");
+
+    hRollbackFile = ::CreateFileW(pwzRollbackFileName, GENERIC_WRITE, FILE_SHARE_READ, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_TEMPORARY, NULL);
+    if (INVALID_HANDLE_VALUE == hRollbackFile)
+        ExitOnFailure(hr = HRESULT_FROM_WIN32(::GetLastError()), "Failed to open rollback file, name: %S", pwzRollbackFileName);
+
+    // delete subscriptions
+    hr = CpiConfigureSubscriptions(&pwzData, hRollbackFile);
+    ExitOnFailure(hr, "Failed to delete subscriptions");
+    if (S_FALSE == hr) ExitFunction();
+
+    // delete role assignments
+    hr = CpiConfigureRoleAssignments(&pwzData, hRollbackFile);
+    ExitOnFailure(hr, "Failed to delete role assignments");
+    if (S_FALSE == hr) ExitFunction();
+
+    // unregister assemblies
+    hr = CpiConfigureAssemblies(&pwzData, hRollbackFile);
+    ExitOnFailure(hr, "Failed to unregister assemblies");
+    if (S_FALSE == hr) ExitFunction();
+
+    // remove users in application roles
+    hr = CpiConfigureUsersInApplicationRoles(&pwzData, hRollbackFile);
+    ExitOnFailure(hr, "Failed to delete users in application roles");
+    if (S_FALSE == hr) ExitFunction();
+
+    // remove application roles
+    hr = CpiConfigureApplicationRoles(&pwzData, hRollbackFile);
+    ExitOnFailure(hr, "Failed to delete application roles");
+    if (S_FALSE == hr) ExitFunction();
+
+    // remove applications
+    hr = CpiConfigureApplications(&pwzData, hRollbackFile);
+    ExitOnFailure(hr, "Failed to remove applications");
+    if (S_FALSE == hr) ExitFunction();
+
+    // remove partition users
+    hr = CpiConfigurePartitionUsers(&pwzData, hRollbackFile);
+    ExitOnFailure(hr, "Failed to remove partition users");
+    if (S_FALSE == hr) ExitFunction();
+
+    // remove users in partition roles
+    hr = CpiConfigureUsersInPartitionRoles(&pwzData, hRollbackFile);
+    ExitOnFailure(hr, "Failed to delete users in partition roles");
+    if (S_FALSE == hr) ExitFunction();
+
+    // remove partitions
+    hr = CpiConfigurePartitions(&pwzData, hRollbackFile);
+    ExitOnFailure(hr, "Failed to delete partitions");
+    if (S_FALSE == hr) ExitFunction();
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseStr(pwzCustomActionData);
+    ReleaseStr(pwzRollbackFileName);
+
+    if (INVALID_HANDLE_VALUE != hRollbackFile)
+        ::CloseHandle(hRollbackFile);
+
+    // unitialize
+    CpiExecFinalize();
+
+    if (fInitializedCom)
+        ::CoUninitialize();
+
+    er = SUCCEEDED(hr) ? ERROR_SUCCESS : ERROR_INSTALL_FAILURE;
+    return WcaFinalize(er);
+}
+
+/********************************************************************
+ ComPlusRollbackUninstallExecute - CUSTOM ACTION ENTRY POINT
+
+  Input:  deferred CustomActionData - ComPlusRollbackUninstallExecute
+********************************************************************/
+extern "C" UINT __stdcall ComPlusRollbackUninstallExecute(MSIHANDLE hInstall)
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+
+    LPWSTR pwzCustomActionData = NULL;
+    LPWSTR pwzData = NULL;
+    LPWSTR pwzRollbackFileName = NULL;
+
+    HANDLE hRollbackFile = INVALID_HANDLE_VALUE;
+
+    CPI_ROLLBACK_DATA* prdPartitions = NULL;
+    CPI_ROLLBACK_DATA* prdUsersInPartitionRoles = NULL;
+    CPI_ROLLBACK_DATA* prdPartitionUsers = NULL;
+    CPI_ROLLBACK_DATA* prdApplications = NULL;
+    CPI_ROLLBACK_DATA* prdApplicationRoles = NULL;
+    CPI_ROLLBACK_DATA* prdUsersApplicationRoles = NULL;
+    CPI_ROLLBACK_DATA* prdAssemblies = NULL;
+    CPI_ROLLBACK_DATA* prdRoleAssignments = NULL;
+    CPI_ROLLBACK_DATA* prdSubscriptions = NULL;
+
+    BOOL fInitializedCom = FALSE;
+
+    // initialize
+    hr = WcaInitialize(hInstall, "ComPlusRollbackUninstallExecute");
+    ExitOnFailure(hr, "Failed to initialize ComPlusRollbackUninstallExecute");
+
+    hr = ::CoInitialize(NULL);
+    ExitOnFailure(hr, "Failed to initialize COM");
+    fInitializedCom = TRUE;
+
+    CpiExecInitialize();
+
+    // get custom action data
+    hr = WcaGetProperty(L"CustomActionData", &pwzCustomActionData);
+    ExitOnFailure(hr, "Failed to get CustomActionData");
+    pwzData = pwzCustomActionData;
+
+    // open rollback file
+    hr = WcaReadStringFromCaData(&pwzData, &pwzRollbackFileName);
+    ExitOnFailure(hr, "Failed to read rollback file name");
+
+    hRollbackFile = ::CreateFileW(pwzRollbackFileName, GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_TEMPORARY, NULL);
+    if (INVALID_HANDLE_VALUE == hRollbackFile)
+        ExitOnFailure(hr = HRESULT_FROM_WIN32(::GetLastError()), "Failed to open rollback file, name: %S", pwzRollbackFileName);
+
+    // read rollback data
+    hr = CpiReadRollbackDataList(hRollbackFile, &prdSubscriptions);
+    ExitOnFailure(hr, "Failed to read subscription rollback data");
+    hr = CpiReadRollbackDataList(hRollbackFile, &prdRoleAssignments);
+    ExitOnFailure(hr, "Failed to read role assignments rollback data");
+    hr = CpiReadRollbackDataList(hRollbackFile, &prdAssemblies);
+    ExitOnFailure(hr, "Failed to read assemblies rollback data");
+    hr = CpiReadRollbackDataList(hRollbackFile, &prdUsersApplicationRoles);
+    ExitOnFailure(hr, "Failed to read users in application roles rollback data");
+    hr = CpiReadRollbackDataList(hRollbackFile, &prdApplicationRoles);
+    ExitOnFailure(hr, "Failed to read application roles rollback data");
+    hr = CpiReadRollbackDataList(hRollbackFile, &prdApplications);
+    ExitOnFailure(hr, "Failed to read applications rollback data");
+    hr = CpiReadRollbackDataList(hRollbackFile, &prdPartitionUsers);
+    ExitOnFailure(hr, "Failed to read partition users rollback data");
+    hr = CpiReadRollbackDataList(hRollbackFile, &prdUsersInPartitionRoles);
+    ExitOnFailure(hr, "Failed to read users in partition roles rollback data");
+    hr = CpiReadRollbackDataList(hRollbackFile, &prdPartitions);
+    ExitOnFailure(hr, "Failed to read partitions rollback data");
+
+    ::CloseHandle(hRollbackFile);
+    hRollbackFile = INVALID_HANDLE_VALUE;
+
+    // rollback remove partitions
+    hr = CpiRollbackConfigurePartitions(&pwzData, prdPartitions);
+    ExitOnFailure(hr, "Failed to rollback delete partitions");
+
+    // rollback remove users in partition roles
+    hr = CpiRollbackConfigureUsersInPartitionRoles(&pwzData, prdUsersInPartitionRoles);
+    ExitOnFailure(hr, "Failed to rollback delete users in partition roles");
+
+    // rollback remove partition users
+    hr = CpiRollbackConfigurePartitionUsers(&pwzData, prdPartitionUsers);
+    ExitOnFailure(hr, "Failed to rollback delete partition users");
+
+    // rollback remove applications
+    hr = CpiRollbackConfigureApplications(&pwzData, prdApplications);
+    ExitOnFailure(hr, "Failed to rollback delete applications");
+
+    // rollback remove application roles
+    hr = CpiRollbackConfigureApplicationRoles(&pwzData, prdApplicationRoles);
+    ExitOnFailure(hr, "Failed to rollback delete application roles");
+
+    // rollback remove users in application roles
+    hr = CpiRollbackConfigureUsersInApplicationRoles(&pwzData, prdUsersApplicationRoles);
+    ExitOnFailure(hr, "Failed to rollback delete users in application roles");
+
+    // rollback unregister assemblies
+    hr = CpiRollbackConfigureAssemblies(&pwzData, prdAssemblies);
+    ExitOnFailure(hr, "Failed to rollback unregister assemblies");
+
+    // rollback delete role assignments
+    hr = CpiRollbackConfigureRoleAssignments(&pwzData, prdAssemblies);
+    ExitOnFailure(hr, "Failed to rollback delete role assignments");
+
+    // rollback delete subscriptions
+    hr = CpiRollbackConfigureSubscriptions(&pwzData, prdSubscriptions);
+    ExitOnFailure(hr, "Failed to rollback delete subscriptions");
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseStr(pwzCustomActionData);
+    ReleaseStr(pwzRollbackFileName);
+
+    if (INVALID_HANDLE_VALUE != hRollbackFile)
+        ::CloseHandle(hRollbackFile);
+
+    if (prdPartitions)
+        CpiFreeRollbackDataList(prdPartitions);
+    if (prdUsersInPartitionRoles)
+        CpiFreeRollbackDataList(prdUsersInPartitionRoles);
+    if (prdPartitionUsers)
+        CpiFreeRollbackDataList(prdPartitionUsers);
+    if (prdApplications)
+        CpiFreeRollbackDataList(prdApplications);
+    if (prdApplicationRoles)
+        CpiFreeRollbackDataList(prdApplicationRoles);
+    if (prdUsersApplicationRoles)
+        CpiFreeRollbackDataList(prdUsersApplicationRoles);
+    if (prdAssemblies)
+        CpiFreeRollbackDataList(prdAssemblies);
+    if (prdRoleAssignments)
+        CpiFreeRollbackDataList(prdRoleAssignments);
+    if (prdSubscriptions)
+        CpiFreeRollbackDataList(prdSubscriptions);
+
+    // unitialize
+    CpiExecFinalize();
+
+    if (fInitializedCom)
+        ::CoUninitialize();
+
+    er = SUCCEEDED(hr) ? ERROR_SUCCESS : ERROR_INSTALL_FAILURE;
+    return WcaFinalize(er);
+}
diff --git a/src/ext/ComPlus/ca/cppartexec.cpp b/src/ext/ComPlus/ca/cppartexec.cpp
new file mode 100644
index 00000000..673bdaf9
--- /dev/null
+++ b/src/ext/ComPlus/ca/cppartexec.cpp
@@ -0,0 +1,690 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+#include "precomp.h"
+
+
+// private structs
+
+struct CPI_PARTITION_ATTRIBUTES
+{
+    int iActionType;
+    int iActionCost;
+    LPWSTR pwzKey;
+    LPWSTR pwzID;
+    LPWSTR pwzName;
+    CPI_PROPERTY* pPropList;
+};
+
+struct CPI_PARTITION_USER_ATTRIBUTES
+{
+    int iActionType;
+    int iActionCost;
+    LPWSTR pwzKey;
+    LPWSTR pwzAccount;
+    LPWSTR pwzPartID;
+};
+
+
+// prototypes for private helper functions
+
+static HRESULT ReadPartitionAttributes(
+    LPWSTR* ppwzData,
+    CPI_PARTITION_ATTRIBUTES* pAttrs
+    );
+static void FreePartitionAttributes(
+    CPI_PARTITION_ATTRIBUTES* pAttrs
+    );
+static HRESULT CreatePartition(
+    CPI_PARTITION_ATTRIBUTES* pAttrs
+    );
+static HRESULT RemovePartition(
+    CPI_PARTITION_ATTRIBUTES* pAttrs
+    );
+static HRESULT ReadPartitionUserAttributes(
+    LPWSTR* ppwzData,
+    CPI_PARTITION_USER_ATTRIBUTES* pAttrs
+    );
+static void FreePartitionUserAttributes(
+    CPI_PARTITION_USER_ATTRIBUTES* pAttrs
+    );
+static HRESULT CreatePartitionUser(
+    CPI_PARTITION_USER_ATTRIBUTES* pAttrs
+    );
+static HRESULT RemovePartitionUser(
+    CPI_PARTITION_USER_ATTRIBUTES* pAttrs
+    );
+
+
+// function definitions
+
+HRESULT CpiConfigurePartitions(
+    LPWSTR* ppwzData,
+    HANDLE hRollbackFile
+    )
+{
+    HRESULT hr = S_OK;
+
+    CPI_PARTITION_ATTRIBUTES attrs;
+    ::ZeroMemory(&attrs, sizeof(attrs));
+
+    // read action text
+    hr = CpiActionStartMessage(ppwzData, FALSE);
+    ExitOnFailure(hr, "Failed to send action start message");
+
+    // ger partition count
+    int iCnt = 0;
+    hr = WcaReadIntegerFromCaData(ppwzData, &iCnt);
+    ExitOnFailure(hr, "Failed to read count");
+
+    // write count to rollback file
+    hr = CpiWriteIntegerToRollbackFile(hRollbackFile, iCnt);
+    ExitOnFailure(hr, "Failed to write count to rollback file");
+
+    for (int i = 0; i < iCnt; i++)
+    {
+        // read partition attributes from CustomActionData
+        hr = ReadPartitionAttributes(ppwzData, &attrs);
+        ExitOnFailure(hr, "Failed to read attributes");
+
+        // progress message
+        hr = CpiActionDataMessage(1, attrs.pwzName);
+        ExitOnFailure(hr, "Failed to send progress messages");
+
+        if (S_FALSE == hr)
+            ExitFunction();
+
+        // write key to rollback file
+        hr = CpiWriteKeyToRollbackFile(hRollbackFile, attrs.pwzKey);
+        ExitOnFailure(hr, "Failed to write key to rollback file");
+
+        // action
+        switch (attrs.iActionType)
+        {
+        case atCreate:
+            hr = CreatePartition(&attrs);
+            ExitOnFailure(hr, "Failed to create partition, key: %S", attrs.pwzKey);
+            break;
+        case atRemove:
+            hr = RemovePartition(&attrs);
+            ExitOnFailure(hr, "Failed to remove partition, key: %S", attrs.pwzKey);
+            break;
+        }
+
+        // write completion status to rollback file
+        hr = CpiWriteIntegerToRollbackFile(hRollbackFile, 1);
+        ExitOnFailure(hr, "Failed to write completion status to rollback file");
+
+        // progress
+        hr = WcaProgressMessage(attrs.iActionCost, FALSE);
+        ExitOnFailure(hr, "Failed to update progress");
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    FreePartitionAttributes(&attrs);
+
+    return hr;
+}
+
+HRESULT CpiRollbackConfigurePartitions(
+    LPWSTR* ppwzData,
+    CPI_ROLLBACK_DATA* pRollbackDataList
+    )
+{
+    HRESULT hr = S_OK;
+
+    int iRollbackStatus;
+
+    CPI_PARTITION_ATTRIBUTES attrs;
+    ::ZeroMemory(&attrs, sizeof(attrs));
+
+    // read action text
+    hr = CpiActionStartMessage(ppwzData, NULL == pRollbackDataList);
+    ExitOnFailure(hr, "Failed to send action start message");
+
+    // get count
+    int iCnt = 0;
+    hr = WcaReadIntegerFromCaData(ppwzData, &iCnt);
+    ExitOnFailure(hr, "Failed to read count");
+
+    for (int i = 0; i < iCnt; i++)
+    {
+        // read partition attributes from CustomActionData
+        hr = ReadPartitionAttributes(ppwzData, &attrs);
+        ExitOnFailure(hr, "Failed to read attributes");
+
+        // rollback status
+        hr = CpiFindRollbackStatus(pRollbackDataList, attrs.pwzKey, &iRollbackStatus);
+
+        if (S_FALSE == hr)
+            continue; // not found, nothing to rollback
+
+        // progress message
+        hr = CpiActionDataMessage(1, attrs.pwzName);
+        ExitOnFailure(hr, "Failed to send progress messages");
+
+        if (S_FALSE == hr)
+            ExitFunction();
+
+        // action
+        switch (attrs.iActionType)
+        {
+        case atCreate:
+            hr = CreatePartition(&attrs);
+            if (FAILED(hr))
+                WcaLog(LOGMSG_STANDARD, "Failed to create partition, hr: 0x%x, key: %S", hr, attrs.pwzKey);
+            break;
+        case atRemove:
+            hr = RemovePartition(&attrs);
+            if (FAILED(hr))
+                WcaLog(LOGMSG_STANDARD, "Failed to remove partition, hr: 0x%x, key: %S", hr, attrs.pwzKey);
+            break;
+        }
+
+        // check rollback status
+        if (0 == iRollbackStatus)
+            continue; // operation did not complete, skip progress
+
+        // progress
+        hr = WcaProgressMessage(attrs.iActionCost, FALSE);
+        ExitOnFailure(hr, "Failed to update progress");
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    FreePartitionAttributes(&attrs);
+
+    return hr;
+}
+
+HRESULT CpiConfigurePartitionUsers(
+    LPWSTR* ppwzData,
+    HANDLE hRollbackFile
+    )
+{
+    HRESULT hr = S_OK;
+
+    CPI_PARTITION_USER_ATTRIBUTES attrs;
+    ::ZeroMemory(&attrs, sizeof(attrs));
+
+    // read action text
+    hr = CpiActionStartMessage(ppwzData, FALSE);
+    ExitOnFailure(hr, "Failed to send action start message");
+
+    // ger partition count
+    int iCnt = 0;
+    hr = WcaReadIntegerFromCaData(ppwzData, &iCnt);
+    ExitOnFailure(hr, "Failed to read count");
+
+    // write count to rollback file
+    hr = CpiWriteIntegerToRollbackFile(hRollbackFile, iCnt);
+    ExitOnFailure(hr, "Failed to write count to rollback file");
+
+    for (int i = 0; i < iCnt; i++)
+    {
+        // read partition attributes from CustomActionData
+        hr = ReadPartitionUserAttributes(ppwzData, &attrs);
+        ExitOnFailure(hr, "Failed to read attributes");
+
+        // progress message
+        hr = CpiActionDataMessage(1, attrs.pwzAccount);
+        ExitOnFailure(hr, "Failed to send progress messages");
+
+        if (S_FALSE == hr)
+            ExitFunction();
+
+        // write key to rollback file
+        hr = CpiWriteKeyToRollbackFile(hRollbackFile, attrs.pwzKey);
+        ExitOnFailure(hr, "Failed to write key to rollback file");
+
+        // action
+        switch (attrs.iActionType)
+        {
+        case atCreate:
+            hr = CreatePartitionUser(&attrs);
+            ExitOnFailure(hr, "Failed to create partition user, key: %S", attrs.pwzKey);
+            break;
+        case atRemove:
+            hr = RemovePartitionUser(&attrs);
+            ExitOnFailure(hr, "Failed to remove partition user, key: %S", attrs.pwzKey);
+            break;
+        }
+
+        // write completion status to rollback file
+        hr = CpiWriteIntegerToRollbackFile(hRollbackFile, 1);
+        ExitOnFailure(hr, "Failed to write completion status to rollback file");
+
+        // progress
+        hr = WcaProgressMessage(attrs.iActionCost, FALSE);
+        ExitOnFailure(hr, "Failed to update progress");
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    FreePartitionUserAttributes(&attrs);
+
+    return hr;
+}
+
+HRESULT CpiRollbackConfigurePartitionUsers(
+    LPWSTR* ppwzData,
+    CPI_ROLLBACK_DATA* pRollbackDataList
+    )
+{
+    HRESULT hr = S_OK;
+
+    int iRollbackStatus;
+
+    CPI_PARTITION_USER_ATTRIBUTES attrs;
+    ::ZeroMemory(&attrs, sizeof(attrs));
+
+    // read action text
+    hr = CpiActionStartMessage(ppwzData, NULL == pRollbackDataList);
+    ExitOnFailure(hr, "Failed to send action start message");
+
+    // get count
+    int iCnt = 0;
+    hr = WcaReadIntegerFromCaData(ppwzData, &iCnt);
+    ExitOnFailure(hr, "Failed to read count");
+
+    for (int i = 0; i < iCnt; i++)
+    {
+        // read partition attributes from CustomActionData
+        hr = ReadPartitionUserAttributes(ppwzData, &attrs);
+        ExitOnFailure(hr, "Failed to read attributes");
+
+        // rollback status
+        hr = CpiFindRollbackStatus(pRollbackDataList, attrs.pwzKey, &iRollbackStatus);
+
+        if (S_FALSE == hr)
+            continue; // not found, nothing to rollback
+
+        // progress message
+        hr = CpiActionDataMessage(1, attrs.pwzAccount);
+        ExitOnFailure(hr, "Failed to send progress messages");
+
+        if (S_FALSE == hr)
+            ExitFunction();
+
+        // action
+        switch (attrs.iActionType)
+        {
+        case atCreate:
+            hr = CreatePartitionUser(&attrs);
+            ExitOnFailure(hr, "Failed to create partition user, key: %S", attrs.pwzKey);
+            break;
+        case atRemove:
+            hr = RemovePartitionUser(&attrs);
+            ExitOnFailure(hr, "Failed to remove partition user, key: %S", attrs.pwzKey);
+            break;
+        }
+
+        // check rollback status
+        if (0 == iRollbackStatus)
+            continue; // operation did not complete, skip progress
+
+        // progress
+        hr = WcaProgressMessage(attrs.iActionCost, FALSE);
+        ExitOnFailure(hr, "Failed to update progress");
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    FreePartitionUserAttributes(&attrs);
+
+    return hr;
+}
+
+
+// helper function definitions
+
+static HRESULT ReadPartitionAttributes(
+    LPWSTR* ppwzData,
+    CPI_PARTITION_ATTRIBUTES* pAttrs
+    )
+{
+    HRESULT hr = S_OK;
+
+    hr = WcaReadIntegerFromCaData(ppwzData, &pAttrs->iActionType);
+    ExitOnFailure(hr, "Failed to read action type");
+    hr = WcaReadIntegerFromCaData(ppwzData, &pAttrs->iActionCost);
+    ExitOnFailure(hr, "Failed to read action cost");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzKey);
+    ExitOnFailure(hr, "Failed to read key");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzID);
+    ExitOnFailure(hr, "Failed to read id");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzName);
+    ExitOnFailure(hr, "Failed to read name");
+    hr = CpiReadPropertyList(ppwzData, &pAttrs->pPropList);
+    ExitOnFailure(hr, "Failed to read properties");
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+static void FreePartitionAttributes(
+    CPI_PARTITION_ATTRIBUTES* pAttrs
+    )
+{
+    ReleaseStr(pAttrs->pwzKey);
+    ReleaseStr(pAttrs->pwzID);
+    ReleaseStr(pAttrs->pwzName);
+
+    if (pAttrs->pPropList)
+        CpiFreePropertyList(pAttrs->pPropList);
+}
+
+static HRESULT CreatePartition(
+    CPI_PARTITION_ATTRIBUTES* pAttrs
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICatalogCollection* piPartColl = NULL;
+    ICatalogObject* piPartObj = NULL;
+
+    long lChanges = 0;
+
+    // log
+    WcaLog(LOGMSG_VERBOSE, "Creating partition, key: %S", pAttrs->pwzKey);
+
+    // get partitions collection
+    hr = CpiExecGetPartitionsCollection(&piPartColl);
+    ExitOnFailure(hr, "Failed to get partitions collection");
+
+    // check if partition exists
+    hr = CpiFindCollectionObjectByStringKey(piPartColl, pAttrs->pwzID, &piPartObj);
+    ExitOnFailure(hr, "Failed to find partition");
+
+    if (S_FALSE == hr)
+    {
+        // create partition
+        hr = CpiAddCollectionObject(piPartColl, &piPartObj);
+        ExitOnFailure(hr, "Failed to add partition to collection");
+
+        hr = CpiPutCollectionObjectValue(piPartObj, L"ID", pAttrs->pwzID);
+        ExitOnFailure(hr, "Failed to set partition id property");
+
+        hr = CpiPutCollectionObjectValue(piPartObj, L"Name", pAttrs->pwzName);
+        ExitOnFailure(hr, "Failed to set partition name property");
+    }
+
+    // properties
+    hr = CpiPutCollectionObjectValues(piPartObj, pAttrs->pPropList);
+    ExitOnFailure(hr, "Failed to write properties");
+
+    // save changes
+    hr = piPartColl->SaveChanges(&lChanges);
+    if (COMADMIN_E_OBJECTERRORS == hr)
+        CpiLogCatalogErrorInfo();
+    ExitOnFailure(hr, "Failed to save changes");
+
+    // log
+    WcaLog(LOGMSG_VERBOSE, "%d changes saved to catalog, key: %S", lChanges, pAttrs->pwzKey);
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piPartColl);
+    ReleaseObject(piPartObj);
+
+    return hr;
+}
+
+static HRESULT RemovePartition(
+    CPI_PARTITION_ATTRIBUTES* pAttrs
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICatalogCollection* piPartColl = NULL;
+
+    long lChanges = 0;
+
+    // log
+    WcaLog(LOGMSG_VERBOSE, "Removing partition, key: %S", pAttrs->pwzKey);
+
+    // get partitions collection
+    hr = CpiExecGetPartitionsCollection(&piPartColl);
+    ExitOnFailure(hr, "Failed to get partitions collection");
+
+    // remove
+    hr = CpiRemoveCollectionObject(piPartColl, pAttrs->pwzID, NULL, TRUE);
+    ExitOnFailure(hr, "Failed to remove partition");
+
+    if (S_FALSE == hr)
+    {
+        // partition not found
+        WcaLog(LOGMSG_VERBOSE, "Partition not found, nothing to delete, key: %S", pAttrs->pwzKey);
+        ExitFunction1(hr = S_OK);
+    }
+
+    // save changes
+    hr = piPartColl->SaveChanges(&lChanges);
+    if (COMADMIN_E_OBJECTERRORS == hr)
+        CpiLogCatalogErrorInfo();
+    ExitOnFailure(hr, "Failed to save changes");
+
+    // log
+    WcaLog(LOGMSG_VERBOSE, "%d changes saved to catalog, key: %S", lChanges, pAttrs->pwzKey);
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piPartColl);
+
+    return hr;
+}
+
+static HRESULT ReadPartitionUserAttributes(
+    LPWSTR* ppwzData,
+    CPI_PARTITION_USER_ATTRIBUTES* pAttrs
+    )
+{
+    HRESULT hr = S_OK;
+
+    hr = WcaReadIntegerFromCaData(ppwzData, &pAttrs->iActionType);
+    ExitOnFailure(hr, "Failed to read action type");
+    hr = WcaReadIntegerFromCaData(ppwzData, &pAttrs->iActionCost);
+    ExitOnFailure(hr, "Failed to read action cost");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzKey);
+    ExitOnFailure(hr, "Failed to read key");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzAccount);
+    ExitOnFailure(hr, "Failed to read account name");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzPartID);
+    ExitOnFailure(hr, "Failed to read partition id");
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+static void FreePartitionUserAttributes(
+    CPI_PARTITION_USER_ATTRIBUTES* pAttrs
+    )
+{
+    ReleaseStr(pAttrs->pwzKey);
+    ReleaseStr(pAttrs->pwzAccount);
+    ReleaseStr(pAttrs->pwzPartID);
+}
+
+static HRESULT CreatePartitionUser(
+    CPI_PARTITION_USER_ATTRIBUTES* pAttrs
+    )
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+
+    ICatalogCollection* piUserColl = NULL;
+    ICatalogObject* piUserObj = NULL;
+
+    PSID pSid = NULL;
+    long lChanges = 0;
+
+    // log
+    WcaLog(LOGMSG_VERBOSE, "Setting default partition for user, key: %S", pAttrs->pwzKey);
+
+    // get partition users collection
+    hr = CpiGetPartitionUsersCollection(&piUserColl);
+    ExitOnFailure(hr, "Failed to get partition users collection");
+
+    // get SID for account
+    do {
+        er = ERROR_SUCCESS;
+        hr = CpiAccountNameToSid(pAttrs->pwzAccount, &pSid);
+        if (HRESULT_FROM_WIN32(ERROR_NONE_MAPPED) == hr && !::MsiGetMode(WcaGetInstallHandle(), MSIRUNMODE_ROLLBACK))
+        {
+            WcaLog(LOGMSG_STANDARD, "Failed to lookup account name, hr: 0x%x, account: '%S'", hr, pAttrs->pwzAccount);
+            er = WcaErrorMessage(msierrComPlusFailedLookupNames, hr, INSTALLMESSAGE_ERROR | MB_ABORTRETRYIGNORE, 0);
+            switch (er)
+            {
+            case IDABORT:
+                ExitFunction(); // exit with error code from CpiAccountNameToSid()
+            case IDRETRY:
+                break;
+            case IDIGNORE:
+            default:
+                ExitFunction1(hr = S_OK);
+            }
+        }
+        else
+            ExitOnFailure(hr, "Failed to get SID for account");
+    } while (IDRETRY == er);
+
+    // remove any existing entry
+    hr = CpiRemoveUserCollectionObject(piUserColl, pSid);
+    if (HRESULT_FROM_WIN32(ERROR_NONE_MAPPED) == hr || HRESULT_FROM_WIN32(ERROR_SOME_NOT_MAPPED) == hr)
+    {
+        WcaLog(LOGMSG_STANDARD, "Failed to lookup account names, hr: 0x%x", hr);
+        hr = S_FALSE;
+    }
+    else
+        ExitOnFailure(hr, "Failed to remove user");
+
+    if (S_OK == hr)
+        WcaLog(LOGMSG_VERBOSE, "Existing default partition for user was removed, key: %S", pAttrs->pwzKey);
+
+    // add partition user
+    hr = CpiAddCollectionObject(piUserColl, &piUserObj);
+    ExitOnFailure(hr, "Failed to add partition to collection");
+
+    hr = CpiPutCollectionObjectValue(piUserObj, L"AccountName", pAttrs->pwzAccount);
+    ExitOnFailure(hr, "Failed to set account name property");
+
+    hr = CpiPutCollectionObjectValue(piUserObj, L"DefaultPartitionID", pAttrs->pwzPartID);
+    ExitOnFailure(hr, "Failed to set default partition id property");
+
+    // save changes
+    hr = piUserColl->SaveChanges(&lChanges);
+    if (COMADMIN_E_OBJECTERRORS == hr)
+        CpiLogCatalogErrorInfo();
+    ExitOnFailure(hr, "Failed to save changes");
+
+    // log
+    WcaLog(LOGMSG_VERBOSE, "%d changes saved to catalog, key: %S", lChanges, pAttrs->pwzKey);
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piUserColl);
+    ReleaseObject(piUserObj);
+
+    if (pSid)
+        ::HeapFree(::GetProcessHeap(), 0, pSid);
+
+    return hr;
+}
+
+static HRESULT RemovePartitionUser(
+    CPI_PARTITION_USER_ATTRIBUTES* pAttrs
+    )
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+
+    ICatalogCollection* piUserColl = NULL;
+
+    PSID pSid = NULL;
+    long lChanges = 0;
+
+    // log
+    WcaLog(LOGMSG_VERBOSE, "Removing default partition for user, key: %S", pAttrs->pwzKey);
+
+    // get partition users collection
+    hr = CpiGetPartitionUsersCollection(&piUserColl);
+    ExitOnFailure(hr, "Failed to get partition users collection");
+
+    // get SID for account
+    do {
+        er = ERROR_SUCCESS;
+        hr = CpiAccountNameToSid(pAttrs->pwzAccount, &pSid);
+        if (HRESULT_FROM_WIN32(ERROR_NONE_MAPPED) == hr && !::MsiGetMode(WcaGetInstallHandle(), MSIRUNMODE_ROLLBACK))
+        {
+            WcaLog(LOGMSG_STANDARD, "Failed to lookup account name, hr: 0x%x, account: '%S'", hr, pAttrs->pwzAccount);
+            er = WcaErrorMessage(msierrComPlusFailedLookupNames, hr, INSTALLMESSAGE_ERROR | MB_ABORTRETRYIGNORE, 0);
+            switch (er)
+            {
+            case IDABORT:
+                ExitFunction(); // exit with error code from CpiAccountNameToSid()
+            case IDRETRY:
+                break;
+            case IDIGNORE:
+            default:
+                ExitFunction1(hr = S_OK);
+            }
+        }
+        else
+            ExitOnFailure(hr, "Failed to get SID for account");
+    } while (IDRETRY == er);
+
+    // remove
+    hr = CpiRemoveUserCollectionObject(piUserColl, pSid);
+    if (HRESULT_FROM_WIN32(ERROR_NONE_MAPPED) == hr || HRESULT_FROM_WIN32(ERROR_SOME_NOT_MAPPED) == hr)
+    {
+        WcaLog(LOGMSG_STANDARD, "Failed to lookup account names, hr: 0x%x", hr);
+        hr = S_FALSE;
+    }
+    else
+        ExitOnFailure(hr, "Failed to remove user");
+
+    if (S_FALSE == hr)
+    {
+        // user not found
+        WcaLog(LOGMSG_VERBOSE, "Default partition for user not found, nothing to delete, key: %S", pAttrs->pwzKey);
+        ExitFunction1(hr = S_OK);
+    }
+
+    // save changes
+    hr = piUserColl->SaveChanges(&lChanges);
+    if (COMADMIN_E_OBJECTERRORS == hr)
+        CpiLogCatalogErrorInfo();
+    ExitOnFailure(hr, "Failed to save changes");
+
+    // log
+    WcaLog(LOGMSG_VERBOSE, "%d changes saved to catalog, key: %S", lChanges, pAttrs->pwzKey);
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piUserColl);
+
+    if (pSid)
+        ::HeapFree(::GetProcessHeap(), 0, pSid);
+
+    return hr;
+}
diff --git a/src/ext/ComPlus/ca/cppartexec.h b/src/ext/ComPlus/ca/cppartexec.h
new file mode 100644
index 00000000..132a9f5a
--- /dev/null
+++ b/src/ext/ComPlus/ca/cppartexec.h
@@ -0,0 +1,20 @@
+#pragma once
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+
+HRESULT CpiConfigurePartitions(
+    LPWSTR* ppwzData,
+    HANDLE hRollbackFile
+    );
+HRESULT CpiRollbackConfigurePartitions(
+    LPWSTR* ppwzData,
+    CPI_ROLLBACK_DATA* pRollbackDataList
+    );
+HRESULT CpiConfigurePartitionUsers(
+    LPWSTR* ppwzData,
+    HANDLE hRollbackFile
+    );
+HRESULT CpiRollbackConfigurePartitionUsers(
+    LPWSTR* ppwzData,
+    CPI_ROLLBACK_DATA* pRollbackDataList
+    );
diff --git a/src/ext/ComPlus/ca/cppartroleexec.cpp b/src/ext/ComPlus/ca/cppartroleexec.cpp
new file mode 100644
index 00000000..4a503c79
--- /dev/null
+++ b/src/ext/ComPlus/ca/cppartroleexec.cpp
@@ -0,0 +1,397 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+#include "precomp.h"
+
+
+// private structs
+
+struct CPI_USER_IN_PARTITION_ROLE_ATTRIBUTES
+{
+    int iActionType;
+    int iActionCost;
+    LPWSTR pwzKey;
+    LPWSTR pwzRoleName;
+    LPWSTR pwzAccount;
+    LPWSTR pwzPartID;
+};
+
+
+// prototypes for private helper functions
+
+static HRESULT ReadUserInPartitionRoleAttributes(
+    LPWSTR* ppwzData,
+    CPI_USER_IN_PARTITION_ROLE_ATTRIBUTES* pAttrs
+    );
+static void FreeUserInPartitionRoleAttributes(
+    CPI_USER_IN_PARTITION_ROLE_ATTRIBUTES* pAttrs
+    );
+static HRESULT CreateUserInPartitionRole(
+    CPI_USER_IN_PARTITION_ROLE_ATTRIBUTES* pAttrs
+    );
+static HRESULT RemoveUserInPartitionRole(
+    CPI_USER_IN_PARTITION_ROLE_ATTRIBUTES* pAttrs
+    );
+
+
+// function definitions
+
+HRESULT CpiConfigureUsersInPartitionRoles(
+    LPWSTR* ppwzData,
+    HANDLE hRollbackFile
+    )
+{
+    HRESULT hr = S_OK;
+
+    CPI_USER_IN_PARTITION_ROLE_ATTRIBUTES attrs;
+    ::ZeroMemory(&attrs, sizeof(attrs));
+
+    // read action text
+    hr = CpiActionStartMessage(ppwzData, FALSE);
+    ExitOnFailure(hr, "Failed to send action start message");
+
+    // ger count
+    int iCnt = 0;
+    hr = WcaReadIntegerFromCaData(ppwzData, &iCnt);
+    ExitOnFailure(hr, "Failed to read count");
+
+    // write count to rollback file
+    hr = CpiWriteIntegerToRollbackFile(hRollbackFile, iCnt);
+    ExitOnFailure(hr, "Failed to write count to rollback file");
+
+    for (int i = 0; i < iCnt; i++)
+    {
+        // read attributes from CustomActionData
+        hr = ReadUserInPartitionRoleAttributes(ppwzData, &attrs);
+        ExitOnFailure(hr, "Failed to read attributes");
+
+        // progress message
+        hr = CpiActionDataMessage(1, attrs.pwzRoleName);
+        ExitOnFailure(hr, "Failed to send progress messages");
+
+        if (S_FALSE == hr)
+            ExitFunction();
+
+        // write key to rollback file
+        hr = CpiWriteKeyToRollbackFile(hRollbackFile, attrs.pwzKey);
+        ExitOnFailure(hr, "Failed to write key to rollback file");
+
+        // action
+        switch (attrs.iActionType)
+        {
+        case atCreate:
+            hr = CreateUserInPartitionRole(&attrs);
+            ExitOnFailure(hr, "Failed to add user to partition role, key: %S", attrs.pwzKey);
+            break;
+        case atRemove:
+            hr = RemoveUserInPartitionRole(&attrs);
+            ExitOnFailure(hr, "Failed to remove user from partition role, key: %S", attrs.pwzKey);
+            break;
+        }
+
+        // write completion status to rollback file
+        hr = CpiWriteIntegerToRollbackFile(hRollbackFile, 1);
+        ExitOnFailure(hr, "Failed to write completion status to rollback file");
+
+        // progress
+        hr = WcaProgressMessage(attrs.iActionCost, FALSE);
+        ExitOnFailure(hr, "Failed to update progress");
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    FreeUserInPartitionRoleAttributes(&attrs);
+
+    return hr;
+}
+
+HRESULT CpiRollbackConfigureUsersInPartitionRoles(
+    LPWSTR* ppwzData,
+    CPI_ROLLBACK_DATA* pRollbackDataList
+    )
+{
+    HRESULT hr = S_OK;
+
+    int iRollbackStatus;
+
+    CPI_USER_IN_PARTITION_ROLE_ATTRIBUTES attrs;
+    ::ZeroMemory(&attrs, sizeof(attrs));
+
+    // read action text
+    hr = CpiActionStartMessage(ppwzData, NULL == pRollbackDataList);
+    ExitOnFailure(hr, "Failed to send action start message");
+
+    // get count
+    int iCnt = 0;
+    hr = WcaReadIntegerFromCaData(ppwzData, &iCnt);
+    ExitOnFailure(hr, "Failed to read count");
+
+    for (int i = 0; i < iCnt; i++)
+    {
+        // read attributes from CustomActionData
+        hr = ReadUserInPartitionRoleAttributes(ppwzData, &attrs);
+        ExitOnFailure(hr, "Failed to read attributes");
+
+        // rollback status
+        hr = CpiFindRollbackStatus(pRollbackDataList, attrs.pwzKey, &iRollbackStatus);
+
+        if (S_FALSE == hr)
+            continue; // not found, nothing to rollback
+
+        // progress message
+        hr = CpiActionDataMessage(1, attrs.pwzRoleName);
+        ExitOnFailure(hr, "Failed to send progress messages");
+
+        if (S_FALSE == hr)
+            ExitFunction();
+
+        // action
+        switch (attrs.iActionType)
+        {
+        case atCreate:
+            hr = CreateUserInPartitionRole(&attrs);
+            if (FAILED(hr))
+                WcaLog(LOGMSG_STANDARD, "Failed to add user to partition role, hr: 0x%x, key: %S", hr, attrs.pwzKey);
+            break;
+        case atRemove:
+            hr = RemoveUserInPartitionRole(&attrs);
+            if (FAILED(hr))
+                WcaLog(LOGMSG_STANDARD, "Failed to remove user from partition role, hr: 0x%x, key: %S", hr, attrs.pwzKey);
+            break;
+        }
+
+        // check rollback status
+        if (0 == iRollbackStatus)
+            continue; // operation did not complete, skip progress
+
+        // progress
+        hr = WcaProgressMessage(attrs.iActionCost, FALSE);
+        ExitOnFailure(hr, "Failed to update progress");
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    FreeUserInPartitionRoleAttributes(&attrs);
+
+    return hr;
+}
+
+
+// helper function definitions
+
+static HRESULT ReadUserInPartitionRoleAttributes(
+    LPWSTR* ppwzData,
+    CPI_USER_IN_PARTITION_ROLE_ATTRIBUTES* pAttrs
+    )
+{
+    HRESULT hr = S_OK;
+
+    hr = WcaReadIntegerFromCaData(ppwzData, &pAttrs->iActionType);
+    ExitOnFailure(hr, "Failed to read action type");
+    hr = WcaReadIntegerFromCaData(ppwzData, &pAttrs->iActionCost);
+    ExitOnFailure(hr, "Failed to read action cost");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzKey);
+    ExitOnFailure(hr, "Failed to read key");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzRoleName);
+    ExitOnFailure(hr, "Failed to read role name");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzAccount);
+    ExitOnFailure(hr, "Failed to read account name");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzPartID);
+    ExitOnFailure(hr, "Failed to read partition id");
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+static void FreeUserInPartitionRoleAttributes(
+    CPI_USER_IN_PARTITION_ROLE_ATTRIBUTES* pAttrs
+    )
+{
+    ReleaseStr(pAttrs->pwzKey);
+    ReleaseStr(pAttrs->pwzRoleName);
+    ReleaseStr(pAttrs->pwzAccount);
+    ReleaseStr(pAttrs->pwzPartID);
+}
+
+static HRESULT CreateUserInPartitionRole(
+    CPI_USER_IN_PARTITION_ROLE_ATTRIBUTES* pAttrs
+    )
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+
+    ICatalogCollection* piUsrInRoleColl = NULL;
+    ICatalogObject* piUsrInRoleObj = NULL;
+
+    PSID pSid = NULL;
+    long lChanges = 0;
+
+    // log
+    WcaLog(LOGMSG_VERBOSE, "Adding user to partition role, key: %S", pAttrs->pwzKey);
+
+    // get users in partition role collection
+    hr = CpiGetUsersInPartitionRoleCollection(pAttrs->pwzPartID, pAttrs->pwzRoleName, &piUsrInRoleColl);
+    if (S_FALSE == hr)
+        hr = HRESULT_FROM_WIN32(ERROR_NOT_FOUND);
+    ExitOnFailure(hr, "Failed to get users in partition role collection");
+
+    // get SID for account
+    do {
+        er = ERROR_SUCCESS;
+        hr = CpiAccountNameToSid(pAttrs->pwzAccount, &pSid);
+        if (HRESULT_FROM_WIN32(ERROR_NONE_MAPPED) == hr && !::MsiGetMode(WcaGetInstallHandle(), MSIRUNMODE_ROLLBACK))
+        {
+            WcaLog(LOGMSG_STANDARD, "Failed to lookup account name, hr: 0x%x, account: '%S'", hr, pAttrs->pwzAccount);
+            er = WcaErrorMessage(msierrComPlusFailedLookupNames, hr, INSTALLMESSAGE_ERROR | MB_ABORTRETRYIGNORE, 0);
+            switch (er)
+            {
+            case IDABORT:
+                ExitFunction(); // exit with error code from CpiAccountNameToSid()
+            case IDRETRY:
+                break;
+            case IDIGNORE:
+            default:
+                ExitFunction1(hr = S_OK);
+            }
+        }
+        else
+            ExitOnFailure(hr, "Failed to get SID for account");
+    } while (IDRETRY == er);
+
+    // find any existing entry
+    hr = CpiFindUserCollectionObject(piUsrInRoleColl, pSid, NULL);
+    if (HRESULT_FROM_WIN32(ERROR_NONE_MAPPED) == hr || HRESULT_FROM_WIN32(ERROR_SOME_NOT_MAPPED) == hr)
+        WcaLog(LOGMSG_STANDARD, "Failed to lookup account names, hr: 0x%x", hr);
+    else
+        ExitOnFailure(hr, "Failed to find user in partition role");
+
+    if (S_OK == hr)
+    {
+        WcaLog(LOGMSG_VERBOSE, "User already assigned to partition role, key: %S", pAttrs->pwzKey);
+        ExitFunction(); // exit with hr = S_OK
+    }
+
+    // convert SID back to account name
+    hr = CpiSidToAccountName(pSid, &pAttrs->pwzAccount);
+    ExitOnFailure(hr, "Failed to convert SID to account name");
+
+    // add user
+    hr = CpiAddCollectionObject(piUsrInRoleColl, &piUsrInRoleObj);
+    ExitOnFailure(hr, "Failed to add user in role to collection");
+
+    hr = CpiPutCollectionObjectValue(piUsrInRoleObj, L"User", pAttrs->pwzAccount);
+    ExitOnFailure(hr, "Failed to set role name property");
+
+    // save changes
+    hr = piUsrInRoleColl->SaveChanges(&lChanges);
+    if (COMADMIN_E_OBJECTERRORS == hr)
+        CpiLogCatalogErrorInfo();
+    ExitOnFailure(hr, "Failed to save changes");
+
+    // log
+    WcaLog(LOGMSG_VERBOSE, "%d changes saved to catalog, key: %S", lChanges, pAttrs->pwzKey);
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piUsrInRoleColl);
+    ReleaseObject(piUsrInRoleObj);
+
+    if (pSid)
+        ::HeapFree(::GetProcessHeap(), 0, pSid);
+
+    return hr;
+}
+
+static HRESULT RemoveUserInPartitionRole(
+    CPI_USER_IN_PARTITION_ROLE_ATTRIBUTES* pAttrs
+    )
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+
+    ICatalogCollection* piUsrInRoleColl = NULL;
+
+    PSID pSid = NULL;
+    long lChanges = 0;
+
+    // log
+    WcaLog(LOGMSG_VERBOSE, "Removing user from partition role, key: %S", pAttrs->pwzKey);
+
+    // get users in partition role collection
+    hr = CpiGetUsersInPartitionRoleCollection(pAttrs->pwzPartID, pAttrs->pwzRoleName, &piUsrInRoleColl);
+    ExitOnFailure(hr, "Failed to get users in partition role collection");
+
+    if (S_FALSE == hr)
+    {
+        // users in role collection not found
+        WcaLog(LOGMSG_VERBOSE, "Unable to retrieve users in partition role collection, nothing to delete, key: %S", pAttrs->pwzKey);
+        ExitFunction1(hr = S_OK);
+    }
+
+    // get SID for account
+    do {
+        er = ERROR_SUCCESS;
+        hr = CpiAccountNameToSid(pAttrs->pwzAccount, &pSid);
+        if (HRESULT_FROM_WIN32(ERROR_NONE_MAPPED) == hr && !::MsiGetMode(WcaGetInstallHandle(), MSIRUNMODE_ROLLBACK))
+        {
+            WcaLog(LOGMSG_STANDARD, "Failed to lookup account name, hr: 0x%x, account: '%S'", hr, pAttrs->pwzAccount);
+            er = WcaErrorMessage(msierrComPlusFailedLookupNames, hr, INSTALLMESSAGE_ERROR | MB_ABORTRETRYIGNORE, 0);
+            switch (er)
+            {
+            case IDABORT:
+                ExitFunction(); // exit with error code from CpiAccountNameToSid()
+            case IDRETRY:
+                break;
+            case IDIGNORE:
+            default:
+                ExitFunction1(hr = S_OK);
+            }
+        }
+        else
+            ExitOnFailure(hr, "Failed to get SID for account");
+    } while (IDRETRY == er);
+
+    // remove
+    hr = CpiRemoveUserCollectionObject(piUsrInRoleColl, pSid);
+    if (HRESULT_FROM_WIN32(ERROR_NONE_MAPPED) == hr || HRESULT_FROM_WIN32(ERROR_SOME_NOT_MAPPED) == hr)
+    {
+        WcaLog(LOGMSG_STANDARD, "Failed to lookup account names, hr: 0x%x", hr);
+        hr = S_FALSE;
+    }
+    else
+        ExitOnFailure(hr, "Failed to remove user");
+
+    if (S_FALSE == hr)
+    {
+        // role not found
+        WcaLog(LOGMSG_VERBOSE, "User not found for partition role, nothing to delete, key: %S", pAttrs->pwzKey);
+        ExitFunction1(hr = S_OK);
+    }
+
+    // save changes
+    hr = piUsrInRoleColl->SaveChanges(&lChanges);
+    if (COMADMIN_E_OBJECTERRORS == hr)
+        CpiLogCatalogErrorInfo();
+    ExitOnFailure(hr, "Failed to save changes");
+
+    // log
+    WcaLog(LOGMSG_VERBOSE, "%d changes saved to catalog, key: %S", lChanges, pAttrs->pwzKey);
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piUsrInRoleColl);
+
+    if (pSid)
+        ::HeapFree(::GetProcessHeap(), 0, pSid);
+
+    return hr;
+}
diff --git a/src/ext/ComPlus/ca/cppartroleexec.h b/src/ext/ComPlus/ca/cppartroleexec.h
new file mode 100644
index 00000000..0ec47dad
--- /dev/null
+++ b/src/ext/ComPlus/ca/cppartroleexec.h
@@ -0,0 +1,12 @@
+#pragma once
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+
+HRESULT CpiConfigureUsersInPartitionRoles(
+    LPWSTR* ppwzData,
+    HANDLE hRollbackFile
+    );
+HRESULT CpiRollbackConfigureUsersInPartitionRoles(
+    LPWSTR* ppwzData,
+    CPI_ROLLBACK_DATA* pRollbackDataList
+    );
diff --git a/src/ext/ComPlus/ca/cppartrolesched.cpp b/src/ext/ComPlus/ca/cppartrolesched.cpp
new file mode 100644
index 00000000..a988f8e3
--- /dev/null
+++ b/src/ext/ComPlus/ca/cppartrolesched.cpp
@@ -0,0 +1,421 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+#include "precomp.h"
+
+
+// sql queries
+
+LPCWSTR vcsPartitionRoleQuery =
+    L"SELECT `PartitionRole`, `Partition_`, `Component_`, `Name` FROM `ComPlusPartitionRole`";
+enum ePartitionRoleQuery { prqPartitionRole = 1, prqPartition, prqComponent, prqName };
+
+LPCWSTR vcsUserInPartitionRoleQuery =
+    L"SELECT `UserInPartitionRole`, `PartitionRole_`, `ComPlusUserInPartitionRole`.`Component_`, `Domain`, `Name` FROM `ComPlusUserInPartitionRole`, `User` WHERE `User_` = `User`";
+LPCWSTR vcsGroupInPartitionRoleQuery =
+    L"SELECT `GroupInPartitionRole`, `PartitionRole_`, `ComPlusGroupInPartitionRole`.`Component_`, `Domain`, `Name` FROM `ComPlusGroupInPartitionRole`, `Group` WHERE `Group_` = `Group`";
+enum eTrusteeInPartitionRoleQuery { tiprqUserInPartitionRole = 1, tiprqPartitionRole, tiprqComponent, tiprqDomain, tiprqName };
+
+
+// prototypes for private helper functions
+
+static HRESULT TrusteesInPartitionRolesRead(
+    LPCWSTR pwzQuery,
+    CPI_PARTITION_ROLE_LIST* pPartRoleList,
+    CPI_USER_IN_PARTITION_ROLE_LIST* pUsrInPartRoleList
+    );
+static void FreePartitionRole(
+    CPI_PARTITION_ROLE* pItm
+    );
+static void FreeUserInPartitionRole(
+    CPI_USER_IN_PARTITION_ROLE* pItm
+    );
+static HRESULT AddUserInPartitionRoleToActionData(
+    CPI_USER_IN_PARTITION_ROLE* pItm,
+    int iActionType,
+    int iActionCost,
+    LPWSTR* ppwzActionData
+    );
+
+
+// function definitions
+
+void CpiPartitionRoleListFree(
+    CPI_PARTITION_ROLE_LIST* pList
+    )
+{
+    CPI_PARTITION_ROLE* pItm = pList->pFirst;
+
+    while (pItm)
+    {
+        CPI_PARTITION_ROLE* pDelete = pItm;
+        pItm = pItm->pNext;
+        FreePartitionRole(pDelete);
+    }
+}
+
+HRESULT CpiPartitionRolesRead(
+    CPI_PARTITION_LIST* pPartList,
+    CPI_PARTITION_ROLE_LIST* pPartRoleList
+    )
+{
+    HRESULT hr = S_OK;
+    PMSIHANDLE hView, hRec;
+    CPI_PARTITION_ROLE* pItm = NULL;
+    LPWSTR pwzData = NULL;
+
+    // loop through all application roles
+    hr = WcaOpenExecuteView(vcsPartitionRoleQuery, &hView);
+    ExitOnFailure(hr, "Failed to execute view on ComPlusPartitionRole table");
+
+    while (S_OK == (hr = WcaFetchRecord(hView, &hRec)))
+    {
+        // create entry
+        pItm = (CPI_PARTITION_ROLE*)::HeapAlloc(::GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(CPI_PARTITION_ROLE));
+        if (!pItm)
+            ExitFunction1(hr = E_OUTOFMEMORY);
+
+        // get key
+        hr = WcaGetRecordString(hRec, prqPartitionRole, &pwzData);
+        ExitOnFailure(hr, "Failed to get key");
+        StringCchCopyW(pItm->wzKey, countof(pItm->wzKey), pwzData);
+
+        // get partition
+        hr = WcaGetRecordString(hRec, prqPartition, &pwzData);
+        ExitOnFailure(hr, "Failed to get application");
+
+        hr = CpiPartitionFindByKey(pPartList, pwzData, &pItm->pPartition);
+        if (S_FALSE == hr)
+            hr = HRESULT_FROM_WIN32(ERROR_NOT_FOUND);
+        ExitOnFailure(hr, "Failed to find partition, key: %S", pwzData);
+
+        // get name
+        hr = WcaGetRecordFormattedString(hRec, prqName, &pwzData);
+        ExitOnFailure(hr, "Failed to get name");
+        StringCchCopyW(pItm->wzName, countof(pItm->wzName), pwzData);
+
+        // add entry
+        if (pPartRoleList->pFirst)
+            pItm->pNext = pPartRoleList->pFirst;
+        pPartRoleList->pFirst = pItm;
+        pItm = NULL;
+    }
+
+    if (E_NOMOREITEMS == hr)
+        hr = S_OK;
+
+LExit:
+    // clean up
+    if (pItm)
+        FreePartitionRole(pItm);
+
+    ReleaseStr(pwzData);
+
+    return hr;
+}
+
+HRESULT CpiPartitionRoleFindByKey(
+    CPI_PARTITION_ROLE_LIST* pList,
+    LPCWSTR pwzKey,
+    CPI_PARTITION_ROLE** ppPartRole
+    )
+{
+    for (CPI_PARTITION_ROLE* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        if (0 == lstrcmpW(pItm->wzKey, pwzKey))
+        {
+            *ppPartRole = pItm;
+            return S_OK;
+        }
+    }
+
+    return E_FAIL;
+}
+
+void CpiUserInPartitionRoleListFree(
+    CPI_USER_IN_PARTITION_ROLE_LIST* pList
+    )
+{
+    CPI_USER_IN_PARTITION_ROLE* pItm = pList->pFirst;
+
+    while (pItm)
+    {
+        CPI_USER_IN_PARTITION_ROLE* pDelete = pItm;
+        pItm = pItm->pNext;
+        FreeUserInPartitionRole(pDelete);
+    }
+}
+
+HRESULT CpiUsersInPartitionRolesRead(
+    CPI_PARTITION_ROLE_LIST* pPartRoleList,
+    CPI_USER_IN_PARTITION_ROLE_LIST* pUsrInPartRoleList
+    )
+{
+    HRESULT hr = S_OK;
+
+    // read users in partition roles
+    if (CpiTableExists(cptComPlusUserInPartitionRole))
+    {
+        hr = TrusteesInPartitionRolesRead(vcsUserInPartitionRoleQuery, pPartRoleList, pUsrInPartRoleList);
+        ExitOnFailure(hr, "Failed to read users in partition roles");
+    }
+
+    // read groups in partition roles
+    if (CpiTableExists(cptComPlusGroupInPartitionRole))
+    {
+        hr = TrusteesInPartitionRolesRead(vcsGroupInPartitionRoleQuery, pPartRoleList, pUsrInPartRoleList);
+        ExitOnFailure(hr, "Failed to read groups in partition roles");
+    }
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiUsersInPartitionRolesInstall(
+    CPI_USER_IN_PARTITION_ROLE_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    )
+{
+    HRESULT hr = S_OK;
+
+    int iActionType;
+
+    // add action text
+    hr = CpiAddActionTextToActionData(L"AddUsersToComPlusPartitionRoles", ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action text to custom action data");
+
+    // add count to action data
+    hr = WcaWriteIntegerToCaData(pList->iInstallCount, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add count to custom action data");
+
+    // add roles to custom action data
+    for (CPI_USER_IN_PARTITION_ROLE* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        // roles that are being installed only
+        if (!WcaIsInstalling(pItm->isInstalled, pItm->isAction))
+            continue;
+
+        // action type
+        if (rmRollback == iRunMode)
+        {
+            if (CpiIsInstalled(pItm->isInstalled))
+                iActionType = atNoOp;
+            else
+                iActionType = atRemove;
+        }
+        else
+            iActionType = atCreate;
+
+        // add to action data
+        hr = AddUserInPartitionRoleToActionData(pItm, iActionType, COST_USER_IN_APPLICATION_ROLE_CREATE, ppwzActionData);
+        ExitOnFailure(hr, "Failed to add user in partition role to custom action data, key: %S", pItm->wzKey);
+    }
+
+    // add progress tics
+    if (piProgress)
+        *piProgress += COST_USER_IN_APPLICATION_ROLE_CREATE * pList->iInstallCount;
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiUsersInPartitionRolesUninstall(
+    CPI_USER_IN_PARTITION_ROLE_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    )
+{
+    HRESULT hr = S_OK;
+
+    int iActionType;
+
+    // add action text
+    hr = CpiAddActionTextToActionData(L"RemoveUsersFromComPlusPartRoles", ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action text to custom action data");
+
+    // add count to action data
+    hr = WcaWriteIntegerToCaData(pList->iUninstallCount, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add count to custom action data");
+
+    // add roles to custom action data
+    for (CPI_USER_IN_PARTITION_ROLE* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        // roles that are being uninstalled only
+        if (!WcaIsUninstalling(pItm->isInstalled, pItm->isAction))
+            continue;
+
+        // action type
+        if (rmRollback == iRunMode)
+            iActionType = atCreate;
+        else
+            iActionType = atRemove;
+
+        // add to action data
+        hr = AddUserInPartitionRoleToActionData(pItm, iActionType, COST_USER_IN_APPLICATION_ROLE_DELETE, ppwzActionData);
+        ExitOnFailure(hr, "Failed to add user in partition role to custom action data, key: %S", pItm->wzKey);
+    }
+
+    // add progress tics
+    if (piProgress)
+        *piProgress += COST_USER_IN_APPLICATION_ROLE_DELETE * pList->iUninstallCount;
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+
+// helper function definitions
+
+static HRESULT TrusteesInPartitionRolesRead(
+    LPCWSTR pwzQuery,
+    CPI_PARTITION_ROLE_LIST* pPartRoleList,
+    CPI_USER_IN_PARTITION_ROLE_LIST* pUsrInPartRoleList
+    )
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+
+    PMSIHANDLE hView, hRec;
+
+    CPI_USER_IN_PARTITION_ROLE* pItm = NULL;
+    LPWSTR pwzData = NULL;
+    LPWSTR pwzDomain = NULL;
+    LPWSTR pwzName = NULL;
+    BOOL fMatchingArchitecture = FALSE;
+
+    // loop through all application roles
+    hr = WcaOpenExecuteView(pwzQuery, &hView);
+    ExitOnFailure(hr, "Failed to execute view on table");
+
+    while (S_OK == (hr = WcaFetchRecord(hView, &hRec)))
+    {
+        // get component
+        hr = WcaGetRecordString(hRec, tiprqComponent, &pwzData);
+        ExitOnFailure(hr, "Failed to get component");
+
+        // check if the component is our processor architecture
+        hr = CpiVerifyComponentArchitecure(pwzData, &fMatchingArchitecture);
+        ExitOnFailure(hr, "Failed to get component architecture.");
+
+        if (!fMatchingArchitecture)
+        {
+            continue; // not the same architecture, ignore
+        }
+
+        // create entry
+        pItm = (CPI_USER_IN_PARTITION_ROLE*)::HeapAlloc(::GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(CPI_USER_IN_PARTITION_ROLE));
+        if (!pItm)
+            ExitFunction1(hr = E_OUTOFMEMORY);
+
+        // get component install state
+        er = ::MsiGetComponentStateW(WcaGetInstallHandle(), pwzData, &pItm->isInstalled, &pItm->isAction);
+        ExitOnFailure(hr = HRESULT_FROM_WIN32(er), "Failed to get component state");
+
+        // get key
+        hr = WcaGetRecordString(hRec, tiprqUserInPartitionRole, &pwzData);
+        ExitOnFailure(hr, "Failed to get key");
+        StringCchCopyW(pItm->wzKey, countof(pItm->wzKey), pwzData);
+
+        // get partition role
+        hr = WcaGetRecordString(hRec, tiprqPartitionRole, &pwzData);
+        ExitOnFailure(hr, "Failed to get partition role");
+
+        hr = CpiPartitionRoleFindByKey(pPartRoleList, pwzData, &pItm->pPartitionRole);
+        ExitOnFailure(hr, "Failed to find partition role, key: %S", pwzData);
+
+        // get user domain
+        hr = WcaGetRecordFormattedString(hRec, tiprqDomain, &pwzDomain);
+        ExitOnFailure(hr, "Failed to get domain");
+
+        // get user name
+        hr = WcaGetRecordFormattedString(hRec, tiprqName, &pwzName);
+        ExitOnFailure(hr, "Failed to get name");
+
+        // build account name
+        hr = CpiBuildAccountName(pwzDomain, pwzName, &pItm->pwzAccount);
+        ExitOnFailure(hr, "Failed to build account name");
+
+        // increment counters
+        if (WcaIsInstalling(pItm->isInstalled, pItm->isAction))
+            pUsrInPartRoleList->iInstallCount++;
+        if (WcaIsUninstalling(pItm->isInstalled, pItm->isAction))
+            pUsrInPartRoleList->iUninstallCount++;
+
+        // add entry
+        if (pUsrInPartRoleList->pFirst)
+            pItm->pNext = pUsrInPartRoleList->pFirst;
+        pUsrInPartRoleList->pFirst = pItm;
+        pItm = NULL;
+    }
+
+    if (E_NOMOREITEMS == hr)
+        hr = S_OK;
+
+LExit:
+    // clean up
+    if (pItm)
+        FreeUserInPartitionRole(pItm);
+
+    ReleaseStr(pwzData);
+    ReleaseStr(pwzDomain);
+    ReleaseStr(pwzName);
+
+    return hr;
+}
+
+static void FreePartitionRole(
+    CPI_PARTITION_ROLE* pItm
+    )
+{
+    ::HeapFree(::GetProcessHeap(), 0, pItm);
+}
+
+static void FreeUserInPartitionRole(
+    CPI_USER_IN_PARTITION_ROLE* pItm
+    )
+{
+    ReleaseStr(pItm->pwzAccount);
+
+    ::HeapFree(::GetProcessHeap(), 0, pItm);
+}
+
+static HRESULT AddUserInPartitionRoleToActionData(
+    CPI_USER_IN_PARTITION_ROLE* pItm,
+    int iActionType,
+    int iActionCost,
+    LPWSTR* ppwzActionData
+    )
+{
+    HRESULT hr = S_OK;
+
+    // add action information to custom action data
+    hr = WcaWriteIntegerToCaData(iActionType, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action type to custom action data");
+    hr = WcaWriteIntegerToCaData(iActionCost, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action cost to custom action data");
+
+    // add application role information to custom action data
+    hr = WcaWriteStringToCaData(pItm->wzKey, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add key to custom action data");
+    hr = WcaWriteStringToCaData(pItm->pPartitionRole->wzName, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add role name to custom action data");
+    hr = WcaWriteStringToCaData(pItm->pwzAccount, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add user account to custom action data");
+
+    // add partition information to custom action data
+    hr = WcaWriteStringToCaData(pItm->pPartitionRole->pPartition->wzID, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add partition id to custom action data");
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
diff --git a/src/ext/ComPlus/ca/cppartrolesched.h b/src/ext/ComPlus/ca/cppartrolesched.h
new file mode 100644
index 00000000..ff1275d9
--- /dev/null
+++ b/src/ext/ComPlus/ca/cppartrolesched.h
@@ -0,0 +1,76 @@
+#pragma once
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+
+struct CPI_PARTITION_ROLE
+{
+    WCHAR wzKey[MAX_DARWIN_KEY + 1];
+    WCHAR wzName[MAX_DARWIN_COLUMN + 1];
+
+    CPI_PARTITION* pPartition;
+
+    ICatalogCollection* piUsersColl;
+
+    CPI_PARTITION_ROLE* pNext;
+};
+
+struct CPI_PARTITION_ROLE_LIST
+{
+    CPI_PARTITION_ROLE* pFirst;
+};
+
+struct CPI_USER_IN_PARTITION_ROLE
+{
+    WCHAR wzKey[MAX_DARWIN_KEY + 1];
+    LPWSTR pwzAccount;
+
+    INSTALLSTATE isInstalled, isAction;
+
+    CPI_PARTITION_ROLE* pPartitionRole;
+
+    CPI_USER_IN_PARTITION_ROLE* pNext;
+};
+
+struct CPI_USER_IN_PARTITION_ROLE_LIST
+{
+    CPI_USER_IN_PARTITION_ROLE* pFirst;
+
+    int iInstallCount;
+    int iUninstallCount;
+};
+
+
+// function prototypes
+
+void CpiPartitionRoleListFree(
+    CPI_PARTITION_ROLE_LIST* pList
+    );
+HRESULT CpiPartitionRolesRead(
+    CPI_PARTITION_LIST* pPartList,
+    CPI_PARTITION_ROLE_LIST* pPartRoleList
+    );
+HRESULT CpiPartitionRoleFindByKey(
+    CPI_PARTITION_ROLE_LIST* pList,
+    LPCWSTR pwzKey,
+    CPI_PARTITION_ROLE** ppPartRole
+    );
+
+void CpiUserInPartitionRoleListFree(
+    CPI_USER_IN_PARTITION_ROLE_LIST* pList
+    );
+HRESULT CpiUsersInPartitionRolesRead(
+    CPI_PARTITION_ROLE_LIST* pPartRoleList,
+    CPI_USER_IN_PARTITION_ROLE_LIST* pUsrInPartRoleList
+    );
+HRESULT CpiUsersInPartitionRolesInstall(
+    CPI_USER_IN_PARTITION_ROLE_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    );
+HRESULT CpiUsersInPartitionRolesUninstall(
+    CPI_USER_IN_PARTITION_ROLE_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    );
diff --git a/src/ext/ComPlus/ca/cppartsched.cpp b/src/ext/ComPlus/ca/cppartsched.cpp
new file mode 100644
index 00000000..7cd98791
--- /dev/null
+++ b/src/ext/ComPlus/ca/cppartsched.cpp
@@ -0,0 +1,912 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+#include "precomp.h"
+
+
+// sql queries
+
+LPCWSTR vcsPartitionQuery =
+    L"SELECT `Partition`, `Component_`, `Id`, `Name` FROM `ComPlusPartition`";
+enum ePartitionQuery { pqPartition = 1, pqComponent, pqID, pqName };
+
+LPCWSTR vcsPartitionPropertyQuery =
+    L"SELECT `Name`, `Value` FROM `ComPlusPartitionProperty` WHERE `Partition_` = ?";
+
+LPCWSTR vcsPartitionUserQuery =
+    L"SELECT `PartitionUser`, `Partition_`, `ComPlusPartitionUser`.`Component_`, `Domain`, `Name` FROM `ComPlusPartitionUser`, `User` WHERE `User_` = `User`";
+enum ePartitionUserQuery { puqPartitionUser = 1, puqPartition, puqComponent, puqDomain, puqName };
+
+
+// property definitions
+
+CPI_PROPERTY_DEFINITION pdlPartitionProperties[] =
+{
+    {L"Changeable",  cpptBoolean, 502},
+    {L"Deleteable",  cpptBoolean, 502},
+    {L"Description", cpptString,  502},
+    {NULL,           cpptNone,    0}
+};
+
+
+// prototypes for private helper functions
+
+static void FreePartition(
+    CPI_PARTITION* pItm
+    );
+static void FreePartitionUser(
+    CPI_PARTITION_USER* pItm
+    );
+static HRESULT AddPartitionToActionData(
+    CPI_PARTITION* pItm,
+    int iActionType,
+    int iActionCost,
+    LPWSTR* ppwzActionData
+    );
+static HRESULT AddPartitionUserToActionData(
+    CPI_PARTITION_USER* pItm,
+    int iActionType,
+    int iActionCost,
+    LPWSTR* ppwzActionData
+    );
+
+
+// function definitions
+
+void CpiPartitionListFree(
+    CPI_PARTITION_LIST* pList
+    )
+{
+    CPI_PARTITION* pItm = pList->pFirst;
+
+    while (pItm)
+    {
+        CPI_PARTITION* pDelete = pItm;
+        pItm = pItm->pNext;
+        FreePartition(pDelete);
+    }
+}
+
+HRESULT CpiPartitionsRead(
+    CPI_PARTITION_LIST* pPartList
+    )
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+
+    PMSIHANDLE hView, hRec;
+
+    CPI_PARTITION* pItm = NULL;
+    LPWSTR pwzData = NULL;
+    BOOL fMatchingArchitecture = FALSE;
+
+    // loop through all partitions
+    hr = WcaOpenExecuteView(vcsPartitionQuery, &hView);
+    ExitOnFailure(hr, "Failed to execute view on ComPlusPartition table");
+
+    while (S_OK == (hr = WcaFetchRecord(hView, &hRec)))
+    {
+        // get component
+        hr = WcaGetRecordString(hRec, pqComponent, &pwzData);
+        ExitOnFailure(hr, "Failed to get component");
+
+        // check if the component is our processor architecture
+        if (pwzData && *pwzData)
+        {
+            hr = CpiVerifyComponentArchitecure(pwzData, &fMatchingArchitecture);
+            ExitOnFailure(hr, "Failed to get component architecture.");
+
+            if (!fMatchingArchitecture)
+            {
+                continue; // not the same architecture, ignore
+            }
+        }
+
+        // create entry
+        pItm = (CPI_PARTITION*)::HeapAlloc(::GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(CPI_PARTITION));
+        if (!pItm)
+            ExitFunction1(hr = E_OUTOFMEMORY);
+
+        // get component install state
+        if (pwzData && *pwzData)
+        {
+            pItm->fHasComponent = TRUE;
+
+            er = ::MsiGetComponentStateW(WcaGetInstallHandle(), pwzData, &pItm->isInstalled, &pItm->isAction);
+            ExitOnFailure(hr = HRESULT_FROM_WIN32(er), "Failed to get component state");
+        }
+
+        // get key
+        hr = WcaGetRecordString(hRec, pqPartition, &pwzData);
+        ExitOnFailure(hr, "Failed to get key");
+        StringCchCopyW(pItm->wzKey, countof(pItm->wzKey), pwzData);
+
+        // get id
+        hr = WcaGetRecordFormattedString(hRec, pqID, &pwzData);
+        ExitOnFailure(hr, "Failed to get id");
+
+        if (pwzData && *pwzData)
+        {
+            hr = PcaGuidToRegFormat(pwzData, pItm->wzID, countof(pItm->wzID));
+            ExitOnFailure(hr, "Failed to parse id guid value, key: %S, value: '%S'", pItm->wzKey, pwzData);
+        }
+
+        // get name
+        hr = WcaGetRecordFormattedString(hRec, pqName, &pwzData);
+        ExitOnFailure(hr, "Failed to get name");
+        StringCchCopyW(pItm->wzName, countof(pItm->wzName), pwzData);
+
+        // if partition is a locater, either an id or a name must be provided
+        if (!pItm->fHasComponent && !*pItm->wzID && !*pItm->wzName)
+            ExitOnFailure(hr = E_FAIL, "A partition locater must have either an id or a name associated, key: %S", pItm->wzKey);
+
+        // if partition is not a locater, an name must be provided
+        if (pItm->fHasComponent && !*pItm->wzName)
+            ExitOnFailure(hr = E_FAIL, "A partition must have a name associated, key: %S", pItm->wzKey);
+
+        // get properties
+        if (CpiTableExists(cptComPlusPartitionProperty) && pItm->fHasComponent)
+        {
+            hr = CpiPropertiesRead(vcsPartitionPropertyQuery, pItm->wzKey, pdlPartitionProperties, &pItm->pProperties, &pItm->iPropertyCount);
+            ExitOnFailure(hr, "Failed to get properties");
+        }
+
+        // increment counters
+        if (pItm->fHasComponent && WcaIsInstalling(pItm->isInstalled, pItm->isAction))
+            pPartList->iInstallCount++;
+        if (pItm->fHasComponent && WcaIsUninstalling(pItm->isInstalled, pItm->isAction))
+            pPartList->iUninstallCount++;
+
+        // add entry
+        if (pPartList->pFirst)
+            pItm->pNext = pPartList->pFirst;
+        pPartList->pFirst = pItm;
+        pItm = NULL;
+    }
+
+    if (E_NOMOREITEMS == hr)
+        hr = S_OK;
+
+LExit:
+    // clean up
+    if (pItm)
+        FreePartition(pItm);
+
+    ReleaseStr(pwzData);
+
+    return hr;
+}
+
+HRESULT CpiPartitionsVerifyInstall(
+    CPI_PARTITION_LIST* pList
+    )
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+
+    ICatalogCollection* piPartColl = NULL;
+    ICatalogObject* piPartObj = NULL;
+
+    for (CPI_PARTITION* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        // referenced locaters or partitions that are being installed
+        if (!pItm->fReferencedForInstall && !(pItm->fHasComponent && WcaIsInstalling(pItm->isInstalled, pItm->isAction)))
+            continue;
+
+        // if the partition is referensed and is not a locater, it must be installed
+        if (pItm->fReferencedForInstall && pItm->fHasComponent && !CpiWillBeInstalled(pItm->isInstalled, pItm->isAction))
+            MessageExitOnFailure(hr = E_FAIL, msierrComPlusPartitionDependency, "A partition is used by another entity being installed, but is not installed itself, key: %S", pItm->wzKey);
+
+        // get partitions collection
+        if (!piPartColl)
+        {
+            hr = CpiSchedGetPartitionsCollection(&piPartColl);
+            ExitOnFailure(hr, "Failed to get partitions collection");
+        }
+
+        // partition is supposed to exist
+        if (!pItm->fHasComponent || CpiIsInstalled(pItm->isInstalled))
+        {
+            // get collection object for partition
+            hr = CpiFindCollectionObject(piPartColl, pItm->wzID, *pItm->wzID ? NULL : pItm->wzName, &piPartObj);
+            ExitOnFailure(hr, "Failed to find collection object for partition");
+
+            // if the partition was found
+            if (S_OK == hr)
+            {
+                // if we don't have an id, copy id from object
+                if (!*pItm->wzID)
+                {
+                    hr = CpiGetKeyForObject(piPartObj, pItm->wzID, countof(pItm->wzID));
+                    ExitOnFailure(hr, "Failed to get id");
+                }
+            }
+
+            // if the partition was not found
+            else
+            {
+                // if the application is a locater, this is an error
+                if (!pItm->fHasComponent)
+                    MessageExitOnFailure(hr = HRESULT_FROM_WIN32(ERROR_NOT_FOUND), msierrComPlusPartitionNotFound, "A partition required by this installation was not found, key: %S", pItm->wzKey);
+
+                // create a new id if one is missing
+                if (!*pItm->wzID)
+                {
+                    hr = CpiCreateId(pItm->wzID, countof(pItm->wzID));
+                    ExitOnFailure(hr, "Failed to create id");
+                }
+            }
+        }
+
+        // partition is supposed to be created
+        else
+        {
+            // check for conflicts
+            do {
+                if (*pItm->wzID)
+                {
+                    // find partitions with conflicting id
+                    hr = CpiFindCollectionObject(piPartColl, pItm->wzID, NULL, &piPartObj);
+                    ExitOnFailure(hr, "Failed to find collection object for partition");
+
+                    if (S_FALSE == hr)
+                    {
+                        // find partitions with conflicting name
+                        hr = CpiFindCollectionObject(piPartColl, NULL, pItm->wzName, &piPartObj);
+                        ExitOnFailure(hr, "Failed to find collection object for partition");
+
+                        if (S_OK == hr)
+                            // "A partition with a conflictiong name exists. retry cancel"
+                            er = WcaErrorMessage(msierrComPlusPartitionNameConflict, hr, INSTALLMESSAGE_ERROR | MB_RETRYCANCEL, 0);
+                        else
+                            break; // no conflicting entry found, break loop
+                    }
+                    else
+                        // "A partition with a conflicting id exists. abort retry ignore"
+                        er = WcaErrorMessage(msierrComPlusPartitionIdConflict, hr, INSTALLMESSAGE_ERROR | MB_ABORTRETRYIGNORE, 0);
+                }
+                else
+                {
+                    // find partitions with conflicting name
+                    hr = CpiFindCollectionObject(piPartColl, NULL, pItm->wzName, &piPartObj);
+                    ExitOnFailure(hr, "Failed to find collection object for partition");
+
+                    if (S_OK == hr)
+                        // "A partition with a conflictiong name exists. abort retry ignore"
+                        er = WcaErrorMessage(msierrComPlusPartitionNameConflict, hr, INSTALLMESSAGE_ERROR | MB_ABORTRETRYIGNORE, 0);
+                    else
+                        break; // no conflicting entry found, break loop
+                }
+
+                switch (er)
+                {
+                case IDCANCEL:
+                case IDABORT:
+                    ExitOnFailure(hr = E_FAIL, "A partition with a conflictiong name or id exists, key: %S", pItm->wzKey);
+                    break;
+                case IDRETRY:
+                    break;
+                case IDIGNORE:
+                default:
+                    // if we don't have an id, copy id from object
+                    if (!*pItm->wzID)
+                    {
+                        hr = CpiGetKeyForObject(piPartObj, pItm->wzID, countof(pItm->wzID));
+                        ExitOnFailure(hr, "Failed to get id");
+                    }
+                    hr = S_FALSE; // indicate that this is not a conflict
+                }
+            } while (S_OK == hr); // hr = S_FALSE if we don't have any conflicts
+
+            // create a new id if one is missing
+            if (!*pItm->wzID)
+            {
+                hr = CpiCreateId(pItm->wzID, countof(pItm->wzID));
+                ExitOnFailure(hr, "Failed to create id");
+            }
+        }
+
+        // clean up
+        ReleaseNullObject(piPartObj);
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piPartColl);
+    ReleaseObject(piPartObj);
+
+    return hr;
+}
+
+HRESULT CpiPartitionsVerifyUninstall(
+    CPI_PARTITION_LIST* pList
+    )
+{
+    HRESULT hr = S_OK;
+    ICatalogCollection* piPartColl = NULL;
+    ICatalogObject* piPartObj = NULL;
+
+    for (CPI_PARTITION* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        // referenced locaters or partitions that are being uninstalled
+        if (!pItm->fReferencedForUninstall && !(pItm->fHasComponent && WcaIsUninstalling(pItm->isInstalled, pItm->isAction)))
+            continue;
+
+        // get partitions collection
+        if (!piPartColl)
+        {
+            hr = CpiSchedGetPartitionsCollection(&piPartColl);
+            ExitOnFailure(hr, "Failed to get partitions collection");
+        }
+
+        // get collection object for partition
+        hr = CpiFindCollectionObject(piPartColl, pItm->wzID, *pItm->wzID ? NULL : pItm->wzName, &piPartObj);
+        ExitOnFailure(hr, "Failed to find collection object for partition");
+
+        // if the partition was found
+        if (S_OK == hr)
+        {
+            // if we don't have an id, copy id from object
+            if (!*pItm->wzID)
+            {
+                hr = CpiGetKeyForObject(piPartObj, pItm->wzID, countof(pItm->wzID));
+                ExitOnFailure(hr, "Failed to get id");
+            }
+        }
+
+        // if the partition was not found
+        else
+        {
+            pItm->fObjectNotFound = TRUE;
+            if (pItm->fHasComponent)
+                pList->iUninstallCount--; // elements with the fObjectNotFound flag set will not be scheduled for uninstall
+        }
+
+        // clean up
+        ReleaseNullObject(piPartObj);
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piPartColl);
+    ReleaseObject(piPartObj);
+
+    return hr;
+}
+
+void CpiPartitionAddReferenceInstall(
+    CPI_PARTITION* pItm
+    )
+{
+    pItm->fReferencedForInstall = TRUE;
+}
+
+void CpiPartitionAddReferenceUninstall(
+    CPI_PARTITION* pItm
+    )
+{
+    pItm->fReferencedForUninstall = TRUE;
+}
+
+HRESULT CpiPartitionsInstall(
+    CPI_PARTITION_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    )
+{
+    HRESULT hr = S_OK;
+
+    int iActionType;
+
+    // add action text
+    hr = CpiAddActionTextToActionData(L"CreateComPlusPartitions", ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action text to custom action data");
+
+    // add partition count to action data
+    hr = WcaWriteIntegerToCaData(pList->iInstallCount, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add count to custom action data");
+
+    // add applications to custom action data
+    for (CPI_PARTITION* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        // partitions that are being installed only
+        if (!pItm->fHasComponent || !WcaIsInstalling(pItm->isInstalled, pItm->isAction))
+            continue;
+
+        // action type
+        if (rmRollback == iRunMode)
+        {
+            if (CpiIsInstalled(pItm->isInstalled))
+                iActionType = atNoOp;
+            else
+                iActionType = atRemove;
+        }
+        else
+            iActionType = atCreate;
+
+        // add to action data
+        hr = AddPartitionToActionData(pItm, iActionType, COST_PARTITION_CREATE, ppwzActionData);
+        ExitOnFailure(hr, "Failed to add partition to custom action data, key: %S", pItm->wzKey);
+    }
+
+    // add progress tics
+    if (piProgress)
+        *piProgress += COST_PARTITION_CREATE * pList->iInstallCount;
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiPartitionsUninstall(
+    CPI_PARTITION_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    )
+{
+    HRESULT hr = S_OK;
+
+    int iActionType;
+
+    // add action text
+    hr = CpiAddActionTextToActionData(L"RemoveComPlusPartitions", ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action text to custom action data");
+
+    // add partition count to action data
+    hr = WcaWriteIntegerToCaData(pList->iUninstallCount, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add count to custom action data");
+
+    // add partitions to custom action data
+    for (CPI_PARTITION* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        // partitions that are being uninstalled only
+        if (!pItm->fHasComponent || pItm->fObjectNotFound || !WcaIsUninstalling(pItm->isInstalled, pItm->isAction))
+            continue;
+
+        // action type
+        if (rmRollback == iRunMode)
+            iActionType = atCreate;
+        else
+            iActionType = atRemove;
+
+        // add to action data
+        hr = AddPartitionToActionData(pItm, iActionType, COST_PARTITION_DELETE, ppwzActionData);
+        ExitOnFailure(hr, "Failed to add partition to custom action data, key:", pItm->wzKey);
+    }
+
+    // add progress tics
+    if (piProgress)
+        *piProgress += COST_PARTITION_DELETE * pList->iUninstallCount;
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiPartitionFindByKey(
+    CPI_PARTITION_LIST* pList,
+    LPCWSTR wzKey,
+    CPI_PARTITION** ppItm
+    )
+{
+    for (CPI_PARTITION* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        if (0 == lstrcmpW(pItm->wzKey, wzKey))
+        {
+            *ppItm = pItm;
+            return S_OK;
+        }
+    }
+
+    return S_FALSE;
+}
+
+HRESULT CpiGetApplicationsCollForPartition(
+    CPI_PARTITION* pPart,
+    ICatalogCollection** ppiAppColl
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICatalogCollection* piPartColl = NULL;
+    ICatalogObject* piPartObj = NULL;
+
+    // if a previous attempt to locate the collection object failed
+    if (pPart->fObjectNotFound)
+        ExitFunction1(hr = S_FALSE);
+
+    // get applications collection
+    if (!pPart->piApplicationsColl)
+    {
+        // get partitions collection from catalog
+        hr = CpiSchedGetPartitionsCollection(&piPartColl);
+        ExitOnFailure(hr, "Failed to get partitions collection");
+
+        // find application object
+        hr = CpiFindCollectionObject(piPartColl, pPart->wzID, *pPart->wzID ? NULL : pPart->wzName, &piPartObj);
+        ExitOnFailure(hr, "Failed to find partition object");
+
+        if (S_FALSE == hr)
+        {
+            pPart->fObjectNotFound = TRUE;
+            ExitFunction(); // exit with hr = S_FALSE
+        }
+
+        // get roles collection
+        hr = CpiSchedGetCatalogCollection(piPartColl, piPartObj, L"Applications", &pPart->piApplicationsColl);
+        ExitOnFailure(hr, "Failed to get applications collection");
+    }
+
+    // return value
+    *ppiAppColl = pPart->piApplicationsColl;
+    (*ppiAppColl)->AddRef();
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piPartColl);
+    ReleaseObject(piPartObj);
+
+    return hr;
+}
+
+HRESULT CpiGetRolesCollForPartition(
+    CPI_PARTITION* pPart,
+    ICatalogCollection** ppiRolesColl
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICatalogCollection* piPartColl = NULL;
+    ICatalogObject* piPartObj = NULL;
+
+    // if a previous attempt to locate the collection object failed
+    if (pPart->fObjectNotFound)
+        ExitFunction1(hr = S_FALSE);
+
+    // get applications collection
+    if (!pPart->piRolesColl)
+    {
+        // get partitions collection from catalog
+        hr = CpiSchedGetPartitionsCollection(&piPartColl);
+        ExitOnFailure(hr, "Failed to get partitions collection");
+
+        // find partition object
+        hr = CpiFindCollectionObject(piPartColl, pPart->wzID, *pPart->wzID ? NULL : pPart->wzName, &piPartObj);
+        ExitOnFailure(hr, "Failed to find partition object");
+
+        if (S_FALSE == hr)
+            ExitFunction(); // exit with hr = S_FALSE
+
+        // get roles collection
+        hr = CpiSchedGetCatalogCollection(piPartColl, piPartObj, L"RolesForPartition", &pPart->piRolesColl);
+        ExitOnFailure(hr, "Failed to get roles collection");
+    }
+
+    // return value
+    *ppiRolesColl = pPart->piRolesColl;
+    (*ppiRolesColl)->AddRef();
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piPartColl);
+    ReleaseObject(piPartObj);
+
+    return hr;
+}
+
+void CpiPartitionUserListFree(
+    CPI_PARTITION_USER_LIST* pList
+    )
+{
+    CPI_PARTITION_USER* pItm = pList->pFirst;
+
+    while (pItm)
+    {
+        CPI_PARTITION_USER* pDelete = pItm;
+        pItm = pItm->pNext;
+        FreePartitionUser(pDelete);
+    }
+}
+
+HRESULT CpiPartitionUsersRead(
+    CPI_PARTITION_LIST* pPartList,
+    CPI_PARTITION_USER_LIST* pPartUsrList
+    )
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+
+    PMSIHANDLE hView, hRec;
+
+    CPI_PARTITION_USER* pItm = NULL;
+    LPWSTR pwzData = NULL;
+    LPWSTR pwzDomain = NULL;
+    LPWSTR pwzName = NULL;
+    BOOL fMatchingArchitecture = FALSE;
+
+    // loop through all partition users
+    hr = WcaOpenExecuteView(vcsPartitionUserQuery, &hView);
+    ExitOnFailure(hr, "Failed to execute view on ComPlusPartitionUser table");
+
+    while (S_OK == (hr = WcaFetchRecord(hView, &hRec)))
+    {
+        // get component
+        hr = WcaGetRecordString(hRec, puqComponent, &pwzData);
+        ExitOnFailure(hr, "Failed to get component");
+
+        // check if the component is our processor architecture
+        hr = CpiVerifyComponentArchitecure(pwzData, &fMatchingArchitecture);
+        ExitOnFailure(hr, "Failed to get component architecture.");
+
+        if (!fMatchingArchitecture)
+        {
+            continue; // not the same architecture, ignore
+        }
+
+        // create entry
+        pItm = (CPI_PARTITION_USER*)::HeapAlloc(::GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(CPI_PARTITION_USER));
+        if (!pItm)
+            ExitFunction1(hr = E_OUTOFMEMORY);
+
+        // get component install state
+        er = ::MsiGetComponentStateW(WcaGetInstallHandle(), pwzData, &pItm->isInstalled, &pItm->isAction);
+        ExitOnFailure(hr = HRESULT_FROM_WIN32(er), "Failed to get component state");
+
+        // get key
+        hr = WcaGetRecordString(hRec, puqPartitionUser, &pwzData);
+        ExitOnFailure(hr, "Failed to get key");
+        StringCchCopyW(pItm->wzKey, countof(pItm->wzKey), pwzData);
+
+        // get partition
+        hr = WcaGetRecordString(hRec, puqPartition, &pwzData);
+        ExitOnFailure(hr, "Failed to get partition");
+
+        hr = CpiPartitionFindByKey(pPartList, pwzData, &pItm->pPartition);
+        if (S_FALSE == hr)
+            hr = HRESULT_FROM_WIN32(ERROR_NOT_FOUND);
+        ExitOnFailure(hr, "Failed to find partition, key: %S", pwzData);
+
+        // get user domain
+        hr = WcaGetRecordFormattedString(hRec, puqDomain, &pwzDomain);
+        ExitOnFailure(hr, "Failed to get user domain");
+
+        // get user name
+        hr = WcaGetRecordFormattedString(hRec, puqName, &pwzName);
+        ExitOnFailure(hr, "Failed to get user name");
+
+        // build account name
+        hr = CpiBuildAccountName(pwzDomain, pwzName, &pItm->pwzAccount);
+        ExitOnFailure(hr, "Failed to build account name");
+
+        // set references & increment counters
+        if (WcaIsInstalling(pItm->isInstalled, pItm->isAction))
+        {
+            pItm->pPartition->fReferencedForInstall = TRUE;
+            pPartUsrList->iInstallCount++;
+        }
+        if (WcaIsUninstalling(pItm->isInstalled, pItm->isAction))
+        {
+            pItm->pPartition->fReferencedForUninstall = TRUE;
+            pPartUsrList->iUninstallCount++;
+        }
+
+        // add entry
+        if (pPartUsrList->pFirst)
+            pItm->pNext = pPartUsrList->pFirst;
+        pPartUsrList->pFirst = pItm;
+        pItm = NULL;
+    }
+
+    if (E_NOMOREITEMS == hr)
+        hr = S_OK;
+
+LExit:
+    // clean up
+    if (pItm)
+        FreePartitionUser(pItm);
+
+    ReleaseStr(pwzData);
+    ReleaseStr(pwzDomain);
+    ReleaseStr(pwzName);
+
+    return hr;
+}
+
+HRESULT CpiPartitionUsersInstall(
+    CPI_PARTITION_USER_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    )
+{
+    HRESULT hr = S_OK;
+
+    int iActionType;
+
+    // add action text
+    hr = CpiAddActionTextToActionData(L"AddComPlusPartitionUsers", ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action text to custom action data");
+
+    // add partition count to action data
+    hr = WcaWriteIntegerToCaData(pList->iInstallCount, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add count to custom action data");
+
+    // add applications to custom action data
+    for (CPI_PARTITION_USER* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        // partitions that are being installed only
+        if (!WcaIsInstalling(pItm->isInstalled, pItm->isAction))
+            continue;
+
+        // action type
+        if (rmRollback == iRunMode)
+        {
+            if (CpiIsInstalled(pItm->isInstalled))
+                iActionType = atNoOp;
+            else
+                iActionType = atRemove;
+        }
+        else
+            iActionType = atCreate;
+
+        // add to action data
+        hr = AddPartitionUserToActionData(pItm, iActionType, COST_PARTITION_USER_CREATE, ppwzActionData);
+        ExitOnFailure(hr, "Failed to add partition user to custom action data, key: %S", pItm->wzKey);
+    }
+
+    // add progress tics
+    if (piProgress)
+        *piProgress += COST_PARTITION_USER_CREATE * pList->iInstallCount;
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiPartitionUsersUninstall(
+    CPI_PARTITION_USER_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    )
+{
+    HRESULT hr = S_OK;
+
+    int iActionType;
+
+    // add action text
+    hr = CpiAddActionTextToActionData(L"RemoveComPlusPartitionUsers", ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action text to custom action data");
+
+    // add partition count to action data
+    hr = WcaWriteIntegerToCaData(pList->iUninstallCount, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add count to custom action data");
+
+    // add partitions to custom action data
+    for (CPI_PARTITION_USER* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        // partitions that are being uninstalled only
+        if (!WcaIsUninstalling(pItm->isInstalled, pItm->isAction))
+            continue;
+
+        // action type
+        if (rmRollback == iRunMode)
+            iActionType = atCreate;
+        else
+            iActionType = atRemove;
+
+        // add to action data
+        hr = AddPartitionUserToActionData(pItm, iActionType, COST_PARTITION_USER_DELETE, ppwzActionData);
+        ExitOnFailure(hr, "Failed to add partition user to custom action data, key: %S", pItm->wzKey);
+    }
+
+    // add progress tics
+    if (piProgress)
+        *piProgress += COST_PARTITION_USER_DELETE * pList->iUninstallCount;
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+
+// helper function definitions
+
+static void FreePartition(
+    CPI_PARTITION* pItm
+    )
+{
+    if (pItm->pProperties)
+        CpiPropertiesFreeList(pItm->pProperties);
+
+    ReleaseObject(pItm->piApplicationsColl);
+    ReleaseObject(pItm->piRolesColl);
+
+    ::HeapFree(::GetProcessHeap(), 0, pItm);
+}
+
+static void FreePartitionUser(
+    CPI_PARTITION_USER* pItm
+    )
+{
+    ReleaseStr(pItm->pwzAccount);
+
+    ::HeapFree(::GetProcessHeap(), 0, pItm);
+}
+
+static HRESULT AddPartitionToActionData(
+    CPI_PARTITION* pItm,
+    int iActionType,
+    int iActionCost,
+    LPWSTR* ppwzActionData
+    )
+{
+    HRESULT hr = S_OK;
+
+    // add action information to custom action data
+    hr = WcaWriteIntegerToCaData(iActionType, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action type to custom action data");
+    hr = WcaWriteIntegerToCaData(iActionCost, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action cost to custom action data");
+
+    // add partition information to custom action data
+    hr = WcaWriteStringToCaData(pItm->wzKey, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add partition key to custom action data");
+    hr = WcaWriteStringToCaData(pItm->wzID, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add partition id to custom action data");
+    hr = WcaWriteStringToCaData(pItm->wzName, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add partition name to custom action data");
+
+    // add properties to custom action data
+    hr = CpiAddPropertiesToActionData(atCreate == iActionType ? pItm->iPropertyCount : 0, pItm->pProperties, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add properties to custom action data");
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+static HRESULT AddPartitionUserToActionData(
+    CPI_PARTITION_USER* pItm,
+    int iActionType,
+    int iActionCost,
+    LPWSTR* ppwzActionData
+    )
+{
+    HRESULT hr = S_OK;
+
+    // add action information to custom action data
+    hr = WcaWriteIntegerToCaData(iActionType, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action type to custom action data");
+    hr = WcaWriteIntegerToCaData(iActionCost, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action cost to custom action data");
+
+    // add partition user information to custom action data
+    hr = WcaWriteStringToCaData(pItm->wzKey, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add partition user key to custom action data");
+    hr = WcaWriteStringToCaData(pItm->pwzAccount, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add user account to custom action data");
+
+    // add partition information to custom action data
+    hr = WcaWriteStringToCaData(atCreate == iActionType ? pItm->pPartition->wzID : L"", ppwzActionData);
+    ExitOnFailure(hr, "Failed to add partition id to custom action data");
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
diff --git a/src/ext/ComPlus/ca/cppartsched.h b/src/ext/ComPlus/ca/cppartsched.h
new file mode 100644
index 00000000..55085912
--- /dev/null
+++ b/src/ext/ComPlus/ca/cppartsched.h
@@ -0,0 +1,125 @@
+#pragma once
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+
+struct CPI_PARTITION
+{
+    WCHAR wzKey[MAX_DARWIN_KEY + 1];
+    WCHAR wzID[CPI_MAX_GUID + 1];
+    WCHAR wzName[MAX_DARWIN_COLUMN + 1];
+
+    int iPropertyCount;
+    CPI_PROPERTY* pProperties;
+
+    BOOL fHasComponent;
+    BOOL fReferencedForInstall;
+    BOOL fReferencedForUninstall;
+    BOOL fObjectNotFound;
+
+    INSTALLSTATE isInstalled, isAction;
+
+    ICatalogCollection* piApplicationsColl;
+    ICatalogCollection* piRolesColl;
+
+    CPI_PARTITION* pNext;
+};
+
+struct CPI_PARTITION_LIST
+{
+    CPI_PARTITION* pFirst;
+
+    int iInstallCount;
+    int iUninstallCount;
+};
+
+struct CPI_PARTITION_USER
+{
+    WCHAR wzKey[MAX_DARWIN_KEY + 1];
+    LPWSTR pwzAccount;
+
+    BOOL fNoFind;
+
+    INSTALLSTATE isInstalled, isAction;
+
+    CPI_PARTITION* pPartition;
+
+    CPI_PARTITION_USER* pNext;
+};
+
+struct CPI_PARTITION_USER_LIST
+{
+    CPI_PARTITION_USER* pFirst;
+
+    int iInstallCount;
+    int iUninstallCount;
+};
+
+
+// function prototypes
+
+void CpiPartitionListFree(
+    CPI_PARTITION_LIST* pList
+    );
+HRESULT CpiPartitionsRead(
+    CPI_PARTITION_LIST* pPartList
+    );
+HRESULT CpiPartitionsVerifyInstall(
+    CPI_PARTITION_LIST* pList
+    );
+HRESULT CpiPartitionsVerifyUninstall(
+    CPI_PARTITION_LIST* pList
+    );
+void CpiPartitionAddReferenceInstall(
+    CPI_PARTITION* pItm
+    );
+void CpiPartitionAddReferenceUninstall(
+    CPI_PARTITION* pItm
+    );
+HRESULT CpiPartitionsInstall(
+    CPI_PARTITION_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    );
+HRESULT CpiPartitionsUninstall(
+    CPI_PARTITION_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    );
+HRESULT CpiPartitionFindByKey(
+    CPI_PARTITION_LIST* pList,
+    LPCWSTR wzKey,
+    CPI_PARTITION** ppItm
+    );
+HRESULT CpiGetApplicationsCollForPartition(
+    CPI_PARTITION* pPart,
+    ICatalogCollection** ppiAppColl
+    );
+HRESULT CpiGetPartitionUsersCollection(
+    CPI_PARTITION* pPart,
+    ICatalogCollection** ppiPartUsrColl
+    );
+HRESULT CpiGetRolesCollForPartition(
+    CPI_PARTITION* pPart,
+    ICatalogCollection** ppiRolesColl
+    );
+void CpiPartitionUserListFree(
+    CPI_PARTITION_USER_LIST* pList
+    );
+HRESULT CpiPartitionUsersRead(
+    CPI_PARTITION_LIST* pPartList,
+    CPI_PARTITION_USER_LIST* pPartUsrList
+    );
+HRESULT CpiPartitionUsersInstall(
+    CPI_PARTITION_USER_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    );
+HRESULT CpiPartitionUsersUninstall(
+    CPI_PARTITION_USER_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    );
diff --git a/src/ext/ComPlus/ca/cpsched.cpp b/src/ext/ComPlus/ca/cpsched.cpp
new file mode 100644
index 00000000..ebc547ae
--- /dev/null
+++ b/src/ext/ComPlus/ca/cpsched.cpp
@@ -0,0 +1,566 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+#include "precomp.h"
+
+
+#ifdef _WIN64
+#define CP_COMPLUSROLLBACKINSTALLPREPARE    L"ComPlusRollbackInstallPrepare_64"
+#define CP_COMPLUSINSTALLPREPARE            L"ComPlusInstallPrepare_64"
+#define CP_COMPLUSROLLBACKINSTALLEXECUTE    L"ComPlusRollbackInstallExecute_64"
+#define CP_COMPLUSINSTALLEXECUTE            L"ComPlusInstallExecute_64"
+#define CP_COMPLUSINSTALLEXECUTECOMMIT      L"ComPlusInstallExecuteCommit_64"
+#define CP_COMPLUSINSTALLCOMMIT             L"ComPlusInstallCommit_64"
+#define CP_COMPLUSROLLBACKINSTALLPREPARE    L"ComPlusRollbackInstallPrepare_64"
+#define CP_COMPLUSINSTALLPREPARE            L"ComPlusInstallPrepare_64"
+#define CP_COMPLUSROLLBACKUNINSTALLEXECUTE  L"ComPlusRollbackUninstallExecute_64"
+#define CP_COMPLUSUNINSTALLEXECUTE          L"ComPlusUninstallExecute_64"
+#define CP_COMPLUSINSTALLCOMMIT             L"ComPlusInstallCommit_64"
+#else
+#define CP_COMPLUSROLLBACKINSTALLPREPARE    L"ComPlusRollbackInstallPrepare"
+#define CP_COMPLUSINSTALLPREPARE            L"ComPlusInstallPrepare"
+#define CP_COMPLUSROLLBACKINSTALLEXECUTE    L"ComPlusRollbackInstallExecute"
+#define CP_COMPLUSINSTALLEXECUTE            L"ComPlusInstallExecute"
+#define CP_COMPLUSINSTALLEXECUTECOMMIT      L"ComPlusInstallExecuteCommit"
+#define CP_COMPLUSINSTALLCOMMIT             L"ComPlusInstallCommit"
+#define CP_COMPLUSROLLBACKINSTALLPREPARE    L"ComPlusRollbackInstallPrepare"
+#define CP_COMPLUSINSTALLPREPARE            L"ComPlusInstallPrepare"
+#define CP_COMPLUSROLLBACKUNINSTALLEXECUTE  L"ComPlusRollbackUninstallExecute"
+#define CP_COMPLUSUNINSTALLEXECUTE          L"ComPlusUninstallExecute"
+#define CP_COMPLUSINSTALLCOMMIT             L"ComPlusInstallCommit"
+#endif
+
+/********************************************************************
+ ConfigureComPlusInstall - CUSTOM ACTION ENTRY POINT for installing COM+ components
+
+********************************************************************/
+extern "C" UINT __stdcall ConfigureComPlusInstall(MSIHANDLE hInstall)
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+
+    BOOL fInitializedCom = FALSE;
+
+    ICOMAdminCatalog* piCatalog = NULL;
+
+    CPI_PARTITION_LIST partList;
+    CPI_PARTITION_ROLE_LIST partRoleList;
+    CPI_USER_IN_PARTITION_ROLE_LIST usrInPartRoleList;
+    CPI_PARTITION_USER_LIST partUsrList;
+    CPI_APPLICATION_LIST appList;
+    CPI_APPLICATION_ROLE_LIST appRoleList;
+    CPI_USER_IN_APPLICATION_ROLE_LIST usrInAppRoleList;
+    CPI_ASSEMBLY_LIST asmList;
+    CPI_SUBSCRIPTION_LIST subList;
+
+    LPWSTR pwzRollbackFileName = NULL;
+    LPWSTR pwzActionData = NULL;
+    LPWSTR pwzRollbackActionData = NULL;
+    LPWSTR pwzCommitActionData = NULL;
+
+    int iVersionNT = 0;
+    int iProgress = 0;
+    int iCommitProgress = 0;
+
+    ::ZeroMemory(&partList, sizeof(CPI_PARTITION_LIST));
+    ::ZeroMemory(&partRoleList, sizeof(CPI_PARTITION_ROLE_LIST));
+    ::ZeroMemory(&usrInPartRoleList, sizeof(CPI_USER_IN_PARTITION_ROLE_LIST));
+    ::ZeroMemory(&partUsrList, sizeof(CPI_PARTITION_USER_LIST));
+    ::ZeroMemory(&appList, sizeof(CPI_APPLICATION_LIST));
+    ::ZeroMemory(&appRoleList, sizeof(CPI_APPLICATION_ROLE_LIST));
+    ::ZeroMemory(&usrInAppRoleList, sizeof(CPI_USER_IN_APPLICATION_ROLE_LIST));
+    ::ZeroMemory(&asmList, sizeof(CPI_ASSEMBLY_LIST));
+    ::ZeroMemory(&subList, sizeof(CPI_SUBSCRIPTION_LIST));
+
+    // initialize
+    hr = WcaInitialize(hInstall, "ConfigureComPlusInstall");
+    ExitOnFailure(hr, "Failed to initialize");
+
+    hr = ::CoInitialize(NULL);
+    ExitOnFailure(hr, "Failed to initialize COM");
+    fInitializedCom = TRUE;
+
+    CpiSchedInitialize();
+
+    // check for the prerequsite tables
+    if (!CpiTableExists(cptComPlusPartition) && !CpiTableExists(cptComPlusApplication) && !CpiTableExists(cptComPlusAssembly))
+    {
+        WcaLog(LOGMSG_VERBOSE, "skipping install COM+ CustomAction, no ComPlusPartition, ComPlusApplication or ComPlusAssembly table present");
+        ExitFunction1(hr = S_FALSE);
+    }
+
+    // make sure we can access the COM+ admin catalog
+    do {
+        hr = CpiSchedGetAdminCatalog(&piCatalog);
+        if (FAILED(hr))
+        {
+            WcaLog(LOGMSG_STANDARD, "Failed to get COM+ admin catalog");
+            er = WcaErrorMessage(msierrComPlusCannotConnect, hr, INSTALLMESSAGE_ERROR | MB_ABORTRETRYIGNORE, 0);
+            switch (er)
+            {
+            case IDABORT:
+                ExitFunction(); // exit with hr from CpiGetAdminCatalog() to kick off a rollback
+            case IDRETRY:
+                hr = S_FALSE;
+                break;
+            case IDIGNORE:
+            default:
+                ExitFunction1(hr = S_OK); // pretend everything is okay and bail
+            }
+        }
+    } while (S_FALSE == hr);
+
+    // get NT version
+    hr = WcaGetIntProperty(L"VersionNT", &iVersionNT);
+    ExitOnFailure(hr, "Failed to get VersionNT property");
+
+    // read elements
+    if (502 <= iVersionNT && CpiTableExists(cptComPlusPartition))
+    {
+        hr = CpiPartitionsRead(&partList);
+        MessageExitOnFailure(hr, msierrComPlusPartitionReadFailed, "Failed to read ComPlusPartitions table");
+    }
+
+    if (502 <= iVersionNT && CpiTableExists(cptComPlusPartitionRole))
+    {
+        hr = CpiPartitionRolesRead(&partList, &partRoleList);
+        MessageExitOnFailure(hr, msierrComPlusPartitionRoleReadFailed, "Failed to read ComPlusPartitionRole table");
+    }
+
+    if (502 <= iVersionNT && (CpiTableExists(cptComPlusUserInPartitionRole) || CpiTableExists(cptComPlusGroupInPartitionRole)))
+    {
+        hr = CpiUsersInPartitionRolesRead(&partRoleList, &usrInPartRoleList);
+        MessageExitOnFailure(hr, msierrComPlusUserInPartitionRoleReadFailed, "Failed to read ComPlusUserInPartitionRole table");
+    }
+
+    if (502 <= iVersionNT && CpiTableExists(cptComPlusPartitionUser))
+    {
+        hr = CpiPartitionUsersRead(&partList, &partUsrList);
+        MessageExitOnFailure(hr, msierrComPlusPartitionUserReadFailed, "Failed to read ComPlusPartitionUser table");
+    }
+
+    if (CpiTableExists(cptComPlusApplication))
+    {
+        hr = CpiApplicationsRead(&partList, &appList);
+        MessageExitOnFailure(hr, msierrComPlusApplicationReadFailed, "Failed to read ComPlusApplication table");
+    }
+
+    if (CpiTableExists(cptComPlusApplicationRole))
+    {
+        hr = CpiApplicationRolesRead(&appList, &appRoleList);
+        MessageExitOnFailure(hr, msierrComPlusApplicationRoleReadFailed, "Failed to read ComPlusApplicationRole table");
+    }
+
+    if (CpiTableExists(cptComPlusUserInApplicationRole) || CpiTableExists(cptComPlusGroupInApplicationRole))
+    {
+        hr = CpiUsersInApplicationRolesRead(&appRoleList, &usrInAppRoleList);
+        MessageExitOnFailure(hr, msierrComPlusUserInApplicationRoleReadFailed, "Failed to read ComPlusUserInApplicationRole table");
+    }
+
+    if (CpiTableExists(cptComPlusAssembly))
+    {
+        hr = CpiAssembliesRead(&appList, &appRoleList, &asmList);
+        MessageExitOnFailure(hr, msierrComPlusAssembliesReadFailed, "Failed to read ComPlusAssembly table");
+    }
+
+    if (CpiTableExists(cptComPlusSubscription))
+    {
+        hr = CpiSubscriptionsRead(&asmList, &subList);
+        MessageExitOnFailure(hr, msierrComPlusSubscriptionReadFailed, "Failed to read ComPlusSubscription table");
+    }
+
+    // verify elements
+    hr = CpiPartitionsVerifyInstall(&partList);
+    ExitOnFailure(hr, "Failed to verify partitions");
+
+    hr = CpiApplicationsVerifyInstall(&appList);
+    ExitOnFailure(hr, "Failed to verify applications");
+
+    hr = CpiApplicationRolesVerifyInstall(&appRoleList);
+    ExitOnFailure(hr, "Failed to verify application roles");
+
+    hr = CpiAssembliesVerifyInstall(&asmList);
+    ExitOnFailure(hr, "Failed to verify assemblies");
+
+    if (subList.iInstallCount)
+    {
+        hr = CpiSubscriptionsVerifyInstall(&subList);
+        ExitOnFailure(hr, "Failed to verify subscriptions");
+    }
+
+    // schedule
+    if (partList.iInstallCount || appList.iInstallCount || usrInAppRoleList.iInstallCount ||
+        appRoleList.iInstallCount || asmList.iInstallCount || asmList.iRoleInstallCount || subList.iInstallCount)
+    {
+        // create rollback file name
+        hr = CpiGetTempFileName(&pwzRollbackFileName);
+        ExitOnFailure(hr, "Failed to get rollback file name");
+
+        // schedule rollback prepare custom action
+        hr = WcaDoDeferredAction(CP_COMPLUSROLLBACKINSTALLPREPARE, pwzRollbackFileName, 0);
+        ExitOnFailure(hr, "Failed to schedule ComPlusRollbackInstallPrepare");
+
+        // schedule prepare custom action
+        hr = WcaDoDeferredAction(CP_COMPLUSINSTALLPREPARE, pwzRollbackFileName, 0);
+        ExitOnFailure(hr, "Failed to schedule ComPlusInstallPrepare");
+
+        // schedule rollback custom action
+        hr = WcaWriteStringToCaData(pwzRollbackFileName, &pwzRollbackActionData);
+        ExitOnFailure(hr, "Failed to add rollback file name to rollback custom action data");
+
+        hr = CpiSubscriptionsInstall(&subList, rmRollback, &pwzRollbackActionData, NULL);
+        ExitOnFailure(hr, "Failed to install subscriptions");
+        hr = CpiRoleAssignmentsInstall(&asmList, rmRollback, &pwzRollbackActionData, NULL);
+        ExitOnFailure(hr, "Failed to install assemblies");
+        hr = CpiAssembliesInstall(&asmList, rmRollback, &pwzRollbackActionData, NULL);
+        ExitOnFailure(hr, "Failed to install assemblies");
+        hr = CpiUsersInApplicationRolesInstall(&usrInAppRoleList, rmRollback, &pwzRollbackActionData, NULL);
+        ExitOnFailure(hr, "Failed to install users in application roles");
+        hr = CpiApplicationRolesInstall(&appRoleList, rmRollback, &pwzRollbackActionData, NULL);
+        ExitOnFailure(hr, "Failed to install application roles");
+        hr = CpiApplicationsInstall(&appList, rmRollback, &pwzRollbackActionData, NULL);
+        ExitOnFailure(hr, "Failed to install applications");
+        hr = CpiPartitionUsersInstall(&partUsrList, rmRollback, &pwzRollbackActionData, NULL);
+        ExitOnFailure(hr, "Failed to install partition users");
+        hr = CpiUsersInPartitionRolesInstall(&usrInPartRoleList, rmRollback, &pwzRollbackActionData, NULL);
+        ExitOnFailure(hr, "Failed to install users in partition roles");
+        hr = CpiPartitionsInstall(&partList, rmRollback, &pwzRollbackActionData, NULL);
+        ExitOnFailure(hr, "Failed to install partitions");
+
+        hr = WcaDoDeferredAction(CP_COMPLUSROLLBACKINSTALLEXECUTE, pwzRollbackActionData, 0);
+        ExitOnFailure(hr, "Failed to schedule ComPlusRollbackInstallExecute");
+
+        // schedule install custom action
+        hr = WcaWriteStringToCaData(pwzRollbackFileName, &pwzActionData);
+        ExitOnFailure(hr, "Failed to add rollback file name to custom action data");
+
+        hr = CpiPartitionsInstall(&partList, rmDeferred, &pwzActionData, &iProgress);
+        ExitOnFailure(hr, "Failed to install partitions");
+        hr = CpiUsersInPartitionRolesInstall(&usrInPartRoleList, rmDeferred, &pwzActionData, &iProgress);
+        ExitOnFailure(hr, "Failed to install users in partition roles");
+        hr = CpiPartitionUsersInstall(&partUsrList, rmDeferred, &pwzActionData, &iProgress);
+        ExitOnFailure(hr, "Failed to install partition users");
+        hr = CpiApplicationsInstall(&appList, rmDeferred, &pwzActionData, &iProgress);
+        ExitOnFailure(hr, "Failed to install applications");
+        hr = CpiApplicationRolesInstall(&appRoleList, rmDeferred, &pwzActionData, &iProgress);
+        ExitOnFailure(hr, "Failed to install application roles");
+        hr = CpiUsersInApplicationRolesInstall(&usrInAppRoleList, rmDeferred, &pwzActionData, &iProgress);
+        ExitOnFailure(hr, "Failed to install users in application roles");
+        hr = CpiAssembliesInstall(&asmList, rmDeferred, &pwzActionData, &iProgress);
+        ExitOnFailure(hr, "Failed to install assemblies");
+        hr = CpiRoleAssignmentsInstall(&asmList, rmDeferred, &pwzActionData, &iProgress);
+        ExitOnFailure(hr, "Failed to install assemblies");
+        hr = CpiSubscriptionsInstall(&subList, rmDeferred, &pwzActionData, &iProgress);
+        ExitOnFailure(hr, "Failed to install subscriptions");
+
+        hr = WcaDoDeferredAction(CP_COMPLUSINSTALLEXECUTE, pwzActionData, iProgress);
+        ExitOnFailure(hr, "Failed to schedule ComPlusInstallExecute");
+
+        // schedule install commit custom action
+        hr = WcaWriteStringToCaData(pwzRollbackFileName, &pwzCommitActionData);
+        ExitOnFailure(hr, "Failed to add rollback file name to commit custom action data");
+
+        hr = CpiAssembliesInstall(&asmList, rmCommit, &pwzCommitActionData, &iCommitProgress);
+        ExitOnFailure(hr, "Failed to install assemblies");
+        hr = CpiRoleAssignmentsInstall(&asmList, rmCommit, &pwzCommitActionData, &iCommitProgress);
+        ExitOnFailure(hr, "Failed to install assemblies");
+        hr = CpiSubscriptionsInstall(&subList, rmCommit, &pwzCommitActionData, &iCommitProgress);
+        ExitOnFailure(hr, "Failed to install subscriptions");
+
+        hr = WcaDoDeferredAction(CP_COMPLUSINSTALLEXECUTECOMMIT, pwzCommitActionData, iCommitProgress);
+        ExitOnFailure(hr, "Failed to schedule ComPlusInstallExecuteCommit");
+
+        // schedule commit custom action
+        hr = WcaDoDeferredAction(CP_COMPLUSINSTALLCOMMIT, pwzRollbackFileName, 0);
+        ExitOnFailure(hr, "Failed to schedule ComPlusInstallCommit");
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piCatalog);
+
+    ReleaseStr(pwzRollbackFileName);
+    ReleaseStr(pwzActionData);
+    ReleaseStr(pwzRollbackActionData);
+    ReleaseStr(pwzCommitActionData);
+
+    CpiPartitionListFree(&partList);
+    CpiPartitionRoleListFree(&partRoleList);
+    CpiUserInPartitionRoleListFree(&usrInPartRoleList);
+    CpiPartitionUserListFree(&partUsrList);
+    CpiApplicationListFree(&appList);
+    CpiApplicationRoleListFree(&appRoleList);
+    CpiUserInApplicationRoleListFree(&usrInAppRoleList);
+    CpiAssemblyListFree(&asmList);
+    CpiSubscriptionListFree(&subList);
+
+    // unitialize
+    CpiSchedFinalize();
+
+    if (fInitializedCom)
+        ::CoUninitialize();
+
+    er = SUCCEEDED(hr) ? ERROR_SUCCESS : ERROR_INSTALL_FAILURE;
+    return WcaFinalize(er);
+}
+
+
+/********************************************************************
+ ConfigureComPlusUninstall - CUSTOM ACTION ENTRY POINT for uninstalling COM+ components
+
+********************************************************************/
+extern "C" UINT __stdcall ConfigureComPlusUninstall(MSIHANDLE hInstall)
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+
+    BOOL fInitializedCom = FALSE;
+
+    ICOMAdminCatalog* piCatalog = NULL;
+
+    CPI_PARTITION_LIST partList;
+    CPI_PARTITION_ROLE_LIST partRoleList;
+    CPI_USER_IN_PARTITION_ROLE_LIST usrInPartRoleList;
+    CPI_PARTITION_USER_LIST partUsrList;
+    CPI_APPLICATION_LIST appList;
+    CPI_APPLICATION_ROLE_LIST appRoleList;
+    CPI_USER_IN_APPLICATION_ROLE_LIST usrInAppRoleList;
+    CPI_ASSEMBLY_LIST asmList;
+    CPI_SUBSCRIPTION_LIST subList;
+
+    LPWSTR pwzRollbackFileName = NULL;
+    LPWSTR pwzActionData = NULL;
+    LPWSTR pwzRollbackActionData = NULL;
+
+    int iVersionNT = 0;
+    int iProgress = 0;
+
+    ::ZeroMemory(&partList, sizeof(CPI_PARTITION_LIST));
+    ::ZeroMemory(&partRoleList, sizeof(CPI_PARTITION_ROLE_LIST));
+    ::ZeroMemory(&usrInPartRoleList, sizeof(CPI_USER_IN_PARTITION_ROLE_LIST));
+    ::ZeroMemory(&partUsrList, sizeof(CPI_PARTITION_USER_LIST));
+    ::ZeroMemory(&appList, sizeof(CPI_APPLICATION_LIST));
+    ::ZeroMemory(&appRoleList, sizeof(CPI_APPLICATION_ROLE_LIST));
+    ::ZeroMemory(&usrInAppRoleList, sizeof(CPI_USER_IN_APPLICATION_ROLE_LIST));
+    ::ZeroMemory(&asmList, sizeof(CPI_ASSEMBLY_LIST));
+    ::ZeroMemory(&subList, sizeof(CPI_SUBSCRIPTION_LIST));
+
+    // initialize
+    hr = WcaInitialize(hInstall, "ConfigureComPlusUninstall");
+    ExitOnFailure(hr, "Failed to initialize");
+
+    hr = ::CoInitialize(NULL);
+    ExitOnFailure(hr, "Failed to initialize COM");
+    fInitializedCom = TRUE;
+
+    CpiSchedInitialize();
+
+    // check for the prerequsite tables
+    if (!CpiTableExists(cptComPlusPartition) && !CpiTableExists(cptComPlusApplication) && !CpiTableExists(cptComPlusAssembly))
+    {
+        WcaLog(LOGMSG_VERBOSE, "skipping uninstall COM+ CustomAction, no ComPlusPartition, ComPlusApplication or ComPlusAssembly table present");
+        ExitFunction1(hr = S_FALSE);
+    }
+
+    // make sure we can access the COM+ admin catalog
+    do {
+        hr = CpiSchedGetAdminCatalog(&piCatalog);
+        if (FAILED(hr))
+        {
+            WcaLog(LOGMSG_STANDARD, "Failed to get COM+ admin catalog");
+            er = WcaErrorMessage(msierrComPlusCannotConnect, hr, INSTALLMESSAGE_ERROR | MB_ABORTRETRYIGNORE, 0);
+            switch (er)
+            {
+            case IDABORT:
+                ExitFunction(); // exit with hr from CpiGetAdminCatalog() to kick off a rollback
+            case IDRETRY:
+                hr = S_FALSE;
+                break;
+            case IDIGNORE:
+            default:
+                ExitFunction1(hr = S_OK); // pretend everything is okay and bail
+            }
+        }
+    } while (S_FALSE == hr);
+
+    // get NT version
+    hr = WcaGetIntProperty(L"VersionNT", &iVersionNT);
+    ExitOnFailure(hr, "Failed to get VersionNT property");
+
+    // read elements
+    if (502 <= iVersionNT && CpiTableExists(cptComPlusPartition))
+    {
+        hr = CpiPartitionsRead(&partList);
+        MessageExitOnFailure(hr, msierrComPlusPartitionReadFailed, "Failed to read ComPlusPartitions table");
+    }
+
+    if (502 <= iVersionNT && CpiTableExists(cptComPlusPartitionRole))
+    {
+        hr = CpiPartitionRolesRead(&partList, &partRoleList);
+        MessageExitOnFailure(hr, msierrComPlusPartitionRoleReadFailed, "Failed to read ComPlusPartitionRole table");
+    }
+
+    if (502 <= iVersionNT && (CpiTableExists(cptComPlusUserInPartitionRole) || CpiTableExists(cptComPlusGroupInPartitionRole)))
+    {
+        hr = CpiUsersInPartitionRolesRead(&partRoleList, &usrInPartRoleList);
+        MessageExitOnFailure(hr, msierrComPlusUserInPartitionRoleReadFailed, "Failed to read ComPlusUserInPartitionRole table");
+    }
+
+    if (502 <= iVersionNT && CpiTableExists(cptComPlusPartitionUser))
+    {
+        hr = CpiPartitionUsersRead(&partList, &partUsrList);
+        MessageExitOnFailure(hr, msierrComPlusPartitionUserReadFailed, "Failed to read ComPlusPartitionUser table");
+    }
+
+    if (CpiTableExists(cptComPlusApplication))
+    {
+        hr = CpiApplicationsRead(&partList, &appList);
+        MessageExitOnFailure(hr, msierrComPlusApplicationReadFailed, "Failed to read ComPlusApplication table");
+    }
+
+    if (CpiTableExists(cptComPlusApplicationRole))
+    {
+        hr = CpiApplicationRolesRead(&appList, &appRoleList);
+        MessageExitOnFailure(hr, msierrComPlusApplicationRoleReadFailed, "Failed to read ComPlusApplicationRole table");
+    }
+
+    if (CpiTableExists(cptComPlusUserInApplicationRole) || CpiTableExists(cptComPlusGroupInApplicationRole))
+    {
+        hr = CpiUsersInApplicationRolesRead(&appRoleList, &usrInAppRoleList);
+        MessageExitOnFailure(hr, msierrComPlusUserInApplicationRoleReadFailed, "Failed to read ComPlusUserInApplicationRole table");
+    }
+
+    if (CpiTableExists(cptComPlusAssembly))
+    {
+        hr = CpiAssembliesRead(&appList, &appRoleList, &asmList);
+        MessageExitOnFailure(hr, msierrComPlusAssembliesReadFailed, "Failed to read ComPlusAssembly table");
+    }
+
+    if (CpiTableExists(cptComPlusSubscription))
+    {
+        hr = CpiSubscriptionsRead(&asmList, &subList);
+        MessageExitOnFailure(hr, msierrComPlusSubscriptionReadFailed, "Failed to read ComPlusSubscription table");
+    }
+
+    // verify elements
+    hr = CpiPartitionsVerifyUninstall(&partList);
+    ExitOnFailure(hr, "Failed to verify partitions");
+
+    hr = CpiApplicationsVerifyUninstall(&appList);
+    ExitOnFailure(hr, "Failed to verify applications");
+
+    hr = CpiApplicationRolesVerifyUninstall(&appRoleList);
+    ExitOnFailure(hr, "Failed to verify application roles");
+
+    hr = CpiAssembliesVerifyUninstall(&asmList);
+    ExitOnFailure(hr, "Failed to verify assemblies");
+
+    if (subList.iUninstallCount)
+    {
+        hr = CpiSubscriptionsVerifyUninstall(&subList);
+        ExitOnFailure(hr, "Failed to verify subscriptions");
+    }
+
+    // schedule
+    if (partList.iUninstallCount || appList.iUninstallCount || appRoleList.iUninstallCount ||
+        usrInAppRoleList.iUninstallCount || asmList.iUninstallCount || asmList.iRoleUninstallCount || subList.iUninstallCount)
+    {
+        // create rollback file name
+        hr = CpiGetTempFileName(&pwzRollbackFileName);
+        ExitOnFailure(hr, "Failed to get rollback file name");
+
+        // schedule rollback prepare custom action
+        hr = WcaDoDeferredAction(CP_COMPLUSROLLBACKINSTALLPREPARE, pwzRollbackFileName, 0);
+        ExitOnFailure(hr, "Failed to schedule ComPlusRollbackInstallPrepare");
+
+        // schedule prepare custom action
+        hr = WcaDoDeferredAction(CP_COMPLUSINSTALLPREPARE, pwzRollbackFileName, 0);
+        ExitOnFailure(hr, "Failed to schedule ComPlusInstallPrepare");
+
+        // schedule rollback custom action
+        hr = WcaWriteStringToCaData(pwzRollbackFileName, &pwzRollbackActionData);
+        ExitOnFailure(hr, "Failed to add rollback file name to rollback custom action data");
+
+        hr = CpiPartitionsUninstall(&partList, rmRollback, &pwzRollbackActionData, NULL);
+        ExitOnFailure(hr, "Failed to uninstall partitions");
+        hr = CpiUsersInPartitionRolesUninstall(&usrInPartRoleList, rmRollback, &pwzRollbackActionData, NULL);
+        ExitOnFailure(hr, "Failed to uninstall users in partition roles");
+        hr = CpiPartitionUsersUninstall(&partUsrList, rmRollback, &pwzRollbackActionData, NULL);
+        ExitOnFailure(hr, "Failed to uninstall partition users");
+        hr = CpiApplicationsUninstall(&appList, rmRollback, &pwzRollbackActionData, NULL);
+        ExitOnFailure(hr, "Failed to uninstall applications");
+        hr = CpiApplicationRolesUninstall(&appRoleList, rmRollback, &pwzRollbackActionData, NULL);
+        ExitOnFailure(hr, "Failed to uninstall application roles");
+        hr = CpiUsersInApplicationRolesUninstall(&usrInAppRoleList, rmRollback, &pwzRollbackActionData, NULL);
+        ExitOnFailure(hr, "Failed to uninstall users in application roles");
+        hr = CpiAssembliesUninstall(&asmList, rmRollback, &pwzRollbackActionData, NULL);
+        ExitOnFailure(hr, "Failed to uninstall assemblies");
+        hr = CpiRoleAssignmentsUninstall(&asmList, rmRollback, &pwzRollbackActionData, NULL);
+        ExitOnFailure(hr, "Failed to uninstall assemblies");
+        hr = CpiSubscriptionsUninstall(&subList, rmRollback, &pwzRollbackActionData, NULL);
+        ExitOnFailure(hr, "Failed to uninstall subscriptions");
+
+        hr = WcaDoDeferredAction(CP_COMPLUSROLLBACKUNINSTALLEXECUTE, pwzRollbackActionData, 0);
+        ExitOnFailure(hr, "Failed to schedule ComPlusRollbackUninstallExecute");
+
+        // schedule install custom action
+        hr = WcaWriteStringToCaData(pwzRollbackFileName, &pwzActionData);
+        ExitOnFailure(hr, "Failed to add rollback file name to custom action data");
+
+        hr = CpiSubscriptionsUninstall(&subList, rmDeferred, &pwzActionData, &iProgress);
+        ExitOnFailure(hr, "Failed to uninstall subscriptions");
+        hr = CpiRoleAssignmentsUninstall(&asmList, rmDeferred, &pwzActionData, &iProgress);
+        ExitOnFailure(hr, "Failed to uninstall assemblies");
+        hr = CpiAssembliesUninstall(&asmList, rmDeferred, &pwzActionData, &iProgress);
+        ExitOnFailure(hr, "Failed to uninstall assemblies");
+        hr = CpiUsersInApplicationRolesUninstall(&usrInAppRoleList, rmDeferred, &pwzActionData, &iProgress);
+        ExitOnFailure(hr, "Failed to uninstall users in application roles");
+        hr = CpiApplicationRolesUninstall(&appRoleList, rmDeferred, &pwzActionData, &iProgress);
+        ExitOnFailure(hr, "Failed to uninstall application roles");
+        hr = CpiApplicationsUninstall(&appList, rmDeferred, &pwzActionData, &iProgress);
+        ExitOnFailure(hr, "Failed to uninstall applications");
+        hr = CpiPartitionUsersUninstall(&partUsrList, rmDeferred, &pwzActionData, &iProgress);
+        ExitOnFailure(hr, "Failed to uninstall partition users");
+        hr = CpiUsersInPartitionRolesUninstall(&usrInPartRoleList, rmDeferred, &pwzActionData, &iProgress);
+        ExitOnFailure(hr, "Failed to uninstall users in partition roles");
+        hr = CpiPartitionsUninstall(&partList, rmDeferred, &pwzActionData, &iProgress);
+        ExitOnFailure(hr, "Failed to uninstall partitions");
+
+        hr = WcaDoDeferredAction(CP_COMPLUSUNINSTALLEXECUTE, pwzActionData, iProgress);
+        ExitOnFailure(hr, "Failed to schedule ComPlusUninstallExecute");
+
+        // schedule commit custom action
+        hr = WcaDoDeferredAction(CP_COMPLUSINSTALLCOMMIT, pwzRollbackFileName, 0);
+        ExitOnFailure(hr, "Failed to schedule ComPlusInstallCommit");
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piCatalog);
+
+    ReleaseStr(pwzRollbackFileName);
+    ReleaseStr(pwzActionData);
+    ReleaseStr(pwzRollbackActionData);
+
+    CpiPartitionListFree(&partList);
+    CpiPartitionRoleListFree(&partRoleList);
+    CpiUserInPartitionRoleListFree(&usrInPartRoleList);
+    CpiPartitionUserListFree(&partUsrList);
+    CpiApplicationListFree(&appList);
+    CpiApplicationRoleListFree(&appRoleList);
+    CpiUserInApplicationRoleListFree(&usrInAppRoleList);
+    CpiAssemblyListFree(&asmList);
+    CpiSubscriptionListFree(&subList);
+
+    // unitialize
+    CpiSchedFinalize();
+
+    if (fInitializedCom)
+        ::CoUninitialize();
+
+    er = SUCCEEDED(hr) ? ERROR_SUCCESS : ERROR_INSTALL_FAILURE;
+    return WcaFinalize(er);
+}
diff --git a/src/ext/ComPlus/ca/cpsubsexec.cpp b/src/ext/ComPlus/ca/cpsubsexec.cpp
new file mode 100644
index 00000000..bbcf9853
--- /dev/null
+++ b/src/ext/ComPlus/ca/cpsubsexec.cpp
@@ -0,0 +1,411 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+#include "precomp.h"
+
+
+// private structs
+
+struct CPI_SUBSCRIPTION_ATTRIBUTES
+{
+    int iActionType;
+    int iActionCost;
+    LPWSTR pwzKey;
+    LPWSTR pwzID;
+    LPWSTR pwzName;
+    LPWSTR pwzEventCLSID;
+    LPWSTR pwzPublisherID;
+    LPWSTR pwzCompCLSID;
+    LPWSTR pwzAppID;
+    LPWSTR pwzPartID;
+    CPI_PROPERTY* pPropList;
+};
+
+
+// prototypes for private helper functions
+
+static HRESULT ReadSubscriptionAttributes(
+    LPWSTR* ppwzData,
+    CPI_SUBSCRIPTION_ATTRIBUTES* pAttrs
+    );
+static void FreeSubscriptionAttributes(
+    CPI_SUBSCRIPTION_ATTRIBUTES* pAttrs
+    );
+static HRESULT CreateSubscription(
+    CPI_SUBSCRIPTION_ATTRIBUTES* pAttrs
+    );
+static HRESULT RemoveSubscription(
+    CPI_SUBSCRIPTION_ATTRIBUTES* pAttrs
+    );
+
+
+// function definitions
+
+HRESULT CpiConfigureSubscriptions(
+    LPWSTR* ppwzData,
+    HANDLE hRollbackFile
+    )
+{
+    HRESULT hr = S_OK;
+
+    CPI_SUBSCRIPTION_ATTRIBUTES attrs;
+    ::ZeroMemory(&attrs, sizeof(attrs));
+
+    // read action text
+    hr = CpiActionStartMessage(ppwzData, FALSE);
+    ExitOnFailure(hr, "Failed to send action start message");
+
+    // ger count
+    int iCnt = 0;
+    hr = WcaReadIntegerFromCaData(ppwzData, &iCnt);
+    ExitOnFailure(hr, "Failed to read count");
+
+    // write count to rollback file
+    hr = CpiWriteIntegerToRollbackFile(hRollbackFile, iCnt);
+    ExitOnFailure(hr, "Failed to write count to rollback file");
+
+    for (int i = 0; i < iCnt; i++)
+    {
+        // read attributes from CustomActionData
+        hr = ReadSubscriptionAttributes(ppwzData, &attrs);
+        ExitOnFailure(hr, "Failed to read attributes");
+
+        // progress message
+        hr = CpiActionDataMessage(1, attrs.pwzName);
+        ExitOnFailure(hr, "Failed to send progress messages");
+
+        if (S_FALSE == hr)
+            ExitFunction();
+
+        // write key to rollback file
+        hr = CpiWriteKeyToRollbackFile(hRollbackFile, attrs.pwzKey);
+        ExitOnFailure(hr, "Failed to write key to rollback file");
+
+        // action
+        switch (attrs.iActionType)
+        {
+        case atCreate:
+            hr = CreateSubscription(&attrs);
+            ExitOnFailure(hr, "Failed to create subscription, key: %S", attrs.pwzKey);
+            break;
+        case atRemove:
+            hr = RemoveSubscription(&attrs);
+            ExitOnFailure(hr, "Failed to remove subscription, key: %S", attrs.pwzKey);
+            break;
+        }
+
+        // write completion status to rollback file
+        hr = CpiWriteIntegerToRollbackFile(hRollbackFile, 1);
+        ExitOnFailure(hr, "Failed to write completion status to rollback file");
+
+        // progress
+        hr = WcaProgressMessage(attrs.iActionCost, FALSE);
+        ExitOnFailure(hr, "Failed to update progress");
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    FreeSubscriptionAttributes(&attrs);
+
+    return hr;
+}
+
+HRESULT CpiRollbackConfigureSubscriptions(
+    LPWSTR* ppwzData,
+    CPI_ROLLBACK_DATA* pRollbackDataList
+    )
+{
+    HRESULT hr = S_OK;
+
+    int iRollbackStatus;
+
+    CPI_SUBSCRIPTION_ATTRIBUTES attrs;
+    ::ZeroMemory(&attrs, sizeof(attrs));
+
+    // read action text
+    hr = CpiActionStartMessage(ppwzData, NULL == pRollbackDataList);
+    ExitOnFailure(hr, "Failed to send action start message");
+
+    // ger count
+    int iCnt = 0;
+    hr = WcaReadIntegerFromCaData(ppwzData, &iCnt);
+    ExitOnFailure(hr, "Failed to read count");
+
+    for (int i = 0; i < iCnt; i++)
+    {
+        // read attributes from CustomActionData
+        hr = ReadSubscriptionAttributes(ppwzData, &attrs);
+        ExitOnFailure(hr, "Failed to read attributes");
+
+        // rollback status
+        hr = CpiFindRollbackStatus(pRollbackDataList, attrs.pwzKey, &iRollbackStatus);
+
+        if (S_FALSE == hr)
+            continue; // not found, nothing to rollback
+
+        // progress message
+        hr = CpiActionDataMessage(1, attrs.pwzName);
+        ExitOnFailure(hr, "Failed to send progress messages");
+
+        if (S_FALSE == hr)
+            ExitFunction();
+
+        // action
+        switch (attrs.iActionType)
+        {
+        case atCreate:
+            hr = CreateSubscription(&attrs);
+            if (FAILED(hr))
+                WcaLog(LOGMSG_STANDARD, "Failed to create subscription, hr: 0x%x, key: %S", hr, attrs.pwzKey);
+            break;
+        case atRemove:
+            hr = RemoveSubscription(&attrs);
+            if (FAILED(hr))
+                WcaLog(LOGMSG_STANDARD, "Failed to remove subscription, hr: 0x%x, key: %S", hr, attrs.pwzKey);
+            break;
+        }
+
+        // check rollback status
+        if (0 == iRollbackStatus)
+            continue; // operation did not complete, skip progress
+
+        // progress
+        hr = WcaProgressMessage(attrs.iActionCost, FALSE);
+        ExitOnFailure(hr, "Failed to update progress");
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    FreeSubscriptionAttributes(&attrs);
+
+    return hr;
+}
+
+
+// helper function definitions
+
+static HRESULT ReadSubscriptionAttributes(
+    LPWSTR* ppwzData,
+    CPI_SUBSCRIPTION_ATTRIBUTES* pAttrs
+    )
+{
+    HRESULT hr = S_OK;
+
+    hr = WcaReadIntegerFromCaData(ppwzData, &pAttrs->iActionType);
+    ExitOnFailure(hr, "Failed to read action type");
+    hr = WcaReadIntegerFromCaData(ppwzData, &pAttrs->iActionCost);
+    ExitOnFailure(hr, "Failed to read action cost");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzKey);
+    ExitOnFailure(hr, "Failed to read key");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzID);
+    ExitOnFailure(hr, "Failed to read id");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzName);
+    ExitOnFailure(hr, "Failed to read name");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzEventCLSID);
+    ExitOnFailure(hr, "Failed to read event clsid");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzPublisherID);
+    ExitOnFailure(hr, "Failed to read publisher id");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzCompCLSID);
+    ExitOnFailure(hr, "Failed to read component clsid");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzAppID);
+    ExitOnFailure(hr, "Failed to read application id");
+    hr = WcaReadStringFromCaData(ppwzData, &pAttrs->pwzPartID);
+    ExitOnFailure(hr, "Failed to read partition id");
+
+    hr = CpiReadPropertyList(ppwzData, &pAttrs->pPropList);
+    ExitOnFailure(hr, "Failed to read properties");
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+static void FreeSubscriptionAttributes(
+    CPI_SUBSCRIPTION_ATTRIBUTES* pAttrs
+    )
+{
+    ReleaseStr(pAttrs->pwzKey);
+    ReleaseStr(pAttrs->pwzID);
+    ReleaseStr(pAttrs->pwzName);
+    ReleaseStr(pAttrs->pwzEventCLSID);
+    ReleaseStr(pAttrs->pwzPublisherID);
+    ReleaseStr(pAttrs->pwzCompCLSID);
+    ReleaseStr(pAttrs->pwzAppID);
+    ReleaseStr(pAttrs->pwzPartID);
+
+    if (pAttrs->pPropList)
+        CpiFreePropertyList(pAttrs->pPropList);
+}
+
+static HRESULT CreateSubscription(
+    CPI_SUBSCRIPTION_ATTRIBUTES* pAttrs
+    )
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+
+    ICatalogCollection* piSubsColl = NULL;
+    ICatalogObject* piSubsObj = NULL;
+
+    PSID pSid = NULL;
+    long lChanges = 0;
+
+    // log
+    WcaLog(LOGMSG_VERBOSE, "Creating subscription, key: %S", pAttrs->pwzKey);
+
+    // get subscriptions collection
+    hr = CpiGetSubscriptionsCollection(pAttrs->pwzPartID, pAttrs->pwzAppID, pAttrs->pwzCompCLSID, &piSubsColl);
+    if (S_FALSE == hr)
+        hr = HRESULT_FROM_WIN32(ERROR_NOT_FOUND);
+    ExitOnFailure(hr, "Failed to get subscriptions collection");
+
+    // check if subscription exists
+    hr = CpiFindCollectionObjectByStringKey(piSubsColl, pAttrs->pwzID, &piSubsObj);
+    ExitOnFailure(hr, "Failed to find subscription");
+
+    if (S_FALSE == hr)
+    {
+        // create subscription
+        hr = CpiAddCollectionObject(piSubsColl, &piSubsObj);
+        ExitOnFailure(hr, "Failed to add subscription to collection");
+
+        hr = CpiPutCollectionObjectValue(piSubsObj, L"ID", pAttrs->pwzID);
+        ExitOnFailure(hr, "Failed to set subscription id property");
+
+        hr = CpiPutCollectionObjectValue(piSubsObj, L"Name", pAttrs->pwzName);
+        ExitOnFailure(hr, "Failed to set subscription name property");
+
+        if (pAttrs->pwzEventCLSID && *pAttrs->pwzEventCLSID)
+        {
+            hr = CpiPutCollectionObjectValue(piSubsObj, L"EventCLSID", pAttrs->pwzEventCLSID);
+            ExitOnFailure(hr, "Failed to set role event clsid property");
+        }
+
+        if (pAttrs->pwzPublisherID && *pAttrs->pwzPublisherID)
+        {
+            hr = CpiPutCollectionObjectValue(piSubsObj, L"PublisherID", pAttrs->pwzPublisherID);
+            ExitOnFailure(hr, "Failed to set role publisher id property");
+        }
+    }
+
+    // properties
+    for (CPI_PROPERTY* pItm = pAttrs->pPropList; pItm; pItm = pItm->pNext)
+    {
+        // UserName property
+        if (0 == lstrcmpW(pItm->wzName, L"UserName"))
+        {
+            // get SID for account
+            do {
+                er = ERROR_SUCCESS;
+                hr = CpiAccountNameToSid(pItm->pwzValue, &pSid);
+                if (!::MsiGetMode(WcaGetInstallHandle(), MSIRUNMODE_ROLLBACK))
+                {
+                    if (HRESULT_FROM_WIN32(ERROR_NONE_MAPPED) == hr)
+                    {
+                        WcaLog(LOGMSG_STANDARD, "Failed to lookup account name, hr: 0x%x, account: '%S'", hr, pItm->pwzValue);
+                        er = WcaErrorMessage(msierrComPlusFailedLookupNames, hr, INSTALLMESSAGE_ERROR | MB_ABORTRETRYIGNORE, 0);
+                        switch (er)
+                        {
+                        case IDABORT:
+                            ExitFunction(); // exit with error code from CpiAccountNameToSid()
+                        case IDRETRY:
+                            break;
+                        case IDIGNORE:
+                        default:
+                            hr = S_FALSE;
+                        }
+                    }
+                    else
+                        ExitOnFailure(hr, "Failed to get SID for account, account: '%S'", pItm->pwzValue);
+                }
+                else if (FAILED(hr))
+                {
+                    WcaLog(LOGMSG_STANDARD, "Failed to get SID for account, hr: 0x%x, account: '%S'", hr, pItm->pwzValue);
+                    hr = S_FALSE;
+                }
+            } while (IDRETRY == er);
+
+            if (S_FALSE == hr)
+                continue;
+
+            // convert SID back to account name
+            hr = CpiSidToAccountName(pSid, &pItm->pwzValue);
+            ExitOnFailure(hr, "Failed to convert SID to account name");
+        }
+
+        // set property
+        hr = CpiPutCollectionObjectValue(piSubsObj, pItm->wzName, pItm->pwzValue);
+        ExitOnFailure(hr, "Failed to set object property value, name: %S", pItm->wzName);
+    }
+
+    // save changes
+    hr = piSubsColl->SaveChanges(&lChanges);
+    if (COMADMIN_E_OBJECTERRORS == hr)
+        CpiLogCatalogErrorInfo();
+    ExitOnFailure(hr, "Failed to save changes");
+
+    // log
+    WcaLog(LOGMSG_VERBOSE, "%d changes saved to catalog, key: %S", lChanges, pAttrs->pwzKey);
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piSubsColl);
+    ReleaseObject(piSubsObj);
+
+    if (pSid)
+        ::HeapFree(::GetProcessHeap(), 0, pSid);
+
+    return hr;
+}
+
+static HRESULT RemoveSubscription(
+    CPI_SUBSCRIPTION_ATTRIBUTES* pAttrs
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICatalogCollection* piSubsColl = NULL;
+
+    long lChanges = 0;
+
+    // log
+    WcaLog(LOGMSG_VERBOSE, "Removing subscription, key: %S", pAttrs->pwzKey);
+
+    // get subscriptions collection
+    hr = CpiGetSubscriptionsCollection(pAttrs->pwzPartID, pAttrs->pwzAppID, pAttrs->pwzCompCLSID, &piSubsColl);
+    ExitOnFailure(hr, "Failed to get subscriptions collection");
+
+    if (S_FALSE == hr)
+    {
+        // subscription not found
+        WcaLog(LOGMSG_VERBOSE, "Unable to retrieve subscriptions collection, nothing to delete, key: %S", pAttrs->pwzKey);
+        ExitFunction1(hr = S_OK);
+    }
+
+    // remove
+    hr = CpiRemoveCollectionObject(piSubsColl, pAttrs->pwzID, NULL, FALSE);
+    ExitOnFailure(hr, "Failed to remove subscriptions");
+
+    // save changes
+    hr = piSubsColl->SaveChanges(&lChanges);
+    if (COMADMIN_E_OBJECTERRORS == hr)
+        CpiLogCatalogErrorInfo();
+    ExitOnFailure(hr, "Failed to save changes");
+
+    // log
+    WcaLog(LOGMSG_VERBOSE, "%d changes saved to catalog, key: %S", lChanges, pAttrs->pwzKey);
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piSubsColl);
+
+    return hr;
+}
diff --git a/src/ext/ComPlus/ca/cpsubsexec.h b/src/ext/ComPlus/ca/cpsubsexec.h
new file mode 100644
index 00000000..2f4d3c75
--- /dev/null
+++ b/src/ext/ComPlus/ca/cpsubsexec.h
@@ -0,0 +1,12 @@
+#pragma once
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+
+HRESULT CpiConfigureSubscriptions(
+    LPWSTR* ppwzData,
+    HANDLE hRollbackFile
+    );
+HRESULT CpiRollbackConfigureSubscriptions(
+    LPWSTR* ppwzData,
+    CPI_ROLLBACK_DATA* pRollbackDataList
+    );
diff --git a/src/ext/ComPlus/ca/cpsubssched.cpp b/src/ext/ComPlus/ca/cpsubssched.cpp
new file mode 100644
index 00000000..df15fd03
--- /dev/null
+++ b/src/ext/ComPlus/ca/cpsubssched.cpp
@@ -0,0 +1,606 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+#include "precomp.h"
+
+
+// sql queries
+
+LPCWSTR vcsSubscriptionQuery =
+    L"SELECT `Subscription`, `ComPlusComponent_`, `Component_`, `Id`, `Name`, `EventCLSID`, `PublisherID` FROM `ComPlusSubscription`";
+enum eSubscriptionQuery { sqSubscription = 1, sqComPlusComponent, sqComponent, sqID, sqName, sqEventCLSID, sqPublisherID };
+
+LPCWSTR vcsSubscriptionPropertyQuery =
+    L"SELECT `Name`, `Value` FROM `ComPlusSubscriptionProperty` WHERE `Subscription_` = ?";
+
+
+// property definitions
+
+CPI_PROPERTY_DEFINITION pdlSubscriptionProperties[] =
+{
+    {L"Description",           cpptString,  500},
+    {L"Enabled",               cpptBoolean, 500},
+    {L"EventClassPartitionID", cpptString,  502},
+    {L"FilterCriteria",        cpptString,  500},
+    {L"InterfaceID",           cpptString,  500},
+    {L"MachineName",           cpptString,  500},
+    {L"MethodName",            cpptString,  500},
+    {L"PerUser",               cpptBoolean, 500},
+    {L"Queued",                cpptBoolean, 500},
+    {L"SubscriberMoniker",     cpptString,  500},
+    {L"UserName",              cpptUser,    500},
+    {NULL,                     cpptNone,    0}
+};
+
+
+// prototypes for private helper functions
+
+static void FreeSubscription(
+    CPI_SUBSCRIPTION* pItm
+    );
+static HRESULT FindObjectForSubscription(
+    CPI_SUBSCRIPTION* pItm,
+    BOOL fFindId,
+    BOOL fFindName,
+    ICatalogObject** ppiSubsObj
+    );
+static HRESULT AddSubscriptionToActionData(
+    CPI_SUBSCRIPTION* pItm,
+    int iActionType,
+    int iActionCost,
+    LPWSTR* ppwzActionData
+    );
+static HRESULT ComponentFindByKey(
+    CPI_ASSEMBLY_LIST* pAsmList,
+    LPCWSTR pwzKey,
+    CPI_ASSEMBLY** ppAsmItm,
+    CPISCHED_COMPONENT** ppCompItm
+    );
+
+
+// function definitions
+
+void CpiSubscriptionListFree(
+    CPI_SUBSCRIPTION_LIST* pList
+    )
+{
+    CPI_SUBSCRIPTION* pItm = pList->pFirst;
+
+    while (pItm)
+    {
+        CPI_SUBSCRIPTION* pDelete = pItm;
+        pItm = pItm->pNext;
+        FreeSubscription(pDelete);
+    }
+}
+
+HRESULT CpiSubscriptionsRead(
+    CPI_ASSEMBLY_LIST* pAsmList,
+    CPI_SUBSCRIPTION_LIST* pSubList
+    )
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+
+    PMSIHANDLE hView, hRec;
+
+    CPI_SUBSCRIPTION* pItm = NULL;
+    LPWSTR pwzData = NULL;
+    BOOL fMatchingArchitecture = FALSE;
+
+    // loop through all applications
+    hr = WcaOpenExecuteView(vcsSubscriptionQuery, &hView);
+    ExitOnFailure(hr, "Failed to execute view on ComPlusSubscription table");
+
+    while (S_OK == (hr = WcaFetchRecord(hView, &hRec)))
+    {
+        // get component
+        hr = WcaGetRecordString(hRec, sqComponent, &pwzData);
+        ExitOnFailure(hr, "Failed to get component");
+
+        // check if the component is our processor architecture
+        hr = CpiVerifyComponentArchitecure(pwzData, &fMatchingArchitecture);
+        ExitOnFailure(hr, "Failed to get component architecture.");
+
+        if (!fMatchingArchitecture)
+        {
+            continue; // not the same architecture, ignore
+        }
+
+        // create entry
+        pItm = (CPI_SUBSCRIPTION*)::HeapAlloc(::GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(CPI_SUBSCRIPTION));
+        if (!pItm)
+            ExitFunction1(hr = E_OUTOFMEMORY);
+
+        // get component install state
+        er = ::MsiGetComponentStateW(WcaGetInstallHandle(), pwzData, &pItm->isInstalled, &pItm->isAction);
+        ExitOnFailure(hr = HRESULT_FROM_WIN32(er), "Failed to get component state");
+
+        // get key
+        hr = WcaGetRecordString(hRec, sqSubscription, &pwzData);
+        ExitOnFailure(hr, "Failed to get key");
+        StringCchCopyW(pItm->wzKey, countof(pItm->wzKey), pwzData);
+
+        // get com+ component
+        hr = WcaGetRecordString(hRec, sqComPlusComponent, &pwzData);
+        ExitOnFailure(hr, "Failed to get COM+ component");
+
+        hr = ComponentFindByKey(pAsmList, pwzData, &pItm->pAssembly, &pItm->pComponent);
+
+        if (S_FALSE == hr)
+        {
+            // component not found
+            ExitOnFailure(hr = E_FAIL, "Failed to find component, key: %S", pwzData);
+        }
+
+        // get id
+        hr = WcaGetRecordFormattedString(hRec, sqID, &pwzData);
+        ExitOnFailure(hr, "Failed to get id");
+
+        if (pwzData && *pwzData)
+        {
+            hr = PcaGuidToRegFormat(pwzData, pItm->wzID, countof(pItm->wzID));
+            ExitOnFailure(hr, "Failed to parse id guid value, key: %S, value: '%S'", pItm->wzKey, pwzData);
+        }
+
+        // get name
+        hr = WcaGetRecordFormattedString(hRec, sqName, &pwzData);
+        ExitOnFailure(hr, "Failed to get name");
+        StringCchCopyW(pItm->wzName, countof(pItm->wzName), pwzData);
+
+        // get event clsid
+        hr = WcaGetRecordFormattedString(hRec, sqEventCLSID, &pwzData);
+        ExitOnFailure(hr, "Failed to get event clsid");
+        StringCchCopyW(pItm->wzEventCLSID, countof(pItm->wzEventCLSID), pwzData);
+
+        // get publisher id
+        hr = WcaGetRecordFormattedString(hRec, sqPublisherID, &pwzData);
+        ExitOnFailure(hr, "Failed to get publisher id");
+        StringCchCopyW(pItm->wzPublisherID, countof(pItm->wzPublisherID), pwzData);
+
+        // get properties
+        if (CpiTableExists(cptComPlusSubscriptionProperty))
+        {
+            hr = CpiPropertiesRead(vcsSubscriptionPropertyQuery, pItm->wzKey, pdlSubscriptionProperties, &pItm->pProperties, &pItm->iPropertyCount);
+            ExitOnFailure(hr, "Failed to get subscription properties");
+        }
+
+        // set references & increment counters
+        if (WcaIsInstalling(pItm->isInstalled, pItm->isAction))
+        {
+            CpiApplicationAddReferenceInstall(pItm->pAssembly->pApplication);
+            pItm->pAssembly->fReferencedForInstall = TRUE;
+            pSubList->iInstallCount++;
+            if (pItm->pAssembly->iAttributes & aaRunInCommit)
+                pSubList->iCommitCount++;
+        }
+        if (WcaIsUninstalling(pItm->isInstalled, pItm->isAction))
+        {
+            CpiApplicationAddReferenceUninstall(pItm->pAssembly->pApplication);
+            pItm->pAssembly->fReferencedForUninstall = TRUE;
+            pSubList->iUninstallCount++;
+        }
+
+        // add entry
+        if (pSubList->pFirst)
+            pItm->pNext = pSubList->pFirst;
+        pSubList->pFirst = pItm;
+        pItm = NULL;
+    }
+
+    if (E_NOMOREITEMS == hr)
+        hr = S_OK;
+
+LExit:
+    // clean up
+    if (pItm)
+        FreeSubscription(pItm);
+
+    ReleaseStr(pwzData);
+
+    return hr;
+}
+
+HRESULT CpiSubscriptionsVerifyInstall(
+    CPI_SUBSCRIPTION_LIST* pList
+    )
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+
+    ICatalogObject* piSubsObj = NULL;
+
+    for (CPI_SUBSCRIPTION* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        // subscriptions that are being installed
+        if (!WcaIsInstalling(pItm->isInstalled, pItm->isAction))
+            continue;
+
+        // subscription is supposed to exist
+        if (CpiIsInstalled(pItm->isInstalled))
+        {
+            // if we don't have an id
+            if (!*pItm->wzID)
+            {
+                // find subscriptions with conflicting name
+                hr = FindObjectForSubscription(pItm, FALSE, TRUE, &piSubsObj);
+                ExitOnFailure(hr, "Failed to find collection object for subscription");
+
+                // if the subscription was found
+                if (S_OK == hr)
+                {
+                    // get id from subscription object
+                    hr = CpiGetKeyForObject(piSubsObj, pItm->wzID, countof(pItm->wzID));
+                    ExitOnFailure(hr, "Failed to get id");
+                }
+
+                // if the subscription was not found
+                else
+                {
+                    // create a new id
+                    hr = CpiCreateId(pItm->wzID, countof(pItm->wzID));
+                    ExitOnFailure(hr, "Failed to create id");
+                }
+            }
+        }
+
+        // subscription is supposed to be created
+        else
+        {
+            // check for conflicts
+            do {
+                if (*pItm->wzID)
+                {
+                    // find subscriptions with conflicting id
+                    hr = FindObjectForSubscription(pItm, TRUE, FALSE, &piSubsObj);
+                    ExitOnFailure(hr, "Failed to find collection object for subscription");
+
+                    if (S_FALSE == hr)
+                    {
+                        // find subscriptions with conflicting name
+                        hr = FindObjectForSubscription(pItm, FALSE, TRUE, &piSubsObj);
+                        ExitOnFailure(hr, "Failed to find collection object for subscription");
+
+                        if (S_OK == hr)
+                            // "A subscription with a conflictiong name exists. retry cancel"
+                            er = WcaErrorMessage(msierrComPlusSubscriptionNameConflict, hr, INSTALLMESSAGE_ERROR | MB_RETRYCANCEL, 0);
+                        else
+                            break; // no conflicting entry found, break loop
+                    }
+                    else
+                        // "A subscription with a conflicting id exists. abort retry ignore"
+                        er = WcaErrorMessage(msierrComPlusSubscriptionIdConflict, hr, INSTALLMESSAGE_ERROR | MB_ABORTRETRYIGNORE, 0);
+                }
+                else
+                {
+                    // find subscriptions with conflicting name
+                    hr = FindObjectForSubscription(pItm, FALSE, TRUE, &piSubsObj);
+                    ExitOnFailure(hr, "Failed to find collection object for subscription");
+
+                    if (S_OK == hr)
+                        // "A subscription with a conflictiong name exists. abort retry ignore"
+                        er = WcaErrorMessage(msierrComPlusSubscriptionNameConflict, hr, INSTALLMESSAGE_ERROR | MB_ABORTRETRYIGNORE, 0);
+                    else
+                        break; // no conflicting entry found, break loop
+                }
+
+                switch (er)
+                {
+                case IDCANCEL:
+                case IDABORT:
+                    ExitOnFailure(hr = E_FAIL, "A subscription with a conflictiong name or id exists, key: %S", pItm->wzKey);
+                    break;
+                case IDRETRY:
+                    break;
+                case IDIGNORE:
+                default:
+                    // if we don't have an id, copy id from object
+                    if (!*pItm->wzID)
+                    {
+                        hr = CpiGetKeyForObject(piSubsObj, pItm->wzID, countof(pItm->wzID));
+                        ExitOnFailure(hr, "Failed to get id");
+                    }
+                    hr = S_FALSE; // indicate that this is not a conflict
+                }
+            } while (S_OK == hr); // hr = S_FALSE if we don't have any conflicts
+
+            // create a new id if one is missing
+            if (!*pItm->wzID)
+            {
+                hr = CpiCreateId(pItm->wzID, countof(pItm->wzID));
+                ExitOnFailure(hr, "Failed to create id");
+            }
+        }
+
+        // clean up
+        ReleaseNullObject(piSubsObj);
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piSubsObj);
+
+    return hr;
+}
+
+HRESULT CpiSubscriptionsVerifyUninstall(
+    CPI_SUBSCRIPTION_LIST* pList
+    )
+{
+    HRESULT hr = S_OK;
+    ICatalogObject* piSubsObj = NULL;
+
+    for (CPI_SUBSCRIPTION* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        // subscriptions that are being installed
+        if (!WcaIsUninstalling(pItm->isInstalled, pItm->isAction))
+            continue;
+
+        // find subscriptions with conflicting name
+        hr = FindObjectForSubscription(pItm, 0 != *pItm->wzID, 0 == *pItm->wzID, &piSubsObj);
+        ExitOnFailure(hr, "Failed to find collection object for subscription");
+
+        // if the subscription was found
+        if (S_OK == hr)
+        {
+            // if we don't have an id, copy id from object
+            if (!*pItm->wzID)
+            {
+                hr = CpiGetKeyForObject(piSubsObj, pItm->wzID, countof(pItm->wzID));
+                ExitOnFailure(hr, "Failed to get id");
+            }
+        }
+
+        // if the subscription was not found
+        else
+        {
+            pItm->fObjectNotFound = TRUE;
+            pList->iUninstallCount--; // elements with the fObjectNotFound flag set will not be scheduled for uninstall
+        }
+
+        // clean up
+        ReleaseNullObject(piSubsObj);
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piSubsObj);
+
+    return hr;
+}
+
+HRESULT CpiSubscriptionsInstall(
+    CPI_SUBSCRIPTION_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    )
+{
+    HRESULT hr = S_OK;
+
+    int iActionType;
+    int iCount = 0;
+
+    // add action text
+    hr = CpiAddActionTextToActionData(L"CreateSubscrComPlusComponents", ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action text to custom action data");
+
+    // subscription count
+    switch (iRunMode)
+    {
+    case rmDeferred:
+        iCount = pList->iInstallCount - pList->iCommitCount;
+        break;
+    case rmCommit:
+        iCount = pList->iCommitCount;
+        break;
+    case rmRollback:
+        iCount = pList->iInstallCount;
+        break;
+    }
+
+    // add subscription count to action data
+    hr = WcaWriteIntegerToCaData(iCount, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add count to custom action data");
+
+    // add assemblies to custom action data in forward order
+    for (CPI_SUBSCRIPTION* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        // roles that are being installed only
+        if ((rmCommit == iRunMode && !(pItm->pAssembly->iAttributes & aaRunInCommit)) ||
+            (rmDeferred == iRunMode && (pItm->pAssembly->iAttributes & aaRunInCommit)) ||
+            !WcaIsInstalling(pItm->isInstalled, pItm->isAction))
+            continue;
+
+        // action type
+        if (rmRollback == iRunMode)
+        {
+            if (CpiIsInstalled(pItm->isInstalled))
+                iActionType = atNoOp;
+            else
+                iActionType = atRemove;
+        }
+        else
+            iActionType = atCreate;
+
+        // add to action data
+        hr = AddSubscriptionToActionData(pItm, iActionType, COST_SUBSCRIPTION_CREATE, ppwzActionData);
+        ExitOnFailure(hr, "Failed to add subscription to custom action data, key: %S", pItm->wzKey);
+    }
+
+    // add progress tics
+    if (piProgress)
+        *piProgress += COST_SUBSCRIPTION_CREATE * pList->iInstallCount;
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiSubscriptionsUninstall(
+    CPI_SUBSCRIPTION_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    )
+{
+    HRESULT hr = S_OK;
+
+    int iActionType;
+
+    // add action text
+    hr = CpiAddActionTextToActionData(L"RemoveSubscrComPlusComponents", ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action text to custom action data");
+
+    // add subscription count to action data
+    hr = WcaWriteIntegerToCaData(pList->iUninstallCount, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add count to custom action data");
+
+    // add assemblies to custom action data in reverse order
+    for (CPI_SUBSCRIPTION* pItm = pList->pFirst; pItm; pItm = pItm->pNext)
+    {
+        // roles that are being uninstalled only
+        if (pItm->fObjectNotFound || !WcaIsUninstalling(pItm->isInstalled, pItm->isAction))
+            continue;
+
+        // action type
+        if (rmRollback == iRunMode)
+            iActionType = atCreate;
+        else
+            iActionType = atRemove;
+
+        // add to action data
+        hr = AddSubscriptionToActionData(pItm, iActionType, COST_SUBSCRIPTION_DELETE, ppwzActionData);
+        ExitOnFailure(hr, "Failed to add subscription to custom action data, key: %S", pItm->wzKey);
+    }
+
+    // add progress tics
+    if (piProgress)
+        *piProgress += COST_SUBSCRIPTION_DELETE * pList->iUninstallCount;
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+
+// helper function definitions
+
+static void FreeSubscription(
+    CPI_SUBSCRIPTION* pItm
+    )
+{
+    if (pItm->pProperties)
+        CpiPropertiesFreeList(pItm->pProperties);
+
+    ::HeapFree(::GetProcessHeap(), 0, pItm);
+}
+
+static HRESULT FindObjectForSubscription(
+    CPI_SUBSCRIPTION* pItm,
+    BOOL fFindId,
+    BOOL fFindName,
+    ICatalogObject** ppiSubsObj
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICatalogCollection* piSubsColl = NULL;
+
+    // get applications collection
+    hr = CpiGetSubscriptionsCollForComponent(pItm->pAssembly, pItm->pComponent, &piSubsColl);
+    ExitOnFailure(hr, "Failed to get collection");
+
+    if (S_FALSE == hr)
+        ExitFunction(); // exit with hr = S_FALSE
+
+    // find application object
+    hr = CpiFindCollectionObject(piSubsColl, fFindId ? pItm->wzID : NULL, fFindName ? pItm->wzName : NULL, ppiSubsObj);
+    ExitOnFailure(hr, "Failed to find object");
+
+    // exit with hr from CpiFindCollectionObject()
+
+LExit:
+    // clean up
+    ReleaseObject(piSubsColl);
+
+    return hr;
+}
+
+static HRESULT AddSubscriptionToActionData(
+    CPI_SUBSCRIPTION* pItm,
+    int iActionType,
+    int iActionCost,
+    LPWSTR* ppwzActionData
+    )
+{
+    HRESULT hr = S_OK;
+
+    // add action information to custom action data
+    hr = WcaWriteIntegerToCaData(iActionType, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action type to custom action data");
+    hr = WcaWriteIntegerToCaData(iActionCost, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action cost to custom action data");
+
+    // add application role information to custom action data
+    hr = WcaWriteStringToCaData(pItm->wzKey, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add subscription key to custom action data");
+    hr = WcaWriteStringToCaData(pItm->wzID, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add subscription id to custom action data");
+    hr = WcaWriteStringToCaData(pItm->wzName, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add subscription name to custom action data");
+    hr = WcaWriteStringToCaData(atCreate == iActionType ? pItm->wzEventCLSID : L"", ppwzActionData);
+    ExitOnFailure(hr, "Failed to add assembly tlb path to custom action data");
+    hr = WcaWriteStringToCaData(atCreate == iActionType ? pItm->wzPublisherID : L"", ppwzActionData);
+    ExitOnFailure(hr, "Failed to add assembly proxy-stub dll path to custom action data");
+
+    // add component information to custom action data
+    hr = WcaWriteStringToCaData(pItm->pComponent->wzCLSID, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add application id to custom action data");
+
+    // add application information to custom action data
+    hr = WcaWriteStringToCaData(pItm->pAssembly->pApplication->wzID, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add application id to custom action data");
+
+    // add partition information to custom action data
+    LPCWSTR pwzPartID = pItm->pAssembly->pApplication->pPartition ? pItm->pAssembly->pApplication->pPartition->wzID : L"";
+    hr = WcaWriteStringToCaData(pwzPartID, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add partition id to custom action data");
+
+    // add properties to custom action data
+    hr = CpiAddPropertiesToActionData(atCreate == iActionType ? pItm->iPropertyCount : 0, pItm->pProperties, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add properties to custom action data");
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+static HRESULT ComponentFindByKey(
+    CPI_ASSEMBLY_LIST* pAsmList,
+    LPCWSTR pwzKey,
+    CPI_ASSEMBLY** ppAsmItm,
+    CPISCHED_COMPONENT** ppCompItm
+    )
+{
+    for (CPI_ASSEMBLY* pAsmItm = pAsmList->pFirst; pAsmItm; pAsmItm = pAsmItm->pNext)
+    {
+        for (CPISCHED_COMPONENT* pCompItm = pAsmItm->pComponents; pCompItm; pCompItm = pCompItm->pNext)
+        {
+            if (0 == lstrcmpW(pCompItm->wzKey, pwzKey))
+            {
+                *ppAsmItm = pAsmItm;
+                *ppCompItm = pCompItm;
+                return S_OK;
+            }
+        }
+    }
+
+    return S_FALSE;
+}
diff --git a/src/ext/ComPlus/ca/cpsubssched.h b/src/ext/ComPlus/ca/cpsubssched.h
new file mode 100644
index 00000000..83ff1af8
--- /dev/null
+++ b/src/ext/ComPlus/ca/cpsubssched.h
@@ -0,0 +1,62 @@
+#pragma once
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+
+struct CPI_SUBSCRIPTION
+{
+    WCHAR wzKey[MAX_DARWIN_KEY + 1];
+    WCHAR wzID[CPI_MAX_GUID + 1];
+    WCHAR wzName[MAX_DARWIN_COLUMN + 1];
+    WCHAR wzEventCLSID[CPI_MAX_GUID + 1];
+    WCHAR wzPublisherID[CPI_MAX_GUID + 1];
+
+    BOOL fObjectNotFound;
+
+    int iPropertyCount;
+    CPI_PROPERTY* pProperties;
+
+    INSTALLSTATE isInstalled, isAction;
+
+    CPI_ASSEMBLY* pAssembly;
+    CPISCHED_COMPONENT* pComponent;
+
+    CPI_SUBSCRIPTION* pNext;
+};
+
+struct CPI_SUBSCRIPTION_LIST
+{
+    CPI_SUBSCRIPTION* pFirst;
+
+    int iInstallCount;
+    int iCommitCount;
+    int iUninstallCount;
+};
+
+
+// function prototypes
+
+void CpiSubscriptionListFree(
+    CPI_SUBSCRIPTION_LIST* pList
+    );
+HRESULT CpiSubscriptionsRead(
+    CPI_ASSEMBLY_LIST* pAsmList,
+    CPI_SUBSCRIPTION_LIST* pSubList
+    );
+HRESULT CpiSubscriptionsVerifyInstall(
+    CPI_SUBSCRIPTION_LIST* pList
+    );
+HRESULT CpiSubscriptionsVerifyUninstall(
+    CPI_SUBSCRIPTION_LIST* pList
+    );
+HRESULT CpiSubscriptionsInstall(
+    CPI_SUBSCRIPTION_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    );
+HRESULT CpiSubscriptionsUninstall(
+    CPI_SUBSCRIPTION_LIST* pList,
+    int iRunMode,
+    LPWSTR* ppwzActionData,
+    int* piProgress
+    );
diff --git a/src/ext/ComPlus/ca/cputilexec.cpp b/src/ext/ComPlus/ca/cputilexec.cpp
new file mode 100644
index 00000000..1c2c8b93
--- /dev/null
+++ b/src/ext/ComPlus/ca/cputilexec.cpp
@@ -0,0 +1,1881 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+#include "precomp.h"
+
+
+// private structs
+
+struct CPI_WELLKNOWN_SID
+{
+    LPCWSTR pwzName;
+    SID_IDENTIFIER_AUTHORITY iaIdentifierAuthority;
+    BYTE nSubAuthorityCount;
+    DWORD dwSubAuthority[8];
+};
+
+
+// well known SIDs
+
+CPI_WELLKNOWN_SID wsWellKnownSids[] = {
+    {L"\\Everyone",          SECURITY_WORLD_SID_AUTHORITY, 1, {SECURITY_WORLD_RID, 0, 0, 0, 0, 0, 0, 0}},
+    {L"\\Administrators",    SECURITY_NT_AUTHORITY,        2, {SECURITY_BUILTIN_DOMAIN_RID, DOMAIN_ALIAS_RID_ADMINS, 0, 0, 0, 0, 0, 0}},
+    {L"\\LocalSystem",       SECURITY_NT_AUTHORITY,        1, {SECURITY_LOCAL_SYSTEM_RID, 0, 0, 0, 0, 0, 0, 0}},
+    {L"\\LocalService",      SECURITY_NT_AUTHORITY,        1, {SECURITY_LOCAL_SERVICE_RID, 0, 0, 0, 0, 0, 0, 0}},
+    {L"\\NetworkService",    SECURITY_NT_AUTHORITY,        1, {SECURITY_NETWORK_SERVICE_RID, 0, 0, 0, 0, 0, 0, 0}},
+    {L"\\AuthenticatedUser", SECURITY_NT_AUTHORITY,        1, {SECURITY_AUTHENTICATED_USER_RID, 0, 0, 0, 0, 0, 0, 0}},
+    {L"\\Guests",            SECURITY_NT_AUTHORITY,        2, {SECURITY_BUILTIN_DOMAIN_RID, DOMAIN_ALIAS_RID_GUESTS, 0, 0, 0, 0, 0, 0}},
+    {L"\\Users",             SECURITY_NT_AUTHORITY,        2, {SECURITY_BUILTIN_DOMAIN_RID, DOMAIN_ALIAS_RID_USERS, 0, 0, 0, 0, 0, 0}},
+    {L"\\CREATOR OWNER",     SECURITY_NT_AUTHORITY,        1, {SECURITY_CREATOR_OWNER_RID, 0, 0, 0, 0, 0, 0, 0}},
+    {NULL,                   SECURITY_NULL_SID_AUTHORITY,  0, {0, 0, 0, 0, 0, 0, 0, 0}}
+};
+
+
+// prototypes for private helper functions
+
+static HRESULT FindUserCollectionObjectIndex(
+    ICatalogCollection* piColl,
+    PSID pSid,
+    int* pi
+    );
+static HRESULT CreateSidFromDomainRidPair(
+    PSID pDomainSid,
+    DWORD dwRid,
+    PSID* ppSid
+    );
+static HRESULT InitLsaUnicodeString(
+    PLSA_UNICODE_STRING plusStr,
+    LPCWSTR pwzStr,
+    DWORD dwLen
+    );
+static void FreeLsaUnicodeString(
+    PLSA_UNICODE_STRING plusStr
+    );
+static HRESULT WriteFileAll(
+    HANDLE hFile,
+    PBYTE pbBuffer,
+    DWORD dwBufferLength
+    );
+static HRESULT ReadFileAll(
+    HANDLE hFile,
+    PBYTE pbBuffer,
+    DWORD dwBufferLength
+    );
+
+
+// variables
+
+static ICOMAdminCatalog* gpiCatalog;
+
+
+// function definitions
+
+void CpiExecInitialize()
+{
+    // collections
+    gpiCatalog = NULL;
+}
+
+void CpiExecFinalize()
+{
+    // collections
+    ReleaseObject(gpiCatalog);
+}
+
+HRESULT CpiActionStartMessage(
+    LPWSTR* ppwzActionData,
+    BOOL fSuppress
+    )
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+
+    PMSIHANDLE hRec;
+
+    LPWSTR pwzData = NULL;
+
+    // create record
+    hRec = ::MsiCreateRecord(3);
+    ExitOnNull(hRec, hr, E_OUTOFMEMORY, "Failed to create record");
+
+    // action name
+    hr = WcaReadStringFromCaData(ppwzActionData, &pwzData);
+    ExitOnFailure(hr, "Failed to action name");
+
+    er = ::MsiRecordSetStringW(hRec, 1, pwzData);
+    ExitOnFailure(hr = HRESULT_FROM_WIN32(er), "Failed to set action name");
+
+    // description
+    hr = WcaReadStringFromCaData(ppwzActionData, &pwzData);
+    ExitOnFailure(hr, "Failed to description");
+
+    er = ::MsiRecordSetStringW(hRec, 2, pwzData);
+    ExitOnFailure(hr = HRESULT_FROM_WIN32(er), "Failed to set description");
+
+    // template
+    hr = WcaReadStringFromCaData(ppwzActionData, &pwzData);
+    ExitOnFailure(hr, "Failed to template");
+
+    er = ::MsiRecordSetStringW(hRec, 3, pwzData);
+    ExitOnFailure(hr = HRESULT_FROM_WIN32(er), "Failed to set template");
+
+    // message
+    if (!fSuppress)
+    {
+        er = WcaProcessMessage(INSTALLMESSAGE_ACTIONSTART, hRec);
+        if (0 == er || IDOK == er || IDYES == er)
+        {
+            hr = S_OK;
+        }
+        else if (IDABORT == er || IDCANCEL == er)
+        {
+            WcaSetReturnValue(ERROR_INSTALL_USEREXIT); // note that the user said exit
+            hr = S_FALSE;
+        }
+        else
+            hr = E_UNEXPECTED;
+    }
+
+LExit:
+    // clean up
+    ReleaseStr(pwzData);
+
+    return hr;
+}
+
+HRESULT CpiActionDataMessage(
+    DWORD cArgs,
+    ...
+    )
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+
+    PMSIHANDLE hRec;
+    va_list args;
+
+    // record
+    hRec = ::MsiCreateRecord(cArgs);
+    ExitOnNull(hRec, hr, E_OUTOFMEMORY, "Failed to create record");
+
+    va_start(args, cArgs);
+    for (DWORD i = 1; i <= cArgs; i++)
+    {
+        LPCWSTR pwzArg = va_arg(args, WCHAR*);
+        if (pwzArg && *pwzArg)
+        {
+            er = ::MsiRecordSetStringW(hRec, i, pwzArg);
+            ExitOnFailure(hr = HRESULT_FROM_WIN32(er), "Failed to set record field string");
+        }
+    }
+    va_end(args);
+
+    // message
+    er = WcaProcessMessage(INSTALLMESSAGE_ACTIONDATA, hRec);
+    if (0 == er || IDOK == er || IDYES == er)
+    {
+        hr = S_OK;
+    }
+    else if (IDABORT == er || IDCANCEL == er)
+    {
+        WcaSetReturnValue(ERROR_INSTALL_USEREXIT); // note that the user said exit
+        hr = S_FALSE;
+    }
+    else
+        hr = E_UNEXPECTED;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiExecGetAdminCatalog(
+    ICOMAdminCatalog** ppiCatalog
+    )
+{
+    HRESULT hr = S_OK;
+
+    if (!gpiCatalog)
+    {
+        // get collection
+        hr = ::CoCreateInstance(CLSID_COMAdminCatalog, NULL, CLSCTX_ALL, IID_ICOMAdminCatalog, (void**)&gpiCatalog); 
+        ExitOnFailure(hr, "Failed to create COM+ admin catalog object");
+    }
+
+    // return value
+    gpiCatalog->AddRef();
+    *ppiCatalog = gpiCatalog;
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiLogCatalogErrorInfo()
+{
+    HRESULT hr = S_OK;
+
+    ICOMAdminCatalog* piCatalog = NULL;
+    ICatalogCollection* piErrColl = NULL;
+    IDispatch* piDisp = NULL;
+    ICatalogObject* piObj = NULL;
+
+    LPWSTR pwzName = NULL;
+    LPWSTR pwzErrorCode = NULL;
+    LPWSTR pwzMajorRef = NULL;
+    LPWSTR pwzMinorRef = NULL;
+
+    // get catalog
+    hr = CpiExecGetAdminCatalog(&piCatalog);
+    ExitOnFailure(hr, "Failed to get COM+ admin catalog");
+
+    // get error info collection
+    hr = CpiExecGetCatalogCollection(L"ErrorInfo", &piErrColl);
+    ExitOnFailure(hr, "Failed to get error info collection");
+
+    // loop objects
+    long lCnt;
+    hr = piErrColl->get_Count(&lCnt);
+    ExitOnFailure(hr, "Failed to get to number of items in collection");
+
+    for (long i = 0; i < lCnt; i++)
+    {
+        // get ICatalogObject interface
+        hr = piErrColl->get_Item(i, &piDisp);
+        ExitOnFailure(hr, "Failed to get item from partitions collection");
+
+        hr = piDisp->QueryInterface(IID_ICatalogObject, (void**)&piObj);
+        ExitOnFailure(hr, "Failed to get IID_ICatalogObject interface");
+
+        // get properties
+        hr = CpiGetCollectionObjectValue(piObj, L"Name", &pwzName);
+        ExitOnFailure(hr, "Failed to get name");
+        hr = CpiGetCollectionObjectValue(piObj, L"ErrorCode", &pwzErrorCode);
+        ExitOnFailure(hr, "Failed to get error code");
+        hr = CpiGetCollectionObjectValue(piObj, L"MajorRef", &pwzMajorRef);
+        ExitOnFailure(hr, "Failed to get major ref");
+        hr = CpiGetCollectionObjectValue(piObj, L"MinorRef", &pwzMinorRef);
+        ExitOnFailure(hr, "Failed to get minor ref");
+
+        // write to log
+        WcaLog(LOGMSG_STANDARD, "ErrorInfo: Name='%S', ErrorCode='%S', MajorRef='%S', MinorRef='%S'",
+            pwzName, pwzErrorCode, pwzMajorRef, pwzMinorRef);
+
+        // clean up
+        ReleaseNullObject(piDisp);
+        ReleaseNullObject(piObj);
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piCatalog);
+    ReleaseObject(piErrColl);
+    ReleaseObject(piDisp);
+    ReleaseObject(piObj);
+
+    ReleaseStr(pwzName);
+    ReleaseStr(pwzErrorCode);
+    ReleaseStr(pwzMajorRef);
+    ReleaseStr(pwzMinorRef);
+
+    return hr;
+}
+
+HRESULT CpiExecGetCatalogCollection(
+    LPCWSTR pwzName,
+    ICatalogCollection** ppiColl
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICOMAdminCatalog* piCatalog = NULL;
+    IDispatch* piDisp = NULL;
+
+    BSTR bstrName = NULL;
+
+    // copy name string
+    bstrName = ::SysAllocString(pwzName);
+    ExitOnNull(bstrName, hr, E_OUTOFMEMORY, "Failed to allocate BSTR for collection name");
+
+    // get catalog
+    hr = CpiExecGetAdminCatalog(&piCatalog);
+    ExitOnFailure(hr, "Failed to get COM+ admin catalog");
+
+    // get collecton from catalog
+    hr = piCatalog->GetCollection(bstrName, &piDisp);
+    ExitOnFailure(hr, "Failed to get collection");
+
+    hr = piDisp->QueryInterface(IID_ICatalogCollection, (void**)ppiColl);
+    ExitOnFailure(hr, "Failed to get IID_ICatalogCollection interface");
+
+    // populate collection
+    hr = (*ppiColl)->Populate();
+    if (COMADMIN_E_OBJECTERRORS == hr)
+        CpiLogCatalogErrorInfo();
+    ExitOnFailure(hr, "Failed to populate collection");
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piCatalog);
+    ReleaseObject(piDisp);
+    ReleaseBSTR(bstrName);
+
+    return hr;
+}
+
+HRESULT CpiExecGetCatalogCollection(
+    ICatalogCollection* piColl,
+    ICatalogObject* piObj,
+    LPCWSTR pwzName,
+    ICatalogCollection** ppiColl
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICOMAdminCatalog* piCatalog = NULL;
+    IDispatch* piDisp = NULL;
+
+    BSTR bstrName = NULL;
+
+    VARIANT vtKey;
+    ::VariantInit(&vtKey);
+
+    // copy name string
+    bstrName = ::SysAllocString(pwzName);
+    ExitOnNull(bstrName, hr, E_OUTOFMEMORY, "Failed to allocate BSTR for collection name");
+
+    // get catalog
+    hr = CpiExecGetAdminCatalog(&piCatalog);
+    ExitOnFailure(hr, "Failed to get COM+ admin catalog");
+
+    // get key
+    hr = piObj->get_Key(&vtKey);
+    ExitOnFailure(hr, "Failed to get object key");
+
+    // get collecton from catalog
+    hr = piColl->GetCollection(bstrName, vtKey, &piDisp);
+    ExitOnFailure(hr, "Failed to get collection");
+
+    hr = piDisp->QueryInterface(IID_ICatalogCollection, (void**)ppiColl);
+    ExitOnFailure(hr, "Failed to get IID_ICatalogCollection interface");
+
+    // populate collection
+    hr = (*ppiColl)->Populate();
+    if (COMADMIN_E_OBJECTERRORS == hr)
+        CpiLogCatalogErrorInfo();
+    ExitOnFailure(hr, "Failed to populate collection");
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piCatalog);
+    ReleaseObject(piDisp);
+    ReleaseBSTR(bstrName);
+    ::VariantClear(&vtKey);
+
+    return hr;
+}
+
+HRESULT CpiAddCollectionObject(
+    ICatalogCollection* piColl,
+    ICatalogObject** ppiObj
+    )
+{
+    HRESULT hr = S_OK;
+
+    IDispatch* piDisp = NULL;
+
+    hr = piColl->Add(&piDisp);
+    ExitOnFailure(hr, "Failed to add object to collection");
+
+    hr = piDisp->QueryInterface(IID_ICatalogObject, (void**)ppiObj);
+    ExitOnFailure(hr, "Failed to get IID_ICatalogObject interface");
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piDisp);
+
+    return hr;
+}
+
+HRESULT CpiPutCollectionObjectValue(
+    ICatalogObject* piObj,
+    LPCWSTR pwzPropName,
+    LPCWSTR pwzValue
+    )
+{
+    HRESULT hr = S_OK;
+
+    BSTR bstrPropName = NULL;
+
+    VARIANT vtVal;
+    ::VariantInit(&vtVal);
+
+    // allocate property name string
+    bstrPropName = ::SysAllocString(pwzPropName);
+    ExitOnNull(bstrPropName, hr, E_OUTOFMEMORY, "Failed to allocate property name string");
+
+    // prepare value variant
+    vtVal.vt = VT_BSTR;
+    vtVal.bstrVal = ::SysAllocString(pwzValue);
+    ExitOnNull(vtVal.bstrVal, hr, E_OUTOFMEMORY, "Failed to allocate property value string");
+
+    // put value
+    hr = piObj->put_Value(bstrPropName, vtVal);
+    ExitOnFailure(hr, "Failed to put property value");
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseBSTR(bstrPropName);
+    ::VariantClear(&vtVal);
+
+    return hr;
+}
+
+HRESULT CpiPutCollectionObjectValues(
+    ICatalogObject* piObj,
+    CPI_PROPERTY* pPropList
+    )
+{
+    HRESULT hr = S_OK;
+
+    for (CPI_PROPERTY* pItm = pPropList; pItm; pItm = pItm->pNext)
+    {
+        // set property
+        hr = CpiPutCollectionObjectValue(piObj, pItm->wzName, pItm->pwzValue);
+        ExitOnFailure(hr, "Failed to set object property value, name: %S", pItm->wzName);
+    }
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiGetCollectionObjectValue(
+    ICatalogObject* piObj,
+    LPCWSTR szPropName,
+    LPWSTR* ppwzValue
+    )
+{
+    HRESULT hr = S_OK;
+
+    BSTR bstrPropName = NULL;
+
+    VARIANT vtVal;
+    ::VariantInit(&vtVal);
+
+    // allocate property name string
+    bstrPropName = ::SysAllocString(szPropName);
+    ExitOnNull(bstrPropName, hr, E_OUTOFMEMORY, "Failed to allocate property name string");
+
+    // get value
+    hr = piObj->get_Value(bstrPropName, &vtVal);
+    ExitOnFailure(hr, "Failed to get property value");
+
+    hr = ::VariantChangeType(&vtVal, &vtVal, 0, VT_BSTR);
+    ExitOnFailure(hr, "Failed to change variant type");
+
+    hr = StrAllocString(ppwzValue, vtVal.bstrVal, ::SysStringLen(vtVal.bstrVal));
+    ExitOnFailure(hr, "Failed to allocate memory for value string");
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseBSTR(bstrPropName);
+    ::VariantClear(&vtVal);
+
+    return hr;
+}
+
+HRESULT CpiResetObjectProperty(
+    ICatalogCollection* piColl,
+    ICatalogObject* piObj,
+    LPCWSTR pwzPropName
+    )
+{
+    HRESULT hr = S_OK;
+
+    BSTR bstrPropName = NULL;
+
+    long lChanges = 0;
+
+    VARIANT vtVal;
+    ::VariantInit(&vtVal);
+
+    // allocate property name string
+    bstrPropName = ::SysAllocString(pwzPropName);
+    ExitOnNull(bstrPropName, hr, E_OUTOFMEMORY, "Failed to allocate deleteable property name string");
+
+    // get value
+    hr = piObj->get_Value(bstrPropName, &vtVal);
+    ExitOnFailure(hr, "Failed to get deleteable property value");
+
+    hr = ::VariantChangeType(&vtVal, &vtVal, 0, VT_BOOL);
+    ExitOnFailure(hr, "Failed to change variant type");
+
+    // if the deleteable property is set
+    if (VARIANT_FALSE == vtVal.boolVal)
+    {
+        // clear property
+        vtVal.boolVal = VARIANT_TRUE;
+
+        hr = piObj->put_Value(bstrPropName, vtVal);
+        ExitOnFailure(hr, "Failed to get property value");
+
+        // save changes
+        hr = piColl->SaveChanges(&lChanges);
+        if (COMADMIN_E_OBJECTERRORS == hr)
+            CpiLogCatalogErrorInfo();
+        ExitOnFailure(hr, "Failed to save changes");
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseBSTR(bstrPropName);
+    ::VariantClear(&vtVal);
+
+    return hr;
+}
+
+HRESULT CpiRemoveCollectionObject(
+    ICatalogCollection* piColl,
+    LPCWSTR pwzID,
+    LPCWSTR pwzName,
+    BOOL fResetDeleteable
+    )
+{
+    HRESULT hr = S_OK;
+
+    IDispatch* piDisp = NULL;
+    ICatalogObject* piObj = NULL;
+
+    BOOL fMatch = FALSE;
+
+    VARIANT vtVal;
+    ::VariantInit(&vtVal);
+
+    long lCnt;
+    hr = piColl->get_Count(&lCnt);
+    ExitOnFailure(hr, "Failed to get to number of items in collection");
+
+    for (long i = 0; i < lCnt; i++)
+    {
+        // get ICatalogObject interface
+        hr = piColl->get_Item(i, &piDisp);
+        ExitOnFailure(hr, "Failed to get object from collection");
+
+        hr = piDisp->QueryInterface(IID_ICatalogObject, (void**)&piObj);
+        ExitOnFailure(hr, "Failed to get IID_ICatalogObject interface");
+
+        // compare id
+        if (pwzID && *pwzID)
+        {
+            hr = piObj->get_Key(&vtVal);
+            ExitOnFailure(hr, "Failed to get key");
+
+            hr = ::VariantChangeType(&vtVal, &vtVal, 0, VT_BSTR);
+            ExitOnFailure(hr, "Failed to change variant type");
+
+            if (0 == lstrcmpiW(vtVal.bstrVal, pwzID))
+                fMatch = TRUE;
+
+            ::VariantClear(&vtVal);
+        }
+
+        // compare name
+        if (pwzName && *pwzName)
+        {
+            hr = piObj->get_Name(&vtVal);
+            ExitOnFailure(hr, "Failed to get name");
+
+            hr = ::VariantChangeType(&vtVal, &vtVal, 0, VT_BSTR);
+            ExitOnFailure(hr, "Failed to change variant type");
+
+            if (0 == lstrcmpW(vtVal.bstrVal, pwzName))
+                fMatch = TRUE;
+
+            ::VariantClear(&vtVal);
+        }
+
+        // if it's a match, remove it
+        if (fMatch)
+        {
+            if (fResetDeleteable)
+            {
+                // reset deleteable property, if set
+                hr = CpiResetObjectProperty(piColl, piObj, L"Deleteable");
+                ExitOnFailure(hr, "Failed to reset deleteable property");
+            }
+
+            hr = piColl->Remove(i);
+            ExitOnFailure(hr, "Failed to remove item from collection");
+            break;
+        }
+
+        // release interface pointers
+        ReleaseNullObject(piDisp);
+        ReleaseNullObject(piObj);
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piDisp);
+    ReleaseObject(piObj);
+
+    ::VariantClear(&vtVal);
+
+    return hr;
+}
+
+HRESULT CpiRemoveUserCollectionObject(
+    ICatalogCollection* piColl,
+    PSID pSid
+    )
+{
+    HRESULT hr = S_OK;
+
+    int i = 0;
+
+    // find index
+    hr = FindUserCollectionObjectIndex(piColl, pSid, &i);
+    ExitOnFailure(hr, "Failed to find user collection index");
+
+    if (S_FALSE == hr)
+        ExitFunction(); // not found, exit with hr = S_FALSE
+
+    // remove object
+    hr = piColl->Remove(i);
+    ExitOnFailure(hr, "Failed to remove object from collection");
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiFindCollectionObjectByStringKey(
+    ICatalogCollection* piColl,
+    LPCWSTR pwzKey,
+    ICatalogObject** ppiObj
+    )
+{
+    HRESULT hr = S_OK;
+
+    IDispatch* piDisp = NULL;
+    ICatalogObject* piObj = NULL;
+
+    VARIANT vtVal;
+    ::VariantInit(&vtVal);
+
+    long lCnt;
+    hr = piColl->get_Count(&lCnt);
+    ExitOnFailure(hr, "Failed to get to number of items in collection");
+
+    for (long i = 0; i < lCnt; i++)
+    {
+        // get ICatalogObject interface
+        hr = piColl->get_Item(i, &piDisp);
+        ExitOnFailure(hr, "Failed to get object from collection");
+
+        hr = piDisp->QueryInterface(IID_ICatalogObject, (void**)&piObj);
+        ExitOnFailure(hr, "Failed to get IID_ICatalogObject interface");
+
+        // compare key
+        hr = piObj->get_Key(&vtVal);
+        ExitOnFailure(hr, "Failed to get key");
+
+        hr = ::VariantChangeType(&vtVal, &vtVal, 0, VT_BSTR);
+        ExitOnFailure(hr, "Failed to change variant type");
+
+        if (0 == lstrcmpiW(vtVal.bstrVal, pwzKey))
+        {
+            if (ppiObj)
+            {
+                *ppiObj = piObj;
+                piObj = NULL;
+            }
+            ExitFunction1(hr = S_OK);
+        }
+
+        // clean up
+        ReleaseNullObject(piDisp);
+        ReleaseNullObject(piObj);
+
+        ::VariantClear(&vtVal);
+    }
+
+    hr = S_FALSE;
+
+LExit:
+    // clean up
+    ReleaseObject(piDisp);
+    ReleaseObject(piObj);
+
+    ::VariantClear(&vtVal);
+
+    return hr;
+}
+
+HRESULT CpiFindCollectionObjectByIntegerKey(
+    ICatalogCollection* piColl,
+    long lKey,
+    ICatalogObject** ppiObj
+    )
+{
+    HRESULT hr = S_OK;
+
+    IDispatch* piDisp = NULL;
+    ICatalogObject* piObj = NULL;
+
+    VARIANT vtVal;
+    ::VariantInit(&vtVal);
+
+    long lCnt;
+    hr = piColl->get_Count(&lCnt);
+    ExitOnFailure(hr, "Failed to get to number of items in collection");
+
+    for (long i = 0; i < lCnt; i++)
+    {
+        // get ICatalogObject interface
+        hr = piColl->get_Item(i, &piDisp);
+        ExitOnFailure(hr, "Failed to get object from collection");
+
+        hr = piDisp->QueryInterface(IID_ICatalogObject, (void**)&piObj);
+        ExitOnFailure(hr, "Failed to get IID_ICatalogObject interface");
+
+        // compare key
+        hr = piObj->get_Key(&vtVal);
+        ExitOnFailure(hr, "Failed to get key");
+
+        hr = ::VariantChangeType(&vtVal, &vtVal, 0, VT_I4);
+        ExitOnFailure(hr, "Failed to change variant type");
+
+        if (vtVal.lVal == lKey)
+        {
+            if (ppiObj)
+            {
+                *ppiObj = piObj;
+                piObj = NULL;
+            }
+            ExitFunction1(hr = S_OK);
+        }
+
+        // clean up
+        ReleaseNullObject(piDisp);
+        ReleaseNullObject(piObj);
+
+        ::VariantClear(&vtVal);
+    }
+
+    hr = S_FALSE;
+
+LExit:
+    // clean up
+    ReleaseObject(piDisp);
+    ReleaseObject(piObj);
+
+    ::VariantClear(&vtVal);
+
+    return hr;
+}
+
+HRESULT CpiFindCollectionObjectByName(
+    ICatalogCollection* piColl,
+    LPCWSTR pwzName,
+    ICatalogObject** ppiObj
+    )
+{
+    HRESULT hr = S_OK;
+
+    IDispatch* piDisp = NULL;
+    ICatalogObject* piObj = NULL;
+
+    VARIANT vtVal;
+    ::VariantInit(&vtVal);
+
+    long lCnt;
+    hr = piColl->get_Count(&lCnt);
+    ExitOnFailure(hr, "Failed to get to number of items in collection");
+
+    for (long i = 0; i < lCnt; i++)
+    {
+        // get ICatalogObject interface
+        hr = piColl->get_Item(i, &piDisp);
+        ExitOnFailure(hr, "Failed to get object from collection");
+
+        hr = piDisp->QueryInterface(IID_ICatalogObject, (void**)&piObj);
+        ExitOnFailure(hr, "Failed to get IID_ICatalogObject interface");
+
+        // compare key
+        hr = piObj->get_Name(&vtVal);
+        ExitOnFailure(hr, "Failed to get key");
+
+        hr = ::VariantChangeType(&vtVal, &vtVal, 0, VT_BSTR);
+        ExitOnFailure(hr, "Failed to change variant type");
+
+        if (0 == lstrcmpW(vtVal.bstrVal, pwzName))
+        {
+            if (ppiObj)
+            {
+                *ppiObj = piObj;
+                piObj = NULL;
+            }
+            ExitFunction1(hr = S_OK);
+        }
+
+        // clean up
+        ReleaseNullObject(piDisp);
+        ReleaseNullObject(piObj);
+
+        ::VariantClear(&vtVal);
+    }
+
+    hr = S_FALSE;
+
+LExit:
+    // clean up
+    ReleaseObject(piDisp);
+    ReleaseObject(piObj);
+
+    ::VariantClear(&vtVal);
+
+    return hr;
+}
+
+HRESULT CpiFindUserCollectionObject(
+    ICatalogCollection* piColl,
+    PSID pSid,
+    ICatalogObject** ppiObj
+    )
+{
+    HRESULT hr = S_OK;
+
+    int i = 0;
+
+    IDispatch* piDisp = NULL;
+
+    // find index
+    hr = FindUserCollectionObjectIndex(piColl, pSid, &i);
+    ExitOnFailure(hr, "Failed to find user collection index");
+
+    if (S_FALSE == hr)
+        ExitFunction(); // not found, exit with hr = S_FALSE
+
+    // get object
+    if (ppiObj)
+    {
+        hr = piColl->get_Item(i, &piDisp);
+        ExitOnFailure(hr, "Failed to get object from collection");
+
+        hr = piDisp->QueryInterface(IID_ICatalogObject, (void**)ppiObj);
+        ExitOnFailure(hr, "Failed to get IID_ICatalogObject interface");
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piDisp);
+
+    return hr;
+}
+
+HRESULT CpiExecGetPartitionsCollection(
+    ICatalogCollection** ppiPartColl
+    )
+{
+    HRESULT hr = S_OK;
+
+    // get collection
+    hr = CpiExecGetCatalogCollection(L"Partitions", ppiPartColl);
+    ExitOnFailure(hr, "Failed to get catalog collection");
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiGetPartitionRolesCollection(
+    LPCWSTR pwzPartID,
+    ICatalogCollection** ppiRolesColl
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICatalogCollection* piPartColl = NULL;
+    ICatalogObject* piPartObj = NULL;
+
+    // get partitions collection
+    hr = CpiExecGetPartitionsCollection(&piPartColl);
+    ExitOnFailure(hr, "Failed to get partitions collection");
+
+    if (S_FALSE == hr)
+        ExitFunction(); // partitions collection not found, exit with hr = S_FALSE
+
+    // find object
+    hr = CpiFindCollectionObjectByStringKey(piPartColl, pwzPartID, &piPartObj);
+    ExitOnFailure(hr, "Failed to find collection object");
+
+    if (S_FALSE == hr)
+        ExitFunction(); // partition not found, exit with hr = S_FALSE
+
+    // get roles collection
+    hr = CpiExecGetCatalogCollection(piPartColl, piPartObj, L"RolesForPartition", ppiRolesColl);
+    ExitOnFailure(hr, "Failed to get catalog collection");
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piPartColl);
+    ReleaseObject(piPartObj);
+
+    return hr;
+}
+
+HRESULT CpiGetUsersInPartitionRoleCollection(
+    LPCWSTR pwzPartID,
+    LPCWSTR pwzRoleName,
+    ICatalogCollection** ppiUsrInRoleColl
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICatalogCollection* piRoleColl = NULL;
+    ICatalogObject* piRoleObj = NULL;
+
+    // get roles collection
+    hr = CpiGetPartitionRolesCollection(pwzPartID, &piRoleColl);
+    ExitOnFailure(hr, "Failed to get roles collection");
+
+    if (S_FALSE == hr)
+        ExitFunction(); // partition roles collection not found, exit with hr = S_FALSE
+
+    // find object
+    hr = CpiFindCollectionObjectByName(piRoleColl, pwzRoleName, &piRoleObj);
+    ExitOnFailure(hr, "Failed to find collection object");
+
+    if (S_FALSE == hr)
+        ExitFunction(); // user not found, exit with hr = S_FALSE
+
+    // get roles collection
+    hr = CpiExecGetCatalogCollection(piRoleColl, piRoleObj, L"UsersInPartitionRole", ppiUsrInRoleColl);
+    ExitOnFailure(hr, "Failed to get catalog collection");
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piRoleColl);
+    ReleaseObject(piRoleObj);
+
+    return hr;
+}
+
+HRESULT CpiGetPartitionUsersCollection(
+    ICatalogCollection** ppiUserColl
+    )
+{
+    HRESULT hr = S_OK;
+
+    // get roles collection
+    hr = CpiExecGetCatalogCollection(L"PartitionUsers", ppiUserColl);
+    ExitOnFailure(hr, "Failed to get catalog collection");
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiExecGetApplicationsCollection(
+    LPCWSTR pwzPartID,
+    ICatalogCollection** ppiAppColl
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICOMAdminCatalog* piCatalog = NULL;
+    ICOMAdminCatalog2* piCatalog2 = NULL;
+    BSTR bstrGlobPartID = NULL;
+
+    ICatalogCollection* piPartColl = NULL;
+    ICatalogObject* piPartObj = NULL;
+
+    // get catalog
+    hr = CpiExecGetAdminCatalog(&piCatalog);
+    ExitOnFailure(hr, "Failed to get COM+ admin catalog");
+
+    // get ICOMAdminCatalog2 interface
+    hr = piCatalog->QueryInterface(IID_ICOMAdminCatalog2, (void**)&piCatalog2);
+
+    // COM+ 1.5 or later
+    if (E_NOINTERFACE != hr)
+    {
+        ExitOnFailure(hr, "Failed to get IID_ICOMAdminCatalog2 interface");
+
+        // partition id
+        if (!pwzPartID || !*pwzPartID)
+        {
+            // get global partition id
+            hr = piCatalog2->get_GlobalPartitionID(&bstrGlobPartID);
+            ExitOnFailure(hr, "Failed to get global partition id");
+        }
+
+        // get partitions collection
+        hr = CpiExecGetPartitionsCollection(&piPartColl);
+        ExitOnFailure(hr, "Failed to get partitions collection");
+
+        // find object
+        hr = CpiFindCollectionObjectByStringKey(piPartColl, bstrGlobPartID ? bstrGlobPartID : pwzPartID, &piPartObj);
+        ExitOnFailure(hr, "Failed to find collection object");
+
+        if (S_FALSE == hr)
+            ExitFunction(); // partition not found, exit with hr = S_FALSE
+
+        // get applications collection
+        hr = CpiExecGetCatalogCollection(piPartColl, piPartObj, L"Applications", ppiAppColl);
+        ExitOnFailure(hr, "Failed to get catalog collection for partition");
+    }
+
+    // COM+ pre 1.5
+    else
+    {
+        // this version of COM+ does not support partitions, make sure a partition was not specified
+        if (pwzPartID && *pwzPartID)
+            ExitOnFailure(hr = E_FAIL, "Partitions are not supported by this version of COM+");
+
+        // get applications collection
+        hr = CpiExecGetCatalogCollection(L"Applications", ppiAppColl);
+        ExitOnFailure(hr, "Failed to get catalog collection");
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piCatalog);
+    ReleaseObject(piCatalog2);
+    ReleaseBSTR(bstrGlobPartID);
+
+    ReleaseObject(piPartColl);
+    ReleaseObject(piPartObj);
+
+    return hr;
+}
+
+HRESULT CpiGetRolesCollection(
+    LPCWSTR pwzPartID,
+    LPCWSTR pwzAppID,
+    ICatalogCollection** ppiRolesColl
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICatalogCollection* piAppColl = NULL;
+    ICatalogObject* piAppObj = NULL;
+
+    // get applications collection
+    hr = CpiExecGetApplicationsCollection(pwzPartID, &piAppColl);
+    ExitOnFailure(hr, "Failed to get applications collection");
+
+    if (S_FALSE == hr)
+        ExitFunction(); // applications collection not found, exit with hr = S_FALSE
+
+    // find object
+    hr = CpiFindCollectionObjectByStringKey(piAppColl, pwzAppID, &piAppObj);
+    ExitOnFailure(hr, "Failed to find collection object");
+
+    if (S_FALSE == hr)
+        ExitFunction(); // application not found, exit with hr = S_FALSE
+
+    // get roles collection
+    hr = CpiExecGetCatalogCollection(piAppColl, piAppObj, L"Roles", ppiRolesColl);
+    ExitOnFailure(hr, "Failed to catalog collection");
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piAppColl);
+    ReleaseObject(piAppObj);
+
+    return hr;
+}
+
+HRESULT CpiGetUsersInRoleCollection(
+    LPCWSTR pwzPartID,
+    LPCWSTR pwzAppID,
+    LPCWSTR pwzRoleName,
+    ICatalogCollection** ppiUsrInRoleColl
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICatalogCollection* piRoleColl = NULL;
+    ICatalogObject* piRoleObj = NULL;
+
+    // get roles collection
+    hr = CpiGetRolesCollection(pwzPartID, pwzAppID, &piRoleColl);
+    ExitOnFailure(hr, "Failed to get roles collection");
+
+    if (S_FALSE == hr)
+        ExitFunction(); // roles collection not found, exit with hr = S_FALSE
+
+    // find object
+    hr = CpiFindCollectionObjectByName(piRoleColl, pwzRoleName, &piRoleObj);
+    ExitOnFailure(hr, "Failed to find collection object");
+
+    if (S_FALSE == hr)
+        ExitFunction(); // role not found, exit with hr = S_FALSE
+
+    // get roles collection
+    hr = CpiExecGetCatalogCollection(piRoleColl, piRoleObj, L"UsersInRole", ppiUsrInRoleColl);
+    ExitOnFailure(hr, "Failed to get catalog collection");
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piRoleColl);
+    ReleaseObject(piRoleObj);
+
+    return hr;
+}
+
+HRESULT CpiGetComponentsCollection(
+    LPCWSTR pwzPartID,
+    LPCWSTR pwzAppID,
+    ICatalogCollection** ppiCompsColl
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICatalogCollection* piAppColl = NULL;
+    ICatalogObject* piAppObj = NULL;
+
+    // get applications collection
+    hr = CpiExecGetApplicationsCollection(pwzPartID, &piAppColl);
+    ExitOnFailure(hr, "Failed to get applications collection");
+
+    if (S_FALSE == hr)
+        ExitFunction(); // applications collection not found, exit with hr = S_FALSE
+
+    // find object
+    hr = CpiFindCollectionObjectByStringKey(piAppColl, pwzAppID, &piAppObj);
+    ExitOnFailure(hr, "Failed to find collection object");
+
+    if (S_FALSE == hr)
+        ExitFunction(); // application not found, exit with hr = S_FALSE
+
+    // get components collection
+    hr = CpiExecGetCatalogCollection(piAppColl, piAppObj, L"Components", ppiCompsColl);
+    ExitOnFailure(hr, "Failed to get catalog collection");
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piAppColl);
+    ReleaseObject(piAppObj);
+
+    return hr;
+}
+
+HRESULT CpiGetInterfacesCollection(
+    ICatalogCollection* piCompColl,
+    ICatalogObject* piCompObj,
+    ICatalogCollection** ppiIntfColl
+    )
+{
+    HRESULT hr = S_OK;
+
+    // get interfaces collection
+    hr = CpiExecGetCatalogCollection(piCompColl, piCompObj, L"InterfacesForComponent", ppiIntfColl);
+    ExitOnFailure(hr, "Failed to get catalog collection");
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiGetMethodsCollection(
+    ICatalogCollection* piIntfColl,
+    ICatalogObject* piIntfObj,
+    ICatalogCollection** ppiMethColl
+    )
+{
+    HRESULT hr = S_OK;
+
+    // get interfaces collection
+    hr = CpiExecGetCatalogCollection(piIntfColl, piIntfObj, L"MethodsForInterface", ppiMethColl);
+    ExitOnFailure(hr, "Failed to get catalog collection");
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiGetSubscriptionsCollection(
+    LPCWSTR pwzPartID,
+    LPCWSTR pwzAppID,
+    LPCWSTR pwzCompCLSID,
+    ICatalogCollection** ppiSubsColl
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICatalogCollection* piCompColl = NULL;
+    ICatalogObject* piCompObj = NULL;
+
+    // get components collection
+    hr = CpiGetComponentsCollection(pwzPartID, pwzAppID, &piCompColl);
+    ExitOnFailure(hr, "Failed to get components collection");
+
+    if (S_FALSE == hr)
+        ExitFunction(); // components collection not found, exit with hr = S_FALSE
+
+    // find object
+    hr = CpiFindCollectionObjectByStringKey(piCompColl, pwzCompCLSID, &piCompObj);
+    ExitOnFailure(hr, "Failed to find collection object");
+
+    if (S_FALSE == hr)
+        ExitFunction(); // component not found, exit with hr = S_FALSE
+
+    // get subscriptions collection
+    hr = CpiExecGetCatalogCollection(piCompColl, piCompObj, L"SubscriptionsForComponent", ppiSubsColl);
+    ExitOnFailure(hr, "Failed to get catalog collection");
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piCompColl);
+    ReleaseObject(piCompObj);
+
+    return hr;
+}
+
+HRESULT CpiReadPropertyList(
+    LPWSTR* ppwzData,
+    CPI_PROPERTY** ppPropList
+    )
+{
+    HRESULT hr = S_OK;
+
+    CPI_PROPERTY* pItm = NULL;
+    LPWSTR pwzName = NULL;
+
+    // clear list if it already contains items
+    if (*ppPropList)
+        CpiFreePropertyList(*ppPropList);
+    *ppPropList = NULL;
+
+    // read property count
+    int iPropCnt = 0;
+    hr = WcaReadIntegerFromCaData(ppwzData, &iPropCnt);
+    ExitOnFailure(hr, "Failed to read property count");
+
+    for (int i = 0; i < iPropCnt; i++)
+    {
+        // allocate new element
+        pItm = (CPI_PROPERTY*)::HeapAlloc(::GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(CPI_PROPERTY));
+        if (!pItm)
+            ExitFunction1(hr = E_OUTOFMEMORY);
+
+        // Name
+        hr = WcaReadStringFromCaData(ppwzData, &pwzName);
+        ExitOnFailure(hr, "Failed to read name");
+        StringCchCopyW(pItm->wzName, countof(pItm->wzName), pwzName);
+
+        // Value
+        hr = WcaReadStringFromCaData(ppwzData, &pItm->pwzValue);
+        ExitOnFailure(hr, "Failed to read property value");
+
+        // add to list
+        if (*ppPropList)
+            pItm->pNext = *ppPropList;
+        *ppPropList = pItm;
+        pItm = NULL;
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseStr(pwzName);
+
+    if (pItm)
+        CpiFreePropertyList(pItm);
+
+    return hr;
+}
+
+void CpiFreePropertyList(
+    CPI_PROPERTY* pList
+    )
+{
+    while (pList)
+    {
+        ReleaseStr(pList->pwzValue);
+
+        CPI_PROPERTY* pDelete = pList;
+        pList = pList->pNext;
+        ::HeapFree(::GetProcessHeap(), 0, pDelete);
+    }
+}
+
+HRESULT CpiWriteKeyToRollbackFile(
+    HANDLE hFile,
+    LPCWSTR pwzKey
+    )
+{
+    HRESULT hr = S_OK;
+
+    WCHAR wzKey[MAX_DARWIN_KEY + 1];
+    ::ZeroMemory(wzKey, sizeof(wzKey));
+    hr = StringCchCopyW(wzKey, countof(wzKey), pwzKey);
+    ExitOnFailure(hr, "Failed to copy key");
+
+    hr = WriteFileAll(hFile, (PBYTE)wzKey, MAX_DARWIN_KEY * sizeof(WCHAR));
+    ExitOnFailure(hr, "Failed to write buffer");
+
+    FlushFileBuffers(hFile);
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiWriteIntegerToRollbackFile(
+    HANDLE hFile,
+    int i
+    )
+{
+    HRESULT hr = S_OK;
+
+    hr = WriteFileAll(hFile, (PBYTE)&i, sizeof(int));
+    ExitOnFailure(hr, "Failed to write buffer");
+
+    FlushFileBuffers(hFile);
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiReadRollbackDataList(
+    HANDLE hFile,
+    CPI_ROLLBACK_DATA** pprdList
+    )
+{
+    HRESULT hr = S_OK;
+
+    int iCount;
+
+    CPI_ROLLBACK_DATA* pItm = NULL;
+
+    // read count
+    hr = ReadFileAll(hFile, (PBYTE)&iCount, sizeof(int));
+    if (HRESULT_FROM_WIN32(ERROR_HANDLE_EOF) == hr)
+        ExitFunction1(hr = S_OK); // EOF reached, nothing left to read
+    ExitOnFailure(hr, "Failed to read count");
+
+    for (int i = 0; i < iCount; i++)
+    {
+        // allocate new element
+        pItm = (CPI_ROLLBACK_DATA*)::HeapAlloc(::GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(CPI_ROLLBACK_DATA));
+        if (!pItm)
+            ExitFunction1(hr = E_OUTOFMEMORY);
+
+        // read from file
+        hr = ReadFileAll(hFile, (PBYTE)pItm->wzKey, MAX_DARWIN_KEY * sizeof(WCHAR));
+        if (HRESULT_FROM_WIN32(ERROR_HANDLE_EOF) == hr)
+            break; // EOF reached, nothing left to read
+        ExitOnFailure(hr, "Failed to read key");
+
+        hr = ReadFileAll(hFile, (PBYTE)&pItm->iStatus, sizeof(int));
+        if (HRESULT_FROM_WIN32(ERROR_HANDLE_EOF) == hr)
+            pItm->iStatus = 0; // EOF reached, the operation was interupted; set status to zero
+        else
+            ExitOnFailure(hr, "Failed to read status");
+
+        // add to list
+        if (*pprdList)
+            pItm->pNext = *pprdList;
+        *pprdList = pItm;
+        pItm = NULL;
+    }
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    if (pItm)
+        CpiFreeRollbackDataList(pItm);
+
+    return hr;
+}
+
+void CpiFreeRollbackDataList(
+    CPI_ROLLBACK_DATA* pList
+    )
+{
+    while (pList)
+    {
+        CPI_ROLLBACK_DATA* pDelete = pList;
+        pList = pList->pNext;
+        ::HeapFree(::GetProcessHeap(), 0, pDelete);
+    }
+}
+
+HRESULT CpiFindRollbackStatus(
+    CPI_ROLLBACK_DATA* pList,
+    LPCWSTR pwzKey,
+    int* piStatus
+    )
+{
+    HRESULT hr = S_OK;
+
+    for (; pList; pList = pList->pNext)
+    {
+        if (0 == lstrcmpW(pList->wzKey, pwzKey))
+        {
+            *piStatus = pList->iStatus;
+            ExitFunction1(hr = S_OK);
+        }
+    }
+
+    hr = S_FALSE;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiAccountNameToSid(
+    LPCWSTR pwzAccountName,
+    PSID* ppSid
+    )
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+    NTSTATUS st = 0;
+
+    PSID pSid = NULL;
+    LSA_OBJECT_ATTRIBUTES loaAttributes;
+    LSA_HANDLE lsahPolicy = NULL;
+    LSA_UNICODE_STRING lusName;
+    PLSA_REFERENCED_DOMAIN_LIST plrdsDomains = NULL;
+    PLSA_TRANSLATED_SID pltsSid = NULL;
+
+    ::ZeroMemory(&loaAttributes, sizeof(loaAttributes));
+    ::ZeroMemory(&lusName, sizeof(lusName));
+
+    // identify well known SIDs
+    for (CPI_WELLKNOWN_SID* pWS = wsWellKnownSids; pWS->pwzName; pWS++)
+    {
+        if (0 == lstrcmpiW(pwzAccountName, pWS->pwzName))
+        {
+            // allocate SID buffer
+            pSid = (PSID)::HeapAlloc(::GetProcessHeap(), HEAP_ZERO_MEMORY, ::GetSidLengthRequired(pWS->nSubAuthorityCount));
+            ExitOnNull(pSid, hr, E_OUTOFMEMORY, "Failed to allocate buffer for SID");
+
+            // initialize SID
+            ::InitializeSid(pSid, &pWS->iaIdentifierAuthority, pWS->nSubAuthorityCount);
+
+            // copy sub autorities
+            for (DWORD i = 0; i < pWS->nSubAuthorityCount; i++)
+                *::GetSidSubAuthority(pSid, i) = pWS->dwSubAuthority[i];
+
+            break;
+        }
+    }
+
+    // lookup name
+    if (!pSid)
+    {
+        // open policy handle
+        st = ::LsaOpenPolicy(NULL, &loaAttributes, POLICY_ALL_ACCESS, &lsahPolicy);
+        er = ::LsaNtStatusToWinError(st);
+        ExitOnFailure(hr = HRESULT_FROM_WIN32(er), "Failed to open policy handle");
+
+        // create account name lsa unicode string
+        hr = InitLsaUnicodeString(&lusName, pwzAccountName, (DWORD)wcslen(pwzAccountName));
+        ExitOnFailure(hr, "Failed to initialize account name string");
+
+        // lookup name
+        st = ::LsaLookupNames(lsahPolicy, 1, &lusName, &plrdsDomains, &pltsSid);
+        er = ::LsaNtStatusToWinError(st);
+        ExitOnFailure(hr = HRESULT_FROM_WIN32(er), "Failed to lookup account names");
+
+        if (SidTypeDomain == pltsSid->Use)
+            ExitOnFailure(hr = HRESULT_FROM_WIN32(ERROR_NOT_SUPPORTED), "Domain SIDs not supported");
+
+        // convert sid
+        hr = CreateSidFromDomainRidPair(plrdsDomains->Domains[pltsSid->DomainIndex].Sid, pltsSid->RelativeId, &pSid);
+        ExitOnFailure(hr, "Failed to convert SID");
+    }
+
+    *ppSid = pSid;
+    pSid = NULL;
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    if (pSid)
+        ::HeapFree(::GetProcessHeap(), 0, pSid);
+    if (lsahPolicy)
+        ::LsaClose(lsahPolicy);
+    if (plrdsDomains)
+        ::LsaFreeMemory(plrdsDomains);
+    if (pltsSid)
+        ::LsaFreeMemory(pltsSid);
+    FreeLsaUnicodeString(&lusName);
+
+    return hr;
+}
+
+HRESULT CpiSidToAccountName(
+    PSID pSid,
+    LPWSTR* ppwzAccountName
+    )
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+    NTSTATUS st = 0;
+
+    LSA_OBJECT_ATTRIBUTES loaAttributes;
+    LSA_HANDLE lsahPolicy = NULL;
+    PLSA_REFERENCED_DOMAIN_LIST plrdsDomains = NULL;
+    PLSA_TRANSLATED_NAME pltnName = NULL;
+
+    LPWSTR pwzDomain = NULL;
+    LPWSTR pwzName = NULL;
+
+    ::ZeroMemory(&loaAttributes, sizeof(loaAttributes));
+
+    // open policy handle
+    st = ::LsaOpenPolicy(NULL, &loaAttributes, POLICY_ALL_ACCESS, &lsahPolicy);
+    er = ::LsaNtStatusToWinError(st);
+    ExitOnFailure(hr = HRESULT_FROM_WIN32(er), "Failed to open policy handle");
+
+    // lookup SID
+    st = ::LsaLookupSids(lsahPolicy, 1, &pSid, &plrdsDomains, &pltnName);
+    er = ::LsaNtStatusToWinError(st);
+    ExitOnFailure(hr = HRESULT_FROM_WIN32(er), "Failed lookup SID");
+
+    if (SidTypeDomain == pltnName->Use)
+        ExitOnFailure(hr = HRESULT_FROM_WIN32(ERROR_NOT_SUPPORTED), "Domain SIDs not supported");
+
+    // format account name string
+    if (SidTypeWellKnownGroup != pltnName->Use)
+    {
+        PLSA_UNICODE_STRING plusDomain = &plrdsDomains->Domains[pltnName->DomainIndex].Name;
+        hr = StrAllocString(&pwzDomain, plusDomain->Buffer, plusDomain->Length / sizeof(WCHAR));
+        ExitOnFailure(hr, "Failed to allocate name string");
+    }
+
+    hr = StrAllocString(&pwzName, pltnName->Name.Buffer, pltnName->Name.Length / sizeof(WCHAR));
+    ExitOnFailure(hr, "Failed to allocate domain string");
+
+    hr = StrAllocFormatted(ppwzAccountName, L"%s\\%s", pwzDomain ? pwzDomain : L"", pwzName);
+    ExitOnFailure(hr, "Failed to format account name string");
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    if (lsahPolicy)
+        ::LsaClose(lsahPolicy);
+    if (plrdsDomains)
+        ::LsaFreeMemory(plrdsDomains);
+    if (pltnName)
+        ::LsaFreeMemory(pltnName);
+
+    ReleaseStr(pwzDomain);
+    ReleaseStr(pwzName);
+
+    return hr;
+}
+
+// helper function definitions
+
+static HRESULT FindUserCollectionObjectIndex(
+    ICatalogCollection* piColl,
+    PSID pSid,
+    int* pi
+    )
+{
+    HRESULT hr = S_OK;
+    UINT er = ERROR_SUCCESS;
+    NTSTATUS st = 0;
+
+    long i = 0;
+    long lCollCnt = 0;
+
+    LSA_OBJECT_ATTRIBUTES loaAttributes;
+    LSA_HANDLE lsahPolicy = NULL;
+    PLSA_UNICODE_STRING plusNames = NULL;
+    PLSA_REFERENCED_DOMAIN_LIST plrdsDomains = NULL;
+    PLSA_TRANSLATED_SID pltsSids = NULL;
+
+    IDispatch* piDisp = NULL;
+    ICatalogObject* piObj = NULL;
+    VARIANT vtVal;
+
+    PSID pTmpSid = NULL;
+
+    PLSA_TRANSLATED_SID pltsSid;
+
+    ::VariantInit(&vtVal);
+    ::ZeroMemory(&loaAttributes, sizeof(loaAttributes));
+
+    // open policy handle
+    st = ::LsaOpenPolicy(NULL, &loaAttributes, POLICY_ALL_ACCESS, &lsahPolicy);
+    er = ::LsaNtStatusToWinError(st);
+    ExitOnFailure(hr = HRESULT_FROM_WIN32(er), "Failed to open policy handle");
+
+    // get number of elements in collection
+    hr = piColl->get_Count(&lCollCnt);
+    ExitOnFailure(hr, "Failed to get to number of objects in collection");
+
+    if (0 == lCollCnt)
+        ExitFunction1(hr = S_FALSE); // not found
+
+    // allocate name buffer
+    plusNames = (PLSA_UNICODE_STRING)::HeapAlloc(::GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(LSA_UNICODE_STRING) * lCollCnt);
+    ExitOnNull(plusNames, hr, E_OUTOFMEMORY, "Failed to allocate names buffer");
+
+    // get accounts in collection
+    for (i = 0; i < lCollCnt; i++)
+    {
+        // get ICatalogObject interface
+        hr = piColl->get_Item(i, &piDisp);
+        ExitOnFailure(hr, "Failed to get object from collection");
+
+        hr = piDisp->QueryInterface(IID_ICatalogObject, (void**)&piObj);
+        ExitOnFailure(hr, "Failed to get IID_ICatalogObject interface");
+
+        // get value
+        hr = piObj->get_Key(&vtVal);
+        ExitOnFailure(hr, "Failed to get key");
+
+        hr = ::VariantChangeType(&vtVal, &vtVal, 0, VT_BSTR);
+        ExitOnFailure(hr, "Failed to change variant type");
+
+        // copy account name string
+        hr = InitLsaUnicodeString(&plusNames[i], vtVal.bstrVal, ::SysStringLen(vtVal.bstrVal));
+        ExitOnFailure(hr, "Failed to initialize account name string");
+
+        // clean up
+        ReleaseNullObject(piDisp);
+        ReleaseNullObject(piObj);
+        ::VariantClear(&vtVal);
+    }
+
+    // lookup names
+    st = ::LsaLookupNames(lsahPolicy, lCollCnt, plusNames, &plrdsDomains, &pltsSids);
+    er = ::LsaNtStatusToWinError(st);
+    if (ERROR_NONE_MAPPED != er && ERROR_SOME_NOT_MAPPED != er)
+        ExitOnFailure(hr = HRESULT_FROM_WIN32(er), "Failed to lookup account names");
+
+    // compare SIDs
+    for (i = 0; i < lCollCnt; i++)
+    {
+        // get SID
+        pltsSid = &pltsSids[i];
+        if (SidTypeDomain == pltsSid->Use || SidTypeInvalid == pltsSid->Use || SidTypeUnknown == pltsSid->Use)
+            continue; // ignore...
+
+        hr = CreateSidFromDomainRidPair(plrdsDomains->Domains[pltsSid->DomainIndex].Sid, pltsSid->RelativeId, &pTmpSid);
+        ExitOnFailure(hr, "Failed to convert SID");
+
+        // compare SIDs
+        if (::EqualSid(pSid, pTmpSid))
+        {
+            *pi = i;
+            ExitFunction1(hr = S_OK);
+        }
+    }
+
+    if (ERROR_NONE_MAPPED == er || ERROR_SOME_NOT_MAPPED == er)
+        hr = HRESULT_FROM_WIN32(er);
+    else
+        hr = S_FALSE; // not found
+
+LExit:
+    // clean up
+    ReleaseObject(piDisp);
+    ReleaseObject(piObj);
+    ::VariantClear(&vtVal);
+
+    if (plusNames)
+    {
+        for (i = 0; i < lCollCnt; i++)
+            FreeLsaUnicodeString(&plusNames[i]);
+        ::HeapFree(::GetProcessHeap(), 0, plusNames);
+    }
+
+    if (lsahPolicy)
+        ::LsaClose(lsahPolicy);
+    if (plrdsDomains)
+        ::LsaFreeMemory(plrdsDomains);
+    if (pltsSids)
+        ::LsaFreeMemory(pltsSids);
+
+    if (pTmpSid)
+        ::HeapFree(::GetProcessHeap(), 0, pTmpSid);
+
+    return hr;
+}
+
+static HRESULT CreateSidFromDomainRidPair(
+    PSID pDomainSid,
+    DWORD dwRid,
+    PSID* ppSid
+    )
+{
+    HRESULT hr = S_OK;
+    PSID pSid = NULL;
+
+    // get domain SID sub authority count
+    UCHAR ucSubAuthorityCount = *::GetSidSubAuthorityCount(pDomainSid);
+
+    // allocate SID buffer
+    DWORD dwLengthRequired = ::GetSidLengthRequired(ucSubAuthorityCount + (UCHAR)1);
+    if (*ppSid)
+    {
+        SIZE_T ccb = ::HeapSize(::GetProcessHeap(), 0, *ppSid);
+        if (-1 == ccb)
+            ExitOnFailure(hr = E_FAIL, "Failed to get size of SID buffer");
+
+        if (ccb < dwLengthRequired)
+        {
+            pSid = (PSID)::HeapReAlloc(::GetProcessHeap(), HEAP_ZERO_MEMORY, *ppSid, dwLengthRequired);
+            ExitOnNull(pSid, hr, E_OUTOFMEMORY, "Failed to reallocate buffer for SID, len: %d", dwLengthRequired);
+            *ppSid = pSid;
+        }
+    }
+    else
+    {
+        *ppSid = (PSID)::HeapAlloc(::GetProcessHeap(), HEAP_ZERO_MEMORY, dwLengthRequired);
+        ExitOnNull(*ppSid, hr, E_OUTOFMEMORY, "Failed to allocate buffer for SID, len: %d", dwLengthRequired);
+    }
+
+    ::InitializeSid(*ppSid, ::GetSidIdentifierAuthority(pDomainSid), ucSubAuthorityCount + (UCHAR)1);
+
+    // copy sub autorities
+    DWORD i = 0;
+    for (; i < ucSubAuthorityCount; i++)
+        *::GetSidSubAuthority(*ppSid, i) = *::GetSidSubAuthority(pDomainSid, i);
+    *::GetSidSubAuthority(*ppSid, i) = dwRid;
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+static HRESULT InitLsaUnicodeString(
+    PLSA_UNICODE_STRING plusStr,
+    LPCWSTR pwzStr,
+    DWORD dwLen
+    )
+{
+    HRESULT hr = S_OK;
+
+    plusStr->Length = (USHORT)dwLen * sizeof(WCHAR);
+    plusStr->MaximumLength = (USHORT)(dwLen + 1) * sizeof(WCHAR);
+
+    plusStr->Buffer = (WCHAR*)::HeapAlloc(::GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(WCHAR) * (dwLen + 1));
+    ExitOnNull(plusStr->Buffer, hr, E_OUTOFMEMORY, "Failed to allocate account name string");
+
+    hr = StringCchCopyW(plusStr->Buffer, dwLen + 1, pwzStr);
+    ExitOnFailure(hr, "Failed to copy buffer");
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+static void FreeLsaUnicodeString(
+    PLSA_UNICODE_STRING plusStr
+    )
+{
+    if (plusStr->Buffer)
+        ::HeapFree(::GetProcessHeap(), 0, plusStr->Buffer);
+}
+
+static HRESULT WriteFileAll(
+    HANDLE hFile,
+    PBYTE pbBuffer,
+    DWORD dwBufferLength
+    )
+{
+    HRESULT hr = S_OK;
+
+    DWORD dwBytesWritten;
+
+    while (dwBufferLength)
+    {
+        if (!::WriteFile(hFile, pbBuffer, dwBufferLength, &dwBytesWritten, NULL))
+            ExitFunction1(hr = HRESULT_FROM_WIN32(::GetLastError()));
+
+        dwBufferLength -= dwBytesWritten;
+        pbBuffer += dwBytesWritten;
+    }
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+static HRESULT ReadFileAll(
+    HANDLE hFile,
+    PBYTE pbBuffer,
+    DWORD dwBufferLength
+    )
+{
+    HRESULT hr = S_OK;
+
+    DWORD dwBytesRead;
+
+    while (dwBufferLength)
+    {
+        if (!::ReadFile(hFile, pbBuffer, dwBufferLength, &dwBytesRead, NULL))
+            ExitFunction1(hr = HRESULT_FROM_WIN32(::GetLastError()));
+
+        if (0 == dwBytesRead)
+            ExitFunction1(hr = HRESULT_FROM_WIN32(ERROR_HANDLE_EOF));
+
+        dwBufferLength -= dwBytesRead;
+        pbBuffer += dwBytesRead;
+    }
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
diff --git a/src/ext/ComPlus/ca/cputilexec.h b/src/ext/ComPlus/ca/cputilexec.h
new file mode 100644
index 00000000..b900883d
--- /dev/null
+++ b/src/ext/ComPlus/ca/cputilexec.h
@@ -0,0 +1,193 @@
+#pragma once
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+
+#define CPI_MAX_GUID 38
+
+enum eActionType { atNoOp = 0, atCreate, atRemove };
+
+
+// structs
+
+struct CPI_PROPERTY
+{
+    WCHAR wzName[MAX_DARWIN_KEY + 1];
+    LPWSTR pwzValue;
+
+    CPI_PROPERTY* pNext;
+};
+
+struct CPI_ROLLBACK_DATA
+{
+    WCHAR wzKey[MAX_DARWIN_KEY + 1];
+    int iStatus;
+
+    CPI_ROLLBACK_DATA* pNext;
+};
+
+
+// function prototypes
+
+void CpiExecInitialize();
+void CpiExecFinalize();
+HRESULT CpiActionStartMessage(
+    LPWSTR* ppwzActionData,
+    BOOL fSuppress
+    );
+HRESULT CpiActionDataMessage(
+    DWORD cArgs,
+    ...
+    );
+HRESULT CpiExecGetAdminCatalog(
+    ICOMAdminCatalog** ppiCatalog
+    );
+HRESULT CpiLogCatalogErrorInfo();
+HRESULT CpiExecGetCatalogCollection(
+    LPCWSTR pwzName,
+    ICatalogCollection** ppiColl
+    );
+HRESULT CpiExecGetCatalogCollection(
+    ICatalogCollection* piColl,
+    ICatalogObject* piObj,
+    LPCWSTR pwzName,
+    ICatalogCollection** ppiColl
+    );
+HRESULT CpiAddCollectionObject(
+    ICatalogCollection* piColl,
+    ICatalogObject** ppiObj
+    );
+HRESULT CpiPutCollectionObjectValue(
+    ICatalogObject* piObj,
+    LPCWSTR pwzPropName,
+    LPCWSTR pwzValue
+    );
+HRESULT CpiPutCollectionObjectValues(
+    ICatalogObject* piObj,
+    CPI_PROPERTY* pPropList
+    );
+HRESULT CpiGetCollectionObjectValue(
+    ICatalogObject* piObj,
+    LPCWSTR szPropName,
+    LPWSTR* ppwzValue
+    );
+HRESULT CpiResetObjectProperty(
+    ICatalogCollection* piColl,
+    ICatalogObject* piObj,
+    LPCWSTR pwzPropName
+    );
+HRESULT CpiRemoveCollectionObject(
+    ICatalogCollection* piColl,
+    LPCWSTR pwzID,
+    LPCWSTR pwzName,
+    BOOL fResetDeleteable
+    );
+HRESULT CpiRemoveUserCollectionObject(
+    ICatalogCollection* piColl,
+    PSID pSid
+    );
+HRESULT CpiFindCollectionObjectByStringKey(
+    ICatalogCollection* piColl,
+    LPCWSTR pwzKey,
+    ICatalogObject** ppiObj
+    );
+HRESULT CpiFindCollectionObjectByIntegerKey(
+    ICatalogCollection* piColl,
+    long lKey,
+    ICatalogObject** ppiObj
+    );
+HRESULT CpiFindCollectionObjectByName(
+    ICatalogCollection* piColl,
+    LPCWSTR pwzName,
+    ICatalogObject** ppiObj
+    );
+HRESULT CpiFindUserCollectionObject(
+    ICatalogCollection* piColl,
+    PSID pSid,
+    ICatalogObject** ppiObj
+    );
+HRESULT CpiExecGetPartitionsCollection(
+    ICatalogCollection** ppiPartColl
+    );
+HRESULT CpiGetPartitionRolesCollection(
+    LPCWSTR pwzPartID,
+    ICatalogCollection** ppiRolesColl
+    );
+HRESULT CpiGetUsersInPartitionRoleCollection(
+    LPCWSTR pwzPartID,
+    LPCWSTR pwzRoleName,
+    ICatalogCollection** ppiUsrInRoleColl
+    );
+HRESULT CpiGetPartitionUsersCollection(
+    ICatalogCollection** ppiUserColl
+    );
+HRESULT CpiExecGetApplicationsCollection(
+    LPCWSTR pwzPartID,
+    ICatalogCollection** ppiAppColl
+    );
+HRESULT CpiGetRolesCollection(
+    LPCWSTR pwzPartID,
+    LPCWSTR pwzAppID,
+    ICatalogCollection** ppiRolesColl
+    );
+HRESULT CpiGetUsersInRoleCollection(
+    LPCWSTR pwzPartID,
+    LPCWSTR pwzAppID,
+    LPCWSTR pwzRoleName,
+    ICatalogCollection** ppiUsrInRoleColl
+    );
+HRESULT CpiGetComponentsCollection(
+    LPCWSTR pwzPartID,
+    LPCWSTR pwzAppID,
+    ICatalogCollection** ppiCompsColl
+    );
+HRESULT CpiGetInterfacesCollection(
+    ICatalogCollection* piCompColl,
+    ICatalogObject* piCompObj,
+    ICatalogCollection** ppiIntfColl
+    );
+HRESULT CpiGetMethodsCollection(
+    ICatalogCollection* piIntfColl,
+    ICatalogObject* piIntfObj,
+    ICatalogCollection** ppiMethColl
+    );
+HRESULT CpiGetSubscriptionsCollection(
+    LPCWSTR pwzPartID,
+    LPCWSTR pwzAppID,
+    LPCWSTR pwzCompCLSID,
+    ICatalogCollection** ppiCompsColl
+    );
+HRESULT CpiReadPropertyList(
+    LPWSTR* ppwzData,
+    CPI_PROPERTY** ppPropList
+    );
+void CpiFreePropertyList(
+    CPI_PROPERTY* pList
+    );
+HRESULT CpiWriteKeyToRollbackFile(
+    HANDLE hFile,
+    LPCWSTR pwzKey
+    );
+HRESULT CpiWriteIntegerToRollbackFile(
+    HANDLE hFile,
+    int i
+    );
+HRESULT CpiReadRollbackDataList(
+    HANDLE hFile,
+    CPI_ROLLBACK_DATA** pprdList
+    );
+void CpiFreeRollbackDataList(
+    CPI_ROLLBACK_DATA* pList
+    );
+HRESULT CpiFindRollbackStatus(
+    CPI_ROLLBACK_DATA* pList,
+    LPCWSTR pwzKey,
+    int* piStatus
+    );
+HRESULT CpiAccountNameToSid(
+    LPCWSTR pwzAccountName,
+    PSID* ppSid
+    );
+HRESULT CpiSidToAccountName(
+    PSID pSid,
+    LPWSTR* ppwzAccountName
+    );
diff --git a/src/ext/ComPlus/ca/cputilsched.cpp b/src/ext/ComPlus/ca/cputilsched.cpp
new file mode 100644
index 00000000..1a958c56
--- /dev/null
+++ b/src/ext/ComPlus/ca/cputilsched.cpp
@@ -0,0 +1,885 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+#include "precomp.h"
+
+
+// sql queries
+
+LPCWSTR vcsActionTextQuery =
+    L"SELECT `Description`, `Template` FROM `ActionText` WHERE `Action` = ?";
+enum eActionTextQuery { atqDescription = 1, atqTemplate };
+
+LPCWSTR vcsComponentAttributesQuery =
+    L"SELECT `Attributes` FROM `Component` WHERE `Component` = ?";
+enum eComponentAttributesQuery { caqAttributes = 1 };
+
+LPCWSTR vcsUserQuery = L"SELECT `Domain`, `Name` FROM `User` WHERE `User` = ?";
+enum eUserQuery { uqDomain = 1, uqName };
+
+enum ePropertyQuery { pqName = 1, pqValue };
+
+
+// prototypes for private helper functions
+
+static HRESULT FindPropertyDefinition(
+    CPI_PROPERTY_DEFINITION* pPropDefList,
+    LPCWSTR pwzName,
+    CPI_PROPERTY_DEFINITION** ppPropDef
+    );
+static HRESULT GetUserAccountName(
+    LPCWSTR pwzKey,
+    LPWSTR* ppwzAccount
+    );
+
+
+// variables
+
+static ICOMAdminCatalog* gpiCatalog;
+static ICatalogCollection* gpiPartColl;
+static ICatalogCollection* gpiAppColl;
+
+static int giTables;
+
+
+// function definitions
+
+void CpiSchedInitialize()
+{
+    // collections
+    gpiCatalog = NULL;
+    gpiPartColl = NULL;
+    gpiAppColl = NULL;
+
+    // tables
+    giTables = 0;
+
+    if (S_OK == WcaTableExists(L"ComPlusPartition"))               giTables |= cptComPlusPartition;
+    if (S_OK == WcaTableExists(L"ComPlusPartitionProperty"))       giTables |= cptComPlusPartitionProperty;
+    if (S_OK == WcaTableExists(L"ComPlusPartitionRole"))           giTables |= cptComPlusPartitionRole;
+    if (S_OK == WcaTableExists(L"ComPlusUserInPartitionRole"))     giTables |= cptComPlusUserInPartitionRole;
+    if (S_OK == WcaTableExists(L"ComPlusGroupInPartitionRole"))    giTables |= cptComPlusGroupInPartitionRole;
+    if (S_OK == WcaTableExists(L"ComPlusPartitionUser"))           giTables |= cptComPlusPartitionUser;
+    if (S_OK == WcaTableExists(L"ComPlusApplication"))             giTables |= cptComPlusApplication;
+    if (S_OK == WcaTableExists(L"ComPlusApplicationProperty"))     giTables |= cptComPlusApplicationProperty;
+    if (S_OK == WcaTableExists(L"ComPlusApplicationRole"))         giTables |= cptComPlusApplicationRole;
+    if (S_OK == WcaTableExists(L"ComPlusApplicationRoleProperty")) giTables |= cptComPlusApplicationRoleProperty;
+    if (S_OK == WcaTableExists(L"ComPlusUserInApplicationRole"))   giTables |= cptComPlusUserInApplicationRole;
+    if (S_OK == WcaTableExists(L"ComPlusGroupInApplicationRole"))  giTables |= cptComPlusGroupInApplicationRole;
+    if (S_OK == WcaTableExists(L"ComPlusAssembly"))                giTables |= cptComPlusAssembly;
+    if (S_OK == WcaTableExists(L"ComPlusAssemblyDependency"))      giTables |= cptComPlusAssemblyDependency;
+    if (S_OK == WcaTableExists(L"ComPlusComponent"))               giTables |= cptComPlusComponent;
+    if (S_OK == WcaTableExists(L"ComPlusComponentProperty"))       giTables |= cptComPlusComponentProperty;
+    if (S_OK == WcaTableExists(L"ComPlusRoleForComponent"))        giTables |= cptComPlusRoleForComponent;
+    if (S_OK == WcaTableExists(L"ComPlusInterface"))               giTables |= cptComPlusInterface;
+    if (S_OK == WcaTableExists(L"ComPlusInterfaceProperty"))       giTables |= cptComPlusInterfaceProperty;
+    if (S_OK == WcaTableExists(L"ComPlusRoleForInterface"))        giTables |= cptComPlusRoleForInterface;
+    if (S_OK == WcaTableExists(L"ComPlusMethod"))                  giTables |= cptComPlusMethod;
+    if (S_OK == WcaTableExists(L"ComPlusMethodProperty"))          giTables |= cptComPlusMethodProperty;
+    if (S_OK == WcaTableExists(L"ComPlusRoleForMethod"))           giTables |= cptComPlusRoleForMethod;
+    if (S_OK == WcaTableExists(L"ComPlusSubscription"))            giTables |= cptComPlusSubscription;
+    if (S_OK == WcaTableExists(L"ComPlusSubscriptionProperty"))    giTables |= cptComPlusSubscriptionProperty;
+}
+
+void CpiSchedFinalize()
+{
+    // collections
+    ReleaseObject(gpiCatalog);
+    ReleaseObject(gpiPartColl);
+    ReleaseObject(gpiAppColl);
+}
+
+BOOL CpiTableExists(
+    int iTable
+    )
+{
+    return (giTables & iTable) == iTable;
+}
+
+HRESULT CpiSchedGetAdminCatalog(
+    ICOMAdminCatalog** ppiCatalog
+    )
+{
+    HRESULT hr = S_OK;
+
+    if (!gpiCatalog)
+    {
+        // get collection
+        hr = ::CoCreateInstance(CLSID_COMAdminCatalog, NULL, CLSCTX_ALL, IID_ICOMAdminCatalog, (void**)&gpiCatalog); 
+        ExitOnFailure(hr, "Failed to create COM+ admin catalog object");
+    }
+
+    // return value
+    gpiCatalog->AddRef();
+    *ppiCatalog = gpiCatalog;
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiSchedGetCatalogCollection(
+    LPCWSTR pwzName,
+    ICatalogCollection** ppiColl
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICOMAdminCatalog* piCatalog = NULL;
+    IDispatch* piDisp = NULL;
+    BSTR bstrName = NULL;
+
+    // copy name string
+    bstrName = ::SysAllocString(pwzName);
+    ExitOnNull(bstrName, hr, E_OUTOFMEMORY, "Failed to allocate BSTR for collection name");
+
+    // get catalog
+    hr = CpiSchedGetAdminCatalog(&piCatalog);
+    ExitOnFailure(hr, "Failed to get COM+ admin catalog");
+
+    // get collecton from catalog
+    hr = piCatalog->GetCollection(bstrName, &piDisp);
+    ExitOnFailure(hr, "Failed to get collection");
+
+    hr = piDisp->QueryInterface(IID_ICatalogCollection, (void**)ppiColl);
+    ExitOnFailure(hr, "Failed to get IID_ICatalogCollection interface");
+
+    // populate collection
+    hr = (*ppiColl)->Populate();
+    ExitOnFailure(hr, "Failed to populate collection");
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piCatalog);
+    ReleaseObject(piDisp);
+    ReleaseBSTR(bstrName);
+
+    return hr;
+}
+
+HRESULT CpiSchedGetCatalogCollection(
+    ICatalogCollection* piColl,
+    ICatalogObject* piObj,
+    LPCWSTR pwzName,
+    ICatalogCollection** ppiColl
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICOMAdminCatalog* piCatalog = NULL;
+    IDispatch* piDisp = NULL;
+    BSTR bstrName = NULL;
+
+    VARIANT vtKey;
+    ::VariantInit(&vtKey);
+
+    // copy name string
+    bstrName = ::SysAllocString(pwzName);
+    ExitOnNull(bstrName, hr, E_OUTOFMEMORY, "Failed to allocate BSTR for collection name");
+
+    // get catalog
+    hr = CpiSchedGetAdminCatalog(&piCatalog);
+    ExitOnFailure(hr, "Failed to get COM+ admin catalog");
+
+    // get key
+    hr = piObj->get_Key(&vtKey);
+    ExitOnFailure(hr, "Failed to get object key");
+
+    // get collecton from catalog
+    hr = piColl->GetCollection(bstrName, vtKey, &piDisp);
+    ExitOnFailure(hr, "Failed to get collection");
+
+    hr = piDisp->QueryInterface(IID_ICatalogCollection, (void**)ppiColl);
+    ExitOnFailure(hr, "Failed to get IID_ICatalogCollection interface");
+
+    // populate collection
+    hr = (*ppiColl)->Populate();
+    ExitOnFailure(hr, "Failed to populate collection");
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piCatalog);
+    ReleaseObject(piDisp);
+    ReleaseBSTR(bstrName);
+    ::VariantClear(&vtKey);
+
+    return hr;
+}
+
+HRESULT CpiGetKeyForObject(
+    ICatalogObject* piObj,
+    LPWSTR pwzKey,
+    SIZE_T cchKey
+    )
+{
+    HRESULT hr = S_OK;
+
+    VARIANT vtKey;
+    ::VariantInit(&vtKey);
+
+    // get key
+    hr = piObj->get_Key(&vtKey);
+    ExitOnFailure(hr, "Failed to get key");
+
+    // change variant type
+    hr = ::VariantChangeType(&vtKey, &vtKey, 0, VT_BSTR);
+    ExitOnFailure(hr, "Failed to change variant type");
+
+    // copy key
+    hr = StringCchCopyW(pwzKey, cchKey, vtKey.bstrVal);
+    ExitOnFailure(hr, "Failed to copy key");
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ::VariantClear(&vtKey);
+
+    return hr;
+}
+
+HRESULT CpiFindCollectionObject(
+    ICatalogCollection* piColl,
+    LPCWSTR pwzID,
+    LPCWSTR pwzName,
+    ICatalogObject** ppiObj
+    )
+{
+    HRESULT hr = S_OK;
+
+    IDispatch* piDisp = NULL;
+    ICatalogObject* piObj = NULL;
+
+    VARIANT vtVal;
+    ::VariantInit(&vtVal);
+
+    long lCnt;
+    hr = piColl->get_Count(&lCnt);
+    ExitOnFailure(hr, "Failed to get to number of items in collection");
+
+    for (long i = 0; i < lCnt; i++)
+    {
+        // get ICatalogObject interface
+        hr = piColl->get_Item(i, &piDisp);
+        ExitOnFailure(hr, "Failed to get object from collection");
+
+        hr = piDisp->QueryInterface(IID_ICatalogObject, (void**)&piObj);
+        ExitOnFailure(hr, "Failed to get IID_ICatalogObject interface");
+
+        // compare id
+        if (pwzID && *pwzID)
+        {
+            hr = piObj->get_Key(&vtVal);
+            ExitOnFailure(hr, "Failed to get key");
+
+            hr = ::VariantChangeType(&vtVal, &vtVal, 0, VT_BSTR);
+            ExitOnFailure(hr, "Failed to change variant type");
+
+            if (0 == lstrcmpiW(vtVal.bstrVal, pwzID))
+            {
+                if (ppiObj)
+                {
+                    *ppiObj = piObj;
+                    piObj = NULL;
+                }
+                ExitFunction1(hr = S_OK);
+            }
+
+            ::VariantClear(&vtVal);
+        }
+
+        // compare name
+        if (pwzName && *pwzName)
+        {
+            hr = piObj->get_Name(&vtVal);
+            ExitOnFailure(hr, "Failed to get name");
+
+            hr = ::VariantChangeType(&vtVal, &vtVal, 0, VT_BSTR);
+            ExitOnFailure(hr, "Failed to change variant type");
+
+            if (0 == lstrcmpW(vtVal.bstrVal, pwzName))
+            {
+                if (ppiObj)
+                {
+                    *ppiObj = piObj;
+                    piObj = NULL;
+                }
+                ExitFunction1(hr = S_OK);
+            }
+
+            ::VariantClear(&vtVal);
+        }
+
+        // release interface pointers
+        ReleaseNullObject(piDisp);
+        ReleaseNullObject(piObj);
+    }
+
+    hr = S_FALSE;
+
+LExit:
+    // clean up
+    ReleaseObject(piDisp);
+    ReleaseObject(piObj);
+
+    ::VariantClear(&vtVal);
+
+    return hr;
+}
+
+HRESULT CpiSchedGetPartitionsCollection(
+    ICatalogCollection** ppiPartColl
+    )
+{
+    HRESULT hr = S_OK;
+
+    if (!gpiPartColl)
+    {
+        // get collection
+        hr = CpiSchedGetCatalogCollection(L"Partitions", &gpiPartColl);
+        ExitOnFailure(hr, "Failed to get partitions collection");
+    }
+
+    // return value
+    gpiPartColl->AddRef();
+    *ppiPartColl = gpiPartColl;
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiSchedGetApplicationsCollection(
+    ICatalogCollection** ppiAppColl
+    )
+{
+    HRESULT hr = S_OK;
+
+    ICOMAdminCatalog* piCatalog = NULL;
+    ICOMAdminCatalog2* piCatalog2 = NULL;
+    ICatalogCollection* piPartColl = NULL;
+    ICatalogObject* piPartObj = NULL;
+    BSTR bstrGlobPartID = NULL;
+
+    if (!gpiAppColl)
+    {
+        // get catalog
+        hr = CpiSchedGetAdminCatalog(&piCatalog);
+        ExitOnFailure(hr, "Failed to get COM+ admin catalog");
+
+        // get ICOMAdminCatalog2 interface
+        hr = piCatalog->QueryInterface(IID_ICOMAdminCatalog2, (void**)&piCatalog2);
+
+        // COM+ 1.5 or later
+        if (E_NOINTERFACE != hr)
+        {
+            ExitOnFailure(hr, "Failed to get IID_ICOMAdminCatalog2 interface");
+
+            // get global partition id
+            hr = piCatalog2->get_GlobalPartitionID(&bstrGlobPartID);
+            ExitOnFailure(hr, "Failed to get global partition id");
+
+            // get partitions collection
+            hr = CpiSchedGetPartitionsCollection(&piPartColl);
+            ExitOnFailure(hr, "Failed to get partitions collection");
+
+            // find object
+            hr = CpiFindCollectionObject(piPartColl, bstrGlobPartID, NULL, &piPartObj);
+            ExitOnFailure(hr, "Failed to find collection object");
+
+            if (S_FALSE == hr)
+                ExitFunction(); // partition not found, exit with hr = S_FALSE
+
+            // get applications collection
+            hr = CpiSchedGetCatalogCollection(piPartColl, piPartObj, L"Applications", &gpiAppColl);
+            ExitOnFailure(hr, "Failed to get applications collection");
+        }
+
+        // COM+ pre 1.5
+        else
+        {
+            // get applications collection
+            hr = CpiSchedGetCatalogCollection(L"Applications", &gpiAppColl);
+            ExitOnFailure(hr, "Failed to get applications collection");
+        }
+    }
+
+    // return value
+    gpiAppColl->AddRef();
+    *ppiAppColl = gpiAppColl;
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseObject(piCatalog);
+    ReleaseObject(piCatalog2);
+    ReleaseObject(piPartColl);
+    ReleaseObject(piPartObj);
+    ReleaseBSTR(bstrGlobPartID);
+
+    return hr;
+}
+
+HRESULT CpiAddActionTextToActionData(
+    LPCWSTR pwzAction,
+    LPWSTR* ppwzActionData
+    )
+{
+    HRESULT hr = S_OK;
+
+    PMSIHANDLE hView, hRecKey, hRec;
+
+    LPWSTR pwzDescription = NULL;
+    LPWSTR pwzTemplate = NULL;
+
+    if (S_OK == WcaTableExists(L"ActionText"))
+    {
+        // create parameter record
+        hRecKey = ::MsiCreateRecord(1);
+        ExitOnNull(hRecKey, hr, E_OUTOFMEMORY, "Failed to create record");
+        hr = WcaSetRecordString(hRecKey, 1, pwzAction);
+        ExitOnFailure(hr, "Failed to set record string");
+
+        // open view
+        hr = WcaOpenView(vcsActionTextQuery, &hView);
+        ExitOnFailure(hr, "Failed to open view on ActionText table");
+        hr = WcaExecuteView(hView, hRecKey);
+        ExitOnFailure(hr, "Failed to execute view on ActionText table");
+
+        // fetch record
+        hr = WcaFetchSingleRecord(hView, &hRec);
+        if (S_FALSE != hr)
+        {
+            ExitOnFailure(hr, "Failed to fetch action text record");
+
+            // get description
+            hr = WcaGetRecordString(hRec, atqDescription, &pwzDescription);
+            ExitOnFailure(hr, "Failed to get description");
+
+            // get template
+            hr = WcaGetRecordString(hRec, atqTemplate, &pwzTemplate);
+            ExitOnFailure(hr, "Failed to get template");
+        }
+    }
+
+    // add action name to action data
+    hr = WcaWriteStringToCaData(pwzAction, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add action name to custom action data");
+
+    // add description to action data
+    hr = WcaWriteStringToCaData(pwzDescription ? pwzDescription : L"", ppwzActionData);
+    ExitOnFailure(hr, "Failed to add description to custom action data");
+
+    // add template to action data
+    hr = WcaWriteStringToCaData(pwzTemplate ? pwzTemplate : L"", ppwzActionData);
+    ExitOnFailure(hr, "Failed to add template to custom action data");
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseStr(pwzDescription);
+    ReleaseStr(pwzTemplate);
+
+    return hr;
+}
+
+HRESULT CpiVerifyComponentArchitecure(
+    LPCWSTR pwzComponent,
+    BOOL* pfMatchingArchitecture
+    )
+{
+    HRESULT hr = S_OK;
+
+    PMSIHANDLE hView, hRecKey, hRec;
+
+    int iAttributes = 0;
+
+    if (S_OK == WcaTableExists(L"Component"))
+    {
+        // create parameter record
+        hRecKey = ::MsiCreateRecord(1);
+        ExitOnNull(hRecKey, hr, E_OUTOFMEMORY, "Failed to create record");
+        hr = WcaSetRecordString(hRecKey, 1, pwzComponent);
+        ExitOnFailure(hr, "Failed to set record string");
+
+        // open view
+        hr = WcaOpenView(vcsComponentAttributesQuery, &hView);
+        ExitOnFailure(hr, "Failed to open view on ActionText table");
+        hr = WcaExecuteView(hView, hRecKey);
+        ExitOnFailure(hr, "Failed to execute view on ActionText table");
+
+        // fetch record
+        hr = WcaFetchSingleRecord(hView, &hRec);
+        if (S_FALSE != hr)
+        {
+            ExitOnFailure(hr, "Failed to fetch component record");
+
+            hr = WcaGetRecordInteger(hRec, caqAttributes, &iAttributes);
+            ExitOnFailure(hr, "Failed to get component attributes");
+        }
+    }
+
+    // return values
+#ifdef _WIN64
+    *pfMatchingArchitecture = 256 == (iAttributes & 256);
+#else
+    *pfMatchingArchitecture = 256 != (iAttributes & 256);
+#endif
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiPropertiesRead(
+    LPCWSTR pwzQuery,
+    LPCWSTR pwzKey,
+    CPI_PROPERTY_DEFINITION* pPropDefList,
+    CPI_PROPERTY** ppPropList,
+    int* piCount
+    )
+{
+    HRESULT hr = S_OK;
+
+    PMSIHANDLE hView, hRecKey, hRec;
+
+    CPI_PROPERTY* pItm = NULL;
+    LPWSTR pwzData = NULL;
+
+    int iVersionNT = 0;
+
+    CPI_PROPERTY_DEFINITION* pPropDef;
+
+    *piCount = 0;
+
+    // get NT version
+    hr = WcaGetIntProperty(L"VersionNT", &iVersionNT);
+    ExitOnFailure(hr, "Failed to set record string");
+
+    // create parameter record
+    hRecKey = ::MsiCreateRecord(1);
+    ExitOnNull(hRecKey, hr, E_OUTOFMEMORY, "Failed to create record");
+    hr = WcaSetRecordString(hRecKey, 1, pwzKey);
+    ExitOnFailure(hr, "Failed to set record string");
+
+    // open view
+    hr = WcaOpenView(pwzQuery, &hView);
+    ExitOnFailure(hr, "Failed to open view on property table");
+    hr = WcaExecuteView(hView, hRecKey);
+    ExitOnFailure(hr, "Failed to execute view on property table");
+
+    while (S_OK == (hr = WcaFetchRecord(hView, &hRec)))
+    {
+        // create entry
+        pItm = (CPI_PROPERTY*)::HeapAlloc(::GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(CPI_PROPERTY));
+        if (!pItm)
+            ExitFunction1(hr = E_OUTOFMEMORY);
+
+        // get name
+        hr = WcaGetRecordString(hRec, pqName, &pwzData);
+        ExitOnFailure(hr, "Failed to get name");
+        StringCchCopyW(pItm->wzName, countof(pItm->wzName), pwzData);
+
+        // get value
+        hr = WcaGetRecordFormattedString(hRec, pqValue, &pItm->pwzValue);
+        ExitOnFailure(hr, "Failed to get value");
+
+        // find property definition
+        hr = FindPropertyDefinition(pPropDefList, pItm->wzName, &pPropDef);
+        ExitOnFailure(hr, "Failed to find property definition");
+
+        if (S_FALSE == hr)
+            ExitOnFailure(hr = HRESULT_FROM_WIN32(ERROR_NOT_FOUND), "Unknown property, key: %S, property: %S", pwzKey, pItm->wzName);
+
+        // check version, ignore if catalog version is too low
+        if (iVersionNT < pPropDef->iMinVersionNT)
+        {
+            WcaLog(LOGMSG_VERBOSE, "Skipping property since NT version is too low, key: %S, property: %S", pwzKey, pItm->wzName);
+            CpiPropertiesFreeList(pItm);
+            pItm = NULL;
+            continue;
+        }
+
+        // if the property is a user, replace the User table key with a user account name
+        if (cpptUser == pPropDef->iType)
+        {
+            hr = GetUserAccountName(pItm->pwzValue, &pItm->pwzValue);
+            ExitOnFailure(hr, "Failed to get user account name");
+        }
+
+        // add entry
+        ++*piCount;
+        if (*ppPropList)
+            pItm->pNext = *ppPropList;
+        *ppPropList = pItm;
+        pItm = NULL;
+    }
+
+    if (E_NOMOREITEMS == hr)
+        hr = S_OK;
+
+LExit:
+    // clean up
+    if (pItm)
+        CpiPropertiesFreeList(pItm);
+
+    ReleaseStr(pwzData);
+
+    return hr;
+}
+
+void CpiPropertiesFreeList(
+    CPI_PROPERTY* pList
+    )
+{
+    while (pList)
+    {
+        ReleaseStr(pList->pwzValue);
+
+        CPI_PROPERTY* pDelete = pList;
+        pList = pList->pNext;
+        ::HeapFree(::GetProcessHeap(), 0, pDelete);
+    }
+}
+
+HRESULT CpiAddPropertiesToActionData(
+    int iPropCount,
+    CPI_PROPERTY* pPropList,
+    LPWSTR* ppwzActionData
+    )
+{
+    HRESULT hr = S_OK;
+
+    hr = WcaWriteIntegerToCaData(iPropCount, ppwzActionData);
+    ExitOnFailure(hr, "Failed to add count to custom action data");
+
+    if (iPropCount) // count might be 0 event thought there are elements in the list
+    {
+        for (CPI_PROPERTY* pProp = pPropList; pProp; pProp = pProp->pNext)
+        {
+            hr = WcaWriteStringToCaData(pProp->wzName, ppwzActionData);
+            ExitOnFailure(hr, "Failed to add property name to custom action data, name: %S", pProp->wzName);
+
+            hr = WcaWriteStringToCaData(pProp->pwzValue, ppwzActionData);
+            ExitOnFailure(hr, "Failed to add property value to custom action data, name: %S", pProp->wzName);
+        }
+    }
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiBuildAccountName(
+    LPCWSTR pwzDomain,
+    LPCWSTR pwzName,
+    LPWSTR* ppwzAccount
+    )
+{
+    HRESULT hr = S_OK;
+
+    WCHAR wzComputerName[MAX_COMPUTERNAME_LENGTH + 1];
+    ::ZeroMemory(wzComputerName, sizeof(wzComputerName));
+
+    // if domain is '.', get computer name
+    if (0 == lstrcmpW(pwzDomain, L"."))
+    {
+        DWORD dwSize = countof(wzComputerName);
+        if (!::GetComputerNameW(wzComputerName, &dwSize))
+            ExitOnFailure(hr = HRESULT_FROM_WIN32(::GetLastError()), "Failed to get computer name");
+    }
+
+    // build account name
+    hr = StrAllocFormatted(ppwzAccount, L"%s\\%s", *wzComputerName ? wzComputerName : pwzDomain, pwzName);
+    ExitOnFailure(hr, "Failed to build domain user name");
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiGetTempFileName(
+    LPWSTR* ppwzTempFile
+    )
+{
+    HRESULT hr = S_OK;
+
+    // get temp path
+    WCHAR wzTempPath[MAX_PATH];
+    DWORD dw = ::GetTempPathW(countof(wzTempPath), wzTempPath);
+    if (countof(wzTempPath) <= dw)
+        ExitOnFailure(hr = E_FAIL, "TEMP directory path too long");
+
+    // get unique number
+    LARGE_INTEGER liCount;
+    if (!::QueryPerformanceCounter(&liCount))
+        ExitOnFailure(hr = HRESULT_FROM_WIN32(::GetLastError()), "Failed to query performance counter");
+
+    // create temp file name
+    hr = StrAllocFormatted(ppwzTempFile, L"%sCPI%I64X.tmp", wzTempPath, liCount.QuadPart);
+    ExitOnFailure(hr, "Failed to create temp file name string");
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+HRESULT CpiCreateId(
+    LPWSTR pwzDest,
+    SIZE_T cchDest
+    )
+{
+    HRESULT hr = S_OK;
+
+    GUID guid;
+
+    // create new guid
+    hr = ::CoCreateGuid(&guid);
+    ExitOnFailure(hr, "Failed to create new guid");
+
+    // convert guid to string
+    if (0 == ::StringFromGUID2(guid, pwzDest, (int)cchDest))
+        ExitOnFailure(hr = E_FAIL, "Failed to convert guid to string");
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+BOOL CpiIsInstalled(
+    INSTALLSTATE isInstalled
+    )
+{
+    return INSTALLSTATE_LOCAL == isInstalled || INSTALLSTATE_SOURCE == isInstalled;
+}
+
+BOOL CpiWillBeInstalled(
+    INSTALLSTATE isInstalled,
+    INSTALLSTATE isAction
+    )
+{
+    return WcaIsInstalling(isInstalled, isAction) ||
+        (CpiIsInstalled(isInstalled) && !WcaIsUninstalling(isInstalled, isAction));
+}
+
+HRESULT PcaGuidToRegFormat(
+    LPWSTR pwzGuid,
+    LPWSTR pwzDest,
+    SIZE_T cchDest
+    )
+{
+    HRESULT hr = S_OK;
+
+    GUID guid = GUID_NULL;
+    int cch = 0;
+
+    WCHAR wz[39];
+    ::ZeroMemory(wz, sizeof(wz));
+
+    cch = lstrlenW(pwzGuid);
+
+    if (38 == cch && L'{' == pwzGuid[0] && L'}' == pwzGuid[37])
+        StringCchCopyW(wz, countof(wz), pwzGuid);
+    else if (36 == cch)
+        StringCchPrintfW(wz, countof(wz), L"{%s}", pwzGuid);
+    else
+        ExitFunction1(hr = E_INVALIDARG);
+
+    // convert string to guid
+    hr = ::CLSIDFromString(wz, &guid);
+    ExitOnFailure(hr, "Failed to parse guid string");
+
+    // convert guid to string
+    if (0 == ::StringFromGUID2(guid, pwzDest, (int)cchDest))
+        ExitOnFailure(hr = E_FAIL, "Failed to convert guid to string");
+
+    hr = S_OK;
+
+LExit:
+    return hr;
+}
+
+
+// helper function definitions
+
+static HRESULT FindPropertyDefinition(
+    CPI_PROPERTY_DEFINITION* pPropDefList,
+    LPCWSTR pwzName,
+    CPI_PROPERTY_DEFINITION** ppPropDef
+    )
+{
+    for (CPI_PROPERTY_DEFINITION* pItm = pPropDefList; pItm->pwzName; pItm++)
+    {
+        if (0 == lstrcmpW(pItm->pwzName, pwzName))
+        {
+            *ppPropDef = pItm;
+            return S_OK;
+        }
+    }
+
+    return S_FALSE;
+}
+
+static HRESULT GetUserAccountName(
+    LPCWSTR pwzKey,
+    LPWSTR* ppwzAccount
+    )
+{
+    HRESULT hr = S_OK;
+
+    PMSIHANDLE hView, hRecKey, hRec;
+
+    LPWSTR pwzDomain = NULL;
+    LPWSTR pwzName = NULL;
+
+    // create parameter record
+    hRecKey = ::MsiCreateRecord(1);
+    ExitOnNull(hRecKey, hr, E_OUTOFMEMORY, "Failed to create record");
+    hr = WcaSetRecordString(hRecKey, 1, pwzKey);
+    ExitOnFailure(hr, "Failed to set record string");
+
+    // open view
+    hr = WcaOpenView(vcsUserQuery, &hView);
+    ExitOnFailure(hr, "Failed to open view on User table");
+    hr = WcaExecuteView(hView, hRecKey);
+    ExitOnFailure(hr, "Failed to execute view on User table");
+
+    // fetch record
+    hr = WcaFetchSingleRecord(hView, &hRec);
+    if (S_FALSE == hr)
+        ExitOnFailure(hr = HRESULT_FROM_WIN32(ERROR_NOT_FOUND), "User not found, key: %S", pwzKey);
+    ExitOnFailure(hr, "Failed to fetch user record");
+
+    // get user domain
+    hr = WcaGetRecordFormattedString(hRec, uqDomain, &pwzDomain);
+    ExitOnFailure(hr, "Failed to get domain");
+
+    // get user name
+    hr = WcaGetRecordFormattedString(hRec, uqName, &pwzName);
+    ExitOnFailure(hr, "Failed to get name");
+
+    // build account name
+    hr = CpiBuildAccountName(pwzDomain, pwzName, ppwzAccount);
+    ExitOnFailure(hr, "Failed to build account name");
+
+    hr = S_OK;
+
+LExit:
+    // clean up
+    ReleaseStr(pwzDomain);
+    ReleaseStr(pwzName);
+
+    return hr;
+}
diff --git a/src/ext/ComPlus/ca/cputilsched.h b/src/ext/ComPlus/ca/cputilsched.h
new file mode 100644
index 00000000..1f315576
--- /dev/null
+++ b/src/ext/ComPlus/ca/cputilsched.h
@@ -0,0 +1,132 @@
+#pragma once
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+
+enum eRunMode { rmDeferred = 1, rmCommit, rmRollback };
+
+enum eComPlusPropertyType { cpptNone = 0, cpptBoolean, cpptInteger, cpptString, cpptUser };
+
+enum eComPlusTables
+{
+    cptComPlusPartition               = (1 << 0),
+    cptComPlusPartitionProperty       = (1 << 1),
+    cptComPlusPartitionRole           = (1 << 2),
+    cptComPlusUserInPartitionRole     = (1 << 3),
+    cptComPlusGroupInPartitionRole    = (1 << 4),
+    cptComPlusPartitionUser           = (1 << 5),
+    cptComPlusApplication             = (1 << 6),
+    cptComPlusApplicationProperty     = (1 << 7),
+    cptComPlusApplicationRole         = (1 << 8),
+    cptComPlusApplicationRoleProperty = (1 << 9),
+    cptComPlusUserInApplicationRole   = (1 << 10),
+    cptComPlusGroupInApplicationRole  = (1 << 11),
+    cptComPlusAssembly                = (1 << 12),
+    cptComPlusAssemblyDependency      = (1 << 13),
+    cptComPlusComponent               = (1 << 14),
+    cptComPlusComponentProperty       = (1 << 15),
+    cptComPlusRoleForComponent        = (1 << 16),
+    cptComPlusInterface               = (1 << 17),
+    cptComPlusInterfaceProperty       = (1 << 18),
+    cptComPlusRoleForInterface        = (1 << 19),
+    cptComPlusMethod                  = (1 << 20),
+    cptComPlusMethodProperty          = (1 << 21),
+    cptComPlusRoleForMethod           = (1 << 22),
+    cptComPlusSubscription            = (1 << 23),
+    cptComPlusSubscriptionProperty    = (1 << 24)
+};
+
+
+// structs
+
+struct CPI_PROPERTY_DEFINITION
+{
+    LPCWSTR pwzName;
+    int iType;
+    int iMinVersionNT;
+};
+
+
+// function prototypes
+
+void CpiSchedInitialize();
+void CpiSchedFinalize();
+BOOL CpiTableExists(
+    int iTable
+    );
+HRESULT CpiSchedGetAdminCatalog(
+    ICOMAdminCatalog** ppiCatalog
+    );
+HRESULT CpiSchedGetCatalogCollection(
+    LPCWSTR pwzName,
+    ICatalogCollection** ppiColl
+    );
+HRESULT CpiSchedGetCatalogCollection(
+    ICatalogCollection* piColl,
+    ICatalogObject* piObj,
+    LPCWSTR pwzName,
+    ICatalogCollection** ppiColl
+    );
+HRESULT CpiGetKeyForObject(
+    ICatalogObject* piObj,
+    LPWSTR pwzKey,
+    SIZE_T cchKey
+    );
+HRESULT CpiFindCollectionObject(
+    ICatalogCollection* piColl,
+    LPCWSTR pwzID,
+    LPCWSTR pwzName,
+    ICatalogObject** ppiObj
+    );
+HRESULT CpiSchedGetPartitionsCollection(
+    ICatalogCollection** ppiPartColl
+    );
+HRESULT CpiSchedGetApplicationsCollection(
+    ICatalogCollection** ppiAppColl
+    );
+HRESULT CpiAddActionTextToActionData(
+    LPCWSTR pwzAction,
+    LPWSTR* ppwzActionData
+    );
+HRESULT CpiVerifyComponentArchitecure(
+    LPCWSTR pwzComponent,
+    BOOL* pfMatchingArchitecture
+    );
+HRESULT CpiPropertiesRead(
+    LPCWSTR pwzQuery,
+    LPCWSTR pwzKey,
+    CPI_PROPERTY_DEFINITION* pPropDefList,
+    CPI_PROPERTY** ppPropList,
+    int* piCount
+    );
+void CpiPropertiesFreeList(
+    CPI_PROPERTY* pList
+    );
+HRESULT CpiAddPropertiesToActionData(
+    int iPropCount,
+    CPI_PROPERTY* pPropList,
+    LPWSTR* ppwzActionData
+    );
+HRESULT CpiBuildAccountName(
+    LPCWSTR pwzDomain,
+    LPCWSTR pwzName,
+    LPWSTR* ppwzAccount
+    );
+HRESULT CpiGetTempFileName(
+    LPWSTR* ppwzTempFile
+    );
+HRESULT CpiCreateId(
+    LPWSTR pwzDest,
+    SIZE_T cchDest
+    );
+BOOL CpiIsInstalled(
+    INSTALLSTATE isInstalled
+    );
+BOOL CpiWillBeInstalled(
+    INSTALLSTATE isInstalled,
+    INSTALLSTATE isAction
+    );
+HRESULT PcaGuidToRegFormat(
+    LPWSTR pwzGuid,
+    LPWSTR pwzDest,
+    SIZE_T cchDest
+    );
diff --git a/src/ext/ComPlus/ca/custommsierrors.h b/src/ext/ComPlus/ca/custommsierrors.h
new file mode 100644
index 00000000..219df698
--- /dev/null
+++ b/src/ext/ComPlus/ca/custommsierrors.h
@@ -0,0 +1,29 @@
+#pragma once
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+
+#define msierrComPlusCannotConnect                   28001
+#define msierrComPlusPartitionReadFailed             28002
+#define msierrComPlusPartitionRoleReadFailed         28003
+#define msierrComPlusUserInPartitionRoleReadFailed   28004
+#define msierrComPlusPartitionUserReadFailed         28005
+#define msierrComPlusApplicationReadFailed           28006
+#define msierrComPlusApplicationRoleReadFailed       28007
+#define msierrComPlusUserInApplicationRoleReadFailed 28008
+#define msierrComPlusAssembliesReadFailed            28009
+#define msierrComPlusSubscriptionReadFailed          28010
+#define msierrComPlusPartitionDependency             28011
+#define msierrComPlusPartitionNotFound               28012
+#define msierrComPlusPartitionIdConflict             28013
+#define msierrComPlusPartitionNameConflict           28014
+#define msierrComPlusApplicationDependency           28015
+#define msierrComPlusApplicationNotFound             28016
+#define msierrComPlusApplicationIdConflict           28017
+#define msierrComPlusApplicationNameConflict         28018
+#define msierrComPlusApplicationRoleDependency       28019
+#define msierrComPlusApplicationRoleNotFound         28020
+#define msierrComPlusApplicationRoleConflict         28021
+#define msierrComPlusAssemblyDependency              28022
+#define msierrComPlusSubscriptionIdConflict          28023
+#define msierrComPlusSubscriptionNameConflict        28024
+#define msierrComPlusFailedLookupNames               28025
diff --git a/src/ext/ComPlus/ca/dllmain.cpp b/src/ext/ComPlus/ca/dllmain.cpp
new file mode 100644
index 00000000..7d299feb
--- /dev/null
+++ b/src/ext/ComPlus/ca/dllmain.cpp
@@ -0,0 +1,27 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+#include "precomp.h"
+
+/********************************************************************
+DllMain - standard entry point for all WiX custom actions.
+
+********************************************************************/
+extern "C" BOOL WINAPI DllMain(
+    IN HINSTANCE hInstance,
+    IN ULONG ulReason,
+    IN LPVOID)
+{
+    switch(ulReason)
+    {
+    case DLL_PROCESS_ATTACH:
+        WcaGlobalInitialize(hInstance);
+        ::DisableThreadLibraryCalls(hInstance);
+        break;
+
+    case DLL_PROCESS_DETACH:
+        WcaGlobalFinalize();
+        break;
+    }
+
+    return TRUE;
+}
diff --git a/src/ext/ComPlus/ca/packages.config b/src/ext/ComPlus/ca/packages.config
new file mode 100644
index 00000000..e3dc0e43
--- /dev/null
+++ b/src/ext/ComPlus/ca/packages.config
@@ -0,0 +1,5 @@
+<?xml version="1.0" encoding="utf-8"?>
+<packages>
+  <package id="WixToolset.DUtil" version="4.0.30" targetFramework="native" />
+  <package id="WixToolset.WcaUtil" version="4.0.16" targetFramework="native" />
+</packages>
\ No newline at end of file
diff --git a/src/ext/ComPlus/ca/precomp.h b/src/ext/ComPlus/ca/precomp.h
new file mode 100644
index 00000000..74c328d2
--- /dev/null
+++ b/src/ext/ComPlus/ca/precomp.h
@@ -0,0 +1,33 @@
+#pragma once
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+
+#include <windows.h>
+#include <msiquery.h>
+#include <strsafe.h>
+#include <comadmin.h>
+#include <ntsecapi.h>
+#include <aclapi.h>
+
+#include "wcautil.h"
+#include "memutil.h"
+#include "strutil.h"
+#include "wiutil.h"
+
+#include "CustomMsiErrors.h"
+
+#include "cpcost.h"
+#include "cputilexec.h"
+#include "cppartexec.h"
+#include "cppartroleexec.h"
+#include "cpappexec.h"
+#include "cpapproleexec.h"
+#include "cpasmexec.h"
+#include "cpsubsexec.h"
+#include "cputilsched.h"
+#include "cppartsched.h"
+#include "cppartrolesched.h"
+#include "cpappsched.h"
+#include "cpapprolesched.h"
+#include "cpasmsched.h"
+#include "cpsubssched.h"
diff --git a/src/ext/ComPlus/nuget.config b/src/ext/ComPlus/nuget.config
new file mode 100644
index 00000000..db7aba29
--- /dev/null
+++ b/src/ext/ComPlus/nuget.config
@@ -0,0 +1,17 @@
+<?xml version="1.0" encoding="utf-8"?>
+<configuration>
+  <packageSources>
+    <clear />
+    <add key="wixtoolset-burn" value="https://ci.appveyor.com/nuget/wixtoolset-burn" />
+    <add key="wixtoolset-data" value="https://ci.appveyor.com/nuget/wixtoolset-data" />
+    <add key="wixtoolset-extensibility" value="https://ci.appveyor.com/nuget/wixtoolset-extensibility" />
+    <add key="wixtoolset-core" value="https://ci.appveyor.com/nuget/wixtoolset-core" />
+    <add key="wixtoolset-core-native" value="https://ci.appveyor.com/nuget/wixtoolset-core-native" />
+    <add key="wixtoolset-dtf" value="https://ci.appveyor.com/nuget/wixtoolset-dtf" />
+    <add key="wixtoolset-dutil" value="https://ci.appveyor.com/nuget/wixtoolset-dutil" />
+    <add key="wixtoolset-wcautil" value="https://ci.appveyor.com/nuget/wixtoolset-wcautil" />
+    <add key="wixtoolset-tools" value="https://ci.appveyor.com/nuget/wixtoolset-tools" />
+    <add key="wixbuildtools" value="https://ci.appveyor.com/nuget/wixbuildtools" />
+    <add key="api.nuget.org" value="https://api.nuget.org/v3/index.json" protocolVersion="3" />
+  </packageSources>
+</configuration>
\ No newline at end of file
diff --git a/src/ext/ComPlus/test/WixToolsetTest.ComPlus/ComPlusExtensionFixture.cs b/src/ext/ComPlus/test/WixToolsetTest.ComPlus/ComPlusExtensionFixture.cs
new file mode 100644
index 00000000..ace4d6b6
--- /dev/null
+++ b/src/ext/ComPlus/test/WixToolsetTest.ComPlus/ComPlusExtensionFixture.cs
@@ -0,0 +1,32 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolsetTest.ComPlus
+{
+    using System.Linq;
+    using WixBuildTools.TestSupport;
+    using WixToolset.Core.TestPackage;
+    using WixToolset.ComPlus;
+    using Xunit;
+
+    public class ComPlusExtensionFixture
+    {
+        [Fact]
+        public void CanBuildUsingComPlusPartition()
+        {
+            var folder = TestData.Get(@"TestData\UsingComPlusPartition");
+            var build = new Builder(folder, typeof(ComPlusExtensionFactory), new[] { folder });
+
+            var results = build.BuildAndQuery(Build, "ComPlusPartition");
+            WixAssert.CompareLineByLine(new[]
+            {
+                "ComPlusPartition:MyPartition\tfilF5_pLhBuF5b4N9XEo52g_hUM5Lo\tMyPartitionId\tMyPartition",
+            }, results);
+        }
+
+        private static void Build(string[] args)
+        {
+            var result = WixRunner.Execute(args)
+                                  .AssertSuccess();
+        }
+    }
+}
diff --git a/src/ext/ComPlus/test/WixToolsetTest.ComPlus/TestData/UsingComPlusPartition/Package.en-us.wxl b/src/ext/ComPlus/test/WixToolsetTest.ComPlus/TestData/UsingComPlusPartition/Package.en-us.wxl
new file mode 100644
index 00000000..38c12ac1
--- /dev/null
+++ b/src/ext/ComPlus/test/WixToolsetTest.ComPlus/TestData/UsingComPlusPartition/Package.en-us.wxl
@@ -0,0 +1,11 @@
+<?xml version="1.0" encoding="utf-8"?>
+
+<!--
+This file contains the declaration of all the localizable strings.
+-->
+<WixLocalization xmlns="http://wixtoolset.org/schemas/v4/wxl" Culture="en-US">
+
+  <String Id="DowngradeError">A newer version of [ProductName] is already installed.</String>
+  <String Id="FeatureTitle">MsiPackage</String>
+
+</WixLocalization>
diff --git a/src/ext/ComPlus/test/WixToolsetTest.ComPlus/TestData/UsingComPlusPartition/Package.wxs b/src/ext/ComPlus/test/WixToolsetTest.ComPlus/TestData/UsingComPlusPartition/Package.wxs
new file mode 100644
index 00000000..bd31e81f
--- /dev/null
+++ b/src/ext/ComPlus/test/WixToolsetTest.ComPlus/TestData/UsingComPlusPartition/Package.wxs
@@ -0,0 +1,15 @@
+<Wix xmlns="http://wixtoolset.org/schemas/v4/wxs">
+  <Package Name="MsiPackage" Language="1033" Version="1.0.0.0" Manufacturer="Example Corporation" UpgradeCode="047730a5-30fe-4a62-a520-da9381b8226a" InstallerVersion="200">
+    <MajorUpgrade DowngradeErrorMessage="!(loc.DowngradeError)" />
+
+    <Feature Id="ProductFeature" Title="!(loc.FeatureTitle)">
+      <ComponentGroupRef Id="ProductComponents" />
+    </Feature>
+  </Package>
+
+  <Fragment>
+    <StandardDirectory Id="ProgramFilesFolder">
+      <Directory Id="INSTALLFOLDER" Name="MsiPackage" />
+    </StandardDirectory>
+  </Fragment>
+</Wix>
diff --git a/src/ext/ComPlus/test/WixToolsetTest.ComPlus/TestData/UsingComPlusPartition/PackageComponents.wxs b/src/ext/ComPlus/test/WixToolsetTest.ComPlus/TestData/UsingComPlusPartition/PackageComponents.wxs
new file mode 100644
index 00000000..f61eedd6
--- /dev/null
+++ b/src/ext/ComPlus/test/WixToolsetTest.ComPlus/TestData/UsingComPlusPartition/PackageComponents.wxs
@@ -0,0 +1,12 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Wix xmlns="http://wixtoolset.org/schemas/v4/wxs"
+     xmlns:complus="http://wixtoolset.org/schemas/v4/wxs/complus">
+  <Fragment>
+    <ComponentGroup Id="ProductComponents" Directory="INSTALLFOLDER">
+        <Component>
+            <File Source="example.txt" />
+            <complus:ComPlusPartition Id="MyPartition" Name="MyPartition" PartitionId="MyPartitionId" />
+        </Component>
+    </ComponentGroup>
+  </Fragment>
+</Wix>
diff --git a/src/ext/ComPlus/test/WixToolsetTest.ComPlus/TestData/UsingComPlusPartition/example.txt b/src/ext/ComPlus/test/WixToolsetTest.ComPlus/TestData/UsingComPlusPartition/example.txt
new file mode 100644
index 00000000..1b4ffe8a
--- /dev/null
+++ b/src/ext/ComPlus/test/WixToolsetTest.ComPlus/TestData/UsingComPlusPartition/example.txt
@@ -0,0 +1 @@
+This is example.txt.
\ No newline at end of file
diff --git a/src/ext/ComPlus/test/WixToolsetTest.ComPlus/WixToolsetTest.ComPlus.csproj b/src/ext/ComPlus/test/WixToolsetTest.ComPlus/WixToolsetTest.ComPlus.csproj
new file mode 100644
index 00000000..e4a529cb
--- /dev/null
+++ b/src/ext/ComPlus/test/WixToolsetTest.ComPlus/WixToolsetTest.ComPlus.csproj
@@ -0,0 +1,38 @@
+<?xml version="1.0" encoding="utf-8"?>
+<!-- Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information. -->
+
+<Project Sdk="Microsoft.NET.Sdk">
+  <PropertyGroup>
+    <TargetFramework>netcoreapp3.1</TargetFramework>
+    <IsPackable>false</IsPackable>
+  </PropertyGroup>
+
+  <PropertyGroup>
+    <NoWarn>NU1701</NoWarn>
+  </PropertyGroup>
+
+  <ItemGroup>
+    <Content Include="TestData\**" CopyToOutputDirectory="PreserveNewest" />
+  </ItemGroup>
+
+  <ItemGroup>
+    <ProjectReference Include="..\..\wixext\WixToolset.ComPlus.wixext.csproj" />
+  </ItemGroup>
+
+  <ItemGroup>
+    <PackageReference Include="WixToolset.Core" Version="4.0.*" />
+    <PackageReference Include="WixToolset.Core.Burn" Version="4.0.*" />
+    <PackageReference Include="WixToolset.Core.WindowsInstaller" Version="4.0.*" />
+    <PackageReference Include="WixToolset.Core.TestPackage" Version="4.0.*" />
+  </ItemGroup>
+
+  <ItemGroup>
+    <PackageReference Include="WixBuildTools.TestSupport" Version="4.0.*" />
+  </ItemGroup>
+
+  <ItemGroup>
+    <PackageReference Include="Microsoft.NET.Test.Sdk" Version="16.3.0" />
+    <PackageReference Include="xunit" Version="2.4.1" />
+    <PackageReference Include="xunit.runner.visualstudio" Version="2.4.1" PrivateAssets="All" />
+  </ItemGroup>
+</Project>
diff --git a/src/ext/ComPlus/wix.snk b/src/ext/ComPlus/wix.snk
new file mode 100644
index 00000000..3908a66a
--- /dev/null
+++ b/src/ext/ComPlus/wix.snk
diff --git a/src/ext/ComPlus/wixext/ComPlusCompiler.cs b/src/ext/ComPlus/wixext/ComPlusCompiler.cs
new file mode 100644
index 00000000..4404801e
--- /dev/null
+++ b/src/ext/ComPlus/wixext/ComPlusCompiler.cs
@@ -0,0 +1,2164 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using System;
+    using System.Collections.Generic;
+    using System.Xml.Linq;
+    using WixToolset.ComPlus.Symbols;
+    using WixToolset.Data;
+    using WixToolset.Extensibility;
+
+    /// <summary>
+    /// The compiler for the WiX Toolset COM+ Extension.
+    /// </summary>
+    public sealed class ComPlusCompiler : BaseCompilerExtension
+    {
+        /// <summary>
+        /// </summary>
+        /// <remarks></remarks>
+        public enum CpiAssemblyAttributes
+        {
+            EventClass = (1 << 0),
+            DotNetAssembly = (1 << 1),
+            DllPathFromGAC = (1 << 2),
+            RegisterInCommit = (1 << 3)
+        }
+
+        public override XNamespace Namespace => "http://wixtoolset.org/schemas/v4/wxs/complus";
+
+        /// <summary>
+        /// Processes an element for the Compiler.
+        /// </summary>
+        /// <param name="sourceLineNumbers">Source line number for the parent element.</param>
+        /// <param name="parentElement">Parent element of element to process.</param>
+        /// <param name="element">Element to process.</param>
+        /// <param name="contextValues">Extra information about the context in which this element is being parsed.</param>
+        public override void ParseElement(Intermediate intermediate, IntermediateSection section, XElement parentElement, XElement element, IDictionary<string, string> context)
+        {
+            switch (parentElement.Name.LocalName)
+            {
+                case "Component":
+                    var componentId = context["ComponentId"];
+                    var directoryId = context["DirectoryId"];
+                    var win64 = Boolean.Parse(context["Win64"]);
+
+                    switch (element.Name.LocalName)
+                    {
+                        case "ComPlusPartition":
+                            this.ParseComPlusPartitionElement(intermediate, section, element, componentId, win64);
+                            break;
+                        case "ComPlusPartitionRole":
+                            this.ParseComPlusPartitionRoleElement(intermediate, section, element, componentId, null);
+                            break;
+                        case "ComPlusUserInPartitionRole":
+                            this.ParseComPlusUserInPartitionRoleElement(intermediate, section, element, componentId, null);
+                            break;
+                        case "ComPlusGroupInPartitionRole":
+                            this.ParseComPlusGroupInPartitionRoleElement(intermediate, section, element, componentId, null);
+                            break;
+                        case "ComPlusPartitionUser":
+                            this.ParseComPlusPartitionUserElement(intermediate, section, element, componentId, null);
+                            break;
+                        case "ComPlusApplication":
+                            this.ParseComPlusApplicationElement(intermediate, section, element, componentId, win64, null);
+                            break;
+                        case "ComPlusApplicationRole":
+                            this.ParseComPlusApplicationRoleElement(intermediate, section, element, componentId, null);
+                            break;
+                        case "ComPlusUserInApplicationRole":
+                            this.ParseComPlusUserInApplicationRoleElement(intermediate, section, element, componentId, null);
+                            break;
+                        case "ComPlusGroupInApplicationRole":
+                            this.ParseComPlusGroupInApplicationRoleElement(intermediate, section, element, componentId, null);
+                            break;
+                        case "ComPlusAssembly":
+                            this.ParseComPlusAssemblyElement(intermediate, section, element, componentId, win64, null);
+                            break;
+                        case "ComPlusRoleForComponent":
+                            this.ParseComPlusRoleForComponentElement(intermediate, section, element, componentId, null);
+                            break;
+                        case "ComPlusRoleForInterface":
+                            this.ParseComPlusRoleForInterfaceElement(intermediate, section, element, componentId, null);
+                            break;
+                        case "ComPlusRoleForMethod":
+                            this.ParseComPlusRoleForMethodElement(intermediate, section, element, componentId, null);
+                            break;
+                        case "ComPlusSubscription":
+                            this.ParseComPlusSubscriptionElement(intermediate, section, element, componentId, null);
+                            break;
+                        default:
+                            this.ParseHelper.UnexpectedElement(parentElement, element);
+                            break;
+                    }
+                    break;
+                case "Fragment":
+                case "Module":
+                case "Package":
+                    switch (element.Name.LocalName)
+                    {
+                        case "ComPlusPartition":
+                            this.ParseComPlusPartitionElement(intermediate, section, element, null, false);
+                            break;
+                        case "ComPlusPartitionRole":
+                            this.ParseComPlusPartitionRoleElement(intermediate, section, element, null, null);
+                            break;
+                        case "ComPlusApplication":
+                            this.ParseComPlusApplicationElement(intermediate, section, element, null, false, null);
+                            break;
+                        case "ComPlusApplicationRole":
+                            this.ParseComPlusApplicationRoleElement(intermediate, section, element, null, null);
+                            break;
+                        default:
+                            this.ParseHelper.UnexpectedElement(parentElement, element);
+                            break;
+                    }
+                    break;
+                default:
+                    this.ParseHelper.UnexpectedElement(parentElement, element);
+                    break;
+            }
+        }
+
+        /// <summary>
+        /// Parses a COM+ partition element.
+        /// </summary>
+        /// <param name="node">Element to parse.</param>
+        /// <param name="componentKey">Identifier of parent component.</param>
+        private void ParseComPlusPartitionElement(Intermediate intermediate, IntermediateSection section, XElement node, string componentKey, bool win64)
+        {
+            var sourceLineNumbers = this.ParseHelper.GetSourceLineNumbers(node);
+
+            Identifier key = null;
+            string id = null;
+            string name = null;
+
+            var properties = new Dictionary<string, string>();
+
+            foreach (var attrib in node.Attributes())
+            {
+                if (String.IsNullOrEmpty(attrib.Name.NamespaceName) || this.Namespace == attrib.Name.Namespace)
+                {
+                    switch (attrib.Name.LocalName)
+                    {
+                        case "Id":
+                            key = this.ParseHelper.GetAttributeIdentifier(sourceLineNumbers, attrib);
+                            break;
+                        case "PartitionId":
+                            id = this.TryFormatGuidValue(this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib));
+                            break;
+                        case "Name":
+                            name = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "Changeable":
+                            this.Messaging.Write(WarningMessages.DeprecatedAttribute(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            break;
+                        case "Deleteable":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["Deleteable"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "Description":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["Description"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        default:
+                            this.ParseHelper.UnexpectedAttribute(node, attrib);
+                            break;
+                    }
+                }
+                else
+                {
+                    this.ParseHelper.ParseExtensionAttribute(this.Context.Extensions, intermediate, section, node, attrib);
+                }
+            }
+
+            if (null != componentKey && null == name)
+            {
+                this.Messaging.Write(ComPlusErrors.RequiredAttributeUnderComponent(sourceLineNumbers, node.Name.LocalName, "Name"));
+            }
+            if (null == componentKey && null == id && null == name)
+            {
+                this.Messaging.Write(ComPlusErrors.RequiredAttributeNotUnderComponent(sourceLineNumbers, node.Name.LocalName, "Id", "Name"));
+            }
+
+            foreach (var child in node.Elements())
+            {
+                if (this.Namespace == child.Name.Namespace)
+                {
+                    switch (child.Name.LocalName)
+                    {
+                        case "ComPlusPartitionRole":
+                            this.ParseComPlusPartitionRoleElement(intermediate, section, child, componentKey, key?.Id);
+                            break;
+                        case "ComPlusPartitionUser":
+                            this.ParseComPlusPartitionUserElement(intermediate, section, child, componentKey, key?.Id);
+                            break;
+                        case "ComPlusApplication":
+                            this.ParseComPlusApplicationElement(intermediate, section, child, componentKey, win64, key?.Id);
+                            break;
+                        default:
+                            this.ParseHelper.UnexpectedElement(node, child);
+                            break;
+                    }
+                }
+                else
+                {
+                    this.ParseHelper.ParseExtensionElement(this.Context.Extensions, intermediate, section, node, child);
+                }
+            }
+
+            section.AddSymbol(new ComPlusPartitionSymbol(sourceLineNumbers, key)
+            {
+                ComponentRef = componentKey,
+                PartitionId = id,
+                Name = name,
+            });
+
+            foreach (var kvp in properties)
+            {
+                section.AddSymbol(new ComPlusPartitionPropertySymbol(sourceLineNumbers)
+                {
+                    PartitionRef = key?.Id,
+                    Name = kvp.Key,
+                    Value = kvp.Value,
+                });
+            }
+
+            if (componentKey != null)
+            {
+                this.AddReferenceToConfigureComPlus(section, sourceLineNumbers, node.Name.LocalName, win64);
+            }
+        }
+
+        /// <summary>
+        /// Parses a COM+ partition role element.
+        /// </summary>
+        /// <param name="node">Element to parse.</param>
+        /// <param name="componentKey">Identifier of parent component.</param>
+        /// <param name="applicationKey">Optional identifier of parent application.</param>
+        private void ParseComPlusPartitionRoleElement(Intermediate intermediate, IntermediateSection section, XElement node, string componentKey, string partitionKey)
+        {
+            var sourceLineNumbers = this.ParseHelper.GetSourceLineNumbers(node);
+
+            Identifier key = null;
+            string name = null;
+
+            foreach (var attrib in node.Attributes())
+            {
+                if (String.IsNullOrEmpty(attrib.Name.NamespaceName) || this.Namespace == attrib.Name.Namespace)
+                {
+                    switch (attrib.Name.LocalName)
+                    {
+                        case "Id":
+                            key = this.ParseHelper.GetAttributeIdentifier(sourceLineNumbers, attrib);
+                            break;
+                        case "Partition":
+                            if (null != partitionKey)
+                            {
+                                this.Messaging.Write(ErrorMessages.IllegalAttributeWhenNested(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName, node.Parent.Name.LocalName));
+                            }
+                            partitionKey = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            this.ParseHelper.CreateSimpleReference(section, sourceLineNumbers, ComPlusSymbolDefinitions.ComPlusPartition, partitionKey);
+                            break;
+                        case "Name":
+                            name = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        default:
+                            this.ParseHelper.UnexpectedAttribute(node, attrib);
+                            break;
+                    }
+                }
+                else
+                {
+                    this.ParseHelper.ParseExtensionAttribute(this.Context.Extensions, intermediate, section, node, attrib);
+                }
+            }
+
+            if (null == partitionKey)
+            {
+                this.Messaging.Write(ErrorMessages.ExpectedAttribute(sourceLineNumbers, node.Name.LocalName, "Partition"));
+            }
+
+            foreach (var child in node.Elements())
+            {
+                if (this.Namespace == child.Name.Namespace)
+                {
+                    switch (child.Name.LocalName)
+                    {
+                        case "ComPlusUserInPartitionRole":
+                            this.ParseComPlusUserInPartitionRoleElement(intermediate, section, child, componentKey, key?.Id);
+                            break;
+                        case "ComPlusGroupInPartitionRole":
+                            this.ParseComPlusGroupInPartitionRoleElement(intermediate, section, child, componentKey, key?.Id);
+                            break;
+                        default:
+                            this.ParseHelper.UnexpectedElement(node, child);
+                            break;
+                    }
+                }
+                else
+                {
+                    this.ParseHelper.ParseExtensionElement(this.Context.Extensions, intermediate, section, node, child);
+                }
+            }
+
+            section.AddSymbol(new ComPlusPartitionRoleSymbol(sourceLineNumbers, key)
+            {
+                PartitionRef = partitionKey,
+                Name = name,
+            });
+        }
+
+        /// <summary>
+        /// Parses a COM+ partition role user element.
+        /// </summary>
+        /// <param name="node">Element to parse.</param>
+        /// <param name="componentKey">Identifier of parent component.</param>
+        /// <param name="applicationKey">Optional identifier of parent application role.</param>
+        private void ParseComPlusUserInPartitionRoleElement(Intermediate intermediate, IntermediateSection section, XElement node, string componentKey, string partitionRoleKey)
+        {
+            var sourceLineNumbers = this.ParseHelper.GetSourceLineNumbers(node);
+
+            Identifier key = null;
+            string user = null;
+
+            foreach (var attrib in node.Attributes())
+            {
+                if (String.IsNullOrEmpty(attrib.Name.NamespaceName) || this.Namespace == attrib.Name.Namespace)
+                {
+                    switch (attrib.Name.LocalName)
+                    {
+                        case "Id":
+                            key = this.ParseHelper.GetAttributeIdentifier(sourceLineNumbers, attrib);
+                            break;
+                        case "PartitionRole":
+                            if (null != partitionRoleKey)
+                            {
+                                this.Messaging.Write(ErrorMessages.IllegalAttributeWhenNested(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName, node.Parent.Name.LocalName));
+                            }
+                            partitionRoleKey = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            this.ParseHelper.CreateSimpleReference(section, sourceLineNumbers, ComPlusSymbolDefinitions.ComPlusPartitionRole, partitionRoleKey);
+                            break;
+                        case "User":
+                            user = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            this.ParseHelper.CreateSimpleReference(section, sourceLineNumbers, "User", user);
+                            break;
+                        default:
+                            this.ParseHelper.UnexpectedAttribute(node, attrib);
+                            break;
+                    }
+                }
+                else
+                {
+                    this.ParseHelper.ParseExtensionAttribute(this.Context.Extensions, intermediate, section, node, attrib);
+                }
+            }
+
+            if (null == partitionRoleKey)
+            {
+                this.Messaging.Write(ErrorMessages.ExpectedAttribute(sourceLineNumbers, node.Name.LocalName, "PartitionRole"));
+            }
+
+            section.AddSymbol(new ComPlusUserInPartitionRoleSymbol(sourceLineNumbers, key)
+            {
+                PartitionRoleRef = partitionRoleKey,
+                ComponentRef = componentKey,
+                UserRef = user,
+            });
+        }
+
+        /// <summary>
+        /// Parses a COM+ partition role user element.
+        /// </summary>
+        /// <param name="node">Element to parse.</param>
+        /// <param name="componentKey">Identifier of parent component.</param>
+        /// <param name="applicationKey">Optional identifier of parent application role.</param>
+        private void ParseComPlusGroupInPartitionRoleElement(Intermediate intermediate, IntermediateSection section, XElement node, string componentKey, string partitionRoleKey)
+        {
+            var sourceLineNumbers = this.ParseHelper.GetSourceLineNumbers(node);
+
+            Identifier key = null;
+            string group = null;
+
+            foreach (var attrib in node.Attributes())
+            {
+                if (String.IsNullOrEmpty(attrib.Name.NamespaceName) || this.Namespace == attrib.Name.Namespace)
+                {
+                    switch (attrib.Name.LocalName)
+                    {
+                        case "Id":
+                            key = this.ParseHelper.GetAttributeIdentifier(sourceLineNumbers, attrib);
+                            break;
+                        case "PartitionRole":
+                            if (null != partitionRoleKey)
+                            {
+                                this.Messaging.Write(ErrorMessages.IllegalAttributeWhenNested(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName, node.Parent.Name.LocalName));
+                            }
+                            partitionRoleKey = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            this.ParseHelper.CreateSimpleReference(section, sourceLineNumbers, ComPlusSymbolDefinitions.ComPlusPartitionRole, partitionRoleKey);
+                            break;
+                        case "Group":
+                            group = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            this.ParseHelper.CreateSimpleReference(section, sourceLineNumbers, "Group", group);
+                            break;
+                        default:
+                            this.ParseHelper.UnexpectedAttribute(node, attrib);
+                            break;
+                    }
+                }
+                else
+                {
+                    this.ParseHelper.ParseExtensionAttribute(this.Context.Extensions, intermediate, section, node, attrib);
+                }
+            }
+
+            if (null == partitionRoleKey)
+            {
+                this.Messaging.Write(ErrorMessages.ExpectedAttribute(sourceLineNumbers, node.Name.LocalName, "PartitionRole"));
+            }
+
+            section.AddSymbol(new ComPlusGroupInPartitionRoleSymbol(sourceLineNumbers, key)
+            {
+                PartitionRoleRef = partitionRoleKey,
+                ComponentRef = componentKey,
+                GroupRef = group,
+            });
+        }
+
+        /// <summary>
+        /// Parses a COM+ partition element.
+        /// </summary>
+        /// <param name="node">Element to parse.</param>
+        /// <param name="componentKey">Identifier of parent component.</param>
+        private void ParseComPlusPartitionUserElement(Intermediate intermediate, IntermediateSection section, XElement node, string componentKey, string partitionKey)
+        {
+            var sourceLineNumbers = this.ParseHelper.GetSourceLineNumbers(node);
+
+            Identifier key = null;
+            string user = null;
+
+            foreach (var attrib in node.Attributes())
+            {
+                if (String.IsNullOrEmpty(attrib.Name.NamespaceName) || this.Namespace == attrib.Name.Namespace)
+                {
+                    switch (attrib.Name.LocalName)
+                    {
+                        case "Id":
+                            key = this.ParseHelper.GetAttributeIdentifier(sourceLineNumbers, attrib);
+                            break;
+                        case "Partition":
+                            if (null != partitionKey)
+                            {
+                                this.Messaging.Write(ErrorMessages.IllegalAttributeWhenNested(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName, node.Parent.Name.LocalName));
+                            }
+                            partitionKey = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            this.ParseHelper.CreateSimpleReference(section, sourceLineNumbers, ComPlusSymbolDefinitions.ComPlusPartition, partitionKey);
+                            break;
+                        case "User":
+                            user = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            this.ParseHelper.CreateSimpleReference(section, sourceLineNumbers, "User", user);
+                            break;
+                        default:
+                            this.ParseHelper.UnexpectedAttribute(node, attrib);
+                            break;
+                    }
+                }
+                else
+                {
+                    this.ParseHelper.ParseExtensionAttribute(this.Context.Extensions, intermediate, section, node, attrib);
+                }
+            }
+
+            if (null == partitionKey)
+            {
+                this.Messaging.Write(ErrorMessages.ExpectedAttribute(sourceLineNumbers, node.Name.LocalName, "Partition"));
+            }
+
+            section.AddSymbol(new ComPlusPartitionUserSymbol(sourceLineNumbers, key)
+            {
+                PartitionRef = partitionKey,
+                ComponentRef = componentKey,
+                UserRef = user,
+            });
+        }
+
+        /// <summary>
+        /// Parses a COM+ application element.
+        /// </summary>
+        /// <param name="node">Element to parse.</param>
+        /// <param name="componentKey">Identifier of parent component.</param>
+        /// <param name="partitionKey">Optional identifier of parent partition.</param>
+        private void ParseComPlusApplicationElement(Intermediate intermediate, IntermediateSection section, XElement node, string componentKey, bool win64, string partitionKey)
+        {
+            var sourceLineNumbers = this.ParseHelper.GetSourceLineNumbers(node);
+
+            Identifier key = null;
+            string id = null;
+            string name = null;
+
+            var properties = new Dictionary<string, string>();
+
+            foreach (XAttribute attrib in node.Attributes())
+            {
+                if (String.IsNullOrEmpty(attrib.Name.NamespaceName) || this.Namespace == attrib.Name.Namespace)
+                {
+                    switch (attrib.Name.LocalName)
+                    {
+                        case "Id":
+                            key = this.ParseHelper.GetAttributeIdentifier(sourceLineNumbers, attrib);
+                            break;
+                        case "Partition":
+                            if (null != partitionKey)
+                            {
+                                this.Messaging.Write(ErrorMessages.IllegalAttributeWhenNested(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName, node.Parent.Name.LocalName));
+                            }
+                            partitionKey = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            this.ParseHelper.CreateSimpleReference(section, sourceLineNumbers, ComPlusSymbolDefinitions.ComPlusPartition, partitionKey);
+                            break;
+                        case "ApplicationId":
+                            id = this.TryFormatGuidValue(this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib));
+                            break;
+                        case "Name":
+                            name = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "ThreeGigSupportEnabled":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["3GigSupportEnabled"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "AccessChecksLevel":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            var accessChecksLevelValue = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            switch (accessChecksLevelValue)
+                            {
+                                case "applicationLevel":
+                                    properties["AccessChecksLevel"] = "0";
+                                    break;
+                                case "applicationComponentLevel":
+                                    properties["AccessChecksLevel"] = "1";
+                                    break;
+                                default:
+                                    this.Messaging.Write(ErrorMessages.IllegalAttributeValue(sourceLineNumbers, "ComPlusApplication", "AccessChecksLevel", accessChecksLevelValue, "applicationLevel", "applicationComponentLevel"));
+                                    break;
+                            }
+                            break;
+                        case "Activation":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            var activationValue = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            switch (activationValue)
+                            {
+                                case "inproc":
+                                    properties["Activation"] = "Inproc";
+                                    break;
+                                case "local":
+                                    properties["Activation"] = "Local";
+                                    break;
+                                default:
+                                    this.Messaging.Write(ErrorMessages.IllegalAttributeValue(sourceLineNumbers, "ComPlusApplication", "Activation", activationValue, "inproc", "local"));
+                                    break;
+                            }
+                            break;
+                        case "ApplicationAccessChecksEnabled":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["ApplicationAccessChecksEnabled"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "ApplicationDirectory":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["ApplicationDirectory"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "Authentication":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            string authenticationValue = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            switch (authenticationValue)
+                            {
+                                case "default":
+                                    properties["Authentication"] = "0";
+                                    break;
+                                case "none":
+                                    properties["Authentication"] = "1";
+                                    break;
+                                case "connect":
+                                    properties["Authentication"] = "2";
+                                    break;
+                                case "call":
+                                    properties["Authentication"] = "3";
+                                    break;
+                                case "packet":
+                                    properties["Authentication"] = "4";
+                                    break;
+                                case "integrity":
+                                    properties["Authentication"] = "5";
+                                    break;
+                                case "privacy":
+                                    properties["Authentication"] = "6";
+                                    break;
+                                default:
+                                    this.Messaging.Write(ErrorMessages.IllegalAttributeValue(sourceLineNumbers, "ComPlusApplication", "Authentication", authenticationValue, "default", "none", "connect", "call", "packet", "integrity", "privacy"));
+                                    break;
+                            }
+                            break;
+                        case "AuthenticationCapability":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            var authenticationCapabilityValue = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            switch (authenticationCapabilityValue)
+                            {
+                                case "none":
+                                    properties["AuthenticationCapability"] = "0";
+                                    break;
+                                case "secureReference":
+                                    properties["AuthenticationCapability"] = "2";
+                                    break;
+                                case "staticCloaking":
+                                    properties["AuthenticationCapability"] = "32";
+                                    break;
+                                case "dynamicCloaking":
+                                    properties["AuthenticationCapability"] = "64";
+                                    break;
+                                default:
+                                    this.Messaging.Write(ErrorMessages.IllegalAttributeValue(sourceLineNumbers, "ComPlusApplication", "AuthenticationCapability", authenticationCapabilityValue, "none", "secureReference", "staticCloaking", "dynamicCloaking"));
+                                    break;
+                            }
+                            break;
+                        case "Changeable":
+                            this.Messaging.Write(WarningMessages.DeprecatedAttribute(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            break;
+                        case "CommandLine":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["CommandLine"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "ConcurrentApps":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["ConcurrentApps"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "CreatedBy":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["CreatedBy"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "CRMEnabled":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["CRMEnabled"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "CRMLogFile":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["CRMLogFile"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "Deleteable":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["Deleteable"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "Description":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["Description"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "DumpEnabled":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["DumpEnabled"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "DumpOnException":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["DumpOnException"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "DumpOnFailfast":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["DumpOnFailfast"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "DumpPath":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["DumpPath"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "EventsEnabled":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["EventsEnabled"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "Identity":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["Identity"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "ImpersonationLevel":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            string impersonationLevelValue = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            switch (impersonationLevelValue)
+                            {
+                                case "anonymous":
+                                    properties["ImpersonationLevel"] = "1";
+                                    break;
+                                case "identify":
+                                    properties["ImpersonationLevel"] = "2";
+                                    break;
+                                case "impersonate":
+                                    properties["ImpersonationLevel"] = "3";
+                                    break;
+                                case "delegate":
+                                    properties["ImpersonationLevel"] = "4";
+                                    break;
+                                default:
+                                    this.Messaging.Write(ErrorMessages.IllegalAttributeValue(sourceLineNumbers, "ComPlusApplication", "ImpersonationLevel", impersonationLevelValue, "anonymous", "identify", "impersonate", "delegate"));
+                                    break;
+                            }
+                            break;
+                        case "IsEnabled":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["IsEnabled"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "MaxDumpCount":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["MaxDumpCount"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "Password":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["Password"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "QCAuthenticateMsgs":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            string qcAuthenticateMsgsValue = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            switch (qcAuthenticateMsgsValue)
+                            {
+                                case "secureApps":
+                                    properties["QCAuthenticateMsgs"] = "0";
+                                    break;
+                                case "off":
+                                    properties["QCAuthenticateMsgs"] = "1";
+                                    break;
+                                case "on":
+                                    properties["QCAuthenticateMsgs"] = "2";
+                                    break;
+                                default:
+                                    this.Messaging.Write(ErrorMessages.IllegalAttributeValue(sourceLineNumbers, "ComPlusApplication", "QCAuthenticateMsgs", qcAuthenticateMsgsValue, "secureApps", "off", "on"));
+                                    break;
+                            }
+                            break;
+                        case "QCListenerMaxThreads":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["QCListenerMaxThreads"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "QueueListenerEnabled":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["QueueListenerEnabled"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "QueuingEnabled":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["QueuingEnabled"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "RecycleActivationLimit":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["RecycleActivationLimit"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "RecycleCallLimit":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["RecycleCallLimit"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "RecycleExpirationTimeout":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["RecycleExpirationTimeout"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "RecycleLifetimeLimit":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["RecycleLifetimeLimit"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "RecycleMemoryLimit":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["RecycleMemoryLimit"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "Replicable":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["Replicable"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "RunForever":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["RunForever"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "ShutdownAfter":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["ShutdownAfter"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "SoapActivated":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["SoapActivated"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "SoapBaseUrl":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["SoapBaseUrl"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "SoapMailTo":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["SoapMailTo"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "SoapVRoot":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["SoapVRoot"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "SRPEnabled":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["SRPEnabled"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "SRPTrustLevel":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            var srpTrustLevelValue = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            switch (srpTrustLevelValue)
+                            {
+                                case "disallowed":
+                                    properties["SRPTrustLevel"] = "0";
+                                    break;
+                                case "fullyTrusted":
+                                    properties["SRPTrustLevel"] = "262144";
+                                    break;
+                                default:
+                                    this.Messaging.Write(ErrorMessages.IllegalAttributeValue(sourceLineNumbers, "ComPlusApplication", "SRPTrustLevel", srpTrustLevelValue, "disallowed", "fullyTrusted"));
+                                    break;
+                            }
+                            break;
+                        default:
+                            this.ParseHelper.UnexpectedAttribute(node, attrib);
+                            break;
+                    }
+                }
+                else
+                {
+                    this.ParseHelper.ParseExtensionAttribute(this.Context.Extensions, intermediate, section, node, attrib);
+                }
+            }
+
+            if (null != componentKey && null == name)
+            {
+                this.Messaging.Write(ComPlusErrors.RequiredAttributeUnderComponent(sourceLineNumbers, node.Name.LocalName, "Name"));
+            }
+            if (null == componentKey && null == id && null == name)
+            {
+                this.Messaging.Write(ComPlusErrors.RequiredAttributeNotUnderComponent(sourceLineNumbers, node.Name.LocalName, "Id", "Name"));
+            }
+
+            foreach (var child in node.Elements())
+            {
+                if (this.Namespace == child.Name.Namespace)
+                {
+                    switch (child.Name.LocalName)
+                    {
+                        case "ComPlusApplicationRole":
+                            this.ParseComPlusApplicationRoleElement(intermediate, section, child, componentKey, key?.Id);
+                            break;
+                        case "ComPlusAssembly":
+                            this.ParseComPlusAssemblyElement(intermediate, section, child, componentKey, win64, key?.Id);
+                            break;
+                        default:
+                            this.ParseHelper.UnexpectedElement(node, child);
+                            break;
+                    }
+                }
+                else
+                {
+                    this.ParseHelper.ParseExtensionElement(this.Context.Extensions, intermediate, section, node, child);
+                }
+            }
+
+            section.AddSymbol(new ComPlusApplicationSymbol(sourceLineNumbers, key)
+            {
+                PartitionRef = partitionKey,
+                ComponentRef = componentKey,
+                ApplicationId = id,
+                Name = name,
+            });
+
+            foreach (var kvp in properties)
+            {
+                section.AddSymbol(new ComPlusApplicationPropertySymbol(sourceLineNumbers)
+                {
+                    ApplicationRef = key?.Id,
+                    Name = kvp.Key,
+                    Value = kvp.Value,
+                });
+            }
+
+            if (componentKey != null)
+            {
+                this.AddReferenceToConfigureComPlus(section, sourceLineNumbers, node.Name.LocalName, win64);
+            }
+        }
+
+        /// <summary>
+        /// Parses a COM+ application role element.
+        /// </summary>
+        /// <param name="node">Element to parse.</param>
+        /// <param name="componentKey">Identifier of parent component.</param>
+        /// <param name="applicationKey">Optional identifier of parent application.</param>
+        private void ParseComPlusApplicationRoleElement(Intermediate intermediate, IntermediateSection section, XElement node, string componentKey, string applicationKey)
+        {
+            var sourceLineNumbers = this.ParseHelper.GetSourceLineNumbers(node);
+
+            Identifier key = null;
+            string name = null;
+
+            var properties = new Dictionary<string, string>();
+
+            foreach (var attrib in node.Attributes())
+            {
+                if (String.IsNullOrEmpty(attrib.Name.NamespaceName) || this.Namespace == attrib.Name.Namespace)
+                {
+                    switch (attrib.Name.LocalName)
+                    {
+                        case "Id":
+                            key = this.ParseHelper.GetAttributeIdentifier(sourceLineNumbers, attrib);
+                            break;
+                        case "Application":
+                            if (null != applicationKey)
+                            {
+                                this.Messaging.Write(ErrorMessages.IllegalAttributeWhenNested(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName, node.Parent.Name.LocalName));
+                            }
+                            applicationKey = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            this.ParseHelper.CreateSimpleReference(section, sourceLineNumbers, ComPlusSymbolDefinitions.ComPlusApplication, applicationKey);
+                            break;
+                        case "Name":
+                            name = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "Description":
+                            if (null == componentKey)
+                            {
+                                this.Messaging.Write(ComPlusErrors.IllegalAttributeWithoutComponent(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName));
+                            }
+                            properties["Description"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        default:
+                            this.ParseHelper.UnexpectedAttribute(node, attrib);
+                            break;
+                    }
+                }
+                else
+                {
+                    this.ParseHelper.ParseExtensionAttribute(this.Context.Extensions, intermediate, section, node, attrib);
+                }
+            }
+
+            if (null == applicationKey)
+            {
+                this.Messaging.Write(ErrorMessages.ExpectedAttribute(sourceLineNumbers, node.Name.LocalName, "Application"));
+            }
+
+            foreach (var child in node.Elements())
+            {
+                if (this.Namespace == child.Name.Namespace)
+                {
+                    switch (child.Name.LocalName)
+                    {
+                        case "ComPlusUserInApplicationRole":
+                            this.ParseComPlusUserInApplicationRoleElement(intermediate, section, child, componentKey, key?.Id);
+                            break;
+                        case "ComPlusGroupInApplicationRole":
+                            this.ParseComPlusGroupInApplicationRoleElement(intermediate, section, child, componentKey, key?.Id);
+                            break;
+                        default:
+                            this.ParseHelper.UnexpectedElement(node, child);
+                            break;
+                    }
+                }
+                else
+                {
+                    this.ParseHelper.ParseExtensionElement(this.Context.Extensions, intermediate, section, node, child);
+                }
+            }
+
+            section.AddSymbol(new ComPlusApplicationRoleSymbol(sourceLineNumbers, key)
+            {
+                ApplicationRef = applicationKey,
+                ComponentRef = componentKey,
+                Name = name,
+            });
+
+            foreach (var kvp in properties)
+            {
+                section.AddSymbol(new ComPlusApplicationRolePropertySymbol(sourceLineNumbers)
+                {
+                    ApplicationRoleRef = key?.Id,
+                    Name = kvp.Key,
+                    Value = kvp.Value,
+                });
+            }
+        }
+
+        /// <summary>
+        /// Parses a COM+ application role user element.
+        /// </summary>
+        /// <param name="node">Element to parse.</param>
+        /// <param name="componentKey">Identifier of parent component.</param>
+        /// <param name="applicationKey">Optional identifier of parent application role.</param>
+        private void ParseComPlusUserInApplicationRoleElement(Intermediate intermediate, IntermediateSection section, XElement node, string componentKey, string applicationRoleKey)
+        {
+            var sourceLineNumbers = this.ParseHelper.GetSourceLineNumbers(node);
+
+            Identifier key = null;
+            string user = null;
+
+            foreach (var attrib in node.Attributes())
+            {
+                if (String.IsNullOrEmpty(attrib.Name.NamespaceName) || this.Namespace == attrib.Name.Namespace)
+                {
+                    switch (attrib.Name.LocalName)
+                    {
+                        case "Id":
+                            key = this.ParseHelper.GetAttributeIdentifier(sourceLineNumbers, attrib);
+                            break;
+                        case "ApplicationRole":
+                            if (null != applicationRoleKey)
+                            {
+                                this.Messaging.Write(ErrorMessages.IllegalAttributeWhenNested(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName, node.Parent.Name.LocalName));
+                            }
+                            applicationRoleKey = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            this.ParseHelper.CreateSimpleReference(section, sourceLineNumbers, ComPlusSymbolDefinitions.ComPlusApplicationRole, applicationRoleKey);
+                            break;
+                        case "User":
+                            user = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            this.ParseHelper.CreateSimpleReference(section, sourceLineNumbers, "User", user);
+                            break;
+                        default:
+                            this.ParseHelper.UnexpectedAttribute(node, attrib);
+                            break;
+                    }
+                }
+                else
+                {
+                    this.ParseHelper.ParseExtensionAttribute(this.Context.Extensions, intermediate, section, node, attrib);
+                }
+            }
+
+            if (null == applicationRoleKey)
+            {
+                this.Messaging.Write(ErrorMessages.ExpectedAttribute(sourceLineNumbers, node.Name.LocalName, "ApplicationRole"));
+            }
+
+            section.AddSymbol(new ComPlusUserInApplicationRoleSymbol(sourceLineNumbers, key)
+            {
+                ApplicationRoleRef = applicationRoleKey,
+                ComponentRef = componentKey,
+                UserRef = user,
+            });
+        }
+
+        /// <summary>
+        /// Parses a COM+ application role group element.
+        /// </summary>
+        /// <param name="node">Element to parse.</param>
+        /// <param name="componentKey">Identifier of parent component.</param>
+        /// <param name="applicationKey">Optional identifier of parent application role.</param>
+        private void ParseComPlusGroupInApplicationRoleElement(Intermediate intermediate, IntermediateSection section, XElement node, string componentKey, string applicationRoleKey)
+        {
+            var sourceLineNumbers = this.ParseHelper.GetSourceLineNumbers(node);
+
+            Identifier key = null;
+            string group = null;
+
+            foreach (var attrib in node.Attributes())
+            {
+                if (String.IsNullOrEmpty(attrib.Name.NamespaceName) || this.Namespace == attrib.Name.Namespace)
+                {
+                    switch (attrib.Name.LocalName)
+                    {
+                        case "Id":
+                            key = this.ParseHelper.GetAttributeIdentifier(sourceLineNumbers, attrib);
+                            break;
+                        case "ApplicationRole":
+                            if (null != applicationRoleKey)
+                            {
+                                this.Messaging.Write(ErrorMessages.IllegalAttributeWhenNested(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName, node.Parent.Name.LocalName));
+                            }
+                            applicationRoleKey = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            this.ParseHelper.CreateSimpleReference(section, sourceLineNumbers, ComPlusSymbolDefinitions.ComPlusApplicationRole, applicationRoleKey);
+                            break;
+                        case "Group":
+                            group = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            this.ParseHelper.CreateSimpleReference(section, sourceLineNumbers, "Group", group);
+                            break;
+                        default:
+                            this.ParseHelper.UnexpectedAttribute(node, attrib);
+                            break;
+                    }
+                }
+                else
+                {
+                    this.ParseHelper.ParseExtensionAttribute(this.Context.Extensions, intermediate, section, node, attrib);
+                }
+            }
+
+            if (null == applicationRoleKey)
+            {
+                this.Messaging.Write(ErrorMessages.ExpectedAttribute(sourceLineNumbers, node.Name.LocalName, "ApplicationRole"));
+            }
+
+            section.AddSymbol(new ComPlusGroupInApplicationRoleSymbol(sourceLineNumbers, key)
+            {
+                ApplicationRoleRef = applicationRoleKey,
+                ComponentRef = componentKey,
+                GroupRef = group,
+            });
+        }
+
+        /// <summary>
+        /// Parses a COM+ assembly element.
+        /// </summary>
+        /// <param name="node">Element to parse.</param>
+        /// <param name="componentKey">Identifier of parent component.</param>
+        /// <param name="applicationKey">Optional identifier of parent application.</param>
+        private void ParseComPlusAssemblyElement(Intermediate intermediate, IntermediateSection section, XElement node, string componentKey, bool win64, string applicationKey)
+        {
+            var sourceLineNumbers = this.ParseHelper.GetSourceLineNumbers(node);
+
+            Identifier key = null;
+            string assemblyName = null;
+            string dllPath = null;
+            string tlbPath = null;
+            string psDllPath = null;
+            int attributes = 0;
+
+            var hasComponents = false;
+
+            foreach (var attrib in node.Attributes())
+            {
+                if (String.IsNullOrEmpty(attrib.Name.NamespaceName) || this.Namespace == attrib.Name.Namespace)
+                {
+                    switch (attrib.Name.LocalName)
+                    {
+                        case "Id":
+                            key = this.ParseHelper.GetAttributeIdentifier(sourceLineNumbers, attrib);
+                            break;
+                        case "Application":
+                            if (null != applicationKey)
+                            {
+                                this.Messaging.Write(ErrorMessages.IllegalAttributeWhenNested(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName, node.Parent.Name.LocalName));
+                            }
+                            applicationKey = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            this.ParseHelper.CreateSimpleReference(section, sourceLineNumbers, ComPlusSymbolDefinitions.ComPlusApplication, applicationKey);
+                            break;
+                        case "AssemblyName":
+                            assemblyName = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "DllPath":
+                            dllPath = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "TlbPath":
+                            tlbPath = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "PSDllPath":
+                            psDllPath = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "Type":
+                            string typeValue = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            switch (typeValue)
+                            {
+                                case ".net":
+                                    attributes |= (int)CpiAssemblyAttributes.DotNetAssembly;
+                                    break;
+                                case "native":
+                                    attributes &= ~(int)CpiAssemblyAttributes.DotNetAssembly;
+                                    break;
+                                default:
+                                    this.Messaging.Write(ErrorMessages.IllegalAttributeValue(sourceLineNumbers, "ComPlusAssembly", "Type", typeValue, ".net", "native"));
+                                    break;
+                            }
+                            break;
+                        case "EventClass":
+                            if (YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib))
+                            {
+                                attributes |= (int)CpiAssemblyAttributes.EventClass;
+                            }
+                            else
+                            {
+                                attributes &= ~(int)CpiAssemblyAttributes.EventClass;
+                            }
+                            break;
+                        case "DllPathFromGAC":
+                            if (YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib))
+                            {
+                                attributes |= (int)CpiAssemblyAttributes.DllPathFromGAC;
+                            }
+                            else
+                            {
+                                attributes &= ~(int)CpiAssemblyAttributes.DllPathFromGAC;
+                            }
+                            break;
+                        case "RegisterInCommit":
+                            if (YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib))
+                            {
+                                attributes |= (int)CpiAssemblyAttributes.RegisterInCommit;
+                            }
+                            else
+                            {
+                                attributes &= ~(int)CpiAssemblyAttributes.RegisterInCommit;
+                            }
+                            break;
+                        default:
+                            this.ParseHelper.UnexpectedAttribute(node, attrib);
+                            break;
+                    }
+                }
+                else
+                {
+                    this.ParseHelper.ParseExtensionAttribute(this.Context.Extensions, intermediate, section, node, attrib);
+                }
+            }
+
+            if (null == applicationKey && 0 == (attributes & (int)CpiAssemblyAttributes.DotNetAssembly))
+            {
+                this.Messaging.Write(ErrorMessages.ExpectedAttribute(sourceLineNumbers, node.Name.LocalName, "Application", "Type", "native"));
+            }
+            if (null != assemblyName && 0 == (attributes & (int)CpiAssemblyAttributes.DllPathFromGAC))
+            {
+                this.Messaging.Write(ComPlusErrors.UnexpectedAttributeWithoutOtherValue(sourceLineNumbers, node.Name.LocalName, "AssemblyName", "DllPathFromGAC", "no"));
+            }
+            if (null == tlbPath && 0 != (attributes & (int)CpiAssemblyAttributes.DotNetAssembly))
+            {
+                this.Messaging.Write(ErrorMessages.ExpectedAttribute(sourceLineNumbers, node.Name.LocalName, "TlbPath", "Type", ".net"));
+            }
+            if (null != psDllPath && 0 != (attributes & (int)CpiAssemblyAttributes.DotNetAssembly))
+            {
+                this.Messaging.Write(ComPlusErrors.UnexpectedAttributeWithOtherValue(sourceLineNumbers, node.Name.LocalName, "PSDllPath", "Type", ".net"));
+            }
+            if (0 != (attributes & (int)CpiAssemblyAttributes.EventClass) && 0 != (attributes & (int)CpiAssemblyAttributes.DotNetAssembly))
+            {
+                this.Messaging.Write(ComPlusErrors.UnexpectedAttributeWithOtherValue(sourceLineNumbers, node.Name.LocalName, "EventClass", "yes", "Type", ".net"));
+            }
+
+            foreach (var child in node.Elements())
+            {
+                if (this.Namespace == child.Name.Namespace)
+                {
+                    switch (child.Name.LocalName)
+                    {
+                        case "ComPlusAssemblyDependency":
+                            this.ParseComPlusAssemblyDependencyElement(intermediate, section, child, key?.Id);
+                            break;
+                        case "ComPlusComponent":
+                            this.ParseComPlusComponentElement(intermediate, section, child, componentKey, key?.Id);
+                            hasComponents = true;
+                            break;
+                        default:
+                            this.ParseHelper.UnexpectedElement(node, child);
+                            break;
+                    }
+                }
+                else
+                {
+                    this.ParseHelper.ParseExtensionElement(this.Context.Extensions, intermediate, section, node, child);
+                }
+            }
+
+            if (0 == (attributes & (int)CpiAssemblyAttributes.DotNetAssembly) && !hasComponents)
+            {
+                this.Messaging.Write(ComPlusWarnings.MissingComponents(sourceLineNumbers));
+            }
+
+            section.AddSymbol(new ComPlusAssemblySymbol(sourceLineNumbers, key)
+            {
+                ApplicationRef = applicationKey,
+                ComponentRef = componentKey,
+                AssemblyName = assemblyName,
+                DllPath = dllPath,
+                TlbPath = tlbPath,
+                PSDllPath = psDllPath,
+                Attributes = attributes,
+            });
+
+            this.AddReferenceToConfigureComPlus(section, sourceLineNumbers, node.Name.LocalName, win64);
+        }
+
+        /// <summary>
+        /// Parses a COM+ assembly dependency element.
+        /// </summary>
+        /// <param name="node">Element to parse.</param>
+        /// <param name="assemblyKey">Identifier of parent assembly.</param>
+        private void ParseComPlusAssemblyDependencyElement(Intermediate intermediate, IntermediateSection section, XElement node, string assemblyKey)
+        {
+            var sourceLineNumbers = this.ParseHelper.GetSourceLineNumbers(node);
+
+            string requiredAssemblyKey = null;
+
+            foreach (var attrib in node.Attributes())
+            {
+                if (String.IsNullOrEmpty(attrib.Name.NamespaceName) || this.Namespace == attrib.Name.Namespace)
+                {
+                    switch (attrib.Name.LocalName)
+                    {
+                        case "RequiredAssembly":
+                            requiredAssemblyKey = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        default:
+                            this.ParseHelper.UnexpectedAttribute(node, attrib);
+                            break;
+                    }
+                }
+                else
+                {
+                    this.ParseHelper.ParseExtensionAttribute(this.Context.Extensions, intermediate, section, node, attrib);
+                }
+            }
+
+            section.AddSymbol(new ComPlusAssemblyDependencySymbol(sourceLineNumbers)
+            {
+                AssemblyRef = assemblyKey,
+                RequiredAssemblyRef = requiredAssemblyKey,
+            });
+        }
+
+        /// <summary>
+        /// Parses a COM+ component element.
+        /// </summary>
+        /// <param name="node">Element to parse.</param>
+        /// <param name="componentKey">Identifier of parent component.</param>
+        /// <param name="assemblyKey">Identifier of parent assembly.</param>
+        private void ParseComPlusComponentElement(Intermediate intermediate, IntermediateSection section, XElement node, string componentKey, string assemblyKey)
+        {
+            var sourceLineNumbers = this.ParseHelper.GetSourceLineNumbers(node);
+
+            Identifier key = null;
+            string clsid = null;
+
+            var properties = new Dictionary<string, string>();
+
+            foreach (var attrib in node.Attributes())
+            {
+                if (String.IsNullOrEmpty(attrib.Name.NamespaceName) || this.Namespace == attrib.Name.Namespace)
+                {
+                    switch (attrib.Name.LocalName)
+                    {
+                        case "Id":
+                            key = this.ParseHelper.GetAttributeIdentifier(sourceLineNumbers, attrib);
+                            break;
+                        case "CLSID":
+                            clsid = "{" + this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib) + "}";
+                            break;
+                        case "AllowInprocSubscribers":
+                            properties["AllowInprocSubscribers"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "ComponentAccessChecksEnabled":
+                            properties["ComponentAccessChecksEnabled"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "ComponentTransactionTimeout":
+                            properties["ComponentTransactionTimeout"] = this.ParseHelper.GetAttributeIntegerValue(sourceLineNumbers, attrib, 0, 3600).ToString();
+                            break;
+                        case "ComponentTransactionTimeoutEnabled":
+                            properties["ComponentTransactionTimeoutEnabled"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "COMTIIntrinsics":
+                            properties["COMTIIntrinsics"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "ConstructionEnabled":
+                            properties["ConstructionEnabled"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "ConstructorString":
+                            properties["ConstructorString"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "CreationTimeout":
+                            properties["CreationTimeout"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "Description":
+                            properties["Description"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "EventTrackingEnabled":
+                            properties["EventTrackingEnabled"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "ExceptionClass":
+                            properties["ExceptionClass"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "FireInParallel":
+                            properties["FireInParallel"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "IISIntrinsics":
+                            properties["IISIntrinsics"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "InitializesServerApplication":
+                            properties["InitializesServerApplication"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "IsEnabled":
+                            properties["IsEnabled"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "IsPrivateComponent":
+                            properties["IsPrivateComponent"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "JustInTimeActivation":
+                            properties["JustInTimeActivation"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "LoadBalancingSupported":
+                            properties["LoadBalancingSupported"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "MaxPoolSize":
+                            properties["MaxPoolSize"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "MinPoolSize":
+                            properties["MinPoolSize"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "MultiInterfacePublisherFilterCLSID":
+                            properties["MultiInterfacePublisherFilterCLSID"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "MustRunInClientContext":
+                            properties["MustRunInClientContext"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "MustRunInDefaultContext":
+                            properties["MustRunInDefaultContext"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "ObjectPoolingEnabled":
+                            properties["ObjectPoolingEnabled"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "PublisherID":
+                            properties["PublisherID"] = this.TryFormatGuidValue(this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib));
+                            break;
+                        case "SoapAssemblyName":
+                            properties["SoapAssemblyName"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "SoapTypeName":
+                            properties["SoapTypeName"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "Synchronization":
+                            var synchronizationValue = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            switch (synchronizationValue)
+                            {
+                                case "ignored":
+                                    properties["Synchronization"] = "0";
+                                    break;
+                                case "none":
+                                    properties["Synchronization"] = "1";
+                                    break;
+                                case "supported":
+                                    properties["Synchronization"] = "2";
+                                    break;
+                                case "required":
+                                    properties["Synchronization"] = "3";
+                                    break;
+                                case "requiresNew":
+                                    properties["Synchronization"] = "4";
+                                    break;
+                                default:
+                                    this.Messaging.Write(ErrorMessages.IllegalAttributeValue(sourceLineNumbers, "ComPlusComponent", "Synchronization", synchronizationValue, "ignored", "none", "supported", "required", "requiresNew"));
+                                    break;
+                            }
+                            break;
+                        case "Transaction":
+                            var transactionValue = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            switch (transactionValue)
+                            {
+                                case "ignored":
+                                    properties["Transaction"] = "0";
+                                    break;
+                                case "none":
+                                    properties["Transaction"] = "1";
+                                    break;
+                                case "supported":
+                                    properties["Transaction"] = "2";
+                                    break;
+                                case "required":
+                                    properties["Transaction"] = "3";
+                                    break;
+                                case "requiresNew":
+                                    properties["Transaction"] = "4";
+                                    break;
+                                default:
+                                    this.Messaging.Write(ErrorMessages.IllegalAttributeValue(sourceLineNumbers, "ComPlusComponent", "Transaction", transactionValue, "ignored", "none", "supported", "required", "requiresNew"));
+                                    break;
+                            }
+                            break;
+                        case "TxIsolationLevel":
+                            var txIsolationLevelValue = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            switch (txIsolationLevelValue)
+                            {
+                                case "any":
+                                    properties["TxIsolationLevel"] = "0";
+                                    break;
+                                case "readUnCommitted":
+                                    properties["TxIsolationLevel"] = "1";
+                                    break;
+                                case "readCommitted":
+                                    properties["TxIsolationLevel"] = "2";
+                                    break;
+                                case "repeatableRead":
+                                    properties["TxIsolationLevel"] = "3";
+                                    break;
+                                case "serializable":
+                                    properties["TxIsolationLevel"] = "4";
+                                    break;
+                                default:
+                                    this.Messaging.Write(ErrorMessages.IllegalAttributeValue(sourceLineNumbers, "ComPlusComponent", "TxIsolationLevel", txIsolationLevelValue, "any", "readUnCommitted", "readCommitted", "repeatableRead", "serializable"));
+                                    break;
+                            }
+                            break;
+                        default:
+                            this.ParseHelper.UnexpectedAttribute(node, attrib);
+                            break;
+                    }
+                }
+                else
+                {
+                    this.ParseHelper.ParseExtensionAttribute(this.Context.Extensions, intermediate, section, node, attrib);
+                }
+            }
+
+            foreach (var child in node.Elements())
+            {
+                if (this.Namespace == child.Name.Namespace)
+                {
+                    switch (child.Name.LocalName)
+                    {
+                        case "ComPlusRoleForComponent":
+                            this.ParseComPlusRoleForComponentElement(intermediate, section, child, componentKey, key?.Id);
+                            break;
+                        case "ComPlusInterface":
+                            this.ParseComPlusInterfaceElement(intermediate, section, child, componentKey, key?.Id);
+                            break;
+                        case "ComPlusSubscription":
+                            this.ParseComPlusSubscriptionElement(intermediate, section, child, componentKey, key?.Id);
+                            break;
+                        default:
+                            this.ParseHelper.UnexpectedElement(node, child);
+                            break;
+                    }
+                }
+                else
+                {
+                    this.ParseHelper.ParseExtensionElement(this.Context.Extensions, intermediate, section, node, child);
+                }
+            }
+
+            section.AddSymbol(new ComPlusComponentSymbol(sourceLineNumbers, key)
+            {
+                AssemblyRef = assemblyKey,
+                CLSID = clsid,
+            });
+
+            foreach (var kvp in properties)
+            {
+                section.AddSymbol(new ComPlusComponentPropertySymbol(sourceLineNumbers)
+                {
+                    ComPlusComponentRef = key?.Id,
+                    Name = kvp.Key,
+                    Value = kvp.Value,
+                });
+            }
+        }
+
+        /// <summary>
+        /// Parses a COM+ application role for component element.
+        /// </summary>
+        /// <param name="node">Element to parse.</param>
+        /// <param name="componentKey">Identifier of parent component.</param>
+        /// <param name="cpcomponentKey">Identifier of parent COM+ component.</param>
+        private void ParseComPlusRoleForComponentElement(Intermediate intermediate, IntermediateSection section, XElement node, string componentKey, string cpcomponentKey)
+        {
+            var sourceLineNumbers = this.ParseHelper.GetSourceLineNumbers(node);
+
+            Identifier key = null;
+            string applicationRoleKey = null;
+
+            foreach (var attrib in node.Attributes())
+            {
+                if (String.IsNullOrEmpty(attrib.Name.NamespaceName) || this.Namespace == attrib.Name.Namespace)
+                {
+                    switch (attrib.Name.LocalName)
+                    {
+                        case "Id":
+                            key = this.ParseHelper.GetAttributeIdentifier(sourceLineNumbers, attrib);
+                            break;
+                        case "Component":
+                            if (null != cpcomponentKey)
+                            {
+                                this.Messaging.Write(ErrorMessages.IllegalAttributeWhenNested(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName, node.Parent.Name.LocalName));
+                            }
+                            cpcomponentKey = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            this.ParseHelper.CreateSimpleReference(section, sourceLineNumbers, ComPlusSymbolDefinitions.ComPlusComponent, cpcomponentKey);
+                            break;
+                        case "ApplicationRole":
+                            applicationRoleKey = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        default:
+                            this.ParseHelper.UnexpectedAttribute(node, attrib);
+                            break;
+                    }
+                }
+                else
+                {
+                    this.ParseHelper.ParseExtensionAttribute(this.Context.Extensions, intermediate, section, node, attrib);
+                }
+            }
+
+            if (null == cpcomponentKey)
+            {
+                this.Messaging.Write(ErrorMessages.ExpectedAttribute(sourceLineNumbers, node.Name.LocalName, "Component"));
+            }
+
+            section.AddSymbol(new ComPlusRoleForComponentSymbol(sourceLineNumbers, key)
+            {
+                ComPlusComponentRef = cpcomponentKey,
+                ApplicationRoleRef = applicationRoleKey,
+                ComponentRef = componentKey,
+            });
+        }
+
+        /// <summary>
+        /// Parses a COM+ interface element.
+        /// </summary>
+        /// <param name="node">Element to parse.</param>
+        /// <param name="componentKey">Identifier of parent component.</param>
+        /// <param name="cpcomponentKey">Identifier of parent COM+ component.</param>
+        private void ParseComPlusInterfaceElement(Intermediate intermediate, IntermediateSection section, XElement node, string componentKey, string cpcomponentKey)
+        {
+            var sourceLineNumbers = this.ParseHelper.GetSourceLineNumbers(node);
+
+            // parse attributes
+            Identifier key = null;
+            string iid = null;
+
+            var properties = new Dictionary<string, string>();
+
+            foreach (var attrib in node.Attributes())
+            {
+                if (String.IsNullOrEmpty(attrib.Name.NamespaceName) || this.Namespace == attrib.Name.Namespace)
+                {
+                    switch (attrib.Name.LocalName)
+                    {
+                        case "Id":
+                            key = this.ParseHelper.GetAttributeIdentifier(sourceLineNumbers, attrib);
+                            break;
+                        case "IID":
+                            iid = "{" + this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib) + "}";
+                            break;
+                        case "Description":
+                            properties["Description"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "QueuingEnabled":
+                            properties["QueuingEnabled"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        default:
+                            this.ParseHelper.UnexpectedAttribute(node, attrib);
+                            break;
+                    }
+                }
+                else
+                {
+                    this.ParseHelper.ParseExtensionAttribute(this.Context.Extensions, intermediate, section, node, attrib);
+                }
+            }
+
+            foreach (var child in node.Elements())
+            {
+                if (this.Namespace == child.Name.Namespace)
+                {
+                    switch (child.Name.LocalName)
+                    {
+                        case "ComPlusRoleForInterface":
+                            this.ParseComPlusRoleForInterfaceElement(intermediate, section, child, componentKey, key?.Id);
+                            break;
+                        case "ComPlusMethod":
+                            this.ParseComPlusMethodElement(intermediate, section, child, componentKey, key?.Id);
+                            break;
+                        default:
+                            this.ParseHelper.UnexpectedElement(node, child);
+                            break;
+                    }
+                }
+                else
+                {
+                    this.ParseHelper.ParseExtensionElement(this.Context.Extensions, intermediate, section, node, child);
+                }
+            }
+
+            section.AddSymbol(new ComPlusInterfaceSymbol(sourceLineNumbers, key)
+            {
+                ComPlusComponentRef = cpcomponentKey,
+                IID = iid,
+            });
+
+            foreach (var kvp in properties)
+            {
+                section.AddSymbol(new ComPlusInterfacePropertySymbol(sourceLineNumbers)
+                {
+                    InterfaceRef = key?.Id,
+                    Name = kvp.Key,
+                    Value = kvp.Value,
+                });
+            }
+        }
+
+        /// <summary>
+        /// Parses a COM+ application role for interface element.
+        /// </summary>
+        /// <param name="node">Element to parse.</param>
+        /// <param name="componentKey">Identifier of parent component.</param>
+        /// <param name="interfaceKey">Identifier of parent interface.</param>
+        private void ParseComPlusRoleForInterfaceElement(Intermediate intermediate, IntermediateSection section, XElement node, string componentKey, string interfaceKey)
+        {
+            var sourceLineNumbers = this.ParseHelper.GetSourceLineNumbers(node);
+
+            Identifier key = null;
+            string applicationRoleKey = null;
+
+            foreach (var attrib in node.Attributes())
+            {
+                if (String.IsNullOrEmpty(attrib.Name.NamespaceName) || this.Namespace == attrib.Name.Namespace)
+                {
+                    switch (attrib.Name.LocalName)
+                    {
+                        case "Id":
+                            key = this.ParseHelper.GetAttributeIdentifier(sourceLineNumbers, attrib);
+                            break;
+                        case "Interface":
+                            if (null != interfaceKey)
+                            {
+                                this.Messaging.Write(ErrorMessages.IllegalAttributeWhenNested(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName, node.Parent.Name.LocalName));
+                            }
+                            interfaceKey = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            this.ParseHelper.CreateSimpleReference(section, sourceLineNumbers, ComPlusSymbolDefinitions.ComPlusInterface, interfaceKey);
+                            break;
+                        case "ApplicationRole":
+                            applicationRoleKey = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        default:
+                            this.ParseHelper.UnexpectedAttribute(node, attrib);
+                            break;
+                    }
+                }
+                else
+                {
+                    this.ParseHelper.ParseExtensionAttribute(this.Context.Extensions, intermediate, section, node, attrib);
+                }
+            }
+
+            if (null == interfaceKey)
+            {
+                this.Messaging.Write(ErrorMessages.ExpectedAttribute(sourceLineNumbers, node.Name.LocalName, "Interface"));
+            }
+
+            section.AddSymbol(new ComPlusRoleForInterfaceSymbol(sourceLineNumbers, key)
+            {
+                InterfaceRef = interfaceKey,
+                ApplicationRoleRef = applicationRoleKey,
+                ComponentRef = componentKey,
+            });
+        }
+
+        /// <summary>
+        /// Parses a COM+ method element.
+        /// </summary>
+        /// <param name="node">Element to parse.</param>
+        /// <param name="componentKey">Identifier of parent component.</param>
+        /// <param name="interfaceKey">Identifier of parent interface.</param>
+        private void ParseComPlusMethodElement(Intermediate intermediate, IntermediateSection section, XElement node, string componentKey, string interfaceKey)
+        {
+            var sourceLineNumbers = this.ParseHelper.GetSourceLineNumbers(node);
+
+            Identifier key = null;
+            var index = CompilerConstants.IntegerNotSet;
+            string name = null;
+
+            var properties = new Dictionary<string, string>();
+
+            foreach (var attrib in node.Attributes())
+            {
+                if (String.IsNullOrEmpty(attrib.Name.NamespaceName) || this.Namespace == attrib.Name.Namespace)
+                {
+                    switch (attrib.Name.LocalName)
+                    {
+                        case "Id":
+                            key = this.ParseHelper.GetAttributeIdentifier(sourceLineNumbers, attrib);
+                            break;
+                        case "Index":
+                            index = this.ParseHelper.GetAttributeIntegerValue(sourceLineNumbers, attrib, 0, int.MaxValue);
+                            break;
+                        case "Name":
+                            name = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "AutoComplete":
+                            properties["AutoComplete"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "Description":
+                            properties["Description"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        default:
+                            this.ParseHelper.UnexpectedAttribute(node, attrib);
+                            break;
+                    }
+                }
+                else
+                {
+                    this.ParseHelper.ParseExtensionAttribute(this.Context.Extensions, intermediate, section, node, attrib);
+                }
+            }
+
+            foreach (var child in node.Elements())
+            {
+                if (this.Namespace == child.Name.Namespace)
+                {
+                    switch (child.Name.LocalName)
+                    {
+                        case "ComPlusRoleForMethod":
+                            this.ParseComPlusRoleForMethodElement(intermediate, section, child, componentKey, key?.Id);
+                            break;
+                        default:
+                            this.ParseHelper.UnexpectedElement(node, child);
+                            break;
+                    }
+                }
+                else
+                {
+                    this.ParseHelper.ParseExtensionElement(this.Context.Extensions, intermediate, section, node, child);
+                }
+            }
+
+            if (CompilerConstants.IntegerNotSet == index && null == name)
+            {
+                this.Messaging.Write(ComPlusErrors.RequiredAttribute(sourceLineNumbers, node.Name.LocalName, "Index", "Name"));
+            }
+
+            var symbol = section.AddSymbol(new ComPlusMethodSymbol(sourceLineNumbers, key)
+            {
+                InterfaceRef = interfaceKey,
+                Name = name,
+            });
+
+            if (CompilerConstants.IntegerNotSet != index)
+            {
+                symbol.Index = index;
+            }
+
+            foreach (var kvp in properties)
+            {
+                section.AddSymbol(new ComPlusMethodPropertySymbol(sourceLineNumbers)
+                {
+                    MethodRef = key?.Id,
+                    Name = kvp.Key,
+                    Value = kvp.Value,
+                });
+            }
+        }
+
+        /// <summary>
+        /// Parses a COM+ application role for method element.
+        /// </summary>
+        /// <param name="node">Element to parse.</param>
+        /// <param name="componentKey">Identifier of parent component.</param>
+        /// <param name="methodKey">Identifier of parent method.</param>
+        private void ParseComPlusRoleForMethodElement(Intermediate intermediate, IntermediateSection section, XElement node, string componentKey, string methodKey)
+        {
+            var sourceLineNumbers = this.ParseHelper.GetSourceLineNumbers(node);
+
+            Identifier key = null;
+            string applicationRoleKey = null;
+
+            foreach (var attrib in node.Attributes())
+            {
+                if (String.IsNullOrEmpty(attrib.Name.NamespaceName) || this.Namespace == attrib.Name.Namespace)
+                {
+                    switch (attrib.Name.LocalName)
+                    {
+                        case "Id":
+                            key = this.ParseHelper.GetAttributeIdentifier(sourceLineNumbers, attrib);
+                            break;
+                        case "Method":
+                            if (null != methodKey)
+                            {
+                                this.Messaging.Write(ErrorMessages.IllegalAttributeWhenNested(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName, node.Parent.Name.LocalName));
+                            }
+                            methodKey = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            this.ParseHelper.CreateSimpleReference(section, sourceLineNumbers, ComPlusSymbolDefinitions.ComPlusMethod, methodKey);
+                            break;
+                        case "ApplicationRole":
+                            applicationRoleKey = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        default:
+                            this.ParseHelper.UnexpectedAttribute(node, attrib);
+                            break;
+                    }
+                }
+                else
+                {
+                    this.ParseHelper.ParseExtensionAttribute(this.Context.Extensions, intermediate, section, node, attrib);
+                }
+            }
+
+            if (null == methodKey)
+            {
+                this.Messaging.Write(ErrorMessages.ExpectedAttribute(sourceLineNumbers, node.Name.LocalName, "Method"));
+            }
+
+            section.AddSymbol(new ComPlusRoleForMethodSymbol(sourceLineNumbers, key)
+            {
+                MethodRef = methodKey,
+                ApplicationRoleRef = applicationRoleKey,
+                ComponentRef = componentKey,
+            });
+        }
+
+        /// <summary>
+        /// Parses a COM+ event subscription element.
+        /// </summary>
+        /// <param name="node">Element to parse.</param>
+        /// <param name="componentKey">Identifier of parent component.</param>
+        /// <param name="cpcomponentKey">Identifier of parent COM+ component.</param>
+        private void ParseComPlusSubscriptionElement(Intermediate intermediate, IntermediateSection section, XElement node, string componentKey, string cpcomponentKey)
+        {
+            var sourceLineNumbers = this.ParseHelper.GetSourceLineNumbers(node);
+
+            Identifier key = null;
+            string id = null;
+            string name = null;
+            string eventCLSID = null;
+            string publisherID = null;
+
+            var properties = new Dictionary<string, string>();
+
+            foreach (var attrib in node.Attributes())
+            {
+                if (String.IsNullOrEmpty(attrib.Name.NamespaceName) || this.Namespace == attrib.Name.Namespace)
+                {
+                    switch (attrib.Name.LocalName)
+                    {
+                        case "Id":
+                            key = this.ParseHelper.GetAttributeIdentifier(sourceLineNumbers, attrib);
+                            break;
+                        case "Component":
+                            if (null != cpcomponentKey)
+                            {
+                                this.Messaging.Write(ErrorMessages.IllegalAttributeWhenNested(sourceLineNumbers, node.Name.LocalName, attrib.Name.LocalName, node.Parent.Name.LocalName));
+                            }
+                            cpcomponentKey = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            this.ParseHelper.CreateSimpleReference(section, sourceLineNumbers, ComPlusSymbolDefinitions.ComPlusComponent, cpcomponentKey);
+                            break;
+                        case "SubscriptionId":
+                            id = this.TryFormatGuidValue(this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib));
+                            break;
+                        case "Name":
+                            name = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "EventCLSID":
+                            eventCLSID = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "PublisherID":
+                            publisherID = this.TryFormatGuidValue(this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib));
+                            break;
+                        case "Description":
+                            properties["Description"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "Enabled":
+                            properties["Enabled"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "EventClassPartitionID":
+                            properties["EventClassPartitionID"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "FilterCriteria":
+                            properties["FilterCriteria"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "InterfaceID":
+                            properties["InterfaceID"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "MachineName":
+                            properties["MachineName"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "MethodName":
+                            properties["MethodName"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "PerUser":
+                            properties["PerUser"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "Queued":
+                            properties["Queued"] = YesNoType.Yes == this.ParseHelper.GetAttributeYesNoValue(sourceLineNumbers, attrib) ? "1" : "0";
+                            break;
+                        case "SubscriberMoniker":
+                            properties["SubscriberMoniker"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        case "UserName":
+                            properties["UserName"] = this.ParseHelper.GetAttributeValue(sourceLineNumbers, attrib);
+                            break;
+                        default:
+                            this.ParseHelper.UnexpectedAttribute(node, attrib);
+                            break;
+                    }
+                }
+                else
+                {
+                    this.ParseHelper.ParseExtensionAttribute(this.Context.Extensions, intermediate, section, node, attrib);
+                }
+            }
+
+            if (null == cpcomponentKey)
+            {
+                this.Messaging.Write(ErrorMessages.ExpectedAttribute(sourceLineNumbers, node.Name.LocalName, "Component"));
+            }
+
+            this.ParseHelper.ParseForExtensionElements(this.Context.Extensions, intermediate, section, node);
+
+            section.AddSymbol(new ComPlusSubscriptionSymbol(sourceLineNumbers, key)
+            {
+                Subscription = key?.Id,
+                ComPlusComponentRef = cpcomponentKey,
+                ComponentRef = componentKey,
+                SubscriptionId = id,
+                Name = name,
+                EventCLSID = eventCLSID,
+                PublisherID = publisherID,
+            });
+
+            foreach (var kvp in properties)
+            {
+                section.AddSymbol(new ComPlusSubscriptionPropertySymbol(sourceLineNumbers)
+                {
+                    SubscriptionRef = key?.Id,
+                    Name = kvp.Key,
+                    Value = kvp.Value,
+                });
+            }
+        }
+
+        /// <summary>
+        /// Attempts to parse the input value as a GUID, and in case the value is a valid
+        /// GUID returnes it in the format "{XXXXXXXX-XXXX-XXXX-XXXX-XXXXXXXXXXXX}".
+        /// </summary>
+        /// <param name="val"></param>
+        /// <returns></returns>
+        private string TryFormatGuidValue(string val)
+        {
+            if (!Guid.TryParse(val, out var guid))
+            {
+                return val;
+            }
+            return guid.ToString("B").ToUpper();
+        }
+
+        private void AddReferenceToConfigureComPlus(IntermediateSection section, SourceLineNumber sourceLineNumbers, string elementName, bool win64)
+        {
+            if (win64)
+            {
+                this.ParseHelper.CreateSimpleReference(section, sourceLineNumbers, "CustomAction", "ConfigureComPlusInstall_x64");
+                this.ParseHelper.CreateSimpleReference(section, sourceLineNumbers, "CustomAction", "ConfigureComPlusUninstall_x64");
+            }
+            else
+            {
+                this.ParseHelper.CreateSimpleReference(section, sourceLineNumbers, "CustomAction", "ConfigureComPlusInstall");
+                this.ParseHelper.CreateSimpleReference(section, sourceLineNumbers, "CustomAction", "ConfigureComPlusUninstall");
+            }
+
+        }
+    }
+}
diff --git a/src/ext/ComPlus/wixext/ComPlusDecompiler.cs b/src/ext/ComPlus/wixext/ComPlusDecompiler.cs
new file mode 100644
index 00000000..6da2df94
--- /dev/null
+++ b/src/ext/ComPlus/wixext/ComPlusDecompiler.cs
@@ -0,0 +1,1845 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+#if TODO_CONSIDER_DECOMPILER
+    using System;
+    using System.Collections;
+    using System.Globalization;
+    using WixToolset.Data;
+    using WixToolset.Extensibility;
+    using ComPlus = WixToolset.Extensions.Serialize.ComPlus;
+    using Wix = WixToolset.Data.Serialize;
+
+    /// <summary>
+    /// The decompiler for the WiX Toolset COM+ Extension.
+    /// </summary>
+    public sealed class ComPlusDecompiler : DecompilerExtension
+    {
+        /// <summary>
+        /// Creates a decompiler for ComPlus Extension.
+        /// </summary>
+        public ComPlusDecompiler()
+        {
+            this.TableDefinitions = ComPlusExtensionData.GetExtensionTableDefinitions();
+        }
+
+        /// <summary>
+        /// Get the extensions library to be removed.
+        /// </summary>
+        /// <param name="tableDefinitions">Table definitions for library.</param>
+        /// <returns>Library to remove from decompiled output.</returns>
+        public override Library GetLibraryToRemove(TableDefinitionCollection tableDefinitions)
+        {
+            return ComPlusExtensionData.GetExtensionLibrary(tableDefinitions);
+        }
+
+        /// <summary>
+        /// Decompiles an extension table.
+        /// </summary>
+        /// <param name="table">The table to decompile.</param>
+        public override void DecompileTable(Table table)
+        {
+            switch (table.Name)
+            {
+                case "ComPlusPartition":
+                    this.DecompileComPlusPartitionTable(table);
+                    break;
+                case "ComPlusPartitionProperty":
+                    this.DecompileComPlusPartitionPropertyTable(table);
+                    break;
+                case "ComPlusPartitionRole":
+                    this.DecompileComPlusPartitionRoleTable(table);
+                    break;
+                case "ComPlusUserInPartitionRole":
+                    this.DecompileComPlusUserInPartitionRoleTable(table);
+                    break;
+                case "ComPlusGroupInPartitionRole":
+                    this.DecompileComPlusGroupInPartitionRoleTable(table);
+                    break;
+                case "ComPlusPartitionUser":
+                    this.DecompileComPlusPartitionUserTable(table);
+                    break;
+                case "ComPlusApplication":
+                    this.DecompileComPlusApplicationTable(table);
+                    break;
+                case "ComPlusApplicationProperty":
+                    this.DecompileComPlusApplicationPropertyTable(table);
+                    break;
+                case "ComPlusApplicationRole":
+                    this.DecompileComPlusApplicationRoleTable(table);
+                    break;
+                case "ComPlusApplicationRoleProperty":
+                    this.DecompileComPlusApplicationRolePropertyTable(table);
+                    break;
+                case "ComPlusUserInApplicationRole":
+                    this.DecompileComPlusUserInApplicationRoleTable(table);
+                    break;
+                case "ComPlusGroupInApplicationRole":
+                    this.DecompileComPlusGroupInApplicationRoleTable(table);
+                    break;
+                case "ComPlusAssembly":
+                    this.DecompileComPlusAssemblyTable(table);
+                    break;
+                case "ComPlusComponent":
+                    this.DecompileComPlusComponentTable(table);
+                    break;
+                case "ComPlusComponentProperty":
+                    this.DecompileComPlusComponentPropertyTable(table);
+                    break;
+                case "ComPlusRoleForComponent":
+                    this.DecompileComPlusRoleForComponentTable(table);
+                    break;
+                case "ComPlusInterface":
+                    this.DecompileComPlusInterfaceTable(table);
+                    break;
+                case "ComPlusInterfaceProperty":
+                    this.DecompileComPlusInterfacePropertyTable(table);
+                    break;
+                case "ComPlusRoleForInterface":
+                    this.DecompileComPlusRoleForInterfaceTable(table);
+                    break;
+                case "ComPlusMethod":
+                    this.DecompileComPlusMethodTable(table);
+                    break;
+                case "ComPlusMethodProperty":
+                    this.DecompileComPlusMethodPropertyTable(table);
+                    break;
+                case "ComPlusRoleForMethod":
+                    this.DecompileComPlusRoleForMethodTable(table);
+                    break;
+                case "ComPlusSubscription":
+                    this.DecompileComPlusSubscriptionTable(table);
+                    break;
+                case "ComPlusSubscriptionProperty":
+                    this.DecompileComPlusSubscriptionPropertyTable(table);
+                    break;
+                default:
+                    base.DecompileTable(table);
+                    break;
+            }
+        }
+
+        /// <summary>
+        /// Decompile the ComPlusPartition table.
+        /// </summary>
+        /// <param name="table">The table to decompile.</param>
+        private void DecompileComPlusPartitionTable(Table table)
+        {
+            foreach (Row row in table.Rows)
+            {
+                ComPlus.ComPlusPartition partition = new ComPlus.ComPlusPartition();
+
+                partition.Id = (string)row[0];
+
+                if (null != row[2])
+                {
+                    partition.PartitionId = (string)row[2];
+                }
+
+                if (null != row[3])
+                {
+                    partition.Name = (string)row[3];
+                }
+
+                if (null != row[1])
+                {
+                    Wix.Component component = (Wix.Component)this.Core.GetIndexedElement("Component", (string)row[1]);
+                    if (null != component)
+                    {
+                        component.AddChild(partition);
+                    }
+                    else
+                    {
+                        this.Core.OnMessage(WixWarnings.ExpectedForeignRow(row.SourceLineNumbers, table.Name, row.GetPrimaryKey(DecompilerConstants.PrimaryKeyDelimiter), "Component_", (string)row[1], "Component"));
+                    }
+                }
+                else
+                {
+                    this.Core.RootElement.AddChild(partition);
+                }
+                this.Core.IndexElement(row, partition);
+            }
+        }
+
+        /// <summary>
+        /// Decompile the ComPlusPartitionProperty table.
+        /// </summary>
+        /// <param name="table">The table to decompile.</param>
+        private void DecompileComPlusPartitionPropertyTable(Table table)
+        {
+            foreach (Row row in table.Rows)
+            {
+                ComPlus.ComPlusPartition partition = (ComPlus.ComPlusPartition)this.Core.GetIndexedElement("ComPlusPartition", (string)row[0]);
+                if (null == partition)
+                {
+                    this.Core.OnMessage(WixWarnings.ExpectedForeignRow(row.SourceLineNumbers, table.Name, row.GetPrimaryKey(DecompilerConstants.PrimaryKeyDelimiter), "Partition_", (string)row[0], "ComPlusPartition"));
+                }
+
+                switch ((string)row[1])
+                {
+                    case "Changeable":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                partition.Changeable = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                partition.Changeable = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "Deleteable":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                partition.Deleteable = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                partition.Deleteable = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "Description":
+                        partition.Description = (string)row[2];
+                        break;
+                    default:
+                        // TODO: Warning
+                        break;
+                }
+            }
+        }
+
+        /// <summary>
+        /// Decompile the ComPlusPartitionRole table.
+        /// </summary>
+        /// <param name="table">The table to decompile.</param>
+        private void DecompileComPlusPartitionRoleTable(Table table)
+        {
+            foreach (Row row in table.Rows)
+            {
+                ComPlus.ComPlusPartitionRole partitionRole = new ComPlus.ComPlusPartitionRole();
+
+                partitionRole.Id = (string)row[0];
+                partitionRole.Partition = (string)row[1];
+                partitionRole.Name = (string)row[3];
+
+                Wix.Component component = (Wix.Component)this.Core.GetIndexedElement("Component", (string)row[2]);
+                if (null != component)
+                {
+                    component.AddChild(partitionRole);
+                }
+                else
+                {
+                    this.Core.OnMessage(WixWarnings.ExpectedForeignRow(row.SourceLineNumbers, table.Name, row.GetPrimaryKey(DecompilerConstants.PrimaryKeyDelimiter), "Component_", (string)row[2], "Component"));
+                }
+            }
+        }
+
+        /// <summary>
+        /// Decompile the ComPlusUserInPartitionRole table.
+        /// </summary>
+        /// <param name="table">The table to decompile.</param>
+        private void DecompileComPlusUserInPartitionRoleTable(Table table)
+        {
+            foreach (Row row in table.Rows)
+            {
+                ComPlus.ComPlusUserInPartitionRole userInPartitionRole = new ComPlus.ComPlusUserInPartitionRole();
+
+                userInPartitionRole.Id = (string)row[0];
+                userInPartitionRole.PartitionRole = (string)row[1];
+                userInPartitionRole.User = (string)row[3];
+
+                Wix.Component component = (Wix.Component)this.Core.GetIndexedElement("Component", (string)row[2]);
+                if (null != component)
+                {
+                    component.AddChild(userInPartitionRole);
+                }
+                else
+                {
+                    this.Core.OnMessage(WixWarnings.ExpectedForeignRow(row.SourceLineNumbers, table.Name, row.GetPrimaryKey(DecompilerConstants.PrimaryKeyDelimiter), "Component_", (string)row[2], "Component"));
+                }
+            }
+        }
+
+        /// <summary>
+        /// Decompile the ComPlusGroupInPartitionRole table.
+        /// </summary>
+        /// <param name="table">The table to decompile.</param>
+        private void DecompileComPlusGroupInPartitionRoleTable(Table table)
+        {
+            foreach (Row row in table.Rows)
+            {
+                ComPlus.ComPlusGroupInPartitionRole groupInPartitionRole = new ComPlus.ComPlusGroupInPartitionRole();
+
+                groupInPartitionRole.Id = (string)row[0];
+                groupInPartitionRole.PartitionRole = (string)row[1];
+                groupInPartitionRole.Group = (string)row[3];
+
+                Wix.Component component = (Wix.Component)this.Core.GetIndexedElement("Component", (string)row[2]);
+                if (null != component)
+                {
+                    component.AddChild(groupInPartitionRole);
+                }
+                else
+                {
+                    this.Core.OnMessage(WixWarnings.ExpectedForeignRow(row.SourceLineNumbers, table.Name, row.GetPrimaryKey(DecompilerConstants.PrimaryKeyDelimiter), "Component_", (string)row[2], "Component"));
+                }
+            }
+        }
+
+        /// <summary>
+        /// Decompile the ComPlusPartitionUser table.
+        /// </summary>
+        /// <param name="table">The table to decompile.</param>
+        private void DecompileComPlusPartitionUserTable(Table table)
+        {
+            foreach (Row row in table.Rows)
+            {
+                ComPlus.ComPlusPartitionUser partitionUser = new ComPlus.ComPlusPartitionUser();
+
+                partitionUser.Id = (string)row[0];
+                partitionUser.Partition = (string)row[1];
+                partitionUser.User = (string)row[3];
+
+                Wix.Component component = (Wix.Component)this.Core.GetIndexedElement("Component", (string)row[2]);
+                if (null != component)
+                {
+                    component.AddChild(partitionUser);
+                }
+                else
+                {
+                    this.Core.OnMessage(WixWarnings.ExpectedForeignRow(row.SourceLineNumbers, table.Name, row.GetPrimaryKey(DecompilerConstants.PrimaryKeyDelimiter), "Component_", (string)row[2], "Component"));
+                }
+            }
+        }
+
+        /// <summary>
+        /// Decompile the ComPlusApplication table.
+        /// </summary>
+        /// <param name="table">The table to decompile.</param>
+        private void DecompileComPlusApplicationTable(Table table)
+        {
+            foreach (Row row in table.Rows)
+            {
+                ComPlus.ComPlusApplication application = new ComPlus.ComPlusApplication();
+
+                application.Id = (string)row[0];
+                application.Partition = (string)row[1];
+
+                if (null != row[3])
+                {
+                    application.ApplicationId = (string)row[3];
+                }
+
+                if (null != row[4])
+                {
+                    application.Name = (string)row[4];
+                }
+
+                if (null != row[2])
+                {
+                    Wix.Component component = (Wix.Component)this.Core.GetIndexedElement("Component", (string)row[1]);
+                    if (null != component)
+                    {
+                        component.AddChild(application);
+                    }
+                    else
+                    {
+                        this.Core.OnMessage(WixWarnings.ExpectedForeignRow(row.SourceLineNumbers, table.Name, row.GetPrimaryKey(DecompilerConstants.PrimaryKeyDelimiter), "Component_", (string)row[2], "Component"));
+                    }
+                }
+                else
+                {
+                    this.Core.RootElement.AddChild(application);
+                }
+                this.Core.IndexElement(row, application);
+            }
+        }
+
+        /// <summary>
+        /// Decompile the ComPlusApplicationProperty table.
+        /// </summary>
+        /// <param name="table">The table to decompile.</param>
+        private void DecompileComPlusApplicationPropertyTable(Table table)
+        {
+            foreach (Row row in table.Rows)
+            {
+                ComPlus.ComPlusApplication application = (ComPlus.ComPlusApplication)this.Core.GetIndexedElement("ComPlusApplication", (string)row[0]);
+                if (null == application)
+                {
+                    this.Core.OnMessage(WixWarnings.ExpectedForeignRow(row.SourceLineNumbers, table.Name, row.GetPrimaryKey(DecompilerConstants.PrimaryKeyDelimiter), "Application_", (string)row[0], "ComPlusApplication"));
+                }
+
+                switch ((string)row[1])
+                {
+                    case "3GigSupportEnabled":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                application.ThreeGigSupportEnabled = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                application.ThreeGigSupportEnabled = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "AccessChecksLevel":
+                        switch ((string)row[2])
+                        {
+                            case "0":
+                                application.AccessChecksLevel = ComPlus.ComPlusApplication.AccessChecksLevelType.applicationLevel;
+                                break;
+                            case "1":
+                                application.AccessChecksLevel = ComPlus.ComPlusApplication.AccessChecksLevelType.applicationComponentLevel;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "Activation":
+                        switch ((string)row[2])
+                        {
+                            case "Inproc":
+                                application.Activation = ComPlus.ComPlusApplication.ActivationType.inproc;
+                                break;
+                            case "Local":
+                                application.Activation = ComPlus.ComPlusApplication.ActivationType.local;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "ApplicationAccessChecksEnabled":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                application.ApplicationAccessChecksEnabled = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                application.ApplicationAccessChecksEnabled = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "ApplicationDirectory":
+                        application.ApplicationDirectory = (string)row[2];
+                        break;
+                    case "Authentication":
+                        switch ((string)row[2])
+                        {
+                            case "0":
+                                application.Authentication = ComPlus.ComPlusApplication.AuthenticationType.@default;
+                                break;
+                            case "1":
+                                application.Authentication = ComPlus.ComPlusApplication.AuthenticationType.none;
+                                break;
+                            case "2":
+                                application.Authentication = ComPlus.ComPlusApplication.AuthenticationType.connect;
+                                break;
+                            case "3":
+                                application.Authentication = ComPlus.ComPlusApplication.AuthenticationType.call;
+                                break;
+                            case "4":
+                                application.Authentication = ComPlus.ComPlusApplication.AuthenticationType.packet;
+                                break;
+                            case "5":
+                                application.Authentication = ComPlus.ComPlusApplication.AuthenticationType.integrity;
+                                break;
+                            case "6":
+                                application.Authentication = ComPlus.ComPlusApplication.AuthenticationType.privacy;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "AuthenticationCapability":
+                        switch ((string)row[2])
+                        {
+                            case "0":
+                                application.AuthenticationCapability = ComPlus.ComPlusApplication.AuthenticationCapabilityType.none;
+                                break;
+                            case "2":
+                                application.AuthenticationCapability = ComPlus.ComPlusApplication.AuthenticationCapabilityType.secureReference;
+                                break;
+                            case "32":
+                                application.AuthenticationCapability = ComPlus.ComPlusApplication.AuthenticationCapabilityType.staticCloaking;
+                                break;
+                            case "64":
+                                application.AuthenticationCapability = ComPlus.ComPlusApplication.AuthenticationCapabilityType.dynamicCloaking;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "Changeable":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                application.Changeable = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                application.Changeable = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "CommandLine":
+                        application.CommandLine = (string)row[2];
+                        break;
+                    case "ConcurrentApps":
+                        int concurrentApps;
+                        if (Int32.TryParse((string)row[2], out concurrentApps))
+                        {
+                            application.ConcurrentApps = concurrentApps;
+                        }
+                        else
+                        {
+                            // TODO: Warning
+                        }
+                        break;
+                    case "CreatedBy":
+                        application.CreatedBy = (string)row[2];
+                        break;
+                    case "CRMEnabled":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                application.CRMEnabled = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                application.CRMEnabled = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "CRMLogFile":
+                        application.CRMLogFile = (string)row[2];
+                        break;
+                    case "Deleteable":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                application.Deleteable = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                application.Deleteable = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "Description":
+                        application.Description = (string)row[2];
+                        break;
+                    case "DumpEnabled":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                application.DumpEnabled = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                application.DumpEnabled = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "DumpOnException":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                application.DumpOnException = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                application.DumpOnException = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "DumpOnFailfast":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                application.DumpOnFailfast = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                application.DumpOnFailfast = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "DumpPath":
+                        application.DumpPath = (string)row[2];
+                        break;
+                    case "EventsEnabled":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                application.EventsEnabled = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                application.EventsEnabled = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "Identity":
+                        application.Identity = (string)row[2];
+                        break;
+                    case "ImpersonationLevel":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                application.ImpersonationLevel = ComPlus.ComPlusApplication.ImpersonationLevelType.anonymous;
+                                break;
+                            case "2":
+                                application.ImpersonationLevel = ComPlus.ComPlusApplication.ImpersonationLevelType.identify;
+                                break;
+                            case "3":
+                                application.ImpersonationLevel = ComPlus.ComPlusApplication.ImpersonationLevelType.impersonate;
+                                break;
+                            case "4":
+                                application.ImpersonationLevel = ComPlus.ComPlusApplication.ImpersonationLevelType.@delegate;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "IsEnabled":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                application.IsEnabled = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                application.IsEnabled = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "MaxDumpCount":
+                        int maxDumpCount;
+                        if (Int32.TryParse((string)row[2], out maxDumpCount))
+                        {
+                            application.MaxDumpCount = maxDumpCount;
+                        }
+                        else
+                        {
+                            // TODO: Warning
+                        }
+                        break;
+                    case "Password":
+                        application.Password = (string)row[2];
+                        break;
+                    case "QCAuthenticateMsgs":
+                        switch ((string)row[2])
+                        {
+                            case "0":
+                                application.QCAuthenticateMsgs = ComPlus.ComPlusApplication.QCAuthenticateMsgsType.secureApps;
+                                break;
+                            case "1":
+                                application.QCAuthenticateMsgs = ComPlus.ComPlusApplication.QCAuthenticateMsgsType.off;
+                                break;
+                            case "2":
+                                application.QCAuthenticateMsgs = ComPlus.ComPlusApplication.QCAuthenticateMsgsType.on;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "QCListenerMaxThreads":
+                        int qcListenerMaxThreads;
+                        if (Int32.TryParse((string)row[2], out qcListenerMaxThreads))
+                        {
+                            application.QCListenerMaxThreads = qcListenerMaxThreads;
+                        }
+                        else
+                        {
+                            // TODO: Warning
+                        }
+                        break;
+                    case "QueueListenerEnabled":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                application.QueueListenerEnabled = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                application.QueueListenerEnabled = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "QueuingEnabled":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                application.QueuingEnabled = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                application.QueuingEnabled = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "RecycleActivationLimit":
+                        int recycleActivationLimit;
+                        if (Int32.TryParse((string)row[2], out recycleActivationLimit))
+                        {
+                            application.RecycleActivationLimit = recycleActivationLimit;
+                        }
+                        else
+                        {
+                            // TODO: Warning
+                        }
+                        break;
+                    case "RecycleCallLimit":
+                        int recycleCallLimit;
+                        if (Int32.TryParse((string)row[2], out recycleCallLimit))
+                        {
+                            application.RecycleCallLimit = recycleCallLimit;
+                        }
+                        else
+                        {
+                            // TODO: Warning
+                        }
+                        break;
+                    case "RecycleExpirationTimeout":
+                        int recycleExpirationTimeout;
+                        if (Int32.TryParse((string)row[2], out recycleExpirationTimeout))
+                        {
+                            application.RecycleExpirationTimeout = recycleExpirationTimeout;
+                        }
+                        else
+                        {
+                            // TODO: Warning
+                        }
+                        break;
+                    case "RecycleLifetimeLimit":
+                        int recycleLifetimeLimit;
+                        if (Int32.TryParse((string)row[2], out recycleLifetimeLimit))
+                        {
+                            application.RecycleLifetimeLimit = recycleLifetimeLimit;
+                        }
+                        else
+                        {
+                            // TODO: Warning
+                        }
+                        break;
+                    case "RecycleMemoryLimit":
+                        int recycleMemoryLimit;
+                        if (Int32.TryParse((string)row[2], out recycleMemoryLimit))
+                        {
+                            application.RecycleMemoryLimit = recycleMemoryLimit;
+                        }
+                        else
+                        {
+                            // TODO: Warning
+                        }
+                        break;
+                    case "Replicable":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                application.Replicable = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                application.Replicable = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "RunForever":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                application.RunForever = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                application.RunForever = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "ShutdownAfter":
+                        int shutdownAfter;
+                        if (Int32.TryParse((string)row[2], out shutdownAfter))
+                        {
+                            application.ShutdownAfter = shutdownAfter;
+                        }
+                        else
+                        {
+                            // TODO: Warning
+                        }
+                        break;
+                    case "SoapActivated":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                application.SoapActivated = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                application.SoapActivated = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "SoapBaseUrl":
+                        application.SoapBaseUrl = (string)row[2];
+                        break;
+                    case "SoapMailTo":
+                        application.SoapMailTo = (string)row[2];
+                        break;
+                    case "SoapVRoot":
+                        application.SoapVRoot = (string)row[2];
+                        break;
+                    case "SRPEnabled":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                application.SRPEnabled = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                application.SRPEnabled = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "SRPTrustLevel":
+                        switch ((string)row[2])
+                        {
+                            case "0":
+                                application.SRPTrustLevel = ComPlus.ComPlusApplication.SRPTrustLevelType.disallowed;
+                                break;
+                            case "262144":
+                                application.SRPTrustLevel = ComPlus.ComPlusApplication.SRPTrustLevelType.fullyTrusted;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    default:
+                        // TODO: Warning
+                        break;
+                }
+            }
+        }
+
+        /// <summary>
+        /// Decompile the ComPlusApplicationRole table.
+        /// </summary>
+        /// <param name="table">The table to decompile.</param>
+        private void DecompileComPlusApplicationRoleTable(Table table)
+        {
+            foreach (Row row in table.Rows)
+            {
+                ComPlus.ComPlusApplicationRole applicationRole = new ComPlus.ComPlusApplicationRole();
+
+                applicationRole.Id = (string)row[0];
+                applicationRole.Application = (string)row[1];
+
+                if (null != row[3])
+                {
+                    applicationRole.Name = (string)row[3];
+                }
+
+                if (null != row[2])
+                {
+                    Wix.Component component = (Wix.Component)this.Core.GetIndexedElement("Component", (string)row[2]);
+                    if (null != component)
+                    {
+                        component.AddChild(applicationRole);
+                    }
+                    else
+                    {
+                        this.Core.OnMessage(WixWarnings.ExpectedForeignRow(row.SourceLineNumbers, table.Name, row.GetPrimaryKey(DecompilerConstants.PrimaryKeyDelimiter), "Component_", (string)row[2], "Component"));
+                    }
+                }
+                else
+                {
+                    this.Core.RootElement.AddChild(applicationRole);
+                }
+                this.Core.IndexElement(row, applicationRole);
+            }
+        }
+
+        /// <summary>
+        /// Decompile the ComPlusApplicationRoleProperty table.
+        /// </summary>
+        /// <param name="table">The table to decompile.</param>
+        private void DecompileComPlusApplicationRolePropertyTable(Table table)
+        {
+            foreach (Row row in table.Rows)
+            {
+                ComPlus.ComPlusApplicationRole applicationRole = (ComPlus.ComPlusApplicationRole)this.Core.GetIndexedElement("ComPlusApplicationRole", (string)row[0]);
+                if (null == applicationRole)
+                {
+                    this.Core.OnMessage(WixWarnings.ExpectedForeignRow(row.SourceLineNumbers, table.Name, row.GetPrimaryKey(DecompilerConstants.PrimaryKeyDelimiter), "ApplicationRole_", (string)row[0], "ComPlusApplicationRole"));
+                }
+
+                switch ((string)row[1])
+                {
+                    case "Description":
+                        applicationRole.Description = (string)row[2];
+                        break;
+                    default:
+                        // TODO: Warning
+                        break;
+                }
+            }
+        }
+
+        /// <summary>
+        /// Decompile the ComPlusUserInApplicationRole table.
+        /// </summary>
+        /// <param name="table">The table to decompile.</param>
+        private void DecompileComPlusUserInApplicationRoleTable(Table table)
+        {
+            foreach (Row row in table.Rows)
+            {
+                ComPlus.ComPlusUserInApplicationRole userInApplicationRole = new ComPlus.ComPlusUserInApplicationRole();
+
+                userInApplicationRole.Id = (string)row[0];
+                userInApplicationRole.ApplicationRole = (string)row[1];
+                userInApplicationRole.User = (string)row[3];
+
+                Wix.Component component = (Wix.Component)this.Core.GetIndexedElement("Component", (string)row[2]);
+                if (null != component)
+                {
+                    component.AddChild(userInApplicationRole);
+                }
+                else
+                {
+                    this.Core.OnMessage(WixWarnings.ExpectedForeignRow(row.SourceLineNumbers, table.Name, row.GetPrimaryKey(DecompilerConstants.PrimaryKeyDelimiter), "Component_", (string)row[2], "Component"));
+                }
+            }
+        }
+
+        /// <summary>
+        /// Decompile the ComPlusGroupInApplicationRole table.
+        /// </summary>
+        /// <param name="table">The table to decompile.</param>
+        private void DecompileComPlusGroupInApplicationRoleTable(Table table)
+        {
+            foreach (Row row in table.Rows)
+            {
+                ComPlus.ComPlusGroupInApplicationRole groupInApplicationRole = new ComPlus.ComPlusGroupInApplicationRole();
+
+                groupInApplicationRole.Id = (string)row[0];
+                groupInApplicationRole.ApplicationRole = (string)row[1];
+                groupInApplicationRole.Group = (string)row[3];
+
+                Wix.Component component = (Wix.Component)this.Core.GetIndexedElement("Component", (string)row[2]);
+                if (null != component)
+                {
+                    component.AddChild(groupInApplicationRole);
+                }
+                else
+                {
+                    this.Core.OnMessage(WixWarnings.ExpectedForeignRow(row.SourceLineNumbers, table.Name, row.GetPrimaryKey(DecompilerConstants.PrimaryKeyDelimiter), "Component_", (string)row[2], "Component"));
+                }
+            }
+        }
+
+        /// <summary>
+        /// Decompile the ComPlusAssembly table.
+        /// </summary>
+        /// <param name="table">The table to decompile.</param>
+        private void DecompileComPlusAssemblyTable(Table table)
+        {
+            foreach (Row row in table.Rows)
+            {
+                ComPlus.ComPlusAssembly assembly = new ComPlus.ComPlusAssembly();
+
+                assembly.Id = (string)row[0];
+                assembly.Application = (string)row[1];
+
+                if (null != row[3])
+                {
+                    assembly.AssemblyName = (string)row[3];
+                }
+
+                if (null != row[4])
+                {
+                    assembly.DllPath = (string)row[4];
+                }
+
+                if (null != row[5])
+                {
+                    assembly.TlbPath = (string)row[5];
+                }
+
+                if (null != row[6])
+                {
+                    assembly.PSDllPath = (string)row[6];
+                }
+
+                int attributes = (int)row[7];
+
+                if (0 != (attributes & (int)ComPlusCompiler.CpiAssemblyAttributes.EventClass))
+                {
+                    assembly.EventClass = ComPlus.YesNoType.yes;
+                }
+
+                if (0 != (attributes & (int)ComPlusCompiler.CpiAssemblyAttributes.DotNetAssembly))
+                {
+                    assembly.Type = ComPlus.ComPlusAssembly.TypeType.net;
+                }
+
+                if (0 != (attributes & (int)ComPlusCompiler.CpiAssemblyAttributes.DllPathFromGAC))
+                {
+                    assembly.DllPathFromGAC = ComPlus.YesNoType.yes;
+                }
+
+                if (0 != (attributes & (int)ComPlusCompiler.CpiAssemblyAttributes.RegisterInCommit))
+                {
+                    assembly.RegisterInCommit = ComPlus.YesNoType.yes;
+                }
+
+                Wix.Component component = (Wix.Component)this.Core.GetIndexedElement("Component", (string)row[2]);
+                if (null != component)
+                {
+                    component.AddChild(assembly);
+                }
+                else
+                {
+                    this.Core.OnMessage(WixWarnings.ExpectedForeignRow(row.SourceLineNumbers, table.Name, row.GetPrimaryKey(DecompilerConstants.PrimaryKeyDelimiter), "Component_", (string)row[2], "Component"));
+                }
+                this.Core.IndexElement(row, assembly);
+            }
+        }
+
+        /// <summary>
+        /// Decompile the ComPlusAssemblyDependency table.
+        /// </summary>
+        /// <param name="table">The table to decompile.</param>
+        private void DecompileComPlusAssemblyDependencyTable(Table table)
+        {
+            foreach (Row row in table.Rows)
+            {
+                ComPlus.ComPlusAssemblyDependency assemblyDependency = new ComPlus.ComPlusAssemblyDependency();
+
+                assemblyDependency.RequiredAssembly = (string)row[1];
+
+                ComPlus.ComPlusAssembly assembly = (ComPlus.ComPlusAssembly)this.Core.GetIndexedElement("ComPlusAssembly", (string)row[0]);
+                if (null != assembly)
+                {
+                    assembly.AddChild(assemblyDependency);
+                }
+                else
+                {
+                    this.Core.OnMessage(WixWarnings.ExpectedForeignRow(row.SourceLineNumbers, table.Name, row.GetPrimaryKey(DecompilerConstants.PrimaryKeyDelimiter), "Assembly_", (string)row[0], "ComPlusAssembly"));
+                }
+            }
+        }
+
+        /// <summary>
+        /// Decompile the ComPlusComponent table.
+        /// </summary>
+        /// <param name="table">The table to decompile.</param>
+        private void DecompileComPlusComponentTable(Table table)
+        {
+            foreach (Row row in table.Rows)
+            {
+                ComPlus.ComPlusComponent comPlusComponent = new ComPlus.ComPlusComponent();
+
+                comPlusComponent.Id = (string)row[0];
+
+                try
+                {
+                    Guid clsid = new Guid((string)row[2]);
+                    comPlusComponent.CLSID = clsid.ToString().ToUpper();
+                }
+                catch
+                {
+                    // TODO: Warning
+                }
+
+                ComPlus.ComPlusAssembly assembly = (ComPlus.ComPlusAssembly)this.Core.GetIndexedElement("ComPlusAssembly", (string)row[1]);
+                if (null != assembly)
+                {
+                    assembly.AddChild(comPlusComponent);
+                }
+                else
+                {
+                    this.Core.OnMessage(WixWarnings.ExpectedForeignRow(row.SourceLineNumbers, table.Name, row.GetPrimaryKey(DecompilerConstants.PrimaryKeyDelimiter), "Assembly_", (string)row[1], "ComPlusAssembly"));
+                }
+                this.Core.IndexElement(row, comPlusComponent);
+            }
+        }
+
+        /// <summary>
+        /// Decompile the ComPlusComponentProperty table.
+        /// </summary>
+        /// <param name="table">The table to decompile.</param>
+        private void DecompileComPlusComponentPropertyTable(Table table)
+        {
+            foreach (Row row in table.Rows)
+            {
+                ComPlus.ComPlusComponent comPlusComponent = (ComPlus.ComPlusComponent)this.Core.GetIndexedElement("ComPlusComponent", (string)row[0]);
+                if (null == comPlusComponent)
+                {
+                    this.Core.OnMessage(WixWarnings.ExpectedForeignRow(row.SourceLineNumbers, table.Name, row.GetPrimaryKey(DecompilerConstants.PrimaryKeyDelimiter), "ComPlusComponent_", (string)row[0], "ComPlusComponent"));
+                }
+
+                switch ((string)row[1])
+                {
+                    case "AllowInprocSubscribers":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                comPlusComponent.AllowInprocSubscribers = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                comPlusComponent.AllowInprocSubscribers = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "ComponentAccessChecksEnabled":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                comPlusComponent.ComponentAccessChecksEnabled = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                comPlusComponent.ComponentAccessChecksEnabled = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "ComponentTransactionTimeout":
+                        int componentTransactionTimeout;
+                        if (Int32.TryParse((string)row[2], out componentTransactionTimeout))
+                        {
+                            comPlusComponent.ComponentTransactionTimeout = componentTransactionTimeout;
+                        }
+                        else
+                        {
+                            // TODO: Warning
+                        }
+                        break;
+                    case "ComponentTransactionTimeoutEnabled":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                comPlusComponent.ComponentTransactionTimeoutEnabled = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                comPlusComponent.ComponentTransactionTimeoutEnabled = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "COMTIIntrinsics":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                comPlusComponent.COMTIIntrinsics = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                comPlusComponent.COMTIIntrinsics = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "ConstructionEnabled":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                comPlusComponent.ConstructionEnabled = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                comPlusComponent.ConstructionEnabled = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "ConstructorString":
+                        comPlusComponent.ConstructorString = (string)row[2];
+                        break;
+                    case "CreationTimeout":
+                        int creationTimeout;
+                        if (Int32.TryParse((string)row[2], out creationTimeout))
+                        {
+                            comPlusComponent.CreationTimeout = creationTimeout;
+                        }
+                        else
+                        {
+                            // TODO: Warning
+                        }
+                        break;
+                    case "Description":
+                        comPlusComponent.Description = (string)row[2];
+                        break;
+                    case "EventTrackingEnabled":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                comPlusComponent.EventTrackingEnabled = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                comPlusComponent.EventTrackingEnabled = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "ExceptionClass":
+                        comPlusComponent.ExceptionClass = (string)row[2];
+                        break;
+                    case "FireInParallel":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                comPlusComponent.FireInParallel = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                comPlusComponent.FireInParallel = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "IISIntrinsics":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                comPlusComponent.IISIntrinsics = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                comPlusComponent.IISIntrinsics = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "InitializesServerApplication":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                comPlusComponent.InitializesServerApplication = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                comPlusComponent.InitializesServerApplication = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "IsEnabled":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                comPlusComponent.IsEnabled = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                comPlusComponent.IsEnabled = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "IsPrivateComponent":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                comPlusComponent.IsPrivateComponent = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                comPlusComponent.IsPrivateComponent = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "JustInTimeActivation":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                comPlusComponent.JustInTimeActivation = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                comPlusComponent.JustInTimeActivation = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "LoadBalancingSupported":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                comPlusComponent.LoadBalancingSupported = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                comPlusComponent.LoadBalancingSupported = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "MaxPoolSize":
+                        int maxPoolSize;
+                        if (Int32.TryParse((string)row[2], out maxPoolSize))
+                        {
+                            comPlusComponent.MaxPoolSize = maxPoolSize;
+                        }
+                        else
+                        {
+                            // TODO: Warning
+                        }
+                        break;
+                    case "MinPoolSize":
+                        int minPoolSize;
+                        if (Int32.TryParse((string)row[2], out minPoolSize))
+                        {
+                            comPlusComponent.MinPoolSize = minPoolSize;
+                        }
+                        else
+                        {
+                            // TODO: Warning
+                        }
+                        break;
+                    case "MultiInterfacePublisherFilterCLSID":
+                        comPlusComponent.MultiInterfacePublisherFilterCLSID = (string)row[2];
+                        break;
+                    case "MustRunInClientContext":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                comPlusComponent.MustRunInClientContext = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                comPlusComponent.MustRunInClientContext = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "MustRunInDefaultContext":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                comPlusComponent.MustRunInDefaultContext = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                comPlusComponent.MustRunInDefaultContext = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "ObjectPoolingEnabled":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                comPlusComponent.ObjectPoolingEnabled = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                comPlusComponent.ObjectPoolingEnabled = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "PublisherID":
+                        comPlusComponent.PublisherID = (string)row[2];
+                        break;
+                    case "SoapAssemblyName":
+                        comPlusComponent.SoapAssemblyName = (string)row[2];
+                        break;
+                    case "SoapTypeName":
+                        comPlusComponent.SoapTypeName = (string)row[2];
+                        break;
+                    case "Synchronization":
+                        switch ((string)row[2])
+                        {
+                            case "0":
+                                comPlusComponent.Synchronization = ComPlus.ComPlusComponent.SynchronizationType.ignored;
+                                break;
+                            case "1":
+                                comPlusComponent.Synchronization = ComPlus.ComPlusComponent.SynchronizationType.none;
+                                break;
+                            case "2":
+                                comPlusComponent.Synchronization = ComPlus.ComPlusComponent.SynchronizationType.supported;
+                                break;
+                            case "3":
+                                comPlusComponent.Synchronization = ComPlus.ComPlusComponent.SynchronizationType.required;
+                                break;
+                            case "4":
+                                comPlusComponent.Synchronization = ComPlus.ComPlusComponent.SynchronizationType.requiresNew;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "Transaction":
+                        switch ((string)row[2])
+                        {
+                            case "0":
+                                comPlusComponent.Transaction = ComPlus.ComPlusComponent.TransactionType.ignored;
+                                break;
+                            case "1":
+                                comPlusComponent.Transaction = ComPlus.ComPlusComponent.TransactionType.none;
+                                break;
+                            case "2":
+                                comPlusComponent.Transaction = ComPlus.ComPlusComponent.TransactionType.supported;
+                                break;
+                            case "3":
+                                comPlusComponent.Transaction = ComPlus.ComPlusComponent.TransactionType.required;
+                                break;
+                            case "4":
+                                comPlusComponent.Transaction = ComPlus.ComPlusComponent.TransactionType.requiresNew;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "TxIsolationLevel":
+                        switch ((string)row[2])
+                        {
+                            case "0":
+                                comPlusComponent.TxIsolationLevel = ComPlus.ComPlusComponent.TxIsolationLevelType.any;
+                                break;
+                            case "1":
+                                comPlusComponent.TxIsolationLevel = ComPlus.ComPlusComponent.TxIsolationLevelType.readUnCommitted;
+                                break;
+                            case "2":
+                                comPlusComponent.TxIsolationLevel = ComPlus.ComPlusComponent.TxIsolationLevelType.readCommitted;
+                                break;
+                            case "3":
+                                comPlusComponent.TxIsolationLevel = ComPlus.ComPlusComponent.TxIsolationLevelType.repeatableRead;
+                                break;
+                            case "4":
+                                comPlusComponent.TxIsolationLevel = ComPlus.ComPlusComponent.TxIsolationLevelType.serializable;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    default:
+                        // TODO: Warning
+                        break;
+                }
+            }
+        }
+
+        /// <summary>
+        /// Decompile the ComPlusRoleForComponent table.
+        /// </summary>
+        /// <param name="table">The table to decompile.</param>
+        private void DecompileComPlusRoleForComponentTable(Table table)
+        {
+            foreach (Row row in table.Rows)
+            {
+                ComPlus.ComPlusRoleForComponent roleForComponent = new ComPlus.ComPlusRoleForComponent();
+
+                roleForComponent.Id = (string)row[0];
+                roleForComponent.Component = (string)row[1];
+                roleForComponent.ApplicationRole = (string)row[2];
+
+                Wix.Component component = (Wix.Component)this.Core.GetIndexedElement("Component", (string)row[3]);
+                if (null != component)
+                {
+                    component.AddChild(roleForComponent);
+                }
+                else
+                {
+                    this.Core.OnMessage(WixWarnings.ExpectedForeignRow(row.SourceLineNumbers, table.Name, row.GetPrimaryKey(DecompilerConstants.PrimaryKeyDelimiter), "Component_", (string)row[3], "Component"));
+                }
+            }
+        }
+
+        /// <summary>
+        /// Decompile the ComPlusInterface table.
+        /// </summary>
+        /// <param name="table">The table to decompile.</param>
+        private void DecompileComPlusInterfaceTable(Table table)
+        {
+            foreach (Row row in table.Rows)
+            {
+                ComPlus.ComPlusInterface comPlusInterface = new ComPlus.ComPlusInterface();
+
+                comPlusInterface.Id = (string)row[0];
+
+                try
+                {
+                    Guid iid = new Guid((string)row[2]);
+                    comPlusInterface.IID = iid.ToString().ToUpper();
+                }
+                catch
+                {
+                    // TODO: Warning
+                }
+
+                ComPlus.ComPlusComponent comPlusComponent = (ComPlus.ComPlusComponent)this.Core.GetIndexedElement("ComPlusComponent", (string)row[1]);
+                if (null != comPlusComponent)
+                {
+                    comPlusComponent.AddChild(comPlusInterface);
+                }
+                else
+                {
+                    this.Core.OnMessage(WixWarnings.ExpectedForeignRow(row.SourceLineNumbers, table.Name, row.GetPrimaryKey(DecompilerConstants.PrimaryKeyDelimiter), "ComPlusComponent_", (string)row[1], "ComPlusComponent"));
+                }
+                this.Core.IndexElement(row, comPlusInterface);
+            }
+        }
+
+        /// <summary>
+        /// Decompile the ComPlusInterfaceProperty table.
+        /// </summary>
+        /// <param name="table">The table to decompile.</param>
+        private void DecompileComPlusInterfacePropertyTable(Table table)
+        {
+            foreach (Row row in table.Rows)
+            {
+                ComPlus.ComPlusInterface comPlusInterface = (ComPlus.ComPlusInterface)this.Core.GetIndexedElement("ComPlusInterface", (string)row[0]);
+                if (null == comPlusInterface)
+                {
+                    this.Core.OnMessage(WixWarnings.ExpectedForeignRow(row.SourceLineNumbers, table.Name, row.GetPrimaryKey(DecompilerConstants.PrimaryKeyDelimiter), "Interface_", (string)row[0], "ComPlusInterface"));
+                }
+
+                switch ((string)row[1])
+                {
+                    case "Description":
+                        comPlusInterface.Description = (string)row[2];
+                        break;
+                    case "QueuingEnabled":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                comPlusInterface.QueuingEnabled = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                comPlusInterface.QueuingEnabled = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    default:
+                        // TODO: Warning
+                        break;
+                }
+            }
+        }
+
+        /// <summary>
+        /// Decompile the ComPlusRoleForInterface table.
+        /// </summary>
+        /// <param name="table">The table to decompile.</param>
+        private void DecompileComPlusRoleForInterfaceTable(Table table)
+        {
+            foreach (Row row in table.Rows)
+            {
+                ComPlus.ComPlusRoleForInterface roleForInterface = new ComPlus.ComPlusRoleForInterface();
+
+                roleForInterface.Id = (string)row[0];
+                roleForInterface.Interface = (string)row[1];
+                roleForInterface.ApplicationRole = (string)row[2];
+
+                Wix.Component component = (Wix.Component)this.Core.GetIndexedElement("Component", (string)row[3]);
+                if (null != component)
+                {
+                    component.AddChild(roleForInterface);
+                }
+                else
+                {
+                    this.Core.OnMessage(WixWarnings.ExpectedForeignRow(row.SourceLineNumbers, table.Name, row.GetPrimaryKey(DecompilerConstants.PrimaryKeyDelimiter), "Component_", (string)row[3], "Component"));
+                }
+            }
+        }
+
+        /// <summary>
+        /// Decompile the ComPlusMethod table.
+        /// </summary>
+        /// <param name="table">The table to decompile.</param>
+        private void DecompileComPlusMethodTable(Table table)
+        {
+            foreach (Row row in table.Rows)
+            {
+                ComPlus.ComPlusMethod comPlusMethod = new ComPlus.ComPlusMethod();
+
+                comPlusMethod.Id = (string)row[0];
+
+                if (null != row[2])
+                {
+                    comPlusMethod.Index = (int)row[2];
+                }
+
+                if (null != row[3])
+                {
+                    comPlusMethod.Name = (string)row[3];
+                }
+
+                ComPlus.ComPlusInterface comPlusInterface = (ComPlus.ComPlusInterface)this.Core.GetIndexedElement("ComPlusInterface", (string)row[1]);
+                if (null != comPlusInterface)
+                {
+                    comPlusInterface.AddChild(comPlusMethod);
+                }
+                else
+                {
+                    this.Core.OnMessage(WixWarnings.ExpectedForeignRow(row.SourceLineNumbers, table.Name, row.GetPrimaryKey(DecompilerConstants.PrimaryKeyDelimiter), "Interface_", (string)row[1], "ComPlusInterface"));
+                }
+                this.Core.IndexElement(row, comPlusMethod);
+            }
+        }
+
+        /// <summary>
+        /// Decompile the ComPlusMethodProperty table.
+        /// </summary>
+        /// <param name="table">The table to decompile.</param>
+        private void DecompileComPlusMethodPropertyTable(Table table)
+        {
+            foreach (Row row in table.Rows)
+            {
+                ComPlus.ComPlusMethod comPlusMethod = (ComPlus.ComPlusMethod)this.Core.GetIndexedElement("ComPlusMethod", (string)row[0]);
+                if (null == comPlusMethod)
+                {
+                    this.Core.OnMessage(WixWarnings.ExpectedForeignRow(row.SourceLineNumbers, table.Name, row.GetPrimaryKey(DecompilerConstants.PrimaryKeyDelimiter), "Method_", (string)row[0], "ComPlusMethod"));
+                }
+
+                switch ((string)row[1])
+                {
+                    case "AutoComplete":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                comPlusMethod.AutoComplete = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                comPlusMethod.AutoComplete = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "Description":
+                        comPlusMethod.Description = (string)row[2];
+                        break;
+                    default:
+                        // TODO: Warning
+                        break;
+                }
+            }
+        }
+
+        /// <summary>
+        /// Decompile the ComPlusRoleForMethod table.
+        /// </summary>
+        /// <param name="table">The table to decompile.</param>
+        private void DecompileComPlusRoleForMethodTable(Table table)
+        {
+            foreach (Row row in table.Rows)
+            {
+                ComPlus.ComPlusRoleForMethod roleForMethod = new ComPlus.ComPlusRoleForMethod();
+
+                roleForMethod.Id = (string)row[0];
+                roleForMethod.Method = (string)row[1];
+                roleForMethod.ApplicationRole = (string)row[2];
+
+                Wix.Component component = (Wix.Component)this.Core.GetIndexedElement("Component", (string)row[3]);
+                if (null != component)
+                {
+                    component.AddChild(roleForMethod);
+                }
+                else
+                {
+                    this.Core.OnMessage(WixWarnings.ExpectedForeignRow(row.SourceLineNumbers, table.Name, row.GetPrimaryKey(DecompilerConstants.PrimaryKeyDelimiter), "Component_", (string)row[3], "Component"));
+                }
+            }
+        }
+
+        /// <summary>
+        /// Decompile the ComPlusSubscription table.
+        /// </summary>
+        /// <param name="table">The table to decompile.</param>
+        private void DecompileComPlusSubscriptionTable(Table table)
+        {
+            foreach (Row row in table.Rows)
+            {
+                ComPlus.ComPlusSubscription subscription = new ComPlus.ComPlusSubscription();
+
+                subscription.Id = (string)row[0];
+                subscription.Component = (string)row[1];
+                subscription.SubscriptionId = (string)row[3];
+                subscription.Name = (string)row[4];
+                subscription.EventCLSID = (string)row[5];
+                subscription.PublisherID = (string)row[6];
+
+                Wix.Component component = (Wix.Component)this.Core.GetIndexedElement("Component", (string)row[2]);
+                if (null != component)
+                {
+                    component.AddChild(subscription);
+                }
+                else
+                {
+                    this.Core.OnMessage(WixWarnings.ExpectedForeignRow(row.SourceLineNumbers, table.Name, row.GetPrimaryKey(DecompilerConstants.PrimaryKeyDelimiter), "Component_", (string)row[2], "Component"));
+                }
+                this.Core.IndexElement(row, subscription);
+            }
+        }
+
+        /// <summary>
+        /// Decompile the ComPlusSubscriptionProperty table.
+        /// </summary>
+        /// <param name="table">The table to decompile.</param>
+        private void DecompileComPlusSubscriptionPropertyTable(Table table)
+        {
+            foreach (Row row in table.Rows)
+            {
+                ComPlus.ComPlusSubscription subscription = (ComPlus.ComPlusSubscription)this.Core.GetIndexedElement("ComPlusSubscription", (string)row[0]);
+                if (null == subscription)
+                {
+                    this.Core.OnMessage(WixWarnings.ExpectedForeignRow(row.SourceLineNumbers, table.Name, row.GetPrimaryKey(DecompilerConstants.PrimaryKeyDelimiter), "Subscription_", (string)row[0], "ComPlusSubscription"));
+                }
+
+                switch ((string)row[1])
+                {
+                    case "Description":
+                        subscription.Description = (string)row[2];
+                        break;
+                    case "Enabled":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                subscription.Enabled = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                subscription.Enabled = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "EventClassPartitionID":
+                        subscription.EventClassPartitionID = (string)row[2];
+                        break;
+                    case "FilterCriteria":
+                        subscription.FilterCriteria = (string)row[2];
+                        break;
+                    case "InterfaceID":
+                        subscription.InterfaceID = (string)row[2];
+                        break;
+                    case "MachineName":
+                        subscription.MachineName = (string)row[2];
+                        break;
+                    case "MethodName":
+                        subscription.MethodName = (string)row[2];
+                        break;
+                    case "PerUser":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                subscription.PerUser = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                subscription.PerUser = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "Queued":
+                        switch ((string)row[2])
+                        {
+                            case "1":
+                                subscription.Queued = ComPlus.YesNoType.yes;
+                                break;
+                            case "0":
+                                subscription.Queued = ComPlus.YesNoType.no;
+                                break;
+                            default:
+                                // TODO: Warning
+                                break;
+                        }
+                        break;
+                    case "SubscriberMoniker":
+                        subscription.SubscriberMoniker = (string)row[2];
+                        break;
+                    case "UserName":
+                        subscription.UserName = (string)row[2];
+                        break;
+                    default:
+                        // TODO: Warning
+                        break;
+                }
+            }
+        }
+    }
+#endif
+}
diff --git a/src/ext/ComPlus/wixext/ComPlusErrors.cs b/src/ext/ComPlus/wixext/ComPlusErrors.cs
new file mode 100644
index 00000000..91b41679
--- /dev/null
+++ b/src/ext/ComPlus/wixext/ComPlusErrors.cs
@@ -0,0 +1,72 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using System;
+    using System.Resources;
+    using WixToolset.Data;
+
+    public static class ComPlusErrors
+    {
+        public static Message IllegalAttributeWithoutComponent(SourceLineNumber sourceLineNumbers, string elementName, string attributeName)
+        {
+            return Message(sourceLineNumbers, Ids.IllegalAttributeWithoutComponent, "The {0}/@{1} attribute cannot be specified unless the element has a component as an ancestor. A {0} that does not have a component ancestor is not installed.", elementName, attributeName);
+        }
+
+        public static Message IllegalElementWithoutComponent(SourceLineNumber sourceLineNumbers, string elementName)
+        {
+            return Message(sourceLineNumbers, Ids.IllegalElementWithoutComponent, "The {0} element cannot be specified unless the element has a component as an ancestor. A {0} that does not have a component ancestor is not installed.", elementName);
+        }
+
+        public static Message RequiredAttribute(SourceLineNumber sourceLineNumbers, string elementName, string attributeName1, string attributeName2)
+        {
+            return Message(sourceLineNumbers, Ids.RequiredAttribute, "A {0} element must have either a {1} attribute or a {2} attribute, or both set.", elementName, attributeName1, attributeName2);
+        }
+
+        public static Message RequiredAttributeNotUnderComponent(SourceLineNumber sourceLineNumbers, string elementName, string attributeName1, string attributeName2)
+        {
+            return Message(sourceLineNumbers, Ids.RequiredAttributeNotUnderComponent, "A {0} element not nested under a component must have either a {1} attribute or a {2} attribute, or both set.", elementName, attributeName1, attributeName2);
+        }
+
+        public static Message RequiredAttributeUnderComponent(SourceLineNumber sourceLineNumbers, string elementName, string attributeName)
+        {
+            return Message(sourceLineNumbers, Ids.RequiredAttributeUnderComponent, "The {0}/@{1} attribute must be provided when {0} element is nested under a component.", elementName, attributeName);
+        }
+
+        public static Message UnexpectedAttributeWithOtherValue(SourceLineNumber sourceLineNumbers, string elementName, string attributeName, string otherAttributeName, string otherValue)
+        {
+            return Message(sourceLineNumbers, Ids.UnexpectedAttributeWithOtherValue, "The {0}/@{1} attribute cannot coexist with the {2} attribute's value of '{3}'.", elementName, attributeName, otherAttributeName, otherValue);
+        }
+
+        public static Message UnexpectedAttributeWithOtherValue(SourceLineNumber sourceLineNumbers, string elementName, string attributeName, string value, string otherAttributeName, string otherValue)
+        {
+            return Message(sourceLineNumbers, Ids.UnexpectedAttributeWithOtherValue, "The {0}/@{1} attribute's value, '{2}', cannot coexist with the {3} attribute's value of '{4}'.", elementName, attributeName, value, otherAttributeName, otherValue);
+        }
+
+        public static Message UnexpectedAttributeWithoutOtherValue(SourceLineNumber sourceLineNumbers, string elementName, string attributeName, string otherAttributeName, string otherValue)
+        {
+            return Message(sourceLineNumbers, Ids.UnexpectedAttributeWithoutOtherValue, "The {0}/@{1} cannot be provided unless the {2} attribute is provided with a value of '{3}'.", elementName, attributeName, otherAttributeName, otherValue);
+        }
+
+        private static Message Message(SourceLineNumber sourceLineNumber, Ids id, string format, params object[] args)
+        {
+            return new Message(sourceLineNumber, MessageLevel.Error, (int)id, format, args);
+        }
+
+        private static Message Message(SourceLineNumber sourceLineNumber, Ids id, ResourceManager resourceManager, string resourceName, params object[] args)
+        {
+            return new Message(sourceLineNumber, MessageLevel.Error, (int)id, resourceManager, resourceName, args);
+        }
+
+        public enum Ids
+        {
+            IllegalAttributeWithoutComponent = 6000,
+            IllegalElementWithoutComponent = 6001,
+            UnexpectedAttributeWithOtherValue = 6002,
+            UnexpectedAttributeWithoutOtherValue = 6003,
+            RequiredAttributeUnderComponent = 6004,
+            RequiredAttribute = 6005,
+            RequiredAttributeNotUnderComponent = 6006,
+        }
+    }
+}
diff --git a/src/ext/ComPlus/wixext/ComPlusExtensionData.cs b/src/ext/ComPlus/wixext/ComPlusExtensionData.cs
new file mode 100644
index 00000000..9cd5341e
--- /dev/null
+++ b/src/ext/ComPlus/wixext/ComPlusExtensionData.cs
@@ -0,0 +1,30 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using WixToolset.Data;
+    using WixToolset.Extensibility;
+
+    /// <summary>
+    /// The WiX Toolset COM+ Extension.
+    /// </summary>
+    public sealed class ComPlusExtensionData : BaseExtensionData
+    {
+        /// <summary>
+        /// Gets the default culture.
+        /// </summary>
+        /// <value>The default culture.</value>
+        public override string DefaultCulture => "en-US";
+
+        public override bool TryGetSymbolDefinitionByName(string name, out IntermediateSymbolDefinition symbolDefinition)
+        {
+            symbolDefinition = ComPlusSymbolDefinitions.ByName(name);
+            return symbolDefinition != null;
+        }
+
+        public override Intermediate GetLibrary(ISymbolDefinitionCreator symbolDefinitions)
+        {
+            return Intermediate.Load(typeof(ComPlusExtensionData).Assembly, "WixToolset.ComPlus.complus.wixlib", symbolDefinitions);
+        }
+    }
+}
diff --git a/src/ext/ComPlus/wixext/ComPlusExtensionFactory.cs b/src/ext/ComPlus/wixext/ComPlusExtensionFactory.cs
new file mode 100644
index 00000000..76b51bff
--- /dev/null
+++ b/src/ext/ComPlus/wixext/ComPlusExtensionFactory.cs
@@ -0,0 +1,18 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using System;
+    using System.Collections.Generic;
+    using WixToolset.Extensibility;
+
+    public class ComPlusExtensionFactory : BaseExtensionFactory
+    {
+        protected override IReadOnlyCollection<Type> ExtensionTypes => new[]
+        {
+            typeof(ComPlusCompiler),
+            typeof(ComPlusExtensionData),
+            typeof(ComPlusWindowsInstallerBackendBinderExtension),
+        };
+    }
+}
diff --git a/src/ext/ComPlus/wixext/ComPlusTableDefinitions.cs b/src/ext/ComPlus/wixext/ComPlusTableDefinitions.cs
new file mode 100644
index 00000000..565e1d44
--- /dev/null
+++ b/src/ext/ComPlus/wixext/ComPlusTableDefinitions.cs
@@ -0,0 +1,360 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using WixToolset.Data.WindowsInstaller;
+
+    public static class ComPlusTableDefinitions
+    {
+        public static readonly TableDefinition ComPlusPartition = new TableDefinition(
+            "ComPlusPartition",
+            ComPlusSymbolDefinitions.ComPlusPartition,
+            new[]
+            {
+                new ColumnDefinition("Partition", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Identifier, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Component_", ColumnType.String, 72, primaryKey: false, nullable: true, ColumnCategory.Identifier, keyTable: "Component", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Id", ColumnType.String, 72, primaryKey: false, nullable: true, ColumnCategory.Formatted, modularizeType: ColumnModularizeType.Property),
+                new ColumnDefinition("Name", ColumnType.String, 255, primaryKey: false, nullable: true, ColumnCategory.Formatted, modularizeType: ColumnModularizeType.Property),
+            },
+            symbolIdIsPrimaryKey: true
+        );
+
+        public static readonly TableDefinition ComPlusPartitionProperty = new TableDefinition(
+            "ComPlusPartitionProperty",
+            ComPlusSymbolDefinitions.ComPlusPartitionProperty,
+            new[]
+            {
+                new ColumnDefinition("Partition_", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Identifier, keyTable: "ComPlusPartition", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Name", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Formatted, modularizeType: ColumnModularizeType.Property),
+                new ColumnDefinition("Value", ColumnType.String, 255, primaryKey: false, nullable: false, ColumnCategory.Formatted, modularizeType: ColumnModularizeType.Property),
+            },
+            symbolIdIsPrimaryKey: false
+        );
+
+        public static readonly TableDefinition ComPlusPartitionRole = new TableDefinition(
+            "ComPlusPartitionRole",
+            ComPlusSymbolDefinitions.ComPlusPartitionRole,
+            new[]
+            {
+                new ColumnDefinition("PartitionRole", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Identifier, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Partition_", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Identifier, keyTable: "ComPlusPartition", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Component_", ColumnType.String, 72, primaryKey: false, nullable: true, ColumnCategory.Identifier, keyTable: "Component", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Name", ColumnType.String, 255, primaryKey: false, nullable: false, ColumnCategory.Formatted, modularizeType: ColumnModularizeType.Property),
+            },
+            symbolIdIsPrimaryKey: true
+        );
+
+        public static readonly TableDefinition ComPlusUserInPartitionRole = new TableDefinition(
+            "ComPlusUserInPartitionRole",
+            ComPlusSymbolDefinitions.ComPlusUserInPartitionRole,
+            new[]
+            {
+                new ColumnDefinition("UserInPartitionRole", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Identifier, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("PartitionRole_", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Identifier, keyTable: "ComPlusPartitionRole", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Component_", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Identifier, keyTable: "Component", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("User_", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Identifier, modularizeType: ColumnModularizeType.Column),
+            },
+            symbolIdIsPrimaryKey: true
+        );
+
+        public static readonly TableDefinition ComPlusGroupInPartitionRole = new TableDefinition(
+            "ComPlusGroupInPartitionRole",
+            ComPlusSymbolDefinitions.ComPlusGroupInPartitionRole,
+            new[]
+            {
+                new ColumnDefinition("GroupInPartitionRole", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Identifier, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("PartitionRole_", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Identifier, keyTable: "ComPlusPartitionRole", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Component_", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Identifier, keyTable: "Component", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Group_", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Identifier, modularizeType: ColumnModularizeType.Column),
+            },
+            symbolIdIsPrimaryKey: true
+        );
+
+        public static readonly TableDefinition ComPlusPartitionUser = new TableDefinition(
+            "ComPlusPartitionUser",
+            ComPlusSymbolDefinitions.ComPlusPartitionUser,
+            new[]
+            {
+                new ColumnDefinition("PartitionUser", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Identifier, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Partition_", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Identifier, keyTable: "ComPlusPartition", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Component_", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Identifier, keyTable: "Component", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("User_", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Identifier, modularizeType: ColumnModularizeType.Column),
+            },
+            symbolIdIsPrimaryKey: true
+        );
+
+        public static readonly TableDefinition ComPlusApplication = new TableDefinition(
+            "ComPlusApplication",
+            ComPlusSymbolDefinitions.ComPlusApplication,
+            new[]
+            {
+                new ColumnDefinition("Application", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Identifier, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Partition_", ColumnType.String, 72, primaryKey: false, nullable: true, ColumnCategory.Identifier, keyTable: "ComPlusPartition", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Component_", ColumnType.String, 72, primaryKey: false, nullable: true, ColumnCategory.Identifier, keyTable: "Component", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Id", ColumnType.String, 72, primaryKey: false, nullable: true, ColumnCategory.Formatted, modularizeType: ColumnModularizeType.Property),
+                new ColumnDefinition("Name", ColumnType.String, 255, primaryKey: false, nullable: true, ColumnCategory.Formatted, modularizeType: ColumnModularizeType.Property),
+            },
+            symbolIdIsPrimaryKey: true
+        );
+
+        public static readonly TableDefinition ComPlusApplicationProperty = new TableDefinition(
+            "ComPlusApplicationProperty",
+            ComPlusSymbolDefinitions.ComPlusApplicationProperty,
+            new[]
+            {
+                new ColumnDefinition("Application_", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Identifier, keyTable: "ComPlusApplication", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Name", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Formatted, modularizeType: ColumnModularizeType.Property),
+                new ColumnDefinition("Value", ColumnType.String, 255, primaryKey: false, nullable: false, ColumnCategory.Formatted, modularizeType: ColumnModularizeType.Property),
+            },
+            symbolIdIsPrimaryKey: false
+        );
+
+        public static readonly TableDefinition ComPlusApplicationRole = new TableDefinition(
+            "ComPlusApplicationRole",
+            ComPlusSymbolDefinitions.ComPlusApplicationRole,
+            new[]
+            {
+                new ColumnDefinition("ApplicationRole", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Identifier, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Application_", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Identifier, keyTable: "ComPlusApplication", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Component_", ColumnType.String, 72, primaryKey: false, nullable: true, ColumnCategory.Identifier, keyTable: "Component", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Name", ColumnType.String, 255, primaryKey: false, nullable: false, ColumnCategory.Formatted, modularizeType: ColumnModularizeType.Property),
+            },
+            symbolIdIsPrimaryKey: true
+        );
+
+        public static readonly TableDefinition ComPlusApplicationRoleProperty = new TableDefinition(
+            "ComPlusApplicationRoleProperty",
+            ComPlusSymbolDefinitions.ComPlusApplicationRoleProperty,
+            new[]
+            {
+                new ColumnDefinition("ApplicationRole_", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Identifier, keyTable: "ComPlusApplicationRole", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Name", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Formatted, modularizeType: ColumnModularizeType.Property),
+                new ColumnDefinition("Value", ColumnType.String, 255, primaryKey: false, nullable: false, ColumnCategory.Formatted, modularizeType: ColumnModularizeType.Property),
+            },
+            symbolIdIsPrimaryKey: false
+        );
+
+        public static readonly TableDefinition ComPlusUserInApplicationRole = new TableDefinition(
+            "ComPlusUserInApplicationRole",
+            ComPlusSymbolDefinitions.ComPlusUserInApplicationRole,
+            new[]
+            {
+                new ColumnDefinition("UserInApplicationRole", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Identifier, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("ApplicationRole_", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Identifier, keyTable: "ComPlusApplicationRole", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Component_", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Identifier, keyTable: "Component", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("User_", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Identifier, modularizeType: ColumnModularizeType.Column),
+            },
+            symbolIdIsPrimaryKey: true
+        );
+
+        public static readonly TableDefinition ComPlusGroupInApplicationRole = new TableDefinition(
+            "ComPlusGroupInApplicationRole",
+            ComPlusSymbolDefinitions.ComPlusGroupInApplicationRole,
+            new[]
+            {
+                new ColumnDefinition("GroupInApplicationRole", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Identifier, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("ApplicationRole_", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Identifier, keyTable: "ComPlusApplicationRole", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Component_", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Identifier, keyTable: "Component", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Group_", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Identifier, modularizeType: ColumnModularizeType.Column),
+            },
+            symbolIdIsPrimaryKey: true
+        );
+
+        public static readonly TableDefinition ComPlusAssembly = new TableDefinition(
+            "ComPlusAssembly",
+            ComPlusSymbolDefinitions.ComPlusAssembly,
+            new[]
+            {
+                new ColumnDefinition("Assembly", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Identifier, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Application_", ColumnType.String, 72, primaryKey: false, nullable: true, ColumnCategory.Identifier, keyTable: "ComPlusApplication", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Component_", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Identifier, keyTable: "Component", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("AssemblyName", ColumnType.String, 255, primaryKey: false, nullable: true, ColumnCategory.Formatted, modularizeType: ColumnModularizeType.Property),
+                new ColumnDefinition("DllPath", ColumnType.String, 255, primaryKey: false, nullable: true, ColumnCategory.Formatted, modularizeType: ColumnModularizeType.Property),
+                new ColumnDefinition("TlbPath", ColumnType.String, 255, primaryKey: false, nullable: true, ColumnCategory.Formatted, modularizeType: ColumnModularizeType.Property),
+                new ColumnDefinition("PSDllPath", ColumnType.String, 255, primaryKey: false, nullable: true, ColumnCategory.Formatted, modularizeType: ColumnModularizeType.Property),
+                new ColumnDefinition("Attributes", ColumnType.Number, 4, primaryKey: false, nullable: false, ColumnCategory.Unknown),
+            },
+            symbolIdIsPrimaryKey: true
+        );
+
+        public static readonly TableDefinition ComPlusAssemblyDependency = new TableDefinition(
+            "ComPlusAssemblyDependency",
+            ComPlusSymbolDefinitions.ComPlusAssemblyDependency,
+            new[]
+            {
+                new ColumnDefinition("Assembly_", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Identifier, keyTable: "ComPlusAssembly", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("RequiredAssembly_", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Identifier, keyTable: "ComPlusAssembly", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+            },
+            symbolIdIsPrimaryKey: false
+        );
+
+        public static readonly TableDefinition ComPlusComponent = new TableDefinition(
+            "ComPlusComponent",
+            ComPlusSymbolDefinitions.ComPlusComponent,
+            new[]
+            {
+                new ColumnDefinition("ComPlusComponent", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Identifier, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Assembly_", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Identifier, keyTable: "ComPlusAssembly", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("CLSID", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Formatted, modularizeType: ColumnModularizeType.Property),
+            },
+            symbolIdIsPrimaryKey: true
+        );
+
+        public static readonly TableDefinition ComPlusComponentProperty = new TableDefinition(
+            "ComPlusComponentProperty",
+            ComPlusSymbolDefinitions.ComPlusComponentProperty,
+            new[]
+            {
+                new ColumnDefinition("ComPlusComponent_", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Identifier, keyTable: "ComPlusComponent", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Name", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Formatted, modularizeType: ColumnModularizeType.Property),
+                new ColumnDefinition("Value", ColumnType.String, 255, primaryKey: false, nullable: false, ColumnCategory.Formatted, modularizeType: ColumnModularizeType.Property),
+            },
+            symbolIdIsPrimaryKey: false
+        );
+
+        public static readonly TableDefinition ComPlusRoleForComponent = new TableDefinition(
+            "ComPlusRoleForComponent",
+            ComPlusSymbolDefinitions.ComPlusRoleForComponent,
+            new[]
+            {
+                new ColumnDefinition("RoleForComponent", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Identifier, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("ComPlusComponent_", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Identifier, keyTable: "ComPlusComponent", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("ApplicationRole_", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Identifier, keyTable: "ComPlusApplicationRole", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Component_", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Identifier, keyTable: "Component", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+            },
+            symbolIdIsPrimaryKey: true
+        );
+
+        public static readonly TableDefinition ComPlusInterface = new TableDefinition(
+            "ComPlusInterface",
+            ComPlusSymbolDefinitions.ComPlusInterface,
+            new[]
+            {
+                new ColumnDefinition("Interface", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Identifier, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("ComPlusComponent_", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Identifier, keyTable: "ComPlusComponent", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("IID", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Formatted, modularizeType: ColumnModularizeType.Property),
+            },
+            symbolIdIsPrimaryKey: true
+        );
+
+        public static readonly TableDefinition ComPlusInterfaceProperty = new TableDefinition(
+            "ComPlusInterfaceProperty",
+            ComPlusSymbolDefinitions.ComPlusInterfaceProperty,
+            new[]
+            {
+                new ColumnDefinition("Interface_", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Identifier, keyTable: "ComPlusInterface", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Name", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Formatted, modularizeType: ColumnModularizeType.Property),
+                new ColumnDefinition("Value", ColumnType.String, 255, primaryKey: false, nullable: false, ColumnCategory.Formatted, modularizeType: ColumnModularizeType.Property),
+            },
+            symbolIdIsPrimaryKey: false
+        );
+
+        public static readonly TableDefinition ComPlusRoleForInterface = new TableDefinition(
+            "ComPlusRoleForInterface",
+            ComPlusSymbolDefinitions.ComPlusRoleForInterface,
+            new[]
+            {
+                new ColumnDefinition("RoleForInterface", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Identifier, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Interface_", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Identifier, keyTable: "ComPlusInterface", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("ApplicationRole_", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Identifier, keyTable: "ComPlusApplicationRole", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Component_", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Identifier, keyTable: "Component", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+            },
+            symbolIdIsPrimaryKey: true
+        );
+
+        public static readonly TableDefinition ComPlusMethod = new TableDefinition(
+            "ComPlusMethod",
+            ComPlusSymbolDefinitions.ComPlusMethod,
+            new[]
+            {
+                new ColumnDefinition("Method", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Identifier, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Interface_", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Identifier, keyTable: "ComPlusInterface", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Index", ColumnType.Number, 4, primaryKey: false, nullable: true, ColumnCategory.Unknown),
+                new ColumnDefinition("Name", ColumnType.String, 255, primaryKey: false, nullable: true, ColumnCategory.Formatted, modularizeType: ColumnModularizeType.Property),
+            },
+            symbolIdIsPrimaryKey: true
+        );
+
+        public static readonly TableDefinition ComPlusMethodProperty = new TableDefinition(
+            "ComPlusMethodProperty",
+            ComPlusSymbolDefinitions.ComPlusMethodProperty,
+            new[]
+            {
+                new ColumnDefinition("Method_", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Identifier, keyTable: "ComPlusMethod", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Name", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Formatted, modularizeType: ColumnModularizeType.Property),
+                new ColumnDefinition("Value", ColumnType.String, 255, primaryKey: false, nullable: false, ColumnCategory.Formatted, modularizeType: ColumnModularizeType.Property),
+            },
+            symbolIdIsPrimaryKey: false
+        );
+
+        public static readonly TableDefinition ComPlusRoleForMethod = new TableDefinition(
+            "ComPlusRoleForMethod",
+            ComPlusSymbolDefinitions.ComPlusRoleForMethod,
+            new[]
+            {
+                new ColumnDefinition("RoleForMethod", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Identifier, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Method_", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Identifier, keyTable: "ComPlusMethod", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("ApplicationRole_", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Identifier, keyTable: "ComPlusApplicationRole", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Component_", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Identifier, keyTable: "Component", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+            },
+            symbolIdIsPrimaryKey: true
+        );
+
+        public static readonly TableDefinition ComPlusSubscription = new TableDefinition(
+            "ComPlusSubscription",
+            ComPlusSymbolDefinitions.ComPlusSubscription,
+            new[]
+            {
+                new ColumnDefinition("Subscription", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Identifier, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("ComPlusComponent_", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Identifier, keyTable: "ComPlusComponent", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Component_", ColumnType.String, 72, primaryKey: false, nullable: false, ColumnCategory.Identifier, keyTable: "Component", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Id", ColumnType.String, 72, primaryKey: false, nullable: true, ColumnCategory.Formatted, modularizeType: ColumnModularizeType.Property),
+                new ColumnDefinition("Name", ColumnType.String, 255, primaryKey: false, nullable: false, ColumnCategory.Formatted, modularizeType: ColumnModularizeType.Property),
+                new ColumnDefinition("EventCLSID", ColumnType.String, 72, primaryKey: false, nullable: true, ColumnCategory.Formatted, modularizeType: ColumnModularizeType.Property),
+                new ColumnDefinition("PublisherID", ColumnType.String, 72, primaryKey: false, nullable: true, ColumnCategory.Formatted, modularizeType: ColumnModularizeType.Property),
+            },
+            symbolIdIsPrimaryKey: false
+        );
+
+        public static readonly TableDefinition ComPlusSubscriptionProperty = new TableDefinition(
+            "ComPlusSubscriptionProperty",
+            ComPlusSymbolDefinitions.ComPlusSubscriptionProperty,
+            new[]
+            {
+                new ColumnDefinition("Subscription_", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Identifier, keyTable: "ComPlusSubscription", keyColumn: 1, modularizeType: ColumnModularizeType.Column),
+                new ColumnDefinition("Name", ColumnType.String, 72, primaryKey: true, nullable: false, ColumnCategory.Formatted, modularizeType: ColumnModularizeType.Property),
+                new ColumnDefinition("Value", ColumnType.String, 255, primaryKey: false, nullable: false, ColumnCategory.Formatted, modularizeType: ColumnModularizeType.Property),
+            },
+            symbolIdIsPrimaryKey: false
+        );
+
+        public static readonly TableDefinition[] All = new[]
+        {
+            ComPlusPartition,
+            ComPlusPartitionProperty,
+            ComPlusPartitionRole,
+            ComPlusUserInPartitionRole,
+            ComPlusGroupInPartitionRole,
+            ComPlusPartitionUser,
+            ComPlusApplication,
+            ComPlusApplicationProperty,
+            ComPlusApplicationRole,
+            ComPlusApplicationRoleProperty,
+            ComPlusUserInApplicationRole,
+            ComPlusGroupInApplicationRole,
+            ComPlusAssembly,
+            ComPlusAssemblyDependency,
+            ComPlusComponent,
+            ComPlusComponentProperty,
+            ComPlusRoleForComponent,
+            ComPlusInterface,
+            ComPlusInterfaceProperty,
+            ComPlusRoleForInterface,
+            ComPlusMethod,
+            ComPlusMethodProperty,
+            ComPlusRoleForMethod,
+            ComPlusSubscription,
+            ComPlusSubscriptionProperty,
+        };
+    }
+}
diff --git a/src/ext/ComPlus/wixext/ComPlusWarnings.cs b/src/ext/ComPlus/wixext/ComPlusWarnings.cs
new file mode 100644
index 00000000..e0000918
--- /dev/null
+++ b/src/ext/ComPlus/wixext/ComPlusWarnings.cs
@@ -0,0 +1,31 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using System;
+    using System.Resources;
+    using WixToolset.Data;
+
+    public static class ComPlusWarnings
+    {
+        public static Message MissingComponents(SourceLineNumber sourceLineNumbers)
+        {
+            return Message(sourceLineNumbers, Ids.MissingComponents, "The ComPlusAssembly element has a Type attribute with a value of 'native', but the element does not contain any ComPlusComponent elements. All components contained in a native assembly must be listed, or they will not be correctly removed during uninstall.");
+        }
+
+        private static Message Message(SourceLineNumber sourceLineNumber, Ids id, string format, params object[] args)
+        {
+            return new Message(sourceLineNumber, MessageLevel.Warning, (int)id, format, args);
+        }
+
+        private static Message Message(SourceLineNumber sourceLineNumber, Ids id, ResourceManager resourceManager, string resourceName, params object[] args)
+        {
+            return new Message(sourceLineNumber, MessageLevel.Warning, (int)id, resourceManager, resourceName, args);
+        }
+
+        public enum Ids
+        {
+            MissingComponents = 6007,
+        }
+    }
+}
diff --git a/src/ext/ComPlus/wixext/ComPlusWindowsInstallerBackendBinderExtension.cs b/src/ext/ComPlus/wixext/ComPlusWindowsInstallerBackendBinderExtension.cs
new file mode 100644
index 00000000..cf226a3d
--- /dev/null
+++ b/src/ext/ComPlus/wixext/ComPlusWindowsInstallerBackendBinderExtension.cs
@@ -0,0 +1,13 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using System.Collections.Generic;
+    using WixToolset.Data.WindowsInstaller;
+    using WixToolset.Extensibility;
+
+    public class ComPlusWindowsInstallerBackendBinderExtension : BaseWindowsInstallerBackendBinderExtension
+    {
+        public override IReadOnlyCollection<TableDefinition> TableDefinitions => ComPlusTableDefinitions.All;
+    }
+}
diff --git a/src/ext/ComPlus/wixext/Symbols/ComPlusApplicationPropertySymbol.cs b/src/ext/ComPlus/wixext/Symbols/ComPlusApplicationPropertySymbol.cs
new file mode 100644
index 00000000..6d1e2d28
--- /dev/null
+++ b/src/ext/ComPlus/wixext/Symbols/ComPlusApplicationPropertySymbol.cs
@@ -0,0 +1,63 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using WixToolset.Data;
+    using WixToolset.ComPlus.Symbols;
+
+    public static partial class ComPlusSymbolDefinitions
+    {
+        public static readonly IntermediateSymbolDefinition ComPlusApplicationProperty = new IntermediateSymbolDefinition(
+            ComPlusSymbolDefinitionType.ComPlusApplicationProperty.ToString(),
+            new[]
+            {
+                new IntermediateFieldDefinition(nameof(ComPlusApplicationPropertySymbolFields.ApplicationRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusApplicationPropertySymbolFields.Name), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusApplicationPropertySymbolFields.Value), IntermediateFieldType.String),
+            },
+            typeof(ComPlusApplicationPropertySymbol));
+    }
+}
+
+namespace WixToolset.ComPlus.Symbols
+{
+    using WixToolset.Data;
+
+    public enum ComPlusApplicationPropertySymbolFields
+    {
+        ApplicationRef,
+        Name,
+        Value,
+    }
+
+    public class ComPlusApplicationPropertySymbol : IntermediateSymbol
+    {
+        public ComPlusApplicationPropertySymbol() : base(ComPlusSymbolDefinitions.ComPlusApplicationProperty, null, null)
+        {
+        }
+
+        public ComPlusApplicationPropertySymbol(SourceLineNumber sourceLineNumber, Identifier id = null) : base(ComPlusSymbolDefinitions.ComPlusApplicationProperty, sourceLineNumber, id)
+        {
+        }
+
+        public IntermediateField this[ComPlusApplicationPropertySymbolFields index] => this.Fields[(int)index];
+
+        public string ApplicationRef
+        {
+            get => this.Fields[(int)ComPlusApplicationPropertySymbolFields.ApplicationRef].AsString();
+            set => this.Set((int)ComPlusApplicationPropertySymbolFields.ApplicationRef, value);
+        }
+
+        public string Name
+        {
+            get => this.Fields[(int)ComPlusApplicationPropertySymbolFields.Name].AsString();
+            set => this.Set((int)ComPlusApplicationPropertySymbolFields.Name, value);
+        }
+
+        public string Value
+        {
+            get => this.Fields[(int)ComPlusApplicationPropertySymbolFields.Value].AsString();
+            set => this.Set((int)ComPlusApplicationPropertySymbolFields.Value, value);
+        }
+    }
+}
\ No newline at end of file
diff --git a/src/ext/ComPlus/wixext/Symbols/ComPlusApplicationRolePropertySymbol.cs b/src/ext/ComPlus/wixext/Symbols/ComPlusApplicationRolePropertySymbol.cs
new file mode 100644
index 00000000..3b957899
--- /dev/null
+++ b/src/ext/ComPlus/wixext/Symbols/ComPlusApplicationRolePropertySymbol.cs
@@ -0,0 +1,63 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using WixToolset.Data;
+    using WixToolset.ComPlus.Symbols;
+
+    public static partial class ComPlusSymbolDefinitions
+    {
+        public static readonly IntermediateSymbolDefinition ComPlusApplicationRoleProperty = new IntermediateSymbolDefinition(
+            ComPlusSymbolDefinitionType.ComPlusApplicationRoleProperty.ToString(),
+            new[]
+            {
+                new IntermediateFieldDefinition(nameof(ComPlusApplicationRolePropertySymbolFields.ApplicationRoleRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusApplicationRolePropertySymbolFields.Name), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusApplicationRolePropertySymbolFields.Value), IntermediateFieldType.String),
+            },
+            typeof(ComPlusApplicationRolePropertySymbol));
+    }
+}
+
+namespace WixToolset.ComPlus.Symbols
+{
+    using WixToolset.Data;
+
+    public enum ComPlusApplicationRolePropertySymbolFields
+    {
+        ApplicationRoleRef,
+        Name,
+        Value,
+    }
+
+    public class ComPlusApplicationRolePropertySymbol : IntermediateSymbol
+    {
+        public ComPlusApplicationRolePropertySymbol() : base(ComPlusSymbolDefinitions.ComPlusApplicationRoleProperty, null, null)
+        {
+        }
+
+        public ComPlusApplicationRolePropertySymbol(SourceLineNumber sourceLineNumber, Identifier id = null) : base(ComPlusSymbolDefinitions.ComPlusApplicationRoleProperty, sourceLineNumber, id)
+        {
+        }
+
+        public IntermediateField this[ComPlusApplicationRolePropertySymbolFields index] => this.Fields[(int)index];
+
+        public string ApplicationRoleRef
+        {
+            get => this.Fields[(int)ComPlusApplicationRolePropertySymbolFields.ApplicationRoleRef].AsString();
+            set => this.Set((int)ComPlusApplicationRolePropertySymbolFields.ApplicationRoleRef, value);
+        }
+
+        public string Name
+        {
+            get => this.Fields[(int)ComPlusApplicationRolePropertySymbolFields.Name].AsString();
+            set => this.Set((int)ComPlusApplicationRolePropertySymbolFields.Name, value);
+        }
+
+        public string Value
+        {
+            get => this.Fields[(int)ComPlusApplicationRolePropertySymbolFields.Value].AsString();
+            set => this.Set((int)ComPlusApplicationRolePropertySymbolFields.Value, value);
+        }
+    }
+}
\ No newline at end of file
diff --git a/src/ext/ComPlus/wixext/Symbols/ComPlusApplicationRoleSymbol.cs b/src/ext/ComPlus/wixext/Symbols/ComPlusApplicationRoleSymbol.cs
new file mode 100644
index 00000000..84028ee3
--- /dev/null
+++ b/src/ext/ComPlus/wixext/Symbols/ComPlusApplicationRoleSymbol.cs
@@ -0,0 +1,63 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using WixToolset.Data;
+    using WixToolset.ComPlus.Symbols;
+
+    public static partial class ComPlusSymbolDefinitions
+    {
+        public static readonly IntermediateSymbolDefinition ComPlusApplicationRole = new IntermediateSymbolDefinition(
+            ComPlusSymbolDefinitionType.ComPlusApplicationRole.ToString(),
+            new[]
+            {
+                new IntermediateFieldDefinition(nameof(ComPlusApplicationRoleSymbolFields.ApplicationRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusApplicationRoleSymbolFields.ComponentRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusApplicationRoleSymbolFields.Name), IntermediateFieldType.String),
+            },
+            typeof(ComPlusApplicationRoleSymbol));
+    }
+}
+
+namespace WixToolset.ComPlus.Symbols
+{
+    using WixToolset.Data;
+
+    public enum ComPlusApplicationRoleSymbolFields
+    {
+        ApplicationRef,
+        ComponentRef,
+        Name,
+    }
+
+    public class ComPlusApplicationRoleSymbol : IntermediateSymbol
+    {
+        public ComPlusApplicationRoleSymbol() : base(ComPlusSymbolDefinitions.ComPlusApplicationRole, null, null)
+        {
+        }
+
+        public ComPlusApplicationRoleSymbol(SourceLineNumber sourceLineNumber, Identifier id = null) : base(ComPlusSymbolDefinitions.ComPlusApplicationRole, sourceLineNumber, id)
+        {
+        }
+
+        public IntermediateField this[ComPlusApplicationRoleSymbolFields index] => this.Fields[(int)index];
+
+        public string ApplicationRef
+        {
+            get => this.Fields[(int)ComPlusApplicationRoleSymbolFields.ApplicationRef].AsString();
+            set => this.Set((int)ComPlusApplicationRoleSymbolFields.ApplicationRef, value);
+        }
+
+        public string ComponentRef
+        {
+            get => this.Fields[(int)ComPlusApplicationRoleSymbolFields.ComponentRef].AsString();
+            set => this.Set((int)ComPlusApplicationRoleSymbolFields.ComponentRef, value);
+        }
+
+        public string Name
+        {
+            get => this.Fields[(int)ComPlusApplicationRoleSymbolFields.Name].AsString();
+            set => this.Set((int)ComPlusApplicationRoleSymbolFields.Name, value);
+        }
+    }
+}
\ No newline at end of file
diff --git a/src/ext/ComPlus/wixext/Symbols/ComPlusApplicationSymbol.cs b/src/ext/ComPlus/wixext/Symbols/ComPlusApplicationSymbol.cs
new file mode 100644
index 00000000..ce541e43
--- /dev/null
+++ b/src/ext/ComPlus/wixext/Symbols/ComPlusApplicationSymbol.cs
@@ -0,0 +1,71 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using WixToolset.Data;
+    using WixToolset.ComPlus.Symbols;
+
+    public static partial class ComPlusSymbolDefinitions
+    {
+        public static readonly IntermediateSymbolDefinition ComPlusApplication = new IntermediateSymbolDefinition(
+            ComPlusSymbolDefinitionType.ComPlusApplication.ToString(),
+            new[]
+            {
+                new IntermediateFieldDefinition(nameof(ComPlusApplicationSymbolFields.PartitionRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusApplicationSymbolFields.ComponentRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusApplicationSymbolFields.ApplicationId), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusApplicationSymbolFields.Name), IntermediateFieldType.String),
+            },
+            typeof(ComPlusApplicationSymbol));
+    }
+}
+
+namespace WixToolset.ComPlus.Symbols
+{
+    using WixToolset.Data;
+
+    public enum ComPlusApplicationSymbolFields
+    {
+        PartitionRef,
+        ComponentRef,
+        ApplicationId,
+        Name,
+    }
+
+    public class ComPlusApplicationSymbol : IntermediateSymbol
+    {
+        public ComPlusApplicationSymbol() : base(ComPlusSymbolDefinitions.ComPlusApplication, null, null)
+        {
+        }
+
+        public ComPlusApplicationSymbol(SourceLineNumber sourceLineNumber, Identifier id = null) : base(ComPlusSymbolDefinitions.ComPlusApplication, sourceLineNumber, id)
+        {
+        }
+
+        public IntermediateField this[ComPlusApplicationSymbolFields index] => this.Fields[(int)index];
+
+        public string PartitionRef
+        {
+            get => this.Fields[(int)ComPlusApplicationSymbolFields.PartitionRef].AsString();
+            set => this.Set((int)ComPlusApplicationSymbolFields.PartitionRef, value);
+        }
+
+        public string ComponentRef
+        {
+            get => this.Fields[(int)ComPlusApplicationSymbolFields.ComponentRef].AsString();
+            set => this.Set((int)ComPlusApplicationSymbolFields.ComponentRef, value);
+        }
+
+        public string ApplicationId
+        {
+            get => this.Fields[(int)ComPlusApplicationSymbolFields.ApplicationId].AsString();
+            set => this.Set((int)ComPlusApplicationSymbolFields.ApplicationId, value);
+        }
+
+        public string Name
+        {
+            get => this.Fields[(int)ComPlusApplicationSymbolFields.Name].AsString();
+            set => this.Set((int)ComPlusApplicationSymbolFields.Name, value);
+        }
+    }
+}
\ No newline at end of file
diff --git a/src/ext/ComPlus/wixext/Symbols/ComPlusAssemblyDependencySymbol.cs b/src/ext/ComPlus/wixext/Symbols/ComPlusAssemblyDependencySymbol.cs
new file mode 100644
index 00000000..549d53e4
--- /dev/null
+++ b/src/ext/ComPlus/wixext/Symbols/ComPlusAssemblyDependencySymbol.cs
@@ -0,0 +1,55 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using WixToolset.Data;
+    using WixToolset.ComPlus.Symbols;
+
+    public static partial class ComPlusSymbolDefinitions
+    {
+        public static readonly IntermediateSymbolDefinition ComPlusAssemblyDependency = new IntermediateSymbolDefinition(
+            ComPlusSymbolDefinitionType.ComPlusAssemblyDependency.ToString(),
+            new[]
+            {
+                new IntermediateFieldDefinition(nameof(ComPlusAssemblyDependencySymbolFields.AssemblyRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusAssemblyDependencySymbolFields.RequiredAssemblyRef), IntermediateFieldType.String),
+            },
+            typeof(ComPlusAssemblyDependencySymbol));
+    }
+}
+
+namespace WixToolset.ComPlus.Symbols
+{
+    using WixToolset.Data;
+
+    public enum ComPlusAssemblyDependencySymbolFields
+    {
+        AssemblyRef,
+        RequiredAssemblyRef,
+    }
+
+    public class ComPlusAssemblyDependencySymbol : IntermediateSymbol
+    {
+        public ComPlusAssemblyDependencySymbol() : base(ComPlusSymbolDefinitions.ComPlusAssemblyDependency, null, null)
+        {
+        }
+
+        public ComPlusAssemblyDependencySymbol(SourceLineNumber sourceLineNumber, Identifier id = null) : base(ComPlusSymbolDefinitions.ComPlusAssemblyDependency, sourceLineNumber, id)
+        {
+        }
+
+        public IntermediateField this[ComPlusAssemblyDependencySymbolFields index] => this.Fields[(int)index];
+
+        public string AssemblyRef
+        {
+            get => this.Fields[(int)ComPlusAssemblyDependencySymbolFields.AssemblyRef].AsString();
+            set => this.Set((int)ComPlusAssemblyDependencySymbolFields.AssemblyRef, value);
+        }
+
+        public string RequiredAssemblyRef
+        {
+            get => this.Fields[(int)ComPlusAssemblyDependencySymbolFields.RequiredAssemblyRef].AsString();
+            set => this.Set((int)ComPlusAssemblyDependencySymbolFields.RequiredAssemblyRef, value);
+        }
+    }
+}
\ No newline at end of file
diff --git a/src/ext/ComPlus/wixext/Symbols/ComPlusAssemblySymbol.cs b/src/ext/ComPlus/wixext/Symbols/ComPlusAssemblySymbol.cs
new file mode 100644
index 00000000..1329df30
--- /dev/null
+++ b/src/ext/ComPlus/wixext/Symbols/ComPlusAssemblySymbol.cs
@@ -0,0 +1,95 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using WixToolset.Data;
+    using WixToolset.ComPlus.Symbols;
+
+    public static partial class ComPlusSymbolDefinitions
+    {
+        public static readonly IntermediateSymbolDefinition ComPlusAssembly = new IntermediateSymbolDefinition(
+            ComPlusSymbolDefinitionType.ComPlusAssembly.ToString(),
+            new[]
+            {
+                new IntermediateFieldDefinition(nameof(ComPlusAssemblySymbolFields.ApplicationRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusAssemblySymbolFields.ComponentRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusAssemblySymbolFields.AssemblyName), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusAssemblySymbolFields.DllPath), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusAssemblySymbolFields.TlbPath), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusAssemblySymbolFields.PSDllPath), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusAssemblySymbolFields.Attributes), IntermediateFieldType.Number),
+            },
+            typeof(ComPlusAssemblySymbol));
+    }
+}
+
+namespace WixToolset.ComPlus.Symbols
+{
+    using WixToolset.Data;
+
+    public enum ComPlusAssemblySymbolFields
+    {
+        ApplicationRef,
+        ComponentRef,
+        AssemblyName,
+        DllPath,
+        TlbPath,
+        PSDllPath,
+        Attributes,
+    }
+
+    public class ComPlusAssemblySymbol : IntermediateSymbol
+    {
+        public ComPlusAssemblySymbol() : base(ComPlusSymbolDefinitions.ComPlusAssembly, null, null)
+        {
+        }
+
+        public ComPlusAssemblySymbol(SourceLineNumber sourceLineNumber, Identifier id = null) : base(ComPlusSymbolDefinitions.ComPlusAssembly, sourceLineNumber, id)
+        {
+        }
+
+        public IntermediateField this[ComPlusAssemblySymbolFields index] => this.Fields[(int)index];
+
+        public string ApplicationRef
+        {
+            get => this.Fields[(int)ComPlusAssemblySymbolFields.ApplicationRef].AsString();
+            set => this.Set((int)ComPlusAssemblySymbolFields.ApplicationRef, value);
+        }
+
+        public string ComponentRef
+        {
+            get => this.Fields[(int)ComPlusAssemblySymbolFields.ComponentRef].AsString();
+            set => this.Set((int)ComPlusAssemblySymbolFields.ComponentRef, value);
+        }
+
+        public string AssemblyName
+        {
+            get => this.Fields[(int)ComPlusAssemblySymbolFields.AssemblyName].AsString();
+            set => this.Set((int)ComPlusAssemblySymbolFields.AssemblyName, value);
+        }
+
+        public string DllPath
+        {
+            get => this.Fields[(int)ComPlusAssemblySymbolFields.DllPath].AsString();
+            set => this.Set((int)ComPlusAssemblySymbolFields.DllPath, value);
+        }
+
+        public string TlbPath
+        {
+            get => this.Fields[(int)ComPlusAssemblySymbolFields.TlbPath].AsString();
+            set => this.Set((int)ComPlusAssemblySymbolFields.TlbPath, value);
+        }
+
+        public string PSDllPath
+        {
+            get => this.Fields[(int)ComPlusAssemblySymbolFields.PSDllPath].AsString();
+            set => this.Set((int)ComPlusAssemblySymbolFields.PSDllPath, value);
+        }
+
+        public int Attributes
+        {
+            get => this.Fields[(int)ComPlusAssemblySymbolFields.Attributes].AsNumber();
+            set => this.Set((int)ComPlusAssemblySymbolFields.Attributes, value);
+        }
+    }
+}
\ No newline at end of file
diff --git a/src/ext/ComPlus/wixext/Symbols/ComPlusComponentPropertySymbol.cs b/src/ext/ComPlus/wixext/Symbols/ComPlusComponentPropertySymbol.cs
new file mode 100644
index 00000000..b1d85b60
--- /dev/null
+++ b/src/ext/ComPlus/wixext/Symbols/ComPlusComponentPropertySymbol.cs
@@ -0,0 +1,63 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using WixToolset.Data;
+    using WixToolset.ComPlus.Symbols;
+
+    public static partial class ComPlusSymbolDefinitions
+    {
+        public static readonly IntermediateSymbolDefinition ComPlusComponentProperty = new IntermediateSymbolDefinition(
+            ComPlusSymbolDefinitionType.ComPlusComponentProperty.ToString(),
+            new[]
+            {
+                new IntermediateFieldDefinition(nameof(ComPlusComponentPropertySymbolFields.ComPlusComponentRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusComponentPropertySymbolFields.Name), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusComponentPropertySymbolFields.Value), IntermediateFieldType.String),
+            },
+            typeof(ComPlusComponentPropertySymbol));
+    }
+}
+
+namespace WixToolset.ComPlus.Symbols
+{
+    using WixToolset.Data;
+
+    public enum ComPlusComponentPropertySymbolFields
+    {
+        ComPlusComponentRef,
+        Name,
+        Value,
+    }
+
+    public class ComPlusComponentPropertySymbol : IntermediateSymbol
+    {
+        public ComPlusComponentPropertySymbol() : base(ComPlusSymbolDefinitions.ComPlusComponentProperty, null, null)
+        {
+        }
+
+        public ComPlusComponentPropertySymbol(SourceLineNumber sourceLineNumber, Identifier id = null) : base(ComPlusSymbolDefinitions.ComPlusComponentProperty, sourceLineNumber, id)
+        {
+        }
+
+        public IntermediateField this[ComPlusComponentPropertySymbolFields index] => this.Fields[(int)index];
+
+        public string ComPlusComponentRef
+        {
+            get => this.Fields[(int)ComPlusComponentPropertySymbolFields.ComPlusComponentRef].AsString();
+            set => this.Set((int)ComPlusComponentPropertySymbolFields.ComPlusComponentRef, value);
+        }
+
+        public string Name
+        {
+            get => this.Fields[(int)ComPlusComponentPropertySymbolFields.Name].AsString();
+            set => this.Set((int)ComPlusComponentPropertySymbolFields.Name, value);
+        }
+
+        public string Value
+        {
+            get => this.Fields[(int)ComPlusComponentPropertySymbolFields.Value].AsString();
+            set => this.Set((int)ComPlusComponentPropertySymbolFields.Value, value);
+        }
+    }
+}
\ No newline at end of file
diff --git a/src/ext/ComPlus/wixext/Symbols/ComPlusComponentSymbol.cs b/src/ext/ComPlus/wixext/Symbols/ComPlusComponentSymbol.cs
new file mode 100644
index 00000000..020b754c
--- /dev/null
+++ b/src/ext/ComPlus/wixext/Symbols/ComPlusComponentSymbol.cs
@@ -0,0 +1,55 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using WixToolset.Data;
+    using WixToolset.ComPlus.Symbols;
+
+    public static partial class ComPlusSymbolDefinitions
+    {
+        public static readonly IntermediateSymbolDefinition ComPlusComponent = new IntermediateSymbolDefinition(
+            ComPlusSymbolDefinitionType.ComPlusComponent.ToString(),
+            new[]
+            {
+                new IntermediateFieldDefinition(nameof(ComPlusComponentSymbolFields.AssemblyRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusComponentSymbolFields.CLSID), IntermediateFieldType.String),
+            },
+            typeof(ComPlusComponentSymbol));
+    }
+}
+
+namespace WixToolset.ComPlus.Symbols
+{
+    using WixToolset.Data;
+
+    public enum ComPlusComponentSymbolFields
+    {
+        AssemblyRef,
+        CLSID,
+    }
+
+    public class ComPlusComponentSymbol : IntermediateSymbol
+    {
+        public ComPlusComponentSymbol() : base(ComPlusSymbolDefinitions.ComPlusComponent, null, null)
+        {
+        }
+
+        public ComPlusComponentSymbol(SourceLineNumber sourceLineNumber, Identifier id = null) : base(ComPlusSymbolDefinitions.ComPlusComponent, sourceLineNumber, id)
+        {
+        }
+
+        public IntermediateField this[ComPlusComponentSymbolFields index] => this.Fields[(int)index];
+
+        public string AssemblyRef
+        {
+            get => this.Fields[(int)ComPlusComponentSymbolFields.AssemblyRef].AsString();
+            set => this.Set((int)ComPlusComponentSymbolFields.AssemblyRef, value);
+        }
+
+        public string CLSID
+        {
+            get => this.Fields[(int)ComPlusComponentSymbolFields.CLSID].AsString();
+            set => this.Set((int)ComPlusComponentSymbolFields.CLSID, value);
+        }
+    }
+}
\ No newline at end of file
diff --git a/src/ext/ComPlus/wixext/Symbols/ComPlusGroupInApplicationRoleSymbol.cs b/src/ext/ComPlus/wixext/Symbols/ComPlusGroupInApplicationRoleSymbol.cs
new file mode 100644
index 00000000..d6b91e99
--- /dev/null
+++ b/src/ext/ComPlus/wixext/Symbols/ComPlusGroupInApplicationRoleSymbol.cs
@@ -0,0 +1,63 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using WixToolset.Data;
+    using WixToolset.ComPlus.Symbols;
+
+    public static partial class ComPlusSymbolDefinitions
+    {
+        public static readonly IntermediateSymbolDefinition ComPlusGroupInApplicationRole = new IntermediateSymbolDefinition(
+            ComPlusSymbolDefinitionType.ComPlusGroupInApplicationRole.ToString(),
+            new[]
+            {
+                new IntermediateFieldDefinition(nameof(ComPlusGroupInApplicationRoleSymbolFields.ApplicationRoleRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusGroupInApplicationRoleSymbolFields.ComponentRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusGroupInApplicationRoleSymbolFields.GroupRef), IntermediateFieldType.String),
+            },
+            typeof(ComPlusGroupInApplicationRoleSymbol));
+    }
+}
+
+namespace WixToolset.ComPlus.Symbols
+{
+    using WixToolset.Data;
+
+    public enum ComPlusGroupInApplicationRoleSymbolFields
+    {
+        ApplicationRoleRef,
+        ComponentRef,
+        GroupRef,
+    }
+
+    public class ComPlusGroupInApplicationRoleSymbol : IntermediateSymbol
+    {
+        public ComPlusGroupInApplicationRoleSymbol() : base(ComPlusSymbolDefinitions.ComPlusGroupInApplicationRole, null, null)
+        {
+        }
+
+        public ComPlusGroupInApplicationRoleSymbol(SourceLineNumber sourceLineNumber, Identifier id = null) : base(ComPlusSymbolDefinitions.ComPlusGroupInApplicationRole, sourceLineNumber, id)
+        {
+        }
+
+        public IntermediateField this[ComPlusGroupInApplicationRoleSymbolFields index] => this.Fields[(int)index];
+
+        public string ApplicationRoleRef
+        {
+            get => this.Fields[(int)ComPlusGroupInApplicationRoleSymbolFields.ApplicationRoleRef].AsString();
+            set => this.Set((int)ComPlusGroupInApplicationRoleSymbolFields.ApplicationRoleRef, value);
+        }
+
+        public string ComponentRef
+        {
+            get => this.Fields[(int)ComPlusGroupInApplicationRoleSymbolFields.ComponentRef].AsString();
+            set => this.Set((int)ComPlusGroupInApplicationRoleSymbolFields.ComponentRef, value);
+        }
+
+        public string GroupRef
+        {
+            get => this.Fields[(int)ComPlusGroupInApplicationRoleSymbolFields.GroupRef].AsString();
+            set => this.Set((int)ComPlusGroupInApplicationRoleSymbolFields.GroupRef, value);
+        }
+    }
+}
\ No newline at end of file
diff --git a/src/ext/ComPlus/wixext/Symbols/ComPlusGroupInPartitionRoleSymbol.cs b/src/ext/ComPlus/wixext/Symbols/ComPlusGroupInPartitionRoleSymbol.cs
new file mode 100644
index 00000000..da70de9f
--- /dev/null
+++ b/src/ext/ComPlus/wixext/Symbols/ComPlusGroupInPartitionRoleSymbol.cs
@@ -0,0 +1,63 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using WixToolset.Data;
+    using WixToolset.ComPlus.Symbols;
+
+    public static partial class ComPlusSymbolDefinitions
+    {
+        public static readonly IntermediateSymbolDefinition ComPlusGroupInPartitionRole = new IntermediateSymbolDefinition(
+            ComPlusSymbolDefinitionType.ComPlusGroupInPartitionRole.ToString(),
+            new[]
+            {
+                new IntermediateFieldDefinition(nameof(ComPlusGroupInPartitionRoleSymbolFields.PartitionRoleRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusGroupInPartitionRoleSymbolFields.ComponentRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusGroupInPartitionRoleSymbolFields.GroupRef), IntermediateFieldType.String),
+            },
+            typeof(ComPlusGroupInPartitionRoleSymbol));
+    }
+}
+
+namespace WixToolset.ComPlus.Symbols
+{
+    using WixToolset.Data;
+
+    public enum ComPlusGroupInPartitionRoleSymbolFields
+    {
+        PartitionRoleRef,
+        ComponentRef,
+        GroupRef,
+    }
+
+    public class ComPlusGroupInPartitionRoleSymbol : IntermediateSymbol
+    {
+        public ComPlusGroupInPartitionRoleSymbol() : base(ComPlusSymbolDefinitions.ComPlusGroupInPartitionRole, null, null)
+        {
+        }
+
+        public ComPlusGroupInPartitionRoleSymbol(SourceLineNumber sourceLineNumber, Identifier id = null) : base(ComPlusSymbolDefinitions.ComPlusGroupInPartitionRole, sourceLineNumber, id)
+        {
+        }
+
+        public IntermediateField this[ComPlusGroupInPartitionRoleSymbolFields index] => this.Fields[(int)index];
+
+        public string PartitionRoleRef
+        {
+            get => this.Fields[(int)ComPlusGroupInPartitionRoleSymbolFields.PartitionRoleRef].AsString();
+            set => this.Set((int)ComPlusGroupInPartitionRoleSymbolFields.PartitionRoleRef, value);
+        }
+
+        public string ComponentRef
+        {
+            get => this.Fields[(int)ComPlusGroupInPartitionRoleSymbolFields.ComponentRef].AsString();
+            set => this.Set((int)ComPlusGroupInPartitionRoleSymbolFields.ComponentRef, value);
+        }
+
+        public string GroupRef
+        {
+            get => this.Fields[(int)ComPlusGroupInPartitionRoleSymbolFields.GroupRef].AsString();
+            set => this.Set((int)ComPlusGroupInPartitionRoleSymbolFields.GroupRef, value);
+        }
+    }
+}
\ No newline at end of file
diff --git a/src/ext/ComPlus/wixext/Symbols/ComPlusInterfacePropertySymbol.cs b/src/ext/ComPlus/wixext/Symbols/ComPlusInterfacePropertySymbol.cs
new file mode 100644
index 00000000..2ed4ce18
--- /dev/null
+++ b/src/ext/ComPlus/wixext/Symbols/ComPlusInterfacePropertySymbol.cs
@@ -0,0 +1,63 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using WixToolset.Data;
+    using WixToolset.ComPlus.Symbols;
+
+    public static partial class ComPlusSymbolDefinitions
+    {
+        public static readonly IntermediateSymbolDefinition ComPlusInterfaceProperty = new IntermediateSymbolDefinition(
+            ComPlusSymbolDefinitionType.ComPlusInterfaceProperty.ToString(),
+            new[]
+            {
+                new IntermediateFieldDefinition(nameof(ComPlusInterfacePropertySymbolFields.InterfaceRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusInterfacePropertySymbolFields.Name), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusInterfacePropertySymbolFields.Value), IntermediateFieldType.String),
+            },
+            typeof(ComPlusInterfacePropertySymbol));
+    }
+}
+
+namespace WixToolset.ComPlus.Symbols
+{
+    using WixToolset.Data;
+
+    public enum ComPlusInterfacePropertySymbolFields
+    {
+        InterfaceRef,
+        Name,
+        Value,
+    }
+
+    public class ComPlusInterfacePropertySymbol : IntermediateSymbol
+    {
+        public ComPlusInterfacePropertySymbol() : base(ComPlusSymbolDefinitions.ComPlusInterfaceProperty, null, null)
+        {
+        }
+
+        public ComPlusInterfacePropertySymbol(SourceLineNumber sourceLineNumber, Identifier id = null) : base(ComPlusSymbolDefinitions.ComPlusInterfaceProperty, sourceLineNumber, id)
+        {
+        }
+
+        public IntermediateField this[ComPlusInterfacePropertySymbolFields index] => this.Fields[(int)index];
+
+        public string InterfaceRef
+        {
+            get => this.Fields[(int)ComPlusInterfacePropertySymbolFields.InterfaceRef].AsString();
+            set => this.Set((int)ComPlusInterfacePropertySymbolFields.InterfaceRef, value);
+        }
+
+        public string Name
+        {
+            get => this.Fields[(int)ComPlusInterfacePropertySymbolFields.Name].AsString();
+            set => this.Set((int)ComPlusInterfacePropertySymbolFields.Name, value);
+        }
+
+        public string Value
+        {
+            get => this.Fields[(int)ComPlusInterfacePropertySymbolFields.Value].AsString();
+            set => this.Set((int)ComPlusInterfacePropertySymbolFields.Value, value);
+        }
+    }
+}
\ No newline at end of file
diff --git a/src/ext/ComPlus/wixext/Symbols/ComPlusInterfaceSymbol.cs b/src/ext/ComPlus/wixext/Symbols/ComPlusInterfaceSymbol.cs
new file mode 100644
index 00000000..f875b424
--- /dev/null
+++ b/src/ext/ComPlus/wixext/Symbols/ComPlusInterfaceSymbol.cs
@@ -0,0 +1,55 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using WixToolset.Data;
+    using WixToolset.ComPlus.Symbols;
+
+    public static partial class ComPlusSymbolDefinitions
+    {
+        public static readonly IntermediateSymbolDefinition ComPlusInterface = new IntermediateSymbolDefinition(
+            ComPlusSymbolDefinitionType.ComPlusInterface.ToString(),
+            new[]
+            {
+                new IntermediateFieldDefinition(nameof(ComPlusInterfaceSymbolFields.ComPlusComponentRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusInterfaceSymbolFields.IID), IntermediateFieldType.String),
+            },
+            typeof(ComPlusInterfaceSymbol));
+    }
+}
+
+namespace WixToolset.ComPlus.Symbols
+{
+    using WixToolset.Data;
+
+    public enum ComPlusInterfaceSymbolFields
+    {
+        ComPlusComponentRef,
+        IID,
+    }
+
+    public class ComPlusInterfaceSymbol : IntermediateSymbol
+    {
+        public ComPlusInterfaceSymbol() : base(ComPlusSymbolDefinitions.ComPlusInterface, null, null)
+        {
+        }
+
+        public ComPlusInterfaceSymbol(SourceLineNumber sourceLineNumber, Identifier id = null) : base(ComPlusSymbolDefinitions.ComPlusInterface, sourceLineNumber, id)
+        {
+        }
+
+        public IntermediateField this[ComPlusInterfaceSymbolFields index] => this.Fields[(int)index];
+
+        public string ComPlusComponentRef
+        {
+            get => this.Fields[(int)ComPlusInterfaceSymbolFields.ComPlusComponentRef].AsString();
+            set => this.Set((int)ComPlusInterfaceSymbolFields.ComPlusComponentRef, value);
+        }
+
+        public string IID
+        {
+            get => this.Fields[(int)ComPlusInterfaceSymbolFields.IID].AsString();
+            set => this.Set((int)ComPlusInterfaceSymbolFields.IID, value);
+        }
+    }
+}
\ No newline at end of file
diff --git a/src/ext/ComPlus/wixext/Symbols/ComPlusMethodPropertySymbol.cs b/src/ext/ComPlus/wixext/Symbols/ComPlusMethodPropertySymbol.cs
new file mode 100644
index 00000000..65b17ea4
--- /dev/null
+++ b/src/ext/ComPlus/wixext/Symbols/ComPlusMethodPropertySymbol.cs
@@ -0,0 +1,63 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using WixToolset.Data;
+    using WixToolset.ComPlus.Symbols;
+
+    public static partial class ComPlusSymbolDefinitions
+    {
+        public static readonly IntermediateSymbolDefinition ComPlusMethodProperty = new IntermediateSymbolDefinition(
+            ComPlusSymbolDefinitionType.ComPlusMethodProperty.ToString(),
+            new[]
+            {
+                new IntermediateFieldDefinition(nameof(ComPlusMethodPropertySymbolFields.MethodRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusMethodPropertySymbolFields.Name), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusMethodPropertySymbolFields.Value), IntermediateFieldType.String),
+            },
+            typeof(ComPlusMethodPropertySymbol));
+    }
+}
+
+namespace WixToolset.ComPlus.Symbols
+{
+    using WixToolset.Data;
+
+    public enum ComPlusMethodPropertySymbolFields
+    {
+        MethodRef,
+        Name,
+        Value,
+    }
+
+    public class ComPlusMethodPropertySymbol : IntermediateSymbol
+    {
+        public ComPlusMethodPropertySymbol() : base(ComPlusSymbolDefinitions.ComPlusMethodProperty, null, null)
+        {
+        }
+
+        public ComPlusMethodPropertySymbol(SourceLineNumber sourceLineNumber, Identifier id = null) : base(ComPlusSymbolDefinitions.ComPlusMethodProperty, sourceLineNumber, id)
+        {
+        }
+
+        public IntermediateField this[ComPlusMethodPropertySymbolFields index] => this.Fields[(int)index];
+
+        public string MethodRef
+        {
+            get => this.Fields[(int)ComPlusMethodPropertySymbolFields.MethodRef].AsString();
+            set => this.Set((int)ComPlusMethodPropertySymbolFields.MethodRef, value);
+        }
+
+        public string Name
+        {
+            get => this.Fields[(int)ComPlusMethodPropertySymbolFields.Name].AsString();
+            set => this.Set((int)ComPlusMethodPropertySymbolFields.Name, value);
+        }
+
+        public string Value
+        {
+            get => this.Fields[(int)ComPlusMethodPropertySymbolFields.Value].AsString();
+            set => this.Set((int)ComPlusMethodPropertySymbolFields.Value, value);
+        }
+    }
+}
\ No newline at end of file
diff --git a/src/ext/ComPlus/wixext/Symbols/ComPlusMethodSymbol.cs b/src/ext/ComPlus/wixext/Symbols/ComPlusMethodSymbol.cs
new file mode 100644
index 00000000..9959a56f
--- /dev/null
+++ b/src/ext/ComPlus/wixext/Symbols/ComPlusMethodSymbol.cs
@@ -0,0 +1,63 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using WixToolset.Data;
+    using WixToolset.ComPlus.Symbols;
+
+    public static partial class ComPlusSymbolDefinitions
+    {
+        public static readonly IntermediateSymbolDefinition ComPlusMethod = new IntermediateSymbolDefinition(
+            ComPlusSymbolDefinitionType.ComPlusMethod.ToString(),
+            new[]
+            {
+                new IntermediateFieldDefinition(nameof(ComPlusMethodSymbolFields.InterfaceRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusMethodSymbolFields.Index), IntermediateFieldType.Number),
+                new IntermediateFieldDefinition(nameof(ComPlusMethodSymbolFields.Name), IntermediateFieldType.String),
+            },
+            typeof(ComPlusMethodSymbol));
+    }
+}
+
+namespace WixToolset.ComPlus.Symbols
+{
+    using WixToolset.Data;
+
+    public enum ComPlusMethodSymbolFields
+    {
+        InterfaceRef,
+        Index,
+        Name,
+    }
+
+    public class ComPlusMethodSymbol : IntermediateSymbol
+    {
+        public ComPlusMethodSymbol() : base(ComPlusSymbolDefinitions.ComPlusMethod, null, null)
+        {
+        }
+
+        public ComPlusMethodSymbol(SourceLineNumber sourceLineNumber, Identifier id = null) : base(ComPlusSymbolDefinitions.ComPlusMethod, sourceLineNumber, id)
+        {
+        }
+
+        public IntermediateField this[ComPlusMethodSymbolFields index] => this.Fields[(int)index];
+
+        public string InterfaceRef
+        {
+            get => this.Fields[(int)ComPlusMethodSymbolFields.InterfaceRef].AsString();
+            set => this.Set((int)ComPlusMethodSymbolFields.InterfaceRef, value);
+        }
+
+        public int? Index
+        {
+            get => this.Fields[(int)ComPlusMethodSymbolFields.Index].AsNullableNumber();
+            set => this.Set((int)ComPlusMethodSymbolFields.Index, value);
+        }
+
+        public string Name
+        {
+            get => this.Fields[(int)ComPlusMethodSymbolFields.Name].AsString();
+            set => this.Set((int)ComPlusMethodSymbolFields.Name, value);
+        }
+    }
+}
\ No newline at end of file
diff --git a/src/ext/ComPlus/wixext/Symbols/ComPlusPartitionPropertySymbol.cs b/src/ext/ComPlus/wixext/Symbols/ComPlusPartitionPropertySymbol.cs
new file mode 100644
index 00000000..e42feae2
--- /dev/null
+++ b/src/ext/ComPlus/wixext/Symbols/ComPlusPartitionPropertySymbol.cs
@@ -0,0 +1,63 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using WixToolset.Data;
+    using WixToolset.ComPlus.Symbols;
+
+    public static partial class ComPlusSymbolDefinitions
+    {
+        public static readonly IntermediateSymbolDefinition ComPlusPartitionProperty = new IntermediateSymbolDefinition(
+            ComPlusSymbolDefinitionType.ComPlusPartitionProperty.ToString(),
+            new[]
+            {
+                new IntermediateFieldDefinition(nameof(ComPlusPartitionPropertySymbolFields.PartitionRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusPartitionPropertySymbolFields.Name), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusPartitionPropertySymbolFields.Value), IntermediateFieldType.String),
+            },
+            typeof(ComPlusPartitionPropertySymbol));
+    }
+}
+
+namespace WixToolset.ComPlus.Symbols
+{
+    using WixToolset.Data;
+
+    public enum ComPlusPartitionPropertySymbolFields
+    {
+        PartitionRef,
+        Name,
+        Value,
+    }
+
+    public class ComPlusPartitionPropertySymbol : IntermediateSymbol
+    {
+        public ComPlusPartitionPropertySymbol() : base(ComPlusSymbolDefinitions.ComPlusPartitionProperty, null, null)
+        {
+        }
+
+        public ComPlusPartitionPropertySymbol(SourceLineNumber sourceLineNumber, Identifier id = null) : base(ComPlusSymbolDefinitions.ComPlusPartitionProperty, sourceLineNumber, id)
+        {
+        }
+
+        public IntermediateField this[ComPlusPartitionPropertySymbolFields index] => this.Fields[(int)index];
+
+        public string PartitionRef
+        {
+            get => this.Fields[(int)ComPlusPartitionPropertySymbolFields.PartitionRef].AsString();
+            set => this.Set((int)ComPlusPartitionPropertySymbolFields.PartitionRef, value);
+        }
+
+        public string Name
+        {
+            get => this.Fields[(int)ComPlusPartitionPropertySymbolFields.Name].AsString();
+            set => this.Set((int)ComPlusPartitionPropertySymbolFields.Name, value);
+        }
+
+        public string Value
+        {
+            get => this.Fields[(int)ComPlusPartitionPropertySymbolFields.Value].AsString();
+            set => this.Set((int)ComPlusPartitionPropertySymbolFields.Value, value);
+        }
+    }
+}
\ No newline at end of file
diff --git a/src/ext/ComPlus/wixext/Symbols/ComPlusPartitionRoleSymbol.cs b/src/ext/ComPlus/wixext/Symbols/ComPlusPartitionRoleSymbol.cs
new file mode 100644
index 00000000..23293d93
--- /dev/null
+++ b/src/ext/ComPlus/wixext/Symbols/ComPlusPartitionRoleSymbol.cs
@@ -0,0 +1,63 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using WixToolset.Data;
+    using WixToolset.ComPlus.Symbols;
+
+    public static partial class ComPlusSymbolDefinitions
+    {
+        public static readonly IntermediateSymbolDefinition ComPlusPartitionRole = new IntermediateSymbolDefinition(
+            ComPlusSymbolDefinitionType.ComPlusPartitionRole.ToString(),
+            new[]
+            {
+                new IntermediateFieldDefinition(nameof(ComPlusPartitionRoleSymbolFields.PartitionRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusPartitionRoleSymbolFields.ComponentRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusPartitionRoleSymbolFields.Name), IntermediateFieldType.String),
+            },
+            typeof(ComPlusPartitionRoleSymbol));
+    }
+}
+
+namespace WixToolset.ComPlus.Symbols
+{
+    using WixToolset.Data;
+
+    public enum ComPlusPartitionRoleSymbolFields
+    {
+        PartitionRef,
+        ComponentRef,
+        Name,
+    }
+
+    public class ComPlusPartitionRoleSymbol : IntermediateSymbol
+    {
+        public ComPlusPartitionRoleSymbol() : base(ComPlusSymbolDefinitions.ComPlusPartitionRole, null, null)
+        {
+        }
+
+        public ComPlusPartitionRoleSymbol(SourceLineNumber sourceLineNumber, Identifier id = null) : base(ComPlusSymbolDefinitions.ComPlusPartitionRole, sourceLineNumber, id)
+        {
+        }
+
+        public IntermediateField this[ComPlusPartitionRoleSymbolFields index] => this.Fields[(int)index];
+
+        public string PartitionRef
+        {
+            get => this.Fields[(int)ComPlusPartitionRoleSymbolFields.PartitionRef].AsString();
+            set => this.Set((int)ComPlusPartitionRoleSymbolFields.PartitionRef, value);
+        }
+
+        public string ComponentRef
+        {
+            get => this.Fields[(int)ComPlusPartitionRoleSymbolFields.ComponentRef].AsString();
+            set => this.Set((int)ComPlusPartitionRoleSymbolFields.ComponentRef, value);
+        }
+
+        public string Name
+        {
+            get => this.Fields[(int)ComPlusPartitionRoleSymbolFields.Name].AsString();
+            set => this.Set((int)ComPlusPartitionRoleSymbolFields.Name, value);
+        }
+    }
+}
\ No newline at end of file
diff --git a/src/ext/ComPlus/wixext/Symbols/ComPlusPartitionSymbol.cs b/src/ext/ComPlus/wixext/Symbols/ComPlusPartitionSymbol.cs
new file mode 100644
index 00000000..c60fca40
--- /dev/null
+++ b/src/ext/ComPlus/wixext/Symbols/ComPlusPartitionSymbol.cs
@@ -0,0 +1,63 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using WixToolset.Data;
+    using WixToolset.ComPlus.Symbols;
+
+    public static partial class ComPlusSymbolDefinitions
+    {
+        public static readonly IntermediateSymbolDefinition ComPlusPartition = new IntermediateSymbolDefinition(
+            ComPlusSymbolDefinitionType.ComPlusPartition.ToString(),
+            new[]
+            {
+                new IntermediateFieldDefinition(nameof(ComPlusPartitionSymbolFields.ComponentRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusPartitionSymbolFields.PartitionId), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusPartitionSymbolFields.Name), IntermediateFieldType.String),
+            },
+            typeof(ComPlusPartitionSymbol));
+    }
+}
+
+namespace WixToolset.ComPlus.Symbols
+{
+    using WixToolset.Data;
+
+    public enum ComPlusPartitionSymbolFields
+    {
+        ComponentRef,
+        PartitionId,
+        Name,
+    }
+
+    public class ComPlusPartitionSymbol : IntermediateSymbol
+    {
+        public ComPlusPartitionSymbol() : base(ComPlusSymbolDefinitions.ComPlusPartition, null, null)
+        {
+        }
+
+        public ComPlusPartitionSymbol(SourceLineNumber sourceLineNumber, Identifier id = null) : base(ComPlusSymbolDefinitions.ComPlusPartition, sourceLineNumber, id)
+        {
+        }
+
+        public IntermediateField this[ComPlusPartitionSymbolFields index] => this.Fields[(int)index];
+
+        public string ComponentRef
+        {
+            get => this.Fields[(int)ComPlusPartitionSymbolFields.ComponentRef].AsString();
+            set => this.Set((int)ComPlusPartitionSymbolFields.ComponentRef, value);
+        }
+
+        public string PartitionId
+        {
+            get => this.Fields[(int)ComPlusPartitionSymbolFields.PartitionId].AsString();
+            set => this.Set((int)ComPlusPartitionSymbolFields.PartitionId, value);
+        }
+
+        public string Name
+        {
+            get => this.Fields[(int)ComPlusPartitionSymbolFields.Name].AsString();
+            set => this.Set((int)ComPlusPartitionSymbolFields.Name, value);
+        }
+    }
+}
\ No newline at end of file
diff --git a/src/ext/ComPlus/wixext/Symbols/ComPlusPartitionUserSymbol.cs b/src/ext/ComPlus/wixext/Symbols/ComPlusPartitionUserSymbol.cs
new file mode 100644
index 00000000..c4d52f54
--- /dev/null
+++ b/src/ext/ComPlus/wixext/Symbols/ComPlusPartitionUserSymbol.cs
@@ -0,0 +1,63 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using WixToolset.Data;
+    using WixToolset.ComPlus.Symbols;
+
+    public static partial class ComPlusSymbolDefinitions
+    {
+        public static readonly IntermediateSymbolDefinition ComPlusPartitionUser = new IntermediateSymbolDefinition(
+            ComPlusSymbolDefinitionType.ComPlusPartitionUser.ToString(),
+            new[]
+            {
+                new IntermediateFieldDefinition(nameof(ComPlusPartitionUserSymbolFields.PartitionRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusPartitionUserSymbolFields.ComponentRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusPartitionUserSymbolFields.UserRef), IntermediateFieldType.String),
+            },
+            typeof(ComPlusPartitionUserSymbol));
+    }
+}
+
+namespace WixToolset.ComPlus.Symbols
+{
+    using WixToolset.Data;
+
+    public enum ComPlusPartitionUserSymbolFields
+    {
+        PartitionRef,
+        ComponentRef,
+        UserRef,
+    }
+
+    public class ComPlusPartitionUserSymbol : IntermediateSymbol
+    {
+        public ComPlusPartitionUserSymbol() : base(ComPlusSymbolDefinitions.ComPlusPartitionUser, null, null)
+        {
+        }
+
+        public ComPlusPartitionUserSymbol(SourceLineNumber sourceLineNumber, Identifier id = null) : base(ComPlusSymbolDefinitions.ComPlusPartitionUser, sourceLineNumber, id)
+        {
+        }
+
+        public IntermediateField this[ComPlusPartitionUserSymbolFields index] => this.Fields[(int)index];
+
+        public string PartitionRef
+        {
+            get => this.Fields[(int)ComPlusPartitionUserSymbolFields.PartitionRef].AsString();
+            set => this.Set((int)ComPlusPartitionUserSymbolFields.PartitionRef, value);
+        }
+
+        public string ComponentRef
+        {
+            get => this.Fields[(int)ComPlusPartitionUserSymbolFields.ComponentRef].AsString();
+            set => this.Set((int)ComPlusPartitionUserSymbolFields.ComponentRef, value);
+        }
+
+        public string UserRef
+        {
+            get => this.Fields[(int)ComPlusPartitionUserSymbolFields.UserRef].AsString();
+            set => this.Set((int)ComPlusPartitionUserSymbolFields.UserRef, value);
+        }
+    }
+}
\ No newline at end of file
diff --git a/src/ext/ComPlus/wixext/Symbols/ComPlusRoleForComponentSymbol.cs b/src/ext/ComPlus/wixext/Symbols/ComPlusRoleForComponentSymbol.cs
new file mode 100644
index 00000000..2d9968ee
--- /dev/null
+++ b/src/ext/ComPlus/wixext/Symbols/ComPlusRoleForComponentSymbol.cs
@@ -0,0 +1,63 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using WixToolset.Data;
+    using WixToolset.ComPlus.Symbols;
+
+    public static partial class ComPlusSymbolDefinitions
+    {
+        public static readonly IntermediateSymbolDefinition ComPlusRoleForComponent = new IntermediateSymbolDefinition(
+            ComPlusSymbolDefinitionType.ComPlusRoleForComponent.ToString(),
+            new[]
+            {
+                new IntermediateFieldDefinition(nameof(ComPlusRoleForComponentSymbolFields.ComPlusComponentRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusRoleForComponentSymbolFields.ApplicationRoleRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusRoleForComponentSymbolFields.ComponentRef), IntermediateFieldType.String),
+            },
+            typeof(ComPlusRoleForComponentSymbol));
+    }
+}
+
+namespace WixToolset.ComPlus.Symbols
+{
+    using WixToolset.Data;
+
+    public enum ComPlusRoleForComponentSymbolFields
+    {
+        ComPlusComponentRef,
+        ApplicationRoleRef,
+        ComponentRef,
+    }
+
+    public class ComPlusRoleForComponentSymbol : IntermediateSymbol
+    {
+        public ComPlusRoleForComponentSymbol() : base(ComPlusSymbolDefinitions.ComPlusRoleForComponent, null, null)
+        {
+        }
+
+        public ComPlusRoleForComponentSymbol(SourceLineNumber sourceLineNumber, Identifier id = null) : base(ComPlusSymbolDefinitions.ComPlusRoleForComponent, sourceLineNumber, id)
+        {
+        }
+
+        public IntermediateField this[ComPlusRoleForComponentSymbolFields index] => this.Fields[(int)index];
+
+        public string ComPlusComponentRef
+        {
+            get => this.Fields[(int)ComPlusRoleForComponentSymbolFields.ComPlusComponentRef].AsString();
+            set => this.Set((int)ComPlusRoleForComponentSymbolFields.ComPlusComponentRef, value);
+        }
+
+        public string ApplicationRoleRef
+        {
+            get => this.Fields[(int)ComPlusRoleForComponentSymbolFields.ApplicationRoleRef].AsString();
+            set => this.Set((int)ComPlusRoleForComponentSymbolFields.ApplicationRoleRef, value);
+        }
+
+        public string ComponentRef
+        {
+            get => this.Fields[(int)ComPlusRoleForComponentSymbolFields.ComponentRef].AsString();
+            set => this.Set((int)ComPlusRoleForComponentSymbolFields.ComponentRef, value);
+        }
+    }
+}
\ No newline at end of file
diff --git a/src/ext/ComPlus/wixext/Symbols/ComPlusRoleForInterfaceSymbol.cs b/src/ext/ComPlus/wixext/Symbols/ComPlusRoleForInterfaceSymbol.cs
new file mode 100644
index 00000000..b77bd215
--- /dev/null
+++ b/src/ext/ComPlus/wixext/Symbols/ComPlusRoleForInterfaceSymbol.cs
@@ -0,0 +1,63 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using WixToolset.Data;
+    using WixToolset.ComPlus.Symbols;
+
+    public static partial class ComPlusSymbolDefinitions
+    {
+        public static readonly IntermediateSymbolDefinition ComPlusRoleForInterface = new IntermediateSymbolDefinition(
+            ComPlusSymbolDefinitionType.ComPlusRoleForInterface.ToString(),
+            new[]
+            {
+                new IntermediateFieldDefinition(nameof(ComPlusRoleForInterfaceSymbolFields.InterfaceRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusRoleForInterfaceSymbolFields.ApplicationRoleRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusRoleForInterfaceSymbolFields.ComponentRef), IntermediateFieldType.String),
+            },
+            typeof(ComPlusRoleForInterfaceSymbol));
+    }
+}
+
+namespace WixToolset.ComPlus.Symbols
+{
+    using WixToolset.Data;
+
+    public enum ComPlusRoleForInterfaceSymbolFields
+    {
+        InterfaceRef,
+        ApplicationRoleRef,
+        ComponentRef,
+    }
+
+    public class ComPlusRoleForInterfaceSymbol : IntermediateSymbol
+    {
+        public ComPlusRoleForInterfaceSymbol() : base(ComPlusSymbolDefinitions.ComPlusRoleForInterface, null, null)
+        {
+        }
+
+        public ComPlusRoleForInterfaceSymbol(SourceLineNumber sourceLineNumber, Identifier id = null) : base(ComPlusSymbolDefinitions.ComPlusRoleForInterface, sourceLineNumber, id)
+        {
+        }
+
+        public IntermediateField this[ComPlusRoleForInterfaceSymbolFields index] => this.Fields[(int)index];
+
+        public string InterfaceRef
+        {
+            get => this.Fields[(int)ComPlusRoleForInterfaceSymbolFields.InterfaceRef].AsString();
+            set => this.Set((int)ComPlusRoleForInterfaceSymbolFields.InterfaceRef, value);
+        }
+
+        public string ApplicationRoleRef
+        {
+            get => this.Fields[(int)ComPlusRoleForInterfaceSymbolFields.ApplicationRoleRef].AsString();
+            set => this.Set((int)ComPlusRoleForInterfaceSymbolFields.ApplicationRoleRef, value);
+        }
+
+        public string ComponentRef
+        {
+            get => this.Fields[(int)ComPlusRoleForInterfaceSymbolFields.ComponentRef].AsString();
+            set => this.Set((int)ComPlusRoleForInterfaceSymbolFields.ComponentRef, value);
+        }
+    }
+}
\ No newline at end of file
diff --git a/src/ext/ComPlus/wixext/Symbols/ComPlusRoleForMethodSymbol.cs b/src/ext/ComPlus/wixext/Symbols/ComPlusRoleForMethodSymbol.cs
new file mode 100644
index 00000000..9ba9d03b
--- /dev/null
+++ b/src/ext/ComPlus/wixext/Symbols/ComPlusRoleForMethodSymbol.cs
@@ -0,0 +1,63 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using WixToolset.Data;
+    using WixToolset.ComPlus.Symbols;
+
+    public static partial class ComPlusSymbolDefinitions
+    {
+        public static readonly IntermediateSymbolDefinition ComPlusRoleForMethod = new IntermediateSymbolDefinition(
+            ComPlusSymbolDefinitionType.ComPlusRoleForMethod.ToString(),
+            new[]
+            {
+                new IntermediateFieldDefinition(nameof(ComPlusRoleForMethodSymbolFields.MethodRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusRoleForMethodSymbolFields.ApplicationRoleRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusRoleForMethodSymbolFields.ComponentRef), IntermediateFieldType.String),
+            },
+            typeof(ComPlusRoleForMethodSymbol));
+    }
+}
+
+namespace WixToolset.ComPlus.Symbols
+{
+    using WixToolset.Data;
+
+    public enum ComPlusRoleForMethodSymbolFields
+    {
+        MethodRef,
+        ApplicationRoleRef,
+        ComponentRef,
+    }
+
+    public class ComPlusRoleForMethodSymbol : IntermediateSymbol
+    {
+        public ComPlusRoleForMethodSymbol() : base(ComPlusSymbolDefinitions.ComPlusRoleForMethod, null, null)
+        {
+        }
+
+        public ComPlusRoleForMethodSymbol(SourceLineNumber sourceLineNumber, Identifier id = null) : base(ComPlusSymbolDefinitions.ComPlusRoleForMethod, sourceLineNumber, id)
+        {
+        }
+
+        public IntermediateField this[ComPlusRoleForMethodSymbolFields index] => this.Fields[(int)index];
+
+        public string MethodRef
+        {
+            get => this.Fields[(int)ComPlusRoleForMethodSymbolFields.MethodRef].AsString();
+            set => this.Set((int)ComPlusRoleForMethodSymbolFields.MethodRef, value);
+        }
+
+        public string ApplicationRoleRef
+        {
+            get => this.Fields[(int)ComPlusRoleForMethodSymbolFields.ApplicationRoleRef].AsString();
+            set => this.Set((int)ComPlusRoleForMethodSymbolFields.ApplicationRoleRef, value);
+        }
+
+        public string ComponentRef
+        {
+            get => this.Fields[(int)ComPlusRoleForMethodSymbolFields.ComponentRef].AsString();
+            set => this.Set((int)ComPlusRoleForMethodSymbolFields.ComponentRef, value);
+        }
+    }
+}
\ No newline at end of file
diff --git a/src/ext/ComPlus/wixext/Symbols/ComPlusSubscriptionPropertySymbol.cs b/src/ext/ComPlus/wixext/Symbols/ComPlusSubscriptionPropertySymbol.cs
new file mode 100644
index 00000000..af995c3d
--- /dev/null
+++ b/src/ext/ComPlus/wixext/Symbols/ComPlusSubscriptionPropertySymbol.cs
@@ -0,0 +1,63 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using WixToolset.Data;
+    using WixToolset.ComPlus.Symbols;
+
+    public static partial class ComPlusSymbolDefinitions
+    {
+        public static readonly IntermediateSymbolDefinition ComPlusSubscriptionProperty = new IntermediateSymbolDefinition(
+            ComPlusSymbolDefinitionType.ComPlusSubscriptionProperty.ToString(),
+            new[]
+            {
+                new IntermediateFieldDefinition(nameof(ComPlusSubscriptionPropertySymbolFields.SubscriptionRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusSubscriptionPropertySymbolFields.Name), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusSubscriptionPropertySymbolFields.Value), IntermediateFieldType.String),
+            },
+            typeof(ComPlusSubscriptionPropertySymbol));
+    }
+}
+
+namespace WixToolset.ComPlus.Symbols
+{
+    using WixToolset.Data;
+
+    public enum ComPlusSubscriptionPropertySymbolFields
+    {
+        SubscriptionRef,
+        Name,
+        Value,
+    }
+
+    public class ComPlusSubscriptionPropertySymbol : IntermediateSymbol
+    {
+        public ComPlusSubscriptionPropertySymbol() : base(ComPlusSymbolDefinitions.ComPlusSubscriptionProperty, null, null)
+        {
+        }
+
+        public ComPlusSubscriptionPropertySymbol(SourceLineNumber sourceLineNumber, Identifier id = null) : base(ComPlusSymbolDefinitions.ComPlusSubscriptionProperty, sourceLineNumber, id)
+        {
+        }
+
+        public IntermediateField this[ComPlusSubscriptionPropertySymbolFields index] => this.Fields[(int)index];
+
+        public string SubscriptionRef
+        {
+            get => this.Fields[(int)ComPlusSubscriptionPropertySymbolFields.SubscriptionRef].AsString();
+            set => this.Set((int)ComPlusSubscriptionPropertySymbolFields.SubscriptionRef, value);
+        }
+
+        public string Name
+        {
+            get => this.Fields[(int)ComPlusSubscriptionPropertySymbolFields.Name].AsString();
+            set => this.Set((int)ComPlusSubscriptionPropertySymbolFields.Name, value);
+        }
+
+        public string Value
+        {
+            get => this.Fields[(int)ComPlusSubscriptionPropertySymbolFields.Value].AsString();
+            set => this.Set((int)ComPlusSubscriptionPropertySymbolFields.Value, value);
+        }
+    }
+}
\ No newline at end of file
diff --git a/src/ext/ComPlus/wixext/Symbols/ComPlusSubscriptionSymbol.cs b/src/ext/ComPlus/wixext/Symbols/ComPlusSubscriptionSymbol.cs
new file mode 100644
index 00000000..24d3f92e
--- /dev/null
+++ b/src/ext/ComPlus/wixext/Symbols/ComPlusSubscriptionSymbol.cs
@@ -0,0 +1,95 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using WixToolset.Data;
+    using WixToolset.ComPlus.Symbols;
+
+    public static partial class ComPlusSymbolDefinitions
+    {
+        public static readonly IntermediateSymbolDefinition ComPlusSubscription = new IntermediateSymbolDefinition(
+            ComPlusSymbolDefinitionType.ComPlusSubscription.ToString(),
+            new[]
+            {
+                new IntermediateFieldDefinition(nameof(ComPlusSubscriptionSymbolFields.Subscription), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusSubscriptionSymbolFields.ComPlusComponentRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusSubscriptionSymbolFields.ComponentRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusSubscriptionSymbolFields.SubscriptionId), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusSubscriptionSymbolFields.Name), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusSubscriptionSymbolFields.EventCLSID), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusSubscriptionSymbolFields.PublisherID), IntermediateFieldType.String),
+            },
+            typeof(ComPlusSubscriptionSymbol));
+    }
+}
+
+namespace WixToolset.ComPlus.Symbols
+{
+    using WixToolset.Data;
+
+    public enum ComPlusSubscriptionSymbolFields
+    {
+        Subscription,
+        ComPlusComponentRef,
+        ComponentRef,
+        SubscriptionId,
+        Name,
+        EventCLSID,
+        PublisherID,
+    }
+
+    public class ComPlusSubscriptionSymbol : IntermediateSymbol
+    {
+        public ComPlusSubscriptionSymbol() : base(ComPlusSymbolDefinitions.ComPlusSubscription, null, null)
+        {
+        }
+
+        public ComPlusSubscriptionSymbol(SourceLineNumber sourceLineNumber, Identifier id = null) : base(ComPlusSymbolDefinitions.ComPlusSubscription, sourceLineNumber, id)
+        {
+        }
+
+        public IntermediateField this[ComPlusSubscriptionSymbolFields index] => this.Fields[(int)index];
+
+        public string Subscription
+        {
+            get => this.Fields[(int)ComPlusSubscriptionSymbolFields.Subscription].AsString();
+            set => this.Set((int)ComPlusSubscriptionSymbolFields.Subscription, value);
+        }
+
+        public string ComPlusComponentRef
+        {
+            get => this.Fields[(int)ComPlusSubscriptionSymbolFields.ComPlusComponentRef].AsString();
+            set => this.Set((int)ComPlusSubscriptionSymbolFields.ComPlusComponentRef, value);
+        }
+
+        public string ComponentRef
+        {
+            get => this.Fields[(int)ComPlusSubscriptionSymbolFields.ComponentRef].AsString();
+            set => this.Set((int)ComPlusSubscriptionSymbolFields.ComponentRef, value);
+        }
+
+        public string SubscriptionId
+        {
+            get => this.Fields[(int)ComPlusSubscriptionSymbolFields.SubscriptionId].AsString();
+            set => this.Set((int)ComPlusSubscriptionSymbolFields.SubscriptionId, value);
+        }
+
+        public string Name
+        {
+            get => this.Fields[(int)ComPlusSubscriptionSymbolFields.Name].AsString();
+            set => this.Set((int)ComPlusSubscriptionSymbolFields.Name, value);
+        }
+
+        public string EventCLSID
+        {
+            get => this.Fields[(int)ComPlusSubscriptionSymbolFields.EventCLSID].AsString();
+            set => this.Set((int)ComPlusSubscriptionSymbolFields.EventCLSID, value);
+        }
+
+        public string PublisherID
+        {
+            get => this.Fields[(int)ComPlusSubscriptionSymbolFields.PublisherID].AsString();
+            set => this.Set((int)ComPlusSubscriptionSymbolFields.PublisherID, value);
+        }
+    }
+}
\ No newline at end of file
diff --git a/src/ext/ComPlus/wixext/Symbols/ComPlusSymbolDefinitions.cs b/src/ext/ComPlus/wixext/Symbols/ComPlusSymbolDefinitions.cs
new file mode 100644
index 00000000..407b9c14
--- /dev/null
+++ b/src/ext/ComPlus/wixext/Symbols/ComPlusSymbolDefinitions.cs
@@ -0,0 +1,135 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using System;
+    using WixToolset.Data;
+
+    public enum ComPlusSymbolDefinitionType
+    {
+        ComPlusApplication,
+        ComPlusApplicationProperty,
+        ComPlusApplicationRole,
+        ComPlusApplicationRoleProperty,
+        ComPlusAssembly,
+        ComPlusAssemblyDependency,
+        ComPlusComponent,
+        ComPlusComponentProperty,
+        ComPlusGroupInApplicationRole,
+        ComPlusGroupInPartitionRole,
+        ComPlusInterface,
+        ComPlusInterfaceProperty,
+        ComPlusMethod,
+        ComPlusMethodProperty,
+        ComPlusPartition,
+        ComPlusPartitionProperty,
+        ComPlusPartitionRole,
+        ComPlusPartitionUser,
+        ComPlusRoleForComponent,
+        ComPlusRoleForInterface,
+        ComPlusRoleForMethod,
+        ComPlusSubscription,
+        ComPlusSubscriptionProperty,
+        ComPlusUserInApplicationRole,
+        ComPlusUserInPartitionRole,
+    }
+
+    public static partial class ComPlusSymbolDefinitions
+    {
+        public static readonly Version Version = new Version("4.0.0");
+
+        public static IntermediateSymbolDefinition ByName(string name)
+        {
+            if (!Enum.TryParse(name, out ComPlusSymbolDefinitionType type))
+            {
+                return null;
+            }
+
+            return ByType(type);
+        }
+
+        public static IntermediateSymbolDefinition ByType(ComPlusSymbolDefinitionType type)
+        {
+            switch (type)
+            {
+                case ComPlusSymbolDefinitionType.ComPlusApplication:
+                    return ComPlusSymbolDefinitions.ComPlusApplication;
+
+                case ComPlusSymbolDefinitionType.ComPlusApplicationProperty:
+                    return ComPlusSymbolDefinitions.ComPlusApplicationProperty;
+
+                case ComPlusSymbolDefinitionType.ComPlusApplicationRole:
+                    return ComPlusSymbolDefinitions.ComPlusApplicationRole;
+
+                case ComPlusSymbolDefinitionType.ComPlusApplicationRoleProperty:
+                    return ComPlusSymbolDefinitions.ComPlusApplicationRoleProperty;
+
+                case ComPlusSymbolDefinitionType.ComPlusAssembly:
+                    return ComPlusSymbolDefinitions.ComPlusAssembly;
+
+                case ComPlusSymbolDefinitionType.ComPlusAssemblyDependency:
+                    return ComPlusSymbolDefinitions.ComPlusAssemblyDependency;
+
+                case ComPlusSymbolDefinitionType.ComPlusComponent:
+                    return ComPlusSymbolDefinitions.ComPlusComponent;
+
+                case ComPlusSymbolDefinitionType.ComPlusComponentProperty:
+                    return ComPlusSymbolDefinitions.ComPlusComponentProperty;
+
+                case ComPlusSymbolDefinitionType.ComPlusGroupInApplicationRole:
+                    return ComPlusSymbolDefinitions.ComPlusGroupInApplicationRole;
+
+                case ComPlusSymbolDefinitionType.ComPlusGroupInPartitionRole:
+                    return ComPlusSymbolDefinitions.ComPlusGroupInPartitionRole;
+
+                case ComPlusSymbolDefinitionType.ComPlusInterface:
+                    return ComPlusSymbolDefinitions.ComPlusInterface;
+
+                case ComPlusSymbolDefinitionType.ComPlusInterfaceProperty:
+                    return ComPlusSymbolDefinitions.ComPlusInterfaceProperty;
+
+                case ComPlusSymbolDefinitionType.ComPlusMethod:
+                    return ComPlusSymbolDefinitions.ComPlusMethod;
+
+                case ComPlusSymbolDefinitionType.ComPlusMethodProperty:
+                    return ComPlusSymbolDefinitions.ComPlusMethodProperty;
+
+                case ComPlusSymbolDefinitionType.ComPlusPartition:
+                    return ComPlusSymbolDefinitions.ComPlusPartition;
+
+                case ComPlusSymbolDefinitionType.ComPlusPartitionProperty:
+                    return ComPlusSymbolDefinitions.ComPlusPartitionProperty;
+
+                case ComPlusSymbolDefinitionType.ComPlusPartitionRole:
+                    return ComPlusSymbolDefinitions.ComPlusPartitionRole;
+
+                case ComPlusSymbolDefinitionType.ComPlusPartitionUser:
+                    return ComPlusSymbolDefinitions.ComPlusPartitionUser;
+
+                case ComPlusSymbolDefinitionType.ComPlusRoleForComponent:
+                    return ComPlusSymbolDefinitions.ComPlusRoleForComponent;
+
+                case ComPlusSymbolDefinitionType.ComPlusRoleForInterface:
+                    return ComPlusSymbolDefinitions.ComPlusRoleForInterface;
+
+                case ComPlusSymbolDefinitionType.ComPlusRoleForMethod:
+                    return ComPlusSymbolDefinitions.ComPlusRoleForMethod;
+
+                case ComPlusSymbolDefinitionType.ComPlusSubscription:
+                    return ComPlusSymbolDefinitions.ComPlusSubscription;
+
+                case ComPlusSymbolDefinitionType.ComPlusSubscriptionProperty:
+                    return ComPlusSymbolDefinitions.ComPlusSubscriptionProperty;
+
+                case ComPlusSymbolDefinitionType.ComPlusUserInApplicationRole:
+                    return ComPlusSymbolDefinitions.ComPlusUserInApplicationRole;
+
+                case ComPlusSymbolDefinitionType.ComPlusUserInPartitionRole:
+                    return ComPlusSymbolDefinitions.ComPlusUserInPartitionRole;
+
+                default:
+                    throw new ArgumentOutOfRangeException(nameof(type));
+            }
+        }
+    }
+}
diff --git a/src/ext/ComPlus/wixext/Symbols/ComPlusUserInApplicationRoleSymbol.cs b/src/ext/ComPlus/wixext/Symbols/ComPlusUserInApplicationRoleSymbol.cs
new file mode 100644
index 00000000..1f2e01b2
--- /dev/null
+++ b/src/ext/ComPlus/wixext/Symbols/ComPlusUserInApplicationRoleSymbol.cs
@@ -0,0 +1,63 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using WixToolset.Data;
+    using WixToolset.ComPlus.Symbols;
+
+    public static partial class ComPlusSymbolDefinitions
+    {
+        public static readonly IntermediateSymbolDefinition ComPlusUserInApplicationRole = new IntermediateSymbolDefinition(
+            ComPlusSymbolDefinitionType.ComPlusUserInApplicationRole.ToString(),
+            new[]
+            {
+                new IntermediateFieldDefinition(nameof(ComPlusUserInApplicationRoleSymbolFields.ApplicationRoleRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusUserInApplicationRoleSymbolFields.ComponentRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusUserInApplicationRoleSymbolFields.UserRef), IntermediateFieldType.String),
+            },
+            typeof(ComPlusUserInApplicationRoleSymbol));
+    }
+}
+
+namespace WixToolset.ComPlus.Symbols
+{
+    using WixToolset.Data;
+
+    public enum ComPlusUserInApplicationRoleSymbolFields
+    {
+        ApplicationRoleRef,
+        ComponentRef,
+        UserRef,
+    }
+
+    public class ComPlusUserInApplicationRoleSymbol : IntermediateSymbol
+    {
+        public ComPlusUserInApplicationRoleSymbol() : base(ComPlusSymbolDefinitions.ComPlusUserInApplicationRole, null, null)
+        {
+        }
+
+        public ComPlusUserInApplicationRoleSymbol(SourceLineNumber sourceLineNumber, Identifier id = null) : base(ComPlusSymbolDefinitions.ComPlusUserInApplicationRole, sourceLineNumber, id)
+        {
+        }
+
+        public IntermediateField this[ComPlusUserInApplicationRoleSymbolFields index] => this.Fields[(int)index];
+
+        public string ApplicationRoleRef
+        {
+            get => this.Fields[(int)ComPlusUserInApplicationRoleSymbolFields.ApplicationRoleRef].AsString();
+            set => this.Set((int)ComPlusUserInApplicationRoleSymbolFields.ApplicationRoleRef, value);
+        }
+
+        public string ComponentRef
+        {
+            get => this.Fields[(int)ComPlusUserInApplicationRoleSymbolFields.ComponentRef].AsString();
+            set => this.Set((int)ComPlusUserInApplicationRoleSymbolFields.ComponentRef, value);
+        }
+
+        public string UserRef
+        {
+            get => this.Fields[(int)ComPlusUserInApplicationRoleSymbolFields.UserRef].AsString();
+            set => this.Set((int)ComPlusUserInApplicationRoleSymbolFields.UserRef, value);
+        }
+    }
+}
\ No newline at end of file
diff --git a/src/ext/ComPlus/wixext/Symbols/ComPlusUserInPartitionRoleSymbol.cs b/src/ext/ComPlus/wixext/Symbols/ComPlusUserInPartitionRoleSymbol.cs
new file mode 100644
index 00000000..10df94bf
--- /dev/null
+++ b/src/ext/ComPlus/wixext/Symbols/ComPlusUserInPartitionRoleSymbol.cs
@@ -0,0 +1,63 @@
+// Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information.
+
+namespace WixToolset.ComPlus
+{
+    using WixToolset.Data;
+    using WixToolset.ComPlus.Symbols;
+
+    public static partial class ComPlusSymbolDefinitions
+    {
+        public static readonly IntermediateSymbolDefinition ComPlusUserInPartitionRole = new IntermediateSymbolDefinition(
+            ComPlusSymbolDefinitionType.ComPlusUserInPartitionRole.ToString(),
+            new[]
+            {
+                new IntermediateFieldDefinition(nameof(ComPlusUserInPartitionRoleSymbolFields.PartitionRoleRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusUserInPartitionRoleSymbolFields.ComponentRef), IntermediateFieldType.String),
+                new IntermediateFieldDefinition(nameof(ComPlusUserInPartitionRoleSymbolFields.UserRef), IntermediateFieldType.String),
+            },
+            typeof(ComPlusUserInPartitionRoleSymbol));
+    }
+}
+
+namespace WixToolset.ComPlus.Symbols
+{
+    using WixToolset.Data;
+
+    public enum ComPlusUserInPartitionRoleSymbolFields
+    {
+        PartitionRoleRef,
+        ComponentRef,
+        UserRef,
+    }
+
+    public class ComPlusUserInPartitionRoleSymbol : IntermediateSymbol
+    {
+        public ComPlusUserInPartitionRoleSymbol() : base(ComPlusSymbolDefinitions.ComPlusUserInPartitionRole, null, null)
+        {
+        }
+
+        public ComPlusUserInPartitionRoleSymbol(SourceLineNumber sourceLineNumber, Identifier id = null) : base(ComPlusSymbolDefinitions.ComPlusUserInPartitionRole, sourceLineNumber, id)
+        {
+        }
+
+        public IntermediateField this[ComPlusUserInPartitionRoleSymbolFields index] => this.Fields[(int)index];
+
+        public string PartitionRoleRef
+        {
+            get => this.Fields[(int)ComPlusUserInPartitionRoleSymbolFields.PartitionRoleRef].AsString();
+            set => this.Set((int)ComPlusUserInPartitionRoleSymbolFields.PartitionRoleRef, value);
+        }
+
+        public string ComponentRef
+        {
+            get => this.Fields[(int)ComPlusUserInPartitionRoleSymbolFields.ComponentRef].AsString();
+            set => this.Set((int)ComPlusUserInPartitionRoleSymbolFields.ComponentRef, value);
+        }
+
+        public string UserRef
+        {
+            get => this.Fields[(int)ComPlusUserInPartitionRoleSymbolFields.UserRef].AsString();
+            set => this.Set((int)ComPlusUserInPartitionRoleSymbolFields.UserRef, value);
+        }
+    }
+}
\ No newline at end of file
diff --git a/src/ext/ComPlus/wixext/WixToolset.ComPlus.wixext.csproj b/src/ext/ComPlus/wixext/WixToolset.ComPlus.wixext.csproj
new file mode 100644
index 00000000..11271ad3
--- /dev/null
+++ b/src/ext/ComPlus/wixext/WixToolset.ComPlus.wixext.csproj
@@ -0,0 +1,32 @@
+<?xml version="1.0" encoding="utf-8"?>
+<!-- Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information. -->
+
+<Project Sdk="Microsoft.NET.Sdk">
+  <PropertyGroup>
+    <TargetFramework>netstandard2.0</TargetFramework>
+    <DebugType>embedded</DebugType>
+    <RootNamespace>WixToolset.ComPlus</RootNamespace>
+    <Description>WiX Toolset ComPlus Extension</Description>
+    <Title>WiX Toolset ComPlus Extension</Title>
+    <IsTool>true</IsTool>
+    <IncludeSymbols>true</IncludeSymbols>
+  </PropertyGroup>
+
+  <ItemGroup>
+    <EmbeddedResource Include="$(OutputPath)..\complus.wixlib" />
+  </ItemGroup>
+
+  <ItemGroup>
+    <ProjectReference Include="..\wixlib\complus.wixproj" ReferenceOutputAssembly="false" Condition=" '$(NCrunch)'=='' " />
+  </ItemGroup>
+
+  <ItemGroup>
+    <PackageReference Include="WixToolset.Data" Version="4.0.*" PrivateAssets="all" />
+    <PackageReference Include="WixToolset.Extensibility" Version="4.0.*" PrivateAssets="all" />
+  </ItemGroup>
+
+  <ItemGroup>
+    <PackageReference Include="Microsoft.SourceLink.GitHub" Version="1.0.0" PrivateAssets="all" />
+    <PackageReference Include="Nerdbank.GitVersioning" Version="3.3.37" PrivateAssets="all" />
+  </ItemGroup>
+</Project>
diff --git a/src/ext/ComPlus/wixext/WixToolset.ComPlus.wixext.nuspec b/src/ext/ComPlus/wixext/WixToolset.ComPlus.wixext.nuspec
new file mode 100644
index 00000000..3197250b
--- /dev/null
+++ b/src/ext/ComPlus/wixext/WixToolset.ComPlus.wixext.nuspec
@@ -0,0 +1,24 @@
+<?xml version="1.0"?>
+<package xmlns="http://schemas.microsoft.com/packaging/2010/07/nuspec.xsd">
+  <metadata minClientVersion="4.0">
+    <id>$id$</id>
+    <version>$version$</version>
+    <title>$title$</title>
+    <description>$description$</description>
+    <authors>$authors$</authors>
+    <license type="expression">MS-RL</license>
+    <requireLicenseAcceptance>false</requireLicenseAcceptance>
+    <copyright>$copyright$</copyright>
+    <projectUrl>$projectUrl$</projectUrl>
+    <repository type="$repositorytype$" url="$repositoryurl$" commit="$repositorycommit$" />
+  </metadata>
+
+  <files>
+    <file src="$projectFolder$$id$.targets" target="build" />
+
+    <file src="netstandard2.0\$id$.dll" target="tools" />
+
+    <file src="x86\*.pdb" target="pdbs\x86" />
+    <file src="x64\*.pdb" target="pdbs\x64" />
+  </files>
+</package>
diff --git a/src/ext/ComPlus/wixext/WixToolset.ComPlus.wixext.targets b/src/ext/ComPlus/wixext/WixToolset.ComPlus.wixext.targets
new file mode 100644
index 00000000..8115b715
--- /dev/null
+++ b/src/ext/ComPlus/wixext/WixToolset.ComPlus.wixext.targets
@@ -0,0 +1,11 @@
+<?xml version="1.0" encoding="utf-8"?>
+<!-- Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information. -->
+
+<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003" ToolsVersion="4.0">
+  <PropertyGroup>
+    <WixToolsetComPlusWixextPath Condition=" '$(WixToolsetComPlusWixextPath)' == '' ">$(MSBuildThisFileDirectory)..\tools\WixToolset.ComPlus.wixext.dll</WixToolsetComPlusWixextPath>
+  </PropertyGroup>
+  <ItemGroup>
+    <WixExtension Include="$(WixToolsetComPlusWixextPath)" />
+  </ItemGroup>
+</Project>
diff --git a/src/ext/ComPlus/wixlib/ComPlusExtension.wxs b/src/ext/ComPlus/wixlib/ComPlusExtension.wxs
new file mode 100644
index 00000000..fe74eeae
--- /dev/null
+++ b/src/ext/ComPlus/wixlib/ComPlusExtension.wxs
@@ -0,0 +1,135 @@
+<!-- Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information. -->
+
+<Wix xmlns="http://wixtoolset.org/schemas/v4/wxs">
+  <?include caerr.wxi ?>
+
+  <Fragment>
+    <UI Id="ComPlusUI">
+      <Error Id="$(var.msierrComPlusCannotConnect)" Message="!(loc.msierrComPlusCannotConnect)" />
+      <Error Id="$(var.msierrComPlusPartitionReadFailed)" Message="!(loc.msierrComPlusPartitionReadFailed)" />
+      <Error Id="$(var.msierrComPlusPartitionRoleReadFailed)" Message="!(loc.msierrComPlusPartitionRoleReadFailed)" />
+      <Error Id="$(var.msierrComPlusUserInPartitionRoleReadFailed)" Message="!(loc.msierrComPlusUserInPartitionRoleReadFailed)" />
+      <Error Id="$(var.msierrComPlusPartitionUserReadFailed)" Message="!(loc.msierrComPlusPartitionUserReadFailed)" />
+      <Error Id="$(var.msierrComPlusApplicationReadFailed)" Message="!(loc.msierrComPlusApplicationReadFailed)" />
+      <Error Id="$(var.msierrComPlusApplicationRoleReadFailed)" Message="!(loc.msierrComPlusApplicationRoleReadFailed)" />
+      <Error Id="$(var.msierrComPlusUserInApplicationRoleReadFailed)" Message="!(loc.msierrComPlusUserInApplicationRoleReadFailed)" />
+      <Error Id="$(var.msierrComPlusAssembliesReadFailed)" Message="!(loc.msierrComPlusAssembliesReadFailed)" />
+      <Error Id="$(var.msierrComPlusSubscriptionReadFailed)" Message="!(loc.msierrComPlusSubscriptionReadFailed)" />
+      <Error Id="$(var.msierrComPlusPartitionDependency)" Message="!(loc.msierrComPlusPartitionDependency)" />
+      <Error Id="$(var.msierrComPlusPartitionNotFound)" Message="!(loc.msierrComPlusPartitionNotFound)" />
+      <Error Id="$(var.msierrComPlusPartitionIdConflict)" Message="!(loc.msierrComPlusPartitionIdConflict)" />
+      <Error Id="$(var.msierrComPlusPartitionNameConflict)" Message="!(loc.msierrComPlusPartitionNameConflict)" />
+      <Error Id="$(var.msierrComPlusApplicationDependency)" Message="!(loc.msierrComPlusApplicationDependency)" />
+      <Error Id="$(var.msierrComPlusApplicationNotFound)" Message="!(loc.msierrComPlusApplicationNotFound)" />
+      <Error Id="$(var.msierrComPlusApplicationIdConflict)" Message="!(loc.msierrComPlusApplicationIdConflict)" />
+      <Error Id="$(var.msierrComPlusApplicationNameConflict)" Message="!(loc.msierrComPlusApplicationNameConflict)" />
+      <Error Id="$(var.msierrComPlusApplicationRoleDependency)" Message="!(loc.msierrComPlusApplicationRoleDependency)" />
+      <Error Id="$(var.msierrComPlusApplicationRoleNotFound)" Message="!(loc.msierrComPlusApplicationRoleNotFound)" />
+      <Error Id="$(var.msierrComPlusApplicationRoleConflict)" Message="!(loc.msierrComPlusApplicationRoleConflict)" />
+      <Error Id="$(var.msierrComPlusAssemblyDependency)" Message="!(loc.msierrComPlusAssemblyDependency)" />
+      <Error Id="$(var.msierrComPlusSubscriptionIdConflict)" Message="!(loc.msierrComPlusSubscriptionIdConflict)" />
+      <Error Id="$(var.msierrComPlusSubscriptionNameConflict)" Message="!(loc.msierrComPlusSubscriptionNameConflict)" />
+      <Error Id="$(var.msierrComPlusFailedLookupNames)" Message="!(loc.msierrComPlusFailedLookupNames)" />
+
+      <ProgressText Action="ComPlusInstallExecute" Message="!(loc.ComPlusInstallExecute)" />
+      <ProgressText Action="ComPlusUninstallExecute" Message="!(loc.ComPlusUninstallExecute)" />
+
+      <ProgressText Action="CreateComPlusPartitions" Template="!(loc.CreateComPlusPartitionsTemplate)" Message="!(loc.CreateComPlusPartitions)" />
+      <ProgressText Action="RemoveComPlusPartitions" Template="!(loc.RemoveComPlusPartitionsTemplate)" Message="!(loc.RemoveComPlusPartitions)" />
+      <ProgressText Action="AddUsersToComPlusPartitionRoles" Template="!(loc.AddUsersToComPlusPartitionRolesTemplate)" Message="!(loc.AddUsersToComPlusPartitionRoles)" />
+      <ProgressText Action="RemoveUsersFromComPlusPartRoles" Template="!(loc.RemoveUsersFromComPlusPartitionRolesTemplate)" Message="!(loc.RemoveUsersFromComPlusPartitionRoles)" />
+      <ProgressText Action="AddComPlusPartitionUsers" Template="!(loc.AddComPlusPartitionUsersTemplate)" Message="!(loc.AddComPlusPartitionUsers)" />
+      <ProgressText Action="RemoveComPlusPartitionUsers" Template="!(loc.RemoveComPlusPartitionUsersTemplate)" Message="!(loc.RemoveComPlusPartitionUsers)" />
+      <ProgressText Action="CreateComPlusApplications" Template="!(loc.CreateComPlusApplicationsTemplate)" Message="!(loc.CreateComPlusApplications)" />
+      <ProgressText Action="RemoveComPlusApplications" Template="!(loc.RemoveComPlusApplicationsTemplate)" Message="!(loc.RemoveComPlusApplications)" />
+      <ProgressText Action="CreateComPlusApplicationRoles" Template="!(loc.CreateComPlusApplicationRolesTemplate)" Message="!(loc.CreateComPlusApplicationRoles)" />
+      <ProgressText Action="RemoveComPlusApplicationRoles" Template="!(loc.RemoveComPlusApplicationRolesTemplate)" Message="!(loc.RemoveComPlusApplicationRoles)" />
+      <ProgressText Action="AddUsersToComPlusApplicationRoles" Template="!(loc.AddUsersToComPlusApplicationRolesTemplate)" Message="!(loc.AddUsersToComPlusApplicationRoles)" />
+      <ProgressText Action="RemoveUsersFromComPlusAppRoles" Template="!(loc.RemoveUsersFromComPlusApplicationRolesTemplate)" Message="!(loc.RemoveUsersFromComPlusApplicationRoles)" />
+      <ProgressText Action="RegisterComPlusAssemblies" Template="!(loc.RegisterComPlusAssembliesTemplate)" Message="!(loc.RegisterComPlusAssemblies)" />
+      <ProgressText Action="UnregisterComPlusAssemblies" Template="!(loc.UnregisterComPlusAssembliesTemplate)" Message="!(loc.UnregisterComPlusAssemblies)" />
+      <ProgressText Action="AddComPlusRoleAssignments" Template="!(loc.AddComPlusRoleAssignmentsTemplate)" Message="!(loc.AddComPlusRoleAssignments)" />
+      <ProgressText Action="RemoveComPlusRoleAssignments" Template="!(loc.RemoveComPlusRoleAssignmentsTemplate)" Message="!(loc.RemoveComPlusRoleAssignments)" />
+      <ProgressText Action="CreateSubscrComPlusComponents" Template="!(loc.CreateSubscriptionsComPlusComponentsTemplate)" Message="!(loc.CreateSubscriptionsComPlusComponents)" />
+      <ProgressText Action="RemoveSubscrComPlusComponents" Template="!(loc.RemoveSubscriptionsComPlusComponentsTemplate)" Message="!(loc.RemoveSubscriptionsComPlusComponents)" />
+    </UI>
+  </Fragment>
+
+  <Fragment>
+    <UIRef Id="ComPlusUI" />
+
+    <CustomAction Id="ConfigureComPlusInstall" DllEntry="ConfigureComPlusInstall" Execute="immediate" Return="check" SuppressModularization="yes" BinaryRef="ComPlusCA_x86" />
+    <CustomAction Id="ConfigureComPlusUninstall" DllEntry="ConfigureComPlusUninstall" Execute="immediate" Return="check" SuppressModularization="yes" BinaryRef="ComPlusCA_x86" />
+    <CustomAction Id="ComPlusInstallPrepare" DllEntry="ComPlusPrepare" Execute="deferred" Return="check" Impersonate="no" HideTarget="yes" SuppressModularization="yes" BinaryRef="ComPlusCA_x86" />
+    <CustomAction Id="ComPlusRollbackInstallPrepare" DllEntry="ComPlusCleanup" Execute="rollback" Return="check" Impersonate="no" HideTarget="yes" SuppressModularization="yes" BinaryRef="ComPlusCA_x86" />
+    <CustomAction Id="ComPlusInstallExecute" DllEntry="ComPlusInstallExecute" Execute="deferred" Return="check" Impersonate="no" HideTarget="yes" SuppressModularization="yes" BinaryRef="ComPlusCA_x86" />
+    <CustomAction Id="ComPlusInstallExecuteCommit" DllEntry="ComPlusInstallExecuteCommit" Execute="commit" Return="check" Impersonate="no" HideTarget="yes" SuppressModularization="yes" BinaryRef="ComPlusCA_x86" />
+    <CustomAction Id="ComPlusRollbackInstallExecute" DllEntry="ComPlusRollbackInstallExecute" Execute="rollback" Return="check" Impersonate="no" HideTarget="yes" SuppressModularization="yes" BinaryRef="ComPlusCA_x86" />
+    <CustomAction Id="ComPlusInstallCommit" DllEntry="ComPlusCleanup" Execute="commit" Return="check" Impersonate="no" HideTarget="yes" SuppressModularization="yes" BinaryRef="ComPlusCA_x86" />
+    <CustomAction Id="ComPlusUninstallPrepare" DllEntry="ComPlusPrepare" Execute="deferred" Return="check" Impersonate="no" HideTarget="yes" SuppressModularization="yes" BinaryRef="ComPlusCA_x86" />
+    <CustomAction Id="ComPlusRollbackUninstallPrepare" DllEntry="ComPlusCleanup" Execute="rollback" Return="check" Impersonate="no" HideTarget="yes" SuppressModularization="yes" BinaryRef="ComPlusCA_x86" />
+    <CustomAction Id="ComPlusUninstallExecute" DllEntry="ComPlusUninstallExecute" Execute="deferred" Return="check" Impersonate="no" HideTarget="yes" SuppressModularization="yes" BinaryRef="ComPlusCA_x86" />
+    <CustomAction Id="ComPlusRollbackUninstallExecute" DllEntry="ComPlusInstallExecute" Execute="rollback" Return="check" Impersonate="no" HideTarget="yes" SuppressModularization="yes" BinaryRef="ComPlusCA_x86" />
+    <CustomAction Id="ComPlusUninstallCommit" DllEntry="ComPlusCleanup" Execute="commit" Return="check" Impersonate="no" HideTarget="yes" SuppressModularization="yes" BinaryRef="ComPlusCA_x86" />
+
+    <Property Id="ComPlusInstallPrepare" Hidden="yes" SuppressModularization="yes" />
+    <Property Id="ComPlusRollbackInstallPrepare" Hidden="yes" SuppressModularization="yes" />
+    <Property Id="ComPlusInstallExecute" Hidden="yes" SuppressModularization="yes" />
+    <Property Id="ComPlusInstallExecuteCommit" Hidden="yes" SuppressModularization="yes" />
+    <Property Id="ComPlusRollbackInstallExecute" Hidden="yes" SuppressModularization="yes" />
+    <Property Id="ComPlusInstallCommit" Hidden="yes" SuppressModularization="yes" />
+    <Property Id="ComPlusUninstallPrepare" Hidden="yes" SuppressModularization="yes" />
+    <Property Id="ComPlusRollbackUninstallPrepare" Hidden="yes" SuppressModularization="yes" />
+    <Property Id="ComPlusUninstallExecute" Hidden="yes" SuppressModularization="yes" />
+    <Property Id="ComPlusRollbackUninstallExecute" Hidden="yes" SuppressModularization="yes" />
+    <Property Id="ComPlusUninstallCommit" Hidden="yes" SuppressModularization="yes" />
+
+    <InstallExecuteSequence>
+      <Custom Action="ConfigureComPlusUninstall" After="DeleteServices" Overridable="yes" Condition="VersionNT &gt;= 500" />
+      <Custom Action="ConfigureComPlusInstall" Before="InstallServices" Overridable="yes" Condition="VersionNT &gt;= 500" />
+    </InstallExecuteSequence>
+  </Fragment>
+
+  <Fragment>
+    <UIRef Id="ComPlusUI" />
+
+    <CustomAction Id="ConfigureComPlusInstall_x64" DllEntry="ConfigureComPlusInstall" Execute="immediate" Return="check" SuppressModularization="yes" BinaryRef="ComPlusCA_x64" />
+    <CustomAction Id="ConfigureComPlusUninstall_x64" DllEntry="ConfigureComPlusUninstall" Execute="immediate" Return="check" SuppressModularization="yes" BinaryRef="ComPlusCA_x64" />
+    <CustomAction Id="ComPlusInstallPrepare_64" DllEntry="ComPlusPrepare" Execute="deferred" Return="check" Impersonate="no" HideTarget="yes" SuppressModularization="yes" BinaryRef="ComPlusCA_x64" />
+    <CustomAction Id="ComPlusRollbackInstallPrepare_64" DllEntry="ComPlusCleanup" Execute="rollback" Return="check" Impersonate="no" HideTarget="yes" SuppressModularization="yes" BinaryRef="ComPlusCA_x64" />
+    <CustomAction Id="ComPlusInstallExecute_64" DllEntry="ComPlusInstallExecute" Execute="deferred" Return="check" Impersonate="no" HideTarget="yes" SuppressModularization="yes" BinaryRef="ComPlusCA_x64" />
+    <CustomAction Id="ComPlusInstallExecuteCommit_64" DllEntry="ComPlusInstallExecuteCommit" Execute="commit" Return="check" Impersonate="no" HideTarget="yes" SuppressModularization="yes" BinaryRef="ComPlusCA_x64" />
+    <CustomAction Id="ComPlusRollbackInstallExecute_64" DllEntry="ComPlusRollbackInstallExecute" Execute="rollback" Return="check" Impersonate="no" HideTarget="yes" SuppressModularization="yes" BinaryRef="ComPlusCA_x64" />
+    <CustomAction Id="ComPlusInstallCommit_64" DllEntry="ComPlusCleanup" Execute="commit" Return="check" Impersonate="no" HideTarget="yes" SuppressModularization="yes" BinaryRef="ComPlusCA_x64" />
+    <CustomAction Id="ComPlusUninstallPrepare_64" DllEntry="ComPlusPrepare" Execute="deferred" Return="check" Impersonate="no" HideTarget="yes" SuppressModularization="yes" BinaryRef="ComPlusCA_x64" />
+    <CustomAction Id="ComPlusRollbackUninstallPrepare_64" DllEntry="ComPlusCleanup" Execute="rollback" Return="check" Impersonate="no" HideTarget="yes" SuppressModularization="yes" BinaryRef="ComPlusCA_x64" />
+    <CustomAction Id="ComPlusUninstallExecute_64" DllEntry="ComPlusUninstallExecute" Execute="deferred" Return="check" Impersonate="no" HideTarget="yes" SuppressModularization="yes" BinaryRef="ComPlusCA_x64" />
+    <CustomAction Id="ComPlusRollbackUninstallExecute_64" DllEntry="ComPlusInstallExecute" Execute="rollback" Return="check" Impersonate="no" HideTarget="yes" SuppressModularization="yes" BinaryRef="ComPlusCA_x64" />
+    <CustomAction Id="ComPlusUninstallCommit_64" DllEntry="ComPlusCleanup" Execute="commit" Return="check" Impersonate="no" HideTarget="yes" SuppressModularization="yes" BinaryRef="ComPlusCA_x64" />
+
+    <Property Id="ComPlusInstallPrepare_64" Hidden="yes" SuppressModularization="yes" />
+    <Property Id="ComPlusRollbackInstallPrepare_64" Hidden="yes" SuppressModularization="yes" />
+    <Property Id="ComPlusInstallExecute_64" Hidden="yes" SuppressModularization="yes" />
+    <Property Id="ComPlusInstallExecuteCommit_64" Hidden="yes" SuppressModularization="yes" />
+    <Property Id="ComPlusRollbackInstallExecute_64" Hidden="yes" SuppressModularization="yes" />
+    <Property Id="ComPlusInstallCommit_64" Hidden="yes" SuppressModularization="yes" />
+    <Property Id="ComPlusUninstallPrepare_64" Hidden="yes" SuppressModularization="yes" />
+    <Property Id="ComPlusRollbackUninstallPrepare_64" Hidden="yes" SuppressModularization="yes" />
+    <Property Id="ComPlusUninstallExecute_64" Hidden="yes" SuppressModularization="yes" />
+    <Property Id="ComPlusRollbackUninstallExecute_64" Hidden="yes" SuppressModularization="yes" />
+    <Property Id="ComPlusUninstallCommit_64" Hidden="yes" SuppressModularization="yes" />
+
+    <InstallExecuteSequence>
+      <Custom Action="ConfigureComPlusUninstall_x64" After="DeleteServices" Overridable="yes" Condition="VersionNT &gt;= 500" />
+      <Custom Action="ConfigureComPlusInstall_x64" Before="InstallServices" Overridable="yes" Condition="VersionNT &gt;= 500" />
+    </InstallExecuteSequence>
+  </Fragment>
+
+  <Fragment>
+    <Binary Id="ComPlusCA_x86" SourceFile="!(bindpath.x86)complusca.dll" />
+  </Fragment>
+
+  <Fragment>
+    <Binary Id="ComPlusCA_x64" SourceFile="!(bindpath.x64)complusca.dll" />
+  </Fragment>
+</Wix>
diff --git a/src/ext/ComPlus/wixlib/caerr.wxi b/src/ext/ComPlus/wixlib/caerr.wxi
new file mode 100644
index 00000000..ff7ec121
--- /dev/null
+++ b/src/ext/ComPlus/wixlib/caerr.wxi
@@ -0,0 +1,96 @@
+<Include xmlns="http://wixtoolset.org/schemas/v4/wxs">
+  <?define msierrSecureObjectsFailedCreateSD = 25520?>
+  <?define msierrSecureObjectsFailedSet = 25521?>
+  <?define msierrSecureObjectsUnknownType = 25522?>
+  <?define msierrXmlFileFailedRead = 25530?>
+  <?define msierrXmlFileFailedOpen = 25531?>
+  <?define msierrXmlFileFailedSelect = 25532?>
+  <?define msierrXmlFileFailedSave = 25533?>
+  <?define msierrXmlConfigFailedRead = 25540?>
+  <?define msierrXmlConfigFailedOpen = 25541?>
+  <?define msierrXmlConfigFailedSelect = 25542?>
+  <?define msierrXmlConfigFailedSave = 25543?>
+  <?define msierrFirewallCannotConnect = 25580?>
+  <?define msierrIISCannotConnect = 26001?>
+  <?define msierrIISFailedReadWebSite = 26002?>
+  <?define msierrIISFailedReadWebDirs = 26003?>
+  <?define msierrIISFailedReadVDirs = 26004?>
+  <?define msierrIISFailedReadFilters = 26005?>
+  <?define msierrIISFailedReadAppPool = 26006?>
+  <?define msierrIISFailedReadMimeMap = 26007?>
+  <?define msierrIISFailedReadProp = 26008?>
+  <?define msierrIISFailedReadWebSvcExt = 26009?>
+  <?define msierrIISFailedReadWebError = 26010?>
+  <?define msierrIISFailedReadHttpHeader = 26011?>
+  <?define msierrIISFailedSchedTransaction = 26031?>
+  <?define msierrIISFailedSchedInstallWebs = 26032?>
+  <?define msierrIISFailedSchedInstallWebDirs = 26033?>
+  <?define msierrIISFailedSchedInstallVDirs = 26034?>
+  <?define msierrIISFailedSchedInstallFilters = 26035?>
+  <?define msierrIISFailedSchedInstallAppPool = 26036?>
+  <?define msierrIISFailedSchedInstallProp = 26037?>
+  <?define msierrIISFailedSchedInstallWebSvcExt = 26038?>
+  <?define msierrIISFailedSchedUninstallWebs = 26051?>
+  <?define msierrIISFailedSchedUninstallWebDirs = 26052?>
+  <?define msierrIISFailedSchedUninstallVDirs = 26053?>
+  <?define msierrIISFailedSchedUninstallFilters = 26054?>
+  <?define msierrIISFailedSchedUninstallAppPool = 26055?>
+  <?define msierrIISFailedSchedUninstallProp = 26056?>
+  <?define msierrIISFailedSchedUninstallWebSvcExt = 26057?>
+  <?define msierrIISFailedStartTransaction = 26101?>
+  <?define msierrIISFailedOpenKey = 26102?>
+  <?define msierrIISFailedCreateKey = 26103?>
+  <?define msierrIISFailedWriteData = 26104?>
+  <?define msierrIISFailedCreateApp = 26105?>
+  <?define msierrIISFailedDeleteKey = 26106?>
+  <?define msierrIISFailedDeleteApp = 26107?>
+  <?define msierrIISFailedDeleteValue = 26108?>
+  <?define msierrIISFailedCommitInUse = 26109?>
+  <?define msierrSQLFailedCreateDatabase = 26201?>
+  <?define msierrSQLFailedDropDatabase = 26202?>
+  <?define msierrSQLFailedConnectDatabase = 26203?>
+  <?define msierrSQLFailedExecString = 26204?>
+  <?define msierrSQLDatabaseAlreadyExists = 26205?>
+  <?define msierrPERFMONFailedRegisterDLL = 26251?>
+  <?define msierrPERFMONFailedUnregisterDLL = 26252?>
+  <?define msierrInstallPerfCounterData = 26253?>
+  <?define msierrUninstallPerfCounterData = 26254?>
+  <?define msierrSMBFailedCreate = 26301?>
+  <?define msierrSMBFailedDrop = 26302?>
+  <?define msierrCERTFailedOpen = 26351?>
+  <?define msierrCERTFailedAdd = 26352?>
+  <?define msierrUSRFailedUserCreate = 26401?>
+  <?define msierrUSRFailedUserCreatePswd = 26402?>
+  <?define msierrUSRFailedUserGroupAdd = 26403?>
+  <?define msierrUSRFailedUserCreateExists = 26404?>
+  <?define msierrUSRFailedGrantLogonAsService = 26405?>
+  <?define msierrDependencyMissingDependencies = 26451?>
+  <?define msierrDependencyHasDependents = 26452?>
+  <?define msierrDotNetRuntimeRequired = 27000?>
+  <?define msierrComPlusCannotConnect = 28001?>
+  <?define msierrComPlusPartitionReadFailed = 28002?>
+  <?define msierrComPlusPartitionRoleReadFailed = 28003?>
+  <?define msierrComPlusUserInPartitionRoleReadFailed = 28004?>
+  <?define msierrComPlusPartitionUserReadFailed = 28005?>
+  <?define msierrComPlusApplicationReadFailed = 28006?>
+  <?define msierrComPlusApplicationRoleReadFailed = 28007?>
+  <?define msierrComPlusUserInApplicationRoleReadFailed = 28008?>
+  <?define msierrComPlusAssembliesReadFailed = 28009?>
+  <?define msierrComPlusSubscriptionReadFailed = 28010?>
+  <?define msierrComPlusPartitionDependency = 28011?>
+  <?define msierrComPlusPartitionNotFound = 28012?>
+  <?define msierrComPlusPartitionIdConflict = 28013?>
+  <?define msierrComPlusPartitionNameConflict = 28014?>
+  <?define msierrComPlusApplicationDependency = 28015?>
+  <?define msierrComPlusApplicationNotFound = 28016?>
+  <?define msierrComPlusApplicationIdConflict = 28017?>
+  <?define msierrComPlusApplicationNameConflict = 28018?>
+  <?define msierrComPlusApplicationRoleDependency = 28019?>
+  <?define msierrComPlusApplicationRoleNotFound = 28020?>
+  <?define msierrComPlusApplicationRoleConflict = 28021?>
+  <?define msierrComPlusAssemblyDependency = 28022?>
+  <?define msierrComPlusSubscriptionIdConflict = 28023?>
+  <?define msierrComPlusSubscriptionNameConflict = 28024?>
+  <?define msierrComPlusFailedLookupNames = 28025?>
+  <?define msierrMsmqCannotConnect = 28101?>
+</Include>
\ No newline at end of file
diff --git a/src/ext/ComPlus/wixlib/complus.wixproj b/src/ext/ComPlus/wixlib/complus.wixproj
new file mode 100644
index 00000000..ef792a13
--- /dev/null
+++ b/src/ext/ComPlus/wixlib/complus.wixproj
@@ -0,0 +1,26 @@
+<?xml version="1.0" encoding="utf-8"?>
+<!-- Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information. -->
+
+<Project Sdk="WixToolset.Sdk">
+
+  <PropertyGroup>
+    <OutputType>Library</OutputType>
+    <BindFiles>true</BindFiles>
+    <SuppressSpecificWarnings>1086</SuppressSpecificWarnings>
+  </PropertyGroup>
+
+  <ItemGroup>
+    <BindInputPaths Include="$(OutputPath)x86" BindName='x86' />
+    <BindInputPaths Include="$(OutputPath)x64" BindName='x64' />
+  </ItemGroup>
+
+  <ItemGroup>
+    <ProjectReference Include="..\ca\complusca.vcxproj" Properties="Platform=x86" ReferenceOutputAssembly="false" />
+    <ProjectReference Include="..\ca\complusca.vcxproj" Properties="Platform=x64" ReferenceOutputAssembly="false" />
+  </ItemGroup>
+
+  <ItemGroup>
+    <PackageReference Include="Nerdbank.GitVersioning" Version="3.3.37" PrivateAssets="All" />
+  </ItemGroup>
+
+</Project>
diff --git a/src/ext/ComPlus/wixlib/en-us.wxl b/src/ext/ComPlus/wixlib/en-us.wxl
new file mode 100644
index 00000000..8f6f38fc
--- /dev/null
+++ b/src/ext/ComPlus/wixlib/en-us.wxl
@@ -0,0 +1,71 @@
+<?xml version="1.0" encoding="utf-8"?>
+<!-- Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information. -->
+
+
+<WixLocalization Culture="en-us" xmlns="http://wixtoolset.org/schemas/v4/wxl">
+  <String Id="msierrComPlusCannotConnect" Overridable="yes">Cannot connect to the COM+ admin catalog.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusPartitionReadFailed" Overridable="yes">Failed to read COM+ partitions.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusPartitionRoleReadFailed" Overridable="yes">Failed to read COM+ partition roles.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusUserInPartitionRoleReadFailed" Overridable="yes">Failed to read COM+ users in partition roles.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusPartitionUserReadFailed" Overridable="yes">Failed to read COM+ partition users.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusApplicationReadFailed" Overridable="yes">Failed to read COM+ applications.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusApplicationRoleReadFailed" Overridable="yes">Failed to read COM+ application roles.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusUserInApplicationRoleReadFailed" Overridable="yes">Failed to read COM+ users in application roles.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusAssembliesReadFailed" Overridable="yes">Failed to read COM+ assemblies.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusSubscriptionReadFailed" Overridable="yes">Failed to read COM+ event subscriptions.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusPartitionDependency" Overridable="yes">Another entity is dependent on a COM+ partition that is not being installed.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusPartitionNotFound" Overridable="yes">The COM+ partition was not found.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusPartitionIdConflict" Overridable="yes">A COM+ partition with the same id already exists.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusPartitionNameConflict" Overridable="yes">A COM+ partition with the same name already exists.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusApplicationDependency" Overridable="yes">Another entity is dependent on a COM+ application that is not being installed.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusApplicationNotFound" Overridable="yes">The COM+ application was not found.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusApplicationIdConflict" Overridable="yes">A COM+ application with the same id already exists.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusApplicationNameConflict" Overridable="yes">A COM+ application with the same name already exists.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusApplicationRoleDependency" Overridable="yes">Another entity is dependent on a COM+ application role that is not being installed.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusApplicationRoleNotFound" Overridable="yes">The COM+ application role was not found.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusApplicationRoleConflict" Overridable="yes">A COM+ application role with the same name already exists.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusAssemblyDependency" Overridable="yes">Another entity is dependent on a COM+ assembly that is not being installed.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusSubscriptionIdConflict" Overridable="yes">A COM+ component event subscription with the same id already exists.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusSubscriptionNameConflict" Overridable="yes">A COM+ component event subscription with the same name already exists.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusFailedLookupNames" Overridable="yes">Failed to lookup user account names.  ([2]   [3]   [4]   [5])</String>
+
+  <String Id="ComPlusInstallExecute" Overridable="yes">Registering COM+ components</String>
+  <String Id="ComPlusUninstallExecute" Overridable="yes">Unregistering COM+ components</String>
+
+  <String Id="CreateComPlusPartitions" Overridable="yes">Creating COM+ partitions</String>
+  <String Id="CreateComPlusPartitionsTemplate" Overridable="yes">Partition: [1]</String>
+  <String Id="RemoveComPlusPartitions" Overridable="yes">Removing COM+ partitions</String>
+  <String Id="RemoveComPlusPartitionsTemplate" Overridable="yes">Partition: [1]</String>
+  <String Id="AddUsersToComPlusPartitionRoles" Overridable="yes">Adding users to COM+ partition roles</String>
+  <String Id="AddUsersToComPlusPartitionRolesTemplate" Overridable="yes">Role: [1]</String>
+  <String Id="RemoveUsersFromComPlusPartitionRoles" Overridable="yes">Removing users from COM+ partition roles</String>
+  <String Id="RemoveUsersFromComPlusPartitionRolesTemplate" Overridable="yes">Role: [1]</String>
+  <String Id="AddComPlusPartitionUsers" Overridable="yes">Setting default COM+ partitions for users</String>
+  <String Id="AddComPlusPartitionUsersTemplate" Overridable="yes">User: [1]</String>
+  <String Id="RemoveComPlusPartitionUsers" Overridable="yes">Removing default COM+ partitions for users</String>
+  <String Id="RemoveComPlusPartitionUsersTemplate" Overridable="yes">User: [1]</String>
+  <String Id="CreateComPlusApplications" Overridable="yes">Creating COM+ applications</String>
+  <String Id="CreateComPlusApplicationsTemplate" Overridable="yes">Application: [1]</String>
+  <String Id="RemoveComPlusApplications" Overridable="yes">Removing COM+ applications</String>
+  <String Id="RemoveComPlusApplicationsTemplate" Overridable="yes">Application: [1]</String>
+  <String Id="CreateComPlusApplicationRoles" Overridable="yes">Creating COM+ application roles</String>
+  <String Id="CreateComPlusApplicationRolesTemplate" Overridable="yes">Role: [1]</String>
+  <String Id="RemoveComPlusApplicationRoles" Overridable="yes">Removing COM+ application roles</String>
+  <String Id="RemoveComPlusApplicationRolesTemplate" Overridable="yes">Role: [1]</String>
+  <String Id="AddUsersToComPlusApplicationRoles" Overridable="yes">Adding users to COM+ application roles</String>
+  <String Id="AddUsersToComPlusApplicationRolesTemplate" Overridable="yes">User: [1]</String>
+  <String Id="RemoveUsersFromComPlusApplicationRoles" Overridable="yes">Removing users from COM+ application roles</String>
+  <String Id="RemoveUsersFromComPlusApplicationRolesTemplate" Overridable="yes">User: [1]</String>
+  <String Id="RegisterComPlusAssemblies" Overridable="yes">Registering COM+ components</String>
+  <String Id="RegisterComPlusAssembliesTemplate" Overridable="yes">DLL: [1]</String>
+  <String Id="UnregisterComPlusAssemblies" Overridable="yes">Unregistering COM+ components</String>
+  <String Id="UnregisterComPlusAssembliesTemplate" Overridable="yes">DLL: [1]</String>
+  <String Id="AddComPlusRoleAssignments" Overridable="yes">Assigning roles to COM+ components</String>
+  <String Id="AddComPlusRoleAssignmentsTemplate" Overridable="yes">Component: [1]</String>
+  <String Id="RemoveComPlusRoleAssignments" Overridable="yes">Removing role assignments from COM+ components</String>
+  <String Id="RemoveComPlusRoleAssignmentsTemplate" Overridable="yes">Component: [1]</String>
+  <String Id="CreateSubscriptionsComPlusComponents" Overridable="yes">Creating subscriptions for COM+ components</String>
+  <String Id="CreateSubscriptionsComPlusComponentsTemplate" Overridable="yes">Subscription: [1]</String>
+  <String Id="RemoveSubscriptionsComPlusComponents" Overridable="yes">Removing subscriptions for COM+ components</String>
+  <String Id="RemoveSubscriptionsComPlusComponentsTemplate" Overridable="yes">Subscription: [1]</String>
+</WixLocalization>
diff --git a/src/ext/ComPlus/wixlib/es-es.wxl b/src/ext/ComPlus/wixlib/es-es.wxl
new file mode 100644
index 00000000..5e7eba66
--- /dev/null
+++ b/src/ext/ComPlus/wixlib/es-es.wxl
@@ -0,0 +1,72 @@
+<?xml version="1.0" encoding="utf-8"?>
+<!-- Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information. -->
+
+
+<WixLocalization Culture="es-es" xmlns="http://wixtoolset.org/schemas/v4/wxl">
+  <String Id="msierrComPlusCannotConnect" Overridable="yes">No se puede conectar al catálogo de administración de COM+.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusPartitionReadFailed" Overridable="yes">Falla al leer las particiones COM+.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusPartitionRoleReadFailed" Overridable="yes">Falla al leer los roles de las particiones COM+.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusUserInPartitionRoleReadFailed" Overridable="yes">Falla al leer los usuario en los roles de las particiones COM+.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusPartitionUserReadFailed" Overridable="yes">Falla al leer los usuario de las particiones COM+.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusApplicationReadFailed" Overridable="yes">Falla al leer las aplicaciones COM+.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusApplicationRoleReadFailed" Overridable="yes">Falla al leer los roles de las aplicaciones COM+.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusUserInApplicationRoleReadFailed" Overridable="yes">Falla al leer los usuario de las aplicaciones COM+.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusAssembliesReadFailed" Overridable="yes">Falla al leer los ensamblados COM+.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusSubscriptionReadFailed" Overridable="yes">Falla al leer las suscripciones a eventos COM+.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusPartitionDependency" Overridable="yes">Otra entidad es dependiente de una partición COM+ que no está siendo instalada.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusPartitionNotFound" Overridable="yes">La partición COM+ no pudo ser encontrada.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusPartitionIdConflict" Overridable="yes">Ya existe otra partición COM+ con el mismo id.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusPartitionNameConflict" Overridable="yes">Ya existe otra partición COM+ con el mismo nombre.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusApplicationDependency" Overridable="yes">Otra entidad es dependiente de una aplicación COM+ que no está siendo instalada.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusApplicationNotFound" Overridable="yes">La aplicación COM+ no pudo ser encontrada.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusApplicationIdConflict" Overridable="yes">Ya existe otra aplicación COM+ con el mismo id.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusApplicationNameConflict" Overridable="yes">Ya existe otra aplicación COM+ con el mismo nombre.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusApplicationRoleDependency" Overridable="yes">Otra entidad es dependiente de un rol de aplicación COM+ que no está siendo instalado.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusApplicationRoleNotFound" Overridable="yes">El rol de aplicación COM+ no pudo ser encontrado.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusApplicationRoleConflict" Overridable="yes">Ya existe otro rol de aplicación COM+ con el mismo nombre.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusAssemblyDependency" Overridable="yes">Otra entidad es dependiente de un ensamblado COM+ que no está siendo instalado.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusSubscriptionIdConflict" Overridable="yes">Ya existe otra suscripción de evento al componente COM+ con el mismo id.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusSubscriptionNameConflict" Overridable="yes">Ya existe otra suscripción de evento al componente COM+ con el mismo nombre.  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusFailedLookupNames" Overridable="yes">Falla el la búsqueda de los nombres de usuario.  ([2]   [3]   [4]   [5])</String>
+
+  <String Id="ComPlusInstallExecute" Overridable="yes">Registrando componentes COM+</String>
+  <String Id="ComPlusUninstallExecute" Overridable="yes">Anular el registro de componentes COM+</String>
+
+  <String Id="CreateComPlusPartitions" Overridable="yes">Creando particiones COM+</String>
+  <String Id="CreateComPlusPartitionsTemplate" Overridable="yes">Particiones: [1]</String>
+  <String Id="RemoveComPlusPartitions" Overridable="yes">Borrando particiones COM+</String>
+  <String Id="RemoveComPlusPartitionsTemplate" Overridable="yes">Particiones: [1]</String>
+  <String Id="AddUsersToComPlusPartitionRoles" Overridable="yes">Agregando usuarios a los roles de las particiones COM+</String>
+  <String Id="AddUsersToComPlusPartitionRolesTemplate" Overridable="yes">Rol: [1]</String>
+  <String Id="RemoveUsersFromComPlusPartitionRoles" Overridable="yes">Borrando usuarios a los roles de las particiones COM+</String>
+  <String Id="RemoveUsersFromComPlusPartitionRolesTemplate" Overridable="yes">Rol: [1]</String>
+  <String Id="AddComPlusPartitionUsers" Overridable="yes">Ajustando partición COM+ por omisión para los usuarios</String>
+  <String Id="AddComPlusPartitionUsersTemplate" Overridable="yes">Usuario: [1]</String>
+  <String Id="RemoveComPlusPartitionUsers" Overridable="yes">Borrando partición COM+ por omisión para los usuarios</String>
+  <String Id="RemoveComPlusPartitionUsersTemplate" Overridable="yes">Usuario: [1]</String>
+  <String Id="CreateComPlusApplications" Overridable="yes">Creando aplicación COM+</String>
+  <String Id="CreateComPlusApplicationsTemplate" Overridable="yes">Aplicación: [1]</String>
+  <String Id="RemoveComPlusApplications" Overridable="yes">Borrando aplicación COM+</String>
+  <String Id="RemoveComPlusApplicationsTemplate" Overridable="yes">Aplicación: [1]</String>
+  <String Id="CreateComPlusApplicationRoles" Overridable="yes">Creando roles de aplicación COM+</String>
+  <String Id="CreateComPlusApplicationRolesTemplate" Overridable="yes">Rol: [1]</String>
+  <String Id="RemoveComPlusApplicationRoles" Overridable="yes">Borrando roles de aplicación COM+</String>
+  <String Id="RemoveComPlusApplicationRolesTemplate" Overridable="yes">Rol: [1]</String>
+  <String Id="AddUsersToComPlusApplicationRoles" Overridable="yes">Agregando usuarios a los roles de aplicación COM+</String>
+  <String Id="AddUsersToComPlusApplicationRolesTemplate" Overridable="yes">Usuario: [1]</String>
+  <String Id="RemoveUsersFromComPlusApplicationRoles" Overridable="yes">Borrando usuarios a los roles de aplicación COM</String>
+  <String Id="RemoveUsersFromComPlusApplicationRolesTemplate" Overridable="yes">Usuario: [1]</String>
+  <String Id="RegisterComPlusAssemblies" Overridable="yes">Registrando componente COM+</String>
+  <String Id="RegisterComPlusAssembliesTemplate" Overridable="yes">DLL: [1]</String>
+  <String Id="UnregisterComPlusAssemblies" Overridable="yes">Anulando el registro de componentes COM+</String>
+  <String Id="UnregisterComPlusAssembliesTemplate" Overridable="yes">DLL: [1]</String>
+  <String Id="AddComPlusRoleAssignments" Overridable="yes">Asignando roles a los componentes COM+</String>
+  <String Id="AddComPlusRoleAssignmentsTemplate" Overridable="yes">Componente: [1]</String>
+  <String Id="RemoveComPlusRoleAssignments" Overridable="yes">Borrando asignación de roles a los componentes COM+</String>
+  <String Id="RemoveComPlusRoleAssignmentsTemplate" Overridable="yes">Componente: [1]</String>
+  <String Id="CreateSubscriptionsComPlusComponents" Overridable="yes">Creando suscripción a componentes COM+</String>
+  <String Id="CreateSubscriptionsComPlusComponentsTemplate" Overridable="yes">Suscripción: [1]</String>
+  <String Id="RemoveSubscriptionsComPlusComponents" Overridable="yes">Borrando suscripción a componentes COM+</String>
+  <String Id="RemoveSubscriptionsComPlusComponentsTemplate" Overridable="yes">Suscripción: [1]</String>
+</WixLocalization>
+
diff --git a/src/ext/ComPlus/wixlib/ja-jp.wxl b/src/ext/ComPlus/wixlib/ja-jp.wxl
new file mode 100644
index 00000000..03b2cf1c
--- /dev/null
+++ b/src/ext/ComPlus/wixlib/ja-jp.wxl
@@ -0,0 +1,71 @@
+<?xml version="1.0" encoding="utf-8"?>
+<!-- Copyright (c) .NET Foundation and contributors. All rights reserved. Licensed under the Microsoft Reciprocal License. See LICENSE.TXT file in the project root for full license information. -->
+
+
+<WixLocalization Culture="ja-jp" xmlns="http://wixtoolset.org/schemas/v4/wxl">
+  <String Id="msierrComPlusCannotConnect" Overridable="yes">COM+ 管理カタログへ接続できません。  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusPartitionReadFailed" Overridable="yes">COM+ パーティションの読み込みに失敗しました。  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusPartitionRoleReadFailed" Overridable="yes">COM+ パーティション役割の読み込みに失敗しました。  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusUserInPartitionRoleReadFailed" Overridable="yes">COM+ パーティション役割内ユーザーの読み込みに失敗しました。  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusPartitionUserReadFailed" Overridable="yes">COM+ パーティション ユーザーの読み込みに失敗しました。  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusApplicationReadFailed" Overridable="yes">COM+ アプリケーションの読み込みに失敗しました。  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusApplicationRoleReadFailed" Overridable="yes">COM+ アプリケーション役割の読み込みに失敗しました。  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusUserInApplicationRoleReadFailed" Overridable="yes">COM+ アプリケーション役割内ユーザーの読み込みに失敗しました。  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusAssembliesReadFailed" Overridable="yes">COM+ アセンブリの読み込みに失敗しました。  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusSubscriptionReadFailed" Overridable="yes">COM+ イベント登録の読み込みに失敗しました。  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusPartitionDependency" Overridable="yes">他のエンティティはインストールされない COM+ パーティションに依存します。  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusPartitionNotFound" Overridable="yes">COM+ パーティションは見つかりません  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusPartitionIdConflict" Overridable="yes">同一 ID を持つ COM+ パーティションが既に存在します。  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusPartitionNameConflict" Overridable="yes">同一名称を持つ COM+ パーティションが既に存在します。  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusApplicationDependency" Overridable="yes">他のエンティティはインストールされない COM+ アプリケーションに依存します。  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusApplicationNotFound" Overridable="yes">COM+ アプリケーションは見つかりません。  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusApplicationIdConflict" Overridable="yes">同一 ID を持つ COM+ アプリケーションが既に存在します。  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusApplicationNameConflict" Overridable="yes">同一名称を持つ COM+ アプリケーションが既に存在します。  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusApplicationRoleDependency" Overridable="yes">他のエンティティはインストールされない COM+ アプリケーション役割に依存します。  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusApplicationRoleNotFound" Overridable="yes">COM+ アプリケーション役割は見つかりません。  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusApplicationRoleConflict" Overridable="yes">同一名称を持つ COM+ アプリケーション役割が既に存在します。  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusAssemblyDependency" Overridable="yes">他のエンティティはインストールされない COM+ アセンブリに依存します。  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusSubscriptionIdConflict" Overridable="yes">同一 ID を持つ COM+ コンポーネントのイベント登録が既に存在します。  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusSubscriptionNameConflict" Overridable="yes">同一名称を持つ COM+ コンポーネントのイベント登録が既に存在します。  ([2]   [3]   [4]   [5])</String>
+  <String Id="msierrComPlusFailedLookupNames" Overridable="yes">ユーザー アカウント名の照合に失敗しました。  ([2]   [3]   [4]   [5])</String>
+
+  <String Id="ComPlusInstallExecute" Overridable="yes">COM+ コンポーネントを登録しています</String>
+  <String Id="ComPlusUninstallExecute" Overridable="yes">COM+ コンポーネント登録を解除しています</String>
+
+  <String Id="CreateComPlusPartitions" Overridable="yes">COM+ パーティションを作成しています</String>
+  <String Id="CreateComPlusPartitionsTemplate" Overridable="yes">パーティション： [1]</String>
+  <String Id="RemoveComPlusPartitions" Overridable="yes">COM+ パーティションを削除しています</String>
+  <String Id="RemoveComPlusPartitionsTemplate" Overridable="yes">パーティション： [1]</String>
+  <String Id="AddUsersToComPlusPartitionRoles" Overridable="yes">ユーザーを COM+ パーティション役割に追加しています</String>
+  <String Id="AddUsersToComPlusPartitionRolesTemplate" Overridable="yes">役割： [1]</String>
+  <String Id="RemoveUsersFromComPlusPartitionRoles" Overridable="yes">ユーザを COM+ パーティション役割より削除しています</String>
+  <String Id="RemoveUsersFromComPlusPartitionRolesTemplate" Overridable="yes">役割： [1]</String>
+  <String Id="AddComPlusPartitionUsers" Overridable="yes">ユーザーのデフォルト COM+ 役割を設定しています</String>
+  <String Id="AddComPlusPartitionUsersTemplate" Overridable="yes">ユーザー： [1]</String>
+  <String Id="RemoveComPlusPartitionUsers" Overridable="yes">ユーザーのデフォルト COM+ パーティション役割を削除しています</String>
+  <String Id="RemoveComPlusPartitionUsersTemplate" Overridable="yes">ユーザー： [1]</String>
+  <String Id="CreateComPlusApplications" Overridable="yes">COM+ アプリケーションを作成しています</String>
+  <String Id="CreateComPlusApplicationsTemplate" Overridable="yes">アプリケーション： [1]</String>
+  <String Id="RemoveComPlusApplications" Overridable="yes">COM+ アプリケーションを削除しています</String>
+  <String Id="RemoveComPlusApplicationsTemplate" Overridable="yes">アプリケーション： [1]</String>
+  <String Id="CreateComPlusApplicationRoles" Overridable="yes">COM+ アプリケーション役割を作成しています</String>
+  <String Id="CreateComPlusApplicationRolesTemplate" Overridable="yes">役割： [1]</String>
+  <String Id="RemoveComPlusApplicationRoles" Overridable="yes">COM+ アプリケーション役割を削除しています</String>
+  <String Id="RemoveComPlusApplicationRolesTemplate" Overridable="yes">役割： [1]</String>
+  <String Id="AddUsersToComPlusApplicationRoles" Overridable="yes">ユーザーを COM+ アプリケーション役割に追加しています</String>
+  <String Id="AddUsersToComPlusApplicationRolesTemplate" Overridable="yes">ユーザー： [1]</String>
+  <String Id="RemoveUsersFromComPlusApplicationRoles" Overridable="yes">ユーザーを COM+ アプリケーション役割より削除しています</String>
+  <String Id="RemoveUsersFromComPlusApplicationRolesTemplate" Overridable="yes">ユーザー： [1]</String>
+  <String Id="RegisterComPlusAssemblies" Overridable="yes">COM+ コンポーネントを登録しています</String>
+  <String Id="RegisterComPlusAssembliesTemplate" Overridable="yes">DLL: [1]</String>
+  <String Id="UnregisterComPlusAssemblies" Overridable="yes">COM+ コンポーネント登録を解除しています</String>
+  <String Id="UnregisterComPlusAssembliesTemplate" Overridable="yes">DLL: [1]</String>
+  <String Id="AddComPlusRoleAssignments" Overridable="yes">COM+ コンポーネントへ役割を割り当てています</String>
+  <String Id="AddComPlusRoleAssignmentsTemplate" Overridable="yes">コンポーネント： [1]</String>
+  <String Id="RemoveComPlusRoleAssignments" Overridable="yes">COM+ コンポーネントより役割割当を削除しています</String>
+  <String Id="RemoveComPlusRoleAssignmentsTemplate" Overridable="yes">コンポーネント： [1]</String>
+  <String Id="CreateSubscriptionsComPlusComponents" Overridable="yes">COM+ コンポーネント用登録を作成しています</String>
+  <String Id="CreateSubscriptionsComPlusComponentsTemplate" Overridable="yes">登録： [1]</String>
+  <String Id="RemoveSubscriptionsComPlusComponents" Overridable="yes">COM+ コンポーネント用登録を削除しています</String>
+  <String Id="RemoveSubscriptionsComPlusComponentsTemplate" Overridable="yes">登録： [1]</String>
+</WixLocalization>