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

```asm
<tour>:
  endbr64
  push   %rbp
  mov    %esi,%eax
  mov    %rsp,%rbp
  push   %r15
  push   %r14
  mov    %r8d,%r14d
  push   %r13
  push   %r12
  mov    %rcx,%r12
  push   %rbx
  mov    %rdx,%rbx
  sub    $0x38,%rsp
  mov    %fs:0x28,%rdx
  mov    %rdx,-0x38(%rbp)
  xor    %edx,%edx
  movslq %esi,%rdx
  mov    %rsp,%r8
  lea    0xf(,%rdx,8),%rdx
  mov    %rdx,%rcx
  and    $0xfffffffffffff000,%rdx
  sub    %rdx,%r8
  and    $0xfffffffffffffff0,%rcx
  cmp    %r8,%rsp
  je     L26
L4:
  sub    $0x1000,%rsp
  orq    $0x0,0xff8(%rsp)
  cmp    %r8,%rsp
  jne    L4
L26:
  and    $0xfff,%ecx
  sub    %rcx,%rsp
  test   %rcx,%rcx
  jne    L22
L48:
  lea    0x7(%rsp),%rdx
  mov    %rdx,%rcx
  and    $0xfffffffffffffff8,%rdx
  shr    $0x3,%rcx
  mov    %rdx,-0x58(%rbp)
  mov    %rcx,-0x50(%rbp)
  test   %eax,%eax
  jle    L102
  sub    $0x1,%eax
  mov    %rdi,%r15
  xor    %r13d,%r13d
  lea    0x8(%rdi,%rax,8),%rax
  mov    %rax,-0x48(%rbp)
  nopl   0x0(%rax)
L87:
  mov    (%r15),%rdx
  mov    %r14d,%esi
  mov    %rbx,%rdi
  call   <arr_idx@plt>
  cmp    $0xffffffff,%eax
  je     L62
  mov    (%r15),%rdx
  mov    -0x58(%rbp),%rcx
  movslq %r13d,%rax
  add    $0x1,%r13d
  mov    %rdx,(%rcx,%rax,8)
L62:
  add    $0x8,%r15
  cmp    -0x48(%rbp),%r15
  jne    L87
  mov    -0x50(%rbp),%rax
  mov    %r14d,%esi
  mov    %rbx,%rdi
  mov    0x0(,%rax,8),%rdx
  call   <arr_idx@plt>
  mov    %r14d,%esi
  mov    %r12,%rdi
  cltq
  mov    0x8(%rbx,%rax,8),%rdx
  call   <arr_idx@plt>
  cltq
  mov    0x8(%r12,%rax,8),%rdi
  call   <atof@plt>
  lea    -0x1(%r13),%eax
  mov    %eax,-0x5c(%rbp)
  movsd  %xmm0,-0x48(%rbp)
  test   %eax,%eax
  jle    L97
  mov    -0x58(%rbp),%rcx
  lea    -0x2(%r13),%eax
  mov    %rcx,%r15
  lea    0x8(%rcx,%rax,8),%r13
  nopl   0x0(%rax,%rax,1)
L100:
  mov    0x8(%r15),%rdx
  mov    %r14d,%esi
  mov    %rbx,%rdi
  add    $0x8,%r15
  call   <arr_idx@plt>
  mov    %r14d,%esi
  mov    %r12,%rdi
  cltq
  mov    0x8(%rbx,%rax,8),%rdx
  call   <arr_idx@plt>
  cltq
  mov    0x8(%r12,%rax,8),%rdi
  call   <atof@plt>
  mov    -0x8(%r15),%rdx
  mov    %r14d,%esi
  mov    %rbx,%rdi
  movsd  %xmm0,-0x50(%rbp)
  call   <arr_idx@plt>
  mov    %r14d,%esi
  mov    %r12,%rdi
  cltq
  mov    0x8(%rbx,%rax,8),%rdx
  call   <arr_idx@plt>
  cltq
  mov    0x8(%r12,%rax,8),%rdi
  call   <atof@plt>
  movsd  -0x50(%rbp),%xmm1
  mulsd  %xmm0,%xmm0
  mulsd  %xmm1,%xmm1
  subsd  %xmm0,%xmm1
  movapd %xmm1,%xmm0
  call   <sqrt@plt>
  pxor   %xmm0,%xmm0
  cvtsi2sd %rax,%xmm0
  addsd  -0x48(%rbp),%xmm0
  movsd  %xmm0,-0x48(%rbp)
  cmp    %r13,%r15
  jne    L100
L97:
  movslq -0x5c(%rbp),%r15
  mov    -0x58(%rbp),%rax
  mov    %r14d,%esi
  mov    %rbx,%rdi
  mov    (%rax,%r15,8),%rdx
  call   <arr_idx@plt>
  mov    %r14d,%esi
  mov    %r12,%rdi
  cltq
  mov    0x8(%rbx,%rax,8),%rdx
  call   <arr_idx@plt>
  cltq
  mov    0x8(%r12,%rax,8),%rdi
  call   <atof@plt>
  addsd  -0x48(%rbp),%xmm0
  call   <floor@plt>
  mov    -0x38(%rbp),%rdx
  sub    %fs:0x28,%rdx
  jne    L70
  lea    -0x28(%rbp),%rsp
  pop    %rbx
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  pop    %rbp
  ret
  cs nopw 0x0(%rax,%rax,1)
L22:
  orq    $0x0,-0x8(%rsp,%rcx,1)
  jmp    L48
L102:
  mov    0x0(,%rcx,8),%rdx
  mov    %r14d,%esi
  mov    %rbx,%rdi
  call   <arr_idx@plt>
  mov    %r14d,%esi
  mov    %r12,%rdi
  cltq
  mov    0x8(%rbx,%rax,8),%rdx
  call   <arr_idx@plt>
  cltq
  mov    0x8(%r12,%rax,8),%rdi
  call   <atof@plt>
  movl   $0xffffffff,-0x5c(%rbp)
  movsd  %xmm0,-0x48(%rbp)
  jmp    L97
L70:
  call   <__stack_chk_fail@plt>
```

assistant: ```c
int tour(char **arrFriends, int szArrFriends, char **ftwns, char **townsDist, int szFTwns) {
  char *f_arr[szArrFriends];
  int temp_idx = 0;
  for (int i = 0; i < szArrFriends; ++i) {
    if (arr_idx(ftwns, szFTwns, arrFriends[i]) != -1)
      f_arr[temp_idx++] = arrFriends[i];
  }
  szArrFriends = temp_idx;
  double sum = atof(townsDist[arr_idx(townsDist, szFTwns, ftwns[arr_idx(ftwns, szFTwns, f_arr[0]) + 1]) + 1]);
  for (int i = 0; i < szArrFriends - 1; ++i) {
    double d1 = atof(townsDist[arr_idx(townsDist, szFTwns, ftwns[arr_idx(ftwns, szFTwns, f_arr[i + 1]) + 1]) + 1]);
    double d2 = atof(townsDist[arr_idx(townsDist, szFTwns, ftwns[arr_idx(ftwns, szFTwns, f_arr[i]) + 1]) + 1]);
    sum += sqrt(d1 * d1 - d2 * d2);
  }
  sum += atof(townsDist[arr_idx(townsDist, szFTwns, ftwns[arr_idx(ftwns, szFTwns, f_arr[szArrFriends - 1]) + 1]) + 1]);
  return floor(sum);
}
```