user: Translate the below assembly code into C programming language:

```asm
<gcvt>:
  endbr64
  push   %r12
  mov    %rsi,%r8
  push   %rbp
  push   %rbx
  cmp    $0xffffffff,%edi
  je     L34
  mov    %rdi,%rdx
  mov    $0x14,%edi
  pxor   %xmm4,%xmm4
  mov    %rsi,%rbx
  cmp    %rdi,%rdx
  cmovbe %rdx,%rdi
  xor    %r9d,%r9d
  comisd %xmm0,%xmm4
  mov    %edi,%eax
  ja     L172
  test   %rdx,%rdx
  je     L252
L124:
  movsd  D95(%rip),%xmm2
  movsd  D90(%rip),%xmm1
  nopw   0x0(%rax,%rax,1)
L92:
  mulsd  %xmm1,%xmm2
  sub    $0x1,%eax
  jne    L92
  movsd  D2(%rip),%xmm7
  movsd  D51(%rip),%xmm6
  movapd %xmm7,%xmm3
  divsd  %xmm2,%xmm3
  addsd  %xmm0,%xmm3
  comisd %xmm6,%xmm3
  jae    L112
  cvttsd2si %xmm3,%rcx
  test   %rcx,%rcx
  js     L309
L168:
  pxor   %xmm5,%xmm5
  cvtsi2sd %rcx,%xmm5
L262:
  ucomisd %xmm4,%xmm0
  movapd %xmm0,%xmm3
  subsd  %xmm5,%xmm3
  jp     L416
  je     L39
L416:
  comisd %xmm1,%xmm0
  mov    $0x1,%r10d
  mov    $0x1,%r12d
  jb     L14
  nopl   0x0(%rax)
L396:
  divsd  %xmm1,%xmm0
  add    $0x1,%r10d
  comisd %xmm1,%xmm0
  jae    L396
  movslq %r10d,%r12
L14:
  cmp    $0x9,%rcx
  jbe    L115
  mov    %rcx,%rdx
  mov    $0x1,%r11d
  movabs $0xcccccccccccccccd,%rbp
  cs nopw 0x0(%rax,%rax,1)
L258:
  mov    %rdx,%rax
  mov    %rdx,%rsi
  add    $0x1,%r11d
  mul    %rbp
  shr    $0x3,%rdx
  cmp    $0x63,%rsi
  ja     L258
  cmp    %r10d,%r11d
  jle    L115
  lea    0x2(%rdi,%r12,1),%r11
  add    %rbx,%r11
L111:
  movb   $0x0,(%r11)
  test   %rdi,%rdi
  je     L195
  mulsd  %xmm2,%xmm3
  lea    -0x1(%r11),%rbp
  addsd  %xmm7,%xmm3
  comisd %xmm6,%xmm3
  jae    L129
  cvttsd2si %xmm3,%rsi
L169:
  movabs $0xcccccccccccccccd,%rbx
  not    %rdi
  mov    %rbp,%r10
  add    %rdi,%r11
  nopl   0x0(%rax,%rax,1)
L75:
  mov    %rsi,%rax
  sub    $0x1,%r10
  mul    %rbx
  shr    $0x3,%rdx
  lea    (%rdx,%rdx,4),%rax
  add    %rax,%rax
  sub    %rax,%rsi
  add    $0x30,%esi
  mov    %sil,0x1(%r10)
  mov    %rdx,%rsi
  cmp    %r11,%r10
  jne    L75
  movb   $0x2e,(%r10)
  add    %rbp,%rdi
  jmp    L289
  nopl   0x0(%rax,%rax,1)
L112:
  subsd  %xmm6,%xmm3
  cvttsd2si %xmm3,%rcx
  btc    $0x3f,%rcx
  test   %rcx,%rcx
  jns    L168
L309:
  mov    %rcx,%rax
  mov    %rcx,%rdx
  pxor   %xmm5,%xmm5
  shr    %rax
  and    $0x1,%edx
  or     %rdx,%rax
  cvtsi2sd %rax,%xmm5
  addsd  %xmm5,%xmm5
  jmp    L262
  nopl   0x0(%rax,%rax,1)
L172:
  xorpd  D9(%rip),%xmm0
  lea    0x1(%rsi),%rbx
  mov    $0x1,%r9d
  test   %rdx,%rdx
  jne    L124
L252:
  ucomisd %xmm4,%xmm0
  jp     L213
  jne    L213
  movb   $0x30,(%rbx)
  lea    0x1(%rbx),%rdx
  jmp    L235
  nopw   0x0(%rax,%rax,1)
L34:
  pxor   %xmm4,%xmm4
  comisd %xmm0,%xmm4
  ja     L220
  mov    %r8,%rbx
  xor    %r9d,%r9d
  mov    $0x5,%edi
  mov    $0x5,%eax
  jmp    L124
  nopl   0x0(%rax,%rax,1)
L195:
  movb   $0x0,-0x1(%r11)
  lea    -0x2(%r11),%rdi
L289:
  movabs $0xcccccccccccccccd,%r10
  nopl   0x0(%rax,%rax,1)
L296:
  mov    %rcx,%rax
  sub    $0x1,%rdi
  mul    %r10
  mov    %rcx,%rax
  shr    $0x3,%rdx
  lea    (%rdx,%rdx,4),%rsi
  add    %rsi,%rsi
  sub    %rsi,%rax
  add    $0x30,%eax
  mov    %al,0x1(%rdi)
  mov    %rcx,%rax
  mov    %rdx,%rcx
  cmp    $0x9,%rax
  ja     L296
  test   %r9d,%r9d
  je     L191
  movb   $0x2d,(%rdi)
L191:
  pop    %rbx
  mov    %r8,%rax
  pop    %rbp
  pop    %r12
  ret
  nopl   (%rax)
L115:
  lea    0x1(%rdi,%r12,1),%r11
  add    %rbx,%r11
  jmp    L111
  nopl   (%rax)
L39:
  test   %rdi,%rdi
  mov    $0x1,%eax
  mov    $0x2e30,%r9d
  cmovne %rdi,%rax
  mov    %r9w,(%rbx)
  lea    0x2(%rbx),%rdx
  movabs $0x3030303030303030,%rdi
  cmp    $0x8,%eax
  jae    L31
  test   $0x4,%al
  jne    L398
  test   %eax,%eax
  je     L16
  movb   $0x30,(%rdx)
  test   $0x2,%al
  jne    L72
L16:
  add    %rax,%rdx
L235:
  movb   $0x0,(%rdx)
  mov    %r8,%rax
  pop    %rbx
  pop    %rbp
  pop    %r12
  ret
  xchg   %ax,%ax
L129:
  subsd  %xmm6,%xmm3
  cvttsd2si %xmm3,%rsi
  btc    $0x3f,%rsi
  jmp    L169
  nopl   0x0(%rax,%rax,1)
L31:
  mov    %rdi,0x2(%rbx)
  mov    %eax,%ecx
  add    $0xa,%rbx
  mov    %rdi,-0x8(%rdx,%rcx,1)
  and    $0xfffffffffffffff8,%rbx
  mov    %rdx,%rcx
  sub    %rbx,%rcx
  add    %eax,%ecx
  and    $0xfffffff8,%ecx
  cmp    $0x8,%ecx
  jb     L16
  and    $0xfffffff8,%ecx
  mov    %ecx,%esi
  xor    %ecx,%ecx
L54:
  mov    %ecx,%r9d
  add    $0x8,%ecx
  mov    %rdi,(%rbx,%r9,1)
  cmp    %esi,%ecx
  jb     L54
  jmp    L16
  nopw   0x0(%rax,%rax,1)
L220:
  lea    0x1(%rsi),%rbx
  mov    $0x1,%r9d
  mov    $0x5,%edi
  mov    $0x5,%eax
  xorpd  D9(%rip),%xmm0
  jmp    L124
L398:
  mov    %eax,%ecx
  movl   $0x30303030,(%rdx)
  movl   $0x30303030,-0x4(%rdx,%rcx,1)
  jmp    L16
L72:
  mov    %eax,%ecx
  mov    $0x3030,%esi
  mov    %si,-0x2(%rdx,%rcx,1)
  jmp    L16
L213:
  movsd  D2(%rip),%xmm7
  movapd %xmm0,%xmm1
  movsd  D51(%rip),%xmm6
  addsd  %xmm7,%xmm1
  comisd %xmm6,%xmm1
  jae    L297
  cvttsd2si %xmm1,%rcx
L287:
  test   %rcx,%rcx
  js     L420
  pxor   %xmm1,%xmm1
  cvtsi2sd %rcx,%xmm1
L49:
  movapd %xmm0,%xmm3
  movsd  D95(%rip),%xmm2
  xor    %edi,%edi
  subsd  %xmm1,%xmm3
  movsd  D90(%rip),%xmm1
  jmp    L416
L297:
  subsd  %xmm6,%xmm1
  cvttsd2si %xmm1,%rcx
  btc    $0x3f,%rcx
  jmp    L287
L420:
  mov    %rcx,%rax
  mov    %rcx,%rdx
  pxor   %xmm1,%xmm1
  shr    %rax
  and    $0x1,%edx
  or     %rdx,%rax
  cvtsi2sd %rax,%xmm1
  addsd  %xmm1,%xmm1
  jmp    L49
```

