mirror of
https://github.com/elliotnunn/mac-rom.git
synced 2025-01-03 09:31:04 +00:00
4325cdcc78
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.
357 lines
6.2 KiB
Plaintext
357 lines
6.2 KiB
Plaintext
;_____________________________________________
|
|
; File: FileTransfers.a
|
|
;
|
|
; Contains: Assembler Interface to the File Transfer Manager
|
|
;
|
|
; Written by: Byron Han
|
|
;
|
|
; Copyright: © 1988-1991 by Apple Computer, Inc.
|
|
; All rights reserved.
|
|
;
|
|
; Change History (most recent first):
|
|
;
|
|
; <15> 8/27/91 CH Updated interface header for consistency
|
|
; <14> 8/20/91 BH remove FTSetupCleanup from public interfaces
|
|
; <13> 8/18/91 MH Reordered the definitions and corrected the values of
|
|
; ftXXXXGetFPost and ftXXXXSetFPos to match C and Pascal
|
|
; interfaces.
|
|
; <12> 8/15/91 MH Remove outer parens from conditional assembly predicates to
|
|
; match standard form
|
|
; <11> 8/15/91 MH Minor formatting changes
|
|
; <10> 8/15/91 MH change the conditinal include var for StandardFile.a from
|
|
; __INCLUDINGSTANDARDFILE to __INCLUDINGSTANDARDFILE__ as defined
|
|
; in StandardFile.a
|
|
; <9> 7/9/91 BH reinclude ftWriteFileInfo and renumber ftXXXXGetFPost and
|
|
; ftXXXXSetFPos
|
|
; <8> 7/3/91 BH removed ftFullDuplex
|
|
; <7> 6/26/91 BH added FTSend, FTReceive, and constants for read and write procs
|
|
; and new constant for ftMultipleFileSend
|
|
; <6> 6/25/91 JNG Add ftConfigChanged
|
|
; <5> 6/24/91 BH change theReply field of file transfer record to be of type
|
|
; SFReply instead of just 74 bytes. Also include StandardFile.a.
|
|
; Also change conditional assembler wrapper to conform to
|
|
; standards
|
|
; <4> 6/18/91 BH remove FTPChoose
|
|
; <3> 6/14/91 JL Checked in official MPW 3.2Ä version. Corrected the casing of
|
|
; _InitFT.
|
|
; <2> 1/30/91 gbm sab, #38: Change the Ôalready including this fileÕ variable to
|
|
; all uppercase (for security reasons)
|
|
; <1> 3/14/90 BBH first checked in
|
|
;
|
|
; To Do:
|
|
;_____________________________________________
|
|
|
|
IF &TYPE('__INCLUDINGFILETRANSFERS__') = 'UNDEFINED' THEN
|
|
__INCLUDINGFILETRANSFERS__ SET 1
|
|
|
|
IF &TYPE('__INCLUDINGCTBUTILITIES__') = 'UNDEFINED' THEN
|
|
INCLUDE 'CTBUtilities.a'
|
|
ENDIF
|
|
|
|
IF &TYPE('__INCLUDINGSTANDARDFILE__') = 'UNDEFINED' THEN
|
|
INCLUDE 'StandardFile.a'
|
|
ENDIF
|
|
|
|
; current file transfer manager version
|
|
curFTVersion EQU 2
|
|
|
|
; FTErr
|
|
ftGenericError EQU -1
|
|
ftNoErr EQU 0
|
|
ftRejected EQU 1
|
|
ftFailed EQU 2
|
|
ftTimeOut EQU 3
|
|
ftTooManyRetry EQU 4
|
|
ftNotEnoughDSpace EQU 5
|
|
ftRemoteCancel EQU 6
|
|
ftWrongFormat EQU 7
|
|
ftNoTools EQU 8
|
|
ftUserCancel EQU 9
|
|
ftNotSupported EQU 10
|
|
ftUnknownError EQU 11
|
|
|
|
; FTflags
|
|
ftIsFTMode EQU $00000001
|
|
ftNoMenus EQU $00000002
|
|
ftQuiet EQU $00000004
|
|
ftConfigChanged EQU $00000010
|
|
ftSucc EQU $00000080
|
|
|
|
; FTAttributes
|
|
ftSameCircuit EQU $0001
|
|
ftSendDisable EQU $0002
|
|
ftReceiveDisable EQU $0004
|
|
ftTextOnly EQU $0008
|
|
ftNoStdFile EQU $0010
|
|
ftMultipleFileSend EQU $0020
|
|
|
|
; FTDirection
|
|
ftReceiving EQU 0
|
|
ftTransmitting EQU 1
|
|
|
|
; FTReadProc constants
|
|
ftReadOpenFile EQU 0
|
|
ftReadDataFork EQU 1
|
|
ftReadRsrcFork EQU 2
|
|
ftReadAbort EQU 3
|
|
ftReadComplete EQU 4
|
|
ftReadSetFPos EQU 6
|
|
ftReadGetFPos EQU 7
|
|
|
|
ftOpenDataFork EQU 1
|
|
ftOpenRsrcFork EQU 2
|
|
|
|
; FTWriteProc constants
|
|
ftWriteOpenFile EQU 0
|
|
ftWriteDataFork EQU 1
|
|
ftWriteRsrcFork EQU 2
|
|
ftWriteAbort EQU 3
|
|
ftWriteComplete EQU 4
|
|
ftWriteFileInfo EQU 5
|
|
ftWriteSetFPos EQU 6
|
|
ftWriteGetFPos EQU 7
|
|
|
|
FTRecord Record 0
|
|
procID ds.w 1
|
|
flags ds.l 1
|
|
errCode ds.w 1
|
|
|
|
refCon ds.l 1
|
|
userData ds.l 1
|
|
|
|
defProc ds.l 1
|
|
|
|
config ds.l 1
|
|
oldConfig ds.l 1
|
|
|
|
environsProc ds.l 1
|
|
reserved1 ds.l 1
|
|
reserved2 ds.l 1
|
|
|
|
ftPrivate ds.l 1
|
|
|
|
sendProc ds.l 1
|
|
recvProc ds.l 1
|
|
writeProc ds.l 1
|
|
readProc ds.l 1
|
|
|
|
owner ds.l 1
|
|
|
|
direction ds.w 1
|
|
theReply ds SFReply ;
|
|
|
|
writePtr ds.l 1
|
|
readPtr ds.l 1
|
|
theBuf ds.l 1
|
|
bufSize ds.l 1
|
|
autoRec ds.b 256
|
|
attributes ds.w 1
|
|
FTRecordSize EQU *
|
|
ENDR
|
|
|
|
InitFT EQU $201
|
|
FTSetRefCon EQU $202
|
|
FTGetRefCon EQU $203
|
|
FTSetUserData EQU $204
|
|
FTGetUserData EQU $205
|
|
FTGetToolName EQU $206
|
|
FTGetProcID EQU $207
|
|
FTNew EQU $208
|
|
FTDispose EQU $209
|
|
FTExec EQU $20A
|
|
FTStart EQU $20B
|
|
FTAbort EQU $20D
|
|
FTResume EQU $20E
|
|
FTValidate EQU $20F
|
|
FTDefault EQU $210
|
|
FTSetupPreflight EQU $211
|
|
FTSetupSetup EQU $212
|
|
FTSetupFilter EQU $213
|
|
FTSetupItem EQU $214
|
|
FTGetConfig EQU $216
|
|
FTSetConfig EQU $217
|
|
FTIntlToEnglish EQU $218
|
|
FTEnglishToIntl EQU $219
|
|
FTGetVersion EQU $21A
|
|
FTGetFTVersion EQU $21B
|
|
FTChoose EQU $21C
|
|
FTEvent EQU $21D
|
|
FTSetupPostflight EQU $21E
|
|
FTMenu EQU $21F
|
|
FTActivate EQU $220
|
|
FTSetupXCleanup EQU $222
|
|
FTGetErrorString EQU $223
|
|
FTSend EQU $224
|
|
FTReceive EQU $225
|
|
|
|
MACRO
|
|
_InitFT
|
|
_CTBCall #InitFT
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTSetRefCon
|
|
_CTBCall #FTSetRefCon
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTGetRefCon
|
|
_CTBCall #FTGetRefCon
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTSetUserData
|
|
_CTBCall #FTSetUserData
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTGetUserData
|
|
_CTBCall #FTGetUserData
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTGetToolName
|
|
_CTBCall #FTGetToolName
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTGetProcID
|
|
_CTBCall #FTGetProcID
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTNew
|
|
_CTBCall #FTNew
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTDispose
|
|
_CTBCall #FTDispose
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTExec
|
|
_CTBCall #FTExec
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTStart
|
|
_CTBCall #FTStart
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTAbort
|
|
_CTBCall #FTAbort
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTResume
|
|
_CTBCall #FTResume
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTValidate
|
|
_CTBCall #FTValidate
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTDefault
|
|
_CTBCall #FTDefault
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTSetupPreflight
|
|
_CTBCall #FTSetupPreflight
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTSetupSetup
|
|
_CTBCall #FTSetupSetup
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTSetupFilter
|
|
_CTBCall #FTSetupFilter
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTSetupItem
|
|
_CTBCall #FTSetupItem
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTGetConfig
|
|
_CTBCall #FTGetConfig
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTSetConfig
|
|
_CTBCall #FTSetConfig
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTIntlToEnglish
|
|
_CTBCall #FTIntlToEnglish
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTEnglishToIntl
|
|
_CTBCall #FTEnglishToIntl
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTGetVersion
|
|
_CTBCall #FTGetVersion
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTGetFTVersion
|
|
_CTBCall #FTGetFTVersion
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTChoose
|
|
_CTBCall #FTChoose
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTEvent
|
|
_CTBCall #FTEvent
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTSetupPostflight
|
|
_CTBCall #FTSetupPostflight
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTMenu
|
|
_CTBCall #FTMenu
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTActivate
|
|
_CTBCall #FTActivate
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTSetupXCleanup
|
|
_CTBCall #FTSetupXCleanup
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTGetErrorString
|
|
_CTBCall #FTGetErrorString
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTSend
|
|
_CTBCall #FTSend
|
|
ENDM
|
|
|
|
MACRO
|
|
_FTReceive
|
|
_CTBCall #FTReceive
|
|
ENDM
|
|
|
|
ENDIF ; already included |