user: 请将以下的汇编代码转换成C语言代码:

```asm
<send_header>:
  endbr64
  push   %r15
  mov    %r9d,%r15d
  push   %r14
  mov    %rcx,%r14
  mov    %esi,%ecx
  lea    D84(%rip),%rsi
  push   %r13
  mov    %r8,%r13
  mov    %rdx,%r8
  lea    D44(%rip),%rdx
  push   %r12
  mov    %rdi,%r12
  push   %rbp
  lea    D119(%rip),%rbp
  push   %rbx
  sub    $0xa8,%rsp
  mov    %fs:0x28,%rax
  mov    %rax,0x98(%rsp)
  xor    %eax,%eax
  lea    0x10(%rsp),%rbx
  call   <fprintf@plt>
  lea    D36(%rip),%rdx
  lea    D62(%rip),%rsi
  xor    %eax,%eax
  mov    %r12,%rdi
  call   <fprintf@plt>
  xor    %edi,%edi
  call   <time@plt>
  lea    0xc(%rsp),%rdi
  mov    %eax,0xc(%rsp)
  call   <gmtime@plt>
  mov    %rbp,%rdx
  mov    $0x80,%esi
  mov    %rbx,%rdi
  mov    %eax,%ecx
  call   <strftime@plt>
  xor    %eax,%eax
  mov    %rbx,%rdx
  mov    %r12,%rdi
  lea    D57(%rip),%rsi
  call   <fprintf@plt>
  test   %r14,%r14
  je     L10
  mov    %r14,%rdx
  lea    D70(%rip),%rsi
  mov    %r12,%rdi
  xor    %eax,%eax
  call   <fprintf@plt>
L10:
  test   %r13,%r13
  je     L6
  mov    %r13,%rdx
  lea    D53(%rip),%rsi
  mov    %r12,%rdi
  xor    %eax,%eax
  call   <fprintf@plt>
L6:
  test   %r15d,%r15d
  js     L32
  mov    %r15d,%edx
  lea    D40(%rip),%rsi
  mov    %r12,%rdi
  xor    %eax,%eax
  call   <fprintf@plt>
L32:
  cmpl   $0xffffffff,0xe0(%rsp)
  je     L43
  lea    0xe0(%rsp),%rdi
  call   <gmtime@plt>
  mov    %rbp,%rdx
  mov    $0x80,%esi
  mov    %rbx,%rdi
  mov    %eax,%ecx
  call   <strftime@plt>
  mov    %rbx,%rdx
  mov    %r12,%rdi
  xor    %eax,%eax
  lea    D77(%rip),%rsi
  call   <fprintf@plt>
L43:
  mov    %r12,%rcx
  mov    $0x13,%edx
  mov    $0x1,%esi
  lea    D80(%rip),%rdi
  call   <fwrite@plt>
  mov    %r12,%rcx
  mov    $0x2,%edx
  mov    $0x1,%esi
  lea    D38(%rip),%rdi
  call   <fwrite@plt>
  mov    0x98(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L44
  add    $0xa8,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
L44:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: unpack_data
arguments: data_tag: D84
datatype: string
name: unpack_data
arguments: data_tag: D44
datatype: string
name: unpack_data
arguments: data_tag: D119
datatype: string
name: unpack_data
arguments: data_tag: D36
datatype: string
name: unpack_data
arguments: data_tag: D62
datatype: string
name: unpack_data
arguments: data_tag: D57
datatype: string
name: unpack_data
arguments: data_tag: D70
datatype: string
name: unpack_data
arguments: data_tag: D53
datatype: string
name: unpack_data
arguments: data_tag: D40
datatype: string
name: unpack_data
arguments: data_tag: D77
datatype: string
name: unpack_data
arguments: data_tag: D80
datatype: string
name: unpack_data
arguments: data_tag: D38
datatype: string

tool: D84: %s %d %s


tool: D44: HTTP/1.1

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

tool: D36: http_server 0.1

tool: D62: Server: %s


tool: D57: Date: %s


tool: D70: %s


tool: D53: Content-Type: %s


tool: D40: Content-Length: %d


tool: D77: Last-Modified: %s


tool: D80: Connection: close


tool: D38: 


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");
}
```