int cmvdate(d)
char *d;
{
  int i;
  if (!d)
    return (0);
  if ((int)strlen(d) != 17)
    return (0);
  for (i = 0; i < 8; i++) {
    if (!isdigit(d[i]))
      return (0);
  }
  if (!isdigit(d[9]) || !isdigit(d[10]) || !isdigit(d[12]) || !isdigit(d[13]) ||
      !isdigit(d[15]) || !isdigit(d[16]))
    return (0);
  if (!ckstrchr(" Tt_-:", d[8]))
    return (0);
  if (d[11] != ':' && d[14] != ':')
    return (0);
  return (1);
}


x86 assembly (clang, -O0):
<cmvdate>:
push   %rbp
mov    %rsp,%rbp
sub    $0x20,%rsp
mov    %rdi,-0x10(%rbp)
cmpq   $0x0,-0x10(%rbp)
jne    1153 <cmvdate+0x23>
movl   $0x0,-0x4(%rbp)
jmp    12ab <cmvdate+0x17b>
mov    -0x10(%rbp),%rdi
call   1040 <strlen@plt>
cmp    $0x11,%eax
je     1171 <cmvdate+0x41>
movl   $0x0,-0x4(%rbp)
jmp    12ab <cmvdate+0x17b>
movl   $0x0,-0x14(%rbp)
cmpl   $0x8,-0x14(%rbp)
jge    11bb <cmvdate+0x8b>
mov    -0x10(%rbp),%rax
movslq -0x14(%rbp),%rcx
movsbl (%rax,%rcx,1),%edi
call   1030 <isdigit@plt>
cmp    $0x0,%eax
jne    11a8 <cmvdate+0x78>
movl   $0x0,-0x4(%rbp)
jmp    12ab <cmvdate+0x17b>
jmp    11ad <cmvdate+0x7d>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    1178 <cmvdate+0x48>
mov    -0x10(%rbp),%rax
movsbl 0x9(%rax),%edi
call   1030 <isdigit@plt>
cmp    $0x0,%eax
je     123f <cmvdate+0x10f>
mov    -0x10(%rbp),%rax
movsbl 0xa(%rax),%edi
call   1030 <isdigit@plt>
cmp    $0x0,%eax
je     123f <cmvdate+0x10f>
mov    -0x10(%rbp),%rax
movsbl 0xc(%rax),%edi
call   1030 <isdigit@plt>
cmp    $0x0,%eax
je     123f <cmvdate+0x10f>
mov    -0x10(%rbp),%rax
movsbl 0xd(%rax),%edi
call   1030 <isdigit@plt>
cmp    $0x0,%eax
je     123f <cmvdate+0x10f>
mov    -0x10(%rbp),%rax
movsbl 0xf(%rax),%edi
call   1030 <isdigit@plt>
cmp    $0x0,%eax
je     123f <cmvdate+0x10f>
mov    -0x10(%rbp),%rax
movsbl 0x10(%rax),%edi
call   1030 <isdigit@plt>
cmp    $0x0,%eax
jne    124b <cmvdate+0x11b>
movl   $0x0,-0x4(%rbp)
jmp    12ab <cmvdate+0x17b>
mov    -0x10(%rbp),%rax
movsbl 0x8(%rax),%esi
lea    0xda6(%rip),%rdi
mov    $0x0,%al
call   1050 <ckstrchr@plt>
cmp    $0x0,%eax
jne    1276 <cmvdate+0x146>
movl   $0x0,-0x4(%rbp)
jmp    12ab <cmvdate+0x17b>
mov    -0x10(%rbp),%rax
movsbl 0xb(%rax),%eax
cmp    $0x3a,%eax
je     12a4 <cmvdate+0x174>
mov    -0x10(%rbp),%rax
movsbl 0xe(%rax),%eax
cmp    $0x3a,%eax
je     12a4 <cmvdate+0x174>
movl   $0x0,-0x4(%rbp)
jmp    12ab <cmvdate+0x17b>
movl   $0x1,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x20,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<cmvdate>:
push   %rbp
push   %rbx
push   %rax
xor    %ebp,%ebp
test   %rdi,%rdi
je     1227 <cmvdate+0x107>
mov    %rdi,%rbx
call   1030 <strlen@plt>
cmp    $0x11,%eax
jne    1227 <cmvdate+0x107>
movsbl (%rbx),%eax
add    $0xffffffd0,%eax
cmp    $0x9,%eax
ja     1227 <cmvdate+0x107>
movsbl 0x1(%rbx),%eax
add    $0xffffffd0,%eax
cmp    $0x9,%eax
ja     1227 <cmvdate+0x107>
movsbl 0x2(%rbx),%eax
add    $0xffffffd0,%eax
cmp    $0x9,%eax
ja     1227 <cmvdate+0x107>
movsbl 0x3(%rbx),%eax
add    $0xffffffd0,%eax
cmp    $0x9,%eax
ja     1227 <cmvdate+0x107>
movsbl 0x4(%rbx),%eax
add    $0xffffffd0,%eax
cmp    $0x9,%eax
ja     1227 <cmvdate+0x107>
movsbl 0x5(%rbx),%eax
add    $0xffffffd0,%eax
cmp    $0x9,%eax
ja     1227 <cmvdate+0x107>
movsbl 0x6(%rbx),%eax
add    $0xffffffd0,%eax
cmp    $0x9,%eax
ja     1227 <cmvdate+0x107>
movsbl 0x7(%rbx),%eax
add    $0xffffffd0,%eax
cmp    $0x9,%eax
ja     1227 <cmvdate+0x107>
movsbl 0x9(%rbx),%eax
add    $0xffffffd0,%eax
cmp    $0x9,%eax
ja     1227 <cmvdate+0x107>
movsbl 0xa(%rbx),%eax
add    $0xffffffd0,%eax
cmp    $0x9,%eax
ja     1227 <cmvdate+0x107>
movsbl 0xc(%rbx),%eax
add    $0xffffffd0,%eax
cmp    $0x9,%eax
ja     1227 <cmvdate+0x107>
movsbl 0xd(%rbx),%eax
add    $0xffffffd0,%eax
cmp    $0x9,%eax
ja     1227 <cmvdate+0x107>
movsbl 0xf(%rbx),%eax
add    $0xffffffd0,%eax
cmp    $0x9,%eax
ja     1227 <cmvdate+0x107>
movsbl 0x10(%rbx),%eax
add    $0xffffffd0,%eax
cmp    $0x9,%eax
ja     1227 <cmvdate+0x107>
movsbl 0x8(%rbx),%esi
lea    0xdf7(%rip),%rdi
xor    %ebp,%ebp
xor    %eax,%eax
call   1040 <ckstrchr@plt>
test   %eax,%eax
je     1227 <cmvdate+0x107>
cmpb   $0x3a,0xb(%rbx)
je     1222 <cmvdate+0x102>
cmpb   $0x3a,0xe(%rbx)
jne    1227 <cmvdate+0x107>
mov    $0x1,%ebp
mov    %ebp,%eax
add    $0x8,%rsp
pop    %rbx
pop    %rbp
ret

