hc
2023-02-14 0cc9b7c44253c93447ddf73e206fbdbb3d9f16b1
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
/*
 * Copyright (C) 2015 Anshuman Khandual, IBM Corporation.
 *
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU General Public License
 * as published by the Free Software Foundation; either version
 * 2 of the License, or (at your option) any later version.
 */
#define VEC_MAX 128
#define VSX_MAX 32
#define VMX_MAX 32
 
/*
 * unsigned long vsx[32]
 * unsigned long load[128]
 */
int validate_vsx(unsigned long *vsx, unsigned long *load)
{
   int i;
 
   for (i = 0; i < VSX_MAX; i++) {
       if (vsx[i] != load[2 * i + 1]) {
           printf("vsx[%d]: %lx load[%d] %lx\n",
                   i, vsx[i], 2 * i + 1, load[2 * i + 1]);
           return TEST_FAIL;
       }
   }
   return TEST_PASS;
}
 
/*
 * unsigned long vmx[32][2]
 * unsigned long load[128]
 */
int validate_vmx(unsigned long vmx[][2], unsigned long *load)
{
   int i;
 
   for (i = 0; i < VMX_MAX; i++) {
       #if __BYTE_ORDER__ == __ORDER_BIG_ENDIAN__
       if ((vmx[i][0] != load[64 + 2 * i]) ||
               (vmx[i][1] != load[65 + 2 * i])) {
           printf("vmx[%d][0]: %lx load[%d] %lx\n",
                   i, vmx[i][0], 64 + 2 * i,
                   load[64 + 2 * i]);
           printf("vmx[%d][1]: %lx load[%d] %lx\n",
                   i, vmx[i][1], 65 + 2 * i,
                   load[65 + 2 * i]);
           return TEST_FAIL;
       }
       #else  /*
           * In LE each value pair is stored in an
           * alternate manner.
           */
       if ((vmx[i][0] != load[65 + 2 * i]) ||
               (vmx[i][1] != load[64 + 2 * i])) {
           printf("vmx[%d][0]: %lx load[%d] %lx\n",
                   i, vmx[i][0], 65 + 2 * i,
                   load[65 + 2 * i]);
           printf("vmx[%d][1]: %lx load[%d] %lx\n",
                   i, vmx[i][1], 64 + 2 * i,
                   load[64 + 2 * i]);
           return TEST_FAIL;
       }
       #endif
   }
   return TEST_PASS;
}
 
/*
 * unsigned long store[128]
 * unsigned long load[128]
 */
int compare_vsx_vmx(unsigned long *store, unsigned long *load)
{
   int i;
 
   for (i = 0; i < VSX_MAX; i++) {
       if (store[1 + 2 * i] != load[1 + 2 * i]) {
           printf("store[%d]: %lx load[%d] %lx\n",
                   1 + 2 * i, store[i],
                   1 + 2 * i, load[i]);
           return TEST_FAIL;
       }
   }
 
   #if __BYTE_ORDER__ == __ORDER_BIG_ENDIAN__
   for (i = 64; i < VEC_MAX; i++) {
       if (store[i] != load[i]) {
           printf("store[%d]: %lx load[%d] %lx\n",
                   i, store[i], i, load[i]);
           return TEST_FAIL;
       }
   }
   #else    /* In LE each value pair is stored in an alternate manner */
   for (i = 64; i < VEC_MAX; i++) {
       if (!(i % 2) && (store[i] != load[i+1])) {
           printf("store[%d]: %lx load[%d] %lx\n",
                   i, store[i], i+1, load[i+1]);
           return TEST_FAIL;
       }
       if ((i % 2) && (store[i] != load[i-1])) {
           printf("here store[%d]: %lx load[%d] %lx\n",
                   i, store[i], i-1, load[i-1]);
           return TEST_FAIL;
       }
   }
   #endif
   return TEST_PASS;
}
 
void load_vsx_vmx(unsigned long *load, unsigned long *vsx,
       unsigned long vmx[][2])
{
   int i;
 
   for (i = 0; i < VSX_MAX; i++)
       vsx[i] = load[1 + 2 * i];
 
   for (i = 0; i < VMX_MAX; i++) {
       vmx[i][0] = load[64 + 2 * i];
       vmx[i][1] = load[65 + 2 * i];
   }
}
 
void loadvsx(void *p, int tmp);
void storevsx(void *p, int tmp);