#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 */
typedef int uint;

/* Variables and functions */
void bitwrite(register uint *e, register uint p, register uint len,
              register uint s) {
  e += p / (32);
  p %= (32);
  if (len == (32)) {
    *e |= (*e & ((1 << p) - 1)) | (s << p);
    if (!p)
      return;
    e++;
    *e = (*e & ~((1 << p) - 1)) | (s >> ((32) - p));
  } else {
    if (p + len <= (32)) {
      *e = (*e & ~(((1 << len) - 1) << p)) | (s << p);
      return;
    }
    *e = (*e & ((1 << p) - 1)) | (s << p);
    e++;
    len -= (32) - p;
    *e = (*e & ~((1 << len) - 1)) | (s >> ((32) - p));
  }
}


x86 assembly (clang, -O0):
<bitwrite>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %edx,-0x10(%rbp)
mov    %ecx,-0x14(%rbp)
mov    -0xc(%rbp),%eax
mov    $0x20,%ecx
cltd
idiv   %ecx
mov    %eax,%ecx
mov    -0x8(%rbp),%rax
movslq %ecx,%rcx
shl    $0x2,%rcx
add    %rcx,%rax
mov    %rax,-0x8(%rbp)
mov    -0xc(%rbp),%eax
mov    $0x20,%ecx
cltd
idiv   %ecx
mov    %edx,-0xc(%rbp)
cmpl   $0x20,-0x10(%rbp)
jne    11cc <bitwrite+0xcc>
mov    -0x8(%rbp),%rax
mov    (%rax),%eax
mov    -0xc(%rbp),%ecx
mov    $0x1,%edx
shl    %cl,%edx
mov    %edx,%ecx
sub    $0x1,%ecx
and    %ecx,%eax
mov    %eax,-0x18(%rbp)
mov    -0x14(%rbp),%eax
mov    -0xc(%rbp),%ecx
shl    %cl,%eax
mov    -0x18(%rbp),%ecx
or     %eax,%ecx
mov    -0x8(%rbp),%rax
or     (%rax),%ecx
mov    %ecx,(%rax)
cmpl   $0x0,-0xc(%rbp)
jne    1186 <bitwrite+0x86>
jmp    1293 <bitwrite+0x193>
mov    -0x8(%rbp),%rax
add    $0x4,%rax
mov    %rax,-0x8(%rbp)
mov    -0x8(%rbp),%rax
mov    (%rax),%eax
mov    -0xc(%rbp),%ecx
mov    $0x1,%edx
shl    %cl,%edx
mov    %edx,%ecx
sub    $0x1,%ecx
xor    $0xffffffff,%ecx
and    %ecx,%eax
mov    %eax,-0x1c(%rbp)
mov    -0x14(%rbp),%eax
mov    $0x20,%ecx
sub    -0xc(%rbp),%ecx
sar    %cl,%eax
mov    -0x1c(%rbp),%ecx
or     %eax,%ecx
mov    -0x8(%rbp),%rax
mov    %ecx,(%rax)
jmp    1293 <bitwrite+0x193>
mov    -0xc(%rbp),%eax
add    -0x10(%rbp),%eax
cmp    $0x20,%eax
jg     1215 <bitwrite+0x115>
mov    -0x8(%rbp),%rax
mov    (%rax),%eax
mov    -0x10(%rbp),%ecx
mov    $0x1,%edx
shl    %cl,%edx
sub    $0x1,%edx
mov    -0xc(%rbp),%ecx
shl    %cl,%edx
mov    %edx,%ecx
xor    $0xffffffff,%ecx
and    %ecx,%eax
mov    %eax,-0x20(%rbp)
mov    -0x14(%rbp),%eax
mov    -0xc(%rbp),%ecx
shl    %cl,%eax
mov    -0x20(%rbp),%ecx
or     %eax,%ecx
mov    -0x8(%rbp),%rax
mov    %ecx,(%rax)
jmp    1293 <bitwrite+0x193>
mov    -0x8(%rbp),%rax
mov    (%rax),%eax
mov    -0xc(%rbp),%ecx
mov    $0x1,%edx
shl    %cl,%edx
mov    %edx,%ecx
sub    $0x1,%ecx
and    %ecx,%eax
mov    %eax,-0x28(%rbp)
mov    -0x14(%rbp),%eax
mov    -0xc(%rbp),%ecx
shl    %cl,%eax
mov    -0x28(%rbp),%ecx
or     %eax,%ecx
mov    -0x8(%rbp),%rax
mov    %ecx,(%rax)
mov    -0x8(%rbp),%rax
add    $0x4,%rax
mov    %rax,-0x8(%rbp)
mov    $0x20,%ecx
sub    -0xc(%rbp),%ecx
mov    -0x10(%rbp),%eax
sub    %ecx,%eax
mov    %eax,-0x10(%rbp)
mov    -0x8(%rbp),%rax
mov    (%rax),%eax
mov    -0x10(%rbp),%ecx
mov    $0x1,%edx
shl    %cl,%edx
mov    %edx,%ecx
sub    $0x1,%ecx
xor    $0xffffffff,%ecx
and    %ecx,%eax
mov    %eax,-0x24(%rbp)
mov    -0x14(%rbp),%eax
mov    $0x20,%ecx
sub    -0xc(%rbp),%ecx
sar    %cl,%eax
mov    -0x24(%rbp),%ecx
or     %eax,%ecx
mov    -0x8(%rbp),%rax
mov    %ecx,(%rax)
pop    %rbp
ret

x86 assembly (clang, -O2):
<bitwrite>:
mov    %ecx,%r10d
lea    0x1f(%rsi),%eax
test   %esi,%esi
cmovns %esi,%eax
mov    %eax,%ecx
sar    $0x5,%ecx
movslq %ecx,%r8
and    $0xffffffe0,%eax
sub    %eax,%esi
cmp    $0x20,%edx
jne    113c <bitwrite+0x3c>
mov    %r10d,%eax
mov    %esi,%ecx
shl    %cl,%eax
or     %eax,(%rdi,%r8,4)
test   %esi,%esi
je     11a4 <bitwrite+0xa4>
mov    0x4(%rdi,%r8,4),%eax
mov    %esi,%ecx
shr    %cl,%eax
shl    %cl,%eax
neg    %sil
jmp    1197 <bitwrite+0x97>
lea    (%rsi,%rdx,1),%eax
mov    (%rdi,%r8,4),%r9d
cmp    $0x20,%eax
jg     1167 <bitwrite+0x67>
mov    $0xffffffff,%eax
mov    %edx,%ecx
shl    %cl,%eax
not    %eax
mov    %esi,%ecx
shl    %cl,%eax
shl    %cl,%r10d
not    %eax
and    %eax,%r9d
or     %r9d,%r10d
mov    %r10d,(%rdi,%r8,4)
ret
mov    $0xffffffff,%eax
mov    %esi,%ecx
shl    %cl,%eax
not    %eax
and    %eax,%r9d
mov    %r10d,%eax
shl    %cl,%eax
or     %r9d,%eax
mov    %eax,(%rdi,%r8,4)
mov    $0x20,%eax
sub    %esi,%eax
sub    %eax,%edx
mov    0x4(%rdi,%r8,4),%eax
mov    %edx,%ecx
shr    %cl,%eax
shl    %cl,%eax
neg    %esi
mov    %esi,%ecx
sar    %cl,%r10d
or     %eax,%r10d
mov    %r10d,0x4(%rdi,%r8,4)
ret

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

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