;_____________________________________________ ; 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