user: 请显示与下面列出的汇编代码相匹配的C语言实现:

```asm
<print_summary>:
  endbr64
  push   %r14
  xor    %eax,%eax
  mov    %rsi,%r14
  push   %r13
  mov    %rcx,%r13
  push   %r12
  mov    %rdx,%r12
  mov    %rsi,%rdx
  lea    D94(%rip),%rsi
  push   %rbp
  mov    %rdi,%rbp
  push   %rbx
  mov    %r8,%rbx
  call   <fprintf@plt>
  test   %r14,%r14
  je     L58
  mov    %r14,%rax
  pxor   %xmm7,%xmm7
  pxor   %xmm0,%xmm0
  movsd  D84(%rip),%xmm4
  sub    %rbx,%rax
  cvtsi2sd %r12,%xmm0
  movq   D26(%rip),%xmm3
  movsd  D53(%rip),%xmm6
  cvtsi2sd %rax,%xmm7
  movapd %xmm3,%xmm2
  divsd  %xmm7,%xmm0
  mulsd  %xmm4,%xmm0
  movapd %xmm0,%xmm1
  andpd  %xmm3,%xmm1
  ucomisd %xmm1,%xmm6
  ja     L23
L56:
  pxor   %xmm1,%xmm1
  movsd  D90(%rip),%xmm5
  cvtsi2sd %r13,%xmm1
  divsd  %xmm5,%xmm0
  divsd  %xmm7,%xmm1
  movapd %xmm3,%xmm7
  mulsd  %xmm4,%xmm1
  movapd %xmm1,%xmm2
  andpd  %xmm3,%xmm2
  ucomisd %xmm2,%xmm6
  ja     L64
L50:
  divsd  %xmm5,%xmm1
  pxor   %xmm2,%xmm2
  pxor   %xmm7,%xmm7
  cvtsi2sd %rbx,%xmm2
  cvtsi2sd %r14,%xmm7
  divsd  %xmm7,%xmm2
  mulsd  %xmm4,%xmm2
  movapd %xmm2,%xmm4
  andpd  %xmm3,%xmm4
  ucomisd %xmm4,%xmm6
  ja     L0
L66:
  divsd  %xmm5,%xmm2
L17:
  mov    %rbx,%r8
  mov    %r13,%rcx
  mov    %r12,%rdx
  mov    %rbp,%rdi
  lea    D27(%rip),%rsi
  mov    $0x3,%eax
  call   <fprintf@plt>
  pop    %rbx
  xor    %eax,%eax
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  ret
  xchg   %ax,%ax
L58:
  pxor   %xmm2,%xmm2
  movsd  D90(%rip),%xmm0
  movapd %xmm2,%xmm1
  jmp    L17
  nopw   0x0(%rax,%rax,1)
L0:
  cvttsd2si %xmm2,%rax
  pxor   %xmm4,%xmm4
  movapd %xmm2,%xmm6
  movsd  D78(%rip),%xmm7
  andnpd %xmm2,%xmm3
  cvtsi2sd %rax,%xmm4
  cmpnlesd %xmm4,%xmm6
  andpd  %xmm7,%xmm6
  addsd  %xmm6,%xmm4
  orpd   %xmm3,%xmm4
  movapd %xmm4,%xmm2
  jmp    L66
  nopl   (%rax)
L64:
  cvttsd2si %xmm1,%rax
  pxor   %xmm2,%xmm2
  movapd %xmm1,%xmm8
  movsd  D78(%rip),%xmm9
  andnpd %xmm1,%xmm7
  cvtsi2sd %rax,%xmm2
  cmpnlesd %xmm2,%xmm8
  andpd  %xmm9,%xmm8
  addsd  %xmm8,%xmm2
  movapd %xmm2,%xmm1
  orpd   %xmm7,%xmm1
  jmp    L50
  nopl   (%rax)
L23:
  cvttsd2si %xmm0,%rax
  pxor   %xmm1,%xmm1
  andnpd %xmm0,%xmm2
  movsd  D78(%rip),%xmm8
  cvtsi2sd %rax,%xmm1
  movapd %xmm1,%xmm5
  cmpnlesd %xmm0,%xmm5
  andpd  %xmm8,%xmm5
  subsd  %xmm5,%xmm1
  movapd %xmm1,%xmm0
  orpd   %xmm2,%xmm0
  jmp    L56
```

tool_calls: name: unpack_data
arguments: data_tag: D94
data_type: string
name: unpack_data
arguments: data_tag: D84
data_type: f64
name: unpack_data
arguments: data_tag: D26
data_type: byte[8]
name: unpack_data
arguments: data_tag: D53
data_type: f32[2]
name: unpack_data
arguments: data_tag: D90
data_type: f64
name: unpack_data
arguments: data_tag: D27
data_type: string
name: unpack_data
arguments: data_tag: D78
data_type: f32[2]

tool: D94: Total:  %ld


tool: D84: 10000

tool: {"D26": [0xff,0xff,0xff,0xff,0xff,0xff,0xff,0x7f]}

tool: {"D53": [0.0,176.0]}

tool: D90: 100

tool: D27: Passed: %ld (%0.2lf%%)
Failed: %ld (%0.2lf%%)
Skipped: %ld (%0.2lf%%)



tool: {"D78": [0.0,1.875]}

assistant: ```c
int print_summary(FILE *f, long total, long pass, long fail, long skip) {
  double dpass = 100.0, dfail = 0.0, dskip = 0.0;
  fprintf(f, "Total:  %ld\n", total);
  if (total) {
    dpass = ((double)pass / (double)(total - skip)) * 10000.0;
    dpass = floor(dpass) / 100.0;
    dfail = ((double)fail / (double)(total - skip)) * 10000.0;
    dfail = ceil(dfail) / 100.0;
    dskip = ((double)skip / (double)total) * 10000.0;
    dskip = ceil(dskip) / 100.0;
  }
  fprintf(f, "Passed: %ld (%0.2lf%%)\nFailed: %ld (%0.2lf%%)\nSkipped: %ld (%0.2lf%%)\n\n", pass, dpass, fail, dfail, skip, dskip);
  return 0;
}
```