unsigned short frm_chk(const unsigned short *src, int len) {
  unsigned int sum = 0;
  while (len > 3) {
    sum += *src++;
    sum += *src++;
    len -= 4;
  }
  switch (len & 0x03) {
  case 2:
    sum += *src++;
    break;
  case 3:
    sum += *src++;
    sum += *((unsigned char *)src);
    break;
  case 1:
    sum += *((unsigned char *)src);
    break;
  default:
    break;
  }
  sum = (sum >> 16) + (sum & 0x0FFFF);
  sum += (sum >> 16);
  return (~sum);
}


x86 assembly (clang, -O0):
<frm_chk>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
movl   $0x0,-0x10(%rbp)
cmpl   $0x3,-0xc(%rbp)
jle    115a <frm_chk+0x5a>
mov    -0x8(%rbp),%rax
mov    %rax,%rcx
add    $0x2,%rcx
mov    %rcx,-0x8(%rbp)
movzwl (%rax),%eax
add    -0x10(%rbp),%eax
mov    %eax,-0x10(%rbp)
mov    -0x8(%rbp),%rax
mov    %rax,%rcx
add    $0x2,%rcx
mov    %rcx,-0x8(%rbp)
movzwl (%rax),%eax
add    -0x10(%rbp),%eax
mov    %eax,-0x10(%rbp)
mov    -0xc(%rbp),%eax
sub    $0x4,%eax
mov    %eax,-0xc(%rbp)
jmp    1112 <frm_chk+0x12>
mov    -0xc(%rbp),%eax
and    $0x3,%eax
mov    %eax,-0x14(%rbp)
sub    $0x1,%eax
je     11da <frm_chk+0xda>
jmp    1171 <frm_chk+0x71>
mov    -0x14(%rbp),%eax
sub    $0x2,%eax
je     1193 <frm_chk+0x93>
jmp    1182 <frm_chk+0x82>
mov    -0x14(%rbp),%eax
sub    $0x3,%eax
je     11b0 <frm_chk+0xb0>
jmp    11ec <frm_chk+0xec>
mov    -0x8(%rbp),%rax
mov    %rax,%rcx
add    $0x2,%rcx
mov    %rcx,-0x8(%rbp)
movzwl (%rax),%eax
add    -0x10(%rbp),%eax
mov    %eax,-0x10(%rbp)
jmp    11f1 <frm_chk+0xf1>
mov    -0x8(%rbp),%rax
mov    %rax,%rcx
add    $0x2,%rcx
mov    %rcx,-0x8(%rbp)
movzwl (%rax),%eax
add    -0x10(%rbp),%eax
mov    %eax,-0x10(%rbp)
mov    -0x8(%rbp),%rax
movzbl (%rax),%eax
add    -0x10(%rbp),%eax
mov    %eax,-0x10(%rbp)
jmp    11f1 <frm_chk+0xf1>
mov    -0x8(%rbp),%rax
movzbl (%rax),%eax
add    -0x10(%rbp),%eax
mov    %eax,-0x10(%rbp)
jmp    11f1 <frm_chk+0xf1>
jmp    11f1 <frm_chk+0xf1>
mov    -0x10(%rbp),%eax
shr    $0x10,%eax
mov    -0x10(%rbp),%ecx
and    $0xffff,%ecx
add    %ecx,%eax
mov    %eax,-0x10(%rbp)
mov    -0x10(%rbp),%eax
shr    $0x10,%eax
add    -0x10(%rbp),%eax
mov    %eax,-0x10(%rbp)
mov    -0x10(%rbp),%eax
xor    $0xffffffff,%eax
movzwl %ax,%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<frm_chk>:
xor    %ecx,%ecx
cmp    $0x4,%esi
jl     1126 <frm_chk+0x26>
xor    %ecx,%ecx
mov    %esi,%r8d
sub    $0x7,%r8d
cmovb  %ecx,%r8d
add    $0x3,%r8d
cmp    $0x1c,%r8d
jae    112e <frm_chk+0x2e>
mov    %rdi,%rax
jmp    11d0 <frm_chk+0xd0>
mov    %rdi,%rax
jmp    11e9 <frm_chk+0xe9>
shr    $0x2,%r8d
add    $0x1,%r8d
mov    %r8d,%edx
and    $0xfffffff8,%edx
lea    0x0(,%rdx,4),%eax
sub    %eax,%esi
lea    (%rdi,%rdx,4),%rax
pxor   %xmm1,%xmm1
xor    %ecx,%ecx
movdqa 0xea9(%rip),%xmm0
pxor   %xmm2,%xmm2
nopl   0x0(%rax,%rax,1)
movdqu (%rdi,%rcx,4),%xmm3
movdqu 0x10(%rdi,%rcx,4),%xmm4
movdqa %xmm3,%xmm5
pand   %xmm0,%xmm5
paddd  %xmm1,%xmm5
movdqa %xmm4,%xmm6
pand   %xmm0,%xmm6
paddd  %xmm2,%xmm6
psrld  $0x10,%xmm3
movdqa %xmm3,%xmm1
paddd  %xmm5,%xmm1
psrld  $0x10,%xmm4
movdqa %xmm4,%xmm2
paddd  %xmm6,%xmm2
add    $0x8,%rcx
cmp    %rcx,%rdx
jne    1160 <frm_chk+0x60>
paddd  %xmm1,%xmm2
pshufd $0xee,%xmm2,%xmm0
paddd  %xmm2,%xmm0
pshufd $0x55,%xmm0,%xmm1
paddd  %xmm0,%xmm1
movd   %xmm1,%ecx
cmp    %r8,%rdx
je     11e9 <frm_chk+0xe9>
cs nopw 0x0(%rax,%rax,1)
nop
mov    %esi,%edx
movzwl (%rax),%esi
add    %ecx,%esi
movzwl 0x2(%rax),%ecx
add    $0x4,%rax
add    %esi,%ecx
lea    -0x4(%rdx),%esi
cmp    $0x7,%edx
ja     11d0 <frm_chk+0xd0>
and    $0x3,%esi
cmp    $0x1,%esi
je     1200 <frm_chk+0x100>
cmp    $0x3,%esi
je     1205 <frm_chk+0x105>
cmp    $0x2,%esi
jne    1210 <frm_chk+0x110>
movzwl (%rax),%eax
jmp    120e <frm_chk+0x10e>
movzbl (%rax),%eax
jmp    120e <frm_chk+0x10e>
movzwl (%rax),%edx
add    %edx,%ecx
movzbl 0x2(%rax),%eax
add    %eax,%ecx
mov    %ecx,%eax
shr    $0x10,%eax
movzwl %cx,%ecx
add    %eax,%ecx
mov    %ecx,%eax
shr    $0x10,%eax
add    %ecx,%eax
not    %eax
ret

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

