mirror of
https://github.com/elliotnunn/mac-rom.git
synced 2024-12-28 01:29:20 +00:00
5b0f0cc134
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.
157 lines
3.4 KiB
Plaintext
157 lines
3.4 KiB
Plaintext
;_____________________________________________
|
|
; File: CTBUtilities.a
|
|
;
|
|
; Contains: Assembler interface to the CommToolbox Utilities
|
|
;
|
|
; Written by: Byron Han
|
|
;
|
|
; Copyright: © 1988-1992 by Apple Computer, Inc.
|
|
; All rights reserved.
|
|
;
|
|
; This file is used in these builds: BigBang
|
|
;
|
|
; Change History (most recent first):
|
|
;
|
|
; <13> 2/11/92 MH Add include of Traps.a to support reference to
|
|
; _CommToolboxDispatch
|
|
; <12> 11/21/91 MH Change the name of NLTypeEntry.ICON to hIcon to match C and
|
|
; Pascal. Retain ICON as an equate for hIcon for backwards
|
|
; compatibility
|
|
; <11> 8/27/91 CH Updated interface header for consistency.
|
|
; <10> 6/25/91 JNG Move Dialog manipulation calls to ToolEqu.a
|
|
; <9> 6/24/91 BH change conditional wrapper to conform to standards
|
|
; <8> 1/30/91 gbm sab, #38: Change the Ôalready including this fileÕ variable to
|
|
; all uppercase (for security reasons)
|
|
; <7> 1/25/91 stb .
|
|
; <6> 9/15/90 PWD Added _StandardNBP in prep for renaming _NuLookup. <kaz> <crz>
|
|
; <5> 9/15/90 PWD Moved popup constants to ToolEqu.a. <kaz> <crz>
|
|
; <4> 9/15/90 PWD Renamed popupUseCQD to popupReserved. <kaz> <crz>
|
|
; <3> 5/20/90 ngk Added constants for popup CDEF
|
|
; <2> 3/15/90 BBH fixed problem with the initial IF defined being missing
|
|
; <1> 3/13/90 BBH first checked in to BBS
|
|
;
|
|
; To Do:
|
|
;_____________________________________________
|
|
|
|
IF (&TYPE('__INCLUDINGCTBUTILITIES__') = 'UNDEFINED') THEN
|
|
__INCLUDINGCTBUTILITIES__ SET 1
|
|
|
|
IF &TYPE('__INCLUDINGTRAPS__') = 'UNDEFINED' THEN
|
|
INCLUDE 'Traps.a'
|
|
ENDIF
|
|
|
|
MACRO
|
|
_CTBCall &selector
|
|
move.w &selector,-(sp)
|
|
move.l sp,a0
|
|
_CommToolboxDispatch
|
|
adda.w #$2,sp ; Pop the selector back off
|
|
ENDM
|
|
|
|
; version of CommToolbox Utilities
|
|
curCTBUVersion EQU 2
|
|
|
|
; CTBUErr
|
|
ctbuGenericError EQU -1
|
|
ctbuNoErr EQU 0
|
|
|
|
; Choose responses
|
|
chooseDisaster EQU -2
|
|
chooseFailed EQU -1
|
|
chooseAborted EQU 0
|
|
chooseOKMinor EQU 1
|
|
chooseOKMajor EQU 2
|
|
chooseCancel EQU 3
|
|
|
|
; NuLookup responses
|
|
nlOk EQU 0
|
|
nlCancel EQU 1
|
|
nlEject EQU 2
|
|
|
|
; Name FilterProc responses
|
|
nameInclude EQU 1
|
|
nameDisable EQU 2
|
|
nameReject EQU 3
|
|
|
|
; Zone FilterProc responses
|
|
zoneInclude EQU 1
|
|
zoneDisable EQU 2
|
|
zoneReject EQU 3
|
|
|
|
; Dialog items for hook procedure
|
|
hookOK EQU 1
|
|
hookCancel EQU 2
|
|
hookOutline EQU 3
|
|
hookTitle EQU 4
|
|
hookItemlist EQU 5
|
|
hookZonetitle EQU 6
|
|
hookZonelist EQU 7
|
|
hookLine EQU 8
|
|
hookVersion EQU 9
|
|
hookReserved1 EQU 10
|
|
hookReserved2 EQU 11
|
|
hookReserved3 EQU 12
|
|
hookReserved4 EQU 13
|
|
|
|
; Virtual items in the dialog item list
|
|
hookNull EQU 100
|
|
hookItemRefresh EQU 101
|
|
hookZoneRefresh EQU 102
|
|
hookEject EQU 103
|
|
hookPreflight EQU 104
|
|
hookPostflight EQU 105
|
|
hookKeyBase EQU 1000
|
|
|
|
; NuLookup data structures
|
|
NLTypeEntry Record 0
|
|
hIcon ds.l 1
|
|
ICON EQU hIcon ; for backward compatibility
|
|
typeStr ds.b 34
|
|
EndR
|
|
|
|
NBPReply Record 0
|
|
theEntity ds.b 102
|
|
theAddr ds.l 1
|
|
EndR
|
|
|
|
|
|
InitCTBUtilities EQU $401
|
|
CTBGetCTBVersion EQU $405
|
|
NuLookup EQU $406
|
|
NuPLookup EQU $407
|
|
StandardNBP EQU $406
|
|
CustomNBP EQU $407
|
|
|
|
MACRO
|
|
_InitCTBUtilities
|
|
_CTBCall #InitCTBUtilities
|
|
ENDM
|
|
|
|
MACRO
|
|
_CTBGetCTBVersion
|
|
_CTBCall #CTBGetCTBVersion
|
|
ENDM
|
|
|
|
MACRO
|
|
_NuLookup
|
|
_CTBCall #NuLookup
|
|
ENDM
|
|
|
|
MACRO
|
|
_NuPLookup
|
|
_CTBCall #NuPLookup
|
|
ENDM
|
|
|
|
MACRO
|
|
_StandardNBP
|
|
_CTBCall #StandardNBP
|
|
ENDM
|
|
|
|
MACRO
|
|
_CustomNBP
|
|
_CTBCall #CustomNBP
|
|
ENDM
|
|
|
|
|
|
ENDIF ; already included
|