chacha20-block ( state -- state )

Vocabulary

crypto.chacha20.private

Inputs

state

an object

Outputs

state

an object

Definition

USING: kernel math ;

IN: crypto.chacha20.private

:: chacha20-block ( state -- state )
    10 [
        state 0 4 8 12 apply-qround drop
        state 1 5 9 13 apply-qround drop
        state 2 6 10 14 apply-qround drop
        state 3 7 11 15 apply-qround drop
        state 0 5 10 15 apply-qround drop
        state 1 6 11 12 apply-qround drop
        state 2 7 8 13 apply-qround drop
        state 3 4 9 14 apply-qround drop
    ] times state ;