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

```asm
<lily_lily_to_html>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  mov    %rdi,%rbp
  push   %rbx
  sub    $0x38,%rsp
  call   <strlen@plt>
  mov    D60(%rip),%rdi
  mov    %rax,0x10(%rsp)
  mov    %rax,%r13
  lea    (%rax,%rax,2),%rax
  lea    0x1(%rax,%rax,1),%rsi
  call   <realloc@plt>
  mov    %rax,D73(%rip)
  test   %rax,%rax
  je     L249
L367:
  cmpq   $0x0,0x10(%rsp)
  je     L198
  mov    $0x20,%esi
  mov    %rbp,%rdi
  mov    %rbp,%r15
  call   <strchr@plt>
  mov    $0x1,%r10d
  movl   $0x0,0x24(%rsp)
  lea    0x1(%rbp),%r11
  mov    %rax,%rdx
  movzbl 0x1(%rbp),%eax
  mov    %r10,%r14
  movl   $0x0,0x28(%rsp)
  movl   $0x0,0x2c(%rsp)
  mov    $0x1,%r9d
  cmp    $0x20,%al
  mov    %eax,%ecx
  sete   %sil
  and    $0xfffffffd,%ecx
  cmp    $0x2c,%cl
  sete   %bl
  test   $0xdf,%al
  sete   %al
  xor    %r13d,%r13d
  xor    %r12d,%r12d
  or     %eax,%ebx
  movzbl %bl,%ebx
  test   %rdx,%rdx
  je     L2
  nop
L176:
  movzbl (%r15),%eax
  movslq %r13d,%rcx
  cmp    $0x3e,%al
  jg     L449
L184:
  cmp    $0x1f,%al
  jle    L379
  lea    -0x20(%rax),%edi
  cmp    $0x1e,%dil
  ja     L379
  lea    D73(%rip),%r8
  movzbl %dil,%edi
  movslq (%r8,%rdi,4),%rdi
  add    %r8,%rdi
  notrack jmp *%rdi
  nopl   0x0(%rax)
L379:
  mov    D73(%rip),%rdx
  add    $0x1,%r13d
  mov    %al,(%rdx,%rcx,1)
  cs nopw 0x0(%rax,%rax,1)
L423:
  lea    0x1(%r12),%rcx
  cmp    %rcx,0x10(%rsp)
  jbe    L94
L391:
  lea    0x0(%rbp,%rcx,1),%r15
  mov    $0x20,%esi
  lea    0x2(%r12),%r14
  mov    %rcx,0x8(%rsp)
  mov    %r15,%rdi
  call   <strchr@plt>
  lea    0x0(%rbp,%r14,1),%r11
  mov    %rax,%rdx
  movzbl (%r11),%eax
  cmp    $0x20,%al
  sete   %sil
  test   $0xdf,%al
  sete   %bl
  and    $0xfffffffd,%eax
  cmp    $0x2c,%al
  sete   %al
  xor    %r9d,%r9d
  or     %eax,%ebx
  cmpb   $0x20,0x0(%rbp,%r12,1)
  mov    0x8(%rsp),%r12
  movzbl %bl,%ebx
  sete   %r9b
  test   %rdx,%rdx
  jne    L176
L2:
  mov    %rbp,%rdi
  mov    %r9d,0x20(%rsp)
  mov    %sil,0x18(%rsp)
  mov    %r11,0x8(%rsp)
  call   <strlen@plt>
  mov    0x20(%rsp),%r9d
  movzbl 0x18(%rsp),%esi
  movslq %r13d,%rcx
  lea    0x0(%rbp,%rax,1),%rdx
  movzbl (%r15),%eax
  mov    0x8(%rsp),%r11
  cmp    $0x3e,%al
  jle    L184
L449:
  cmp    $0x5f,%al
  jne    L379
  mov    $0x5f,%esi
  mov    %r11,%rdi
  mov    %r9d,0x20(%rsp)
  mov    %rdx,0x18(%rsp)
  mov    %rcx,0x8(%rsp)
  call   <strchr@plt>
  mov    0x8(%rsp),%rcx
  mov    0x18(%rsp),%rdx
  test   %rax,%rax
  mov    0x20(%rsp),%r9d
  je     L309
  movzbl 0x1(%rax),%edi
  mov    %edi,%esi
  and    $0xfffffffd,%esi
  cmp    $0x2c,%sil
  sete   %sil
  and    $0xdf,%edi
  sete   %dil
  or     %edi,%esi
L417:
  add    D73(%rip),%rcx
  mov    %rcx,%rdi
  test   %ebx,0x24(%rsp)
  jne    L347
  mov    0x24(%rsp),%ebx
  xor    $0x1,%ebx
  and    %r9d,%ebx
  je     L73
  cmp    %rax,%rdx
  jbe    L73
  test   %sil,%sil
  jne    L69
  nopl   0x0(%rax)
L73:
  movzbl (%r15),%eax
  add    $0x1,%r13d
  lea    0x1(%r12),%rcx
  mov    %al,(%rdi)
  cmp    %rcx,0x10(%rsp)
  ja     L391
  nopw   0x0(%rax,%rax,1)
L94:
  movslq %r13d,%r13
L198:
  mov    D73(%rip),%rax
  movb   $0x0,(%rax,%r13,1)
  add    $0x38,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
  xchg   %ax,%ax
  add    D73(%rip),%rcx
  mov    $0x4,%edx
  lea    D44(%rip),%rsi
  add    $0x4,%r13d
  mov    %rcx,%rdi
  call   <memcpy@plt>
  jmp    L423
  nopl   0x0(%rax)
  mov    $0x2f,%esi
  mov    %r11,%rdi
  mov    %r9d,0x20(%rsp)
  mov    %rdx,0x18(%rsp)
  mov    %rcx,0x8(%rsp)
  call   <strchr@plt>
  mov    0x8(%rsp),%rcx
  mov    0x18(%rsp),%rdx
  test   %rax,%rax
  mov    0x20(%rsp),%r9d
  je     L407
  movzbl 0x1(%rax),%esi
  test   $0xdf,%sil
  sete   %dil
  and    $0xfffffffd,%esi
  cmp    $0x2c,%sil
  sete   %sil
  or     %edi,%esi
L127:
  add    D73(%rip),%rcx
  mov    %rcx,%rdi
  test   %ebx,%r9d
  jne    L11
  test   %ebx,0x2c(%rsp)
  jne    L415
  mov    0x2c(%rsp),%ebx
  xor    $0x1,%ebx
  and    %r9d,%ebx
  je     L73
  cmp    %rax,%rdx
  jbe    L73
  test   %sil,%sil
  je     L73
  mov    $0x3,%edx
  lea    D112(%rip),%rsi
  add    $0x3,%r13d
  call   <memcpy@plt>
  mov    %ebx,0x2c(%rsp)
  jmp    L423
  nopw   0x0(%rax,%rax,1)
  mov    $0x2a,%esi
  mov    %r11,%rdi
  mov    %r9d,0x20(%rsp)
  mov    %rdx,0x18(%rsp)
  mov    %rcx,0x8(%rsp)
  call   <strchr@plt>
  mov    0x8(%rsp),%rcx
  mov    0x18(%rsp),%rdx
  test   %rax,%rax
  mov    0x20(%rsp),%r9d
  je     L50
  movzbl 0x1(%rax),%edi
  mov    %edi,%esi
  and    $0xfffffffd,%esi
  cmp    $0x2c,%sil
  sete   %sil
  and    $0xdf,%edi
  sete   %dil
  or     %edi,%esi
L372:
  mov    %r9d,%edi
  add    D73(%rip),%rcx
  xor    $0x1,%edi
  and    0x28(%rsp),%edi
  test   %bl,%dil
  jne    L10
  mov    0x28(%rsp),%edi
  xor    $0x1,%edi
  and    %edi,%r9d
  je     L275
  xor    $0x1,%ebx
  cmp    %rax,%rdx
  seta   %al
  test   %al,%bl
  je     L275
  test   %sil,%sil
  jne    L335
L275:
  movzbl (%r15),%eax
  add    $0x1,%r13d
  mov    %al,(%rcx)
  jmp    L423
  nopl   0x0(%rax)
  add    D73(%rip),%rcx
  mov    $0x5,%edx
  lea    D81(%rip),%rsi
  add    $0x5,%r13d
  mov    %rcx,%rdi
  call   <memcpy@plt>
  jmp    L423
  nopl   0x0(%rax)
  add    D73(%rip),%rcx
  test   %sil,%sil
  jne    L259
  movb   $0x20,(%rcx)
  add    $0x1,%r13d
  jmp    L423
  nopl   0x0(%rax)
  add    D73(%rip),%rcx
  mov    $0x4,%edx
  lea    D53(%rip),%rsi
  add    $0x4,%r13d
  mov    %rcx,%rdi
  call   <memcpy@plt>
  jmp    L423
  nopl   0x0(%rax)
L415:
  mov    $0x4,%edx
  lea    D70(%rip),%rsi
  add    $0x4,%r13d
  call   <memcpy@plt>
  movl   $0x0,0x2c(%rsp)
  jmp    L423
  nopw   0x0(%rax,%rax,1)
L11:
  mov    $0x4,%edx
  lea    D219(%rip),%rsi
  add    $0x4,%r13d
  mov    %r14,%r12
  call   <memcpy@plt>
  jmp    L423
  nopl   (%rax)
L347:
  mov    $0x4,%edx
  lea    D98(%rip),%rsi
  add    $0x4,%r13d
  call   <memcpy@plt>
  movl   $0x0,0x24(%rsp)
  jmp    L423
  nopw   0x0(%rax,%rax,1)
L407:
  mov    %rdx,%rax
  xor    %esi,%esi
  jmp    L127
  nopw   0x0(%rax,%rax,1)
L309:
  mov    %rdx,%rax
  xor    %esi,%esi
  jmp    L417
  nopw   0x0(%rax,%rax,1)
L50:
  mov    %rdx,%rax
  xor    %esi,%esi
  jmp    L372
  nopw   0x0(%rax,%rax,1)
L259:
  mov    $0x6,%edx
  lea    D18(%rip),%rsi
  mov    %rcx,%rdi
  add    $0x6,%r13d
  call   <memcpy@plt>
  jmp    L423
  nopl   (%rax)
L69:
  mov    $0x3,%edx
  lea    D88(%rip),%rsi
  add    $0x3,%r13d
  call   <memcpy@plt>
  mov    %ebx,0x24(%rsp)
  jmp    L423
L335:
  mov    $0x3,%edx
  lea    D133(%rip),%rsi
  mov    %rcx,%rdi
  add    $0x3,%r13d
  mov    %r9d,0x8(%rsp)
  call   <memcpy@plt>
  mov    0x8(%rsp),%r9d
  mov    %r9d,0x28(%rsp)
  jmp    L423
  nopw   0x0(%rax,%rax,1)
L249:
  call   <abort@plt>
  jmp    L367
  nopw   0x0(%rax,%rax,1)
L10:
  mov    $0x4,%edx
  lea    D192(%rip),%rsi
  mov    %rcx,%rdi
  add    $0x4,%r13d
  call   <memcpy@plt>
  movl   $0x0,0x28(%rsp)
  jmp    L423
```

