// File: /workspace/github_c_makefile_star2_O0/mjosaarinen[P]brutus/crypto_aead/twine80n6t4clocv2/ref/cloc.c
// Function: ae_encrypt
int ae_encrypt(ae_cxt* cxt, byte* pt, unsigned long long mlen, byte* ct, byte* tag, unsigned long long tlen, int enc_dec)
{
	cxt->pt = pt;
	cxt->ptlen = mlen;
	cxt->ct = ct;
	cxt->ctlen = mlen;
	cxt->tag = tag;
	cxt->tlen = tlen;

	byte* es = cxt->es;
	byte* ts = cxt->ts;

	word* wd = (word*) ts;
	if(mlen != 0){
		g2(wd[0], wd[1], wd[2], wd[3]);
		Encode(cxt->ts, cxt->ts);
	}
	else{
		g1(wd[0], wd[1], wd[2], wd[3]);
		Encode(cxt->ts, cxt->ts);
		memcpy(tag, ts, tlen);
		return SUCCESS;
	}


	unsigned long long pc = 0;
	while((pc + STATE_LEN) < mlen){
		if(enc_dec == ENC){ // encryption
			xor_bytes(es, pt+pc, STATE_LEN);
			memcpy(ct+pc, es, STATE_LEN);
		}
		else{ // decryption
			xor_bytes2(pt+pc, ct+pc, es, STATE_LEN);
			memcpy(es, ct+pc, STATE_LEN);
		}
		xor_bytes(ts, es, STATE_LEN);
		Encode(ts, ts);
		/* apply fix1 */
		es[0] |= 0x80;
		Encode(es, es);
		pc += STATE_LEN;
	}

	/* process the last block */
	unsigned long long lastblocklen = mlen - pc;
	if(enc_dec == ENC){ // encryption
		xor_bytes(es, pt+pc, lastblocklen);
		memcpy(ct+pc, es, lastblocklen);
	}
	else{ // decryption
		xor_bytes2(pt+pc, ct+pc, es, lastblocklen);
		memcpy(es, ct+pc, lastblocklen);
	}
	xor_bytes(ts, es, lastblocklen);
	if(lastblocklen != STATE_LEN){ // apply f2
		/* apply padding only when last message block is not full */
		ts[lastblocklen] ^= 0x80;
		word* wd = (word*) ts;
		f2(wd[0], wd[1], wd[2], wd[3]);
	}
	else{ // apply f1
		word* wd = (word*) ts;
		f1(wd[0], wd[1], wd[2], wd[3]);
	}

	Encode(ts, ts);
	memcpy(tag, ts, tlen);

	return SUCCESS;
}

