user: What is the c source code of the assembly code below?

```asm
<asn1_primitive_new>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  sub    $0x40,%rsp
  mov    %rdi,-0x28(%rbp)
  mov    %rsi,-0x30(%rbp)
  mov    %edx,-0x34(%rbp)
  cmpq   $0x0,-0x30(%rbp)
  jne    L227
  mov    $0x0,%eax
  jmp    L107
L227:
  mov    -0x30(%rbp),%rax
  mov    0x10(%rax),%rax
  test   %rax,%rax
  je     L257
  mov    -0x30(%rbp),%rax
  mov    0x10(%rax),%rax
  mov    %rax,-0x10(%rbp)
  cmpl   $0x0,-0x34(%rbp)
  je     L142
  mov    -0x10(%rbp),%rax
  mov    0x8(%rax),%rax
  test   %rax,%rax
  je     L257
  mov    -0x10(%rbp),%rax
  mov    0x8(%rax),%rcx
  mov    -0x30(%rbp),%rdx
  mov    -0x28(%rbp),%rax
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   *%rcx
  mov    $0x1,%eax
  jmp    L107
L142:
  mov    -0x10(%rbp),%rax
  mov    (%rax),%rax
  test   %rax,%rax
  je     L257
  mov    -0x10(%rbp),%rax
  mov    (%rax),%rcx
  mov    -0x30(%rbp),%rdx
  mov    -0x28(%rbp),%rax
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   *%rcx
  jmp    L107
L257:
  mov    -0x30(%rbp),%rax
  mov    (%rax),%rdx
  mov    D4(%rip),%rax
  mov    (%rax),%rax
  cmp    %rax,%rdx
  jne    L104
  movl   $0xffffffff,-0x1c(%rbp)
  jmp    L58
L104:
  mov    -0x30(%rbp),%rax
  mov    0x8(%rax),%eax
  mov    %eax,-0x1c(%rbp)
L58:
  cmpl   $0x83,-0x1c(%rbp)
  je     L200
  cmpl   $0x83,-0x1c(%rbp)
  jg     L219
  cmpl   $0x82,-0x1c(%rbp)
  je     L237
  cmpl   $0x82,-0x1c(%rbp)
  jg     L219
  cmpl   $0x80,-0x1c(%rbp)
  je     L163
  cmpl   $0x81,-0x1c(%rbp)
  je     L41
  jmp    L219
L163:
  mov    D11(%rip),%rax
  mov    (%rax),%eax
  mov    %eax,%edi
  call   <OBJ_nid2obj@plt>
  mov    %rax,%rdx
  mov    -0x28(%rbp),%rax
  mov    %rdx,(%rax)
  mov    $0x1,%eax
  jmp    L107
L237:
  mov    -0x30(%rbp),%rax
  mov    0xc(%rax),%edx
  mov    -0x28(%rbp),%rax
  mov    %edx,(%rax)
  mov    $0x1,%eax
  jmp    L107
L41:
  mov    -0x28(%rbp),%rax
  movq   $0x1,(%rax)
  mov    $0x1,%eax
  jmp    L107
L200:
  mov    $0x10,%edi
  call   <OPENSSL_malloc@plt>
  mov    %rax,-0x8(%rbp)
  cmpq   $0x0,-0x8(%rbp)
  jne    L261
  mov    D44(%rip),%rax
  mov    (%rax),%edx
  mov    D50(%rip),%rax
  mov    (%rax),%eax
  mov    %edx,%esi
  mov    %eax,%edi
  call   <ERR_raise@plt>
  mov    $0x0,%eax
  jmp    L107
L261:
  mov    -0x8(%rbp),%rax
  movq   $0x0,0x8(%rax)
  mov    -0x8(%rbp),%rax
  movl   $0xffffffff,(%rax)
  mov    -0x28(%rbp),%rax
  mov    -0x8(%rbp),%rdx
  mov    %rdx,(%rax)
  jmp    L91
L219:
  cmpl   $0x0,-0x34(%rbp)
  je     L238
  mov    -0x28(%rbp),%rax
  mov    (%rax),%rax
  mov    %rax,-0x18(%rbp)
  mov    -0x18(%rbp),%rax
  mov    $0x8,%edx
  mov    $0x0,%esi
  mov    %rax,%rdi
  call   <memset@plt>
  mov    -0x18(%rbp),%rax
  mov    -0x1c(%rbp),%edx
  mov    %edx,(%rax)
  mov    D19(%rip),%rax
  mov    (%rax),%edx
  mov    -0x18(%rbp),%rax
  mov    %edx,0x4(%rax)
  jmp    L35
L238:
  mov    -0x1c(%rbp),%eax
  mov    %eax,%edi
  call   <ASN1_STRING_type_new@plt>
  mov    %rax,-0x18(%rbp)
  mov    -0x28(%rbp),%rax
  mov    -0x18(%rbp),%rdx
  mov    %rdx,(%rax)
L35:
  mov    -0x30(%rbp),%rax
  mov    (%rax),%rdx
  mov    D4(%rip),%rax
  mov    (%rax),%rax
  cmp    %rax,%rdx
  jne    L75
  cmpq   $0x0,-0x18(%rbp)
  je     L75
  mov    -0x18(%rbp),%rax
  mov    0x4(%rax),%edx
  mov    D41(%rip),%rax
  mov    (%rax),%eax
  or     %eax,%edx
  mov    -0x18(%rbp),%rax
  mov    %edx,0x4(%rax)
L75:
  nop
L91:
  mov    -0x28(%rbp),%rax
  mov    (%rax),%rax
  test   %rax,%rax
  je     L139
  mov    $0x1,%eax
  jmp    L107
L139:
  mov    $0x0,%eax
L107:
  leave
  ret
```

