[PATCH 2/4] OpenMP 4.0 offloading to Intel MIC: liboffloadmic.

	* Makefile.def: Add liboffloadmic to target_modules.  Make
	liboffloadmic depend on libgomp's configure, libstdc++ and libgcc.
	* Makefile.in: Regenerate.
	* configure: Regenerate.
	* configure.ac: Add liboffloadmic to target binaries.
	Restrict liboffloadmic for POSIX and i*86, and x86_64 architectures.
	Add liboffloadmic to noconfig list when C++ is not supported.

config/
	* target-posix: New file.

libcilkrts/
	* configure.tgt: Use config/target-posix.

liboffloadmic/
	Initial commit.  Imported from upstream:
	https://www.openmprtl.org/sites/default/files/liboffload_oss.tgz
	* Makefile.am: New file.
	* Makefile.in: New file, generated by automake.
	* aclocal.m4: New file, generated by aclocal.
	* configure: New file, generated by autoconf.
	* configure.ac: New file.
	* configure.tgt: Ditto.
	* doc/doxygen/config: Ditto.
	* doc/doxygen/header.tex: Ditto.
	* include/coi/common/COIEngine_common.h: Ditto.
	* include/coi/common/COIMacros_common.h: Ditto.
	* include/coi/common/COIPerf_common.h : Ditto.
	* include/coi/common/COIResult_common.h : Ditto.
	* include/coi/common/COITypes_common.h: Ditto.
	* include/coi/sink/COIBuffer_sink.h: Ditto.
	* include/coi/sink/COIPipeline_sink.h: Ditto.
	* include/coi/sink/COIProcess_sink.h: Ditto.
	* include/coi/source/COIBuffer_source.h: Ditto.
	* include/coi/source/COIEngine_source.h: Ditto.
	* include/coi/source/COIEvent_source.h: Ditto.
	* include/coi/source/COIPipeline_source.h: Ditto.
	* include/coi/source/COIProcess_source.h: Ditto.
	* include/myo/myo.h: Ditto.
	* include/myo/myoimpl.h: Ditto.
	* include/myo/myotypes.h: Ditto.
	* liboffloadmic_host.spec.in: Ditto.
	* liboffloadmic_target.spec.in: Ditto.
	* runtime/cean_util.cpp: Ditto.
	* runtime/cean_util.h: Ditto.
	* runtime/coi/coi_client.cpp: Ditto.
	* runtime/coi/coi_client.h: Ditto.
	* runtime/coi/coi_server.cpp: Ditto.
	* runtime/coi/coi_server.h: Ditto.
	* runtime/compiler_if_host.cpp: Ditto.
	* runtime/compiler_if_host.h: Ditto.
	* runtime/compiler_if_target.cpp: Ditto.
	* runtime/compiler_if_target.h: Ditto.
	* runtime/dv_util.cpp: Ditto.
	* runtime/dv_util.h: Ditto.
	* runtime/emulator/coi_common.h: Ditto.
	* runtime/emulator/coi_device.cpp: Ditto.
	* runtime/emulator/coi_device.h: Ditto.
	* runtime/emulator/coi_host.cpp: Ditto.
	* runtime/emulator/coi_host.h: Ditto.
	* runtime/emulator/coi_version_asm.h: Ditto.
	* runtime/emulator/coi_version_linker_script.map: Ditto.
	* runtime/emulator/myo_client.cpp: Ditto.
	* runtime/emulator/myo_service.cpp: Ditto.
	* runtime/emulator/myo_service.h: Ditto.
	* runtime/emulator/myo_version_asm.h: Ditto.
	* runtime/emulator/myo_version_linker_script.map: Ditto.
	* runtime/liboffload_error.c: Ditto.
	* runtime/liboffload_error_codes.h: Ditto.
	* runtime/liboffload_msg.c: Ditto.
	* runtime/liboffload_msg.h: Ditto.
	* runtime/mic_lib.f90: Ditto.
	* runtime/offload.h: Ditto.
	* runtime/offload_common.cpp: Ditto.
	* runtime/offload_common.h: Ditto.
	* runtime/offload_engine.cpp: Ditto.
	* runtime/offload_engine.h: Ditto.
	* runtime/offload_env.cpp: Ditto.
	* runtime/offload_env.h: Ditto.
	* runtime/offload_host.cpp: Ditto.
	* runtime/offload_host.h: Ditto.
	* runtime/offload_myo_host.cpp: Ditto.
	* runtime/offload_myo_host.h: Ditto.
	* runtime/offload_myo_target.cpp: Ditto.
	* runtime/offload_myo_target.h: Ditto.
	* runtime/offload_omp_host.cpp: Ditto.
	* runtime/offload_omp_target.cpp: Ditto.
	* runtime/offload_orsl.cpp: Ditto.
	* runtime/offload_orsl.h: Ditto.
	* runtime/offload_table.cpp: Ditto.
	* runtime/offload_table.h: Ditto.
	* runtime/offload_target.cpp: Ditto.
	* runtime/offload_target.h: Ditto.
	* runtime/offload_target_main.cpp: Ditto.
	* runtime/offload_timer.h: Ditto.
	* runtime/offload_timer_host.cpp: Ditto.
	* runtime/offload_timer_target.cpp: Ditto.
	* runtime/offload_trace.cpp: Ditto.
	* runtime/offload_trace.h: Ditto.
	* runtime/offload_util.cpp: Ditto.
	* runtime/offload_util.h: Ditto.
	* runtime/ofldbegin.cpp: Ditto.
	* runtime/ofldend.cpp: Ditto.
	* runtime/orsl-lite/include/orsl-lite.h: Ditto.
	* runtime/orsl-lite/lib/orsl-lite.c: Ditto.
	* runtime/orsl-lite/version.txt: Ditto.
	* runtime/use_mpss2.txt: Ditto.