// Assembly:
subq $0x88, %rsp
movl 0x90(%rsp), %eax
movq %rdi, 0x78(%rsp)
movq %rsi, 0x70(%rsp)
movq %rdx, 0x68(%rsp)
movq %rcx, 0x60(%rsp)
movq %r8, 0x58(%rsp)
movq %r9, 0x50(%rsp)
movq 0x70(%rsp), %rcx
movq 0x78(%rsp), %rax
movq %rcx, 0x40(%rax)
movq 0x68(%rsp), %rcx
movq 0x78(%rsp), %rax
movq %rcx, 0x48(%rax)
movq 0x60(%rsp), %rcx
movq 0x78(%rsp), %rax
movq %rcx, 0x50(%rax)
movq 0x68(%rsp), %rcx
movq 0x78(%rsp), %rax
movq %rcx, 0x58(%rax)
movq 0x58(%rsp), %rcx
movq 0x78(%rsp), %rax
movq %rcx, 0x60(%rax)
movq 0x50(%rsp), %rax
movl %eax, %ecx
movq 0x78(%rsp), %rax
movl %ecx, 0x68(%rax)
movq 0x78(%rsp), %rax
movq %rax, 0x48(%rsp)
movq 0x78(%rsp), %rax
addq $0x8, %rax
movq %rax, 0x40(%rsp)
movq 0x40(%rsp), %rax
movq %rax, 0x38(%rsp)
cmpq $0x0, 0x68(%rsp)
je 0x1754
jmp 0x16dd
movq 0x38(%rsp), %rax
movzwl (%rax), %eax
movq 0x38(%rsp), %rcx
movzwl 0x2(%rcx), %ecx
xorl %ecx, %eax
movw %ax, 0x36(%rsp)
movq 0x38(%rsp), %rax
movw 0x2(%rax), %cx
movq 0x38(%rsp), %rax
movw %cx, (%rax)
movq 0x38(%rsp), %rax
movw 0x4(%rax), %cx
movq 0x38(%rsp), %rax
movw %cx, 0x2(%rax)
movq 0x38(%rsp), %rax
movw 0x6(%rax), %cx
movq 0x38(%rsp), %rax
movw %cx, 0x4(%rax)
movw 0x36(%rsp), %cx
movq 0x38(%rsp), %rax
movw %cx, 0x6(%rax)
movq 0x78(%rsp), %rdi
addq $0x8, %rdi
movq 0x78(%rsp), %rsi
addq $0x8, %rsi
callq 0x1110
jmp 0x1806
jmp 0x1756
movq 0x38(%rsp), %rax
movw (%rax), %ax
movw %ax, 0x34(%rsp)
movq 0x38(%rsp), %rax
movw 0x4(%rax), %cx
movq 0x38(%rsp), %rax
movw %cx, (%rax)
movzwl 0x34(%rsp), %eax
movq 0x38(%rsp), %rcx
movzwl 0x2(%rcx), %ecx
xorl %ecx, %eax
movw %ax, %cx
movq 0x38(%rsp), %rax
movw %cx, 0x4(%rax)
movq 0x38(%rsp), %rax
movw 0x2(%rax), %ax
movw %ax, 0x34(%rsp)
movq 0x38(%rsp), %rax
movw 0x6(%rax), %cx
movq 0x38(%rsp), %rax
movw %cx, 0x2(%rax)
movq 0x38(%rsp), %rax
movzwl (%rax), %eax
movzwl 0x34(%rsp), %ecx
xorl %ecx, %eax
movw %ax, %cx
movq 0x38(%rsp), %rax
movw %cx, 0x6(%rax)
movq 0x78(%rsp), %rdi
addq $0x8, %rdi
movq 0x78(%rsp), %rsi
addq $0x8, %rsi
callq 0x1110
movq 0x58(%rsp), %rdi
movq 0x40(%rsp), %rsi
movq 0x50(%rsp), %rdx
callq 0x1120
movl $0x0, 0x84(%rsp)
jmp 0x1acd
movq $0x0, 0x28(%rsp)
movq 0x28(%rsp), %rax
addq $0x8, %rax
cmpq 0x68(%rsp), %rax
jae 0x18ec
cmpl $0x1, 0x90(%rsp)
jne 0x185e
movq 0x48(%rsp), %rdi
movq 0x70(%rsp), %rsi
addq 0x28(%rsp), %rsi
movl $0x8, %edx
callq 0x1100
movq 0x60(%rsp), %rax
movq 0x28(%rsp), %rcx
movq 0x48(%rsp), %rdx
movq (%rdx), %rdx
movq %rdx, (%rax,%rcx)
jmp 0x1897
movq 0x70(%rsp), %rdi
addq 0x28(%rsp), %rdi
movq 0x60(%rsp), %rsi
addq 0x28(%rsp), %rsi
movq 0x48(%rsp), %rdx
movl $0x8, %ecx
callq 0x1130
movq 0x48(%rsp), %rax
movq 0x60(%rsp), %rcx
movq 0x28(%rsp), %rdx
movq (%rcx,%rdx), %rcx
movq %rcx, (%rax)
movq 0x40(%rsp), %rdi
movq 0x48(%rsp), %rsi
movl $0x8, %edx
callq 0x1100
movq 0x40(%rsp), %rdi
movq 0x40(%rsp), %rsi
callq 0x1110
movq 0x48(%rsp), %rax
movzbl (%rax), %ecx
orl $0x80, %ecx
movb %cl, (%rax)
movq 0x48(%rsp), %rdi
movq 0x48(%rsp), %rsi
callq 0x1110
movq 0x28(%rsp), %rax
addq $0x8, %rax
movq %rax, 0x28(%rsp)
jmp 0x180f
movq 0x68(%rsp), %rax
subq 0x28(%rsp), %rax
movq %rax, 0x20(%rsp)
cmpl $0x1, 0x90(%rsp)
jne 0x193b
movq 0x48(%rsp), %rdi
movq 0x70(%rsp), %rsi
addq 0x28(%rsp), %rsi
movq 0x20(%rsp), %rax
movl %eax, %edx
callq 0x1100
movq 0x60(%rsp), %rdi
addq 0x28(%rsp), %rdi
movq 0x48(%rsp), %rsi
movq 0x20(%rsp), %rdx
callq 0x1120
jmp 0x1979
movq 0x70(%rsp), %rdi
addq 0x28(%rsp), %rdi
movq 0x60(%rsp), %rsi
addq 0x28(%rsp), %rsi
movq 0x48(%rsp), %rdx
movq 0x20(%rsp), %rax
movl %eax, %ecx
callq 0x1130
movq 0x48(%rsp), %rdi
movq 0x60(%rsp), %rsi
addq 0x28(%rsp), %rsi
movq 0x20(%rsp), %rdx
callq 0x1120
movq 0x40(%rsp), %rdi
movq 0x48(%rsp), %rsi
movq 0x20(%rsp), %rax
movl %eax, %edx
callq 0x1100
cmpq $0x8, 0x20(%rsp)
je 0x1a1c
movq 0x40(%rsp), %rax
movq 0x20(%rsp), %rcx
movzbl (%rax,%rcx), %edx
xorl $0x80, %edx
movb %dl, (%rax,%rcx)
movq 0x40(%rsp), %rax
movq %rax, 0x18(%rsp)
movq 0x18(%rsp), %rax
movzwl (%rax), %eax
movq 0x18(%rsp), %rcx
movzwl 0x2(%rcx), %ecx
xorl %ecx, %eax
movw %ax, 0x16(%rsp)
movq 0x18(%rsp), %rax
movw 0x2(%rax), %cx
movq 0x18(%rsp), %rax
movw %cx, (%rax)
movq 0x18(%rsp), %rax
movw 0x4(%rax), %cx
movq 0x18(%rsp), %rax
movw %cx, 0x2(%rax)
movq 0x18(%rsp), %rax
movw 0x6(%rax), %cx
movq 0x18(%rsp), %rax
movw %cx, 0x4(%rax)
movw 0x16(%rsp), %cx
movq 0x18(%rsp), %rax
movw %cx, 0x6(%rax)
jmp 0x1a9f
movq 0x40(%rsp), %rax
movq %rax, 0x8(%rsp)
movq 0x8(%rsp), %rax
movzwl 0x4(%rax), %edx
movq 0x8(%rsp), %rax
movzwl (%rax), %ecx
xorl %edx, %ecx
movw %cx, (%rax)
movq 0x8(%rsp), %rax
movw 0x2(%rax), %ax
movw %ax, 0x6(%rsp)
movq 0x8(%rsp), %rax
movzwl 0x6(%rax), %edx
movq 0x8(%rsp), %rax
movzwl 0x2(%rax), %ecx
xorl %edx, %ecx
movw %cx, 0x2(%rax)
movq 0x8(%rsp), %rax
movzwl 0x4(%rax), %eax
movq 0x8(%rsp), %rcx
movzwl 0x2(%rcx), %ecx
xorl %ecx, %eax
movw %ax, %cx
movq 0x8(%rsp), %rax
movw %cx, 0x6(%rax)
movzwl 0x6(%rsp), %eax
movq 0x8(%rsp), %rcx
movzwl (%rcx), %ecx
xorl %ecx, %eax
movw %ax, %cx
movq 0x8(%rsp), %rax
movw %cx, 0x4(%rax)
jmp 0x1a9f
movq 0x40(%rsp), %rdi
movq 0x40(%rsp), %rsi
callq 0x1110
movq 0x58(%rsp), %rdi
movq 0x40(%rsp), %rsi
movq 0x50(%rsp), %rdx
callq 0x1120
movl $0x0, 0x84(%rsp)
movl 0x84(%rsp), %eax
addq $0x88, %rsp
retq
nopl (%rax)