Brig front-end

2017-01-24  Pekka Jääskeläinen <pekka@parmance.com>
	    Martin Jambor  <mjambor@suse.cz>

	* Makefile.def (target_modules): Added libhsail-rt.
	(languages): Added language brig.
	* Makefile.in: Regenerated.
	* configure.ac (TOPLEVEL_CONFIGURE_ARGUMENTS): Added
	tgarget-libhsail-rt.  Make brig unsupported on untested architectures.
	* configure: Regenerated.

gcc/
	* brig-builtins.def: New file.
	* builtins.def (DEF_HSAIL_BUILTIN): New macro.
	(DEF_HSAIL_ATOMIC_BUILTIN): Likewise.
	(DEF_HSAIL_SAT_BUILTIN): Likewise.
	(DEF_HSAIL_INTR_BUILTIN): Likewise.
	(DEF_HSAIL_CVT_ZEROI_SAT_BUILTIN): Likewise.
	* builtin-types.def (BT_INT8): New.
	(BT_INT16): Likewise.
	(BT_UINT8): Likewise.
	(BT_UINT16): Likewise.
	(BT_FN_ULONG): Likewise.
	(BT_FN_UINT_INT): Likewise.
	(BT_FN_UINT_ULONG): Likewise.
	(BT_FN_UINT_LONG): Likewise.
	(BT_FN_UINT_PTR): Likewise.
	(BT_FN_ULONG_PTR): Likewise.
	(BT_FN_INT8_FLOAT): Likewise.
	(BT_FN_INT16_FLOAT): Likewise.
	(BT_FN_UINT32_FLOAT): Likewise.
	(BT_FN_UINT16_FLOAT): Likewise.
	(BT_FN_UINT8_FLOAT): Likewise.
	(BT_FN_UINT64_FLOAT): Likewise.
	(BT_FN_UINT16_UINT32): Likewise.
	(BT_FN_UINT32_UINT16): Likewise.
	(BT_FN_UINT16_UINT16_UINT16): Likewise.
	(BT_FN_INT_PTR_INT): Likewise.
	(BT_FN_UINT_PTR_UINT): Likewise.
	(BT_FN_LONG_PTR_LONG): Likewise.
	(BT_FN_ULONG_PTR_ULONG): Likewise.
	(BT_FN_VOID_UINT64_UINT64): Likewise.
	(BT_FN_UINT8_UINT8_UINT8): Likewise.
	(BT_FN_INT8_INT8_INT8): Likewise.
	(BT_FN_INT16_INT16_INT16): Likewise.
	(BT_FN_INT_INT_INT): Likewise.
	(BT_FN_UINT_FLOAT_UINT): Likewise.
	(BT_FN_FLOAT_UINT_UINT): Likewise.
	(BT_FN_ULONG_UINT_UINT): Likewise.
	(BT_FN_ULONG_UINT_PTR): Likewise.
	(BT_FN_ULONG_ULONG_ULONG): Likewise.
	(BT_FN_UINT_UINT_UINT): Likewise.
	(BT_FN_VOID_UINT_PTR): Likewise.
	(BT_FN_UINT_UINT_PTR: Likewise.
	(BT_FN_UINT32_UINT64_PTR): Likewise.
	(BT_FN_INT_INT_UINT_UINT): Likewise.
	(BT_FN_UINT_UINT_UINT_UINT): Likewise.
	(BT_FN_UINT_UINT_UINT_PTR): Likewise.
	(BT_FN_UINT_ULONG_ULONG_UINT): Likewise.
	(BT_FN_ULONG_ULONG_ULONG_ULONG): Likewise.
	(BT_FN_LONG_LONG_UINT_UINT): Likewise.
	(BT_FN_ULONG_ULONG_UINT_UINT): Likewise.
	(BT_FN_VOID_UINT32_UINT64_PTR): Likewise.
	(BT_FN_VOID_UINT32_UINT32_PTR): Likewise.
	(BT_FN_UINT_UINT_UINT_UINT_UINT): Likewise.
	(BT_FN_UINT_FLOAT_FLOAT_FLOAT_FLOAT): Likewise.
	(BT_FN_ULONG_ULONG_ULONG_UINT_UINT): Likewise.
	* doc/frontends.texi: List BRIG FE.
	* doc/install.texi (Testing): Add BRIG tesring requirements.
	* doc/invoke.texi (Overall Options): Mention BRIG.
	* doc/standards.texi (Standards): Doucment BRIG HSA version.

gcc/brig/

	* Make-lang.in: New file.
	* brig-builtins.h: Likewise.
	* brig-c.h: Likewise.
	* brig-lang.c: Likewise.
	* brigspec.c: Likewise.
	* config-lang.in: Likewise.
	* lang-specs.h: Likewise.
	* lang.opt: Likewise.
	* brigfrontend/brig-arg-block-handler.cc: Likewise.
	* brigfrontend/brig-atomic-inst-handler.cc: Likewise.
	* brigfrontend/brig-basic-inst-handler.cc: Likewise.
	* brigfrontend/brig-branch-inst-handler.cc: Likewise.
	* brigfrontend/brig-cmp-inst-handler.cc: Likewise.
	* brigfrontend/brig-code-entry-handler.cc: Likewise.
	* brigfrontend/brig-code-entry-handler.h: Likewise.
	* brigfrontend/brig-comment-handler.cc: Likewise.
	* brigfrontend/brig-control-handler.cc: Likewise.
	* brigfrontend/brig-copy-move-inst-handler.cc: Likewise.
	* brigfrontend/brig-cvt-inst-handler.cc: Likewise.
	* brigfrontend/brig-fbarrier-handler.cc: Likewise.
	* brigfrontend/brig-function-handler.cc: Likewise.
	* brigfrontend/brig-function.cc: Likewise.
	* brigfrontend/brig-function.h: Likewise.
	* brigfrontend/brig-inst-mod-handler.cc: Likewise.
	* brigfrontend/brig-label-handler.cc: Likewise.
	* brigfrontend/brig-lane-inst-handler.cc: Likewise.
	* brigfrontend/brig-machine.c: Likewise.
	* brigfrontend/brig-machine.h: Likewise.
	* brigfrontend/brig-mem-inst-handler.cc: Likewise.
	* brigfrontend/brig-module-handler.cc: Likewise.
	* brigfrontend/brig-queue-inst-handler.cc: Likewise.
	* brigfrontend/brig-seg-inst-handler.cc: Likewise.
	* brigfrontend/brig-signal-inst-handler.cc: Likewise.
	* brigfrontend/brig-to-generic.cc: Likewise.
	* brigfrontend/brig-to-generic.h: Likewise.
	* brigfrontend/brig-util.cc: Likewise.
	* brigfrontend/brig-util.h: Likewise.
	* brigfrontend/brig-variable-handler.cc: Likewise.
	* brigfrontend/phsa.h: Likewise.


gcc/testsuite/

	* lib/brig-dg.exp: New file.
	* lib/brig.exp: Likewise.
	* brig.dg/README: Likewise.
	* brig.dg/dg.exp: Likewise.
	* brig.dg/test/gimple/alloca.hsail: Likewise.
	* brig.dg/test/gimple/atomics.hsail: Likewise.
	* brig.dg/test/gimple/branches.hsail: Likewise.
	* brig.dg/test/gimple/fbarrier.hsail: Likewise.
	* brig.dg/test/gimple/function_calls.hsail: Likewise.
	* brig.dg/test/gimple/kernarg.hsail: Likewise.
	* brig.dg/test/gimple/mem.hsail: Likewise.
	* brig.dg/test/gimple/mulhi.hsail: Likewise.
	* brig.dg/test/gimple/packed.hsail: Likewise.
	* brig.dg/test/gimple/smoke_test.hsail: Likewise.
	* brig.dg/test/gimple/variables.hsail: Likewise.
	* brig.dg/test/gimple/vector.hsail: Likewise.

include/

	* hsa.h: Moved here from libgomp/plugin/hsa.h.

libgomp/

	* plugin/hsa.h: Moved to top level include.
	* plugin/plugin-hsa.c: Chanfgd include of hsa.h accordingly.

libhsail-rt/

	* Makefile.am: New file.
	* target-config.h.in: Likewise.
	* configure.ac: Likewise.
	* configure: Likewise.
	* config.h.in: Likewise.
	* aclocal.m4: Likewise.
	* README: Likewise.
	* Makefile.in: Likewise.
	* include/internal/fibers.h: Likewise.
	* include/internal/phsa-queue-interface.h: Likewise.
	* include/internal/phsa-rt.h: Likewise.
	* include/internal/workitems.h: Likewise.
	* rt/arithmetic.c: Likewise.
	* rt/atomics.c: Likewise.
	* rt/bitstring.c: Likewise.
	* rt/fbarrier.c: Likewise.
	* rt/fibers.c: Likewise.
	* rt/fp16.c: Likewise.
	* rt/misc.c: Likewise.
	* rt/multimedia.c: Likewise.
	* rt/queue.c: Likewise.
	* rt/sat_arithmetic.c: Likewise.
	* rt/segment.c: Likewise.
	* rt/workitems.c: Likewise.


Co-Authored-By: Martin Jambor <mjambor@suse.cz>

From-SVN: r244867

1 files changed, 299 insertions, 0 deletions

diff --git a/libhsail-rt/rt/sat_arithmetic.c b/libhsail-rt/rt/sat_arithmetic.c
new file mode 100644
index 00000000000..3e4024591ae
--- /dev/null
+++ b/libhsail-rt/rt/sat_arithmetic.c
@@ -0,0 +1,299 @@
+/* sat_arithmetic.c -- Builtins for HSAIL saturating arithmetic instructions.
+
+   Copyright (C) 2015-2016 Free Software Foundation, Inc.
+   Contributed by Pekka Jaaskelainen <pekka.jaaskelainen@parmance.com>
+   for General Processor Tech.
+
+   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 <stdint.h>
+
+uint8_t
+__hsail_sat_add_u8 (uint8_t a, uint8_t b)
+{
+  uint16_t c = (uint16_t) a + (uint16_t) b;
+  if (c > UINT8_MAX)
+    return UINT8_MAX;
+  else
+    return c;
+}
+
+uint16_t
+__hsail_sat_add_u16 (uint16_t a, uint16_t b)
+{
+  uint32_t c = (uint32_t) a + (uint32_t) b;
+  if (c > UINT16_MAX)
+    return UINT16_MAX;
+  else
+    return c;
+}
+
+uint32_t
+__hsail_sat_add_u32 (uint32_t a, uint32_t b)
+{
+  uint64_t c = (uint64_t) a + (uint64_t) b;
+  if (c > UINT32_MAX)
+    return UINT32_MAX;
+  else
+    return c;
+}
+
+uint64_t
+__hsail_sat_add_u64 (uint64_t a, uint64_t b)
+{
+  __uint128_t c = (__uint128_t) a + (__uint128_t) b;
+  if (c > UINT64_MAX)
+    return UINT64_MAX;
+  else
+    return c;
+}
+
+int8_t
+__hsail_sat_add_s8 (int8_t a, int8_t b)
+{
+  int16_t c = (int16_t) a + (int16_t) b;
+  if (c > INT8_MAX)
+    return INT8_MAX;
+  else if (c < INT8_MIN)
+    return INT8_MIN;
+  else
+    return c;
+}
+
+int16_t
+__hsail_sat_add_s16 (int16_t a, int16_t b)
+{
+  int32_t c = (int32_t) a + (int32_t) b;
+  if (c > INT16_MAX)
+    return INT16_MAX;
+  else if (c < INT16_MIN)
+    return INT16_MIN;
+  else
+    return c;
+}
+
+int32_t
+__hsail_sat_add_s32 (int32_t a, int32_t b)
+{
+  int64_t c = (int64_t) a + (int64_t) b;
+  if (c > INT32_MAX)
+    return INT32_MAX;
+  else if (c < INT32_MIN)
+    return INT32_MIN;
+  else
+    return c;
+}
+
+int64_t
+__hsail_sat_add_s64 (int64_t a, int64_t b)
+{
+  __int128_t c = (__int128_t) a + (__int128_t) b;
+  if (c > INT64_MAX)
+    return INT64_MAX;
+  else if (c < INT64_MIN)
+    return INT64_MIN;
+  else
+    return c;
+}
+
+uint8_t
+__hsail_sat_sub_u8 (uint8_t a, uint8_t b)
+{
+  int16_t c = (uint16_t) a - (uint16_t) b;
+  if (c < 0)
+    return 0;
+  else if (c > UINT8_MAX)
+    return UINT8_MAX;
+  else
+    return c;
+}
+
+uint16_t
+__hsail_sat_sub_u16 (uint16_t a, uint16_t b)
+{
+  int32_t c = (uint32_t) a - (uint32_t) b;
+  if (c < 0)
+    return 0;
+  else if (c > UINT16_MAX)
+    return UINT16_MAX;
+  else
+    return c;
+}
+
+uint32_t
+__hsail_sat_sub_u32 (uint32_t a, uint32_t b)
+{
+  int64_t c = (uint64_t) a - (uint64_t) b;
+  if (c < 0)
+    return 0;
+  else if (c > UINT32_MAX)
+    return UINT32_MAX;
+  else
+    return c;
+}
+
+uint64_t
+__hsail_sat_sub_u64 (uint64_t a, uint64_t b)
+{
+  __int128_t c = (__uint128_t) a - (__uint128_t) b;
+  if (c < 0)
+    return 0;
+  else if (c > UINT64_MAX)
+    return UINT64_MAX;
+  else
+    return c;
+}
+
+int8_t
+__hsail_sat_sub_s8 (int8_t a, int8_t b)
+{
+  int16_t c = (int16_t) a - (int16_t) b;
+  if (c > INT8_MAX)
+    return INT8_MAX;
+  else if (c < INT8_MIN)
+    return INT8_MIN;
+  else
+    return c;
+}
+
+int16_t
+__hsail_sat_sub_s16 (int16_t a, int16_t b)
+{
+  int32_t c = (int32_t) a - (int32_t) b;
+  if (c > INT16_MAX)
+    return INT16_MAX;
+  else if (c < INT16_MIN)
+    return INT16_MIN;
+  else
+    return c;
+}
+
+int32_t
+__hsail_sat_sub_s32 (int32_t a, int32_t b)
+{
+  int64_t c = (int64_t) a - (int64_t) b;
+  if (c > INT32_MAX)
+    return INT32_MAX;
+  else if (c < INT32_MIN)
+    return INT32_MIN;
+  else
+    return c;
+}
+
+int64_t
+__hsail_sat_sub_s64 (int64_t a, int64_t b)
+{
+  __int128_t c = (__int128_t) a - (__int128_t) b;
+  if (c > INT64_MAX)
+    return INT64_MAX;
+  else if (c < INT64_MIN)
+    return INT64_MIN;
+  else
+    return c;
+}
+
+uint8_t
+__hsail_sat_mul_u8 (uint8_t a, uint8_t b)
+{
+  uint16_t c = (uint16_t) a * (uint16_t) b;
+  if (c > UINT8_MAX)
+    return UINT8_MAX;
+  else
+    return c;
+}
+
+uint16_t
+__hsail_sat_mul_u16 (uint16_t a, uint16_t b)
+{
+  uint32_t c = (uint32_t) a * (uint32_t) b;
+  if (c > UINT16_MAX)
+    return UINT16_MAX;
+  else
+    return c;
+}
+
+uint32_t
+__hsail_sat_mul_u32 (uint32_t a, uint32_t b)
+{
+  uint64_t c = (uint64_t) a * (uint64_t) b;
+  if (c > UINT32_MAX)
+    return UINT32_MAX;
+  else
+    return c;
+}
+
+uint64_t
+__hsail_sat_mul_u64 (uint64_t a, uint64_t b)
+{
+  __uint128_t c = (__uint128_t) a * (__uint128_t) b;
+  if (c > UINT64_MAX)
+    return UINT64_MAX;
+  else
+    return c;
+}
+
+int8_t
+__hsail_sat_mul_s8 (int8_t a, int8_t b)
+{
+  int16_t c = (int16_t) a * (int16_t) b;
+  if (c > INT8_MAX)
+    return INT8_MAX;
+  else if (c < INT8_MIN)
+    return INT8_MIN;
+  else
+    return c;
+}
+
+int16_t
+__hsail_sat_mul_s16 (int16_t a, int16_t b)
+{
+  int32_t c = (int32_t) a * (int32_t) b;
+  if (c > INT16_MAX)
+    return INT16_MAX;
+  else if (c < INT16_MIN)
+    return INT16_MIN;
+  else
+    return c;
+}
+
+int32_t
+__hsail_sat_mul_s32 (int32_t a, int32_t b)
+{
+  int64_t c = (int64_t) a * (int64_t) b;
+  if (c > INT32_MAX)
+    return INT32_MAX;
+  else if (c < INT32_MIN)
+    return INT32_MIN;
+  else
+    return c;
+}
+
+int64_t
+__hsail_sat_mul_s64 (int64_t a, int64_t b)
+{
+  __int128_t c = (__int128_t) a * (__int128_t) b;
+  if (c > INT64_MAX)
+    return INT64_MAX;
+  else if (c < INT64_MIN)
+    return INT64_MIN;
+  else
+    return c;
+}