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

```asm
<get_metrics>:
  endbr64
  push   %r13
  mov    %rsi,%r13
  xor    %esi,%esi
  push   %r12
  mov    %rdx,%r12
  mov    $0x80,%edx
  push   %rbp
  mov    %rcx,%rbp
  push   %rbx
  mov    %rdi,%rbx
  sub    $0x98,%rsp
  mov    %fs:0x28,%rax
  mov    %rax,0x88(%rsp)
  xor    %eax,%eax
  mov    %rsp,%rdi
  call   <memset@plt>
  movsbl (%rbx),%eax
  test   %al,%al
  je     L29
  lea    0x1(%rbx),%rdx
  nopw   0x0(%rax,%rax,1)
L14:
  sub    $0x41,%eax
  add    $0x1,%rdx
  cltq
  addl   $0x1,(%rsp,%rax,4)
  movsbl -0x1(%rdx),%eax
  test   %al,%al
  jne    L14
L29:
  movdqa (%rsp),%xmm3
  pxor   %xmm4,%xmm4
  movdqa D4(%rip),%xmm2
  movdqa %xmm3,%xmm0
  movdqa %xmm3,%xmm1
  movdqa %xmm3,%xmm6
  psrlq  $0x20,%xmm0
  pmuludq %xmm3,%xmm1
  pmuludq %xmm0,%xmm0
  pcmpgtd %xmm4,%xmm6
  pand   %xmm6,%xmm3
  pand   %xmm6,%xmm2
  pshufd $0x8,%xmm1,%xmm1
  pshufd $0x8,%xmm0,%xmm0
  punpckldq %xmm0,%xmm1
  movdqa 0x10(%rsp),%xmm0
  pand   %xmm6,%xmm1
  movdqa %xmm0,%xmm5
  movdqa %xmm0,%xmm7
  pcmpgtd %xmm4,%xmm5
  pand   %xmm5,%xmm7
  psubd  %xmm5,%xmm2
  paddd  %xmm3,%xmm7
  movdqa %xmm0,%xmm3
  pmuludq %xmm0,%xmm3
  psrlq  $0x20,%xmm0
  pmuludq %xmm0,%xmm0
  pshufd $0x8,%xmm3,%xmm3
  pshufd $0x8,%xmm0,%xmm0
  punpckldq %xmm0,%xmm3
  movdqa 0x20(%rsp),%xmm0
  pand   %xmm3,%xmm5
  paddd  %xmm5,%xmm1
  movdqa %xmm0,%xmm5
  movdqa %xmm0,%xmm3
  pmuludq %xmm0,%xmm5
  pcmpgtd %xmm4,%xmm3
  movdqa %xmm0,%xmm6
  psrlq  $0x20,%xmm0
  pmuludq %xmm0,%xmm0
  psubd  %xmm3,%xmm2
  pand   %xmm3,%xmm6
  paddd  %xmm7,%xmm6
  pshufd $0x8,%xmm5,%xmm5
  pshufd $0x8,%xmm0,%xmm0
  punpckldq %xmm0,%xmm5
  movdqa 0x30(%rsp),%xmm0
  pand   %xmm5,%xmm3
  movdqa %xmm0,%xmm5
  paddd  %xmm3,%xmm1
  movdqa %xmm0,%xmm7
  pmuludq %xmm0,%xmm5
  movdqa %xmm0,%xmm3
  psrlq  $0x20,%xmm0
  pcmpgtd %xmm4,%xmm3
  pmuludq %xmm0,%xmm0
  psubd  %xmm3,%xmm2
  pand   %xmm3,%xmm7
  pshufd $0x8,%xmm5,%xmm5
  paddd  %xmm6,%xmm7
  pshufd $0x8,%xmm0,%xmm0
  punpckldq %xmm0,%xmm5
  movdqa 0x40(%rsp),%xmm0
  pand   %xmm5,%xmm3
  movdqa %xmm0,%xmm5
  paddd  %xmm3,%xmm1
  movdqa %xmm0,%xmm6
  pmuludq %xmm0,%xmm5
  movdqa %xmm0,%xmm3
  psrlq  $0x20,%xmm0
  pcmpgtd %xmm4,%xmm3
  pmuludq %xmm0,%xmm0
  psubd  %xmm3,%xmm2
  pand   %xmm3,%xmm6
  pshufd $0x8,%xmm5,%xmm5
  paddd  %xmm7,%xmm6
  pshufd $0x8,%xmm0,%xmm0
  punpckldq %xmm0,%xmm5
  movdqa 0x50(%rsp),%xmm0
  pand   %xmm5,%xmm3
  movdqa %xmm0,%xmm5
  paddd  %xmm3,%xmm1
  movdqa %xmm0,%xmm7
  pmuludq %xmm0,%xmm5
  movdqa %xmm0,%xmm3
  psrlq  $0x20,%xmm0
  pcmpgtd %xmm4,%xmm3
  pmuludq %xmm0,%xmm0
  psubd  %xmm3,%xmm2
  pand   %xmm3,%xmm7
  pshufd $0x8,%xmm5,%xmm5
  paddd  %xmm6,%xmm7
  pshufd $0x8,%xmm0,%xmm0
  punpckldq %xmm0,%xmm5
  movdqa 0x60(%rsp),%xmm0
  pand   %xmm5,%xmm3
  movdqa %xmm0,%xmm5
  paddd  %xmm3,%xmm1
  movdqa %xmm0,%xmm6
  pmuludq %xmm0,%xmm5
  movdqa %xmm0,%xmm3
  psrlq  $0x20,%xmm0
  pcmpgtd %xmm4,%xmm3
  pmuludq %xmm0,%xmm0
  psubd  %xmm3,%xmm2
  pand   %xmm3,%xmm6
  pshufd $0x8,%xmm5,%xmm5
  paddd  %xmm7,%xmm6
  pshufd $0x8,%xmm0,%xmm0
  punpckldq %xmm0,%xmm5
  pand   %xmm5,%xmm3
  paddd  %xmm3,%xmm1
  movdqa 0x70(%rsp),%xmm3
  movdqa %xmm3,%xmm0
  movdqa %xmm3,%xmm5
  pcmpgtd %xmm4,%xmm0
  pmuludq %xmm3,%xmm5
  movdqa %xmm3,%xmm4
  psrlq  $0x20,%xmm3
  pmuludq %xmm3,%xmm3
  psubd  %xmm0,%xmm2
  pand   %xmm0,%xmm4
  paddd  %xmm6,%xmm4
  pshufd $0x8,%xmm5,%xmm5
  pshufd $0x8,%xmm3,%xmm3
  punpckldq %xmm3,%xmm5
  movdqa %xmm2,%xmm3
  pand   %xmm5,%xmm0
  psrldq $0x8,%xmm3
  paddd  %xmm1,%xmm0
  paddd  %xmm3,%xmm2
  movdqa %xmm0,%xmm1
  movdqa %xmm2,%xmm3
  psrldq $0x8,%xmm1
  psrldq $0x4,%xmm3
  paddd  %xmm1,%xmm0
  movdqa %xmm4,%xmm1
  paddd  %xmm3,%xmm2
  psrldq $0x8,%xmm1
  movd   %xmm2,0x0(%r13)
  paddd  %xmm4,%xmm1
  movdqa %xmm1,%xmm2
  psrldq $0x4,%xmm2
  paddd  %xmm2,%xmm1
  movd   %xmm1,(%r12)
  movdqa %xmm0,%xmm1
  psrldq $0x4,%xmm1
  paddd  %xmm1,%xmm0
  movd   %xmm0,0x0(%rbp)
  mov    0x88(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L6
  add    $0x98,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  ret
L6:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: retrieve_data
arguments: data_tag: D4
type_guessed: byte[16]

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

assistant: ```c
void get_metrics(char buf[], int *m0, int *m1, int *m2) {
  char c;
  int cnt[32];
  int i, t0, t1, t2;
  memset(cnt, 0, sizeof(cnt));
  i = t0 = t1 = t2 = 0;
  while ((c = buf[i++]) != '\0')
    ++cnt[c - 'A'];
  for (i = 0; i < 32; i++)
    if (cnt[i] > 0) {
      ++t0;
      t1 += cnt[i];
      t2 += cnt[i] * cnt[i];
    }
  *m0 = t0;
  *m1 = t1;
  *m2 = t2;
}
```