2017-12-22 21:24:30 +00:00
|
|
|
|
NEW
|
2019-05-05 17:15:37 +00:00
|
|
|
|
AUTO 3,1
|
2016-03-13 22:09:00 +00:00
|
|
|
|
.LIST OFF
|
|
|
|
|
|
*--------------------------------------
|
2017-02-15 16:14:41 +00:00
|
|
|
|
HST.GetByName >PULLW ZPPtrDNS
|
2016-03-13 22:09:00 +00:00
|
|
|
|
>PULLW ZPPtrIP
|
2019-10-03 06:25:27 +00:00
|
|
|
|
|
2020-03-23 07:08:27 +00:00
|
|
|
|
>PUSHW ZPPtrDNS
|
|
|
|
|
|
>PUSHW L.HST.SScanF
|
|
|
|
|
|
|
|
|
|
|
|
ldx #0
|
2019-10-03 06:25:27 +00:00
|
|
|
|
|
2018-09-21 15:28:46 +00:00
|
|
|
|
.1 txa
|
2018-05-24 15:21:38 +00:00
|
|
|
|
clc
|
2018-09-21 15:28:46 +00:00
|
|
|
|
adc ZPPtrIP
|
2020-04-07 06:01:38 +00:00
|
|
|
|
pha
|
2018-05-24 15:21:38 +00:00
|
|
|
|
lda ZPPtrIP+1
|
|
|
|
|
|
adc #0
|
2020-04-07 06:01:38 +00:00
|
|
|
|
>PUSHA
|
|
|
|
|
|
pla
|
|
|
|
|
|
>PUSHA @IP[0][1][2][3]
|
2018-05-24 15:21:38 +00:00
|
|
|
|
|
2020-03-23 07:08:27 +00:00
|
|
|
|
inx
|
|
|
|
|
|
cpx #4
|
|
|
|
|
|
bne .1
|
2019-10-03 06:25:27 +00:00
|
|
|
|
|
2018-06-18 06:22:50 +00:00
|
|
|
|
>PUSHBI 8 4 PTRs on stack
|
2018-05-25 19:03:31 +00:00
|
|
|
|
|
2019-05-05 17:15:37 +00:00
|
|
|
|
>SYSCALL2 SScanF
|
2016-03-20 22:16:01 +00:00
|
|
|
|
bcc .9
|
|
|
|
|
|
jmp DNS.QUERY.I
|
2016-03-13 22:09:00 +00:00
|
|
|
|
.9 rts
|
|
|
|
|
|
*--------------------------------------
|
2020-04-07 06:01:38 +00:00
|
|
|
|
HST.GetByAddr >PULLW ZPPtrIP TODO
|
2016-03-13 22:09:00 +00:00
|
|
|
|
>PULLW ZPPtrDNS
|
|
|
|
|
|
sec
|
|
|
|
|
|
rts
|
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
|
MAN
|
2018-11-17 17:17:13 +00:00
|
|
|
|
SAVE USR/SRC/LIB/LIBTCPIP.S.HST
|
|
|
|
|
|
LOAD USR/SRC/LIB/LIBTCPIP.S
|
2016-03-13 22:09:00 +00:00
|
|
|
|
ASM
|
