Function at 0x5b3af0
Capabilities:
Query environment variable
Write file on windows

Disassembly:
push ebp
mov ebp, esp
push esi
push edi
push ebx
sub esp, 0x20
mov esi, eax
mov ebx, edx
lea eax, [ebp - 0x10]
push eax
push 0
push 0x1001
call fcn.005c09a0
add esp, 0xc
test eax, eax
je 0x5b3b1c
lea esp, [ebp - 0xc]
pop ebx
pop edi
pop esi
pop ebp
ret
push 0x105
mov edi, dword [ebp - 0x10]
push edi
push str.FOR_DIAGNOSTIC_LOG_FILE
call dword [sym.imp.KERNEL32.dll_GetEnvironmentVariableA]
test eax, eax
jbe 0x5b3b3b
cmp eax, 0x105
jb 0x5b3b42
test edi, edi
je 0x5b3b42
mov byte [edi], 0
mov edx, dword [ebp - 0x10]
cmp byte [edx], 0
je 0x5b3b9d
cmp ebx, 0xaa
je 0x5b3dbc
push 0x697654
push edx
call fcn.0064d048
mov edi, eax
add esp, 8
test edi, edi
je 0x5b3b9a
mov dword [ebp - 0x1c], 0x694280
mov dword [ebp - 0x18], esi
call fcn.0062fd20
mov edx, eax
lea eax, [ebp - 0x18]
push eax
push 0
push 0x694280
push edi
push dword [edx + 4]
push dword [edx]
call fcn.0064c712
push edi
call fcn.0064d1fb
add esp, 0x1c
mov edx, dword [ebp - 0x10]
push edx
call fcn.005c0a60
add esp, 4
test eax, eax
jne 0x5b3b14
push str.FOR_DISABLE_DIAGNOSTIC_DISPLAY
call fcn.005e7860
add esp, 4
test eax, eax
jne 0x5b3c4a
cmp dword [0x7253f4], 0
je 0x5b3be1
push 0x2010
push str.Intel_r__Visual_Fortran_run_time_error
push esi
call fcn.0062f340
add esp, 0xc
jmp 0x5b3c4a
push 0
call dword [sym.imp.KERNEL32.dll_GetModuleHandleA]
mov edi, eax
test edi, edi
je 0x5b3c02
mov edx, dword [edi + 0x3c]
movzx eax, word [edx + edi + 0x18]
cmp eax, 0x10b
je 0x5b3c8a
cmp ebx, 0xaa
je 0x5b3c54
push 2
call fcn.00647235
mov edi, eax
add esp, 4
mov ebx, 0x694280
mov dword [ebp - 0x2c], ebx
mov dword [ebp - 0x28], esi
call fcn.0062fd20
mov edx, eax
lea eax, [ebp - 0x28]
push eax
push 0
push ebx
push edi
push dword [edx + 4]
push dword [edx]
call fcn.0064c712
push 2
call fcn.00647235
push eax
call fcn.006475cd
add esp, 0x20
xor eax, eax
lea esp, [ebp - 0xc]
pop ebx
pop edi
pop esi
pop ebp
ret
push 0xfffffffffffffff4
call dword [sym.imp.KERNEL32.dll_GetStdHandle]
mov ebx, eax
mov ecx, esi
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x5b3c77
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x5b3c62
dec eax
push 0
mov edx, eax
lea eax, [ebp - 0x2c]
push eax
push edx
push esi
push ebx
call dword [sym.imp.KERNEL32.dll_WriteFile]
jmp 0x5b3c4a
movzx eax, word [edx + edi + 0x5c]
cmp eax, 2
jne 0x5b3c02
push str.user32.dll
call dword [sym.imp.KERNEL32.dll_LoadLibraryA]
test eax, eax
je 0x5b3d0a
push 0x697658
push eax
call dword [sym.imp.KERNEL32.dll_GetProcAddress]
test eax, eax
je 0x5b3d0a
push 0x12010
push str.Intel_r__Visual_Fortran_run_time_error
push esi
push 0
call eax
test eax, eax
jne 0x5b3c4a
cmp ebx, 0xaa
je 0x5b3d4a
push 2
call fcn.00647235
mov edi, eax
add esp, 4
mov ebx, 0x694280
mov dword [ebp - 0x2c], ebx
mov dword [ebp - 0x28], esi
call fcn.0062fd20
mov edx, eax
lea eax, [ebp - 0x28]
push eax
push 0
push ebx
push edi
push dword [edx + 4]
push dword [edx]
call fcn.0064c712
add esp, 0x18
jmp 0x5b3c4a
cmp ebx, 0xaa
je 0x5b3d83
push 2
call fcn.00647235
mov edi, eax
add esp, 4
mov ebx, 0x694280
mov dword [ebp - 0x2c], ebx
mov dword [ebp - 0x28], esi
call fcn.0062fd20
mov edx, eax
lea eax, [ebp - 0x28]
push eax
push 0
push ebx
push edi
push dword [edx + 4]
push dword [edx]
call fcn.0064c712
add esp, 0x18
jmp 0x5b3c4a
push 0xfffffffffffffff4
call dword [sym.imp.KERNEL32.dll_GetStdHandle]
mov ebx, eax
mov ecx, esi
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x5b3d6d
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x5b3d58
dec eax
push 0
mov edx, eax
lea eax, [ebp - 0x2c]
push eax
push edx
push esi
push ebx
call dword [sym.imp.KERNEL32.dll_WriteFile]
jmp 0x5b3c4a
push 0xfffffffffffffff4
call dword [sym.imp.KERNEL32.dll_GetStdHandle]
mov ebx, eax
mov ecx, esi
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x5b3da6
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x5b3d91
dec eax
push 0
mov edx, eax
lea eax, [ebp - 0x2c]
push eax
push edx
push esi
push ebx
call dword [sym.imp.KERNEL32.dll_WriteFile]
jmp 0x5b3c4a
xor eax, eax
push eax
push 0x80
push 4
push eax
push eax
push 0x40000000
mov dword [ebp - 0x2c], edx
push edx
call dword [sym.imp.KERNEL32.dll_CreateFileA]
mov edx, dword [ebp - 0x2c]
mov edi, eax
cmp edi, 0xffffffff
je 0x5b3b9d
push 2
xor eax, eax
push eax
push eax
push edi
call dword [sym.imp.KERNEL32.dll_SetFilePointer]
mov ecx, esi
xor eax, eax
movzx edx, byte [ecx + eax]
test edx, edx
je 0x5b3e0b
movzx edx, byte [ecx + eax + 1]
add eax, 2
test edx, edx
jne 0x5b3df6
dec eax
push 0
mov edx, eax
lea eax, [ebp - 0x20]
push eax
push edx
push esi
push edi
call dword [sym.imp.KERNEL32.dll_WriteFile]
push edi
call dword [sym.imp.KERNEL32.dll_CloseHandle]
jmp 0x5b3b9a