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

```asm
<http_request_line>:
  endbr64
  push   %r15
  lea    D43(%rip),%r15
  push   %r14
  push   %r13
  mov    %rcx,%r13
  push   %r12
  mov    %rsi,%r12
  push   %rbp
  mov    %edi,%ebp
  lea    D8(%rip),%rdi
  push   %rbx
  mov    %rdx,%rbx
  sub    $0x8,%rsp
  call   <touch@plt>
  mov    $0x2000,%edx
  mov    %r15,%rsi
  mov    %ebp,%edi
  call   <http_read_line@plt>
  lea    D133(%rip),%r8
  test   %rax,%rax
  js     L49
  mov    $0x20,%esi
  mov    %r15,%rdi
  call   <strchr@plt>
  lea    D105(%rip),%r8
  test   %rax,%rax
  je     L49
  cmpb   $0x2f,0x1(%rax)
  movb   $0x0,(%rax)
  lea    D83(%rip),%r8
  je     L15
L49:
  add    $0x8,%rsp
  mov    %r8,%rax
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
  cs nopw 0x0(%rax,%rax,1)
L15:
  lea    0x1(%rax),%rbp
  mov    $0x20,%esi
  mov    %rbp,%rdi
  call   <strchr@plt>
  lea    D100(%rip),%r8
  mov    %rax,%r14
  test   %rax,%rax
  je     L49
  movb   $0x0,(%rax)
  lea    D36(%rip),%rsi
  mov    %r15,%rdi
  call   <strcmp@plt>
  test   %rax,%rax
  je     L2
  lea    D18(%rip),%rsi
  mov    %r15,%rdi
  call   <strcmp@plt>
  lea    D44(%rip),%r8
  test   %rax,%rax
  jne    L49
L2:
  mov    %r15,%rdx
  lea    D63(%rip),%rsi
  mov    %rbx,%rdi
  xor    %eax,%eax
  call   <sprintf@plt>
  lea    0x1(%r14),%rdx
  lea    D19(%rip),%rsi
  lea    0x1(%rbx,%rax,1),%r15
  xor    %eax,%eax
  mov    %r15,%rdi
  call   <sprintf@plt>
  mov    $0x3f,%esi
  mov    %rbp,%rdi
  lea    0x1(%r15,%rax,1),%r14
  call   <strchr@plt>
  test   %rax,%rax
  je     L13
  movb   $0x0,(%rax)
  lea    0x1(%rax),%rdx
  xor    %eax,%eax
  mov    %r14,%rdi
  lea    D127(%rip),%rsi
  call   <sprintf@plt>
  lea    0x1(%r14,%rax,1),%r14
L13:
  mov    %rbp,%rsi
  mov    $0x800,%edx
  mov    %r12,%rdi
  call   <url_decode@plt>
  mov    %r12,%rdx
  mov    %r14,%rdi
  xor    %eax,%eax
  lea    D39(%rip),%rsi
  call   <sprintf@plt>
  lea    D76(%rip),%rsi
  lea    0x1(%r14,%rax,1),%rbp
  xor    %eax,%eax
  mov    %rbp,%rdi
  call   <sprintf@plt>
  xor    %r8d,%r8d
  lea    0x1(%rbp,%rax,1),%rax
  movb   $0x0,(%rax)
  sub    %rbx,%rax
  add    $0x1,%rax
  mov    %rax,0x0(%r13)
  jmp    L49
```

tool_calls: name: unpack_data
arguments: data_tag: D8
datatype: string
name: unpack_data
arguments: data_tag: D133
datatype: string
name: unpack_data
arguments: data_tag: D105
datatype: string
name: unpack_data
arguments: data_tag: D83
datatype: string
name: unpack_data
arguments: data_tag: D100
datatype: string
name: unpack_data
arguments: data_tag: D36
datatype: string
name: unpack_data
arguments: data_tag: D18
datatype: string
name: unpack_data
arguments: data_tag: D44
datatype: string
name: unpack_data
arguments: data_tag: D63
datatype: string
name: unpack_data
arguments: data_tag: D19
datatype: string
name: unpack_data
arguments: data_tag: D127
datatype: string
name: unpack_data
arguments: data_tag: D39
datatype: string
name: unpack_data
arguments: data_tag: D76
datatype: string

tool: D8: http_request_line

tool: D133: Socket IO error

tool: D105: Cannot parse HTTP request (1)

tool: D83: Bad request path

tool: D100: Cannot parse HTTP request (2)

tool: D36: GET

tool: D18: POST

tool: D44: Unsupported request (not GET or POST)

tool: D63: REQUEST_METHOD=%s

tool: D19: SERVER_PROTOCOL=%s

tool: D127: QUERY_STRING=%s

tool: D39: REQUEST_URI=%s

tool: D76: SERVER_NAME=zoobar.org

assistant: ```c
const char *http_request_line(int fd, char *reqpath, char *env, size_t *env_len) {
  static char buf[8192];
  char *sp1, *sp2, *qp, *envp = env;
  touch("http_request_line");
  if (http_read_line(fd, buf, sizeof(buf)) < 0)
    return "Socket IO error";
  sp1 = strchr(buf, ' ');
  if (!sp1)
    return "Cannot parse HTTP request (1)";
  *sp1 = '\0';
  sp1++;
  if (*sp1 != '/')
    return "Bad request path";
  sp2 = strchr(sp1, ' ');
  if (!sp2)
    return "Cannot parse HTTP request (2)";
  *sp2 = '\0';
  sp2++;
  if (strcmp(buf, "GET") && strcmp(buf, "POST"))
    return "Unsupported request (not GET or POST)";
  envp += sprintf(envp, "REQUEST_METHOD=%s", buf) + 1;
  envp += sprintf(envp, "SERVER_PROTOCOL=%s", sp2) + 1;
  if ((qp = strchr(sp1, '?'))) {
    *qp = '\0';
    envp += sprintf(envp, "QUERY_STRING=%s", qp + 1) + 1;
  }
  url_decode(reqpath, sp1, 2048);
  envp += sprintf(envp, "REQUEST_URI=%s", reqpath) + 1;
  envp += sprintf(envp, "SERVER_NAME=zoobar.org") + 1;
  *envp = 0;
  *env_len = envp - env + 1;
  return NULL;
}
```