#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 */
struct random_data {
  int rand_type;
  long *state;
  int rand_deg;
  long *fptr;
  size_t rand_sep;
  long *rptr;
};
typedef long int32_t;

/* Variables and functions */
int /*<<< orphan*/ random_r(struct random_data *, long *);
int srandom_r(unsigned int seed, struct random_data *buf) {
  int type;
  int32_t *state;
  long int i;
  long int word;
  int32_t *dst;
  int kc;
  if (buf == NULL)
    goto fail;
  type = buf->rand_type;
  if ((unsigned int)type >= 5)
    goto fail;
  state = buf->state;
  if (seed == 0)
    seed = 1;
  state[0] = seed;
  if (type == 0)
    goto done;
  dst = state;
  word = seed;
  kc = buf->rand_deg;
  for (i = 1; i < kc; ++i) {
    long int hi = word / 127773;
    long int lo = word % 127773;
    word = 16807 * lo - 2836 * hi;
    if (word < 0)
      word += 2147483647;
    *++dst = word;
  }
  buf->fptr = &state[buf->rand_sep];
  buf->rptr = &state[0];
  kc *= 10;
  while (--kc >= 0) {
    int32_t discard;
    (void)random_r(buf, &discard);
  }
done:
  return 0;
fail:
  return -1;
}


