2017-12-22 21:24:30 +00:00
|
|
|
|
NEW
|
2017-03-29 15:48:15 +00:00
|
|
|
|
PREFIX /A2OSX.BUILD
|
2017-12-22 21:24:30 +00:00
|
|
|
|
AUTO 4,1
|
2016-01-16 22:04:22 +00:00
|
|
|
|
.LIST OFF
|
|
|
|
|
*--------------------------------------
|
|
|
|
|
ICMP.IN ldy #S.ICMP.TYPE
|
2017-01-31 16:40:37 +00:00
|
|
|
|
lda (ZPFrameInPtr),y
|
2017-01-30 16:30:39 +00:00
|
|
|
|
cmp #S.ICMP.TYPE.ECHOREP
|
|
|
|
|
beq ICMP.IN.ECHOREP
|
|
|
|
|
|
2016-01-16 22:04:22 +00:00
|
|
|
|
cmp #S.ICMP.TYPE.ECHOREQ
|
2017-01-30 16:30:39 +00:00
|
|
|
|
bne ICMP.IN.EXIT
|
2017-01-31 16:40:37 +00:00
|
|
|
|
*--------------------------------------
|
2017-01-30 16:30:39 +00:00
|
|
|
|
ICMP.IN.ECHOREQ ldy #S.IP.DST+3
|
|
|
|
|
ldx #3
|
|
|
|
|
|
2017-01-31 16:40:37 +00:00
|
|
|
|
.1 lda (ZPFrameInPtr),y
|
2017-01-30 16:30:39 +00:00
|
|
|
|
cmp IPCFG+S.IPCFG.IP,x
|
|
|
|
|
bne ICMP.IN.EXIT
|
|
|
|
|
dey
|
|
|
|
|
dex
|
2016-03-13 22:09:00 +00:00
|
|
|
|
bne .1
|
2016-01-16 22:04:22 +00:00
|
|
|
|
|
|
|
|
|
ldy #S.ICMP.TYPE
|
|
|
|
|
lda #S.ICMP.TYPE.ECHOREP
|
2017-01-31 16:40:37 +00:00
|
|
|
|
sta (ZPFrameInPtr),y
|
2016-03-13 22:09:00 +00:00
|
|
|
|
|
2018-09-21 15:28:46 +00:00
|
|
|
|
jsr ARP.AddFromFrameInPtr
|
2016-01-16 22:04:22 +00:00
|
|
|
|
|
2018-09-21 15:28:46 +00:00
|
|
|
|
lda hFrameIn
|
|
|
|
|
stz hFrameIn DO NOT DISCARD this frame,it is SOURCE frame!!!
|
2016-01-16 22:04:22 +00:00
|
|
|
|
|
2018-09-21 15:28:46 +00:00
|
|
|
|
sta hFrameOut
|
|
|
|
|
>LDYA ZPFrameInPtr
|
|
|
|
|
>STYA ZPFrameOutPtr
|
|
|
|
|
|
2016-03-13 22:09:00 +00:00
|
|
|
|
ldx #3
|
2018-09-21 15:28:46 +00:00
|
|
|
|
ldy #S.IP.DST+3
|
2016-01-16 22:04:22 +00:00
|
|
|
|
|
2016-03-16 07:19:54 +00:00
|
|
|
|
.3 lda ARP.TmpCache+S.ARPCACHE.IP,x
|
2018-09-21 15:28:46 +00:00
|
|
|
|
sta (ZPFrameOutPtr),y
|
2016-03-13 22:09:00 +00:00
|
|
|
|
dey
|
|
|
|
|
dex
|
|
|
|
|
bpl .3
|
|
|
|
|
|
2017-02-15 16:14:41 +00:00
|
|
|
|
jmp FRM.SendIP
|
2017-01-30 16:30:39 +00:00
|
|
|
|
|
|
|
|
|
ICMP.IN.EXIT lda hFrameIn
|
2018-08-08 15:13:37 +00:00
|
|
|
|
beq .8
|
2018-07-18 15:30:42 +00:00
|
|
|
|
>SYSCALL FreeMem
|
2018-09-18 20:43:48 +00:00
|
|
|
|
stz hFrameIn
|
2018-08-08 15:13:37 +00:00
|
|
|
|
.8 rts
|
2016-01-16 22:04:22 +00:00
|
|
|
|
*--------------------------------------
|
2018-10-08 15:41:00 +00:00
|
|
|
|
ICMP.IN.ECHOREP jsr FRM.GetTargetSKT.RAW
|
2017-01-30 16:30:39 +00:00
|
|
|
|
|
|
|
|
|
ldy #S.ICMP.IDENTIFIER
|
2017-01-31 16:40:37 +00:00
|
|
|
|
lda (ZPFrameInPtr),y
|
2018-11-06 07:09:44 +00:00
|
|
|
|
sta SKT.LOC.ADDR+S.SOCKADDR.PORT
|
2017-01-30 16:30:39 +00:00
|
|
|
|
iny
|
2017-01-31 16:40:37 +00:00
|
|
|
|
lda (ZPFrameInPtr),y
|
2018-11-06 07:09:44 +00:00
|
|
|
|
sta SKT.LOC.ADDR+S.SOCKADDR.PORT+1
|
2017-01-30 16:30:39 +00:00
|
|
|
|
|
2018-10-08 15:41:00 +00:00
|
|
|
|
jsr SKT.FindMatchingLocRem
|
|
|
|
|
bcs .9
|
2017-02-01 21:21:46 +00:00
|
|
|
|
|
2018-10-08 15:41:00 +00:00
|
|
|
|
ldy #S.SOCKET.PROTO
|
|
|
|
|
lda (ZPPtrSKT),y
|
|
|
|
|
ldy #S.SOCKET.PROTO
|
|
|
|
|
lda (ZPPtrSKT),y
|
|
|
|
|
cmp #S.IP.PROTOCOL.ICMP
|
|
|
|
|
bne .9
|
|
|
|
|
|
2017-01-30 16:30:39 +00:00
|
|
|
|
lda hFrameIn
|
|
|
|
|
jsr SKT.AddToQueueA
|
|
|
|
|
bcc .8
|
|
|
|
|
|
2018-10-08 15:41:00 +00:00
|
|
|
|
.9 lda hFrameIn Q full, discard...
|
|
|
|
|
>SYSCALL FreeMem
|
|
|
|
|
.8 rts
|
2017-02-13 07:26:18 +00:00
|
|
|
|
*--------------------------------------
|
2016-01-16 22:04:22 +00:00
|
|
|
|
MAN
|
2017-03-30 06:31:12 +00:00
|
|
|
|
SAVE /A2OSX.SRC/LIB/LIBTCPIP.S.ICMP
|
|
|
|
|
LOAD /A2OSX.SRC/LIB/LIBTCPIP.S
|
2016-01-16 22:04:22 +00:00
|
|
|
|
ASM
|