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

```asm
<ffbnfm>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0xd8,%rsp
  mov    %r8,(%rsp)
  mov    %fs:0x28,%rax
  mov    %rax,0xc8(%rsp)
  mov    (%r8),%eax
  test   %eax,%eax
  jg     L239
  mov    %rdi,%r12
  mov    %rsi,%rbp
  mov    %rdx,%r13
  mov    %rcx,%r14
  test   %rsi,%rsi
  je     L417
  movl   $0x0,(%rsi)
L417:
  test   %r13,%r13
  je     L531
  movq   $0x0,0x0(%r13)
L531:
  test   %r14,%r14
  je     L430
  movq   $0x0,(%r14)
L430:
  mov    %r12,%rdi
  call   <strlen@plt>
  test   %rax,%rax
  je     L610
  xor    %esi,%esi
  jmp    L72
  nopw   0x0(%rax,%rax,1)
L67:
  add    $0x1,%rsi
  cmp    %rsi,%rax
  je     L610
L72:
  cmpb   $0x20,(%r12,%rsi,1)
  je     L67
  sub    %rsi,%rax
  cmp    $0x46,%rax
  ja     L23
  lea    0x20(%rsp),%rax
  add    %r12,%rsi
  mov    %rax,%rbx
  mov    %rax,%rdi
  mov    %rax,0x8(%rsp)
  call   <strcpy@plt>
  mov    %rbx,%rdi
  call   <ffupch@plt>
  mov    %rbx,%rax
  xor    %ebx,%ebx
  jmp    L359
  nopl   0x0(%rax,%rax,1)
L341:
  add    $0x1,%rbx
L359:
  movsbl (%rax),%edi
  mov    %rax,%r15
  call   <isdigit@plt>
  mov    %rax,%r8
  lea    0x1(%r15),%rax
  test   %r8,%r8
  jne    L341
  test   %rbx,%rbx
  jne    L187
  movq   $0x1,0x18(%rsp)
L505:
  movzbl (%r15),%eax
  lea    -0x50(%rax),%edx
  cmp    $0x1,%dl
  jbe    L520
  cmp    $0x55,%al
  je     L493
  sub    $0x41,%eax
  cmp    $0x17,%al
  ja     L324
  lea    D15(%rip),%rdx
  movzbl %al,%eax
  movslq (%rdx,%rax,4),%rax
  add    %rdx,%rax
  notrack jmp *%rax
L493:
  movq   $0x2,0x10(%rsp)
  mov    $0x14,%eax
L421:
  test   %rbp,%rbp
  je     L346
  mov    %eax,0x0(%rbp)
L346:
  test   %r13,%r13
  je     L45
  mov    0x18(%rsp),%rax
  mov    %rax,0x0(%r13)
L45:
  test   %r14,%r14
  je     L534
  mov    0x10(%rsp),%rax
  mov    %rax,(%r14)
L534:
  mov    (%rsp),%rax
  mov    (%rax),%eax
L239:
  mov    0xc8(%rsp),%rdx
  sub    %fs:0x28,%rdx
  jne    L412
  add    $0xd8,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
L23:
  lea    D70(%rip),%rdi
  call   <ffpmsg@plt>
  mov    (%rsp),%rax
  movl   $0x105,(%rax)
  mov    $0x105,%eax
  jmp    L239
  nopl   (%rax)
L520:
  movzbl 0x1(%r15),%eax
  lea    0x1(%r15),%rsi
  cmp    $0x55,%al
  je     L318
  sub    $0x41,%eax
  cmp    $0x17,%al
  ja     L324
  lea    D25(%rip),%rdx
  movzbl %al,%eax
  movslq (%rdx,%rax,4),%rax
  add    %rdx,%rax
  notrack jmp *%rax
  nopl   0x0(%rax,%rax,1)
L187:
  mov    0x8(%rsp),%rdi
  lea    0x18(%rsp),%rdx
  lea    D76(%rip),%rsi
  call   <sscanf@plt>
  cmp    $0x1,%eax
  je     L505
  lea    D60(%rip),%rdi
  call   <ffpmsg@plt>
  mov    (%rsp),%rax
  movl   $0x105,(%rax)
  mov    $0x105,%eax
  jmp    L239
  nop
L318:
  movq   $0x2,0x10(%rsp)
  mov    $0xffffffec,%edx
  mov    %edx,%eax
  jmp    L421
  nopl   (%rax)
L324:
  lea    0x70(%rsp),%rbp
  mov    %r12,%rcx
  mov    $0x51,%esi
  lea    D45(%rip),%rdx
  mov    %rbp,%rdi
  call   <snprintf@plt>
  mov    %rbp,%rdi
  call   <ffpmsg@plt>
  mov    (%rsp),%rax
  movl   $0x106,(%rax)
  mov    $0x106,%eax
  jmp    L239
  xor    %ebx,%ebx
L513:
  mov    $0x1,%ecx
  mov    $0xffffffff,%edx
  mov    $0x1,%eax
  nopl   0x0(%rax)
L12:
  mov    %rcx,0x10(%rsp)
  test   %ebx,%ebx
  je     L421
  mov    %edx,%eax
  jmp    L421
  xor    %ebx,%ebx
L477:
  mov    $0x8,%ecx
  mov    $0xffffffb0,%edx
  mov    $0x50,%eax
  jmp    L12
  xor    %ebx,%ebx
L207:
  mov    $0x4,%ecx
  mov    $0xffffffd8,%edx
  mov    $0x28,%eax
  jmp    L12
  xor    %ebx,%ebx
L105:
  mov    $0x1,%ecx
  mov    $0xfffffff4,%edx
  mov    $0xc,%eax
  jmp    L12
  xor    %ebx,%ebx
L235:
  mov    $0x10,%ecx
  mov    $0xffffff5d,%edx
  mov    $0xa3,%eax
  jmp    L12
  xor    %ebx,%ebx
L560:
  mov    $0x1,%ecx
  mov    $0xfffffff2,%edx
  mov    $0xe,%eax
  jmp    L12
  xor    %ebx,%ebx
L543:
  mov    $0x8,%ecx
  mov    $0xffffffaf,%edx
  mov    $0x51,%eax
  jmp    L12
  xor    %ebx,%ebx
L195:
  mov    $0x4,%ecx
  mov    $0xffffffd7,%edx
  mov    $0x29,%eax
  jmp    L12
  xor    %ebx,%ebx
L330:
  mov    $0x4,%ecx
  mov    $0xffffffd6,%edx
  mov    $0x2a,%eax
  jmp    L12
  xor    %ebx,%ebx
L25:
  mov    $0x8,%ecx
  mov    $0xffffffae,%edx
  mov    $0x52,%eax
  jmp    L12
  xor    %ebx,%ebx
L20:
  mov    $0x8,%ecx
  mov    $0xffffffad,%edx
  mov    $0x53,%eax
  jmp    L12
  xor    %ebx,%ebx
L44:
  mov    $0x1,%ecx
  mov    $0xfffffff5,%edx
  mov    $0xb,%eax
  jmp    L12
  xor    %ebx,%ebx
L293:
  movzbl 0x1(%r15),%eax
  test   %al,%al
  je     L448
  cmp    $0x28,%al
  lea    0x10(%rsp),%rdx
  lea    D76(%rip),%rsi
  sete   %al
  movzbl %al,%eax
  lea    0x1(%r15,%rax,1),%rdi
  call   <sscanf@plt>
  cmp    $0x1,%eax
  je     L442
L448:
  mov    0x18(%rsp),%rcx
  mov    $0xfffffff0,%edx
  mov    $0x10,%eax
  jmp    L12
  movq   $0x2,0x10(%rsp)
  mov    $0x15,%eax
  jmp    L421
  mov    $0x1,%ebx
  jmp    L235
  mov    $0x1,%ebx
  jmp    L560
  mov    $0x1,%ebx
  jmp    L543
  mov    $0x1,%ebx
  jmp    L195
  mov    $0x1,%ebx
  jmp    L330
  mov    $0x1,%ebx
  jmp    L25
  mov    $0x1,%ebx
  jmp    L20
  mov    $0x1,%ebx
  jmp    L513
  mov    $0x1,%ebx
  jmp    L477
  mov    $0x1,%ebx
  jmp    L207
  mov    $0x1,%ebx
  jmp    L105
  mov    $0x1,%ebx
  jmp    L44
  mov    %rsi,%r15
  mov    $0x1,%ebx
  jmp    L293
  movq   $0x2,0x10(%rsp)
  mov    $0xffffffeb,%edx
  mov    %edx,%eax
  jmp    L421
  nopw   0x0(%rax,%rax,1)
L610:
  lea    D64(%rip),%rdi
  call   <ffpmsg@plt>
  mov    (%rsp),%rax
  movl   $0x105,(%rax)
  mov    $0x105,%eax
  jmp    L239
L442:
  test   %ebx,%ebx
  jne    L122
  mov    0x18(%rsp),%rax
  cmp    %rax,0x10(%rsp)
  jg     L448
  mov    $0x10,%eax
  jmp    L421
L122:
  mov    $0xfffffff0,%edx
  mov    %edx,%eax
  jmp    L421
L412:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: disassemble_data
arguments: data_label: D70
type: string
name: disassemble_data
arguments: data_label: D76
type: string
name: disassemble_data
arguments: data_label: D60
type: string
name: disassemble_data
arguments: data_label: D45
type: string
name: disassemble_data
arguments: data_label: D64
type: string

tool: D70: Error: binary table TFORM code is too long (ffbnfm).

tool: D76: %ld

tool: D60: Error: Bad repeat format in TFORM (ffbnfm).

tool: D45: Illegal binary table TFORMn datatype: '%s' 

tool: D64: Error: binary table TFORM code is blank (ffbnfm).

assistant: ```c
int ffbnfm(char *tform, int *dtcode, long *trepeat, long *twidth, int *status) {
  size_t ii, nchar;
  int datacode, variable, iread;
  long width, repeat;
  char *form, temp[71], message[81];
  if (*status > 0)
    return (*status);
  if (dtcode)
    *dtcode = 0;
  if (trepeat)
    *trepeat = 0;
  if (twidth)
    *twidth = 0;
  nchar = strlen(tform);
  for (ii = 0; ii < nchar; ii++) {
    if (tform[ii] != ' ')
      break;
  }
  if (ii == nchar) {
    ffpmsg("Error: binary table TFORM code is blank (ffbnfm).");
    return (*status = 261);
  }
  if (nchar - ii > 71 - 1) {
    ffpmsg("Error: binary table TFORM code is too long (ffbnfm).");
    return (*status = 261);
  }
  strcpy(temp, &tform[ii]);
  ffupch(temp);
  form = temp;
  ii = 0;
  while (isdigit((int)form[ii]))
    ii++;
  if (ii == 0)
    repeat = 1;
  else {
    if (sscanf(form, "%ld", &repeat) != 1) {
      ffpmsg("Error: Bad repeat format in TFORM (ffbnfm).");
      return (*status = 261);
    }
  }
  form = form + ii;
  if (form[0] == 'P' || form[0] == 'Q') {
    variable = 1;
    form++;
  } else
    variable = 0;
  if (form[0] == 'U') {
    datacode = 20;
    width = 2;
  } else if (form[0] == 'I') {
    datacode = 21;
    width = 2;
  } else if (form[0] == 'V') {
    datacode = 40;
    width = 4;
  } else if (form[0] == 'W') {
    datacode = 80;
    width = 8;
  } else if (form[0] == 'J') {
    datacode = 41;
    width = 4;
  } else if (form[0] == 'K') {
    datacode = 81;
    width = 8;
  } else if (form[0] == 'E') {
    datacode = 42;
    width = 4;
  } else if (form[0] == 'D') {
    datacode = 82;
    width = 8;
  } else if (form[0] == 'A') {
    datacode = 16;
    iread = 0;
    if (form[1] != 0) {
      if (form[1] == '(')
        form++;
      iread = sscanf(&form[1], "%ld", &width);
    }
    if (iread != 1 || (!variable && (width > repeat)))
      width = repeat;
  } else if (form[0] == 'L') {
    datacode = 14;
    width = 1;
  } else if (form[0] == 'X') {
    datacode = 1;
    width = 1;
  } else if (form[0] == 'B') {
    datacode = 11;
    width = 1;
  } else if (form[0] == 'S') {
    datacode = 12;
    width = 1;
  } else if (form[0] == 'C') {
    datacode = 83;
    width = 8;
  } else if (form[0] == 'M') {
    datacode = 163;
    width = 16;
  } else {
    snprintf(message, 81, "Illegal binary table TFORMn datatype: \'%s\' ", tform);
    ffpmsg(message);
    return (*status = 262);
  }
  if (variable)
    datacode = datacode * (-1);
  if (dtcode)
    *dtcode = datacode;
  if (trepeat)
    *trepeat = repeat;
  if (twidth)
    *twidth = width;
  return (*status);
}
```