#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__ hbm_patternmatch(unsigned char *, int, unsigned char *, int, int,
                            int);
char *html_findtagclosemark(char *, int, int /*<<< orphan*/ *,
                            int /*<<< orphan*/ *);
int /*<<< orphan*/ memcpy(char *, char *, int);
char *stristrb(char *, int, char *, int);
int html_filterjavascript(const char *input, int inlen, char *output,
                          int outlen, int codetype) {
  char *pb, *pe;
  char *txt, *txtend;
  int len, pos;
  txt = (char *)input;
  txtend = (char *)(input + inlen);
  pos = 0;
  while ((pb = (char *)hbm_patternmatch((unsigned char *)txt, txtend - txt,
                                        (unsigned char *)"<script", 7, 1,
                                        codetype)) != NULL) {
    pe = stristrb(pb, txtend - pb, "</script", 8);
    if (!pe)
      break;
    pe = html_findtagclosemark(pe, txtend - pe, NULL, NULL);
    if (!pe)
      break;
    len = pb - txt;
    if (len != 0) {
      memcpy(output + pos, txt, len);
      pos += len;
    }
    txt = pe + 1;
  }
  memcpy(output + pos, txt, txtend - txt);
  pos += (txtend - txt);
  output[pos] = 0;
  return pos;
}


