#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 ssize_t;

/* Variables and functions */
int ipforest_strtol(const char *str, size_t len, ssize_t *plen) {
  int i, ret;
  *plen = 0;
  ret = 0;
  for (i = 0; i < len; i++) {
    if (str[i] <= '9' && str[i] >= '0') {
      ret = ret * 10 + (str[i] - '0');
      *plen += 1;
    } else {
      *plen = -1;
      return 0;
    }
  }
  return ret;
}


x86 assembly (clang, -O0):
<ipforest_strtol>:
push   %rbp
mov    %rsp,%rbp
mov    %rdi,-0x10(%rbp)
mov    %rsi,-0x18(%rbp)
mov    %rdx,-0x20(%rbp)
mov    -0x20(%rbp),%rax
movl   $0x0,(%rax)
movl   $0x0,-0x28(%rbp)
movl   $0x0,-0x24(%rbp)
movslq -0x24(%rbp),%rax
cmp    -0x18(%rbp),%rax
jae    11b1 <ipforest_strtol+0xb1>
mov    -0x10(%rbp),%rax
movslq -0x24(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x39,%eax
jg     1188 <ipforest_strtol+0x88>
mov    -0x10(%rbp),%rax
movslq -0x24(%rbp),%rcx
movsbl (%rax,%rcx,1),%eax
cmp    $0x30,%eax
jl     1188 <ipforest_strtol+0x88>
imul   $0xa,-0x28(%rbp),%eax
mov    -0x10(%rbp),%rcx
movslq -0x24(%rbp),%rdx
movsbl (%rcx,%rdx,1),%ecx
sub    $0x30,%ecx
add    %ecx,%eax
mov    %eax,-0x28(%rbp)
mov    -0x20(%rbp),%rax
mov    (%rax),%ecx
add    $0x1,%ecx
mov    %ecx,(%rax)
jmp    119e <ipforest_strtol+0x9e>
mov    -0x20(%rbp),%rax
movl   $0xffffffff,(%rax)
movl   $0x0,-0x4(%rbp)
jmp    11b7 <ipforest_strtol+0xb7>
jmp    11a3 <ipforest_strtol+0xa3>
mov    -0x24(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x24(%rbp)
jmp    1128 <ipforest_strtol+0x28>
mov    -0x28(%rbp),%eax
mov    %eax,-0x4(%rbp)
mov    -0x4(%rbp),%eax
pop    %rbp
ret

x86 assembly (clang, -O2):
<ipforest_strtol>:
movl   $0x0,(%rdx)
test   %rsi,%rsi
je     113b <ipforest_strtol+0x3b>
xor    %r9d,%r9d
xor    %eax,%eax
movzbl (%rdi,%r9,1),%r8d
lea    -0x30(%r8),%ecx
cmp    $0x9,%cl
ja     1135 <ipforest_strtol+0x35>
lea    (%rax,%rax,4),%eax
lea    (%r8,%rax,2),%eax
add    $0xffffffd0,%eax
add    $0x1,%r9
mov    %r9d,(%rdx)
cmp    %r9,%rsi
jne    1110 <ipforest_strtol+0x10>
ret
movl   $0xffffffff,(%rdx)
xor    %eax,%eax
ret

LLVM IR (-O0):
define i32 @ipforest_strtol(i8* %0, i64 %1, i32* %2) {
%4 = alloca i32
%5 = alloca i8*
%6 = alloca i64
%7 = alloca i32*
%8 = alloca i32
%9 = alloca i32
store i8* %0, i8** %5
store i64 %1, i64* %6
store i32* %2, i32** %7
%10 = load i32*, i32** %7
store i32 0, i32* %10
store i32 0, i32* %9
store i32 0, i32* %8
br label %11
11: ; preds = %49, %3
%12 = load i32, i32* %8
%13 = sext i32 %12 to i64
%14 = load i64, i64* %6
%15 = icmp ult i64 %13, %14
br i1 %15, label %16, label %52
16: ; preds = %11
%17 = load i8*, i8** %5
%18 = load i32, i32* %8
%19 = sext i32 %18 to i64
%20 = getelementptr inbounds i8, i8* %17, i64 %19
%21 = load i8, i8* %20
%22 = sext i8 %21 to i32
%23 = icmp sle i32 %22, 57
br i1 %23, label %24, label %46
24: ; preds = %16
%25 = load i8*, i8** %5
%26 = load i32, i32* %8
%27 = sext i32 %26 to i64
%28 = getelementptr inbounds i8, i8* %25, i64 %27
%29 = load i8, i8* %28
%30 = sext i8 %29 to i32
%31 = icmp sge i32 %30, 48
br i1 %31, label %32, label %46
32: ; preds = %24
%33 = load i32, i32* %9
%34 = mul nsw i32 %33, 10
%35 = load i8*, i8** %5
%36 = load i32, i32* %8
%37 = sext i32 %36 to i64
%38 = getelementptr inbounds i8, i8* %35, i64 %37
%39 = load i8, i8* %38
%40 = sext i8 %39 to i32
%41 = sub nsw i32 %40, 48
%42 = add nsw i32 %34, %41
store i32 %42, i32* %9
%43 = load i32*, i32** %7
%44 = load i32, i32* %43
%45 = add nsw i32 %44, 1
store i32 %45, i32* %43
br label %48
46: ; preds = %24, %16
%47 = load i32*, i32** %7
store i32 -1, i32* %47
store i32 0, i32* %4
br label %54
48: ; preds = %32
br label %49
49: ; preds = %48
%50 = load i32, i32* %8
%51 = add nsw i32 %50, 1
store i32 %51, i32* %8
br label %11
52: ; preds = %11
%53 = load i32, i32* %9
store i32 %53, i32* %4
br label %54
54: ; preds = %52, %46
%55 = load i32, i32* %4
ret i32 %55
}

LLVM IR (-O2):
define i32 @ipforest_strtol(i8* nocapture %0, i64 %1, i32* nocapture %2) {
store i32 0, i32* %2
%4 = icmp eq i64 %1, 0
br i1 %4, label %22, label %5
5: ; preds = %3, %13
%6 = phi i32 [ %18, %13 ], [ 0, %3 ]
%7 = phi i64 [ %19, %13 ], [ 0, %3 ]
%8 = phi i32 [ %17, %13 ], [ 0, %3 ]
%9 = getelementptr inbounds i8, i8* %0, i64 %7
%10 = load i8, i8* %9
%11 = add i8 %10, -48
%12 = icmp ult i8 %11, 10
br i1 %12, label %13, label %21
13: ; preds = %5
%14 = zext i8 %10 to i32
%15 = mul nsw i32 %8, 10
%16 = add i32 %15, -48
%17 = add i32 %16, %14
%18 = add nuw nsw i32 %6, 1
store i32 %18, i32* %2
%19 = add nuw i64 %7, 1
%20 = icmp eq i64 %19, %1
br i1 %20, label %22, label %5
21: ; preds = %5
store i32 -1, i32* %2
br label %22
22: ; preds = %13, %3, %21
%23 = phi i32 [ 0, %21 ], [ 0, %3 ], [ %17, %13 ]
ret i32 %23
}