From 2211f5f559b148bc5c422f365eabc8f32dd41c47 Mon Sep 17 00:00:00 2001
From: foreman <dl.constructicon@amd.com>
Date: Wed, 9 Aug 2017 16:24:27 -0400
Subject: [PATCH] P4 to Git Change 1445200 by skeely@skeely_HSA_linux on
 2017/08/09 15:59:56

	SWDEV-124331 - Follow HSA loader spec.

	Extend lifetime of loaded ELF and code reader to the lifetime of the loaded executable.

Affected files ...

... //depot/stg/opencl/drivers/opencl/runtime/device/rocm/rocprogram.cpp#69 edit
... //depot/stg/opencl/drivers/opencl/runtime/device/rocm/rocprogram.hpp#27 edit
---
 rocclr/runtime/device/rocm/rocprogram.cpp | 90 ++++++++++++-----------
 rocclr/runtime/device/rocm/rocprogram.hpp |  3 +-
 2 files changed, 50 insertions(+), 43 deletions(-)

diff --git a/rocclr/runtime/device/rocm/rocprogram.cpp b/rocclr/runtime/device/rocm/rocprogram.cpp
index 79c7f3a0b9..fa289c54be 100644
--- a/rocclr/runtime/device/rocm/rocprogram.cpp
+++ b/rocclr/runtime/device/rocm/rocprogram.cpp
@@ -75,6 +75,9 @@ HSAILProgram::~HSAILProgram() {
   if (hsaExecutable_.handle != 0) {
     hsa_executable_destroy(hsaExecutable_);
   }
+  if (hsaCodeObjectReader_.handle != 0) {
+    hsa_code_object_reader_destroy(hsaCodeObjectReader_);
+  }
   releaseClBinary();
 
 #if defined(WITH_LIGHTNING_COMPILER)
@@ -94,6 +97,7 @@ HSAILProgram::HSAILProgram(roc::NullDevice& device) : Program(device), binaryElf
   binOpts_.dealloc = &::free;
 
   hsaExecutable_.handle = 0;
+  hsaCodeObjectReader_.handle = 0;
 
   hasGlobalStores_ = false;
 
@@ -795,48 +799,6 @@ bool HSAILProgram::linkImpl_LC(amd::option::Options* options) {
 }
 
 bool HSAILProgram::setKernels_LC(amd::option::Options* options, void* binary, size_t binSize) {
-  hsa_agent_t agent = dev().getBackendDevice();
-  hsa_status_t status;
-
-  status = hsa_executable_create_alt(HSA_PROFILE_FULL, HSA_DEFAULT_FLOAT_ROUNDING_MODE_DEFAULT,
-                                     nullptr, &hsaExecutable_);
-  if (status != HSA_STATUS_SUCCESS) {
-    buildLog_ += "Error: Executable for AMD HSA Code Object isn't created: ";
-    buildLog_ += hsa_strerror(status);
-    buildLog_ += "\n";
-    return false;
-  }
-
-  // Load the code object.
-  hsa_code_object_reader_t codeObjectReader;
-  status = hsa_code_object_reader_create_from_memory(binary, binSize, &codeObjectReader);
-  if (status != HSA_STATUS_SUCCESS) {
-    buildLog_ += "Error: AMD HSA Code Object Reader create failed: ";
-    buildLog_ += hsa_strerror(status);
-    buildLog_ += "\n";
-    return false;
-  }
-
-  status = hsa_executable_load_agent_code_object(hsaExecutable_, agent, codeObjectReader, nullptr,
-                                                 nullptr);
-  if (status != HSA_STATUS_SUCCESS) {
-    buildLog_ += "Error: AMD HSA Code Object loading failed: ";
-    buildLog_ += hsa_strerror(status);
-    buildLog_ += "\n";
-    return false;
-  }
-
-  hsa_code_object_reader_destroy(codeObjectReader);
-
-  // Freeze the executable.
-  status = hsa_executable_freeze(hsaExecutable_, nullptr);
-  if (status != HSA_STATUS_SUCCESS) {
-    buildLog_ += "Error: Freezing the executable failed: ";
-    buildLog_ += hsa_strerror(status);
-    buildLog_ += "\n";
-    return false;
-  }
-
   size_t progvarsTotalSize = 0;
   size_t dynamicSize = 0;
   size_t progvarsWriteSize = 0;
@@ -922,6 +884,50 @@ bool HSAILProgram::setKernels_LC(amd::option::Options* options, void* binary, si
 
   saveBinaryAndSetType(TYPE_EXECUTABLE, binary, binSize);
 
+  //Load the stored copy of the ELF binary.
+  binary_t stored_binary = this->binary();
+  binary = const_cast<void*>(stored_binary.first);
+  binSize = stored_binary.second;
+
+  hsa_agent_t agent = dev().getBackendDevice();
+  hsa_status_t status;
+
+  status = hsa_executable_create_alt(HSA_PROFILE_FULL, HSA_DEFAULT_FLOAT_ROUNDING_MODE_DEFAULT,
+                                     nullptr, &hsaExecutable_);
+  if (status != HSA_STATUS_SUCCESS) {
+    buildLog_ += "Error: Executable for AMD HSA Code Object isn't created: ";
+    buildLog_ += hsa_strerror(status);
+    buildLog_ += "\n";
+    return false;
+  }
+
+  // Load the code object.
+  status = hsa_code_object_reader_create_from_memory(binary, binSize, &hsaCodeObjectReader_);
+  if (status != HSA_STATUS_SUCCESS) {
+    buildLog_ += "Error: AMD HSA Code Object Reader create failed: ";
+    buildLog_ += hsa_strerror(status);
+    buildLog_ += "\n";
+    return false;
+  }
+
+  status = hsa_executable_load_agent_code_object(hsaExecutable_, agent, hsaCodeObjectReader_, nullptr,
+                                                 nullptr);
+  if (status != HSA_STATUS_SUCCESS) {
+    buildLog_ += "Error: AMD HSA Code Object loading failed: ";
+    buildLog_ += hsa_strerror(status);
+    buildLog_ += "\n";
+    return false;
+  }
+
+  // Freeze the executable.
+  status = hsa_executable_freeze(hsaExecutable_, nullptr);
+  if (status != HSA_STATUS_SUCCESS) {
+    buildLog_ += "Error: Freezing the executable failed: ";
+    buildLog_ += hsa_strerror(status);
+    buildLog_ += "\n";
+    return false;
+  }
+
   // Get the list of kernels
   std::vector<std::string> kernelNameList;
   status = hsa_executable_iterate_agent_symbols(hsaExecutable_, agent, GetKernelNamesCallback,
diff --git a/rocclr/runtime/device/rocm/rocprogram.hpp b/rocclr/runtime/device/rocm/rocprogram.hpp
index bb720a41b0..3e6a8d50f7 100644
--- a/rocclr/runtime/device/rocm/rocprogram.hpp
+++ b/rocclr/runtime/device/rocm/rocprogram.hpp
@@ -155,7 +155,8 @@ class HSAILProgram : public device::Program {
   bool hasGlobalStores_;      //!< program has writable program scope variables
 
   /* HSA executable */
-  hsa_executable_t hsaExecutable_;      //!< Handle to HSA executable
+  hsa_executable_t hsaExecutable_;               //!< Handle to HSA executable
+  hsa_code_object_reader_t hsaCodeObjectReader_; //!< Handle to HSA code reader
 
 #if defined(WITH_LIGHTNING_COMPILER)
   CodeObjectMD* metadata_;  //!< Runtime metadata