long getoctl(char *cp) {
  long val = 0;
  signed char c;
  while (*cp == ' ')
    cp++;
  while ((c = *cp++ - '0') >= 0 && c <= 7)
    val = val << 3 | c;
  return (val);
}


x86 assembly (clang, -O0):
<getoctl>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
movq   $0x0,-0x10(%rbp)
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x20,%eax
jne    1131 <getoctl+0x31>
mov    -0x8(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x8(%rbp)
jmp    1110 <getoctl+0x10>
jmp    1136 <getoctl+0x36>
mov    -0x8(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x8(%rbp)
movsbl (%rax),%eax
sub    $0x30,%eax
mov    %al,-0x11(%rbp)
movsbl %al,%ecx
xor    %eax,%eax
cmp    $0x0,%ecx
mov    %al,-0x12(%rbp)
jl     116c <getoctl+0x6c>
movsbl -0x11(%rbp),%eax
cmp    $0x7,%eax
setle  %al
mov    %al,-0x12(%rbp)
mov    -0x12(%rbp),%al
test   $0x1,%al
jne    117c <getoctl+0x7c>
jmp    1195 <getoctl+0x95>
mov    -0x10(%rbp),%rax
shl    $0x3,%rax
movsbq -0x11(%rbp),%rcx
or     %rcx,%rax
mov    %rax,-0x10(%rbp)
jmp    1136 <getoctl+0x36>
mov    -0x10(%rbp),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<getoctl>:
movzbl (%rdi),%ecx
add    $0x1,%rdi
cmp    $0x20,%cl
je     1100 <getoctl>
add    $0xd0,%cl
xor    %eax,%eax
cmp    $0x7,%cl
ja     1139 <getoctl+0x39>
cs nopw 0x0(%rax,%rax,1)
shl    $0x3,%rax
movzbl %cl,%ecx
or     %rcx,%rax
movzbl (%rdi),%ecx
add    $0xd0,%cl
add    $0x1,%rdi
cmp    $0x8,%cl
jb     1120 <getoctl+0x20>
ret

LLVM IR (-O0):
define i64 @getoctl(i8* %0) {
%2 = alloca i8*
%3 = alloca i64
%4 = alloca i8
store i8* %0, i8** %2
store i64 0, i64* %3
br label %5
5: ; preds = %10, %1
%6 = load i8*, i8** %2
%7 = load i8, i8* %6
%8 = sext i8 %7 to i32
%9 = icmp eq i32 %8, 32
br i1 %9, label %10, label %13
10: ; preds = %5
%11 = load i8*, i8** %2
%12 = getelementptr inbounds i8, i8* %11, i32 1
store i8* %12, i8** %2
br label %5
13: ; preds = %5
br label %14
14: ; preds = %29, %13
%15 = load i8*, i8** %2
%16 = getelementptr inbounds i8, i8* %15, i32 1
store i8* %16, i8** %2
%17 = load i8, i8* %15
%18 = sext i8 %17 to i32
%19 = sub nsw i32 %18, 48
%20 = trunc i32 %19 to i8
store i8 %20, i8* %4
%21 = sext i8 %20 to i32
%22 = icmp sge i32 %21, 0
br i1 %22, label %23, label %27
23: ; preds = %14
%24 = load i8, i8* %4
%25 = sext i8 %24 to i32
%26 = icmp sle i32 %25, 7
br label %27
27: ; preds = %23, %14
%28 = phi i1 [ false, %14 ], [ %26, %23 ]
br i1 %28, label %29, label %35
29: ; preds = %27
%30 = load i64, i64* %3
%31 = shl i64 %30, 3
%32 = load i8, i8* %4
%33 = sext i8 %32 to i64
%34 = or i64 %31, %33
store i64 %34, i64* %3
br label %14
35: ; preds = %27
%36 = load i64, i64* %3
ret i64 %36
}

LLVM IR (-O2):
define i64 @getoctl(i8* nocapture %0) {
br label %2
2: ; preds = %2, %1
%3 = phi i8* [ %0, %1 ], [ %6, %2 ]
%4 = load i8, i8* %3
%5 = icmp eq i8 %4, 32
%6 = getelementptr inbounds i8, i8* %3, i64 1
br i1 %5, label %2, label %7
7: ; preds = %2
%8 = add i8 %4, -48
%9 = icmp ult i8 %8, 8
br i1 %9, label %10, label %21
10: ; preds = %7, %10
%11 = phi i8 [ %19, %10 ], [ %8, %7 ]
%12 = phi i8* [ %14, %10 ], [ %3, %7 ]
%13 = phi i64 [ %17, %10 ], [ 0, %7 ]
%14 = getelementptr inbounds i8, i8* %12, i64 1
%15 = shl i64 %13, 3
%16 = zext i8 %11 to i64
%17 = or i64 %15, %16
%18 = load i8, i8* %14
%19 = add i8 %18, -48
%20 = icmp ult i8 %19, 8
br i1 %20, label %10, label %21
21: ; preds = %10, %7
%22 = phi i64 [ 0, %7 ], [ %17, %10 ]
ret i64 %22
}