mirror of
https://github.com/elliotnunn/supermario.git
synced 2024-08-28 17:29:32 +00:00
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 |