mirror of
https://github.com/elliotnunn/sys7.1-doc-wip.git
synced 2024-12-12 04:29:09 +00:00
143 lines
5.4 KiB
Plaintext
143 lines
5.4 KiB
Plaintext
;
|
||
; File: LAPEqu.a
|
||
;
|
||
; Copyright: © 1990 by Apple Computer, Inc., all rights reserved.
|
||
;
|
||
; Change History (most recent first):
|
||
;
|
||
; <6> 8/15/91 MH Add conditional assembly wrapper
|
||
; <5> 6/14/91 JL Checked in official MPW 3.2ƒ version. Added correct spelling for
|
||
; Phase II transition calls.
|
||
; <4> 1/30/91 gbm sab, #38: Change the ‘already including this file’ variable to
|
||
; all uppercase (for security reasons)
|
||
; <3> 1/7/91 JH (JDR) Do revision number 2
|
||
; <2> 1/4/91 JDR (dba) Removed the LAddAEQ and LRmvAEQ constants
|
||
;
|
||
|
||
;___________________________________________________________________________
|
||
; Lap Manager Public Equates
|
||
; © Apple Computer 1989
|
||
; All rights reserved
|
||
|
||
IF &TYPE('__INCLUDINGLAPEQU__') = 'UNDEFINED' THEN
|
||
__INCLUDINGLAPEQU__ SET 1
|
||
|
||
;
|
||
; 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
|
||
AOpen EQU 7 ; Open an ATlk
|
||
AClose EQU 8 ; Close an ATlk
|
||
AEnq EQU 9 ; send ENQ's for a node address
|
||
ADelAddr EQU 10 ; remove an established node address
|
||
|
||
;
|
||
; 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
|
||
;
|
||
; (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)
|
||
MaxNodes DS.W 1 ; max. number of nodes (base zero)
|
||
Size EQU *
|
||
ENDR
|
||
|
||
AInfoVers EQU 3 ; version number describes reply buffer below
|
||
AInfoSz EQU ATlkInfo.Size ; size in bytes of reply buffer
|
||
|
||
;
|
||
; 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
|
||
|
||
; Transition Queue Structures
|
||
|
||
; Transition Queue Element
|
||
|
||
ATQel RECORD 0
|
||
AeQQLink DS.L 1 ; link field
|
||
AeQQType DS.W 1 ; queue type (dont care)
|
||
AeQCallAddr DS.L 1 ; procedure address
|
||
AeQSize EQU *
|
||
ENDR
|
||
|
||
; Transitions
|
||
; %%% Change spelling to match inside Mac
|
||
;AOpenTask EQU 0 ; q type for open
|
||
;ACloseTellTask EQU 2
|
||
;ACloseAskTask EQU 3
|
||
;ACanclAskTask EQU 4
|
||
ATTransOpen EQU 0 ; Open Transition
|
||
ATTransClose EQU 2 ; Close Transition
|
||
ATTransClosePrep EQU 3 ; Close Prep Transition
|
||
ATTransCancelClose EQU 4 ; Cancel Close Prep
|
||
|
||
ENDIF ; ...already included |