mirror of
https://github.com/guanzhi/GmSSL.git
synced 2026-06-23 21:53:45 +08:00
SM3/SMS4/SM3Sign(modified ECDSA) Supported
This commit is contained in:
BIN
crypto/cast/c_cfb64.o
Normal file
BIN
crypto/cast/c_cfb64.o
Normal file
Binary file not shown.
BIN
crypto/cast/c_ecb.o
Normal file
BIN
crypto/cast/c_ecb.o
Normal file
Binary file not shown.
BIN
crypto/cast/c_ofb64.o
Normal file
BIN
crypto/cast/c_ofb64.o
Normal file
Binary file not shown.
BIN
crypto/cast/c_skey.o
Normal file
BIN
crypto/cast/c_skey.o
Normal file
Binary file not shown.
BIN
crypto/cast/cast-586.o
Normal file
BIN
crypto/cast/cast-586.o
Normal file
Binary file not shown.
929
crypto/cast/cast-586.s
Normal file
929
crypto/cast/cast-586.s
Normal file
@@ -0,0 +1,929 @@
|
||||
.file "cast-586.s"
|
||||
.text
|
||||
.globl _CAST_encrypt
|
||||
.align 4
|
||||
_CAST_encrypt:
|
||||
L_CAST_encrypt_begin:
|
||||
|
||||
pushl %ebp
|
||||
pushl %ebx
|
||||
movl 12(%esp),%ebx
|
||||
movl 16(%esp),%ebp
|
||||
pushl %esi
|
||||
pushl %edi
|
||||
# Load the 2 words
|
||||
movl (%ebx),%edi
|
||||
movl 4(%ebx),%esi
|
||||
# Get short key flag
|
||||
movl 128(%ebp),%eax
|
||||
pushl %eax
|
||||
xorl %eax,%eax
|
||||
# round 0
|
||||
movl (%ebp),%edx
|
||||
movl 4(%ebp),%ecx
|
||||
addl %esi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
xorl %ecx,%edi
|
||||
# round 1
|
||||
movl 8(%ebp),%edx
|
||||
movl 12(%ebp),%ecx
|
||||
xorl %edi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
xorl %ecx,%esi
|
||||
# round 2
|
||||
movl 16(%ebp),%edx
|
||||
movl 20(%ebp),%ecx
|
||||
subl %esi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
xorl %ecx,%edi
|
||||
# round 3
|
||||
movl 24(%ebp),%edx
|
||||
movl 28(%ebp),%ecx
|
||||
addl %edi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
xorl %ecx,%esi
|
||||
# round 4
|
||||
movl 32(%ebp),%edx
|
||||
movl 36(%ebp),%ecx
|
||||
xorl %esi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
xorl %ecx,%edi
|
||||
# round 5
|
||||
movl 40(%ebp),%edx
|
||||
movl 44(%ebp),%ecx
|
||||
subl %edi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
xorl %ecx,%esi
|
||||
# round 6
|
||||
movl 48(%ebp),%edx
|
||||
movl 52(%ebp),%ecx
|
||||
addl %esi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
xorl %ecx,%edi
|
||||
# round 7
|
||||
movl 56(%ebp),%edx
|
||||
movl 60(%ebp),%ecx
|
||||
xorl %edi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
xorl %ecx,%esi
|
||||
# round 8
|
||||
movl 64(%ebp),%edx
|
||||
movl 68(%ebp),%ecx
|
||||
subl %esi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
xorl %ecx,%edi
|
||||
# round 9
|
||||
movl 72(%ebp),%edx
|
||||
movl 76(%ebp),%ecx
|
||||
addl %edi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
xorl %ecx,%esi
|
||||
# round 10
|
||||
movl 80(%ebp),%edx
|
||||
movl 84(%ebp),%ecx
|
||||
xorl %esi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
xorl %ecx,%edi
|
||||
# round 11
|
||||
movl 88(%ebp),%edx
|
||||
movl 92(%ebp),%ecx
|
||||
subl %edi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
xorl %ecx,%esi
|
||||
# test short key flag
|
||||
popl %edx
|
||||
orl %edx,%edx
|
||||
jnz L000cast_enc_done
|
||||
# round 12
|
||||
movl 96(%ebp),%edx
|
||||
movl 100(%ebp),%ecx
|
||||
addl %esi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
xorl %ecx,%edi
|
||||
# round 13
|
||||
movl 104(%ebp),%edx
|
||||
movl 108(%ebp),%ecx
|
||||
xorl %edi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
xorl %ecx,%esi
|
||||
# round 14
|
||||
movl 112(%ebp),%edx
|
||||
movl 116(%ebp),%ecx
|
||||
subl %esi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
xorl %ecx,%edi
|
||||
# round 15
|
||||
movl 120(%ebp),%edx
|
||||
movl 124(%ebp),%ecx
|
||||
addl %edi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
xorl %ecx,%esi
|
||||
L000cast_enc_done:
|
||||
nop
|
||||
movl 20(%esp),%eax
|
||||
movl %edi,4(%eax)
|
||||
movl %esi,(%eax)
|
||||
popl %edi
|
||||
popl %esi
|
||||
popl %ebx
|
||||
popl %ebp
|
||||
ret
|
||||
.globl _CAST_decrypt
|
||||
.align 4
|
||||
_CAST_decrypt:
|
||||
L_CAST_decrypt_begin:
|
||||
|
||||
pushl %ebp
|
||||
pushl %ebx
|
||||
movl 12(%esp),%ebx
|
||||
movl 16(%esp),%ebp
|
||||
pushl %esi
|
||||
pushl %edi
|
||||
# Load the 2 words
|
||||
movl (%ebx),%edi
|
||||
movl 4(%ebx),%esi
|
||||
# Get short key flag
|
||||
movl 128(%ebp),%eax
|
||||
orl %eax,%eax
|
||||
jnz L001cast_dec_skip
|
||||
xorl %eax,%eax
|
||||
# round 15
|
||||
movl 120(%ebp),%edx
|
||||
movl 124(%ebp),%ecx
|
||||
addl %esi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
xorl %ecx,%edi
|
||||
# round 14
|
||||
movl 112(%ebp),%edx
|
||||
movl 116(%ebp),%ecx
|
||||
subl %edi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
xorl %ecx,%esi
|
||||
# round 13
|
||||
movl 104(%ebp),%edx
|
||||
movl 108(%ebp),%ecx
|
||||
xorl %esi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
xorl %ecx,%edi
|
||||
# round 12
|
||||
movl 96(%ebp),%edx
|
||||
movl 100(%ebp),%ecx
|
||||
addl %edi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
xorl %ecx,%esi
|
||||
L001cast_dec_skip:
|
||||
# round 11
|
||||
movl 88(%ebp),%edx
|
||||
movl 92(%ebp),%ecx
|
||||
subl %esi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
xorl %ecx,%edi
|
||||
# round 10
|
||||
movl 80(%ebp),%edx
|
||||
movl 84(%ebp),%ecx
|
||||
xorl %edi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
xorl %ecx,%esi
|
||||
# round 9
|
||||
movl 72(%ebp),%edx
|
||||
movl 76(%ebp),%ecx
|
||||
addl %esi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
xorl %ecx,%edi
|
||||
# round 8
|
||||
movl 64(%ebp),%edx
|
||||
movl 68(%ebp),%ecx
|
||||
subl %edi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
xorl %ecx,%esi
|
||||
# round 7
|
||||
movl 56(%ebp),%edx
|
||||
movl 60(%ebp),%ecx
|
||||
xorl %esi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
xorl %ecx,%edi
|
||||
# round 6
|
||||
movl 48(%ebp),%edx
|
||||
movl 52(%ebp),%ecx
|
||||
addl %edi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
xorl %ecx,%esi
|
||||
# round 5
|
||||
movl 40(%ebp),%edx
|
||||
movl 44(%ebp),%ecx
|
||||
subl %esi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
xorl %ecx,%edi
|
||||
# round 4
|
||||
movl 32(%ebp),%edx
|
||||
movl 36(%ebp),%ecx
|
||||
xorl %edi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
xorl %ecx,%esi
|
||||
# round 3
|
||||
movl 24(%ebp),%edx
|
||||
movl 28(%ebp),%ecx
|
||||
addl %esi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
xorl %ecx,%edi
|
||||
# round 2
|
||||
movl 16(%ebp),%edx
|
||||
movl 20(%ebp),%ecx
|
||||
subl %edi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
xorl %ecx,%esi
|
||||
# round 1
|
||||
movl 8(%ebp),%edx
|
||||
movl 12(%ebp),%ecx
|
||||
xorl %esi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
xorl %ecx,%edi
|
||||
# round 0
|
||||
movl (%ebp),%edx
|
||||
movl 4(%ebp),%ecx
|
||||
addl %edi,%edx
|
||||
roll %cl,%edx
|
||||
movl %edx,%ebx
|
||||
xorl %ecx,%ecx
|
||||
movb %dh,%cl
|
||||
andl $255,%ebx
|
||||
shrl $16,%edx
|
||||
xorl %eax,%eax
|
||||
movb %dh,%al
|
||||
andl $255,%edx
|
||||
movl _CAST_S_table0(,%ecx,4),%ecx
|
||||
movl _CAST_S_table1(,%ebx,4),%ebx
|
||||
xorl %ebx,%ecx
|
||||
movl _CAST_S_table2(,%eax,4),%ebx
|
||||
subl %ebx,%ecx
|
||||
movl _CAST_S_table3(,%edx,4),%ebx
|
||||
addl %ebx,%ecx
|
||||
xorl %ecx,%esi
|
||||
nop
|
||||
movl 20(%esp),%eax
|
||||
movl %edi,4(%eax)
|
||||
movl %esi,(%eax)
|
||||
popl %edi
|
||||
popl %esi
|
||||
popl %ebx
|
||||
popl %ebp
|
||||
ret
|
||||
.globl _CAST_cbc_encrypt
|
||||
.align 4
|
||||
_CAST_cbc_encrypt:
|
||||
L_CAST_cbc_encrypt_begin:
|
||||
|
||||
pushl %ebp
|
||||
pushl %ebx
|
||||
pushl %esi
|
||||
pushl %edi
|
||||
movl 28(%esp),%ebp
|
||||
# getting iv ptr from parameter 4
|
||||
movl 36(%esp),%ebx
|
||||
movl (%ebx),%esi
|
||||
movl 4(%ebx),%edi
|
||||
pushl %edi
|
||||
pushl %esi
|
||||
pushl %edi
|
||||
pushl %esi
|
||||
movl %esp,%ebx
|
||||
movl 36(%esp),%esi
|
||||
movl 40(%esp),%edi
|
||||
# getting encrypt flag from parameter 5
|
||||
movl 56(%esp),%ecx
|
||||
# get and push parameter 3
|
||||
movl 48(%esp),%eax
|
||||
pushl %eax
|
||||
pushl %ebx
|
||||
cmpl $0,%ecx
|
||||
jz L002decrypt
|
||||
andl $4294967288,%ebp
|
||||
movl 8(%esp),%eax
|
||||
movl 12(%esp),%ebx
|
||||
jz L003encrypt_finish
|
||||
L004encrypt_loop:
|
||||
movl (%esi),%ecx
|
||||
movl 4(%esi),%edx
|
||||
xorl %ecx,%eax
|
||||
xorl %edx,%ebx
|
||||
bswap %eax
|
||||
bswap %ebx
|
||||
movl %eax,8(%esp)
|
||||
movl %ebx,12(%esp)
|
||||
call L_CAST_encrypt_begin
|
||||
movl 8(%esp),%eax
|
||||
movl 12(%esp),%ebx
|
||||
bswap %eax
|
||||
bswap %ebx
|
||||
movl %eax,(%edi)
|
||||
movl %ebx,4(%edi)
|
||||
addl $8,%esi
|
||||
addl $8,%edi
|
||||
subl $8,%ebp
|
||||
jnz L004encrypt_loop
|
||||
L003encrypt_finish:
|
||||
movl 52(%esp),%ebp
|
||||
andl $7,%ebp
|
||||
jz L005finish
|
||||
call L006PIC_point
|
||||
L006PIC_point:
|
||||
popl %edx
|
||||
leal L007cbc_enc_jmp_table-L006PIC_point(%edx),%ecx
|
||||
movl (%ecx,%ebp,4),%ebp
|
||||
addl %edx,%ebp
|
||||
xorl %ecx,%ecx
|
||||
xorl %edx,%edx
|
||||
jmp *%ebp
|
||||
L008ej7:
|
||||
xorl %edx,%edx
|
||||
movb 6(%esi),%dh
|
||||
shll $8,%edx
|
||||
L009ej6:
|
||||
movb 5(%esi),%dh
|
||||
L010ej5:
|
||||
movb 4(%esi),%dl
|
||||
L011ej4:
|
||||
movl (%esi),%ecx
|
||||
jmp L012ejend
|
||||
L013ej3:
|
||||
movb 2(%esi),%ch
|
||||
xorl %ecx,%ecx
|
||||
shll $8,%ecx
|
||||
L014ej2:
|
||||
movb 1(%esi),%ch
|
||||
L015ej1:
|
||||
movb (%esi),%cl
|
||||
L012ejend:
|
||||
xorl %ecx,%eax
|
||||
xorl %edx,%ebx
|
||||
bswap %eax
|
||||
bswap %ebx
|
||||
movl %eax,8(%esp)
|
||||
movl %ebx,12(%esp)
|
||||
call L_CAST_encrypt_begin
|
||||
movl 8(%esp),%eax
|
||||
movl 12(%esp),%ebx
|
||||
bswap %eax
|
||||
bswap %ebx
|
||||
movl %eax,(%edi)
|
||||
movl %ebx,4(%edi)
|
||||
jmp L005finish
|
||||
L002decrypt:
|
||||
andl $4294967288,%ebp
|
||||
movl 16(%esp),%eax
|
||||
movl 20(%esp),%ebx
|
||||
jz L016decrypt_finish
|
||||
L017decrypt_loop:
|
||||
movl (%esi),%eax
|
||||
movl 4(%esi),%ebx
|
||||
bswap %eax
|
||||
bswap %ebx
|
||||
movl %eax,8(%esp)
|
||||
movl %ebx,12(%esp)
|
||||
call L_CAST_decrypt_begin
|
||||
movl 8(%esp),%eax
|
||||
movl 12(%esp),%ebx
|
||||
bswap %eax
|
||||
bswap %ebx
|
||||
movl 16(%esp),%ecx
|
||||
movl 20(%esp),%edx
|
||||
xorl %eax,%ecx
|
||||
xorl %ebx,%edx
|
||||
movl (%esi),%eax
|
||||
movl 4(%esi),%ebx
|
||||
movl %ecx,(%edi)
|
||||
movl %edx,4(%edi)
|
||||
movl %eax,16(%esp)
|
||||
movl %ebx,20(%esp)
|
||||
addl $8,%esi
|
||||
addl $8,%edi
|
||||
subl $8,%ebp
|
||||
jnz L017decrypt_loop
|
||||
L016decrypt_finish:
|
||||
movl 52(%esp),%ebp
|
||||
andl $7,%ebp
|
||||
jz L005finish
|
||||
movl (%esi),%eax
|
||||
movl 4(%esi),%ebx
|
||||
bswap %eax
|
||||
bswap %ebx
|
||||
movl %eax,8(%esp)
|
||||
movl %ebx,12(%esp)
|
||||
call L_CAST_decrypt_begin
|
||||
movl 8(%esp),%eax
|
||||
movl 12(%esp),%ebx
|
||||
bswap %eax
|
||||
bswap %ebx
|
||||
movl 16(%esp),%ecx
|
||||
movl 20(%esp),%edx
|
||||
xorl %eax,%ecx
|
||||
xorl %ebx,%edx
|
||||
movl (%esi),%eax
|
||||
movl 4(%esi),%ebx
|
||||
L018dj7:
|
||||
rorl $16,%edx
|
||||
movb %dl,6(%edi)
|
||||
shrl $16,%edx
|
||||
L019dj6:
|
||||
movb %dh,5(%edi)
|
||||
L020dj5:
|
||||
movb %dl,4(%edi)
|
||||
L021dj4:
|
||||
movl %ecx,(%edi)
|
||||
jmp L022djend
|
||||
L023dj3:
|
||||
rorl $16,%ecx
|
||||
movb %cl,2(%edi)
|
||||
shll $16,%ecx
|
||||
L024dj2:
|
||||
movb %ch,1(%esi)
|
||||
L025dj1:
|
||||
movb %cl,(%esi)
|
||||
L022djend:
|
||||
jmp L005finish
|
||||
L005finish:
|
||||
movl 60(%esp),%ecx
|
||||
addl $24,%esp
|
||||
movl %eax,(%ecx)
|
||||
movl %ebx,4(%ecx)
|
||||
popl %edi
|
||||
popl %esi
|
||||
popl %ebx
|
||||
popl %ebp
|
||||
ret
|
||||
.align 6,0x90
|
||||
L007cbc_enc_jmp_table:
|
||||
.long 0
|
||||
.long L015ej1-L006PIC_point
|
||||
.long L014ej2-L006PIC_point
|
||||
.long L013ej3-L006PIC_point
|
||||
.long L011ej4-L006PIC_point
|
||||
.long L010ej5-L006PIC_point
|
||||
.long L009ej6-L006PIC_point
|
||||
.long L008ej7-L006PIC_point
|
||||
.align 6,0x90
|
||||
0
crypto/cast/lib
Normal file
0
crypto/cast/lib
Normal file
Reference in New Issue
Block a user