From-SVN: r217498

1 files changed, 485 insertions, 0 deletions

diff --git a/liboffloadmic/runtime/offload_omp_host.cpp b/liboffloadmic/runtime/offload_omp_host.cpp
new file mode 100644
index 0000000..ceba612
--- /dev/null
+++ b/liboffloadmic/runtime/offload_omp_host.cpp
@@ -0,0 +1,485 @@
+/*
+    Copyright (c) 2014 Intel Corporation.  All Rights Reserved.
+
+    Redistribution and use in source and binary forms, with or without
+    modification, are permitted provided that the following conditions
+    are met:
+
+      * Redistributions of source code must retain the above copyright
+        notice, this list of conditions and the following disclaimer.
+      * Redistributions in binary form must reproduce the above copyright
+        notice, this list of conditions and the following disclaimer in the
+        documentation and/or other materials provided with the distribution.
+      * Neither the name of Intel Corporation nor the names of its
+        contributors may be used to endorse or promote products derived
+        from this software without specific prior written permission.
+
+    THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
+    "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
+    LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
+    A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
+    HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
+    SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
+    LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
+    DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
+    THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
+    (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
+    OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+*/
+
+
+#include <omp.h>
+#include "offload.h"
+#include "compiler_if_host.h"
+
+// OpenMP API
+
+void omp_set_default_device(int num) __GOMP_NOTHROW
+{
+    if (num >= 0) {
+        __omp_device_num = num;
+    }
+}
+
+int omp_get_default_device(void) __GOMP_NOTHROW
+{
+    return __omp_device_num;
+}
+
+int omp_get_num_devices() __GOMP_NOTHROW
+{
+    __offload_init_library();
+    return mic_engines_total;
+}
+
+// OpenMP API wrappers
+
+static void omp_set_int_target(
+    TARGET_TYPE target_type,
+    int target_number,
+    int setting,
+    const char* f_name
+)
+{
+    OFFLOAD ofld = OFFLOAD_TARGET_ACQUIRE(target_type, target_number, 0, NULL,
+                                          f_name, 0);
+    if (ofld) {
+        VarDesc vars[1] = {0};
+
+        vars[0].type.src = c_data;
+        vars[0].type.dst = c_data;
+        vars[0].direction.bits = c_parameter_in;
+        vars[0].size = sizeof(int);
+        vars[0].count = 1;
+        vars[0].ptr = &setting;
+
+        OFFLOAD_OFFLOAD(ofld, f_name, 0, 1, vars, NULL, 0, 0, 0);
+    }
+}
+
+static int omp_get_int_target(
+    TARGET_TYPE target_type,
+    int target_number,
+    const char * f_name
+)
+{
+    int setting = 0;
+
+    OFFLOAD ofld = OFFLOAD_TARGET_ACQUIRE(target_type, target_number, 0, NULL,
+                                          f_name, 0);
+    if (ofld) {
+        VarDesc vars[1] = {0};
+
+        vars[0].type.src = c_data;
+        vars[0].type.dst = c_data;
+        vars[0].direction.bits = c_parameter_out;
+        vars[0].size = sizeof(int);
+        vars[0].count = 1;
+        vars[0].ptr = &setting;
+
+        OFFLOAD_OFFLOAD(ofld, f_name, 0, 1, vars, NULL, 0, 0, 0);
+    }
+    return setting;
+}
+
+void omp_set_num_threads_target(
+    TARGET_TYPE target_type,
+    int target_number,
+    int num_threads
+)
+{
+    omp_set_int_target(target_type, target_number, num_threads,
+                       "omp_set_num_threads_target");
+}
+
+int omp_get_max_threads_target(
+    TARGET_TYPE target_type,
+    int target_number
+)
+{
+    return omp_get_int_target(target_type, target_number,
+                              "omp_get_max_threads_target");
+}
+
+int omp_get_num_procs_target(
+    TARGET_TYPE target_type,
+    int target_number
+)
+{
+    return omp_get_int_target(target_type, target_number,
+                              "omp_get_num_procs_target");
+}
+
+void omp_set_dynamic_target(
+    TARGET_TYPE target_type,
+    int target_number,
+    int num_threads
+)
+{
+    omp_set_int_target(target_type, target_number, num_threads,
+                       "omp_set_dynamic_target");
+}
+
+int omp_get_dynamic_target(
+    TARGET_TYPE target_type,
+    int target_number
+)
+{
+    return omp_get_int_target(target_type, target_number,
+                              "omp_get_dynamic_target");
+}
+
+void omp_set_nested_target(
+    TARGET_TYPE target_type,
+    int target_number,
+    int nested
+)
+{
+    omp_set_int_target(target_type, target_number, nested,
+                       "omp_set_nested_target");
+}
+
+int omp_get_nested_target(
+    TARGET_TYPE target_type,
+    int target_number
+)
+{
+    return omp_get_int_target(target_type, target_number,
+                              "omp_get_nested_target");
+}
+
+void omp_set_schedule_target(
+    TARGET_TYPE target_type,
+    int target_number,
+    omp_sched_t kind,
+    int modifier
+)
+{
+    OFFLOAD ofld = OFFLOAD_TARGET_ACQUIRE(target_type, target_number, 0, NULL,
+                                          __func__, 0);
+    if (ofld != 0) {
+        VarDesc vars[2] = {0};
+
+        vars[0].type.src = c_data;
+        vars[0].type.dst = c_data;
+        vars[0].direction.bits = c_parameter_in;
+        vars[0].size = sizeof(omp_sched_t);
+        vars[0].count = 1;
+        vars[0].ptr = &kind;
+
+        vars[1].type.src = c_data;
+        vars[1].type.dst = c_data;
+        vars[1].direction.bits = c_parameter_in;
+        vars[1].size = sizeof(int);
+        vars[1].count = 1;
+        vars[1].ptr = &modifier;
+
+        OFFLOAD_OFFLOAD(ofld, "omp_set_schedule_target",
+                        0, 2, vars, NULL, 0, 0, 0);
+    }
+}
+
+void omp_get_schedule_target(
+    TARGET_TYPE target_type,
+    int target_number,
+    omp_sched_t *kind,
+    int *modifier
+)
+{
+    OFFLOAD ofld = OFFLOAD_TARGET_ACQUIRE(target_type, target_number, 0, NULL,
+                                          __func__, 0);
+    if (ofld != 0) {
+        VarDesc vars[2] = {0};
+
+        vars[0].type.src = c_data;
+        vars[0].type.dst = c_data;
+        vars[0].direction.bits = c_parameter_out;
+        vars[0].size = sizeof(omp_sched_t);
+        vars[0].count = 1;
+        vars[0].ptr = kind;
+
+        vars[1].type.src = c_data;
+        vars[1].type.dst = c_data;
+        vars[1].direction.bits = c_parameter_out;
+        vars[1].size = sizeof(int);
+        vars[1].count = 1;
+        vars[1].ptr = modifier;
+
+        OFFLOAD_OFFLOAD(ofld, "omp_get_schedule_target",
+                        0, 2, vars, NULL, 0, 0, 0);
+    }
+}
+
+// lock API functions
+
+void omp_init_lock_target(
+    TARGET_TYPE target_type,
+    int target_number,
+    omp_lock_target_t *lock
+)
+{
+    OFFLOAD ofld = OFFLOAD_TARGET_ACQUIRE(target_type, target_number, 0, NULL,
+                                          __func__, 0);
+    if (ofld != 0) {
+        VarDesc vars[1] = {0};
+
+        vars[0].type.src = c_data;
+        vars[0].type.dst = c_data;
+        vars[0].direction.bits = c_parameter_out;
+        vars[0].size = sizeof(omp_lock_target_t);
+        vars[0].count = 1;
+        vars[0].ptr = lock;
+
+        OFFLOAD_OFFLOAD(ofld, "omp_init_lock_target",
+                        0, 1, vars, NULL, 0, 0, 0);
+    }
+}
+
+void omp_destroy_lock_target(
+    TARGET_TYPE target_type,
+    int target_number,
+    omp_lock_target_t *lock
+)
+{
+    OFFLOAD ofld = OFFLOAD_TARGET_ACQUIRE(target_type, target_number, 0, NULL,
+                                          __func__, 0);
+    if (ofld != 0) {
+        VarDesc vars[1] = {0};
+
+        vars[0].type.src = c_data;
+        vars[0].type.dst = c_data;
+        vars[0].direction.bits = c_parameter_in;
+        vars[0].size = sizeof(omp_lock_target_t);
+        vars[0].count = 1;
+        vars[0].ptr = lock;
+
+        OFFLOAD_OFFLOAD(ofld, "omp_destroy_lock_target",
+                        0, 1, vars, NULL, 0, 0, 0);
+    }
+}
+
+void omp_set_lock_target(
+    TARGET_TYPE target_type,
+    int target_number,
+    omp_lock_target_t *lock
+)
+{
+    OFFLOAD ofld = OFFLOAD_TARGET_ACQUIRE(target_type, target_number, 0, NULL,
+                                          __func__, 0);
+    if (ofld != 0) {
+        VarDesc vars[1] = {0};
+
+        vars[0].type.src = c_data;
+        vars[0].type.dst = c_data;
+        vars[0].direction.bits = c_parameter_inout;
+        vars[0].size = sizeof(omp_lock_target_t);
+        vars[0].count = 1;
+        vars[0].ptr = lock;
+
+        OFFLOAD_OFFLOAD(ofld, "omp_set_lock_target",
+                        0, 1, vars, NULL, 0, 0, 0);
+    }
+}
+
+void omp_unset_lock_target(
+    TARGET_TYPE target_type,
+    int target_number,
+    omp_lock_target_t *lock
+)
+{
+    OFFLOAD ofld = OFFLOAD_TARGET_ACQUIRE(target_type, target_number, 0, NULL,
+                                          __func__, 0);
+    if (ofld != 0) {
+        VarDesc vars[1] = {0};
+
+        vars[0].type.src = c_data;
+        vars[0].type.dst = c_data;
+        vars[0].direction.bits = c_parameter_inout;
+        vars[0].size = sizeof(omp_lock_target_t);
+        vars[0].count = 1;
+        vars[0].ptr = lock;
+
+        OFFLOAD_OFFLOAD(ofld, "omp_unset_lock_target",
+                        0, 1, vars, NULL, 0, 0, 0);
+    }
+}
+
+int omp_test_lock_target(
+    TARGET_TYPE target_type,
+    int target_number,
+    omp_lock_target_t *lock
+)
+{
+    int result = 0;
+
+    OFFLOAD ofld = OFFLOAD_TARGET_ACQUIRE(target_type, target_number, 0, NULL,
+                                          __func__, 0);
+    if (ofld != 0) {
+        VarDesc vars[2] = {0};
+
+        vars[0].type.src = c_data;
+        vars[0].type.dst = c_data;
+        vars[0].direction.bits = c_parameter_inout;
+        vars[0].size = sizeof(omp_lock_target_t);
+        vars[0].count = 1;
+        vars[0].ptr = lock;
+
+        vars[1].type.src = c_data;
+        vars[1].type.dst = c_data;
+        vars[1].direction.bits = c_parameter_out;
+        vars[1].size = sizeof(int);
+        vars[1].count = 1;
+        vars[1].ptr = &result;
+
+        OFFLOAD_OFFLOAD(ofld, "omp_test_lock_target",
+                        0, 2, vars, NULL, 0, 0, 0);
+    }
+    return result;
+}
+
+// nested lock API functions
+
+void omp_init_nest_lock_target(
+    TARGET_TYPE target_type,
+    int target_number,
+    omp_nest_lock_target_t *lock
+)
+{
+    OFFLOAD ofld = OFFLOAD_TARGET_ACQUIRE(target_type, target_number, 0, NULL,
+                                          __func__, 0);
+    if (ofld != 0) {
+        VarDesc vars[1] = {0};
+
+        vars[0].type.src = c_data;
+        vars[0].type.dst = c_data;
+        vars[0].direction.bits = c_parameter_out;
+        vars[0].size = sizeof(omp_nest_lock_target_t);
+        vars[0].count = 1;
+        vars[0].ptr = lock;
+
+        OFFLOAD_OFFLOAD(ofld, "omp_init_nest_lock_target",
+                        0, 1, vars, NULL, 0, 0, 0);
+    }
+}
+
+void omp_destroy_nest_lock_target(
+    TARGET_TYPE target_type,
+    int target_number,
+    omp_nest_lock_target_t *lock
+)
+{
+    OFFLOAD ofld = OFFLOAD_TARGET_ACQUIRE(target_type, target_number, 0, NULL,
+                                          __func__, 0);
+    if (ofld != 0) {
+        VarDesc vars[1] = {0};
+
+        vars[0].type.src = c_data;
+        vars[0].type.dst = c_data;
+        vars[0].direction.bits = c_parameter_in;
+        vars[0].size = sizeof(omp_nest_lock_target_t);
+        vars[0].count = 1;
+        vars[0].ptr = lock;
+
+        OFFLOAD_OFFLOAD(ofld, "omp_destroy_nest_lock_target",
+                        0, 1, vars, NULL, 0, 0, 0);
+    }
+}
+
+void omp_set_nest_lock_target(
+    TARGET_TYPE target_type,
+    int target_number,
+    omp_nest_lock_target_t *lock
+)
+{
+    OFFLOAD ofld = OFFLOAD_TARGET_ACQUIRE(target_type, target_number, 0, NULL,
+                                          __func__, 0);
+    if (ofld != 0) {
+        VarDesc vars[1] = {0};
+
+        vars[0].type.src = c_data;
+        vars[0].type.dst = c_data;
+        vars[0].direction.bits = c_parameter_inout;
+        vars[0].size = sizeof(omp_nest_lock_target_t);
+        vars[0].count = 1;
+        vars[0].ptr = lock;
+
+        OFFLOAD_OFFLOAD(ofld, "omp_set_nest_lock_target",
+                        0, 1, vars, NULL, 0, 0, 0);
+    }
+}
+
+void omp_unset_nest_lock_target(
+    TARGET_TYPE target_type,
+    int target_number,
+    omp_nest_lock_target_t *lock
+)
+{
+    OFFLOAD ofld = OFFLOAD_TARGET_ACQUIRE(target_type, target_number, 0, NULL,
+                                          __func__, 0);
+    if (ofld != 0) {
+        VarDesc vars[1] = {0};
+
+        vars[0].type.src = c_data;
+        vars[0].type.dst = c_data;
+        vars[0].direction.bits = c_parameter_inout;
+        vars[0].size = sizeof(omp_nest_lock_target_t);
+        vars[0].count = 1;
+        vars[0].ptr = lock;
+
+        OFFLOAD_OFFLOAD(ofld, "omp_unset_nest_lock_target",
+                        0, 1, vars, NULL, 0, 0, 0);
+    }
+}
+
+int omp_test_nest_lock_target(
+    TARGET_TYPE target_type,
+    int target_number,
+    omp_nest_lock_target_t *lock
+)
+{
+    int result = 0;
+
+    OFFLOAD ofld = OFFLOAD_TARGET_ACQUIRE(target_type, target_number, 0, NULL,
+                                          __func__, 0);
+    if (ofld != 0) {
+        VarDesc vars[2] = {0};
+
+        vars[0].type.src = c_data;
+        vars[0].type.dst = c_data;
+        vars[0].direction.bits = c_parameter_inout;
+        vars[0].size = sizeof(omp_nest_lock_target_t);
+        vars[0].count = 1;
+        vars[0].ptr = lock;
+
+        vars[1].type.src = c_data;
+        vars[1].type.dst = c_data;
+        vars[1].direction.bits = c_parameter_out;
+        vars[1].size = sizeof(int);
+        vars[1].count = 1;
+        vars[1].ptr = &result;
+
+        OFFLOAD_OFFLOAD(ofld, "omp_test_nest_lock_target",
+                        0, 2, vars, NULL, 0, 0, 0);
+    }
+    return result;
+}