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

```asm
<ArchFindMember>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  push   %r14
  push   %r13
  mov    %rsi,%r13
  push   %r12
  push   %rbx
  mov    %rdx,%rbx
  sub    $0x10,%rsp
  mov    D0(%rip),%r14
  mov    %fs:0x28,%rax
  mov    %rax,-0x28(%rbp)
  xor    %eax,%eax
  mov    %rsp,%rsi
  movslq (%r14),%rax
  add    $0xf,%rax
  mov    %rax,%rdx
  and    $0xfffffffffffff000,%rax
  sub    %rax,%rsi
  and    $0xfffffffffffffff0,%rdx
  cmp    %rsi,%rsp
  je     L116
L81:
  sub    $0x1000,%rsp
  orq    $0x0,0xff8(%rsp)
  cmp    %rsi,%rsp
  jne    L81
L116:
  and    $0xfff,%edx
  sub    %rdx,%rsp
  test   %rdx,%rdx
  jne    L75
L87:
  mov    %rcx,%rsi
  call   <fopen@plt>
  mov    %rax,%r12
  test   %rax,%rax
  je     L126
  mov    (%r14),%esi
  mov    %rax,%rcx
  mov    $0x1,%edx
  mov    %rsp,%rdi
  call   <fread@plt>
  cmp    $0x1,%eax
  jne    L111
  mov    D37(%rip),%rax
  movslq (%r14),%rdx
  mov    %rsp,%rdi
  mov    (%rax),%rsi
  call   <strncmp@plt>
  test   %rax,%rax
  jne    L111
  mov    %r13,%rdi
  mov    $0x2f,%esi
  mov    $0x8,%r14d
  call   <strrchr@plt>
  test   %rax,%rax
  lea    0x1(%rax),%rdx
  cmovne %rdx,%r13
  mov    %r13,%rdi
  call   <strlen@plt>
  cmp    %r14,%rax
  cmovbe %rax,%r14
  cmp    $0x7,%rax
  jbe    L47
  jmp    L112
  nopl   0x0(%rax,%rax,1)
L108:
  mov    D33(%rip),%rax
  mov    (%rbx),%rdi
  mov    $0x8,%edx
  mov    (%rax),%rsi
  call   <strncmp@plt>
  test   %rax,%rax
  jne    L111
  mov    0x8(%rbx),%rsi
  mov    %r14,%rdx
  mov    %r13,%rdi
  call   <strncmp@plt>
  test   %rax,%rax
  jne    L74
  mov    0x8(%rbx),%rax
  cmpb   $0x20,(%rax,%r14,1)
  je     L105
L74:
  mov    0x10(%rbx),%rax
  mov    $0xa,%edx
  xor    %esi,%esi
  movb   $0x0,0x7(%rax)
  mov    0x10(%rbx),%rdi
  call   <strtol@plt>
  mov    %r12,%rdi
  lea    0x1(%rax),%esi
  mov    D39(%rip),%rax
  and    $0xfffffffe,%esi
  mov    (%rax),%edx
  call   <fseek@plt>
L47:
  mov    %r12,%rcx
  mov    $0x1,%edx
  mov    $0x18,%esi
  mov    %rbx,%rdi
  call   <fread@plt>
  cmp    $0x1,%eax
  je     L108
  nopl   0x0(%rax)
L111:
  mov    %r12,%rdi
  xor    %r12d,%r12d
  call   <fclose@plt>
L126:
  mov    -0x28(%rbp),%rax
  sub    %fs:0x28,%rax
  jne    L109
  lea    -0x20(%rbp),%rsp
  mov    %r12,%rax
  pop    %rbx
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %rbp
  ret
  xchg   %ax,%ax
L75:
  orq    $0x0,-0x8(%rsp,%rdx,1)
  jmp    L87
L176:
  mov    0x10(%rbx),%rax
  mov    $0xa,%edx
  xor    %esi,%esi
  movb   $0x0,0x7(%rax)
  mov    0x10(%rbx),%rdi
  call   <strtol@plt>
  mov    %r12,%rdi
  lea    0x1(%rax),%esi
  mov    D39(%rip),%rax
  and    $0xfffffffe,%esi
  mov    (%rax),%edx
  call   <fseek@plt>
L112:
  mov    %r12,%rcx
  mov    $0x1,%edx
  mov    $0x18,%esi
  mov    %rbx,%rdi
  call   <fread@plt>
  cmp    $0x1,%eax
  jne    L111
  mov    D33(%rip),%rax
  mov    (%rbx),%rdi
  mov    $0x8,%edx
  mov    (%rax),%rsi
  call   <strncmp@plt>
  test   %rax,%rax
  jne    L111
  mov    0x8(%rbx),%rsi
  mov    %r14,%rdx
  mov    %r13,%rdi
  call   <strncmp@plt>
  test   %rax,%rax
  jne    L176
L105:
  mov    D39(%rip),%rax
  mov    $0xffffffe8,%esi
  mov    %r12,%rdi
  mov    (%rax),%edx
  call   <fseek@plt>
  jmp    L126
L109:
  call   <__stack_chk_fail@plt>
```

assistant: ```c
FILE *ArchFindMember(char *archive, char *member, struct ar_hdr *arhPtr, const char *mode) {
  FILE *arch;
  int size;
  char *cp;
  char magic[SARMAG];
  size_t len, tlen;
  arch = fopen(archive, mode);
  if (arch == NULL) {
    return NULL;
  }
  if ((fread(magic, SARMAG, 1, arch) != 1) || (strncmp(magic, ARMAG, SARMAG) != 0)) {
    fclose(arch);
    return NULL;
  }
  cp = strrchr(member, '/');
  if (cp != NULL) {
    member = cp + 1;
  }
  len = tlen = strlen(member);
  if (len > sizeof(arhPtr->ar_name)) {
    tlen = sizeof(arhPtr->ar_name);
  }
  while (fread((char *)arhPtr, sizeof(struct ar_hdr), 1, arch) == 1) {
    if (strncmp(arhPtr->ar_fmag, ARFMAG, sizeof(arhPtr->ar_fmag)) != 0) {
      fclose(arch);
      return NULL;
    } else if (strncmp(member, arhPtr->ar_name, tlen) == 0) {
      if (tlen != sizeof(arhPtr->ar_name) && arhPtr->ar_name[tlen] != ' ') {
        goto skip;
      } else {
        fseek(arch, -sizeof(struct ar_hdr), SEEK_CUR);
        return (arch);
      }
    } else {
    skip:
      arhPtr->ar_size[sizeof(arhPtr->ar_size) - 1] = '\0';
      size = (int)strtol(arhPtr->ar_size, NULL, 10);
      fseek(arch, (size + 1) & ~1, SEEK_CUR);
    }
  }
  fclose(arch);
  return NULL;
}
```