#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__ is_equal_upto(char *, char *, int);
scalar_t__ pow(int, int);
int /*<<< orphan*/ printf(char *, ...);
int strlen(char *);
void rabin_karp(char *text, char *pat, int radix, int q) {
  int tlen = strlen(text), plen = strlen(pat);
  long h = ((long)pow(radix * 1.0, (plen - 1) * 1.0)) % q;
  long m = 0, ts = 0;
  for (int i = 0; i < plen; i++) {
    m = (radix * m + pat[i]) % q;
    ts = (radix * ts + text[i]) % q;
  }
  printf("looking for a match of \"%s\":\n", pat);
  for (int s = 0; s < tlen - plen + 1; s++) {
    if (m == ts) {
      if (is_equal_upto(pat, text + s, plen - 1))
        printf("strings match at shift %d\n", s);
    }
    if (s < tlen - plen)
      ts = (radix * (ts - text[s] * h) + text[s + plen]) % q;
  }
}


x86 assembly (clang, -O0):
<rabin_karp>:
push   %rbp
mov    %rsp,%rbp
sub    $0x40,%rsp
mov    %rdi,-0x8(%rbp)
mov    %rsi,-0x10(%rbp)
mov    %edx,-0x14(%rbp)
mov    %ecx,-0x18(%rbp)
mov    -0x8(%rbp),%rdi
call   1030 <strlen@plt>
mov    %eax,-0x1c(%rbp)
mov    -0x10(%rbp),%rdi
call   1030 <strlen@plt>
mov    %eax,-0x20(%rbp)
cvtsi2sdl -0x14(%rbp),%xmm0
movsd  0xe85(%rip),%xmm1
mulsd  %xmm1,%xmm0
cvttsd2si %xmm0,%edi
mov    -0x20(%rbp),%eax
sub    $0x1,%eax
cvtsi2sd %eax,%xmm0
movsd  0xe6b(%rip),%xmm1
mulsd  %xmm1,%xmm0
cvttsd2si %xmm0,%esi
call   1060 <pow@plt>
movslq -0x18(%rbp),%rcx
cqto
idiv   %rcx
mov    %rdx,-0x28(%rbp)
movq   $0x0,-0x30(%rbp)
movq   $0x0,-0x38(%rbp)
movl   $0x0,-0x3c(%rbp)
mov    -0x3c(%rbp),%eax
cmp    -0x20(%rbp),%eax
jge    122c <rabin_karp+0xec>
movslq -0x14(%rbp),%rax
imul   -0x30(%rbp),%rax
mov    -0x10(%rbp),%rcx
movslq -0x3c(%rbp),%rdx
movsbq (%rcx,%rdx,1),%rcx
add    %rcx,%rax
movslq -0x18(%rbp),%rcx
cqto
idiv   %rcx
mov    %rdx,-0x30(%rbp)
movslq -0x14(%rbp),%rax
imul   -0x38(%rbp),%rax
mov    -0x8(%rbp),%rcx
movslq -0x3c(%rbp),%rdx
movsbq (%rcx,%rdx,1),%rcx
add    %rcx,%rax
movslq -0x18(%rbp),%rcx
cqto
idiv   %rcx
mov    %rdx,-0x38(%rbp)
mov    -0x3c(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x3c(%rbp)
jmp    11c6 <rabin_karp+0x86>
mov    -0x10(%rbp),%rsi
lea    0xdd1(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
movl   $0x0,-0x40(%rbp)
mov    -0x40(%rbp),%eax
mov    -0x1c(%rbp),%ecx
sub    -0x20(%rbp),%ecx
add    $0x1,%ecx
cmp    %ecx,%eax
jge    1308 <rabin_karp+0x1c8>
mov    -0x30(%rbp),%rax
cmp    -0x38(%rbp),%rax
jne    12a1 <rabin_karp+0x161>
mov    -0x10(%rbp),%rdi
mov    -0x8(%rbp),%rsi
movslq -0x40(%rbp),%rax
add    %rax,%rsi
mov    -0x20(%rbp),%edx
sub    $0x1,%edx
call   1050 <is_equal_upto@plt>
cmp    $0x0,%rax
je     129c <rabin_karp+0x15c>
mov    -0x40(%rbp),%esi
lea    0xd91(%rip),%rdi
mov    $0x0,%al
call   1040 <printf@plt>
jmp    12a1 <rabin_karp+0x161>
mov    -0x40(%rbp),%eax
mov    -0x1c(%rbp),%ecx
sub    -0x20(%rbp),%ecx
cmp    %ecx,%eax
jge    12f5 <rabin_karp+0x1b5>
movslq -0x14(%rbp),%rax
mov    -0x38(%rbp),%rcx
mov    -0x8(%rbp),%rdx
movslq -0x40(%rbp),%rsi
movsbq (%rdx,%rsi,1),%rdx
imul   -0x28(%rbp),%rdx
sub    %rdx,%rcx
imul   %rcx,%rax
mov    -0x8(%rbp),%rcx
mov    -0x40(%rbp),%edx
add    -0x20(%rbp),%edx
movslq %edx,%rdx
movsbq (%rcx,%rdx,1),%rcx
add    %rcx,%rax
movslq -0x18(%rbp),%rcx
cqto
idiv   %rcx
mov    %rdx,-0x38(%rbp)
jmp    12fa <rabin_karp+0x1ba>
mov    -0x40(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x40(%rbp)
jmp    1245 <rabin_karp+0x105>
add    $0x40,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<rabin_karp>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x38,%rsp
mov    %ecx,%ebp
mov    %edx,%r14d
mov    %rsi,%rbx
mov    %rdi,0x10(%rsp)
call   1030 <strlen@plt>
mov    %rax,0x8(%rsp)
mov    %rbx,0x28(%rsp)
mov    %rbx,%rdi
call   1030 <strlen@plt>
mov    %rax,%r12
lea    -0x1(%rax),%esi
mov    %r14d,%edi
mov    %esi,0x1c(%rsp)
call   1060 <pow@plt>
movslq %ebp,%r15
mov    %rax,%rcx
or     %r15,%rcx
shr    $0x20,%rcx
je     119a <rabin_karp+0x5a>
cqto
idiv   %r15
jmp    119e <rabin_karp+0x5e>
xor    %edx,%edx
div    %ebp
mov    %rdx,0x20(%rsp)
movslq %r14d,%rbx
mov    %r12,%r14
test   %r14d,%r14d
mov    0x28(%rsp),%rsi
jle    122d <rabin_karp+0xed>
mov    %r14d,%ecx
xor    %edi,%edi
xor    %r13d,%r13d
xor    %r12d,%r12d
jmp    11d1 <rabin_karp+0x91>
cqto
idiv   %r15
mov    %rdx,%r13
add    $0x1,%rdi
cmp    %rdi,%rcx
je     1233 <rabin_karp+0xf3>
imul   %rbx,%r12
movsbq (%rsi,%rdi,1),%rax
add    %r12,%rax
mov    %rax,%rdx
or     %r15,%rdx
shr    $0x20,%rdx
je     1200 <rabin_karp+0xc0>
cqto
idiv   %r15
mov    %rdx,%r12
jmp    1207 <rabin_karp+0xc7>
cs nopw 0x0(%rax,%rax,1)
nopl   (%rax)
xor    %edx,%edx
div    %ebp
mov    %edx,%r12d
imul   %rbx,%r13
mov    0x10(%rsp),%rax
movsbq (%rax,%rdi,1),%rax
add    %r13,%rax
mov    %rax,%rdx
or     %r15,%rdx
shr    $0x20,%rdx
jne    11c0 <rabin_karp+0x80>
xor    %edx,%edx
div    %ebp
mov    %edx,%r13d
jmp    11c8 <rabin_karp+0x88>
xor    %r12d,%r12d
xor    %r13d,%r13d
mov    %ebp,0x18(%rsp)
lea    0xdc2(%rip),%rdi
xor    %eax,%eax
call   1040 <printf@plt>
mov    0x8(%rsp),%rax
sub    %r14d,%eax
mov    %rax,0x8(%rsp)
js     1305 <rabin_karp+0x1c5>
mov    0x8(%rsp),%rbp
mov    %ebp,%eax
mov    %rax,0x30(%rsp)
movslq %r14d,%rax
add    $0x1,%ebp
add    0x10(%rsp),%rax
mov    %rax,0x8(%rsp)
xor    %r14d,%r14d
jmp    1291 <rabin_karp+0x151>
nopl   0x0(%rax)
cqto
idiv   %r15
mov    %rdx,%r13
add    $0x1,%r14
cmp    %r14,%rbp
je     1305 <rabin_karp+0x1c5>
cmp    %r13,%r12
jne    12c3 <rabin_karp+0x183>
mov    0x10(%rsp),%rax
lea    (%rax,%r14,1),%rsi
mov    0x28(%rsp),%rdi
mov    0x1c(%rsp),%edx
call   1050 <is_equal_upto@plt>
test   %rax,%rax
je     12c3 <rabin_karp+0x183>
lea    0xd65(%rip),%rdi
mov    %r14d,%esi
xor    %eax,%eax
call   1040 <printf@plt>
cmp    0x30(%rsp),%r14
jae    1288 <rabin_karp+0x148>
mov    0x10(%rsp),%rax
movsbq (%rax,%r14,1),%rax
imul   0x20(%rsp),%rax
sub    %rax,%r13
imul   %rbx,%r13
mov    0x8(%rsp),%rax
movsbq (%rax,%r14,1),%rax
add    %r13,%rax
mov    %rax,%rcx
or     %r15,%rcx
shr    $0x20,%rcx
jne    1280 <rabin_karp+0x140>
xor    %edx,%edx
divl   0x18(%rsp)
mov    %edx,%r13d
jmp    1288 <rabin_karp+0x148>
add    $0x38,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@.str = [30 x i8] c"looking for a match of \22%s\22:\0A\00"
@.str.1 = [27 x i8] c"strings match at shift %d\0A\00"
define void @rabin_karp(i8* %0, i8* %1, i32 %2, i32 %3) {
%5 = alloca i8*
%6 = alloca i8*
%7 = alloca i32
%8 = alloca i32
%9 = alloca i32
%10 = alloca i32
%11 = alloca i64
%12 = alloca i64
%13 = alloca i64
%14 = alloca i32
%15 = alloca i32
store i8* %0, i8** %5
store i8* %1, i8** %6
store i32 %2, i32* %7
store i32 %3, i32* %8
%16 = load i8*, i8** %5
%17 = call i32 @strlen(i8* %16)
store i32 %17, i32* %9
%18 = load i8*, i8** %6
%19 = call i32 @strlen(i8* %18)
store i32 %19, i32* %10
%20 = load i32, i32* %7
%21 = sitofp i32 %20 to double
%22 = fmul double %21, 1.000000e+00
%23 = fptosi double %22 to i32
%24 = load i32, i32* %10
%25 = sub nsw i32 %24, 1
%26 = sitofp i32 %25 to double
%27 = fmul double %26, 1.000000e+00
%28 = fptosi double %27 to i32
%29 = call i64 @pow(i32 %23, i32 %28)
%30 = load i32, i32* %8
%31 = sext i32 %30 to i64
%32 = srem i64 %29, %31
store i64 %32, i64* %11
store i64 0, i64* %12
store i64 0, i64* %13
store i32 0, i32* %14
br label %33
33: ; preds = %66, %4
%34 = load i32, i32* %14
%35 = load i32, i32* %10
%36 = icmp slt i32 %34, %35
br i1 %36, label %37, label %69
37: ; preds = %33
%38 = load i32, i32* %7
%39 = sext i32 %38 to i64
%40 = load i64, i64* %12
%41 = mul nsw i64 %39, %40
%42 = load i8*, i8** %6
%43 = load i32, i32* %14
%44 = sext i32 %43 to i64
%45 = getelementptr inbounds i8, i8* %42, i64 %44
%46 = load i8, i8* %45
%47 = sext i8 %46 to i64
%48 = add nsw i64 %41, %47
%49 = load i32, i32* %8
%50 = sext i32 %49 to i64
%51 = srem i64 %48, %50
store i64 %51, i64* %12
%52 = load i32, i32* %7
%53 = sext i32 %52 to i64
%54 = load i64, i64* %13
%55 = mul nsw i64 %53, %54
%56 = load i8*, i8** %5
%57 = load i32, i32* %14
%58 = sext i32 %57 to i64
%59 = getelementptr inbounds i8, i8* %56, i64 %58
%60 = load i8, i8* %59
%61 = sext i8 %60 to i64
%62 = add nsw i64 %55, %61
%63 = load i32, i32* %8
%64 = sext i32 %63 to i64
%65 = srem i64 %62, %64
store i64 %65, i64* %13
br label %66
66: ; preds = %37
%67 = load i32, i32* %14
%68 = add nsw i32 %67, 1
store i32 %68, i32* %14
br label %33
69: ; preds = %33
%70 = load i8*, i8** %6
%71 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([30 x i8], [30 x i8]* @.str, i64 0, i64 0), i8* %70)
store i32 0, i32* %15
br label %72
72: ; preds = %130, %69
%73 = load i32, i32* %15
%74 = load i32, i32* %9
%75 = load i32, i32* %10
%76 = sub nsw i32 %74, %75
%77 = add nsw i32 %76, 1
%78 = icmp slt i32 %73, %77
br i1 %78, label %79, label %133
79: ; preds = %72
%80 = load i64, i64* %12
%81 = load i64, i64* %13
%82 = icmp eq i64 %80, %81
br i1 %82, label %83, label %97
83: ; preds = %79
%84 = load i8*, i8** %6
%85 = load i8*, i8** %5
%86 = load i32, i32* %15
%87 = sext i32 %86 to i64
%88 = getelementptr inbounds i8, i8* %85, i64 %87
%89 = load i32, i32* %10
%90 = sub nsw i32 %89, 1
%91 = call i64 @is_equal_upto(i8* %84, i8* %88, i32 %90)
%92 = icmp ne i64 %91, 0
br i1 %92, label %93, label %96
93: ; preds = %83
%94 = load i32, i32* %15
%95 = call i32 (i8*, ...) @printf(i8* getelementptr inbounds ([27 x i8], [27 x i8]* @.str.1, i64 0, i64 0), i32 %94)
br label %96
96: ; preds = %93, %83
br label %97
97: ; preds = %96, %79
%98 = load i32, i32* %15
%99 = load i32, i32* %9
%100 = load i32, i32* %10
%101 = sub nsw i32 %99, %100
%102 = icmp slt i32 %98, %101
br i1 %102, label %103, label %129
103: ; preds = %97
%104 = load i32, i32* %7
%105 = sext i32 %104 to i64
%106 = load i64, i64* %13
%107 = load i8*, i8** %5
%108 = load i32, i32* %15
%109 = sext i32 %108 to i64
%110 = getelementptr inbounds i8, i8* %107, i64 %109
%111 = load i8, i8* %110
%112 = sext i8 %111 to i64
%113 = load i64, i64* %11
%114 = mul nsw i64 %112, %113
%115 = sub nsw i64 %106, %114
%116 = mul nsw i64 %105, %115
%117 = load i8*, i8** %5
%118 = load i32, i32* %15
%119 = load i32, i32* %10
%120 = add nsw i32 %118, %119
%121 = sext i32 %120 to i64
%122 = getelementptr inbounds i8, i8* %117, i64 %121
%123 = load i8, i8* %122
%124 = sext i8 %123 to i64
%125 = add nsw i64 %116, %124
%126 = load i32, i32* %8
%127 = sext i32 %126 to i64
%128 = srem i64 %125, %127
store i64 %128, i64* %13
br label %129
129: ; preds = %103, %97
br label %130
130: ; preds = %129
%131 = load i32, i32* %15
%132 = add nsw i32 %131, 1
store i32 %132, i32* %15
br label %72
133: ; preds = %72
ret void
}

LLVM IR (-O2):
@.str = [30 x i8] c"looking for a match of \22%s\22:\0A\00"
@.str.1 = [27 x i8] c"strings match at shift %d\0A\00"
define void @rabin_karp(i8* %0, i8* %1, i32 %2, i32 %3) {
%5 = tail call i32 @strlen(i8* %0)
%6 = tail call i32 @strlen(i8* %1)
%7 = add nsw i32 %6, -1
%8 = tail call i64 @pow(i32 %2, i32 %7)
%9 = sext i32 %3 to i64
%10 = srem i64 %8, %9
%11 = icmp sgt i32 %6, 0
br i1 %11, label %12, label %15
12: ; preds = %4
%13 = sext i32 %2 to i64
%14 = zext i32 %6 to i64
br label %28
15: ; preds = %28, %4
%16 = phi i64 [ 0, %4 ], [ %37, %28 ]
%17 = phi i64 [ 0, %4 ], [ %43, %28 ]
%18 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([30 x i8], [30 x i8]* @.str, i64 0, i64 0), i8* %1)
%19 = sub nsw i32 %5, %6
%20 = icmp slt i32 %19, 0
br i1 %20, label %46, label %21
21: ; preds = %15
%22 = sext i32 %2 to i64
%23 = zext i32 %19 to i64
%24 = sext i32 %6 to i64
%25 = add i32 %5, 1
%26 = sub i32 %25, %6
%27 = zext i32 %26 to i64
br label %47
28: ; preds = %12, %28
%29 = phi i64 [ 0, %12 ], [ %44, %28 ]
%30 = phi i64 [ 0, %12 ], [ %43, %28 ]
%31 = phi i64 [ 0, %12 ], [ %37, %28 ]
%32 = mul nsw i64 %31, %13
%33 = getelementptr inbounds i8, i8* %1, i64 %29
%34 = load i8, i8* %33
%35 = sext i8 %34 to i64
%36 = add nsw i64 %32, %35
%37 = srem i64 %36, %9
%38 = mul nsw i64 %30, %13
%39 = getelementptr inbounds i8, i8* %0, i64 %29
%40 = load i8, i8* %39
%41 = sext i8 %40 to i64
%42 = add nsw i64 %38, %41
%43 = srem i64 %42, %9
%44 = add nuw nsw i64 %29, 1
%45 = icmp eq i64 %44, %14
br i1 %45, label %15, label %28
46: ; preds = %73, %15
ret void
47: ; preds = %21, %73
%48 = phi i64 [ 0, %21 ], [ %75, %73 ]
%49 = phi i64 [ %17, %21 ], [ %74, %73 ]
%50 = icmp eq i64 %16, %49
br i1 %50, label %51, label %58
51: ; preds = %47
%52 = getelementptr inbounds i8, i8* %0, i64 %48
%53 = tail call i64 @is_equal_upto(i8* %1, i8* %52, i32 %7)
%54 = icmp eq i64 %53, 0
br i1 %54, label %58, label %55
55: ; preds = %51
%56 = trunc i64 %48 to i32
%57 = tail call i32 (i8*, ...) @printf(i8* dereferenceable(1) getelementptr inbounds ([27 x i8], [27 x i8]* @.str.1, i64 0, i64 0), i32 %56)
br label %58
58: ; preds = %51, %55, %47
%59 = icmp ult i64 %48, %23
br i1 %59, label %60, label %73
60: ; preds = %58
%61 = getelementptr inbounds i8, i8* %0, i64 %48
%62 = load i8, i8* %61
%63 = sext i8 %62 to i64
%64 = mul nsw i64 %10, %63
%65 = sub nsw i64 %49, %64
%66 = mul nsw i64 %65, %22
%67 = add nsw i64 %48, %24
%68 = getelementptr inbounds i8, i8* %0, i64 %67
%69 = load i8, i8* %68
%70 = sext i8 %69 to i64
%71 = add nsw i64 %66, %70
%72 = srem i64 %71, %9
br label %73
73: ; preds = %58, %60
%74 = phi i64 [ %72, %60 ], [ %49, %58 ]
%75 = add nuw nsw i64 %48, 1
%76 = icmp eq i64 %75, %27
br i1 %76, label %46, label %47
}