// File: /workspace/github_c_makefile_star2_O2/mjosaarinen[P]brutus/crypto_aead/scream12v3/ref/scream_cipher.c
// Function: LS_encrypt
void LS_encrypt(const crypto_uint8 input[16], const crypto_uint8 key[16], const crypto_uint8 tweak[16],
		crypto_uint8 output[16]) {
  crypto_uint16 data[8];
  crypto_uint16 k[8];
  crypto_uint16 t[8];
  int i,j;

  for (i=0; i<8; i++) {
    data[i] = ((crypto_uint16)input[2*i+1]<<8) + input[2*i];
    k[i] = ((crypto_uint16)  key[2*i+1]<<8) +   key[2*i];
    t[i] = ((crypto_uint16)tweak[2*i+1]<<8) + tweak[2*i];
  }
    
  /* Initial key + tweak addition */
  for (j=0; j<8; j++) data[j] ^= k[j] ^ t[j];
    
  /* ---------------- Step Function ---------------- */
  for (i=0; i<nSteps; i++) {
        
    /* ---------------- First Round ---------------- */
    /* SBox layer (bitsliced) */
    SBOX(data);
    /* First round constant */
    data[0] ^= ((2199*(2*i)) % 65536);
    /* LBox layer (tables) */
    for (j=0; j<8; j++)
      data[j] = LBox2[data[j]>>8] ^ LBox1[data[j]&0xff];
        
    /* ---------------- Second Round -------------- */
    /* SBox layer (bitsliced) */
    SBOX(data);
    /* Round constant */ 
    data[0] ^= ((2199*(2*i+1)) % 65536);
    /* LBox layer (tables) */
    for (j=0; j<8; j++)
      data[j] = LBox2[data[j]>>8] ^ LBox1[data[j]&0xff];
        
    /* Tweak schedule */
    for (j=0; j<4; j++) {
      t[j]   ^= t[j+4];
      t[j+4] ^= t[j];
    }
    /* ----------- Key + Tweak Addition ---------- */
    for (j=0; j<8; j++) data[j] ^= k[j] ^ t[j];
  }

  /* ----------- Restore initial tweak --------- */
  for (i=nSteps%3; i<3; i++) {
    for (j=0; j<4; j++) {
      t[j]   ^= t[j+4];
      t[j+4] ^= t[j];
    }
  }
    
  for (i=0; i<8; i++) {
    output[2*i]   = data[i];
    output[2*i+1] = data[i]>>8;
  }
}

