int lpfilt(int datum, int init) {
  static long y1 = 0, y2 = 0;
  static int data[6], ptr = 0;
  long y0;
  int output, halfPtr;
  if (init) {
    for (ptr = 0; ptr < 6; ++ptr)
      data[ptr] = 0;
    y1 = y2 = 0;
    ptr = 0;
  }
  halfPtr = ptr - (6 / 2);
  if (halfPtr < 0)
    halfPtr += 6;
  y0 = (y1 << 1) - y2 + datum - (data[halfPtr] << 1) + data[ptr];
  y2 = y1;
  y1 = y0;
  output = y0 / ((6 * 6) / 4);
  data[ptr] = datum;
  if (++ptr == 6)
    ptr = 0;
  return (output);
}


x86 assembly (clang, -O0):
<lpfilt>:
push   %rbp
mov    %rsp,%rbp
mov    %edi,-0x4(%rbp)
mov    %esi,-0x8(%rbp)
cmpl   $0x0,-0x8(%rbp)
je     1174 <lpfilt+0x74>
movl   $0x0,0x2f3a(%rip)
cmpl   $0x6,0x2f33(%rip)
jge    1154 <lpfilt+0x54>
movslq 0x2f26(%rip),%rcx
lea    0x2f07(%rip),%rax
movl   $0x0,(%rax,%rcx,4)
mov    0x2f12(%rip),%eax
add    $0x1,%eax
mov    %eax,0x2f09(%rip)
jmp    111e <lpfilt+0x1e>
movq   $0x0,0x2ed9(%rip)
movq   $0x0,0x2ec6(%rip)
movl   $0x0,0x2ee4(%rip)
mov    0x2ede(%rip),%eax
sub    $0x3,%eax
mov    %eax,-0x18(%rbp)
cmpl   $0x0,-0x18(%rbp)
jge    1193 <lpfilt+0x93>
mov    -0x18(%rbp),%eax
add    $0x6,%eax
mov    %eax,-0x18(%rbp)
mov    0x2e96(%rip),%rax
shl    $0x1,%rax
sub    0x2e93(%rip),%rax
movslq -0x4(%rbp),%rcx
add    %rcx,%rax
movslq -0x18(%rbp),%rdx
lea    0x2e89(%rip),%rcx
mov    (%rcx,%rdx,4),%ecx
shl    $0x1,%ecx
movslq %ecx,%rcx
sub    %rcx,%rax
movslq 0x2e8e(%rip),%rdx
lea    0x2e6f(%rip),%rcx
movslq (%rcx,%rdx,4),%rcx
add    %rcx,%rax
mov    %rax,-0x10(%rbp)
mov    0x2e4d(%rip),%rax
mov    %rax,0x2e4e(%rip)
mov    -0x10(%rbp),%rax
mov    %rax,0x2e3b(%rip)
mov    -0x10(%rbp),%rax
mov    $0x9,%ecx
cqto
idiv   %rcx
mov    %eax,-0x14(%rbp)
mov    -0x4(%rbp),%edx
movslq 0x2e48(%rip),%rcx
lea    0x2e29(%rip),%rax
mov    %edx,(%rax,%rcx,4)
mov    0x2e38(%rip),%eax
add    $0x1,%eax
mov    %eax,0x2e2f(%rip)
cmp    $0x6,%eax
jne    123c <lpfilt+0x13c>
movl   $0x0,0x2e1c(%rip)
mov    -0x14(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<lpfilt>:
test   %esi,%esi
je     1125 <lpfilt+0x25>
xorps  %xmm0,%xmm0
movaps %xmm0,0x2f32(%rip)
movq   $0x0,0x2f37(%rip)
xor    %eax,%eax
xor    %ecx,%ecx
xor    %r9d,%r9d
xor    %r8d,%r8d
jmp    1150 <lpfilt+0x50>
movslq 0x2f2c(%rip),%rax
mov    0x2efd(%rip),%rcx
mov    0x2efe(%rip),%r9
lea    0x2eff(%rip),%rdx
movslq (%rdx,%rax,4),%r8
mov    $0xfffffffd,%edx
cmp    $0x2,%rax
jg     1155 <lpfilt+0x55>
mov    $0x3,%edx
add    %eax,%edx
movslq %edi,%rdi
movslq %edx,%rdx
lea    0x2edc(%rip),%r10
mov    (%r10,%rdx,4),%edx
add    %edx,%edx
movslq %edx,%rdx
add    %r9,%rdx
movslq %eax,%rsi
lea    (%rdi,%rcx,2),%rax
sub    %rdx,%rax
add    %r8,%rax
mov    %rcx,0x2eb4(%rip)
mov    %rax,0x2ea5(%rip)
movabs $0x1c71c71c71c71c72,%rcx
c7 71 1c
imul   %rcx
mov    %rdx,%rax
shr    $0x3f,%rax
add    %edx,%eax
mov    %edi,(%r10,%rsi,4)
add    $0x1,%esi
xor    %ecx,%ecx
cmp    $0x6,%esi
cmovne %esi,%ecx
mov    %ecx,0x2ea2(%rip)
ret

LLVM IR (-O0):
@lpfilt.y1 = internal global i64 0
@lpfilt.y2 = internal global i64 0
@lpfilt.data = internal global [6 x i32] zeroinitializer
@lpfilt.ptr = internal global i32 0
define i32 @lpfilt(i32 %0, i32 %1) {
%3 = alloca i32
%4 = alloca i32
%5 = alloca i64
%6 = alloca i32
%7 = alloca i32
store i32 %0, i32* %3
store i32 %1, i32* %4
%8 = load i32, i32* %4
%9 = icmp ne i32 %8, 0
br i1 %9, label %10, label %22
10: ; preds = %2
store i32 0, i32* @lpfilt.ptr
br label %11
11: ; preds = %18, %10
%12 = load i32, i32* @lpfilt.ptr
%13 = icmp slt i32 %12, 6
br i1 %13, label %14, label %21
14: ; preds = %11
%15 = load i32, i32* @lpfilt.ptr
%16 = sext i32 %15 to i64
%17 = getelementptr inbounds [6 x i32], [6 x i32]* @lpfilt.data, i64 0, i64 %16
store i32 0, i32* %17
br label %18
18: ; preds = %14
%19 = load i32, i32* @lpfilt.ptr
%20 = add nsw i32 %19, 1
store i32 %20, i32* @lpfilt.ptr
br label %11
21: ; preds = %11
store i64 0, i64* @lpfilt.y2
store i64 0, i64* @lpfilt.y1
store i32 0, i32* @lpfilt.ptr
br label %22
22: ; preds = %21, %2
%23 = load i32, i32* @lpfilt.ptr
%24 = sub nsw i32 %23, 3
store i32 %24, i32* %7
%25 = load i32, i32* %7
%26 = icmp slt i32 %25, 0
br i1 %26, label %27, label %30
27: ; preds = %22
%28 = load i32, i32* %7
%29 = add nsw i32 %28, 6
store i32 %29, i32* %7
br label %30
30: ; preds = %27, %22
%31 = load i64, i64* @lpfilt.y1
%32 = shl i64 %31, 1
%33 = load i64, i64* @lpfilt.y2
%34 = sub nsw i64 %32, %33
%35 = load i32, i32* %3
%36 = sext i32 %35 to i64
%37 = add nsw i64 %34, %36
%38 = load i32, i32* %7
%39 = sext i32 %38 to i64
%40 = getelementptr inbounds [6 x i32], [6 x i32]* @lpfilt.data, i64 0, i64 %39
%41 = load i32, i32* %40
%42 = shl i32 %41, 1
%43 = sext i32 %42 to i64
%44 = sub nsw i64 %37, %43
%45 = load i32, i32* @lpfilt.ptr
%46 = sext i32 %45 to i64
%47 = getelementptr inbounds [6 x i32], [6 x i32]* @lpfilt.data, i64 0, i64 %46
%48 = load i32, i32* %47
%49 = sext i32 %48 to i64
%50 = add nsw i64 %44, %49
store i64 %50, i64* %5
%51 = load i64, i64* @lpfilt.y1
store i64 %51, i64* @lpfilt.y2
%52 = load i64, i64* %5
store i64 %52, i64* @lpfilt.y1
%53 = load i64, i64* %5
%54 = sdiv i64 %53, 9
%55 = trunc i64 %54 to i32
store i32 %55, i32* %6
%56 = load i32, i32* %3
%57 = load i32, i32* @lpfilt.ptr
%58 = sext i32 %57 to i64
%59 = getelementptr inbounds [6 x i32], [6 x i32]* @lpfilt.data, i64 0, i64 %58
store i32 %56, i32* %59
%60 = load i32, i32* @lpfilt.ptr
%61 = add nsw i32 %60, 1
store i32 %61, i32* @lpfilt.ptr
%62 = icmp eq i32 %61, 6
br i1 %62, label %63, label %64
63: ; preds = %30
store i32 0, i32* @lpfilt.ptr
br label %64
64: ; preds = %63, %30
%65 = load i32, i32* %6
ret i32 %65
}

LLVM IR (-O2):
@lpfilt.y1 = internal unnamed_addr global i64 0
@lpfilt.y2 = internal unnamed_addr global i64 0
@lpfilt.data = internal unnamed_addr global [6 x i32] zeroinitializer
@lpfilt.ptr = internal unnamed_addr global i32 0
define i32 @lpfilt(i32 %0, i32 %1) {
%3 = icmp eq i32 %1, 0
br i1 %3, label %5, label %4
4: ; preds = %2
br label %14
5: ; preds = %2
%6 = load i32, i32* @lpfilt.ptr
%7 = load i64, i64* @lpfilt.y1
%8 = load i64, i64* @lpfilt.y2
%9 = sext i32 %6 to i64
%10 = getelementptr inbounds [6 x i32], [6 x i32]* @lpfilt.data, i64 0, i64 %9
%11 = load i32, i32* %10
%12 = sext i32 %11 to i64
%13 = icmp slt i32 %6, 3
br i1 %13, label %14, label %19
14: ; preds = %4, %5
%15 = phi i32 [ 0, %4 ], [ %6, %5 ]
%16 = phi i64 [ 0, %4 ], [ %7, %5 ]
%17 = phi i64 [ 0, %4 ], [ %8, %5 ]
%18 = phi i64 [ 0, %4 ], [ %12, %5 ]
br label %19
19: ; preds = %5, %14
%20 = phi i32 [ %15, %14 ], [ %6, %5 ]
%21 = phi i64 [ %16, %14 ], [ %7, %5 ]
%22 = phi i64 [ %17, %14 ], [ %8, %5 ]
%23 = phi i64 [ %18, %14 ], [ %12, %5 ]
%24 = phi i32 [ 3, %14 ], [ -3, %5 ]
%25 = add nsw i32 %24, %20
%26 = shl i64 %21, 1
%27 = sext i32 %0 to i64
%28 = sext i32 %25 to i64
%29 = getelementptr inbounds [6 x i32], [6 x i32]* @lpfilt.data, i64 0, i64 %28
%30 = load i32, i32* %29
%31 = shl i32 %30, 1
%32 = sext i32 %31 to i64
%33 = sext i32 %20 to i64
%34 = getelementptr inbounds [6 x i32], [6 x i32]* @lpfilt.data, i64 0, i64 %33
%35 = add i64 %26, %27
%36 = add i64 %22, %32
%37 = sub i64 %35, %36
%38 = add i64 %37, %23
store i64 %21, i64* @lpfilt.y2
store i64 %38, i64* @lpfilt.y1
%39 = sdiv i64 %38, 9
%40 = trunc i64 %39 to i32
store i32 %0, i32* %34
%41 = add nsw i32 %20, 1
%42 = icmp eq i32 %41, 6
%43 = select i1 %42, i32 0, i32 %41
store i32 %43, i32* @lpfilt.ptr
ret i32 %40
}