int FormIoPacketAGS(int Type, int Data, unsigned char *Packet) {
  if (Type < 0 || Type > 077)
    return (1);
  Data &= 0777777;
  Packet[0] = Type;
  Packet[1] = 0xc0 | ((Data >> 12) & 077);
  Packet[2] = 0x80 | ((Data >> 6) & 077);
  Packet[3] = 0x40 | (Data & 077);
  return (0);
}


x86 assembly (clang, -O0):
<FormIoPacketAGS>:
push   %rbp
mov    %rsp,%rbp
mov    %edi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %rdx,-0x18(%rbp)
cmpl   $0x0,-0x8(%rbp)
jl     1122 <FormIoPacketAGS+0x22>
cmpl   $0x3f,-0x8(%rbp)
jle    112e <FormIoPacketAGS+0x2e>
movl   $0x1,-0x4(%rbp)
jmp    118b <FormIoPacketAGS+0x8b>
mov    -0xc(%rbp),%eax
and    $0x3ffff,%eax
mov    %eax,-0xc(%rbp)
mov    -0x8(%rbp),%eax
mov    %al,%cl
mov    -0x18(%rbp),%rax
mov    %cl,(%rax)
mov    -0xc(%rbp),%eax
sar    $0xc,%eax
and    $0x3f,%eax
or     $0xc0,%eax
mov    %al,%cl
mov    -0x18(%rbp),%rax
mov    %cl,0x1(%rax)
mov    -0xc(%rbp),%eax
sar    $0x6,%eax
and    $0x3f,%eax
or     $0x80,%eax
mov    %al,%cl
mov    -0x18(%rbp),%rax
mov    %cl,0x2(%rax)
mov    -0xc(%rbp),%eax
and    $0x3f,%eax
or     $0x40,%eax
mov    %al,%cl
mov    -0x18(%rbp),%rax
mov    %cl,0x3(%rax)
movl   $0x0,-0x4(%rbp)
mov    -0x4(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<FormIoPacketAGS>:
mov    $0x1,%eax
cmp    $0x3f,%edi
ja     1131 <FormIoPacketAGS+0x31>
mov    %dil,(%rdx)
mov    %esi,%eax
shr    $0xc,%eax
or     $0xc0,%al
mov    %al,0x1(%rdx)
mov    %esi,%eax
shr    $0x6,%eax
and    $0x3f,%al
or     $0x80,%al
mov    %al,0x2(%rdx)
and    $0x3f,%sil
or     $0x40,%sil
mov    %sil,0x3(%rdx)
xor    %eax,%eax
ret

LLVM IR (-O0):
define i32 @FormIoPacketAGS(i32 %0, i32 %1, i8* %2) {
%4 = alloca i32
%5 = alloca i32
%6 = alloca i32
%7 = alloca i8*
store i32 %0, i32* %5
store i32 %1, i32* %6
store i8* %2, i8** %7
%8 = load i32, i32* %5
%9 = icmp slt i32 %8, 0
br i1 %9, label %13, label %10
10: ; preds = %3
%11 = load i32, i32* %5
%12 = icmp sgt i32 %11, 63
br i1 %12, label %13, label %14
13: ; preds = %10, %3
store i32 1, i32* %4
br label %41
14: ; preds = %10
%15 = load i32, i32* %6
%16 = and i32 %15, 262143
store i32 %16, i32* %6
%17 = load i32, i32* %5
%18 = trunc i32 %17 to i8
%19 = load i8*, i8** %7
%20 = getelementptr inbounds i8, i8* %19, i64 0
store i8 %18, i8* %20
%21 = load i32, i32* %6
%22 = ashr i32 %21, 12
%23 = and i32 %22, 63
%24 = or i32 192, %23
%25 = trunc i32 %24 to i8
%26 = load i8*, i8** %7
%27 = getelementptr inbounds i8, i8* %26, i64 1
store i8 %25, i8* %27
%28 = load i32, i32* %6
%29 = ashr i32 %28, 6
%30 = and i32 %29, 63
%31 = or i32 128, %30
%32 = trunc i32 %31 to i8
%33 = load i8*, i8** %7
%34 = getelementptr inbounds i8, i8* %33, i64 2
store i8 %32, i8* %34
%35 = load i32, i32* %6
%36 = and i32 %35, 63
%37 = or i32 64, %36
%38 = trunc i32 %37 to i8
%39 = load i8*, i8** %7
%40 = getelementptr inbounds i8, i8* %39, i64 3
store i8 %38, i8* %40
store i32 0, i32* %4
br label %41
41: ; preds = %14, %13
%42 = load i32, i32* %4
ret i32 %42
}

LLVM IR (-O2):
define i32 @FormIoPacketAGS(i32 %0, i32 %1, i8* nocapture writeonly %2) {
%4 = icmp ugt i32 %0, 63
br i1 %4, label %20, label %5
5: ; preds = %3
%6 = trunc i32 %0 to i8
store i8 %6, i8* %2
%7 = lshr i32 %1, 12
%8 = trunc i32 %7 to i8
%9 = or i8 %8, -64
%10 = getelementptr inbounds i8, i8* %2, i64 1
store i8 %9, i8* %10
%11 = lshr i32 %1, 6
%12 = trunc i32 %11 to i8
%13 = and i8 %12, 63
%14 = or i8 %13, -128
%15 = getelementptr inbounds i8, i8* %2, i64 2
store i8 %14, i8* %15
%16 = trunc i32 %1 to i8
%17 = and i8 %16, 63
%18 = or i8 %17, 64
%19 = getelementptr inbounds i8, i8* %2, i64 3
store i8 %18, i8* %19
br label %20
20: ; preds = %3, %5
%21 = phi i32 [ 0, %5 ], [ 1, %3 ]
ret i32 %21
}