user: Translate the below assembly code into C programming language:

```asm
<output_author>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  add    $0xffffffffffffff80,%rsp
  mov    %rdi,-0x78(%rbp)
  mov    %rsi,-0x80(%rbp)
  mov    %fs:0x28,%rax
  mov    %rax,-0x8(%rbp)
  xor    %eax,%eax
  movl   $0x0,-0x64(%rbp)
  lea    D175(%rip),%rax
  mov    %rax,%rdi
  call   <puts@plt>
  lea    D153(%rip),%rax
  mov    %rax,%rsi
  lea    D219(%rip),%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <printf@plt>
  lea    D227(%rip),%rax
  mov    %rax,%rdi
  call   <puts@plt>
L95:
  mov    -0x78(%rbp),%rax
  mov    %rax,%rcx
  mov    $0xd,%edx
  mov    $0x1,%esi
  lea    D246(%rip),%rax
  mov    %rax,%rdi
  call   <fwrite@plt>
  mov    -0x80(%rbp),%rcx
  mov    -0x78(%rbp),%rax
  mov    $0x0,%edx
  mov    %rcx,%rsi
  mov    %rax,%rdi
  call   <check_io@plt>
  addl   $0x1,-0x64(%rbp)
  mov    -0x64(%rbp),%eax
  mov    %eax,%esi
  lea    D225(%rip),%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <printf@plt>
  jmp    L3
L186:
  lea    D36(%rip),%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <printf@plt>
L3:
  lea    -0x60(%rbp),%rax
  mov    $0x46,%edx
  mov    $0x50,%esi
  mov    %rax,%rdi
  call   <get_line@plt>
  test   %rax,%rax
  jle    L186
  lea    -0x60(%rbp),%rdx
  mov    -0x78(%rbp),%rax
  lea    D14(%rip),%rcx
  mov    %rcx,%rsi
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <fprintf@plt>
  mov    -0x80(%rbp),%rcx
  mov    -0x78(%rbp),%rax
  mov    $0x0,%edx
  mov    %rcx,%rsi
  mov    %rax,%rdi
  call   <check_io@plt>
  mov    -0x64(%rbp),%eax
  mov    %eax,%esi
  lea    D268(%rip),%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <printf@plt>
  mov    -0x64(%rbp),%eax
  mov    %eax,%esi
  lea    D27(%rip),%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <printf@plt>
  jmp    L126
L122:
  lea    D165(%rip),%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <printf@plt>
L126:
  lea    -0x60(%rbp),%rax
  mov    $0x46,%edx
  mov    $0x50,%esi
  mov    %rax,%rdi
  call   <get_line@plt>
  test   %rax,%rax
  jle    L122
  lea    -0x60(%rbp),%rdx
  mov    -0x78(%rbp),%rax
  lea    D57(%rip),%rcx
  mov    %rcx,%rsi
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <fprintf@plt>
  mov    -0x80(%rbp),%rcx
  mov    -0x78(%rbp),%rax
  mov    $0x0,%edx
  mov    %rcx,%rsi
  mov    %rax,%rdi
  call   <check_io@plt>
  mov    -0x64(%rbp),%eax
  mov    %eax,%esi
  lea    D104(%rip),%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <printf@plt>
  lea    D169(%rip),%rax
  mov    %rax,%rdi
  call   <puts@plt>
  mov    -0x80(%rbp),%rcx
  mov    -0x78(%rbp),%rax
  lea    D5(%rip),%rdx
  mov    %rcx,%rsi
  mov    %rax,%rdi
  call   <output_till_dot@plt>
  mov    -0x64(%rbp),%eax
  mov    %eax,%esi
  lea    D171(%rip),%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <printf@plt>
  lea    D72(%rip),%rax
  mov    %rax,%rdi
  call   <puts@plt>
  lea    D116(%rip),%rax
  mov    %rax,%rdi
  call   <puts@plt>
  mov    -0x80(%rbp),%rcx
  mov    -0x78(%rbp),%rax
  lea    D179(%rip),%rdx
  mov    %rcx,%rsi
  mov    %rax,%rdi
  call   <output_till_dot@plt>
  mov    -0x64(%rbp),%eax
  mov    %eax,%esi
  lea    D15(%rip),%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <printf@plt>
  lea    D127(%rip),%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <printf@plt>
  jmp    L193
L81:
  lea    D273(%rip),%rax
  mov    %rax,%rdi
  call   <puts@plt>
  lea    D276(%rip),%rax
  mov    %rax,%rdi
  call   <puts@plt>
L193:
  lea    -0x60(%rbp),%rax
  mov    $0x46,%edx
  mov    $0x50,%esi
  mov    %rax,%rdi
  call   <get_line@plt>
  test   %rax,%rax
  jle    L81
  lea    -0x60(%rbp),%rax
  mov    $0x7,%edx
  lea    D118(%rip),%rcx
  mov    %rcx,%rsi
  mov    %rax,%rdi
  call   <strncmp@plt>
  test   %rax,%rax
  je     L113
  lea    -0x60(%rbp),%rax
  lea    D107(%rip),%rdx
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <strcmp@plt>
  test   %rax,%rax
  jne    L81
L113:
  lea    -0x60(%rbp),%rdx
  mov    -0x78(%rbp),%rax
  lea    D97(%rip),%rcx
  mov    %rcx,%rsi
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <fprintf@plt>
  mov    -0x80(%rbp),%rcx
  mov    -0x78(%rbp),%rax
  mov    $0x0,%edx
  mov    %rcx,%rsi
  mov    %rax,%rdi
  call   <check_io@plt>
  mov    -0x64(%rbp),%eax
  mov    %eax,%esi
  lea    D124(%rip),%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <printf@plt>
  jmp    L131
L41:
  lea    D119(%rip),%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <printf@plt>
L131:
  lea    -0x60(%rbp),%rax
  mov    $0x0,%edx
  mov    $0x2,%esi
  mov    %rax,%rdi
  call   <get_line@plt>
  test   %rax,%rax
  jle    L41
  movzbl -0x60(%rbp),%eax
  cmp    $0x79,%al
  je     L70
  movzbl -0x60(%rbp),%eax
  cmp    $0x6e,%al
  jne    L41
L70:
  lea    -0x60(%rbp),%rdx
  mov    -0x78(%rbp),%rax
  lea    D133(%rip),%rcx
  mov    %rcx,%rsi
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <fprintf@plt>
  mov    -0x80(%rbp),%rcx
  mov    -0x78(%rbp),%rax
  mov    $0x0,%edx
  mov    %rcx,%rsi
  mov    %rax,%rdi
  call   <check_io@plt>
  lea    D240(%rip),%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <printf@plt>
  jmp    L168
L109:
  lea    D119(%rip),%rax
  mov    %rax,%rdi
  mov    $0x0,%eax
  call   <printf@plt>
L168:
  lea    -0x60(%rbp),%rax
  mov    $0x0,%edx
  mov    $0x2,%esi
  mov    %rax,%rdi
  call   <get_line@plt>
  test   %rax,%rax
  jle    L109
  movzbl -0x60(%rbp),%eax
  cmp    $0x79,%al
  je     L83
  movzbl -0x60(%rbp),%eax
  cmp    $0x6e,%al
  jne    L109
L83:
  movzbl -0x60(%rbp),%eax
  cmp    $0x79,%al
  jne    L77
  movl   $0x1,-0x68(%rbp)
  jmp    L72
L77:
  movl   $0x0,-0x68(%rbp)
L72:
  cmpl   $0x1,-0x68(%rbp)
  je     L95
  nop
  mov    -0x8(%rbp),%rax
  sub    %fs:0x28,%rax
  je     L99
  call   <__stack_chk_fail@plt>
L99:
  leave
  ret
```

