112855Sgabeblack@google.com/*****************************************************************************
212855Sgabeblack@google.com
312855Sgabeblack@google.com  Licensed to Accellera Systems Initiative Inc. (Accellera) under one or
412855Sgabeblack@google.com  more contributor license agreements.  See the NOTICE file distributed
512855Sgabeblack@google.com  with this work for additional information regarding copyright ownership.
612855Sgabeblack@google.com  Accellera licenses this file to you under the Apache License, Version 2.0
712855Sgabeblack@google.com  (the "License"); you may not use this file except in compliance with the
812855Sgabeblack@google.com  License.  You may obtain a copy of the License at
912855Sgabeblack@google.com
1012855Sgabeblack@google.com    http://www.apache.org/licenses/LICENSE-2.0
1112855Sgabeblack@google.com
1212855Sgabeblack@google.com  Unless required by applicable law or agreed to in writing, software
1312855Sgabeblack@google.com  distributed under the License is distributed on an "AS IS" BASIS,
1412855Sgabeblack@google.com  WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
1512855Sgabeblack@google.com  implied.  See the License for the specific language governing
1612855Sgabeblack@google.com  permissions and limitations under the License.
1712855Sgabeblack@google.com
1812855Sgabeblack@google.com *****************************************************************************/
1912855Sgabeblack@google.com
2012855Sgabeblack@google.com// recursive_kill_bug.cpp -- test for
2112855Sgabeblack@google.com//
2212855Sgabeblack@google.com//  Original Author: John Aynsley, Doulus
2312855Sgabeblack@google.com//
2412855Sgabeblack@google.com// MODIFICATION LOG - modifiers, enter your name, affiliation, date and
2512855Sgabeblack@google.com//
2612855Sgabeblack@google.com
2712855Sgabeblack@google.com//
2812855Sgabeblack@google.com
2912855Sgabeblack@google.com#define SC_INCLUDE_DYNAMIC_PROCESSES
3012855Sgabeblack@google.com
3112855Sgabeblack@google.com#include <systemc>
3212855Sgabeblack@google.com
3312855Sgabeblack@google.comusing namespace sc_core;
3412855Sgabeblack@google.comusing std::cout;
3512855Sgabeblack@google.comusing std::endl;
3612855Sgabeblack@google.com
3712855Sgabeblack@google.comstruct Top: sc_module
3812855Sgabeblack@google.com{
3912855Sgabeblack@google.com  Top(sc_module_name _name)
4012855Sgabeblack@google.com  {
4112855Sgabeblack@google.com    SC_THREAD(control);
4212855Sgabeblack@google.com
4312855Sgabeblack@google.com    SC_METHOD(caller);
4412855Sgabeblack@google.com      sensitive << ev;
4512855Sgabeblack@google.com      dont_initialize();
4612855Sgabeblack@google.com      caller_handle = sc_get_current_process_handle();
4712855Sgabeblack@google.com
4812855Sgabeblack@google.com    SC_THREAD(target);
4912855Sgabeblack@google.com      target_handle = sc_get_current_process_handle();
5012855Sgabeblack@google.com
5112855Sgabeblack@google.com    count = 0;
5212855Sgabeblack@google.com    f0 = f1 = f2 = f3 = f4 = f5 = f6 = f7 = f8 = f9 = 0;
5312855Sgabeblack@google.com  }
5412855Sgabeblack@google.com
5512855Sgabeblack@google.com  struct bomb
5612855Sgabeblack@google.com  {
5712855Sgabeblack@google.com    sc_process_handle h;
5812855Sgabeblack@google.com
5912855Sgabeblack@google.com    bomb(sc_process_handle _h)
6012855Sgabeblack@google.com    {
6112855Sgabeblack@google.com      h = _h;
6212855Sgabeblack@google.com    }
6312855Sgabeblack@google.com
6412855Sgabeblack@google.com    ~bomb()
6512855Sgabeblack@google.com    {
6612855Sgabeblack@google.com      h.kill();
6712855Sgabeblack@google.com    }
6812855Sgabeblack@google.com  };
6912855Sgabeblack@google.com
7012855Sgabeblack@google.com  sc_process_handle caller_handle;
7112855Sgabeblack@google.com  sc_process_handle target_handle;
7212855Sgabeblack@google.com  int count;
7312855Sgabeblack@google.com  int f0, f1, f2, f3, f4, f5, f6, f7, f8, f9;
7412855Sgabeblack@google.com  sc_event ev;
7512855Sgabeblack@google.com
7612855Sgabeblack@google.com  void control()
7712855Sgabeblack@google.com  {
7812855Sgabeblack@google.com    count = 0;
7912855Sgabeblack@google.com    wait(10, SC_NS);
8012855Sgabeblack@google.com
8112855Sgabeblack@google.com    count = 1;
8212855Sgabeblack@google.com    ev.notify();
8312855Sgabeblack@google.com  }
8412855Sgabeblack@google.com
8512855Sgabeblack@google.com  void caller()
8612855Sgabeblack@google.com  {
8712855Sgabeblack@google.com    f0 = 1;
8812855Sgabeblack@google.com    target_handle.kill();
8912855Sgabeblack@google.com    sc_assert( false );  // FAILS !!!!!!
9012855Sgabeblack@google.com  }
9112855Sgabeblack@google.com
9212855Sgabeblack@google.com  void target()
9312855Sgabeblack@google.com  {
9412855Sgabeblack@google.com    bomb local_obj(caller_handle);
9512855Sgabeblack@google.com    sc_assert( count == 0 );
9612855Sgabeblack@google.com    f1 = 1;
9712855Sgabeblack@google.com    try {
9812855Sgabeblack@google.com      wait(20, SC_NS);
9912855Sgabeblack@google.com    }
10012855Sgabeblack@google.com    catch (const sc_unwind_exception& e) {
10112855Sgabeblack@google.com      sc_assert( count == 1 );
10212855Sgabeblack@google.com      sc_assert( sc_time_stamp() == sc_time(10, SC_NS) );
10312855Sgabeblack@google.com      f2 = 1;
10412855Sgabeblack@google.com      throw e;
10512855Sgabeblack@google.com    }
10612855Sgabeblack@google.com  }
10712855Sgabeblack@google.com
10812855Sgabeblack@google.com  SC_HAS_PROCESS(Top);
10912855Sgabeblack@google.com};
11012855Sgabeblack@google.com
11112855Sgabeblack@google.comint sc_main(int argc, char* argv[])
11212855Sgabeblack@google.com{
11312855Sgabeblack@google.com  Top top("top");
11412855Sgabeblack@google.com
11512855Sgabeblack@google.com  sc_start();
11612855Sgabeblack@google.com
11712855Sgabeblack@google.com  sc_assert( top.f0 );
11812855Sgabeblack@google.com  sc_assert( top.f1 );
11912855Sgabeblack@google.com  sc_assert( top.f2 );
12012855Sgabeblack@google.com
12112855Sgabeblack@google.com  cout << endl << "Success" << endl;
12212855Sgabeblack@google.com  return 0;
12312855Sgabeblack@google.com}
12412855Sgabeblack@google.com
125