unsigned long dfi_encodedata(unsigned char *buffer,
                             const unsigned long maxdfilen,
                             const unsigned char *rawtrackdata,
                             const unsigned long rawdatalength,
                             const unsigned int rotations) {
  unsigned long dfilen = 0;
  unsigned char c;
  char state = 0;
  unsigned int i, j;
  unsigned char carry = 0;
  state = (rawtrackdata[0] & 0x80) >> 7;
  for (i = 0; i < rawdatalength; i++) {
    c = rawtrackdata[i];
    for (j = 0; j < 8; j++) {
      carry++;
      if (carry == 0x7f) {
        if ((dfilen + 1) >= maxdfilen)
          return 0;
        buffer[dfilen++] = 0x7f;
        carry = 0;
      }
      if (((c & 0x80) >> 7) != state) {
        state = 1 - state;
        if (state == 1) {
          if ((dfilen + 1) >= maxdfilen)
            return 0;
          buffer[dfilen++] = carry;
          carry = 0;
        }
      }
      c = c << 1;
    }
  }
  for (i = 0; i < rotations; i++)
    buffer[(dfilen / (rotations + 1)) * i] |= 0x80;
  return dfilen;
}


x86 assembly (clang, -O0):
<dfi_encodedata>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %rdx,-0x20(%rbp)
mov    %rcx,-0x28(%rbp)
mov    %r8d,-0x2c(%rbp)
movq   $0x0,-0x38(%rbp)
movb   $0x0,-0x3a(%rbp)
movb   $0x0,-0x45(%rbp)
mov    -0x20(%rbp),%rax
movzbl (%rax),%eax
and    $0x80,%eax
sar    $0x7,%eax
mov    %al,-0x3a(%rbp)
movl   $0x0,-0x40(%rbp)
mov    -0x40(%rbp),%eax
cmp    -0x28(%rbp),%rax
jae    125a <dfi_encodedata+0x15a>
mov    -0x20(%rbp),%rax
mov    -0x40(%rbp),%ecx
mov    (%rax,%rcx,1),%al
mov    %al,-0x39(%rbp)
movl   $0x0,-0x44(%rbp)
cmpl   $0x8,-0x44(%rbp)
jae    1247 <dfi_encodedata+0x147>
mov    -0x45(%rbp),%al
add    $0x1,%al
mov    %al,-0x45(%rbp)
movzbl -0x45(%rbp),%eax
cmp    $0x7f,%eax
jne    11bb <dfi_encodedata+0xbb>
mov    -0x38(%rbp),%rax
add    $0x1,%rax
cmp    -0x18(%rbp),%rax
jb     11a0 <dfi_encodedata+0xa0>
movq   $0x0,-0x8(%rbp)
jmp    12b7 <dfi_encodedata+0x1b7>
mov    -0x10(%rbp),%rax
mov    -0x38(%rbp),%rcx
mov    %rcx,%rdx
add    $0x1,%rdx
mov    %rdx,-0x38(%rbp)
movb   $0x7f,(%rax,%rcx,1)
movb   $0x0,-0x45(%rbp)
movzbl -0x39(%rbp),%eax
and    $0x80,%eax
sar    $0x7,%eax
movsbl -0x3a(%rbp),%ecx
cmp    %ecx,%eax
je     122f <dfi_encodedata+0x12f>
movsbl -0x3a(%rbp),%ecx
mov    $0x1,%eax
sub    %ecx,%eax
mov    %al,-0x3a(%rbp)
movsbl -0x3a(%rbp),%eax
cmp    $0x1,%eax
jne    122a <dfi_encodedata+0x12a>
mov    -0x38(%rbp),%rax
add    $0x1,%rax
cmp    -0x18(%rbp),%rax
jb     120d <dfi_encodedata+0x10d>
movq   $0x0,-0x8(%rbp)
jmp    12b7 <dfi_encodedata+0x1b7>
mov    -0x45(%rbp),%dl
mov    -0x10(%rbp),%rax
mov    -0x38(%rbp),%rcx
mov    %rcx,%rsi
add    $0x1,%rsi
mov    %rsi,-0x38(%rbp)
mov    %dl,(%rax,%rcx,1)
movb   $0x0,-0x45(%rbp)
jmp    122f <dfi_encodedata+0x12f>
movzbl -0x39(%rbp),%eax
shl    $0x1,%eax
mov    %al,-0x39(%rbp)
mov    -0x44(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x44(%rbp)
jmp    1162 <dfi_encodedata+0x62>
jmp    124c <dfi_encodedata+0x14c>
mov    -0x40(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x40(%rbp)
jmp    1141 <dfi_encodedata+0x41>
movl   $0x0,-0x40(%rbp)
mov    -0x40(%rbp),%eax
cmp    -0x2c(%rbp),%eax
jae    12af <dfi_encodedata+0x1af>
mov    -0x10(%rbp),%rax
mov    %rax,-0x50(%rbp)
mov    -0x38(%rbp),%rax
mov    -0x2c(%rbp),%ecx
add    $0x1,%ecx
mov    %ecx,%ecx
xor    %edx,%edx
div    %rcx
mov    %rax,%rcx
mov    -0x50(%rbp),%rax
mov    -0x40(%rbp),%edx
imul   %rdx,%rcx
movzbl (%rax,%rcx,1),%edx
or     $0x80,%edx
mov    %dl,(%rax,%rcx,1)
mov    -0x40(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x40(%rbp)
jmp    1261 <dfi_encodedata+0x161>
mov    -0x38(%rbp),%rax
mov    %rax,-0x8(%rbp)
mov    -0x8(%rbp),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<dfi_encodedata>:
push   %rbp
push   %r15
push   %r14
push   %rbx
test   %rcx,%rcx
je     11ba <dfi_encodedata+0xba>
mov    (%rdx),%r15b
mov    %r15d,%r11d
shr    $0x7,%r11b
xor    %r14d,%r14d
xor    %r10d,%r10d
xor    %r9d,%r9d
mov    $0x8,%ebp
jmp    113b <dfi_encodedata+0x3b>
nopl   0x0(%rax)
mov    %rbx,%r9
add    %r15b,%r15b
add    $0xffffffff,%ebp
je     11a0 <dfi_encodedata+0xa0>
add    $0x1,%r14b
cmp    $0x7f,%r14b
jne    1160 <dfi_encodedata+0x60>
lea    0x1(%r9),%rbx
cmp    %rsi,%rbx
jae    11b2 <dfi_encodedata+0xb2>
movb   $0x7f,(%rdi,%r9,1)
xor    %r14d,%r14d
jmp    1163 <dfi_encodedata+0x63>
nopl   0x0(%rax,%rax,1)
mov    %r9,%rbx
mov    %r15d,%eax
shr    $0x7,%al
cmp    %r11b,%al
je     1130 <dfi_encodedata+0x30>
test   %r11b,%r11b
je     1180 <dfi_encodedata+0x80>
mov    $0x1,%al
sub    %r11b,%al
mov    %rbx,%r9
mov    %eax,%r11d
jmp    1133 <dfi_encodedata+0x33>
lea    0x1(%rbx),%r9
cmp    %rsi,%r9
jae    11b2 <dfi_encodedata+0xb2>
mov    %r14b,(%rdi,%rbx,1)
mov    $0x1,%r11b
xor    %r14d,%r14d
jmp    1133 <dfi_encodedata+0x33>
cs nopw 0x0(%rax,%rax,1)
nop
add    $0x1,%r10d
cmp    %rcx,%r10
jae    11bd <dfi_encodedata+0xbd>
mov    (%rdx,%r10,1),%r15b
jmp    1122 <dfi_encodedata+0x22>
xor    %r9d,%r9d
jmp    1265 <dfi_encodedata+0x165>
xor    %r9d,%r9d
test   %r8d,%r8d
je     1265 <dfi_encodedata+0x165>
lea    0x1(%r8),%ecx
mov    %r9,%rax
shr    $0x20,%rax
je     11dd <dfi_encodedata+0xdd>
mov    %r9,%rax
xor    %edx,%edx
div    %rcx
jmp    11e4 <dfi_encodedata+0xe4>
mov    %r9d,%eax
xor    %edx,%edx
div    %ecx
mov    %r8d,%esi
lea    -0x1(%rsi),%rdx
mov    %esi,%ecx
and    $0x3,%ecx
cmp    $0x3,%rdx
jae    11fa <dfi_encodedata+0xfa>
xor    %ebx,%ebx
jmp    1241 <dfi_encodedata+0x141>
and    $0xfffffffc,%esi
xor    %ebx,%ebx
nop
mov    %rax,%rbp
imul   %rbx,%rbp
orb    $0x80,(%rdi,%rbp,1)
mov    %rbx,%rdx
or     $0x1,%rdx
imul   %rax,%rdx
orb    $0x80,(%rdi,%rdx,1)
mov    %rbx,%rdx
or     $0x2,%rdx
imul   %rax,%rdx
orb    $0x80,(%rdi,%rdx,1)
mov    %rbx,%rdx
or     $0x3,%rdx
imul   %rax,%rdx
orb    $0x80,(%rdi,%rdx,1)
add    $0x4,%rbx
cmp    %rbx,%rsi
jne    1200 <dfi_encodedata+0x100>
test   %rcx,%rcx
je     1265 <dfi_encodedata+0x165>
cs nopw 0x0(%rax,%rax,1)
mov    %rax,%rdx
imul   %rbx,%rdx
orb    $0x80,(%rdi,%rdx,1)
add    $0x1,%rbx
add    $0xffffffffffffffff,%rcx
jne    1250 <dfi_encodedata+0x150>
mov    %r9,%rax
pop    %rbx
pop    %r14
pop    %r15
pop    %rbp
ret

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

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