user: 请从给定的汇编指令推导出C源代码：

```asm
<accept_loop>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  lea    -0x4000(%rsp),%r11
L15:
  sub    $0x1000,%rsp
  orq    $0x0,(%rsp)
  cmp    %r11,%rsp
  jne    L15
  sub    $0x1f0,%rsp
  mov    %edi,-0x41e4(%rbp)
  mov    %fs:0x28,%rax
  mov    %rax,-0x8(%rbp)
  xor    %eax,%eax
  movl   $0x0,-0x41d0(%rbp)
  movq   $0x0,-0x4010(%rbp)
  movq   $0x0,-0x4008(%rbp)
  lea    -0x4000(%rbp),%rdx
  mov    $0x0,%eax
  mov    $0x1fe,%ecx
  mov    %rdx,%rdi
  rep stos %rax,%es:(%rdi)
  movq   $0x0,-0x3010(%rbp)
  movq   $0x0,-0x3008(%rbp)
  lea    -0x3000(%rbp),%rdx
  mov    $0x0,%eax
  mov    $0x1fe,%ecx
  mov    %rdx,%rdi
  rep stos %rax,%es:(%rdi)
  movq   $0x0,-0x2010(%rbp)
  movq   $0x0,-0x2008(%rbp)
  lea    -0x2000(%rbp),%rdx
  mov    $0x0,%eax
  mov    $0x1fe,%ecx
  mov    %rdx,%rdi
  rep stos %rax,%es:(%rdi)
  movq   $0x0,-0x1010(%rbp)
  movq   $0x0,-0x1008(%rbp)
  lea    -0x1000(%rbp),%rdx
  mov    $0x0,%eax
  mov    $0x1fe,%ecx
  mov    %rdx,%rdi
  rep stos %rax,%es:(%rdi)
  movl   $0x0,-0x41cc(%rbp)
L10:
  movl   $0x8,-0x41d4(%rbp)
  lea    -0x41d4(%rbp),%rdx
  lea    -0x4198(%rbp),%rcx
  mov    -0x41e4(%rbp),%eax
  mov    %rcx,%rsi
  mov    %eax,%edi
  call   <accept@plt>
  mov    %eax,-0x41c8(%rbp)
  cmpl   $0x0,-0x41c8(%rbp)
  jns    L7
  lea    D92(%rip),%rax
  mov    %rax,%rdi
  call   <perror@plt>
  movl   $0xffffffff,-0x41d0(%rbp)
  nop
  mov    -0x41d0(%rbp),%eax
  mov    -0x8(%rbp),%rdx
  sub    %fs:0x28,%rdx
  je     L49
  jmp    L26
L7:
  mov    -0x4194(%rbp),%eax
  mov    %eax,%edi
  call   <inet_ntoa@plt>
  mov    %rax,-0x41b0(%rbp)
  mov    -0x4198(%rbp),%eax
  mov    %eax,%edi
  call   <ntohs@plt>
  mov    %eax,-0x41c4(%rbp)
  mov    -0x41c4(%rbp),%edx
  mov    -0x41b0(%rbp),%rax
  mov    %rax,%rsi
  lea    D141(%rip),%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <printf@plt>
  lea    -0x4010(%rbp),%rax
  mov    $0x1000,%edx
  mov    $0x0,%esi
  mov    %rax,%rdi
  call   <memset@plt>
  lea    -0x4010(%rbp),%rsi
  mov    -0x41c8(%rbp),%eax
  mov    $0x0,%ecx
  mov    $0x1000,%edx
  mov    %eax,%edi
  call   <recv@plt>
  lea    D152(%rip),%rax
  mov    %rax,%rdi
  call   <puts@plt>
  lea    -0x4010(%rbp),%rax
  mov    %rax,%rdi
  call   <puts@plt>
  lea    D180(%rip),%rax
  mov    %rax,%rdi
  call   <puts@plt>
  mov    $0x0,%edi
  call   <time@plt>
  mov    %rax,-0x41c0(%rbp)
  lea    -0x41c0(%rbp),%rax
  mov    %rax,%rdi
  call   <gmtime@plt>
  mov    %rax,-0x41a8(%rbp)
  mov    -0x41a8(%rbp),%rdx
  lea    -0x4190(%rbp),%rax
  mov    %rdx,%rcx
  lea    D77(%rip),%rdx
  mov    $0x80,%esi
  mov    %rax,%rdi
  call   <strftime@plt>
  mov    -0x41c0(%rbp),%rax
  add    $0x12c,%rax
  mov    %rax,-0x41b8(%rbp)
  lea    -0x41b8(%rbp),%rax
  mov    %rax,%rdi
  call   <gmtime@plt>
  mov    %rax,-0x41a0(%rbp)
  mov    -0x41a0(%rbp),%rdx
  lea    -0x4090(%rbp),%rax
  mov    %rdx,%rcx
  lea    D65(%rip),%rdx
  mov    $0x80,%esi
  mov    %rax,%rdi
  call   <strftime@plt>
  lea    -0x1010(%rbp),%rax
  lea    D103(%rip),%rdx
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <strcpy@plt>
  lea    -0x1010(%rbp),%rax
  lea    D194(%rip),%rdx
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <strcat@plt>
  lea    -0x1010(%rbp),%rax
  lea    D43(%rip),%rdx
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <strcat@plt>
  lea    -0x1010(%rbp),%rax
  lea    D139(%rip),%rdx
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <strcat@plt>
  lea    -0x1010(%rbp),%rax
  lea    D209(%rip),%rdx
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <strcat@plt>
  lea    -0x1010(%rbp),%rax
  lea    D76(%rip),%rdx
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <strcat@plt>
  lea    -0x4190(%rbp),%rdx
  lea    -0x1010(%rbp),%rax
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <strcat@plt>
  lea    -0x1010(%rbp),%rax
  lea    D23(%rip),%rdx
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <strcat@plt>
  lea    -0x1010(%rbp),%rax
  lea    D99(%rip),%rdx
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <strcat@plt>
  lea    -0x1010(%rbp),%rax
  lea    D9(%rip),%rdx
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <strcat@plt>
  lea    -0x2010(%rbp),%rax
  lea    D19(%rip),%rdx
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <strcpy@plt>
  lea    -0x2010(%rbp),%rax
  lea    D191(%rip),%rdx
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <strcat@plt>
  lea    -0x1010(%rbp),%rax
  mov    %rax,%rdi
  call   <strlen@plt>
  mov    %eax,-0x41cc(%rbp)
  mov    -0x41cc(%rbp),%edx
  lea    -0x4110(%rbp),%rax
  lea    D196(%rip),%rcx
  mov    %rcx,%rsi
  mov    %rax,%rdi
  call   <sprintf@plt>
  lea    -0x4110(%rbp),%rdx
  lea    -0x2010(%rbp),%rax
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <strcat@plt>
  lea    -0x2010(%rbp),%rax
  lea    D23(%rip),%rdx
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <strcat@plt>
  lea    -0x2010(%rbp),%rax
  lea    D78(%rip),%rdx
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <strcat@plt>
  lea    -0x2010(%rbp),%rdx
  lea    -0x3010(%rbp),%rax
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <strcpy@plt>
  lea    -0x3010(%rbp),%rax
  lea    D23(%rip),%rdx
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <strcat@plt>
  lea    -0x1010(%rbp),%rdx
  lea    -0x3010(%rbp),%rax
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <strcat@plt>
  lea    -0x3010(%rbp),%rax
  mov    %rax,%rdi
  call   <strlen@plt>
  mov    %eax,%edx
  lea    -0x3010(%rbp),%rsi
  mov    -0x41c8(%rbp),%eax
  mov    $0x0,%ecx
  mov    %eax,%edi
  call   <send@plt>
  mov    -0x41c8(%rbp),%eax
  mov    %eax,%edi
  call   <close@plt>
  jmp    L10
L26:
  call   <__stack_chk_fail@plt>
L49:
  leave
  ret
```

