supermario/base/SuperMarioProj.1994-02-09/Interfaces/AIncludes/LAPEqu.a
2019-06-29 23:17:50 +08:00

143 lines
5.4 KiB
Plaintext
Raw 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: 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