user: What is the c source code of the assembly code below?

```asm
<ordered_list_line>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0x418,%rsp
  mov    %rdi,%rbx
  mov    %rsi,%rdi
  mov    %fs:0x28,%rax
  mov    %rax,0x408(%rsp)
  xor    %eax,%eax
  call   <strlen@plt>
  movslq %eax,%r13
  mov    %rsp,%rdi
  mov    $0x400,%edx
  mov    $0x0,%esi
  call   <memset@plt>
  mov    $0x0,%ebp
  lea    -0x1(%rsp),%r12
L224:
  mov    %rbx,%rdi
  call   <next@plt>
  movsbl %al,%edi
  call   <isspace@plt>
  cmp    $0x3fe,%rbp
  ja     L85
  test   %rax,%rax
  je     L85
  mov    %rbx,%rdi
  call   <consume@plt>
  add    $0x1,%rbp
  mov    %al,(%r12,%rbp,1)
  jmp    L224
L85:
  cmp    %r13,%rbp
  jne    L177
L214:
  mov    $0x0,%ebp
  jmp    L95
L177:
  mov    %rbx,%rdi
  call   <next@plt>
  movsbl %al,%r15d
  mov    $0x0,%r12d
  mov    %rsp,%r14
  jmp    L268
L88:
  mov    %rbx,%rdi
  call   <unconsume@plt>
  add    $0x1,%r12d
L268:
  mov    %r14,%rdi
  call   <strlen@plt>
  cmp    %r12d,%eax
  jg     L88
  mov    %r15d,%edi
  call   <is_bullet@plt>
  cmp    %r13,%rbp
  seta   %r12b
  test   %rax,%rax
  je     L69
  test   %r12b,%r12b
  jne    L229
L69:
  mov    %r15d,%edi
  call   <isdigit@plt>
  test   %rax,%rax
  je     L7
  test   %r12b,%r12b
  jne    L168
L7:
  mov    $0x0,%eax
  cmp    %r13,%rbp
  jae    L214
  jmp    L31
L229:
  mov    %rsp,%rdx
  mov    %r15d,%esi
  mov    %rbx,%rdi
  call   <unordered_list_internal@plt>
  jmp    L31
L168:
  mov    %rsp,%rsi
  mov    %rbx,%rdi
  call   <ordered_list_internal@plt>
  jmp    L31
L205:
  mov    %rbx,%rdi
  call   <consume@plt>
  add    $0x1,%ebp
L95:
  mov    %rbx,%rdi
  call   <next@plt>
  movsbl %al,%edi
  call   <isdigit@plt>
  test   %rax,%rax
  jne    L205
  mov    %rbx,%rdi
  call   <next@plt>
  cmp    $0x2e,%al
  je     L76
  mov    %rbx,%rdi
  call   <next@plt>
  cmp    $0x29,%al
  je     L76
  test   %ebp,%ebp
  jle    L247
  mov    $0x0,%r12d
L71:
  mov    %rbx,%rdi
  call   <unconsume@plt>
  add    $0x1,%r12d
  cmp    %r12d,%ebp
  jne    L71
  mov    $0x0,%eax
  jmp    L31
L76:
  mov    %rbx,%rdi
  call   <consume@plt>
  lea    D5(%rip),%rsi
  mov    %rbx,%rdi
  call   <parser_emit_string@plt>
  jmp    L241
L49:
  mov    %rbx,%rdi
  call   <consume@plt>
L241:
  mov    %rbx,%rdi
  call   <next@plt>
  cmp    $0x20,%al
  je     L49
  mov    %rbx,%rdi
  call   <text_and_inline@plt>
  test   %eax,%eax
  jne    L48
L31:
  mov    0x408(%rsp),%rdx
  sub    %fs:0x28,%rdx
  jne    L196
  add    $0x418,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
L48:
  lea    D18(%rip),%rsi
  mov    %rbx,%rdi
  call   <parser_emit_string@plt>
  mov    $0x1,%eax
  jmp    L31
L247:
  mov    $0x0,%eax
  jmp    L31
L196:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: retrieve_data
arguments: tag: D5
type: string
name: retrieve_data
arguments: tag: D18
type: string

tool: D5: <li>

tool: D18: </li>

assistant: ```c
bool ordered_list_line(struct cymkd_parser *parser, const char *curr_indent) {
  char indent[1024];
  int ch;
  int i;
  size_t curr_indent_len = strlen(curr_indent);
  size_t indent_len = 0;
  memset(indent, 0, 1024);
  while (isspace(next(parser)) && indent_len < 1024 - 1) {
    ch = consume(parser);
    indent[indent_len++] = ch;
  }
  if (indent_len != curr_indent_len) {
    ch = next(parser);
    for (i = 0; i < strlen(indent); i++) {
      unconsume(parser);
    }
    if (is_bullet(ch) && indent_len > curr_indent_len) {
      return unordered_list_internal(parser, ch, indent);
    } else if (isdigit(ch) && indent_len > curr_indent_len) {
      return ordered_list_internal(parser, indent);
    } else if (indent_len < curr_indent_len) {
      return false;
    }
  }
  int number_length = 0;
  while (isdigit(next(parser))) {
    consume(parser);
    number_length++;
  }
  if (next(parser) != '.' && next(parser) != ')') {
    for (int i = 0; i < number_length; i++) {
      unconsume(parser);
    }
    return false;
  }
  consume(parser);
  parser_emit_string(parser, "<li>");
  while (next(parser) == ' ') {
    consume(parser);
  }
  if (!text_and_inline(parser)) {
    return false;
  }
  parser_emit_string(parser, "</li>");
  return true;
}
```