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

```asm
<acvt>:
  endbr64
  push   %r15
  mov    %rdx,%r15
  push   %r14
  mov    %esi,%r14d
  push   %r13
  mov    %ecx,%r13d
  push   %r12
  lea    0x1(%rdi),%r12
  push   %rbp
  lea    D12(%rip),%rbp
  push   %rbx
  sub    $0x28,%rsp
  mov    %fs:0x28,%rax
  mov    %rax,0x18(%rsp)
  xor    %eax,%eax
  fldt   0x60(%rsp)
  cmp    $0x41,%ecx
  lea    D17(%rip),%rax
  cmove  %rax,%rbp
  movb   $0x30,(%rdi)
  fldz
  fcomip %st(1),%st
  jbe    L89
  fchs
L89:
  fldz
  fxch   %st(1)
  fucomi %st(1),%st
  fstp   %st(1)
  jp     L143
  jne    L143
L106:
  fnstcw 0xe(%rsp)
  mov    %r12,%rsi
  movzwl 0xe(%rsp),%eax
  or     $0xc,%ah
  mov    %ax,0xc(%rsp)
  fld    %st(0)
  fldcw  0xc(%rsp)
  fistpll (%rsp)
  fldcw  0xe(%rsp)
  mov    (%rsp),%rdi
  fstpt  0x60(%rsp)
  call   <ltoa@plt>
  fildll (%rsp)
  movslq %eax,%rbx
  mov    %eax,(%r15)
  fldt   0x60(%rsp)
  add    %r12,%rbx
  fsubp  %st,%st(1)
  cmp    $0xffffffff,%r14d
  je     L88
  fnstcw 0xe(%rsp)
  flds   0xda9(%rip)        # 2024 <_fini+0xc34>
  lea    0x1(%r14),%edx
  add    %rbx,%rdx
  movzwl 0xe(%rsp),%eax
  or     $0xc,%ah
  mov    %ax,0xc(%rsp)
  jmp    L109
  nopl   0x0(%rax)
L137:
  fxch   %st(1)
L109:
  fmul   %st,%st(1)
  fxch   %st(1)
  add    $0x1,%rbx
  fld    %st(0)
  fldcw  0xc(%rsp)
  fistpl (%rsp)
  fldcw  0xe(%rsp)
  movslq (%rsp),%rax
  fildl  (%rsp)
  movzbl 0x0(%rbp,%rax,1),%eax
  fsubrp %st,%st(1)
  mov    %al,-0x1(%rbx)
  cmp    %rdx,%rbx
  jne    L137
  fstp   %st(0)
  fstp   %st(0)
  cmp    $0x41,%r13d
  sete   %r13b
  sub    $0x1,%rbx
  movzbl %r13b,%r13d
  mov    %rbx,%rdi
  mov    %r13d,%esi
  call   <val_hex@plt>
  cmp    $0x7,%eax
  jle    L121
  mov    %rbx,%rbp
  jmp    L163
  xchg   %ax,%ax
L159:
  movb   $0x0,0x0(%rbp)
L163:
  sub    $0x1,%rbp
  mov    %r13d,%esi
  mov    %rbp,%rdi
  call   <incr_hex@plt>
  cmp    $0xf,%eax
  jg     L159
  jmp    L121
L134:
  fstp   %st(0)
  nopl   0x0(%rax)
L121:
  movb   $0x0,(%rbx)
  mov    0x18(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L20
  add    $0x28,%rsp
  mov    %r12,%rax
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
  nopl   0x0(%rax)
L88:
  fldz
  fxch   %st(1)
  fucomi %st(1),%st
  fstp   %st(1)
  jp     L95
  je     L134
L95:
  fnstcw 0xe(%rsp)
  flds   0xcce(%rip)        # 2024 <_fini+0xc34>
  movzwl 0xe(%rsp),%eax
  or     $0xc,%ah
  mov    %ax,0xc(%rsp)
  jmp    L40
L175:
  fxch   %st(1)
  jmp    L40
  nopl   0x0(%rax)
L53:
  fxch   %st(1)
L40:
  fmul   %st,%st(1)
  fxch   %st(1)
  add    $0x1,%rbx
  fld    %st(0)
  fldcw  0xc(%rsp)
  fistpl (%rsp)
  fldcw  0xe(%rsp)
  fildl  (%rsp)
  movslq (%rsp),%rax
  movzbl 0x0(%rbp,%rax,1),%eax
  fsubrp %st,%st(1)
  mov    %al,-0x1(%rbx)
  fldz
  fxch   %st(1)
  fucomi %st(1),%st
  fstp   %st(1)
  jp     L175
  jne    L53
  fstp   %st(0)
  fstp   %st(0)
  jmp    L121
  nopl   (%rax)
L143:
  lea    0x14(%rsp),%rdi
  sub    $0x10,%rsp
  fld    %st(0)
  fstpt  (%rsp)
  fstpt  0x70(%rsp)
  call   <frexpl@plt>
  fldt   0x70(%rsp)
  mov    $0x1,%edi
  sub    $0x10,%rsp
  sub    0x34(%rsp),%edi
  fstpt  (%rsp)
  call   <ldexpl@plt>
  add    $0x20,%rsp
  jmp    L106
L20:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: unpack_data
arguments: data_tag: D12
datatype: string
name: unpack_data
arguments: data_tag: D17
datatype: string

tool: D12: 0123456789abcdef

tool: D17: 0123456789ABCDEF

assistant: ```c
char *acvt(char *out, long double value, int fdigit, int *decpt, int conv) {
  char *pos = out + 1;
  int ip_len, exp;
  int full_prec = fdigit == -1;
  const char *bnum = "0123456789abcdef";
  if (conv == 'A')
    bnum = "0123456789ABCDEF";
  out[0] = '0';
  if (value < 0)
    value = -value;
  if (value) {
    frexpl(value, &exp);
    value = ldexpl(value, -(exp - 1));
  }
  pos += ip_len = ltoa((long)value, pos);
  value -= (long)value;
  *decpt = ip_len;
  if (full_prec) {
    while (value) {
      int ival = (int)(value *= 16);
      *pos++ = bnum[ival];
      value -= ival;
    }
  } else {
    fdigit++;
    while (fdigit--) {
      int ival = (int)(value *= 16);
      *pos++ = bnum[ival];
      value -= ival;
    }
    if (val_hex(--pos, conv == 'A') >= 0x8) {
      char *ptr = pos;
      while (incr_hex(--ptr, conv == 'A') > 0xf)
        *ptr = 0;
    }
  }
  *pos = 0;
  return out + 1;
}
```