Function at 0x54e800
Capabilities:
Terminate process

Disassembly:
push ebp
mov ebp, esp
sub esp, 0x1bc
mov eax, dword [0x59fda8]
mov edx, dword [ebp + 0x10]
push ebx
mov ebx, dword [ebp + 0xc]
lea ecx, [eax - 1]
mov eax, dword [0x589604]
push esi
cmp eax, ecx
push edi
jg 0x54e8b1
mov ecx, dword [0x59fdac]
mov edi, dword [ecx + eax*4]
or ecx, 0xffffffff
xor eax, eax
repne scasb al, byte es:[edi]
not ecx
dec ecx
mov dword [edx], ecx
mov eax, dword [0x589604]
mov esi, dword [0x59fdac]
mov edi, dword [ebx]
mov esi, dword [esi + eax*4]
mov eax, ecx
shr ecx, 2
rep movsd dword es:[edi], dword [esi]
mov ecx, eax
and ecx, 3
rep movsb byte es:[edi], byte [esi]
mov ecx, dword [ebx]
mov eax, dword [edx]
mov byte [ecx + eax], 0
mov esi, dword [0x589604]
inc esi
mov dword [0x589604], esi
mov eax, dword [ebx]
cmp byte [eax], 0x20
jne 0x54e88a
cmp dword [edx], 0
jle 0x54e88a
inc eax
mov dword [ebx], eax
mov esi, dword [edx]
dec esi
mov dword [edx], esi
mov eax, dword [ebx]
cmp byte [eax], 0x20
je 0x54e876
cmp dword [edx], 0
jle 0x54e8ab
mov esi, dword [edx]
mov ecx, dword [ebx]
mov al, byte [esi + ecx - 1]
cmp al, 0x20
je 0x54e89f
test al, al
jne 0x54e8a8
lea eax, [esi - 1]
test eax, eax
mov dword [edx], eax
jg 0x54e88f
cmp dword [edx], 0
jne 0x54f0b3
mov eax, dword [0x59d964]
test eax, eax
je 0x54e94f
mov edx, dword [ebp + 8]
lea ecx, [ebp - 0x13c]
mov eax, dword [edx + 0xbc]
push eax
push str.Open:_Select_File_for_Unit
push str._s_d
push ecx
call fcn.005648d8
add esp, 0x10
mov eax, dword [ebx]
lea edx, [ebp - 0x13c]
push edx
push 0x100
push eax
call fcn.0056fe40
add esp, 0xc
test eax, eax
je 0x54e90a
mov edi, dword [ebx]
or ecx, 0xffffffff
xor eax, eax
repne scasb al, byte es:[edi]
not ecx
dec ecx
jne 0x54e937
push 0x2134
push str.File_Open_Error
push str.A_File_Must_be_Selected_r_rTerminate_Program_
call fcn.0056fe40
add esp, 0xc
cmp eax, 6
jne 0x54e8e1
push 1
call fcn.0056fe40
add esp, 4
push 1
call fcn.005654ba
mov edi, dword [ebx]
or ecx, 0xffffffff
xor eax, eax
mov edx, dword [ebp + 0x10]
repne scasb al, byte es:[edi]
not ecx
dec ecx
pop edi
pop esi
mov dword [edx], ecx
pop ebx
mov esp, ebp
pop ebp
ret
mov ebx, dword [ebp + 8]
lea ecx, [ebp - 0x1bc]
mov eax, dword [ebx + 0xbc]
push eax
push str.File_name_missing_or_blank___please_enter_file_name_r_nUNIT__d_
push ecx
call fcn.005648d8
lea edi, [ebp - 0x1bc]
or ecx, 0xffffffff
xor eax, eax
add esp, 0xc
repne scasb al, byte es:[edi]
mov eax, dword [ebx + 0xbc]
mov edi, 6
not ecx
dec ecx
cmp eax, edi
mov dword [ebp + 8], ecx
je 0x54e9ad
lea edx, [ebp - 0xcc]
push 2
lea eax, [ebp - 0xc]
push edx
push eax
push edi
call fcn.0054af80
add esp, 0x10
test eax, eax
jne 0x54f0b5
cmp dword [ebx + 0xbc], 5
je 0x54e9e7
lea ecx, [ebp - 0xec]
push 7
lea edx, [ebp - 0x10]
push ecx
push edx
push 5
call fcn.0054af80
mov esi, eax
add esp, 0x10
test esi, esi
je 0x54e9e7
cmp dword [ebx + 0xbc], edi
je 0x54f1c3
mov eax, dword [ebp - 0xc]
jmp 0x54f148
lea edx, [ebp - 4]
mov esi, 1
push edx
push esi
push 0x138
call fcn.00540120
add esp, 0xc
test eax, eax
jne 0x54f0b5
lea eax, [ebp - 8]
push eax
push esi
push 0x138
call fcn.00540120
add esp, 0xc
test eax, eax
jne 0x54f0b5
mov edi, dword [ebp - 4]
mov ecx, 0x4e
rep stosd dword es:[edi], eax
mov edi, dword [ebp - 8]
mov ecx, 0x4e
rep stosd dword es:[edi], eax
mov ecx, 0x27
lea edi, [ebp - 0xac]
rep stosd dword es:[edi], eax
mov ecx, dword [ebp - 4]
mov dword [ecx + 0xbc], 6
mov ecx, dword [ebp - 4]
mov edi, dword [ebx + 0x128]
mov eax, dword [ecx + 0x128]
mov edx, eax
xor edx, edi
and edx, 0x400000
xor edx, eax
mov dword [ecx + 0x128], edx
mov ecx, dword [ebp - 4]
mov edi, dword [ebx + 0x12c]
mov eax, dword [ecx + 0x12c]
mov edx, eax
xor edx, edi
and edx, 0x100
xor edx, eax
mov dword [ecx + 0x12c], edx
mov ecx, dword [ebp - 4]
mov edi, dword [ebx + 0x12c]
mov eax, dword [ecx + 0x12c]
mov edx, eax
xor edx, edi
and edx, 0x8000000
xor edx, eax
mov dword [ecx + 0x12c], edx
mov ecx, dword [ebp - 4]
mov edi, dword [ebx + 0x12c]
mov eax, dword [ecx + 0x12c]
mov edx, eax
xor edx, edi
and edx, 0x200000
xor edx, eax
mov dword [ecx + 0x12c], edx
mov ecx, dword [ebp - 4]
mov edi, dword [ebx + 0x12c]
mov eax, dword [ecx + 0x12c]
mov edx, eax
xor edx, edi
and edx, 0x10000000
xor edx, eax
mov dword [ecx + 0x12c], edx
mov ecx, dword [ebp - 4]
mov edi, dword [ebx + 0x130]
mov eax, dword [ecx + 0x130]
mov edx, eax
xor edx, edi
and edx, 0x200
xor edx, eax
mov dword [ecx + 0x130], edx
mov ecx, dword [ebp - 4]
mov edi, dword [ebx + 0x130]
mov eax, dword [ecx + 0x130]
mov edx, eax
xor edx, edi
and edx, 0x400
xor edx, eax
mov dword [ecx + 0x130], edx
mov ecx, dword [ebp - 4]
mov edi, dword [ebx + 0x130]
mov eax, dword [ecx + 0x130]
mov edx, eax
xor edx, edi
and edx, 0x800
xor edx, eax
mov dword [ecx + 0x130], edx
mov ecx, dword [ebp - 4]
mov edi, dword [ebx + 0x130]
mov eax, dword [ecx + 0x130]
mov edx, eax
xor edx, edi
and edx, 0x2000
xor edx, eax
mov dword [ecx + 0x130], edx
mov ecx, dword [ebp - 4]
mov edi, dword [ebx + 0x130]
mov eax, dword [ecx + 0x130]
mov edx, eax
xor edx, edi
and edx, 0x4000
xor edx, eax
xor eax, eax
mov dword [ecx + 0x130], edx
mov edi, dword [0x589600]
or ecx, 0xffffffff
mov dword [ebp - 0xac], esi
mov dword [ebp - 0x58], 4
mov dword [ebp - 0x78], esi
mov dword [ebp - 0x80], edi
repne scasb al, byte es:[edi]
mov eax, dword [ebp - 4]
not ecx
dec ecx
push eax
mov dword [ebp - 0x7c], ecx
lea ecx, [ebp - 0xac]
push ecx
call fcn.0054b840
mov edi, eax
add esp, 8
test edi, edi
je 0x54ec31
mov edx, dword [ebp - 4]
push edx
call fcn.00540190
mov eax, dword [ebp - 8]
push eax
call fcn.00540190
mov eax, dword [ebx + 0xbc]
add esp, 8
cmp eax, 6
je 0x54ec09
mov ecx, dword [ebp - 0xc]
mov edx, dword [ecx + 0xbc]
push edx
call fcn.0054b500
add esp, 4
cmp dword [ebx + 0xbc], 5
je 0x54ee0f
mov eax, dword [ebp - 0x10]
mov ecx, dword [eax + 0xbc]
push ecx
call fcn.0054b500
add esp, 4
mov eax, edi
pop edi
pop esi
pop ebx
mov esp, ebp
pop ebp
ret
mov edx, dword [ebp - 8]
mov esi, 5
mov dword [edx + 0xbc], esi
mov ecx, dword [ebp - 8]
mov edi, dword [ebx + 0x128]
mov eax, dword [ecx + 0x128]
mov edx, eax
xor edx, edi
and edx, 0x400000
xor edx, eax
mov dword [ecx + 0x128], edx
mov ecx, dword [ebp - 8]
mov edi, dword [ebx + 0x12c]
mov eax, dword [ecx + 0x12c]
mov edx, eax
xor edx, edi
and edx, 0x100
xor edx, eax
mov dword [ecx + 0x12c], edx
mov ecx, dword [ebp - 8]
mov edi, dword [ebx + 0x12c]
mov eax, dword [ecx + 0x12c]
mov edx, eax
xor edx, edi
and edx, 0x8000000
xor edx, eax
mov dword [ecx + 0x12c], edx
mov ecx, dword [ebp - 8]
mov edi, dword [ebx + 0x12c]
mov eax, dword [ecx + 0x12c]
mov edx, eax
xor edx, edi
and edx, 0x200000
xor edx, eax
mov dword [ecx + 0x12c], edx
mov ecx, dword [ebp - 8]
mov edi, dword [ebx + 0x12c]
mov eax, dword [ecx + 0x12c]
mov edx, eax
xor edx, edi
and edx, 0x10000000
xor edx, eax
mov dword [ecx + 0x12c], edx
mov ecx, dword [ebp - 8]
mov edi, dword [ebx + 0x130]
mov eax, dword [ecx + 0x130]
mov edx, eax
xor edx, edi
and edx, 0x200
xor edx, eax
mov dword [ecx + 0x130], edx
mov ecx, dword [ebp - 8]
mov edi, dword [ebx + 0x130]
mov eax, dword [ecx + 0x130]
mov edx, eax
xor edx, edi
and edx, 0x400
xor edx, eax
mov dword [ecx + 0x130], edx
mov ecx, dword [ebp - 8]
mov edi, dword [ebx + 0x130]
mov eax, dword [ecx + 0x130]
mov edx, eax
xor edx, edi
and edx, 0x800
xor edx, eax
mov dword [ecx + 0x130], edx
mov ecx, dword [ebp - 8]
mov edi, dword [ebx + 0x130]
mov eax, dword [ecx + 0x130]
mov edx, eax
xor edx, edi
and edx, 0x2000
xor edx, eax
mov dword [ecx + 0x130], edx
mov ecx, dword [ebp - 8]
mov edi, dword [ebx + 0x130]
mov eax, dword [ecx + 0x130]
mov edx, eax
xor edx, edi
and edx, 0x4000
xor edx, eax
xor eax, eax
mov dword [ecx + 0x130], edx
mov edi, dword [0x5895fc]
or ecx, 0xffffffff
mov dword [ebp - 0x80], edi
repne scasb al, byte es:[edi]
mov eax, dword [ebp - 8]
not ecx
dec ecx
push eax
mov dword [ebp - 0x7c], ecx
lea ecx, [ebp - 0xac]
push ecx
call fcn.0054b840
mov edi, eax
add esp, 8
test edi, edi
je 0x54ee18
mov edx, dword [ebp - 4]
push 0
push edx
call fcn.00538620
mov eax, dword [ebp - 4]
push eax
call fcn.00540190
mov ecx, dword [ebp - 8]
push ecx
call fcn.00540190
mov eax, dword [ebx + 0xbc]
add esp, 0x10
cmp eax, 6
je 0x54edf5
mov edx, dword [ebp - 0xc]
mov eax, dword [edx + 0xbc]
push eax
call fcn.0054b500
add esp, 4
cmp dword [ebx + 0xbc], esi
je 0x54ee0f
mov ecx, dword [ebp - 0x10]
mov edx, dword [ecx + 0xbc]
push edx
call fcn.0054b500
add esp, 4
mov eax, edi
pop edi
pop esi
pop ebx
mov esp, ebp
pop ebp
ret
mov eax, dword [ebp - 4]
mov byte [eax + 0x11e], 3
mov eax, dword [ebp - 4]
mov ecx, dword [eax + 0x12c]
or ecx, 4
mov dword [eax + 0x12c], ecx
mov ecx, dword [ebp + 0x10]
cmp dword [ecx], 0
jne 0x54f051
mov esi, dword [ebp - 4]
push 0
push esi
call fcn.00551050
add esp, 8
test eax, eax
jne 0x54f0bc
mov dl, byte [esi + 0x11c]
movsx eax, dl
dec eax
cmp eax, 6
ja case.default.0x54ee69
jmp dword [eax*4 + 0x54f1cc]
mov eax, dword [esi + 0x30]
test eax, eax
je 0x54ee7f
add eax, 4
mov dword [esi + 0x2c], eax
jmp 0x54ee88
mov edx, dword [esi + 0x28]
add edx, 4
mov dword [esi + 0x2c], edx
mov eax, dword [esi + 0xb4]
mov ecx, dword [esi + 0x2c]
lea edx, [eax + ecx - 8]
mov dword [esi + 0x34], edx
jmp 0x54ef1e
mov eax, dword [esi + 0x30]
test eax, eax
jne 0x54eea7
mov eax, dword [esi + 0x28]
mov ecx, dword [esi + 0xb4]
mov edx, eax
mov dword [esi + 0x2c], eax
lea eax, [ecx + edx - 1]
mov dword [esi + 0x34], eax
jmp 0x54ef1e
mov eax, dword [esi + 0x30]
test eax, eax
je 0x54eec7
mov dword [esi + 0x2c], eax
jmp 0x54eecd
mov ecx, dword [esi + 0x28]
mov dword [esi + 0x2c], ecx
mov eax, dword [esi + 0xb4]
mov ecx, dword [esi + 0x2c]
add ecx, eax
mov eax, dword [esi + 0x12c]
test eax, 0x8000000
mov dword [esi + 0x34], ecx
je 0x54ef43
mov eax, dword [esi + 0x128]
test ah, 1
je 0x54ef1e
test ah, 0x10
je 0x54ef1e
cmp dl, 1
jne 0x54ef1e
add ecx, 0xfffffffe
mov dword [esi + 0x34], ecx
jmp 0x54ef1e
push 0x1416
push str.E:_forrtl_build_for_nt_open_proc.c
push 2
push 0xc0000008
call fcn.00547a40
add esp, 0x10
test dword [esi + 0x12c], 0x8000000
je 0x54ef43
mov eax, dword [esi + 0x128]
test ah, 1
je 0x54ef43
test ah, 0x10
je 0x54ef43
cmp byte [esi + 0x11c], 1
je 0x54ef79
mov al, byte [esi + 0x11e]
cmp al, 2
jne 0x54ef60
mov al, byte [esi + 0x11c]
cmp al, 7
je 0x54ef79
cmp al, 6
je 0x54ef79
dec dword [esi + 0x34]
jmp 0x54ef79
cmp al, 1
jne 0x54ef79
mov al, byte [esi + 0x11c]
cmp al, 7
je 0x54ef75
cmp al, 6
je 0x54ef75
dec dword [esi + 0x34]
add dword [esi + 0x2c], 5
mov edx, dword [esi + 0x2c]
mov dword [esi + 0x3c], 0
mov dword [esi + 0x38], edx
mov edx, dword [ebp + 8]
mov eax, dword [ebp - 4]
mov ecx, edx
lea esi, [ebp - 0x1bc]
mov edi, dword [eax + 0x2c]
mov eax, ecx
shr ecx, 2
rep movsd dword es:[edi], dword [esi]
mov ecx, eax
and ecx, 3
rep movsb byte es:[edi], byte [esi]
mov eax, dword [ebp - 4]
mov esi, dword [eax + 0x2c]
add esi, edx
mov dword [eax + 0x2c], esi
mov ecx, dword [ebp - 4]
push ecx
call fcn.005500e0
mov esi, eax
add esp, 4
test esi, esi
jne 0x54f0f4
mov edx, dword [ebp - 8]
push edx
call fcn.00555d50
mov esi, eax
add esp, 4
test esi, esi
jne 0x54f160
mov eax, dword [ebp - 8]
mov edx, dword [ebp + 0xc]
mov esi, dword [eax + 0x2c]
mov eax, dword [eax + 0x34]
mov edi, dword [edx]
sub eax, esi
mov ecx, eax
mov edx, ecx
shr ecx, 2
rep movsd dword es:[edi], dword [esi]
mov ecx, edx
and ecx, 3
rep movsb byte es:[edi], byte [esi]
mov edi, dword [ebp + 0xc]
mov ecx, dword [edi]
mov byte [eax + ecx], 0
mov ecx, dword [ebp + 0x10]
mov dword [ecx], eax
mov eax, dword [edi]
cmp byte [eax], 0x20
jne 0x54f025
cmp dword [ecx], 0
jle 0x54f025
inc eax
mov dword [edi], eax
mov esi, dword [ecx]
dec esi
mov dword [ecx], esi
mov eax, dword [edi]
cmp byte [eax], 0x20
je 0x54f011
cmp dword [ecx], 0
jle 0x54f046
mov esi, dword [ecx]
mov edx, dword [edi]
mov al, byte [esi + edx - 1]
cmp al, 0x20
je 0x54f03a
test al, al
jne 0x54f043
lea eax, [esi - 1]
test eax, eax
mov dword [ecx], eax
jg 0x54f02a
cmp dword [ecx], 0
je 0x54ee40
mov esi, 5
mov ecx, dword [ebp - 4]
push 0
push ecx
call fcn.00538620
mov edx, dword [ebp - 8]
push 0
push edx
call fcn.00538620
mov eax, dword [ebp - 4]
push eax
call fcn.00540190
mov ecx, dword [ebp - 8]
push ecx
call fcn.00540190
mov eax, dword [ebx + 0xbc]
add esp, 0x18
cmp eax, 6
je 0x54f099
mov edx, dword [ebp - 0xc]
mov eax, dword [edx + 0xbc]
push eax
call fcn.0054b500
add esp, 4
cmp dword [ebx + 0xbc], esi
je 0x54f0b3
mov ecx, dword [ebp - 0x10]
mov edx, dword [ecx + 0xbc]
push edx
call fcn.0054b500
add esp, 4
xor eax, eax
pop edi
pop esi
pop ebx
mov esp, ebp
pop ebp
ret
push esi
push 0xc0000026
push 0xc0000026
push 1
call fcn.00547a70
add esp, 0x10
pop edi
pop esi
pop ebx
mov esp, ebp
pop ebp
ret
push esi
push 0xc000002c
push 0xc000002c
push 1
call fcn.00547a70
add esp, 0x10
pop edi
pop esi
pop ebx
mov esp, ebp
pop ebp
ret
mov eax, dword [ebp - 4]
push 0
push eax
call fcn.00538620
mov ecx, dword [ebp - 8]
push 0
push ecx
call fcn.00538620
mov edx, dword [ebp - 4]
push edx
call fcn.00540190
mov eax, dword [ebp - 8]
push eax
call fcn.00540190
mov eax, dword [ebx + 0xbc]
add esp, 0x18
cmp eax, 6
je 0x54f13c
mov ecx, dword [ebp - 0xc]
mov edx, dword [ecx + 0xbc]
push edx
call fcn.0054b500
add esp, 4
cmp dword [ebx + 0xbc], 5
je 0x54f1c3
mov eax, dword [ebp - 0x10]
mov ecx, dword [eax + 0xbc]
push ecx
call fcn.0054b500
add esp, 4
mov eax, esi
pop edi
pop esi
pop ebx
mov esp, ebp
pop ebp
ret
mov edx, dword [ebp - 4]
push 0
push edx
call fcn.00538620
mov eax, dword [ebp - 8]
push 0
push eax
call fcn.00538620
mov ecx, dword [ebp - 4]
push ecx
call fcn.00540190
mov edx, dword [ebp - 8]
push edx
call fcn.00540190
mov eax, dword [ebx + 0xbc]
add esp, 0x18
cmp eax, 6
je 0x54f1a8
mov eax, dword [ebp - 0xc]
mov ecx, dword [eax + 0xbc]
push ecx
call fcn.0054b500
add esp, 4
cmp dword [ebx + 0xbc], 5
je 0x54f1c3
mov edx, dword [ebp - 0x10]
mov eax, dword [edx + 0xbc]
push eax
call fcn.0054b500
add esp, 4
mov eax, esi
pop edi
pop esi
pop ebx
mov esp, ebp
pop ebp
ret