1 /*
2  *  Test program for MSA instruction PCKOD.H
3  *
4  *  Copyright (C) 2019  Wave Computing, Inc.
5  *  Copyright (C) 2019  Aleksandar Markovic <amarkovic@wavecomp.com>
6  *
7  *  This program is free software: you can redistribute it and/or modify
8  *  it under the terms of the GNU General Public License as published by
9  *  the Free Software Foundation, either version 2 of the License, or
10  *  (at your option) any later version.
11  *`
12  *  This program is distributed in the hope that it will be useful,
13  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
14  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  *  GNU General Public License for more details.
16  *
17  *  You should have received a copy of the GNU General Public License
18  *  along with this program.  If not, see <https://www.gnu.org/licenses/>.
19  *
20  */
21 
22 #include <sys/time.h>
23 #include <stdint.h>
24 
25 #include "../../../../include/wrappers_msa.h"
26 #include "../../../../include/test_inputs_128.h"
27 #include "../../../../include/test_utils_128.h"
28 
29 #define TEST_COUNT_TOTAL (                                                \
30             (PATTERN_INPUTS_SHORT_COUNT) * (PATTERN_INPUTS_SHORT_COUNT) + \
31             3 * (RANDOM_INPUTS_SHORT_COUNT) * (RANDOM_INPUTS_SHORT_COUNT))
32 
33 
34 int32_t main(void)
35 {
36     char *isa_ase_name = "MSA";
37     char *group_name = "Pack";
38     char *instruction_name =  "PCKOD.H";
39     int32_t ret;
40     uint32_t i, j;
41     struct timeval start, end;
42     double elapsed_time;
43 
44     uint64_t b128_result[TEST_COUNT_TOTAL][2];
45     uint64_t b128_expect[TEST_COUNT_TOTAL][2] = {
46         { 0xffffffffffffffffULL, 0xffffffffffffffffULL, },    /*   0  */
47         { 0x0000000000000000ULL, 0xffffffffffffffffULL, },
48         { 0xaaaaaaaaaaaaaaaaULL, 0xffffffffffffffffULL, },
49         { 0x5555555555555555ULL, 0xffffffffffffffffULL, },
50         { 0xccccccccccccccccULL, 0xffffffffffffffffULL, },
51         { 0x3333333333333333ULL, 0xffffffffffffffffULL, },
52         { 0x38e3e38ee38e8e38ULL, 0xffffffffffffffffULL, },
53         { 0xc71c1c711c7171c7ULL, 0xffffffffffffffffULL, },
54         { 0xffffffffffffffffULL, 0x0000000000000000ULL, },    /*   8  */
55         { 0x0000000000000000ULL, 0x0000000000000000ULL, },
56         { 0xaaaaaaaaaaaaaaaaULL, 0x0000000000000000ULL, },
57         { 0x5555555555555555ULL, 0x0000000000000000ULL, },
58         { 0xccccccccccccccccULL, 0x0000000000000000ULL, },
59         { 0x3333333333333333ULL, 0x0000000000000000ULL, },
60         { 0x38e3e38ee38e8e38ULL, 0x0000000000000000ULL, },
61         { 0xc71c1c711c7171c7ULL, 0x0000000000000000ULL, },
62         { 0xffffffffffffffffULL, 0xaaaaaaaaaaaaaaaaULL, },    /*  16  */
63         { 0x0000000000000000ULL, 0xaaaaaaaaaaaaaaaaULL, },
64         { 0xaaaaaaaaaaaaaaaaULL, 0xaaaaaaaaaaaaaaaaULL, },
65         { 0x5555555555555555ULL, 0xaaaaaaaaaaaaaaaaULL, },
66         { 0xccccccccccccccccULL, 0xaaaaaaaaaaaaaaaaULL, },
67         { 0x3333333333333333ULL, 0xaaaaaaaaaaaaaaaaULL, },
68         { 0x38e3e38ee38e8e38ULL, 0xaaaaaaaaaaaaaaaaULL, },
69         { 0xc71c1c711c7171c7ULL, 0xaaaaaaaaaaaaaaaaULL, },
70         { 0xffffffffffffffffULL, 0x5555555555555555ULL, },    /*  24  */
71         { 0x0000000000000000ULL, 0x5555555555555555ULL, },
72         { 0xaaaaaaaaaaaaaaaaULL, 0x5555555555555555ULL, },
73         { 0x5555555555555555ULL, 0x5555555555555555ULL, },
74         { 0xccccccccccccccccULL, 0x5555555555555555ULL, },
75         { 0x3333333333333333ULL, 0x5555555555555555ULL, },
76         { 0x38e3e38ee38e8e38ULL, 0x5555555555555555ULL, },
77         { 0xc71c1c711c7171c7ULL, 0x5555555555555555ULL, },
78         { 0xffffffffffffffffULL, 0xccccccccccccccccULL, },    /*  32  */
79         { 0x0000000000000000ULL, 0xccccccccccccccccULL, },
80         { 0xaaaaaaaaaaaaaaaaULL, 0xccccccccccccccccULL, },
81         { 0x5555555555555555ULL, 0xccccccccccccccccULL, },
82         { 0xccccccccccccccccULL, 0xccccccccccccccccULL, },
83         { 0x3333333333333333ULL, 0xccccccccccccccccULL, },
84         { 0x38e3e38ee38e8e38ULL, 0xccccccccccccccccULL, },
85         { 0xc71c1c711c7171c7ULL, 0xccccccccccccccccULL, },
86         { 0xffffffffffffffffULL, 0x3333333333333333ULL, },    /*  40  */
87         { 0x0000000000000000ULL, 0x3333333333333333ULL, },
88         { 0xaaaaaaaaaaaaaaaaULL, 0x3333333333333333ULL, },
89         { 0x5555555555555555ULL, 0x3333333333333333ULL, },
90         { 0xccccccccccccccccULL, 0x3333333333333333ULL, },
91         { 0x3333333333333333ULL, 0x3333333333333333ULL, },
92         { 0x38e3e38ee38e8e38ULL, 0x3333333333333333ULL, },
93         { 0xc71c1c711c7171c7ULL, 0x3333333333333333ULL, },
94         { 0xffffffffffffffffULL, 0x38e3e38ee38e8e38ULL, },    /*  48  */
95         { 0x0000000000000000ULL, 0x38e3e38ee38e8e38ULL, },
96         { 0xaaaaaaaaaaaaaaaaULL, 0x38e3e38ee38e8e38ULL, },
97         { 0x5555555555555555ULL, 0x38e3e38ee38e8e38ULL, },
98         { 0xccccccccccccccccULL, 0x38e3e38ee38e8e38ULL, },
99         { 0x3333333333333333ULL, 0x38e3e38ee38e8e38ULL, },
100         { 0x38e3e38ee38e8e38ULL, 0x38e3e38ee38e8e38ULL, },
101         { 0xc71c1c711c7171c7ULL, 0x38e3e38ee38e8e38ULL, },
102         { 0xffffffffffffffffULL, 0xc71c1c711c7171c7ULL, },    /*  56  */
103         { 0x0000000000000000ULL, 0xc71c1c711c7171c7ULL, },
104         { 0xaaaaaaaaaaaaaaaaULL, 0xc71c1c711c7171c7ULL, },
105         { 0x5555555555555555ULL, 0xc71c1c711c7171c7ULL, },
106         { 0xccccccccccccccccULL, 0xc71c1c711c7171c7ULL, },
107         { 0x3333333333333333ULL, 0xc71c1c711c7171c7ULL, },
108         { 0x38e3e38ee38e8e38ULL, 0xc71c1c711c7171c7ULL, },
109         { 0xc71c1c711c7171c7ULL, 0xc71c1c711c7171c7ULL, },
110         { 0x4b67fe7b886a2862ULL, 0x4b67fe7b886a2862ULL, },    /*  64  */
111         { 0x12f7153ffbbe4d93ULL, 0x4b67fe7b886a2862ULL, },
112         { 0x27d8ab2bac5ab9cfULL, 0x4b67fe7b886a2862ULL, },
113         { 0x8df1a942704f5e31ULL, 0x4b67fe7b886a2862ULL, },
114         { 0x4b67fe7b886a2862ULL, 0x12f7153ffbbe4d93ULL, },
115         { 0x12f7153ffbbe4d93ULL, 0x12f7153ffbbe4d93ULL, },
116         { 0x27d8ab2bac5ab9cfULL, 0x12f7153ffbbe4d93ULL, },
117         { 0x8df1a942704f5e31ULL, 0x12f7153ffbbe4d93ULL, },
118         { 0x4b67fe7b886a2862ULL, 0x27d8ab2bac5ab9cfULL, },    /*  72  */
119         { 0x12f7153ffbbe4d93ULL, 0x27d8ab2bac5ab9cfULL, },
120         { 0x27d8ab2bac5ab9cfULL, 0x27d8ab2bac5ab9cfULL, },
121         { 0x8df1a942704f5e31ULL, 0x27d8ab2bac5ab9cfULL, },
122         { 0x4b67fe7b886a2862ULL, 0x8df1a942704f5e31ULL, },
123         { 0x12f7153ffbbe4d93ULL, 0x8df1a942704f5e31ULL, },
124         { 0x27d8ab2bac5ab9cfULL, 0x8df1a942704f5e31ULL, },
125         { 0x8df1a942704f5e31ULL, 0x8df1a942704f5e31ULL, },
126         { 0x4b67fe7b886a2862ULL, 0x8df1704f8df1704fULL, },    /*  80  */
127         { 0x12f7153ffbbe4d93ULL, 0x8df18df14b67886aULL, },
128         { 0x27d8ab2bac5ab9cfULL, 0x8df14b6712f7fbbeULL, },
129         { 0x8df1a942704f5e31ULL, 0x8df112f727d8ac5aULL, },
130         { 0x4b67fe7b886a2862ULL, 0x8df127d88df1704fULL, },
131         { 0x12f7153ffbbe4d93ULL, 0x8df18df14b67886aULL, },
132         { 0x27d8ab2bac5ab9cfULL, 0x8df14b6712f7fbbeULL, },
133         { 0x8df1a942704f5e31ULL, 0x8df112f727d8ac5aULL, },
134         { 0x4b67fe7b886a2862ULL, 0x8df127d88df1704fULL, },    /*  88  */
135         { 0x12f7153ffbbe4d93ULL, 0x8df18df14b67886aULL, },
136         { 0x27d8ab2bac5ab9cfULL, 0x8df14b6712f7fbbeULL, },
137         { 0x8df1a942704f5e31ULL, 0x8df112f727d8ac5aULL, },
138         { 0x4b67fe7b886a2862ULL, 0x8df127d88df1704fULL, },
139         { 0x12f7153ffbbe4d93ULL, 0x8df18df14b67886aULL, },
140         { 0x27d8ab2bac5ab9cfULL, 0x8df14b6712f7fbbeULL, },
141         { 0x8df1a942704f5e31ULL, 0x8df112f727d8ac5aULL, },
142         { 0x8df127d88df1704fULL, 0x4b67fe7b886a2862ULL, },    /*  96  */
143         { 0x4b67886a8df18df1ULL, 0x4b67fe7b886a2862ULL, },
144         { 0x4b67886a4b678df1ULL, 0x4b67fe7b886a2862ULL, },
145         { 0x4b67886a4b674b67ULL, 0x4b67fe7b886a2862ULL, },
146         { 0x4b67886a4b674b67ULL, 0x12f7153ffbbe4d93ULL, },
147         { 0x12f7fbbe4b674b67ULL, 0x12f7153ffbbe4d93ULL, },
148         { 0x12f7fbbe12f74b67ULL, 0x12f7153ffbbe4d93ULL, },
149         { 0x12f7fbbe12f712f7ULL, 0x12f7153ffbbe4d93ULL, },
150         { 0x12f7fbbe12f712f7ULL, 0x27d8ab2bac5ab9cfULL, },    /* 104  */
151         { 0x27d8ac5a12f712f7ULL, 0x27d8ab2bac5ab9cfULL, },
152         { 0x27d8ac5a27d812f7ULL, 0x27d8ab2bac5ab9cfULL, },
153         { 0x27d8ac5a27d827d8ULL, 0x27d8ab2bac5ab9cfULL, },
154         { 0x27d8ac5a27d827d8ULL, 0x8df1a942704f5e31ULL, },
155         { 0x8df1704f27d827d8ULL, 0x8df1a942704f5e31ULL, },
156         { 0x8df1704f8df127d8ULL, 0x8df1a942704f5e31ULL, },
157         { 0x8df1704f8df18df1ULL, 0x8df1a942704f5e31ULL, },
158     };
159 
160     reset_msa_registers();
161 
162     gettimeofday(&start, NULL);
163 
164     for (i = 0; i < PATTERN_INPUTS_SHORT_COUNT; i++) {
165         for (j = 0; j < PATTERN_INPUTS_SHORT_COUNT; j++) {
166             do_msa_PCKOD_H(b128_pattern[i], b128_pattern[j],
167                            b128_result[PATTERN_INPUTS_SHORT_COUNT * i + j]);
168         }
169     }
170 
171     for (i = 0; i < RANDOM_INPUTS_SHORT_COUNT; i++) {
172         for (j = 0; j < RANDOM_INPUTS_SHORT_COUNT; j++) {
173             do_msa_PCKOD_H(b128_random[i], b128_random[j],
174                            b128_result[((PATTERN_INPUTS_SHORT_COUNT) *
175                                         (PATTERN_INPUTS_SHORT_COUNT)) +
176                                        RANDOM_INPUTS_SHORT_COUNT * i + j]);
177         }
178     }
179 
180     for (i = 0; i < RANDOM_INPUTS_SHORT_COUNT; i++) {
181         for (j = 0; j < RANDOM_INPUTS_SHORT_COUNT; j++) {
182             do_msa_PCKOD_H__DDT(b128_random[i], b128_random[j],
183                                 b128_result[
184                                     ((PATTERN_INPUTS_SHORT_COUNT) *
185                                      (PATTERN_INPUTS_SHORT_COUNT)) +
186                                     ((RANDOM_INPUTS_SHORT_COUNT) *
187                                      (RANDOM_INPUTS_SHORT_COUNT)) +
188                                     RANDOM_INPUTS_SHORT_COUNT * i + j]);
189         }
190     }
191 
192     for (i = 0; i < RANDOM_INPUTS_SHORT_COUNT; i++) {
193         for (j = 0; j < RANDOM_INPUTS_SHORT_COUNT; j++) {
194             do_msa_PCKOD_H__DSD(b128_random[i], b128_random[j],
195                                 b128_result[
196                                     ((PATTERN_INPUTS_SHORT_COUNT) *
197                                      (PATTERN_INPUTS_SHORT_COUNT)) +
198                                     (2 * (RANDOM_INPUTS_SHORT_COUNT) *
199                                      (RANDOM_INPUTS_SHORT_COUNT)) +
200                                     RANDOM_INPUTS_SHORT_COUNT * i + j]);
201         }
202     }
203 
204     gettimeofday(&end, NULL);
205 
206     elapsed_time = (end.tv_sec - start.tv_sec) * 1000.0;
207     elapsed_time += (end.tv_usec - start.tv_usec) / 1000.0;
208 
209     ret = check_results_128(isa_ase_name, group_name, instruction_name,
210                             TEST_COUNT_TOTAL, elapsed_time,
211                             &b128_result[0][0], &b128_expect[0][0]);
212 
213     return ret;
214 }
215