mirror of
https://github.com/elliotnunn/sys7.1-doc-wip.git
synced 2024-12-13 11:29:15 +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
|