10fdd986aSMateja Marjanovic /*
20fdd986aSMateja Marjanovic  *  Test program for MSA instruction HADD_S.D
30fdd986aSMateja Marjanovic  *
4*dd8d6a2dSAleksandar Markovic  *  Copyright (C) 2019  RT-RK Computer Based Systems LLC
50fdd986aSMateja Marjanovic  *  Copyright (C) 2019  Mateja Marjanovic <mateja.marjanovic@rt-rk.com>
60fdd986aSMateja Marjanovic  *
70fdd986aSMateja Marjanovic  *  This program is free software: you can redistribute it and/or modify
80fdd986aSMateja Marjanovic  *  it under the terms of the GNU General Public License as published by
90fdd986aSMateja Marjanovic  *  the Free Software Foundation, either version 2 of the License, or
100fdd986aSMateja Marjanovic  *  (at your option) any later version.
110fdd986aSMateja Marjanovic  *
120fdd986aSMateja Marjanovic  *  This program is distributed in the hope that it will be useful,
130fdd986aSMateja Marjanovic  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
140fdd986aSMateja Marjanovic  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
150fdd986aSMateja Marjanovic  *  GNU General Public License for more details.
160fdd986aSMateja Marjanovic  *
170fdd986aSMateja Marjanovic  *  You should have received a copy of the GNU General Public License
180fdd986aSMateja Marjanovic  *  along with this program.  If not, see <https://www.gnu.org/licenses/>.
190fdd986aSMateja Marjanovic  *
200fdd986aSMateja Marjanovic  */
210fdd986aSMateja Marjanovic 
220fdd986aSMateja Marjanovic #include <sys/time.h>
230fdd986aSMateja Marjanovic #include <stdint.h>
240fdd986aSMateja Marjanovic 
250fdd986aSMateja Marjanovic #include "../../../../include/wrappers_msa.h"
260fdd986aSMateja Marjanovic #include "../../../../include/test_inputs.h"
270fdd986aSMateja Marjanovic #include "../../../../include/test_utils.h"
280fdd986aSMateja Marjanovic 
290fdd986aSMateja Marjanovic #define TEST_COUNT_TOTAL (                                                \
300fdd986aSMateja Marjanovic             (PATTERN_INPUTS_SHORT_COUNT) * (PATTERN_INPUTS_SHORT_COUNT) + \
310fdd986aSMateja Marjanovic             (RANDOM_INPUTS_SHORT_COUNT) * (RANDOM_INPUTS_SHORT_COUNT))
320fdd986aSMateja Marjanovic 
330fdd986aSMateja Marjanovic 
340fdd986aSMateja Marjanovic int32_t main(void)
350fdd986aSMateja Marjanovic {
360fdd986aSMateja Marjanovic     char *instruction_name = "HADD_S.D";
370fdd986aSMateja Marjanovic     int32_t ret;
380fdd986aSMateja Marjanovic     uint32_t i, j;
390fdd986aSMateja Marjanovic     struct timeval start, end;
400fdd986aSMateja Marjanovic     double elapsed_time;
410fdd986aSMateja Marjanovic 
420fdd986aSMateja Marjanovic     uint64_t b128_result[TEST_COUNT_TOTAL][2];
430fdd986aSMateja Marjanovic     uint64_t b128_expect[TEST_COUNT_TOTAL][2] = {
440fdd986aSMateja Marjanovic         { 0xfffffffffffffffeULL, 0xfffffffffffffffeULL, },    /*   0  */
450fdd986aSMateja Marjanovic         { 0xffffffffffffffffULL, 0xffffffffffffffffULL, },
460fdd986aSMateja Marjanovic         { 0xffffffffaaaaaaa9ULL, 0xffffffffaaaaaaa9ULL, },
470fdd986aSMateja Marjanovic         { 0x0000000055555554ULL, 0x0000000055555554ULL, },
480fdd986aSMateja Marjanovic         { 0xffffffffcccccccbULL, 0xffffffffcccccccbULL, },
490fdd986aSMateja Marjanovic         { 0x0000000033333332ULL, 0x0000000033333332ULL, },
500fdd986aSMateja Marjanovic         { 0xffffffff8e38e38dULL, 0xffffffffe38e38e2ULL, },
510fdd986aSMateja Marjanovic         { 0x0000000071c71c70ULL, 0x000000001c71c71bULL, },
520fdd986aSMateja Marjanovic         { 0xffffffffffffffffULL, 0xffffffffffffffffULL, },    /*   8  */
530fdd986aSMateja Marjanovic         { 0x0000000000000000ULL, 0x0000000000000000ULL, },
540fdd986aSMateja Marjanovic         { 0xffffffffaaaaaaaaULL, 0xffffffffaaaaaaaaULL, },
550fdd986aSMateja Marjanovic         { 0x0000000055555555ULL, 0x0000000055555555ULL, },
560fdd986aSMateja Marjanovic         { 0xffffffffccccccccULL, 0xffffffffccccccccULL, },
570fdd986aSMateja Marjanovic         { 0x0000000033333333ULL, 0x0000000033333333ULL, },
580fdd986aSMateja Marjanovic         { 0xffffffff8e38e38eULL, 0xffffffffe38e38e3ULL, },
590fdd986aSMateja Marjanovic         { 0x0000000071c71c71ULL, 0x000000001c71c71cULL, },
600fdd986aSMateja Marjanovic         { 0xffffffffaaaaaaa9ULL, 0xffffffffaaaaaaa9ULL, },    /*  16  */
610fdd986aSMateja Marjanovic         { 0xffffffffaaaaaaaaULL, 0xffffffffaaaaaaaaULL, },
620fdd986aSMateja Marjanovic         { 0xffffffff55555554ULL, 0xffffffff55555554ULL, },
630fdd986aSMateja Marjanovic         { 0xffffffffffffffffULL, 0xffffffffffffffffULL, },
640fdd986aSMateja Marjanovic         { 0xffffffff77777776ULL, 0xffffffff77777776ULL, },
650fdd986aSMateja Marjanovic         { 0xffffffffddddddddULL, 0xffffffffddddddddULL, },
660fdd986aSMateja Marjanovic         { 0xffffffff38e38e38ULL, 0xffffffff8e38e38dULL, },
670fdd986aSMateja Marjanovic         { 0x000000001c71c71bULL, 0xffffffffc71c71c6ULL, },
680fdd986aSMateja Marjanovic         { 0x0000000055555554ULL, 0x0000000055555554ULL, },    /*  24  */
690fdd986aSMateja Marjanovic         { 0x0000000055555555ULL, 0x0000000055555555ULL, },
700fdd986aSMateja Marjanovic         { 0xffffffffffffffffULL, 0xffffffffffffffffULL, },
710fdd986aSMateja Marjanovic         { 0x00000000aaaaaaaaULL, 0x00000000aaaaaaaaULL, },
720fdd986aSMateja Marjanovic         { 0x0000000022222221ULL, 0x0000000022222221ULL, },
730fdd986aSMateja Marjanovic         { 0x0000000088888888ULL, 0x0000000088888888ULL, },
740fdd986aSMateja Marjanovic         { 0xffffffffe38e38e3ULL, 0x0000000038e38e38ULL, },
750fdd986aSMateja Marjanovic         { 0x00000000c71c71c6ULL, 0x0000000071c71c71ULL, },
760fdd986aSMateja Marjanovic         { 0xffffffffcccccccbULL, 0xffffffffcccccccbULL, },    /*  32  */
770fdd986aSMateja Marjanovic         { 0xffffffffccccccccULL, 0xffffffffccccccccULL, },
780fdd986aSMateja Marjanovic         { 0xffffffff77777776ULL, 0xffffffff77777776ULL, },
790fdd986aSMateja Marjanovic         { 0x0000000022222221ULL, 0x0000000022222221ULL, },
800fdd986aSMateja Marjanovic         { 0xffffffff99999998ULL, 0xffffffff99999998ULL, },
810fdd986aSMateja Marjanovic         { 0xffffffffffffffffULL, 0xffffffffffffffffULL, },
820fdd986aSMateja Marjanovic         { 0xffffffff5b05b05aULL, 0xffffffffb05b05afULL, },
830fdd986aSMateja Marjanovic         { 0x000000003e93e93dULL, 0xffffffffe93e93e8ULL, },
840fdd986aSMateja Marjanovic         { 0x0000000033333332ULL, 0x0000000033333332ULL, },    /*  40  */
850fdd986aSMateja Marjanovic         { 0x0000000033333333ULL, 0x0000000033333333ULL, },
860fdd986aSMateja Marjanovic         { 0xffffffffddddddddULL, 0xffffffffddddddddULL, },
870fdd986aSMateja Marjanovic         { 0x0000000088888888ULL, 0x0000000088888888ULL, },
880fdd986aSMateja Marjanovic         { 0xffffffffffffffffULL, 0xffffffffffffffffULL, },
890fdd986aSMateja Marjanovic         { 0x0000000066666666ULL, 0x0000000066666666ULL, },
900fdd986aSMateja Marjanovic         { 0xffffffffc16c16c1ULL, 0x0000000016c16c16ULL, },
910fdd986aSMateja Marjanovic         { 0x00000000a4fa4fa4ULL, 0x000000004fa4fa4fULL, },
920fdd986aSMateja Marjanovic         { 0xffffffffe38e38e2ULL, 0x0000000038e38e37ULL, },    /*  48  */
930fdd986aSMateja Marjanovic         { 0xffffffffe38e38e3ULL, 0x0000000038e38e38ULL, },
940fdd986aSMateja Marjanovic         { 0xffffffff8e38e38dULL, 0xffffffffe38e38e2ULL, },
950fdd986aSMateja Marjanovic         { 0x0000000038e38e38ULL, 0x000000008e38e38dULL, },
960fdd986aSMateja Marjanovic         { 0xffffffffb05b05afULL, 0x0000000005b05b04ULL, },
970fdd986aSMateja Marjanovic         { 0x0000000016c16c16ULL, 0x000000006c16c16bULL, },
980fdd986aSMateja Marjanovic         { 0xffffffff71c71c71ULL, 0x000000001c71c71bULL, },
990fdd986aSMateja Marjanovic         { 0x0000000055555554ULL, 0x0000000055555554ULL, },
1000fdd986aSMateja Marjanovic         { 0x000000001c71c71bULL, 0xffffffffc71c71c6ULL, },    /*  56  */
1010fdd986aSMateja Marjanovic         { 0x000000001c71c71cULL, 0xffffffffc71c71c7ULL, },
1020fdd986aSMateja Marjanovic         { 0xffffffffc71c71c6ULL, 0xffffffff71c71c71ULL, },
1030fdd986aSMateja Marjanovic         { 0x0000000071c71c71ULL, 0x000000001c71c71cULL, },
1040fdd986aSMateja Marjanovic         { 0xffffffffe93e93e8ULL, 0xffffffff93e93e93ULL, },
1050fdd986aSMateja Marjanovic         { 0x000000004fa4fa4fULL, 0xfffffffffa4fa4faULL, },
1060fdd986aSMateja Marjanovic         { 0xffffffffaaaaaaaaULL, 0xffffffffaaaaaaaaULL, },
1070fdd986aSMateja Marjanovic         { 0x000000008e38e38dULL, 0xffffffffe38e38e3ULL, },
1080fdd986aSMateja Marjanovic         { 0xffffffffb0cd3c0cULL, 0x0000000049e2bb6aULL, },    /*  64  */
1090fdd986aSMateja Marjanovic         { 0xffffffffd5feadd4ULL, 0x0000000060a65e5aULL, },
1100fdd986aSMateja Marjanovic         { 0xffffffff423a724cULL, 0xfffffffff6923072ULL, },
1110fdd986aSMateja Marjanovic         { 0xffffffffe69cc91aULL, 0xfffffffff4a9edfeULL, },
1120fdd986aSMateja Marjanovic         { 0x00000000242055a3ULL, 0x0000000011736b26ULL, },
1130fdd986aSMateja Marjanovic         { 0x000000004951c76bULL, 0x0000000028370e16ULL, },
1140fdd986aSMateja Marjanovic         { 0xffffffffb58d8be3ULL, 0xffffffffbe22e02eULL, },
1150fdd986aSMateja Marjanovic         { 0x0000000059efe2b1ULL, 0xffffffffbc3a9dbaULL, },
1160fdd986aSMateja Marjanovic         { 0xffffffffd4bd03eaULL, 0x000000002654770bULL, },    /*  72  */
1170fdd986aSMateja Marjanovic         { 0xfffffffff9ee75b2ULL, 0x000000003d1819fbULL, },
1180fdd986aSMateja Marjanovic         { 0xffffffff662a3a2aULL, 0xffffffffd303ec13ULL, },
1190fdd986aSMateja Marjanovic         { 0x000000000a8c90f8ULL, 0xffffffffd11ba99fULL, },
1200fdd986aSMateja Marjanovic         { 0x0000000098b16b8dULL, 0xffffffff8c6d38e4ULL, },
1210fdd986aSMateja Marjanovic         { 0x00000000bde2dd55ULL, 0xffffffffa330dbd4ULL, },
1220fdd986aSMateja Marjanovic };
1230fdd986aSMateja Marjanovic 
1240fdd986aSMateja Marjanovic     gettimeofday(&start, NULL);
1250fdd986aSMateja Marjanovic 
1260fdd986aSMateja Marjanovic     for (i = 0; i < PATTERN_INPUTS_SHORT_COUNT; i++) {
1270fdd986aSMateja Marjanovic         for (j = 0; j < PATTERN_INPUTS_SHORT_COUNT; j++) {
1280fdd986aSMateja Marjanovic             do_msa_HADD_S_D(b128_pattern[i], b128_pattern[j],
1290fdd986aSMateja Marjanovic                            b128_result[PATTERN_INPUTS_SHORT_COUNT * i + j]);
1300fdd986aSMateja Marjanovic         }
1310fdd986aSMateja Marjanovic     }
1320fdd986aSMateja Marjanovic 
1330fdd986aSMateja Marjanovic     for (i = 0; i < RANDOM_INPUTS_SHORT_COUNT; i++) {
1340fdd986aSMateja Marjanovic         for (j = 0; j < RANDOM_INPUTS_SHORT_COUNT; j++) {
1350fdd986aSMateja Marjanovic             do_msa_HADD_S_D(b128_random[i], b128_random[j],
1360fdd986aSMateja Marjanovic                            b128_result[((PATTERN_INPUTS_SHORT_COUNT) *
1370fdd986aSMateja Marjanovic                                         (PATTERN_INPUTS_SHORT_COUNT)) +
1380fdd986aSMateja Marjanovic                                        RANDOM_INPUTS_SHORT_COUNT * i + j]);
1390fdd986aSMateja Marjanovic         }
1400fdd986aSMateja Marjanovic     }
1410fdd986aSMateja Marjanovic 
1420fdd986aSMateja Marjanovic     gettimeofday(&end, NULL);
1430fdd986aSMateja Marjanovic 
1440fdd986aSMateja Marjanovic     elapsed_time = (end.tv_sec - start.tv_sec) * 1000.0;
1450fdd986aSMateja Marjanovic     elapsed_time += (end.tv_usec - start.tv_usec) / 1000.0;
1460fdd986aSMateja Marjanovic 
1470fdd986aSMateja Marjanovic     ret = check_results(instruction_name, TEST_COUNT_TOTAL, elapsed_time,
1480fdd986aSMateja Marjanovic                         &b128_result[0][0], &b128_expect[0][0]);
1490fdd986aSMateja Marjanovic 
1500fdd986aSMateja Marjanovic     return ret;
1510fdd986aSMateja Marjanovic }
152