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

```asm
<quick_sort>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  push   %r12
  push   %rbp
  push   %rbx
  sub    $0x98,%rsp
  mov    %esi,0x20(%rsp)
  cmp    $0x1,%esi
  jle    L22
  mov    %rdi,%r15
L654:
  mov    0x20(%rsp),%ecx
  xor    %ebp,%ebp
  mov    %ecx,%eax
  lea    -0x1(%rcx),%ebx
  sar    %eax
  cltq
  mov    (%r15,%rax,4),%r12d
  movslq %ebx,%rax
L62:
  lea    (%r15,%rax,4),%rsi
  mov    %ebp,0x24(%rsp)
  lea    (%r15,%rbp,4),%rdi
  mov    (%rsi),%edx
  cmp    %r12d,(%r15,%rbp,4)
  jl     L462
  cmp    %edx,%r12d
  jge    L565
  lea    -0x4(%r15,%rax,4),%rax
L38:
  mov    %rax,%rsi
  sub    $0x4,%rax
  sub    $0x1,%ebx
  cmp    %r12d,0x4(%rax)
  jg     L38
L565:
  cmp    %ebp,%ebx
  jle    L600
  call   <swap@plt>
  sub    $0x1,%ebx
  movslq %ebx,%rax
L462:
  add    $0x1,%rbp
  jmp    L62
L22:
  add    $0x98,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
L600:
  mov    0x24(%rsp),%eax
  mov    %rdi,0x40(%rsp)
  mov    %eax,0x8(%rsp)
  cmp    $0x1,%eax
  jle    L398
L93:
  mov    0x8(%rsp),%ecx
  xor    %ebp,%ebp
  mov    %ecx,%eax
  lea    -0x1(%rcx),%ebx
  sar    %eax
  cltq
  mov    (%r15,%rax,4),%r12d
  movslq %ebx,%rax
L70:
  lea    (%r15,%rax,4),%rsi
  mov    %ebp,0x28(%rsp)
  lea    (%r15,%rbp,4),%rdi
  mov    (%rsi),%edx
  cmp    (%r15,%rbp,4),%r12d
  jg     L500
  cmp    %edx,%r12d
  jge    L144
  lea    -0x4(%r15,%rax,4),%rax
L719:
  mov    %rax,%rsi
  sub    $0x4,%rax
  sub    $0x1,%ebx
  cmp    0x4(%rax),%r12d
  jl     L719
L144:
  cmp    %ebp,%ebx
  jle    L650
  call   <swap@plt>
  sub    $0x1,%ebx
  movslq %ebx,%rax
L500:
  add    $0x1,%rbp
  jmp    L70
L398:
  mov    0x24(%rsp),%edx
  sub    %edx,0x20(%rsp)
  mov    0x20(%rsp),%eax
  cmp    $0x1,%eax
  jle    L22
  mov    0x40(%rsp),%r15
  jmp    L654
L650:
  mov    0x28(%rsp),%eax
  mov    %rdi,0x48(%rsp)
  mov    %eax,0xc(%rsp)
  cmp    $0x1,%eax
  jle    L39
L520:
  mov    0xc(%rsp),%ecx
  xor    %ebp,%ebp
  mov    %ecx,%eax
  lea    -0x1(%rcx),%ebx
  sar    %eax
  cltq
  mov    (%r15,%rax,4),%r12d
  movslq %ebx,%rax
L94:
  lea    (%r15,%rax,4),%rsi
  mov    %ebp,0x2c(%rsp)
  lea    (%r15,%rbp,4),%rdi
  mov    (%rsi),%edx
  cmp    (%r15,%rbp,4),%r12d
  jg     L698
  cmp    %edx,%r12d
  jge    L140
  lea    -0x4(%r15,%rax,4),%rax
L608:
  mov    %rax,%rsi
  sub    $0x4,%rax
  sub    $0x1,%ebx
  cmp    0x4(%rax),%r12d
  jl     L608
L140:
  cmp    %ebp,%ebx
  jle    L215
  call   <swap@plt>
  sub    $0x1,%ebx
  movslq %ebx,%rax
L698:
  add    $0x1,%rbp
  jmp    L94
L39:
  mov    0x28(%rsp),%edx
  sub    %edx,0x8(%rsp)
  mov    0x8(%rsp),%eax
  cmp    $0x1,%eax
  jle    L398
  mov    0x48(%rsp),%r15
  jmp    L93
L215:
  mov    0x2c(%rsp),%eax
  mov    %rdi,0x50(%rsp)
  mov    %eax,0x10(%rsp)
  cmp    $0x1,%eax
  jle    L675
L35:
  mov    0x10(%rsp),%ecx
  xor    %ebp,%ebp
  mov    %ecx,%eax
  lea    -0x1(%rcx),%ebx
  sar    %eax
  cltq
  mov    (%r15,%rax,4),%r12d
  movslq %ebx,%rax
L521:
  lea    (%r15,%rax,4),%rsi
  mov    %ebp,0x30(%rsp)
  lea    (%r15,%rbp,4),%rdi
  mov    (%rsi),%edx
  cmp    (%r15,%rbp,4),%r12d
  jg     L54
  cmp    %edx,%r12d
  jge    L588
  lea    -0x4(%r15,%rax,4),%rax
L240:
  mov    %rax,%rsi
  sub    $0x4,%rax
  sub    $0x1,%ebx
  cmp    0x4(%rax),%r12d
  jl     L240
L588:
  cmp    %ebp,%ebx
  jle    L73
  call   <swap@plt>
  sub    $0x1,%ebx
  movslq %ebx,%rax
L54:
  add    $0x1,%rbp
  jmp    L521
L675:
  mov    0x2c(%rsp),%edx
  sub    %edx,0xc(%rsp)
  mov    0xc(%rsp),%eax
  cmp    $0x1,%eax
  jle    L39
  mov    0x50(%rsp),%r15
  jmp    L520
L73:
  mov    0x30(%rsp),%eax
  mov    %rdi,0x58(%rsp)
  mov    %eax,0x14(%rsp)
  cmp    $0x1,%eax
  jle    L161
L192:
  mov    0x14(%rsp),%edx
  xor    %ebp,%ebp
  mov    %edx,%eax
  lea    -0x1(%rdx),%ebx
  sar    %eax
  cltq
  mov    (%r15,%rax,4),%r12d
  movslq %ebx,%rax
L419:
  lea    (%r15,%rax,4),%rsi
  mov    %ebp,0x34(%rsp)
  lea    (%r15,%rbp,4),%rdi
  mov    (%rsi),%edx
  cmp    (%r15,%rbp,4),%r12d
  jg     L477
  cmp    %edx,%r12d
  jge    L422
  lea    -0x4(%r15,%rax,4),%rax
L624:
  mov    %rax,%rsi
  sub    $0x4,%rax
  sub    $0x1,%ebx
  cmp    0x4(%rax),%r12d
  jl     L624
L422:
  cmp    %ebp,%ebx
  jle    L707
  call   <swap@plt>
  sub    $0x1,%ebx
  movslq %ebx,%rax
L477:
  add    $0x1,%rbp
  jmp    L419
L707:
  mov    0x34(%rsp),%eax
  mov    %rdi,0x60(%rsp)
  mov    %eax,0x18(%rsp)
  cmp    $0x1,%eax
  jle    L469
L603:
  mov    0x18(%rsp),%ecx
  xor    %ebx,%ebx
  mov    %ecx,%eax
  lea    -0x1(%rcx),%ebp
  sar    %eax
  cltq
  mov    (%r15,%rax,4),%r12d
  movslq %ebp,%rax
L189:
  lea    (%r15,%rax,4),%rsi
  mov    %ebx,%ecx
  lea    (%r15,%rbx,4),%rdi
  mov    (%rsi),%edx
  cmp    (%r15,%rbx,4),%r12d
  jg     L711
  cmp    %edx,%r12d
  jge    L20
  lea    -0x4(%r15,%rax,4),%rax
  nopl   0x0(%rax)
L117:
  mov    %rax,%rsi
  sub    $0x4,%rax
  sub    $0x1,%ebp
  cmp    0x4(%rax),%r12d
  jl     L117
L20:
  cmp    %ebx,%ebp
  jle    L292
  call   <swap@plt>
  sub    $0x1,%ebp
  movslq %ebp,%rax
L711:
  add    $0x1,%rbx
  jmp    L189
L292:
  mov    %ecx,0x38(%rsp)
  mov    %rdi,%r14
  mov    %ecx,0x1c(%rsp)
  cmp    $0x1,%ecx
  jle    L130
  mov    %rdi,0x68(%rsp)
  mov    %ecx,%edx
L348:
  mov    %edx,%eax
  lea    -0x1(%rdx),%ebx
  xor    %ebp,%ebp
  sar    %eax
  cltq
  mov    (%r15,%rax,4),%r12d
  movslq %ebx,%rax
  nopw   0x0(%rax,%rax,1)
L264:
  lea    (%r15,%rax,4),%rsi
  mov    %ebp,%ecx
  lea    (%r15,%rbp,4),%rdi
  mov    (%rsi),%edx
  cmp    (%r15,%rbp,4),%r12d
  jg     L418
  cmp    %edx,%r12d
  jge    L549
  lea    -0x4(%r15,%rax,4),%rax
  nopl   0x0(%rax)
L252:
  mov    %rax,%rsi
  sub    $0x4,%rax
  sub    $0x1,%ebx
  cmp    0x4(%rax),%r12d
  jl     L252
L549:
  cmp    %ebp,%ebx
  jle    L412
  call   <swap@plt>
  sub    $0x1,%ebx
  movslq %ebx,%rax
L418:
  add    $0x1,%rbp
  jmp    L264
L412:
  mov    %ecx,0x3c(%rsp)
  mov    %rdi,%r14
  mov    %ecx,%ebp
  cmp    $0x1,%ecx
  jle    L315
  mov    %rdi,0x70(%rsp)
L146:
  mov    %ebp,%eax
  lea    -0x1(%rbp),%ebx
  mov    %r15,%r12
  mov    $0x1,%r14d
  sar    %eax
  cltq
  mov    (%r15,%rax,4),%edx
  movslq %ebx,%rax
  nopl   (%rax)
L95:
  lea    (%r15,%rax,4),%rsi
  lea    -0x1(%r14),%r13d
  mov    (%rsi),%ecx
  cmp    (%r12),%edx
  jg     L464
  cmp    %ecx,%edx
  jge    L225
  lea    -0x4(%r15,%rax,4),%rax
  nopl   0x0(%rax)
L46:
  mov    %rax,%rsi
  sub    $0x4,%rax
  sub    $0x1,%ebx
  cmp    0x4(%rax),%edx
  jl     L46
L225:
  mov    %edx,0x78(%rsp)
  cmp    %r13d,%ebx
  jle    L55
  mov    %r12,%rdi
  sub    $0x1,%ebx
  call   <swap@plt>
  mov    0x78(%rsp),%edx
  movslq %ebx,%rax
L464:
  add    $0x4,%r12
  add    $0x1,%r14d
  jmp    L95
L55:
  cmp    $0x1,%r13d
  jle    L352
  mov    %ebp,%ecx
  mov    %r13d,%edx
  mov    %r13d,%r8d
  mov    %r12,%r9
L488:
  mov    %edx,%eax
  lea    -0x1(%rdx),%ebp
  xor    %ebx,%ebx
  mov    %ecx,%r13d
  sar    %eax
  cltq
  mov    (%r15,%rax,4),%r12d
  movslq %ebp,%rax
  cs nopw 0x0(%rax,%rax,1)
L614:
  lea    (%r15,%rax,4),%rsi
  mov    %ebx,%ecx
  lea    (%r15,%rbx,4),%r14
  mov    (%rsi),%edi
  cmp    (%r15,%rbx,4),%r12d
  jg     L511
  cmp    %edi,%r12d
  jge    L268
  lea    -0x4(%r15,%rax,4),%rax
  nopl   0x0(%rax)
L238:
  mov    %rax,%rsi
  sub    $0x4,%rax
  sub    $0x1,%ebp
  cmp    0x4(%rax),%r12d
  jl     L238
L268:
  cmp    %ebx,%ebp
  jle    L384
  mov    %r14,%rdi
  mov    %r9,0x80(%rsp)
  sub    $0x1,%ebp
  mov    %r8d,0x88(%rsp)
  mov    %edx,0x78(%rsp)
  call   <swap@plt>
  mov    0x78(%rsp),%edx
  mov    0x88(%rsp),%r8d
  movslq %ebp,%rax
  mov    0x80(%rsp),%r9
L511:
  add    $0x1,%rbx
  jmp    L614
L537:
  mov    %ecx,%ebp
  mov    %r8d,%r13d
  mov    %r9,%r12
L352:
  sub    %r13d,%ebp
  cmp    $0x1,%ebp
  jle    L120
  mov    %r12,%r15
  jmp    L146
  nopl   0x0(%rax,%rax,1)
L384:
  mov    %ecx,%esi
  mov    %r15,%rdi
  mov    %r13d,0x8c(%rsp)
  mov    %ecx,%r13d
  mov    %edx,0x80(%rsp)
  mov    %r8d,0x88(%rsp)
  mov    %r9,0x78(%rsp)
  call   <quick_sort>
  mov    0x80(%rsp),%edx
  mov    0x78(%rsp),%r9
  mov    0x88(%rsp),%r8d
  mov    0x8c(%rsp),%ecx
  sub    %r13d,%edx
  cmp    $0x1,%edx
  jle    L537
  mov    %r14,%r15
  jmp    L488
L120:
  mov    0x70(%rsp),%r14
L315:
  mov    0x3c(%rsp),%edi
  sub    %edi,0x1c(%rsp)
  mov    0x1c(%rsp),%eax
  cmp    $0x1,%eax
  jle    L680
  mov    %r14,%r15
  mov    %eax,%edx
  jmp    L348
L680:
  mov    0x68(%rsp),%r14
L130:
  mov    0x38(%rsp),%edx
  sub    %edx,0x18(%rsp)
  mov    0x18(%rsp),%eax
  cmp    $0x1,%eax
  jle    L469
  mov    %r14,%r15
  jmp    L603
L469:
  mov    0x34(%rsp),%edi
  sub    %edi,0x14(%rsp)
  mov    0x14(%rsp),%eax
  cmp    $0x1,%eax
  jle    L161
  mov    0x60(%rsp),%r15
  jmp    L192
L161:
  mov    0x30(%rsp),%edx
  sub    %edx,0x10(%rsp)
  mov    0x10(%rsp),%eax
  cmp    $0x1,%eax
  jle    L675
  mov    0x58(%rsp),%r15
  jmp    L35
```

assistant: ```c
void quick_sort(int *a, int n) {
  int i, j, p, t;
  if (n < 2)
    return;
  p = a[n / 2];
  for (i = 0, j = n - 1;; i++, j--) {
    while (a[i] < p)
      i++;
    while (p < a[j])
      j--;
    if (i >= j)
      break;
    swap(&a[i], &a[j]);
  }
  quick_sort(a, i);
  quick_sort(a + i, n - i);
}
```