From 16fa8d7cc8c92f5ab879e4cf9c6c0bbb3567860f Mon Sep 17 00:00:00 2001
From: Gabe Black <gabeblack@google.com>
Date: Thu, 24 May 2018 01:37:55 -0700
Subject: 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>
---
 .../communication/sc_semaphore/test01/test01.cpp   | 121 +++++++++++++++++++++
 1 file changed, 121 insertions(+)
 create mode 100644 src/systemc/tests/systemc/communication/sc_semaphore/test01/test01.cpp

(limited to 'src/systemc/tests/systemc/communication/sc_semaphore/test01/test01.cpp')

diff --git a/src/systemc/tests/systemc/communication/sc_semaphore/test01/test01.cpp b/src/systemc/tests/systemc/communication/sc_semaphore/test01/test01.cpp
new file mode 100644
index 000000000..dd031f95c
--- /dev/null
+++ b/src/systemc/tests/systemc/communication/sc_semaphore/test01/test01.cpp
@@ -0,0 +1,121 @@
+/*****************************************************************************
+
+  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.
+
+ *****************************************************************************/
+
+/*****************************************************************************
+
+  test01.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:
+
+ *****************************************************************************/
+
+// test of the sc_semaphore primitive channel -- mutex case
+
+#include "systemc.h"
+
+SC_MODULE( mod_a )
+{
+    sc_semaphore semaphore;
+
+    void write( const char* msg )
+    {
+        cout << sc_time_stamp() << " " << msg << endl;
+    }
+
+    void proc_a()
+    {
+        while( true ) {
+            wait( 1, SC_NS );
+            write( "proc_a - lock requested" );
+            semaphore.wait();
+            write( "proc_a - lock obtained" );
+            wait( 2, SC_NS );
+            if( semaphore.post() == 0 ) {
+                write( "proc_a - unlock successful" );
+            } else {
+                write( "proc_a - unlock failed" );
+            }
+            wait( 3, SC_NS );
+            if( semaphore.trywait() == 0 ) {
+                write( "proc_a - trylock successful" );
+            } else {
+                write( "proc_a - trylock failed" );
+            }
+            if( semaphore.post() == 0 ) {
+                write( "proc_a - unlock successful" );
+            } else {
+                write( "proc_a - unlock failed" );
+            }
+        }
+    }
+
+    void proc_b()
+    {
+        while( true ) {
+            wait( 2, SC_NS );
+            write( "proc_b - lock requested" );
+            semaphore.wait();
+            write( "proc_b - lock obtained" );
+            wait( 4, SC_NS );
+            if( semaphore.post() == 0 ) {
+                write( "proc_b - unlock successful" );
+            } else {
+                write( "proc_b - unlock failed" );
+            }
+            wait( 3, SC_NS );
+            if( semaphore.trywait() == 0 ) {
+                write( "proc_b - trylock successful" );
+            } else {
+                write( "proc_b - trylock failed" );
+            }
+            if( semaphore.post() == 0 ) {
+                write( "proc_b - unlock successful" );
+            } else {
+                write( "proc_b - unlock failed" );
+            }
+        }
+    }
+
+    SC_CTOR( mod_a )
+    : semaphore( 1 )
+    {
+        SC_THREAD( proc_a );
+        SC_THREAD( proc_b );
+    }
+};
+
+int
+sc_main( int, char*[] )
+{
+    mod_a a( "a" );
+
+    sc_start( 40, SC_NS );
+
+    return 0;
+}
-- 
cgit v1.2.3