void shuffle(char deck[], char *buf, long *seed) {
  int i, ic, k, temp;
  unsigned random;
  *seed = 123;
  for (i = 0; i < 256; i++) {
    *seed = 5 * *seed + buf[i % 13];
    random = *seed % 65521;
    k = 256 - 1 - i;
    ic = (random & 0377) % (k + 1);
    temp = deck[k];
    deck[k] = deck[ic];
    deck[ic] = temp;
  }
}


x86 assembly (clang, -O0):
<shuffle>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    -0x18(%rbp),%rax
movq   $0x7b,(%rax)
movl   $0x0,-0x1c(%rbp)
cmpl   $0x100,-0x1c(%rbp)
jge    11d9 <shuffle+0xd9>
mov    -0x18(%rbp),%rax
imul   $0x5,(%rax),%rcx
mov    -0x10(%rbp),%rax
mov    %rax,-0x38(%rbp)
mov    -0x1c(%rbp),%eax
mov    $0xd,%esi
cltd
idiv   %esi
mov    -0x38(%rbp),%rax
movslq %edx,%rdx
movsbq (%rax,%rdx,1),%rax
add    %rax,%rcx
mov    -0x18(%rbp),%rax
mov    %rcx,(%rax)
mov    -0x18(%rbp),%rax
mov    (%rax),%rax
mov    $0xfff1,%ecx
cqto
idiv   %rcx
mov    %edx,%eax
mov    %eax,-0x2c(%rbp)
mov    $0xff,%eax
sub    -0x1c(%rbp),%eax
mov    %eax,-0x24(%rbp)
mov    -0x2c(%rbp),%eax
and    $0xff,%eax
mov    -0x24(%rbp),%ecx
add    $0x1,%ecx
xor    %edx,%edx
div    %ecx
mov    %edx,-0x20(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x24(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
mov    %eax,-0x28(%rbp)
mov    -0x8(%rbp),%rax
movslq -0x20(%rbp),%rcx
mov    (%rax,%rcx,1),%dl
mov    -0x8(%rbp),%rax
movslq -0x24(%rbp),%rcx
mov    %dl,(%rax,%rcx,1)
mov    -0x28(%rbp),%eax
mov    %al,%dl
mov    -0x8(%rbp),%rax
movslq -0x20(%rbp),%rcx
mov    %dl,(%rax,%rcx,1)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    1122 <shuffle+0x22>
pop    %rbp
ret

x86 assembly (clang, -O2):
<shuffle>:
push   %rbx
mov    %rdx,%r8
movq   $0x7b,(%rdx)
mov    $0x7b,%ecx
mov    $0xff,%r10d
movabs $0x4ec4ec4ec4ec4ec5,%r11
ec c4 4e
movabs $0x800780708697e2e7,%rbx
80 07 80
xor    %r9d,%r9d
nopl   (%rax)
mov    %r9,%rax
mul    %r11
shr    $0x2,%rdx
imul   $0xfffffffffffffff3,%rdx,%rax
lea    (%rcx,%rcx,4),%rdx
movsbq (%rsi,%rax,1),%rcx
add    %rdx,%rcx
mov    %rcx,(%r8)
mov    %rcx,%rax
imul   %rbx
add    %rcx,%rdx
mov    %rdx,%rax
shr    $0x3f,%rax
shr    $0xf,%edx
add    %eax,%edx
imul   $0xfff1,%edx,%eax
sub    %eax,%ecx
movzbl %cl,%eax
lea    0x1(%r10),%ecx
xor    %edx,%edx
div    %cx
movzbl (%rdi,%r10,1),%eax
movzwl %dx,%ecx
movzbl (%rdi,%rcx,1),%edx
mov    %dl,(%rdi,%r10,1)
mov    %al,(%rdi,%rcx,1)
sub    $0x1,%r10
jb     119c <shuffle+0x9c>
mov    (%r8),%rcx
add    $0x1,%rsi
add    $0x1,%r9
jmp    1130 <shuffle+0x30>
pop    %rbx
ret

LLVM IR (-O0):
define void @shuffle(i8* %0, i8* %1, i64* %2) {
%4 = alloca i8*
%5 = alloca i8*
%6 = alloca i64*
%7 = alloca i32
%8 = alloca i32
%9 = alloca i32
%10 = alloca i32
%11 = alloca i32
store i8* %0, i8** %4
store i8* %1, i8** %5
store i64* %2, i64** %6
%12 = load i64*, i64** %6
store i64 123, i64* %12
store i32 0, i32* %7
br label %13
13: ; preds = %61, %3
%14 = load i32, i32* %7
%15 = icmp slt i32 %14, 256
br i1 %15, label %16, label %64
16: ; preds = %13
%17 = load i64*, i64** %6
%18 = load i64, i64* %17
%19 = mul nsw i64 5, %18
%20 = load i8*, i8** %5
%21 = load i32, i32* %7
%22 = srem i32 %21, 13
%23 = sext i32 %22 to i64
%24 = getelementptr inbounds i8, i8* %20, i64 %23
%25 = load i8, i8* %24
%26 = sext i8 %25 to i64
%27 = add nsw i64 %19, %26
%28 = load i64*, i64** %6
store i64 %27, i64* %28
%29 = load i64*, i64** %6
%30 = load i64, i64* %29
%31 = srem i64 %30, 65521
%32 = trunc i64 %31 to i32
store i32 %32, i32* %11
%33 = load i32, i32* %7
%34 = sub nsw i32 255, %33
store i32 %34, i32* %9
%35 = load i32, i32* %11
%36 = and i32 %35, 255
%37 = load i32, i32* %9
%38 = add nsw i32 %37, 1
%39 = urem i32 %36, %38
store i32 %39, i32* %8
%40 = load i8*, i8** %4
%41 = load i32, i32* %9
%42 = sext i32 %41 to i64
%43 = getelementptr inbounds i8, i8* %40, i64 %42
%44 = load i8, i8* %43
%45 = sext i8 %44 to i32
store i32 %45, i32* %10
%46 = load i8*, i8** %4
%47 = load i32, i32* %8
%48 = sext i32 %47 to i64
%49 = getelementptr inbounds i8, i8* %46, i64 %48
%50 = load i8, i8* %49
%51 = load i8*, i8** %4
%52 = load i32, i32* %9
%53 = sext i32 %52 to i64
%54 = getelementptr inbounds i8, i8* %51, i64 %53
store i8 %50, i8* %54
%55 = load i32, i32* %10
%56 = trunc i32 %55 to i8
%57 = load i8*, i8** %4
%58 = load i32, i32* %8
%59 = sext i32 %58 to i64
%60 = getelementptr inbounds i8, i8* %57, i64 %59
store i8 %56, i8* %60
br label %61
61: ; preds = %16
%62 = load i32, i32* %7
%63 = add nsw i32 %62, 1
store i32 %63, i32* %7
br label %13
64: ; preds = %13
ret void
}

LLVM IR (-O2):
define void @shuffle(i8* nocapture %0, i8* nocapture %1, i64* nocapture %2) {
store i64 123, i64* %2
br label %4
4: ; preds = %29, %3
%5 = phi i64 [ 123, %3 ], [ %30, %29 ]
%6 = phi i64 [ 0, %3 ], [ %27, %29 ]
%7 = mul nsw i64 %5, 5
%8 = trunc i64 %6 to i8
%9 = urem i8 %8, 13
%10 = zext i8 %9 to i64
%11 = getelementptr inbounds i8, i8* %1, i64 %10
%12 = load i8, i8* %11
%13 = sext i8 %12 to i64
%14 = add nsw i64 %7, %13
store i64 %14, i64* %2
%15 = srem i64 %14, 65521
%16 = trunc i64 %15 to i16
%17 = sub nuw nsw i64 255, %6
%18 = and i16 %16, 255
%19 = trunc i64 %6 to i16
%20 = sub i16 256, %19
%21 = urem i16 %18, %20
%22 = getelementptr inbounds i8, i8* %0, i64 %17
%23 = load i8, i8* %22
%24 = zext i16 %21 to i64
%25 = getelementptr inbounds i8, i8* %0, i64 %24
%26 = load i8, i8* %25
store i8 %26, i8* %22
store i8 %23, i8* %25
%27 = add nuw nsw i64 %6, 1
%28 = icmp eq i64 %27, 256
br i1 %28, label %31, label %29
29: ; preds = %4
%30 = load i64, i64* %2
br label %4
31: ; preds = %4
ret void
}