#include "avr-asm-macros.S"
+acc2 = 8
+acc3 = 9
+acc0 = 14
+acc1 = 15
+
/******************************************************************************/
/*
param a: r22:r23:r24:r25
breq 20f
10:
lsl r0
+rol32:
rol r22
rol r23
rol r24
/******************************************************************************/
+sn_stub:
+ movw r22, r2
+ movw r24, r4
+ lpm r20, Z+
+ rcall rotateleft32
+eor32_to_acc:
+ eor acc0, r22
+ eor acc1, r23
+ eor acc2, r24
+ eor acc3, r25
+ ret
+
s_table:
s0: .byte 1, 3, 4,19
s1: .byte 1, 2, 8,23
s4: .byte 0x00, 0
s5: .byte 0x80, 0
*/
-acc2 = 8
-acc3 = 9
h0 = 10
h1 = 11
m0 = 12
m1 = 13
-acc0 = 14
-acc1 = 15
/*
param x: r22:r23:r24:25
movw r4, r24
lpm r20, Z+
rcall shiftright32
- movw acc0, r22
- movw acc2, r24
+ rcall mov32_to_acc
;---
movw r22, r2
movw r24, r4
rcall shiftleft32
rcall eor32_to_acc
;---
- movw r22, r2
- movw r24, r4
- lpm r20, Z+
- rcall rotateleft32
- rcall eor32_to_acc
-;---
- movw r22, r2
- movw r24, r4
- lpm r20, Z+
- rcall rotateleft32
- rcall eor32_to_acc
+ rcall sn_stub
+ rcall sn_stub
+
movw r22, acc0
movw r24, acc2
pop acc3
adc r25, r0
ret
-store_acc_to_dec_X:
- st -X, acc3
- st -X, acc2
- st -X, acc1
- st -X, acc0
- ret
-
store32_to_X:
st X+, r22
st X+, r23
st X+, r25
ret
+mov32_to_acc:
+ movw acc0, r22
+ movw acc2, r24
+ ret
+
+eor_acc_from_Y_add_to_Z:
+ rcall load32_from_Y
+ rcall eor32_to_acc
+ rjmp add_acc_to_Z
+
/******************************************************************************/
/*
param q: r28:r29 (Y)
acc0 = 14
acc1 = 15
-add32_to_acc:
- add acc0, r22
- adc acc1, r23
- adc acc2, r24
- adc acc3, r25
- ret
-
-eor32_to_acc:
- eor acc0, r22
- eor acc1, r23
- eor acc2, r24
- eor acc3, r25
- ret
-
load_acc_from_X:
ld acc0, X+
ld acc1, X+
ret
load_rotate_add_M:
+ mov r20, j
andi r20, 0x0f
mov r0, r20
lsl r0
inc r20
rcall rotateleft32
brts 10f
- rcall add32_to_acc
- ret
+ rjmp add32_to_acc
+; ret
10: sub acc0, r22
sbc acc1, r23
sbc acc2, r24
sbc acc3, r25
ret
+
+;---
+
+/******************************************************************************/
+load_sn_add:
+ rcall load32_from_X
+ rcall sn
+add32_to_acc:
+ add acc0, r22
+ adc acc1, r23
+ adc acc2, r24
+ adc acc3, r25
+ ret
+
+/*
+ param q: r26:r27
+ param m: r22:r23
+ param h: r20:r21
+ param j: r24
+*/
+
+expand_intro:
+ push_range 26, 27
+ push r24
addelement:
mov j, r24
movw h0, r20
rcall store_acc_to_dec_X
adiw r26, 4
clt
- mov r20, j
rcall load_rotate_add_M
- mov r20, j
- subi r20, -3
+ subi j, -3
rcall load_rotate_add_M
- mov r20, j
set
- subi r20, -10
+ subi j, -7
rcall load_rotate_add_M
lsl j
lsl j
- subi j, -7*4
+ subi j, -7*4+10*4
andi j, 0x3f
movw r26, h0
add r26, j
adc r27, r1
rcall load32_from_X
rcall eor32_to_acc
-;---
- ret
-
-/******************************************************************************/
-load_sn_add:
- rcall load32_from_X
- rcall sn
- rcall add32_to_acc
- ret
-
-/*
- param q: r26:r27
- param m: r22:r23
- param h: r20:r21
- param j: r24
-*/
-
-expand_intro:
- push_range 20, 27
-; push r24
- rcall addelement
-; pop r24
- pop_range 20, 27
+;--
+ pop r24
+ pop_range 26, 27
lsl r24
lsl r24
add r26, r24
rcall load_sn_add
expand2_exit:
adiw r26, 4
- rcall store_acc_to_dec_X
+store_acc_to_dec_X:
+ st -X, acc3
+ st -X, acc2
+ st -X, acc1
+ st -X, acc0
ret
/******************************************************************************/
m0 = 6
m1 = 7
+restore_f1:
+ movw r26, r2
+ movw r22, r4
+ movw r20, r6
+ ret
.global bmw_small_nextBlock
.global bmw224_nextBlock
movw r26, r2
clr r24
rcall expand1
- movw r26, r2
- movw r22, r4
- movw r20, r6
+ rcall restore_f1
ldi r24, 1
rcall expand1
ldi r17, 2
-10: movw r26, r2
- movw r22, r4
- movw r20, r6
+10: rcall restore_f1
mov r24, r17
rcall expand2
inc r17
sbrs r17, 4
rjmp 10b
+ rcall restore_f1
movw r24, r2
- movw r22, r4
- movw r20, r6
/* call f2 */
movw h0, r20
movw r28, r22
rcall load32_from_X
- movw acc0, r22
- movw acc2, r24
+ rcall mov32_to_acc
ldi r17, 15
10: rcall load32_from_X
rcall eor32_to_acc
movw r26, q16_0
ldi r17, 16
10:
- ld acc0, Y+
- ld acc1, Y+
- ld acc2, Y+
- ld acc3, Y+
+ rcall load32_from_Y
+ rcall mov32_to_acc
;---
movw r22, xh0
movw r24, xh2
movw acc2, xl2
rcall load32_from_X
rcall eor32_to_acc
- rcall load32_from_Y
- rcall eor32_to_acc
- rcall add_acc_to_Z
+ rcall eor_acc_from_Y_add_to_Z
dec r17
brne 10b
sbiw r26, 9*4 /* X points to q[23] */
eor acc1, xl0
eor acc2, xl1
eor acc3, xl2
- rcall load32_from_Y
- rcall eor32_to_acc
- rcall add_acc_to_Z
+ rcall eor_acc_from_Y_add_to_Z
;---
sbiw r26, 8*4 /* X points to q[16] */
mov h0, r30
rjmp 21f
20: rcall shiftright32
21:
- rcall eor32_to_acc
- rcall load32_from_Y
- rcall eor32_to_acc
movw r30, h0
- rcall add_acc_to_Z
+ rcall eor32_to_acc
+ rcall eor_acc_from_Y_add_to_Z
movw h0, r30
dec r17
brne 10b
rcall load32_from_X
mov r20, r18
rcall rotateleft32
- movw acc0, r22
- movw acc2, r24
+ rcall mov32_to_acc
rcall add_acc_to_Z
inc r18
cpi r17, 5
memcpy(pctx.buffer, block, (length_b+7)/8);
pctx.buffer[length_b>>3] |= 0x80 >> (length_b&0x07);
*/ movw r24, len0
+ ldi r23, 63
+ movw r26, blc0
lsr r25
ror r24
lsr r24
lsr r24
- ldi r23, 63
- sub r23, r24
- movw r26, blc0
- tst r24
breq 301f
+ sub r23, r24
/* copy (#r24) bytes to stack buffer */
30: ld r20, X+
st Z+, r20
rcall load32_from_Z_stub
410:
clr r25
+ ldi r20, 1
lsl r21
- rol r22
- rol r23
- rol r24
- rol r25
+ rcall rol32
mov r20, len0
add r21, len1
adc r22, r1
adc r23, r1
adc r24, r1
adc r25, r1
- movw r30, buf0
- adiw r30, 64-8
- st Z+, r20
- st Z+, r21
- st Z+, r22
- st Z+, r23
- st Z+, r24
- st Z+, r25
- st Z+, r1
- st Z+, r1
+ movw r26, buf0
+ adiw r26, 64-8
+ st X+, r20
+ st X+, r21
+ rcall store32_to_X
+ st X+, r1
+ st X+, r1
movw r24, ctx0
movw r22, buf0
rcall bmw_small_nextBlock
*/
.global bmw224_ctx2hash
bmw224_ctx2hash:
- movw r26, r24
movw r30, r22
adiw r30, 9*4
- ldi r22, 28
+ ldi r18, 28
rjmp 1f
/*******************************************************************************
*/
.global bmw256_ctx2hash
bmw256_ctx2hash:
- movw r26, r24
movw r30, r22
adiw r30, 8*4
- ldi r22, 32
-1:
- ld r23, Z+
+ ldi r18, 32
+1: movw r26, r24
+1: ld r23, Z+
st X+, r23
- dec r22
+ dec r18
brne 1b
ret
*/
.global bmw224_init
bmw224_init:
- movw r26, r24
- ldi r22, 0x03
- ldi r23, 0x02
- ldi r24, 0x01
- ldi r25, 0x00
+ ldi r22, 0x00
+ ldi r23, 0x40
bmw_small_init:
- rcall store32_to_X
- ldi r18, 16-1
- ldi r20, 0x04
-1:
- add r22, r20
- adc r23, r20
- adc r24, r20
- adc r25, r20
- rcall store32_to_X
- dec r18
- brne 1b
- st X+, r1
- st X+, r1
- st X+, r1
- st X+, r1
+ movw r26, r24
+ adiw r26, 4
+10:
+ st -X, r22
+ inc r22
+ mov r20, r22
+ andi r20, 0x3
+ brne 10b
+ adiw r26, 8
+20: cp r22, r23
+ brne 10b
+ st -X, r1
+ st -X, r1
+ st -X, r1
+ st -X, r1
ret
.global bmw256_init
bmw256_init:
- movw r26, r24
- ldi r22, 0x43
- ldi r23, 0x42
- ldi r24, 0x41
- ldi r25, 0x40
+ ldi r22, 0x40
+ ldi r23, 0x80
rjmp bmw_small_init