tool_calls: name: parse_data
arguments: tag: D92
data_type: string
name: parse_data
arguments: tag: D141
data_type: string
name: parse_data
arguments: tag: D152
data_type: string
name: parse_data
arguments: tag: D180
data_type: string
name: parse_data
arguments: tag: D77
data_type: string
name: parse_data
arguments: tag: D65
data_type: string
name: parse_data
arguments: tag: D103
data_type: string
name: parse_data
arguments: tag: D194
data_type: string
name: parse_data
arguments: tag: D43
data_type: string
name: parse_data
arguments: tag: D139
data_type: string
name: parse_data
arguments: tag: D209
data_type: string
name: parse_data
arguments: tag: D76
data_type: string
name: parse_data
arguments: tag: D23
data_type: string
name: parse_data
arguments: tag: D99
data_type: string
name: parse_data
arguments: tag: D9
data_type: string
name: parse_data
arguments: tag: D19
data_type: string
name: parse_data
arguments: tag: D191
data_type: string
name: parse_data
arguments: tag: D196
data_type: string
name: parse_data
arguments: tag: D78
data_type: string

tool: D92: accept

tool: D141: accept!(IPAddress = %s, Port = %hu)


tool: D152: ----- recv begin -----

tool: D180: ----- recv end -----

tool: D77: %Y/%m/%d %H:%M:%S %Z

