Function at 0x467200
Capabilities:
Query environment variable

Disassembly:
push ebp
mov ebp, esp
push esi
push edi
push ebx
sub esp, 0x574
mov esi, eax
xor eax, eax
mov edi, edx
mov edx, dword [0x4f195c]
lea ebx, [ebp - 0x413]
xor edx, ebp
push eax
push 0x400
push ebx
push eax
push edi
push eax
push 0x1200
mov dword [ebp - 0x10], edx
call dword [sym.imp.KERNEL32.dll_FormatMessageA]
test eax, eax
je 0x467249
mov byte [ebp + eax - 0x413], 0
jmp 0x467394
cmp dword [0x4f11f8], 0
je 0x467356
mov dword [0x4f11f8], 0
call dword [sym.imp.KERNEL32.dll_GetThreadLocale]
mov dword [ebp - 0x574], eax
cmp dword [0x4f1980], 0
je 0x467592
mov edx, dword [0x4f19f0]
push str.ifcore_msg.dll
push dword [ebp - 0x574]
push str._lu__s
lea eax, [ebp - 0x463]
push eax
call edx
add esp, 0x10
lea eax, [ebp - 0x463]
push eax
call dword [sym.imp.KERNEL32.dll_LoadLibraryA]
mov dword [0x50c158], eax
test eax, eax
je 0x467580
mov dword [0x4f11fc], 0
xor eax, eax
mov dword [ebp - 0x574], esi
mov dword [ebp - 0x570], edi
mov edi, eax
mov edx, 0x5060c8
lea eax, [edi + 0x1c2]
lea ecx, [ebp - 0x56c]
call fcn.00466110
jmp 0x4672fc
mov eax, 0x30b
mov edx, 0x5060c8
lea ecx, [ebp - 0x56c]
call fcn.00466af0
mov ecx, dword [ebp - 0x56c]
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x467319
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x467304
dec eax
mov esi, eax
lea edx, [edi*4 + 0x4f11e0]
push edx
push 0
inc esi
push esi
call fcn.00460c10
push esi
push dword [ebp - 0x56c]
push dword [edi*4 + 0x4f11e0]
call fcn.004ad650
add esp, 0x18
inc edi
cmp edi, 6
jge 0x46751e
cmp edi, 5
je 0x4672e7
jmp 0x4672cf
xor edx, edx
lea eax, [edx + edx*2]
cmp dword [eax*4 + 0x4efac0], 0x1f8
je 0x4675f9
inc edx
cmp edx, 0x1e8
jl 0x467358
cmp dword [0x4f1980], 0
je 0x4675ef
mov eax, dword [0x4f19f0]
push edi
push dword [0x5060cc]
push ebx
call eax
add esp, 0xc
push 0x5060dc
call fcn.00439a70
add esp, 4
mov eax, dword [0x5060e0]
test eax, eax
jne 0x467417
push 0x105
mov dword [0x5060e0], 1
lea eax, [ebp - 0x568]
push eax
push str.FORT0
call dword [sym.imp.KERNEL32.dll_GetEnvironmentVariableA]
test eax, eax
jbe 0x467410
cmp eax, 0x105
jae 0x467410
cmp byte [ebp - 0x568], 0
je 0x467417
cmp dword [0x4f1980], 0
je 0x46759c
mov edi, dword [0x4f1ae8]
mov eax, dword [0x4f1998]
call eax
add eax, 0x40
push eax
push 0x4cd9dc
lea eax, [ebp - 0x568]
push eax
call edi
add esp, 0xc
jmp 0x467417
mov byte [ebp - 0x568], 0
mov dword [0x5060dc], 0
cmp dword [0x508060], 0
jne 0x467459
cmp dword [0x4f1980], 0
je 0x4675be
mov edi, dword [0x4f19c0]
mov eax, dword [0x4f1998]
call eax
push ebx
push esi
push str._s:__s
add eax, 0x40
push eax
call edi
add esp, 0x10
jmp 0x467505
mov ecx, esi
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x467472
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x46745d
dec eax
mov ecx, ebx
mov edi, eax
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x46748d
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x467478
dec eax
lea edx, [ebp - 0x570]
push edx
push 0
lea edi, [edi + eax + 1]
push edi
call fcn.00460c10
add esp, 0xc
test eax, eax
je 0x4674b1
mov dword [ebp - 0x570], ebx
xor esi, esi
jmp 0x4674e0
cmp dword [0x4f1980], 0
je 0x4675e5
mov eax, dword [0x4f19f0]
push ebx
push esi
push str._s:__s
push dword [ebp - 0x570]
call eax
add esp, 0x10
mov ebx, dword [ebp - 0x570]
mov esi, 1
push 0x2010
push str.Intel_r__Visual_Fortran_run_time_error
push ebx
call fcn.004a89d0
add esp, 0xc
test esi, esi
je 0x467505
push dword [ebp - 0x570]
call fcn.00460cc0
add esp, 4
mov ecx, dword [ebp - 0x10]
xor ecx, ebp
cmp ecx, dword [0x4f195c]
jne 0x4675e0
lea esp, [ebp - 0xc]
pop ebx
pop edi
pop esi
pop ebp
ret
mov eax, 0x1c7
mov edx, 0x5060c8
mov esi, dword [ebp - 0x574]
lea ecx, [ebp - 0x56c]
mov edi, dword [ecx - 4]
call fcn.00466d80
push 0x10
push dword [ebp - 0x56c]
push str.forrtl
call fcn.004ad650
add esp, 0xc
mov eax, 0x1f9
mov edx, 0x5060c8
lea ecx, [ebp - 0x56c]
call fcn.00466fc0
push 0x40
push dword [ebp - 0x56c]
push str.Intel_r__Visual_Fortran_run_time_error
call fcn.004ad650
add esp, 0xc
jmp 0x467356
cmp dword [0x4f11fc], 0
je 0x4672bf
jmp 0x467356
call fcn.004a0af0
jmp 0x467279
call fcn.004a0af0
mov edi, dword [0x4f1ae8]
cmp dword [0x4f1980], 0
jne 0x4673f2
call fcn.004a0af0
jmp 0x4673f2
call fcn.004a0af0
mov edi, dword [0x4f19c0]
cmp dword [0x4f1980], 0
jne 0x46743d
call fcn.004a0af0
jmp 0x46743d
call fcn.004a91cc
call fcn.004a0af0
jmp 0x4674be
call fcn.004a0af0
jmp 0x467382
mov edx, dword [eax*4 + 0x4efac4]
mov dword [0x5060c8], edx
cmp dword [0x4f11fc], 0
je 0x467620
mov eax, dword [eax*4 + 0x4efac8]
mov dword [0x5060cc], eax
jmp 0x467375
push 0
push 0x200
mov ecx, dword [eax*4 + 0x4efac8]
lea eax, [ebp - 0x574]
push eax
push 0x409
push 0x800001f8
push dword [0x50c158]
mov dword [eax + 4], ecx
push 0x900
call dword [sym.imp.KERNEL32.dll_FormatMessageA]
mov ecx, dword [ebp - 0x570]
test eax, eax
je 0x467686
mov ecx, dword [ebp - 0x574]
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x46767a
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x467665
dec eax
cmp eax, 1
jbe 0x467686
cmp byte [ecx + eax - 2], 0xd
je 0x467691
mov dword [0x5060cc], ecx
jmp 0x467375
cmp byte [ecx + eax - 1], 0xa
jne 0x467686
mov byte [ecx + eax - 2], 0
jmp 0x467686