1 /*
2 * Copyright (c) 2017-2018 Arm Limited.
3 *
4 * SPDX-License-Identifier: MIT
5 *
6 * Permission is hereby granted, free of charge, to any person obtaining a copy
7 * of this software and associated documentation files (the "Software"), to
8 * deal in the Software without restriction, including without limitation the
9 * rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
10 * sell copies of the Software, and to permit persons to whom the Software is
11 * furnished to do so, subject to the following conditions:
12 *
13 * The above copyright notice and this permission notice shall be included in all
14 * copies or substantial portions of the Software.
15 *
16 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
19 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
21 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
22 * SOFTWARE.
23 */
24 #ifdef __aarch64__
25
26 #include <arm_neon.h>
27
28 #include "../../asmlib.hpp"
29
30 namespace arm_gemm {
31
a64_gemm_s8_8x12(const int8_t * Apanel,const int8_t * Bpanel,int32_t * Cpanel,int ablocks,int bblocks,int K)32 void a64_gemm_s8_8x12(const int8_t *Apanel, const int8_t *Bpanel, int32_t *Cpanel, int ablocks, int bblocks, int K) {
33 const int8_t *a_ptr = Apanel;
34 int32_t *c_ptr = Cpanel;
35 // We divide K by 4 because the sdot instruction processes 4 elements at a time.
36 const int W = K/4;
37 // Fix up for odd lengths - set a flag if K is odd, but make
38 // sure we round up the iteration count.
39 const int oddk = (W & 1);
40 const int init_value_k = ((W+1)/2) - 1;
41 for (int yb=0; yb<ablocks; yb++) {
42 const int8_t *a_ptr0 = a_ptr;
43 const int8_t *b_ptr = Bpanel;
44 for (int xb=0; xb<bblocks; xb++) {
45 a_ptr = a_ptr0;
46 int k = init_value_k;
47 register int32x4_t a0 asm("v0");
48 register int32x4_t a1 asm("v1");
49 register int32x4_t b0 asm("v2");
50 register int32x4_t b1 asm("v3");
51 register int32x4_t b2 asm("v4");
52 register int32x4_t a0a asm("v5");
53 register int32x4_t a1a asm("v6");
54 __asm __volatile (
55 // Initialize result registers, load initial operands, prime prefetches.
56 "movi v8.4s, #0x0\n"
57 "ldr %q[a0], [%[a_ptr]]\n"
58 "movi v9.4s, #0x0\n"
59 "ldr %q[b0], [%[b_ptr]]\n"
60 "movi v10.4s, #0x0\n"
61 "ldr %q[a1], [%[a_ptr], #16]\n"
62 "movi v11.4s, #0x0\n"
63 "ldr %q[b1], [%[b_ptr], #16]\n"
64 "movi v12.4s, #0x0\n"
65 ASM_PREFETCH("[%[b_ptr], #64]")
66 "movi v13.4s, #0x0\n"
67 ASM_PREFETCH("[%[a_ptr], #64]")
68 "movi v14.4s, #0x0\n"
69 ASM_PREFETCH("[%[b_ptr], #128]")
70 "movi v15.4s, #0x0\n"
71 ASM_PREFETCH("[%[a_ptr], #128]")
72 "movi v16.4s, #0x0\n"
73 ASM_PREFETCH("[%[b_ptr], #192]")
74 "movi v17.4s, #0x0\n"
75 ASM_PREFETCH("[%[b_ptr], #256]")
76 "movi v18.4s, #0x0\n"
77 ASM_PREFETCH("[%[a_ptr], #192]")
78 "movi v19.4s, #0x0\n"
79 ASM_PREFETCH("[%[b_ptr], #320]")
80 "movi v20.4s, #0x0\n"
81 ASM_PREFETCH("[%[a_ptr], #256]")
82 "movi v21.4s, #0x0\n"
83 ASM_PREFETCH("[%[b_ptr], #384]")
84 "movi v22.4s, #0x0\n"
85 "movi v23.4s, #0x0\n"
86 "movi v24.4s, #0x0\n"
87 "movi v25.4s, #0x0\n"
88 "movi v26.4s, #0x0\n"
89 "movi v27.4s, #0x0\n"
90 "movi v28.4s, #0x0\n"
91 "movi v29.4s, #0x0\n"
92 "movi v30.4s, #0x0\n"
93 "movi v31.4s, #0x0\n"
94
95 // Skip loop if we are doing zero iterations of it.
96 "cbz %w[k], 4f\n"
97
98 // Loop proper
99 "1:\n"
100 ".word 0x4f80e048 // sdot v8.4s , %[b0].16b, %[a0].4b[0]\n"
101 ".word 0x4fa0e049 // sdot v9.4s , %[b0].16b, %[a0].4b[1]\n"
102
103 "ldr %q[b2], [%[b_ptr], #32]\n"
104 ".word 0x4f80e84a // sdot v10.4s, %[b0].16b, %[a0].4b[2]\n"
105 ".word 0x4fa0e84b // sdot v11.4s, %[b0].16b, %[a0].4b[3]\n"
106 "ldr %q[a0a], [%[a_ptr], #32]\n"
107 ".word 0x4f81e04c // sdot v12.4s, %[b0].16b, %[a1].4b[0]\n"
108 ".word 0x4fa1e04d // sdot v13.4s, %[b0].16b, %[a1].4b[1]\n"
109 "ldr %q[a1a], [%[a_ptr], #48]\n"
110 ".word 0x4f81e84e // sdot v14.4s, %[b0].16b, %[a1].4b[2]\n"
111 ".word 0x4fa1e84f // sdot v15.4s, %[b0].16b, %[a1].4b[3]\n"
112 "ldr %q[b0], [%[b_ptr], #48]\n"
113
114 ".word 0x4f80e070 // sdot v16.4s, %[b1].16b, %[a0].4b[0]\n"
115 ".word 0x4fa0e071 // sdot v17.4s, %[b1].16b, %[a0].4b[1]\n"
116 ASM_PREFETCH("[%[a_ptr], #320]")
117 ".word 0x4f80e872 // sdot v18.4s, %[b1].16b, %[a0].4b[2]\n"
118 ".word 0x4fa0e873 // sdot v19.4s, %[b1].16b, %[a0].4b[3]\n"
119 ".word 0x4f81e074 // sdot v20.4s, %[b1].16b, %[a1].4b[0]\n"
120 ".word 0x4fa1e075 // sdot v21.4s, %[b1].16b, %[a1].4b[1]\n"
121 ".word 0x4f81e876 // sdot v22.4s, %[b1].16b, %[a1].4b[2]\n"
122 ".word 0x4fa1e877 // sdot v23.4s, %[b1].16b, %[a1].4b[3]\n"
123 "ldr %q[b1], [%[b_ptr], #64]\n"
124
125 ".word 0x4f80e098 // sdot v24.4s, %[b2].16b, %[a0].4b[0]\n"
126 ".word 0x4fa0e099 // sdot v25.4s, %[b2].16b, %[a0].4b[1]\n"
127 ASM_PREFETCH("[%[b_ptr], #448]")
128 ".word 0x4f80e89a // sdot v26.4s, %[b2].16b, %[a0].4b[2]\n"
129 ".word 0x4fa0e89b // sdot v27.4s, %[b2].16b, %[a0].4b[3]\n"
130 ".word 0x4f81e09c // sdot v28.4s, %[b2].16b, %[a1].4b[0]\n"
131 ".word 0x4fa1e09d // sdot v29.4s, %[b2].16b, %[a1].4b[1]\n"
132 ".word 0x4f81e89e // sdot v30.4s, %[b2].16b, %[a1].4b[2]\n"
133 ".word 0x4fa1e89f // sdot v31.4s, %[b2].16b, %[a1].4b[3]\n"
134 "ldr %q[b2], [%[b_ptr], #80]\n"
135
136 ".word 0x4f85e048 // sdot v8.4s , %[b0].16b, %[a0a].4b[0]\n"
137 ".word 0x4fa5e049 // sdot v9.4s , %[b0].16b, %[a0a].4b[1]\n"
138 "ldr %q[a0], [%[a_ptr], #64]\n"
139 ".word 0x4f85e84a // sdot v10.4s, %[b0].16b, %[a0a].4b[2]\n"
140 ".word 0x4fa5e84b // sdot v11.4s, %[b0].16b, %[a0a].4b[3]\n"
141 ".word 0x4f86e04c // sdot v12.4s, %[b0].16b, %[a1a].4b[0]\n"
142 "ldr %q[a1], [%[a_ptr], #80]\n"
143 ".word 0x4fa6e04d // sdot v13.4s, %[b0].16b, %[a1a].4b[1]\n"
144 ".word 0x4f86e84e // sdot v14.4s, %[b0].16b, %[a1a].4b[2]\n"
145 ".word 0x4fa6e84f // sdot v15.4s, %[b0].16b, %[a1a].4b[3]\n"
146 "ldr %q[b0], [%[b_ptr], #96]\n"
147
148 ".word 0x4f85e070 // sdot v16.4s, %[b1].16b, %[a0a].4b[0]\n"
149 ".word 0x4fa5e071 // sdot v17.4s, %[b1].16b, %[a0a].4b[1]\n"
150 ASM_PREFETCH("[%[b_ptr], #512]")
151 ".word 0x4f85e872 // sdot v18.4s, %[b1].16b, %[a0a].4b[2]\n"
152 ".word 0x4fa5e873 // sdot v19.4s, %[b1].16b, %[a0a].4b[3]\n"
153 ".word 0x4f86e074 // sdot v20.4s, %[b1].16b, %[a1a].4b[0]\n"
154 ".word 0x4fa6e075 // sdot v21.4s, %[b1].16b, %[a1a].4b[1]\n"
155 ".word 0x4f86e876 // sdot v22.4s, %[b1].16b, %[a1a].4b[2]\n"
156 ".word 0x4fa6e877 // sdot v23.4s, %[b1].16b, %[a1a].4b[3]\n"
157 "ldr %q[b1], [%[b_ptr], #112]\n"
158
159 ".word 0x4f85e098 // sdot v24.4s, %[b2].16b, %[a0a].4b[0]\n"
160 ".word 0x4fa5e099 // sdot v25.4s, %[b2].16b, %[a0a].4b[1]\n"
161 "add %[a_ptr], %[a_ptr], #64\n"
162 ".word 0x4f85e89a // sdot v26.4s, %[b2].16b, %[a0a].4b[2]\n"
163 ".word 0x4fa5e89b // sdot v27.4s, %[b2].16b, %[a0a].4b[3]\n"
164 "add %[b_ptr], %[b_ptr], #96\n"
165 ".word 0x4f86e09c // sdot v28.4s, %[b2].16b, %[a1a].4b[0]\n"
166 ".word 0x4fa6e09d // sdot v29.4s, %[b2].16b, %[a1a].4b[1]\n"
167 "subs %w[k], %w[k], #1\n"
168 ".word 0x4f86e89e // sdot v30.4s, %[b2].16b, %[a1a].4b[2]\n"
169 ".word 0x4fa6e89f // sdot v31.4s, %[b2].16b, %[a1a].4b[3]\n"
170 "bne 1b\n"
171
172 // Target to use when K is 1 or 2 (i.e. zero iterations of main loop)
173 "4:\n"
174
175 // Branch to alternative tail for odd K
176 "cbnz %w[oddk], 2f\n"
177
178 // Detached final iteration (even K)
179 ".word 0x4f80e048 // sdot v8.4s , %[b0].16b, %[a0].4b[0]\n"
180 ".word 0x4fa0e049 // sdot v9.4s , %[b0].16b, %[a0].4b[1]\n"
181 "ldr %q[b2], [%[b_ptr], #32]\n"
182 ".word 0x4f80e84a // sdot v10.4s, %[b0].16b, %[a0].4b[2]\n"
183 ".word 0x4fa0e84b // sdot v11.4s, %[b0].16b, %[a0].4b[3]\n"
184 "ldr %q[a0a], [%[a_ptr], #32]\n"
185 ".word 0x4f81e04c // sdot v12.4s, %[b0].16b, %[a1].4b[0]\n"
186 ".word 0x4fa1e04d // sdot v13.4s, %[b0].16b, %[a1].4b[1]\n"
187 "ldr %q[a1a], [%[a_ptr], #48]\n"
188 ".word 0x4f81e84e // sdot v14.4s, %[b0].16b, %[a1].4b[2]\n"
189 ".word 0x4fa1e84f // sdot v15.4s, %[b0].16b, %[a1].4b[3]\n"
190 "ldr %q[b0], [%[b_ptr], #48]\n"
191
192 ".word 0x4f80e070 // sdot v16.4s, %[b1].16b, %[a0].4b[0]\n"
193 ".word 0x4fa0e071 // sdot v17.4s, %[b1].16b, %[a0].4b[1]\n"
194 ".word 0x4f80e872 // sdot v18.4s, %[b1].16b, %[a0].4b[2]\n"
195 ".word 0x4fa0e873 // sdot v19.4s, %[b1].16b, %[a0].4b[3]\n"
196 ".word 0x4f81e074 // sdot v20.4s, %[b1].16b, %[a1].4b[0]\n"
197 ".word 0x4fa1e075 // sdot v21.4s, %[b1].16b, %[a1].4b[1]\n"
198 ".word 0x4f81e876 // sdot v22.4s, %[b1].16b, %[a1].4b[2]\n"
199 ".word 0x4fa1e877 // sdot v23.4s, %[b1].16b, %[a1].4b[3]\n"
200 "ldr %q[b1], [%[b_ptr], #64]\n"
201
202 ".word 0x4f80e098 // sdot v24.4s, %[b2].16b, %[a0].4b[0]\n"
203 ".word 0x4fa0e099 // sdot v25.4s, %[b2].16b, %[a0].4b[1]\n"
204 "add %[a_ptr], %[a_ptr], #64\n"
205 ".word 0x4f80e89a // sdot v26.4s, %[b2].16b, %[a0].4b[2]\n"
206 ".word 0x4fa0e89b // sdot v27.4s, %[b2].16b, %[a0].4b[3]\n"
207 ".word 0x4f81e09c // sdot v28.4s, %[b2].16b, %[a1].4b[0]\n"
208 ".word 0x4fa1e09d // sdot v29.4s, %[b2].16b, %[a1].4b[1]\n"
209 ".word 0x4f81e89e // sdot v30.4s, %[b2].16b, %[a1].4b[2]\n"
210 ".word 0x4fa1e89f // sdot v31.4s, %[b2].16b, %[a1].4b[3]\n"
211 "ldr %q[b2], [%[b_ptr], #80]\n"
212
213 ".word 0x4f85e048 // sdot v8.4s , %[b0].16b, %[a0a].4b[0]\n"
214
215 ".word 0x4f85e070 // sdot v16.4s, %[b1].16b, %[a0a].4b[0]\n"
216 "add %[b_ptr], %[b_ptr], #96\n"
217 ".word 0x4fa5e049 // sdot v9.4s , %[b0].16b, %[a0a].4b[1]\n"
218 "str q8, [%[c_ptr], #0]\n"
219 ".word 0x4fa5e071 // sdot v17.4s, %[b1].16b, %[a0a].4b[1]\n"
220 "str q16, [%[c_ptr], #16]\n"
221 ".word 0x4f85e098 // sdot v24.4s, %[b2].16b, %[a0a].4b[0]\n"
222 "str q24, [%[c_ptr], #32]\n"
223
224 ".word 0x4fa5e099 // sdot v25.4s, %[b2].16b, %[a0a].4b[1]\n"
225 "str q9, [%[c_ptr], #48]\n"
226 ".word 0x4f85e84a // sdot v10.4s, %[b0].16b, %[a0a].4b[2]\n"
227 "str q17, [%[c_ptr], #64]\n"
228 ".word 0x4f85e872 // sdot v18.4s, %[b1].16b, %[a0a].4b[2]\n"
229 "str q25, [%[c_ptr], #80]\n"
230 ".word 0x4f85e89a // sdot v26.4s, %[b2].16b, %[a0a].4b[2]\n"
231 "str q10, [%[c_ptr], #96]\n"
232
233 ".word 0x4fa5e84b // sdot v11.4s, %[b0].16b, %[a0a].4b[3]\n"
234 "str q18, [%[c_ptr], #112]\n"
235 ".word 0x4fa5e873 // sdot v19.4s, %[b1].16b, %[a0a].4b[3]\n"
236 "str q26, [%[c_ptr], #128]\n"
237 ".word 0x4fa5e89b // sdot v27.4s, %[b2].16b, %[a0a].4b[3]\n"
238 "str q11, [%[c_ptr], #144]\n"
239
240 ".word 0x4f86e04c // sdot v12.4s, %[b0].16b, %[a1a].4b[0]\n"
241 "str q19, [%[c_ptr], #160]\n"
242 ".word 0x4f86e074 // sdot v20.4s, %[b1].16b, %[a1a].4b[0]\n"
243 "str q27, [%[c_ptr], #176]\n"
244 ".word 0x4f86e09c // sdot v28.4s, %[b2].16b, %[a1a].4b[0]\n"
245 "str q12, [%[c_ptr], #192]\n"
246
247 ".word 0x4fa6e04d // sdot v13.4s, %[b0].16b, %[a1a].4b[1]\n"
248 "str q20, [%[c_ptr], #208]\n"
249 ".word 0x4fa6e075 // sdot v21.4s, %[b1].16b, %[a1a].4b[1]\n"
250 "str q28, [%[c_ptr], #224]\n"
251 ".word 0x4fa6e09d // sdot v29.4s, %[b2].16b, %[a1a].4b[1]\n"
252 "str q13, [%[c_ptr], #240]\n"
253
254 ".word 0x4f86e84e // sdot v14.4s, %[b0].16b, %[a1a].4b[2]\n"
255 "str q21, [%[c_ptr], #256]\n"
256 ".word 0x4f86e876 // sdot v22.4s, %[b1].16b, %[a1a].4b[2]\n"
257 "str q29, [%[c_ptr], #272]\n"
258 ".word 0x4f86e89e // sdot v30.4s, %[b2].16b, %[a1a].4b[2]\n"
259 "str q14, [%[c_ptr], #288]\n"
260
261 ".word 0x4fa6e84f // sdot v15.4s, %[b0].16b, %[a1a].4b[3]\n"
262 "str q22, [%[c_ptr], #304]\n"
263 ".word 0x4fa6e877 // sdot v23.4s, %[b1].16b, %[a1a].4b[3]\n"
264 "str q30, [%[c_ptr], #320]\n"
265 ".word 0x4fa6e89f // sdot v31.4s, %[b2].16b, %[a1a].4b[3]\n"
266 "str q15, [%[c_ptr], #336]\n"
267
268 "b 3f\n"
269
270 // Detached final iteration (odd K)
271 "2:\n"
272 ".word 0x4f80e048 // sdot v8.4s , %[b0].16b, %[a0].4b[0]\n"
273 "ldr %q[b2], [%[b_ptr], #32]\n"
274 ".word 0x4f80e070 // sdot v16.4s, %[b1].16b, %[a0].4b[0]\n"
275 ".word 0x4fa0e049 // sdot v9.4s , %[b0].16b, %[a0].4b[1]\n"
276 "str q8, [%[c_ptr], #0]\n"
277 ".word 0x4fa0e071 // sdot v17.4s, %[b1].16b, %[a0].4b[1]\n"
278 "str q16, [%[c_ptr], #16]\n"
279 ".word 0x4f80e098 // sdot v24.4s, %[b2].16b, %[a0].4b[0]\n"
280 "add %[b_ptr], %[b_ptr], #48\n"
281 "add %[a_ptr], %[a_ptr], #32\n"
282 "str q24, [%[c_ptr], #32]\n"
283 ".word 0x4fa0e099 // sdot v25.4s, %[b2].16b, %[a0].4b[1]\n"
284 "str q9, [%[c_ptr], #48]\n"
285
286 ".word 0x4f80e84a // sdot v10.4s, %[b0].16b, %[a0].4b[2]\n"
287 "str q17, [%[c_ptr], #64]\n"
288 ".word 0x4f80e872 // sdot v18.4s, %[b1].16b, %[a0].4b[2]\n"
289 "str q25, [%[c_ptr], #80]\n"
290 ".word 0x4f80e89a // sdot v26.4s, %[b2].16b, %[a0].4b[2]\n"
291 "str q10, [%[c_ptr], #96]\n"
292
293 ".word 0x4fa0e84b // sdot v11.4s, %[b0].16b, %[a0].4b[3]\n"
294 "str q18, [%[c_ptr], #112]\n"
295 ".word 0x4fa0e873 // sdot v19.4s, %[b1].16b, %[a0].4b[3]\n"
296 "str q26, [%[c_ptr], #128]\n"
297 ".word 0x4fa0e89b // sdot v27.4s, %[b2].16b, %[a0].4b[3]\n"
298 "str q11, [%[c_ptr], #144]\n"
299
300 ".word 0x4f81e04c // sdot v12.4s, %[b0].16b, %[a1].4b[0]\n"
301 "str q19, [%[c_ptr], #160]\n"
302 ".word 0x4f81e074 // sdot v20.4s, %[b1].16b, %[a1].4b[0]\n"
303 "str q27, [%[c_ptr], #176]\n"
304 ".word 0x4f81e09c // sdot v28.4s, %[b2].16b, %[a1].4b[0]\n"
305 "str q12, [%[c_ptr], #192]\n"
306
307 ".word 0x4fa1e04d // sdot v13.4s, %[b0].16b, %[a1].4b[1]\n"
308 "str q20, [%[c_ptr], #208]\n"
309 ".word 0x4fa1e075 // sdot v21.4s, %[b1].16b, %[a1].4b[1]\n"
310 "str q28, [%[c_ptr], #224]\n"
311 ".word 0x4fa1e09d // sdot v29.4s, %[b2].16b, %[a1].4b[1]\n"
312 "str q13, [%[c_ptr], #240]\n"
313
314 ".word 0x4f81e84e // sdot v14.4s, %[b0].16b, %[a1].4b[2]\n"
315 "str q21, [%[c_ptr], #256]\n"
316 ".word 0x4f81e876 // sdot v22.4s, %[b1].16b, %[a1].4b[2]\n"
317 "str q29, [%[c_ptr], #272]\n"
318 ".word 0x4f81e89e // sdot v30.4s, %[b2].16b, %[a1].4b[2]\n"
319 "str q14, [%[c_ptr], #288]\n"
320
321 ".word 0x4fa1e84f // sdot v15.4s, %[b0].16b, %[a1].4b[3]\n"
322 "str q22, [%[c_ptr], #304]\n"
323 ".word 0x4fa1e877 // sdot v23.4s, %[b1].16b, %[a1].4b[3]\n"
324 "str q30, [%[c_ptr], #320]\n"
325 ".word 0x4fa1e89f // sdot v31.4s, %[b2].16b, %[a1].4b[3]\n"
326 "str q15, [%[c_ptr], #336]\n"
327
328
329 // Common tail
330 "3:\n"
331 "str q23, [%[c_ptr], #352]\n"
332 "str q31, [%[c_ptr], #368]\n"
333 "add %[c_ptr], %[c_ptr], #384\n"
334
335 :
336 [a_ptr] "+r" (a_ptr), [b_ptr] "+r" (b_ptr), [c_ptr] "+r" (c_ptr),
337 [a0] "+w" (a0), [a1] "+w" (a1), [a0a] "+w" (a0a), [a1a] "+w" (a1a),
338 [b0] "+w" (b0), [b1] "+w" (b1), [b2] "+w" (b2), [k] "+r" (k)
339 : [oddk] "r" (oddk)
340 : "x20", "x21", "v8", "v9", "v10", "v11", "v12", "v13", "v14", "v15", "v16", "v17", "v18",
341 "v19", "v20", "v21", "v22", "v23", "v24", "v25", "v26", "v27", "v28", "v29", "v30", "v31", "cc"
342 );
343
344 }
345 }
346 }
347
348 } // namespace arm_gemm
349
350 #endif
351