#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 */
int /*<<< orphan*/ write(int, char *, int);
void write_7bit(int fd, const char *in, int len) {
  char out[1024] = {0};
  unsigned char check = 0;
  for (int i = 0; i < len; i++) {
    out[(i * 8) / 7] |= in[i] >> 1 + (i % 7);
    out[(i * 8) / 7 + 1] = (in[i] << 6 - (i % 7)) & 0x7F;
    check ^= in[i];
  }
  out[(len * 8) / 7] |= check >> 1 + (len % 7);
  out[(len * 8) / 7 + 1] = (check << 6 - (len % 7)) & 0x7F;
  write(fd, out, ((len + 1) * 8 + 6) / 7);
}


x86 assembly (clang, -O0):
<write_7bit>:
push   %rbp
mov    %rsp,%rbp
sub    $0x440,%rsp
mov    %edi,-0x4(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
lea    -0x420(%rbp),%rdi
xor    %esi,%esi
mov    $0x400,%edx
call   1040 <memset@plt>
movb   $0x0,-0x421(%rbp)
movl   $0x0,-0x428(%rbp)
mov    -0x428(%rbp),%eax
cmp    -0x14(%rbp),%eax
jge    124e <write_7bit+0x12e>
mov    -0x10(%rbp),%rax
movslq -0x428(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
mov    %eax,-0x434(%rbp)
mov    -0x428(%rbp),%eax
mov    $0x7,%ecx
cltd
idiv   %ecx
mov    -0x434(%rbp),%eax
mov    %edx,%ecx
add    $0x1,%ecx
sar    %cl,%eax
mov    %eax,-0x430(%rbp)
mov    -0x428(%rbp),%eax
shl    $0x3,%eax
mov    $0x7,%ecx
cltd
idiv   %ecx
mov    -0x430(%rbp),%edx
cltq
movsbl -0x420(%rbp,%rax,1),%ecx
ff
or     %edx,%ecx
mov    %cl,-0x420(%rbp,%rax,1)
mov    -0x10(%rbp),%rax
movslq -0x428(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
mov    %eax,-0x42c(%rbp)
mov    -0x428(%rbp),%eax
mov    $0x7,%ecx
cltd
idiv   %ecx
mov    -0x42c(%rbp),%eax
mov    $0x6,%ecx
sub    %edx,%ecx
shl    %cl,%eax
and    $0x7f,%eax
mov    %al,%cl
mov    -0x428(%rbp),%eax
shl    $0x3,%eax
mov    $0x7,%esi
cltd
idiv   %esi
add    $0x1,%eax
cltq
mov    %cl,-0x420(%rbp,%rax,1)
mov    -0x10(%rbp),%rax
movslq -0x428(%rbp),%rcx
movsbl (%rax,%rcx,1),%ecx
movzbl -0x421(%rbp),%eax
xor    %ecx,%eax
mov    %al,-0x421(%rbp)
mov    -0x428(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x428(%rbp)
jmp    1159 <write_7bit+0x39>
movzbl -0x421(%rbp),%eax
mov    %eax,-0x440(%rbp)
mov    -0x14(%rbp),%eax
mov    $0x7,%ecx
cltd
idiv   %ecx
mov    -0x440(%rbp),%eax
mov    %edx,%ecx
add    $0x1,%ecx
sar    %cl,%eax
mov    %eax,-0x43c(%rbp)
mov    -0x14(%rbp),%eax
shl    $0x3,%eax
mov    $0x7,%ecx
cltd
idiv   %ecx
mov    -0x43c(%rbp),%edx
cltq
movsbl -0x420(%rbp,%rax,1),%ecx
ff
or     %edx,%ecx
mov    %cl,-0x420(%rbp,%rax,1)
movzbl -0x421(%rbp),%eax
mov    %eax,-0x438(%rbp)
mov    -0x14(%rbp),%eax
mov    $0x7,%ecx
cltd
idiv   %ecx
mov    -0x438(%rbp),%eax
mov    $0x6,%ecx
sub    %edx,%ecx
shl    %cl,%eax
and    $0x7f,%eax
mov    %al,%cl
mov    -0x14(%rbp),%eax
shl    $0x3,%eax
mov    $0x7,%esi
cltd
idiv   %esi
add    $0x1,%eax
cltq
mov    %cl,-0x420(%rbp,%rax,1)
mov    -0x4(%rbp),%edi
lea    -0x420(%rbp),%rsi
mov    -0x14(%rbp),%eax
add    $0x1,%eax
shl    $0x3,%eax
add    $0x6,%eax
mov    $0x7,%ecx
cltd
idiv   %ecx
mov    %eax,%edx
call   1030 <write@plt>
add    $0x440,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<write_7bit>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x408,%rsp
mov    %edx,%r15d
mov    %rsi,%r13
mov    %edi,%r14d
mov    %rsp,%rdi
xor    %r12d,%r12d
mov    $0x400,%edx
xor    %esi,%esi
call   1040 <memset@plt>
test   %r15d,%r15d
jle    11e8 <write_7bit+0xc8>
mov    %r15d,%r8d
shl    $0x3,%r8
mov    $0x1,%r9d
xor    %edi,%edi
mov    $0x6,%r10d
xor    %edx,%edx
xor    %r12d,%r12d
nop
mov    %edi,%eax
imul   $0x24924925,%rax,%rax
shr    $0x20,%rax
mov    %edi,%ecx
sub    %eax,%ecx
shr    %ecx
add    %eax,%ecx
shr    $0x2,%ecx
lea    0x0(,%rcx,8),%eax
sub    %ecx,%eax
mov    %r9d,%ecx
sub    %eax,%ecx
movzbl 0x0(%r13),%ebp
movsbl %bpl,%esi
sar    %cl,%esi
add    %r10d,%eax
mov    %edx,%ecx
imul   $0x24924925,%rcx,%rcx
shr    $0x20,%rcx
mov    %edx,%ebx
sub    %ecx,%ebx
shr    %ebx
add    %ecx,%ebx
shr    $0x2,%ebx
or     %sil,(%rsp,%rbx,1)
xor    %ebp,%r12d
mov    %eax,%ecx
shl    %cl,%ebp
and    $0x7f,%bpl
mov    %bpl,0x1(%rsp,%rbx,1)
add    $0x8,%rdx
add    $0x1,%r13
add    $0x1,%r9d
add    $0x1,%edi
add    $0xffffffff,%r10d
cmp    %rdx,%r8
jne    1170 <write_7bit+0x50>
movslq %r15d,%rax
imul   $0xffffffff92492493,%rax,%rax
shr    $0x20,%rax
add    %r15d,%eax
mov    %eax,%ecx
shr    $0x1f,%ecx
shr    $0x2,%eax
add    %ecx,%eax
lea    0x0(,%rax,8),%ecx
sub    %ecx,%eax
add    %r15d,%eax
lea    0x1(%rax),%ecx
mov    %r12d,%edx
sar    %cl,%edx
mov    %r15d,%ecx
shl    $0x3,%ecx
movslq %ecx,%rcx
imul   $0xffffffff92492493,%rcx,%rcx
shr    $0x20,%rcx
lea    (%rcx,%r15,8),%ecx
mov    %ecx,%esi
shr    $0x1f,%esi
sar    $0x2,%ecx
add    %esi,%ecx
movslq %ecx,%rsi
or     %dl,(%rsp,%rsi,1)
mov    $0x6,%cl
sub    %al,%cl
shl    %cl,%r12d
and    $0x7f,%r12b
mov    %r12b,0x1(%rsp,%rsi,1)
lea    0xe(,%r15,8),%eax
cltq
imul   $0xffffffff92492493,%rax,%rax
shr    $0x20,%rax
lea    (%rax,%r15,8),%edx
add    $0xe,%edx
mov    %edx,%eax
shr    $0x1f,%eax
sar    $0x2,%edx
add    %eax,%edx
mov    %rsp,%rsi
mov    %r14d,%edi
call   1030 <write@plt>
add    $0x408,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
define void @write_7bit(i32 %0, i8* %1, i32 %2) {
%4 = alloca i32
%5 = alloca i8*
%6 = alloca i32
%7 = alloca [1024 x i8]
%8 = alloca i8
%9 = alloca i32
store i32 %0, i32* %4
store i8* %1, i8** %5
store i32 %2, i32* %6
%10 = bitcast [1024 x i8]* %7 to i8*
store i8 0, i8* %8
store i32 0, i32* %9
br label %11
11: ; preds = %63, %3
%12 = load i32, i32* %9
%13 = load i32, i32* %6
%14 = icmp slt i32 %12, %13
br i1 %14, label %15, label %66
15: ; preds = %11
%16 = load i8*, i8** %5
%17 = load i32, i32* %9
%18 = sext i32 %17 to i64
%19 = getelementptr inbounds i8, i8* %16, i64 %18
%20 = load i8, i8* %19
%21 = sext i8 %20 to i32
%22 = load i32, i32* %9
%23 = srem i32 %22, 7
%24 = add nsw i32 1, %23
%25 = ashr i32 %21, %24
%26 = load i32, i32* %9
%27 = mul nsw i32 %26, 8
%28 = sdiv i32 %27, 7
%29 = sext i32 %28 to i64
%30 = getelementptr inbounds [1024 x i8], [1024 x i8]* %7, i64 0, i64 %29
%31 = load i8, i8* %30
%32 = sext i8 %31 to i32
%33 = or i32 %32, %25
%34 = trunc i32 %33 to i8
store i8 %34, i8* %30
%35 = load i8*, i8** %5
%36 = load i32, i32* %9
%37 = sext i32 %36 to i64
%38 = getelementptr inbounds i8, i8* %35, i64 %37
%39 = load i8, i8* %38
%40 = sext i8 %39 to i32
%41 = load i32, i32* %9
%42 = srem i32 %41, 7
%43 = sub nsw i32 6, %42
%44 = shl i32 %40, %43
%45 = and i32 %44, 127
%46 = trunc i32 %45 to i8
%47 = load i32, i32* %9
%48 = mul nsw i32 %47, 8
%49 = sdiv i32 %48, 7
%50 = add nsw i32 %49, 1
%51 = sext i32 %50 to i64
%52 = getelementptr inbounds [1024 x i8], [1024 x i8]* %7, i64 0, i64 %51
store i8 %46, i8* %52
%53 = load i8*, i8** %5
%54 = load i32, i32* %9
%55 = sext i32 %54 to i64
%56 = getelementptr inbounds i8, i8* %53, i64 %55
%57 = load i8, i8* %56
%58 = sext i8 %57 to i32
%59 = load i8, i8* %8
%60 = zext i8 %59 to i32
%61 = xor i32 %60, %58
%62 = trunc i32 %61 to i8
store i8 %62, i8* %8
br label %63
63: ; preds = %15
%64 = load i32, i32* %9
%65 = add nsw i32 %64, 1
store i32 %65, i32* %9
br label %11
66: ; preds = %11
%67 = load i8, i8* %8
%68 = zext i8 %67 to i32
%69 = load i32, i32* %6
%70 = srem i32 %69, 7
%71 = add nsw i32 1, %70
%72 = ashr i32 %68, %71
%73 = load i32, i32* %6
%74 = mul nsw i32 %73, 8
%75 = sdiv i32 %74, 7
%76 = sext i32 %75 to i64
%77 = getelementptr inbounds [1024 x i8], [1024 x i8]* %7, i64 0, i64 %76
%78 = load i8, i8* %77
%79 = sext i8 %78 to i32
%80 = or i32 %79, %72
%81 = trunc i32 %80 to i8
store i8 %81, i8* %77
%82 = load i8, i8* %8
%83 = zext i8 %82 to i32
%84 = load i32, i32* %6
%85 = srem i32 %84, 7
%86 = sub nsw i32 6, %85
%87 = shl i32 %83, %86
%88 = and i32 %87, 127
%89 = trunc i32 %88 to i8
%90 = load i32, i32* %6
%91 = mul nsw i32 %90, 8
%92 = sdiv i32 %91, 7
%93 = add nsw i32 %92, 1
%94 = sext i32 %93 to i64
%95 = getelementptr inbounds [1024 x i8], [1024 x i8]* %7, i64 0, i64 %94
store i8 %89, i8* %95
%96 = load i32, i32* %4
%97 = getelementptr inbounds [1024 x i8], [1024 x i8]* %7, i64 0, i64 0
%98 = load i32, i32* %6
%99 = add nsw i32 %98, 1
%100 = mul nsw i32 %99, 8
%101 = add nsw i32 %100, 6
%102 = sdiv i32 %101, 7
%103 = call i32 @write(i32 %96, i8* %97, i32 %102)
ret void
}

LLVM IR (-O2):
define void @write_7bit(i32 %0, i8* nocapture %1, i32 %2) {
%4 = alloca [1024 x i8]
%5 = getelementptr inbounds [1024 x i8], [1024 x i8]* %4, i64 0, i64 0
%6 = icmp sgt i32 %2, 0
br i1 %6, label %7, label %9
7: ; preds = %3
%8 = zext i32 %2 to i64
br label %31
9: ; preds = %31, %3
%10 = phi i32 [ 0, %3 ], [ %57, %31 ]
%11 = srem i32 %2, 7
%12 = add nsw i32 %11, 1
%13 = ashr i32 %10, %12
%14 = shl nsw i32 %2, 3
%15 = sdiv i32 %14, 7
%16 = sext i32 %15 to i64
%17 = getelementptr inbounds [1024 x i8], [1024 x i8]* %4, i64 0, i64 %16
%18 = load i8, i8* %17
%19 = trunc i32 %13 to i8
%20 = or i8 %18, %19
store i8 %20, i8* %17
%21 = sub nsw i32 6, %11
%22 = shl i32 %10, %21
%23 = trunc i32 %22 to i8
%24 = and i8 %23, 127
%25 = add nsw i32 %15, 1
%26 = sext i32 %25 to i64
%27 = getelementptr inbounds [1024 x i8], [1024 x i8]* %4, i64 0, i64 %26
store i8 %24, i8* %27
%28 = add i32 %14, 14
%29 = sdiv i32 %28, 7
%30 = call i32 @write(i32 %0, i8* %5, i32 %29)
ret void
31: ; preds = %7, %31
%32 = phi i64 [ 0, %7 ], [ %58, %31 ]
%33 = phi i32 [ 0, %7 ], [ %57, %31 ]
%34 = getelementptr inbounds i8, i8* %1, i64 %32
%35 = load i8, i8* %34
%36 = sext i8 %35 to i32
%37 = trunc i64 %32 to i32
%38 = urem i32 %37, 7
%39 = add nuw nsw i32 %38, 1
%40 = ashr i32 %36, %39
%41 = trunc i64 %32 to i32
%42 = shl i32 %41, 3
%43 = udiv i32 %42, 7
%44 = zext i32 %43 to i64
%45 = getelementptr inbounds [1024 x i8], [1024 x i8]* %4, i64 0, i64 %44
%46 = load i8, i8* %45
%47 = trunc i32 %40 to i8
%48 = or i8 %46, %47
store i8 %48, i8* %45
%49 = zext i8 %35 to i32
%50 = sub nuw nsw i32 6, %38
%51 = shl nuw nsw i32 %49, %50
%52 = trunc i32 %51 to i8
%53 = and i8 %52, 127
%54 = add nuw nsw i32 %43, 1
%55 = zext i32 %54 to i64
%56 = getelementptr inbounds [1024 x i8], [1024 x i8]* %4, i64 0, i64 %55
store i8 %53, i8* %56
%57 = xor i32 %33, %49
%58 = add nuw nsw i64 %32, 1
%59 = icmp eq i64 %58, %8
br i1 %59, label %9, label %31
}