#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */

/* Variables and functions */
scalar_t__ strchr(char *, char);
int ffdtyp(char *cval, char *dtype, int *status) {
  if (*status > 0)
    return (*status);
  if (cval[0] == '\0')
    return (*status = 204);
  else if (cval[0] == '\'')
    *dtype = 'C';
  else if (cval[0] == 'T' || cval[0] == 'F')
    *dtype = 'L';
  else if (cval[0] == '(')
    *dtype = 'X';
  else if (strchr(cval, '.'))
    *dtype = 'F';
  else if (strchr(cval, 'E') || strchr(cval, 'D'))
    *dtype = 'F';
  else
    *dtype = 'I';
  return (*status);
}


x86 assembly (clang, -O0):
<ffdtyp>:
push   %rbp
mov    %rsp,%rbp
sub    $0x20,%rsp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %rdx,-0x20(%rbp)
mov    -0x20(%rbp),%rax
cmpl   $0x0,(%rax)
jle    113f <ffdtyp+0x2f>
mov    -0x20(%rbp),%rax
mov    (%rax),%eax
mov    %eax,-0x4(%rbp)
jmp    1252 <ffdtyp+0x142>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x0,%eax
jne    1165 <ffdtyp+0x55>
mov    -0x20(%rbp),%rax
movl   $0xcc,(%rax)
movl   $0xcc,-0x4(%rbp)
jmp    1252 <ffdtyp+0x142>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x27,%eax
jne    1181 <ffdtyp+0x71>
mov    -0x18(%rbp),%rax
movb   $0x43,(%rax)
jmp    1244 <ffdtyp+0x134>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x54,%eax
je     11a1 <ffdtyp+0x91>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x46,%eax
jne    11ad <ffdtyp+0x9d>
mov    -0x18(%rbp),%rax
movb   $0x4c,(%rax)
jmp    123f <ffdtyp+0x12f>
mov    -0x10(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x28,%eax
jne    11c9 <ffdtyp+0xb9>
mov    -0x18(%rbp),%rax
movb   $0x58,(%rax)
jmp    123a <ffdtyp+0x12a>
mov    -0x10(%rbp),%rdi
mov    $0x2e,%esi
call   1030 <strchr@plt>
cmp    $0x0,%rax
je     11ed <ffdtyp+0xdd>
mov    -0x18(%rbp),%rax
movb   $0x46,(%rax)
jmp    1235 <ffdtyp+0x125>
mov    -0x10(%rbp),%rdi
mov    $0x45,%esi
call   1030 <strchr@plt>
cmp    $0x0,%rax
jne    121d <ffdtyp+0x10d>
mov    -0x10(%rbp),%rdi
mov    $0x44,%esi
call   1030 <strchr@plt>
cmp    $0x0,%rax
je     1229 <ffdtyp+0x119>
mov    -0x18(%rbp),%rax
movb   $0x46,(%rax)
jmp    1230 <ffdtyp+0x120>
mov    -0x18(%rbp),%rax
movb   $0x49,(%rax)
jmp    1235 <ffdtyp+0x125>
jmp    123a <ffdtyp+0x12a>
jmp    123f <ffdtyp+0x12f>
jmp    1244 <ffdtyp+0x134>
jmp    1249 <ffdtyp+0x139>
mov    -0x20(%rbp),%rax
mov    (%rax),%eax
mov    %eax,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x20,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<ffdtyp>:
push   %rbp
push   %r15
push   %r14
push   %rbx
push   %rax
mov    (%rdx),%eax
test   %eax,%eax
jg     1194 <ffdtyp+0x84>
mov    %rdx,%rbx
mov    %rsi,%r14
mov    %rdi,%r15
mov    (%rdi),%al
cmp    $0x27,%al
jle    113d <ffdtyp+0x2d>
cmp    $0x28,%al
je     118c <ffdtyp+0x7c>
cmp    $0x46,%al
je     1138 <ffdtyp+0x28>
cmp    $0x54,%al
jne    1148 <ffdtyp+0x38>
mov    $0x4c,%bpl
jmp    118f <ffdtyp+0x7f>
test   %al,%al
je     119f <ffdtyp+0x8f>
mov    $0x43,%bpl
cmp    $0x27,%al
je     118f <ffdtyp+0x7f>
mov    %r15,%rdi
mov    $0x2e,%esi
call   1030 <strchr@plt>
mov    $0x46,%bpl
test   %rax,%rax
jne    118f <ffdtyp+0x7f>
mov    %r15,%rdi
mov    $0x45,%esi
call   1030 <strchr@plt>
test   %rax,%rax
jne    118f <ffdtyp+0x7f>
mov    %r15,%rdi
mov    $0x44,%esi
call   1030 <strchr@plt>
xor    %ecx,%ecx
test   %rax,%rax
sete   %cl
lea    (%rcx,%rcx,2),%ebp
add    $0x46,%ebp
jmp    118f <ffdtyp+0x7f>
mov    $0x58,%bpl
mov    %bpl,(%r14)
mov    (%rbx),%eax
add    $0x8,%rsp
pop    %rbx
pop    %r14
pop    %r15
pop    %rbp
ret
movl   $0xcc,(%rbx)
mov    $0xcc,%eax
jmp    1194 <ffdtyp+0x84>

LLVM IR (-O0):
define i32 @ffdtyp(i8* %0, i8* %1, i32* %2) {
%4 = alloca i32
%5 = alloca i8*
%6 = alloca i8*
%7 = alloca i32*
store i8* %0, i8** %5
store i8* %1, i8** %6
store i32* %2, i32** %7
%8 = load i32*, i32** %7
%9 = load i32, i32* %8
%10 = icmp sgt i32 %9, 0
br i1 %10, label %11, label %14
11: ; preds = %3
%12 = load i32*, i32** %7
%13 = load i32, i32* %12
store i32 %13, i32* %4
br label %78
14: ; preds = %3
%15 = load i8*, i8** %5
%16 = getelementptr inbounds i8, i8* %15, i64 0
%17 = load i8, i8* %16
%18 = sext i8 %17 to i32
%19 = icmp eq i32 %18, 0
br i1 %19, label %20, label %22
20: ; preds = %14
%21 = load i32*, i32** %7
store i32 204, i32* %21
store i32 204, i32* %4
br label %78
22: ; preds = %14
%23 = load i8*, i8** %5
%24 = getelementptr inbounds i8, i8* %23, i64 0
%25 = load i8, i8* %24
%26 = sext i8 %25 to i32
%27 = icmp eq i32 %26, 39
br i1 %27, label %28, label %30
28: ; preds = %22
%29 = load i8*, i8** %6
store i8 67, i8* %29
br label %74
30: ; preds = %22
%31 = load i8*, i8** %5
%32 = getelementptr inbounds i8, i8* %31, i64 0
%33 = load i8, i8* %32
%34 = sext i8 %33 to i32
%35 = icmp eq i32 %34, 84
br i1 %35, label %42, label %36
36: ; preds = %30
%37 = load i8*, i8** %5
%38 = getelementptr inbounds i8, i8* %37, i64 0
%39 = load i8, i8* %38
%40 = sext i8 %39 to i32
%41 = icmp eq i32 %40, 70
br i1 %41, label %42, label %44
42: ; preds = %36, %30
%43 = load i8*, i8** %6
store i8 76, i8* %43
br label %73
44: ; preds = %36
%45 = load i8*, i8** %5
%46 = getelementptr inbounds i8, i8* %45, i64 0
%47 = load i8, i8* %46
%48 = sext i8 %47 to i32
%49 = icmp eq i32 %48, 40
br i1 %49, label %50, label %52
50: ; preds = %44
%51 = load i8*, i8** %6
store i8 88, i8* %51
br label %72
52: ; preds = %44
%53 = load i8*, i8** %5
%54 = call i64 @strchr(i8* %53, i8 signext 46)
%55 = icmp ne i64 %54, 0
br i1 %55, label %56, label %58
56: ; preds = %52
%57 = load i8*, i8** %6
store i8 70, i8* %57
br label %71
58: ; preds = %52
%59 = load i8*, i8** %5
%60 = call i64 @strchr(i8* %59, i8 signext 69)
%61 = icmp ne i64 %60, 0
br i1 %61, label %66, label %62
62: ; preds = %58
%63 = load i8*, i8** %5
%64 = call i64 @strchr(i8* %63, i8 signext 68)
%65 = icmp ne i64 %64, 0
br i1 %65, label %66, label %68
66: ; preds = %62, %58
%67 = load i8*, i8** %6
store i8 70, i8* %67
br label %70
68: ; preds = %62
%69 = load i8*, i8** %6
store i8 73, i8* %69
br label %70
70: ; preds = %68, %66
br label %71
71: ; preds = %70, %56
br label %72
72: ; preds = %71, %50
br label %73
73: ; preds = %72, %42
br label %74
74: ; preds = %73, %28
br label %75
75: ; preds = %74
%76 = load i32*, i32** %7
%77 = load i32, i32* %76
store i32 %77, i32* %4
br label %78
78: ; preds = %75, %20, %11
%79 = load i32, i32* %4
ret i32 %79
}

LLVM IR (-O2):
define i32 @ffdtyp(i8* %0, i8* nocapture writeonly %1, i32* nocapture %2) {
%4 = load i32, i32* %2
%5 = icmp sgt i32 %4, 0
br i1 %5, label %24, label %6
6: ; preds = %3
%7 = load i8, i8* %0
switch i8 %7, label %11 [
i8 0, label %8
i8 39, label %21
i8 84, label %9
i8 70, label %9
i8 40, label %10
]
8: ; preds = %6
store i32 204, i32* %2
br label %24
9: ; preds = %6, %6
br label %21
10: ; preds = %6
br label %21
11: ; preds = %6
%12 = tail call i64 @strchr(i8* %0, i8 signext 46)
%13 = icmp eq i64 %12, 0
br i1 %13, label %14, label %21
14: ; preds = %11
%15 = tail call i64 @strchr(i8* %0, i8 signext 69)
%16 = icmp eq i64 %15, 0
br i1 %16, label %17, label %21
17: ; preds = %14
%18 = tail call i64 @strchr(i8* %0, i8 signext 68)
%19 = icmp eq i64 %18, 0
%20 = select i1 %19, i8 73, i8 70
br label %21
21: ; preds = %17, %14, %11, %6, %10, %9
%22 = phi i8 [ 88, %10 ], [ 76, %9 ], [ 67, %6 ], [ 70, %11 ], [ 70, %14 ], [ %20, %17 ]
store i8 %22, i8* %1
%23 = load i32, i32* %2
br label %24
24: ; preds = %3, %21, %8
%25 = phi i32 [ 204, %8 ], [ %23, %21 ], [ %4, %3 ]
ret i32 %25
}