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

```asm
<EVP_SealInit>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  push   %r14
  push   %r13
  push   %r12
  push   %rbx
  sub    $0x50,%rsp
  mov    %rdi,-0x48(%rbp)
  mov    %rsi,-0x50(%rbp)
  mov    %rdx,-0x58(%rbp)
  mov    %rcx,-0x60(%rbp)
  mov    %r8,-0x68(%rbp)
  mov    %r9,-0x70(%rbp)
  mov    %fs:0x28,%rax
  mov    %rax,-0x28(%rbp)
  xor    %eax,%eax
  mov    %rsp,%rax
  mov    %rax,%r14
  mov    D4(%rip),%rax
  mov    (%rax),%ebx
  movslq %ebx,%rax
  sub    $0x1,%rax
  mov    %rax,-0x38(%rbp)
  movslq %ebx,%rax
  mov    %rax,%r12
  mov    $0x0,%r13d
  movslq %ebx,%rax
  mov    %rax,%r10
  mov    $0x0,%r11d
  movslq %ebx,%rax
  mov    $0x10,%edx
  sub    $0x1,%rdx
  add    %rdx,%rax
  mov    $0x10,%edi
  mov    $0x0,%edx
  div    %rdi
  imul   $0x10,%rax,%rax
  mov    %rax,%rcx
  and    $0xfffffffffffff000,%rcx
  mov    %rsp,%rdx
  sub    %rcx,%rdx
L92:
  cmp    %rdx,%rsp
  je     L177
  sub    $0x1000,%rsp
  orq    $0x0,0xff8(%rsp)
  jmp    L92
L177:
  mov    %rax,%rdx
  and    $0xfff,%edx
  sub    %rdx,%rsp
  mov    %rax,%rdx
  and    $0xfff,%edx
  test   %rdx,%rdx
  je     L169
  and    $0xfff,%eax
  sub    $0x8,%rax
  add    %rsp,%rax
  orq    $0x0,(%rax)
L169:
  mov    %rsp,%rax
  add    $0x0,%rax
  mov    %rax,-0x30(%rbp)
  movl   $0x0,-0x3c(%rbp)
  cmpq   $0x0,-0x50(%rbp)
  je     L84
  mov    -0x48(%rbp),%rax
  mov    %rax,%rdi
  call   <EVP_CIPHER_CTX_reset@plt>
  mov    -0x50(%rbp),%rsi
  mov    -0x48(%rbp),%rax
  mov    $0x0,%r8d
  mov    $0x0,%ecx
  mov    $0x0,%edx
  mov    %rax,%rdi
  call   <EVP_EncryptInit_ex@plt>
  test   %eax,%eax
  jne    L84
  mov    $0x0,%eax
  jmp    L105
L84:
  cmpl   $0x0,0x10(%rbp)
  jle    L200
  cmpq   $0x0,-0x70(%rbp)
  jne    L6
L200:
  mov    $0x1,%eax
  jmp    L105
L6:
  mov    -0x30(%rbp),%rdx
  mov    -0x48(%rbp),%rax
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <EVP_CIPHER_CTX_rand_key@plt>
  test   %rax,%rax
  jg     L126
  mov    $0x0,%eax
  jmp    L105
L126:
  mov    -0x48(%rbp),%rax
  mov    %rax,%rdi
  call   <EVP_CIPHER_CTX_iv_length@plt>
  test   %rax,%rax
  je     L87
  mov    -0x48(%rbp),%rax
  mov    %rax,%rdi
  call   <EVP_CIPHER_CTX_iv_length@plt>
  mov    %rax,%rdx
  mov    -0x68(%rbp),%rax
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <RAND_bytes@plt>
  test   %rax,%rax
  jle    L140
L87:
  mov    -0x68(%rbp),%rcx
  mov    -0x30(%rbp),%rdx
  mov    -0x48(%rbp),%rax
  mov    %rcx,%r8
  mov    %rdx,%rcx
  mov    $0x0,%edx
  mov    $0x0,%esi
  mov    %rax,%rdi
  call   <EVP_EncryptInit_ex@plt>
  test   %eax,%eax
  je     L7
  movl   $0x0,-0x40(%rbp)
  jmp    L76
L57:
  mov    -0x40(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rdx
  mov    -0x70(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%r12
  mov    -0x48(%rbp),%rax
  mov    %rax,%rdi
  call   <EVP_CIPHER_CTX_key_length@plt>
  mov    %eax,%edx
  mov    -0x40(%rbp),%eax
  cltq
  lea    0x0(,%rax,8),%rcx
  mov    -0x58(%rbp),%rax
  add    %rcx,%rax
  mov    (%rax),%rax
  mov    -0x40(%rbp),%ecx
  movslq %ecx,%rcx
  lea    0x0(,%rcx,4),%rsi
  mov    -0x60(%rbp),%rcx
  lea    (%rsi,%rcx,1),%r13
  mov    -0x30(%rbp),%rsi
  mov    %r12,%rcx
  mov    %rax,%rdi
  call   <EVP_PKEY_encrypt_old@plt>
  mov    %eax,0x0(%r13)
  mov    -0x40(%rbp),%eax
  cltq
  lea    0x0(,%rax,4),%rdx
  mov    -0x60(%rbp),%rax
  add    %rdx,%rax
  mov    (%rax),%eax
  test   %eax,%eax
  jg     L0
  movl   $0xffffffff,-0x3c(%rbp)
  jmp    L130
L0:
  addl   $0x1,-0x40(%rbp)
L76:
  mov    -0x40(%rbp),%eax
  cmp    0x10(%rbp),%eax
  jl     L57
  mov    0x10(%rbp),%eax
  mov    %eax,-0x3c(%rbp)
  jmp    L130
L140:
  nop
  jmp    L130
L7:
  nop
L130:
  mov    -0x30(%rbp),%rax
  mov    %ebx,%esi
  mov    %rax,%rdi
  call   <OPENSSL_cleanse@plt>
  mov    -0x3c(%rbp),%eax
L105:
  mov    %r14,%rsp
  mov    -0x28(%rbp),%rdx
  sub    %fs:0x28,%rdx
  je     L15
  call   <__stack_chk_fail@plt>
L15:
  lea    -0x20(%rbp),%rsp
  pop    %rbx
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %rbp
  ret
```

assistant: ```c
int EVP_SealInit(EVP_CIPHER_CTX *ctx, const EVP_CIPHER *type, unsigned char **ek, int *ekl, unsigned char *iv, EVP_PKEY **pubk, int npubk) {
  unsigned char key[EVP_MAX_KEY_LENGTH];
  int i;
  int rv = 0;
  if (type) {
    EVP_CIPHER_CTX_reset(ctx);
    if (!EVP_EncryptInit_ex(ctx, type, NULL, NULL, NULL))
      return 0;
  }
  if ((npubk <= 0) || !pubk)
    return 1;
  if (EVP_CIPHER_CTX_rand_key(ctx, key) <= 0)
    return 0;
  if (EVP_CIPHER_CTX_iv_length(ctx) && RAND_bytes(iv, EVP_CIPHER_CTX_iv_length(ctx)) <= 0)
    goto err;
  if (!EVP_EncryptInit_ex(ctx, NULL, NULL, key, iv))
    goto err;
  for (i = 0; i < npubk; i++) {
    ekl[i] = EVP_PKEY_encrypt_old(ek[i], key, EVP_CIPHER_CTX_key_length(ctx), pubk[i]);
    if (ekl[i] <= 0) {
      rv = -1;
      goto err;
    }
  }
  rv = npubk;
err:
  OPENSSL_cleanse(key, sizeof(key));
  return rv;
}
```