void memcpy32to1(unsigned char *dst, unsigned char *src, unsigned int w) {
  unsigned char r, g, b, tmp;
  unsigned int x;
  while (w >= 8) {
    tmp = 0;
    for (x = 0; x < 8; x++) {
      b = *src++;
      g = *src++;
      r = *src++;
      src++;
      if ((r | g | b) & 0x80)
        tmp |= 0x80 >> x;
    }
    *dst++ = tmp;
    w -= 8;
  }
  if (w > 0) {
    tmp = 0;
    for (x = 0; x < w; x++) {
      b = *src++;
      g = *src++;
      r = *src++;
      src++;
      if ((r | g | b) & 0x80)
        tmp |= 0x80 >> x;
    }
    *dst++ = tmp;
  }
}


x86 assembly (clang, -O0):
<memcpy32to1>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
cmpl   $0x8,-0x14(%rbp)
jb     11de <memcpy32to1+0xde>
movb   $0x0,-0x18(%rbp)
movl   $0x0,-0x1c(%rbp)
cmpl   $0x8,-0x1c(%rbp)
jae    11bc <memcpy32to1+0xbc>
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x10(%rbp)
mov    (%rax),%al
mov    %al,-0x17(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x10(%rbp)
mov    (%rax),%al
mov    %al,-0x16(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x10(%rbp)
mov    (%rax),%al
mov    %al,-0x15(%rbp)
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x10(%rbp)
movzbl -0x15(%rbp),%eax
movzbl -0x16(%rbp),%ecx
or     %ecx,%eax
movzbl -0x17(%rbp),%ecx
or     %ecx,%eax
and    $0x80,%eax
cmp    $0x0,%eax
je     11a9 <memcpy32to1+0xa9>
mov    -0x1c(%rbp),%ecx
mov    $0x80,%eax
sar    %cl,%eax
mov    %eax,%ecx
movzbl -0x18(%rbp),%eax
or     %ecx,%eax
mov    %al,-0x18(%rbp)
jmp    11ae <memcpy32to1+0xae>
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    1124 <memcpy32to1+0x24>
mov    -0x18(%rbp),%cl
mov    -0x8(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x8(%rbp)
mov    %cl,(%rax)
mov    -0x14(%rbp),%eax
sub    $0x8,%eax
mov    %eax,-0x14(%rbp)
jmp    110f <memcpy32to1+0xf>
cmpl   $0x0,-0x14(%rbp)
jbe    12a1 <memcpy32to1+0x1a1>
movb   $0x0,-0x18(%rbp)
movl   $0x0,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0x14(%rbp),%eax
jae    128d <memcpy32to1+0x18d>
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x10(%rbp)
mov    (%rax),%al
mov    %al,-0x17(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x10(%rbp)
mov    (%rax),%al
mov    %al,-0x16(%rbp)
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x10(%rbp)
mov    (%rax),%al
mov    %al,-0x15(%rbp)
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x10(%rbp)
movzbl -0x15(%rbp),%eax
movzbl -0x16(%rbp),%ecx
or     %ecx,%eax
movzbl -0x17(%rbp),%ecx
or     %ecx,%eax
and    $0x80,%eax
cmp    $0x0,%eax
je     127a <memcpy32to1+0x17a>
mov    -0x1c(%rbp),%ecx
mov    $0x80,%eax
sar    %cl,%eax
mov    %eax,%ecx
movzbl -0x18(%rbp),%eax
or     %ecx,%eax
mov    %al,-0x18(%rbp)
jmp    127f <memcpy32to1+0x17f>
mov    -0x1c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x1c(%rbp)
jmp    11f3 <memcpy32to1+0xf3>
mov    -0x18(%rbp),%cl
mov    -0x8(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x8(%rbp)
mov    %cl,(%rax)
pop    %rbp
ret

x86 assembly (clang, -O2):
<memcpy32to1>:
push   %rbx
cmp    $0x8,%edx
jb     11c2 <memcpy32to1+0xc2>
nopw   0x0(%rax,%rax,1)
movzbl 0x1(%rsi),%r8d
movzbl 0x5(%rsi),%r9d
or     (%rsi),%r8b
or     0x2(%rsi),%r8b
or     0x4(%rsi),%r9b
or     0x6(%rsi),%r9b
and    $0x80,%r8b
shr    %r9b
and    $0x40,%r9b
movzbl 0x9(%rsi),%ecx
or     0x8(%rsi),%cl
or     0xa(%rsi),%cl
or     %r8b,%r9b
shr    $0x2,%cl
and    $0x20,%cl
movzbl 0xd(%rsi),%eax
or     0xc(%rsi),%al
or     0xe(%rsi),%al
or     %r9b,%cl
shr    $0x3,%al
and    $0x10,%al
movzbl 0x11(%rsi),%r8d
or     0x10(%rsi),%r8b
or     0x12(%rsi),%r8b
or     %cl,%al
shr    $0x4,%r8b
and    $0x8,%r8b
movzbl 0x15(%rsi),%r9d
or     0x14(%rsi),%r9b
or     0x16(%rsi),%r9b
or     %al,%r8b
shr    $0x5,%r9b
and    $0x4,%r9b
movzbl 0x19(%rsi),%eax
or     0x18(%rsi),%al
or     0x1a(%rsi),%al
or     %r8b,%r9b
shr    $0x6,%al
and    $0x2,%al
movzbl 0x1d(%rsi),%ecx
or     0x1c(%rsi),%cl
or     0x1e(%rsi),%cl
or     %r9b,%al
shr    $0x7,%cl
or     %al,%cl
add    $0x20,%rsi
mov    %cl,(%rdi)
add    $0x1,%rdi
add    $0xfffffff8,%edx
cmp    $0x7,%edx
ja     1110 <memcpy32to1+0x10>
test   %edx,%edx
je     1262 <memcpy32to1+0x162>
cmp    $0x1,%edx
jne    11d7 <memcpy32to1+0xd7>
xor    %r8d,%r8d
xor    %r10d,%r10d
jmp    123d <memcpy32to1+0x13d>
mov    %edx,%r9d
and    $0xfffffffe,%r9d
xor    %r8d,%r8d
xor    %r10d,%r10d
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
movzbl 0x1(%rsi),%eax
movzbl 0x5(%rsi),%r11d
or     (%rsi),%al
mov    $0x80,%ebx
mov    %r8d,%ecx
shr    %cl,%ebx
or     0x2(%rsi),%al
sar    $0x7,%al
and    %bl,%al
or     0x4(%rsi),%r11b
or     0x6(%rsi),%r11b
or     %r10b,%al
add    $0x8,%rsi
lea    0x1(%r8),%ecx
mov    $0x80,%ebx
shr    %cl,%ebx
sar    $0x7,%r11b
and    %bl,%r11b
mov    %r11d,%r10d
or     %al,%r10b
add    $0x2,%r8d
cmp    %r9d,%r8d
jne    11f0 <memcpy32to1+0xf0>
test   $0x1,%dl
je     125f <memcpy32to1+0x15f>
mov    0x1(%rsi),%al
or     (%rsi),%al
or     0x2(%rsi),%al
mov    $0x80,%edx
mov    %r8d,%ecx
shr    %cl,%edx
sar    $0x7,%al
and    %dl,%al
or     %r10b,%al
mov    %eax,%r10d
mov    %r10b,(%rdi)
pop    %rbx
ret

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

LLVM IR (-O2):
define void @memcpy32to1(i8* nocapture writeonly %0, i8* nocapture %1, i32 %2) {
%4 = icmp ugt i32 %2, 7
br i1 %4, label %5, label %97
5: ; preds = %3, %5
%6 = phi i32 [ %95, %5 ], [ %2, %3 ]
%7 = phi i8* [ %93, %5 ], [ %1, %3 ]
%8 = phi i8* [ %94, %5 ], [ %0, %3 ]
%9 = getelementptr inbounds i8, i8* %7, i64 1
%10 = load i8, i8* %7
%11 = getelementptr inbounds i8, i8* %7, i64 2
%12 = load i8, i8* %9
%13 = load i8, i8* %11
%14 = getelementptr inbounds i8, i8* %7, i64 4
%15 = or i8 %12, %10
%16 = or i8 %15, %13
%17 = and i8 %16, -128
%18 = getelementptr inbounds i8, i8* %7, i64 5
%19 = load i8, i8* %14
%20 = getelementptr inbounds i8, i8* %7, i64 6
%21 = load i8, i8* %18
%22 = load i8, i8* %20
%23 = getelementptr inbounds i8, i8* %7, i64 8
%24 = or i8 %21, %19
%25 = or i8 %24, %22
%26 = lshr i8 %25, 1
%27 = and i8 %26, 64
%28 = or i8 %27, %17
%29 = getelementptr inbounds i8, i8* %7, i64 9
%30 = load i8, i8* %23
%31 = getelementptr inbounds i8, i8* %7, i64 10
%32 = load i8, i8* %29
%33 = load i8, i8* %31
%34 = getelementptr inbounds i8, i8* %7, i64 12
%35 = or i8 %32, %30
%36 = or i8 %35, %33
%37 = lshr i8 %36, 2
%38 = and i8 %37, 32
%39 = or i8 %38, %28
%40 = getelementptr inbounds i8, i8* %7, i64 13
%41 = load i8, i8* %34
%42 = getelementptr inbounds i8, i8* %7, i64 14
%43 = load i8, i8* %40
%44 = load i8, i8* %42
%45 = getelementptr inbounds i8, i8* %7, i64 16
%46 = or i8 %43, %41
%47 = or i8 %46, %44
%48 = lshr i8 %47, 3
%49 = and i8 %48, 16
%50 = or i8 %49, %39
%51 = getelementptr inbounds i8, i8* %7, i64 17
%52 = load i8, i8* %45
%53 = getelementptr inbounds i8, i8* %7, i64 18
%54 = load i8, i8* %51
%55 = load i8, i8* %53
%56 = getelementptr inbounds i8, i8* %7, i64 20
%57 = or i8 %54, %52
%58 = or i8 %57, %55
%59 = lshr i8 %58, 4
%60 = and i8 %59, 8
%61 = or i8 %60, %50
%62 = getelementptr inbounds i8, i8* %7, i64 21
%63 = load i8, i8* %56
%64 = getelementptr inbounds i8, i8* %7, i64 22
%65 = load i8, i8* %62
%66 = load i8, i8* %64
%67 = getelementptr inbounds i8, i8* %7, i64 24
%68 = or i8 %65, %63
%69 = or i8 %68, %66
%70 = lshr i8 %69, 5
%71 = and i8 %70, 4
%72 = or i8 %71, %61
%73 = getelementptr inbounds i8, i8* %7, i64 25
%74 = load i8, i8* %67
%75 = getelementptr inbounds i8, i8* %7, i64 26
%76 = load i8, i8* %73
%77 = load i8, i8* %75
%78 = getelementptr inbounds i8, i8* %7, i64 28
%79 = or i8 %76, %74
%80 = or i8 %79, %77
%81 = lshr i8 %80, 6
%82 = and i8 %81, 2
%83 = or i8 %82, %72
%84 = getelementptr inbounds i8, i8* %7, i64 29
%85 = load i8, i8* %78
%86 = getelementptr inbounds i8, i8* %7, i64 30
%87 = load i8, i8* %84
%88 = load i8, i8* %86
%89 = or i8 %87, %85
%90 = or i8 %89, %88
%91 = lshr i8 %90, 7
%92 = or i8 %91, %83
%93 = getelementptr i8, i8* %7, i64 32
%94 = getelementptr inbounds i8, i8* %8, i64 1
store i8 %92, i8* %8
%95 = add i32 %6, -8
%96 = icmp ugt i32 %95, 7
br i1 %96, label %5, label %97
97: ; preds = %5, %3
%98 = phi i8* [ %0, %3 ], [ %94, %5 ]
%99 = phi i8* [ %1, %3 ], [ %93, %5 ]
%100 = phi i32 [ %2, %3 ], [ %95, %5 ]
%101 = icmp eq i32 %100, 0
br i1 %101, label %163, label %102
102: ; preds = %97
%103 = and i32 %100, 1
%104 = icmp eq i32 %100, 1
br i1 %104, label %142, label %105
105: ; preds = %102
%106 = and i32 %100, -2
br label %107
107: ; preds = %107, %105
%108 = phi i32 [ 0, %105 ], [ %139, %107 ]
%109 = phi i8 [ 0, %105 ], [ %138, %107 ]
%110 = phi i8* [ %99, %105 ], [ %131, %107 ]
%111 = phi i32 [ 0, %105 ], [ %140, %107 ]
%112 = getelementptr inbounds i8, i8* %110, i64 1
%113 = load i8, i8* %110
%114 = getelementptr inbounds i8, i8* %110, i64 2
%115 = load i8, i8* %112
%116 = load i8, i8* %114
%117 = getelementptr inbounds i8, i8* %110, i64 4
%118 = or i8 %115, %113
%119 = or i8 %118, %116
%120 = lshr i32 128, %108
%121 = trunc i32 %120 to i8
%122 = icmp slt i8 %119, 0
%123 = select i1 %122, i8 %121, i8 0
%124 = or i8 %123, %109
%125 = or i32 %108, 1
%126 = getelementptr inbounds i8, i8* %110, i64 5
%127 = load i8, i8* %117
%128 = getelementptr inbounds i8, i8* %110, i64 6
%129 = load i8, i8* %126
%130 = load i8, i8* %128
%131 = getelementptr inbounds i8, i8* %110, i64 8
%132 = or i8 %129, %127
%133 = or i8 %132, %130
%134 = lshr i32 128, %125
%135 = trunc i32 %134 to i8
%136 = icmp slt i8 %133, 0
%137 = select i1 %136, i8 %135, i8 0
%138 = or i8 %137, %124
%139 = add nuw i32 %108, 2
%140 = add i32 %111, 2
%141 = icmp eq i32 %140, %106
br i1 %141, label %142, label %107
142: ; preds = %107, %102
%143 = phi i8 [ undef, %102 ], [ %138, %107 ]
%144 = phi i32 [ 0, %102 ], [ %139, %107 ]
%145 = phi i8 [ 0, %102 ], [ %138, %107 ]
%146 = phi i8* [ %99, %102 ], [ %131, %107 ]
%147 = icmp eq i32 %103, 0
br i1 %147, label %161, label %148
148: ; preds = %142
%149 = getelementptr inbounds i8, i8* %146, i64 1
%150 = load i8, i8* %146
%151 = getelementptr inbounds i8, i8* %146, i64 2
%152 = load i8, i8* %149
%153 = load i8, i8* %151
%154 = or i8 %152, %150
%155 = or i8 %154, %153
%156 = lshr i32 128, %144
%157 = trunc i32 %156 to i8
%158 = icmp slt i8 %155, 0
%159 = select i1 %158, i8 %157, i8 0
%160 = or i8 %159, %145
br label %161
161: ; preds = %142, %148
%162 = phi i8 [ %143, %142 ], [ %160, %148 ]
store i8 %162, i8* %98
br label %163
163: ; preds = %161, %97
ret void
}