sys7.1-doc-wip/Internal/Asm/AtalkPrivateEQU.a
2019-07-27 22:37:48 +08:00

147 lines
5.0 KiB
Plaintext
Raw Permalink Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

;
; File: ATalkPrivateEQU.a
;
; Contains: Globally important stuff, but private to AppleTalk
;
; Written by: Mike Shoemaker
;
; Copyright: © 1990-91 by Apple Computer, Inc., all rights reserved.
;
; Change History (most recent first):
;
; <3> 5/21/91 gbm Nail a couple of warnings
; <2> 1/30/91 gbm sab, #38: Change the already including this file variable to
; all uppercase (for security reasons)
; <1> 1/18/91 mbs (jg) First moved to BBS
; <12> 1/10/91 mjq Add 'AddCSCode' and 'AddCSAddr' with Undefined checking for BBS.
; <11> 1/08/91 mjq Add UNDEFINED checking on CancelAtalkClosePrep.
; <10> 1/08/91 mjq Add some UNDEFINED checking. Include MPPmacros2.a
; <8> 12/21/90 mbs Add transition queue event codes for NBP name change
; <7> 12/13/90 mbs Add new csCode for stalling when opening .MPP
; <6> 11/28/90 mbs Add Transition Queue equate for network transition
; <5> 10/31/90 mbs Add more things to the 976 call
; <4> 10/23/90 mbs Add new .MPP control code to get 976 hooks
; <3> 10/16/90 mbs Move more private stuff from AtalkEqu.a
; <2> 10/04/90 mbs Created from AtalkEqu.a. This stuff is not for public
; consumption
;
; To Do:
;
IF &TYPE('__INCLUDINGATALKPRIVATEEQU__') = 'UNDEFINED' THEN
__INCLUDINGATALKPRIVATEEQU__ SET 1
;
; Private .MPP control Codes
;
MPPStall EQU 2 ; NOP csCode issued to ourselves while opening
CancelAtalkClosePrep EQU 260 ; (MPP) cancel above <I didn't know where this went, so I stuck it here -gbm>
NetworkWrite EQU 261 ; write to network
AddNodeID EQU 262 ; obtain an additional node id
Get976Hooks EQU 263
;
; Records for Private .MPP control code parameter blocks
;
Get976HooksRec RECORD csParam
pRouterAddr ds.l 1
pConfig ds.l 1
pZoneHint ds.l 1
pCableLo ds.l 1
pCableHi ds.l 1
pHkPtr976 ds.l 1 ; --> Ptr to this in .MPP vars
pHkSelfSendPtr ds.l 1 ; --> Ptr to this in .MPP vars
ENDR
;
; Transition Queue Transition types (Private)
;
ATTransNetwork EQU 5 ; One or more Network numbers have disappeared
ATTransChangeName EQU 6 ; NBP Name has changed
ATTransOKToChangeName EQU 7 ; Ok to change NBP Name?
ATTransChangeCancelled EQU 8 ; NBP Name Change was cancelled
;
; Equates for Best Router Table
;
BRTtimer EQU 40 ; aging timer value (in secs)
BRTindex EQU 31 ; no. of BRT hash buckets
BRTelems EQU 30 ; no. of entries in BRT
BRTkeySz EQU 2 ; size of an AppleTalk network no. (in bytes)
BRTdataSz EQU 6 ; size of a link layer address (in bytes)
;
; Equates for use in calling the 976 hooks from
; the AppleTalk drivers
;
Hk976PktValidate EQU 1 ; used to validate the source of a incoming packet
Hk976RTMPData EQU 2 ; called on rtmp packets
Hk976Route EQU 3 ; route hook for ddp writes
Hk976ZoneChange EQU 4 ; hook to call on zone change
Hk976AgeRouter EQU 5 ; hook to call when aging router to zero
Hk976GMZQuery EQU 6 ; ask 976 if we should filter for getmyzone
Hk976NBPNetCmp EQU 7 ; Intelligent net zero comparison on NBP Replies
; Net Alert STR# indices
NalertBadZone EQU 1 ; invalid zone name alert
NalertStartup EQU 3 ; in startup range
NalertBadNet EQU 4 ; network out of range
IF (&TYPE('sMgrROM') = 'UNDEFINED') THEN
sMgrROM EQU $76 ; First ROM with start manager/AGB pointer
;
;
; AppleTalk Global Block (AGB) definitions - the following block is pointed to by
; a handle in low memory (if ROM). It looks as follows:
; .LONG XPP variable pointer (zero = none)
; .LONG XPP patch hook (zero = none)
; .LONG ATP patch hook (zero = none)
; .LONG filler
;
;
xppVarPtr EQU 0 ; Offset to XPP variable pointer
xppHook EQU 4 ; Offset to XPP patching hook
atpHook EQU 8 ; Offset to ATP patching hook
agbSize EQU $10 ; Size of AGB
;
AGBHandle EQU $0D1C ; handle to appletalk global block
;
; Does anyone but LocalTalk use this? (It's an offset into MPP's globals)
;
afterGlobals EQU $22 ; After the globals
ncVersion EQU 45 ; First version with new AppleTalk calls
ELSE
_AssumeEq xppVarPtr,0
_AssumeEq xppHook,4
_AssumeEq atpHook,8
_AssumeEq agbSize,$10
_AssumeEq afterGlobals,$22
_AssumeEq ncVersion,45
ENDIF
MNProtoType EQU $80 ; protocol type for multi-nodes
;
; List of adev resource IDs (nos. 1 thru 127 are reserved for Apple's use)
IF (&TYPE('adevPPort') = 'UNDEFINED') THEN
adevPPort EQU 1 ; printer port built-in LocalTalk
adevET10 EQU 2 ; non-extended EtherTalk
adevMPort EQU 3 ; modem port built-in LocalTalk
adevTT20 EQU 5 ; extended TokenTalk
adevET20 EQU 10 ; extended EtherTalk
adevRouter EQU 127
ELSE
_AssumeEq adevPPort,1
_AssumeEq adevET10,2
_AssumeEq adevMPort,3
_AssumeEq adevTT20,5
_AssumeEq adevET20,10
_AssumeEq adevRouter,127
ENDIF
ENDIF ; ...already included