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/*****************************************************************************
2112855Sgabeblack@google.com
2212855Sgabeblack@google.com  gcd.cpp --
2312855Sgabeblack@google.com
2412855Sgabeblack@google.com  Original Author: Martin Janssen, Synopsys, Inc., 2002-02-15
2512855Sgabeblack@google.com
2612855Sgabeblack@google.com *****************************************************************************/
2712855Sgabeblack@google.com
2812855Sgabeblack@google.com/*****************************************************************************
2912855Sgabeblack@google.com
3012855Sgabeblack@google.com  MODIFICATION LOG - modifiers, enter your name, affiliation, date and
3112855Sgabeblack@google.com  changes you are making here.
3212855Sgabeblack@google.com
3312855Sgabeblack@google.com      Name, Affiliation, Date:
3412855Sgabeblack@google.com  Description of Modification:
3512855Sgabeblack@google.com
3612855Sgabeblack@google.com *****************************************************************************/
3712855Sgabeblack@google.com
3812855Sgabeblack@google.com#include "systemc.h"
3912855Sgabeblack@google.com
4012855Sgabeblack@google.comSC_MODULE( gcd_cc )
4112855Sgabeblack@google.com{
4212855Sgabeblack@google.com    SC_HAS_PROCESS( gcd_cc );
4312855Sgabeblack@google.com
4412855Sgabeblack@google.com    sc_in_clk clk;
4512855Sgabeblack@google.com
4612855Sgabeblack@google.com    const sc_signal<bool>& reset;
4712855Sgabeblack@google.com    const sc_signal<unsigned>& a;
4812855Sgabeblack@google.com    const sc_signal<unsigned>& b;
4912855Sgabeblack@google.com          sc_signal<unsigned>& c;
5012855Sgabeblack@google.com          sc_signal<bool>&     ready;
5112855Sgabeblack@google.com
5212855Sgabeblack@google.com    gcd_cc( sc_module_name NAME,
5312855Sgabeblack@google.com            sc_clock& CLK,
5412855Sgabeblack@google.com            const sc_signal<bool>& RESET,
5512855Sgabeblack@google.com            const sc_signal<unsigned>& A,
5612855Sgabeblack@google.com            const sc_signal<unsigned>& B,
5712855Sgabeblack@google.com            sc_signal<unsigned>& C,
5812855Sgabeblack@google.com            sc_signal<bool>&     READY )
5912855Sgabeblack@google.com        :
6012855Sgabeblack@google.com          reset(RESET),
6112855Sgabeblack@google.com          a(A),
6212855Sgabeblack@google.com          b(B),
6312855Sgabeblack@google.com          c(C),
6412855Sgabeblack@google.com          ready(READY)
6512855Sgabeblack@google.com    {
6612855Sgabeblack@google.com        clk( CLK );
6712855Sgabeblack@google.com		SC_CTHREAD( entry, clk.pos() );
6812855Sgabeblack@google.com        reset_signal_is(reset,true);
6912855Sgabeblack@google.com    }
7012855Sgabeblack@google.com
7112855Sgabeblack@google.com    void entry();
7212855Sgabeblack@google.com};
7312855Sgabeblack@google.com
7412855Sgabeblack@google.comvoid
7512855Sgabeblack@google.comgcd_cc::entry()
7612855Sgabeblack@google.com{
7712855Sgabeblack@google.com    unsigned tmp_a;
7812855Sgabeblack@google.com    wait();         // Note that this wait() is required, otherwise,
7912855Sgabeblack@google.com                    // the reset is wrong!  This is a problem with BC,
8012855Sgabeblack@google.com                    // not our frontend.
8112855Sgabeblack@google.com
8212855Sgabeblack@google.com    while (true) {
8312855Sgabeblack@google.com        unsigned tmp_b;
8412855Sgabeblack@google.com
8512855Sgabeblack@google.com        c = tmp_a;
8612855Sgabeblack@google.com        ready = true;
8712855Sgabeblack@google.com        wait();
8812855Sgabeblack@google.com
8912855Sgabeblack@google.com        tmp_a = a;
9012855Sgabeblack@google.com        tmp_b = b;
9112855Sgabeblack@google.com        ready = false;
9212855Sgabeblack@google.com        wait();
9312855Sgabeblack@google.com
9412855Sgabeblack@google.com        while (tmp_b != 0) {
9512855Sgabeblack@google.com
9612855Sgabeblack@google.com            unsigned tmp_c = tmp_a;
9712855Sgabeblack@google.com            tmp_a = tmp_b;
9812855Sgabeblack@google.com            wait();
9912855Sgabeblack@google.com
10012855Sgabeblack@google.com            while (tmp_c >= tmp_b) {
10112855Sgabeblack@google.com                tmp_c = tmp_c - tmp_b;
10212855Sgabeblack@google.com                wait();
10312855Sgabeblack@google.com            }
10412855Sgabeblack@google.com
10512855Sgabeblack@google.com            tmp_b = tmp_c;
10612855Sgabeblack@google.com            wait();
10712855Sgabeblack@google.com        }
10812855Sgabeblack@google.com    }
10912855Sgabeblack@google.com}
11012855Sgabeblack@google.com
11112855Sgabeblack@google.comint sc_main(int argc, char* argv[] )
11212855Sgabeblack@google.com{
11312855Sgabeblack@google.com  return 0;
11412855Sgabeblack@google.com}
115