aes-armv4.pl: make it link.
This commit is contained in:
parent
cd7b854bbb
commit
58402976b4
@ -404,10 +404,10 @@ _armv4_AES_encrypt:
|
|||||||
ldr pc,[sp],#4 @ pop and return
|
ldr pc,[sp],#4 @ pop and return
|
||||||
.size _armv4_AES_encrypt,.-_armv4_AES_encrypt
|
.size _armv4_AES_encrypt,.-_armv4_AES_encrypt
|
||||||
|
|
||||||
.global AES_set_encrypt_key
|
.global private_AES_set_encrypt_key
|
||||||
.type AES_set_encrypt_key,%function
|
.type private_AES_set_encrypt_key,%function
|
||||||
.align 5
|
.align 5
|
||||||
AES_set_encrypt_key:
|
private_AES_set_encrypt_key:
|
||||||
sub r3,pc,#8 @ AES_set_encrypt_key
|
sub r3,pc,#8 @ AES_set_encrypt_key
|
||||||
teq r0,#0
|
teq r0,#0
|
||||||
moveq r0,#-1
|
moveq r0,#-1
|
||||||
@ -425,7 +425,7 @@ AES_set_encrypt_key:
|
|||||||
bne .Labrt
|
bne .Labrt
|
||||||
|
|
||||||
.Lok: stmdb sp!,{r4-r12,lr}
|
.Lok: stmdb sp!,{r4-r12,lr}
|
||||||
sub $tbl,r3,#AES_set_encrypt_key-AES_Te-1024 @ Te4
|
sub $tbl,r3,#private_AES_set_encrypt_key-AES_Te-1024 @ Te4
|
||||||
|
|
||||||
mov $rounds,r0 @ inp
|
mov $rounds,r0 @ inp
|
||||||
mov lr,r1 @ bits
|
mov lr,r1 @ bits
|
||||||
@ -678,14 +678,14 @@ AES_set_encrypt_key:
|
|||||||
.Labrt: tst lr,#1
|
.Labrt: tst lr,#1
|
||||||
moveq pc,lr @ be binary compatible with V4, yet
|
moveq pc,lr @ be binary compatible with V4, yet
|
||||||
bx lr @ interoperable with Thumb ISA:-)
|
bx lr @ interoperable with Thumb ISA:-)
|
||||||
.size AES_set_encrypt_key,.-AES_set_encrypt_key
|
.size private_AES_set_encrypt_key,.-private_AES_set_encrypt_key
|
||||||
|
|
||||||
.global AES_set_decrypt_key
|
.global private_AES_set_decrypt_key
|
||||||
.type AES_set_decrypt_key,%function
|
.type private_AES_set_decrypt_key,%function
|
||||||
.align 5
|
.align 5
|
||||||
AES_set_decrypt_key:
|
private_AES_set_decrypt_key:
|
||||||
str lr,[sp,#-4]! @ push lr
|
str lr,[sp,#-4]! @ push lr
|
||||||
bl AES_set_encrypt_key
|
bl private_AES_set_encrypt_key
|
||||||
teq r0,#0
|
teq r0,#0
|
||||||
ldrne lr,[sp],#4 @ pop lr
|
ldrne lr,[sp],#4 @ pop lr
|
||||||
bne .Labrt
|
bne .Labrt
|
||||||
@ -772,7 +772,7 @@ $code.=<<___;
|
|||||||
moveq pc,lr @ be binary compatible with V4, yet
|
moveq pc,lr @ be binary compatible with V4, yet
|
||||||
bx lr @ interoperable with Thumb ISA:-)
|
bx lr @ interoperable with Thumb ISA:-)
|
||||||
#endif
|
#endif
|
||||||
.size AES_set_decrypt_key,.-AES_set_decrypt_key
|
.size private_AES_set_decrypt_key,.-private_AES_set_decrypt_key
|
||||||
|
|
||||||
.type AES_Td,%object
|
.type AES_Td,%object
|
||||||
.align 5
|
.align 5
|
||||||
|
Loading…
x
Reference in New Issue
Block a user