x86 assembly (clang, -O0):
<srandom_r>:
push   %rbp
mov    %rsp,%rbp
sub    $0x60,%rsp
mov    %edi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
cmpq   $0x0,-0x10(%rbp)
jne    112f <srandom_r+0x1f>
jmp    1290 <srandom_r+0x180>
mov    -0x10(%rbp),%rax
mov    (%rax),%eax
mov    %eax,-0x14(%rbp)
cmpl   $0x5,-0x14(%rbp)
jb     1147 <srandom_r+0x37>
jmp    1290 <srandom_r+0x180>
mov    -0x10(%rbp),%rax
mov    0x8(%rax),%rax
mov    %rax,-0x20(%rbp)
cmpl   $0x0,-0x8(%rbp)
jne    1164 <srandom_r+0x54>
movl   $0x1,-0x8(%rbp)
mov    -0x8(%rbp),%eax
mov    %eax,%ecx
mov    -0x20(%rbp),%rax
mov    %rcx,(%rax)
cmpl   $0x0,-0x14(%rbp)
jne    117f <srandom_r+0x6f>
jmp    1284 <srandom_r+0x174>
mov    -0x20(%rbp),%rax
mov    %rax,-0x38(%rbp)
mov    -0x8(%rbp),%eax
mov    %rax,-0x30(%rbp)
mov    -0x10(%rbp),%rax
mov    0x10(%rax),%eax
mov    %eax,-0x3c(%rbp)
movq   $0x1,-0x28(%rbp)
mov    -0x28(%rbp),%rax
movslq -0x3c(%rbp),%rcx
cmp    %rcx,%rax
jge    122d <srandom_r+0x11d>
mov    -0x30(%rbp),%rax
mov    $0x1f31d,%ecx
cqto
idiv   %rcx
mov    %rax,-0x48(%rbp)
mov    -0x30(%rbp),%rax
mov    $0x1f31d,%ecx
cqto
idiv   %rcx
mov    %rdx,-0x50(%rbp)
imul   $0x41a7,-0x50(%rbp),%rax
imul   $0xb14,-0x48(%rbp),%rcx
sub    %rcx,%rax
mov    %rax,-0x30(%rbp)
cmpq   $0x0,-0x30(%rbp)
jge    1205 <srandom_r+0xf5>
mov    -0x30(%rbp),%rax
add    $0x7fffffff,%rax
mov    %rax,-0x30(%rbp)
mov    -0x30(%rbp),%rcx
mov    -0x38(%rbp),%rax
mov    %rax,%rdx
add    $0x8,%rdx
mov    %rdx,-0x38(%rbp)
mov    %rcx,0x8(%rax)
mov    -0x28(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x28(%rbp)
jmp    11a0 <srandom_r+0x90>
mov    -0x20(%rbp),%rcx
mov    -0x10(%rbp),%rax
mov    0x20(%rax),%rax
shl    $0x3,%rax
add    %rax,%rcx
mov    -0x10(%rbp),%rax
mov    %rcx,0x18(%rax)
mov    -0x20(%rbp),%rcx
mov    -0x10(%rbp),%rax
mov    %rcx,0x28(%rax)
imul   $0xa,-0x3c(%rbp),%eax
mov    %eax,-0x3c(%rbp)
mov    -0x3c(%rbp),%eax
add    $0xffffffff,%eax
mov    %eax,-0x3c(%rbp)
cmp    $0x0,%eax
jl     127f <srandom_r+0x16f>
mov    -0x10(%rbp),%rdi
lea    -0x58(%rbp),%rsi
call   1030 <random_r@plt>
jmp    125b <srandom_r+0x14b>
jmp    1284 <srandom_r+0x174>
movl   $0x0,-0x4(%rbp)
jmp    1297 <srandom_r+0x187>
movl   $0xffffffff,-0x4(%rbp)
mov    -0x4(%rbp),%eax
add    $0x60,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<srandom_r>:
push   %rbp
push   %r15
push   %r14
push   %rbx
push   %rax
mov    $0xffffffff,%r14d
test   %rsi,%rsi
je     11f3 <srandom_r+0xe3>
mov    %rsi,%rbx
mov    (%rsi),%eax
cmp    $0x4,%eax
ja     11f3 <srandom_r+0xe3>
test   %edi,%edi
mov    $0x1,%ecx
cmovne %edi,%ecx
mov    0x8(%rbx),%rdi
mov    %rcx,(%rdi)
xor    %r14d,%r14d
test   %eax,%eax
je     11f3 <srandom_r+0xe3>
movslq 0x10(%rbx),%rsi
cmp    $0x2,%rsi
jl     11bb <srandom_r+0xab>
mov    $0x1,%ebp
movabs $0x41a705af1fe3fb79,%r8
05 a7 41
nopl   0x0(%rax)
mov    %rcx,%rax
imul   %r8
mov    %rdx,%rax
shr    $0x3f,%rax
sar    $0xf,%rdx
add    %rax,%rdx
imul   $0x1f31d,%rdx,%rax
sub    %rax,%rcx
imul   $0x41a7,%rcx,%rax
imul   $0xfffffffffffff4ec,%rdx,%rdx
lea    (%rdx,%rax,1),%rcx
add    $0x7fffffff,%rcx
add    %rax,%rdx
cmovns %rdx,%rcx
mov    %rcx,(%rdi,%rbp,8)
add    $0x1,%rbp
cmp    %rbp,%rsi
jne    1170 <srandom_r+0x60>
mov    0x20(%rbx),%rax
lea    (%rdi,%rax,8),%rax
mov    %rax,0x18(%rbx)
mov    %rdi,0x28(%rbx)
test   %esi,%esi
jle    11f3 <srandom_r+0xe3>
add    %esi,%esi
lea    (%rsi,%rsi,4),%ebp
or     $0x1,%ebp
mov    %rsp,%r15
nopw   0x0(%rax,%rax,1)
mov    %rbx,%rdi
mov    %r15,%rsi
call   1030 <random_r@plt>
add    $0xffffffff,%ebp
cmp    $0x1,%ebp
jg     11e0 <srandom_r+0xd0>
mov    %r14d,%eax
add    $0x8,%rsp
pop    %rbx
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
%struct.random_data = type { i32, i64*, i32, i64*, i64, i64* }
define i32 @srandom_r(i32 %0, %struct.random_data* %1) {
%3 = alloca i32
%4 = alloca i32
%5 = alloca %struct.random_data*
%6 = alloca i32
%7 = alloca i64*
%8 = alloca i64
%9 = alloca i64
%10 = alloca i64*
%11 = alloca i32
%12 = alloca i64
%13 = alloca i64
%14 = alloca i64
store i32 %0, i32* %4
store %struct.random_data* %1, %struct.random_data** %5
%15 = load %struct.random_data*, %struct.random_data** %5
%16 = icmp eq %struct.random_data* %15, null
br i1 %16, label %17, label %18
17: ; preds = %2
br label %97
18: ; preds = %2
%19 = load %struct.random_data*, %struct.random_data** %5
%20 = getelementptr inbounds %struct.random_data, %struct.random_data* %19, i32 0, i32 0
%21 = load i32, i32* %20
store i32 %21, i32* %6
%22 = load i32, i32* %6
%23 = icmp uge i32 %22, 5
br i1 %23, label %24, label %25
24: ; preds = %18
br label %97
25: ; preds = %18
%26 = load %struct.random_data*, %struct.random_data** %5
%27 = getelementptr inbounds %struct.random_data, %struct.random_data* %26, i32 0, i32 1
%28 = load i64*, i64** %27
store i64* %28, i64** %7
%29 = load i32, i32* %4
%30 = icmp eq i32 %29, 0
br i1 %30, label %31, label %32
31: ; preds = %25
store i32 1, i32* %4
br label %32
32: ; preds = %31, %25
%33 = load i32, i32* %4
%34 = zext i32 %33 to i64
%35 = load i64*, i64** %7
%36 = getelementptr inbounds i64, i64* %35, i64 0
store i64 %34, i64* %36
%37 = load i32, i32* %6
%38 = icmp eq i32 %37, 0
br i1 %38, label %39, label %40
39: ; preds = %32
br label %96
40: ; preds = %32
%41 = load i64*, i64** %7
store i64* %41, i64** %10
%42 = load i32, i32* %4
%43 = zext i32 %42 to i64
store i64 %43, i64* %9
%44 = load %struct.random_data*, %struct.random_data** %5
%45 = getelementptr inbounds %struct.random_data, %struct.random_data* %44, i32 0, i32 2
%46 = load i32, i32* %45
store i32 %46, i32* %11
store i64 1, i64* %8
br label %47
47: ; preds = %71, %40
%48 = load i64, i64* %8
%49 = load i32, i32* %11
%50 = sext i32 %49 to i64
%51 = icmp slt i64 %48, %50
br i1 %51, label %52, label %74
52: ; preds = %47
%53 = load i64, i64* %9
%54 = sdiv i64 %53, 127773
store i64 %54, i64* %12
%55 = load i64, i64* %9
%56 = srem i64 %55, 127773
store i64 %56, i64* %13
%57 = load i64, i64* %13
%58 = mul nsw i64 16807, %57
%59 = load i64, i64* %12
%60 = mul nsw i64 2836, %59
%61 = sub nsw i64 %58, %60
store i64 %61, i64* %9
%62 = load i64, i64* %9
%63 = icmp slt i64 %62, 0
br i1 %63, label %64, label %67
64: ; preds = %52
%65 = load i64, i64* %9
%66 = add nsw i64 %65, 2147483647
store i64 %66, i64* %9
br label %67
67: ; preds = %64, %52
%68 = load i64, i64* %9
%69 = load i64*, i64** %10
%70 = getelementptr inbounds i64, i64* %69, i32 1
store i64* %70, i64** %10
store i64 %68, i64* %70
br label %71
71: ; preds = %67
%72 = load i64, i64* %8
%73 = add nsw i64 %72, 1
store i64 %73, i64* %8
br label %47
74: ; preds = %47
%75 = load i64*, i64** %7
%76 = load %struct.random_data*, %struct.random_data** %5
%77 = getelementptr inbounds %struct.random_data, %struct.random_data* %76, i32 0, i32 4
%78 = load i64, i64* %77
%79 = getelementptr inbounds i64, i64* %75, i64 %78
%80 = load %struct.random_data*, %struct.random_data** %5
%81 = getelementptr inbounds %struct.random_data, %struct.random_data* %80, i32 0, i32 3
store i64* %79, i64** %81
%82 = load i64*, i64** %7
%83 = getelementptr inbounds i64, i64* %82, i64 0
%84 = load %struct.random_data*, %struct.random_data** %5
%85 = getelementptr inbounds %struct.random_data, %struct.random_data* %84, i32 0, i32 5
store i64* %83, i64** %85
%86 = load i32, i32* %11
%87 = mul nsw i32 %86, 10
store i32 %87, i32* %11
br label %88
88: ; preds = %92, %74
%89 = load i32, i32* %11
%90 = add nsw i32 %89, -1
store i32 %90, i32* %11
%91 = icmp sge i32 %90, 0
br i1 %91, label %92, label %95
92: ; preds = %88
%93 = load %struct.random_data*, %struct.random_data** %5
%94 = call i32 @random_r(%struct.random_data* %93, i64* %14)
br label %88
95: ; preds = %88
br label %96
96: ; preds = %95, %39
store i32 0, i32* %3
br label %98
97: ; preds = %24, %17
store i32 -1, i32* %3
br label %98
98: ; preds = %97, %96
%99 = load i32, i32* %3
ret i32 %99
}

LLVM IR (-O2):
%struct.random_data = type { i32, i64*, i32, i64*, i64, i64* }
define i32 @srandom_r(i32 %0, %struct.random_data* %1) {
%3 = alloca i64
%4 = icmp eq %struct.random_data* %1, null
br i1 %4, label %51, label %5
5: ; preds = %2
%6 = getelementptr inbounds %struct.random_data, %struct.random_data* %1, i64 0, i32 0
%7 = load i32, i32* %6
%8 = icmp ugt i32 %7, 4
br i1 %8, label %51, label %9
9: ; preds = %5
%10 = getelementptr inbounds %struct.random_data, %struct.random_data* %1, i64 0, i32 1
%11 = load i64*, i64** %10
%12 = icmp eq i32 %0, 0
%13 = select i1 %12, i32 1, i32 %0
%14 = zext i32 %13 to i64
store i64 %14, i64* %11
%15 = icmp eq i32 %7, 0
br i1 %15, label %51, label %16
16: ; preds = %9
%17 = getelementptr inbounds %struct.random_data, %struct.random_data* %1, i64 0, i32 2
%18 = load i32, i32* %17
%19 = sext i32 %18 to i64
%20 = icmp sgt i32 %18, 1
br i1 %20, label %21, label %36
21: ; preds = %16, %21
%22 = phi i64* [ %33, %21 ], [ %11, %16 ]
%23 = phi i64 [ %32, %21 ], [ %14, %16 ]
%24 = phi i64 [ %34, %21 ], [ 1, %16 ]
%25 = sdiv i64 %23, 127773
%26 = srem i64 %23, 127773
%27 = mul nsw i64 %26, 16807
%28 = mul nsw i64 %25, -2836
%29 = add nsw i64 %28, %27
%30 = icmp slt i64 %29, 0
%31 = add nsw i64 %29, 2147483647
%32 = select i1 %30, i64 %31, i64 %29
%33 = getelementptr inbounds i64, i64* %22, i64 1
store i64 %32, i64* %33
%34 = add nuw nsw i64 %24, 1
%35 = icmp eq i64 %34, %19
br i1 %35, label %36, label %21
36: ; preds = %21, %16
%37 = getelementptr inbounds %struct.random_data, %struct.random_data* %1, i64 0, i32 4
%38 = load i64, i64* %37
%39 = getelementptr inbounds i64, i64* %11, i64 %38
%40 = getelementptr inbounds %struct.random_data, %struct.random_data* %1, i64 0, i32 3
store i64* %39, i64** %40
%41 = getelementptr inbounds %struct.random_data, %struct.random_data* %1, i64 0, i32 5
store i64* %11, i64** %41
%42 = icmp sgt i32 %18, 0
br i1 %42, label %43, label %51
43: ; preds = %36
%44 = mul nsw i32 %18, 10
%45 = bitcast i64* %3 to i8*
br label %46
46: ; preds = %43, %46
%47 = phi i32 [ %44, %43 ], [ %48, %46 ]
%48 = add nsw i32 %47, -1
%49 = call i32 @random_r(%struct.random_data* %1, i64* %3)
%50 = icmp sgt i32 %47, 1
br i1 %50, label %46, label %51
51: ; preds = %46, %36, %2, %5, %9
%52 = phi i32 [ 0, %9 ], [ -1, %5 ], [ -1, %2 ], [ 0, %36 ], [ 0, %46 ]
ret i32 %52
}