int decode(cblock, pblock, perm)
char cblock[];
int pblock[];
int perm[];
{
  int iplace;
  int spchar;
  int pchar;
  int good;
  good = 1;
  for (iplace = 0; iplace < 256; iplace++) {
    spchar = perm[(iplace + cblock[iplace]) & 0377];
    if (spchar == -1) {
      pchar = -1;
    } else {
      pchar = (spchar - iplace) & 0377;
      if ((pchar > 127)) {
        good = 0;
      }
    }
    pblock[iplace] = pchar;
  }
  return (good);
}


x86 assembly (clang, -O0):
<decode>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
movl   $0x1,-0x28(%rbp)
movl   $0x0,-0x1c(%rbp)
cmpl   $0x100,-0x1c(%rbp)
jge    11a5 <decode+0xa5>
mov    -0x18(%rbp),%rax
mov    -0x1c(%rbp),%ecx
mov    -0x8(%rbp),%rdx
movslq -0x1c(%rbp),%rsi
movsbl (%rdx,%rsi,1),%edx
add    %edx,%ecx
and    $0xff,%ecx
movslq %ecx,%rcx
mov    (%rax,%rcx,4),%eax
mov    %eax,-0x20(%rbp)
cmpl   $0xffffffff,-0x20(%rbp)
jne    1165 <decode+0x65>
movl   $0xffffffff,-0x24(%rbp)
jmp    1189 <decode+0x89>
mov    -0x20(%rbp),%eax
sub    -0x1c(%rbp),%eax
and    $0xff,%eax
mov    %eax,-0x24(%rbp)
cmpl   $0x7f,-0x24(%rbp)
jle    1184 <decode+0x84>
movl   $0x0,-0x28(%rbp)
jmp    1189 <decode+0x89>
mov    -0x24(%rbp),%edx
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    %edx,(%rax,%rcx,4)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    111e <decode+0x1e>
mov    -0x28(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<decode>:
push   %rbx
mov    $0x1,%eax
xor    %r8d,%r8d
xor    %r9d,%r9d
xor    %r11d,%r11d
nop
mov    %eax,%r10d
movzbl (%rdi,%r11,1),%ecx
add    %r11d,%ecx
movzbl %cl,%ecx
mov    (%rdx,%rcx,4),%ecx
lea    (%r9,%rcx,1),%ebx
movzbl %bl,%ebx
cmp    $0x7f,%ebx
cmova  %r8d,%eax
cmp    $0xffffffff,%ecx
cmove  %ecx,%ebx
cmove  %r10d,%eax
mov    %ebx,(%rsi,%r11,4)
add    $0x1,%r11
add    $0xffffffff,%r9d
cmp    $0x100,%r11
jne    1110 <decode+0x10>
pop    %rbx
ret

LLVM IR (-O0):
define i32 @decode(i8* %0, i32* %1, i32* %2) {
%4 = alloca i8*
%5 = alloca i32*
%6 = alloca i32*
%7 = alloca i32
%8 = alloca i32
%9 = alloca i32
%10 = alloca i32
store i8* %0, i8** %4
store i32* %1, i32** %5
store i32* %2, i32** %6
store i32 1, i32* %10
store i32 0, i32* %7
br label %11
11: ; preds = %46, %3
%12 = load i32, i32* %7
%13 = icmp slt i32 %12, 256
br i1 %13, label %14, label %49
14: ; preds = %11
%15 = load i32*, i32** %6
%16 = load i32, i32* %7
%17 = load i8*, i8** %4
%18 = load i32, i32* %7
%19 = sext i32 %18 to i64
%20 = getelementptr inbounds i8, i8* %17, i64 %19
%21 = load i8, i8* %20
%22 = sext i8 %21 to i32
%23 = add nsw i32 %16, %22
%24 = and i32 %23, 255
%25 = sext i32 %24 to i64
%26 = getelementptr inbounds i32, i32* %15, i64 %25
%27 = load i32, i32* %26
store i32 %27, i32* %8
%28 = load i32, i32* %8
%29 = icmp eq i32 %28, -1
br i1 %29, label %30, label %31
30: ; preds = %14
store i32 -1, i32* %9
br label %40
31: ; preds = %14
%32 = load i32, i32* %8
%33 = load i32, i32* %7
%34 = sub nsw i32 %32, %33
%35 = and i32 %34, 255
store i32 %35, i32* %9
%36 = load i32, i32* %9
%37 = icmp sgt i32 %36, 127
br i1 %37, label %38, label %39
38: ; preds = %31
store i32 0, i32* %10
br label %39
39: ; preds = %38, %31
br label %40
40: ; preds = %39, %30
%41 = load i32, i32* %9
%42 = load i32*, i32** %5
%43 = load i32, i32* %7
%44 = sext i32 %43 to i64
%45 = getelementptr inbounds i32, i32* %42, i64 %44
store i32 %41, i32* %45
br label %46
46: ; preds = %40
%47 = load i32, i32* %7
%48 = add nsw i32 %47, 1
store i32 %48, i32* %7
br label %11
49: ; preds = %11
%50 = load i32, i32* %10
ret i32 %50
}

LLVM IR (-O2):
define i32 @decode(i8* nocapture %0, i32* nocapture writeonly %1, i32* nocapture %2) {
br label %4
4: ; preds = %3, %4
%5 = phi i64 [ 0, %3 ], [ %23, %4 ]
%6 = phi i32 [ 1, %3 ], [ %21, %4 ]
%7 = getelementptr inbounds i8, i8* %0, i64 %5
%8 = load i8, i8* %7
%9 = zext i8 %8 to i64
%10 = trunc i64 %5 to i32
%11 = add nuw i64 %5, %9
%12 = and i64 %11, 255
%13 = getelementptr inbounds i32, i32* %2, i64 %12
%14 = load i32, i32* %13
%15 = icmp eq i32 %14, -1
%16 = sub nsw i32 %14, %10
%17 = and i32 %16, 255
%18 = icmp ugt i32 %17, 127
%19 = select i1 %18, i32 0, i32 %6
%20 = select i1 %15, i32 -1, i32 %17
%21 = select i1 %15, i32 %6, i32 %19
%22 = getelementptr inbounds i32, i32* %1, i64 %5
store i32 %20, i32* %22
%23 = add nuw nsw i64 %5, 1
%24 = icmp eq i64 %23, 256
br i1 %24, label %25, label %4
25: ; preds = %4
ret i32 %21
}