format PE64 console
include 'win64a.inc'
section '.text' code readable executable
entry main
main:
invoke GetCommandLine
argparse:
.skipexe:
cmp byte [rax], 0
je defaultargs
cmp byte [rax], ' '
je .pastexe
inc rax
jmp .skipexe
.pastexe:
;; load arg1
;; FIXME: at least on my system, there's 2 more spaces (needs more testing if consistent)
mov r8, [rax+2]
and r8, 0xFF
test r8, r8
jz fail
sub r8, 48
;; load arg2
mov r9, [rax+4]
and r9, 0xFF
test r9, r9
jz fail
sub r9, 48
;; load arg3
mov r10, [rax+6]
and r10, 0xFF
test r10, r10
jz fail
sub r10, 48
jmp generate
defaultargs:
mov r8, qword 3
mov r9, qword 2
mov r10, qword 3
jmp generate
ok:
invoke GetStdHandle, STD_OUTPUT_HANDLE
invoke WriteConsole, rax, out_buf, rsi, 0, 0
invoke ExitProcess, 0
fail:
invoke GetStdHandle, STD_OUTPUT_HANDLE
invoke WriteConsole, rax, usage, usage_len, 0, 0
invoke ExitProcess, 1
include 'pasmgen.inc'
;; win32 imports
section '.idata' import data readable
library kernel32,'kernel32.dll'
include 'api/kernel32.inc'
section '.data' data readable writeable
include 'constants.inc'
out_buf rb 64