x86 assembly (clang, -O0):
<html_filterjavascript>:
push   %rbp
mov    %rsp,%rbp
sub    $0x50,%rsp
mov    %rdi,-0x8(%rbp)
mov    %esi,-0xc(%rbp)
mov    %rdx,-0x18(%rbp)
mov    %ecx,-0x1c(%rbp)
mov    %r8d,-0x20(%rbp)
mov    -0x8(%rbp),%rax
mov    %rax,-0x38(%rbp)
mov    -0x8(%rbp),%rax
movslq -0xc(%rbp),%rcx
add    %rcx,%rax
mov    %rax,-0x40(%rbp)
movl   $0x0,-0x48(%rbp)
mov    -0x38(%rbp),%rdi
mov    -0x40(%rbp),%rax
mov    -0x38(%rbp),%rcx
sub    %rcx,%rax
mov    %eax,%esi
mov    -0x20(%rbp),%r9d
lea    0xe6c(%rip),%rdx
mov    $0x7,%ecx
mov    $0x1,%r8d
call   1030 <hbm_patternmatch@plt>
mov    %rax,-0x28(%rbp)
cmp    $0x0,%rax
je     1262 <html_filterjavascript+0x122>
mov    -0x28(%rbp),%rdi
mov    -0x40(%rbp),%rax
mov    -0x28(%rbp),%rcx
sub    %rcx,%rax
mov    %eax,%esi
lea    0xe3e(%rip),%rdx
mov    $0x8,%ecx
call   1060 <stristrb@plt>
mov    %rax,-0x30(%rbp)
cmpq   $0x0,-0x30(%rbp)
jne    11e8 <html_filterjavascript+0xa8>
jmp    1262 <html_filterjavascript+0x122>
mov    -0x30(%rbp),%rdi
mov    -0x40(%rbp),%rax
mov    -0x30(%rbp),%rcx
sub    %rcx,%rax
mov    %eax,%esi
xor    %eax,%eax
mov    %eax,%ecx
mov    %rcx,%rdx
call   1040 <html_findtagclosemark@plt>
mov    %rax,-0x30(%rbp)
cmpq   $0x0,-0x30(%rbp)
jne    1219 <html_filterjavascript+0xd9>
jmp    1262 <html_filterjavascript+0x122>
mov    -0x28(%rbp),%rax
mov    -0x38(%rbp),%rcx
sub    %rcx,%rax
mov    %eax,-0x44(%rbp)
cmpl   $0x0,-0x44(%rbp)
je     1251 <html_filterjavascript+0x111>
mov    -0x18(%rbp),%rdi
movslq -0x48(%rbp),%rax
add    %rax,%rdi
mov    -0x38(%rbp),%rsi
mov    -0x44(%rbp),%edx
call   1050 <memcpy@plt>
mov    -0x44(%rbp),%eax
add    -0x48(%rbp),%eax
mov    %eax,-0x48(%rbp)
mov    -0x30(%rbp),%rax
add    $0x1,%rax
mov    %rax,-0x38(%rbp)
jmp    1178 <html_filterjavascript+0x38>
mov    -0x18(%rbp),%rdi
movslq -0x48(%rbp),%rax
add    %rax,%rdi
mov    -0x38(%rbp),%rsi
mov    -0x40(%rbp),%rax
mov    -0x38(%rbp),%rcx
sub    %rcx,%rax
mov    %eax,%edx
call   1050 <memcpy@plt>
mov    -0x40(%rbp),%rcx
mov    -0x38(%rbp),%rax
sub    %rax,%rcx
movslq -0x48(%rbp),%rax
add    %rcx,%rax
mov    %eax,-0x48(%rbp)
mov    -0x18(%rbp),%rax
movslq -0x48(%rbp),%rcx
movb   $0x0,(%rax,%rcx,1)
mov    -0x48(%rbp),%eax
add    $0x50,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<html_filterjavascript>:
push   %rbp
push   %r15
push   %r14
push   %r13
push   %r12
push   %rbx
sub    $0x18,%rsp
mov    %r8d,%r9d
mov    %rdx,0x10(%rsp)
mov    %rdi,%r13
movslq %esi,%rbx
lea    0xe9d(%rip),%rdx
mov    %ebx,%esi
mov    $0x7,%ecx
mov    $0x1,%r8d
mov    %r9d,0xc(%rsp)
call   1030 <hbm_patternmatch@plt>
xor    %r14d,%r14d
test   %rax,%rax
je     1251 <html_filterjavascript+0x111>
mov    %rax,%rbp
lea    (%rbx,%r13,1),%r15
mov    %r15d,%esi
sub    %ebp,%esi
lea    0xe6f(%rip),%rdx
mov    %rax,%rdi
mov    $0x8,%ecx
call   1060 <stristrb@plt>
test   %rax,%rax
je     1251 <html_filterjavascript+0x111>
xor    %r14d,%r14d
cs nopw 0x0(%rax,%rax,1)
nopl   0x0(%rax)
mov    %r15d,%esi
sub    %eax,%esi
mov    %rax,%rdi
xor    %edx,%edx
xor    %ecx,%ecx
call   1040 <html_findtagclosemark@plt>
test   %rax,%rax
je     1251 <html_filterjavascript+0x111>
mov    %rax,%r12
sub    %r13d,%ebp
je     11f7 <html_filterjavascript+0xb7>
movslq %r14d,%r14
mov    0x10(%rsp),%rax
lea    (%rax,%r14,1),%rdi
mov    %r13,%rsi
mov    %ebp,%edx
call   1050 <memcpy@plt>
add    %ebp,%r14d
add    $0x1,%r12
mov    %r15,%rbx
sub    %r12,%rbx
mov    %r12,%rdi
mov    %ebx,%esi
lea    0xdf3(%rip),%rdx
mov    $0x7,%ecx
mov    $0x1,%r8d
mov    0xc(%rsp),%r9d
call   1030 <hbm_patternmatch@plt>
test   %rax,%rax
je     1254 <html_filterjavascript+0x114>
mov    %rax,%rbp
mov    %r15d,%esi
sub    %ebp,%esi
mov    %rax,%rdi
lea    0xdcf(%rip),%rdx
mov    $0x8,%ecx
call   1060 <stristrb@plt>
mov    %r12,%r13
test   %rax,%rax
jne    11c0 <html_filterjavascript+0x80>
jmp    1254 <html_filterjavascript+0x114>
mov    %r13,%r12
movslq %r14d,%rbp
mov    0x10(%rsp),%r14
lea    (%r14,%rbp,1),%rdi
mov    %r12,%rsi
mov    %ebx,%edx
call   1050 <memcpy@plt>
add    %ebx,%ebp
movslq %ebp,%rax
movb   $0x0,(%r14,%rax,1)
add    $0x18,%rsp
pop    %rbx
pop    %r12
pop    %r13
pop    %r14
pop    %r15
pop    %rbp
ret

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

