int ei_get_type_internal(const char *buf, const int *index, int *type,
                         int *len) {
  const char *s = buf + *index;
  *type = ((s) += 1, ((unsigned char *)(s))[-1] & 0xff);
  switch (*type) {
  case 'h':
    *len = ((s) += 1, ((unsigned char *)(s))[-1] & 0xff);
    break;
  case 'd':
  case 'k':
    *len = ((s) += 2,
            (((((unsigned char *)(s))[-2] << 8) | ((unsigned char *)(s))[-1])) &
                0xffff);
    break;
  case 'i':
  case 'l':
  case 'm':
    *len = ((s) += 4,
            ((((unsigned char *)(s))[-4] << 24) |
             (((unsigned char *)(s))[-3] << 16) |
             (((unsigned char *)(s))[-2] << 8) | ((unsigned char *)(s))[-1]));
    break;
  case 'n':
    *len = (((s) += 1, ((unsigned char *)(s))[-1] & 0xff) + 1) / 2;
    break;
  case 'o':
    *len = (((s) += 4,
             ((((unsigned char *)(s))[-4] << 24) |
              (((unsigned char *)(s))[-3] << 16) |
              (((unsigned char *)(s))[-2] << 8) | ((unsigned char *)(s))[-1])) +
            1) /
           2;
    break;
  default:
    *len = 0;
    break;
  }
  return 0;
}


x86 assembly (clang, -O0):
<ei_get_type_internal>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
mov    -0x8(%rbp),%rax
mov    -0x10(%rbp),%rcx
movslq (%rcx),%rcx
add    %rcx,%rax
mov    %rax,-0x28(%rbp)
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
mov    -0x28(%rbp),%rax
movzbl -0x1(%rax),%ecx
mov    -0x18(%rbp),%rax
mov    %ecx,(%rax)
mov    -0x18(%rbp),%rax
mov    (%rax),%eax
add    $0xffffff9c,%eax
mov    %eax,%ecx
mov    %rcx,-0x30(%rbp)
sub    $0xb,%eax
ja     128d <ei_get_type_internal+0x18d>
mov    -0x30(%rbp),%rax
lea    0xe9d(%rip),%rcx
movslq (%rcx,%rax,4),%rax
add    %rcx,%rax
jmp    *%rax
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
mov    -0x28(%rbp),%rax
movzbl -0x1(%rax),%ecx
and    $0xff,%ecx
mov    -0x20(%rbp),%rax
mov    %ecx,(%rax)
jmp    1297 <ei_get_type_internal+0x197>
mov    -0x28(%rbp),%rax
add    $0x2,%rax
mov    %rax,-0x28(%rbp)
mov    -0x28(%rbp),%rax
movzbl -0x2(%rax),%ecx
shl    $0x8,%ecx
mov    -0x28(%rbp),%rax
movzbl -0x1(%rax),%eax
or     %eax,%ecx
and    $0xffff,%ecx
mov    -0x20(%rbp),%rax
mov    %ecx,(%rax)
jmp    1297 <ei_get_type_internal+0x197>
mov    -0x28(%rbp),%rax
add    $0x4,%rax
mov    %rax,-0x28(%rbp)
mov    -0x28(%rbp),%rax
movzbl -0x4(%rax),%ecx
shl    $0x18,%ecx
mov    -0x28(%rbp),%rax
movzbl -0x3(%rax),%eax
shl    $0x10,%eax
or     %eax,%ecx
mov    -0x28(%rbp),%rax
movzbl -0x2(%rax),%eax
shl    $0x8,%eax
or     %eax,%ecx
mov    -0x28(%rbp),%rax
movzbl -0x1(%rax),%eax
or     %eax,%ecx
mov    -0x20(%rbp),%rax
mov    %ecx,(%rax)
jmp    1297 <ei_get_type_internal+0x197>
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
mov    -0x28(%rbp),%rax
movzbl -0x1(%rax),%eax
and    $0xff,%eax
add    $0x1,%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
mov    %eax,%ecx
mov    -0x20(%rbp),%rax
mov    %ecx,(%rax)
jmp    1297 <ei_get_type_internal+0x197>
mov    -0x28(%rbp),%rax
add    $0x4,%rax
mov    %rax,-0x28(%rbp)
mov    -0x28(%rbp),%rax
movzbl -0x4(%rax),%eax
shl    $0x18,%eax
mov    -0x28(%rbp),%rcx
movzbl -0x3(%rcx),%ecx
shl    $0x10,%ecx
or     %ecx,%eax
mov    -0x28(%rbp),%rcx
movzbl -0x2(%rcx),%ecx
shl    $0x8,%ecx
or     %ecx,%eax
mov    -0x28(%rbp),%rcx
movzbl -0x1(%rcx),%ecx
or     %ecx,%eax
add    $0x1,%eax
mov    $0x2,%ecx
cltd
idiv   %ecx
mov    %eax,%ecx
mov    -0x20(%rbp),%rax
mov    %ecx,(%rax)
jmp    1297 <ei_get_type_internal+0x197>
mov    -0x20(%rbp),%rax
movl   $0x0,(%rax)
xor    %eax,%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<ei_get_type_internal>:
movslq (%rsi),%r8
movzbl (%rdi,%r8,1),%esi
mov    %esi,(%rdx)
xor    %eax,%eax
lea    -0x64(%rsi),%edx
cmp    $0xb,%dl
ja     1168 <ei_get_type_internal+0x68>
movzbl %dl,%edx
lea    0xee2(%rip),%rsi
movslq (%rsi,%rdx,4),%rdx
add    %rsi,%rdx
jmp    *%rdx
mov    0x1(%rdi,%r8,1),%eax
bswap  %eax
jmp    1168 <ei_get_type_internal+0x68>
movzwl 0x1(%rdi,%r8,1),%eax
shl    $0x10,%eax
bswap  %eax
jmp    1168 <ei_get_type_internal+0x68>
movzbl 0x1(%rdi,%r8,1),%eax
jmp    1168 <ei_get_type_internal+0x68>
movzbl 0x1(%rdi,%r8,1),%eax
add    $0x1,%eax
shr    %eax
jmp    1168 <ei_get_type_internal+0x68>
mov    0x1(%rdi,%r8,1),%eax
bswap  %eax
mov    %eax,%edx
add    $0x1,%edx
shr    $0x1f,%edx
add    %edx,%eax
add    $0x1,%eax
sar    %eax
mov    %eax,(%rcx)
xor    %eax,%eax
ret

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

