1 files changed, 105 insertions, 0 deletions
diff --git a/src/usr/testcore/tlsmod/tlsfile.H b/src/usr/testcore/tlsmod/tlsfile.H
new file mode 100644
index 000000000..37102aacc
--- /dev/null
+++ b/src/usr/testcore/tlsmod/tlsfile.H
@@ -0,0 +1,105 @@
+/* IBM_PROLOG_BEGIN_TAG                                                   */
+/* This is an automatically generated prolog.                             */
+/*                                                                        */
+/* $Source: src/usr/testcore/tlsmod/tlsfile.H $                           */
+/*                                                                        */
+/* OpenPOWER HostBoot Project                                             */
+/*                                                                        */
+/* Contributors Listed Below - COPYRIGHT 2015,2019                        */
+/* [+] International Business Machines Corp.                              */
+/*                                                                        */
+/*                                                                        */
+/* Licensed under the Apache License, Version 2.0 (the "License");        */
+/* you may not use this file except in compliance with the License.       */
+/* You may obtain a copy of the License at                                */
+/*                                                                        */
+/*     http://www.apache.org/licenses/LICENSE-2.0                         */
+/*                                                                        */
+/* Unless required by applicable law or agreed to in writing, software    */
+/* distributed under the License is distributed on an "AS IS" BASIS,      */
+/* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or        */
+/* implied. See the License for the specific language governing           */
+/* permissions and limitations under the License.                         */
+/*                                                                        */
+/* IBM_PROLOG_END_TAG                                                     */
+
+#ifndef __TLSMOD_TLSFILE_H
+#define __TLSMOD_TLSFILE_H
+
+#include <cxxtest/TestSuite.H>
+#include <sys/task.h>
+
+namespace __tls_test
+{
+
+// @note: see src/usr/testcore/lib/tls.H for API definition
+void spawnTasks(
+     const char* const i_pFnName,
+           void*(*i_pFn)(void*));
+
+extern size_t INTERFILE_INIT_VALUE;
+extern size_t INTERFILE_POST_VALUE;
+
+extern thread_local size_t tls_interfile;
+
+/**
+ *  @brief Test a TLS variable defined in a different file
+ */
+void* test_tls_interfile(void* unused)
+{
+    TS_INFO(ENTER_MRK "test_tls_interfile");
+
+    do {
+
+    decltype(tls_interfile) rc = tls_interfile;
+    if(rc != INTERFILE_INIT_VALUE)
+    {
+        TS_FAIL("test_tls_interfile: bad initial value; "
+                "expected 0x%016llX but got 0x%016llX",
+                INTERFILE_INIT_VALUE,rc);
+        break;
+    }
+
+    task_yield();
+
+    tls_interfile++;
+
+    task_yield();
+
+    rc = tls_interfile;
+    if(rc != INTERFILE_POST_VALUE)
+    {
+        TS_FAIL("test_tls_interfile: bad post value; "
+                "expected 0x%016llX but got 0x%016llX",
+                INTERFILE_POST_VALUE,rc);
+        break;
+    }
+
+    } while(0);
+
+    TS_INFO(EXIT_MRK "test_tls_interfile");
+
+    return nullptr;
+}
+
+}; // End __tls_test namespace
+
+// Test TLS between translation units (i.e. between files)
+class LibcTlsTestFile : public CxxTest::TestSuite
+{
+  public:
+
+    /**
+     *  @brief Test as bunch of TLS vars in a different file
+     */
+    void testTlsInterfile()
+    {
+        TS_INFO(ENTER_MRK "testTlsInterfile");
+        __tls_test::spawnTasks("testTlsInterfile",
+                               __tls_test::test_tls_interfile);
+        TS_INFO(EXIT_MRK "testTlsInterfile");
+    }
+
+};
+
+#endif // End __TLSMOD_TLSFILE_H