OLD | NEW |
| (Empty) |
1 #if defined(__arm__) | |
2 #include <openssl/arm_arch.h> | |
3 | |
4 .text | |
5 .code 32 | |
6 | |
7 #if __ARM_MAX_ARCH__>=7 | |
8 .align 5 | |
9 .LOPENSSL_armcap: | |
10 .word OPENSSL_armcap_P-.Lbn_mul_mont | |
11 #endif | |
12 | |
13 .globl bn_mul_mont | |
14 .hidden bn_mul_mont | |
15 .type bn_mul_mont,%function | |
16 | |
17 .align 5 | |
18 bn_mul_mont: | |
19 .Lbn_mul_mont: | |
20 ldr ip,[sp,#4] @ load num | |
21 stmdb sp!,{r0,r2} @ sp points at argument block | |
22 #if __ARM_MAX_ARCH__>=7 | |
23 tst ip,#7 | |
24 bne .Lialu | |
25 adr r0,bn_mul_mont | |
26 ldr r2,.LOPENSSL_armcap | |
27 ldr r0,[r0,r2] | |
28 #ifdef __APPLE__ | |
29 ldr r0,[r0] | |
30 #endif | |
31 tst r0,#ARMV7_NEON @ NEON available? | |
32 ldmia sp, {r0,r2} | |
33 beq .Lialu | |
34 add sp,sp,#8 | |
35 b bn_mul8x_mont_neon | |
36 .align 4 | |
37 .Lialu: | |
38 #endif | |
39 cmp ip,#2 | |
40 mov r0,ip @ load num | |
41 movlt r0,#0 | |
42 addlt sp,sp,#2*4 | |
43 blt .Labrt | |
44 | |
45 stmdb sp!,{r4,r5,r6,r7,r8,r9,r10,r11,r12,lr} @ save 10 regist
ers | |
46 | |
47 mov r0,r0,lsl#2 @ rescale r0 for byte count | |
48 sub sp,sp,r0 @ alloca(4*num) | |
49 sub sp,sp,#4 @ +extra dword | |
50 sub r0,r0,#4 @ "num=num-1" | |
51 add r4,r2,r0 @ &bp[num-1] | |
52 | |
53 add r0,sp,r0 @ r0 to point at &tp[num-1] | |
54 ldr r8,[r0,#14*4] @ &n0 | |
55 ldr r2,[r2] @ bp[0] | |
56 ldr r5,[r1],#4 @ ap[0],ap++ | |
57 ldr r6,[r3],#4 @ np[0],np++ | |
58 ldr r8,[r8] @ *n0 | |
59 str r4,[r0,#15*4] @ save &bp[num] | |
60 | |
61 umull r10,r11,r5,r2 @ ap[0]*bp[0] | |
62 str r8,[r0,#14*4] @ save n0 value | |
63 mul r8,r10,r8 @ "tp[0]"*n0 | |
64 mov r12,#0 | |
65 umlal r10,r12,r6,r8 @ np[0]*n0+"t[0]" | |
66 mov r4,sp | |
67 | |
68 .L1st: | |
69 ldr r5,[r1],#4 @ ap[j],ap++ | |
70 mov r10,r11 | |
71 ldr r6,[r3],#4 @ np[j],np++ | |
72 mov r11,#0 | |
73 umlal r10,r11,r5,r2 @ ap[j]*bp[0] | |
74 mov r14,#0 | |
75 umlal r12,r14,r6,r8 @ np[j]*n0 | |
76 adds r12,r12,r10 | |
77 str r12,[r4],#4 @ tp[j-1]=,tp++ | |
78 adc r12,r14,#0 | |
79 cmp r4,r0 | |
80 bne .L1st | |
81 | |
82 adds r12,r12,r11 | |
83 ldr r4,[r0,#13*4] @ restore bp | |
84 mov r14,#0 | |
85 ldr r8,[r0,#14*4] @ restore n0 | |
86 adc r14,r14,#0 | |
87 str r12,[r0] @ tp[num-1]= | |
88 str r14,[r0,#4] @ tp[num]= | |
89 | |
90 .Louter: | |
91 sub r7,r0,sp @ "original" r0-1 value | |
92 sub r1,r1,r7 @ "rewind" ap to &ap[1] | |
93 ldr r2,[r4,#4]! @ *(++bp) | |
94 sub r3,r3,r7 @ "rewind" np to &np[1] | |
95 ldr r5,[r1,#-4] @ ap[0] | |
96 ldr r10,[sp] @ tp[0] | |
97 ldr r6,[r3,#-4] @ np[0] | |
98 ldr r7,[sp,#4] @ tp[1] | |
99 | |
100 mov r11,#0 | |
101 umlal r10,r11,r5,r2 @ ap[0]*bp[i]+tp[0] | |
102 str r4,[r0,#13*4] @ save bp | |
103 mul r8,r10,r8 | |
104 mov r12,#0 | |
105 umlal r10,r12,r6,r8 @ np[0]*n0+"tp[0]" | |
106 mov r4,sp | |
107 | |
108 .Linner: | |
109 ldr r5,[r1],#4 @ ap[j],ap++ | |
110 adds r10,r11,r7 @ +=tp[j] | |
111 ldr r6,[r3],#4 @ np[j],np++ | |
112 mov r11,#0 | |
113 umlal r10,r11,r5,r2 @ ap[j]*bp[i] | |
114 mov r14,#0 | |
115 umlal r12,r14,r6,r8 @ np[j]*n0 | |
116 adc r11,r11,#0 | |
117 ldr r7,[r4,#8] @ tp[j+1] | |
118 adds r12,r12,r10 | |
119 str r12,[r4],#4 @ tp[j-1]=,tp++ | |
120 adc r12,r14,#0 | |
121 cmp r4,r0 | |
122 bne .Linner | |
123 | |
124 adds r12,r12,r11 | |
125 mov r14,#0 | |
126 ldr r4,[r0,#13*4] @ restore bp | |
127 adc r14,r14,#0 | |
128 ldr r8,[r0,#14*4] @ restore n0 | |
129 adds r12,r12,r7 | |
130 ldr r7,[r0,#15*4] @ restore &bp[num] | |
131 adc r14,r14,#0 | |
132 str r12,[r0] @ tp[num-1]= | |
133 str r14,[r0,#4] @ tp[num]= | |
134 | |
135 cmp r4,r7 | |
136 bne .Louter | |
137 | |
138 ldr r2,[r0,#12*4] @ pull rp | |
139 add r0,r0,#4 @ r0 to point at &tp[num] | |
140 sub r5,r0,sp @ "original" num value | |
141 mov r4,sp @ "rewind" r4 | |
142 mov r1,r4 @ "borrow" r1 | |
143 sub r3,r3,r5 @ "rewind" r3 to &np[0] | |
144 | |
145 subs r7,r7,r7 @ "clear" carry flag | |
146 .Lsub: ldr r7,[r4],#4 | |
147 ldr r6,[r3],#4 | |
148 sbcs r7,r7,r6 @ tp[j]-np[j] | |
149 str r7,[r2],#4 @ rp[j]= | |
150 teq r4,r0 @ preserve carry | |
151 bne .Lsub | |
152 sbcs r14,r14,#0 @ upmost carry | |
153 mov r4,sp @ "rewind" r4 | |
154 sub r2,r2,r5 @ "rewind" r2 | |
155 | |
156 and r1,r4,r14 | |
157 bic r3,r2,r14 | |
158 orr r1,r1,r3 @ ap=borrow?tp:rp | |
159 | |
160 .Lcopy: ldr r7,[r1],#4 @ copy or in-place refresh | |
161 str sp,[r4],#4 @ zap tp | |
162 str r7,[r2],#4 | |
163 cmp r4,r0 | |
164 bne .Lcopy | |
165 | |
166 add sp,r0,#4 @ skip over tp[num+1] | |
167 ldmia sp!,{r4,r5,r6,r7,r8,r9,r10,r11,r12,lr} @ restore regist
ers | |
168 add sp,sp,#2*4 @ skip over {r0,r2} | |
169 mov r0,#1 | |
170 .Labrt: | |
171 #if __ARM_ARCH__>=5 | |
172 bx lr @ .word 0xe12fff1e | |
173 #else | |
174 tst lr,#1 | |
175 moveq pc,lr @ be binary compatible with V4, yet | |
176 .word 0xe12fff1e @ interoperable with Thumb ISA:-) | |
177 #endif | |
178 .size bn_mul_mont,.-bn_mul_mont | |
179 #if __ARM_MAX_ARCH__>=7 | |
180 .arch armv7-a | |
181 .fpu neon | |
182 | |
183 .type bn_mul8x_mont_neon,%function | |
184 .align 5 | |
185 bn_mul8x_mont_neon: | |
186 mov ip,sp | |
187 stmdb sp!,{r4,r5,r6,r7,r8,r9,r10,r11} | |
188 vstmdb sp!,{d8,d9,d10,d11,d12,d13,d14,d15} @ ABI specificat
ion says so | |
189 ldmia ip,{r4,r5} @ load rest of parameter block | |
190 | |
191 sub r7,sp,#16 | |
192 vld1.32 {d28[0]}, [r2,:32]! | |
193 sub r7,r7,r5,lsl#4 | |
194 vld1.32 {d0,d1,d2,d3}, [r1]! @ can't specify :32 :-( | |
195 and r7,r7,#-64 | |
196 vld1.32 {d30[0]}, [r4,:32] | |
197 mov sp,r7 @ alloca | |
198 veor d8,d8,d8 | |
199 subs r8,r5,#8 | |
200 vzip.16 d28,d8 | |
201 | |
202 vmull.u32 q6,d28,d0[0] | |
203 vmull.u32 q7,d28,d0[1] | |
204 vmull.u32 q8,d28,d1[0] | |
205 vshl.i64 d10,d13,#16 | |
206 vmull.u32 q9,d28,d1[1] | |
207 | |
208 vadd.u64 d10,d10,d12 | |
209 veor d8,d8,d8 | |
210 vmul.u32 d29,d10,d30 | |
211 | |
212 vmull.u32 q10,d28,d2[0] | |
213 vld1.32 {d4,d5,d6,d7}, [r3]! | |
214 vmull.u32 q11,d28,d2[1] | |
215 vmull.u32 q12,d28,d3[0] | |
216 vzip.16 d29,d8 | |
217 vmull.u32 q13,d28,d3[1] | |
218 | |
219 bne .LNEON_1st | |
220 | |
221 @ special case for num=8, everything is in register bank... | |
222 | |
223 vmlal.u32 q6,d29,d4[0] | |
224 sub r9,r5,#1 | |
225 vmlal.u32 q7,d29,d4[1] | |
226 vmlal.u32 q8,d29,d5[0] | |
227 vmlal.u32 q9,d29,d5[1] | |
228 | |
229 vmlal.u32 q10,d29,d6[0] | |
230 vmov q5,q6 | |
231 vmlal.u32 q11,d29,d6[1] | |
232 vmov q6,q7 | |
233 vmlal.u32 q12,d29,d7[0] | |
234 vmov q7,q8 | |
235 vmlal.u32 q13,d29,d7[1] | |
236 vmov q8,q9 | |
237 vmov q9,q10 | |
238 vshr.u64 d10,d10,#16 | |
239 vmov q10,q11 | |
240 vmov q11,q12 | |
241 vadd.u64 d10,d10,d11 | |
242 vmov q12,q13 | |
243 veor q13,q13 | |
244 vshr.u64 d10,d10,#16 | |
245 | |
246 b .LNEON_outer8 | |
247 | |
248 .align 4 | |
249 .LNEON_outer8: | |
250 vld1.32 {d28[0]}, [r2,:32]! | |
251 veor d8,d8,d8 | |
252 vzip.16 d28,d8 | |
253 vadd.u64 d12,d12,d10 | |
254 | |
255 vmlal.u32 q6,d28,d0[0] | |
256 vmlal.u32 q7,d28,d0[1] | |
257 vmlal.u32 q8,d28,d1[0] | |
258 vshl.i64 d10,d13,#16 | |
259 vmlal.u32 q9,d28,d1[1] | |
260 | |
261 vadd.u64 d10,d10,d12 | |
262 veor d8,d8,d8 | |
263 subs r9,r9,#1 | |
264 vmul.u32 d29,d10,d30 | |
265 | |
266 vmlal.u32 q10,d28,d2[0] | |
267 vmlal.u32 q11,d28,d2[1] | |
268 vmlal.u32 q12,d28,d3[0] | |
269 vzip.16 d29,d8 | |
270 vmlal.u32 q13,d28,d3[1] | |
271 | |
272 vmlal.u32 q6,d29,d4[0] | |
273 vmlal.u32 q7,d29,d4[1] | |
274 vmlal.u32 q8,d29,d5[0] | |
275 vmlal.u32 q9,d29,d5[1] | |
276 | |
277 vmlal.u32 q10,d29,d6[0] | |
278 vmov q5,q6 | |
279 vmlal.u32 q11,d29,d6[1] | |
280 vmov q6,q7 | |
281 vmlal.u32 q12,d29,d7[0] | |
282 vmov q7,q8 | |
283 vmlal.u32 q13,d29,d7[1] | |
284 vmov q8,q9 | |
285 vmov q9,q10 | |
286 vshr.u64 d10,d10,#16 | |
287 vmov q10,q11 | |
288 vmov q11,q12 | |
289 vadd.u64 d10,d10,d11 | |
290 vmov q12,q13 | |
291 veor q13,q13 | |
292 vshr.u64 d10,d10,#16 | |
293 | |
294 bne .LNEON_outer8 | |
295 | |
296 vadd.u64 d12,d12,d10 | |
297 mov r7,sp | |
298 vshr.u64 d10,d12,#16 | |
299 mov r8,r5 | |
300 vadd.u64 d13,d13,d10 | |
301 add r6,sp,#16 | |
302 vshr.u64 d10,d13,#16 | |
303 vzip.16 d12,d13 | |
304 | |
305 b .LNEON_tail2 | |
306 | |
307 .align 4 | |
308 .LNEON_1st: | |
309 vmlal.u32 q6,d29,d4[0] | |
310 vld1.32 {d0,d1,d2,d3}, [r1]! | |
311 vmlal.u32 q7,d29,d4[1] | |
312 subs r8,r8,#8 | |
313 vmlal.u32 q8,d29,d5[0] | |
314 vmlal.u32 q9,d29,d5[1] | |
315 | |
316 vmlal.u32 q10,d29,d6[0] | |
317 vld1.32 {d4,d5}, [r3]! | |
318 vmlal.u32 q11,d29,d6[1] | |
319 vst1.64 {q6,q7}, [r7,:256]! | |
320 vmlal.u32 q12,d29,d7[0] | |
321 vmlal.u32 q13,d29,d7[1] | |
322 vst1.64 {q8,q9}, [r7,:256]! | |
323 | |
324 vmull.u32 q6,d28,d0[0] | |
325 vld1.32 {d6,d7}, [r3]! | |
326 vmull.u32 q7,d28,d0[1] | |
327 vst1.64 {q10,q11}, [r7,:256]! | |
328 vmull.u32 q8,d28,d1[0] | |
329 vmull.u32 q9,d28,d1[1] | |
330 vst1.64 {q12,q13}, [r7,:256]! | |
331 | |
332 vmull.u32 q10,d28,d2[0] | |
333 vmull.u32 q11,d28,d2[1] | |
334 vmull.u32 q12,d28,d3[0] | |
335 vmull.u32 q13,d28,d3[1] | |
336 | |
337 bne .LNEON_1st | |
338 | |
339 vmlal.u32 q6,d29,d4[0] | |
340 add r6,sp,#16 | |
341 vmlal.u32 q7,d29,d4[1] | |
342 sub r1,r1,r5,lsl#2 @ rewind r1 | |
343 vmlal.u32 q8,d29,d5[0] | |
344 vld1.64 {q5}, [sp,:128] | |
345 vmlal.u32 q9,d29,d5[1] | |
346 sub r9,r5,#1 | |
347 | |
348 vmlal.u32 q10,d29,d6[0] | |
349 vst1.64 {q6,q7}, [r7,:256]! | |
350 vmlal.u32 q11,d29,d6[1] | |
351 vshr.u64 d10,d10,#16 | |
352 vld1.64 {q6}, [r6, :128]! | |
353 vmlal.u32 q12,d29,d7[0] | |
354 vst1.64 {q8,q9}, [r7,:256]! | |
355 vmlal.u32 q13,d29,d7[1] | |
356 | |
357 vst1.64 {q10,q11}, [r7,:256]! | |
358 vadd.u64 d10,d10,d11 | |
359 veor q4,q4,q4 | |
360 vst1.64 {q12,q13}, [r7,:256]! | |
361 vld1.64 {q7,q8}, [r6, :256]! | |
362 vst1.64 {q4}, [r7,:128] | |
363 vshr.u64 d10,d10,#16 | |
364 | |
365 b .LNEON_outer | |
366 | |
367 .align 4 | |
368 .LNEON_outer: | |
369 vld1.32 {d28[0]}, [r2,:32]! | |
370 sub r3,r3,r5,lsl#2 @ rewind r3 | |
371 vld1.32 {d0,d1,d2,d3}, [r1]! | |
372 veor d8,d8,d8 | |
373 mov r7,sp | |
374 vzip.16 d28,d8 | |
375 sub r8,r5,#8 | |
376 vadd.u64 d12,d12,d10 | |
377 | |
378 vmlal.u32 q6,d28,d0[0] | |
379 vld1.64 {q9,q10},[r6,:256]! | |
380 vmlal.u32 q7,d28,d0[1] | |
381 vmlal.u32 q8,d28,d1[0] | |
382 vld1.64 {q11,q12},[r6,:256]! | |
383 vmlal.u32 q9,d28,d1[1] | |
384 | |
385 vshl.i64 d10,d13,#16 | |
386 veor d8,d8,d8 | |
387 vadd.u64 d10,d10,d12 | |
388 vld1.64 {q13},[r6,:128]! | |
389 vmul.u32 d29,d10,d30 | |
390 | |
391 vmlal.u32 q10,d28,d2[0] | |
392 vld1.32 {d4,d5,d6,d7}, [r3]! | |
393 vmlal.u32 q11,d28,d2[1] | |
394 vmlal.u32 q12,d28,d3[0] | |
395 vzip.16 d29,d8 | |
396 vmlal.u32 q13,d28,d3[1] | |
397 | |
398 .LNEON_inner: | |
399 vmlal.u32 q6,d29,d4[0] | |
400 vld1.32 {d0,d1,d2,d3}, [r1]! | |
401 vmlal.u32 q7,d29,d4[1] | |
402 subs r8,r8,#8 | |
403 vmlal.u32 q8,d29,d5[0] | |
404 vmlal.u32 q9,d29,d5[1] | |
405 vst1.64 {q6,q7}, [r7,:256]! | |
406 | |
407 vmlal.u32 q10,d29,d6[0] | |
408 vld1.64 {q6}, [r6, :128]! | |
409 vmlal.u32 q11,d29,d6[1] | |
410 vst1.64 {q8,q9}, [r7,:256]! | |
411 vmlal.u32 q12,d29,d7[0] | |
412 vld1.64 {q7,q8}, [r6, :256]! | |
413 vmlal.u32 q13,d29,d7[1] | |
414 vst1.64 {q10,q11}, [r7,:256]! | |
415 | |
416 vmlal.u32 q6,d28,d0[0] | |
417 vld1.64 {q9,q10}, [r6, :256]! | |
418 vmlal.u32 q7,d28,d0[1] | |
419 vst1.64 {q12,q13}, [r7,:256]! | |
420 vmlal.u32 q8,d28,d1[0] | |
421 vld1.64 {q11,q12}, [r6, :256]! | |
422 vmlal.u32 q9,d28,d1[1] | |
423 vld1.32 {d4,d5,d6,d7}, [r3]! | |
424 | |
425 vmlal.u32 q10,d28,d2[0] | |
426 vld1.64 {q13}, [r6, :128]! | |
427 vmlal.u32 q11,d28,d2[1] | |
428 vmlal.u32 q12,d28,d3[0] | |
429 vmlal.u32 q13,d28,d3[1] | |
430 | |
431 bne .LNEON_inner | |
432 | |
433 vmlal.u32 q6,d29,d4[0] | |
434 add r6,sp,#16 | |
435 vmlal.u32 q7,d29,d4[1] | |
436 sub r1,r1,r5,lsl#2 @ rewind r1 | |
437 vmlal.u32 q8,d29,d5[0] | |
438 vld1.64 {q5}, [sp,:128] | |
439 vmlal.u32 q9,d29,d5[1] | |
440 subs r9,r9,#1 | |
441 | |
442 vmlal.u32 q10,d29,d6[0] | |
443 vst1.64 {q6,q7}, [r7,:256]! | |
444 vmlal.u32 q11,d29,d6[1] | |
445 vld1.64 {q6}, [r6, :128]! | |
446 vshr.u64 d10,d10,#16 | |
447 vst1.64 {q8,q9}, [r7,:256]! | |
448 vmlal.u32 q12,d29,d7[0] | |
449 vld1.64 {q7,q8}, [r6, :256]! | |
450 vmlal.u32 q13,d29,d7[1] | |
451 | |
452 vst1.64 {q10,q11}, [r7,:256]! | |
453 vadd.u64 d10,d10,d11 | |
454 vst1.64 {q12,q13}, [r7,:256]! | |
455 vshr.u64 d10,d10,#16 | |
456 | |
457 bne .LNEON_outer | |
458 | |
459 mov r7,sp | |
460 mov r8,r5 | |
461 | |
462 .LNEON_tail: | |
463 vadd.u64 d12,d12,d10 | |
464 vld1.64 {q9,q10}, [r6, :256]! | |
465 vshr.u64 d10,d12,#16 | |
466 vadd.u64 d13,d13,d10 | |
467 vld1.64 {q11,q12}, [r6, :256]! | |
468 vshr.u64 d10,d13,#16 | |
469 vld1.64 {q13}, [r6, :128]! | |
470 vzip.16 d12,d13 | |
471 | |
472 .LNEON_tail2: | |
473 vadd.u64 d14,d14,d10 | |
474 vst1.32 {d12[0]}, [r7, :32]! | |
475 vshr.u64 d10,d14,#16 | |
476 vadd.u64 d15,d15,d10 | |
477 vshr.u64 d10,d15,#16 | |
478 vzip.16 d14,d15 | |
479 | |
480 vadd.u64 d16,d16,d10 | |
481 vst1.32 {d14[0]}, [r7, :32]! | |
482 vshr.u64 d10,d16,#16 | |
483 vadd.u64 d17,d17,d10 | |
484 vshr.u64 d10,d17,#16 | |
485 vzip.16 d16,d17 | |
486 | |
487 vadd.u64 d18,d18,d10 | |
488 vst1.32 {d16[0]}, [r7, :32]! | |
489 vshr.u64 d10,d18,#16 | |
490 vadd.u64 d19,d19,d10 | |
491 vshr.u64 d10,d19,#16 | |
492 vzip.16 d18,d19 | |
493 | |
494 vadd.u64 d20,d20,d10 | |
495 vst1.32 {d18[0]}, [r7, :32]! | |
496 vshr.u64 d10,d20,#16 | |
497 vadd.u64 d21,d21,d10 | |
498 vshr.u64 d10,d21,#16 | |
499 vzip.16 d20,d21 | |
500 | |
501 vadd.u64 d22,d22,d10 | |
502 vst1.32 {d20[0]}, [r7, :32]! | |
503 vshr.u64 d10,d22,#16 | |
504 vadd.u64 d23,d23,d10 | |
505 vshr.u64 d10,d23,#16 | |
506 vzip.16 d22,d23 | |
507 | |
508 vadd.u64 d24,d24,d10 | |
509 vst1.32 {d22[0]}, [r7, :32]! | |
510 vshr.u64 d10,d24,#16 | |
511 vadd.u64 d25,d25,d10 | |
512 vld1.64 {q6}, [r6, :128]! | |
513 vshr.u64 d10,d25,#16 | |
514 vzip.16 d24,d25 | |
515 | |
516 vadd.u64 d26,d26,d10 | |
517 vst1.32 {d24[0]}, [r7, :32]! | |
518 vshr.u64 d10,d26,#16 | |
519 vadd.u64 d27,d27,d10 | |
520 vld1.64 {q7,q8}, [r6, :256]! | |
521 vshr.u64 d10,d27,#16 | |
522 vzip.16 d26,d27 | |
523 subs r8,r8,#8 | |
524 vst1.32 {d26[0]}, [r7, :32]! | |
525 | |
526 bne .LNEON_tail | |
527 | |
528 vst1.32 {d10[0]}, [r7, :32] @ top-most bit | |
529 sub r3,r3,r5,lsl#2 @ rewind r3 | |
530 subs r1,sp,#0 @ clear carry flag | |
531 add r2,sp,r5,lsl#2 | |
532 | |
533 .LNEON_sub: | |
534 ldmia r1!, {r4,r5,r6,r7} | |
535 ldmia r3!, {r8,r9,r10,r11} | |
536 sbcs r8, r4,r8 | |
537 sbcs r9, r5,r9 | |
538 sbcs r10,r6,r10 | |
539 sbcs r11,r7,r11 | |
540 teq r1,r2 @ preserves carry | |
541 stmia r0!, {r8,r9,r10,r11} | |
542 bne .LNEON_sub | |
543 | |
544 ldr r10, [r1] @ load top-most bit | |
545 veor q0,q0,q0 | |
546 sub r11,r2,sp @ this is num*4 | |
547 veor q1,q1,q1 | |
548 mov r1,sp | |
549 sub r0,r0,r11 @ rewind r0 | |
550 mov r3,r2 @ second 3/4th of frame | |
551 sbcs r10,r10,#0 @ result is carry flag | |
552 | |
553 .LNEON_copy_n_zap: | |
554 ldmia r1!, {r4,r5,r6,r7} | |
555 ldmia r0, {r8,r9,r10,r11} | |
556 movcc r8, r4 | |
557 vst1.64 {q0,q1}, [r3,:256]! @ wipe | |
558 movcc r9, r5 | |
559 movcc r10,r6 | |
560 vst1.64 {q0,q1}, [r3,:256]! @ wipe | |
561 movcc r11,r7 | |
562 ldmia r1, {r4,r5,r6,r7} | |
563 stmia r0!, {r8,r9,r10,r11} | |
564 sub r1,r1,#16 | |
565 ldmia r0, {r8,r9,r10,r11} | |
566 movcc r8, r4 | |
567 vst1.64 {q0,q1}, [r1,:256]! @ wipe | |
568 movcc r9, r5 | |
569 movcc r10,r6 | |
570 vst1.64 {q0,q1}, [r3,:256]! @ wipe | |
571 movcc r11,r7 | |
572 teq r1,r2 @ preserves carry | |
573 stmia r0!, {r8,r9,r10,r11} | |
574 bne .LNEON_copy_n_zap | |
575 | |
576 sub sp,ip,#96 | |
577 vldmia sp!,{d8,d9,d10,d11,d12,d13,d14,d15} | |
578 ldmia sp!,{r4,r5,r6,r7,r8,r9,r10,r11} | |
579 bx lr @ .word 0xe12fff
1e | |
580 .size bn_mul8x_mont_neon,.-bn_mul8x_mont_neon | |
581 #endif | |
582 .byte 77,111,110,116,103,111,109,101,114,121,32,109,117,108,116,105,112,108,10
5,99,97,116,105,111,110,32,102,111,114,32,65,82,77,118,52,47,78,69,79,78,44,32,6
7,82,89,80,84,79,71,65,77,83,32,98,121,32,60,97,112,112,114,111,64,111,112,101,1
10,115,115,108,46,111,114,103,62,0 | |
583 .align 2 | |
584 .align 2 | |
585 #if __ARM_MAX_ARCH__>=7 | |
586 .comm OPENSSL_armcap_P,4,4 | |
587 .hidden OPENSSL_armcap_P | |
588 #endif | |
589 #endif | |
OLD | NEW |