LLVM IR (-O2):
define i32 @ei_get_type_internal(i8* nocapture %0, i32* nocapture %1, i32* nocapture writeonly %2, i32* nocapture writeonly %3) {
%5 = load i32, i32* %1
%6 = sext i32 %5 to i64
%7 = getelementptr inbounds i8, i8* %0, i64 %6
%8 = getelementptr inbounds i8, i8* %7, i64 1
%9 = getelementptr inbounds i8, i8* %8, i64 -1
%10 = load i8, i8* %9
%11 = zext i8 %10 to i32
store i32 %11, i32* %2
switch i8 %10, label %76 [
i8 104, label %12
i8 100, label %17
i8 107, label %17
i8 105, label %27
i8 108, label %27
i8 109, label %27
i8 110, label %47
i8 111, label %54
]
12: ; preds = %4
%13 = getelementptr inbounds i8, i8* %8, i64 1
%14 = getelementptr inbounds i8, i8* %13, i64 -1
%15 = load i8, i8* %14
%16 = zext i8 %15 to i32
br label %76
17: ; preds = %4, %4
%18 = getelementptr inbounds i8, i8* %8, i64 2
%19 = getelementptr inbounds i8, i8* %18, i64 -2
%20 = load i8, i8* %19
%21 = zext i8 %20 to i32
%22 = shl nuw nsw i32 %21, 8
%23 = getelementptr inbounds i8, i8* %18, i64 -1
%24 = load i8, i8* %23
%25 = zext i8 %24 to i32
%26 = or i32 %22, %25
br label %76
27: ; preds = %4, %4, %4
%28 = getelementptr inbounds i8, i8* %8, i64 4
%29 = getelementptr inbounds i8, i8* %28, i64 -4
%30 = load i8, i8* %29
%31 = zext i8 %30 to i32
%32 = shl nuw i32 %31, 24
%33 = getelementptr inbounds i8, i8* %28, i64 -3
%34 = load i8, i8* %33
%35 = zext i8 %34 to i32
%36 = shl nuw nsw i32 %35, 16
%37 = or i32 %36, %32
%38 = getelementptr inbounds i8, i8* %28, i64 -2
%39 = load i8, i8* %38
%40 = zext i8 %39 to i32
%41 = shl nuw nsw i32 %40, 8
%42 = or i32 %37, %41
%43 = getelementptr inbounds i8, i8* %28, i64 -1
%44 = load i8, i8* %43
%45 = zext i8 %44 to i32
%46 = or i32 %42, %45
br label %76
47: ; preds = %4
%48 = getelementptr inbounds i8, i8* %8, i64 1
%49 = getelementptr inbounds i8, i8* %48, i64 -1
%50 = load i8, i8* %49
%51 = zext i8 %50 to i32
%52 = add nuw nsw i32 %51, 1
%53 = lshr i32 %52, 1
br label %76
54: ; preds = %4
%55 = getelementptr inbounds i8, i8* %8, i64 4
%56 = getelementptr inbounds i8, i8* %55, i64 -4
%57 = load i8, i8* %56
%58 = zext i8 %57 to i32
%59 = shl nuw i32 %58, 24
%60 = getelementptr inbounds i8, i8* %55, i64 -3
%61 = load i8, i8* %60
%62 = zext i8 %61 to i32
%63 = shl nuw nsw i32 %62, 16
%64 = or i32 %63, %59
%65 = getelementptr inbounds i8, i8* %55, i64 -2
%66 = load i8, i8* %65
%67 = zext i8 %66 to i32
%68 = shl nuw nsw i32 %67, 8
%69 = or i32 %64, %68
%70 = getelementptr inbounds i8, i8* %55, i64 -1
%71 = load i8, i8* %70
%72 = zext i8 %71 to i32
%73 = or i32 %69, %72
%74 = add nsw i32 %73, 1
%75 = sdiv i32 %74, 2
br label %76
76: ; preds = %4, %54, %47, %27, %17, %12
%77 = phi i32 [ %75, %54 ], [ %53, %47 ], [ %46, %27 ], [ %26, %17 ], [ %16, %12 ], [ 0, %4 ]
store i32 %77, i32* %3
ret i32 0
}