tool_calls: name: read_data
arguments: data_tag: D175
type_guessed: string
name: read_data
arguments: data_tag: D153
type_guessed: string
name: read_data
arguments: data_tag: D219
type_guessed: string
name: read_data
arguments: data_tag: D227
type_guessed: string
name: read_data
arguments: data_tag: D246
type_guessed: string
name: read_data
arguments: data_tag: D225
type_guessed: string
name: read_data
arguments: data_tag: D36
type_guessed: string
name: read_data
arguments: data_tag: D14
type_guessed: string
name: read_data
arguments: data_tag: D268
type_guessed: string
name: read_data
arguments: data_tag: D27
type_guessed: string
name: read_data
arguments: data_tag: D165
type_guessed: string
name: read_data
arguments: data_tag: D57
type_guessed: string
name: read_data
arguments: data_tag: D104
type_guessed: string
name: read_data
arguments: data_tag: D169
type_guessed: string
name: read_data
arguments: data_tag: D5
type_guessed: string
name: read_data
arguments: data_tag: D171
type_guessed: string
name: read_data
arguments: data_tag: D72
type_guessed: string
name: read_data
arguments: data_tag: D116
type_guessed: string
name: read_data
arguments: data_tag: D179
type_guessed: string
name: read_data
arguments: data_tag: D15
type_guessed: string
name: read_data
arguments: data_tag: D127
type_guessed: string
name: read_data
arguments: data_tag: D273
type_guessed: string
name: read_data
arguments: data_tag: D276
type_guessed: string
name: read_data
arguments: data_tag: D118
type_guessed: string
name: read_data
arguments: data_tag: D107
type_guessed: string
name: read_data
arguments: data_tag: D97
type_guessed: string
name: read_data
arguments: data_tag: D124
type_guessed: string
name: read_data
arguments: data_tag: D119
type_guessed: string
name: read_data
arguments: data_tag: D133
type_guessed: string
name: read_data
arguments: data_tag: D240
type_guessed: string

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

tool: D153: 01Feb2000 00:00 UTC

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


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

tool: D246: ---author---


tool: D225: 
Author #%d name: 

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

tool: D14: name:	%s

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


tool: D27: 
Author #%d org: 

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

tool: D57: org:	%s

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


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

tool: D5: addr:

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


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

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

tool: D179: email:

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


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

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

tool: D276: is not the word none

tool: D118: http://

tool: D107: none


tool: D97: url:	%s

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

tool: D119: 
please answer y or n: 

tool: D133: anon:	%s

tool: D240: 
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;
}
```