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

```asm
<send_header>:
  endbr64
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0xa0,%rsp
  mov    %rdi,%rbx
  mov    %rcx,%r12
  mov    %r8,%rbp
  mov    %r9d,%r13d
  mov    %fs:0x28,%rax
  mov    %rax,0x98(%rsp)
  xor    %eax,%eax
  mov    %rdx,%r8
  mov    %esi,%ecx
  lea    D92(%rip),%rdx
  lea    D55(%rip),%rsi
  call   <fprintf@plt>
  lea    D115(%rip),%rdx
  lea    D17(%rip),%rsi
  mov    %rbx,%rdi
  mov    $0x0,%eax
  call   <fprintf@plt>
  mov    $0x0,%edi
  call   <time@plt>
  mov    %eax,0xc(%rsp)
  lea    0xc(%rsp),%rdi
  call   <gmtime@plt>
  mov    %eax,%ecx
  lea    0x10(%rsp),%r14
  lea    D122(%rip),%rdx
  mov    $0x80,%esi
  mov    %r14,%rdi
  call   <strftime@plt>
  mov    %r14,%rdx
  lea    D33(%rip),%rsi
  mov    %rbx,%rdi
  mov    $0x0,%eax
  call   <fprintf@plt>
  test   %r12,%r12
  je     L18
  mov    %r12,%rdx
  lea    D59(%rip),%rsi
  mov    %rbx,%rdi
  mov    $0x0,%eax
  call   <fprintf@plt>
L18:
  test   %rbp,%rbp
  je     L49
  mov    %rbp,%rdx
  lea    D96(%rip),%rsi
  mov    %rbx,%rdi
  mov    $0x0,%eax
  call   <fprintf@plt>
L49:
  test   %r13d,%r13d
  jns    L54
L37:
  cmpl   $0xffffffff,0xd0(%rsp)
  jne    L7
L39:
  mov    %rbx,%rcx
  mov    $0x13,%edx
  mov    $0x1,%esi
  lea    D93(%rip),%rdi
  call   <fwrite@plt>
  mov    %rbx,%rcx
  mov    $0x2,%edx
  mov    $0x1,%esi
  lea    D19(%rip),%rdi
  call   <fwrite@plt>
  mov    0x98(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L55
  add    $0xa0,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  ret
L54:
  mov    %r13d,%edx
  lea    D21(%rip),%rsi
  mov    %rbx,%rdi
  mov    $0x0,%eax
  call   <fprintf@plt>
  jmp    L37
L7:
  lea    0xd0(%rsp),%rdi
  call   <gmtime@plt>
  mov    %eax,%ecx
  lea    0x10(%rsp),%rbp
  lea    D122(%rip),%rdx
  mov    $0x80,%esi
  mov    %rbp,%rdi
  call   <strftime@plt>
  mov    %rbp,%rdx
  lea    D10(%rip),%rsi
  mov    %rbx,%rdi
  mov    $0x0,%eax
  call   <fprintf@plt>
  jmp    L39
L55:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: retrieve_data
arguments: tag: D92
type_infered: string
name: retrieve_data
arguments: tag: D55
type_infered: string
name: retrieve_data
arguments: tag: D115
type_infered: string
name: retrieve_data
arguments: tag: D17
type_infered: string
name: retrieve_data
arguments: tag: D122
type_infered: string
name: retrieve_data
arguments: tag: D33
type_infered: string
name: retrieve_data
arguments: tag: D59
type_infered: string
name: retrieve_data
arguments: tag: D96
type_infered: string
name: retrieve_data
arguments: tag: D93
type_infered: string
name: retrieve_data
arguments: tag: D19
type_infered: string
name: retrieve_data
arguments: tag: D21
type_infered: string
name: retrieve_data
arguments: tag: D10
type_infered: string

tool: D92: HTTP/1.1

tool: D55: %s %d %s


tool: D115: http_server 0.1

tool: D17: Server: %s


tool: D122: %a, %d %b %Y %H:%M:%S GMT

tool: D33: Date: %s


tool: D59: %s


tool: D96: Content-Type: %s


tool: D93: Connection: close


tool: D19: 


tool: D21: Content-Length: %d


tool: D10: Last-Modified: %s


assistant: ```c
void send_header(FILE *f, int status, char *title, char *extra, char *mime, int length, time_t date) {
  time_t now;
  char timebuf[128];
  fprintf(f, "%s %d %s\r\n", "HTTP/1.1", status, title);
  fprintf(f, "Server: %s\r\n", "http_server 0.1");
  now = time(NULL);
  strftime(timebuf, sizeof(timebuf), "%a, %d %b %Y %H:%M:%S GMT", gmtime(&now));
  fprintf(f, "Date: %s\r\n", timebuf);
  if (extra)
    fprintf(f, "%s\r\n", extra);
  if (mime)
    fprintf(f, "Content-Type: %s\r\n", mime);
  if (length >= 0)
    fprintf(f, "Content-Length: %d\r\n", length);
  if (date != -1) {
    strftime(timebuf, sizeof(timebuf), "%a, %d %b %Y %H:%M:%S GMT", gmtime(&date));
    fprintf(f, "Last-Modified: %s\r\n", timebuf);
  }
  fprintf(f, "Connection: close\r\n");
  fprintf(f, "\r\n");
}
```