user: 请将以下的汇编代码转换成C语言代码:

```asm
<_to_float>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0x48,%rsp
  mov    %rdi,0x10(%rsp)
  mov    %edx,%r13d
  mov    %ecx,0x18(%rsp)
  mov    0x80(%rsp),%r14d
  mov    %fs:0x28,%rax
  mov    %rax,0x38(%rsp)
  xor    %eax,%eax
  mov    %esi,%eax
  mov    $0x34,%ecx
  sar    %cl,%eax
  and    $0x7ff,%eax
  mov    %esi,%ebp
  shl    $0xb,%ebp
  mov    %ebp,0x30(%rsp)
  cmp    $0x7ff,%eax
  je     L373
  cmp    $0x46,%edx
  mov    $0x66,%edx
  cmove  %edx,%r13d
  or     %eax,%ebp
  je     L320
  lea    -0x3fe(%rax),%ebp
  test   %esi,%esi
  jns    L320
  mov    0x10(%rsp),%rax
  lea    0x1(%rax),%r15
  movb   $0x2d,(%rax)
L170:
  mov    $0x0,%ebx
  lea    0x30(%rsp),%r12
  cmp    $0xfffffffe,%ebp
  jl     L319
L163:
  test   %ebp,%ebp
  jle    L393
  lea    0x30(%rsp),%r12
L162:
  mov    %r12,%rdi
  call   <_ldiv5@plt>
  sub    $0x1,%ebp
  add    $0x1,%ebx
  mov    0x30(%rsp),%eax
  test   %eax,%eax
  js     L395
L32:
  sub    $0x1,%ebp
  add    %eax,%eax
  jns    L32
  mov    %eax,0x30(%rsp)
L395:
  test   %ebp,%ebp
  jg     L162
L393:
  cmp    $0x3,%ebp
  jg     L172
  lea    0x30(%rsp),%r12
L185:
  mov    %r12,%rdi
  call   <_rlrshift@plt>
  add    $0x1,%ebp
  cmp    $0x4,%ebp
  jne    L185
L172:
  test   %r14d,%r14d
  mov    $0x6,%eax
  cmovs  %eax,%r14d
  mov    %r13d,%eax
  and    $0xffffffdf,%eax
  cmp    $0x47,%eax
  jne    L498
  cmpl   $0x0,0x18(%rsp)
  sete   %al
  test   %r14d,%r14d
  setg   %dl
  movzbl %dl,%edx
  and    %eax,%edx
  mov    %edx,0x1c(%rsp)
  cmp    $0xfffffffd,%ebx
  jl     L297
  lea    0x1(%r14),%eax
  cmp    %ebx,%eax
  jge    L308
L297:
  cmp    $0x67,%r13d
  mov    $0x45,%r13d
  mov    $0x65,%eax
  cmove  %eax,%r13d
L225:
  lea    0x1(%r14),%edx
L1:
  mov    $0x10,%eax
  cmp    %eax,%edx
  cmovle %edx,%eax
  mov    %eax,%ebp
  movl   $0x10,0x2c(%rsp)
  movl   $0x0,0x34(%rsp)
  test   %edx,%edx
  je     L17
  lea    0x34(%rsp),%r12
L529:
  mov    %r12,%rdi
  call   <_ldiv5@plt>
  mov    %r12,%rdi
  call   <_rlrshift@plt>
  sub    $0x1,%ebp
  jne    L529
L17:
  mov    0x34(%rsp),%eax
  add    0x30(%rsp),%eax
  mov    %eax,0x30(%rsp)
  mov    $0x20,%ecx
  sar    %cl,%eax
  test   $0xf0000000,%eax
  jne    L189
L242:
  cmp    $0x66,%r13d
  je     L399
  lea    0x2c(%rsp),%rsi
  lea    0x30(%rsp),%rdi
  call   <_get_digit@plt>
  mov    %al,(%r15)
  cmp    $0x30,%al
  setne  %al
  movzbl %al,%eax
  sub    %eax,%ebx
  cmpl   $0x0,0x18(%rsp)
  jne    L328
  test   %r14d,%r14d
  setg   %al
  lea    0x1(%r15),%rbp
  test   %al,%al
  je     L137
L328:
  lea    0x2(%r15),%rbp
  movb   $0x2e,0x1(%r15)
  test   %r14d,%r14d
  jle    L137
  lea    0x2(%r14),%eax
  add    %rax,%r15
  mov    %rbp,%r12
  lea    0x2c(%rsp),%rax
  mov    %rax,0x8(%rsp)
L3:
  lea    0x30(%rsp),%rdi
  mov    0x8(%rsp),%rsi
  call   <_get_digit@plt>
  add    $0x1,%r12
  mov    %al,-0x1(%r12)
  cmp    %r15,%r12
  jne    L3
  mov    %r14d,%r14d
  add    %r14,%rbp
L137:
  cmpl   $0x0,0x1c(%rsp)
  je     L289
  jmp    L629
L373:
  mov    %rdi,%rbx
  test   %esi,%esi
  js     L66
L334:
  test   %ebp,%ebp
  jne    L103
  mov    %r13d,%edi
  call   <isupper@plt>
  test   %rax,%rax
  je     L306
  lea    0x3(%rbx),%rax
  mov    $0x49,%esi
  mov    $0x4e,%ecx
  mov    $0x46,%edx
L464:
  mov    %sil,(%rbx)
  mov    %cl,0x1(%rbx)
  mov    %dl,0x2(%rbx)
  movb   $0x0,(%rax)
  sub    0x10(%rsp),%eax
  jmp    L182
L66:
  lea    0x1(%rdi),%rbx
  movb   $0x2d,(%rdi)
  jmp    L334
L306:
  lea    0x3(%rbx),%rax
  mov    $0x69,%esi
  mov    $0x6e,%ecx
  mov    $0x66,%edx
  jmp    L464
L103:
  mov    %r13d,%edi
  call   <isupper@plt>
  test   %rax,%rax
  je     L109
  lea    0x3(%rbx),%rax
  mov    $0x4e,%esi
  mov    $0x41,%ecx
  mov    $0x4e,%edx
  jmp    L464
L109:
  lea    0x3(%rbx),%rax
  mov    $0x6e,%esi
  mov    $0x61,%ecx
  mov    $0x6e,%edx
  jmp    L464
L320:
  test   %r8d,%r8d
  je     L154
  mov    0x10(%rsp),%rax
  lea    0x1(%rax),%r15
  movb   $0x2b,(%rax)
  jmp    L170
L154:
  mov    0x10(%rsp),%rax
  mov    %rax,%r15
  test   %r9d,%r9d
  je     L170
  lea    0x1(%rax),%r15
  movb   $0x20,(%rax)
  jmp    L170
L450:
  mov    %r12,%rdi
  call   <_rlrshift@plt>
  add    $0x1,%ebp
  mov    0x30(%rsp),%eax
  mov    %eax,%edx
  mov    $0x20,%ecx
  sar    %cl,%edx
  cmp    $0x33333332,%edx
  ja     L450
L530:
  lea    (%rax,%rax,4),%edx
  mov    %edx,%eax
  mov    %edx,0x30(%rsp)
  add    $0x1,%ebp
  sub    $0x1,%ebx
  test   %edx,%edx
  js     L179
L526:
  sub    $0x1,%ebp
  add    %eax,%eax
  jns    L526
  mov    %eax,0x30(%rsp)
L179:
  cmp    $0xfffffffe,%ebp
  jge    L163
L319:
  mov    0x30(%rsp),%eax
  mov    %eax,%edx
  mov    $0x20,%ecx
  sar    %cl,%edx
  cmp    $0x33333332,%edx
  ja     L450
  jmp    L530
L498:
  movl   $0x0,0x1c(%rsp)
  cmp    $0x66,%r13d
  jne    L225
L308:
  mov    %r14d,%edx
  add    %ebx,%edx
  mov    $0x66,%r13d
  jns    L1
  movl   $0x10,0x2c(%rsp)
  movl   $0x0,0x34(%rsp)
  mov    0x30(%rsp),%eax
  mov    $0x20,%ecx
  sar    %cl,%eax
  mov    $0x66,%r13d
  test   $0xf0000000,%eax
  jne    L472
L399:
  test   %ebx,%ebx
  jle    L230
  mov    %ebx,%r12d
  add    %r15,%r12
  mov    %r15,%rbp
  lea    0x2c(%rsp),%rax
  mov    %rax,0x8(%rsp)
L110:
  lea    0x30(%rsp),%rdi
  mov    0x8(%rsp),%rsi
  call   <_get_digit@plt>
  add    $0x1,%rbp
  mov    %al,-0x1(%rbp)
  cmp    %rbp,%r12
  jne    L110
  mov    %ebx,%ebp
  add    %r15,%rbp
  mov    $0x0,%ebx
L622:
  cmpl   $0x0,0x18(%rsp)
  jne    L220
  test   %r14d,%r14d
  jle    L387
L220:
  lea    0x1(%rbp),%rax
  mov    %rax,0x8(%rsp)
  movb   $0x2e,0x0(%rbp)
  test   %r14d,%r14d
  jle    L625
  lea    0x2(%rbp),%r12
  lea    0x2(%r14),%eax
  add    %rax,%rbp
  lea    0x2c(%rsp),%r15
  jmp    L205
L472:
  mov    $0x66,%r13d
L189:
  lea    0x30(%rsp),%rbp
  mov    %rbp,%rdi
  call   <_ldiv5@plt>
  mov    %rbp,%rdi
  call   <_rlrshift@plt>
  add    $0x1,%ebx
  jmp    L242
L230:
  lea    0x1(%r15),%rbp
  movb   $0x30,(%r15)
  jmp    L622
L575:
  lea    0x30(%rsp),%rdi
  mov    %r15,%rsi
  call   <_get_digit@plt>
L122:
  mov    %al,-0x1(%r12)
  add    $0x1,%r12
  cmp    %rbp,%r12
  je     L514
L205:
  test   %ebx,%ebx
  jns    L575
  add    $0x1,%ebx
  mov    $0x30,%eax
  jmp    L122
L563:
  neg    %ebx
  mov    $0x2d,%eax
  jmp    L191
L514:
  mov    %r14d,%ebp
  add    0x8(%rsp),%rbp
L387:
  cmpl   $0x0,0x1c(%rsp)
  je     L8
L629:
  mov    %rbp,%rdx
  sub    $0x1,%rbp
  movzbl 0x0(%rbp),%eax
  cmp    $0x30,%al
  je     L629
  cmp    $0x2e,%al
  cmovne %rdx,%rbp
L289:
  mov    %r13d,%eax
  and    $0xffffffdf,%eax
  cmp    $0x45,%eax
  jne    L8
  mov    %r13b,0x0(%rbp)
  lea    0x2(%rbp),%rdx
  mov    $0x2b,%eax
  test   %ebx,%ebx
  js     L563
L191:
  mov    %al,0x1(%rbp)
  movslq %ebx,%rax
  imul   $0x66666667,%rax,%rax
  sar    $0x22,%rax
  mov    %ebx,%ecx
  sar    $0x1f,%ecx
  sub    %ecx,%eax
  lea    0x30(%rax),%ecx
  mov    %cl,(%rdx)
  lea    0x2(%rdx),%rbp
  lea    (%rax,%rax,4),%eax
  add    %eax,%eax
  sub    %eax,%ebx
  lea    0x30(%rbx),%eax
  mov    %al,0x1(%rdx)
L8:
  movb   $0x0,0x0(%rbp)
  mov    %ebp,%eax
  sub    0x10(%rsp),%eax
L182:
  mov    0x38(%rsp),%rdx
  sub    %fs:0x28,%rdx
  jne    L192
  add    $0x48,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
L625:
  mov    0x8(%rsp),%rbp
  jmp    L387
L192:
  call   <__stack_chk_fail@plt>
```

