#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 /*<<< orphan*/ sprintf(char *, char *, int);
int strcmp(char *, char *);
int strlen(char *);
int palindrome(int n) {
  char c[100], str[100];
  int result;
  int i, len, p;
  sprintf(c, "%X", n);
  len = strlen(c);
  p = len - 1;
  for (i = 0; i < len; i++) {
    str[i] = c[p];
    p--;
  }
  str[len] = '\0';
  result = strcmp(c, str);
  return (result == 0) ? 1 : 0;
}


x86 assembly (clang, -O0):
<palindrome>:
push   %rbp
mov    %rsp,%rbp
sub    $0xf0,%rsp
mov    %edi,-0x4(%rbp)
lea    -0x70(%rbp),%rdi
mov    -0x4(%rbp),%edx
lea    0xeb4(%rip),%rsi
call   1050 <sprintf@plt>
lea    -0x70(%rbp),%rdi
call   1030 <strlen@plt>
mov    %eax,-0xec(%rbp)
mov    -0xec(%rbp),%eax
sub    $0x1,%eax
mov    %eax,-0xf0(%rbp)
movl   $0x0,-0xe8(%rbp)
mov    -0xe8(%rbp),%eax
cmp    -0xec(%rbp),%eax
jge    11c7 <palindrome+0x97>
movslq -0xf0(%rbp),%rax
mov    -0x70(%rbp,%rax,1),%cl
movslq -0xe8(%rbp),%rax
mov    %cl,-0xe0(%rbp,%rax,1)
mov    -0xf0(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0xf0(%rbp)
mov    -0xe8(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0xe8(%rbp)
jmp    1179 <palindrome+0x49>
movslq -0xec(%rbp),%rax
movb   $0x0,-0xe0(%rbp,%rax,1)
lea    -0x70(%rbp),%rdi
lea    -0xe0(%rbp),%rsi
call   1040 <strcmp@plt>
mov    %eax,-0xe4(%rbp)
mov    -0xe4(%rbp),%edx
xor    %eax,%eax
mov    $0x1,%ecx
cmp    $0x0,%edx
cmove  %ecx,%eax
add    $0xf0,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<palindrome>:
push   %rbx
sub    $0xe0,%rsp
mov    %edi,%edx
lea    0xebf(%rip),%rsi
lea    0x70(%rsp),%rbx
mov    %rbx,%rdi
call   1050 <sprintf@plt>
mov    %rbx,%rdi
call   1030 <strlen@plt>
test   %eax,%eax
jle    116b <palindrome+0x3b>
mov    %eax,%ecx
cmp    $0x8,%eax
jae    1173 <palindrome+0x43>
xor    %eax,%eax
mov    %rcx,%rdx
jmp    128a <palindrome+0x15a>
movslq %eax,%rcx
jmp    12b3 <palindrome+0x183>
cmp    $0x20,%eax
jae    117f <palindrome+0x4f>
xor    %eax,%eax
jmp    122b <palindrome+0xfb>
mov    %ecx,%eax
and    $0xffffffe0,%eax
lea    (%rcx,%rbx,1),%rdx
add    $0xfffffffffffffff0,%rdx
xor    %esi,%esi
pxor   %xmm0,%xmm0
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
movdqu -0x10(%rdx),%xmm1
movdqu (%rdx),%xmm2
movdqa %xmm2,%xmm3
punpcklbw %xmm0,%xmm3
pshufd $0x4e,%xmm3,%xmm3
pshuflw $0x1b,%xmm3,%xmm3
pshufhw $0x1b,%xmm3,%xmm3
punpckhbw %xmm0,%xmm2
pshufd $0x4e,%xmm2,%xmm2
pshuflw $0x1b,%xmm2,%xmm2
pshufhw $0x1b,%xmm2,%xmm2
packuswb %xmm3,%xmm2
movdqa %xmm1,%xmm3
punpcklbw %xmm0,%xmm3
pshufd $0x4e,%xmm3,%xmm3
pshuflw $0x1b,%xmm3,%xmm3
pshufhw $0x1b,%xmm3,%xmm3
punpckhbw %xmm0,%xmm1
pshufd $0x4e,%xmm1,%xmm1
pshuflw $0x1b,%xmm1,%xmm1
pshufhw $0x1b,%xmm1,%xmm1
packuswb %xmm3,%xmm1
movdqa %xmm2,(%rsp,%rsi,1)
movdqa %xmm1,0x10(%rsp,%rsi,1)
add    $0x20,%rsi
add    $0xffffffffffffffe0,%rdx
cmp    %rsi,%rax
jne    11a0 <palindrome+0x70>
cmp    %rcx,%rax
je     12b3 <palindrome+0x183>
test   $0x18,%cl
je     1284 <palindrome+0x154>
mov    %rax,%rsi
mov    %ecx,%eax
and    $0xfffffff8,%eax
mov    %rcx,%rdx
sub    %rax,%rdx
mov    %rcx,%rdi
sub    %rsi,%rdi
add    %rsp,%rdi
add    $0x68,%rdi
pxor   %xmm0,%xmm0
nopw   0x0(%rax,%rax,1)
movq   (%rdi),%xmm1
punpcklbw %xmm0,%xmm1
pshufd $0x4e,%xmm1,%xmm1
pshuflw $0x1b,%xmm1,%xmm1
pshufhw $0x1b,%xmm1,%xmm1
packuswb %xmm1,%xmm1
movq   %xmm1,(%rsp,%rsi,1)
add    $0x8,%rsi
add    $0xfffffffffffffff8,%rdi
cmp    %rsi,%rax
jne    1250 <palindrome+0x120>
cmp    %rcx,%rax
jne    128a <palindrome+0x15a>
jmp    12b3 <palindrome+0x183>
mov    %rcx,%rdx
sub    %rax,%rdx
add    %rbx,%rdx
add    $0xffffffffffffffff,%rdx
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax,%rax,1)
movzbl (%rdx),%ebx
mov    %bl,(%rsp,%rax,1)
add    $0x1,%rax
add    $0xffffffffffffffff,%rdx
cmp    %rax,%rcx
jne    12a0 <palindrome+0x170>
movb   $0x0,(%rsp,%rcx,1)
lea    0x70(%rsp),%rdi
mov    %rsp,%rsi
call   1040 <strcmp@plt>
xor    %ecx,%ecx
test   %eax,%eax
sete   %cl
mov    %ecx,%eax
add    $0xe0,%rsp
pop    %rbx
ret

LLVM IR (-O0):
@.str = [3 x i8] c"%X\00"
define i32 @palindrome(i32 %0) {
%2 = alloca i32
%3 = alloca [100 x i8]
%4 = alloca [100 x i8]
%5 = alloca i32
%6 = alloca i32
%7 = alloca i32
%8 = alloca i32
store i32 %0, i32* %2
%9 = getelementptr inbounds [100 x i8], [100 x i8]* %3, i64 0, i64 0
%10 = load i32, i32* %2
%11 = call i32 @sprintf(i8* %9, i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i32 %10)
%12 = getelementptr inbounds [100 x i8], [100 x i8]* %3, i64 0, i64 0
%13 = call i32 @strlen(i8* %12)
store i32 %13, i32* %7
%14 = load i32, i32* %7
%15 = sub nsw i32 %14, 1
store i32 %15, i32* %8
store i32 0, i32* %6
br label %16
16: ; preds = %30, %1
%17 = load i32, i32* %6
%18 = load i32, i32* %7
%19 = icmp slt i32 %17, %18
br i1 %19, label %20, label %33
20: ; preds = %16
%21 = load i32, i32* %8
%22 = sext i32 %21 to i64
%23 = getelementptr inbounds [100 x i8], [100 x i8]* %3, i64 0, i64 %22
%24 = load i8, i8* %23
%25 = load i32, i32* %6
%26 = sext i32 %25 to i64
%27 = getelementptr inbounds [100 x i8], [100 x i8]* %4, i64 0, i64 %26
store i8 %24, i8* %27
%28 = load i32, i32* %8
%29 = add nsw i32 %28, -1
store i32 %29, i32* %8
br label %30
30: ; preds = %20
%31 = load i32, i32* %6
%32 = add nsw i32 %31, 1
store i32 %32, i32* %6
br label %16
33: ; preds = %16
%34 = load i32, i32* %7
%35 = sext i32 %34 to i64
%36 = getelementptr inbounds [100 x i8], [100 x i8]* %4, i64 0, i64 %35
store i8 0, i8* %36
%37 = getelementptr inbounds [100 x i8], [100 x i8]* %3, i64 0, i64 0
%38 = getelementptr inbounds [100 x i8], [100 x i8]* %4, i64 0, i64 0
%39 = call i32 @strcmp(i8* %37, i8* %38)
store i32 %39, i32* %5
%40 = load i32, i32* %5
%41 = icmp eq i32 %40, 0
%42 = zext i1 %41 to i64
%43 = select i1 %41, i32 1, i32 0
ret i32 %43
}

LLVM IR (-O2):
@.str = [3 x i8] c"%X\00"
define i32 @palindrome(i32 %0) {
%2 = alloca [100 x i8]
%3 = alloca [100 x i8]
%4 = getelementptr inbounds [100 x i8], [100 x i8]* %2, i64 0, i64 0
%5 = getelementptr inbounds [100 x i8], [100 x i8]* %3, i64 0, i64 0
%6 = call i32 @sprintf(i8* %4, i8* dereferenceable(1) getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i32 %0)
%7 = call i32 @strlen(i8* %4)
%8 = icmp sgt i32 %7, 0
br i1 %8, label %11, label %9
9: ; preds = %1
%10 = sext i32 %7 to i64
br label %75
11: ; preds = %1
%12 = zext i32 %7 to i64
%13 = zext i32 %7 to i64
%14 = icmp ult i32 %7, 8
br i1 %14, label %63, label %15
15: ; preds = %11
%16 = icmp ult i32 %7, 32
br i1 %16, label %44, label %17
17: ; preds = %15
%18 = and i64 %13, 4294967264
br label %19
19: ; preds = %19, %17
%20 = phi i64 [ 0, %17 ], [ %36, %19 ]
%21 = xor i64 %20, -1
%22 = add i64 %21, %12
%23 = getelementptr inbounds [100 x i8], [100 x i8]* %2, i64 0, i64 %22
%24 = getelementptr inbounds i8, i8* %23, i64 -15
%25 = bitcast i8* %24 to <16 x i8>*
%26 = load <16 x i8>, <16 x i8>* %25
%27 = shufflevector <16 x i8> %26, <16 x i8> poison, <16 x i32> <i32 15, i32 14, i32 13, i32 12, i32 11, i32 10, i32 9, i32 8, i32 7, i32 6, i32 5, i32 4, i32 3, i32 2, i32 1, i32 0>
%28 = getelementptr inbounds i8, i8* %23, i64 -31
%29 = bitcast i8* %28 to <16 x i8>*
%30 = load <16 x i8>, <16 x i8>* %29
%31 = shufflevector <16 x i8> %30, <16 x i8> poison, <16 x i32> <i32 15, i32 14, i32 13, i32 12, i32 11, i32 10, i32 9, i32 8, i32 7, i32 6, i32 5, i32 4, i32 3, i32 2, i32 1, i32 0>
%32 = getelementptr inbounds [100 x i8], [100 x i8]* %3, i64 0, i64 %20
%33 = bitcast i8* %32 to <16 x i8>*
store <16 x i8> %27, <16 x i8>* %33
%34 = getelementptr inbounds i8, i8* %32, i64 16
%35 = bitcast i8* %34 to <16 x i8>*
store <16 x i8> %31, <16 x i8>* %35
%36 = add nuw i64 %20, 32
%37 = icmp eq i64 %36, %18
br i1 %37, label %38, label %19
38: ; preds = %19
%39 = icmp eq i64 %18, %13
br i1 %39, label %75, label %40
40: ; preds = %38
%41 = sub nsw i64 %12, %18
%42 = and i64 %13, 24
%43 = icmp eq i64 %42, 0
br i1 %43, label %63, label %44
44: ; preds = %15, %40
%45 = phi i64 [ %18, %40 ], [ 0, %15 ]
%46 = and i64 %13, 4294967288
%47 = sub nsw i64 %12, %46
br label %48
48: ; preds = %48, %44
%49 = phi i64 [ %45, %44 ], [ %59, %48 ]
%50 = xor i64 %49, -1
%51 = add i64 %50, %12
%52 = getelementptr inbounds [100 x i8], [100 x i8]* %2, i64 0, i64 %51
%53 = getelementptr inbounds i8, i8* %52, i64 -7
%54 = bitcast i8* %53 to <8 x i8>*
%55 = load <8 x i8>, <8 x i8>* %54
%56 = shufflevector <8 x i8> %55, <8 x i8> poison, <8 x i32> <i32 7, i32 6, i32 5, i32 4, i32 3, i32 2, i32 1, i32 0>
%57 = getelementptr inbounds [100 x i8], [100 x i8]* %3, i64 0, i64 %49
%58 = bitcast i8* %57 to <8 x i8>*
store <8 x i8> %56, <8 x i8>* %58
%59 = add nuw i64 %49, 8
%60 = icmp eq i64 %59, %46
br i1 %60, label %61, label %48
61: ; preds = %48
%62 = icmp eq i64 %46, %13
br i1 %62, label %75, label %63
63: ; preds = %11, %40, %61
%64 = phi i64 [ 0, %11 ], [ %18, %40 ], [ %46, %61 ]
%65 = phi i64 [ %12, %11 ], [ %41, %40 ], [ %47, %61 ]
br label %66
66: ; preds = %63, %66
%67 = phi i64 [ %73, %66 ], [ %64, %63 ]
%68 = phi i64 [ %69, %66 ], [ %65, %63 ]
%69 = add nsw i64 %68, -1
%70 = getelementptr inbounds [100 x i8], [100 x i8]* %2, i64 0, i64 %69
%71 = load i8, i8* %70
%72 = getelementptr inbounds [100 x i8], [100 x i8]* %3, i64 0, i64 %67
store i8 %71, i8* %72
%73 = add nuw nsw i64 %67, 1
%74 = icmp eq i64 %73, %13
br i1 %74, label %75, label %66
75: ; preds = %66, %38, %61, %9
%76 = phi i64 [ %10, %9 ], [ %12, %61 ], [ %12, %38 ], [ %12, %66 ]
%77 = getelementptr inbounds [100 x i8], [100 x i8]* %3, i64 0, i64 %76
store i8 0, i8* %77
%78 = call i32 @strcmp(i8* %4, i8* %5)
%79 = icmp eq i32 %78, 0
%80 = zext i1 %79 to i32
ret i32 %80
}