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

```asm
<fftrec>:
  endbr64
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0x68,%rsp
  mov    (%rsi),%r13d
  mov    %fs:0x28,%rax
  mov    %rax,0x58(%rsp)
  xor    %eax,%eax
  test   %r13d,%r13d
  jg     L34
  mov    %rdi,%rbp
  mov    %rsi,%rbx
  call   <strlen@plt>
  cmp    $0x8,%rax
  jbe    L34
  mov    $0x8,%ecx
  jmp    L92
  cs nopw 0x0(%rax,%rax,1)
L169:
  add    $0x1,%rcx
  cmp    %rcx,%rax
  je     L34
L92:
  movsbl 0x0(%rbp,%rcx,1),%r8d
  lea    0x0(%rbp,%rcx,1),%r12
  lea    -0x20(%r8),%edx
  cmp    $0x5e,%dl
  jbe    L169
  mov    %rsp,%r13
  add    $0x1,%ecx
  mov    $0x51,%esi
  lea    D70(%rip),%rdx
  mov    %r13,%rdi
  call   <snprintf@plt>
  movzbl (%r12),%eax
  test   %al,%al
  je     L107
  cmp    $0x1b,%al
  jg     L13
  cmp    $0x8,%al
  jle    L45
  sub    $0x9,%eax
  cmp    $0x12,%al
  ja     L45
  lea    D13(%rip),%rdx
  movzbl %al,%eax
  movslq (%rdx,%rax,4),%rax
  add    %rdx,%rax
  notrack jmp *%rax
  nopl   0x0(%rax,%rax,1)
L107:
  lea    D35(%rip),%rsi
  mov    %r13,%rdi
  call   <strcat@plt>
  nop
L45:
  mov    %r13,%rdi
  call   <ffpmsg@plt>
  mov    %r13,%rdi
  mov    $0x50,%edx
  mov    %rbp,%rsi
  call   <strncpy@plt>
  mov    %r13,%rdi
  movb   $0x0,0x50(%rsp)
  mov    $0xcf,%r13d
  call   <ffpmsg@plt>
  movl   $0xcf,(%rbx)
L34:
  mov    0x58(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L179
  add    $0x68,%rsp
  mov    %r13d,%eax
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  ret
L13:
  cmp    $0x7f,%al
  jne    L45
  lea    D86(%rip),%rsi
  mov    %r13,%rdi
  call   <strcat@plt>
  jmp    L45
  lea    D53(%rip),%rsi
  mov    %r13,%rdi
  call   <strcat@plt>
  jmp    L45
  lea    D47(%rip),%rsi
  mov    %r13,%rdi
  call   <strcat@plt>
  jmp    L45
  lea    D55(%rip),%rsi
  mov    %r13,%rdi
  call   <strcat@plt>
  jmp    L45
  lea    D45(%rip),%rsi
  mov    %r13,%rdi
  call   <strcat@plt>
  jmp    L45
  lea    D63(%rip),%rsi
  mov    %r13,%rdi
  call   <strcat@plt>
  jmp    L45
  lea    D62(%rip),%rsi
  mov    %r13,%rdi
  call   <strcat@plt>
  jmp    L45
L179:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: unpack_data
arguments: tag: D70
data_type: string
name: unpack_data
arguments: tag: D35
data_type: string
name: unpack_data
arguments: tag: D86
data_type: string
name: unpack_data
arguments: tag: D53
data_type: string
name: unpack_data
arguments: tag: D47
data_type: string
name: unpack_data
arguments: tag: D55
data_type: string
name: unpack_data
arguments: tag: D45
data_type: string
name: unpack_data
arguments: tag: D63
data_type: string
name: unpack_data
arguments: tag: D62
data_type: string

tool: D70: Character %d in this keyword is illegal. Hex Value = %X

tool: D35:  (NULL char.)

tool: D86:  (Delete char.)

tool: D53:  (Escape char.)

tool: D47:  (Carriage Return)

tool: D55:  (Form Feed char.)

tool: D45:  (Vertical Tab)

tool: D63:  (Line Feed char.)

tool: D62:  (TAB char.)

assistant: ```c
int fftrec(char *card, int *status) {
  size_t ii, maxchr;
  char msg[81];
  if (*status > 0)
    return (*status);
  maxchr = strlen(card);
  for (ii = 8; ii < maxchr; ii++) {
    if (card[ii] < 32 || card[ii] > 126) {
      snprintf(msg, 81, "Character %d in this keyword is illegal. Hex Value = %X", (int)(ii + 1), (int)card[ii]);
      if (card[ii] == 0)
        strcat(msg, " (NULL char.)");
      else if (card[ii] == 9)
        strcat(msg, " (TAB char.)");
      else if (card[ii] == 10)
        strcat(msg, " (Line Feed char.)");
      else if (card[ii] == 11)
        strcat(msg, " (Vertical Tab)");
      else if (card[ii] == 12)
        strcat(msg, " (Form Feed char.)");
      else if (card[ii] == 13)
        strcat(msg, " (Carriage Return)");
      else if (card[ii] == 27)
        strcat(msg, " (Escape char.)");
      else if (card[ii] == 127)
        strcat(msg, " (Delete char.)");
      ffpmsg(msg);
      strncpy(msg, card, 80);
      msg[80] = '\0';
      ffpmsg(msg);
      return (*status = 207);
    }
  }
  return (*status);
}
```