Allow checking capabilities in specific stages (#7375)

This allows checking capabilities in any stage, needed specifically for
the hlsl_2018 capability which is defined for sm_5_1 and above. Stage
specific capabilities such as cs_5_1 would not find this in any stage
other than compute, so we need to restrict the check to only desired
stages.

6 files changed, 88 insertions, 7 deletions

diff --git a/source/slang/slang-capability.cpp b/source/slang/slang-capability.cpp
index 1eb0cae31..a2fef9f8a 100644
--- a/source/slang/slang-capability.cpp
+++ b/source/slang/slang-capability.cpp
@@ -718,17 +718,17 @@ bool CapabilityTargetSet::tryJoin(const CapabilityTargetSets& other)
     return true;
 }
 
-void CapabilitySet::join(const CapabilitySet& other)
+CapabilitySet& CapabilitySet::join(const CapabilitySet& other)
 {
     if (this->isEmpty() || other.isInvalid())
     {
         *this = other;
-        return;
+        return *this;
     }
     if (this->isInvalid())
-        return;
+        return *this;
     if (other.isEmpty())
-        return;
+        return *this;
 
     List<CapabilityAtom> destroySet;
     destroySet.reserve(this->m_targetSets.getCount());
@@ -746,6 +746,7 @@ void CapabilitySet::join(const CapabilitySet& other)
     // join made a invalid CapabilitySet
     if (this->m_targetSets.getCount() == 0)
         this->m_targetSets[CapabilityAtom::Invalid].target = CapabilityAtom::Invalid;
+    return *this;
 }
 
 static uint32_t _calcAtomListDifferenceScore(
diff --git a/source/slang/slang-capability.h b/source/slang/slang-capability.h
index 7c429d825..4bf0704a0 100644
--- a/source/slang/slang-capability.h
+++ b/source/slang/slang-capability.h
@@ -157,7 +157,7 @@ public:
     /// Join two capability sets to form ('this' & 'other').
     /// Destroy incompatible targets/sets apart of 'this' between ('this' & 'other').
     /// `this` may be made invalid if other is fully disjoint.
-    void join(const CapabilitySet& other);
+    CapabilitySet& join(const CapabilitySet& other);
 
     /// Join two capability sets to form ('this' & 'other').
     /// If a target/set has an incompatible atom, do not destroy the target/set.
diff --git a/source/slang/slang-compiler.cpp b/source/slang/slang-compiler.cpp
index 8cb50c1e9..4ba937992 100644
--- a/source/slang/slang-compiler.cpp
+++ b/source/slang/slang-compiler.cpp
@@ -476,6 +476,49 @@ Stage getStageFromAtom(CapabilityAtom atom)
     }
 }
 
+CapabilityAtom getAtomFromStage(Stage stage)
+{
+    // Convert Slang::Stage to CapabilityAtom.
+    // Note that capabilities do not share the same values as Slang::Stage
+    // and must be explicitly converted.
+    switch (stage)
+    {
+    case Stage::Compute:
+        return CapabilityAtom::compute;
+    case Stage::Vertex:
+        return CapabilityAtom::vertex;
+    case Stage::Fragment:
+        return CapabilityAtom::fragment;
+    case Stage::Geometry:
+        return CapabilityAtom::geometry;
+    case Stage::Hull:
+        return CapabilityAtom::hull;
+    case Stage::Domain:
+        return CapabilityAtom::domain;
+    case Stage::Mesh:
+        return CapabilityAtom::_mesh;
+    case Stage::Amplification:
+        return CapabilityAtom::_amplification;
+    case Stage::RayGeneration:
+        return CapabilityAtom::_raygen;
+    case Stage::AnyHit:
+        return CapabilityAtom::_anyhit;
+    case Stage::ClosestHit:
+        return CapabilityAtom::_closesthit;
+    case Stage::Miss:
+        return CapabilityAtom::_miss;
+    case Stage::Intersection:
+        return CapabilityAtom::_intersection;
+    case Stage::Callable:
+        return CapabilityAtom::_callable;
+    case Stage::Dispatch:
+        return CapabilityAtom::dispatch;
+    default:
+        SLANG_UNEXPECTED("unknown stage");
+        UNREACHABLE_RETURN(CapabilityAtom::Invalid);
+    }
+}
+
 SlangResult checkExternalCompilerSupport(Session* session, PassThroughMode passThrough)
 {
     // Check if the type is supported on this compile
diff --git a/source/slang/slang-emit-hlsl.cpp b/source/slang/slang-emit-hlsl.cpp
index ba167676a..b022a2db9 100644
--- a/source/slang/slang-emit-hlsl.cpp
+++ b/source/slang/slang-emit-hlsl.cpp
@@ -785,6 +785,29 @@ bool HLSLSourceEmitter::tryEmitInstStmtImpl(IRInst* inst)
     }
 }
 