LLVM IR (-O2):
define zeroext i16 @frm_chk(i16* nocapture %0, i32 %1) {
%3 = icmp sgt i32 %1, 3
br i1 %3, label %4, label %68
4: ; preds = %2
%5 = add i32 %1, 3
%6 = call i32 @llvm.umin.i32(i32 %1, i32 7)
%7 = sub i32 %5, %6
%8 = lshr i32 %7, 2
%9 = add nuw nsw i32 %8, 1
%10 = zext i32 %9 to i64
%11 = icmp ult i32 %7, 28
br i1 %11, label %50, label %12
12: ; preds = %4
%13 = and i64 %10, 2147483640
%14 = trunc i64 %13 to i32
%15 = mul i32 %14, -4
%16 = add i32 %15, %1
%17 = shl nuw nsw i64 %13, 1
%18 = getelementptr i16, i16* %0, i64 %17
br label %19
19: ; preds = %19, %12
%20 = phi i64 [ 0, %12 ], [ %44, %19 ]
%21 = phi <4 x i32> [ zeroinitializer, %12 ], [ %42, %19 ]
%22 = phi <4 x i32> [ zeroinitializer, %12 ], [ %43, %19 ]
%23 = shl i64 %20, 1
%24 = getelementptr i16, i16* %0, i64 %23
%25 = shl i64 %20, 1
%26 = or i64 %25, 8
%27 = getelementptr i16, i16* %0, i64 %26
%28 = bitcast i16* %24 to <8 x i16>*
%29 = bitcast i16* %27 to <8 x i16>*
%30 = load <8 x i16>, <8 x i16>* %28
%31 = load <8 x i16>, <8 x i16>* %29
%32 = shufflevector <8 x i16> %30, <8 x i16> poison, <4 x i32> <i32 0, i32 2, i32 4, i32 6>
%33 = shufflevector <8 x i16> %31, <8 x i16> poison, <4 x i32> <i32 0, i32 2, i32 4, i32 6>
%34 = shufflevector <8 x i16> %30, <8 x i16> poison, <4 x i32> <i32 1, i32 3, i32 5, i32 7>
%35 = shufflevector <8 x i16> %31, <8 x i16> poison, <4 x i32> <i32 1, i32 3, i32 5, i32 7>
%36 = zext <4 x i16> %32 to <4 x i32>
%37 = zext <4 x i16> %33 to <4 x i32>
%38 = add <4 x i32> %21, %36
%39 = add <4 x i32> %22, %37
%40 = zext <4 x i16> %34 to <4 x i32>
%41 = zext <4 x i16> %35 to <4 x i32>
%42 = add <4 x i32> %38, %40
%43 = add <4 x i32> %39, %41
%44 = add nuw i64 %20, 8
%45 = icmp eq i64 %44, %13
br i1 %45, label %46, label %19
46: ; preds = %19
%47 = add <4 x i32> %43, %42
%48 = call i32 @llvm.vector.reduce.add.v4i32(<4 x i32> %47)
%49 = icmp eq i64 %13, %10
br i1 %49, label %68, label %50
50: ; preds = %4, %46
%51 = phi i32 [ 0, %4 ], [ %48, %46 ]
%52 = phi i32 [ %1, %4 ], [ %16, %46 ]
%53 = phi i16* [ %0, %4 ], [ %18, %46 ]
br label %54
54: ; preds = %50, %54
%55 = phi i32 [ %65, %54 ], [ %51, %50 ]
%56 = phi i32 [ %66, %54 ], [ %52, %50 ]
%57 = phi i16* [ %62, %54 ], [ %53, %50 ]
%58 = getelementptr inbounds i16, i16* %57, i64 1
%59 = load i16, i16* %57
%60 = zext i16 %59 to i32
%61 = add i32 %55, %60
%62 = getelementptr inbounds i16, i16* %57, i64 2
%63 = load i16, i16* %58
%64 = zext i16 %63 to i32
%65 = add i32 %61, %64
%66 = add nsw i32 %56, -4
%67 = icmp ugt i32 %56, 7
br i1 %67, label %54, label %68
68: ; preds = %54, %46, %2
%69 = phi i16* [ %0, %2 ], [ %18, %46 ], [ %62, %54 ]
%70 = phi i32 [ %1, %2 ], [ %16, %46 ], [ %66, %54 ]
%71 = phi i32 [ 0, %2 ], [ %48, %46 ], [ %65, %54 ]
%72 = and i32 %70, 3
switch i32 %72, label %91 [
i32 2, label %73
i32 3, label %77
i32 1, label %86
]
73: ; preds = %68
%74 = load i16, i16* %69
%75 = zext i16 %74 to i32
%76 = add i32 %71, %75
br label %91
77: ; preds = %68
%78 = getelementptr inbounds i16, i16* %69, i64 1
%79 = load i16, i16* %69
%80 = zext i16 %79 to i32
%81 = add i32 %71, %80
%82 = bitcast i16* %78 to i8*
%83 = load i8, i8* %82
%84 = zext i8 %83 to i32
%85 = add i32 %81, %84
br label %91
86: ; preds = %68
%87 = bitcast i16* %69 to i8*
%88 = load i8, i8* %87
%89 = zext i8 %88 to i32
%90 = add i32 %71, %89
br label %91
91: ; preds = %68, %86, %77, %73
%92 = phi i32 [ %71, %68 ], [ %90, %86 ], [ %85, %77 ], [ %76, %73 ]
%93 = lshr i32 %92, 16
%94 = and i32 %92, 65535
%95 = add nuw nsw i32 %93, %94
%96 = lshr i32 %95, 16
%97 = add nuw nsw i32 %96, %95
%98 = trunc i32 %97 to i16
%99 = xor i16 %98, -1
ret i16 %99
}