tool: D65: %a, %d %b %Y %H:%M:%S %Z

tool: D103: <html>


tool: D194:   <head>


tool: D43:     <title>Content-Type</title>


tool: D139:   </head>


tool: D209:   <body>


tool: D76:     

tool: D23: 


tool: D99:   </body>


tool: D9: </html>


tool: D19: HTTP/1.0 200 OK


tool: D191: Content-Length: 

tool: D196: %d

tool: D78: Content-Type: text/html


assistant: ```c
int accept_loop(int soc) {
  struct sockaddr_in client_addr;
  int client_addr_len;
  int acc;
  char *client_ip_addr_str;
  u_short client_port;
  int ret = 0;
  char recv_buf[4096] = {0};
  char send_buf[4096] = {0};
  char response_header[4096] = {0};
  char response_body[4096] = {0};
  time_t t;
  struct tm *tm_ptr;
  char time_str[128];
  int content_length = 0;
  char content_length_str[128];
  time_t expires_t;
  struct tm *expires_tm_ptr;
  char expires_time_str[128];
  while (1) {
    client_addr_len = sizeof(client_addr);
    acc = accept(soc, (struct sockaddr *)&client_addr, &client_addr_len);
    if (acc < 0) {
      perror("accept");
      ret = -1;
      break;
    }
    client_ip_addr_str = inet_ntoa(client_addr.sin_addr);
    client_port = ntohs(client_addr.sin_port);
    printf("accept!(IPAddress = %s, Port = %hu)\n", client_ip_addr_str, client_port);
    memset(recv_buf, 0, sizeof(char) * 4096);
    recv(acc, recv_buf, sizeof(recv_buf), 0);
    printf("----- recv begin -----\n");
    printf("%s\n", recv_buf);
    printf("----- recv end -----\n");
    t = time(NULL);
    tm_ptr = gmtime(&t);
    strftime(time_str, sizeof(time_str), "%Y/%m/%d %H:%M:%S %Z", tm_ptr);
    expires_t = t + 5 * 60;
    expires_tm_ptr = gmtime(&expires_t);
    strftime(expires_time_str, sizeof(expires_time_str), "%a, %d %b %Y %H:%M:%S %Z", expires_tm_ptr);
    strcpy(response_body, "<html>\r\n");
    strcat(response_body, "  <head>\r\n");
    strcat(response_body, "    <title>Content-Type</title>\r\n");
    strcat(response_body, "  </head>\r\n");
    strcat(response_body, "  <body>\r\n");
    strcat(response_body, "    ");
    strcat(response_body, time_str);
    strcat(response_body, "\r\n");
    strcat(response_body, "  </body>\r\n");
    strcat(response_body, "</html>\r\n");
    strcpy(response_header, "HTTP/1.0 200 OK\r\n");
    strcat(response_header, "Content-Length: ");
    content_length = strlen(response_body);
    sprintf(content_length_str, "%d", content_length);
    strcat(response_header, content_length_str);
    strcat(response_header, "\r\n");
    strcat(response_header, "Content-Type: text/html\r\n");
    strcpy(send_buf, response_header);
    strcat(send_buf, "\r\n");
    strcat(send_buf, response_body);
    send(acc, send_buf, strlen(send_buf), 0);
    close(acc);
  }
  return ret;
}
```