user: What would the C source look like for the assembly code provided here?

```asm
<rclose>:
  endbr64
  push   %r14
  pxor   %xmm0,%xmm0
  xor    %edx,%edx
  push   %r13
  push   %r12
  mov    %esi,%r12d
  push   %rbp
  push   %rbx
  mov    %rdi,%rbx
  sub    $0xb0,%rsp
  mov    %fs:0x28,%rax
  mov    %rax,0xa8(%rsp)
  movabs $0x65736f6c6372,%rax
  mov    %rdx,0x8(%rsp)
  movaps %xmm0,0x10(%rsp)
  movaps %xmm0,0x20(%rsp)
  movaps %xmm0,0x30(%rsp)
  movaps %xmm0,0x40(%rsp)
  movaps %xmm0,0x50(%rsp)
  mov    %rax,(%rsp)
  movaps %xmm0,0x60(%rsp)
  movaps %xmm0,0x70(%rsp)
  movaps %xmm0,0x80(%rsp)
  movaps %xmm0,0x90(%rsp)
  test   %esi,%esi
  js     L56
  mov    $0x1,%ebp
  cmp    $0x3,%esi
  jg     L129
L95:
  mov    (%rbx),%r14d
  xor    %r13d,%r13d
  test   %r14d,%r14d
  jle    L4
L48:
  cmp    $0x2,%r12d
  jle    L7
L93:
  test   %ebp,%ebp
  jne    L124
L76:
  movl   $0x0,(%rbx)
  mov    0xa8(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L10
  add    $0xb0,%rsp
  mov    %r13d,%eax
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  ret
  nopl   0x0(%rax)
L71:
  xor    %ebp,%ebp
L129:
  mov    %rsp,%rsi
  mov    %r12d,%edx
  lea    D9(%rip),%rdi
  xor    %eax,%eax
  call   <printf@plt>
  mov    (%rbx),%r14d
  mov    $0x2,%r13d
  test   %r14d,%r14d
  jg     L48
L4:
  mov    %rsp,%rsi
  mov    %r14d,%edx
  lea    D23(%rip),%rdi
  xor    %eax,%eax
  call   <printf@plt>
  mov    $0x1,%r13d
  jmp    L76
  nopl   0x0(%rax,%rax,1)
L124:
  mov    %r14d,%edi
  call   <close@plt>
  test   %eax,%eax
  je     L76
  lea    0x20(%rsp),%rbp
  mov    %eax,%ecx
  mov    %rsp,%rdx
  xor    %eax,%eax
  lea    D39(%rip),%rsi
  mov    %rbp,%rdi
  mov    $0xfffffffe,%r13d
  call   <sprintf@plt>
  mov    %rbp,%rdi
  call   <perror@plt>
  jmp    L76
  xchg   %ax,%ax
L7:
  mov    %r12d,%esi
  mov    %r14d,%edi
  call   <shutdown@plt>
  test   %eax,%eax
  je     L93
  lea    0x20(%rsp),%r13
  mov    %eax,%r8d
  mov    %rsp,%rdx
  mov    %r12d,%ecx
  mov    %r13,%rdi
  lea    D3(%rip),%rsi
  xor    %eax,%eax
  call   <sprintf@plt>
  mov    %r13,%rdi
  mov    $0xffffffff,%r13d
  call   <perror@plt>
  jmp    L93
  nopl   (%rax)
L56:
  cmp    $0xfffffffd,%esi
  jl     L71
  neg    %r12d
  xor    %ebp,%ebp
  jmp    L95
L10:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: extract_symbolic_data
arguments: label: D9
data_type: string
name: extract_symbolic_data
arguments: label: D23
data_type: string
name: extract_symbolic_data
arguments: label: D39
data_type: string
name: extract_symbolic_data
arguments: label: D3
data_type: string

tool: D9: -E- %s: invalid shutdown mode: %d


tool: D23: -E- %s: invalid socket: %d


tool: D39: -E- %s: close rc = %d

tool: D3: -E- %s: shutdown(%d) rc = %d

assistant: ```c
int rclose(int *piSocket, int iMode) {
  int iSocket;
  int iRC;
  int iDebug = 0;
  int iError = 0;
  int iClose = 1;
  char cModule[32] = "rclose";
  char cMsg[128] = "";
  if (iMode < 0) {
    iMode = -iMode;
    iClose = 0;
  }
  if ((iMode < 0) || (iMode > 3)) {
    if (iClose == 0)
      iMode = -iMode;
    printf("-E- %s: invalid shutdown mode: %d\n", cModule, iMode);
    iError = 2;
  }
  iSocket = *piSocket;
  if (iSocket > 0) {
    if (iMode < 3) {
      iRC = shutdown(iSocket, iMode);
      if (iRC) {
        sprintf(cMsg, "-E- %s: shutdown(%d) rc = %d", cModule, iMode, iRC);
        perror(cMsg);
        iError = -1;
      } else if (iDebug)
        printf("    %s: shutdown(%d) successfull\n", cModule, iMode);
    }
    if (iClose) {
      iRC = close(iSocket);
      if (iRC) {
        sprintf(cMsg, "-E- %s: close rc = %d", cModule, iRC);
        perror(cMsg);
        iError = -2;
      } else if (iDebug)
        printf("    %s: connection closed\n", cModule);
    }
  } else {
    printf("-E- %s: invalid socket: %d\n", cModule, iSocket);
    iError = 1;
  }
  *piSocket = 0;
  return (iError);
}
```