int b_gsint(in_ptr, bits_p)
unsigned char **in_ptr;
int bits_p;
{
  int i, val;
  if (**in_ptr & (1 << 7))
    val = (-1 ^ 255) | *(*in_ptr)++;
  else
    val = *(*in_ptr)++;
  for (i = 1; i < (bits_p / 8); ++i)
    val = (val << 8) | *(*in_ptr)++;
  return (val);
}


x86 assembly (clang, -O0):
<b_gsint>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    -0x8(%rbp),%rax
mov    (%rax),%rax
movzbl (%rax),%eax
and    $0x80,%eax
cmp    $0x0,%eax
je     1144 <b_gsint+0x44>
mov    -0x8(%rbp),%rcx
mov    (%rcx),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,(%rcx)
movzbl (%rax),%eax
or     $0xffffff00,%eax
mov    %eax,-0x14(%rbp)
jmp    115b <b_gsint+0x5b>
mov    -0x8(%rbp),%rcx
mov    (%rcx),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,(%rcx)
movzbl (%rax),%eax
mov    %eax,-0x14(%rbp)
movl   $0x1,-0x10(%rbp)
mov    -0x10(%rbp),%eax
mov    %eax,-0x18(%rbp)
mov    -0xc(%rbp),%eax
mov    $0x8,%ecx
cltd
idiv   %ecx
mov    %eax,%ecx
mov    -0x18(%rbp),%eax
cmp    %ecx,%eax
jge    11ad <b_gsint+0xad>
mov    -0x14(%rbp),%eax
shl    $0x8,%eax
mov    -0x8(%rbp),%rdx
mov    (%rdx),%rcx
mov    %rcx,%rsi
add    $0x1,%rsi
mov    %rsi,(%rdx)
movzbl (%rcx),%ecx
or     %ecx,%eax
mov    %eax,-0x14(%rbp)
mov    -0x10(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x10(%rbp)
jmp    1162 <b_gsint+0x62>
mov    -0x14(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<b_gsint>:
mov    (%rdi),%rdx
mov    (%rdx),%r8b
lea    0x1(%rdx),%rcx
mov    %rcx,(%rdi)
movzbl (%rdx),%r9d
lea    -0x100(%r9),%eax
test   %r8b,%r8b
cmovns %r9d,%eax
cmp    $0x10,%esi
jl     11d6 <b_gsint+0xd6>
shr    $0x3,%esi
lea    -0x1(%rsi),%r9d
add    $0xfffffffe,%esi
mov    %r9d,%r8d
and    $0x3,%r8d
cmp    $0x3,%esi
jb     11b0 <b_gsint+0xb0>
and    $0xfffffffc,%r9d
xor    %ecx,%ecx
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
lea    (%rdx,%rcx,1),%rax
add    $0x2,%rax
mov    %rax,(%rdi)
movzbl 0x1(%rdx,%rcx,1),%r11d
lea    0x3(%rdx,%rcx,1),%rsi
mov    %rsi,(%rdi)
movzbl 0x2(%rdx,%rcx,1),%r10d
lea    0x4(%rdx,%rcx,1),%rsi
mov    %rsi,(%rdi)
movzbl 0x3(%rdx,%rcx,1),%esi
lea    (%rdx,%rcx,1),%rax
add    $0x5,%rax
mov    %rax,(%rdi)
add    $0x4,%rcx
cmp    %ecx,%r9d
jne    1150 <b_gsint+0x50>
shl    $0x10,%r11d
shl    $0x8,%r10d
or     %r11d,%r10d
or     %esi,%r10d
shl    $0x8,%r10d
movzbl (%rdx,%rcx,1),%eax
or     %r10d,%eax
add    %rdx,%rcx
add    $0x1,%rcx
test   %r8d,%r8d
je     11d6 <b_gsint+0xd6>
add    $0x1,%rcx
nopl   0x0(%rax)
shl    $0x8,%eax
mov    %rcx,(%rdi)
movzbl -0x1(%rcx),%edx
or     %edx,%eax
add    $0x1,%rcx
add    $0xffffffff,%r8d
jne    11c0 <b_gsint+0xc0>
ret

LLVM IR (-O0):
define i32 @b_gsint(i8** %0, i32 %1) {
%3 = alloca i8**
%4 = alloca i32
%5 = alloca i32
%6 = alloca i32
store i8** %0, i8*** %3
store i32 %1, i32* %4
%7 = load i8**, i8*** %3
%8 = load i8*, i8** %7
%9 = load i8, i8* %8
%10 = zext i8 %9 to i32
%11 = and i32 %10, 128
%12 = icmp ne i32 %11, 0
br i1 %12, label %13, label %20
13: ; preds = %2
%14 = load i8**, i8*** %3
%15 = load i8*, i8** %14
%16 = getelementptr inbounds i8, i8* %15, i32 1
store i8* %16, i8** %14
%17 = load i8, i8* %15
%18 = zext i8 %17 to i32
%19 = or i32 -256, %18
store i32 %19, i32* %6
br label %26
20: ; preds = %2
%21 = load i8**, i8*** %3
%22 = load i8*, i8** %21
%23 = getelementptr inbounds i8, i8* %22, i32 1
store i8* %23, i8** %21
%24 = load i8, i8* %22
%25 = zext i8 %24 to i32
store i32 %25, i32* %6
br label %26
26: ; preds = %20, %13
store i32 1, i32* %5
br label %27
27: ; preds = %41, %26
%28 = load i32, i32* %5
%29 = load i32, i32* %4
%30 = sdiv i32 %29, 8
%31 = icmp slt i32 %28, %30
br i1 %31, label %32, label %44
32: ; preds = %27
%33 = load i32, i32* %6
%34 = shl i32 %33, 8
%35 = load i8**, i8*** %3
%36 = load i8*, i8** %35
%37 = getelementptr inbounds i8, i8* %36, i32 1
store i8* %37, i8** %35
%38 = load i8, i8* %36
%39 = zext i8 %38 to i32
%40 = or i32 %34, %39
store i32 %40, i32* %6
br label %41
41: ; preds = %32
%42 = load i32, i32* %5
%43 = add nsw i32 %42, 1
store i32 %43, i32* %5
br label %27
44: ; preds = %27
%45 = load i32, i32* %6
ret i32 %45
}

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