Add 'projects/rocr-runtime/' from commit '72061a9024139fa0a99f73f9d3d4deb275670095'

git-subtree-dir: projects/rocr-runtime git-subtree-mainline: ad0fb25ed5 git-subtree-split: 72061a9024
2025-07-22 22:52:49 +00:00
parent ad0fb25ed5 72061a9024
commit d8cba83d42
645 changed files with 322673 additions and 0 deletions
@@ -0,0 +1,142 @@
+/*
+ * Copyright (C) 2019 Advanced Micro Devices, Inc. All Rights Reserved.
+ *
+ * Permission is hereby granted, free of charge, to any person obtaining a
+ * copy of this software and associated documentation files (the "Software"),
+ * to deal in the Software without restriction, including without limitation
+ * the rights to use, copy, modify, merge, publish, distribute, sublicense,
+ * and/or sell copies of the Software, and to permit persons to whom the
+ * Software is furnished to do so, subject to the following conditions:
+ *
+ * The above copyright notice and this permission notice shall be included in
+ * all copies or substantial portions of the Software.
+ *
+ * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+ * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+ * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
+ * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR
+ * OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,
+ * ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
+ * OTHER DEALINGS IN THE SOFTWARE.
+ *
+ */
+
+#include "KFDHWSTest.hpp"
+
+void KFDHWSTest::SetUp() {
+    ROUTINE_START
+
+    KFDBaseComponentTest::SetUp();
+
+    ROUTINE_END
+}
+
+void KFDHWSTest::TearDown() {
+    ROUTINE_START
+
+    KFDBaseComponentTest::TearDown();
+
+    ROUTINE_END
+}
+
+void KFDHWSTest::RunTest_GPU(int gpuNode, unsigned nProcesses, unsigned nQueues, unsigned nLoops) {
+
+    int gpuIndex = m_NodeInfo.HsaGPUindexFromGpuNode(gpuNode);
+
+    unsigned q, l;
+    bool timeout = false;
+
+    /* Fork the child processes for gpuNode */
+    ForkChildProcesses(gpuNode, nProcesses);
+
+    // Create queues
+    PM4Queue *queues = new PM4Queue[nQueues];
+    for (q = 0; q < nQueues; q++)
+        ASSERT_SUCCESS_GPU(queues[q].Create(gpuNode), gpuNode);
+
+    // Create dispatch pointers. Each loop iteration creates fresh dispatches
+    Dispatch **dispatch = new Dispatch*[nQueues];
+    for (q = 0; q < nQueues; q++)
+        dispatch[q] = NULL;
+
+    // Logging: Each process prints its index after each loop iteration, all in one line.
+    std::ostream &log = LOG() << std::dec << "gpuNode: " << gpuNode << " Process: " << m_ProcessIndex[gpuIndex] << " starting." << std::endl;
+
+    // Run work on all queues
+    HsaMemoryBuffer isaBuffer(PAGE_SIZE, gpuNode, true/*zero*/, false/*local*/, true/*exec*/);
+
+    Assembler* m_pAsm;
+    m_pAsm = GetAssemblerFromNodeId(gpuNode);
+    ASSERT_NOTNULL_GPU(m_pAsm, gpuNode);
+
+    ASSERT_SUCCESS(m_pAsm->RunAssembleBuf(NoopIsa, isaBuffer.As<char*>()));
+
+    for (l = 0; l < nLoops; l++) {
+        for (q = 0; q < nQueues; q++) {
+            if (dispatch[q])
+                delete dispatch[q];
+            dispatch[q] = new Dispatch(isaBuffer);
+            dispatch[q]->SetArgs(NULL, NULL);
+            dispatch[q]->SetDim(1, 1, 1);
+            dispatch[q]->Submit(queues[q]);
+        }
+        for (q = 0; q < nQueues; q++) {
+            timeout = dispatch[q]->SyncWithStatus(g_TestTimeOut);
+            if (timeout)
+                goto timeout;
+        }
+        log << m_ProcessIndex[gpuIndex];
+    }
+
+timeout:
+    log << std::endl;
+    if (timeout) {
+        WARN() << "gpuNode: " << gpuNode << " Process: " <<  m_ProcessIndex[gpuIndex] << " timeout." << std::endl;
+    } else {
+        LOG() << "gpuNode: " << gpuNode << " Process " << m_ProcessIndex[gpuIndex] << " done. Waiting ..." << std::endl;
+
+        // Wait here before destroying queues. If another process' queues
+        // are soft-hanging, destroying queues can resolve the soft-hang
+        // by changing the run list. Make sure the other process's
+        // dispatches have a chance to time out first.
+        Delay(g_TestTimeOut+1000);
+    }
+
+    // Destroy queues and dispatches. Destroying the queues first
+    // ensures that the memory allocated by the Dispatch is no longer
+    // accessed by the GPU.
+    LOG() << "gpuNode: " << gpuNode << " Process " << m_ProcessIndex[gpuIndex] << " cleaning up." << std::endl;
+    for (q = 0; q < nQueues; q++) {
+        EXPECT_SUCCESS_GPU(queues[q].Destroy(), gpuNode);
+        if (dispatch[q])
+            delete dispatch[q];
+    }
+    delete[] queues;
+    delete[] dispatch;
+
+    // This is after all the cleanup to avoid leaving any garbage
+    // behind, but before WaitChildProcesses to ensure a child process
+    // with a timeout exits with an error that can be detected by the
+    // parent.
+    ASSERT_FALSE(timeout);
+
+    WaitChildProcesses(gpuNode);
+
+}
+
+void RunTest(KFDTEST_PARAMETERS* pTestParamters) {
+
+    int gpuNode = pTestParamters->gpuNode;
+    KFDHWSTest* pKKFDHWSTest = (KFDHWSTest*)pTestParamters->pTestObject;
+
+    pKKFDHWSTest->RunTest_GPU(gpuNode, 3, 13, 40);
+}
+
+TEST_F(KFDHWSTest, MultiProcessOversubscribed) {
+    TEST_REQUIRE_ENV_CAPABILITIES(ENVCAPS_64BITLINUX);
+    TEST_START(TESTPROFILE_RUNALL);
+
+    ASSERT_SUCCESS(KFDTest_Launch(RunTest));
+
+    TEST_END
+}