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

```asm
<print_wonder>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  mov    %edi,%r13d
  push   %r12
  mov    %edx,%r12d
  mov    $0x1c,%edx
  push   %rbp
  lea    0x1(%rsi),%ebp
  push   %rbx
  sub    $0x78,%rsp
  mov    %r8,0x18(%rsp)
  mov    %ecx,0x10(%rsp)
  mov    %fs:0x28,%rax
  mov    %rax,0x68(%rsp)
  xor    %eax,%eax
  call   <io_printborder@plt>
  mov    %r12d,%edi
  call   <data_getwonder@plt>
  lea    0x40(%rsp),%rdx
  xor    %esi,%esi
  mov    %eax,%edi
  call   <cards_getname@plt>
  mov    $0x1c,%edx
  mov    %ebp,%esi
  mov    %r13d,%edi
  mov    %rax,%rcx
  call   <io_printtext@plt>
  mov    %r12d,%edi
  mov    %eax,%ebp
  call   <data_getwonder@plt>
  xor    %esi,%esi
  mov    %eax,%edi
  call   <cards_gettype@plt>
  mov    %eax,%edi
  call   <getname@plt>
  lea    D241(%rip),%rdi
  mov    %rax,%rsi
  call   <cat@plt>
  mov    $0x1c,%edx
  mov    %ebp,%esi
  mov    %r13d,%edi
  mov    %rax,%rcx
  call   <io_printtext@plt>
  mov    %r12d,%edi
  mov    %eax,%ebp
  call   <data_getgold@plt>
  mov    %eax,%edi
  call   <itoa@plt>
  lea    D44(%rip),%rdi
  mov    %rax,%rsi
  call   <cat@plt>
  lea    D198(%rip),%rsi
  mov    %rax,%rdi
  call   <cat@plt>
  mov    %ebp,%esi
  mov    $0x1c,%edx
  mov    %r13d,%edi
  mov    %rax,%rcx
  call   <io_printtext@plt>
  mov    $0x1c,%edx
  mov    %r13d,%edi
  mov    %eax,%esi
  lea    0x1(%rax),%ebp
  call   <io_printborder@plt>
  lea    0x20(%rsp),%rsi
  mov    %r12d,%edi
  call   <data_getdefinites@plt>
  mov    %r12d,%edi
  call   <data_getwonder@plt>
  xor    %esi,%esi
  mov    %eax,%edi
  call   <cards_gettype@plt>
  mov    %r12d,%edi
  addl   $0x1,0x20(%rsp,%rax,4)
  call   <data_getindefinites@plt>
  mov    %r13d,%edi
  mov    $0x1c,%edx
  mov    %ebp,%esi
  lea    D195(%rip),%rcx
  mov    %rax,%r15
  call   <io_printtext@plt>
  mov    0x20(%rsp),%edi
  mov    %eax,%r14d
  test   %edi,%edi
  jne    L61
L202:
  mov    0x24(%rsp),%edi
  test   %edi,%edi
  jne    L317
L0:
  mov    0x28(%rsp),%edi
  test   %edi,%edi
  jne    L203
L89:
  mov    0x2c(%rsp),%edi
  test   %edi,%edi
  jne    L316
L237:
  mov    0x30(%rsp),%edi
  test   %edi,%edi
  jne    L248
L254:
  mov    0x34(%rsp),%edi
  test   %edi,%edi
  jne    L31
L51:
  mov    0x38(%rsp),%edi
  test   %edi,%edi
  jne    L194
L319:
  lea    0x40(%r15),%rax
  lea    D80(%rip),%rbx
  mov    %rax,(%rsp)
  lea    0x2(%r13),%eax
  mov    %eax,0x14(%rsp)
  jmp    L285
  nopl   0x0(%rax,%rax,1)
L251:
  add    $0x8,%r15
  cmp    %r15,(%rsp)
  je     L236
L285:
  mov    (%r15),%rax
  lea    D276(%rip),%rbp
  mov    (%rax),%edi
  cmp    $0xffffffff,%edi
  je     L144
  call   <getname@plt>
  mov    %rbx,%rsi
  lea    D276(%rip),%rdi
  mov    %rax,%rbp
  call   <cat@plt>
  mov    %rbp,%rsi
  mov    %rax,%rdi
  call   <cat@plt>
  mov    %rax,%rbp
  mov    (%r15),%rax
L144:
  mov    0x4(%rax),%edi
  cmp    $0xffffffff,%edi
  je     L310
  call   <getname@plt>
  mov    %rbp,%rdi
  mov    %rbx,%rsi
  mov    %rax,0x8(%rsp)
  call   <cat@plt>
  mov    0x8(%rsp),%rsi
  mov    %rax,%rdi
  call   <cat@plt>
  mov    %rax,%rbp
  mov    (%r15),%rax
L310:
  mov    0x8(%rax),%edi
  cmp    $0xffffffff,%edi
  je     L318
  call   <getname@plt>
  mov    %rbp,%rdi
  mov    %rbx,%rsi
  mov    %rax,0x8(%rsp)
  call   <cat@plt>
  mov    0x8(%rsp),%rsi
  mov    %rax,%rdi
  call   <cat@plt>
  mov    %rax,%rbp
  mov    (%r15),%rax
L318:
  mov    0xc(%rax),%edi
  cmp    $0xffffffff,%edi
  je     L315
  call   <getname@plt>
  mov    %rbp,%rdi
  mov    %rbx,%rsi
  mov    %rax,0x8(%rsp)
  call   <cat@plt>
  mov    0x8(%rsp),%rsi
  mov    %rax,%rdi
  call   <cat@plt>
  mov    %rax,%rbp
L315:
  cmpb   $0x0,0x0(%rbp)
  je     L251
  mov    %r14d,%esi
  mov    %rbp,%rcx
  mov    $0x1c,%edx
  mov    %r13d,%edi
  call   <io_printtext@plt>
  mov    0x14(%rsp),%edi
  lea    D56(%rip),%rdx
  add    $0x8,%r15
  lea    -0x1(%rax),%esi
  mov    %eax,%r14d
  call   <io_printplain@plt>
  cmp    %r15,(%rsp)
  jne    L285
L236:
  mov    $0x1c,%edx
  mov    %r14d,%esi
  mov    %r13d,%edi
  xor    %ebx,%ebx
  call   <io_printborder@plt>
  lea    0x1(%r14),%ebp
  jmp    L152
  nopl   (%rax)
L174:
  mov    %r15,%rdi
  lea    D61(%rip),%rsi
  call   <cat@plt>
  mov    %rax,%rdi
  cmp    0x10(%rsp),%r14d
  je     L18
L262:
  lea    D166(%rip),%rsi
  call   <cat@plt>
  mov    %rax,%rcx
L122:
  mov    %ebp,%esi
  mov    $0x1c,%edx
  mov    %r13d,%edi
  call   <io_printtext@plt>
  mov    %eax,%ebp
L152:
  mov    %r12d,%edi
  mov    %ebx,%r14d
  call   <wonder_numstages@plt>
  cmp    %ebx,%eax
  jle    L298
  add    $0x1,%ebx
  mov    %ebx,%edi
  call   <itoa@plt>
  lea    D11(%rip),%rdi
  mov    %rax,%rsi
  call   <cat@plt>
  mov    %r12d,%edi
  mov    %rax,%r15
  call   <data_getwonderstages@plt>
  cmp    %r14d,%eax
  jg     L174
  mov    %r15,%rdi
  lea    D191(%rip),%rsi
  call   <cat@plt>
  mov    %rax,%rdi
  cmp    0x10(%rsp),%r14d
  jne    L262
L18:
  lea    D35(%rip),%rsi
  call   <cat@plt>
  mov    %rax,%rcx
  jmp    L122
  nopl   0x0(%rax,%rax,1)
L298:
  mov    $0x1c,%edx
  mov    %ebp,%esi
  mov    %r13d,%edi
  call   <io_printborder@plt>
  mov    %r12d,%edi
  call   <data_getbuilt@plt>
  mov    0x10(%rsp),%r15d
  lea    0x1(%rbp),%esi
  mov    %r13d,%edi
  mov    %rax,%rdx
  mov    %rax,%r14
  sub    %ebx,%r15d
  mov    %r15d,%ecx
  call   <print_cards@plt>
  mov    D269(%rip),%rax
  mov    0x18(%rsp),%rdx
  mov    0x10(%rsp),%ebx
  mov    %rax,(%rdx)
  test   %ebx,%ebx
  jns    L15
L217:
  mov    %r12d,%edi
  call   <wonder_numstages@plt>
  cmp    0x10(%rsp),%eax
  jg     L267
  lea    (%r15,%r15,1),%eax
  mov    0x18(%rsp),%rcx
  cltq
  mov    (%r14,%rax,4),%edx
  mov    %edx,(%rcx)
  mov    0x4(%r14,%rax,4),%eax
  mov    %eax,0x4(%rcx)
L267:
  mov    0x68(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L240
  mov    0x18(%rsp),%rax
  add    $0x78,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
  nopl   0x0(%rax)
L15:
  mov    %r12d,%edi
  call   <wonder_numstages@plt>
  cmp    %ebx,%eax
  jle    L217
  mov    %r12d,%edi
  call   <data_getwonder@plt>
  mov    0x18(%rsp),%rbx
  mov    %r12d,%edi
  mov    %eax,(%rbx)
  call   <data_getwonderside@plt>
  mov    0x10(%rsp),%edx
  lea    (%rax,%rax,2),%eax
  lea    0x1(%rdx,%rax,1),%eax
  mov    %eax,0x4(%rbx)
  jmp    L217
L194:
  call   <itoa@plt>
  mov    $0x6,%edi
  mov    %rax,%rbp
  call   <getname@plt>
  lea    D56(%rip),%rdi
  mov    %rax,%rsi
  call   <cat@plt>
  lea    D106(%rip),%rsi
  mov    %rax,%rdi
  call   <cat@plt>
  mov    %rbp,%rsi
  mov    %rax,%rdi
  call   <cat@plt>
  mov    %r14d,%esi
  mov    $0x1c,%edx
  mov    %r13d,%edi
  mov    %rax,%rcx
  call   <io_printtext@plt>
  mov    %eax,%r14d
  jmp    L319
L31:
  call   <itoa@plt>
  mov    $0x5,%edi
  mov    %rax,%rbp
  call   <getname@plt>
  lea    D56(%rip),%rdi
  mov    %rax,%rsi
  call   <cat@plt>
  lea    D106(%rip),%rsi
  mov    %rax,%rdi
  call   <cat@plt>
  mov    %rbp,%rsi
  mov    %rax,%rdi
  call   <cat@plt>
  mov    %r14d,%esi
  mov    $0x1c,%edx
  mov    %r13d,%edi
  mov    %rax,%rcx
  call   <io_printtext@plt>
  mov    %eax,%r14d
  jmp    L51
L248:
  call   <itoa@plt>
  mov    $0x4,%edi
  mov    %rax,%rbp
  call   <getname@plt>
  lea    D56(%rip),%rdi
  mov    %rax,%rsi
  call   <cat@plt>
  lea    D106(%rip),%rsi
  mov    %rax,%rdi
  call   <cat@plt>
  mov    %rbp,%rsi
  mov    %rax,%rdi
  call   <cat@plt>
  mov    %r14d,%esi
  mov    $0x1c,%edx
  mov    %r13d,%edi
  mov    %rax,%rcx
  call   <io_printtext@plt>
  mov    %eax,%r14d
  jmp    L254
L316:
  call   <itoa@plt>
  mov    $0x3,%edi
  mov    %rax,%rbp
  call   <getname@plt>
  lea    D56(%rip),%rdi
  mov    %rax,%rsi
  call   <cat@plt>
  lea    D106(%rip),%rsi
  mov    %rax,%rdi
  call   <cat@plt>
  mov    %rbp,%rsi
  mov    %rax,%rdi
  call   <cat@plt>
  mov    %r14d,%esi
  mov    $0x1c,%edx
  mov    %r13d,%edi
  mov    %rax,%rcx
  call   <io_printtext@plt>
  mov    %eax,%r14d
  jmp    L237
L203:
  call   <itoa@plt>
  mov    $0x2,%edi
  mov    %rax,%rbp
  call   <getname@plt>
  lea    D56(%rip),%rdi
  mov    %rax,%rsi
  call   <cat@plt>
  lea    D106(%rip),%rsi
  mov    %rax,%rdi
  call   <cat@plt>
  mov    %rbp,%rsi
  mov    %rax,%rdi
  call   <cat@plt>
  mov    %r14d,%esi
  mov    $0x1c,%edx
  mov    %r13d,%edi
  mov    %rax,%rcx
  call   <io_printtext@plt>
  mov    %eax,%r14d
  jmp    L89
L317:
  call   <itoa@plt>
  mov    $0x1,%edi
  mov    %rax,%rbp
  call   <getname@plt>
  lea    D56(%rip),%rdi
  mov    %rax,%rsi
  call   <cat@plt>
  lea    D106(%rip),%rsi
  mov    %rax,%rdi
  call   <cat@plt>
  mov    %rbp,%rsi
  mov    %rax,%rdi
  call   <cat@plt>
  mov    %r14d,%esi
  mov    $0x1c,%edx
  mov    %r13d,%edi
  mov    %rax,%rcx
  call   <io_printtext@plt>
  mov    %eax,%r14d
  jmp    L0
L61:
  call   <itoa@plt>
  xor    %edi,%edi
  mov    %rax,%rbp
  call   <getname@plt>
  lea    D56(%rip),%rdi
  mov    %rax,%rsi
  call   <cat@plt>
  lea    D106(%rip),%rsi
  mov    %rax,%rdi
  call   <cat@plt>
  mov    %rbp,%rsi
  mov    %rax,%rdi
  call   <cat@plt>
  mov    %r14d,%esi
  mov    $0x1c,%edx
  mov    %r13d,%edi
  mov    %rax,%rcx
  call   <io_printtext@plt>
  mov    %eax,%r14d
  jmp    L202
L240:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: extract_symbolic_data
arguments: data_label: D241
type: string
name: extract_symbolic_data
arguments: data_label: D44
type: string
name: extract_symbolic_data
arguments: data_label: D198
type: string
name: extract_symbolic_data
arguments: data_label: D195
type: string
name: extract_symbolic_data
arguments: data_label: D80
type: string
name: extract_symbolic_data
arguments: data_label: D276
type: string
name: extract_symbolic_data
arguments: data_label: D56
type: string
name: extract_symbolic_data
arguments: data_label: D61
type: string
name: extract_symbolic_data
arguments: data_label: D166
type: string
name: extract_symbolic_data
arguments: data_label: D11
type: string
name: extract_symbolic_data
arguments: data_label: D191
type: string
name: extract_symbolic_data
arguments: data_label: D35
type: string
name: extract_symbolic_data
arguments: data_label: D269
type: byte[8]
name: extract_symbolic_data
arguments: data_label: D106
type: string

tool: D241: Produces: 1 

tool: D44: Treasury: 

tool: D198:  gold

tool: D195: Production:

tool: D80: /

tool: 

tool: D56:  

tool: D61:  (complete)

tool: D166:   

tool: D11: Stage 

tool: D191:            

tool: D35:      *

tool: {"D269": [0xff,0xff,0xff,0xff,0xff,0xff,0xff,0xff]}

tool: D106: : 

assistant: ```c
int *print_wonder(int x, int y, int player, int cursor, int ret[2]) {
  int i, j;
  char array[40];
  io_printborder(x, y++, 28);
  y = io_printtext(x, y, 28, cards_getname(data_getwonder(player), 0, array));
  y = io_printtext(x, y, 28, cat("Produces: 1 ", getname(cards_gettype(data_getwonder(player), 0))));
  y = io_printtext(x, y, 28, cat(cat("Treasury: ", itoa(data_getgold(player))), " gold"));
  io_printborder(x, y++, 28);
  int def[7];
  data_getdefinites(player, def);
  def[cards_gettype(data_getwonder(player), 0)]++;
  int **indef = data_getindefinites(player);
  y = io_printtext(x, y, 28, "Production:");
  for (i = 0; i < 7; i++) {
    if (def[i]) {
      y = io_printtext(x, y, 28, cat(cat(cat(" ", getname(i)), ": "), itoa(def[i])));
    }
  }
  for (i = 0; i < 8; i++) {
    char *text = "";
    for (j = 0; j < 4; j++) {
      if (indef[i][j] != -1)
        text = cat(cat(text, "/"), getname(indef[i][j]));
    }
    if (text[0] != '\0') {
      y = io_printtext(x, y, 28, text);
      io_printplain(x + 2, y - 1, " ");
    }
  }
  io_printborder(x, y++, 28);
  for (i = 0; i < wonder_numstages(player); i++) {
    char *text = cat("Stage ", itoa(i + 1));
    if (data_getwonderstages(player) > i)
      text = cat(text, " (complete)");
    else
      text = cat(text, "           ");
    if (cursor == i)
      text = cat(text, "     *");
    else
      text = cat(text, "  ");
    y = io_printtext(x, y, 28, text);
  }
  io_printborder(x, y++, 28);
  int *built = data_getbuilt(player);
  y = print_cards(x, y, built, cursor - i);
  int print = 2 * (cursor - i);
  ret[0] = ret[1] = -1;
  if (cursor >= 0 && cursor < wonder_numstages(player)) {
    ret[0] = data_getwonder(player);
    ret[1] = cursor + 1 + 3 * data_getwonderside(player);
  }
  if (cursor >= wonder_numstages(player)) {
    ret[0] = built[print];
    ret[1] = built[print + 1];
  }
  return ret;
}
```