+static bool isTargetHLSL2018(HLSLSourceEmitter* emitter, CapabilitySet targetCaps, Stage stage)
+{
+    auto stageAtom = getAtomFromStage(stage);
+
+    // Cache the result of this function for easier lookup.
+    auto result = emitter->getCachedCapability(stageAtom);
+    if (result)
+        return *result;
+
+    // Here we check for presence of the `hlsl_2018` capability for the
+    // current target+stage.
+    auto capabilitySetForStageOfEntryPoint = CapabilitySet(CapabilityName(stageAtom));
+    auto hlsl2018CapabilitySet =
+        CapabilitySet(CapabilityName::hlsl_2018).join(capabilitySetForStageOfEntryPoint);
+    if (targetCaps.join(capabilitySetForStageOfEntryPoint).implies(hlsl2018CapabilitySet))
+    {
+        emitter->addCachedCapability(stageAtom, false);
+        return false;
+    }
+    emitter->addCachedCapability(stageAtom, true);
+    return true;
+}
+
 bool HLSLSourceEmitter::tryEmitInstExprImpl(IRInst* inst, const EmitOpInfo& inOuterPrec)
 {
     switch (inst->getOp())
@@ -827,7 +850,7 @@ bool HLSLSourceEmitter::tryEmitInstExprImpl(IRInst* inst, const EmitOpInfo& inOu
             if (targetProfile.getVersion() < ProfileVersion::DX_6_0)
                 return false;
             auto targetCaps = getTargetReq()->getTargetCaps();
-            if (targetCaps.implies(CapabilityAtom::hlsl_2018))
+            if (!isTargetHLSL2018(this, targetCaps, m_entryPointStage))
                 return false;
 
             if (as<IRBasicType>(inst->getDataType()))
@@ -855,7 +878,7 @@ bool HLSLSourceEmitter::tryEmitInstExprImpl(IRInst* inst, const EmitOpInfo& inOu
             if (targetProfile.getVersion() < ProfileVersion::DX_6_0)
                 return false;
             auto targetCaps = getTargetReq()->getTargetCaps();
-            if (targetCaps.implies(CapabilityAtom::hlsl_2018))
+            if (!isTargetHLSL2018(this, targetCaps, m_entryPointStage))
                 return false;
 
             if (as<IRBasicType>(inst->getDataType()))
diff --git a/source/slang/slang-emit-hlsl.h b/source/slang/slang-emit-hlsl.h
index 28319f93a..ddd72c8cc 100644
--- a/source/slang/slang-emit-hlsl.h
+++ b/source/slang/slang-emit-hlsl.h
@@ -26,9 +26,21 @@ public:
 
     virtual RefObject* getExtensionTracker() SLANG_OVERRIDE { return m_extensionTracker; }
 
+    const bool* getCachedCapability(CapabilityAtom stage) const
+    {
+        return m_capabilityCache.tryGetValue(stage);
+    }
+    void addCachedCapability(CapabilityAtom stage, bool value)
+    {
+        m_capabilityCache.addIfNotExists(stage, value);
+    }
+
 protected:
     RefPtr<HLSLExtensionTracker> m_extensionTracker;
 
+    // Allow caching of capability results for easier lookup.
+    Dictionary<CapabilityAtom, bool> m_capabilityCache{};
+
     virtual void emitLayoutSemanticsImpl(
         IRInst* inst,
         char const* uniformSemanticSpelling,
diff --git a/source/slang/slang-profile.h b/source/slang/slang-profile.h
index 9bd905c37..ca7b8b2ae 100644
--- a/source/slang/slang-profile.h
+++ b/source/slang/slang-profile.h
@@ -128,6 +128,8 @@ Stage findStageByName(String const& name);
 UnownedStringSlice getStageText(Stage stage);
 
 Stage getStageFromAtom(CapabilityAtom atom);
+CapabilityAtom getAtomFromStage(Stage stage);
+
 } // namespace Slang
 
 #endif