#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 */
typedef int /*<<< orphan*/ FILE;

/* Variables and functions */
char EOF;
int /*<<< orphan*/ *fopen(char *, char *);
char getc(int /*<<< orphan*/ *);
int happy(int);
int /*<<< orphan*/ printf(char *, char *);
int /*<<< orphan*/ puts(char *);
int main(int argc, char *argv[]) {
  FILE *fp;
  int a = 0;
  char c;
  if (argc != 2) {
    printf("Usage: %s [FILE]\n", argv[0]);
    return 1;
  }
  fp = fopen(*++argv, "r");
  while ((c = getc(fp)) != EOF || a) {
    if (c == '\n' || c == EOF) {
      int i, j, b[128] = {a, 0};
      for (i = 0; i < 128 && a > 0; i++) {
        a = happy(a);
        if (a == 1) {
          puts("1");
          break;
        }
        for (j = 0; j < i; j++) {
          if (b[j] == a) {
            a = 0;
            break;
          }
        }
      }
      if (a != 1)
        puts("0");
      a = 0;
    } else {
      a += (c - '0') * (c - '0');
    }
  }
  return 0;
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
sub    $0x240,%rsp
movl   $0x0,-0x4(%rbp)
mov    %edi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
movl   $0x0,-0x1c(%rbp)
cmpl   $0x2,-0x8(%rbp)
je     11a9 <main+0x49>
mov    -0x10(%rbp),%rax
mov    (%rax),%rsi
lea    0xe68(%rip),%rdi
call   1040 <printf@plt>
movl   $0x1,-0x4(%rbp)
jmp    1354 <main+0x1f4>
mov    -0x10(%rbp),%rax
mov    %rax,%rcx
add    $0x8,%rcx
mov    %rcx,-0x10(%rbp)
mov    0x8(%rax),%rdi
lea    0xe4f(%rip),%rsi
call   1060 <fopen@plt>
mov    %rax,-0x18(%rbp)
mov    -0x18(%rbp),%rdi
call   1080 <getc@plt>
mov    %al,-0x1d(%rbp)
movsbl %al,%ecx
mov    0x2e06(%rip),%rax
movsbl (%rax),%edx
mov    $0x1,%al
cmp    %edx,%ecx
mov    %al,-0x231(%rbp)
jne    1202 <main+0xa2>
cmpl   $0x0,-0x1c(%rbp)
setne  %al
mov    %al,-0x231(%rbp)
mov    -0x231(%rbp),%al
test   $0x1,%al
jne    1215 <main+0xb5>
jmp    134d <main+0x1ed>
movsbl -0x1d(%rbp),%eax
cmp    $0xa,%eax
je     1238 <main+0xd8>
movsbl -0x1d(%rbp),%eax
mov    0x2dbb(%rip),%rcx
movsbl (%rcx),%ecx
cmp    %ecx,%eax
jne    1331 <main+0x1d1>
lea    -0x230(%rbp),%rdi
xor    %esi,%esi
mov    $0x200,%edx
call   1050 <memset@plt>
mov    -0x1c(%rbp),%eax
mov    %eax,-0x230(%rbp)
movl   $0x0,-0x24(%rbp)
xor    %eax,%eax
cmpl   $0x80,-0x24(%rbp)
mov    %al,-0x232(%rbp)
jge    127d <main+0x11d>
cmpl   $0x0,-0x1c(%rbp)
setg   %al
mov    %al,-0x232(%rbp)
mov    -0x232(%rbp),%al
test   $0x1,%al
jne    1290 <main+0x130>
jmp    130f <main+0x1af>
mov    -0x1c(%rbp),%edi
call   1070 <happy@plt>
mov    %eax,-0x1c(%rbp)
cmpl   $0x1,-0x1c(%rbp)
jne    12b6 <main+0x156>
lea    0xd68(%rip),%rdi
call   1030 <puts@plt>
jmp    130f <main+0x1af>
movl   $0x0,-0x28(%rbp)
mov    -0x28(%rbp),%eax
cmp    -0x24(%rbp),%eax
jge    12fc <main+0x19c>
movslq -0x28(%rbp),%rax
mov    -0x230(%rbp,%rax,4),%eax
cmp    -0x1c(%rbp),%eax
jne    12e9 <main+0x189>
movl   $0x0,-0x1c(%rbp)
jmp    12fc <main+0x19c>
jmp    12ee <main+0x18e>
mov    -0x28(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x28(%rbp)
jmp    12bd <main+0x15d>
jmp    1301 <main+0x1a1>
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    125b <main+0xfb>
cmpl   $0x1,-0x1c(%rbp)
je     1325 <main+0x1c5>
lea    0xcf6(%rip),%rdi
call   1030 <puts@plt>
movl   $0x0,-0x1c(%rbp)
jmp    1348 <main+0x1e8>
movsbl -0x1d(%rbp),%eax
sub    $0x30,%eax
movsbl -0x1d(%rbp),%ecx
sub    $0x30,%ecx
imul   %ecx,%eax
add    -0x1c(%rbp),%eax
mov    %eax,-0x1c(%rbp)
jmp    11cc <main+0x6c>
movl   $0x0,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x240,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x208,%rsp
cmp    $0x2,%edi
jne    1271 <main+0x111>
mov    0x8(%rsi),%rdi
lea    0xe8d(%rip),%rsi
call   1060 <fopen@plt>
mov    %rax,%r15
mov    %rax,%rdi
call   1080 <getc@plt>
mov    0x2e4c(%rip),%r12
mov    (%r12),%dl
xor    %ecx,%ecx
cmp    %dl,%al
je     1289 <main+0x129>
xor    %ebx,%ebx
mov    %rsp,%r14
lea    0xe60(%rip),%r13
cs nopw 0x0(%rax,%rax,1)
cmp    $0xa,%al
je     11e0 <main+0x80>
cmp    %dl,%al
je     11e0 <main+0x80>
movsbl %al,%eax
add    $0xffffffd0,%eax
imul   %eax,%eax
add    %eax,%ebx
jmp    124a <main+0xea>
cs nopw 0x0(%rax,%rax,1)
nop
mov    $0x200,%edx
mov    %r14,%rdi
xor    %esi,%esi
call   1050 <memset@plt>
mov    %ebx,(%rsp)
mov    %r13,%rdi
test   %ebx,%ebx
jle    1243 <main+0xe3>
xor    %ebp,%ebp
mov    %ebx,%edi
call   1070 <happy@plt>
cmp    $0x1,%eax
je     1268 <main+0x108>
mov    %eax,%ebx
test   %rbp,%rbp
je     121e <main+0xbe>
xor    %eax,%eax
cmp    %ebx,(%rsp,%rax,4)
je     1240 <main+0xe0>
add    $0x1,%rax
cmp    %rax,%rbp
jne    1210 <main+0xb0>
cmp    $0x7e,%rbp
ja     122c <main+0xcc>
add    $0x1,%rbp
test   %ebx,%ebx
jg     11fb <main+0x9b>
mov    %r13,%rdi
cmp    $0x1,%ebx
jne    1243 <main+0xe3>
jmp    1248 <main+0xe8>
cs nopw 0x0(%rax,%rax,1)
mov    %r13,%rdi
call   1030 <puts@plt>
xor    %ebx,%ebx
mov    %r15,%rdi
call   1080 <getc@plt>
mov    (%r12),%dl
cmp    %dl,%al
jne    11c0 <main+0x60>
test   %ebx,%ebx
jne    11c0 <main+0x60>
jmp    1287 <main+0x127>
lea    0xda5(%rip),%rdi
jmp    1243 <main+0xe3>
mov    (%rsi),%rsi
lea    0xd85(%rip),%rdi
call   1040 <printf@plt>
mov    $0x1,%ecx
jmp    1289 <main+0x129>
xor    %ecx,%ecx
mov    %ecx,%eax
add    $0x208,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

LLVM IR (-O2):
@.str = [18 x i8] c"Usage: %s [FILE]\0A\00"
@.str.1 = [2 x i8] c"r\00"
@EOF = global i8 0
@.str.2 = [2 x i8] c"1\00"
@.str.3 = [2 x i8] c"0\00"
define i32 @main(i32 %0, i8** nocapture %1) {
%3 = alloca [128 x i32]
%4 = icmp eq i32 %0, 2
br i1 %4, label %8, label %5
5: ; preds = %2
%6 = load i8*, i8** %1
%7 = tail call i32 @printf(i8* getelementptr inbounds ([18 x i8], [18 x i8]* @.str, i64 0, i64 0), i8* %6)
br label %65
8: ; preds = %2
%9 = getelementptr inbounds i8*, i8** %1, i64 1
%10 = load i8*, i8** %9
%11 = tail call i32* @fopen(i8* %10, i8* getelementptr inbounds ([2 x i8], [2 x i8]* @.str.1, i64 0, i64 0))
%12 = tail call signext i8 @getc(i32* %11)
%13 = load i8, i8* @EOF
%14 = icmp eq i8 %12, %13
br i1 %14, label %65, label %15
15: ; preds = %8
%16 = bitcast [128 x i32]* %3 to i8*
%17 = getelementptr inbounds [128 x i32], [128 x i32]* %3, i64 0, i64 0
br label %18
18: ; preds = %15, %58
%19 = phi i8 [ %13, %15 ], [ %61, %58 ]
%20 = phi i8 [ %12, %15 ], [ %60, %58 ]
%21 = phi i32 [ 0, %15 ], [ %59, %58 ]
%22 = icmp eq i8 %20, 10
%23 = icmp eq i8 %20, %19
%24 = select i1 %22, i1 true, i1 %23
br i1 %24, label %25, label %53
25: ; preds = %18
store i32 %21, i32* %17
%26 = icmp sgt i32 %21, 0
br i1 %26, label %27, label %49
27: ; preds = %25, %42
%28 = phi i64 [ %43, %42 ], [ 0, %25 ]
%29 = phi i32 [ %30, %42 ], [ %21, %25 ]
%30 = tail call i32 @happy(i32 %29)
%31 = icmp eq i32 %30, 1
br i1 %31, label %49, label %32
32: ; preds = %27
%33 = icmp eq i64 %28, 0
br i1 %33, label %42, label %36
34: ; preds = %36
%35 = icmp eq i64 %41, %28
br i1 %35, label %42, label %36
36: ; preds = %32, %34
%37 = phi i64 [ %41, %34 ], [ 0, %32 ]
%38 = getelementptr inbounds [128 x i32], [128 x i32]* %3, i64 0, i64 %37
%39 = load i32, i32* %38
%40 = icmp eq i32 %39, %30
%41 = add nuw nsw i64 %37, 1
br i1 %40, label %49, label %34
42: ; preds = %34, %32
%43 = add nuw nsw i64 %28, 1
%44 = icmp ult i64 %28, 127
%45 = icmp sgt i32 %30, 0
%46 = select i1 %44, i1 %45, i1 false
br i1 %46, label %27, label %47
47: ; preds = %42
%48 = icmp eq i32 %30, 1
br i1 %48, label %52, label %49
49: ; preds = %27, %36, %47, %25
%50 = phi i8* [ getelementptr inbounds ([2 x i8], [2 x i8]* @.str.3, i64 0, i64 0), %25 ], [ getelementptr inbounds ([2 x i8], [2 x i8]* @.str.3, i64 0, i64 0), %47 ], [ getelementptr inbounds ([2 x i8], [2 x i8]* @.str.3, i64 0, i64 0), %36 ], [ getelementptr inbounds ([2 x i8], [2 x i8]* @.str.2, i64 0, i64 0), %27 ]
%51 = tail call i32 @puts(i8* dereferenceable(1) %50)
br label %52
52: ; preds = %49, %47
br label %58
53: ; preds = %18
%54 = sext i8 %20 to i32
%55 = add nsw i32 %54, -48
%56 = mul nsw i32 %55, %55
%57 = add nsw i32 %56, %21
br label %58
58: ; preds = %53, %52
%59 = phi i32 [ 0, %52 ], [ %57, %53 ]
%60 = tail call signext i8 @getc(i32* %11)
%61 = load i8, i8* @EOF
%62 = icmp ne i8 %60, %61
%63 = icmp ne i32 %59, 0
%64 = select i1 %62, i1 true, i1 %63
br i1 %64, label %18, label %65
65: ; preds = %58, %8, %5
%66 = phi i32 [ 1, %5 ], [ 0, %8 ], [ 0, %58 ]
ret i32 %66
}