#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 *);
int tolower(char);
char getformat(char *f, int *just, int *m, int *n) {
  int t;
  switch (*f++) {
  case 'q':
  case 'Q':
  case 's':
  case 'S':
  case 'i':
  case 'I':
    t = tolower(*(f - 1));
    break;
  case 'f':
  case 'F':
  case 'g':
  case 'G':
  case 'e':
  case 'E':
    t = 'f';
    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     11fd <getformat+0xcd>
jmp    116e <getformat+0x3e>
mov    -0x28(%rbp),%eax
sub    $0x49,%eax
je     11e8 <getformat+0xb8>
jmp    117f <getformat+0x4f>
mov    -0x28(%rbp),%eax
sub    $0x51,%eax
je     11e8 <getformat+0xb8>
jmp    1190 <getformat+0x60>
mov    -0x28(%rbp),%eax
sub    $0x53,%eax
je     11e8 <getformat+0xb8>
jmp    11a1 <getformat+0x71>
mov    -0x28(%rbp),%eax
add    $0xffffff9b,%eax
sub    $0x3,%eax
jb     11fd <getformat+0xcd>
jmp    11b5 <getformat+0x85>
mov    -0x28(%rbp),%eax
sub    $0x69,%eax
je     11e8 <getformat+0xb8>
jmp    11c6 <getformat+0x96>
mov    -0x28(%rbp),%eax
sub    $0x71,%eax
je     11e8 <getformat+0xb8>
jmp    11d7 <getformat+0xa7>
mov    -0x28(%rbp),%eax
sub    $0x73,%eax
jne    1209 <getformat+0xd9>
jmp    11e8 <getformat+0xb8>
mov    -0x8(%rbp),%rax
movsbl -0x1(%rax),%edi
call   1050 <tolower@plt>
mov    %eax,-0x24(%rbp)
jmp    121c <getformat+0xec>
movl   $0x66,-0x24(%rbp)
jmp    121c <getformat+0xec>
movl   $0x0,-0x24(%rbp)
lea    0xde9(%rip),%rdi
call   1040 <lua_arg_error@plt>
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x3c,%eax
je     124c <getformat+0x11c>
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x3e,%eax
je     124c <getformat+0x11c>
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x7c,%eax
jne    1266 <getformat+0x136>
mov    -0x8(%rbp),%rax
mov    %rax,%rcx
add    $0x1,%rcx
mov    %rcx,-0x8(%rbp)
movsbl (%rax),%eax
mov    %eax,-0x2c(%rbp)
jmp    1273 <getformat+0x143>
mov    $0x3e,%eax
mov    %eax,-0x2c(%rbp)
jmp    1273 <getformat+0x143>
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     12e0 <getformat+0x1b0>
mov    -0x18(%rbp),%rax
movl   $0x0,(%rax)
mov    -0x8(%rbp),%rax
movsbl (%rax),%edi
call   1030 <isdigit@plt>
cmp    $0x0,%rax
je     12db <getformat+0x1ab>
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    129c <getformat+0x16c>
jmp    12ea <getformat+0x1ba>
mov    -0x18(%rbp),%rax
movl   $0xffffffff,(%rax)
mov    -0x8(%rbp),%rax
movsbl (%rax),%eax
cmp    $0x2e,%eax
jne    1354 <getformat+0x224>
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     134f <getformat+0x21f>
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    1310 <getformat+0x1e0>
jmp    135e <getformat+0x22e>
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
lea    -0x45(%rax),%ecx
cmp    $0x2e,%ecx
ja     1281 <getformat+0x151>
mov    $0x66,%r14b
movabs $0x700000007,%rdx
bt     %rcx,%rdx
jb     118c <getformat+0x5c>
movabs $0x501000005010,%rdx
bt     %rcx,%rdx
jae    1281 <getformat+0x151>
movsbl %al,%edi
call   1050 <tolower@plt>
mov    %eax,%r14d
movzbl (%r12),%eax
cmp    $0x3c,%eax
je     11a3 <getformat+0x73>
cmp    $0x7c,%al
je     11a3 <getformat+0x73>
mov    $0x3e,%ecx
cmp    $0x3e,%al
jne    11ac <getformat+0x7c>
add    $0x2,%rbx
mov    %rbx,%r12
mov    %eax,%ecx
mov    %ecx,(%r15)
movsbl (%r12),%edi
call   1030 <isdigit@plt>
test   %rax,%rax
je     1258 <getformat+0x128>
movl   $0x0,0x0(%rbp)
movsbl (%r12),%edi
call   1030 <isdigit@plt>
test   %rax,%rax
je     125f <getformat+0x12f>
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    11e0 <getformat+0xb0>
cmpb   $0x2e,(%rbx)
jne    1267 <getformat+0x137>
movl   $0x0,0x0(%r13)
movsbl 0x1(%rbx),%edi
call   1030 <isdigit@plt>
test   %rax,%rax
je     126f <getformat+0x13f>
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    1230 <getformat+0x100>
jmp    126f <getformat+0x13f>
movl   $0xffffffff,0x0(%rbp)
mov    %r12,%rbx
cmpb   $0x2e,(%rbx)
je     1211 <getformat+0xe1>
movl   $0xffffffff,0x0(%r13)
ff
mov    %r14d,%eax
add    $0x8,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret
lea    0xd78(%rip),%rdi
call   1040 <lua_arg_error@plt>
xor    %r14d,%r14d
jmp    118c <getformat+0x5c>

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

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