#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */

/* Variables and functions */
long NJ_genrand_int31_top(long);
int /*<<< orphan*/ exit(int);
int /*<<< orphan*/ fprintf(int /*<<< orphan*/, char *);
int /*<<< orphan*/ stderr;
void NJ_permute(long int *perm, long int size) {
  long int i;
  long int swap;
  long int tmp;
  if (!perm) {
    fprintf(stderr, "Clearcut: NULL permutation pointer in NJ_permute()\n");
    exit(-1);
  }
  for (i = 0; i < size; i++) {
    perm[i] = i;
  }
  for (i = 0; i < size; i++) {
    swap = i + NJ_genrand_int31_top(size - i);
    if (i != swap) {
      tmp = perm[swap];
      perm[swap] = perm[i];
      perm[i] = tmp;
    }
  }
  return;
}


x86 assembly (clang, -O0):
<NJ_permute>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
cmpq   $0x0,-0x8(%rbp)
jne    116a <NJ_permute+0x3a>
mov    0x2e8e(%rip),%rax
mov    (%rax),%edi
lea    0xea5(%rip),%rsi
call   1040 <fprintf@plt>
mov    $0xffffffff,%edi
call   1050 <exit@plt>
movq   $0x0,-0x18(%rbp)
mov    -0x18(%rbp),%rax
cmp    -0x10(%rbp),%rax
jge    11a1 <NJ_permute+0x71>
mov    -0x18(%rbp),%rdx
mov    -0x8(%rbp),%rax
mov    -0x18(%rbp),%rcx
mov    %rdx,(%rax,%rcx,8)
mov    -0x18(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x18(%rbp)
jmp    1172 <NJ_permute+0x42>
movq   $0x0,-0x18(%rbp)
mov    -0x18(%rbp),%rax
cmp    -0x10(%rbp),%rax
jge    1236 <NJ_permute+0x106>
mov    -0x18(%rbp),%rax
mov    %rax,-0x30(%rbp)
mov    -0x10(%rbp),%rdi
sub    -0x18(%rbp),%rdi
call   1030 <NJ_genrand_int31_top@plt>
mov    %rax,%rcx
mov    -0x30(%rbp),%rax
add    %rcx,%rax
mov    %rax,-0x20(%rbp)
mov    -0x18(%rbp),%rax
cmp    -0x20(%rbp),%rax
je     1220 <NJ_permute+0xf0>
mov    -0x8(%rbp),%rax
mov    -0x20(%rbp),%rcx
mov    (%rax,%rcx,8),%rax
mov    %rax,-0x28(%rbp)
mov    -0x8(%rbp),%rax
mov    -0x18(%rbp),%rcx
mov    (%rax,%rcx,8),%rdx
mov    -0x8(%rbp),%rax
mov    -0x20(%rbp),%rcx
mov    %rdx,(%rax,%rcx,8)
mov    -0x28(%rbp),%rdx
mov    -0x8(%rbp),%rax
mov    -0x18(%rbp),%rcx
mov    %rdx,(%rax,%rcx,8)
jmp    1225 <NJ_permute+0xf5>
mov    -0x18(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x18(%rbp)
jmp    11a9 <NJ_permute+0x79>
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<NJ_permute>:
push   %r15
push   %r14
push   %rbx
test   %rdi,%rdi
je     1312 <NJ_permute+0x1e2>
mov    %rsi,%r15
test   %rsi,%rsi
jle    130c <NJ_permute+0x1dc>
mov    %rdi,%r14
cmp    $0x4,%r15
jae    115a <NJ_permute+0x2a>
xor    %eax,%eax
jmp    12c0 <NJ_permute+0x190>
mov    %r15,%rax
and    $0xfffffffffffffffc,%rax
lea    -0x4(%rax),%rsi
mov    %rsi,%rdx
shr    $0x2,%rdx
add    $0x1,%rdx
mov    %edx,%ecx
and    $0x3,%ecx
cmp    $0xc,%rsi
jae    118a <NJ_permute+0x5a>
movdqa 0xe7d(%rip),%xmm0
xor    %esi,%esi
jmp    1260 <NJ_permute+0x130>
and    $0xfffffffffffffffc,%rdx
movdqa 0xe6a(%rip),%xmm0
xor    %esi,%esi
movdqa 0xe6f(%rip),%xmm8
movdqa 0xe76(%rip),%xmm9
movdqa 0xe7d(%rip),%xmm10
movdqa 0xe85(%rip),%xmm4
movdqa 0xe8d(%rip),%xmm5
movdqa 0xe95(%rip),%xmm6
movdqa 0xe9d(%rip),%xmm7
movdqa 0xea5(%rip),%xmm1
nopl   0x0(%rax,%rax,1)
movdqa %xmm0,%xmm2
paddq  %xmm8,%xmm2
movdqu %xmm0,(%r14,%rsi,8)
movdqu %xmm2,0x10(%r14,%rsi,8)
movdqa %xmm0,%xmm2
paddq  %xmm9,%xmm2
movdqa %xmm0,%xmm3
paddq  %xmm10,%xmm3
movdqu %xmm2,0x20(%r14,%rsi,8)
movdqu %xmm3,0x30(%r14,%rsi,8)
movdqa %xmm0,%xmm2
paddq  %xmm4,%xmm2
movdqa %xmm0,%xmm3
paddq  %xmm5,%xmm3
movdqu %xmm2,0x40(%r14,%rsi,8)
movdqu %xmm3,0x50(%r14,%rsi,8)
movdqa %xmm0,%xmm2
paddq  %xmm6,%xmm2
movdqa %xmm0,%xmm3
paddq  %xmm7,%xmm3
movdqu %xmm2,0x60(%r14,%rsi,8)
movdqu %xmm3,0x70(%r14,%rsi,8)
add    $0x10,%rsi
paddq  %xmm1,%xmm0
add    $0xfffffffffffffffc,%rdx
jne    11e0 <NJ_permute+0xb0>
test   %rcx,%rcx
je     12b0 <NJ_permute+0x180>
lea    (%r14,%rsi,8),%rdx
add    $0x10,%rdx
shl    $0x5,%rcx
xor    %esi,%esi
movdqa 0xd95(%rip),%xmm1
movdqa 0xd9d(%rip),%xmm2
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
movdqa %xmm0,%xmm3
paddq  %xmm1,%xmm3
movdqu %xmm0,-0x10(%rdx,%rsi,1)
movdqu %xmm3,(%rdx,%rsi,1)
paddq  %xmm2,%xmm0
add    $0x20,%rsi
cmp    %rsi,%rcx
jne    1290 <NJ_permute+0x160>
cmp    %r15,%rax
je     12cd <NJ_permute+0x19d>
cs nopw 0x0(%rax,%rax,1)
nop
mov    %rax,(%r14,%rax,8)
add    $0x1,%rax
cmp    %rax,%r15
jne    12c0 <NJ_permute+0x190>
test   %r15,%r15
jle    130c <NJ_permute+0x1dc>
xor    %ebx,%ebx
jmp    12ea <NJ_permute+0x1ba>
cs nopw 0x0(%rax,%rax,1)
add    $0x1,%rbx
add    $0xffffffffffffffff,%r15
je     130c <NJ_permute+0x1dc>
mov    %r15,%rdi
call   1030 <NJ_genrand_int31_top@plt>
test   %rax,%rax
je     12e0 <NJ_permute+0x1b0>
add    %rbx,%rax
mov    (%r14,%rax,8),%rcx
mov    (%r14,%rbx,8),%rdx
mov    %rdx,(%r14,%rax,8)
mov    %rcx,(%r14,%rbx,8)
jmp    12e0 <NJ_permute+0x1b0>
pop    %rbx
pop    %r14
pop    %r15
ret
mov    0x2cc7(%rip),%rax
mov    (%rax),%edi
lea    0xd6e(%rip),%rsi
call   1040 <fprintf@plt>
mov    $0xffffffff,%edi
call   1050 <exit@plt>

LLVM IR (-O0):
@stderr = global i32 0
@.str = [52 x i8] c"Clearcut: NULL permutation pointer in NJ_permute()\0A\00"
define void @NJ_permute(i64* %0, i64 %1) {
%3 = alloca i64*
%4 = alloca i64
%5 = alloca i64
%6 = alloca i64
%7 = alloca i64
store i64* %0, i64** %3
store i64 %1, i64* %4
%8 = load i64*, i64** %3
%9 = icmp ne i64* %8, null
br i1 %9, label %14, label %10
10: ; preds = %2
%11 = load i32, i32* @stderr
%12 = call i32 @fprintf(i32 %11, i8* getelementptr inbounds ([52 x i8], [52 x i8]* @.str, i64 0, i64 0))
%13 = call i32 @exit(i32 -1)
unreachable
14: ; preds = %2
store i64 0, i64* %5
br label %15
15: ; preds = %24, %14
%16 = load i64, i64* %5
%17 = load i64, i64* %4
%18 = icmp slt i64 %16, %17
br i1 %18, label %19, label %27
19: ; preds = %15
%20 = load i64, i64* %5
%21 = load i64*, i64** %3
%22 = load i64, i64* %5
%23 = getelementptr inbounds i64, i64* %21, i64 %22
store i64 %20, i64* %23
br label %24
24: ; preds = %19
%25 = load i64, i64* %5
%26 = add nsw i64 %25, 1
store i64 %26, i64* %5
br label %15
27: ; preds = %15
store i64 0, i64* %5
br label %28
28: ; preds = %59, %27
%29 = load i64, i64* %5
%30 = load i64, i64* %4
%31 = icmp slt i64 %29, %30
br i1 %31, label %32, label %62
32: ; preds = %28
%33 = load i64, i64* %5
%34 = load i64, i64* %4
%35 = load i64, i64* %5
%36 = sub nsw i64 %34, %35
%37 = call i64 @NJ_genrand_int31_top(i64 %36)
%38 = add nsw i64 %33, %37
store i64 %38, i64* %6
%39 = load i64, i64* %5
%40 = load i64, i64* %6
%41 = icmp ne i64 %39, %40
br i1 %41, label %42, label %58
42: ; preds = %32
%43 = load i64*, i64** %3
%44 = load i64, i64* %6
%45 = getelementptr inbounds i64, i64* %43, i64 %44
%46 = load i64, i64* %45
store i64 %46, i64* %7
%47 = load i64*, i64** %3
%48 = load i64, i64* %5
%49 = getelementptr inbounds i64, i64* %47, i64 %48
%50 = load i64, i64* %49
%51 = load i64*, i64** %3
%52 = load i64, i64* %6
%53 = getelementptr inbounds i64, i64* %51, i64 %52
store i64 %50, i64* %53
%54 = load i64, i64* %7
%55 = load i64*, i64** %3
%56 = load i64, i64* %5
%57 = getelementptr inbounds i64, i64* %55, i64 %56
store i64 %54, i64* %57
br label %58
58: ; preds = %42, %32
br label %59
59: ; preds = %58
%60 = load i64, i64* %5
%61 = add nsw i64 %60, 1
store i64 %61, i64* %5
br label %28
62: ; preds = %28
ret void
}

LLVM IR (-O2):
@stderr = global i32 0
@.str = [52 x i8] c"Clearcut: NULL permutation pointer in NJ_permute()\0A\00"
define void @NJ_permute(i64* %0, i64 %1) {
%3 = icmp eq i64* %0, null
br i1 %3, label %72, label %4
4: ; preds = %2
%5 = icmp sgt i64 %1, 0
br i1 %5, label %6, label %96
6: ; preds = %4
%7 = icmp ult i64 %1, 4
br i1 %7, label %70, label %8
8: ; preds = %6
%9 = and i64 %1, -4
%10 = add i64 %9, -4
%11 = lshr exact i64 %10, 2
%12 = add nuw nsw i64 %11, 1
%13 = and i64 %12, 3
%14 = icmp ult i64 %10, 12
br i1 %14, label %51, label %15
15: ; preds = %8
%16 = and i64 %12, 9223372036854775804
br label %17
17: ; preds = %17, %15
%18 = phi i64 [ 0, %15 ], [ %47, %17 ]
%19 = phi <2 x i64> [ <i64 0, i64 1>, %15 ], [ %48, %17 ]
%20 = phi i64 [ 0, %15 ], [ %49, %17 ]
%21 = add <2 x i64> %19, <i64 2, i64 2>
%22 = getelementptr inbounds i64, i64* %0, i64 %18
%23 = bitcast i64* %22 to <2 x i64>*
store <2 x i64> %19, <2 x i64>* %23
%24 = getelementptr inbounds i64, i64* %22, i64 2
%25 = bitcast i64* %24 to <2 x i64>*
store <2 x i64> %21, <2 x i64>* %25
%26 = or i64 %18, 4
%27 = add <2 x i64> %19, <i64 4, i64 4>
%28 = add <2 x i64> %19, <i64 6, i64 6>
%29 = getelementptr inbounds i64, i64* %0, i64 %26
%30 = bitcast i64* %29 to <2 x i64>*
store <2 x i64> %27, <2 x i64>* %30
%31 = getelementptr inbounds i64, i64* %29, i64 2
%32 = bitcast i64* %31 to <2 x i64>*
store <2 x i64> %28, <2 x i64>* %32
%33 = or i64 %18, 8
%34 = add <2 x i64> %19, <i64 8, i64 8>
%35 = add <2 x i64> %19, <i64 10, i64 10>
%36 = getelementptr inbounds i64, i64* %0, i64 %33
%37 = bitcast i64* %36 to <2 x i64>*
store <2 x i64> %34, <2 x i64>* %37
%38 = getelementptr inbounds i64, i64* %36, i64 2
%39 = bitcast i64* %38 to <2 x i64>*
store <2 x i64> %35, <2 x i64>* %39
%40 = or i64 %18, 12
%41 = add <2 x i64> %19, <i64 12, i64 12>
%42 = add <2 x i64> %19, <i64 14, i64 14>
%43 = getelementptr inbounds i64, i64* %0, i64 %40
%44 = bitcast i64* %43 to <2 x i64>*
store <2 x i64> %41, <2 x i64>* %44
%45 = getelementptr inbounds i64, i64* %43, i64 2
%46 = bitcast i64* %45 to <2 x i64>*
store <2 x i64> %42, <2 x i64>* %46
%47 = add nuw i64 %18, 16
%48 = add <2 x i64> %19, <i64 16, i64 16>
%49 = add nuw i64 %20, 4
%50 = icmp eq i64 %49, %16
br i1 %50, label %51, label %17
51: ; preds = %17, %8
%52 = phi i64 [ 0, %8 ], [ %47, %17 ]
%53 = phi <2 x i64> [ <i64 0, i64 1>, %8 ], [ %48, %17 ]
%54 = icmp eq i64 %13, 0
br i1 %54, label %68, label %55
55: ; preds = %51, %55
%56 = phi i64 [ %64, %55 ], [ %52, %51 ]
%57 = phi <2 x i64> [ %65, %55 ], [ %53, %51 ]
%58 = phi i64 [ %66, %55 ], [ 0, %51 ]
%59 = add <2 x i64> %57, <i64 2, i64 2>
%60 = getelementptr inbounds i64, i64* %0, i64 %56
%61 = bitcast i64* %60 to <2 x i64>*
store <2 x i64> %57, <2 x i64>* %61
%62 = getelementptr inbounds i64, i64* %60, i64 2
%63 = bitcast i64* %62 to <2 x i64>*
store <2 x i64> %59, <2 x i64>* %63
%64 = add nuw i64 %56, 4
%65 = add <2 x i64> %57, <i64 4, i64 4>
%66 = add i64 %58, 1
%67 = icmp eq i64 %66, %13
br i1 %67, label %68, label %55
68: ; preds = %55, %51
%69 = icmp eq i64 %9, %1
br i1 %69, label %76, label %70
70: ; preds = %6, %68
%71 = phi i64 [ 0, %6 ], [ %9, %68 ]
br label %77
72: ; preds = %2
%73 = load i32, i32* @stderr
%74 = tail call i32 @fprintf(i32 %73, i8* getelementptr inbounds ([52 x i8], [52 x i8]* @.str, i64 0, i64 0))
%75 = tail call i32 @exit(i32 -1)
unreachable
76: ; preds = %77, %68
br i1 %5, label %82, label %96
77: ; preds = %70, %77
%78 = phi i64 [ %80, %77 ], [ %71, %70 ]
%79 = getelementptr inbounds i64, i64* %0, i64 %78
store i64 %78, i64* %79
%80 = add nuw nsw i64 %78, 1
%81 = icmp eq i64 %80, %1
br i1 %81, label %76, label %77
82: ; preds = %76, %93
%83 = phi i64 [ %94, %93 ], [ 0, %76 ]
%84 = sub nsw i64 %1, %83
%85 = tail call i64 @NJ_genrand_int31_top(i64 %84)
%86 = icmp eq i64 %85, 0
br i1 %86, label %93, label %87
87: ; preds = %82
%88 = add nsw i64 %85, %83
%89 = getelementptr inbounds i64, i64* %0, i64 %88
%90 = load i64, i64* %89
%91 = getelementptr inbounds i64, i64* %0, i64 %83
%92 = load i64, i64* %91
store i64 %92, i64* %89
store i64 %90, i64* %91
br label %93
93: ; preds = %82, %87
%94 = add nuw nsw i64 %83, 1
%95 = icmp eq i64 %94, %1
br i1 %95, label %96, label %82
96: ; preds = %93, %4, %76
ret void
}