void move_b(unsigned long *p, unsigned short *o) {
  *p = (((*p) << 3) & 070000000) | (((*p) >> 12) & 07000) |
       (((*p) >> 3) & 0700) | (((*p) << 12) & 07000000) | ((*p) & 0770077);
  *o = (((((*o) << 2) & 0xc000) + 0x8000) % 0xc000) |
       (((((*o) >> 8) & 0xc0) + 0x40) % 0xc0) |
       (((((*o) >> 2) & 0x30) + 0x20) % 0x30) |
       (((((*o) << 8) & 0x3000) + 0x1000) % 0x3000) | ((*o) & 0x0f0f);
}


x86 assembly (clang, -O0):
<move_b>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    -0x8(%rbp),%rax
mov    (%rax),%rcx
shl    $0x3,%rcx
and    $0xe00000,%rcx
mov    -0x8(%rbp),%rax
mov    (%rax),%rax
shr    $0xc,%rax
and    $0xe00,%rax
or     %rax,%rcx
mov    -0x8(%rbp),%rax
mov    (%rax),%rax
shr    $0x3,%rax
and    $0x1c0,%rax
or     %rax,%rcx
mov    -0x8(%rbp),%rax
mov    (%rax),%rax
shl    $0xc,%rax
and    $0x1c0000,%rax
or     %rax,%rcx
mov    -0x8(%rbp),%rax
mov    (%rax),%rax
and    $0x3f03f,%rax
or     %rax,%rcx
mov    -0x8(%rbp),%rax
mov    %rcx,(%rax)
mov    -0x10(%rbp),%rax
movzwl (%rax),%eax
shl    $0x2,%eax
and    $0xc000,%eax
add    $0x8000,%eax
mov    $0xc000,%ecx
cltd
idiv   %ecx
mov    %edx,-0x1c(%rbp)
mov    -0x10(%rbp),%rax
movzwl (%rax),%eax
sar    $0x8,%eax
and    $0xc0,%eax
add    $0x40,%eax
mov    $0xc0,%ecx
cltd
idiv   %ecx
mov    %edx,%eax
mov    -0x1c(%rbp),%edx
or     %eax,%edx
mov    %edx,-0x18(%rbp)
mov    -0x10(%rbp),%rax
movzwl (%rax),%eax
sar    $0x2,%eax
and    $0x30,%eax
add    $0x20,%eax
mov    $0x30,%ecx
cltd
idiv   %ecx
mov    -0x18(%rbp),%eax
or     %edx,%eax
mov    %eax,-0x14(%rbp)
mov    -0x10(%rbp),%rax
movzwl (%rax),%eax
shl    $0x8,%eax
and    $0x3000,%eax
add    $0x1000,%eax
mov    $0x3000,%ecx
cltd
idiv   %ecx
mov    -0x14(%rbp),%eax
or     %edx,%eax
mov    -0x10(%rbp),%rcx
movzwl (%rcx),%ecx
and    $0xf0f,%ecx
or     %ecx,%eax
mov    %ax,%cx
mov    -0x10(%rbp),%rax
mov    %cx,(%rax)
pop    %rbp
ret

x86 assembly (clang, -O2):
<move_b>:
mov    (%rdi),%rax
mov    %eax,%r8d
and    $0x1c0000,%r8d
mov    %rax,%r9
shr    $0xc,%r9
and    $0xe00,%r9d
mov    %rax,%rcx
shr    $0x3,%rcx
and    $0x1c0,%ecx
mov    %eax,%edx
shl    $0xc,%edx
and    $0x1c0000,%edx
and    $0x3f03f,%eax
or     %r9,%rax
lea    (%rax,%r8,8),%rax
or     %rcx,%rax
or     %rdx,%rax
mov    %rax,(%rdi)
movzwl (%rsi),%eax
mov    %eax,%ecx
and    $0x3000,%ecx
lea    0x8000(,%rcx,4),%r8d
mov    $0xaaaaaaab,%edx
imul   %r8,%rdx
shr    $0x2f,%rdx
shl    $0xe,%edx
lea    (%rdx,%rdx,2),%edx
sub    %edx,%r8d
mov    %eax,%edx
shr    $0x8,%edx
and    $0xffffffc0,%edx
add    $0x40,%edx
imul   $0xaaab,%edx,%edi
shr    $0x11,%edi
and    $0xffffffc0,%edi
lea    (%rdi,%rdi,2),%edi
sub    %edi,%edx
mov    %eax,%ecx
shr    $0x2,%cl
and    $0x30,%cl
add    $0x20,%cl
movzbl %cl,%ecx
imul   $0xab,%ecx,%edi
shr    $0x9,%edi
and    $0xfffffff0,%edi
lea    (%rdi,%rdi,2),%edi
sub    %dil,%cl
movzbl %cl,%r9d
mov    %eax,%edi
and    $0x30,%edi
shl    $0x8,%edi
add    $0x1000,%edi
imul   $0xaaab,%edi,%ecx
shr    $0x11,%ecx
and    $0x3000,%ecx
lea    (%rcx,%rcx,2),%ecx
sub    %ecx,%edi
and    $0xf0f,%eax
or     %r8d,%eax
or     %edx,%eax
or     %edi,%eax
or     %r9d,%eax
mov    %ax,(%rsi)
ret

