user: Demonstrate the C code that generates the assembly output below:

```asm
<output_author>:
  endbr64
  push   %r15
  push   %r14
  mov    %rdi,%r14
  lea    D101(%rip),%rdi
  push   %r13
  push   %r12
  push   %rbp
  lea    D272(%rip),%rbp
  push   %rbx
  sub    $0x78,%rsp
  mov    %rsi,0x8(%rsp)
  lea    0x10(%rsp),%rbx
  mov    %fs:0x28,%rax
  mov    %rax,0x68(%rsp)
  xor    %eax,%eax
  call   <puts@plt>
  lea    D181(%rip),%rsi
  lea    D89(%rip),%rdi
  xor    %eax,%eax
  call   <printf@plt>
  lea    D36(%rip),%rdi
  call   <puts@plt>
  movl   $0x0,0x4(%rsp)
  nopl   0x0(%rax,%rax,1)
L145:
  mov    %r14,%rcx
  mov    $0xd,%edx
  mov    $0x1,%esi
  lea    D167(%rip),%rdi
  call   <fwrite@plt>
  mov    0x8(%rsp),%rsi
  mov    %r14,%rdi
  xor    %edx,%edx
  call   <check_io@plt>
  addl   $0x1,0x4(%rsp)
  mov    0x4(%rsp),%esi
  xor    %eax,%eax
  lea    D44(%rip),%rdi
  call   <printf@plt>
  jmp    L139
  nopl   0x0(%rax)
L134:
  lea    D224(%rip),%rdi
  xor    %eax,%eax
  call   <printf@plt>
L139:
  mov    $0x46,%edx
  mov    $0x50,%esi
  mov    %rbx,%rdi
  call   <get_line@plt>
  test   %rax,%rax
  jle    L134
  mov    %rbx,%rdx
  mov    %r14,%rdi
  lea    D79(%rip),%rsi
  xor    %eax,%eax
  call   <fprintf@plt>
  mov    0x8(%rsp),%rsi
  xor    %edx,%edx
  mov    %r14,%rdi
  call   <check_io@plt>
  mov    0x4(%rsp),%r15d
  lea    D7(%rip),%rdi
  xor    %eax,%eax
  mov    %r15d,%esi
  call   <printf@plt>
  mov    %r15d,%esi
  lea    D177(%rip),%rdi
  xor    %eax,%eax
  call   <printf@plt>
  jmp    L29
  nopl   0x0(%rax)
L114:
  lea    D107(%rip),%rdi
  xor    %eax,%eax
  call   <printf@plt>
L29:
  mov    $0x46,%edx
  mov    $0x50,%esi
  mov    %rbx,%rdi
  call   <get_line@plt>
  test   %rax,%rax
  jle    L114
  mov    %rbx,%rdx
  lea    D291(%rip),%rsi
  mov    %r14,%rdi
  xor    %eax,%eax
  call   <fprintf@plt>
  mov    0x8(%rsp),%r12
  xor    %edx,%edx
  mov    %r14,%rdi
  lea    D31(%rip),%r13
  mov    %r12,%rsi
  call   <check_io@plt>
  mov    0x4(%rsp),%r15d
  lea    D165(%rip),%rdi
  xor    %eax,%eax
  mov    %r15d,%esi
  call   <printf@plt>
  lea    D183(%rip),%rdi
  call   <puts@plt>
  lea    D33(%rip),%rdx
  mov    %r12,%rsi
  mov    %r14,%rdi
  call   <output_till_dot@plt>
  mov    %r15d,%esi
  lea    D27(%rip),%rdi
  xor    %eax,%eax
  call   <printf@plt>
  lea    D64(%rip),%rdi
  call   <puts@plt>
  lea    D256(%rip),%rdi
  call   <puts@plt>
  lea    D185(%rip),%rdx
  mov    %r12,%rsi
  mov    %r14,%rdi
  call   <output_till_dot@plt>
  mov    %r15d,%esi
  xor    %eax,%eax
  lea    D235(%rip),%rdi
  call   <printf@plt>
  lea    D297(%rip),%rdi
  xor    %eax,%eax
  lea    D184(%rip),%r15
  call   <printf@plt>
  lea    D274(%rip),%r12
  jmp    L56
L150:
  mov    %r15,%rsi
  mov    %rbx,%rdi
  call   <strcmp@plt>
  test   %rax,%rax
  je     L99
L64:
  mov    %r13,%rdi
  call   <puts@plt>
  mov    %r12,%rdi
  call   <puts@plt>
L56:
  mov    $0x46,%edx
  mov    $0x50,%esi
  mov    %rbx,%rdi
  call   <get_line@plt>
  test   %rax,%rax
  jle    L64
  mov    $0x7,%edx
  lea    D268(%rip),%rsi
  mov    %rbx,%rdi
  call   <strncmp@plt>
  test   %rax,%rax
  jne    L150
L99:
  mov    %rbx,%rdx
  mov    %r14,%rdi
  lea    D230(%rip),%rsi
  xor    %eax,%eax
  call   <fprintf@plt>
  mov    0x8(%rsp),%rsi
  mov    %r14,%rdi
  xor    %edx,%edx
  call   <check_io@plt>
  mov    0x4(%rsp),%esi
  lea    D1(%rip),%rdi
  xor    %eax,%eax
  call   <printf@plt>
  jmp    L172
  nopw   0x0(%rax,%rax,1)
L142:
  mov    %rbp,%rdi
  xor    %eax,%eax
  call   <printf@plt>
L172:
  xor    %edx,%edx
  mov    $0x2,%esi
  mov    %rbx,%rdi
  call   <get_line@plt>
  test   %rax,%rax
  jle    L142
  movzbl 0x10(%rsp),%eax
  cmp    $0x79,%al
  je     L4
  cmp    $0x6e,%al
  jne    L142
L4:
  mov    %rbx,%rdx
  mov    %r14,%rdi
  lea    D202(%rip),%rsi
  xor    %eax,%eax
  call   <fprintf@plt>
  mov    0x8(%rsp),%rsi
  mov    %r14,%rdi
  xor    %edx,%edx
  call   <check_io@plt>
  lea    D138(%rip),%rdi
  xor    %eax,%eax
  call   <printf@plt>
  jmp    L36
  xchg   %ax,%ax
L49:
  mov    %rbp,%rdi
  xor    %eax,%eax
  call   <printf@plt>
L36:
  xor    %edx,%edx
  mov    $0x2,%esi
  mov    %rbx,%rdi
  call   <get_line@plt>
  test   %rax,%rax
  jle    L49
  movzbl 0x10(%rsp),%eax
  cmp    $0x79,%al
  je     L145
  cmp    $0x6e,%al
  jne    L49
  cmp    $0x79,%al
  je     L145
  mov    0x68(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L159
  add    $0x78,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
L159:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: extract_symbolic_data
arguments: data_label: D101
type_guessed: string
name: extract_symbolic_data
arguments: data_label: D272
type_guessed: string
name: extract_symbolic_data
arguments: data_label: D181
type_guessed: string
name: extract_symbolic_data
arguments: data_label: D89
type_guessed: string
name: extract_symbolic_data
arguments: data_label: D36
type_guessed: string
name: extract_symbolic_data
arguments: data_label: D167
type_guessed: string
name: extract_symbolic_data
arguments: data_label: D44
type_guessed: string
name: extract_symbolic_data
arguments: data_label: D224
type_guessed: string
name: extract_symbolic_data
arguments: data_label: D79
type_guessed: string
name: extract_symbolic_data
arguments: data_label: D7
type_guessed: string
name: extract_symbolic_data
arguments: data_label: D177
type_guessed: string
name: extract_symbolic_data
arguments: data_label: D107
type_guessed: string
name: extract_symbolic_data
arguments: data_label: D291
type_guessed: string
name: extract_symbolic_data
arguments: data_label: D31
type_guessed: string
name: extract_symbolic_data
arguments: data_label: D165
type_guessed: string
name: extract_symbolic_data
arguments: data_label: D183
type_guessed: string
name: extract_symbolic_data
arguments: data_label: D33
type_guessed: string
name: extract_symbolic_data
arguments: data_label: D27
type_guessed: string
name: extract_symbolic_data
arguments: data_label: D64
type_guessed: string
name: extract_symbolic_data
arguments: data_label: D256
type_guessed: string
name: extract_symbolic_data
arguments: data_label: D185
type_guessed: string
name: extract_symbolic_data
arguments: data_label: D235
type_guessed: string
name: extract_symbolic_data
arguments: data_label: D297
type_guessed: string
name: extract_symbolic_data
arguments: data_label: D184
type_guessed: string
name: extract_symbolic_data
arguments: data_label: D274
type_guessed: string
name: extract_symbolic_data
arguments: data_label: D268
type_guessed: string
name: extract_symbolic_data
arguments: data_label: D230
type_guessed: string
name: extract_symbolic_data
arguments: data_label: D1
type_guessed: string
name: extract_symbolic_data
arguments: data_label: D202
type_guessed: string
name: extract_symbolic_data
arguments: data_label: D138
type_guessed: string

tool: D101: 
Enter information about each author.  If your entry is after

tool: D272: 
please answer y or n: 

tool: D181: 01Feb2000 00:00 UTC

tool: D89: %s and before the contest deadline, the judges


tool: D36: will attempt to EMail back a confirmation to the first author

tool: D167: ---author---


tool: D44: 
Author #%d name: 

tool: D224: 
name too long, please re-enter: 

tool: D79: name:	%s

tool: D7: 
Enter the School/Company/Organization of author #%d


tool: D177: 
Author #%d org: 

tool: D107: 
line too long, please re-enter: 

tool: D291: org:	%s

tool: D31: 
URL too long, does not begin with http:// or

tool: D165: 
Enter the postal address for author #%d.  Be sure to include


tool: D183: your country and do not include your name.

tool: D33: addr:

tool: D27: 
Enter the EMail address for author #%d.  Use an address from


tool: D64: a registered domain or well known site.  If you give several

tool: D256: forms, list them one per line.

tool: D185: email:

tool: D235: 
Enter the fully qualified home page URL for author #%d


tool: D297: including the http: part or type none: 

tool: D184: none


tool: D274: is not the word none

tool: D268: http://

tool: D230: url:	%s

tool: D1: 
Should author #%d remain anonymous (enter y or n)? 

tool: D202: anon:	%s

tool: D138: 
Is there another author (enter y or n)? 

assistant: ```c
void output_author(FILE *output, char *oname) {
  char buf[79 + 1 + 1];
  int more_auths;
  int auth_cnt = 0;
  printf("\nEnter information about each author.  If your entry is after\n");
  printf("%s and before the contest deadline, the judges\n", "01Feb2000 00:00 UTC");
  printf("will attempt to EMail back a confirmation to the first author\n");
  do {
    fprintf(output, "---author---\n");
    check_io(output, oname, 0);
    printf("\nAuthor #%d name: ", ++auth_cnt);
    while (get_line(buf, 79 + 1, 79 - 9) <= 0) {
      printf("\nname too long, please re-enter: ");
    }
    fprintf(output, "name:\t%s", buf);
    check_io(output, oname, 0);
    printf("\nEnter the School/Company/Organization of author #%d\n", auth_cnt);
    printf("\nAuthor #%d org: ", auth_cnt);
    while (get_line(buf, 79 + 1, 79 - 9) <= 0) {
      printf("\nline too long, please re-enter: ");
    }
    fprintf(output, "org:\t%s", buf);
    check_io(output, oname, 0);
    printf("\nEnter the postal address for author #%d.  Be sure to include\n", auth_cnt);
    printf("your country and do not include your name.\n");
    output_till_dot(output, oname, "addr:");
    printf("\nEnter the EMail address for author #%d.  Use an address from\n", auth_cnt);
    printf("a registered domain or well known site.  If you give several\n");
    printf("forms, list them one per line.\n");
    output_till_dot(output, oname, "email:");
    printf("\nEnter the fully qualified home page URL for author #%d\n", auth_cnt);
    printf("including the http: part or type none: ");
    while (get_line(buf, 79 + 1, 79 - 9) <= 0 || (strncmp(buf, "http://", sizeof("http://") - 1) != 0 && strcmp(buf, "none\n") != 0)) {
      printf("\nURL too long, does not begin with http:// or\n");
      printf("is not the word none\n");
    }
    fprintf(output, "url:\t%s", buf);
    check_io(output, oname, 0);
    printf("\nShould author #%d remain anonymous (enter y or n)? ", auth_cnt);
    while (get_line(buf, 1 + 1, 0) <= 0 || !(buf[0] == 'y' || buf[0] == 'n')) {
      printf("\nplease answer y or n: ");
    }
    fprintf(output, "anon:\t%s", buf);
    check_io(output, oname, 0);
    printf("\nIs there another author (enter y or n)? ");
    while (get_line(buf, 1 + 1, 0) <= 0 || !(buf[0] == 'y' || buf[0] == 'n')) {
      printf("\nplease answer y or n: ");
    }
    if (buf[0] == 'y') {
      more_auths = 1;
    } else {
      more_auths = 0;
    }
  } while (more_auths == 1);
  return;
}
```