user: Demonstrate the C code that generates the assembly output below:

```asm
<PKCS5_v2_PBKDF2_keyivgen>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  push   %r15
  push   %r14
  push   %r12
  push   %rbx
  sub    $0x90,%rsp
  mov    %rdi,-0x88(%rbp)
  mov    %rsi,-0x90(%rbp)
  mov    %edx,-0x94(%rbp)
  mov    %rcx,-0xa0(%rbp)
  mov    %r8,-0xa8(%rbp)
  mov    %r9,-0xb0(%rbp)
  mov    %fs:0x28,%rax
  mov    %rax,-0x28(%rbp)
  xor    %eax,%eax
  mov    %rsp,%rax
  mov    %rax,%r12
  mov    D92(%rip),%rax
  mov    (%rax),%ebx
  movslq %ebx,%rax
  sub    $0x1,%rax
  mov    %rax,-0x48(%rbp)
  movslq %ebx,%rax
  mov    %rax,%r14
  mov    $0x0,%r15d
  movslq %ebx,%rax
  mov    %rax,%r10
  mov    $0x0,%r11d
  movslq %ebx,%rax
  mov    $0x10,%edx
  sub    $0x1,%rdx
  add    %rdx,%rax
  mov    $0x10,%ecx
  mov    $0x0,%edx
  div    %rcx
  imul   $0x10,%rax,%rax
  mov    %rax,%rcx
  and    $0xfffffffffffff000,%rcx
  mov    %rsp,%rdx
  sub    %rcx,%rdx
L107:
  cmp    %rdx,%rsp
  je     L129
  sub    $0x1000,%rsp
  orq    $0x0,0xff8(%rsp)
  jmp    L107
L129:
  mov    %rax,%rdx
  and    $0xfff,%edx
  sub    %rdx,%rsp
  mov    %rax,%rdx
  and    $0xfff,%edx
  test   %rdx,%rdx
  je     L18
  and    $0xfff,%eax
  sub    $0x8,%rax
  add    %rsp,%rax
  orq    $0x0,(%rax)
L18:
  mov    %rsp,%rax
  add    $0x0,%rax
  mov    %rax,-0x40(%rbp)
  movl   $0x0,-0x70(%rbp)
  movl   $0x0,-0x6c(%rbp)
  movq   $0x0,-0x50(%rbp)
  mov    -0x88(%rbp),%rax
  mov    %rax,%rdi
  call   <EVP_CIPHER_CTX_cipher@plt>
  test   %rax,%rax
  jne    L145
  mov    D25(%rip),%rax
  mov    (%rax),%edx
  mov    D186(%rip),%rax
  mov    (%rax),%eax
  mov    %edx,%esi
  mov    %eax,%edi
  call   <EVPerr@plt>
  jmp    L39
L145:
  mov    -0x88(%rbp),%rax
  mov    %rax,%rdi
  call   <EVP_CIPHER_CTX_key_length@plt>
  mov    %eax,-0x6c(%rbp)
  mov    -0x6c(%rbp),%edx
  movslq %ebx,%rax
  cmp    %rax,%rdx
  setbe  %al
  movzbl %al,%eax
  mov    %eax,%edi
  call   <OPENSSL_assert@plt>
  cmpq   $0x0,-0xa0(%rbp)
  je     L75
  mov    -0xa0(%rbp),%rax
  mov    (%rax),%rdx
  mov    D123(%rip),%rax
  mov    (%rax),%rax
  cmp    %rax,%rdx
  je     L140
L75:
  mov    D100(%rip),%rax
  mov    (%rax),%edx
  mov    D186(%rip),%rax
  mov    (%rax),%eax
  mov    %edx,%esi
  mov    %eax,%edi
  call   <EVPerr@plt>
  jmp    L39
L140:
  mov    -0xa0(%rbp),%rax
  mov    0x8(%rax),%rax
  mov    (%rax),%rax
  mov    %rax,-0x58(%rbp)
  mov    -0xa0(%rbp),%rax
  mov    0x8(%rax),%rax
  mov    0x8(%rax),%eax
  mov    %eax,-0x64(%rbp)
  mov    -0x64(%rbp),%edx
  lea    -0x58(%rbp),%rax
  mov    %rax,%rsi
  mov    $0x0,%edi
  call   <d2i_PBKDF2PARAM@plt>
  mov    %rax,-0x50(%rbp)
  cmpq   $0x0,-0x50(%rbp)
  jne    L47
  mov    D100(%rip),%rax
  mov    (%rax),%edx
  mov    D186(%rip),%rax
  mov    (%rax),%eax
  mov    %edx,%esi
  mov    %eax,%edi
  call   <EVPerr@plt>
  jmp    L39
L47:
  mov    -0x88(%rbp),%rax
  mov    %rax,%rdi
  call   <EVP_CIPHER_CTX_key_length@plt>
  mov    %eax,-0x6c(%rbp)
  mov    -0x50(%rbp),%rax
  mov    0x18(%rax),%rax
  test   %rax,%rax
  je     L58
  mov    -0x50(%rbp),%rax
  mov    0x18(%rax),%rax
  mov    %rax,%rdi
  call   <ASN1_INTEGER_get@plt>
  mov    -0x6c(%rbp),%edx
  cmp    %edx,%eax
  je     L58
  mov    D36(%rip),%rax
  mov    (%rax),%edx
  mov    D186(%rip),%rax
  mov    (%rax),%eax
  mov    %edx,%esi
  mov    %eax,%edi
  call   <EVPerr@plt>
  jmp    L39
L58:
  mov    -0x50(%rbp),%rax
  mov    0x10(%rax),%rax
  test   %rax,%rax
  je     L123
  mov    -0x50(%rbp),%rax
  mov    0x10(%rax),%rax
  mov    (%rax),%eax
  mov    %eax,%edi
  call   <OBJ_obj2nid@plt>
  mov    %eax,-0x68(%rbp)
  jmp    L62
L123:
  mov    D108(%rip),%rax
  mov    (%rax),%eax
  mov    %eax,-0x68(%rbp)
L62:
  mov    D65(%rip),%rax
  mov    (%rax),%eax
  lea    -0x74(%rbp),%rdx
  mov    -0x68(%rbp),%esi
  mov    $0x0,%r8d
  mov    %rdx,%rcx
  mov    $0x0,%edx
  mov    %eax,%edi
  call   <EVP_PBE_find@plt>
  test   %eax,%eax
  jne    L226
  mov    D135(%rip),%rax
  mov    (%rax),%edx
  mov    D186(%rip),%rax
  mov    (%rax),%eax
  mov    %edx,%esi
  mov    %eax,%edi
  call   <EVPerr@plt>
  jmp    L39
L226:
  mov    -0x74(%rbp),%eax
  mov    %eax,%edi
  call   <EVP_get_digestbynid@plt>
  mov    %rax,-0x38(%rbp)
  cmpq   $0x0,-0x38(%rbp)
  jne    L170
  mov    D135(%rip),%rax
  mov    (%rax),%edx
  mov    D186(%rip),%rax
  mov    (%rax),%eax
  mov    %edx,%esi
  mov    %eax,%edi
  call   <EVPerr@plt>
  jmp    L39
L170:
  mov    -0x50(%rbp),%rax
  mov    0x8(%rax),%rax
  mov    (%rax),%rdx
  mov    D68(%rip),%rax
  mov    (%rax),%rax
  cmp    %rax,%rdx
  je     L68
  mov    D39(%rip),%rax
  mov    (%rax),%edx
  mov    D186(%rip),%rax
  mov    (%rax),%eax
  mov    %edx,%esi
  mov    %eax,%edi
  call   <EVPerr@plt>
  jmp    L39
L68:
  mov    -0x50(%rbp),%rax
  mov    0x8(%rax),%rax
  mov    0x8(%rax),%rax
  mov    (%rax),%rax
  mov    %rax,-0x30(%rbp)
  mov    -0x50(%rbp),%rax
  mov    0x8(%rax),%rax
  mov    0x8(%rax),%rax
  mov    0x8(%rax),%eax
  mov    %eax,-0x60(%rbp)
  mov    -0x50(%rbp),%rax
  mov    (%rax),%rax
  mov    %rax,%rdi
  call   <ASN1_INTEGER_get@plt>
  mov    %eax,-0x5c(%rbp)
  mov    -0x38(%rbp),%r9
  mov    -0x5c(%rbp),%r8d
  mov    -0x60(%rbp),%ecx
  mov    -0x30(%rbp),%rdx
  mov    -0x94(%rbp),%esi
  mov    -0x90(%rbp),%rax
  push   -0x40(%rbp)
  mov    -0x6c(%rbp),%edi
  push   %rdi
  mov    %rax,%rdi
  call   <PKCS5_PBKDF2_HMAC@plt>
  add    $0x10,%rsp
  test   %eax,%eax
  je     L190
  mov    -0x40(%rbp),%rdx
  mov    -0x88(%rbp),%rax
  mov    0x10(%rbp),%r9d
  mov    $0x0,%r8d
  mov    %rdx,%rcx
  mov    $0x0,%edx
  mov    $0x0,%esi
  mov    %rax,%rdi
  call   <EVP_CipherInit_ex@plt>
  mov    %eax,-0x70(%rbp)
  jmp    L39
L190:
  nop
L39:
  mov    -0x6c(%rbp),%edx
  mov    -0x40(%rbp),%rax
  mov    %edx,%esi
  mov    %rax,%rdi
  call   <OPENSSL_cleanse@plt>
  mov    -0x50(%rbp),%rax
  mov    %rax,%rdi
  call   <PBKDF2PARAM_free@plt>
  mov    -0x70(%rbp),%eax
  mov    %r12,%rsp
  mov    -0x28(%rbp),%rdx
  sub    %fs:0x28,%rdx
  je     L16
  call   <__stack_chk_fail@plt>
L16:
  lea    -0x20(%rbp),%rsp
  pop    %rbx
  pop    %r12
  pop    %r14
  pop    %r15
  pop    %rbp
  ret
```

