user: Translate the below assembly code into C programming language:

```asm
<crypto_aead_encrypt>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  sub    $0xc0,%rsp
  mov    %rdi,-0x78(%rbp)
  mov    %rsi,-0x80(%rbp)
  mov    %rdx,-0x88(%rbp)
  mov    %rcx,-0x90(%rbp)
  mov    %r8,-0x98(%rbp)
  mov    %r9,-0xa0(%rbp)
  mov    0x10(%rbp),%rax
  mov    %rax,-0xa8(%rbp)
  mov    0x18(%rbp),%rax
  mov    %rax,-0xb0(%rbp)
  mov    0x20(%rbp),%rax
  mov    %rax,-0xb8(%rbp)
  mov    %fs:0x28,%rax
  mov    %rax,-0x8(%rbp)
  xor    %eax,%eax
  lea    -0x60(%rbp),%rdx
  mov    -0xb0(%rbp),%rcx
  mov    -0xb8(%rbp),%rax
  mov    %rcx,%rsi
  mov    %rax,%rdi
  call   <aegis256_initialization@plt>
  movq   $0x0,-0x68(%rbp)
  jmp    L67
L49:
  mov    -0x98(%rbp),%rdx
  mov    -0x68(%rbp),%rax
  lea    (%rdx,%rax,1),%rcx
  lea    -0x60(%rbp),%rdx
  lea    -0x30(%rbp),%rax
  mov    %rax,%rsi
  mov    %rcx,%rdi
  call   <aegis256_enc_aut_step@plt>
  addq   $0x10,-0x68(%rbp)
L67:
  mov    -0x68(%rbp),%rax
  add    $0x10,%rax
  cmp    %rax,-0xa0(%rbp)
  jae    L49
  mov    -0xa0(%rbp),%rax
  and    $0xf,%eax
  test   %rax,%rax
  je     L61
  lea    -0x40(%rbp),%rax
  mov    $0x10,%edx
  mov    $0x0,%esi
  mov    %rax,%rdi
  call   <memset@plt>
  mov    -0xa0(%rbp),%rax
  and    $0xf,%eax
  mov    %eax,%edx
  mov    -0x98(%rbp),%rcx
  mov    -0x68(%rbp),%rax
  add    %rax,%rcx
  lea    -0x40(%rbp),%rax
  mov    %rcx,%rsi
  mov    %rax,%rdi
  call   <memcpy@plt>
  lea    -0x60(%rbp),%rdx
  lea    -0x30(%rbp),%rcx
  lea    -0x40(%rbp),%rax
  mov    %rcx,%rsi
  mov    %rax,%rdi
  call   <aegis256_enc_aut_step@plt>
L61:
  movq   $0x0,-0x68(%rbp)
  jmp    L54
L10:
  mov    -0x78(%rbp),%rdx
  mov    -0x68(%rbp),%rax
  lea    (%rdx,%rax,1),%rsi
  mov    -0x88(%rbp),%rdx
  mov    -0x68(%rbp),%rax
  lea    (%rdx,%rax,1),%rcx
  lea    -0x60(%rbp),%rax
  mov    %rax,%rdx
  mov    %rcx,%rdi
  call   <aegis256_enc_aut_step@plt>
  addq   $0x10,-0x68(%rbp)
L54:
  mov    -0x68(%rbp),%rax
  add    $0x10,%rax
  cmp    %rax,-0x90(%rbp)
  jae    L10
  mov    -0x90(%rbp),%rax
  and    $0xf,%eax
  test   %rax,%rax
  je     L27
  lea    -0x40(%rbp),%rax
  mov    $0x10,%edx
  mov    $0x0,%esi
  mov    %rax,%rdi
  call   <memset@plt>
  mov    -0x90(%rbp),%rax
  and    $0xf,%eax
  mov    %eax,%edx
  mov    -0x88(%rbp),%rcx
  mov    -0x68(%rbp),%rax
  add    %rax,%rcx
  lea    -0x40(%rbp),%rax
  mov    %rcx,%rsi
  mov    %rax,%rdi
  call   <memcpy@plt>
  lea    -0x60(%rbp),%rdx
  lea    -0x30(%rbp),%rcx
  lea    -0x40(%rbp),%rax
  mov    %rcx,%rsi
  mov    %rax,%rdi
  call   <aegis256_enc_aut_step@plt>
  mov    -0x90(%rbp),%rax
  and    $0xf,%eax
  mov    %eax,%edx
  mov    -0x78(%rbp),%rcx
  mov    -0x68(%rbp),%rax
  add    %rax,%rcx
  lea    -0x30(%rbp),%rax
  mov    %rax,%rsi
  mov    %rcx,%rdi
  call   <memcpy@plt>
L27:
  lea    -0x60(%rbp),%rcx
  lea    -0x20(%rbp),%rdx
  mov    -0xa0(%rbp),%rsi
  mov    -0x90(%rbp),%rax
  mov    %rcx,%r8
  mov    %rdx,%rcx
  mov    $0x10,%edx
  mov    %rax,%rdi
  call   <aegis256_tag_generation@plt>
  mov    -0x90(%rbp),%rax
  lea    0x10(%rax),%rdx
  mov    -0x80(%rbp),%rax
  mov    %rdx,(%rax)
  mov    -0x78(%rbp),%rdx
  mov    -0x90(%rbp),%rax
  lea    (%rdx,%rax,1),%rcx
  lea    -0x20(%rbp),%rax
  mov    $0x10,%edx
  mov    %rax,%rsi
  mov    %rcx,%rdi
  call   <memcpy@plt>
  mov    $0x0,%eax
  mov    -0x8(%rbp),%rdx
  sub    %fs:0x28,%rdx
  je     L66
  call   <__stack_chk_fail@plt>
L66:
  leave
  ret
```

assistant: ```c
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];
  aegis256_initialization(k, npub, aegis256_state);
  for (i = 0; (i + 16) <= adlen; i += 16) {
    aegis256_enc_aut_step(ad + i, ciphertextblock, aegis256_state);
  }
  if ((adlen & 0xf) != 0) {
    memset(plaintextblock, 0, 16);
    memcpy(plaintextblock, ad + i, adlen & 0xf);
    aegis256_enc_aut_step(plaintextblock, ciphertextblock, aegis256_state);
  }
  for (i = 0; (i + 16) <= mlen; i += 16) {
    aegis256_enc_aut_step(m + i, c + i, aegis256_state);
  }
  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);
  }
  aegis256_tag_generation(mlen, adlen, 16, mac, aegis256_state);
  *clen = mlen + 16;
  memcpy(c + mlen, mac, 16);
  return 0;
}
```