LLVM IR (-O0):
@.str = [7 x i8] c" Tt_-:\00"
define i32 @cmvdate(i8* %0) {
%2 = alloca i32
%3 = alloca i8*
%4 = alloca i32
store i8* %0, i8** %3
%5 = load i8*, i8** %3
%6 = icmp ne i8* %5, null
br i1 %6, label %8, label %7
7: ; preds = %1
store i32 0, i32* %2
br label %97
8: ; preds = %1
%9 = load i8*, i8** %3
%10 = call i64 @strlen(i8* %9)
%11 = trunc i64 %10 to i32
%12 = icmp ne i32 %11, 17
br i1 %12, label %13, label %14
13: ; preds = %8
store i32 0, i32* %2
br label %97
14: ; preds = %8
store i32 0, i32* %4
br label %15
15: ; preds = %29, %14
%16 = load i32, i32* %4
%17 = icmp slt i32 %16, 8
br i1 %17, label %18, label %32
18: ; preds = %15
%19 = load i8*, i8** %3
%20 = load i32, i32* %4
%21 = sext i32 %20 to i64
%22 = getelementptr inbounds i8, i8* %19, i64 %21
%23 = load i8, i8* %22
%24 = sext i8 %23 to i32
%25 = call i32 @isdigit(i32 %24)
%26 = icmp ne i32 %25, 0
br i1 %26, label %28, label %27
27: ; preds = %18
store i32 0, i32* %2
br label %97
28: ; preds = %18
br label %29
29: ; preds = %28
%30 = load i32, i32* %4
%31 = add nsw i32 %30, 1
store i32 %31, i32* %4
br label %15
32: ; preds = %15
%33 = load i8*, i8** %3
%34 = getelementptr inbounds i8, i8* %33, i64 9
%35 = load i8, i8* %34
%36 = sext i8 %35 to i32
%37 = call i32 @isdigit(i32 %36)
%38 = icmp ne i32 %37, 0
br i1 %38, label %39, label %74
39: ; preds = %32
%40 = load i8*, i8** %3
%41 = getelementptr inbounds i8, i8* %40, i64 10
%42 = load i8, i8* %41
%43 = sext i8 %42 to i32
%44 = call i32 @isdigit(i32 %43)
%45 = icmp ne i32 %44, 0
br i1 %45, label %46, label %74
46: ; preds = %39
%47 = load i8*, i8** %3
%48 = getelementptr inbounds i8, i8* %47, i64 12
%49 = load i8, i8* %48
%50 = sext i8 %49 to i32
%51 = call i32 @isdigit(i32 %50)
%52 = icmp ne i32 %51, 0
br i1 %52, label %53, label %74
53: ; preds = %46
%54 = load i8*, i8** %3
%55 = getelementptr inbounds i8, i8* %54, i64 13
%56 = load i8, i8* %55
%57 = sext i8 %56 to i32
%58 = call i32 @isdigit(i32 %57)
%59 = icmp ne i32 %58, 0
br i1 %59, label %60, label %74
60: ; preds = %53
%61 = load i8*, i8** %3
%62 = getelementptr inbounds i8, i8* %61, i64 15
%63 = load i8, i8* %62
%64 = sext i8 %63 to i32
%65 = call i32 @isdigit(i32 %64)
%66 = icmp ne i32 %65, 0
br i1 %66, label %67, label %74
67: ; preds = %60
%68 = load i8*, i8** %3
%69 = getelementptr inbounds i8, i8* %68, i64 16
%70 = load i8, i8* %69
%71 = sext i8 %70 to i32
%72 = call i32 @isdigit(i32 %71)
%73 = icmp ne i32 %72, 0
br i1 %73, label %75, label %74
74: ; preds = %67, %60, %53, %46, %39, %32
store i32 0, i32* %2
br label %97
75: ; preds = %67
%76 = load i8*, i8** %3
%77 = getelementptr inbounds i8, i8* %76, i64 8
%78 = load i8, i8* %77
%79 = sext i8 %78 to i32
%80 = call i32 (i8*, i32, ...) bitcast (i32 (...)* @ckstrchr to i32 (i8*, i32, ...)*)(i8* getelementptr inbounds ([7 x i8], [7 x i8]* @.str, i64 0, i64 0), i32 %79)
%81 = icmp ne i32 %80, 0
br i1 %81, label %83, label %82
82: ; preds = %75
store i32 0, i32* %2
br label %97
83: ; preds = %75
%84 = load i8*, i8** %3
%85 = getelementptr inbounds i8, i8* %84, i64 11
%86 = load i8, i8* %85
%87 = sext i8 %86 to i32
%88 = icmp ne i32 %87, 58
br i1 %88, label %89, label %96
89: ; preds = %83
%90 = load i8*, i8** %3
%91 = getelementptr inbounds i8, i8* %90, i64 14
%92 = load i8, i8* %91
%93 = sext i8 %92 to i32
%94 = icmp ne i32 %93, 58
br i1 %94, label %95, label %96
95: ; preds = %89
store i32 0, i32* %2
br label %97
96: ; preds = %89, %83
store i32 1, i32* %2
br label %97
97: ; preds = %96, %95, %82, %74, %27, %13, %7
%98 = load i32, i32* %2
ret i32 %98
}