assistant: ```c
int PKCS5_v2_PBKDF2_keyivgen(EVP_CIPHER_CTX *ctx, const char *pass, int passlen, ASN1_TYPE *param, const EVP_CIPHER *c, const EVP_MD *md, int en_de) {
  unsigned char *salt, key[EVP_MAX_KEY_LENGTH];
  const unsigned char *pbuf;
  int saltlen, iter, plen;
  int rv = 0;
  unsigned int keylen = 0;
  int prf_nid, hmac_md_nid;
  PBKDF2PARAM *kdf = NULL;
  const EVP_MD *prfmd;
  if (EVP_CIPHER_CTX_cipher(ctx) == NULL) {
    EVPerr(EVP_F_PKCS5_V2_PBKDF2_KEYIVGEN, EVP_R_NO_CIPHER_SET);
    goto err;
  }
  keylen = EVP_CIPHER_CTX_key_length(ctx);
  OPENSSL_assert(keylen <= sizeof key);
  if (!param || (param->type != V_ASN1_SEQUENCE)) {
    EVPerr(EVP_F_PKCS5_V2_PBKDF2_KEYIVGEN, EVP_R_DECODE_ERROR);
    goto err;
  }
  pbuf = param->value.sequence->data;
  plen = param->value.sequence->length;
  if (!(kdf = d2i_PBKDF2PARAM(NULL, &pbuf, plen))) {
    EVPerr(EVP_F_PKCS5_V2_PBKDF2_KEYIVGEN, EVP_R_DECODE_ERROR);
    goto err;
  }
  keylen = EVP_CIPHER_CTX_key_length(ctx);
  if (kdf->keylength && (ASN1_INTEGER_get(kdf->keylength) != (int)keylen)) {
    EVPerr(EVP_F_PKCS5_V2_PBKDF2_KEYIVGEN, EVP_R_UNSUPPORTED_KEYLENGTH);
    goto err;
  }
  if (kdf->prf)
    prf_nid = OBJ_obj2nid(kdf->prf->algorithm);
  else
    prf_nid = NID_hmacWithSHA1;
  if (!EVP_PBE_find(EVP_PBE_TYPE_PRF, prf_nid, NULL, &hmac_md_nid, 0)) {
    EVPerr(EVP_F_PKCS5_V2_PBKDF2_KEYIVGEN, EVP_R_UNSUPPORTED_PRF);
    goto err;
  }
  prfmd = EVP_get_digestbynid(hmac_md_nid);
  if (prfmd == NULL) {
    EVPerr(EVP_F_PKCS5_V2_PBKDF2_KEYIVGEN, EVP_R_UNSUPPORTED_PRF);
    goto err;
  }
  if (kdf->salt->type != V_ASN1_OCTET_STRING) {
    EVPerr(EVP_F_PKCS5_V2_PBKDF2_KEYIVGEN, EVP_R_UNSUPPORTED_SALT_TYPE);
    goto err;
  }
  salt = kdf->salt->value.octet_string->data;
  saltlen = kdf->salt->value.octet_string->length;
  iter = ASN1_INTEGER_get(kdf->iter);
  if (!PKCS5_PBKDF2_HMAC(pass, passlen, salt, saltlen, iter, prfmd, keylen, key))
    goto err;
  rv = EVP_CipherInit_ex(ctx, NULL, NULL, key, NULL, en_de);
err:
  OPENSSL_cleanse(key, keylen);
  PBKDF2PARAM_free(kdf);
  return rv;
}
```