#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__ isdigit(char);
int /*<<< orphan*/ lua_arg_error(char *);
char getformat(char *f, int *just, int *m, int *n) {
  int t;
  switch (*f++) {
  case 's':
  case 'S':
    t = 's';
    break;
  case 'f':
  case 'F':
  case 'g':
  case 'G':
  case 'e':
  case 'E':
    t = 'f';
    break;
  case 'i':
  case 'I':
    t = 'i';
    break;
  default:
    t = 0;
    lua_arg_error("read/write (format)");
  }
  *just = (*f == '<' || *f == '>' || *f == '|') ? *f++ : '>';
  if (isdigit(*f)) {
    *m = 0;
    while (isdigit(*f))
      *m = *m * 10 + (*f++ - '0');
  } else
    *m = -1;
  if (*f == '.') {
    f++;
    *n = 0;
    while (isdigit(*f))
      *n = *n * 10 + (*f++ - '0');
  } else
    *n = -1;
  return t;
}


x86 assembly (clang, -O0):
<getformat>:
push   %rbp
mov    %rsp,%rbp
sub    $0x30,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %rcx,-0x20(%rbp)
mov    -0x8(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x8(%rbp)
movsbl (%rax),%eax
mov    %eax,-0x28(%rbp)
add    $0xffffffbb,%eax
sub    $0x3,%eax
jb     11c2 <getformat+0xa2>
jmp    115e <getformat+0x3e>
mov    -0x28(%rbp),%eax
sub    $0x49,%eax
je     11ce <getformat+0xae>
jmp    116f <getformat+0x4f>
mov    -0x28(%rbp),%eax
sub    $0x53,%eax
je     11b6 <getformat+0x96>
jmp    1180 <getformat+0x60>
mov    -0x28(%rbp),%eax
add    $0xffffff9b,%eax
sub    $0x3,%eax
jb     11c2 <getformat+0xa2>
jmp    1194 <getformat+0x74>
mov    -0x28(%rbp),%eax
sub    $0x69,%eax
je     11ce <getformat+0xae>
jmp    11a5 <getformat+0x85>
mov    -0x28(%rbp),%eax
sub    $0x73,%eax
jne    11da <getformat+0xba>
jmp    11b6 <getformat+0x96>
movl   $0x73,-0x24(%rbp)
jmp    11ed <getformat+0xcd>
movl   $0x66,-0x24(%rbp)
jmp    11ed <getformat+0xcd>
movl   $0x69,-0x24(%rbp)
jmp    11ed <getformat+0xcd>
movl   $0x0,-0x24(%rbp)
lea    0xe18(%rip),%rdi
call   1040 <lua_arg_error@plt>
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x3c,%eax
je     121d <getformat+0xfd>
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x3e,%eax
je     121d <getformat+0xfd>
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x7c,%eax
jne    1237 <getformat+0x117>
mov    -0x8(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x8(%rbp)
movsbl (%rax),%eax
mov    %eax,-0x2c(%rbp)
jmp    1244 <getformat+0x124>
mov    $0x3e,%eax
mov    %eax,-0x2c(%rbp)
jmp    1244 <getformat+0x124>
mov    -0x2c(%rbp),%ecx
mov    -0x10(%rbp),%rax
mov    %ecx,(%rax)
mov    -0x8(%rbp),%rax
movsbl (%rax),%edi
call   1030 <isdigit@plt>
cmp    $0x0,%rax
je     12b1 <getformat+0x191>
mov    -0x18(%rbp),%rax
movl   $0x0,(%rax)
mov    -0x8(%rbp),%rax
movsbl (%rax),%edi
call   1030 <isdigit@plt>
cmp    $0x0,%rax
je     12ac <getformat+0x18c>
mov    -0x18(%rbp),%rax
imul   $0xa,(%rax),%ecx
mov    -0x8(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x8(%rbp)
movsbl (%rax),%eax
sub    $0x30,%eax
add    %eax,%ecx
mov    -0x18(%rbp),%rax
mov    %ecx,(%rax)
jmp    126d <getformat+0x14d>
jmp    12bb <getformat+0x19b>
mov    -0x18(%rbp),%rax
movl   $0xffffffff,(%rax)
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2e,%eax
jne    1325 <getformat+0x205>
mov    -0x8(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x8(%rbp)
mov    -0x20(%rbp),%rax
movl   $0x0,(%rax)
mov    -0x8(%rbp),%rax
movsbl (%rax),%edi
call   1030 <isdigit@plt>
cmp    $0x0,%rax
je     1320 <getformat+0x200>
mov    -0x20(%rbp),%rax
imul   $0xa,(%rax),%ecx
mov    -0x8(%rbp),%rax
mov    %rax,%rdx
add    $0x1,%rdx
mov    %rdx,-0x8(%rbp)
movsbl (%rax),%eax
sub    $0x30,%eax
add    %eax,%ecx
mov    -0x20(%rbp),%rax
mov    %ecx,(%rax)
jmp    12e1 <getformat+0x1c1>
jmp    132f <getformat+0x20f>
mov    -0x20(%rbp),%rax
movl   $0xffffffff,(%rax)
mov    -0x24(%rbp),%eax
movsbl %al,%eax
add    $0x30,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<getformat>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
push   %rax
mov    %rcx,%r13
mov    %rdx,%rbp
mov    %rsi,%r15
mov    %rdi,%rbx
lea    0x1(%rdi),%r12
movsbl (%rdi),%eax
add    $0xffffffbb,%eax
cmp    $0x2e,%eax
ja     117e <getformat+0x5e>
movabs $0x700000007,%rcx
bt     %rax,%rcx
jae    115b <getformat+0x3b>
mov    $0x66,%r14b
jmp    1192 <getformat+0x72>
movabs $0x1000000010,%rcx
bt     %rax,%rcx
jb     118f <getformat+0x6f>
mov    $0x73,%r14b
movabs $0x400000004000,%rcx
bt     %rax,%rcx
jb     1192 <getformat+0x72>
lea    0xe7b(%rip),%rdi
call   1040 <lua_arg_error@plt>
xor    %r14d,%r14d
jmp    1192 <getformat+0x72>
mov    $0x69,%r14b
movzbl (%r12),%eax
cmp    $0x3c,%eax
je     11a9 <getformat+0x89>
cmp    $0x7c,%al
je     11a9 <getformat+0x89>
mov    $0x3e,%ecx
cmp    $0x3e,%al
jne    11b2 <getformat+0x92>
add    $0x2,%rbx
mov    %rbx,%r12
mov    %eax,%ecx
mov    %ecx,(%r15)
movsbl (%r12),%edi
call   1030 <isdigit@plt>
test   %rax,%rax
je     1268 <getformat+0x148>
movl   $0x0,0x0(%rbp)
movsbl (%r12),%edi
call   1030 <isdigit@plt>
test   %rax,%rax
je     126f <getformat+0x14f>
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
mov    0x0(%rbp),%eax
lea    (%rax,%rax,4),%eax
lea    0x1(%r12),%rbx
movsbl (%r12),%ecx
lea    (%rcx,%rax,2),%eax
add    $0xffffffd0,%eax
mov    %eax,0x0(%rbp)
movsbl 0x1(%r12),%edi
call   1030 <isdigit@plt>
mov    %rbx,%r12
test   %rax,%rax
jne    11f0 <getformat+0xd0>
cmpb   $0x2e,(%rbx)
jne    1277 <getformat+0x157>
movl   $0x0,0x0(%r13)
movsbl 0x1(%rbx),%edi
call   1030 <isdigit@plt>
test   %rax,%rax
je     127f <getformat+0x15f>
add    $0x2,%rbx
nopl   0x0(%rax,%rax,1)
mov    0x0(%r13),%eax
lea    (%rax,%rax,4),%eax
movsbl -0x1(%rbx),%ecx
lea    (%rcx,%rax,2),%eax
add    $0xffffffd0,%eax
mov    %eax,0x0(%r13)
movsbl (%rbx),%edi
call   1030 <isdigit@plt>
add    $0x1,%rbx
test   %rax,%rax
jne    1240 <getformat+0x120>
jmp    127f <getformat+0x15f>
movl   $0xffffffff,0x0(%rbp)
mov    %r12,%rbx
cmpb   $0x2e,(%rbx)
je     1221 <getformat+0x101>
movl   $0xffffffff,0x0(%r13)
ff
mov    %r14d,%eax
add    $0x8,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

LLVM IR (-O2):
@.str = [20 x i8] c"read/write (format)\00"
define signext i8 @getformat(i8* nocapture %0, i32* nocapture writeonly %1, i32* nocapture %2, i32* nocapture %3) {
%5 = getelementptr inbounds i8, i8* %0, i64 1
%6 = load i8, i8* %0
%7 = sext i8 %6 to i32
switch i32 %7, label %10 [
i32 115, label %12
i32 83, label %12
i32 102, label %8
i32 70, label %8
i32 103, label %8
i32 71, label %8
i32 101, label %8
i32 69, label %8
i32 105, label %9
i32 73, label %9
]
8: ; preds = %4, %4, %4, %4, %4, %4
br label %12
9: ; preds = %4, %4
br label %12
10: ; preds = %4
%11 = tail call i32 @lua_arg_error(i8* getelementptr inbounds ([20 x i8], [20 x i8]* @.str, i64 0, i64 0))
br label %12
12: ; preds = %4, %4, %10, %9, %8
%13 = phi i8 [ 0, %10 ], [ 105, %9 ], [ 102, %8 ], [ 115, %4 ], [ 115, %4 ]
%14 = load i8, i8* %5
switch i8 %14, label %18 [
i8 60, label %15
i8 62, label %15
i8 124, label %15
]
15: ; preds = %12, %12, %12
%16 = getelementptr inbounds i8, i8* %0, i64 2
%17 = zext i8 %14 to i32
br label %18
18: ; preds = %12, %15
%19 = phi i8* [ %16, %15 ], [ %5, %12 ]
%20 = phi i32 [ %17, %15 ], [ 62, %12 ]
store i32 %20, i32* %1
%21 = load i8, i8* %19
%22 = tail call i64 @isdigit(i8 signext %21)
%23 = icmp eq i64 %22, 0
br i1 %23, label %40, label %24
24: ; preds = %18
store i32 0, i32* %2
%25 = load i8, i8* %19
%26 = tail call i64 @isdigit(i8 signext %25)
%27 = icmp eq i64 %26, 0
br i1 %27, label %41, label %28
28: ; preds = %24, %28
%29 = phi i8* [ %32, %28 ], [ %19, %24 ]
%30 = load i32, i32* %2
%31 = mul nsw i32 %30, 10
%32 = getelementptr inbounds i8, i8* %29, i64 1
%33 = load i8, i8* %29
%34 = sext i8 %33 to i32
%35 = add i32 %31, -48
%36 = add i32 %35, %34
store i32 %36, i32* %2
%37 = load i8, i8* %32
%38 = tail call i64 @isdigit(i8 signext %37)
%39 = icmp eq i64 %38, 0
br i1 %39, label %41, label %28
40: ; preds = %18
store i32 -1, i32* %2
br label %41
41: ; preds = %28, %24, %40
%42 = phi i8* [ %19, %40 ], [ %19, %24 ], [ %32, %28 ]
%43 = load i8, i8* %42
%44 = icmp eq i8 %43, 46
br i1 %44, label %45, label %62
45: ; preds = %41
%46 = getelementptr inbounds i8, i8* %42, i64 1
store i32 0, i32* %3
%47 = load i8, i8* %46
%48 = tail call i64 @isdigit(i8 signext %47)
%49 = icmp eq i64 %48, 0
br i1 %49, label %63, label %50
50: ; preds = %45, %50
%51 = phi i8* [ %58, %50 ], [ %46, %45 ]
%52 = load i32, i32* %3
%53 = mul nsw i32 %52, 10
%54 = load i8, i8* %51
%55 = sext i8 %54 to i32
%56 = add i32 %53, -48
%57 = add i32 %56, %55
%58 = getelementptr inbounds i8, i8* %51, i64 1
store i32 %57, i32* %3
%59 = load i8, i8* %58
%60 = tail call i64 @isdigit(i8 signext %59)
%61 = icmp eq i64 %60, 0
br i1 %61, label %63, label %50
62: ; preds = %41
store i32 -1, i32* %3
br label %63
63: ; preds = %50, %45, %62
ret i8 %13
}