#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 */
int bin2rom(char *, char *);
int convert(char *, char *);
int cree(char *);
int lif2rom(char *, char *);
int /*<<< orphan*/ printf(char *, char *, ...);
int rom2bin(char *, char *);
int /*<<< orphan*/ strcpy(char *, char *);
scalar_t__ stricmp(char *, char *);
char toupper(char);
int /*<<< orphan*/ usage();
void main(int argc, char *argv[]) {
  int i, n;
  char fhelp, from, fbin, fx;
  char argument[80];
  char nsrc[80];
  char ndest[80];
  fhelp = 0;
  from = 0;
  fbin = 0;
  fx = 0;
  nsrc[0] = 0;
  ndest[0] = 0;
  for (i = 1; i < argc; i++) {
    strcpy(argument, argv[i]);
    if (argument[0] == '/') {
      argument[1] = toupper(argument[1]);
      switch (argument[1]) {
      case 'H':
      case '?':
        fhelp = 1;
        break;
      case 'R':
        from = 1;
        break;
      case 'B':
        fbin = 1;
        break;
      case 'X':
        fx = 1;
        break;
      }
    } else {
      if (nsrc[0] == 0)
        strcpy(nsrc, argument);
      else
        strcpy(ndest, argument);
    }
  }
  if (fhelp)
    usage();
  else {
    if (fx)
      n = lif2rom(nsrc, ndest);
    else if (from)
      n = rom2bin(nsrc, ndest);
    else if (fbin)
      n = bin2rom(nsrc, ndest);
    else {
      if (stricmp(nsrc, "null") != 0)
        n = convert(nsrc, ndest);
      else
        n = cree(ndest);
    }
    if (n > 0)
      printf("file %s created, %d words long\n", ndest, n);
    else if (n < 0)
      printf("Error, file %s NOT created !!\n", ndest);
  }
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
sub    $0x120,%rsp
mov    %edi,-0x4(%rbp)
mov    %rsi,-0x10(%rbp)
movb   $0x0,-0x19(%rbp)
movb   $0x0,-0x1a(%rbp)
movb   $0x0,-0x1b(%rbp)
movb   $0x0,-0x1c(%rbp)
movb   $0x0,-0xc0(%rbp)
movb   $0x0,-0x110(%rbp)
movl   $0x1,-0x14(%rbp)
mov    -0x14(%rbp),%eax
cmp    -0x4(%rbp),%eax
jge    12b2 <main+0x112>
lea    -0x70(%rbp),%rdi
mov    -0x10(%rbp),%rax
movslq -0x14(%rbp),%rcx
mov    (%rax,%rcx,8),%rsi
call   1050 <strcpy@plt>
movsbl -0x70(%rbp),%eax
cmp    $0x2f,%eax
jne    1265 <main+0xc5>
movsbl -0x6f(%rbp),%edi
call   1060 <toupper@plt>
mov    %al,-0x6f(%rbp)
movsbl -0x6f(%rbp),%eax
add    $0xffffffc1,%eax
mov    %eax,%ecx
mov    %rcx,-0x118(%rbp)
sub    $0x19,%eax
ja     1260 <main+0xc0>
mov    -0x118(%rbp),%rax
lea    0xdc8(%rip),%rcx
movslq (%rcx,%rax,4),%rax
add    %rcx,%rax
jmp    *%rax
movb   $0x1,-0x19(%rbp)
jmp    1260 <main+0xc0>
movb   $0x1,-0x1a(%rbp)
jmp    1260 <main+0xc0>
movb   $0x1,-0x1b(%rbp)
jmp    1260 <main+0xc0>
movb   $0x1,-0x1c(%rbp)
jmp    129f <main+0xff>
movsbl -0xc0(%rbp),%eax
cmp    $0x0,%eax
jne    128a <main+0xea>
lea    -0xc0(%rbp),%rdi
lea    -0x70(%rbp),%rsi
call   1050 <strcpy@plt>
jmp    129a <main+0xfa>
lea    -0x110(%rbp),%rdi
lea    -0x70(%rbp),%rsi
call   1050 <strcpy@plt>
jmp    129f <main+0xff>
jmp    12a4 <main+0x104>
mov    -0x14(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x14(%rbp)
jmp    11d7 <main+0x37>
cmpb   $0x0,-0x19(%rbp)
je     12c8 <main+0x128>
mov    $0x0,%al
call   10c0 <usage@plt>
jmp    13dd <main+0x23d>
cmpb   $0x0,-0x1c(%rbp)
je     12ed <main+0x14d>
lea    -0xc0(%rbp),%rdi
lea    -0x110(%rbp),%rsi
call   10b0 <lif2rom@plt>
mov    %eax,-0x18(%rbp)
jmp    138d <main+0x1ed>
cmpb   $0x0,-0x1a(%rbp)
je     1312 <main+0x172>
lea    -0xc0(%rbp),%rdi
lea    -0x110(%rbp),%rsi
call   1090 <rom2bin@plt>
mov    %eax,-0x18(%rbp)
jmp    1388 <main+0x1e8>
cmpb   $0x0,-0x1b(%rbp)
je     1337 <main+0x197>
lea    -0xc0(%rbp),%rdi
lea    -0x110(%rbp),%rsi
call   1030 <bin2rom@plt>
mov    %eax,-0x18(%rbp)
jmp    1383 <main+0x1e3>
lea    -0xc0(%rbp),%rdi
lea    0xd23(%rip),%rsi
call   1070 <stricmp@plt>
cmp    $0x0,%rax
je     136f <main+0x1cf>
lea    -0xc0(%rbp),%rdi
lea    -0x110(%rbp),%rsi
call   1040 <convert@plt>
mov    %eax,-0x18(%rbp)
jmp    137e <main+0x1de>
lea    -0x110(%rbp),%rdi
call   10a0 <cree@plt>
mov    %eax,-0x18(%rbp)
jmp    1383 <main+0x1e3>
jmp    1388 <main+0x1e8>
jmp    138d <main+0x1ed>
cmpl   $0x0,-0x18(%rbp)
jle    13b4 <main+0x214>
lea    -0x110(%rbp),%rsi
mov    -0x18(%rbp),%edx
lea    0xcc5(%rip),%rdi
mov    $0x0,%al
call   1080 <printf@plt>
jmp    13d8 <main+0x238>
cmpl   $0x0,-0x18(%rbp)
jge    13d3 <main+0x233>
lea    -0x110(%rbp),%rsi
lea    0xcc1(%rip),%rdi
mov    $0x0,%al
call   1080 <printf@plt>
jmp    13d8 <main+0x238>
jmp    13dd <main+0x23d>
add    $0x120,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x108,%rsp
movb   $0x0,0x60(%rsp)
movb   $0x0,0x10(%rsp)
cmp    $0x2,%edi
jl     12e8 <main+0x148>
mov    %rsi,%rbx
mov    %edi,%r13d
mov    $0x1,%r15d
movl   $0x0,0xc(%rsp)
lea    0xb0(%rsp),%r14
lea    0xe19(%rip),%rbp
movl   $0x0,0x4(%rsp)
movl   $0x0,0x8(%rsp)
xor    %r12d,%r12d
jmp    121d <main+0x7d>
nopl   0x0(%rax)
cmpb   $0x0,0x60(%rsp)
je     1261 <main+0xc1>
lea    0x10(%rsp),%rdi
mov    %r14,%rsi
call   1050 <strcpy@plt>
add    $0x1,%r15
cmp    %r15,%r13
je     1280 <main+0xe0>
mov    (%rbx,%r15,8),%rsi
mov    %r14,%rdi
call   1050 <strcpy@plt>
cmpb   $0x2f,0xb0(%rsp)
2f
jne    1200 <main+0x60>
movsbl 0xb1(%rsp),%edi
call   1060 <toupper@plt>
mov    %al,0xb1(%rsp)
movsbl %al,%eax
add    $0xffffffc1,%eax
cmp    $0x19,%eax
ja     1214 <main+0x74>
movslq 0x0(%rbp,%rax,4),%rax
add    %rbp,%rax
jmp    *%rax
mov    $0x1,%r12b
jmp    1214 <main+0x74>
lea    0x60(%rsp),%rdi
jmp    120c <main+0x6c>
mov    $0x1,%al
mov    %eax,0x4(%rsp)
jmp    1214 <main+0x74>
mov    $0x1,%al
mov    %eax,0x8(%rsp)
jmp    1214 <main+0x74>
mov    $0x1,%al
mov    %eax,0xc(%rsp)
jmp    1214 <main+0x74>
test   %r12b,%r12b
je     1291 <main+0xf1>
xor    %eax,%eax
call   10c0 <usage@plt>
jmp    134b <main+0x1ab>
cmpb   $0x0,0xc(%rsp)
je     12b0 <main+0x110>
lea    0x60(%rsp),%rdi
lea    0x10(%rsp),%rsi
call   10b0 <lif2rom@plt>
test   %eax,%eax
jg     1311 <main+0x171>
jmp    1336 <main+0x196>
cmpb   $0x0,0x8(%rsp)
je     12cc <main+0x12c>
lea    0x60(%rsp),%rdi
lea    0x10(%rsp),%rsi
call   1090 <rom2bin@plt>
test   %eax,%eax
jg     1311 <main+0x171>
jmp    1336 <main+0x196>
cmpb   $0x0,0x4(%rsp)
je     12e8 <main+0x148>
lea    0x60(%rsp),%rdi
lea    0x10(%rsp),%rsi
call   1030 <bin2rom@plt>
test   %eax,%eax
jg     1311 <main+0x171>
jmp    1336 <main+0x196>
lea    0xd79(%rip),%rsi
lea    0x60(%rsp),%rdi
call   1070 <stricmp@plt>
test   %rax,%rax
je     1328 <main+0x188>
lea    0x60(%rsp),%rdi
lea    0x10(%rsp),%rsi
call   1040 <convert@plt>
test   %eax,%eax
jle    1336 <main+0x196>
lea    0xd55(%rip),%rdi
lea    0x10(%rsp),%rsi
mov    %eax,%edx
xor    %eax,%eax
call   1080 <printf@plt>
jmp    134b <main+0x1ab>
lea    0x10(%rsp),%rdi
call   10a0 <cree@plt>
test   %eax,%eax
jg     1311 <main+0x171>
jns    134b <main+0x1ab>
lea    0xd4e(%rip),%rdi
lea    0x10(%rsp),%rsi
xor    %eax,%eax
call   1080 <printf@plt>
add    $0x108,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@.str = [5 x i8] c"null\00"
@.str.1 = [32 x i8] c"file %s created, %d words long\0A\00"
@.str.2 = [31 x i8] c"Error, file %s NOT created !!\0A\00"
define void @main(i32 %0, i8** %1) {
%3 = alloca i32
%4 = alloca i8**
%5 = alloca i32
%6 = alloca i32
%7 = alloca i8
%8 = alloca i8
%9 = alloca i8
%10 = alloca i8
%11 = alloca [80 x i8]
%12 = alloca [80 x i8]
%13 = alloca [80 x i8]
store i32 %0, i32* %3
store i8** %1, i8*** %4
store i8 0, i8* %7
store i8 0, i8* %8
store i8 0, i8* %9
store i8 0, i8* %10
%14 = getelementptr inbounds [80 x i8], [80 x i8]* %12, i64 0, i64 0
store i8 0, i8* %14
%15 = getelementptr inbounds [80 x i8], [80 x i8]* %13, i64 0, i64 0
store i8 0, i8* %15
store i32 1, i32* %5
br label %16
16: ; preds = %60, %2
%17 = load i32, i32* %5
%18 = load i32, i32* %3
%19 = icmp slt i32 %17, %18
br i1 %19, label %20, label %63
20: ; preds = %16
%21 = getelementptr inbounds [80 x i8], [80 x i8]* %11, i64 0, i64 0
%22 = load i8**, i8*** %4
%23 = load i32, i32* %5
%24 = sext i32 %23 to i64
%25 = getelementptr inbounds i8*, i8** %22, i64 %24
%26 = load i8*, i8** %25
%27 = call i32 @strcpy(i8* %21, i8* %26)
%28 = getelementptr inbounds [80 x i8], [80 x i8]* %11, i64 0, i64 0
%29 = load i8, i8* %28
%30 = sext i8 %29 to i32
%31 = icmp eq i32 %30, 47
br i1 %31, label %32, label %45
32: ; preds = %20
%33 = getelementptr inbounds [80 x i8], [80 x i8]* %11, i64 0, i64 1
%34 = load i8, i8* %33
%35 = call signext i8 @toupper(i8 signext %34)
%36 = getelementptr inbounds [80 x i8], [80 x i8]* %11, i64 0, i64 1
store i8 %35, i8* %36
%37 = getelementptr inbounds [80 x i8], [80 x i8]* %11, i64 0, i64 1
%38 = load i8, i8* %37
%39 = sext i8 %38 to i32
switch i32 %39, label %44 [
i32 72, label %40
i32 63, label %40
i32 82, label %41
i32 66, label %42
i32 88, label %43
]
40: ; preds = %32, %32
store i8 1, i8* %7
br label %44
41: ; preds = %32
store i8 1, i8* %8
br label %44
42: ; preds = %32
store i8 1, i8* %9
br label %44
43: ; preds = %32
store i8 1, i8* %10
br label %44
44: ; preds = %32, %43, %42, %41, %40
br label %59
45: ; preds = %20
%46 = getelementptr inbounds [80 x i8], [80 x i8]* %12, i64 0, i64 0
%47 = load i8, i8* %46
%48 = sext i8 %47 to i32
%49 = icmp eq i32 %48, 0
br i1 %49, label %50, label %54
50: ; preds = %45
%51 = getelementptr inbounds [80 x i8], [80 x i8]* %12, i64 0, i64 0
%52 = getelementptr inbounds [80 x i8], [80 x i8]* %11, i64 0, i64 0
%53 = call i32 @strcpy(i8* %51, i8* %52)
br label %58
54: ; preds = %45
%55 = getelementptr inbounds [80 x i8], [80 x i8]* %13, i64 0, i64 0
%56 = getelementptr inbounds [80 x i8], [80 x i8]* %11, i64 0, i64 0
%57 = call i32 @strcpy(i8* %55, i8* %56)
br label %58
58: ; preds = %54, %50
br label %59
59: ; preds = %58, %44
br label %60
60: ; preds = %59
%61 = load i32, i32* %5
%62 = add nsw i32 %61, 1
store i32 %62, i32* %5
br label %16
63: ; preds = %16
%64 = load i8, i8* %7
%65 = icmp ne i8 %64, 0
br i1 %65, label %66, label %68
66: ; preds = %63
%67 = call i32 (...) @usage()
br label %118
68: ; preds = %63
%69 = load i8, i8* %10
%70 = icmp ne i8 %69, 0
br i1 %70, label %71, label %75
71: ; preds = %68
%72 = getelementptr inbounds [80 x i8], [80 x i8]* %12, i64 0, i64 0
%73 = getelementptr inbounds [80 x i8], [80 x i8]* %13, i64 0, i64 0
%74 = call i32 @lif2rom(i8* %72, i8* %73)
store i32 %74, i32* %6
br label %103
75: ; preds = %68
%76 = load i8, i8* %8
%77 = icmp ne i8 %76, 0
br i1 %77, label %78, label %82
78: ; preds = %75
%79 = getelementptr inbounds [80 x i8], [80 x i8]* %12, i64 0, i64 0
%80 = getelementptr inbounds [80 x i8], [80 x i8]* %13, i64 0, i64 0
%81 = call i32 @rom2bin(i8* %79, i8* %80)
store i32 %81, i32* %6
br label %102
82: ; preds = %75
%83 = load i8, i8* %9
%84 = icmp ne i8 %83, 0
br i1 %84, label %85, label %89
85: ; preds = %82
%86 = getelementptr inbounds [80 x i8], [80 x i8]* %12, i64 0, i64 0
%87 = getelementptr inbounds [80 x i8], [80 x i8]* %13, i64 0, i64 0
%88 = call i32 @bin2rom(i8* %86, i8* %87)
store i32 %88, i32* %6
br label %101
89: ; preds = %82
%90 = getelementptr inbounds [80 x i8], [80 x i8]* %12, i64 0, i64 0
%91 = call i64 @stricmp(i8* %90, i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str, i64 0, i64 0))
%92 = icmp ne i64 %91, 0
br i1 %92, label %93, label %97
93: ; preds = %89
%94 = getelementptr inbounds [80 x i8], [80 x i8]* %12, i64 0, i64 0
%95 = getelementptr inbounds [80 x i8], [80 x i8]* %13, i64 0, i64 0
%96 = call i32 @convert(i8* %94, i8* %95)
store i32 %96, i32* %6
br label %100
97: ; preds = %89
%98 = getelementptr inbounds [80 x i8], [80 x i8]* %13, i64 0, i64 0
%99 = call i32 @cree(i8* %98)
store i32 %99, i32* %6
br label %100
100: ; preds = %97, %93
br label %101
101: ; preds = %100, %85
br label %102
102: ; preds = %101, %78
br label %103
103: ; preds = %102, %71
%104 = load i32, i32* %6
%105 = icmp sgt i32 %104, 0
br i1 %105, label %106, label %110
106: ; preds = %103
%107 = getelementptr inbounds [80 x i8], [80 x i8]* %13, i64 0, i64 0
%108 = load i32, i32* %6
%109 = call i32 (i8*, i8*, ...) @printf(i8* getelementptr inbounds ([32 x i8], [32 x i8]* @.str.1, i64 0, i64 0), i8* %107, i32 %108)
br label %117
110: ; preds = %103
%111 = load i32, i32* %6
%112 = icmp slt i32 %111, 0
br i1 %112, label %113, label %116
113: ; preds = %110
%114 = getelementptr inbounds [80 x i8], [80 x i8]* %13, i64 0, i64 0
%115 = call i32 (i8*, i8*, ...) @printf(i8* getelementptr inbounds ([31 x i8], [31 x i8]* @.str.2, i64 0, i64 0), i8* %114)
br label %116
116: ; preds = %113, %110
br label %117
117: ; preds = %116, %106
br label %118
118: ; preds = %117, %66
ret void
}

LLVM IR (-O2):
@.str = [5 x i8] c"null\00"
@.str.1 = [32 x i8] c"file %s created, %d words long\0A\00"
@.str.2 = [31 x i8] c"Error, file %s NOT created !!\0A\00"
define void @main(i32 %0, i8** nocapture %1) {
%3 = alloca [80 x i8]
%4 = alloca [80 x i8]
%5 = alloca [80 x i8]
%6 = getelementptr inbounds [80 x i8], [80 x i8]* %3, i64 0, i64 0
%7 = getelementptr inbounds [80 x i8], [80 x i8]* %4, i64 0, i64 0
%8 = getelementptr inbounds [80 x i8], [80 x i8]* %5, i64 0, i64 0
store i8 0, i8* %7
store i8 0, i8* %8
%9 = icmp sgt i32 %0, 1
br i1 %9, label %10, label %62
10: ; preds = %2
%11 = getelementptr inbounds [80 x i8], [80 x i8]* %3, i64 0, i64 1
%12 = zext i32 %0 to i64
br label %13
13: ; preds = %10, %39
%14 = phi i64 [ 1, %10 ], [ %44, %39 ]
%15 = phi i8 [ 0, %10 ], [ %43, %39 ]
%16 = phi i8 [ 0, %10 ], [ %42, %39 ]
%17 = phi i8 [ 0, %10 ], [ %41, %39 ]
%18 = phi i8 [ 0, %10 ], [ %40, %39 ]
%19 = getelementptr inbounds i8*, i8** %1, i64 %14
%20 = load i8*, i8** %19
%21 = call i32 @strcpy(i8* %6, i8* %20)
%22 = load i8, i8* %6
%23 = icmp eq i8 %22, 47
br i1 %23, label %24, label %32
24: ; preds = %13
%25 = load i8, i8* %11
%26 = call signext i8 @toupper(i8 signext %25)
store i8 %26, i8* %11
%27 = sext i8 %26 to i32
switch i32 %27, label %39 [
i32 72, label %28
i32 63, label %28
i32 82, label %29
i32 66, label %30
i32 88, label %31
]
28: ; preds = %24, %24
br label %39
29: ; preds = %24
br label %39
30: ; preds = %24
br label %39
31: ; preds = %24
br label %39
32: ; preds = %13
%33 = load i8, i8* %7
%34 = icmp eq i8 %33, 0
br i1 %34, label %35, label %37
35: ; preds = %32
%36 = call i32 @strcpy(i8* %7, i8* %6)
br label %39
37: ; preds = %32
%38 = call i32 @strcpy(i8* %8, i8* %6)
br label %39
39: ; preds = %24, %31, %30, %29, %28, %37, %35
%40 = phi i8 [ %18, %24 ], [ %18, %31 ], [ %18, %30 ], [ %18, %29 ], [ 1, %28 ], [ %18, %35 ], [ %18, %37 ]
%41 = phi i8 [ %17, %24 ], [ %17, %31 ], [ %17, %30 ], [ 1, %29 ], [ %17, %28 ], [ %17, %35 ], [ %17, %37 ]
%42 = phi i8 [ %16, %24 ], [ %16, %31 ], [ 1, %30 ], [ %16, %29 ], [ %16, %28 ], [ %16, %35 ], [ %16, %37 ]
%43 = phi i8 [ %15, %24 ], [ 1, %31 ], [ %15, %30 ], [ %15, %29 ], [ %15, %28 ], [ %15, %35 ], [ %15, %37 ]
%44 = add nuw nsw i64 %14, 1
%45 = icmp eq i64 %44, %12
br i1 %45, label %46, label %13
46: ; preds = %39
%47 = icmp eq i8 %40, 0
br i1 %47, label %50, label %48
48: ; preds = %46
%49 = call i32 (...) @usage()
br label %78
50: ; preds = %46
%51 = icmp eq i8 %43, 0
br i1 %51, label %54, label %52
52: ; preds = %50
%53 = call i32 @lif2rom(i8* %7, i8* %8)
br label %69
54: ; preds = %50
%55 = icmp eq i8 %41, 0
br i1 %55, label %58, label %56
56: ; preds = %54
%57 = call i32 @rom2bin(i8* %7, i8* %8)
br label %69
58: ; preds = %54
%59 = icmp eq i8 %42, 0
br i1 %59, label %62, label %60
60: ; preds = %58
%61 = call i32 @bin2rom(i8* %7, i8* %8)
br label %69
62: ; preds = %2, %58
%63 = call i64 @stricmp(i8* %7, i8* getelementptr inbounds ([5 x i8], [5 x i8]* @.str, i64 0, i64 0))
%64 = icmp eq i64 %63, 0
br i1 %64, label %67, label %65
65: ; preds = %62
%66 = call i32 @convert(i8* %7, i8* %8)
br label %69
67: ; preds = %62
%68 = call i32 @cree(i8* %8)
br label %69
69: ; preds = %56, %65, %67, %60, %52
%70 = phi i32 [ %53, %52 ], [ %57, %56 ], [ %61, %60 ], [ %66, %65 ], [ %68, %67 ]
%71 = icmp sgt i32 %70, 0
br i1 %71, label %72, label %74
72: ; preds = %69
%73 = call i32 (i8*, i8*, ...) @printf(i8* getelementptr inbounds ([32 x i8], [32 x i8]* @.str.1, i64 0, i64 0), i8* %8, i32 %70)
br label %78
74: ; preds = %69
%75 = icmp slt i32 %70, 0
br i1 %75, label %76, label %78
76: ; preds = %74
%77 = call i32 (i8*, i8*, ...) @printf(i8* getelementptr inbounds ([31 x i8], [31 x i8]* @.str.2, i64 0, i64 0), i8* %8)
br label %78
78: ; preds = %72, %76, %74, %48
ret void
}