void *K2P(char *K) {
  int c0, dc;
  void *r;
  unsigned char *p, *e;
  unsigned int j;
  p = (unsigned char *)(&r);
  e = p + sizeof(void *);
  c0 = 1;
  dc = 0;
  j = 0;
  while (c0 && (p != e)) {
    j |= (*K & 0x7f) << dc;
    if (*K & 0x80) {
      c0++;
    } else {
      c0--;
    }
    if (dc >= 1) {
      *p++ = j;
      j = j >> 8;
      dc--;
    } else {
      dc += 7;
    }
    K++;
  }
  while (p != e) {
    *p++ = j;
    j = j >> 8;
  }
  return r;
}


x86 assembly (clang, -O0):
<K2P>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
lea    -0x18(%rbp),%rax
mov    %rax,-0x20(%rbp)
mov    -0x20(%rbp),%rax
add    $0x8,%rax
mov    %rax,-0x28(%rbp)
movl   $0x1,-0xc(%rbp)
movl   $0x0,-0x10(%rbp)
movl   $0x0,-0x2c(%rbp)
xor    %eax,%eax
cmpl   $0x0,-0xc(%rbp)
mov    %al,-0x2d(%rbp)
je     114e <K2P+0x4e>
mov    -0x20(%rbp),%rax
cmp    -0x28(%rbp),%rax
setne  %al
mov    %al,-0x2d(%rbp)
mov    -0x2d(%rbp),%al
test   $0x1,%al
jne    115e <K2P+0x5e>
jmp    11f0 <K2P+0xf0>
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
and    $0x7f,%eax
mov    -0x10(%rbp),%ecx
shl    %cl,%eax
or     -0x2c(%rbp),%eax
mov    %eax,-0x2c(%rbp)
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
and    $0x80,%eax
cmp    $0x0,%eax
je     1196 <K2P+0x96>
mov    -0xc(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0xc(%rbp)
jmp    119f <K2P+0x9f>
mov    -0xc(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0xc(%rbp)
cmpl   $0x1,-0x10(%rbp)
jl     11d6 <K2P+0xd6>
mov    -0x2c(%rbp),%eax
mov    %al,%cl
mov    -0x20(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x20(%rbp)
mov    %cl,(%rax)
mov    -0x2c(%rbp),%eax
shr    $0x8,%eax
mov    %eax,-0x2c(%rbp)
mov    -0x10(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x10(%rbp)
jmp    11df <K2P+0xdf>
mov    -0x10(%rbp),%eax
add    $0x7,%eax
mov    %eax,-0x10(%rbp)
mov    -0x8(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x8(%rbp)
jmp    1131 <K2P+0x31>
jmp    11f5 <K2P+0xf5>
mov    -0x20(%rbp),%rax
cmp    -0x28(%rbp),%rax
je     1227 <K2P+0x127>
mov    -0x2c(%rbp),%eax
mov    %al,%cl
mov    -0x20(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x20(%rbp)
mov    %cl,(%rax)
mov    -0x2c(%rbp),%eax
shr    $0x8,%eax
mov    %eax,-0x2c(%rbp)
jmp    11f5 <K2P+0xf5>
mov    -0x18(%rbp),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<K2P>:
push   %rbx
lea    -0x8(%rsp),%rax
mov    $0x1,%esi
xor    %edx,%edx
lea    (%rsp),%r8
xor    %ecx,%ecx
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
mov    %esi,%r9d
mov    %edx,%esi
movzbl (%rdi),%ebx
mov    %ebx,%edx
and    $0x7f,%edx
shl    %cl,%edx
or     %esi,%edx
and    $0xffffff80,%ebx
cmp    $0x1,%ebx
sbb    %esi,%esi
or     $0x1,%esi
add    %r9d,%esi
test   %ecx,%ecx
jle    1160 <K2P+0x60>
mov    %dl,(%rax)
add    $0x1,%rax
shr    $0x8,%edx
add    $0xffffffff,%ecx
test   %esi,%esi
jne    1169 <K2P+0x69>
jmp    1172 <K2P+0x72>
cs nopw 0x0(%rax,%rax,1)
nop
mov    $0x7,%ecx
test   %esi,%esi
je     1172 <K2P+0x72>
add    $0x1,%rdi
cmp    %r8,%rax
jne    1120 <K2P+0x20>
cmp    %r8,%rax
je     11d5 <K2P+0xd5>
mov    %eax,%esi
neg    %esi
lea    -0x1(%rsp),%rcx
sub    %rax,%rcx
and    $0x7,%rsi
je     119f <K2P+0x9f>
nopl   0x0(%rax)
mov    %dl,(%rax)
add    $0x1,%rax
shr    $0x8,%edx
add    $0xffffffffffffffff,%rsi
jne    1190 <K2P+0x90>
cmp    $0x7,%rcx
jb     11d5 <K2P+0xd5>
cs nopw 0x0(%rax,%rax,1)
nop
mov    %dl,(%rax)
mov    %dh,0x1(%rax)
mov    %edx,%ecx
shr    $0x10,%ecx
mov    %cl,0x2(%rax)
shr    $0x18,%edx
mov    %dl,0x3(%rax)
movl   $0x0,0x4(%rax)
add    $0x8,%rax
xor    %edx,%edx
cmp    %r8,%rax
jne    11b0 <K2P+0xb0>
mov    -0x8(%rsp),%rax
pop    %rbx
ret

LLVM IR (-O0):
define i8* @K2P(i8* %0) {
%2 = alloca i8*
%3 = alloca i32
%4 = alloca i32
%5 = alloca i8*
%6 = alloca i8*
%7 = alloca i8*
%8 = alloca i32
store i8* %0, i8** %2
%9 = bitcast i8** %5 to i8*
store i8* %9, i8** %6
%10 = load i8*, i8** %6
%11 = getelementptr inbounds i8, i8* %10, i64 8
store i8* %11, i8** %7
store i32 1, i32* %3
store i32 0, i32* %4
store i32 0, i32* %8
br label %12
12: ; preds = %56, %1
%13 = load i32, i32* %3
%14 = icmp ne i32 %13, 0
br i1 %14, label %15, label %19
15: ; preds = %12
%16 = load i8*, i8** %6
%17 = load i8*, i8** %7
%18 = icmp ne i8* %16, %17
br label %19
19: ; preds = %15, %12
%20 = phi i1 [ false, %12 ], [ %18, %15 ]
br i1 %20, label %21, label %59
21: ; preds = %19
%22 = load i8*, i8** %2
%23 = load i8, i8* %22
%24 = sext i8 %23 to i32
%25 = and i32 %24, 127
%26 = load i32, i32* %4
%27 = shl i32 %25, %26
%28 = load i32, i32* %8
%29 = or i32 %28, %27
store i32 %29, i32* %8
%30 = load i8*, i8** %2
%31 = load i8, i8* %30
%32 = sext i8 %31 to i32
%33 = and i32 %32, 128
%34 = icmp ne i32 %33, 0
br i1 %34, label %35, label %38
35: ; preds = %21
%36 = load i32, i32* %3
%37 = add nsw i32 %36, 1
store i32 %37, i32* %3
br label %41
38: ; preds = %21
%39 = load i32, i32* %3
%40 = add nsw i32 %39, -1
store i32 %40, i32* %3
br label %41
41: ; preds = %38, %35
%42 = load i32, i32* %4
%43 = icmp sge i32 %42, 1
br i1 %43, label %44, label %53
44: ; preds = %41
%45 = load i32, i32* %8
%46 = trunc i32 %45 to i8
%47 = load i8*, i8** %6
%48 = getelementptr inbounds i8, i8* %47, i32 1
store i8* %48, i8** %6
store i8 %46, i8* %47
%49 = load i32, i32* %8
%50 = lshr i32 %49, 8
store i32 %50, i32* %8
%51 = load i32, i32* %4
%52 = add nsw i32 %51, -1
store i32 %52, i32* %4
br label %56
53: ; preds = %41
%54 = load i32, i32* %4
%55 = add nsw i32 %54, 7
store i32 %55, i32* %4
br label %56
56: ; preds = %53, %44
%57 = load i8*, i8** %2
%58 = getelementptr inbounds i8, i8* %57, i32 1
store i8* %58, i8** %2
br label %12
59: ; preds = %19
br label %60
60: ; preds = %64, %59
%61 = load i8*, i8** %6
%62 = load i8*, i8** %7
%63 = icmp ne i8* %61, %62
br i1 %63, label %64, label %71
64: ; preds = %60
%65 = load i32, i32* %8
%66 = trunc i32 %65 to i8
%67 = load i8*, i8** %6
%68 = getelementptr inbounds i8, i8* %67, i32 1
store i8* %68, i8** %6
store i8 %66, i8* %67
%69 = load i32, i32* %8
%70 = lshr i32 %69, 8
store i32 %70, i32* %8
br label %60
71: ; preds = %60
%72 = load i8*, i8** %5
ret i8* %72
}

LLVM IR (-O2):
define i8* @K2P(i8* nocapture %0) {
%2 = alloca i8*
%3 = ptrtoint i8** %2 to i64
%4 = bitcast i8** %2 to i8*
%5 = getelementptr inbounds i8*, i8** %2, i64 1
%6 = bitcast i8** %5 to i8*
br label %29
7: ; preds = %50
%8 = ptrtoint i8* %52 to i64
%9 = icmp eq i8* %52, %6
br i1 %9, label %77, label %10
10: ; preds = %7
%11 = sub i64 0, %8
%12 = or i64 %3, 7
%13 = sub i64 %12, %8
%14 = and i64 %11, 7
%15 = icmp eq i64 %14, 0
br i1 %15, label %25, label %16
16: ; preds = %10, %16
%17 = phi i32 [ %22, %16 ], [ %53, %10 ]
%18 = phi i8* [ %21, %16 ], [ %52, %10 ]
%19 = phi i64 [ %23, %16 ], [ 0, %10 ]
%20 = trunc i32 %17 to i8
%21 = getelementptr inbounds i8, i8* %18, i64 1
store i8 %20, i8* %18
%22 = lshr i32 %17, 8
%23 = add i64 %19, 1
%24 = icmp eq i64 %23, %14
br i1 %24, label %25, label %16
25: ; preds = %16, %10
%26 = phi i32 [ %53, %10 ], [ %22, %16 ]
%27 = phi i8* [ %52, %10 ], [ %21, %16 ]
%28 = icmp ult i64 %13, 7
br i1 %28, label %77, label %58
29: ; preds = %1, %50
%30 = phi i32 [ 0, %1 ], [ %53, %50 ]
%31 = phi i8* [ %0, %1 ], [ %54, %50 ]
%32 = phi i8* [ %4, %1 ], [ %52, %50 ]
%33 = phi i32 [ 0, %1 ], [ %51, %50 ]
%34 = phi i32 [ 1, %1 ], [ %43, %50 ]
%35 = load i8, i8* %31
%36 = zext i8 %35 to i32
%37 = and i32 %36, 127
%38 = shl i32 %37, %33
%39 = or i32 %38, %30
%40 = and i32 %36, 128
%41 = icmp eq i32 %40, 0
%42 = select i1 %41, i32 -1, i32 1
%43 = add nsw i32 %42, %34
%44 = icmp sgt i32 %33, 0
br i1 %44, label %45, label %50
45: ; preds = %29
%46 = trunc i32 %39 to i8
%47 = getelementptr inbounds i8, i8* %32, i64 1
store i8 %46, i8* %32
%48 = lshr i32 %39, 8
%49 = add nsw i32 %33, -1
br label %50
50: ; preds = %29, %45
%51 = phi i32 [ %49, %45 ], [ 7, %29 ]
%52 = phi i8* [ %47, %45 ], [ %32, %29 ]
%53 = phi i32 [ %48, %45 ], [ %39, %29 ]
%54 = getelementptr inbounds i8, i8* %31, i64 1
%55 = icmp ne i32 %43, 0
%56 = icmp ne i8* %52, %6
%57 = select i1 %55, i1 %56, i1 false
br i1 %57, label %29, label %7
58: ; preds = %25, %58
%59 = phi i32 [ 0, %58 ], [ %26, %25 ]
%60 = phi i8* [ %75, %58 ], [ %27, %25 ]
%61 = trunc i32 %59 to i8
%62 = getelementptr inbounds i8, i8* %60, i64 1
store i8 %61, i8* %60
%63 = lshr i32 %59, 8
%64 = trunc i32 %63 to i8
%65 = getelementptr inbounds i8, i8* %60, i64 2
store i8 %64, i8* %62
%66 = lshr i32 %59, 16
%67 = trunc i32 %66 to i8
%68 = getelementptr inbounds i8, i8* %60, i64 3
store i8 %67, i8* %65
%69 = lshr i32 %59, 24
%70 = trunc i32 %69 to i8
%71 = getelementptr inbounds i8, i8* %60, i64 4
store i8 %70, i8* %68
%72 = getelementptr inbounds i8, i8* %60, i64 5
store i8 0, i8* %71
%73 = getelementptr inbounds i8, i8* %60, i64 6
store i8 0, i8* %72
%74 = getelementptr inbounds i8, i8* %60, i64 7
store i8 0, i8* %73
%75 = getelementptr inbounds i8, i8* %60, i64 8
store i8 0, i8* %74
%76 = icmp eq i8* %75, %6
br i1 %76, label %77, label %58
77: ; preds = %25, %58, %7
%78 = load i8*, i8** %2
ret i8* %78
}