systemc: Import tests from the Accellera systemc distribution.

Change-Id: Iad76b398949a55d768a34d027a2d8e3739953da6
Reviewed-on: https://gem5-review.googlesource.com/10845
Reviewed-by: Giacomo Travaglini <giacomo.travaglini@arm.com>
Maintainer: Gabe Black <gabeblack@google.com>

3 files changed, 133 insertions, 0 deletions

diff --git a/src/systemc/tests/systemc/misc/stars/star109218-2/COMPILE b/src/systemc/tests/systemc/misc/stars/star109218-2/COMPILE
new file mode 100644
index 000000000..e69de29bb
--- /dev/null
+++ b/src/systemc/tests/systemc/misc/stars/star109218-2/COMPILE
diff --git a/src/systemc/tests/systemc/misc/stars/star109218-2/map.h b/src/systemc/tests/systemc/misc/stars/star109218-2/map.h
new file mode 100644
index 000000000..c716f48f4
--- /dev/null
+++ b/src/systemc/tests/systemc/misc/stars/star109218-2/map.h
@@ -0,0 +1,51 @@
+/*****************************************************************************
+
+  Licensed to Accellera Systems Initiative Inc. (Accellera) under one or
+  more contributor license agreements.  See the NOTICE file distributed
+  with this work for additional information regarding copyright ownership.
+  Accellera licenses this file to you 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.
+
+ *****************************************************************************/
+
+/*****************************************************************************
+
+  map.h -- 
+
+  Original Author: Martin Janssen, Synopsys, Inc., 2002-02-15
+
+ *****************************************************************************/
+
+/*****************************************************************************
+
+  MODIFICATION LOG - modifiers, enter your name, affiliation, date and
+  changes you are making here.
+
+      Name, Affiliation, Date:
+  Description of Modification:
+
+ *****************************************************************************/
+
+SC_MODULE(test) {
+  sc_in_clk clk;
+  sc_in<bool> reset;
+  sc_in<sc_lv<16> > dati;
+  sc_out<sc_lv<16> > dato;
+  sc_out<sc_logic> done;
+
+  SC_CTOR(test) {
+    SC_CTHREAD(reset_loop, clk.pos());
+    reset_signal_is(reset,true);
+  }
+
+  void reset_loop(void);
+};
diff --git a/src/systemc/tests/systemc/misc/stars/star109218-2/star109218-2.cpp b/src/systemc/tests/systemc/misc/stars/star109218-2/star109218-2.cpp
new file mode 100644
index 000000000..977b9998d
--- /dev/null
+++ b/src/systemc/tests/systemc/misc/stars/star109218-2/star109218-2.cpp
@@ -0,0 +1,82 @@
+/*****************************************************************************
+
+  Licensed to Accellera Systems Initiative Inc. (Accellera) under one or
+  more contributor license agreements.  See the NOTICE file distributed
+  with this work for additional information regarding copyright ownership.
+  Accellera licenses this file to you 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.
+
+ *****************************************************************************/
+
+/*****************************************************************************
+
+  star109218-2.cpp -- 
+
+  Original Author: Martin Janssen, Synopsys, Inc., 2002-02-15
+
+ *****************************************************************************/
+
+/*****************************************************************************
+
+  MODIFICATION LOG - modifiers, enter your name, affiliation, date and
+  changes you are making here.
+
+      Name, Affiliation, Date:
+  Description of Modification:
+
+ *****************************************************************************/
+
+#include <systemc.h>
+#include "map.h"
+
+
+void my_mult(bool CLK,
+            sc_uint<8> A,
+            sc_uint<8> B,
+            sc_uint<16> &Z) {
+  // map_to_operator MULT_TC_OP
+  bool SignA, SignB;
+  sc_uint<8> MantA, MantB;
+  sc_uint<1> SignC;
+  sc_uint<16> MantC;
+  sc_lv<8> A_tmp, B_tmp;
+  sc_lv<16> Z_tmp;
+
+  if(A == 0 || B == 0) {
+    Z = 0;
+  } else {
+    SignA = A[7];
+    SignB = B[7];
+    MantA = SignA? (sc_uint<8>) (0-A) : A;
+    MantB = SignB? (sc_uint<8>) (0-B) : B;
+    MantC = MantA*MantB;
+    SignC[0] = SignA ^ SignB;
+    MantC = SignC[0]? (sc_uint<16>) (0-MantC) : MantC;
+    Z = (SignC, MantC.range(14,0));
+  }
+}
+
+
+void test::reset_loop() {
+  sc_uint<16> a, b, c, d, result;
+
+  dato.write(0);
+  done.write((sc_logic)'0');
+  wait();
+  while(1) {
+    a = dati;
+    my_mult(clk.read(), a.range(7,0), a.range(15,8), result);
+    dato.write(result);
+    done.write((sc_logic)'1');
+    wait();
+  }
+}