2016-01-16 22:04:22 +00:00
|
|
|
|
PR#3
|
|
|
|
|
PREFIX /A2OSX.SRC
|
2017-01-30 16:30:39 +00:00
|
|
|
|
LOMEM $A00
|
2016-01-16 22:04:22 +00:00
|
|
|
|
INC 1
|
|
|
|
|
AUTO 6
|
|
|
|
|
.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
|
|
|
|
|
|
|
|
|
ldy #S.IP.SRC+3
|
|
|
|
|
ldx #3
|
2016-01-16 22:04:22 +00:00
|
|
|
|
|
2017-01-31 16:40:37 +00:00
|
|
|
|
.2 lda (ZPFrameInPtr),y
|
2016-03-16 07:19:54 +00:00
|
|
|
|
sta ARP.TmpCache+S.ARPCACHE.IP,x
|
2016-03-13 22:09:00 +00:00
|
|
|
|
dey
|
|
|
|
|
dex
|
|
|
|
|
bpl .2
|
2016-01-16 22:04:22 +00:00
|
|
|
|
|
2016-03-13 22:09:00 +00:00
|
|
|
|
ldy #S.IP.DST+3
|
|
|
|
|
ldx #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
|
2017-01-31 16:40:37 +00:00
|
|
|
|
sta (ZPFrameInPtr),y
|
2016-03-13 22:09:00 +00:00
|
|
|
|
dey
|
|
|
|
|
dex
|
|
|
|
|
bpl .3
|
|
|
|
|
|
|
|
|
|
ldy #S.ETH.SRCMAC+5
|
|
|
|
|
ldx #5
|
|
|
|
|
|
2017-01-31 16:40:37 +00:00
|
|
|
|
.4 lda (ZPFrameInPtr),y
|
2016-03-16 07:19:54 +00:00
|
|
|
|
sta ARP.TmpCache+S.ARPCACHE.MAC,x
|
2016-03-13 22:09:00 +00:00
|
|
|
|
dey
|
|
|
|
|
dex
|
|
|
|
|
bpl .4
|
|
|
|
|
|
2016-03-16 16:37:02 +00:00
|
|
|
|
lda #K.ARP.TTL
|
|
|
|
|
sta ARP.TmpCache+S.ARPCACHE.TTL
|
|
|
|
|
lda /K.ARP.TTL
|
|
|
|
|
sta ARP.TmpCache+S.ARPCACHE.TTL+1
|
|
|
|
|
|
2016-03-16 07:19:54 +00:00
|
|
|
|
lda #S.ARPCACHE.STATUS.RESOLVED
|
|
|
|
|
jsr ARP.ADD.I
|
2016-03-13 22:09:00 +00:00
|
|
|
|
|
2017-01-30 16:30:39 +00:00
|
|
|
|
lda hFrameIn
|
|
|
|
|
sta hFrameOut DO NOT DISCARD this frame,it is SOURCE frame!!!
|
2017-01-31 16:40:37 +00:00
|
|
|
|
>LDYA ZPFrameInPtr
|
|
|
|
|
>STYA ZPFrameOutPtr
|
2017-01-30 16:30:39 +00:00
|
|
|
|
jmp FRM.SendICMP
|
|
|
|
|
|
|
|
|
|
ICMP.IN.EXIT lda hFrameIn
|
|
|
|
|
>SYSCALL FreeMemA
|
2016-01-16 22:04:22 +00:00
|
|
|
|
rts
|
|
|
|
|
*--------------------------------------
|
2017-01-30 16:30:39 +00:00
|
|
|
|
ICMP.IN.ECHOREP jsr IP.FillTmpSocketSrcDst
|
|
|
|
|
|
|
|
|
|
lda #S.IP.PROTOCOL.ICMP
|
|
|
|
|
sta TmpSocket+S.SOCKET.RAW.PROTO
|
|
|
|
|
|
|
|
|
|
ldy #S.ICMP.IDENTIFIER
|
2017-01-31 16:40:37 +00:00
|
|
|
|
lda (ZPFrameInPtr),y
|
2017-01-31 22:13:26 +00:00
|
|
|
|
sta TmpSocket+S.SOCKET.DST.PORT+1
|
2017-01-30 16:30:39 +00:00
|
|
|
|
iny
|
2017-01-31 16:40:37 +00:00
|
|
|
|
lda (ZPFrameInPtr),y
|
2017-01-31 22:13:26 +00:00
|
|
|
|
sta TmpSocket+S.SOCKET.DST.PORT
|
2017-01-30 16:30:39 +00:00
|
|
|
|
|
|
|
|
|
>LDYA L.SKT.TABLE
|
|
|
|
|
>STYA ZPPtrSKT
|
|
|
|
|
|
|
|
|
|
ldx #0
|
|
|
|
|
|
|
|
|
|
.3 lda (ZPPtrSKT)
|
|
|
|
|
beq .7
|
|
|
|
|
cmp #S.SOCKET.SOCK.RAW
|
|
|
|
|
bne .7
|
|
|
|
|
|
|
|
|
|
ldy #S.SOCKET.SRC.ADDR
|
|
|
|
|
|
|
|
|
|
.4 lda (ZPPtrSKT),y
|
|
|
|
|
cmp TmpSocket,y
|
|
|
|
|
bne .7
|
|
|
|
|
iny
|
|
|
|
|
cpy #S.SOCKET.DST.PORT Compare SRC.ADDR,SRC.PORT,DST.ADDR
|
|
|
|
|
bne .4
|
|
|
|
|
|
|
|
|
|
lda hFrameIn
|
|
|
|
|
jsr SKT.AddToQueueA
|
|
|
|
|
bcs .9 Q full, discard...
|
|
|
|
|
|
|
|
|
|
rts DO NOT Discard this queued frame
|
|
|
|
|
|
|
|
|
|
.7 lda ZPPtrSKT
|
|
|
|
|
clc
|
|
|
|
|
adc #S.SOCKET
|
|
|
|
|
sta ZPPtrSKT
|
|
|
|
|
bcc .8
|
|
|
|
|
inc ZPPtrSKT+1
|
|
|
|
|
|
|
|
|
|
.8 inx
|
|
|
|
|
cpx #K.SKTTABLE.SIZE
|
|
|
|
|
bne .3
|
|
|
|
|
|
|
|
|
|
.9 lda hFrameIn
|
|
|
|
|
>SYSCALL FreeMemA
|
|
|
|
|
rts
|
|
|
|
|
*--------------------------------------
|
2016-01-16 22:04:22 +00:00
|
|
|
|
MAN
|
|
|
|
|
SAVE LIB/LIBTCPIP.S.ICMP
|
|
|
|
|
LOAD LIB/LIBTCPIP.S
|
|
|
|
|
ASM
|