HW Procedure Compile Support

- New .tcl scripts to be used to do the compiling
- New hw procedure function for hw procedure writers to overload for their testing

Change-Id: I90af3f4d7aea07f63ec7f52daf224070c944ccee
Reviewed-on: http://gfw160.austin.ibm.com:8080/gerrit/190
Tested-by: Jenkins Server
Reviewed-by: Douglas R. Gilbert <dgilbert@us.ibm.com>
Reviewed-by: MIKE J. JONES <mjjones@us.ibm.com>

1 files changed, 38 insertions, 0 deletions

diff --git a/src/usr/hwpf/plat/fapiPlatHwpInvoker.C b/src/usr/hwpf/plat/fapiPlatHwpInvoker.C
index d6d8cbaad..44455a130 100644
--- a/src/usr/hwpf/plat/fapiPlatHwpInvoker.C
+++ b/src/usr/hwpf/plat/fapiPlatHwpInvoker.C
@@ -81,4 +81,42 @@ errlHndl_t invokeHwpIsP7EM0ChipletClockOn(TARGETING::Target* i_target,
     return l_err;
 }
 
+//******************************************************************************
+// invokeHwpInitial function
+//******************************************************************************
+errlHndl_t invokeHwpInitialTest(TARGETING::Target* i_target)
+{
+
+    FAPI_DBG(ENTER_MRK "invokeHwpInitialTest");
+
+    errlHndl_t l_err = NULL;
+
+     // Create a generic Target object
+    Target l_target(TARGET_TYPE_PROC_CHIP, reinterpret_cast<void *> (i_target));
+
+    //@todo
+    // Double check to see if any locking is needed here.
+    // Lower XSCOM already has a mutex lock.
+
+    // Call the HWP executor macro
+    ReturnCode l_rc;
+    FAPI_EXEC_HWP(l_rc, hwpInitialTest, l_target);
+
+    if (l_rc != FAPI_RC_SUCCESS)
+    {
+        FAPI_ERR("invokeHwpInitialTest: Error (0x%x) from "
+                 "exechwpInitialTest",
+                 static_cast<uint32_t> (l_rc));
+        l_err = rcToErrl(l_rc);
+    }
+    else
+    {
+        FAPI_INF("Success in call to exechwpInitialTest");
+    }
+
+    FAPI_DBG(EXIT_MRK "invokeHwpInitialTest");
+
+    return l_err;
+}
+
 } // End namespace