tool_calls: name: read_data
arguments: label: D44
type: string
name: read_data
arguments: label: D112
type: string
name: read_data
arguments: label: D81
type: string
name: read_data
arguments: label: D53
type: string
name: read_data
arguments: label: D70
type: string
name: read_data
arguments: label: D219
type: string
name: read_data
arguments: label: D98
type: string
name: read_data
arguments: label: D18
type: string
name: read_data
arguments: label: D88
type: string
name: read_data
arguments: label: D133
type: string
name: read_data
arguments: label: D192
type: string

tool: D44: &gt;

tool: D112: <i>

tool: D81: &amp;

tool: D53: &lt;

tool: D70: </i>

tool: D219: <br>

tool: D98: </u>

tool: D18: &nbsp;

tool: D88: <u>

tool: D133: <b>

tool: D192: </b>

assistant: ```c
char *lily_lily_to_html(const char *const string) {
  static char *output = NULL;
  int o = 0;
  size_t l, i = 0;
  int inbold = 0, initalics = 0, inunderline = 0;
  l = strlen(string);
  output = realloc(output, (l * 6) + 1);
  if (output == NULL)
    abort();
  while (i < l) {
    const char *sp = strchr(string + i, ' '), *ch;
    int word_end = ((string[i + 1] == ' ') || (string[i + 1] == ',') || (string[i + 1] == '.') || (string[i + 1] == 0)), word_begin = ((i == 0) || (string[i - 1] == ' ')), ch_end = 0;
    if (sp == NULL)
      sp = string + strlen(string);
    switch (string[i]) {
    case '*':
      if ((ch = strchr(string + i + 1, '*')) == NULL)
        ch = sp;
      else
        ch_end = ((ch[1] == ' ') || (ch[1] == ',') || (ch[1] == '.') || (ch[1] == 0));
      if (inbold && !word_begin && word_end) {
        inbold = 0;
        memcpy(&output[o], "</b>", 4);
        o += 4;
      } else if (!inbold && word_begin && !word_end && (ch < sp) && ch_end) {
        inbold = 1;
        memcpy(&output[o], "<b>", 3);
        o += 3;
      } else
        output[o++] = string[i];
      break;
    case '/':
      if ((ch = strchr(string + i + 1, '/')) == NULL)
        ch = sp;
      else
        ch_end = ((ch[1] == ' ') || (ch[1] == ',') || (ch[1] == '.') || (ch[1] == 0));
      if (word_begin && word_end) {
        i++;
        memcpy(&output[o], "<br>", 4);
        o += 4;
      } else if (initalics && word_end) {
        memcpy(&output[o], "</i>", 4);
        o += 4;
        initalics = 0;
      } else if (!initalics && word_begin && (ch < sp) && ch_end) {
        memcpy(&output[o], "<i>", 3);
        o += 3;
        initalics = 1;
      } else
        output[o++] = string[i];
      break;
    case '_':
      if ((ch = strchr(string + i + 1, '_')) == NULL)
        ch = sp;
      else
        ch_end = ((ch[1] == ' ') || (ch[1] == ',') || (ch[1] == '.') || (ch[1] == 0));
      if (inunderline && word_end) {
        memcpy(&output[o], "</u>", 4);
        o += 4;
        inunderline = 0;
      } else if (!inunderline && word_begin && (ch < sp) && ch_end) {
        memcpy(&output[o], "<u>", 3);
        o += 3;
        inunderline = 1;
      } else
        output[o++] = string[i];
      break;
    case '&':
      memcpy(&output[o], "&amp;", 5);
      o += 5;
      break;
    case '<':
      memcpy(&output[o], "&lt;", 4);
      o += 4;
      break;
    case '>':
      memcpy(&output[o], "&gt;", 4);
      o += 4;
      break;
    case ' ':
      if (string[i + 1] == ' ') {
        memcpy(&output[o], "&nbsp;", 6);
        o += 6;
      } else
        output[o++] = string[i];
      break;
    default:
      output[o++] = string[i];
      break;
    }
    i++;
  }
  output[o] = '\0';
  return (output);
}
```