unsigned char *finddate(unsigned char *q, int l, int type) {
  int x;
  int ql = q[0] << 8 | q[1];
  q += 2;
  if (ql + 2 > l)
    return 0;
  while (ql) {
    int sl;
    x = *q++;
    ql--;
    if (x < 192)
      sl = x;
    else if (x == 255) {
      if (ql < 4)
        return 0;
      sl = q[0] << 24 | q[1] << 16 | q[2] << 8 | q[3];
      q += 4;
      ql -= 4;
    } else {
      if (ql < 1)
        return 0;
      sl = ((x - 192) << 8) + *q++ + 192;
      ql--;
    }
    if (ql < sl)
      return 0;
    x = q[0] & 127;
    if (x == type)
      return q + 1;
    q += sl;
    ql -= sl;
  }
  return 0;
}


x86 assembly (clang, -O0):
<finddate>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
mov    %esi,-0x14(%rbp)
mov    %edx,-0x18(%rbp)
mov    -0x10(%rbp),%rax
movzbl (%rax),%eax
shl    $0x8,%eax
mov    -0x10(%rbp),%rcx
movzbl 0x1(%rcx),%ecx
or     %ecx,%eax
mov    %eax,-0x20(%rbp)
mov    -0x10(%rbp),%rax
add    $0x2,%rax
mov    %rax,-0x10(%rbp)
mov    -0x20(%rbp),%eax
add    $0x2,%eax
cmp    -0x14(%rbp),%eax
jle    114d <finddate+0x4d>
movq   $0x0,-0x8(%rbp)
jmp    12b9 <finddate+0x1b9>
jmp    1152 <finddate+0x52>
cmpl   $0x0,-0x20(%rbp)
je     12b1 <finddate+0x1b1>
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x10(%rbp)
movzbl (%rax),%eax
mov    %eax,-0x1c(%rbp)
mov    -0x20(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x20(%rbp)
cmpl   $0xc0,-0x1c(%rbp)
jge    1192 <finddate+0x92>
mov    -0x1c(%rbp),%eax
mov    %eax,-0x24(%rbp)
jmp    124d <finddate+0x14d>
cmpl   $0xff,-0x1c(%rbp)
jne    1201 <finddate+0x101>
cmpl   $0x4,-0x20(%rbp)
jge    11b6 <finddate+0xb6>
movq   $0x0,-0x8(%rbp)
jmp    12b9 <finddate+0x1b9>
mov    -0x10(%rbp),%rax
movzbl (%rax),%eax
shl    $0x18,%eax
mov    -0x10(%rbp),%rcx
movzbl 0x1(%rcx),%ecx
shl    $0x10,%ecx
or     %ecx,%eax
mov    -0x10(%rbp),%rcx
movzbl 0x2(%rcx),%ecx
shl    $0x8,%ecx
or     %ecx,%eax
mov    -0x10(%rbp),%rcx
movzbl 0x3(%rcx),%ecx
or     %ecx,%eax
mov    %eax,-0x24(%rbp)
mov    -0x10(%rbp),%rax
add    $0x4,%rax
mov    %rax,-0x10(%rbp)
mov    -0x20(%rbp),%eax
sub    $0x4,%eax
mov    %eax,-0x20(%rbp)
jmp    1248 <finddate+0x148>
cmpl   $0x1,-0x20(%rbp)
jge    1218 <finddate+0x118>
movq   $0x0,-0x8(%rbp)
jmp    12b9 <finddate+0x1b9>
mov    -0x1c(%rbp),%eax
sub    $0xc0,%eax
shl    $0x8,%eax
mov    -0x10(%rbp),%rcx
mov    %rcx,%rdx
add    $0x1,%rdx
mov    %rdx,-0x10(%rbp)
movzbl (%rcx),%ecx
add    %ecx,%eax
add    $0xc0,%eax
mov    %eax,-0x24(%rbp)
mov    -0x20(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x20(%rbp)
jmp    124d <finddate+0x14d>
mov    -0x20(%rbp),%eax
cmp    -0x24(%rbp),%eax
jge    1266 <finddate+0x166>
movq   $0x0,-0x8(%rbp)
jmp    12b9 <finddate+0x1b9>
mov    -0x10(%rbp),%rax
movzbl (%rax),%eax
and    $0x7f,%eax
mov    %eax,-0x1c(%rbp)
mov    -0x1c(%rbp),%eax
cmp    -0x18(%rbp),%eax
jne    1290 <finddate+0x190>
mov    -0x10(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x8(%rbp)
jmp    12b9 <finddate+0x1b9>
mov    -0x24(%rbp),%ecx
mov    -0x10(%rbp),%rax
movslq %ecx,%rcx
add    %rcx,%rax
mov    %rax,-0x10(%rbp)
mov    -0x24(%rbp),%ecx
mov    -0x20(%rbp),%eax
sub    %ecx,%eax
mov    %eax,-0x20(%rbp)
jmp    1152 <finddate+0x52>
movq   $0x0,-0x8(%rbp)
mov    -0x8(%rbp),%rax
pop    %rbp
ret

x86 assembly (clang, -O2):
<finddate>:
movzwl (%rdi),%ecx
shl    $0x10,%ecx
bswap  %ecx
lea    0x2(%rcx),%r8d
xor    %eax,%eax
cmp    %esi,%r8d
jg     11b9 <finddate+0xb9>
test   %ecx,%ecx
je     11b9 <finddate+0xb9>
add    $0x2,%rdi
xor    %eax,%eax
cs nopw 0x0(%rax,%rax,1)
nop
movzbl (%rdi),%r9d
cmp    $0xc0,%r9d
jae    1150 <finddate+0x50>
add    $0x1,%rdi
add    $0xffffffff,%ecx
cmp    %r9d,%ecx
jge    11a0 <finddate+0xa0>
jmp    11b9 <finddate+0xb9>
nopl   0x0(%rax,%rax,1)
cmp    $0xff,%r9b
je     117c <finddate+0x7c>
cmp    $0x2,%ecx
jl     11b9 <finddate+0xb9>
shl    $0x8,%r9d
movzbl 0x1(%rdi),%r8d
add    $0x2,%rdi
add    %r8d,%r9d
add    $0xffff40c0,%r9d
add    $0xfffffffe,%ecx
cmp    %r9d,%ecx
jge    11a0 <finddate+0xa0>
jmp    11b9 <finddate+0xb9>
cmp    $0x5,%ecx
jl     11b9 <finddate+0xb9>
mov    0x1(%rdi),%r9d
bswap  %r9d
add    $0x5,%rdi
add    $0xfffffffb,%ecx
cmp    %r9d,%ecx
jl     11b9 <finddate+0xb9>
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
movzbl (%rdi),%esi
and    $0x7f,%esi
cmp    %edx,%esi
je     11ba <finddate+0xba>
movslq %r9d,%rsi
add    %rsi,%rdi
sub    %r9d,%ecx
jne    1130 <finddate+0x30>
ret
add    $0x1,%rdi
mov    %rdi,%rax
ret

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

LLVM IR (-O2):
define i8* @finddate(i8* %0, i32 %1, i32 %2) {
%4 = load i8, i8* %0
%5 = zext i8 %4 to i32
%6 = shl nuw nsw i32 %5, 8
%7 = getelementptr inbounds i8, i8* %0, i64 1
%8 = load i8, i8* %7
%9 = zext i8 %8 to i32
%10 = or i32 %6, %9
%11 = add nuw nsw i32 %10, 2
%12 = icmp sgt i32 %11, %1
%13 = icmp eq i32 %10, 0
%14 = or i1 %12, %13
br i1 %14, label %76, label %15
15: ; preds = %3
%16 = getelementptr inbounds i8, i8* %0, i64 2
br label %17
17: ; preds = %15, %71
%18 = phi i32 [ %74, %71 ], [ %10, %15 ]
%19 = phi i8* [ %73, %71 ], [ %16, %15 ]
%20 = getelementptr inbounds i8, i8* %19, i64 1
%21 = load i8, i8* %19
%22 = zext i8 %21 to i32
%23 = add nsw i32 %18, -1
%24 = icmp ult i8 %21, -64
br i1 %24, label %59, label %25
25: ; preds = %17
%26 = icmp eq i8 %21, -1
br i1 %26, label %27, label %49
27: ; preds = %25
%28 = icmp slt i32 %18, 5
br i1 %28, label %76, label %29
29: ; preds = %27
%30 = load i8, i8* %20
%31 = zext i8 %30 to i32
%32 = shl nuw i32 %31, 24
%33 = getelementptr inbounds i8, i8* %19, i64 2
%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* %19, i64 3
%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* %19, i64 4
%44 = load i8, i8* %43
%45 = zext i8 %44 to i32
%46 = or i32 %42, %45
%47 = getelementptr inbounds i8, i8* %19, i64 5
%48 = add nsw i32 %18, -5
br label %59
49: ; preds = %25
%50 = icmp slt i32 %18, 2
br i1 %50, label %76, label %51
51: ; preds = %49
%52 = shl nuw nsw i32 %22, 8
%53 = getelementptr inbounds i8, i8* %19, i64 2
%54 = load i8, i8* %20
%55 = zext i8 %54 to i32
%56 = add nsw i32 %52, -48960
%57 = add nsw i32 %56, %55
%58 = add nsw i32 %18, -2
br label %59
59: ; preds = %17, %29, %51
%60 = phi i8* [ %47, %29 ], [ %53, %51 ], [ %20, %17 ]
%61 = phi i32 [ %48, %29 ], [ %58, %51 ], [ %23, %17 ]
%62 = phi i32 [ %46, %29 ], [ %57, %51 ], [ %22, %17 ]
%63 = icmp slt i32 %61, %62
br i1 %63, label %76, label %64
64: ; preds = %59
%65 = load i8, i8* %60
%66 = and i8 %65, 127
%67 = zext i8 %66 to i32
%68 = icmp eq i32 %67, %2
br i1 %68, label %69, label %71
69: ; preds = %64
%70 = getelementptr inbounds i8, i8* %60, i64 1
br label %76
71: ; preds = %64
%72 = sext i32 %62 to i64
%73 = getelementptr inbounds i8, i8* %60, i64 %72
%74 = sub nsw i32 %61, %62
%75 = icmp eq i32 %74, 0
br i1 %75, label %76, label %17
76: ; preds = %71, %27, %49, %59, %69, %3
%77 = phi i8* [ null, %3 ], [ %70, %69 ], [ null, %59 ], [ null, %49 ], [ null, %27 ], [ null, %71 ]
ret i8* %77
}