assistant: ```c
int asn1_primitive_new(ASN1_VALUE **pval, const ASN1_ITEM *it, int embed) {
  ASN1_TYPE *typ;
  ASN1_STRING *str;
  int utype;
  if (!it)
    return 0;
  if (it->funcs) {
    const ASN1_PRIMITIVE_FUNCS *pf = it->funcs;
    if (embed) {
      if (pf->prim_clear) {
        pf->prim_clear(pval, it);
        return 1;
      }
    } else if (pf->prim_new) {
      return pf->prim_new(pval, it);
    }
  }
  if (it->itype == ASN1_ITYPE_MSTRING)
    utype = -1;
  else
    utype = it->utype;
  switch (utype) {
  case V_ASN1_OBJECT:
    *pval = (ASN1_VALUE *)OBJ_nid2obj(NID_undef);
    return 1;
  case V_ASN1_BOOLEAN:
    *(ASN1_BOOLEAN *)pval = it->size;
    return 1;
  case V_ASN1_NULL:
    *pval = (ASN1_VALUE *)1;
    return 1;
  case V_ASN1_ANY:
    if ((typ = OPENSSL_malloc(sizeof(*typ))) == NULL) {
      ERR_raise(ERR_LIB_ASN1, ERR_R_MALLOC_FAILURE);
      return 0;
    }
    typ->value.ptr = NULL;
    typ->type = -1;
    *pval = (ASN1_VALUE *)typ;
    break;
  default:
    if (embed) {
      str = *(ASN1_STRING **)pval;
      memset(str, 0, sizeof(*str));
      str->type = utype;
      str->flags = ASN1_STRING_FLAG_EMBED;
    } else {
      str = ASN1_STRING_type_new(utype);
      *pval = (ASN1_VALUE *)str;
    }
    if (it->itype == ASN1_ITYPE_MSTRING && str)
      str->flags |= ASN1_STRING_FLAG_MSTRING;
    break;
  }
  if (*pval)
    return 1;
  return 0;
}
```