int BitStringOnes(int len, unsigned char *op) {
  int rc = 0;
  unsigned char mask;
  int i = (int)((len + 7UL) / 8UL);
  while (i--) {
    for (mask = op[i]; mask; mask >>= 1) {
      rc += mask & 1;
    }
  }
  return rc;
}


x86 assembly (clang, -O0):
<BitStringOnes>:
push   %rbp
mov    %rsp,%rbp
mov    %edi,-0x4(%rbp)
mov    %rsi,-0x10(%rbp)
movl   $0x0,-0x14(%rbp)
movslq -0x4(%rbp),%rax
add    $0x7,%rax
shr    $0x3,%rax
mov    %eax,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
mov    %eax,%ecx
add    $0xffffffff,%ecx
mov    %ecx,-0x1c(%rbp)
cmp    $0x0,%eax
je     116e <BitStringOnes+0x6e>
mov    -0x10(%rbp),%rax
movslq -0x1c(%rbp),%rcx
mov    (%rax,%rcx,1),%al
mov    %al,-0x15(%rbp)
cmpb   $0x0,-0x15(%rbp)
je     1169 <BitStringOnes+0x69>
movzbl -0x15(%rbp),%eax
and    $0x1,%eax
add    -0x14(%rbp),%eax
mov    %eax,-0x14(%rbp)
movzbl -0x15(%rbp),%eax
sar    $0x1,%eax
mov    %al,-0x15(%rbp)
jmp    1143 <BitStringOnes+0x43>
jmp    1121 <BitStringOnes+0x21>
mov    -0x14(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<BitStringOnes>:
movslq %edi,%r8
add    $0x7,%r8
shr    $0x3,%r8
test   %r8d,%r8d
je     1145 <BitStringOnes+0x45>
movslq %r8d,%r10
cmp    $0x1,%r8d
jne    1148 <BitStringOnes+0x48>
xor    %eax,%eax
test   $0x1,%r8b
je     1144 <BitStringOnes+0x44>
mov    -0x1(%r10,%rsi,1),%sil
test   %sil,%sil
je     1144 <BitStringOnes+0x44>
mov    %esi,%edx
nopl   (%rax)
mov    %esi,%ecx
and    $0x1,%cl
movzbl %cl,%ecx
add    %ecx,%eax
shr    %dl
cmp    $0x1,%sil
mov    %edx,%esi
ja     1130 <BitStringOnes+0x30>
ret
xor    %eax,%eax
ret
mov    %r8d,%r9d
and    $0xfffffffe,%r9d
xor    %eax,%eax
xor    %edi,%edi
jmp    116c <BitStringOnes+0x6c>
cs nopw 0x0(%rax,%rax,1)
nop
add    $0xfffffffffffffffe,%r10
add    $0x2,%edi
cmp    %r9d,%edi
je     111b <BitStringOnes+0x1b>
mov    -0x1(%r10,%rsi,1),%r11b
test   %r11b,%r11b
je     1196 <BitStringOnes+0x96>
mov    %r11d,%ecx
nopl   0x0(%rax)
mov    %r11d,%edx
and    $0x1,%dl
movzbl %dl,%edx
add    %edx,%eax
shr    %cl
cmp    $0x2,%r11b
mov    %ecx,%r11d
jae    1180 <BitStringOnes+0x80>
mov    -0x2(%rsi,%r10,1),%r11b
test   %r11b,%r11b
je     1160 <BitStringOnes+0x60>
mov    %r11d,%edx
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
mov    %r11d,%ecx
and    $0x1,%cl
movzbl %cl,%ecx
add    %ecx,%eax
shr    %dl
cmp    $0x1,%r11b
mov    %edx,%r11d
ja     11b0 <BitStringOnes+0xb0>
jmp    1160 <BitStringOnes+0x60>

LLVM IR (-O0):
define i32 @BitStringOnes(i32 %0, i8* %1) {
%3 = alloca i32
%4 = alloca i8*
%5 = alloca i32
%6 = alloca i8
%7 = alloca i32
store i32 %0, i32* %3
store i8* %1, i8** %4
store i32 0, i32* %5
%8 = load i32, i32* %3
%9 = sext i32 %8 to i64
%10 = add i64 %9, 7
%11 = udiv i64 %10, 8
%12 = trunc i64 %11 to i32
store i32 %12, i32* %7
br label %13
13: ; preds = %37, %2
%14 = load i32, i32* %7
%15 = add nsw i32 %14, -1
store i32 %15, i32* %7
%16 = icmp ne i32 %14, 0
br i1 %16, label %17, label %38
17: ; preds = %13
%18 = load i8*, i8** %4
%19 = load i32, i32* %7
%20 = sext i32 %19 to i64
%21 = getelementptr inbounds i8, i8* %18, i64 %20
%22 = load i8, i8* %21
store i8 %22, i8* %6
br label %23
23: ; preds = %32, %17
%24 = load i8, i8* %6
%25 = icmp ne i8 %24, 0
br i1 %25, label %26, label %37
26: ; preds = %23
%27 = load i8, i8* %6
%28 = zext i8 %27 to i32
%29 = and i32 %28, 1
%30 = load i32, i32* %5
%31 = add nsw i32 %30, %29
store i32 %31, i32* %5
br label %32
32: ; preds = %26
%33 = load i8, i8* %6
%34 = zext i8 %33 to i32
%35 = ashr i32 %34, 1
%36 = trunc i32 %35 to i8
store i8 %36, i8* %6
br label %23
37: ; preds = %23
br label %13
38: ; preds = %13
%39 = load i32, i32* %5
ret i32 %39
}

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