mirror of https://github.com/A2osX/A2osX.git
117 lines
1.9 KiB
Plaintext
117 lines
1.9 KiB
Plaintext
NEW
|
||
AUTO 3,1
|
||
*--------------------------------------
|
||
NBP.IN
|
||
clc
|
||
rts
|
||
*--------------------------------------
|
||
NBP.Clear
|
||
*--------------------------------------
|
||
NBP.Query
|
||
|
||
clc
|
||
rts
|
||
*--------------------------------------
|
||
NBP.Lookup >PULLW ZPDataInPtr PSTR/PSTR/PSTR/0
|
||
|
||
ldy #$ff
|
||
|
||
.1 iny
|
||
lda (ZPDataInPtr),y
|
||
bne .1
|
||
|
||
tya
|
||
clc
|
||
adc #S.NBPTUPLE+2 +F+ID
|
||
tay
|
||
lda #0
|
||
adc #0
|
||
|
||
jsr FRM.NewDDP
|
||
bcs .9
|
||
|
||
lda #S.DDP2.TYPE.NBP
|
||
|
||
ldy #S.DDP2.DST.SKT
|
||
sta (ZPFrameOutPtr),y
|
||
iny S.DDP2.SRC.SKT
|
||
sta (ZPFrameOutPtr),y
|
||
|
||
ldy #S.DDP2.TYPE
|
||
sta (ZPFrameOutPtr),y
|
||
|
||
ldy #S.NBP.F
|
||
lda #S.NBP.F.LkUpReq+1
|
||
sta (ZPFrameOutPtr),y
|
||
|
||
inc NBP.ID
|
||
lda NBP.ID
|
||
iny S.NBP.ID
|
||
sta (ZPFrameOutPtr),y
|
||
|
||
iny S.NBP.Tuples
|
||
|
||
lda ETKCFG+S.ETKCFG.NetID+1
|
||
sta (ZPFrameOutPtr),y
|
||
|
||
iny
|
||
lda ETKCFG+S.ETKCFG.NetID
|
||
sta (ZPFrameOutPtr),y
|
||
|
||
iny
|
||
lda ETKCFG+S.ETKCFG.NodID
|
||
sta (ZPFrameOutPtr),y
|
||
|
||
iny
|
||
lda #S.DDP2.TYPE.NBP
|
||
sta (ZPFrameOutPtr),y
|
||
|
||
iny
|
||
lda #0 S.NBPTUPLE.Enum
|
||
sta (ZPFrameOutPtr),y
|
||
|
||
.2 lda (ZPDataInPtr)
|
||
beq .4
|
||
|
||
inc ZPDataInPtr
|
||
bne .3
|
||
|
||
inc ZPDataInPtr+1
|
||
|
||
.3 iny
|
||
sta (ZPFrameOutPtr),y
|
||
bra .2
|
||
|
||
.4 cpy #60
|
||
bcs .8
|
||
|
||
iny
|
||
sta (ZPFrameOutPtr),y
|
||
bra .4
|
||
|
||
.8 ldy #S.DDP2.DST.NET
|
||
lda #0
|
||
* lda ETKCFG+S.ETKCFG.NetID+1
|
||
sta (ZPFrameOutPtr),y
|
||
|
||
iny
|
||
* lda ETKCFG+S.ETKCFG.NetID
|
||
sta (ZPFrameOutPtr),y
|
||
|
||
lda #$ff
|
||
* lda #0 all routers
|
||
ldy #S.DDP2.DST.NOD
|
||
sta (ZPFrameOutPtr),y
|
||
|
||
jmp FRM.SendDDP
|
||
|
||
.9 rts
|
||
*--------------------------------------
|
||
NBP.GetCache clc
|
||
rts
|
||
*--------------------------------------
|
||
MAN
|
||
SAVE usr/src/lib/libetalk.s.nbp
|
||
LOAD usr/src/lib/libetalk.s
|
||
ASM
|