int iso_date(char *p, int flag) {
  int year, month, day, hour, minute, second, tz;
  int crtime, days, i;
  year = p[0] - 70;
  month = p[1];
  day = p[2];
  hour = p[3];
  minute = p[4];
  second = p[5];
  if (flag == 0)
    tz = p[6];
  else
    tz = 0;
  if (year < 0) {
    crtime = 0;
  } else {
    int monlen[12] = {31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31};
    days = year * 365;
    if (year > 2)
      days += (year + 1) / 4;
    for (i = 1; i < month; i++)
      days += monlen[i - 1];
    if (((year + 2) % 4) == 0 && month > 2)
      days++;
    days += day - 1;
    crtime = ((((days * 24) + hour) * 60 + minute) * 60) + second;
    if (tz & 0x80)
      tz |= (-1 << 8);
    if (-52 <= tz && tz <= 52)
      crtime -= tz * 15 * 60;
  }
  return crtime;
}


x86 assembly (clang, -O0):
<iso_date>:
push   %rbp
mov    %rsp,%rbp
sub    $0x70,%rsp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
sub    $0x46,%eax
mov    %eax,-0x10(%rbp)
mov    -0x8(%rbp),%rax
movsbl 0x1(%rax),%eax
mov    %eax,-0x14(%rbp)
mov    -0x8(%rbp),%rax
movsbl 0x2(%rax),%eax
mov    %eax,-0x18(%rbp)
mov    -0x8(%rbp),%rax
movsbl 0x3(%rax),%eax
mov    %eax,-0x1c(%rbp)
mov    -0x8(%rbp),%rax
movsbl 0x4(%rax),%eax
mov    %eax,-0x20(%rbp)
mov    -0x8(%rbp),%rax
movsbl 0x5(%rax),%eax
mov    %eax,-0x24(%rbp)
cmpl   $0x0,-0xc(%rbp)
jne    117d <iso_date+0x6d>
mov    -0x8(%rbp),%rax
movsbl 0x6(%rax),%eax
mov    %eax,-0x28(%rbp)
jmp    1184 <iso_date+0x74>
movl   $0x0,-0x28(%rbp)
cmpl   $0x0,-0x10(%rbp)
jge    119a <iso_date+0x8a>
movl   $0x0,-0x2c(%rbp)
jmp    129e <iso_date+0x18e>
lea    -0x70(%rbp),%rdi
lea    0xe5b(%rip),%rsi
mov    $0x30,%edx
call   1030 <memcpy@plt>
imul   $0x16d,-0x10(%rbp),%eax
mov    %eax,-0x30(%rbp)
cmpl   $0x2,-0x10(%rbp)
jle    11d7 <iso_date+0xc7>
mov    -0x10(%rbp),%eax
add    $0x1,%eax
mov    $0x4,%ecx
cltd
idiv   %ecx
add    -0x30(%rbp),%eax
mov    %eax,-0x30(%rbp)
movl   $0x1,-0x34(%rbp)
mov    -0x34(%rbp),%eax
cmp    -0x14(%rbp),%eax
jge    120a <iso_date+0xfa>
mov    -0x34(%rbp),%eax
sub    $0x1,%eax
cltq
mov    -0x70(%rbp,%rax,4),%eax
add    -0x30(%rbp),%eax
mov    %eax,-0x30(%rbp)
mov    -0x34(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x34(%rbp)
jmp    11de <iso_date+0xce>
mov    -0x10(%rbp),%eax
add    $0x2,%eax
mov    $0x4,%ecx
cltd
idiv   %ecx
cmp    $0x0,%edx
jne    1234 <iso_date+0x124>
cmpl   $0x2,-0x14(%rbp)
jle    1234 <iso_date+0x124>
mov    -0x30(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x30(%rbp)
mov    -0x18(%rbp),%eax
sub    $0x1,%eax
add    -0x30(%rbp),%eax
mov    %eax,-0x30(%rbp)
imul   $0x18,-0x30(%rbp),%eax
add    -0x1c(%rbp),%eax
imul   $0x3c,%eax,%eax
add    -0x20(%rbp),%eax
imul   $0x3c,%eax,%eax
add    -0x24(%rbp),%eax
mov    %eax,-0x2c(%rbp)
mov    -0x28(%rbp),%eax
and    $0x80,%eax
cmp    $0x0,%eax
je     1272 <iso_date+0x162>
mov    -0x28(%rbp),%eax
or     $0xffffff00,%eax
mov    %eax,-0x28(%rbp)
mov    $0xffffffcc,%eax
cmp    -0x28(%rbp),%eax
jg     1299 <iso_date+0x189>
cmpl   $0x34,-0x28(%rbp)
jg     1299 <iso_date+0x189>
imul   $0xf,-0x28(%rbp),%eax
imul   $0x3c,%eax,%ecx
mov    -0x2c(%rbp),%eax
sub    %ecx,%eax
mov    %eax,-0x2c(%rbp)
jmp    129e <iso_date+0x18e>
mov    -0x2c(%rbp),%eax
add    $0x70,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<iso_date>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
movsbl (%rdi),%edx
xor    %eax,%eax
mov    $0x0,%r15d
test   %esi,%esi
je     1123 <iso_date+0x23>
cmp    $0x46,%dl
jge    1131 <iso_date+0x31>
jmp    12b2 <iso_date+0x1b2>
movsbl 0x6(%rdi),%r15d
cmp    $0x46,%dl
jl     12b2 <iso_date+0x1b2>
movsbq 0x1(%rdi),%r10
movsbl 0x2(%rdi),%r12d
movsbl 0x3(%rdi),%r9d
movsbl 0x4(%rdi),%r8d
imul   $0x16d,%edx,%eax
lea    -0x45(%rdx),%ecx
shr    $0x2,%cl
xor    %r13d,%r13d
cmp    $0x49,%dl
movzbl %cl,%ecx
cmovb  %r13d,%ecx
movsbl 0x5(%rdi),%r11d
movzbl %cl,%ecx
add    %eax,%ecx
add    $0xffff9c32,%ecx
cmp    $0x2,%r10b
jl     125d <iso_date+0x15d>
mov    %r10d,%edi
lea    -0x1(%rdi),%r14
mov    $0x1,%ebx
cmp    $0x4,%r14
jb     123d <iso_date+0x13d>
mov    %r14,%rbx
and    $0xfffffffffffffffc,%rbx
movd   %ecx,%xmm0
lea    -0x4(%rbx),%rax
mov    %rax,%rcx
shr    $0x2,%rcx
add    $0x1,%rcx
mov    %ecx,%esi
and    $0x3,%esi
cmp    $0xc,%rax
jae    11b7 <iso_date+0xb7>
xor    %ebp,%ebp
jmp    11f1 <iso_date+0xf1>
and    $0xfffffffffffffffc,%rcx
xor    %ebp,%ebp
lea    0xe3c(%rip),%rax
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
paddd  (%rax,%rbp,4),%xmm0
paddd  0x10(%rax,%rbp,4),%xmm0
paddd  0x20(%rax,%rbp,4),%xmm0
paddd  0x30(%rax,%rbp,4),%xmm0
add    $0x10,%rbp
add    $0xfffffffffffffffc,%rcx
jne    11d0 <iso_date+0xd0>
test   %rsi,%rsi
je     121e <iso_date+0x11e>
lea    0xe03(%rip),%rax
lea    (%rax,%rbp,4),%rax
shl    $0x4,%rsi
xor    %ecx,%ecx
nopw   0x0(%rax,%rax,1)
paddd  (%rax,%rcx,1),%xmm0
add    $0x10,%rcx
cmp    %rcx,%rsi
jne    1210 <iso_date+0x110>
pshufd $0xee,%xmm0,%xmm1
paddd  %xmm0,%xmm1
pshufd $0x55,%xmm1,%xmm0
paddd  %xmm1,%xmm0
movd   %xmm0,%ecx
cmp    %rbx,%r14
je     125d <iso_date+0x15d>
or     $0x1,%rbx
lea    0xdbc(%rip),%rax
cs nopw 0x0(%rax,%rax,1)
xchg   %ax,%ax
add    -0x4(%rax,%rbx,4),%ecx
add    $0x1,%rbx
cmp    %rbx,%rdi
jne    1250 <iso_date+0x150>
test   $0x3,%dl
sete   %al
cmp    $0x3,%r10b
setge  %dl
and    %al,%dl
movzbl %dl,%eax
add    %eax,%r12d
add    %ecx,%r12d
lea    (%r12,%r12,2),%eax
lea    (%r9,%rax,8),%eax
imul   $0x3c,%eax,%eax
add    %r8d,%eax
imul   $0x3c,%eax,%eax
mov    %r15d,%ecx
or     $0xffffff00,%ecx
test   $0x80,%r15b
cmove  %r15d,%ecx
imul   $0xfffffc7c,%ecx,%edx
add    $0x34,%ecx
cmp    $0x69,%ecx
cmovb  %edx,%r13d
add    %r11d,%r13d
add    %r13d,%eax
add    $0xfffeae80,%eax
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

LLVM IR (-O2):
@__const.iso_date.monlen = [12 x i32] [i32 31, i32 28, i32 31, i32 30, i32 31, i32 30, i32 31, i32 31, i32 30, i32 31, i32 30, i32 31]
define i32 @iso_date(i8* nocapture %0, i32 %1) {
%3 = load i8, i8* %0
%4 = sext i8 %3 to i32
%5 = getelementptr inbounds i8, i8* %0, i64 1
%6 = load i8, i8* %5
%7 = sext i8 %6 to i64
%8 = getelementptr inbounds i8, i8* %0, i64 2
%9 = load i8, i8* %8
%10 = sext i8 %9 to i32
%11 = getelementptr inbounds i8, i8* %0, i64 3
%12 = load i8, i8* %11
%13 = sext i8 %12 to i32
%14 = getelementptr inbounds i8, i8* %0, i64 4
%15 = load i8, i8* %14
%16 = sext i8 %15 to i32
%17 = getelementptr inbounds i8, i8* %0, i64 5
%18 = load i8, i8* %17
%19 = sext i8 %18 to i32
%20 = icmp eq i32 %1, 0
br i1 %20, label %21, label %25
21: ; preds = %2
%22 = getelementptr inbounds i8, i8* %0, i64 6
%23 = load i8, i8* %22
%24 = sext i8 %23 to i32
br label %25
25: ; preds = %2, %21
%26 = phi i32 [ %24, %21 ], [ 0, %2 ]
%27 = icmp slt i8 %3, 70
br i1 %27, label %136, label %28
28: ; preds = %25
%29 = mul nsw i32 %4, 365
%30 = add nsw i32 %29, -25550
%31 = icmp ugt i8 %3, 72
%32 = add i8 %3, -69
%33 = lshr i8 %32, 2
%34 = select i1 %31, i8 %33, i8 0
%35 = zext i8 %34 to i32
%36 = add nsw i32 %30, %35
%37 = icmp sgt i8 %6, 1
br i1 %37, label %38, label %111
38: ; preds = %28
%39 = and i64 %7, 4294967295
%40 = add nsw i64 %39, -1
%41 = icmp ult i64 %40, 4
br i1 %41, label %99, label %42
42: ; preds = %38
%43 = and i64 %40, -4
%44 = or i64 %43, 1
%45 = insertelement <4 x i32> <i32 poison, i32 0, i32 0, i32 0>, i32 %36, i64 0
%46 = add nsw i64 %43, -4
%47 = lshr exact i64 %46, 2
%48 = add nuw nsw i64 %47, 1
%49 = and i64 %48, 3
%50 = icmp ult i64 %46, 12
br i1 %50, label %79, label %51
51: ; preds = %42
%52 = and i64 %48, 9223372036854775804
br label %53
53: ; preds = %53, %51
%54 = phi i64 [ 0, %51 ], [ %76, %53 ]
%55 = phi <4 x i32> [ %45, %51 ], [ %75, %53 ]
%56 = phi i64 [ 0, %51 ], [ %77, %53 ]
%57 = getelementptr inbounds [12 x i32], [12 x i32]* @__const.iso_date.monlen, i64 0, i64 %54
%58 = bitcast i32* %57 to <4 x i32>*
%59 = load <4 x i32>, <4 x i32>* %58
%60 = add <4 x i32> %59, %55
%61 = or i64 %54, 4
%62 = getelementptr inbounds [12 x i32], [12 x i32]* @__const.iso_date.monlen, i64 0, i64 %61
%63 = bitcast i32* %62 to <4 x i32>*
%64 = load <4 x i32>, <4 x i32>* %63
%65 = add <4 x i32> %64, %60
%66 = or i64 %54, 8
%67 = getelementptr inbounds [12 x i32], [12 x i32]* @__const.iso_date.monlen, i64 0, i64 %66
%68 = bitcast i32* %67 to <4 x i32>*
%69 = load <4 x i32>, <4 x i32>* %68
%70 = add <4 x i32> %69, %65
%71 = or i64 %54, 12
%72 = getelementptr inbounds [12 x i32], [12 x i32]* @__const.iso_date.monlen, i64 0, i64 %71
%73 = bitcast i32* %72 to <4 x i32>*
%74 = load <4 x i32>, <4 x i32>* %73
%75 = add <4 x i32> %74, %70
%76 = add nuw i64 %54, 16
%77 = add nuw i64 %56, 4
%78 = icmp eq i64 %77, %52
br i1 %78, label %79, label %53
79: ; preds = %53, %42
%80 = phi <4 x i32> [ undef, %42 ], [ %75, %53 ]
%81 = phi i64 [ 0, %42 ], [ %76, %53 ]
%82 = phi <4 x i32> [ %45, %42 ], [ %75, %53 ]
%83 = icmp eq i64 %49, 0
br i1 %83, label %95, label %84
84: ; preds = %79, %84
%85 = phi i64 [ %92, %84 ], [ %81, %79 ]
%86 = phi <4 x i32> [ %91, %84 ], [ %82, %79 ]
%87 = phi i64 [ %93, %84 ], [ 0, %79 ]
%88 = getelementptr inbounds [12 x i32], [12 x i32]* @__const.iso_date.monlen, i64 0, i64 %85
%89 = bitcast i32* %88 to <4 x i32>*
%90 = load <4 x i32>, <4 x i32>* %89
%91 = add <4 x i32> %90, %86
%92 = add nuw i64 %85, 4
%93 = add i64 %87, 1
%94 = icmp eq i64 %93, %49
br i1 %94, label %95, label %84
95: ; preds = %84, %79
%96 = phi <4 x i32> [ %80, %79 ], [ %91, %84 ]
%97 = call i32 @llvm.vector.reduce.add.v4i32(<4 x i32> %96)
%98 = icmp eq i64 %40, %43
br i1 %98, label %111, label %99
99: ; preds = %38, %95
%100 = phi i64 [ 1, %38 ], [ %44, %95 ]
%101 = phi i32 [ %36, %38 ], [ %97, %95 ]
br label %102
102: ; preds = %99, %102
%103 = phi i64 [ %109, %102 ], [ %100, %99 ]
%104 = phi i32 [ %108, %102 ], [ %101, %99 ]
%105 = add nsw i64 %103, -1
%106 = getelementptr inbounds [12 x i32], [12 x i32]* @__const.iso_date.monlen, i64 0, i64 %105
%107 = load i32, i32* %106
%108 = add nsw i32 %107, %104
%109 = add nuw nsw i64 %103, 1
%110 = icmp eq i64 %109, %39
br i1 %110, label %111, label %102
111: ; preds = %102, %95, %28
%112 = phi i32 [ %36, %28 ], [ %97, %95 ], [ %108, %102 ]
%113 = and i32 %4, 3
%114 = icmp eq i32 %113, 0
%115 = icmp sgt i8 %6, 2
%116 = select i1 %114, i1 %115, i1 false
%117 = zext i1 %116 to i32
%118 = add nsw i32 %10, -1
%119 = add nsw i32 %118, %117
%120 = add i32 %119, %112
%121 = mul nsw i32 %120, 24
%122 = add nsw i32 %121, %13
%123 = mul nsw i32 %122, 60
%124 = add nsw i32 %123, %16
%125 = mul nsw i32 %124, 60
%126 = and i32 %26, 128
%127 = icmp eq i32 %126, 0
%128 = or i32 %26, -256
%129 = select i1 %127, i32 %26, i32 %128
%130 = add nsw i32 %129, 52
%131 = icmp ult i32 %130, 105
%132 = mul nsw i32 %129, -900
%133 = select i1 %131, i32 %132, i32 0
%134 = add nsw i32 %133, %19
%135 = add i32 %134, %125
br label %136
136: ; preds = %25, %111
%137 = phi i32 [ %135, %111 ], [ 0, %25 ]
ret i32 %137
}