int ntruenc_encode_encrypted(short *enc, int n, unsigned char *data, int len) {
  int ret = 0;
  int i, j;
  if (len < (n * 12 + 7) / 8) {
    ret = 3;
    goto end;
  }
  for (i = 0, j = 0; i < (n / 2) * 2; i += 2, j += 3) {
    data[j + 0] = ((enc[i + 0]) << 0);
    data[j + 1] = ((enc[i + 0] & 0xf00) >> 8) | ((enc[i + 1] & 0x00f) << 4);
    data[j + 2] = ((enc[i + 1] & 0xff0) >> 4);
  }
  if (i < n) {
    data[j + 0] = ((enc[i + 0] & 0x0ff) << 0);
    data[j + 1] = ((enc[i + 0] & 0xf00) >> 8);
  }
end:
  return ret;
}


x86 assembly (clang, -O0):
<ntruenc_encode_encrypted>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %ecx,-0x1c(%rbp)
movl   $0x0,-0x20(%rbp)
mov    -0x1c(%rbp),%eax
mov    %eax,-0x2c(%rbp)
imul   $0xc,-0xc(%rbp),%eax
add    $0x7,%eax
mov    $0x8,%ecx
cltd
idiv   %ecx
mov    %eax,%ecx
mov    -0x2c(%rbp),%eax
cmp    %ecx,%eax
jge    1147 <ntruenc_encode_encrypted+0x47>
movl   $0x3,-0x20(%rbp)
jmp    1289 <ntruenc_encode_encrypted+0x189>
movl   $0x0,-0x24(%rbp)
movl   $0x0,-0x28(%rbp)
mov    -0x24(%rbp),%eax
mov    %eax,-0x30(%rbp)
mov    -0xc(%rbp),%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
mov    %eax,%ecx
mov    -0x30(%rbp),%eax
shl    $0x1,%ecx
cmp    %ecx,%eax
jge    1222 <ntruenc_encode_encrypted+0x122>
mov    -0x8(%rbp),%rax
mov    -0x24(%rbp),%ecx
add    $0x0,%ecx
movslq %ecx,%rcx
movswl (%rax,%rcx,2),%eax
shl    $0x0,%eax
mov    %al,%dl
mov    -0x18(%rbp),%rax
mov    -0x28(%rbp),%ecx
add    $0x0,%ecx
movslq %ecx,%rcx
mov    %dl,(%rax,%rcx,1)
mov    -0x8(%rbp),%rax
mov    -0x24(%rbp),%ecx
add    $0x0,%ecx
movslq %ecx,%rcx
movswl (%rax,%rcx,2),%eax
and    $0xf00,%eax
sar    $0x8,%eax
mov    -0x8(%rbp),%rcx
mov    -0x24(%rbp),%edx
add    $0x1,%edx
movslq %edx,%rdx
movswl (%rcx,%rdx,2),%ecx
and    $0xf,%ecx
shl    $0x4,%ecx
or     %ecx,%eax
mov    %al,%dl
mov    -0x18(%rbp),%rax
mov    -0x28(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
mov    %dl,(%rax,%rcx,1)
mov    -0x8(%rbp),%rax
mov    -0x24(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
movswl (%rax,%rcx,2),%eax
and    $0xff0,%eax
sar    $0x4,%eax
mov    %al,%dl
mov    -0x18(%rbp),%rax
mov    -0x28(%rbp),%ecx
add    $0x2,%ecx
movslq %ecx,%rcx
mov    %dl,(%rax,%rcx,1)
mov    -0x24(%rbp),%eax
add    $0x2,%eax
mov    %eax,-0x24(%rbp)
mov    -0x28(%rbp),%eax
add    $0x3,%eax
mov    %eax,-0x28(%rbp)
jmp    1155 <ntruenc_encode_encrypted+0x55>
mov    -0x24(%rbp),%eax
cmp    -0xc(%rbp),%eax
jge    1284 <ntruenc_encode_encrypted+0x184>
mov    -0x8(%rbp),%rax
mov    -0x24(%rbp),%ecx
add    $0x0,%ecx
movslq %ecx,%rcx
movswl (%rax,%rcx,2),%eax
and    $0xff,%eax
shl    $0x0,%eax
mov    %al,%dl
mov    -0x18(%rbp),%rax
mov    -0x28(%rbp),%ecx
add    $0x0,%ecx
movslq %ecx,%rcx
mov    %dl,(%rax,%rcx,1)
mov    -0x8(%rbp),%rax
mov    -0x24(%rbp),%ecx
add    $0x0,%ecx
movslq %ecx,%rcx
movswl (%rax,%rcx,2),%eax
and    $0xf00,%eax
sar    $0x8,%eax
mov    %al,%dl
mov    -0x18(%rbp),%rax
mov    -0x28(%rbp),%ecx
add    $0x1,%ecx
movslq %ecx,%rcx
mov    %dl,(%rax,%rcx,1)
jmp    1289 <ntruenc_encode_encrypted+0x189>
mov    -0x20(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<ntruenc_encode_encrypted>:
lea    0x0(,%rsi,4),%eax
lea    (%rax,%rax,2),%r8d
add    $0x7,%r8d
lea    (%rax,%rax,2),%r9d
add    $0xe,%r9d
test   %r8d,%r8d
cmovns %r8d,%r9d
sar    $0x3,%r9d
mov    $0x3,%eax
cmp    %ecx,%r9d
jg     11ad <ntruenc_encode_encrypted+0xad>
xor    %eax,%eax
mov    $0x0,%r10d
mov    $0x0,%r8d
cmp    $0x2,%esi
jl     118f <ntruenc_encode_encrypted+0x8f>
mov    %esi,%r9d
and    $0xfffffffe,%r9d
xor    %r10d,%r10d
xor    %r8d,%r8d
movzbl (%rdi,%r10,2),%ecx
mov    %cl,(%rdx,%r8,1)
movzbl 0x1(%rdi,%r10,2),%r11d
and    $0xf,%r11d
movzwl 0x2(%rdi,%r10,2),%ecx
shl    $0x4,%ecx
or     %r11d,%ecx
mov    %cl,0x1(%rdx,%r8,1)
movzwl 0x2(%rdi,%r10,2),%ecx
shr    $0x4,%ecx
mov    %cl,0x2(%rdx,%r8,1)
add    $0x2,%r10
add    $0x3,%r8
cmp    %r9,%r10
jb     1150 <ntruenc_encode_encrypted+0x50>
cmp    %esi,%r10d
jge    11ad <ntruenc_encode_encrypted+0xad>
mov    %r10d,%ecx
mov    (%rdi,%rcx,2),%r9b
mov    %r8d,%esi
mov    %r9b,(%rdx,%rsi,1)
mov    0x1(%rdi,%rcx,2),%cl
and    $0xf,%cl
mov    %cl,0x1(%rdx,%rsi,1)
ret

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

LLVM IR (-O2):
define i32 @ntruenc_encode_encrypted(i16* nocapture %0, i32 %1, i8* nocapture writeonly %2, i32 %3) {
%5 = mul nsw i32 %1, 12
%6 = add nsw i32 %5, 7
%7 = sdiv i32 %6, 8
%8 = icmp sgt i32 %7, %3
br i1 %8, label %61, label %9
9: ; preds = %4
%10 = icmp sgt i32 %1, 1
br i1 %10, label %11, label %43
11: ; preds = %9
%12 = and i32 %1, -2
%13 = zext i32 %12 to i64
br label %14
14: ; preds = %11, %14
%15 = phi i64 [ 0, %11 ], [ %37, %14 ]
%16 = phi i64 [ 0, %11 ], [ %38, %14 ]
%17 = getelementptr inbounds i16, i16* %0, i64 %15
%18 = load i16, i16* %17
%19 = trunc i16 %18 to i8
%20 = getelementptr inbounds i8, i8* %2, i64 %16
store i8 %19, i8* %20
%21 = load i16, i16* %17
%22 = lshr i16 %21, 8
%23 = and i16 %22, 15
%24 = or i64 %15, 1
%25 = getelementptr inbounds i16, i16* %0, i64 %24
%26 = load i16, i16* %25
%27 = shl i16 %26, 4
%28 = or i16 %23, %27
%29 = trunc i16 %28 to i8
%30 = add nuw nsw i64 %16, 1
%31 = getelementptr inbounds i8, i8* %2, i64 %30
store i8 %29, i8* %31
%32 = load i16, i16* %25
%33 = lshr i16 %32, 4
%34 = trunc i16 %33 to i8
%35 = add nuw nsw i64 %16, 2
%36 = getelementptr inbounds i8, i8* %2, i64 %35
store i8 %34, i8* %36
%37 = add nuw nsw i64 %15, 2
%38 = add nuw nsw i64 %16, 3
%39 = icmp ult i64 %37, %13
br i1 %39, label %14, label %40
40: ; preds = %14
%41 = trunc i64 %37 to i32
%42 = trunc i64 %38 to i32
br label %43
43: ; preds = %40, %9
%44 = phi i32 [ 0, %9 ], [ %41, %40 ]
%45 = phi i32 [ 0, %9 ], [ %42, %40 ]
%46 = icmp slt i32 %44, %1
br i1 %46, label %47, label %61
47: ; preds = %43
%48 = zext i32 %44 to i64
%49 = getelementptr inbounds i16, i16* %0, i64 %48
%50 = load i16, i16* %49
%51 = trunc i16 %50 to i8
%52 = zext i32 %45 to i64
%53 = getelementptr inbounds i8, i8* %2, i64 %52
store i8 %51, i8* %53
%54 = load i16, i16* %49
%55 = lshr i16 %54, 8
%56 = trunc i16 %55 to i8
%57 = and i8 %56, 15
%58 = add nuw nsw i32 %45, 1
%59 = zext i32 %58 to i64
%60 = getelementptr inbounds i8, i8* %2, i64 %59
store i8 %57, i8* %60
br label %61
61: ; preds = %4, %43, %47
%62 = phi i32 [ 0, %47 ], [ 0, %43 ], [ 3, %4 ]
ret i32 %62
}