arith03.cpp revision 12855:588919e0e4aa 
1/*****************************************************************************
2
3  Licensed to Accellera Systems Initiative Inc. (Accellera) under one or
4  more contributor license agreements.  See the NOTICE file distributed
5  with this work for additional information regarding copyright ownership.
6  Accellera licenses this file to you under the Apache License, Version 2.0
7  (the "License"); you may not use this file except in compliance with the
8  License.  You may obtain a copy of the License at
9
10    http://www.apache.org/licenses/LICENSE-2.0
11
12  Unless required by applicable law or agreed to in writing, software
13  distributed under the License is distributed on an "AS IS" BASIS,
14  WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
15  implied.  See the License for the specific language governing
16  permissions and limitations under the License.
17
18 *****************************************************************************/
19
20/*****************************************************************************
21
22  arith03.cpp --
23
24  Original Author: Martin Janssen, Synopsys, Inc., 2002-02-15
25
26 *****************************************************************************/
27
28/*****************************************************************************
29
30  MODIFICATION LOG - modifiers, enter your name, affiliation, date and
31  changes you are making here.
32
33      Name, Affiliation, Date:
34  Description of Modification:
35
36 *****************************************************************************/
37
38#include <stdlib.h>
39#include "systemc.h"
40#include "isaac.h"
41
42QTIsaac<8> rng;		// Platform independent random number generator.
43
44#define TEST(A,B) \
45{ \
46	if ( A != B ) \
47		cout << #A << " (" << hex << A << ") != " << #B << "(" << hex << B << ")" << endl; \
48}
49
50#define TESTA(A,B,C) \
51{ \
52	if ( A != (B-C) ) \
53		cout << #A << " (" << hex << A << ") != " << hex << B-C << " " << B << " " << C << endl; \
54}
55
56int
57sc_main( int argc, char* argv[] )
58{
59    unsigned vali[5] = { 0, 1, (unsigned) -1, 7, (unsigned)-8 };
60    unsigned valj[5] = { 0, 1, (unsigned) -1, 7, (unsigned)-8 };
61
62    for (int i = 3; i < 32; ++i) {
63        for (int j = 3; j < 32; ++j) {
64            cout << "i = " << i << ", j = " << j << endl;
65
66            sc_unsigned x(i);
67            sc_unsigned y(j);
68            sc_unsigned z(64);
69
70            vali[3] = (1 << (i - 1)) - 1;
71            vali[4] = - (1 << (i - 1));
72
73            valj[3] = (1 << (j - 1)) - 1;
74            valj[4] = - (1 << (j - 1));
75
76            for (int ii = 0; ii < 100; ++ii) {
77                for (int jj = 0; jj < 100; ++jj) {
78                    unsigned qi = (ii < 5) ? vali[ii] : (rng.rand() & ((1 << i) - 1));
79                    unsigned qj = (jj < 5) ? valj[jj] : (rng.rand() & ((1 << j) - 1));
80
81                    if (qi & (1 << (i - 1))) {
82                        qi = (qi << (32 - i)) >> (32 - i);
83                    }
84                    if (qj & (1 << (j - 1))) {
85                        qj = (qj << (32 - j)) >> (32 - j);
86                    }
87
88                    x = qi;
89                    TEST(x,qi);
90                    y = qj;
91                    TEST(y,qj);
92                    z = x + y;
93                    TEST((sc_unsigned)( z.range(31,0) ),(qi + qj));
94                    z = x - y;
95                    // TEST((sc_unsigned)( z.range(31,0) ),(qi - qj));
96                    TESTA((sc_unsigned)( z.range(31,0) ),qi,qj);
97                    z = x * y;
98                    TEST((sc_unsigned)( z.range(31,0) ),
99			    (qi * qj) );
100                    if (y != 0) {
101                        z = x / y;
102                        TEST((sc_unsigned)( z.range(31,0) ),(qi/qj));
103                        z = x % y;
104                        TEST((sc_unsigned)( z.range(31,0) ),(qi%qj));
105                    }
106                    z = x & y;
107                    TEST( (sc_unsigned)( z.range(31,0) ), (qi & qj) );
108                    z = x | y;
109                    TEST((sc_unsigned)( z.range(31,0) ), (qi | qj) );
110                    z = x ^ y;
111                    TEST((sc_unsigned)( z.range(31,0) ), (qi ^ qj) );
112                    if (jj < i - 1) {
113                        z = x << jj;
114                        for (int r = 0; r < i; ++r) {
115                            TEST((bool) z[r],!!((qi << jj) & (1 << r)) );
116                        }
117                        z = x >> jj;
118                        for (int r = 0; r < i; ++r) {
119                            TEST((bool) z[r],!!((qi >> jj) & (1 << r)) );
120                        }
121                    }
122                }
123            }
124        }
125    }
126    return 0;
127}
128