LLVM IR (-O2):
@.str = [7 x i8] c" Tt_-:\00"
define i32 @cmvdate(i8* %0) {
%2 = icmp eq i8* %0, null
br i1 %2, label %105, label %3
3: ; preds = %1
%4 = tail call i64 @strlen(i8* %0)
%5 = trunc i64 %4 to i32
%6 = icmp eq i32 %5, 17
br i1 %6, label %7, label %105
7: ; preds = %3
%8 = load i8, i8* %0
%9 = sext i8 %8 to i32
%10 = add nsw i32 %9, -48
%11 = icmp ult i32 %10, 10
br i1 %11, label %12, label %105
12: ; preds = %7
%13 = getelementptr inbounds i8, i8* %0, i64 1
%14 = load i8, i8* %13
%15 = sext i8 %14 to i32
%16 = add nsw i32 %15, -48
%17 = icmp ult i32 %16, 10
br i1 %17, label %18, label %105
18: ; preds = %12
%19 = getelementptr inbounds i8, i8* %0, i64 2
%20 = load i8, i8* %19
%21 = sext i8 %20 to i32
%22 = add nsw i32 %21, -48
%23 = icmp ult i32 %22, 10
br i1 %23, label %24, label %105
24: ; preds = %18
%25 = getelementptr inbounds i8, i8* %0, i64 3
%26 = load i8, i8* %25
%27 = sext i8 %26 to i32
%28 = add nsw i32 %27, -48
%29 = icmp ult i32 %28, 10
br i1 %29, label %30, label %105
30: ; preds = %24
%31 = getelementptr inbounds i8, i8* %0, i64 4
%32 = load i8, i8* %31
%33 = sext i8 %32 to i32
%34 = add nsw i32 %33, -48
%35 = icmp ult i32 %34, 10
br i1 %35, label %36, label %105
36: ; preds = %30
%37 = getelementptr inbounds i8, i8* %0, i64 5
%38 = load i8, i8* %37
%39 = sext i8 %38 to i32
%40 = add nsw i32 %39, -48
%41 = icmp ult i32 %40, 10
br i1 %41, label %42, label %105
42: ; preds = %36
%43 = getelementptr inbounds i8, i8* %0, i64 6
%44 = load i8, i8* %43
%45 = sext i8 %44 to i32
%46 = add nsw i32 %45, -48
%47 = icmp ult i32 %46, 10
br i1 %47, label %48, label %105
48: ; preds = %42
%49 = getelementptr inbounds i8, i8* %0, i64 7
%50 = load i8, i8* %49
%51 = sext i8 %50 to i32
%52 = add nsw i32 %51, -48
%53 = icmp ult i32 %52, 10
br i1 %53, label %54, label %105
54: ; preds = %48
%55 = getelementptr inbounds i8, i8* %0, i64 9
%56 = load i8, i8* %55
%57 = sext i8 %56 to i32
%58 = add nsw i32 %57, -48
%59 = icmp ult i32 %58, 10
br i1 %59, label %60, label %105
60: ; preds = %54
%61 = getelementptr inbounds i8, i8* %0, i64 10
%62 = load i8, i8* %61
%63 = sext i8 %62 to i32
%64 = add nsw i32 %63, -48
%65 = icmp ult i32 %64, 10
br i1 %65, label %66, label %105
66: ; preds = %60
%67 = getelementptr inbounds i8, i8* %0, i64 12
%68 = load i8, i8* %67
%69 = sext i8 %68 to i32
%70 = add nsw i32 %69, -48
%71 = icmp ult i32 %70, 10
br i1 %71, label %72, label %105
72: ; preds = %66
%73 = getelementptr inbounds i8, i8* %0, i64 13
%74 = load i8, i8* %73
%75 = sext i8 %74 to i32
%76 = add nsw i32 %75, -48
%77 = icmp ult i32 %76, 10
br i1 %77, label %78, label %105
78: ; preds = %72
%79 = getelementptr inbounds i8, i8* %0, i64 15
%80 = load i8, i8* %79
%81 = sext i8 %80 to i32
%82 = add nsw i32 %81, -48
%83 = icmp ult i32 %82, 10
br i1 %83, label %84, label %105
84: ; preds = %78
%85 = getelementptr inbounds i8, i8* %0, i64 16
%86 = load i8, i8* %85
%87 = sext i8 %86 to i32
%88 = add nsw i32 %87, -48
%89 = icmp ult i32 %88, 10
br i1 %89, label %90, label %105
90: ; preds = %84
%91 = getelementptr inbounds i8, i8* %0, i64 8
%92 = load i8, i8* %91
%93 = sext i8 %92 to i32
%94 = tail call i32 (i8*, i32, ...) bitcast (i32 (...)* @ckstrchr to i32 (i8*, i32, ...)*)(i8* getelementptr inbounds ([7 x i8], [7 x i8]* @.str, i64 0, i64 0), i32 %93)
%95 = icmp eq i32 %94, 0
br i1 %95, label %105, label %96
96: ; preds = %90
%97 = getelementptr inbounds i8, i8* %0, i64 11
%98 = load i8, i8* %97
%99 = icmp eq i8 %98, 58
br i1 %99, label %104, label %100
100: ; preds = %96
%101 = getelementptr inbounds i8, i8* %0, i64 14
%102 = load i8, i8* %101
%103 = icmp eq i8 %102, 58
br i1 %103, label %104, label %105
104: ; preds = %100, %96
br label %105
105: ; preds = %7, %12, %18, %24, %30, %36, %42, %48, %100, %90, %54, %60, %66, %72, %78, %84, %3, %1, %104
%106 = phi i32 [ 1, %104 ], [ 0, %1 ], [ 0, %3 ], [ 0, %84 ], [ 0, %78 ], [ 0, %72 ], [ 0, %66 ], [ 0, %60 ], [ 0, %54 ], [ 0, %90 ], [ 0, %100 ], [ 0, %48 ], [ 0, %42 ], [ 0, %36 ], [ 0, %30 ], [ 0, %24 ], [ 0, %18 ], [ 0, %12 ], [ 0, %7 ]
ret i32 %106
}