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

```asm
<radixsort>:
  endbr64
  push   %r15
  push   %r14
  xor    %r14d,%r14d
  push   %r13
  mov    %rdi,%r13
  mov    $0x50,%edi
  push   %r12
  push   %rbp
  push   %rbx
  mov    %edx,%ebx
  sub    %esi,%ebx
  sub    $0xb8,%rsp
  mov    %fs:0x28,%rax
  mov    %rax,0xa8(%rsp)
  xor    %eax,%eax
  lea    0x1(%rbx),%eax
  lea    0x4(%r13,%rbx,4),%rbx
  mov    %eax,0x14(%rsp)
  call   <malloc@plt>
  mov    %rbx,0x38(%rsp)
  lea    0x50(%rsp),%rbx
  mov    %rax,0x8(%rsp)
  add    $0x50,%rax
  mov    %rbx,0x48(%rsp)
  lea    0x78(%rsp),%rbx
  mov    %rbx,0x20(%rsp)
  mov    %rax,0x18(%rsp)
  nop
L103:
  mov    0x14(%rsp),%eax
  pxor   %xmm3,%xmm3
  mov    %r14d,%r15d
  mov    0x38(%rsp),%r12
  movq   $0x0,0x70(%rsp)
  add    $0x1,%r14d
  mov    %r13,%rbp
  movaps %xmm3,0x50(%rsp)
  movaps %xmm3,0x60(%rsp)
  test   %eax,%eax
  jle    L65
  xchg   %ax,%ax
L42:
  mov    0x0(%rbp),%ebx
  mov    %r14d,%esi
  mov    $0xa,%edi
  add    $0x4,%rbp
  call   <power@plt>
  mov    %r15d,%esi
  mov    $0xa,%edi
  mov    %eax,%r8d
  mov    %ebx,%eax
  cltd
  idiv   %r8d
  mov    %edx,%ebx
  call   <power@plt>
  mov    %eax,%r8d
  mov    %ebx,%eax
  cltd
  idiv   %r8d
  cltq
  addl   $0x1,0x50(%rsp,%rax,4)
  cmp    %r12,%rbp
  jne    L42
L65:
  mov    0x48(%rsp),%rbp
  mov    0x8(%rsp),%r12
  mov    0x20(%rsp),%rbx
  mov    %rbp,0x28(%rsp)
  mov    %r12,0x30(%rsp)
  nopw   0x0(%rax,%rax,1)
L156:
  mov    0x0(%rbp),%eax
  add    $0x4,%rbp
  add    $0x8,%r12
  lea    0x0(,%rax,4),%edi
  call   <malloc@plt>
  mov    %rax,-0x8(%r12)
  cmp    %rbp,%rbx
  jne    L156
  mov    0x14(%rsp),%edx
  pxor   %xmm1,%xmm1
  mov    0x28(%rsp),%rbp
  movq   $0x0,0xa0(%rsp)
  mov    0x30(%rsp),%r12
  movaps %xmm1,0x80(%rsp)
  movaps %xmm1,0x90(%rsp)
  test   %edx,%edx
  jle    L105
  mov    %r13,0x40(%rsp)
  mov    %rbp,0x28(%rsp)
  mov    0x8(%rsp),%rbp
  mov    %r12,0x30(%rsp)
  mov    0x38(%rsp),%r12
L108:
  mov    0x0(%r13),%ebx
  mov    %r14d,%esi
  mov    $0xa,%edi
  add    $0x4,%r13
  call   <power@plt>
  mov    %r15d,%esi
  mov    $0xa,%edi
  mov    %eax,%r8d
  mov    %ebx,%eax
  cltd
  idiv   %r8d
  mov    %edx,%ebx
  call   <power@plt>
  mov    %eax,%r8d
  mov    %ebx,%eax
  cltd
  idiv   %r8d
  cltq
  movslq 0x80(%rsp,%rax,4),%rdx
  mov    0x0(%rbp,%rax,8),%rsi
  lea    0x1(%rdx),%edi
  mov    %edi,0x80(%rsp,%rax,4)
  mov    -0x4(%r13),%eax
  mov    %eax,(%rsi,%rdx,4)
  cmp    %r12,%r13
  jne    L108
  mov    0x28(%rsp),%rbp
  mov    0x30(%rsp),%r12
  mov    0x40(%rsp),%r13
L105:
  pxor   %xmm2,%xmm2
  mov    0x8(%rsp),%r9
  mov    0x20(%rsp),%r10
  xor    %r8d,%r8d
  movq   $0x0,0xa0(%rsp)
  movaps %xmm2,0x80(%rsp)
  movaps %xmm2,0x90(%rsp)
  nopw   0x0(%rax,%rax,1)
L175:
  mov    0x0(%rbp),%edi
  test   %edi,%edi
  jle    L104
  movslq %r8d,%rax
  mov    (%r9),%rdx
  lea    0x0(%r13,%rax,4),%rsi
  lea    0x4(%rdx),%rcx
  mov    %rsi,%rax
  sub    %rcx,%rax
  cmp    $0x8,%rax
  jbe    L41
  lea    -0x1(%rdi),%eax
  cmp    $0x2,%eax
  jbe    L41
  mov    %edi,%ecx
  xor    %eax,%eax
  shr    $0x2,%ecx
  shl    $0x4,%rcx
  nopl   0x0(%rax)
L38:
  movdqu (%rdx,%rax,1),%xmm0
  movups %xmm0,(%rsi,%rax,1)
  add    $0x10,%rax
  cmp    %rax,%rcx
  jne    L38
  mov    %edi,%eax
  and    $0xfffffffc,%eax
  lea    (%r8,%rax,1),%ecx
  cmp    %edi,%eax
  je     L109
  mov    %eax,%ebx
  lea    0x1(%rcx),%r11d
  movslq %ecx,%rcx
  lea    0x0(,%rbx,4),%rsi
  mov    (%rdx,%rbx,4),%ebx
  mov    %ebx,0x0(%r13,%rcx,4)
  lea    0x1(%rax),%ecx
  cmp    %edi,%ecx
  jge    L109
  movslq %r11d,%rcx
  mov    0x4(%rdx,%rsi,1),%r11d
  add    $0x2,%eax
  lea    0x0(,%rcx,4),%rbx
  mov    %r11d,0x0(%r13,%rcx,4)
  cmp    %edi,%eax
  jge    L109
  mov    0x8(%rdx,%rsi,1),%eax
  mov    %eax,0x4(%r13,%rbx,1)
L109:
  add    %edi,%r8d
L104:
  add    $0x4,%rbp
  add    $0x8,%r9
  cmp    %rbp,%r10
  jne    L175
  mov    0x18(%rsp),%rbx
  nopl   (%rax)
L171:
  mov    (%r12),%rdi
  add    $0x8,%r12
  call   <free@plt>
  cmp    %r12,%rbx
  jne    L171
  mov    %rbx,0x18(%rsp)
  cmp    $0x10,%r14d
  jne    L103
  mov    0xa8(%rsp),%rax
  sub    %fs:0x28,%rax
  jne    L50
  add    $0xb8,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
  xchg   %ax,%ax
L41:
  mov    %edi,%r11d
  xor    %eax,%eax
  nopl   (%rax)
L75:
  mov    (%rdx,%rax,4),%ecx
  mov    %ecx,(%rsi,%rax,4)
  add    $0x1,%rax
  cmp    %rax,%r11
  jne    L75
  jmp    L109
L50:
  call   <__stack_chk_fail@plt>
```

assistant: ```c
void radixsort(int *l, int left, int right) {
  int i, j, k, d;
  int n = right - left + 1;
  int sizes[10] = {0};
  int counts[10];
  int **bucket;
  bucket = (int **)malloc(10 * sizeof(int *));
  for (k = 0; k < 16; k++) {
    for (d = 0; d < 10; d++) {
      sizes[d] = 0;
    }
    for (i = 0; i < n; i++) {
      d = (l[i] % power(10, k + 1)) / power(10, k);
      sizes[d]++;
    }
    for (d = 0; d < 10; d++) {
      bucket[d] = (int *)malloc(sizes[d] * sizeof(int));
    }
    for (j = 0; j < 10; j++)
      counts[j] = 0;
    for (i = 0; i < n; i++) {
      d = (l[i] % power(10, k + 1)) / power(10, k);
      bucket[d][counts[d]++] = l[i];
    }
    for (j = 0; j < 10; j++)
      counts[j] = 0;
    i = 0;
    for (d = 0; d < 10; d++) {
      for (j = 0; j < sizes[d]; j++) {
        l[i++] = bucket[d][j];
      }
    }
    for (d = 0; d < 10; d++) {
      free(bucket[d]);
    }
  }
}
```