1*4cd013cdSAleksandar Markovic /*
2*4cd013cdSAleksandar Markovic  *  Test program for MSA instruction MSUB_Q.H
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 =  "MSUB_Q.H";
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         { 0xffffffffffffffffULL, 0xffffffffffffffffULL, },    /*   0  */
49*4cd013cdSAleksandar Markovic         { 0xffffffffffffffffULL, 0xffffffffffffffffULL, },
50*4cd013cdSAleksandar Markovic         { 0xfffefffefffefffeULL, 0xfffefffefffefffeULL, },
51*4cd013cdSAleksandar Markovic         { 0xfffefffefffefffeULL, 0xfffefffefffefffeULL, },
52*4cd013cdSAleksandar Markovic         { 0xfffdfffdfffdfffdULL, 0xfffdfffdfffdfffdULL, },
53*4cd013cdSAleksandar Markovic         { 0xfffdfffdfffdfffdULL, 0xfffdfffdfffdfffdULL, },
54*4cd013cdSAleksandar Markovic         { 0xfffcfffdfffcfffcULL, 0xfffdfffcfffcfffdULL, },
55*4cd013cdSAleksandar Markovic         { 0xfffcfffcfffcfffcULL, 0xfffcfffcfffcfffcULL, },
56*4cd013cdSAleksandar Markovic         { 0xfffcfffcfffcfffcULL, 0xfffcfffcfffcfffcULL, },    /*   8  */
57*4cd013cdSAleksandar Markovic         { 0xfffcfffcfffcfffcULL, 0xfffcfffcfffcfffcULL, },
58*4cd013cdSAleksandar Markovic         { 0xfffcfffcfffcfffcULL, 0xfffcfffcfffcfffcULL, },
59*4cd013cdSAleksandar Markovic         { 0xfffcfffcfffcfffcULL, 0xfffcfffcfffcfffcULL, },
60*4cd013cdSAleksandar Markovic         { 0xfffcfffcfffcfffcULL, 0xfffcfffcfffcfffcULL, },
61*4cd013cdSAleksandar Markovic         { 0xfffcfffcfffcfffcULL, 0xfffcfffcfffcfffcULL, },
62*4cd013cdSAleksandar Markovic         { 0xfffcfffcfffcfffcULL, 0xfffcfffcfffcfffcULL, },
63*4cd013cdSAleksandar Markovic         { 0xfffcfffcfffcfffcULL, 0xfffcfffcfffcfffcULL, },
64*4cd013cdSAleksandar Markovic         { 0xfffbfffbfffbfffbULL, 0xfffbfffbfffbfffbULL, },    /*  16  */
65*4cd013cdSAleksandar Markovic         { 0xfffbfffbfffbfffbULL, 0xfffbfffbfffbfffbULL, },
66*4cd013cdSAleksandar Markovic         { 0xc716c716c716c716ULL, 0xc716c716c716c716ULL, },
67*4cd013cdSAleksandar Markovic         { 0xfff9fff9fff9fff9ULL, 0xfff9fff9fff9fff9ULL, },
68*4cd013cdSAleksandar Markovic         { 0xddd6ddd6ddd6ddd6ULL, 0xddd6ddd6ddd6ddd6ULL, },
69*4cd013cdSAleksandar Markovic         { 0xfff8fff8fff8fff8ULL, 0xfff8fff8fff8fff8ULL, },
70*4cd013cdSAleksandar Markovic         { 0xed0125e4b41ced01ULL, 0x25e4b41ced0125e4ULL, },
71*4cd013cdSAleksandar Markovic         { 0xfff7fff6fff6fff7ULL, 0xfff6fff6fff7fff6ULL, },
72*4cd013cdSAleksandar Markovic         { 0xfff7fff6fff6fff7ULL, 0xfff6fff6fff7fff6ULL, },    /*  24  */
73*4cd013cdSAleksandar Markovic         { 0xfff7fff6fff6fff7ULL, 0xfff6fff6fff7fff6ULL, },
74*4cd013cdSAleksandar Markovic         { 0x38da38d938d938daULL, 0x38d938d938da38d9ULL, },
75*4cd013cdSAleksandar Markovic         { 0xfff6fff5fff5fff6ULL, 0xfff5fff5fff6fff5ULL, },
76*4cd013cdSAleksandar Markovic         { 0x2218221722172218ULL, 0x2217221722182217ULL, },
77*4cd013cdSAleksandar Markovic         { 0xfff6fff5fff5fff6ULL, 0xfff5fff5fff6fff5ULL, },
78*4cd013cdSAleksandar Markovic         { 0x12ecda084bcf12ecULL, 0xda084bcf12ecda08ULL, },
79*4cd013cdSAleksandar Markovic         { 0xfff6fff5fff5fff6ULL, 0xfff5fff5fff6fff5ULL, },
80*4cd013cdSAleksandar Markovic         { 0xfff5fff4fff4fff5ULL, 0xfff4fff4fff5fff4ULL, },    /*  32  */
81*4cd013cdSAleksandar Markovic         { 0xfff5fff4fff4fff5ULL, 0xfff4fff4fff5fff4ULL, },
82*4cd013cdSAleksandar Markovic         { 0xddd2ddd1ddd1ddd2ULL, 0xddd1ddd1ddd2ddd1ULL, },
83*4cd013cdSAleksandar Markovic         { 0xfff4fff3fff3fff4ULL, 0xfff3fff3fff4fff3ULL, },
84*4cd013cdSAleksandar Markovic         { 0xeb78eb77eb77eb78ULL, 0xeb77eb77eb78eb77ULL, },
85*4cd013cdSAleksandar Markovic         { 0xfff3fff2fff2fff3ULL, 0xfff2fff2fff3fff2ULL, },
86*4cd013cdSAleksandar Markovic         { 0xf49216b3d26ef492ULL, 0x16b3d26ef49216b3ULL, },
87*4cd013cdSAleksandar Markovic         { 0xfff2fff1fff1fff2ULL, 0xfff1fff1fff2fff1ULL, },
88*4cd013cdSAleksandar Markovic         { 0xfff2fff1fff1fff2ULL, 0xfff1fff1fff2fff1ULL, },    /*  40  */
89*4cd013cdSAleksandar Markovic         { 0xfff2fff1fff1fff2ULL, 0xfff1fff1fff2fff1ULL, },
90*4cd013cdSAleksandar Markovic         { 0x2214221322132214ULL, 0x2213221322142213ULL, },
91*4cd013cdSAleksandar Markovic         { 0xfff2fff1fff1fff2ULL, 0xfff1fff1fff2fff1ULL, },
92*4cd013cdSAleksandar Markovic         { 0x146d146c146c146dULL, 0x146c146c146d146cULL, },
93*4cd013cdSAleksandar Markovic         { 0xfff2fff1fff1fff2ULL, 0xfff1fff1fff2fff1ULL, },
94*4cd013cdSAleksandar Markovic         { 0x0b52e92f2d740b52ULL, 0xe92f2d740b52e92fULL, },
95*4cd013cdSAleksandar Markovic         { 0xfff1fff0fff1fff1ULL, 0xfff0fff1fff1fff0ULL, },
96*4cd013cdSAleksandar Markovic         { 0xfff0fff0fff0fff0ULL, 0xfff0fff0fff0fff0ULL, },    /*  48  */
97*4cd013cdSAleksandar Markovic         { 0xfff0fff0fff0fff0ULL, 0xfff0fff0fff0fff0ULL, },
98*4cd013cdSAleksandar Markovic         { 0xecf925dcb414ecf9ULL, 0x25dcb414ecf925dcULL, },
99*4cd013cdSAleksandar Markovic         { 0xffefffefffeeffefULL, 0xffefffeeffefffefULL, },
100*4cd013cdSAleksandar Markovic         { 0xf48e16b0d26af48eULL, 0x16b0d26af48e16b0ULL, },
101*4cd013cdSAleksandar Markovic         { 0xffeeffeeffedffeeULL, 0xffeeffedffeeffeeULL, },
102*4cd013cdSAleksandar Markovic         { 0xf99be6a59ac8f99bULL, 0xe6a59ac8f99be6a5ULL, },
103*4cd013cdSAleksandar Markovic         { 0xffedffedffebffedULL, 0xffedffebffedffedULL, },
104*4cd013cdSAleksandar Markovic         { 0xffedffecffebffedULL, 0xffecffebffedffecULL, },    /*  56  */
105*4cd013cdSAleksandar Markovic         { 0xffedffecffebffedULL, 0xffecffebffedffecULL, },
106*4cd013cdSAleksandar Markovic         { 0x12e3d9fe4bc512e3ULL, 0xd9fe4bc512e3d9feULL, },
107*4cd013cdSAleksandar Markovic         { 0xffedffebffebffedULL, 0xffebffebffedffebULL, },
108*4cd013cdSAleksandar Markovic         { 0x0b4de9292d6e0b4dULL, 0xe9292d6e0b4de929ULL, },
109*4cd013cdSAleksandar Markovic         { 0xffecffeaffebffecULL, 0xffeaffebffecffeaULL, },
110*4cd013cdSAleksandar Markovic         { 0x063e1932650e063eULL, 0x1932650e063e1932ULL, },
111*4cd013cdSAleksandar Markovic         { 0xffecffe8ffebffecULL, 0xffe8ffebffecffe8ULL, },
112*4cd013cdSAleksandar Markovic         { 0x9032faf1f32dc724ULL, 0xd37cfee8ffe7cdf6ULL, },    /*  64  */
113*4cd013cdSAleksandar Markovic         { 0x8c37fb04dab3ed15ULL, 0xc8500506002701cbULL, },
114*4cd013cdSAleksandar Markovic         { 0x8000eb00f0d83aacULL, 0xb0d70a15ff2518f4ULL, },
115*4cd013cdSAleksandar Markovic         { 0xe8edef64d3204e73ULL, 0xf40714a9fe1d069aULL, },
116*4cd013cdSAleksandar Markovic         { 0xe4f2ef77baa67464ULL, 0xe8db1ac7fe5d3a6fULL, },
117*4cd013cdSAleksandar Markovic         { 0xe4cdef768ba25b09ULL, 0xe60bf5b1fad604a2ULL, },
118*4cd013cdSAleksandar Markovic         { 0xe204efb4b62c272fULL, 0xe023d70208eaec98ULL, },
119*4cd013cdSAleksandar Markovic         { 0xe5c0efa2800019f7ULL, 0xf10996de174fffa3ULL, },
120*4cd013cdSAleksandar Markovic         { 0x9799df9e9625678eULL, 0xd9909bed164d16ccULL, },    /*  72  */
121*4cd013cdSAleksandar Markovic         { 0x94d0dfdcc0af33b4ULL, 0xd3a880002461fec2ULL, },
122*4cd013cdSAleksandar Markovic         { 0x8000ac2c9a31c9abULL, 0xc7408000ec28f404ULL, },
123*4cd013cdSAleksandar Markovic         { 0xc964ba57cdd7aea3ULL, 0xeac18000b2aafc86ULL, },
124*4cd013cdSAleksandar Markovic         { 0x3251bebbb01fc26aULL, 0x2df18a94b1a2ea2cULL, },
125*4cd013cdSAleksandar Markovic         { 0x360dbea98000b532ULL, 0x3ed78000c007fd37ULL, },
126*4cd013cdSAleksandar Markovic         { 0x7f71ccd4b3a69a2aULL, 0x62588000868905b9ULL, },
127*4cd013cdSAleksandar Markovic         { 0x1ce6c8f180009346ULL, 0xfcb580008000fefbULL, },
128*4cd013cdSAleksandar Markovic         { 0x37e5be19a862dbafULL, 0xfea58b5e8000fe57ULL, },    /*  80  */
129*4cd013cdSAleksandar Markovic         { 0x39c0be4bdd7bcb85ULL, 0xfed88000953fff6aULL, },
130*4cd013cdSAleksandar Markovic         { 0x5f7d948aca8d9bc1ULL, 0xff3480008000ff95ULL, },
131*4cd013cdSAleksandar Markovic         { 0x0bb4a742f1e1847fULL, 0xfe7e80008000ff7cULL, },
132*4cd013cdSAleksandar Markovic         { 0x16a395c8f655d6c0ULL, 0xff618b5e8000ff29ULL, },
133*4cd013cdSAleksandar Markovic         { 0x1763961afc30c464ULL, 0xff788000953fffb4ULL, },
134*4cd013cdSAleksandar Markovic         { 0x26ab8000fa188e23ULL, 0xffa280008000ffcaULL, },
135*4cd013cdSAleksandar Markovic         { 0x04bd964dfe708000ULL, 0xff4e80008000ffbdULL, },
136*4cd013cdSAleksandar Markovic         { 0x092a817dfeeed540ULL, 0xffb68b5e8000ff93ULL, },    /*  88  */
137*4cd013cdSAleksandar Markovic         { 0x097881deff94c239ULL, 0xffc08000953fffd9ULL, },
138*4cd013cdSAleksandar Markovic         { 0x0fa88000ff5889feULL, 0xffd380008000ffe4ULL, },
139*4cd013cdSAleksandar Markovic         { 0x01eb964dffd38000ULL, 0xffaa80008000ffddULL, },
140*4cd013cdSAleksandar Markovic         { 0x03b5817dffe1d540ULL, 0xffdc8b5e8000ffc7ULL, },
141*4cd013cdSAleksandar Markovic         { 0x03d481defff3c239ULL, 0xffe18000953fffebULL, },
142*4cd013cdSAleksandar Markovic         { 0x06548000ffeb89feULL, 0xffea80008000fff1ULL, },
143*4cd013cdSAleksandar Markovic         { 0x00c6964dfffa8000ULL, 0xffd680008000ffedULL, },
144*4cd013cdSAleksandar Markovic         { 0x017e817dfffbd540ULL, 0xffee8b5e8000ffe1ULL, },    /*  96  */
145*4cd013cdSAleksandar Markovic         { 0x02e28000fffcf1b8ULL, 0xfff895b98000ffcdULL, },
146*4cd013cdSAleksandar Markovic         { 0x05938000fffdfb3aULL, 0xfffc9f298000ffadULL, },
147*4cd013cdSAleksandar Markovic         { 0x0ac88000fffdfe67ULL, 0xfffea7c28000ff79ULL, },
148*4cd013cdSAleksandar Markovic         { 0x0b238063fffefdb0ULL, 0xfffe8000953fffd0ULL, },
149*4cd013cdSAleksandar Markovic         { 0x0b8180c5fffffca8ULL, 0xfffe8000a6f7ffefULL, },
150*4cd013cdSAleksandar Markovic         { 0x0be28127fffffb2bULL, 0xfffe8000b5befffaULL, },
151*4cd013cdSAleksandar Markovic         { 0x0c478189fffff904ULL, 0xfffe8000c211fffdULL, },
152*4cd013cdSAleksandar Markovic         { 0x144c8000fffef2a8ULL, 0xfffe80009905fffdULL, },    /* 104  */
153*4cd013cdSAleksandar Markovic         { 0x218f8000fffce682ULL, 0xfffe80008000fffdULL, },
154*4cd013cdSAleksandar Markovic         { 0x377d8000fff9cf4eULL, 0xfffe80008000fffdULL, },
155*4cd013cdSAleksandar Markovic         { 0x5bc08000fff5a2fbULL, 0xfffe80008000fffdULL, },
156*4cd013cdSAleksandar Markovic         { 0x0b3f964dfffd8d66ULL, 0xfffc80008000fffcULL, },
157*4cd013cdSAleksandar Markovic         { 0x0160a8b7ffff8000ULL, 0xfff880008000fffbULL, },
158*4cd013cdSAleksandar Markovic         { 0x002bb7ecffff8000ULL, 0xfff080008000fff9ULL, },
159*4cd013cdSAleksandar Markovic         { 0x0005c47affff8000ULL, 0xffe180008000fff7ULL, },
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_MSUB_Q_H(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_MSUB_Q_H(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_MSUB_Q_H__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_MSUB_Q_H__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