Function at 0x613380
Capabilities:
Encode data using xor
Generate random numbers using the delphi lcg
Hash data with crc32
Resolve function by parsing pe exports

Disassembly:
push ebp
mov ebp, esp
sub esp, 0x1c
push ebx
push esi
push edi
mov edi, dword [ebp + 0xc]
xor eax, eax
xor ebx, ebx
mov dword [ebp - 8], eax
mov dword [ebp - 0xc], ebx
test edi, edi
je 0x61339c
mov byte [edi], al
test ecx, ecx
je 0x613647
mov esi, dword [ecx + 0x7c]
test esi, esi
je 0x613647
cmp dword [esi], eax
jne 0x6133bf
mov eax, 0xffffff9c
pop edi
pop esi
pop ebx
mov esp, ebp
pop ebp
ret
mov eax, dword [ebp + 8]
test eax, eax
jne 0x6133cd
pop edi
pop esi
pop ebx
mov esp, ebp
pop ebp
ret
mov ecx, dword [esi + 0x5c]
mov dword [esi + 0x10], edx
mov dword [esi + 0x14], eax
cmp eax, ecx
jbe 0x6133df
mov dword [esi + 0x14], ecx
mov eax, ecx
test eax, eax
je 0x61363e
nop word [eax + eax]
mov ebx, dword [esi + 8]
test ebx, ebx
jne 0x6134f1
mov eax, dword [esi + 0x58]
test eax, eax
je 0x6134f1
mov ecx, dword [esi + 0x60]
mov edi, 0x4000
mov edx, dword [esi + 0x68]
cmp eax, edi
cmovb edi, eax
add edx, dword [esi + 0x3c]
cmp byte [ecx], bl
je 0x613439
cmp byte [ecx + 1], bl
je 0x61361e
mov eax, dword [ecx + 0xc]
push ebx
push ebx
add eax, edx
push eax
push dword [ecx + 4]
call dword [sym.imp.KERNEL32.dll_SetFilePointer]
jmp 0x61343c
mov dword [ecx + 0x1c], edx
push dword [esi + 0x60]
mov ecx, dword [esi]
mov edx, edi
push 1
call fcn.006127d0
add esp, 8
cmp eax, 1
jne 0x61361e
add dword [esi + 0x3c], edi
mov ebx, edi
sub dword [esi + 0x58], edi
cmp byte [esi + 0x6c], 0
mov eax, dword [esi]
mov dword [ebp - 0x10], eax
mov dword [esi + 4], eax
mov dword [esi + 8], edi
je 0x6134f1
xor ecx, ecx
mov dword [ebp - 0x14], ecx
test edi, edi
je 0x6134f1
nop dword [eax]
mov edi, dword [esi + 0x78]
mov eax, edi
and eax, 0xfffd
or eax, 2
mov edx, eax
xor edx, 1
imul edx, eax
mov eax, dword [ebp - 0x10]
shr edx, 8
xor dl, byte [ecx + eax]
mov ecx, dword [esi + 0x70]
movsx eax, dl
xor eax, ecx
shr ecx, 8
movzx eax, al
mov eax, dword [eax*4 + 0x7cd430]
xor eax, ecx
mov ecx, dword [ebp - 0x14]
mov dword [esi + 0x70], eax
movzx eax, al
add eax, dword [esi + 0x74]
imul eax, eax, 0x8088405
inc eax
mov dword [esi + 0x74], eax
shr eax, 0x18
xor eax, edi
shr edi, 8
movzx eax, al
xor edi, dword [eax*4 + 0x7cd430]
mov eax, dword [ebp - 0x10]
mov dword [esi + 0x78], edi
mov byte [ecx + eax], dl
inc ecx
mov dword [ebp - 0x14], ecx
cmp ecx, ebx
jb 0x613480
mov ebx, dword [esi + 8]
mov edx, dword [esi + 0x7c]
mov ecx, ebx
cmp edx, ebx
cmovbe ecx, edx
mov dword [ebp - 0x18], ecx
test ecx, ecx
je 0x613531
mov eax, dword [esi + 4]
add eax, ecx
mov cl, byte [eax - 1]
mov byte [ebp - 1], cl
mov ecx, dword [ebp - 0x18]
sub ebx, ecx
sub dword [esi + 0x5c], ecx
sub edx, ecx
mov dword [esi + 8], ebx
mov dword [esi + 4], eax
mov dword [esi + 0x7c], edx
jne 0x613531
mov al, byte [ebp - 1]
cmp al, byte [esi + 0x80]
jne 0x613628
cmp dword [esi + 0x64], 0
jne 0x6135bd
mov eax, dword [esi + 0x14]
cmp eax, ebx
mov edi, eax
mov dword [ebp - 0x10], eax
cmovae edi, ebx
xor edx, edx
mov dword [ebp - 0x14], edi
test edi, edi
je 0x61356b
mov eax, dword [esi + 4]
mov ecx, dword [esi + 0x10]
mov al, byte [edx + eax]
mov byte [edx + ecx], al
inc edx
cmp edx, edi
jb 0x613551
mov eax, dword [esi + 0x14]
mov ebx, dword [esi + 8]
mov dword [ebp - 0x10], eax
mov edi, dword [esi + 0x10]
mov edx, edi
push dword [ebp - 0x14]
mov ecx, dword [esi + 0x50]
call fcn.00611f20
mov ecx, dword [ebp - 0x14]
add esp, 4
sub dword [esi + 0x5c], ecx
sub ebx, ecx
add dword [esi + 4], ecx
add dword [esi + 0x18], ecx
mov dword [esi + 0x50], eax
mov eax, dword [ebp - 0x10]
sub eax, ecx
mov dword [esi + 8], ebx
mov ebx, dword [ebp - 0xc]
mov dword [esi + 0x14], eax
add ebx, ecx
cmp dword [esi + 0x5c], 0
lea eax, [edi + ecx]
mov dword [esi + 0x10], eax
mov eax, dword [ebp - 8]
mov dword [ebp - 0xc], ebx
jne 0x613609
mov edi, dword [ebp + 0xc]
test edi, edi
je 0x613609
mov byte [edi], 1
jmp 0x613609
mov edi, dword [esi + 0x18]
lea ecx, [esi + 4]
mov ebx, dword [esi + 0x10]
call fcn.006123f0
mov ecx, dword [esi + 0x50]
mov edx, ebx
mov dword [ebp - 8], eax
mov eax, dword [esi + 0x18]
sub eax, edi
push eax
mov dword [ebp - 0x18], eax
call fcn.00611f20
mov ecx, dword [esi + 0x5c]
add esp, 4
mov ebx, dword [ebp - 0xc]
sub ecx, dword [ebp - 0x18]
add ebx, dword [ebp - 0x18]
mov dword [esi + 0x50], eax
mov eax, dword [ebp - 8]
mov dword [esi + 0x5c], ecx
mov dword [ebp - 0xc], ebx
cmp eax, 1
je 0x613634
test ecx, ecx
je 0x613634
test eax, eax
jne 0x61364c
cmp dword [esi + 0x14], 0
ja 0x6133f0
test eax, eax
je 0x61363e
pop edi
pop esi
pop ebx
mov esp, ebp
pop ebp
ret
or eax, 0xffffffff
pop edi
pop esi
pop ebx
mov esp, ebp
pop ebp
ret
mov eax, 0xffffff96
pop edi
pop esi
pop ebx
mov esp, ebp
pop ebp
ret
mov ecx, dword [ebp + 0xc]
test ecx, ecx
je 0x61363e
mov byte [ecx], 1
mov eax, ebx
pop edi
pop esi
pop ebx
mov esp, ebp
pop ebp
ret
mov eax, 0xffffff9a
pop edi
pop esi
pop ebx
mov esp, ebp
pop ebp
ret