mirror of
https://github.com/elliotnunn/mac-rom.git
synced 2026-04-22 08:16:36 +00:00
Bring in CubeE sources
Resource forks are included only for .rsrc files. These are DeRezzed into their data fork. 'ckid' resources, from the Projector VCS, are not included. The Tools directory, containing mostly junk, is also excluded.
This commit is contained in:
Elliot Nunn
@@ -0,0 +1,101 @@
|
||||
;
|
||||
; File: 802Equ.a
|
||||
;
|
||||
; Contains: xxx put contents here (or delete the whole line) xxx
|
||||
;
|
||||
; Written by: xxx put name of writer here (or delete the whole line) xxx
|
||||
;
|
||||
; Copyright: © 1989-1991 by Apple Computer, Inc., all rights reserved.
|
||||
;
|
||||
; Change History (most recent first):
|
||||
;
|
||||
; <1> 10/14/91 JSM first checked in
|
||||
; <1.1> 9/8/89 jhl Phase 2 AppleTalk with final mods and VM rolled in.
|
||||
; <1.0> 6/14/89 WTO Adding AppleTalk 2.0 for first time.
|
||||
;
|
||||
;
|
||||
|
||||
;EASE$$$ READ ONLY COPY of file Ò802Equ.aÓ
|
||||
; 1.1 jhl 09/08/1989 Phase 2 AppleTalk with final mods and VM rolled in.
|
||||
; 1.0 WTO 06/14/1989 Adding AppleTalk 2.0 for first time.
|
||||
; END EASE MODIFICATION HISTORY
|
||||
;-----------=-----------=-------------------------------=---------------------------------------
|
||||
; 802Equ.a - Equates for IEEE network standards
|
||||
;
|
||||
; Kerry E. Lynn
|
||||
; Feb 1989
|
||||
;
|
||||
; Copyright (C) 1989 by:
|
||||
;
|
||||
; Apple Computer, Inc.
|
||||
; 20525 Mariani Ave.
|
||||
; Cupertino, CA 95014
|
||||
;
|
||||
; All Rights Reserved.
|
||||
;-----------=-----------=-------------------------------=---------------------------------------
|
||||
|
||||
; 24-bit quantities, left justified
|
||||
|
||||
AppleCode EQU $08000700 ; Apple's vendor code for 802.2 Individual addr
|
||||
MultiCode EQU $09000700 ; Apple's vendor code for 802.2 Group addr
|
||||
|
||||
|
||||
; Size of a MAC addr
|
||||
|
||||
MACAddrSz EQU 6 ; max size (in bytes) for data link addr
|
||||
MaxMCastSz EQU MACAddrSz ; max size (in bytes) for multicast addr
|
||||
|
||||
;---------------------------------------
|
||||
; 802.3 MAC packet header
|
||||
;---------------------------------------
|
||||
|
||||
MDstAddr EQU 0 ; Offset to destination address
|
||||
MSrcAddr EQU MDstAddr+MACAddrSz ; Offset to source address
|
||||
MLength EQU MSrcAddr+MACAddrSz ; Offset to LLC length
|
||||
MHdrSize EQU MLength+2 ; 802.3 MAC header size
|
||||
|
||||
;---------------------------------------
|
||||
; 802.2 LLC (Type 1) packet header
|
||||
;---------------------------------------
|
||||
|
||||
LDSAP EQU 0 ; Offset to destination Service Access Point (SAP)
|
||||
IGBIT EQU 0 ; I/G = 0 if Individual DSAP, = 1 if Group DSAP
|
||||
|
||||
LSSAP EQU LDSAP+1 ; Offset to source SAP
|
||||
CRBIT EQU 0 ; C/R = 0 if Command, = 1 if Response
|
||||
|
||||
LCtrl EQU LSSAP+1 ; Offset to LLC CONTROL field (see below)
|
||||
LHdrSize EQU LCtrl+1
|
||||
|
||||
LInfo EQU LHdrSize ; Offset to LLC Information
|
||||
|
||||
GlobalSAP EQU $FF
|
||||
NullSAP EQU 0
|
||||
|
||||
;---------------------------------------
|
||||
; CONTROL field bits for 802.2 Type 1 LLC Protocol Data Units (PDUs)
|
||||
;---------------------------------------
|
||||
|
||||
UI EQU %00000011 ; value for "Unnumbered Information" (P/F bit must be 0)
|
||||
XID EQU %10101111 ; mask for "Exchange Identification" (P/F bit may be 0 or 1)
|
||||
TEST EQU %11100011 ; mask for "Test" (P/F bit may be 0 or 1)
|
||||
|
||||
PFBIT EQU 4 ; P/F = 0 if Poll (command), = 1 if Final (response)
|
||||
|
||||
;---------------------------------------
|
||||
; XID information field
|
||||
;---------------------------------------
|
||||
|
||||
XIDformat EQU %10000001 ; indicates IEEE basic format
|
||||
XIDinfo1 EQU %00000001 ; indicates Type 1 AND Class I LLC
|
||||
XIDinfo2 EQU %00000000 ; receive window size = N/A
|
||||
|
||||
XIDinfoSz EQU 3 ; number of bytes in an XID response
|
||||
|
||||
;---------------------------------------
|
||||
; Sub-Network Access Protocol (SNAP) packet header
|
||||
;---------------------------------------
|
||||
|
||||
SType EQU 0 ; 5-byte protocol discriminator
|
||||
SHdrSize EQU SType+5
|
||||
|
||||
@@ -0,0 +1,86 @@
|
||||
;
|
||||
; File: AARPequ.a
|
||||
;
|
||||
; Contains: xxx put contents here (or delete the whole line) xxx
|
||||
;
|
||||
; Written by: xxx put name of writer here (or delete the whole line) xxx
|
||||
;
|
||||
; Copyright: © 1987-1991 by Apple Computer, Inc., all rights reserved.
|
||||
;
|
||||
; Change History (most recent first):
|
||||
;
|
||||
; <1> 10/14/91 JSM first checked in
|
||||
; <1.1> 9/8/89 jhl Phase 2 AppleTalk with final mods and VM rolled in.
|
||||
; <1.0> 6/14/89 WTO Adding AppleTalk 2.0 for first time.
|
||||
;
|
||||
;
|
||||
|
||||
;EASE$$$ READ ONLY COPY of file ÒAARPequ.aÓ
|
||||
; 1.1 jhl 09/08/1989 Phase 2 AppleTalk with final mods and VM rolled in.
|
||||
; 1.0 WTO 06/14/1989 Adding AppleTalk 2.0 for first time.
|
||||
; END EASE MODIFICATION HISTORY
|
||||
;___________________________________________________________________________
|
||||
;
|
||||
; AARPEqu.a - Apple Address Resolution Protocol Equates
|
||||
;
|
||||
; Alan Oppenheimer
|
||||
; February 1987
|
||||
;
|
||||
; Version 1.1a1 12/7/87 Up AARP retries.
|
||||
; Version 1.0d4 5/13/87 Add retransmission equates
|
||||
; Version 1.0d1 2/23/87
|
||||
;
|
||||
; COPYRIGHT (C) 1987 APPLE COMPUTER
|
||||
;___________________________________________________________________________
|
||||
|
||||
;
|
||||
; AARP protocol type
|
||||
;
|
||||
|
||||
AARP EQU $80F3
|
||||
|
||||
;
|
||||
; Offsets in packet
|
||||
;
|
||||
|
||||
AAHardware EQU 0 ; Hardware Type
|
||||
AAProtocol EQU AAHardware+2 ; Protocol Type
|
||||
AAHLength EQU AAProtocol+2 ; Hardware Length
|
||||
AAPLength EQU AAHLength+1 ; Protocol Length
|
||||
AACommand EQU AAPLength+1 ; AARP command
|
||||
AAData EQU AACommand+2 ; Data start
|
||||
|
||||
;
|
||||
; AARP commands
|
||||
;
|
||||
|
||||
AARPReq EQU 1 ; Request
|
||||
AARPResp EQU 2 ; Response
|
||||
AARPProbe EQU 3 ; Probe
|
||||
|
||||
;
|
||||
; EtherTalk specifics
|
||||
;
|
||||
|
||||
H_Ethernet EQU 1 ; Hardware type for Ethernet
|
||||
HL_Ethernet EQU 6 ; Ethernet address length
|
||||
P_AppleTalk EQU $809B ; Protocol type for AppleTalk
|
||||
PL_AppleTalk EQU 4 ; AppleTalk address length
|
||||
|
||||
AAESrcPhys EQU AAData ; Source Physical Address offset
|
||||
AAESrcLog EQU AAESrcPhys+HL_Ethernet ; Source Logical Address
|
||||
AAEDstPhys EQU AAESrcLog+PL_AppleTalk ; Dest Physical Address
|
||||
AAEDstLog EQU AAEDstPhys+HL_Ethernet ; Dest Logical Address
|
||||
AAEEnd EQU AAEDstLog+PL_AppleTalk ; End of packet
|
||||
|
||||
;
|
||||
; Retransmission equates
|
||||
;
|
||||
|
||||
APrbTicks EQU 12 ; Number of ticks between probes
|
||||
AReqTicks EQU 6 ; Number of ticks between requests (1.1)
|
||||
AReqTries EQU 10 ; Number of tries on requests (1.1)
|
||||
|
||||
|
||||
|
||||
|
||||
@@ -0,0 +1,96 @@
|
||||
;
|
||||
; File: ENETequ.a
|
||||
;
|
||||
; Contains: xxx put contents here (or delete the whole line) xxx
|
||||
;
|
||||
; Written by: xxx put name of writer here (or delete the whole line) xxx
|
||||
;
|
||||
; Copyright: © 1987-1991 by Apple Computer, Inc., all rights reserved.
|
||||
;
|
||||
; Change History (most recent first):
|
||||
;
|
||||
; <1> 10/14/91 JSM first checked in
|
||||
; <1.2> 11/16/89 WTO Added support for VM deferrals.
|
||||
; <1.1> 9/8/89 jhl Phase 2 AppleTalk with final mods and VM rolled in.
|
||||
; <1.0> 6/14/89 WTO Adding AppleTalk 2.0 for first time.
|
||||
;
|
||||
;
|
||||
|
||||
;EASE$$$ READ ONLY COPY of file ÒENETequ.aÓ
|
||||
; 1.2 WTO 11/16/1989 Added support for VM deferrals.
|
||||
; 1.1 jhl 09/08/1989 Phase 2 AppleTalk with final mods and VM rolled in.
|
||||
; 1.0 WTO 06/14/1989 Adding AppleTalk 2.0 for first time.
|
||||
; END EASE MODIFICATION HISTORY
|
||||
IF (&TYPE('MHdrSize') = 'UNDEFINED') THEN
|
||||
INCLUDE '802Equ.a' ; IEEE equates
|
||||
ENDIF
|
||||
|
||||
;
|
||||
; File: ENETEqu.a - equates for the Ethernet driver
|
||||
;
|
||||
; Version 1.1a1
|
||||
;
|
||||
; Copyright 1987 Apple Computer, Inc. All Rights Reserved
|
||||
;
|
||||
|
||||
; Control codes.
|
||||
|
||||
ESetGeneral EQU 253 ; Set "general" mode
|
||||
EGetInfo EQU 252 ; Get info
|
||||
ERdCancel EQU 251 ; Cancel read
|
||||
ERead EQU 250 ; Read
|
||||
EWrite EQU 249 ; Write
|
||||
EDetachPH EQU 248 ; Detach protocol handler
|
||||
EAttachPH EQU 247 ; Attach protocol handler
|
||||
EAddMulti EQU 246 ; Add a multicast address
|
||||
EDelMulti EQU 245 ; Delete a multicast address
|
||||
|
||||
FirstENET EQU EDelMulti ; First ENET command
|
||||
LastENET EQU ESetGeneral ; Last ENET command
|
||||
|
||||
; ENET queue element standard structure: arguments passed in the CSParam area
|
||||
|
||||
EProtType EQU CSParam ; Offset to protocol type code
|
||||
EMultiAddr EQU CSParam ; Multicast address (EAddMulti,EDelMulti)
|
||||
|
||||
EHandler EQU EProtType+2 ; Offset to protocol handler
|
||||
EWDSPointer EQU EHandler ; WDS pointer (EWrite)
|
||||
EBuffPtr EQU EHandler ; Buffer pointer (ERead,EGetInfo)
|
||||
EKillQEl EQU EHandler ; QEl pointer (ERdCancel)
|
||||
|
||||
EBuffSize EQU EBuffPtr+4 ; Buffer size (ERead,EGetInfo)
|
||||
EDataSize EQU EBuffSize+2 ; Actual data size (Eread)
|
||||
|
||||
|
||||
;---------------------------------------
|
||||
; Ethernet packet header
|
||||
;---------------------------------------
|
||||
|
||||
EDestAddr EQU 0 ; Offset to destination address
|
||||
ESrcAddr EQU 6 ; Offset to source address
|
||||
EType EQU 12 ; Offset to data link type
|
||||
EHdrSize EQU 14 ; Ethernet header size
|
||||
|
||||
EMinDataSz EQU 46 ; Minimum data size
|
||||
EMaxDataSz EQU 1500 ; Maximum data size
|
||||
EAddrSz EQU 6 ; Size of an ethernet node address
|
||||
MAddrSz EQU 8 ; Size of an ethernet multicast address (?)
|
||||
|
||||
; These are defined in 802Equ.a
|
||||
;
|
||||
ETHdrSize EQU MHdrSize+LHdrSize+SHdrSize
|
||||
|
||||
;
|
||||
; Errors and misc.
|
||||
;
|
||||
|
||||
eLenErr EQU ddpLenErr ; Length error
|
||||
eMultiErr EQU ddpSktErr ; Multicast address error
|
||||
|
||||
EAddrRType EQU 'eadr' ; Alternate address resource type
|
||||
|
||||
;
|
||||
; Link specific 'atlk' AGetInfo call
|
||||
;
|
||||
ESpeed EQU 10000000 ; Link speed in bits/sec
|
||||
|
||||
@@ -0,0 +1,271 @@
|
||||
;
|
||||
; File: LAPMgrEqu.a
|
||||
;
|
||||
; Contains: xxx put contents here (or delete the whole line) xxx
|
||||
;
|
||||
; Written by: xxx put name of writer here (or delete the whole line) xxx
|
||||
;
|
||||
; Copyright: © 1987-1991 by Apple Computer, Inc., all rights reserved.
|
||||
;
|
||||
; Change History (most recent first):
|
||||
;
|
||||
; <1> 10/14/91 JSM first checked in
|
||||
; <1.4> 11/17/89 CCH Took space out of ÒLM Equates.aÓ.
|
||||
; <1.3> 11/16/89 WTO Added support for VM deferrals.
|
||||
; <1.2> 9/8/89 jhl Phase 2 AppleTalk with final mods and VM rolled in.
|
||||
; <1.1> 7/24/89 SGS Get IOP Atlk out of ROM for F19
|
||||
; <1.0> 6/14/89 WTO Adding AppleTalk 2.0 for first time.
|
||||
;
|
||||
;
|
||||
|
||||
;EASE$$$ READ ONLY COPY of file ÒLapMgrEqu.aÓ
|
||||
; 1.4 CCH 11/17/1989 Took space out of ÒLM Equates.aÓ.
|
||||
; 1.3 WTO 11/16/1989 Added support for VM deferrals.
|
||||
; 1.2 jhl 09/08/1989 Phase 2 AppleTalk with final mods and VM rolled in.
|
||||
; 1.1 SGS 07/24/1989 Get IOP Atlk out of ROM for F19
|
||||
; 1.0 WTO 06/14/1989 Adding AppleTalk 2.0 for first time.
|
||||
; END EASE MODIFICATION HISTORY
|
||||
IF (&TYPE('MHdrSize') = 'UNDEFINED') THEN
|
||||
INCLUDE '802Equ.a' ; IEEE equates
|
||||
ENDIF
|
||||
|
||||
IF (&TYPE('WDSEntrySz') = 'UNDEFINED') THEN
|
||||
INCLUDE 'ATalkEqu.a' ; AppleTalk equates
|
||||
ENDIF
|
||||
|
||||
IF (&TYPE('xMaxCall') = 'UNDEFINED') THEN
|
||||
INCLUDE 'ATalkEqu2.a' ; New AppleTalk equates
|
||||
ENDIF
|
||||
|
||||
INCLUDE 'LMEquates.a' ; public equeates
|
||||
|
||||
;___________________________________________________________________________
|
||||
;
|
||||
; LAPMgrEqu.a - LAP manager and AppleTalk Device CDEV equates
|
||||
;
|
||||
; Alan Oppenheimer
|
||||
; April 1987
|
||||
;
|
||||
; Version 2.0a0 5/6/88 Added ReSelADEV
|
||||
; Version 2.0d1 9/22/87 For multi-port
|
||||
; Version 1.0b2 7/14/87 AARP attach and detach, GetATalkInfo calls
|
||||
; Version 1.0d4 4/28/87
|
||||
;
|
||||
; COPYRIGHT (C) 1987,1988 APPLE COMPUTER
|
||||
;___________________________________________________________________________
|
||||
|
||||
; atlk call codes passed in D0 (call at atlk start plus 2)
|
||||
|
||||
AOpen EQU 7 ; Open an ATlk
|
||||
AClose Equ 8 ; Close an ATlk
|
||||
|
||||
|
||||
;
|
||||
; Lowmem equates
|
||||
;
|
||||
ATalkPRAM EQU $E0 ; Start of our PRAM
|
||||
LAPMgrByte EQU $60 ; Value of byte pointed to by LAPMgrPtr
|
||||
LAPMgrVers EQU 6 ; Offset to LAP manager version number
|
||||
|
||||
|
||||
; Notification Manager
|
||||
|
||||
NMRec RECORD 0
|
||||
qLink DS.L 1 ; next queue entry
|
||||
qType DS.W 1 ; queue type -- ORD(nmType) = 8
|
||||
nmFlags DS.W 1 ; reserved
|
||||
nmPrivate DS.L 1 ; reserved
|
||||
nmReserved DS.W 1 ; reserved
|
||||
nmMark DS.W 1 ; item to mark in Apple menu
|
||||
nmSIcon DS.L 1 ; handle to small icon
|
||||
nmSound DS.L 1 ; handle to sound record
|
||||
nmStr DS.L 1 ; string to appear in alert
|
||||
nmResp DS.L 1 ; ptr to response routine
|
||||
nmRefCon DS.L 1 ; for application use
|
||||
NMRecSz DS.B 0
|
||||
ENDR
|
||||
|
||||
|
||||
IF (&TYPE('nmType') = 'UNDEFINED') THEN
|
||||
nmType EQU 8
|
||||
|
||||
; _NMInstall OPWORD $A05E
|
||||
; _NMRemove OPWORD $A05F
|
||||
ENDIF
|
||||
|
||||
|
||||
;__________________________________
|
||||
;
|
||||
; Format of AARP listener table (one for each slot):
|
||||
; .BYTE NumInUse ; Number of entries in use
|
||||
; .BYTE Unused
|
||||
; .WORD DrvrRefnum ; Driver refnum we're using
|
||||
; .LONG Types1, ..., TypesN ; Hardware/protocol types (zero = free)
|
||||
; .LONG ListnAddr1, ..., ListnAddrN ; Listener addresses
|
||||
;__________________________________
|
||||
|
||||
NumLTs EQU 6 ; Number of AARP listener tables
|
||||
LTEntries EQU 1 ; Entries in an AARP listener table
|
||||
LTTypeSz EQU 4 ; AARP types are 4 bytes
|
||||
PtrSz EQU 4 ; A pointer is 4 bytes also
|
||||
|
||||
|
||||
LTEntry RECORD 0 ; listener tables entry
|
||||
LTNumInUse DS.B 1 ; Number of entries in use
|
||||
LTFiller DS.B 1 ; Unused
|
||||
LTDrvrRefnum DS.W 1 ; Driver refnum we're using
|
||||
LTTypes DS.B (LTEntries*LTTypeSz) ; List of types
|
||||
LTListnrs DS.B (LTEntries*PtrSz) ; List of listener addresses
|
||||
LTSize DS.B 0
|
||||
ENDR
|
||||
|
||||
|
||||
|
||||
|
||||
;__________________________________
|
||||
;
|
||||
; Format of LLC listener tables (one for each slot):
|
||||
;
|
||||
;
|
||||
;
|
||||
;
|
||||
;
|
||||
;__________________________________
|
||||
|
||||
|
||||
numDRVRs EQU 6
|
||||
|
||||
DRVRentry RECORD 0
|
||||
DrvrRefnum DS.B 2 ; Refnum of installed driver
|
||||
SAPsInUse DS.B 2 ; Number of SAP listeners installed
|
||||
SNAPsInUse DS.B 2 ; Number of SNAP listeners installed
|
||||
AARPsInUse DS.B 2 ; Number of AARP listeners installed
|
||||
DRVRentrySz DS.B 0
|
||||
ENDR
|
||||
|
||||
|
||||
numSAPs EQU 8
|
||||
|
||||
SAPentry RECORD 0
|
||||
protoCode DS.B 4 ; ptr to listener
|
||||
protoDRVR DS.B 2 ; refNum of this entry's DRVR
|
||||
protoType DS.B 2 ; 1-byte type + 1-byte pad
|
||||
SAPentrySz DS.B 0
|
||||
ENDR
|
||||
|
||||
|
||||
numSNAPs EQU 16
|
||||
|
||||
SNAPentry RECORD 0
|
||||
protoCode DS.B 4 ; ptr to listener
|
||||
protoDRVR DS.B 2 ; refNum of this entry's DRVR
|
||||
protoType DS.B 6 ; 5-byte type + 1-byte pad
|
||||
SNAPentrySz DS.B 0
|
||||
ENDR
|
||||
|
||||
|
||||
numAARPs EQU 8
|
||||
|
||||
AARPentry RECORD 0
|
||||
protoCode DS.B 4 ; ptr to listener
|
||||
protoDRVR DS.B 2 ; refNum of this entry's DRVR
|
||||
protoType DS.B 4 ; 4-byte type
|
||||
AARPentrySz DS.B 0
|
||||
ENDR
|
||||
|
||||
;__________________________________
|
||||
;
|
||||
; Port entry definitions - there is one port entry for each configured port
|
||||
;__________________________________
|
||||
|
||||
PEADEVWrite EQU 0 ; Address of ADEV write code
|
||||
PEMaxENQs EQU PEADEVWrite+4 ; Maximum ENQs until give up
|
||||
PEOurFlags EQU PEMaxENQs+2 ; Flags for write
|
||||
PEUseByte EQU PEOurFlags+1 ; Port Use byte
|
||||
PEpRAM EQU PEUseByte+1 ; pRAM value for this port
|
||||
PEFiller EQU PEpRAM+4 ; Make size a power of two
|
||||
PESize EQU PEFiller+4 ; Size of a port entry (2^4)
|
||||
|
||||
|
||||
|
||||
;__________________________________
|
||||
;
|
||||
; Offsets within our variables
|
||||
;__________________________________
|
||||
|
||||
NumPorts EQU 0 ; Number of ports in table
|
||||
SysVRefnum EQU NumPorts+2 ; VRefnum of bridge volume (and bridge-active flag)
|
||||
BrdgRefnum EQU SysVRefnum+2 ; Bridge file refnum
|
||||
BrdgName EQU BrdgRefnum+2 ; Bridge file name
|
||||
LETblStart EQU BrdgName+32 ; Start of AARP listener tables
|
||||
;
|
||||
; 802.2 LLC listener tables
|
||||
;
|
||||
DRVRtblStart EQU LETblStart+NumLTs*LTEntry.LTSize ; driver tables (one per slot)
|
||||
SAPtblStart EQU DRVRtblStart+numDRVRs*DRVRentry.DRVRentrySz ; SAP listeners
|
||||
SAPtblEnd EQU SAPtblStart+numSAPs*SAPentry.SAPentrySz
|
||||
SNAPtblStart EQU SAPtblEnd ; SNAP listeners
|
||||
SNAPtblEnd EQU SNAPtblStart+numSNAPs*SNAPentry.SNAPentrySz
|
||||
AARPtblStart EQU SNAPtblEnd ; AARP listeners
|
||||
AARPtblEnd EQU AARPtblStart+numAARPs*AARPentry.AARPentrySz
|
||||
|
||||
GetRAddr EQU AARPtblEnd ; trap addr of _GetResource
|
||||
AlertStrings EQU GetRAddr+4 ; notification mgr strings
|
||||
PortBUsage EQU AlertStrings+4 ; flag (byte) for printer port usage
|
||||
NoRouter EQU PortBUsage+1 ; flag (byte) to indicate presence of routing code
|
||||
RspBuffer EQU NoRouter+1 ; ( 6) for returning XID and TEST responses
|
||||
MACHdr EQU RspBuffer+MACAddrSz ; (14) packet's 802.3 MAC header
|
||||
LLCHdr EQU MACHdr+MHdrSize ; ( 3) packet's 802.2 LLC header
|
||||
SNAPHdr EQU LLCHdr+LHdrSize ; ( 5) packet's SNAP header
|
||||
EnetQEl EQU SNAPHdr+SHdrSize ; (50) for returning XID and TEST responses
|
||||
EnetWDS EQU EnetQEl+ioQElSize ; ( 8) for returning XID and TEST responses
|
||||
SAPptr EQU EnetWDS+wdsEntrySz+2 ; ( 4) for returning XID and TEST responses
|
||||
SAPdrvr EQU SAPptr+4 ; ( 2) for returning XID and TEST responses
|
||||
|
||||
ourNMRec EQU SAPdrvr+2 ; for notification alerts
|
||||
ZAlertBuff EQU ourNMRec+NMRec.NMRecSz ; for bad zone notifications
|
||||
AtlkEventQ EQU ZAlertBuff+4 ; queue of Appletalk events
|
||||
|
||||
saveXppHook EQU AtlkEventQ+qHeadSize ; (4) ptr to next routine in .XPP control chain
|
||||
xCallTbl EQU saveXppHook+4 ; dispatch table for XPP xCalls
|
||||
;
|
||||
;*** WARNING: PETblStart must be the last offset defined (add new vars before it)
|
||||
;
|
||||
PETblStart EQU xCallTbl+(xMaxCall+1)*PtrSz ; Start of port entry table
|
||||
|
||||
;
|
||||
; Misc.
|
||||
;
|
||||
|
||||
;;OurVersion EQU SubVersion ; Our version number (1.0 was $26)
|
||||
ChangedPRAMErr EQU -1 ; Error if atlk changed pRAM if bridge
|
||||
|
||||
MaxFNSize EQU 32 ; Maximum filename size (even)
|
||||
|
||||
ResidentStrs EQU -16408 ; res id of resident alert strings
|
||||
CantFindALRT EQU -16407 ; Can't find ADEV alert resource ID
|
||||
ADEVErrALRT EQU -16406 ; ADEV error alert resource ID
|
||||
BridgeALRT EQU -16405 ; Bridge general alert
|
||||
BridgeSTR EQU -16404 ; Bridge STR# resource
|
||||
ATResID1 EQU -16403 ; reserved resource ID
|
||||
ATResID2 EQU -16402 ; reserved resource ID
|
||||
ATResID3 EQU -16401 ; reserved resource ID
|
||||
|
||||
BridgeNameSTR EQU 1 ; Name of bridge file
|
||||
CantFindSTR EQU 2 ; Can't find ADEV STR# index
|
||||
ADEVErrSTR EQU 3 ; ADEV error index
|
||||
NoBridgeSTR EQU 4 ; No bridge file index
|
||||
BadBridgeSTR EQU 5 ; Bad bridge file index
|
||||
|
||||
ADEVModem EQU ('SC' << 16) + $0303 ; pram value for modem port ATLK
|
||||
ADEVPrinter EQU ('SC' << 16) + $0101 ; pram value for printer port ATLK
|
||||
|
||||
AInitID EQU 'AINI' ; AppleTalk INITs res type
|
||||
|
||||
;
|
||||
; Lower Byte of Parameter RAM Values
|
||||
;
|
||||
|
||||
LAPBuiltin EQU 0 ; LAP Type for builtin driver on the printer port
|
||||
LAPPrinter EQU 1 ; LAP Type for printer port ADEV
|
||||
LAPModem EQU 3 ; LAP Type for modem port ADEV
|
||||
@@ -0,0 +1,180 @@
|
||||
;
|
||||
; File: LAPvars2.a
|
||||
;
|
||||
; Contains: xxx put contents here (or delete the whole line) xxx
|
||||
;
|
||||
; Written by: xxx put name of writer here (or delete the whole line) xxx
|
||||
;
|
||||
; Copyright: © 1987-1991 by Apple Computer, Inc., all rights reserved.
|
||||
;
|
||||
; Change History (most recent first):
|
||||
;
|
||||
; <1> 10/14/91 JSM first checked in
|
||||
; <1.2> 9/8/89 jhl Phase 2 AppleTalk with final mods and VM rolled in.
|
||||
; <1.1> 8/11/89 jhl For F19 ROM: Pull Best Router Table vars pointer out of code and
|
||||
; put into MPP Variables
|
||||
; <1.0> 6/14/89 WTO Adding AppleTalk 2.0 for first time.
|
||||
; <2.0d1> 9/6/88 KEL - AppleTalk 2.0. Removed most conditionals.
|
||||
; <1.2> 1/19/88 SJF Activate/Deactivate ports
|
||||
; <1.1> 1/7/88 SJF 51d2
|
||||
; <1.0> 12/23/87 BBM Converted appletalk sources to new build process.
|
||||
;
|
||||
;
|
||||
|
||||
;EASE$$$ READ ONLY COPY of file ÒLAPvars2.aÓ
|
||||
; 1.2 jhl 09/08/1989 Phase 2 AppleTalk with final mods and VM rolled in.
|
||||
; 1.1 jhl 08/11/1989 For F19 ROM: Pull Best Router Table vars pointer out of
|
||||
; code and put into MPP Variables
|
||||
; 1.0 WTO 06/14/1989 Adding AppleTalk 2.0 for first time.
|
||||
; END EASE MODIFICATION HISTORY
|
||||
;-----------=-----------=-------------------------------=---------------------------------------
|
||||
;
|
||||
; 2.0d1 06 Sep 88 KEL - AppleTalk 2.0. Removed most conditionals.
|
||||
;
|
||||
;-----------=-----------=-------------------------------=---------------------------------------
|
||||
;EASE$$$ READ ONLY COPY of file LAPvars.a
|
||||
; 1.2 SJF 1/19/88 Activate/Deactivate ports
|
||||
; 1.1 SJF 1/7/88 51d2
|
||||
; 1.0 BBM 12/23/87 Converted appletalk sources to new build process.
|
||||
; END EASE MODIFICATION HISTORY
|
||||
;-----------=-----------=-------------------------------=---------------------------------------
|
||||
;
|
||||
; LAP variables
|
||||
;
|
||||
|
||||
IF ATLK THEN
|
||||
WDSPtr EQU OurVars.MPPVarsEnd ; (4) WDS pointer saved here on writes
|
||||
ELSE
|
||||
WDSPtr EQU MPPVarsEnd ; (4) WDS pointer saved here on writes
|
||||
ENDIF
|
||||
|
||||
LAPWrtRtn EQU WDSPtr+4 ; (4) LAP write return address saved here
|
||||
RandomSeed EQU LAPWrtRtn+4 ; (2) Seed for random number generator
|
||||
DestNode EQU RandomSeed+2 ; (1) Destination node saved here on writes
|
||||
fLAPAdrValid EQU DestNode+1 ; (1) If node address has been validated
|
||||
fGoodCTS EQU fLAPAdrValid+1 ; (1) If a valid CTS is received
|
||||
fAdrInUse EQU fGoodCTS+1 ; (1) If get something from ourselves
|
||||
fSendENQ EQU fAdrInUse+1 ; (1) Flag to AbusWrite to send ENQ (not data)
|
||||
VBLDeferCnt EQU fSendENQ+1 ; (1) Count for VBL deferring check
|
||||
lbackOff EQU VBLDeferCnt+1 ; (1) Local backoff mask for one send
|
||||
backoff EQU lbackOff+1 ; (1) Global backoff mask
|
||||
collsnHistory EQU backoff+1 ; (1) Bit history of collisions last 8 sends
|
||||
deferHistory EQU collsnHistory+1 ; (1) Bit history of defers last 8 sends
|
||||
deferTries EQU deferHistory+1 ; (1) Local count of defers in one send
|
||||
collsnTries EQU deferTries+1 ; (1) Local count of collisions in one send
|
||||
BridgeTime EQU collsnTries+1 ; (1) Timestamp since last router packet
|
||||
|
||||
FirstVWord EQU BridgeTime+2 ; Next word boundary is here (EVEN!)
|
||||
VAbortWait EQU FirstVWord ; (2) Constant for sending abort bits (3.2B)
|
||||
VRTimeout EQU VAbortWait+2 ; (2) Constant for receive-byte timeouts
|
||||
VSTimeout EQU VRTimeout+2 ; (2) Constant for send-byte timeout
|
||||
VDataTO EQU VSTimeout+2 ; (2) CTS-to-data timeout
|
||||
VGetXXX EQU VDataTO+2 ; (2) Get a frame within 200 usecs
|
||||
VXmitOn EQU VGetXXX+2 ; (2) Xmitter on to send flags
|
||||
VRTStoCTS EQU VXmitOn+2 ; (2) Delay from RTS-in to CTS-out
|
||||
VWait100 EQU VRTStoCTS+2 ; (2) Delay to wait 100 usecs
|
||||
VFrameWait EQU VWait100+2 ; (2) Delay after incoming frame (49)
|
||||
VSyncWait EQU VFrameWait+2 ; (2) Delay after sync pulse (49)
|
||||
VWordsEnd EQU VSyncWait+2 ; End of timing values
|
||||
|
||||
SaveA45 EQU VWordsEnd ; (8) A4 and A5 saved here on interrupt
|
||||
SaveDskRtn EQU SaveA45+8 ; (4) DskRtnAdr saved here for PollProc
|
||||
SavePS EQU SaveDskRtn+4 ; (4) PollStack saved here for disk driver
|
||||
SaveBIn EQU SavePS+4 ; (4) .BIN DCE saved here (for close)
|
||||
SaveBOut EQU SaveBIn+4 ; (4) .BOUT DCE saved here (for close)
|
||||
SaveVects EQU SaveBOut+4 ; (12) SCC interrupt vectors saved here
|
||||
SaveRegs EQU SaveVects+12 ; (20) Registers saved here across PollProc
|
||||
|
||||
;
|
||||
; Variables for Lisa/Mac hardware differences
|
||||
;
|
||||
VAVBufA EQU SaveRegs+20 ; Pointer to VIA or a $FF word
|
||||
|
||||
STLth EQU 6 ; Size of STData area
|
||||
VSTData EQU VAVBufA+4 ; Data string to SCC after send
|
||||
VDisTxRTS EQU VSTData+1 ; This is the DisTxRTS byte
|
||||
|
||||
;
|
||||
; Router variables
|
||||
;
|
||||
|
||||
RTMPVars EQU VSTData+STLth ; -> variables for the router
|
||||
JDDPRoute EQU RTMPVars+4 ; ptr to the router
|
||||
OurDCE EQU JDDPRoute+4 ; ptr to this driver's DCE
|
||||
OurPort EQU OurDCE+4 ; our port id (byte)
|
||||
PortActive EQU OurPort+1 ; active flag (byte)
|
||||
PrevCtlHook EQU PortActive+1 ; default Appletalk control hook chain
|
||||
|
||||
;
|
||||
; *** Add new (AppleTalk 2.0 and greater) variables here ***
|
||||
;
|
||||
RouterAddr EQU PrevCtlHook+4 ; (4) 24-bit DDP addr of last router heard from
|
||||
Config EQU RouterAddr+4 ; (4) holds driver configuration params
|
||||
NetHint EQU Config+4 ; (2) current guess for net number
|
||||
;
|
||||
; *** These next two variables must be kept contiguous ***
|
||||
;
|
||||
CableLo EQU NetHint+2 ; (2) holds lower bound of cable range
|
||||
; or zero if network not known
|
||||
CableHi EQU CableLo+2 ; (2) holds upper bound of cable range
|
||||
|
||||
CRstart EQU CableHi+2 ; (2) cable range from ZIP NetInfoReply
|
||||
CRend EQU CRstart+2 ; (2) cable range from ZIP NetInfoReply
|
||||
MultiCast EQU CRend+2 ; (6) possible multicast address
|
||||
ZoneValid EQU MultiCast+6 ; (1) true if zone is valid
|
||||
LinkAdrLen EQU ZoneValid+1 ; (1) length of link's physical address in bytes
|
||||
NodeTries EQU LinkAdrLen+1 ; (2) number of node ID's we've tried ENQ'ing for
|
||||
ZoneHint EQU NodeTries+2 ; (34) zone name hint
|
||||
UserATLK EQU ZoneHint+34 ; (4) ptr to user ATLK
|
||||
ZIPlstner EQU UserATLK+4 ; (4) ptr to workstation ZIP listener
|
||||
ZIPBufPtr EQU ZIPlstner+4 ; (4) ptr to ZIP data structures
|
||||
ZInUseFlgs EQU ZIPBufPtr+4 ; (2) holds flags for use by ZIP
|
||||
;
|
||||
; NOTE: The next two variables MUST be kept together! They are init'd by .MPP Open routine
|
||||
;
|
||||
JTrap EQU ZInUseFlgs+2 ; (2) holds JMP Abs.L opcode (to TrapAddr below)
|
||||
TrapAddr EQU JTrap+2 ; (4) holds the absolute addr of the ROM CmpString routine
|
||||
|
||||
BRTdata EQU TrapAddr+4 ; (6) best router last heard from
|
||||
BRTkey EQU BRTdata+6 ; (2) best router's network number
|
||||
VBLQEl2 EQU BRTkey+2 ; (14) VBL QEl for BRTkey aging
|
||||
|
||||
ZIPQElPtr EQU VBLQEl2+14 ; (4) ptr to active ZChangeZone ioQel
|
||||
SMZQElPtr EQU ZIPQElPtr+4 ; (4) ptr to ioQel @ csCode for SetMyZone
|
||||
|
||||
xSysVersion EQU SMZQElPtr+4 ; (2) system file version returned by _SysEnvirons
|
||||
BRTptr EQU xSysVersion+2 ; (4) Pointer to Best Router Table Data
|
||||
|
||||
BufList EQU BRTptr+4 ; (4) VM buffer list header
|
||||
WrBuf EQU BufList+4 ; (4) ptr to VM write buffer
|
||||
NdVM EQU WrBuf+4 ; (2) flag is true if VM running
|
||||
ioR EQU NdVM+2 ; (2) temp ioResult storage
|
||||
saveNBPRegs EQU ioR+2 ; (8) temp storage for vital NBP process regs
|
||||
machineType EQU saveNBPRegs+8 ; (2) machine type word
|
||||
ABVarsEnd EQU machineType+2 ; End of local variables
|
||||
|
||||
;
|
||||
; *** If we are gathering statistics, the following variables are also needed
|
||||
;
|
||||
StatsStart EQU ABVarsEnd
|
||||
IntCount EQU StatsStart ; receive interrupt count
|
||||
RcvCount EQU IntCount+4 ; good data packets received
|
||||
XmitCount EQU RcvCount+4 ; data packets transmitted
|
||||
CRCCount EQU XmitCount+4 ; bad CRC (all packets)
|
||||
OVRCount EQU CRCCount+4 ; receive overruns (all packets)
|
||||
UNDCount EQU OVRCount+4 ; transmit underruns (all packets)
|
||||
NoHandCnt EQU UNDCount+4 ; No protocol handler for packet
|
||||
LenErrCnt EQU NoHandCnt+4 ; Packet length does not match header's
|
||||
BadCount EQU LenErrCnt+4 ; Bad packets seen
|
||||
CollsnCount EQU BadCount+4 ; Number of assumed collisions
|
||||
DeferCount EQU CollsnCount+4 ; Number of times deferred to other packets
|
||||
IdleTOCount EQU DeferCount+4 ; Timed out waiting for end of packet
|
||||
BadDDP EQU IdleTOCount+4 ; Bad DDP packet
|
||||
NoDtaCount EQU BadDDP+4 ; No packet seen after RTS in
|
||||
RandomCTS EQU NoDtaCount+4 ; Unsolicted CTS
|
||||
StatsEnd EQU RandomCTS+4 ; <StatsLgCnt must be a multiple of 4!!>
|
||||
StatsLen EQU StatsEnd-StatsStart
|
||||
StatsLgCnt EQU StatsLen/4
|
||||
|
||||
DataSize EQU StatsEnd ; Size of our data with stats
|
||||
|
||||
@@ -0,0 +1,115 @@
|
||||
;
|
||||
; File: LMEquates.a
|
||||
;
|
||||
; Contains: xxx put contents here (or delete the whole line) xxx
|
||||
;
|
||||
; Written by: xxx put name of writer here (or delete the whole line) xxx
|
||||
;
|
||||
; Copyright: © 1989-1991 by Apple Computer, Inc., all rights reserved.
|
||||
;
|
||||
; Change History (most recent first):
|
||||
;
|
||||
; <1> 10/14/91 JSM first checked in
|
||||
; <1.0> 11/16/89 CCH Adding from ÒLM Equates.aÓ
|
||||
; <1.0> 11/16/89 WTO Initial checkin.
|
||||
;
|
||||
;
|
||||
|
||||
;EASE$$$ READ ONLY COPY of file ÒLMEquates.aÓ
|
||||
; 1.0 CCH 11/16/1989 Adding from ÒLM Equates.aÓ
|
||||
; END EASE MODIFICATION HISTORY
|
||||
; 1.0 WTO 11/16/1989 Initial checkin.
|
||||
; END EASE MODIFICATION HISTORY
|
||||
;___________________________________________________________________________
|
||||
; Lap Manager Public Equates
|
||||
; © Apple Computer 1989
|
||||
|
||||
;
|
||||
; LAP Manager call codes passed in D0 (call at [ATalkHk2] + 2)
|
||||
;
|
||||
LRdDispatch EQU 1 ; Dispatch to protocol handler
|
||||
LWrtInsert EQU 2 ; Insert in LAPWrite hook
|
||||
LWrtRemove EQU 3 ; Remove from LAPWrite hook
|
||||
LWrtGet EQU 4 ; Get who's in LAPWrite hook
|
||||
LSetInUse EQU 5 ; Set address in use flag
|
||||
LGetSelfSend EQU 6 ; Get value of self send flag
|
||||
LAARPAttach EQU 7 ; Attach an AARP listener
|
||||
LAARPDetach EQU 8 ; Detach an AARP listener
|
||||
LGetATalkInfo EQU 9 ; Get AppleTalk info
|
||||
LGetPortInfo EQU 10 ; Get port info
|
||||
LOpenADEV EQU 11 ; Open ADEV file
|
||||
LNSetInUse EQU 12 ; Port-based set-in-use call
|
||||
LGetBridgeInfo EQU 13 ; Get bridge info
|
||||
LSetATalkInfo EQU 14 ; Set AppleTalk info
|
||||
LShutdownBridge EQU 15 ; Shut down bridge
|
||||
LInit EQU 16 ; init run time LAP manager
|
||||
LUsePortB EQU 17 ; request use of printer port
|
||||
LFreePortB EQU 18 ; grant use of printer port
|
||||
LStatPortB EQU 19 ; obtain current printer port status
|
||||
LNetAlert EQU 20 ; notify user of network alert condition
|
||||
L802Attach EQU 21 ; attach an 802.2 protocol handler
|
||||
L802Detach EQU 22 ; detach an 802.2 protocol handler
|
||||
LAddAEQ EQU 23 ; add AppleTalk event queue entry
|
||||
LRmvAEQ EQU 24 ; remove AppleTalk event queue entry
|
||||
LGetAEQ EQU 25 ; get pointer to AppleTalk event queue
|
||||
LLastCall EQU LGetAEQ ; Last valid call
|
||||
|
||||
;
|
||||
; Flag bits passed in D1 on LWrtInsert
|
||||
;
|
||||
LWSelfSend EQU 7 ; ADEV handles self send
|
||||
LWSrvrWks EQU 5 ; Honor server/wks bit
|
||||
LWVMdefer EQU 4 ; buffer and defer incoming packets
|
||||
LWReserved EQU 0 ; Reserved for internal use
|
||||
|
||||
;
|
||||
; atlk call codes passed in D0 (call at atlk start plus 2)
|
||||
;
|
||||
AInstall EQU 1 ; Installation
|
||||
AShutdown EQU 2 ; Shutdown
|
||||
AGetInfo EQU 3 ; Get link information
|
||||
AGetMCast EQU 4 ; Get multicast addr
|
||||
ASetMCast EQU 5 ; Set multicast addr
|
||||
ADelMCast EQU 6 ; Delete multicast addr
|
||||
|
||||
|
||||
;
|
||||
; ADEV call code passed in D0 (call at ADEV start)
|
||||
;
|
||||
|
||||
GetADEV EQU 101 ; Get next ADEV
|
||||
SelectADEV EQU 102 ; Select ADEV
|
||||
ReSelADEV EQU 103 ; Re-selected ADEV
|
||||
|
||||
LAPMgrPtr EQU $B18 ; This points to our start (???ATalkHk2?)
|
||||
LAPMgrCall EQU 2 ; Offset to make LAP manager calls
|
||||
atlkCall EQU 2 ; Offset to make atlk calls at
|
||||
|
||||
;
|
||||
; Resource IDs
|
||||
;
|
||||
adevBaseID EQU -4032 ; Base resource ID for ADEVs
|
||||
|
||||
;
|
||||
; atlk AGetInfo call
|
||||
;
|
||||
AInfoVers EQU 2 ; version number describes reply buffer below
|
||||
AInfoSz EQU 20 ; size in bytes of reply buffer
|
||||
; (big enough to handle 6 byte link addr)
|
||||
|
||||
ATlkInfo RECORD 0 ; link information
|
||||
Version DS.W 1 ; version number
|
||||
InfoLength DS.W 1 ; length of this rec
|
||||
LinkSpeed DS.L 1 ; speed of link in bits/second
|
||||
BandWidth DS.B 1 ; bandwidth factor
|
||||
Reserved DS.B 3
|
||||
Flags DS.B 1 ; informative flags (see below)
|
||||
LinkAdrLen DS.B 1 ; link address length in bytes
|
||||
LinkAddress DS.B 6 ; start of link address (reserve 6 bytes)
|
||||
ENDR
|
||||
;
|
||||
; atlk AGetInfo flags
|
||||
;
|
||||
AtlkExtended EQU 7 ; bit in on if link has extended addressing
|
||||
AtlkROnly EQU 6 ; true if link is for router only ports
|
||||
|
||||
@@ -0,0 +1,42 @@
|
||||
;
|
||||
; File: mppflags2.a
|
||||
;
|
||||
; Copyright: © 1989-1992 by Apple Computer, Inc. All rights reserved.
|
||||
;
|
||||
; Change History (most recent first):
|
||||
;
|
||||
; <SM2> 10/28/92 SWC Removed PrNonPortable--it gets setup in StandardEqu.d.
|
||||
; <1> 10/14/91 JSM first checked in
|
||||
; <1.3> 9/11/89 jhl Remove IOP references which were added for the Smart Serial
|
||||
; NuBus Card and not for the Zone 5 IOP
|
||||
; <1.2> 9/8/89 jhl Phase 2 AppleTalk with final mods and VM rolled in.
|
||||
; <1.1> 7/24/89 SGS Get IOP Atlk out of ROM for F19
|
||||
; <1.0> 6/14/89 WTO Adding AppleTalk 2.0 for first time.
|
||||
;
|
||||
|
||||
Debug0 EQU 0 ; causes coarse debug strings (e.g. 'MPP OPEN') to appear
|
||||
Debug1 EQU 0 ; causes fine debug strings (e.g. 'Got ZIP GetNetInfo Reply') to appear
|
||||
|
||||
PORTA EQU 2
|
||||
PORTB EQU 3
|
||||
|
||||
LAGUNA EQU 0
|
||||
|
||||
FEwrite EQU 0 ; allow DDP client to address node $FE
|
||||
|
||||
PHs EQU 8
|
||||
SASs EQU 14
|
||||
NBPE EQU 10
|
||||
|
||||
SubVersion EQU 54 ; Sub-version number
|
||||
|
||||
|
||||
HACK EQU 0 ; used in LAP.a
|
||||
|
||||
IF (&TYPE('ForROM') = 'UNDEFINED') THEN
|
||||
ForROM EQU 0 ; not building for universal ROM
|
||||
ENDIF
|
||||
|
||||
IF (&TYPE('iopStatCtl') = 'UNDEFINED') THEN
|
||||
iopStatCtl equ $0004-$20 ; IOP Status and Control register
|
||||
ENDIF
|
||||
@@ -0,0 +1,163 @@
|
||||
;
|
||||
; File: vardefs2.a
|
||||
;
|
||||
; Contains: xxx put contents here (or delete the whole line) xxx
|
||||
;
|
||||
; Written by: xxx put name of writer here (or delete the whole line) xxx
|
||||
;
|
||||
; Copyright: © 1987-1991 by Apple Computer, Inc., all rights reserved.
|
||||
;
|
||||
; Change History (most recent first):
|
||||
;
|
||||
; <1> 10/14/91 JSM first checked in
|
||||
; <1.1> 9/8/89 jhl Phase 2 AppleTalk with final mods and VM rolled in.
|
||||
; <1.0> 6/14/89 WTO Adding AppleTalk 2.0 for first time.
|
||||
; <2.0d1> 9/6/88 KEL - AppleTalk 2.0.
|
||||
; <1.0> 12/23/87 BBM Converted appletalk sources to new build process.
|
||||
;
|
||||
;
|
||||
|
||||
;EASE$$$ READ ONLY COPY of file Òvardefs2.aÓ
|
||||
; 1.1 jhl 09/08/1989 Phase 2 AppleTalk with final mods and VM rolled in.
|
||||
; 1.0 WTO 06/14/1989 Adding AppleTalk 2.0 for first time.
|
||||
; END EASE MODIFICATION HISTORY
|
||||
;-----------=-----------=-------------------------------=---------------------------------------
|
||||
;
|
||||
; 2.0d1 06 Sep 88 KEL - AppleTalk 2.0.
|
||||
;
|
||||
;-----------=-----------=-------------------------------=---------------------------------------
|
||||
;EASE$$$ READ ONLY COPY of file vardefs.a
|
||||
; 1.0 BBM 12/23/87 Converted appletalk sources to new build process.
|
||||
; END EASE MODIFICATION HISTORY
|
||||
;-----------=-----------=-------------------------------=---------------------------------------
|
||||
;
|
||||
; MPP Local Variables. Complete variable layout:
|
||||
;
|
||||
; SysLAPAddr +-------------------+ <- MPPVars (and A2)
|
||||
; | MPP Globals |
|
||||
; | (including RHA) | defined in ATalkequ.a
|
||||
; AfterGlobals +-------------------+
|
||||
; | MPP Local | (protocol handler table, socket listener table, ...)
|
||||
; | Variables | *** DEFINED IN THIS FILE ***
|
||||
; MPPVarsEnd +-------------------+
|
||||
; | LAP-only variables| defined in LAPvars.a
|
||||
; DataSize +-------------------+
|
||||
;
|
||||
;-----------=-----------=-------------------------------=---------------------------------------
|
||||
|
||||
NumOfPHs EQU AfterGlobals ; Entries in PH table (45)
|
||||
NumOfSkts EQU NumOfPHs+1 ; Entries in socket table (45)
|
||||
|
||||
;-----------=-----------=-------------------------------=---------------------------------------
|
||||
; The LAP protocol handler table starts here.
|
||||
;
|
||||
; Format:
|
||||
; .BYTE ProtCode1, ..., ProtCodeN ; Protocol type codes
|
||||
; .LONG PHAddr1, ..., PHAddrN ; Protocol handler addresses
|
||||
;-----------=-----------=-------------------------------=---------------------------------------
|
||||
|
||||
LAPTblSz EQU PHs ; Size of LAP protocol handler table (even)
|
||||
|
||||
Protocols EQU NumOfSkts+1 ; List of active protocols
|
||||
Handlers EQU Protocols+LAPTblSz ; List of handler addresses
|
||||
LAPTblEnd EQU Handlers+(4*LAPTblSz) ; End of LAP table
|
||||
|
||||
|
||||
;-----------=-----------=-------------------------------=---------------------------------------
|
||||
; The DDP socket table starts here.
|
||||
;
|
||||
; Format:
|
||||
; .BYTE SktNum1, .., SktNumN ; Socket numbers
|
||||
; .LONG SktLstAdr1, .., SktLstAdrN ; Socket listener addresses
|
||||
;
|
||||
; NOTE: The last offset in this table must be less than $80 [for Offset(A2,D2)].
|
||||
; This table only used for statically-assigned sockets (45)
|
||||
;-----------=-----------=-------------------------------=---------------------------------------
|
||||
|
||||
DDPTblSz EQU SASs ; Size of socket table (even!)
|
||||
|
||||
SocketNum EQU LAPTblEnd ; Socket number in socket table
|
||||
SktLstnr EQU SocketNum+DDPTblSz ; Socket listener addr
|
||||
|
||||
EPBufPtr EQU SktLstnr+(4*DDPTblSz) ; Pointer to EP buffer
|
||||
|
||||
;-----------=-----------=-------------------------------=---------------------------------------
|
||||
; The following is the DAS socket table. There is one longword for each
|
||||
; potentially opened DAS, FirstDAS thru MaxBigSkt, indicating the socket
|
||||
; listener address, or zero if the socket hasn't been opened.
|
||||
;-----------=-----------=-------------------------------=---------------------------------------
|
||||
|
||||
FirstDAS EQU DDPMaxWKS+1 ; First DAS socket number
|
||||
MaxBigSkt EQU $FE ; Largest socket in table
|
||||
|
||||
BigSktListen EQU EPBufPtr+4 ; Start of DAS table
|
||||
DDPTblEnd EQU BigSktListen+(4*(MaxBigSkt-DDPMaxWKS)) ; End of DAS table
|
||||
|
||||
;-----------=-----------=-------------------------------=---------------------------------------
|
||||
; VBL variables - the following are used in the VBL task
|
||||
;-----------=-----------=-------------------------------=---------------------------------------
|
||||
|
||||
VBLQEl EQU DDPTblEnd ; A VBL queue element
|
||||
|
||||
VBL20 EQU 20 ; Call VBL task every 20 ticks
|
||||
|
||||
BrTimeVal EQU 150 ; Age-out for A_BRIDGE (= 50 seconds)
|
||||
|
||||
;-----------=-----------=-------------------------------=---------------------------------------
|
||||
; Code resource variables - the following are used for loading and
|
||||
; calling the code resources (non-resident NBP code and lookup-reply code)
|
||||
;-----------=-----------=-------------------------------=---------------------------------------
|
||||
|
||||
NRPtr EQU VBLQEl+14 ; Ptr to non-resident code (and flag)
|
||||
LookupPtr EQU NRPtr+4 ; Pointer to lookup-reply code (and flag)
|
||||
NRVars EQU LookupPtr+4 ; Pointer to NR local variables
|
||||
JDDPWrite EQU NRVars+4 ; Address of DDPWrite routine
|
||||
NTQueueHd EQU JDDPWrite+4 ; Names Table Queue Head
|
||||
LUQElPtr EQU NTQueueHd+4 ; Ptr to lookup queue element/buffer
|
||||
SelfSend EQU LUQElPtr+4 ; Whether to send packet to self
|
||||
MPPVarsEnd EQU SelfSend+2 ; End of MPP vars (*** more in LAPvars.a ***)
|
||||
|
||||
;
|
||||
; Definitions for NBP code resources
|
||||
;
|
||||
NBPCodeType EQU 'NBPC' ; Type code for NBP code resource
|
||||
NBPNRCode EQU 1 ; ID for NBP non-resident code
|
||||
NBPLookup EQU 2 ; ID for lookup-reply code
|
||||
|
||||
EJECT
|
||||
;
|
||||
; The lookup-reply code uses a combination queue element and buffer for
|
||||
; reading in LkUp requests, queueing a LookupReply command to itself, and
|
||||
; writing out a response through DDP. The LkUp request is read into the
|
||||
; queue element starting at CSParam, and the data structures for DDPWrite
|
||||
; are then built on top of it. This queue element/buffer's size is:
|
||||
;
|
||||
LUQElSize EQU CSParam+NBPTuple+ArgBlkSz+2+(WDSEntrySz*(TupleMax+2))+2
|
||||
|
||||
|
||||
;
|
||||
; external bits
|
||||
;
|
||||
NoNetNotify EQU 28 ; = 1 to supress 'Bad Net' NM message
|
||||
|
||||
|
||||
;
|
||||
; internal bits
|
||||
;
|
||||
; ***** WARNING - The ExtendedBit MUST remain at bit 15 *****
|
||||
;
|
||||
ExtendedBit EQU 15 ; = 1 iff this port is extended AppleTalk
|
||||
SeedPortBit EQU 14 ; = 1 iff this port is a router AND a seed port
|
||||
UserMPPBit EQU 13 ; = 1 iff this is default (user port) .MPP, i.e. refNum -10
|
||||
MPPOpenBit EQU 11 ; = 1 iff .MPP has opened successfully
|
||||
CloseATPBit EQU 10 ; = 1 iff .ATP is being closed by .MPP
|
||||
ATPOpenBit EQU 9 ; = 1 iff .ATP has opened successfully
|
||||
UseBuiltIn EQU 8 ; = 1 when using built-in AppleTalk
|
||||
|
||||
|
||||
ioMixMask EQU (1<<SrvAdrBit)+(1<<RouterBit)+(1<<NoZoneNotify)
|
||||
;-----------=-----------=-------------------------------=---------------------------------------
|
||||
; *** End VARDEFS.TEXT ***
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user