LLVM IR (-O0):
define void @move_b(i64* %0, i16* %1) {
%3 = alloca i64*
%4 = alloca i16*
store i64* %0, i64** %3
store i16* %1, i16** %4
%5 = load i64*, i64** %3
%6 = load i64, i64* %5
%7 = shl i64 %6, 3
%8 = and i64 %7, 14680064
%9 = load i64*, i64** %3
%10 = load i64, i64* %9
%11 = lshr i64 %10, 12
%12 = and i64 %11, 3584
%13 = or i64 %8, %12
%14 = load i64*, i64** %3
%15 = load i64, i64* %14
%16 = lshr i64 %15, 3
%17 = and i64 %16, 448
%18 = or i64 %13, %17
%19 = load i64*, i64** %3
%20 = load i64, i64* %19
%21 = shl i64 %20, 12
%22 = and i64 %21, 1835008
%23 = or i64 %18, %22
%24 = load i64*, i64** %3
%25 = load i64, i64* %24
%26 = and i64 %25, 258111
%27 = or i64 %23, %26
%28 = load i64*, i64** %3
store i64 %27, i64* %28
%29 = load i16*, i16** %4
%30 = load i16, i16* %29
%31 = zext i16 %30 to i32
%32 = shl i32 %31, 2
%33 = and i32 %32, 49152
%34 = add nsw i32 %33, 32768
%35 = srem i32 %34, 49152
%36 = load i16*, i16** %4
%37 = load i16, i16* %36
%38 = zext i16 %37 to i32
%39 = ashr i32 %38, 8
%40 = and i32 %39, 192
%41 = add nsw i32 %40, 64
%42 = srem i32 %41, 192
%43 = or i32 %35, %42
%44 = load i16*, i16** %4
%45 = load i16, i16* %44
%46 = zext i16 %45 to i32
%47 = ashr i32 %46, 2
%48 = and i32 %47, 48
%49 = add nsw i32 %48, 32
%50 = srem i32 %49, 48
%51 = or i32 %43, %50
%52 = load i16*, i16** %4
%53 = load i16, i16* %52
%54 = zext i16 %53 to i32
%55 = shl i32 %54, 8
%56 = and i32 %55, 12288
%57 = add nsw i32 %56, 4096
%58 = srem i32 %57, 12288
%59 = or i32 %51, %58
%60 = load i16*, i16** %4
%61 = load i16, i16* %60
%62 = zext i16 %61 to i32
%63 = and i32 %62, 3855
%64 = or i32 %59, %63
%65 = trunc i32 %64 to i16
%66 = load i16*, i16** %4
store i16 %65, i16* %66
ret void
}

LLVM IR (-O2):
define void @move_b(i64* nocapture %0, i16* nocapture %1) {
%3 = load i64, i64* %0
%4 = shl i64 %3, 3
%5 = and i64 %4, 14680064
%6 = lshr i64 %3, 12
%7 = and i64 %6, 3584
%8 = lshr i64 %3, 3
%9 = and i64 %8, 448
%10 = shl i64 %3, 12
%11 = and i64 %10, 1835008
%12 = and i64 %3, 258111
%13 = or i64 %7, %12
%14 = or i64 %13, %5
%15 = or i64 %14, %9
%16 = or i64 %15, %11
store i64 %16, i64* %0
%17 = load i16, i16* %1
%18 = zext i16 %17 to i32
%19 = shl nuw nsw i32 %18, 2
%20 = and i32 %19, 49152
%21 = add nuw nsw i32 %20, 32768
%22 = urem i32 %21, 49152
%23 = lshr i16 %17, 8
%24 = and i16 %23, 192
%25 = add nuw nsw i16 %24, 64
%26 = urem i16 %25, 192
%27 = zext i16 %26 to i32
%28 = trunc i16 %17 to i8
%29 = lshr i8 %28, 2
%30 = and i8 %29, 48
%31 = add nuw nsw i8 %30, 32
%32 = urem i8 %31, 48
%33 = zext i8 %32 to i32
%34 = shl i16 %17, 8
%35 = and i16 %34, 12288
%36 = add nuw nsw i16 %35, 4096
%37 = urem i16 %36, 12288
%38 = zext i16 %37 to i32
%39 = and i32 %18, 3855
%40 = or i32 %39, %27
%41 = or i32 %40, %22
%42 = or i32 %41, %38
%43 = or i32 %42, %33
%44 = trunc i32 %43 to i16
store i16 %44, i16* %1
ret void
}