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

```asm
<quaddobl_witset_of_hypersurface>:
  endbr64
  push   %rbp
  mov    %esi,%ecx
  mov    %edi,%r8d
  mov    %rdx,%rsi
  mov    %rsp,%rbp
  sub    $0x10,%rsp
  mov    %fs:0x28,%rax
  mov    %rax,-0x8(%rbp)
  xor    %eax,%eax
  movslq %ecx,%rax
  mov    %rsp,%rdi
  lea    0xf(,%rax,4),%rax
  mov    %rax,%rdx
  and    $0xfffffffffffff000,%rax
  sub    %rax,%rdi
  and    $0xfffffffffffffff0,%rdx
  cmp    %rdi,%rsp
  je     L232
L17:
  sub    $0x1000,%rsp
  orq    $0x0,0xff8(%rsp)
  cmp    %rdi,%rsp
  jne    L17
L232:
  and    $0xfff,%edx
  sub    %rdx,%rsp
  test   %rdx,%rdx
  jne    L33
L82:
  movd   %r8d,%xmm0
  movd   %ecx,%xmm6
  mov    %rsp,%r9
  punpckldq %xmm6,%xmm0
  movq   %xmm0,-0x10(%rbp)
  test   %ecx,%ecx
  jle    L121
  lea    -0x1(%rcx),%eax
  cmp    $0xe,%eax
  jbe    L137
  mov    %ecx,%edi
  mov    %rsi,%rdx
  pxor   %xmm5,%xmm5
  mov    %r9,%rax
  shr    $0x4,%edi
  pxor   %xmm3,%xmm3
  sub    $0x1,%edi
  shl    $0x4,%rdi
  lea    0x10(%rsi,%rdi,1),%rdi
  nopl   (%rax)
L150:
  movdqu (%rdx),%xmm0
  movdqa %xmm5,%xmm2
  add    $0x10,%rdx
  add    $0x40,%rax
  pcmpgtb %xmm0,%xmm2
  movdqa %xmm0,%xmm1
  punpcklbw %xmm2,%xmm1
  punpckhbw %xmm2,%xmm0
  movdqa %xmm3,%xmm2
  pcmpgtw %xmm1,%xmm2
  movdqa %xmm1,%xmm4
  punpckhwd %xmm2,%xmm1
  punpcklwd %xmm2,%xmm4
  movdqa %xmm0,%xmm2
  movups %xmm1,-0x30(%rax)
  movdqa %xmm3,%xmm1
  pcmpgtw %xmm0,%xmm1
  movups %xmm4,-0x40(%rax)
  punpcklwd %xmm1,%xmm2
  punpckhwd %xmm1,%xmm0
  movups %xmm2,-0x20(%rax)
  movups %xmm0,-0x10(%rax)
  cmp    %rdx,%rdi
  jne    L150
  mov    %ecx,%eax
  and    $0xfffffff0,%eax
  test   $0xf,%cl
  je     L121
L95:
  movslq %eax,%rdi
  lea    (%r9,%rdi,4),%rdx
  movsbl (%rsi,%rdi,1),%edi
  mov    %edi,(%rdx)
  lea    0x1(%rax),%edi
  cmp    %edi,%ecx
  jle    L121
  movslq %edi,%rdi
  movsbl (%rsi,%rdi,1),%edi
  mov    %edi,0x4(%rdx)
  lea    0x2(%rax),%edi
  cmp    %edi,%ecx
  jle    L121
  movslq %edi,%rdi
  movsbl (%rsi,%rdi,1),%edi
  mov    %edi,0x8(%rdx)
  lea    0x3(%rax),%edi
  cmp    %edi,%ecx
  jle    L121
  movslq %edi,%rdi
  movsbl (%rsi,%rdi,1),%edi
  mov    %edi,0xc(%rdx)
  lea    0x4(%rax),%edi
  cmp    %edi,%ecx
  jle    L121
  movslq %edi,%rdi
  movsbl (%rsi,%rdi,1),%edi
  mov    %edi,0x10(%rdx)
  lea    0x5(%rax),%edi
  cmp    %edi,%ecx
  jle    L121
  movslq %edi,%rdi
  movsbl (%rsi,%rdi,1),%edi
  mov    %edi,0x14(%rdx)
  lea    0x6(%rax),%edi
  cmp    %edi,%ecx
  jle    L121
  movslq %edi,%rdi
  movsbl (%rsi,%rdi,1),%edi
  mov    %edi,0x18(%rdx)
  lea    0x7(%rax),%edi
  cmp    %edi,%ecx
  jle    L121
  movslq %edi,%rdi
  movsbl (%rsi,%rdi,1),%edi
  mov    %edi,0x1c(%rdx)
  lea    0x8(%rax),%edi
  cmp    %edi,%ecx
  jle    L121
  movslq %edi,%rdi
  movsbl (%rsi,%rdi,1),%edi
  mov    %edi,0x20(%rdx)
  lea    0x9(%rax),%edi
  cmp    %edi,%ecx
  jle    L121
  movslq %edi,%rdi
  movsbl (%rsi,%rdi,1),%edi
  mov    %edi,0x24(%rdx)
  lea    0xa(%rax),%edi
  cmp    %edi,%ecx
  jle    L121
  movslq %edi,%rdi
  movsbl (%rsi,%rdi,1),%edi
  mov    %edi,0x28(%rdx)
  lea    0xb(%rax),%edi
  cmp    %edi,%ecx
  jle    L121
  movslq %edi,%rdi
  movsbl (%rsi,%rdi,1),%edi
  mov    %edi,0x2c(%rdx)
  lea    0xc(%rax),%edi
  cmp    %edi,%ecx
  jle    L121
  movslq %edi,%rdi
  movsbl (%rsi,%rdi,1),%edi
  mov    %edi,0x30(%rdx)
  lea    0xd(%rax),%edi
  cmp    %edi,%ecx
  jle    L121
  movslq %edi,%rdi
  add    $0xe,%eax
  movsbl (%rsi,%rdi,1),%edi
  mov    %edi,0x34(%rdx)
  cmp    %eax,%ecx
  jle    L121
  cltq
  movsbl (%rsi,%rax,1),%eax
  mov    %eax,0x38(%rdx)
  nopl   0x0(%rax)
L121:
  xor    %r8d,%r8d
  xor    %ecx,%ecx
  mov    %r9,%rdx
  mov    $0x10d,%edi
  lea    -0x10(%rbp),%rsi
  call   <_ada_use_c2phc4c@plt>
  mov    -0x8(%rbp),%rdx
  sub    %fs:0x28,%rdx
  jne    L199
  leave
  ret
  nopw   0x0(%rax,%rax,1)
L33:
  orq    $0x0,-0x8(%rsp,%rdx,1)
  jmp    L82
L137:
  xor    %eax,%eax
  jmp    L95
L199:
  call   <__stack_chk_fail@plt>
```

assistant: ```c
int quaddobl_witset_of_hypersurface(int nv, int nc, char *p) {
  int i, fail, a[2], b[nc];
  double *c;
  a[0] = nv;
  a[1] = nc;
  for (i = 0; i < nc; i++)
    b[i] = (int)p[i];
  fail = _ada_use_c2phc4c(269, a, b, c, 0);
  return fail;
}
```