// File: /workspace/github_c_makefile_star2_O0/mjosaarinen[P]brutus/crypto_aead/aegis256/aesni/encrypt.c
// Function: crypto_aead_encrypt
int crypto_aead_encrypt(  
	unsigned char *c,unsigned long long *clen,
	const unsigned char *m,unsigned long long mlen,
	const unsigned char *ad,unsigned long long adlen,
	const unsigned char *nsec,
	const unsigned char *npub,
	const unsigned char *k
	)  
{
        unsigned long long i;
        unsigned char plaintextblock[16], ciphertextblock[16], mac[16];
        __m128i aegis256_state[6];

        //initialization stage
        aegis256_initialization(k, npub, aegis256_state);

        //process the associated data
        for (i = 0; (i+16) <= adlen; i += 16) {
              aegis256_enc_aut_step(ad+i, ciphertextblock, aegis256_state);
        }

        //deal with the partial block of associated data
        //in this program, we assume that the message length is multiple of bytes.
        if (  (adlen & 0xf) != 0 )  {
              memset(plaintextblock, 0, 16);
              memcpy(plaintextblock, ad+i, adlen & 0xf);
              aegis256_enc_aut_step(plaintextblock, ciphertextblock, aegis256_state);
        }

        //encrypt the plaintext
        for (i = 0; (i+16) <= mlen; i += 16) {
              aegis256_enc_aut_step(m+i, c+i, aegis256_state);
        }

        // Deal with the partial block  
        // In this program, we assume that the message length is multiple of bytes.
        if (  (mlen & 0xf) != 0 )  {
              memset(plaintextblock, 0, 16);
              memcpy(plaintextblock, m+i, mlen & 0xf);
              aegis256_enc_aut_step(plaintextblock, ciphertextblock, aegis256_state);
              memcpy(c+i,ciphertextblock, mlen & 0xf);
        }

        //finalization stage, we assume that the tag length is multiple of bytes
        aegis256_tag_generation(mlen,adlen, 16, mac, aegis256_state);
        *clen = mlen + 16;
        memcpy(c+mlen, mac, 16);

        return 0; 
}

// Assembly:
subq $0xc8, %rsp
movq 0xe0(%rsp), %rax
movq 0xd8(%rsp), %rax
movq 0xd0(%rsp), %rax
movq %rdi, 0xc0(%rsp)
movq %rsi, 0xb8(%rsp)
movq %rdx, 0xb0(%rsp)
movq %rcx, 0xa8(%rsp)
movq %r8, 0xa0(%rsp)
movq %r9, 0x98(%rsp)
movq 0xe0(%rsp), %rdi
movq 0xd8(%rsp), %rsi
movq %rsp, %rdx
callq 0x1090
movq $0x0, 0x90(%rsp)
movq 0x90(%rsp), %rax
addq $0x10, %rax
cmpq 0x98(%rsp), %rax
ja 0x21cc
movq 0xa0(%rsp), %rdi
addq 0x90(%rsp), %rdi
leaq 0x70(%rsp), %rsi
movq %rsp, %rdx
callq 0x1050
movq 0x90(%rsp), %rax
addq $0x10, %rax
movq %rax, 0x90(%rsp)
jmp 0x2183
movq 0x98(%rsp), %rax
andq $0xf, %rax
cmpq $0x0, %rax
je 0x2230
leaq 0x80(%rsp), %rdi
xorl %esi, %esi
movl $0x10, %edx
callq 0x1030
leaq 0x80(%rsp), %rdi
movq 0xa0(%rsp), %rsi
addq 0x90(%rsp), %rsi
movq 0x98(%rsp), %rdx
andq $0xf, %rdx
callq 0x10a0
leaq 0x80(%rsp), %rdi
leaq 0x70(%rsp), %rsi
movq %rsp, %rdx
callq 0x1050
movq $0x0, 0x90(%rsp)
movq 0x90(%rsp), %rax
addq $0x10, %rax
cmpq 0xa8(%rsp), %rax
ja 0x2290
movq 0xb0(%rsp), %rdi
addq 0x90(%rsp), %rdi
movq 0xc0(%rsp), %rsi
addq 0x90(%rsp), %rsi
movq %rsp, %rdx
callq 0x1050
movq 0x90(%rsp), %rax
addq $0x10, %rax
movq %rax, 0x90(%rsp)
jmp 0x223c
movq 0xa8(%rsp), %rax
andq $0xf, %rax
cmpq $0x0, %rax
je 0x231a
leaq 0x80(%rsp), %rdi
xorl %esi, %esi
movl $0x10, %edx
callq 0x1030
leaq 0x80(%rsp), %rdi
movq 0xb0(%rsp), %rsi
addq 0x90(%rsp), %rsi
movq 0xa8(%rsp), %rdx
andq $0xf, %rdx
callq 0x10a0
leaq 0x80(%rsp), %rdi
leaq 0x70(%rsp), %rsi
movq %rsp, %rdx
callq 0x1050
movq 0xc0(%rsp), %rdi
addq 0x90(%rsp), %rdi
leaq 0x70(%rsp), %rsi
movq 0xa8(%rsp), %rdx
andq $0xf, %rdx
callq 0x10a0
movq 0xa8(%rsp), %rdi
movq 0x98(%rsp), %rsi
leaq 0x60(%rsp), %rcx
movq %rsp, %r8
movl $0x10, %edx
callq 0x10c0
movq 0xa8(%rsp), %rcx
addq $0x10, %rcx
movq 0xb8(%rsp), %rax
movq %rcx, (%rax)
movq 0xc0(%rsp), %rax
movq 0xa8(%rsp), %rcx
movq 0x60(%rsp), %rdx
movq %rdx, (%rax,%rcx)
movq 0x68(%rsp), %rdx
movq %rdx, 0x8(%rax,%rcx)
xorl %eax, %eax
addq $0xc8, %rsp
retq