Function at 0x10039f50
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, 0x18
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 0x10039f6c
mov byte [edi], al
test ecx, ecx
je 0x1003a216
mov esi, dword [ecx + 0x7c]
test esi, esi
je 0x1003a216
cmp dword [esi], eax
jne 0x10039f8f
pop edi
pop esi
mov eax, 0xffffff9c
pop ebx
mov esp, ebp
pop ebp
ret
mov eax, dword [ebp + 8]
test eax, eax
jne 0x10039f9d
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 0x10039faf
mov dword [esi + 0x14], ecx
mov eax, ecx
test eax, eax
je 0x1003a20d
nop word [eax + eax]
mov ebx, dword [esi + 8]
test ebx, ebx
jne 0x1003a0c1
mov eax, dword [esi + 0x58]
test eax, eax
je 0x1003a0c1
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 0x1003a009
cmp byte [ecx + 1], bl
je 0x1003a1ed
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 0x1003a00c
mov dword [ecx + 0x1c], edx
push dword [esi + 0x60]
mov ecx, dword [esi]
mov edx, edi
push 1
call fcn.100390e0
add esp, 8
cmp eax, 1
jne 0x1003a1ed
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 0x1003a0c1
xor ecx, ecx
mov dword [ebp - 0x14], ecx
test edi, edi
je 0x1003a0c1
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 + 0x100555a8]
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 + 0x100555a8]
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 0x1003a050
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 0x1003a0fc
mov eax, dword [esi + 4]
sub ebx, dword [ebp - 0x18]
add eax, ecx
sub edx, dword [ebp - 0x18]
mov cl, byte [eax - 1]
mov byte [ebp - 1], cl
mov dword [esi + 8], ebx
mov dword [esi + 4], eax
mov dword [esi + 0x7c], edx
jne 0x1003a0fc
mov al, cl
cmp al, byte [esi + 0x80]
jne 0x1003a1f7
cmp dword [esi + 0x64], 0
jne 0x1003a18c
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 0x1003a13a
nop dword [eax]
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 0x1003a120
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.10038870
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 0x1003a1d8
mov edi, dword [ebp + 0xc]
test edi, edi
je 0x1003a1d8
mov byte [edi], 1
jmp 0x1003a1d8
mov edi, dword [esi + 0x18]
lea ecx, [esi + 4]
mov ebx, dword [esi + 0x10]
call fcn.10038d40
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.10038870
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 0x1003a203
test ecx, ecx
je 0x1003a203
test eax, eax
jne 0x1003a21b
cmp dword [esi + 0x14], 0
ja 0x10039fc0
test eax, eax
je 0x1003a20d
pop edi
pop esi
pop ebx
mov esp, ebp
pop ebp
ret
pop edi
pop esi
or eax, 0xffffffff
pop ebx
mov esp, ebp
pop ebp
ret
pop edi
pop esi
mov eax, 0xffffff96
pop ebx
mov esp, ebp
pop ebp
ret
mov ecx, dword [ebp + 0xc]
test ecx, ecx
je 0x1003a20d
mov byte [ecx], 1
pop edi
pop esi
mov eax, ebx
pop ebx
mov esp, ebp
pop ebp
ret
mov eax, 0xffffff9a
pop edi
pop esi
pop ebx
mov esp, ebp
pop ebp
ret