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

```asm
<parseInfo>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  mov    %rsi,%r12
  push   %rbp
  movslq %edi,%rbp
  push   %rbx
  mov    %rdx,%rbx
  sub    $0x18,%rsp
  movzbl (%rsi),%eax
  mov    %r9,(%rsp)
  mov    0x50(%rsp),%r13
  cmp    $0x73,%al
  je     L52
  cmp    $0x64,%al
  je     L247
  cmp    $0x6c,%al
  je     L42
  cmp    $0x62,%al
  jne    L36
L42:
  movl   $0x3,(%rcx)
  movzbl 0x1(%r12),%eax
  cmp    $0x63,%al
  jne    L35
L21:
  movl   $0x1,(%r8)
  jmp    L127
L247:
  movl   $0x6,(%rcx)
L137:
  movzbl 0x1(%r12),%eax
  cmp    $0x63,%al
  je     L21
L35:
  cmp    $0x72,%al
  jne    L84
  movl   $0x0,(%r8)
L127:
  movl   $0x1,0x0(%r13)
  movzbl (%rbx),%eax
  cmp    $0x5b,%al
  jne    L138
  movzbl 0x1(%rbx),%eax
  add    $0x1,%rbx
L138:
  test   %ebp,%ebp
  jle    L103
  test   %al,%al
  je     L103
  mov    (%rsp),%r14
  xor    %r15d,%r15d
  lea    D0(%rip),%r12
  nopl   0x0(%rax)
L315:
  mov    %r14,%rdx
  mov    %r12,%rsi
  mov    %rbx,%rdi
  call   <sscanf@plt>
  test   %eax,%eax
  je     L64
  cmpb   $0x5d,(%rbx)
  je     L64
  mov    0x0(%r13),%eax
  imul   (%r14),%eax
  mov    %eax,0x0(%r13)
  movzbl (%rbx),%eax
  lea    -0x30(%rax),%edx
  cmp    $0x9,%dl
  ja     L38
  xchg   %ax,%ax
L276:
  movzbl 0x1(%rbx),%eax
  add    $0x1,%rbx
  lea    -0x30(%rax),%edx
  cmp    $0x9,%dl
  jbe    L276
L38:
  lea    -0x2d(%rax),%edx
  cmp    $0x1,%dl
  jbe    L276
  cmp    $0x78,%al
  je     L15
  add    $0x1,%r15d
  add    $0x4,%r14
  cmp    %r15d,%ebp
  jle    L64
  test   %al,%al
  jne    L315
L64:
  lea    -0x1(%rbp),%ecx
  cmp    %r15d,%ecx
  jle    L207
  mov    %ebp,%eax
  sub    %r15d,%eax
  lea    -0x1(%rax),%edi
  sub    $0x2,%eax
  cmp    $0x2,%eax
  jbe    L257
  mov    (%rsp),%rax
  mov    %edi,%esi
  movdqa D20(%rip),%xmm0
  shr    $0x2,%esi
  lea    -0x10(%rax,%rbp,4),%rdx
  lea    -0x1(%rsi),%r8d
  lea    -0x10(%rdx),%rax
  shl    $0x4,%r8
  mov    %rax,%rsi
  sub    %r8,%rsi
  jmp    L320
  nopw   0x0(%rax,%rax,1)
L259:
  sub    $0x10,%rax
L320:
  movups %xmm0,(%rdx)
  mov    %rax,%rdx
  cmp    %rsi,%rax
  jne    L259
  mov    %edi,%eax
  and    $0xfffffffc,%eax
  sub    %eax,%ecx
  cmp    %edi,%eax
  je     L271
L257:
  mov    (%rsp),%rdi
  movslq %ecx,%rax
  lea    0x0(,%rax,4),%rdx
  movl   $0x1,(%rdi,%rax,4)
  lea    -0x1(%rcx),%eax
  cmp    %eax,%r15d
  jge    L271
  sub    $0x2,%ecx
  movl   $0x1,-0x4(%rdi,%rdx,1)
  cmp    %ecx,%r15d
  jge    L271
  movl   $0x1,-0x8(%rdi,%rdx,1)
L271:
  mov    (%rsp),%rcx
  movslq %r15d,%rax
  movl   $0x1,(%rcx,%rax,4)
  add    $0x18,%rsp
  mov    %r15d,%eax
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
L15:
  add    $0x1,%r15d
  add    $0x4,%r14
  lea    0x1(%rbx),%rax
  cmpb   $0x0,0x1(%rbx)
  je     L64
  cmp    %r15d,%ebp
  jle    L64
  mov    %rax,%rbx
  jmp    L315
L52:
  movl   $0x7,(%rcx)
  jmp    L137
L84:
  lea    D37(%rip),%rdi
  call   <ERROR@plt>
  jmp    L127
L36:
  lea    D22(%rip),%rdi
  mov    %r8,0x8(%rsp)
  call   <ERROR@plt>
  mov    0x8(%rsp),%r8
  jmp    L137
L207:
  mov    %ecx,%r15d
  jmp    L271
L103:
  xor    %r15d,%r15d
  jmp    L64
```

tool_calls: name: retrieve_data
arguments: tag: D0
type_guessed: string
name: retrieve_data
arguments: tag: D20
type_guessed: byte[16]
name: retrieve_data
arguments: tag: D37
type_guessed: string
name: retrieve_data
arguments: tag: D22
type_guessed: string

tool: D0: %d

tool: {"D20": [0x01,0x00,0x00,0x00,0x01,0x00,0x00,0x00,0x01,0x00,0x00,0x00,0x01,0x00,0x00,0x00]}

tool: D37: Unsupported complex type

tool: D22: Unsupported type string

assistant: ```c
int parseInfo(int nd, char *typestr, char *szstr, int *type, int *complexp, int *sz, int *numel) {
  char *cp = szstr;
  int i, nch;
  if (typestr[0] == 's')
    *type = 7;
  else if (typestr[0] == 'd')
    *type = 6;
  else if (typestr[0] == 'l' || typestr[0] == 'b')
    *type = 3;
  else
    ERROR("Unsupported type string");
  if (typestr[1] == 'c')
    *complexp = 1;
  else if (typestr[1] == 'r')
    *complexp = 0;
  else
    ERROR("Unsupported complex type");
  *numel = 1;
  if (*cp == '[')
    cp++;
  for (i = 0; *cp != 0 && i < nd; i++) {
    nch = sscanf(cp, "%d", sz + i);
    if (nch == 0 || *cp == ']')
      break;
    *numel *= sz[i];
    for (; (*cp >= '0' && *cp <= '9') || *cp == '.' || *cp == '-'; cp++)
      ;
    if (*cp == 'x')
      cp++;
  }
  if (*cp == ']')
    cp++;
  for (nd--; i < nd; nd--) {
    sz[nd] = 1;
  }
  sz[nd] = 1;
  return nd;
}
```