// Assembly:
pushq %rbp
pushq %r15
pushq %r14
pushq %r13
pushq %r12
pushq %rbx
movq %rcx, -0x28(%rsp)
xorl %eax, %eax
cmpq $0x10, %rax
je 0x11b4
movzwl (%rdi,%rax), %ecx
movw %cx, -0x48(%rsp,%rax)
movzwl (%rsi,%rax), %ecx
movw %cx, -0x18(%rsp,%rax)
movzwl (%rdx,%rax), %ecx
movw %cx, -0x38(%rsp,%rax)
addq $0x2, %rax
jmp 0x118d
xorl %eax, %eax
cmpq $0x8, %rax
je 0x11d0
movzwl -0x38(%rsp,%rax,2), %ecx
xorw -0x18(%rsp,%rax,2), %cx
xorw %cx, -0x48(%rsp,%rax,2)
incq %rax
jmp 0x11b6
xorl %ecx, %ecx
leaq 0xe27(%rip), %rsi       # 0x2000
leaq 0x1020(%rip), %rdi      # 0x2200
cmpl $0xc, %ecx
je 0x1460
movzwl -0x46(%rsp), %r9d
movl -0x48(%rsp), %r8d
movl -0x44(%rsp), %r10d
movl %r10d, %r14d
andl %r9d, %r14d
xorl %r8d, %r14d
movzwl -0x42(%rsp), %ebx
movl %ebx, %r11d
xorl %r9d, %r11d
movl %ebx, %ebp
andl %r14d, %ebp
xorl %r10d, %r14d
movzwl -0x3e(%rsp), %edx
xorw %r14w, %dx
xorw -0x3c(%rsp), %bp
movl %r11d, %eax
andl %r14d, %eax
xorw -0x3a(%rsp), %ax
xorl %ebx, %r14d
xorl %r10d, %r11d
andl %r14d, %r11d
xorw -0x40(%rsp), %r11w
movl %r11d, %r14d
andl %edx, %r14d
xorl %ebp, %r14d
xorl %r14d, %r8d
movl %ebp, %r15d
orl %edx, %r15d
xorl %eax, %r15d
xorl %r15d, %r10d
movw %r10w, -0x44(%rsp)
andl %eax, %r14d
xorl %r11d, %r9d
xorl %r14d, %r9d
movw %r9w, -0x46(%rsp)
andl %r11d, %r15d
xorl %edx, %ebx
xorl %r15d, %ebx
movw %bx, -0x42(%rsp)
movl %r9d, %r14d
andl %r10d, %r14d
xorl %r8d, %r14d
andnl %ebx, %r14d, %r15d
notl %r14d
xorl %ebx, %r9d
xorl %r10d, %r14d
xorl %r14d, %edx
movw %dx, -0x3e(%rsp)
xorl %ebp, %r15d
movw %r15w, -0x3c(%rsp)
movl %r14d, %edx
andl %r9d, %edx
xorl %eax, %edx
movw %dx, -0x3a(%rsp)
xorl %ebx, %r14d
xorl %r10d, %r9d
andl %r14d, %r9d
xorl %r11d, %r9d
movw %r9w, -0x40(%rsp)
imull $0x112e, %ecx, %r10d    # imm = 0x112E
xorl %r10d, %r8d
movw %r8w, -0x48(%rsp)
xorl %eax, %eax
cmpq $0x8, %rax
je 0x12f7
movzwl -0x48(%rsp,%rax,2), %edx
movzbl %dl, %r8d
shrl $0x8, %edx
movzwl (%rdi,%r8,2), %r8d
xorw (%rsi,%rdx,2), %r8w
movw %r8w, -0x48(%rsp,%rax,2)
incq %rax
jmp 0x12d0
movq %rcx, -0x20(%rsp)
movzwl -0x46(%rsp), %r11d
movl -0x48(%rsp), %ebp
movl -0x44(%rsp), %r14d
movl %r14d, %r8d
andl %r11d, %r8d
xorl %ebp, %r8d
movzwl -0x42(%rsp), %r12d
movl %r12d, %r15d
xorl %r11d, %r15d
movl %r12d, %r13d
andl %r8d, %r13d
xorl %r14d, %r8d
movzwl -0x3e(%rsp), %eax
xorw %r8w, %ax
xorw -0x3c(%rsp), %r13w
movl %r15d, %edx
andl %r8d, %edx
xorw -0x3a(%rsp), %dx
xorl %r12d, %r8d
xorl %r14d, %r15d
andl %r8d, %r15d
xorw -0x40(%rsp), %r15w
movl %r15d, %r8d
andl %eax, %r8d
xorl %r13d, %r8d
xorl %r8d, %ebp
movl %r13d, %ebx
orl %eax, %ebx
xorl %edx, %ebx
xorl %ebx, %r14d
movw %r14w, -0x44(%rsp)
andl %edx, %r8d
xorl %r15d, %r8d
movl %r8d, %r9d
xorl %r11d, %r9d
movw %r9w, -0x46(%rsp)
andl %r15d, %ebx
xorl %eax, %r12d
xorl %ebx, %r12d
movw %r12w, -0x42(%rsp)
movl %r9d, %r11d
andl %r14d, %r11d
xorl %ebp, %r11d
andnl %r12d, %r11d, %ecx
notl %r11d
xorl %r12d, %r9d
movl %r11d, %ebx
xorl %r14d, %ebx
xorl %ebx, %eax
movw %ax, -0x3e(%rsp)
xorl %r13d, %ecx
movw %cx, -0x3c(%rsp)
movl %ebx, %eax
andl %r9d, %eax
xorl %edx, %eax
movw %ax, -0x3a(%rsp)
movl %ebx, %eax
xorl %r12d, %eax
movl %r9d, %ecx
xorl %r14d, %ecx
andl %eax, %ecx
xorl %r15d, %ecx
movw %cx, -0x40(%rsp)
leal 0x897(%r10), %eax
xorl %ebp, %eax
movw %ax, -0x48(%rsp)
xorl %eax, %eax
cmpq $0x8, %rax
je 0x140c
movzwl -0x48(%rsp,%rax,2), %ecx
movzbl %cl, %edx
shrl $0x8, %ecx
movzwl (%rdi,%rdx,2), %edx
xorw (%rsi,%rcx,2), %dx
movw %dx, -0x48(%rsp,%rax,2)
incq %rax
jmp 0x13e9
movabsq $-0x8, %rax
testq %rax, %rax
je 0x1438
movzwl -0x30(%rsp,%rax), %ecx
movzwl -0x28(%rsp,%rax), %edx
xorw %cx, %dx
movw %dx, -0x30(%rsp,%rax)
movw %cx, -0x28(%rsp,%rax)
addq $0x2, %rax
jmp 0x1416
xorl %eax, %eax
cmpq $0x8, %rax
je 0x1454
movzwl -0x38(%rsp,%rax,2), %ecx
xorw -0x18(%rsp,%rax,2), %cx
xorw %cx, -0x48(%rsp,%rax,2)
incq %rax
jmp 0x143a
movq -0x20(%rsp), %rcx
incl %ecx
jmp 0x11e0
movq 0x2b89(%rip), %rax      # 0x3ff0
movw %r11w, (%rax)
movq 0x2b6e(%rip), %rax      # 0x3fe0
movw %r9w, (%rax)
movq 0x2b43(%rip), %rax      # 0x3fc0
movw %bx, (%rax)
movq 0x2b71(%rip), %rax      # 0x3ff8
movw %r8w, (%rax)
xorl %eax, %eax
movabsq $-0x8, %rcx
cmpl $0x3, %eax
je 0x14c5
movq %rcx, %rdx
testq %rdx, %rdx
je 0x14c1
movzwl -0x30(%rsp,%rdx), %esi
movzwl -0x28(%rsp,%rdx), %edi
xorw %si, %di
movw %di, -0x30(%rsp,%rdx)
movw %si, -0x28(%rsp,%rdx)
addq $0x2, %rdx
jmp 0x149f
incl %eax
jmp 0x1497
xorl %eax, %eax
movq -0x28(%rsp), %rdx
cmpq $0x8, %rax
je 0x14e0
movzwl -0x48(%rsp,%rax,2), %ecx
movw %cx, (%rdx,%rax,2)
incq %rax
jmp 0x14cc
popq %rbx
popq %r12
popq %r13
popq %r14
popq %r15
popq %rbp
retq