user: 下面的汇编指令对应的C源代码是什么:

```asm
<root2poly>:
  endbr64
  push   %rbp
  mov    %rsp,%rbp
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbx
  sub    $0x38,%rsp
  mov    %rdi,%r14
  mov    %rsi,%r15
  mov    %edx,-0x44(%rbp)
  mov    %fs:0x28,%rax
  mov    %rax,-0x38(%rbp)
  xor    %eax,%eax
  lea    0x2(%rdx,%rdx,1),%ecx
  movslq %ecx,%rax
  shl    $0x3,%rax
  mov    %rax,%rdx
  mov    %rax,%rdi
  and    $0xfffffffffffff000,%rdi
  mov    %rsp,%rsi
  sub    %rdi,%rsi
L130:
  cmp    %rsi,%rsp
  je     L59
  sub    $0x1000,%rsp
  orq    $0x0,0xff8(%rsp)
  jmp    L130
L59:
  mov    %rdx,%rsi
  and    $0xfff,%esi
  sub    %rsi,%rsp
  test   %rsi,%rsi
  je     L9
  orq    $0x0,-0x8(%rsp,%rsi,1)
L9:
  lea    0x7(%rsp),%r12
  mov    %r12,%rbx
  shr    $0x3,%rbx
  and    $0xfffffffffffffff8,%r12
  mov    %rax,%rsi
  and    $0xfffffffffffff000,%rsi
  mov    %rsp,%rdx
  sub    %rsi,%rdx
L107:
  cmp    %rdx,%rsp
  je     L30
  sub    $0x1000,%rsp
  orq    $0x0,0xff8(%rsp)
  jmp    L107
L30:
  mov    %rax,%rdx
  and    $0xfff,%edx
  sub    %rdx,%rsp
  test   %rdx,%rdx
  je     L67
  orq    $0x0,-0x8(%rsp,%rdx,1)
L67:
  lea    0x7(%rsp),%r13
  mov    %r13,%rax
  shr    $0x3,%rax
  mov    %rax,-0x50(%rbp)
  and    $0xfffffffffffffff8,%r13
  lea    0x0(,%rcx,8),%eax
  mov    %eax,-0x48(%rbp)
  mov    %eax,%edx
  mov    $0x0,%esi
  mov    %r12,%rdi
  call   <memset@plt>
  mov    -0x48(%rbp),%edx
  mov    $0x0,%esi
  mov    %r13,%rdi
  call   <memset@plt>
  movsd  D7(%rip),%xmm0
  mov    -0x50(%rbp),%rax
  movsd  %xmm0,0x0(,%rax,8)
  movsd  %xmm0,0x0(,%rbx,8)
  mov    -0x44(%rbp),%eax
  test   %eax,%eax
  jle    L101
  mov    %eax,%eax
  mov    %rax,-0x50(%rbp)
  mov    $0x0,%ebx
  lea    0x20(%r12),%rax
  mov    %rax,-0x58(%rbp)
L40:
  pxor   %xmm4,%xmm4
  cvtss2sd (%r14,%rbx,8),%xmm4
  movsd  0x10(%r12),%xmm0
  subsd  %xmm4,%xmm0
  movsd  %xmm0,0x10(%r13)
  pxor   %xmm5,%xmm5
  cvtss2sd 0x4(%r14,%rbx,8),%xmm5
  movsd  0x18(%r12),%xmm0
  subsd  %xmm5,%xmm0
  movsd  %xmm0,0x18(%r13)
  test   %ebx,%ebx
  jle    L69
  lea    0x10(%r12),%rax
  lea    0x20(%r13),%rdx
  lea    -0x1(%rbx),%ecx
  shl    $0x4,%rcx
  add    -0x58(%rbp),%rcx
L76:
  movsd  (%rax),%xmm1
  movsd  0x8(%rax),%xmm0
  movapd %xmm4,%xmm3
  mulsd  %xmm1,%xmm3
  movapd %xmm5,%xmm2
  mulsd  %xmm0,%xmm2
  subsd  %xmm2,%xmm3
  movsd  0x10(%rax),%xmm2
  subsd  %xmm3,%xmm2
  movsd  %xmm2,(%rdx)
  mulsd  %xmm4,%xmm0
  mulsd  %xmm5,%xmm1
  addsd  %xmm1,%xmm0
  movsd  0x18(%rax),%xmm1
  subsd  %xmm0,%xmm1
  movsd  %xmm1,0x8(%rdx)
  add    $0x10,%rax
  add    $0x10,%rdx
  cmp    %rcx,%rax
  jne    L76
L69:
  mov    -0x48(%rbp),%edx
  mov    %r13,%rsi
  mov    %r12,%rdi
  call   <memcpy@plt>
  add    $0x1,%rbx
  cmp    -0x50(%rbp),%rbx
  jne    L40
  mov    $0x0,%eax
L25:
  mov    %rax,%rdx
  shl    $0x4,%rdx
  movsd  (%r12,%rdx,1),%xmm0
  movsd  %xmm0,(%r15,%rax,8)
  add    $0x1,%rax
  cmp    %eax,-0x44(%rbp)
  jge    L25
L1:
  mov    -0x38(%rbp),%rax
  sub    %fs:0x28,%rax
  jne    L2
  lea    -0x28(%rbp),%rsp
  pop    %rbx
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  pop    %rbp
  ret
L101:
  cmpl   $0x0,-0x44(%rbp)
  jne    L1
  movsd  0x0(,%rbx,8),%xmm0
  movsd  %xmm0,(%r15)
  jmp    L1
L2:
  call   <__stack_chk_fail@plt>
```

tool_calls: name: unpack_data
arguments: tag: D7
datatype: byte[8]

tool: {"D7": [0x00,0x00,0x00,0x00,0x00,0x00,0xf0,0x3f]}

assistant: ```c
void root2poly(float *r, double *p, const int n) {
  int i, ir, ii, j, jr, ji;
  double pp[(n + 1) * 2];
  double qq[(n + 1) * 2];
  memset(pp, 0, ((n + 1) * 2) * sizeof(double));
  memset(qq, 0, ((n + 1) * 2) * sizeof(double));
  pp[0] = qq[0] = 1;
  for (i = 0; i < n; i++) {
    ir = i * 2;
    ii = i * 2 + 1;
    qq[2] = pp[2] - r[ir];
    qq[3] = pp[3] - r[ii];
    for (j = 0; j < i; j++) {
      jr = j * 2;
      ji = j * 2 + 1;
      qq[jr + 4] = pp[jr + 4] - (pp[jr + 2] * r[ir] - pp[ji + 2] * r[ii]);
      qq[ji + 4] = pp[ji + 4] - (pp[ji + 2] * r[ir] + pp[jr + 2] * r[ii]);
    }
    memcpy(pp, qq, ((n + 1) * 2) * sizeof(double));
  }
  for (i = 0; i < (n + 1); i++) {
    p[i] = pp[i * 2];
  }
}
```