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

```asm
<GetNonZeroDigits>:
  endbr64
  push   %r13
  mov    %rsi,%r13
  push   %r12
  push   %rbp
  push   %rbx
  mov    %rdi,%rbx
  sub    $0x8,%rsp
  call   <strlen@plt>
  test   %eax,%eax
  jle    L153
  mov    %eax,%ebp
  lea    -0x1(%rax),%eax
  cmp    $0xe,%eax
  jbe    L229
  mov    %ebp,%edx
  pxor   %xmm1,%xmm1
  pxor   %xmm5,%xmm5
  mov    %rbx,%rax
  shr    $0x4,%edx
  movdqa D1(%rip),%xmm7
  movdqa D19(%rip),%xmm6
  pxor   %xmm4,%xmm4
  sub    $0x1,%edx
  shl    $0x4,%rdx
  lea    0x10(%rbx,%rdx,1),%rdx
  nop
L60:
  movdqu (%rax),%xmm0
  movdqa %xmm5,%xmm3
  add    $0x10,%rax
  pcmpeqb %xmm7,%xmm0
  pandn  %xmm6,%xmm0
  pcmpgtb %xmm0,%xmm3
  movdqa %xmm0,%xmm2
  punpcklbw %xmm3,%xmm2
  punpckhbw %xmm3,%xmm0
  movdqa %xmm4,%xmm3
  pcmpgtw %xmm2,%xmm3
  movdqa %xmm2,%xmm8
  punpcklwd %xmm3,%xmm8
  punpckhwd %xmm3,%xmm2
  movdqa %xmm0,%xmm3
  paddd  %xmm8,%xmm1
  paddd  %xmm2,%xmm1
  movdqa %xmm4,%xmm2
  pcmpgtw %xmm0,%xmm2
  punpcklwd %xmm2,%xmm3
  punpckhwd %xmm2,%xmm0
  paddd  %xmm3,%xmm1
  paddd  %xmm0,%xmm1
  cmp    %rdx,%rax
  jne    L60
  movdqa %xmm1,%xmm0
  mov    %ebp,%eax
  psrldq $0x8,%xmm0
  and    $0xfffffff0,%eax
  paddd  %xmm0,%xmm1
  movdqa %xmm1,%xmm0
  psrldq $0x4,%xmm0
  paddd  %xmm0,%xmm1
  movd   %xmm1,%r12d
  test   $0xf,%bpl
  je     L165
L102:
  movslq %eax,%rdx
  cmpb   $0x30,(%rbx,%rdx,1)
  setne  %dl
  movzbl %dl,%edx
  add    %edx,%r12d
  lea    0x1(%rax),%edx
  cmp    %ebp,%edx
  jge    L165
  movslq %edx,%rdx
  cmpb   $0x30,(%rbx,%rdx,1)
  setne  %dl
  movzbl %dl,%edx
  add    %edx,%r12d
  lea    0x2(%rax),%edx
  cmp    %edx,%ebp
  jle    L165
  movslq %edx,%rdx
  cmpb   $0x30,(%rbx,%rdx,1)
  setne  %dl
  movzbl %dl,%edx
  add    %edx,%r12d
  lea    0x3(%rax),%edx
  cmp    %edx,%ebp
  jle    L165
  movslq %edx,%rdx
  cmpb   $0x30,(%rbx,%rdx,1)
  setne  %dl
  movzbl %dl,%edx
  add    %edx,%r12d
  lea    0x4(%rax),%edx
  cmp    %edx,%ebp
  jle    L165
  movslq %edx,%rdx
  cmpb   $0x30,(%rbx,%rdx,1)
  setne  %dl
  movzbl %dl,%edx
  add    %edx,%r12d
  lea    0x5(%rax),%edx
  cmp    %edx,%ebp
  jle    L165
  movslq %edx,%rdx
  cmpb   $0x30,(%rbx,%rdx,1)
  setne  %dl
  movzbl %dl,%edx
  add    %edx,%r12d
  lea    0x6(%rax),%edx
  cmp    %edx,%ebp
  jle    L165
  movslq %edx,%rdx
  cmpb   $0x30,(%rbx,%rdx,1)
  setne  %dl
  movzbl %dl,%edx
  add    %edx,%r12d
  lea    0x7(%rax),%edx
  cmp    %edx,%ebp
  jle    L165
  movslq %edx,%rdx
  cmpb   $0x30,(%rbx,%rdx,1)
  setne  %dl
  movzbl %dl,%edx
  add    %edx,%r12d
  lea    0x8(%rax),%edx
  cmp    %edx,%ebp
  jle    L165
  movslq %edx,%rdx
  cmpb   $0x30,(%rbx,%rdx,1)
  setne  %dl
  movzbl %dl,%edx
  add    %edx,%r12d
  lea    0x9(%rax),%edx
  cmp    %edx,%ebp
  jle    L165
  movslq %edx,%rdx
  cmpb   $0x30,(%rbx,%rdx,1)
  setne  %dl
  movzbl %dl,%edx
  add    %edx,%r12d
  lea    0xa(%rax),%edx
  cmp    %edx,%ebp
  jle    L165
  movslq %edx,%rdx
  cmpb   $0x30,(%rbx,%rdx,1)
  setne  %dl
  movzbl %dl,%edx
  add    %edx,%r12d
  lea    0xb(%rax),%edx
  cmp    %edx,%ebp
  jle    L165
  movslq %edx,%rdx
  cmpb   $0x30,(%rbx,%rdx,1)
  setne  %dl
  movzbl %dl,%edx
  add    %edx,%r12d
  lea    0xc(%rax),%edx
  cmp    %edx,%ebp
  jle    L165
  movslq %edx,%rdx
  cmpb   $0x30,(%rbx,%rdx,1)
  setne  %dl
  movzbl %dl,%edx
  add    %edx,%r12d
  lea    0xd(%rax),%edx
  cmp    %edx,%ebp
  jle    L165
  movslq %edx,%rdx
  cmpb   $0x30,(%rbx,%rdx,1)
  setne  %dl
  add    $0xe,%eax
  movzbl %dl,%edx
  add    %edx,%r12d
  cmp    %eax,%ebp
  jle    L165
  cltq
  cmpb   $0x30,(%rbx,%rax,1)
  setne  %al
  movzbl %al,%eax
  add    %eax,%r12d
  nopw   0x0(%rax,%rax,1)
L165:
  mov    %r12d,%esi
  mov    $0x4,%edi
  call   <my_calloc@plt>
  lea    0x1(%rbp),%r8d
  mov    $0x1,%edx
  xor    %esi,%esi
  mov    %rax,0x0(%r13)
  jmp    L205
  xchg   %ax,%ax
L99:
  cmp    $0x4e,%cl
  jne    L75
  movslq %esi,%rcx
  neg    %edi
  add    $0x1,%esi
  mov    %edi,(%rax,%rcx,4)
L75:
  add    $0x1,%rdx
  cmp    %rdx,%r8
  je     L129
L205:
  movzbl -0x1(%rbx,%rdx,1),%ecx
  mov    %edx,%edi
  cmp    $0x50,%cl
  jne    L99
  movslq %esi,%rcx
  add    $0x1,%esi
  mov    %edx,(%rax,%rcx,4)
  add    $0x1,%rdx
  cmp    %rdx,%r8
  jne    L205
L129:
  add    $0x8,%rsp
  mov    %r12d,%eax
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  ret
  nopl   (%rax)
L153:
  xor    %esi,%esi
  mov    $0x4,%edi
  xor    %r12d,%r12d
  call   <my_calloc@plt>
  mov    %rax,0x0(%r13)
  add    $0x8,%rsp
  mov    %r12d,%eax
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  ret
L229:
  xor    %r12d,%r12d
  xor    %eax,%eax
  jmp    L102
```

tool_calls: name: disassemble_data
arguments: data_label: D1
type: byte[16]
name: disassemble_data
arguments: data_label: D19
type: byte[16]

tool: {"D1": [0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30,0x30]}

tool: {"D19": [0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01,0x01]}

assistant: ```c
int GetNonZeroDigits(char *booth, int **nums) {
  int i, length, nonzero, j;
  length = strlen(booth);
  nonzero = 0;
  for (i = 0; i < length; i++)
    if (booth[i] != '0')
      nonzero++;
  *nums = my_calloc(sizeof(int), nonzero);
  j = 0;
  for (i = 0; i < length; i++) {
    if (booth[i] == 'P')
      (*nums)[j++] = i + 1;
    else if (booth[i] == 'N')
      (*nums)[j++] = -(i + 1);
  }
  return nonzero;
}
```