void hdp_data_set_bit(unsigned char *data, const int length,
                      const int bit_position, const int bit) {
  int bit_pos = bit_position;
  int byte_pos = 0;
  while (bit_pos > 7) {
    bit_pos -= 8;
    byte_pos++;
  }
  if (byte_pos >= length) {
    return;
  }
  if (bit == 1) {
    data[byte_pos] = data[byte_pos] | (1 << (7 - bit_pos));
  } else {
    data[byte_pos] = data[byte_pos] & ~(1 << (7 - bit_pos));
  }
}


x86 assembly (clang, -O0):
<hdp_data_set_bit>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %edx,-0x10(%rbp)
mov    %ecx,-0x14(%rbp)
mov    -0x10(%rbp),%eax
mov    %eax,-0x18(%rbp)
movl   $0x0,-0x1c(%rbp)
cmpl   $0x7,-0x18(%rbp)
jle    113f <hdp_data_set_bit+0x3f>
mov    -0x18(%rbp),%eax
sub    $0x8,%eax
mov    %eax,-0x18(%rbp)
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    111e <hdp_data_set_bit+0x1e>
mov    -0x1c(%rbp),%eax
cmp    -0xc(%rbp),%eax
jl     1150 <hdp_data_set_bit+0x50>
jmp    11ba <hdp_data_set_bit+0xba>
cmpl   $0x1,-0x14(%rbp)
jne    118b <hdp_data_set_bit+0x8b>
mov    -0x8(%rbp),%rax
movslq -0x1c(%rbp),%rcx
movzbl (%rax,%rcx,1),%eax
mov    $0x7,%ecx
sub    -0x18(%rbp),%ecx
mov    $0x1,%edx
shl    %cl,%edx
mov    %edx,%ecx
or     %ecx,%eax
mov    %al,%dl
mov    -0x8(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    %dl,(%rax,%rcx,1)
jmp    11ba <hdp_data_set_bit+0xba>
mov    -0x8(%rbp),%rax
movslq -0x1c(%rbp),%rcx
movzbl (%rax,%rcx,1),%eax
mov    $0x7,%ecx
sub    -0x18(%rbp),%ecx
mov    $0x1,%edx
shl    %cl,%edx
mov    %edx,%ecx
xor    $0xffffffff,%ecx
and    %ecx,%eax
mov    %al,%dl
mov    -0x8(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    %dl,(%rax,%rcx,1)
pop    %rbp
ret

x86 assembly (clang, -O2):
<hdp_data_set_bit>:
mov    %ecx,%r8d
xor    %ecx,%ecx
cmp    $0x8,%edx
jge    110f <hdp_data_set_bit+0xf>
cmp    %esi,%ecx
jl     1138 <hdp_data_set_bit+0x38>
ret
cmp    $0xf,%edx
mov    $0xf,%ecx
cmovl  %edx,%ecx
neg    %ecx
lea    (%rdx,%rcx,1),%eax
add    $0x7,%eax
mov    %eax,%ecx
shr    $0x3,%ecx
and    $0xfffffff8,%eax
neg    %eax
add    %eax,%edx
add    $0xfffffff8,%edx
add    $0x1,%ecx
cmp    %esi,%ecx
jge    110e <hdp_data_set_bit+0xe>
mov    %ecx,%esi
mov    (%rdi,%rsi,1),%al
mov    $0x7,%cl
sub    %dl,%cl
mov    $0x1,%edx
shl    %cl,%edx
mov    %eax,%ecx
or     %dl,%cl
not    %dl
and    %al,%dl
cmp    $0x1,%r8d
movzbl %cl,%eax
movzbl %dl,%ecx
cmove  %eax,%ecx
mov    %cl,(%rdi,%rsi,1)
ret

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

LLVM IR (-O2):
define void @hdp_data_set_bit(i8* nocapture %0, i32 %1, i32 %2, i32 %3) {
%5 = icmp sgt i32 %2, 7
br i1 %5, label %6, label %15
6: ; preds = %4
%7 = add nsw i32 %2, -8
%8 = add nuw i32 %2, 7
%9 = call i32 @llvm.smin.i32(i32 %2, i32 15)
%10 = sub nuw i32 %8, %9
%11 = lshr i32 %10, 3
%12 = and i32 %10, -8
%13 = sub nsw i32 %7, %12
%14 = add nuw nsw i32 %11, 1
br label %15
15: ; preds = %6, %4
%16 = phi i32 [ %2, %4 ], [ %13, %6 ]
%17 = phi i32 [ 0, %4 ], [ %14, %6 ]
%18 = icmp slt i32 %17, %1
br i1 %18, label %19, label %31
19: ; preds = %15
%20 = icmp eq i32 %3, 1
%21 = zext i32 %17 to i64
%22 = getelementptr inbounds i8, i8* %0, i64 %21
%23 = load i8, i8* %22
%24 = sub nsw i32 7, %16
%25 = shl nuw i32 1, %24
%26 = trunc i32 %25 to i8
%27 = or i8 %23, %26
%28 = xor i8 %26, -1
%29 = and i8 %23, %28
%30 = select i1 %20, i8 %27, i8 %29
store i8 %30, i8* %22
br label %31
31: ; preds = %19, %15
ret void
}