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

```asm
<netrom_inp_dump>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  sub    $0x40,%rsp
  mov    %rdi,-0x38(%rbp)
  mov    %esi,-0x3c(%rbp)
  mov    %fs:0x28,%rax
  mov    %rax,-0x8(%rbp)
  xor    %eax,%eax
  mov    -0x38(%rbp),%rax
  movzbl (%rax),%eax
  cmp    $0xff,%al
  jne    L34
  lea    D16(%rip),%rax
  mov    %rax,%rsi
  mov    $0x7,%edi
  mov    $0x0,%eax
  call   <lprintf@plt>
  movl   $0x1,-0x2c(%rbp)
  jmp    L28
L0:
  mov    -0x2c(%rbp),%eax
  movslq %eax,%rdx
  mov    -0x38(%rbp),%rax
  add    %rax,%rdx
  lea    -0x12(%rbp),%rax
  mov    %rdx,%rsi
  mov    %rax,%rdi
  call   <pax25@plt>
  addl   $0x7,-0x2c(%rbp)
  mov    -0x2c(%rbp),%eax
  lea    0x1(%rax),%edx
  mov    %edx,-0x2c(%rbp)
  movslq %eax,%rdx
  mov    -0x38(%rbp),%rax
  add    %rdx,%rax
  movzbl (%rax),%eax
  movzbl %al,%eax
  mov    %eax,-0x28(%rbp)
  mov    -0x2c(%rbp),%eax
  lea    0x1(%rax),%edx
  mov    %edx,-0x2c(%rbp)
  movslq %eax,%rdx
  mov    -0x38(%rbp),%rax
  add    %rdx,%rax
  movzbl (%rax),%eax
  movzbl %al,%eax
  shl    $0x8,%eax
  mov    %eax,-0x24(%rbp)
  mov    -0x2c(%rbp),%eax
  lea    0x1(%rax),%edx
  mov    %edx,-0x2c(%rbp)
  movslq %eax,%rdx
  mov    -0x38(%rbp),%rax
  add    %rdx,%rax
  movzbl (%rax),%eax
  movzbl %al,%eax
  add    %eax,-0x24(%rbp)
  movb   $0x0,-0x19(%rbp)
  jmp    L1
L42:
  mov    -0x2c(%rbp),%eax
  cltq
  lea    0x1(%rax),%rdx
  mov    -0x38(%rbp),%rax
  add    %rdx,%rax
  movzbl (%rax),%eax
  test   %al,%al
  jne    L23
  mov    -0x2c(%rbp),%eax
  movslq %eax,%rdx
  mov    -0x38(%rbp),%rax
  add    %rdx,%rax
  movzbl (%rax),%eax
  movzbl %al,%eax
  sub    $0x2,%eax
  mov    %eax,-0x20(%rbp)
  mov    -0x20(%rbp),%eax
  mov    $0x6,%edx
  cmp    %edx,%eax
  cmovg  %edx,%eax
  mov    %eax,-0x20(%rbp)
  mov    -0x2c(%rbp),%eax
  cltq
  lea    0x2(%rax),%rdx
  mov    -0x38(%rbp),%rax
  lea    (%rdx,%rax,1),%rcx
  mov    -0x20(%rbp),%edx
  lea    -0x19(%rbp),%rax
  mov    %rcx,%rsi
  mov    %rax,%rdi
  call   <memcpy@plt>
  mov    -0x20(%rbp),%eax
  cltq
  movb   $0x0,-0x19(%rbp,%rax,1)
L23:
  mov    -0x2c(%rbp),%eax
  movslq %eax,%rdx
  mov    -0x38(%rbp),%rax
  add    %rdx,%rax
  movzbl (%rax),%eax
  movzbl %al,%eax
  add    %eax,-0x2c(%rbp)
L1:
  mov    -0x2c(%rbp),%eax
  movslq %eax,%rdx
  mov    -0x38(%rbp),%rax
  add    %rdx,%rax
  movzbl (%rax),%eax
  movzbl %al,%edx
  mov    -0x3c(%rbp),%eax
  sub    %edx,%eax
  cmp    %eax,-0x2c(%rbp)
  jge    L46
  mov    -0x2c(%rbp),%eax
  movslq %eax,%rdx
  mov    -0x38(%rbp),%rax
  add    %rdx,%rax
  movzbl (%rax),%eax
  test   %al,%al
  jne    L42
L46:
  addl   $0x1,-0x2c(%rbp)
  mov    -0x24(%rbp),%esi
  mov    -0x28(%rbp),%ecx
  lea    -0x19(%rbp),%rdx
  lea    -0x12(%rbp),%rax
  mov    %esi,%r9d
  mov    %ecx,%r8d
  mov    %rdx,%rcx
  mov    %rax,%rdx
  lea    D12(%rip),%rax
  mov    %rax,%rsi
  mov    $0x5,%edi
  mov    $0x0,%eax
  call   <lprintf@plt>
L28:
  mov    -0x3c(%rbp),%eax
  sub    $0xa,%eax
  cmp    %eax,-0x2c(%rbp)
  jl     L0
L34:
  nop
  mov    -0x8(%rbp),%rax
  sub    %fs:0x28,%rax
  je     L30
  call   <__stack_chk_fail@plt>
L30:
  leave
  ret
```

tool_calls: name: extract_symbolic_data
arguments: data_tag: D16
type: string
name: extract_symbolic_data
arguments: data_tag: D12
type: string

tool: D16: INP Route Information Frame:


tool: D12:         %12s  %-6s   %6u %6u


assistant: ```c
void netrom_inp_dump(unsigned char *data, int length) {
  char node[10];
  char alias[7];
  int hops;
  int tt;
  int alen;
  int i;
  if (data[0] == 0xff) {
    lprintf(7, "INP Route Information Frame:\n");
    i = 1;
    while (i < length - 10) {
      pax25(node, data + i);
      i += 7;
      hops = data[i++];
      tt = data[i++] * 256;
      tt += data[i++];
      alias[0] = 0;
      while (i < length - data[i] && data[i]) {
        if (data[i + 1] == 0x00) {
          alen = data[i] - 2;
          alen = alen < 7 ? alen : 6;
          memcpy(alias, data + i + 2, alen);
          alias[alen] = 0;
        }
        i += data[i];
      }
      i++;
      lprintf(5, "        %12s  %-6s   %6u %6u\n", node, alias, hops, tt);
    }
  }
}
```