user: 请将以下的汇编代码转换成C语言代码:

```asm
<ax25_dump>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0x68,%rsp
  mov    %edx,(%rsp)
  mov    %fs:0x28,%rax
  mov    %rax,0x58(%rsp)
  xor    %eax,%eax
  movl   $0x0,0x10(%rsp)
  movl   $0x0,0x14(%rsp)
  cmp    $0x7,%esi
  jle    L135
  mov    %rdi,%r14
  mov    %esi,%ebx
  testb  $0x1,0x1(%rdi)
  jne    L595
  cmp    $0xe,%esi
  jle    L135
  testb  $0x40,0xd(%rdi)
  je     L476
  lea    D144(%rip),%rsi
  mov    $0x6,%edi
  xor    %eax,%eax
  call   <lprintf@plt>
  movl   $0x0,0x4(%rsp)
L245:
  testb  $0x20,0xd(%r14)
  lea    D392(%rip),%rdx
  lea    D206(%rip),%rax
  cmovne %rdx,%rax
  lea    0x20(%rsp),%r13
  lea    0x7(%r14),%rsi
  mov    %r13,%rdi
  mov    %rax,0x8(%rsp)
  call   <pax25@plt>
  lea    D399(%rip),%rsi
  mov    $0x8,%edi
  mov    %rax,%rdx
  xor    %eax,%eax
  call   <lprintf@plt>
  mov    %r14,%rsi
  mov    %r13,%rdi
  call   <pax25@plt>
  lea    D427(%rip),%rsi
  mov    $0x8,%edi
  mov    %rax,%rdx
  xor    %eax,%eax
  call   <lprintf@plt>
  cmpb   $0x0,0x6(%r14)
  js     L58
  movzbl 0xd(%r14),%eax
  lea    -0xe(%rbx),%r12d
  add    $0xe,%r14
  mov    %eax,%ebp
  shr    $0x6,%ebp
  and    $0x2,%ebp
  test   $0x1,%al
  je     L235
L307:
  mov    0x4(%rsp),%r9d
  lea    0x1c(%rsp),%rsi
  mov    %r14,%rdi
  mov    %r12d,%r13d
  lea    0x10(%rsp),%rcx
  lea    0x14(%rsp),%rdx
  lea    0x18(%rsp),%r8
  call   <ftype@plt>
  mov    0x1c(%rsp),%edi
  movslq %eax,%rdx
  sub    %eax,%r13d
  lea    (%r14,%rdx,1),%rbx
  call   <decode_type@plt>
  lea    D293(%rip),%rsi
  mov    $0x7,%edi
  mov    %rax,%rdx
  xor    %eax,%eax
  call   <lprintf@plt>
  cmp    $0x1,%ebp
  je     L287
  cmp    $0x2,%ebp
  je     L462
L471:
  mov    0x1c(%rsp),%eax
  test   %eax,%eax
  je     L536
L557:
  and    $0x3,%eax
  cmp    $0x3,%eax
  jne    L576
L21:
  lea    D239(%rip),%rsi
  mov    $0x7,%edi
  xor    %eax,%eax
  call   <lprintf@plt>
  mov    0x1c(%rsp),%eax
  test   %eax,%eax
  je     L253
  cmp    $0x3,%eax
  je     L253
  cmp    $0x87,%eax
  je     L341
  cmp    $0x2f,%eax
  sete   %dl
  cmp    $0x63,%eax
  sete   %al
  or     %al,%dl
  je     L521
  cmp    $0x1,%r13d
  jle    L521
  movzwl (%rbx),%edx
  mov    0x8(%rsp),%rcx
  mov    $0x7,%edi
  xor    %eax,%eax
  lea    D116(%rip),%rsi
  rol    $0x8,%dx
  movzwl %dx,%edx
  call   <lprintf@plt>
  jmp    L459
  nopl   0x0(%rax,%rax,1)
L135:
  lea    D194(%rip),%rsi
  mov    $0x1,%edi
  xor    %eax,%eax
  call   <lprintf@plt>
L459:
  mov    0x58(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L297
  add    $0x68,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
  xchg   %ax,%ax
L595:
  lea    D144(%rip),%rsi
  mov    $0x6,%edi
  xor    %eax,%eax
  call   <lprintf@plt>
  xor    %ecx,%ecx
  movzbl 0x3(%r14),%eax
  xor    %edx,%edx
  mov    %cx,0x26(%rsp)
  movzbl 0x2(%r14),%ecx
  lea    0x27(%rsp),%rbp
  movzbl 0x4(%r14),%esi
  mov    %ecx,%edi
  shl    $0x4,%ecx
  shr    $0x2,%dil
  and    $0x30,%ecx
  add    $0x20,%edi
  mov    %dil,%dl
  mov    %eax,%edi
  shl    $0x2,%eax
  shr    $0x4,%dil
  and    $0x3c,%eax
  lea    0x20(%rcx,%rdi,1),%ecx
  mov    %cl,%dh
  mov    %esi,%ecx
  and    $0x3f,%esi
  shr    $0x6,%cl
  movzwl %dx,%edx
  lea    0x20(%rax,%rcx,1),%eax
  lea    0x20(%rsi),%ecx
  movzbl %al,%eax
  shl    $0x18,%ecx
  shl    $0x10,%eax
  or     %eax,%edx
  movzbl 0x5(%r14),%eax
  or     %ecx,%edx
  xor    %ecx,%ecx
  mov    %eax,%esi
  mov    %edx,0x20(%rsp)
  movzbl 0x6(%r14),%edx
  shl    $0x4,%eax
  shr    $0x2,%sil
  and    $0x30,%eax
  add    $0x20,%esi
  mov    %sil,%cl
  mov    %edx,%esi
  shr    $0x4,%sil
  lea    0x20(%rax,%rsi,1),%eax
  mov    %al,%ch
  mov    %cx,0x24(%rsp)
  and    $0xf,%edx
  jne    L469
L0:
  lea    0x20(%rsp),%rdi
  lea    D424(%rip),%rsi
  call   <strtok@plt>
  movzbl (%r14),%edx
  mov    %rbp,%r8
  xor    %ebp,%ebp
  movzbl 0x1(%r14),%esi
  mov    %eax,%ecx
  mov    $0x8,%edi
  xor    %eax,%eax
  shl    $0x6,%edx
  lea    -0x7(%rbx),%r12d
  shr    $0x2,%sil
  movzbl %sil,%esi
  or     %esi,%edx
  lea    D218(%rip),%rsi
  call   <lprintf@plt>
  testb  $0x2,0x1(%r14)
  lea    D392(%rip),%rax
  movl   $0x0,0x4(%rsp)
  sete   %bpl
  mov    %rax,0x8(%rsp)
  add    $0x7,%r14
  add    $0x1,%ebp
  jmp    L307
  nopl   (%rax)
L476:
  lea    D42(%rip),%rsi
  mov    $0x6,%edi
  xor    %eax,%eax
  call   <lprintf@plt>
  movl   $0x1,0x4(%rsp)
  jmp    L245
L462:
  lea    D367(%rip),%rsi
  mov    $0x7,%edi
  xor    %eax,%eax
  call   <lprintf@plt>
  mov    0x18(%rsp),%eax
  test   %eax,%eax
  je     L471
  lea    D104(%rip),%rsi
  mov    $0x7,%edi
  xor    %eax,%eax
  call   <lprintf@plt>
  jmp    L471
  nopw   0x0(%rax,%rax,1)
L576:
  mov    0x10(%rsp),%edx
  lea    D274(%rip),%rsi
  mov    $0x7,%edi
  xor    %eax,%eax
  call   <lprintf@plt>
  jmp    L21
  nopl   0x0(%rax)
L469:
  movzbl %dl,%edx
  lea    D312(%rip),%rsi
  mov    %rbp,%rdi
  xor    %eax,%eax
  call   <sprintf@plt>
  jmp    L0
  nopl   0x0(%rax)
L253:
  test   %r13d,%r13d
  jle    L459
  movzbl (%rbx),%r15d
  sub    $0x2,%r12d
  lea    0x1(%rbx),%r14
  lea    -0x1(%r13),%ebp
  cmp    $0x8,%r15d
  je     L52
L185:
  lea    0x30(%rsp),%r13
  mov    0x8(%rsp),%rdx
  xor    %eax,%eax
  mov    %r12d,%ecx
  lea    D180(%rip),%rsi
  mov    %r13,%rdi
  call   <sprintf@plt>
  cmp    $0xf0,%r15d
  jg     L308
  cmp    $0xc2,%r15d
  jle    L194
  lea    -0xc3(%r15),%eax
  cmp    $0x2d,%eax
  ja     L308
  lea    D454(%rip),%rdx
  movslq (%rdx,%rax,4),%rax
  add    %rdx,%rax
  notrack jmp *%rax
  nopl   0x0(%rax)
L341:
  cmp    $0x2,%r13d
  jg     L250
L521:
  mov    0x8(%rsp),%rdx
  lea    D315(%rip),%rsi
  mov    $0x7,%edi
  xor    %eax,%eax
  call   <lprintf@plt>
  jmp    L459
  nopw   0x0(%rax,%rax,1)
L58:
  movsbl 0xd(%r14),%ebp
  lea    -0xe(%rbx),%r12d
  add    $0xe,%r14
  mov    %ebp,%eax
  not    %ebp
  shr    $0x1f,%ebp
  test   $0x1,%al
  jne    L307
L235:
  mov    %r14,%r15
  lea    D74(%rip),%rsi
  mov    $0x7,%edi
  xor    %eax,%eax
  call   <lprintf@plt>
  lea    D50(%rip),%r14
  lea    -0xe(%rbx,%r15,1),%ebx
  xchg   %ax,%ax
L554:
  cmpb   $0x0,0x6(%r15)
  lea    D12(%rip),%rax
  mov    %r15,%rsi
  mov    %r13,%rdi
  lea    D392(%rip),%r12
  cmovs  %rax,%r12
  add    $0x7,%r15
  call   <pax25@plt>
  mov    %r14,%rsi
  mov    $0x8,%edi
  mov    %rax,%rdx
  mov    %r12,%rcx
  xor    %eax,%eax
  mov    %ebx,%r12d
  call   <lprintf@plt>
  movzbl -0x1(%r15),%eax
  sub    %r15d,%r12d
  test   $0x1,%al
  je     L554
  test   %r12d,%r12d
  je     L459
  mov    %r15,%r14
  jmp    L307
  nopl   0x0(%rax,%rax,1)
L287:
  lea    D469(%rip),%rsi
  mov    $0x7,%edi
  xor    %eax,%eax
  call   <lprintf@plt>
  mov    0x18(%rsp),%edx
  test   %edx,%edx
  je     L471
  lea    D22(%rip),%rsi
  mov    $0x7,%edi
  xor    %eax,%eax
  call   <lprintf@plt>
  jmp    L471
  nopw   0x0(%rax,%rax,1)
L536:
  mov    0x14(%rsp),%edx
  lea    D92(%rip),%rsi
  mov    $0x7,%edi
  call   <lprintf@plt>
  mov    0x1c(%rsp),%eax
  jmp    L557
  xchg   %ax,%ax
L194:
  cmp    $0x1,%r15d
  jne    L580
  mov    %r13,%rdx
  lea    D138(%rip),%rsi
  mov    $0x7,%edi
  xor    %eax,%eax
  call   <lprintf@plt>
  mov    (%rsp),%edx
  mov    %ebp,%esi
  mov    %r14,%rdi
  call   <rose_dump@plt>
  jmp    L459
  xchg   %ax,%ax
L580:
  cmp    $0x8,%r15d
  jne    L308
L45:
  mov    %r13,%rdx
  lea    D315(%rip),%rsi
L136:
  mov    $0x7,%edi
  xor    %eax,%eax
  call   <lprintf@plt>
  mov    (%rsp),%edx
  mov    %ebp,%esi
  mov    %r14,%rdi
  call   <data_dump@plt>
  jmp    L459
  xchg   %ax,%ax
L308:
  mov    %r15d,%edx
  mov    %r13,%rcx
  lea    D159(%rip),%rsi
  xor    %eax,%eax
  mov    $0x7,%edi
  call   <lprintf@plt>
  mov    (%rsp),%edx
  mov    %ebp,%esi
  mov    %r14,%rdi
  call   <data_dump@plt>
  jmp    L459
  nopl   0x0(%rax,%rax,1)
L250:
  movzbl (%rbx),%edx
  lea    D196(%rip),%rsi
  mov    $0x7,%edi
  xor    %eax,%eax
  call   <lprintf@plt>
  movzbl 0x1(%rbx),%eax
  mov    $0x7,%edi
  lea    D213(%rip),%rsi
  mov    %eax,%ecx
  shr    $0x5,%al
  shr    %cl
  movzbl %al,%edx
  xor    %eax,%eax
  and    $0x7,%ecx
  call   <lprintf@plt>
  movzbl 0x2(%rbx),%eax
  test   $0x1,%al
  jne    L479
L237:
  test   $0x2,%al
  jne    L288
L277:
  test   $0x4,%al
  jne    L553
L124:
  test   $0x8,%al
  je     L521
  lea    D78(%rip),%rsi
  mov    $0x1,%edi
  xor    %eax,%eax
  call   <lprintf@plt>
  jmp    L521
  mov    %r13,%rdx
  lea    D353(%rip),%rsi
  jmp    L136
  mov    %r13,%rdx
  lea    D245(%rip),%rsi
  mov    $0x7,%edi
  xor    %eax,%eax
  call   <lprintf@plt>
  mov    (%rsp),%edx
  mov    %ebp,%esi
  mov    %r14,%rdi
  call   <flexnet_dump@plt>
  jmp    L459
  mov    %r13,%rdx
  lea    D189(%rip),%rsi
  mov    $0x7,%edi
  xor    %eax,%eax
  call   <lprintf@plt>
  mov    %ebp,%esi
  mov    %r14,%rdi
  call   <arp_dump@plt>
  jmp    L459
  mov    %r13,%rdx
  lea    D119(%rip),%rsi
  mov    $0x7,%edi
  xor    %eax,%eax
  call   <lprintf@plt>
  mov    (%rsp),%edx
  mov    %ebp,%esi
  mov    %r14,%rdi
  call   <ip_dump@plt>
  jmp    L459
  mov    %r13,%rdx
  lea    D56(%rip),%rsi
  jmp    L136
  mov    %r13,%rdx
  lea    D439(%rip),%rsi
  mov    $0x7,%edi
  xor    %eax,%eax
  call   <lprintf@plt>
  mov    (%rsp),%edx
  mov    %ebp,%esi
  mov    %r14,%rdi
  call   <netrom_dump@plt>
  jmp    L459
  nopl   0x0(%rax)
L52:
  movzbl 0x1(%rbx),%eax
  mov    %eax,%ecx
  and    $0x7f,%ecx
  test   %al,%al
  js     L335
  mov    $0x7,%edi
  lea    -0x2(%r13),%ebp
  lea    0x30(%rsp),%r13
  xor    %eax,%eax
  lea    D392(%rip),%rdx
  lea    D219(%rip),%rsi
  call   <lprintf@plt>
  mov    0x8(%rsp),%rdx
  mov    %r12d,%ecx
  mov    %r13,%rdi
  lea    D180(%rip),%rsi
  xor    %eax,%eax
  lea    0x2(%rbx),%r14
  call   <sprintf@plt>
  jmp    L45
  nopw   0x0(%rax,%rax,1)
L335:
  mov    $0x7,%edi
  lea    0x3(%rbx),%r14
  lea    -0x3(%r13),%ebp
  xor    %eax,%eax
  lea    D164(%rip),%rdx
  lea    D219(%rip),%rsi
  call   <lprintf@plt>
  movzbl 0x2(%rbx),%r15d
  jmp    L185
L553:
  lea    D205(%rip),%rsi
  mov    $0x1,%edi
  xor    %eax,%eax
  call   <lprintf@plt>
  movzbl 0x2(%rbx),%eax
  jmp    L124
L288:
  lea    D409(%rip),%rsi
  mov    $0x1,%edi
  xor    %eax,%eax
  call   <lprintf@plt>
  movzbl 0x2(%rbx),%eax
  jmp    L277
L479:
  lea    D187(%rip),%rsi
  mov    $0x1,%edi
  xor    %eax,%eax
  call   <lprintf@plt>
  movzbl 0x2(%rbx),%eax
  jmp    L237
L297:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: read_data
arguments: tag: D144
type_guessed: string
name: read_data
arguments: tag: D392
type_guessed: string
name: read_data
arguments: tag: D206
type_guessed: string
name: read_data
arguments: tag: D399
type_guessed: string
name: read_data
arguments: tag: D427
type_guessed: string
name: read_data
arguments: tag: D293
type_guessed: string
name: read_data
arguments: tag: D239
type_guessed: string
name: read_data
arguments: tag: D116
type_guessed: string
name: read_data
arguments: tag: D194
type_guessed: string
name: read_data
arguments: tag: D424
type_guessed: string
name: read_data
arguments: tag: D218
type_guessed: string
name: read_data
arguments: tag: D42
type_guessed: string
name: read_data
arguments: tag: D367
type_guessed: string
name: read_data
arguments: tag: D104
type_guessed: string
name: read_data
arguments: tag: D274
type_guessed: string
name: read_data
arguments: tag: D312
type_guessed: string
name: read_data
arguments: tag: D180
type_guessed: string
name: read_data
arguments: tag: D315
type_guessed: string
name: read_data
arguments: tag: D74
type_guessed: string
name: read_data
arguments: tag: D50
type_guessed: string
name: read_data
arguments: tag: D12
type_guessed: string
name: read_data
arguments: tag: D469
type_guessed: string
name: read_data
arguments: tag: D22
type_guessed: string
name: read_data
arguments: tag: D92
type_guessed: string
name: read_data
arguments: tag: D138
type_guessed: string
name: read_data
arguments: tag: D159
type_guessed: string
name: read_data
arguments: tag: D196
type_guessed: string
name: read_data
arguments: tag: D213
type_guessed: string
name: read_data
arguments: tag: D78
type_guessed: string
name: read_data
arguments: tag: D353
type_guessed: string
name: read_data
arguments: tag: D245
type_guessed: string
name: read_data
arguments: tag: D189
type_guessed: string
name: read_data
arguments: tag: D119
type_guessed: string
name: read_data
arguments: tag: D56
type_guessed: string
name: read_data
arguments: tag: D439
type_guessed: string
name: read_data
arguments: tag: D219
type_guessed: string
name: read_data
arguments: tag: D164
type_guessed: string
name: read_data
arguments: tag: D205
type_guessed: string
name: read_data
arguments: tag: D409
type_guessed: string
name: read_data
arguments: tag: D187
type_guessed: string

tool: D144: AX25: 

tool: 

tool: D206:  [DAMA]

tool: D399: %s

tool: D427: ->%s

tool: D293:  <%s

tool: D239: >

tool: D116:  [%d]%s


tool: D194: AX25: bad header!


tool: D424:  

tool: D218: %d->%s%s

tool: D42: EAX25: 

tool: D367:  R

tool: D104:  F

tool: D274:  R%d

tool: D312: -%d

tool: D180: %s (%d)

tool: D315: %s


tool: D74:  v

tool: D50:  %s%s

tool: D12: *

tool: D469:  C

tool: D22:  P

tool: D92:  S%d

tool: D138:  pid=X.25%s


tool: D159:  pid=0x%x%s


tool: D196: : %02X

tool: D213:  Vr = %d Vs = %d

tool: D78:  Invalid seq number

tool: D353:  pid=Text%s


tool: D245:  pid=FLEXNET%s


tool: D189:  pid=ARP%s


tool: D119:  pid=IP%s


tool: D56:  pid=TEXNET%s


tool: D439:  pid=NET/ROM%s


tool: D219: %s remain %u

tool: D164:  First seg;

tool: D205:  Too-long I-field

tool: D409:  Illegal I-field

tool: D187:  Invalid control field

assistant: ```c
void ax25_dump(unsigned char *data, int length, int hexdump) {
  char tmp[15];
  char ext[40];
  int ctlen, nr = 0, ns = 0, pf, pid, seg, type, end, cmdrsp, extseq, paclen;
  char *dama;
  if (length < 8) {
    lprintf(1, "AX25: bad header!\n");
    return;
  }
  if (data[1] & 0x01) {
    lprintf(6, "AX25: ");
    tmp[6] = tmp[7] = extseq = 0;
    tmp[0] = ' ' + (data[2] >> 2);
    tmp[1] = ' ' + ((data[2] << 4) & 0x30) + (data[3] >> 4);
    tmp[2] = ' ' + ((data[3] << 2) & 0x3c) + (data[4] >> 6);
    tmp[3] = ' ' + (data[4] & 0x3f);
    tmp[4] = ' ' + (data[5] >> 2);
    tmp[5] = ' ' + ((data[5] << 4) & 0x30) + (data[6] >> 4);
    if (data[6] & 0xf)
      sprintf(tmp + 7, "-%d", data[6] & 0xf);
    lprintf(8, "%d->%s%s", (data[0] << 6) | ((data[1] >> 2) & 0x3f), strtok(tmp, " "), tmp + 7);
    cmdrsp = (data[1] & 2) ? 1 : 2;
    dama = "";
    data += 7;
    length -= 7;
  } else {
    if (length < (7 + 7 + 1)) {
      lprintf(1, "AX25: bad header!\n");
      return;
    }
    if ((data[7 + 6] & 0x40) == 0x40) {
      extseq = 0;
      lprintf(6, "AX25: ");
    } else {
      extseq = 1;
      lprintf(6, "EAX25: ");
    }
    if ((data[7 + 6] & 0x20) == 0x20)
      dama = "";
    else
      dama = " [DAMA]";
    lprintf(8, "%s", pax25(tmp, data + 7));
    lprintf(8, "->%s", pax25(tmp, data));
    cmdrsp = 0;
    if ((data[6] & 0x80) && !(data[7 + 6] & 0x80))
      cmdrsp = 1;
    if ((data[7 + 6] & 0x80) && !(data[6] & 0x80))
      cmdrsp = 2;
    end = (data[7 + 6] & 0x01);
    data += (7 + 7);
    length -= (7 + 7);
    if (!end) {
      lprintf(7, " v");
      while (!end) {
        lprintf(8, " %s%s", pax25(tmp, data), (data[6] & 0x80) ? "*" : "");
        end = (data[6] & 0x01);
        data += 7;
        length -= 7;
      }
    }
  }
  if (length == 0)
    return;
  paclen = length - 2;
  ctlen = ftype(data, &type, &ns, &nr, &pf, extseq);
  data += ctlen;
  length -= ctlen;
  lprintf(7, " <%s", decode_type(type));
  switch (cmdrsp) {
  case 1:
    lprintf(7, " C");
    if (pf)
      lprintf(7, " P");
    break;
  case 2:
    lprintf(7, " R");
    if (pf)
      lprintf(7, " F");
    break;
  default:
    break;
  }
  if (type == 0x00)
    lprintf(7, " S%d", ns);
  if ((type & 0x3) != 0x03)
    lprintf(7, " R%d", nr);
  lprintf(7, ">");
  if (type == 0x00 || type == 0x03) {
    if (length > 0) {
      pid = *data++;
      length--;
      if (pid == 0x08) {
        seg = *data++;
        length--;
        lprintf(7, "%s remain %u", seg & 0x80 ? " First seg;" : "", seg & 0x7F);
        if (seg & 0x80) {
          pid = *data++;
          length--;
        }
      }
      sprintf(ext, "%s (%d)", dama, paclen);
      switch (pid) {
      case 0x08:
        lprintf(7, "%s\n", ext);
        data_dump(data, length, hexdump);
        break;
      case 0xCD:
        lprintf(7, " pid=ARP%s\n", ext);
        arp_dump(data, length);
        break;
      case 0xCF:
        lprintf(7, " pid=NET/ROM%s\n", ext);
        netrom_dump(data, length, hexdump);
        break;
      case 0xCC:
        lprintf(7, " pid=IP%s\n", ext);
        ip_dump(data, length, hexdump);
        break;
      case 0x01:
        lprintf(7, " pid=X.25%s\n", ext);
        rose_dump(data, length, hexdump);
        break;
      case 0xC3:
        lprintf(7, " pid=TEXNET%s\n", ext);
        data_dump(data, length, hexdump);
        break;
      case 0xCE:
        lprintf(7, " pid=FLEXNET%s\n", ext);
        flexnet_dump(data, length, hexdump);
        break;
      case 0xF0:
        lprintf(7, " pid=Text%s\n", ext);
        data_dump(data, length, hexdump);
        break;
      default:
        lprintf(7, " pid=0x%x%s\n", pid, ext);
        data_dump(data, length, hexdump);
        break;
      }
    }
  } else if (type == 0x87 && length >= 3) {
    lprintf(7, ": %02X", data[0]);
    lprintf(7, " Vr = %d Vs = %d", (data[1] >> 5) & 7, (data[1] >> 1) & 7);
    if (data[2] & 1)
      lprintf(1, " Invalid control field");
    if (data[2] & 2)
      lprintf(1, " Illegal I-field");
    if (data[2] & 4)
      lprintf(1, " Too-long I-field");
    if (data[2] & 8)
      lprintf(1, " Invalid seq number");
    lprintf(7, "%s\n", dama);
  } else if ((type == 0x2F || type == 0x63) && length >= 2) {
    lprintf(7, " [%d]%s\n", (data[0] << 8) | data[1], dama);
  } else {
    lprintf(7, "%s\n", dama);
  }
}
```