LLVM IR (-O2):
@.str = [8 x i8] c"<script\00"
@.str.1 = [9 x i8] c"</script\00"
define i32 @html_filterjavascript(i8* %0, i32 %1, i8* %2, i32 %3, i32 %4) {
%6 = sext i32 %1 to i64
%7 = getelementptr inbounds i8, i8* %0, i64 %6
%8 = ptrtoint i8* %7 to i64
%9 = tail call i64 @hbm_patternmatch(i8* %0, i32 %1, i8* getelementptr inbounds ([8 x i8], [8 x i8]* @.str, i64 0, i64 0), i32 7, i32 1, i32 %4)
%10 = icmp eq i64 %9, 0
br i1 %10, label %54, label %11
11: ; preds = %5
%12 = inttoptr i64 %9 to i8*
%13 = sub i64 %8, %9
%14 = trunc i64 %13 to i32
%15 = tail call i8* @stristrb(i8* %12, i32 %14, i8* getelementptr inbounds ([9 x i8], [9 x i8]* @.str.1, i64 0, i64 0), i32 8)
%16 = icmp eq i8* %15, null
br i1 %16, label %54, label %17
17: ; preds = %11
%18 = ptrtoint i8* %0 to i64
br label %25
19: ; preds = %46
%20 = inttoptr i64 %52 to i8*
%21 = sub i64 %8, %52
%22 = trunc i64 %21 to i32
%23 = tail call i8* @stristrb(i8* %20, i32 %22, i8* getelementptr inbounds ([9 x i8], [9 x i8]* @.str.1, i64 0, i64 0), i32 8)
%24 = icmp eq i8* %23, null
br i1 %24, label %54, label %25
25: ; preds = %17, %19
%26 = phi i8* [ %15, %17 ], [ %23, %19 ]
%27 = phi i8* [ %0, %17 ], [ %48, %19 ]
%28 = phi i32 [ 0, %17 ], [ %47, %19 ]
%29 = phi i64 [ %18, %17 ], [ %49, %19 ]
%30 = phi i64 [ %6, %17 ], [ %50, %19 ]
%31 = phi i64 [ %9, %17 ], [ %52, %19 ]
%32 = ptrtoint i8* %26 to i64
%33 = sub i64 %8, %32
%34 = trunc i64 %33 to i32
%35 = tail call i8* @html_findtagclosemark(i8* %26, i32 %34, i32* null, i32* null)
%36 = icmp eq i8* %35, null
br i1 %36, label %54, label %37
37: ; preds = %25
%38 = sub i64 %31, %29
%39 = trunc i64 %38 to i32
%40 = icmp eq i32 %39, 0
br i1 %40, label %46, label %41
41: ; preds = %37
%42 = sext i32 %28 to i64
%43 = getelementptr inbounds i8, i8* %2, i64 %42
%44 = tail call i32 @memcpy(i8* %43, i8* %27, i32 %39)
%45 = add nsw i32 %28, %39
br label %46
46: ; preds = %41, %37
%47 = phi i32 [ %45, %41 ], [ %28, %37 ]
%48 = getelementptr inbounds i8, i8* %35, i64 1
%49 = ptrtoint i8* %48 to i64
%50 = sub i64 %8, %49
%51 = trunc i64 %50 to i32
%52 = tail call i64 @hbm_patternmatch(i8* %48, i32 %51, i8* getelementptr inbounds ([8 x i8], [8 x i8]* @.str, i64 0, i64 0), i32 7, i32 1, i32 %4)
%53 = icmp eq i64 %52, 0
br i1 %53, label %54, label %19
54: ; preds = %25, %19, %46, %11, %5
%55 = phi i64 [ %6, %5 ], [ %6, %11 ], [ %50, %46 ], [ %50, %19 ], [ %30, %25 ]
%56 = phi i8* [ %0, %5 ], [ %0, %11 ], [ %48, %46 ], [ %48, %19 ], [ %27, %25 ]
%57 = phi i32 [ 0, %5 ], [ 0, %11 ], [ %47, %46 ], [ %47, %19 ], [ %28, %25 ]
%58 = trunc i64 %55 to i32
%59 = sext i32 %57 to i64
%60 = getelementptr inbounds i8, i8* %2, i64 %59
%61 = tail call i32 @memcpy(i8* %60, i8* %56, i32 %58)
%62 = add i32 %57, %58
%63 = sext i32 %62 to i64
%64 = getelementptr inbounds i8, i8* %2, i64 %63
store i8 0, i8* %64
ret i32 %62
}