sys7.1-doc-wip/Internal/InternalGlue/PPCPrivGlue.a

75 lines
1.8 KiB
Plaintext
Raw Normal View History

2019-07-27 14:37:48 +00:00
;
; File: PPCPrivGlue.a
;
; Contains: Glue to private interface for the PPC Toolbox
;
; Written by: Victor Chang, Sangam, and Eric M. Trehus
;
; Copyright: © 1989-1991 by Apple Computer, Inc., all rights reserved.
;
; Change History (most recent first):
;
; <3> 8/27/91 JSM Cleanup header.
; <2> 10/24/90 EMT Add New internal glue and interfaces
; <1> 10/18/90 JSM First checked in.
;
;
PRINT OFF
INCLUDE 'SysEqu.a'
INCLUDE 'ToolEqu.a'
INCLUDE 'Traps.a'
INCLUDE 'PPCToolBox.a'
INCLUDE 'PPCPriv.a'
PRINT ON
;
; The following routines are for internal use only.
; Unlike other PPC routines, they use C calling conventions,
; so they don't need to clean up the stack, and the result
; can be left in D0.
;
; OSErr PPCCloseUserSessions(unsigned char *userName);
; short PPCCountAcceptedNetworkSessions(unsigned char *userName);
; OSErr PPCCheckDupNBPName();
;
CASE OBJ
PPCCloseUserSessions PROC EXPORT
Move.L (SP)+,A1 ;get return address
Move.L (SP),A0 ;A0 contains the parameter
Moveq #CloseUserSessionsCmd,D0
DC.W $A0DD
Jmp (A1)
ENDPROC
PPCCountAcceptedNetworkSessions PROC EXPORT
Move.L (SP)+,A1 ;get return address
Move.L (SP),A0 ;A0 contains the parameter
Moveq #CountAcceptedNetworkSessionsCmd,D0
DC.W $A0DD
Jmp (A1)
ENDPROC
PPCCheckDupNBPName PROC EXPORT
Move.L (SP)+,A1 ;get return address
Moveq #CheckDupNBPNameCmd,D0
DC.W $A0DD
Jmp (A1)
ENDPROC
PPCEnable PROC EXPORT
Move.L (SP)+,A1 ;get return address
Moveq #PPCEnableCmd,D0
DC.W $A0DD
Jmp (A1)
ENDPROC
PPCDisable PROC EXPORT
Move.L (SP)+,A1 ;get return address
Moveq #PPCDisableCmd,D0
DC.W $A0DD
Jmp (A1)
ENDPROC
END