assistant: ```c
int _to_float(char *buf, uint64_t double_temp, int c, int falt, int fplus, int fspace, int precision) {
  register int decexp;
  register int exp;
  int sign;
  int digit_count;
  uint64_t fract;
  uint64_t ltemp;
  int prune_zero;
  char *start = buf;
  exp = double_temp >> 52 & 0x7ff;
  fract = (double_temp << 11) & ~(1ull << 63);
  sign = !!(double_temp & (1ull << 63));
  if (exp == 0x7ff) {
    if (sign) {
      *buf++ = '-';
    }
    if (!fract) {
      if (isupper(c)) {
        *buf++ = 'I';
        *buf++ = 'N';
        *buf++ = 'F';
      } else {
        *buf++ = 'i';
        *buf++ = 'n';
        *buf++ = 'f';
      }
    } else {
      if (isupper(c)) {
        *buf++ = 'N';
        *buf++ = 'A';
        *buf++ = 'N';
      } else {
        *buf++ = 'n';
        *buf++ = 'a';
        *buf++ = 'n';
      }
    }
    *buf = 0;
    return buf - start;
  }
  if (c == 'F') {
    c = 'f';
  }
  if ((exp | fract) != 0) {
    exp -= (1023 - 1);
    fract |= (1ull << 63);
    decexp = true;
  } else {
    decexp = false;
  }
  if (decexp && sign) {
    *buf++ = '-';
  } else if (fplus) {
    *buf++ = '+';
  } else if (fspace) {
    *buf++ = ' ';
  } else {
  }
  decexp = 0;
  while (exp <= -3) {
    while ((fract >> 32) >= (0xFFFFFFFF / 5)) {
      _rlrshift(&fract);
      exp++;
    }
    fract *= 5;
    exp++;
    decexp--;
    while ((fract >> 32) <= (0xFFFFFFFF / 2)) {
      fract <<= 1;
      exp--;
    }
  }
  while (exp > 0) {
    _ldiv5(&fract);
    exp--;
    decexp++;
    while ((fract >> 32) <= (0xFFFFFFFF / 2)) {
      fract <<= 1;
      exp--;
    }
  }
  while (exp < (0 + 4)) {
    _rlrshift(&fract);
    exp++;
  }
  if (precision < 0)
    precision = 6;
  prune_zero = false;
  if ((c == 'g') || (c == 'G')) {
    if (!falt && (precision > 0)) {
      prune_zero = true;
    }
    if ((decexp < (-4 + 1)) || (decexp > (precision + 1))) {
      if (c == 'g') {
        c = 'e';
      } else {
        c = 'E';
      }
    } else {
      c = 'f';
    }
  }
  if (c == 'f') {
    exp = precision + decexp;
    if (exp < 0) {
      exp = 0;
    }
  } else {
    exp = precision + 1;
  }
  digit_count = 16;
  if (exp > 16) {
    exp = 16;
  }
  ltemp = 0x0800000000000000;
  while (exp--) {
    _ldiv5(&ltemp);
    _rlrshift(&ltemp);
  }
  fract += ltemp;
  if ((fract >> 32) & 0xF0000000) {
    _ldiv5(&fract);
    _rlrshift(&fract);
    decexp++;
  }
  if (c == 'f') {
    if (decexp > 0) {
      while (decexp > 0) {
        *buf++ = _get_digit(&fract, &digit_count);
        decexp--;
      }
    } else {
      *buf++ = '0';
    }
    if (falt || (precision > 0)) {
      *buf++ = '.';
    }
    while (precision-- > 0) {
      if (decexp < 0) {
        *buf++ = '0';
        decexp++;
      } else {
        *buf++ = _get_digit(&fract, &digit_count);
      }
    }
  } else {
    *buf = _get_digit(&fract, &digit_count);
    if (*buf++ != '0') {
      decexp--;
    }
    if (falt || (precision > 0)) {
      *buf++ = '.';
    }
    while (precision-- > 0) {
      *buf++ = _get_digit(&fract, &digit_count);
    }
  }
  if (prune_zero) {
    while (*--buf == '0')
      ;
    if (*buf != '.') {
      buf++;
    }
  }
  if ((c == 'e') || (c == 'E')) {
    *buf++ = (char)c;
    if (decexp < 0) {
      decexp = -decexp;
      *buf++ = '-';
    } else {
      *buf++ = '+';
    }
    *buf++ = (char)((decexp / 10) + '0');
    decexp %= 10;
    *buf++ = (char)(decexp + '0');
  }
  *buf = 0;
  return buf - start;
}
```