user: Demonstrate the C code that generates the assembly output below:

```asm
<PERM>:
  endbr64
  push   %r15
  push   %r14
  push   %r13
  mov    %edi,%r13d
  mov    %esi,%edi
  push   %r12
  or     %edx,%edi
  mov    %edx,%r12d
  push   %rbp
  or     %r13d,%edi
  push   %rbx
  not    %edi
  mov    %esi,%ebx
  shr    $0x1f,%edi
  sub    $0x68,%rsp
  mov    %fs:0x28,%rax
  mov    %rax,0x58(%rsp)
  xor    %eax,%eax
  mov    %rsp,%rbp
  call   <assert@plt>
  xor    %ecx,%ecx
L12:
  mov    %r13d,%eax
  sar    %cl,%eax
  and    $0x1,%eax
  mov    %eax,0x0(%rbp,%rcx,4)
  add    $0x1,%rcx
  cmp    $0x5,%rcx
  jne    L12
  lea    0x20(%rsp),%rax
  xor    %ecx,%ecx
  jmp    L8
  nop
L20:
  mov    %r12d,%edx
  sar    %cl,%edx
  and    $0x1,%edx
  mov    %edx,(%rax)
L19:
  add    $0x4,%rax
  mov    %esi,%ecx
L8:
  lea    0x1(%rcx),%esi
  cmp    $0x8,%ecx
  jbe    L20
  sub    $0x9,%ecx
  mov    %ebx,%edx
  sar    %cl,%edx
  and    $0x1,%edx
  mov    %edx,(%rax)
  cmp    $0xe,%esi
  jne    L19
  lea    0x4(%rsp),%r13
  lea    0x8(%rsp),%r14
  mov    0x54(%rsp),%edi
  mov    %r14,%rdx
  lea    0xc(%rsp),%r12
  lea    0x10(%rsp),%r15
  mov    %r13,%rsi
  call   <BFLY@plt>
  mov    0x50(%rsp),%edi
  mov    %r12,%rdx
  mov    %rbp,%rsi
  call   <BFLY@plt>
  mov    0x4c(%rsp),%edi
  mov    %r12,%rdx
  mov    %r13,%rsi
  call   <BFLY@plt>
  mov    0x48(%rsp),%edi
  mov    %r15,%rdx
  mov    %r14,%rsi
  call   <BFLY@plt>
  mov    0x44(%rsp),%edi
  mov    %r12,%rdx
  mov    %rbp,%rsi
  call   <BFLY@plt>
  mov    0x40(%rsp),%edi
  mov    %r15,%rdx
  mov    %r13,%rsi
  call   <BFLY@plt>
  mov    0x3c(%rsp),%edi
  mov    %r15,%rdx
  mov    %r12,%rsi
  call   <BFLY@plt>
  mov    0x38(%rsp),%edi
  mov    %r14,%rdx
  mov    %rbp,%rsi
  call   <BFLY@plt>
  mov    0x34(%rsp),%edi
  mov    %r12,%rdx
  mov    %r13,%rsi
  call   <BFLY@plt>
  mov    0x30(%rsp),%edi
  mov    %r15,%rdx
  mov    %rbp,%rsi
  call   <BFLY@plt>
  mov    0x2c(%rsp),%edi
  mov    %r15,%rdx
  mov    %r12,%rsi
  call   <BFLY@plt>
  mov    0x28(%rsp),%edi
  mov    %r14,%rdx
  mov    %r13,%rsi
  call   <BFLY@plt>
  mov    0x24(%rsp),%edi
  mov    %r12,%rdx
  mov    %r14,%rsi
  call   <BFLY@plt>
  mov    0x20(%rsp),%edi
  mov    %r13,%rdx
  mov    %rbp,%rsi
  call   <BFLY@plt>
  mov    0x4(%rsp),%eax
  mov    0xc(%rsp),%ebx
  lea    (%rax,%rax,1),%edx
  mov    0x8(%rsp),%eax
  and    $0x2,%edx
  add    (%rsp),%edx
  shl    $0x2,%eax
  and    $0x4,%eax
  add    %edx,%eax
  lea    0x0(,%rbx,8),%edx
  and    $0x8,%edx
  add    %eax,%edx
  mov    0x10(%rsp),%eax
  shl    $0x4,%eax
  and    $0x10,%eax
  add    %edx,%eax
  mov    0x58(%rsp),%rdx
  sub    %fs:0x28,%rdx
  jne    L24
  add    $0x68,%rsp
  pop    %rbx
  pop    %rbp
  pop    %r12
  pop    %r13
  pop    %r14
  pop    %r15
  ret
L24:
  call   <__stack_chk_fail@plt>
```

assistant: ```c
int PERM(int ip1, int ip2, int ip3) {
  int z[5], p[14], op;
  int i;
  assert(ip1 >= 0 && ip2 >= 0 && ip3 >= 0);
  for (i = 0; i < 5; i++)
    z[i] = (ip1 >> i) & 0x1;
  for (i = 0; i < 14; i++) {
    if (i < 9)
      p[i] = ((ip3 >> i) & 0x1);
    else
      p[i] = (ip2 >> (i - 9)) & 0x1;
  }
  BFLY(p[13], &z[1], &z[2]);
  BFLY(p[12], &z[0], &z[3]);
  BFLY(p[11], &z[1], &z[3]);
  BFLY(p[10], &z[2], &z[4]);
  BFLY(p[9], &z[0], &z[3]);
  BFLY(p[8], &z[1], &z[4]);
  BFLY(p[7], &z[3], &z[4]);
  BFLY(p[6], &z[0], &z[2]);
  BFLY(p[5], &z[1], &z[3]);
  BFLY(p[4], &z[0], &z[4]);
  BFLY(p[3], &z[3], &z[4]);
  BFLY(p[2], &z[1], &z[2]);
  BFLY(p[1], &z[2], &z[3]);
  BFLY(p[0], &z[0], &z[1]);
  op = z[0];
  op = op + ((z[1] << 1) & 0x02);
  op = op + ((z[2] << 2) & 0x04);
  op = op + ((z[3] << 3) & 0x08);
  op = op + ((z[4] << 4) & 0x10);
  return (op);
}
```