1*4cd013cdSAleksandar Markovic /*
2*4cd013cdSAleksandar Markovic  *  Test program for MSA instruction MSUBR_Q.W
3*4cd013cdSAleksandar Markovic  *
4*4cd013cdSAleksandar Markovic  *  Copyright (C) 2019  Wave Computing, Inc.
5*4cd013cdSAleksandar Markovic  *  Copyright (C) 2019  Aleksandar Markovic <amarkovic@wavecomp.com>
6*4cd013cdSAleksandar Markovic  *  Copyright (C) 2019  RT-RK Computer Based Systems LLC
7*4cd013cdSAleksandar Markovic  *  Copyright (C) 2019  Mateja Marjanovic <mateja.marjanovic@rt-rk.com>
8*4cd013cdSAleksandar Markovic  *
9*4cd013cdSAleksandar Markovic  *  This program is free software: you can redistribute it and/or modify
10*4cd013cdSAleksandar Markovic  *  it under the terms of the GNU General Public License as published by
11*4cd013cdSAleksandar Markovic  *  the Free Software Foundation, either version 2 of the License, or
12*4cd013cdSAleksandar Markovic  *  (at your option) any later version.
13*4cd013cdSAleksandar Markovic  *
14*4cd013cdSAleksandar Markovic  *  This program is distributed in the hope that it will be useful,
15*4cd013cdSAleksandar Markovic  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
16*4cd013cdSAleksandar Markovic  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17*4cd013cdSAleksandar Markovic  *  GNU General Public License for more details.
18*4cd013cdSAleksandar Markovic  *
19*4cd013cdSAleksandar Markovic  *  You should have received a copy of the GNU General Public License
20*4cd013cdSAleksandar Markovic  *  along with this program.  If not, see <https://www.gnu.org/licenses/>.
21*4cd013cdSAleksandar Markovic  *
22*4cd013cdSAleksandar Markovic  */
23*4cd013cdSAleksandar Markovic 
24*4cd013cdSAleksandar Markovic #include <sys/time.h>
25*4cd013cdSAleksandar Markovic #include <stdint.h>
26*4cd013cdSAleksandar Markovic 
27*4cd013cdSAleksandar Markovic #include "../../../../include/wrappers_msa.h"
28*4cd013cdSAleksandar Markovic #include "../../../../include/test_inputs_128.h"
29*4cd013cdSAleksandar Markovic #include "../../../../include/test_utils_128.h"
30*4cd013cdSAleksandar Markovic 
31*4cd013cdSAleksandar Markovic #define TEST_COUNT_TOTAL (                                                \
32*4cd013cdSAleksandar Markovic             (PATTERN_INPUTS_SHORT_COUNT) * (PATTERN_INPUTS_SHORT_COUNT) + \
33*4cd013cdSAleksandar Markovic             3 * (RANDOM_INPUTS_SHORT_COUNT) * (RANDOM_INPUTS_SHORT_COUNT))
34*4cd013cdSAleksandar Markovic 
35*4cd013cdSAleksandar Markovic 
main(void)36*4cd013cdSAleksandar Markovic int32_t main(void)
37*4cd013cdSAleksandar Markovic {
38*4cd013cdSAleksandar Markovic     char *isa_ase_name = "MSA";
39*4cd013cdSAleksandar Markovic     char *group_name = "Fixed Multiply";
40*4cd013cdSAleksandar Markovic     char *instruction_name =  "MSUBR_Q.W";
41*4cd013cdSAleksandar Markovic     int32_t ret;
42*4cd013cdSAleksandar Markovic     uint32_t i, j;
43*4cd013cdSAleksandar Markovic     struct timeval start, end;
44*4cd013cdSAleksandar Markovic     double elapsed_time;
45*4cd013cdSAleksandar Markovic 
46*4cd013cdSAleksandar Markovic     uint64_t b128_result[TEST_COUNT_TOTAL][2];
47*4cd013cdSAleksandar Markovic     uint64_t b128_expect[TEST_COUNT_TOTAL][2] = {
48*4cd013cdSAleksandar Markovic         { 0x0000000000000000ULL, 0x0000000000000000ULL, },    /*   0  */
49*4cd013cdSAleksandar Markovic         { 0x0000000000000000ULL, 0x0000000000000000ULL, },
50*4cd013cdSAleksandar Markovic         { 0x0000000100000001ULL, 0x0000000100000001ULL, },
51*4cd013cdSAleksandar Markovic         { 0x0000000000000000ULL, 0x0000000000000000ULL, },
52*4cd013cdSAleksandar Markovic         { 0x0000000000000000ULL, 0x0000000000000000ULL, },
53*4cd013cdSAleksandar Markovic         { 0x0000000000000000ULL, 0x0000000000000000ULL, },
54*4cd013cdSAleksandar Markovic         { 0x0000000000000001ULL, 0x0000000000000000ULL, },
55*4cd013cdSAleksandar Markovic         { 0x0000000000000000ULL, 0x0000000000000000ULL, },
56*4cd013cdSAleksandar Markovic         { 0x0000000000000000ULL, 0x0000000000000000ULL, },    /*   8  */
57*4cd013cdSAleksandar Markovic         { 0x0000000000000000ULL, 0x0000000000000000ULL, },
58*4cd013cdSAleksandar Markovic         { 0x0000000000000000ULL, 0x0000000000000000ULL, },
59*4cd013cdSAleksandar Markovic         { 0x0000000000000000ULL, 0x0000000000000000ULL, },
60*4cd013cdSAleksandar Markovic         { 0x0000000000000000ULL, 0x0000000000000000ULL, },
61*4cd013cdSAleksandar Markovic         { 0x0000000000000000ULL, 0x0000000000000000ULL, },
62*4cd013cdSAleksandar Markovic         { 0x0000000000000000ULL, 0x0000000000000000ULL, },
63*4cd013cdSAleksandar Markovic         { 0x0000000000000000ULL, 0x0000000000000000ULL, },
64*4cd013cdSAleksandar Markovic         { 0x0000000100000001ULL, 0x0000000100000001ULL, },    /*  16  */
65*4cd013cdSAleksandar Markovic         { 0x0000000100000001ULL, 0x0000000100000001ULL, },
66*4cd013cdSAleksandar Markovic         { 0x38e38e3b38e38e3bULL, 0x38e38e3b38e38e3bULL, },
67*4cd013cdSAleksandar Markovic         { 0x0000000200000002ULL, 0x0000000200000002ULL, },
68*4cd013cdSAleksandar Markovic         { 0x2222222522222225ULL, 0x2222222522222225ULL, },
69*4cd013cdSAleksandar Markovic         { 0x0000000300000003ULL, 0x0000000300000003ULL, },
70*4cd013cdSAleksandar Markovic         { 0x12f684c14bda12faULL, 0xda12f68812f684c1ULL, },
71*4cd013cdSAleksandar Markovic         { 0x0000000400000003ULL, 0x0000000400000004ULL, },
72*4cd013cdSAleksandar Markovic         { 0x0000000300000002ULL, 0x0000000300000003ULL, },    /*  24  */
73*4cd013cdSAleksandar Markovic         { 0x0000000300000002ULL, 0x0000000300000003ULL, },
74*4cd013cdSAleksandar Markovic         { 0xc71c71cac71c71c9ULL, 0xc71c71cac71c71caULL, },
75*4cd013cdSAleksandar Markovic         { 0x0000000200000001ULL, 0x0000000200000002ULL, },
76*4cd013cdSAleksandar Markovic         { 0xdddddddfdddddddeULL, 0xdddddddfdddddddfULL, },
77*4cd013cdSAleksandar Markovic         { 0x0000000100000000ULL, 0x0000000100000001ULL, },
78*4cd013cdSAleksandar Markovic         { 0xed097b43b425ed0aULL, 0x25ed097ced097b43ULL, },
79*4cd013cdSAleksandar Markovic         { 0x0000000000000000ULL, 0x0000000100000000ULL, },
80*4cd013cdSAleksandar Markovic         { 0x0000000000000000ULL, 0x0000000100000000ULL, },    /*  32  */
81*4cd013cdSAleksandar Markovic         { 0x0000000000000000ULL, 0x0000000100000000ULL, },
82*4cd013cdSAleksandar Markovic         { 0x2222222322222223ULL, 0x2222222422222223ULL, },
83*4cd013cdSAleksandar Markovic         { 0x0000000000000000ULL, 0x0000000100000000ULL, },
84*4cd013cdSAleksandar Markovic         { 0x147ae148147ae148ULL, 0x147ae149147ae148ULL, },
85*4cd013cdSAleksandar Markovic         { 0x0000000000000000ULL, 0x0000000100000000ULL, },
86*4cd013cdSAleksandar Markovic         { 0x0b60b60c2d82d82eULL, 0xe93e93ea0b60b60cULL, },
87*4cd013cdSAleksandar Markovic         { 0x0000000100000000ULL, 0x0000000100000001ULL, },
88*4cd013cdSAleksandar Markovic         { 0x0000000100000000ULL, 0x0000000100000001ULL, },    /*  40  */
89*4cd013cdSAleksandar Markovic         { 0x0000000100000000ULL, 0x0000000100000001ULL, },
90*4cd013cdSAleksandar Markovic         { 0xdddddddfdddddddeULL, 0xdddddddfdddddddfULL, },
91*4cd013cdSAleksandar Markovic         { 0x0000000100000000ULL, 0x0000000100000001ULL, },
92*4cd013cdSAleksandar Markovic         { 0xeb851eb9eb851eb8ULL, 0xeb851eb9eb851eb9ULL, },
93*4cd013cdSAleksandar Markovic         { 0x0000000100000000ULL, 0x0000000100000001ULL, },
94*4cd013cdSAleksandar Markovic         { 0xf49f49f5d27d27d3ULL, 0x16c16c17f49f49f5ULL, },
95*4cd013cdSAleksandar Markovic         { 0x0000000000000000ULL, 0x0000000000000000ULL, },
96*4cd013cdSAleksandar Markovic         { 0x0000000000000001ULL, 0x0000000000000000ULL, },    /*  48  */
97*4cd013cdSAleksandar Markovic         { 0x0000000000000001ULL, 0x0000000000000000ULL, },
98*4cd013cdSAleksandar Markovic         { 0x12f684be4bda12f8ULL, 0xda12f68512f684beULL, },
99*4cd013cdSAleksandar Markovic         { 0x0000000000000002ULL, 0x0000000000000000ULL, },
100*4cd013cdSAleksandar Markovic         { 0x0b60b60c2d82d830ULL, 0xe93e93e90b60b60cULL, },
101*4cd013cdSAleksandar Markovic         { 0x0000000000000003ULL, 0xffffffff00000000ULL, },
102*4cd013cdSAleksandar Markovic         { 0x06522c3f6522c3f7ULL, 0x1948b0fb06522c3fULL, },
103*4cd013cdSAleksandar Markovic         { 0x0000000000000004ULL, 0xffffffff00000000ULL, },
104*4cd013cdSAleksandar Markovic         { 0x0000000000000003ULL, 0xffffffff00000000ULL, },    /*  56  */
105*4cd013cdSAleksandar Markovic         { 0x0000000000000003ULL, 0xffffffff00000000ULL, },
106*4cd013cdSAleksandar Markovic         { 0xed097b43b425ed0cULL, 0x25ed097bed097b43ULL, },
107*4cd013cdSAleksandar Markovic         { 0x0000000000000002ULL, 0x0000000000000000ULL, },
108*4cd013cdSAleksandar Markovic         { 0xf49f49f5d27d27d4ULL, 0x16c16c17f49f49f5ULL, },
109*4cd013cdSAleksandar Markovic         { 0x0000000000000001ULL, 0x0000000000000000ULL, },
110*4cd013cdSAleksandar Markovic         { 0xf9add3c19add3c0eULL, 0xe6b74f04f9add3c1ULL, },
111*4cd013cdSAleksandar Markovic         { 0x0000000000000000ULL, 0x0000000100000000ULL, },
112*4cd013cdSAleksandar Markovic         { 0x6fb7e8890cbdc0d3ULL, 0x2c6b144700049a05ULL, },    /*  64  */
113*4cd013cdSAleksandar Markovic         { 0x73b239d7253787d5ULL, 0x379780f0ffc424ccULL, },
114*4cd013cdSAleksandar Markovic         { 0x7fffffff0f127795ULL, 0x4f10998300c57f01ULL, },
115*4cd013cdSAleksandar Markovic         { 0x1713a7162cca6b3bULL, 0x0be04ded01cca270ULL, },
116*4cd013cdSAleksandar Markovic         { 0x1b0df8644544323dULL, 0x170cba96018c2d37ULL, },
117*4cd013cdSAleksandar Markovic         { 0x1b323a657448a84fULL, 0x19dc46aa051313c6ULL, },
118*4cd013cdSAleksandar Markovic         { 0x1dfa85ed49be7970ULL, 0x1fc3e135f6fe3018ULL, },
119*4cd013cdSAleksandar Markovic         { 0x1a3e24ca7fffffffULL, 0x0edd19d1e8983ff6ULL, },
120*4cd013cdSAleksandar Markovic         { 0x6863455169daefbfULL, 0x26563264e9999a2bULL, },    /*  72  */
121*4cd013cdSAleksandar Markovic         { 0x6b2b90d93f50c0e0ULL, 0x2c3dccefdb84b67dULL, },
122*4cd013cdSAleksandar Markovic         { 0x7fffffff65cdd2a4ULL, 0x38a5555313bd77c9ULL, },
123*4cd013cdSAleksandar Markovic         { 0x369baa393226e271ULL, 0x1523c34a4d39d0a3ULL, },
124*4cd013cdSAleksandar Markovic         { 0xcdaf51504fded617ULL, 0xd1f377b44e40f412ULL, },
125*4cd013cdSAleksandar Markovic         { 0xc9f2f02d7fffffffULL, 0xc10cb0503fdb03f0ULL, },
126*4cd013cdSAleksandar Markovic         { 0x808e9a674c590fccULL, 0x9d8b1e4779575ccaULL, },
127*4cd013cdSAleksandar Markovic         { 0xe319324b7fffffffULL, 0x032ce4297fffffffULL, },
128*4cd013cdSAleksandar Markovic         { 0xfe196fe67fffffffULL, 0x050bc0417e7bb00bULL, },    /*  80  */
129*4cd013cdSAleksandar Markovic         { 0xfe299f487fffffffULL, 0x05cb2b577fffffffULL, },
130*4cd013cdSAleksandar Markovic         { 0xff5d018339cf8b80ULL, 0x0798e2662b2b2514ULL, },
131*4cd013cdSAleksandar Markovic         { 0xfecdfe20645a7d9bULL, 0x00d3dcf80dea608eULL, },
132*4cd013cdSAleksandar Markovic         { 0xffebe0517fffffffULL, 0x0150ab000dc02968ULL, },
133*4cd013cdSAleksandar Markovic         { 0xffec8baf7fffffffULL, 0x01828ea210087db2ULL, },
134*4cd013cdSAleksandar Markovic         { 0xfff9423c39cf8b80ULL, 0x01fae4c1056841b9ULL, },
135*4cd013cdSAleksandar Markovic         { 0xfff35806645a7d9bULL, 0x003737bc01be3862ULL, },
136*4cd013cdSAleksandar Markovic         { 0xffff2aee7fffffffULL, 0x0057bed801b8eeb0ULL, },    /*  88  */
137*4cd013cdSAleksandar Markovic         { 0xffff32047fffffffULL, 0x0064bf8102021ffcULL, },
138*4cd013cdSAleksandar Markovic         { 0xffffb89f39cf8b80ULL, 0x00841c7a00ad640aULL, },
139*4cd013cdSAleksandar Markovic         { 0xffff79fe645a7d9bULL, 0x000e642f0037e4a6ULL, },
140*4cd013cdSAleksandar Markovic         { 0xfffff7307fffffffULL, 0x0016de7800373b16ULL, },
141*4cd013cdSAleksandar Markovic         { 0xfffff77b7fffffffULL, 0x001a42040040661aULL, },
142*4cd013cdSAleksandar Markovic         { 0xfffffd0c39cf8b80ULL, 0x00226e990015b802ULL, },
143*4cd013cdSAleksandar Markovic         { 0xfffffa75645a7d9bULL, 0x0003c0350007004aULL, },
144*4cd013cdSAleksandar Markovic         { 0xffffffa37fffffffULL, 0x0005f5d90006eb0dULL, },    /*  96  */
145*4cd013cdSAleksandar Markovic         { 0xfffffffa7fffffffULL, 0x000978b30006d610ULL, },
146*4cd013cdSAleksandar Markovic         { 0x000000007fffffffULL, 0x000f0d0c0006c153ULL, },
147*4cd013cdSAleksandar Markovic         { 0x000000007fffffffULL, 0x0017eacf0006acd5ULL, },
148*4cd013cdSAleksandar Markovic         { 0x000000007fffffffULL, 0x001b761e0007c87dULL, },
149*4cd013cdSAleksandar Markovic         { 0x000000007fffffffULL, 0x001f87e00009133bULL, },
150*4cd013cdSAleksandar Markovic         { 0x000000007fffffffULL, 0x00243402000a94e0ULL, },
151*4cd013cdSAleksandar Markovic         { 0x000000007fffffffULL, 0x00299164000c5689ULL, },
152*4cd013cdSAleksandar Markovic         { 0x0000000039cf8b80ULL, 0x003682160004293bULL, },    /* 104  */
153*4cd013cdSAleksandar Markovic         { 0x000000001a1c28c4ULL, 0x00477a0900016741ULL, },
154*4cd013cdSAleksandar Markovic         { 0x000000000bcae026ULL, 0x005dba4500007929ULL, },
155*4cd013cdSAleksandar Markovic         { 0x00000000055376c2ULL, 0x007ae7c2000028ddULL, },
156*4cd013cdSAleksandar Markovic         { 0x00000000093ed557ULL, 0x000d637500000d2cULL, },
157*4cd013cdSAleksandar Markovic         { 0x00000000100c9469ULL, 0x0001755d0000043fULL, },
158*4cd013cdSAleksandar Markovic         { 0x000000001bdc1297ULL, 0x000028ac0000015eULL, },
159*4cd013cdSAleksandar Markovic         { 0x00000000305c8bbfULL, 0x0000046e00000071ULL, },
160*4cd013cdSAleksandar Markovic };
161*4cd013cdSAleksandar Markovic 
162*4cd013cdSAleksandar Markovic     reset_msa_registers();
163*4cd013cdSAleksandar Markovic 
164*4cd013cdSAleksandar Markovic     gettimeofday(&start, NULL);
165*4cd013cdSAleksandar Markovic 
166*4cd013cdSAleksandar Markovic     for (i = 0; i < PATTERN_INPUTS_SHORT_COUNT; i++) {
167*4cd013cdSAleksandar Markovic         for (j = 0; j < PATTERN_INPUTS_SHORT_COUNT; j++) {
168*4cd013cdSAleksandar Markovic             do_msa_MADDR_Q_W(b128_pattern[i], b128_pattern[j],
169*4cd013cdSAleksandar Markovic                              b128_result[PATTERN_INPUTS_SHORT_COUNT * i + j]);
170*4cd013cdSAleksandar Markovic         }
171*4cd013cdSAleksandar Markovic     }
172*4cd013cdSAleksandar Markovic 
173*4cd013cdSAleksandar Markovic     for (i = 0; i < RANDOM_INPUTS_SHORT_COUNT; i++) {
174*4cd013cdSAleksandar Markovic         for (j = 0; j < RANDOM_INPUTS_SHORT_COUNT; j++) {
175*4cd013cdSAleksandar Markovic             do_msa_MADDR_Q_W(b128_random[i], b128_random[j],
176*4cd013cdSAleksandar Markovic                              b128_result[((PATTERN_INPUTS_SHORT_COUNT) *
177*4cd013cdSAleksandar Markovic                                           (PATTERN_INPUTS_SHORT_COUNT)) +
178*4cd013cdSAleksandar Markovic                                          RANDOM_INPUTS_SHORT_COUNT * i + j]);
179*4cd013cdSAleksandar Markovic         }
180*4cd013cdSAleksandar Markovic     }
181*4cd013cdSAleksandar Markovic 
182*4cd013cdSAleksandar Markovic     for (i = 0; i < RANDOM_INPUTS_SHORT_COUNT; i++) {
183*4cd013cdSAleksandar Markovic         for (j = 0; j < RANDOM_INPUTS_SHORT_COUNT; j++) {
184*4cd013cdSAleksandar Markovic             do_msa_MADDR_Q_W__DDT(b128_random[i], b128_random[j],
185*4cd013cdSAleksandar Markovic                                   b128_result[
186*4cd013cdSAleksandar Markovic                                       ((PATTERN_INPUTS_SHORT_COUNT) *
187*4cd013cdSAleksandar Markovic                                        (PATTERN_INPUTS_SHORT_COUNT)) +
188*4cd013cdSAleksandar Markovic                                       ((RANDOM_INPUTS_SHORT_COUNT) *
189*4cd013cdSAleksandar Markovic                                        (RANDOM_INPUTS_SHORT_COUNT)) +
190*4cd013cdSAleksandar Markovic                                       RANDOM_INPUTS_SHORT_COUNT * i + j]);
191*4cd013cdSAleksandar Markovic         }
192*4cd013cdSAleksandar Markovic     }
193*4cd013cdSAleksandar Markovic 
194*4cd013cdSAleksandar Markovic     for (i = 0; i < RANDOM_INPUTS_SHORT_COUNT; i++) {
195*4cd013cdSAleksandar Markovic         for (j = 0; j < RANDOM_INPUTS_SHORT_COUNT; j++) {
196*4cd013cdSAleksandar Markovic             do_msa_MADDR_Q_W__DSD(b128_random[i], b128_random[j],
197*4cd013cdSAleksandar Markovic                                   b128_result[
198*4cd013cdSAleksandar Markovic                                       ((PATTERN_INPUTS_SHORT_COUNT) *
199*4cd013cdSAleksandar Markovic                                        (PATTERN_INPUTS_SHORT_COUNT)) +
200*4cd013cdSAleksandar Markovic                                       (2 * (RANDOM_INPUTS_SHORT_COUNT) *
201*4cd013cdSAleksandar Markovic                                        (RANDOM_INPUTS_SHORT_COUNT)) +
202*4cd013cdSAleksandar Markovic                                       RANDOM_INPUTS_SHORT_COUNT * i + j]);
203*4cd013cdSAleksandar Markovic         }
204*4cd013cdSAleksandar Markovic     }
205*4cd013cdSAleksandar Markovic 
206*4cd013cdSAleksandar Markovic     gettimeofday(&end, NULL);
207*4cd013cdSAleksandar Markovic 
208*4cd013cdSAleksandar Markovic     elapsed_time = (end.tv_sec - start.tv_sec) * 1000.0;
209*4cd013cdSAleksandar Markovic     elapsed_time += (end.tv_usec - start.tv_usec) / 1000.0;
210*4cd013cdSAleksandar Markovic 
211*4cd013cdSAleksandar Markovic     ret = check_results_128(isa_ase_name, group_name, instruction_name,
212*4cd013cdSAleksandar Markovic                             TEST_COUNT_TOTAL, elapsed_time,
213*4cd013cdSAleksandar Markovic                             &b128_result[0][0], &b128_expect[0][0]);
214*4cd013cdSAleksandar Markovic 
215*4cd013cdSAleksandar Markovic     return ret;
216*4cd013cdSAleksandar Markovic }
217