Complete Classic COM infrastructure support

.github/workflows/build.yml

@@ -51,7 +51,7 @@ jobs:
           if ($result.eligible_interfaces -ne 7929) {
             throw "Classic COM census denominator changed: $($result.eligible_interfaces)"
           }
-          if ($result.complete_interfaces -lt 5560) {
+          if ($result.complete_interfaces -lt 5567) {
             throw "Classic COM complete coverage regressed: $($result.complete_interfaces)"
           }
           if ($result.coverage_percent -lt 70.0) {

bindings/js/__test__/index.spec.ts

@@ -3,7 +3,7 @@
 
 import test from 'ava'
 import { spawn, spawnSync } from 'node:child_process'
-import { existsSync } from 'node:fs'
+import { existsSync, readFileSync } from 'node:fs'
 import { createRequire } from 'node:module'
 import { resolve } from 'node:path'
 import { fileURLToPath } from 'node:url'
@@ -113,12 +113,14 @@ test('package facades exactly partition native exports', (t) => {
   const expectedWinrt = nativeKeys.filter((name) => !name.startsWith('DynCom') && name !== 'initializeCom')
   const safeComNames = new Set([
     'DynComDispatchParams',
+    'DynComAllocation',
     'DynComExcepInfo',
     'DynComNativeStruct',
     'DynComNativeStructArray',
     'DynComNativeUnion',
     'DynComPropVariant',
     'DynComSafeArray',
+    'DynComStatStg',
     'DynComVariant',
     'DynWinRtValue',
     'WinGuid',
@@ -157,6 +159,15 @@ test('package facades exactly partition native exports', (t) => {
   }
 })
 
+test('COM allocation declaration is opaque and non-constructible', (t) => {
+  const declaration = readFileSync(
+    fileURLToPath(new URL('../dist/com.d.ts', import.meta.url)),
+    'utf8',
+  )
+  t.regex(declaration, /export interface DynComAllocation/)
+  t.notRegex(declaration, /export \{[^}]*DynComAllocation[^}]*\} from/)
+})
+
 test('WinRT root facade exposes usable native primitives', (t) => {
   t.truthy(winrtRuntime.DynWinRtType.i32())
   t.is(winrtRuntime.DynWinRtValue.i32(1).toNumber(), 1)

bindings/js/scripts/generate-entrypoints.mjs

@@ -18,19 +18,34 @@ if (nativeExports.length === 0) {
 
 const comExports = new Set([
   'DynComDispatchParams',
+  'DynComAllocation',
   'DynComExcepInfo',
   'DynComNativeStruct',
   'DynComNativeStructArray',
   'DynComNativeUnion',
   'DynComPropVariant',
   'DynComSafeArray',
+  'DynComStatStg',
   'DynComVariant',
   'DynWinRtValue',
   'WinGuid',
   'initializeCom',
 ])
 const comTypeAliases = ['DynWinRTValue', 'WinGUID']
-const comTypeExports = [...comExports, ...comTypeAliases, 'DynComSafeArrayBound']
+const opaqueComTypes = new Set(['DynComAllocation'])
+const comTypeExports = [
+  ...[...comExports].filter((name) => !opaqueComTypes.has(name)),
+  ...comTypeAliases,
+  'DynComSafeArrayBound',
+]
+const opaqueComDeclarations = [
+  'declare const dynComAllocationBrand: unique symbol',
+  'export interface DynComAllocation {',
+  '  readonly [dynComAllocationBrand]: never',
+  '  readonly released: boolean',
+  '  release(): void',
+  '}',
+]
 const comUnsafeExports = new Set([
   ...comExports,
   'DynCom',
@@ -42,7 +57,11 @@ const comUnsafeExports = new Set([
   'DynComUnsafe',
   'DynComUnsafeInterface',
 ])
-const comUnsafeTypeExports = [...comUnsafeExports, ...comTypeAliases, 'DynComSafeArrayBound']
+const comUnsafeTypeExports = [
+  ...[...comUnsafeExports].filter((name) => !opaqueComTypes.has(name)),
+  ...comTypeAliases,
+  'DynComSafeArrayBound',
+]
 
 writeFacade(
   'winrt',
@@ -53,15 +72,23 @@ writeFacade(
   nativeExports.filter((name) => comExports.has(name)),
   comTypeExports,
   comExports,
+  opaqueComDeclarations,
 )
 writeFacade(
   'com-unsafe',
   nativeExports.filter((name) => comUnsafeExports.has(name)),
   comUnsafeTypeExports,
   comUnsafeExports,
+  opaqueComDeclarations,
 )
 
-function writeFacade(name, exports, typeExports = exports, requiredExports = []) {
+function writeFacade(
+  name,
+  exports,
+  typeExports = exports,
+  requiredExports = [],
+  extraTypeDeclarations = [],
+) {
   const missing = [...requiredExports].filter((value) => !exports.includes(value))
   if (missing.length > 0) {
     throw new Error(`Missing required ${name} exports: ${missing.join(', ')}`)
@@ -77,6 +104,7 @@ function writeFacade(name, exports, typeExports = exports, requiredExports = [])
   const dts = [
     '// Generated by scripts/generate-entrypoints.mjs - do not edit',
     `export { ${typeExports.join(', ')} } from './index.js'`,
+    ...extraTypeDeclarations,
     '',
   ].join('\n')