tool_calls: name: parse_data
arguments: tag: D95
type_guessed: f32[2]
name: parse_data
arguments: tag: D90
type_guessed: f64
name: parse_data
arguments: tag: D2
type_guessed: f64
name: parse_data
arguments: tag: D51
type_guessed: f32[2]
name: parse_data
arguments: tag: D9
type_guessed: f32[4]

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

tool: D90: 10

tool: D2: 0.5

tool: {"D51": [0.0,448.0]}

tool: {"D9": [0.0,-0.0,0.0,0.0]}

assistant: ```c
char *gcvt(double f, size_t ndigit, char *buf) {
  int i;
  int l1, l2;
  unsigned long long z, k, k2;
  int exp = 0;
  char *c = buf;
  double f2, t, scal;
  int sign = 0;
  if ((int)ndigit == -1)
    ndigit = 5;
  if (ndigit > 20)
    ndigit = 20;
  if (f < 0.0) {
    sign = 1;
    f = -f;
    buf++;
  }
  scal = 1;
  for (i = ndigit; i > 0; i--)
    scal *= 10;
  k = f + 0.5 / scal;
  f2 = f - k;
  if (!f) {
    (*(buf++) = ('0'));
    if (ndigit > 0)
      (*(buf++) = ('.'));
    for (i = 0; i < ndigit; i++)
      (*(buf++) = ('0'));
    (*(buf++) = (0));
    return c;
  }
  i = 1;
  while (f >= 10.0) {
    f /= 10.0;
    i++;
  }
  l1 = i;
  k2 = k;
  l2 = 1;
  do {
    if (k2 >= 10) {
      l2++;
    }
    k2 /= 10;
  } while (k2);
  if (l2 > l1) {
    buf += i + ndigit + 2;
  } else {
    buf += i + ndigit + 1;
  }
  (*(buf--) = (0));
  if (ndigit > 0) {
    t = f2 * scal;
    z = t + 0.5;
    for (i = 0; i < ndigit; i++) {
      (*(buf--) = ('0' + (z % 10)));
      z /= 10;
    }
    (*(buf--) = ('.'));
  } else
    (*(buf--) = (0));
  l2 = 1;
  do {
    (*(buf--) = ('0' + (k % 10)));
    if (k >= 10) {
      l2++;
    }
    k /= 10;
  } while (k);
  if (sign)
    (*(buf--) = ('-'));
  return c;
}
```