Apple-2gs-SW/65816-crypto
1
0
Fork 0
mirror of https://github.com/sheumann/65816-crypto.git synced 2024-11-29 06:50:17 +00:00
Code Issues Projects Releases Wiki Activity

Optimize AES CBC operations a bit.

Browse Source
This commit is contained in:
Stephen Heumann 2017-07-02 16:16:17 -05:00
parent 6532a3abc4
commit 924789510b
1 changed files with 99 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

207
aescbc.c
View File

@ -23,12 +23,10 @@ void aes_cbc_encrypt(struct aes_context *context,
while (nblocks-- > 0) {
asm {
ldy #0
lda [in],y
eor [context],y
sta [context],y
iny
iny
lda [in]
eor [context]
sta [context]
ldy #2
lda [in],y
eor [context],y
sta [context],y
@ -67,9 +65,38 @@ void aes_cbc_encrypt(struct aes_context *context,
lda context
tcd
jsl AES_ENCRYPT
lda 0
pld
sta [out]
ldy #2
lda [context],y
sta [out],y
iny
iny
lda [context],y
sta [out],y
iny
iny
lda [context],y
sta [out],y
iny
iny
lda [context],y
sta [out],y
iny
iny
lda [context],y
sta [out],y
iny
iny
lda [context],y
sta [out],y
iny
iny
lda [context],y
sta [out],y
}
memcpy(out, context->data, 16);
in += 16;
out += 16;
}
@ -90,8 +117,37 @@ void aes_cbc_decrypt(struct aes_context *context,
if (nblocks-- == 0)
return;
memcpy(context->data, in, 16);
asm {
lda [in]
sta [context]
ldy #2
lda [in],y
sta [context],y
iny
iny
lda [in],y
sta [context],y
iny
iny
lda [in],y
sta [context],y
iny
iny
lda [in],y
sta [context],y
iny
iny
lda [in],y
sta [context],y
iny
iny
lda [in],y
sta [context],y
iny
iny
lda [in],y
sta [context],y
phd
lda context
tcd
@ -138,59 +194,90 @@ void aes_cbc_decrypt(struct aes_context *context,
eor [iv],y
sta [out],y
}
//in += 16;
out += 16;
while (nblocks-- > 0) {
memcpy(context->data, in+16, 16);
asm {
phd
lda context
tcd
jsl AES_DECRYPT
pld
ldy #0
lda [context],y
eor [in],y
sta [out],y
iny
iny
lda [context],y
eor [in],y
sta [out],y
iny
iny
lda [context],y
eor [in],y
sta [out],y
iny
iny
lda [context],y
eor [in],y
sta [out],y
iny
iny
lda [context],y
eor [in],y
sta [out],y
iny
iny
lda [context],y
eor [in],y
sta [out],y
iny
iny
lda [context],y
eor [in],y
sta [out],y
iny
iny
lda [context],y
eor [in],y
sta [out],y
}
in += 16;
out += 16;
while (nblocks-- > 0) {
asm {
lda [in]
sta [context]
ldy #2
lda [in],y
sta [context],y
iny
iny
lda [in],y
sta [context],y
iny
iny
lda [in],y
sta [context],y
iny
iny
lda [in],y
sta [context],y
iny
iny
lda [in],y
sta [context],y
iny
iny
lda [in],y
sta [context],y
iny
iny
lda [in],y
sta [context],y
phd
lda context
tcd
jsl AES_DECRYPT
pld
}
in -= 16;
asm {
ldy #0
lda [context],y
eor [in],y
sta [out],y
iny
iny
lda [context],y
eor [in],y
sta [out],y
iny
iny
lda [context],y
eor [in],y
sta [out],y
iny
iny
lda [context],y
eor [in],y
sta [out],y
iny
iny
lda [context],y
eor [in],y
sta [out],y
iny
iny
lda [context],y
eor [in],y
sta [out],y
iny
iny
lda [context],y
eor [in],y
sta [out],y
iny
iny
lda [context],y
eor [in],y
sta [out],y
}
in += 32;
out += 16;
}
}