Terminal.h 50 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720721722723724725726727728729730731732733734735736737738739740741742743744745746747748749750751752753754755756757758759760761762763764765766767768769770771772773774775776777778779780781782783784785786787788789790791792793794795796797798799800801802803804805806807808809810811812813814815816817818819820821822823824825826827828829830831832833834835836837838839840841842843844845846847848849850851852853854855856857858859860861862863864865866867868869870871872873874875876877878879880881882883884885886887888889890891892893894895896897898899900901902903904905906907908909910911912913914915916917918919920921922923924925926927928929930931932933934935936937938939940941942943944945946947948949950951952953954955956957958959960961962963964965966967968969970971972973974975976977978979980981982983984985986987988989990991992
  1. //---------------------------------------------------------------------------
  2. #ifndef TerminalH
  3. #define TerminalH
  4. #include <Classes.hpp>
  5. #include "SessionInfo.h"
  6. #include "Interface.h"
  7. #include "FileOperationProgress.h"
  8. #include "FileMasks.h"
  9. #include "RemoteFiles.h"
  10. #include "Exceptions.h"
  11. //---------------------------------------------------------------------------
  12. class TCopyParamType;
  13. class TFileOperationProgressType;
  14. class TCustomFileSystem;
  15. class TTunnelThread;
  16. class TSecureShell;
  17. struct TCalculateSizeParams;
  18. struct TOverwriteFileParams;
  19. struct TSynchronizeData;
  20. struct TSynchronizeOptions;
  21. class TSynchronizeChecklist;
  22. struct TCalculateSizeStats;
  23. struct TFileSystemInfo;
  24. struct TSpaceAvailable;
  25. struct TFilesFindParams;
  26. class TTunnelUI;
  27. class TCallbackGuard;
  28. class TParallelOperation;
  29. class TCollectedFileList;
  30. struct TLocalFileHandle;
  31. struct TNeonCertificateData;
  32. class TQueueItem;
  33. class TTerminalUI;
  34. typedef std::vector<__int64> TCalculatedSizes;
  35. //---------------------------------------------------------------------------
  36. typedef void __fastcall (__closure *TQueryUserEvent)
  37. (TObject * Sender, const UnicodeString Query, TStrings * MoreMessages, unsigned int Answers,
  38. const TQueryParams * Params, unsigned int & Answer, TQueryType QueryType, void * Arg);
  39. typedef void __fastcall (__closure *TPromptUserEvent)
  40. (TTerminal * Terminal, TPromptKind Kind, UnicodeString Name, UnicodeString Instructions,
  41. TStrings * Prompts, TStrings * Results, bool & Result, void * Arg);
  42. typedef void __fastcall (__closure *TDisplayBannerEvent)
  43. (TTerminal * Terminal, UnicodeString SessionName, const UnicodeString & Banner,
  44. bool & NeverShowAgain, int Options, unsigned int & Params);
  45. typedef void __fastcall (__closure *TExtendedExceptionEvent)
  46. (TTerminal * Terminal, Exception * E, void * Arg);
  47. typedef void __fastcall (__closure *TReadDirectoryEvent)(System::TObject * Sender, Boolean ReloadOnly);
  48. typedef void __fastcall (__closure *TReadDirectoryProgressEvent)(
  49. System::TObject* Sender, int Progress, int ResolvedLinks, bool & Cancel);
  50. typedef void __fastcall (__closure *TProcessFileEvent)
  51. (const UnicodeString FileName, const TRemoteFile * File, void * Param);
  52. typedef void __fastcall (__closure *TProcessFileEventEx)
  53. (const UnicodeString FileName, const TRemoteFile * File, void * Param, int Index);
  54. typedef int __fastcall (__closure *TFileOperationEvent)
  55. (void * Param1, void * Param2);
  56. typedef void __fastcall (__closure *TSynchronizeDirectory)
  57. (const UnicodeString & LocalDirectory, const UnicodeString & RemoteDirectory,
  58. bool & Continue, bool Collect, const TSynchronizeOptions * Options);
  59. typedef void __fastcall (__closure *TUpdatedSynchronizationChecklistItems)(
  60. const TSynchronizeChecklist::TItemList & Items);
  61. typedef void __fastcall (__closure *TProcessedSynchronizationChecklistItem)(
  62. void * Token, const TSynchronizeChecklist::TItem * Item);
  63. typedef void __fastcall (__closure *TDeleteLocalFileEvent)(
  64. const UnicodeString FileName, bool Alternative, int & Deleted);
  65. typedef int __fastcall (__closure *TDirectoryModifiedEvent)
  66. (TTerminal * Terminal, const UnicodeString Directory, bool SubDirs);
  67. typedef void __fastcall (__closure *TInformationEvent)
  68. (TTerminal * Terminal, const UnicodeString & Str, int Phase, const UnicodeString & Additional);
  69. typedef void __fastcall (__closure *TCustomCommandEvent)
  70. (TTerminal * Terminal, const UnicodeString & Command, bool & Handled);
  71. //---------------------------------------------------------------------------
  72. const unsigned int folNone = 0x00;
  73. const unsigned int folAllowSkip = 0x01;
  74. const unsigned int folRetryOnFatal = 0x02;
  75. /* TODO : Better user interface (query to user) */
  76. #define FILE_OPERATION_LOOP_BEGIN \
  77. { \
  78. bool DoRepeat; \
  79. do \
  80. { \
  81. DoRepeat = false; \
  82. try \
  83. #define FILE_OPERATION_LOOP_END_CUSTOM(MESSAGE, FLAGS, HELPKEYWORD) \
  84. catch (Exception & E) \
  85. { \
  86. FILE_OPERATION_LOOP_TERMINAL->FileOperationLoopEnd(E, OperationProgress, MESSAGE, FLAGS, L"", HELPKEYWORD); \
  87. DoRepeat = true; \
  88. } \
  89. } while (DoRepeat); \
  90. }
  91. #define FILE_OPERATION_LOOP_END_EX(MESSAGE, FLAGS) \
  92. FILE_OPERATION_LOOP_END_CUSTOM(MESSAGE, FLAGS, L"")
  93. #define FILE_OPERATION_LOOP_END(MESSAGE) \
  94. FILE_OPERATION_LOOP_END_EX(MESSAGE, folAllowSkip)
  95. //---------------------------------------------------------------------------
  96. enum TCurrentFSProtocol { cfsUnknown, cfsSCP, cfsSFTP, cfsFTP, cfsWebDAV, cfsS3 };
  97. //---------------------------------------------------------------------------
  98. const int cpDelete = 0x01;
  99. const int cpTemporary = 0x04;
  100. const int cpNoConfirmation = 0x08;
  101. const int cpAppend = 0x20;
  102. const int cpResume = 0x40;
  103. const int cpNoRecurse = 0x80;
  104. //---------------------------------------------------------------------------
  105. const int ccApplyToDirectories = 0x01;
  106. const int ccRecursive = 0x02;
  107. const int ccUser = 0x100;
  108. //---------------------------------------------------------------------------
  109. const int csIgnoreErrors = 0x01;
  110. const int csStopOnFirstFile = 0x02;
  111. const int csDisallowTemporaryTransferFiles = 0x04;
  112. //---------------------------------------------------------------------------
  113. const int ropNoReadDirectory = 0x02;
  114. //---------------------------------------------------------------------------
  115. const int boDisableNeverShowAgain = 0x01;
  116. const int bpMonospacedFont = 0x01;
  117. //---------------------------------------------------------------------------
  118. const int tfNone = 0x00;
  119. const int tfFirstLevel = 0x01;
  120. const int tfNewDirectory = 0x02;
  121. const int tfAutoResume = 0x04;
  122. const int tfPreCreateDir = 0x08;
  123. const int tfUseFileTransferAny = 0x10;
  124. //---------------------------------------------------------------------------
  125. class TTerminal : public TObject
  126. {
  127. public:
  128. // TScript::SynchronizeProc relies on the order
  129. enum TSynchronizeMode { smRemote, smLocal, smBoth };
  130. static const int spDelete = 0x01; // cannot be combined with spTimestamp
  131. static const int spNoConfirmation = 0x02; // has no effect for spTimestamp
  132. static const int spExistingOnly = 0x04; // is implicit for spTimestamp
  133. static const int spNoRecurse = 0x08;
  134. static const int spUseCache = 0x10; // cannot be combined with spTimestamp
  135. static const int spDelayProgress = 0x20; // cannot be combined with spTimestamp
  136. static const int spPreviewChanges = 0x40; // not used by core
  137. static const int spSubDirs = 0x80; // cannot be combined with spTimestamp
  138. static const int spTimestamp = 0x100;
  139. static const int spNotByTime = 0x200; // cannot be combined with spTimestamp and smBoth
  140. static const int spBySize = 0x400; // cannot be combined with smBoth, has opposite meaning for spTimestamp
  141. static const int spSelectedOnly = 0x800; // not used by core
  142. static const int spMirror = 0x1000;
  143. static const int spCaseSensitive = 0x2000;
  144. static const int spByChecksum = 0x4000; // cannot be combined with spTimestamp and smBoth
  145. static const int spDefault = TTerminal::spNoConfirmation | TTerminal::spPreviewChanges;
  146. // for ReactOnCommand()
  147. friend class TSCPFileSystem;
  148. friend class TSFTPFileSystem;
  149. friend class TFTPFileSystem;
  150. friend class TWebDAVFileSystem;
  151. friend class TS3FileSystem;
  152. friend class TTunnelUI;
  153. friend class TCallbackGuard;
  154. friend class TSecondaryTerminal;
  155. friend class TRetryOperationLoop;
  156. friend class TParallelOperation;
  157. friend class TTerminalUI;
  158. private:
  159. TSessionData * FSessionData;
  160. UnicodeString FPasswordEncryptionKey;
  161. TSessionLog * FLog;
  162. TActionLog * FActionLog;
  163. bool FActionLogOwned;
  164. TConfiguration * FConfiguration;
  165. UnicodeString FCurrentDirectory;
  166. Integer FExceptionOnFail;
  167. TRemoteDirectory * FFiles;
  168. int FInTransaction;
  169. bool FSuspendTransaction;
  170. TNotifyEvent FOnChangeDirectory;
  171. TReadDirectoryEvent FOnReadDirectory;
  172. TNotifyEvent FOnStartReadDirectory;
  173. TReadDirectoryProgressEvent FOnReadDirectoryProgress;
  174. TDeleteLocalFileEvent FOnDeleteLocalFile;
  175. TNotifyEvent FOnInitializeLog;
  176. TRemoteTokenList FMembership;
  177. TRemoteTokenList FGroups;
  178. TRemoteTokenList FUsers;
  179. bool FUsersGroupsLookedup;
  180. TFileOperationProgressEvent FOnProgress;
  181. TFileOperationFinished FOnFinished;
  182. TFileOperationProgressType * FOperationProgress;
  183. bool FUseBusyCursor;
  184. TRemoteDirectoryCache * FDirectoryCache;
  185. TRemoteDirectoryChangesCache * FDirectoryChangesCache;
  186. TSecureShell * FSecureShell;
  187. UnicodeString FLastDirectoryChange;
  188. TCurrentFSProtocol FFSProtocol;
  189. TTerminal * FCommandSession;
  190. bool FAutoReadDirectory;
  191. bool FReadingCurrentDirectory;
  192. bool * FClosedOnCompletion;
  193. TSessionStatus FStatus;
  194. int FOpening;
  195. RawByteString FRememberedPassword;
  196. TPromptKind FRememberedPasswordKind;
  197. RawByteString FRememberedTunnelPassword;
  198. bool FRememberedPasswordUsed;
  199. TTunnelThread * FTunnelThread;
  200. TSecureShell * FTunnel;
  201. TSessionData * FTunnelData;
  202. TSessionLog * FTunnelLog;
  203. TTunnelUI * FTunnelUI;
  204. int FTunnelLocalPortNumber;
  205. UnicodeString FTunnelError;
  206. TQueryUserEvent FOnQueryUser;
  207. TPromptUserEvent FOnPromptUser;
  208. TDisplayBannerEvent FOnDisplayBanner;
  209. TExtendedExceptionEvent FOnShowExtendedException;
  210. TInformationEvent FOnInformation;
  211. TCustomCommandEvent FOnCustomCommand;
  212. TNotifyEvent FOnClose;
  213. TCallbackGuard * FCallbackGuard;
  214. TFindingFileEvent FOnFindingFile;
  215. std::unique_ptr<TStrings> FShellChecksumAlgDefs;
  216. bool FEnableSecureShellUsage;
  217. bool FCollectFileSystemUsage;
  218. bool FRememberedPasswordTried;
  219. bool FRememberedTunnelPasswordTried;
  220. int FNesting;
  221. UnicodeString FFingerprintScannedSHA256;
  222. UnicodeString FFingerprintScannedSHA1;
  223. UnicodeString FFingerprintScannedMD5;
  224. DWORD FLastProgressLogged;
  225. UnicodeString FDestFileName;
  226. bool FMultipleDestinationFiles;
  227. bool FFileTransferAny;
  228. typedef std::map<UnicodeString, UnicodeString> TEncryptedFileNames;
  229. TEncryptedFileNames FEncryptedFileNames;
  230. std::set<UnicodeString> FFoldersScannedForEncryptedFiles;
  231. RawByteString FEncryptKey;
  232. TFileOperationProgressType::TPersistence * FOperationProgressPersistence;
  233. TOnceDoneOperation FOperationProgressOnceDoneOperation;
  234. UnicodeString FCollectedCalculatedChecksum;
  235. TTerminalUI * FTerminalUI;
  236. void __fastcall CommandError(Exception * E, const UnicodeString Msg);
  237. unsigned int __fastcall CommandError(Exception * E, const UnicodeString Msg,
  238. unsigned int Answers, const UnicodeString HelpKeyword = L"");
  239. UnicodeString __fastcall GetCurrentDirectory();
  240. bool __fastcall GetExceptionOnFail() const;
  241. const TRemoteTokenList * __fastcall GetGroups();
  242. const TRemoteTokenList * __fastcall GetUsers();
  243. const TRemoteTokenList * __fastcall GetMembership();
  244. void __fastcall SetCurrentDirectory(UnicodeString value);
  245. void __fastcall SetExceptionOnFail(bool value);
  246. void __fastcall ReactOnCommand(int /*TFSCommand*/ Cmd);
  247. UnicodeString __fastcall GetUserName() const;
  248. bool __fastcall GetAreCachesEmpty() const;
  249. void __fastcall ClearCachedFileList(const UnicodeString Path, bool SubDirs);
  250. void __fastcall AddCachedFileList(TRemoteFileList * FileList);
  251. bool __fastcall GetCommandSessionOpened();
  252. TTerminal * __fastcall GetCommandSession();
  253. bool __fastcall GetResolvingSymlinks();
  254. bool __fastcall GetActive();
  255. UnicodeString __fastcall GetPassword();
  256. UnicodeString __fastcall GetRememberedPassword();
  257. UnicodeString __fastcall GetRememberedTunnelPassword();
  258. bool __fastcall GetStoredCredentialsTried();
  259. inline bool __fastcall InTransaction();
  260. void __fastcall SaveCapabilities(TFileSystemInfo & FileSystemInfo);
  261. void LogAndInformation(const UnicodeString & S);
  262. static UnicodeString __fastcall SynchronizeModeStr(TSynchronizeMode Mode);
  263. static UnicodeString __fastcall SynchronizeParamsStr(int Params);
  264. protected:
  265. bool FReadCurrentDirectoryPending;
  266. bool FReadDirectoryPending;
  267. bool FTunnelOpening;
  268. TCustomFileSystem * FFileSystem;
  269. int FSecondaryTerminals;
  270. void __fastcall DoStartReadDirectory();
  271. void __fastcall DoReadDirectoryProgress(int Progress, int ResolvedLinks, bool & Cancel);
  272. void __fastcall DoReadDirectory(bool ReloadOnly);
  273. void DoReadDirectoryFinish(TRemoteDirectory * Files, bool ReloadOnly);
  274. void __fastcall DoCreateDirectory(const UnicodeString & DirName, bool Encrypt);
  275. void __fastcall DoDeleteFile(
  276. TCustomFileSystem * FileSystem, const UnicodeString & FileName, const TRemoteFile * File, int Params);
  277. void __fastcall DoCustomCommandOnFile(UnicodeString FileName,
  278. const TRemoteFile * File, UnicodeString Command, int Params, TCaptureOutputEvent OutputEvent);
  279. bool DoRenameOrCopyFile(
  280. bool Rename, const UnicodeString & FileName, const TRemoteFile * File, const UnicodeString & NewName,
  281. bool Move, bool DontOverwrite, bool IsBatchOperation);
  282. bool __fastcall DoRenameFile(
  283. const UnicodeString & FileName, const TRemoteFile * File, const UnicodeString & NewName, bool Move, bool DontOverwrite);
  284. bool __fastcall DoMoveFile(const UnicodeString & FileName, const TRemoteFile * File, /*const TMoveFileParams*/ void * Param);
  285. void __fastcall DoCopyFile(
  286. const UnicodeString & FileName, const TRemoteFile * File, const UnicodeString & NewName, bool DontOverwrite);
  287. void __fastcall DoChangeFileProperties(const UnicodeString FileName,
  288. const TRemoteFile * File, const TRemoteProperties * Properties);
  289. void __fastcall DoChangeDirectory();
  290. void __fastcall DoInitializeLog();
  291. void __fastcall EnsureNonExistence(const UnicodeString FileName);
  292. void __fastcall LookupUsersGroups();
  293. void __fastcall FileModified(const TRemoteFile * File,
  294. const UnicodeString FileName, bool ClearDirectoryChange = false);
  295. int __fastcall FileOperationLoop(TFileOperationEvent CallBackFunc,
  296. TFileOperationProgressType * OperationProgress, unsigned int Flags,
  297. const UnicodeString Message, void * Param1 = NULL, void * Param2 = NULL);
  298. bool __fastcall GetIsCapable(TFSCapability Capability) const;
  299. bool __fastcall ProcessFiles(TStrings * FileList, TFileOperation Operation,
  300. TProcessFileEvent ProcessFile, void * Param = NULL, TOperationSide Side = osRemote,
  301. bool Ex = false);
  302. bool __fastcall ProcessFilesEx(TStrings * FileList, TFileOperation Operation,
  303. TProcessFileEventEx ProcessFile, void * Param = NULL, TOperationSide Side = osRemote);
  304. void __fastcall ProcessDirectory(const UnicodeString DirName,
  305. TProcessFileEvent CallBackFunc, void * Param = NULL, bool UseCache = false,
  306. bool IgnoreErrors = false);
  307. bool __fastcall DeleteContentsIfDirectory(
  308. const UnicodeString & FileName, const TRemoteFile * File, int Params, TRmSessionAction & Action);
  309. void __fastcall AnnounceFileListOperation();
  310. void __fastcall ReadDirectory(TRemoteFileList * FileList);
  311. void __fastcall CustomReadDirectory(TRemoteFileList * FileList);
  312. void __fastcall DoCreateLink(const UnicodeString FileName, const UnicodeString PointTo, bool Symbolic);
  313. bool __fastcall CreateLocalFile(const UnicodeString FileName,
  314. TFileOperationProgressType * OperationProgress, HANDLE * AHandle,
  315. bool NoConfirmation);
  316. void __fastcall OpenLocalFile(const UnicodeString FileName, unsigned int Access,
  317. int * Attrs, HANDLE * Handle, __int64 * ACTime, __int64 * MTime,
  318. __int64 * ATime, __int64 * Size, bool TryWriteReadOnly = true);
  319. void __fastcall OpenLocalFile(
  320. const UnicodeString & FileName, unsigned int Access, TLocalFileHandle & Handle, bool TryWriteReadOnly = true);
  321. bool __fastcall AllowLocalFileTransfer(
  322. const UnicodeString & FileName, const TSearchRecSmart * SearchRec,
  323. const TCopyParamType * CopyParam, TFileOperationProgressType * OperationProgress);
  324. bool __fastcall HandleException(Exception * E);
  325. void __fastcall CalculateFileSize(UnicodeString FileName,
  326. const TRemoteFile * File, /*TCalculateSizeParams*/ void * Size);
  327. void __fastcall DoCalculateFileSize(UnicodeString FileName,
  328. const TRemoteFile * File, void * Param);
  329. bool __fastcall DoCalculateDirectorySize(const UnicodeString & FileName, TCalculateSizeParams * Params);
  330. void __fastcall CalculateLocalFileSize(
  331. const UnicodeString & FileName, const TSearchRecSmart & Rec, /*__int64*/ void * Size);
  332. TBatchOverwrite __fastcall EffectiveBatchOverwrite(
  333. const UnicodeString & SourceFullFileName, const TCopyParamType * CopyParam, int Params,
  334. TFileOperationProgressType * OperationProgress, bool Special);
  335. bool __fastcall CheckRemoteFile(
  336. const UnicodeString & FileName, const TCopyParamType * CopyParam,
  337. int Params, TFileOperationProgressType * OperationProgress);
  338. unsigned int __fastcall ConfirmFileOverwrite(
  339. const UnicodeString & SourceFullFileName, const UnicodeString & TargetFileName,
  340. const TOverwriteFileParams * FileParams, unsigned int Answers, TQueryParams * QueryParams,
  341. TOperationSide Side, const TCopyParamType * CopyParam, int Params,
  342. TFileOperationProgressType * OperationProgress, UnicodeString Message = L"");
  343. void __fastcall DoSynchronizeCollectDirectory(const UnicodeString LocalDirectory,
  344. const UnicodeString RemoteDirectory, TSynchronizeMode Mode,
  345. const TCopyParamType * CopyParam, int Params,
  346. TSynchronizeDirectory OnSynchronizeDirectory,
  347. TSynchronizeOptions * Options, int Level, TSynchronizeChecklist * Checklist);
  348. bool __fastcall LocalFindFirstLoop(const UnicodeString & Directory, TSearchRecChecked & SearchRec);
  349. bool __fastcall LocalFindNextLoop(TSearchRecChecked & SearchRec);
  350. bool __fastcall DoAllowLocalFileTransfer(
  351. const UnicodeString & FileName, const TSearchRecSmart & SearchRec, const TCopyParamType * CopyParam, bool DisallowTemporaryTransferFiles);
  352. bool __fastcall DoAllowRemoteFileTransfer(
  353. const TRemoteFile * File, const TCopyParamType * CopyParam, bool DisallowTemporaryTransferFiles);
  354. bool __fastcall IsEmptyLocalDirectory(
  355. const UnicodeString & LocalDirectory, const TCopyParamType * CopyParam, bool DisallowTemporaryTransferFiles);
  356. bool __fastcall IsEmptyRemoteDirectory(
  357. const TRemoteFile * File, const TCopyParamType * CopyParam, bool DisallowTemporaryTransferFiles);
  358. void __fastcall DoSynchronizeCollectFile(const UnicodeString FileName,
  359. const TRemoteFile * File, /*TSynchronizeData*/ void * Param);
  360. void __fastcall SynchronizeCollectFile(const UnicodeString FileName,
  361. const TRemoteFile * File, /*TSynchronizeData*/ void * Param);
  362. bool SameFileChecksum(const UnicodeString & LocalFileName, const TRemoteFile * File);
  363. void __fastcall CollectCalculatedChecksum(
  364. const UnicodeString & FileName, const UnicodeString & Alg, const UnicodeString & Hash);
  365. void __fastcall SynchronizeRemoteTimestamp(const UnicodeString FileName,
  366. const TRemoteFile * File, void * Param);
  367. void __fastcall SynchronizeLocalTimestamp(const UnicodeString FileName,
  368. const TRemoteFile * File, void * Param);
  369. void __fastcall DoSynchronizeProgress(const TSynchronizeData & Data, bool Collect);
  370. void __fastcall DeleteLocalFile(UnicodeString FileName,
  371. const TRemoteFile * File, void * Param);
  372. bool __fastcall RecycleFile(const UnicodeString & FileName, const TRemoteFile * File);
  373. TStrings * __fastcall GetFixedPaths();
  374. void __fastcall DoStartup();
  375. virtual bool __fastcall DoQueryReopen(Exception * E);
  376. virtual void __fastcall FatalError(Exception * E, UnicodeString Msg, UnicodeString HelpKeyword = L"");
  377. void __fastcall ResetConnection();
  378. virtual bool __fastcall DoPromptUser(TSessionData * Data, TPromptKind Kind,
  379. UnicodeString Name, UnicodeString Instructions, TStrings * Prompts,
  380. TStrings * Response);
  381. void __fastcall OpenTunnel();
  382. void __fastcall CloseTunnel();
  383. void __fastcall DoInformation(
  384. const UnicodeString & Str, int Phase = -1, const UnicodeString & Additional = UnicodeString());
  385. bool __fastcall PromptUser(TSessionData * Data, TPromptKind Kind,
  386. UnicodeString Name, UnicodeString Instructions, UnicodeString Prompt, bool Echo,
  387. int MaxLen, UnicodeString & Result);
  388. void __fastcall FileFind(UnicodeString FileName, const TRemoteFile * File, void * Param);
  389. void __fastcall DoFilesFind(UnicodeString Directory, TFilesFindParams & Params, UnicodeString RealDirectory);
  390. bool __fastcall DoCreateLocalFile(const UnicodeString FileName,
  391. TFileOperationProgressType * OperationProgress, HANDLE * AHandle,
  392. bool NoConfirmation);
  393. void __fastcall LockFile(const UnicodeString FileName, const TRemoteFile * File, void * Param);
  394. void __fastcall UnlockFile(const UnicodeString FileName, const TRemoteFile * File, void * Param);
  395. void __fastcall DoLockFile(const UnicodeString & FileName, const TRemoteFile * File);
  396. void __fastcall DoUnlockFile(const UnicodeString & FileName, const TRemoteFile * File);
  397. void __fastcall OperationFinish(
  398. TFileOperationProgressType * Progress, const void * Item, const UnicodeString & FileName,
  399. bool Success, TOnceDoneOperation & OnceDoneOperation);
  400. void __fastcall OperationStart(
  401. TFileOperationProgressType & Progress, TFileOperation Operation, TOperationSide Side, int Count);
  402. void __fastcall OperationStart(
  403. TFileOperationProgressType & Progress, TFileOperation Operation, TOperationSide Side, int Count,
  404. bool Temp, const UnicodeString & Directory, unsigned long CPSLimit, TOnceDoneOperation OnceDoneOperation);
  405. void __fastcall OperationStop(TFileOperationProgressType & Progress);
  406. virtual void __fastcall Information(const UnicodeString & Str);
  407. virtual unsigned int __fastcall QueryUser(const UnicodeString Query,
  408. TStrings * MoreMessages, unsigned int Answers, const TQueryParams * Params,
  409. TQueryType QueryType = qtConfirmation);
  410. virtual unsigned int __fastcall QueryUserException(const UnicodeString Query,
  411. Exception * E, unsigned int Answers, const TQueryParams * Params,
  412. TQueryType QueryType = qtConfirmation);
  413. virtual bool __fastcall PromptUser(TSessionData * Data, TPromptKind Kind,
  414. UnicodeString Name, UnicodeString Instructions, TStrings * Prompts, TStrings * Results);
  415. virtual void __fastcall DisplayBanner(const UnicodeString & Banner);
  416. virtual void __fastcall Closed();
  417. virtual void __fastcall ProcessGUI();
  418. void __fastcall Progress(TFileOperationProgressType * OperationProgress);
  419. virtual void __fastcall HandleExtendedException(Exception * E);
  420. bool __fastcall IsListenerFree(unsigned int PortNumber);
  421. void __fastcall DoProgress(TFileOperationProgressType & ProgressData);
  422. void __fastcall DoFinished(TFileOperation Operation, TOperationSide Side, bool Temp,
  423. const UnicodeString & FileName, bool Success, bool NotCancelled, TOnceDoneOperation & OnceDoneOperation);
  424. void __fastcall RollbackAction(TSessionAction & Action,
  425. TFileOperationProgressType * OperationProgress, Exception * E = NULL);
  426. void __fastcall DoAnyCommand(const UnicodeString Command, TCaptureOutputEvent OutputEvent,
  427. TCallSessionAction * Action);
  428. TRemoteFileList * __fastcall DoReadDirectoryListing(UnicodeString Directory, bool UseCache);
  429. RawByteString __fastcall EncryptPassword(const UnicodeString & Password);
  430. UnicodeString __fastcall DecryptPassword(const RawByteString & Password);
  431. UnicodeString __fastcall GetRemoteFileInfo(TRemoteFile * File);
  432. void __fastcall LogRemoteFile(TRemoteFile * File);
  433. UnicodeString __fastcall FormatFileDetailsForLog(
  434. const UnicodeString & FileName, TDateTime Modification, __int64 Size, const TRemoteFile * LinkedFile = NULL);
  435. void __fastcall LogFileDetails(const UnicodeString & FileName, TDateTime Modification, __int64 Size, const TRemoteFile * LinkedFile = NULL);
  436. void __fastcall LogFileDone(
  437. TFileOperationProgressType * OperationProgress, const UnicodeString & DestFileName,
  438. TTransferSessionAction & Action);
  439. void __fastcall LogTotalTransferDetails(
  440. const UnicodeString TargetDir, const TCopyParamType * CopyParam,
  441. TFileOperationProgressType * OperationProgress, bool Parallel, TStrings * Files);
  442. void __fastcall LogTotalTransferDone(TFileOperationProgressType * OperationProgress);
  443. virtual TTerminal * __fastcall GetPrimaryTerminal();
  444. void __fastcall DoEndTransaction(bool Inform);
  445. bool __fastcall VerifyCertificate(
  446. const UnicodeString & CertificateStorageKey, const UnicodeString & SiteKey,
  447. const UnicodeString & FingerprintSHA1, const UnicodeString & FingerprintSHA256,
  448. const UnicodeString & CertificateSubject, int Failures);
  449. void __fastcall CacheCertificate(const UnicodeString & CertificateStorageKey,
  450. const UnicodeString & SiteKey, const UnicodeString & FingerprintSHA1, const UnicodeString & FingerprintSHA256,
  451. int Failures);
  452. bool __fastcall ConfirmCertificate(
  453. TSessionInfo & SessionInfo, int Failures, const UnicodeString & CertificateStorageKey, bool CanRemember);
  454. bool VerifyOrConfirmHttpCertificate(
  455. const UnicodeString & AHostName, int APortNumber, const TNeonCertificateData & Data, bool CanRemember,
  456. TSessionInfo & SessionInfo);
  457. void __fastcall CollectTlsUsage(const UnicodeString & TlsVersionStr);
  458. bool __fastcall LoadTlsCertificate(X509 *& Certificate, EVP_PKEY *& PrivateKey);
  459. bool __fastcall TryStartOperationWithFile(
  460. const UnicodeString & FileName, TFileOperation Operation1, TFileOperation Operation2 = foNone);
  461. void __fastcall StartOperationWithFile(
  462. const UnicodeString & FileName, TFileOperation Operation1, TFileOperation Operation2 = foNone);
  463. bool __fastcall CanRecurseToDirectory(const TRemoteFile * File);
  464. bool __fastcall DoOnCustomCommand(const UnicodeString & Command);
  465. bool __fastcall CanParallel(const TCopyParamType * CopyParam, int Params, TParallelOperation * ParallelOperation);
  466. void __fastcall CopyParallel(TParallelOperation * ParallelOperation, TFileOperationProgressType * OperationProgress);
  467. void __fastcall DoCopyToRemote(
  468. TStrings * FilesToCopy, const UnicodeString & TargetDir, const TCopyParamType * CopyParam, int Params,
  469. TFileOperationProgressType * OperationProgress, unsigned int Flags, TOnceDoneOperation & OnceDoneOperation);
  470. void __fastcall SourceRobust(
  471. const UnicodeString & FileName, const TSearchRecSmart * SearchRec,
  472. const UnicodeString & TargetDir, const TCopyParamType * CopyParam, int Params,
  473. TFileOperationProgressType * OperationProgress, unsigned int Flags);
  474. void __fastcall Source(
  475. const UnicodeString & FileName, const TSearchRecSmart * SearchRec,
  476. const UnicodeString & TargetDir, const TCopyParamType * CopyParam, int Params,
  477. TFileOperationProgressType * OperationProgress, unsigned int Flags, TUploadSessionAction & Action, bool & ChildError);
  478. void __fastcall DirectorySource(
  479. const UnicodeString & DirectoryName, const UnicodeString & TargetDir, const UnicodeString & DestDirectoryName,
  480. int Attrs, const TCopyParamType * CopyParam, int Params,
  481. TFileOperationProgressType * OperationProgress, unsigned int Flags);
  482. bool UseAsciiTransfer(
  483. const UnicodeString & BaseFileName, TOperationSide Side, const TCopyParamType * CopyParam,
  484. const TFileMasks::TParams & MaskParams);
  485. void __fastcall SelectTransferMode(
  486. const UnicodeString & BaseFileName, TOperationSide Side, const TCopyParamType * CopyParam,
  487. const TFileMasks::TParams & MaskParams);
  488. void __fastcall SelectSourceTransferMode(const TLocalFileHandle & Handle, const TCopyParamType * CopyParam);
  489. void DoDeleteLocalFile(const UnicodeString & FileName);
  490. void DoRenameLocalFileForce(const UnicodeString & OldName, const UnicodeString & NewName);
  491. void __fastcall UpdateSource(const TLocalFileHandle & Handle, const TCopyParamType * CopyParam, int Params);
  492. void __fastcall DoCopyToLocal(
  493. TStrings * FilesToCopy, const UnicodeString & TargetDir, const TCopyParamType * CopyParam, int Params,
  494. TFileOperationProgressType * OperationProgress, unsigned int Flags, TOnceDoneOperation & OnceDoneOperation);
  495. void __fastcall SinkRobust(
  496. const UnicodeString & FileName, const TRemoteFile * File, const UnicodeString & TargetDir,
  497. const TCopyParamType * CopyParam, int Params, TFileOperationProgressType * OperationProgress, unsigned int Flags);
  498. void __fastcall Sink(
  499. const UnicodeString & FileName, const TRemoteFile * File, const UnicodeString & TargetDir,
  500. const TCopyParamType * CopyParam, int Params, TFileOperationProgressType * OperationProgress, unsigned int Flags,
  501. TDownloadSessionAction & Action);
  502. void __fastcall SinkFile(UnicodeString FileName, const TRemoteFile * File, void * Param);
  503. void __fastcall UpdateTargetAttrs(
  504. const UnicodeString & DestFullName, const TRemoteFile * File, const TCopyParamType * CopyParam, int Attrs);
  505. void __fastcall UpdateTargetTime(
  506. HANDLE Handle, TDateTime Modification, TModificationFmt ModificationFmt, TDSTMode DSTMode);
  507. void CheckParallelFileTransfer(
  508. const UnicodeString & TargetDir, TStringList * Files, const TCopyParamType * CopyParam, int Params,
  509. UnicodeString & ParallelFileName, __int64 & ParallelFileSize, TFileOperationProgressType * OperationProgress);
  510. TRemoteFile * CheckRights(const UnicodeString & EntryType, const UnicodeString & FileName, bool & WrongRights);
  511. bool IsValidFile(TRemoteFile * File);
  512. void __fastcall CalculateSubFoldersChecksum(
  513. const UnicodeString & Alg, TStrings * FileList, TCalculatedChecksumEvent OnCalculatedChecksum,
  514. TFileOperationProgressType * OperationProgress, bool FirstLevel);
  515. void GetShellChecksumAlgs(TStrings * Algs);
  516. TStrings * GetShellChecksumAlgDefs();
  517. TStrings * ProcessFeatures(TStrings * Features);
  518. UnicodeString __fastcall EncryptFileName(const UnicodeString & Path, bool EncryptNewFiles);
  519. UnicodeString __fastcall DecryptFileName(const UnicodeString & Path, bool DecryptFullPath, bool DontCache);
  520. TEncryptedFileNames::const_iterator __fastcall GetEncryptedFileName(const UnicodeString & Path);
  521. bool __fastcall IsFileEncrypted(const UnicodeString & Path, bool EncryptNewFiles = false);
  522. __property TFileOperationProgressType * OperationProgress = { read=FOperationProgress };
  523. public:
  524. __fastcall TTerminal(TSessionData * SessionData, TConfiguration * Configuration, TActionLog * ActionLog = NULL);
  525. __fastcall ~TTerminal();
  526. void __fastcall Open();
  527. void __fastcall Close();
  528. void __fastcall FingerprintScan(UnicodeString & SHA256, UnicodeString & SHA1, UnicodeString & MD5);
  529. void __fastcall Reopen(int Params);
  530. virtual void __fastcall DirectoryModified(const UnicodeString Path, bool SubDirs);
  531. virtual void __fastcall DirectoryLoaded(TRemoteFileList * FileList);
  532. void __fastcall ShowExtendedException(Exception * E);
  533. void __fastcall Idle();
  534. void __fastcall RecryptPasswords();
  535. bool __fastcall AllowedAnyCommand(const UnicodeString Command);
  536. void __fastcall AnyCommand(const UnicodeString Command, TCaptureOutputEvent OutputEvent);
  537. void __fastcall CloseOnCompletion(
  538. TOnceDoneOperation Operation = odoDisconnect, const UnicodeString & Message = L"",
  539. const UnicodeString & TargetLocalPath = L"", const UnicodeString & DestLocalFileName = L"");
  540. UnicodeString __fastcall AbsolutePath(UnicodeString Path, bool Local);
  541. void __fastcall BeginTransaction();
  542. void __fastcall ReadCurrentDirectory();
  543. void __fastcall ReadDirectory(bool ReloadOnly, bool ForceCache = false);
  544. TRemoteFileList * __fastcall ReadDirectoryListing(UnicodeString Directory, const TFileMasks & Mask);
  545. TRemoteFileList * __fastcall CustomReadDirectoryListing(UnicodeString Directory, bool UseCache);
  546. TRemoteFile * __fastcall ReadFileListing(UnicodeString Path);
  547. TRemoteFile * ReadFile(const UnicodeString & FileName);
  548. TRemoteFile * TryReadFile(const UnicodeString & FileName);
  549. bool FileExists(const UnicodeString & FileName);
  550. bool DirectoryExists(const UnicodeString & FileName);
  551. void __fastcall ReadSymlink(TRemoteFile * SymlinkFile, TRemoteFile *& File);
  552. bool __fastcall CopyToLocal(
  553. TStrings * FilesToCopy, const UnicodeString & TargetDir, const TCopyParamType * CopyParam, int Params,
  554. TParallelOperation * ParallelOperation);
  555. bool __fastcall CopyToRemote(
  556. TStrings * FilesToCopy, const UnicodeString & TargetDir, const TCopyParamType * CopyParam, int Params,
  557. TParallelOperation * ParallelOperation);
  558. int __fastcall CopyToParallel(TParallelOperation * ParallelOperation, TFileOperationProgressType * OperationProgress);
  559. void __fastcall LogParallelTransfer(TParallelOperation * ParallelOperation);
  560. void __fastcall CreateDirectory(const UnicodeString & DirName, const TRemoteProperties * Properties);
  561. bool __fastcall CreateTargetDirectory(const UnicodeString & DirectoryPath, int Attrs, const TCopyParamType * CopyParam);
  562. void __fastcall CreateLink(const UnicodeString FileName, const UnicodeString PointTo, bool Symbolic);
  563. void __fastcall DeleteFile(UnicodeString FileName,
  564. const TRemoteFile * File = NULL, void * Params = NULL);
  565. bool __fastcall DeleteFiles(TStrings * FilesToDelete, int Params = 0);
  566. bool __fastcall DeleteLocalFiles(TStrings * FileList, int Params = 0);
  567. bool __fastcall IsRecycledFile(UnicodeString FileName);
  568. void __fastcall CustomCommandOnFile(UnicodeString FileName,
  569. const TRemoteFile * File, void * AParams);
  570. void __fastcall CustomCommandOnFiles(UnicodeString Command, int Params,
  571. TStrings * Files, TCaptureOutputEvent OutputEvent);
  572. void __fastcall ChangeDirectory(const UnicodeString Directory);
  573. void __fastcall EndTransaction();
  574. void __fastcall HomeDirectory();
  575. UnicodeString __fastcall GetHomeDirectory();
  576. void __fastcall ChangeFileProperties(UnicodeString FileName,
  577. const TRemoteFile * File, /*const TRemoteProperties */ void * Properties);
  578. void __fastcall ChangeFilesProperties(TStrings * FileList,
  579. const TRemoteProperties * Properties);
  580. bool __fastcall LoadFilesProperties(TStrings * FileList);
  581. NORETURN void __fastcall TerminalError(UnicodeString Msg);
  582. NORETURN void __fastcall TerminalError(Exception * E, UnicodeString Msg, UnicodeString HelpKeyword = L"");
  583. void __fastcall ReloadDirectory();
  584. void __fastcall RefreshDirectory();
  585. void __fastcall RenameFile(const TRemoteFile * File, const UnicodeString & NewName);
  586. void __fastcall MoveFile(const UnicodeString FileName, const TRemoteFile * File,
  587. /*const TMoveFileParams*/ void * Param);
  588. bool __fastcall MoveFiles(
  589. TStrings * FileList, const UnicodeString & Target, const UnicodeString & FileMask, bool DontOverwrite);
  590. void __fastcall CopyFile(const UnicodeString FileName, const TRemoteFile * File,
  591. /*const TMoveFileParams*/ void * Param);
  592. bool __fastcall CopyFiles(
  593. TStrings * FileList, const UnicodeString & Target, const UnicodeString & FileMask, bool DontOverwrite);
  594. bool CalculateFilesSize(TStrings * FileList, __int64 & Size, TCalculateSizeParams & Params);
  595. bool __fastcall CalculateLocalFilesSize(TStrings * FileList, __int64 & Size,
  596. const TCopyParamType * CopyParam, bool AllowDirs, TStrings * Files, TCalculatedSizes * CalculatedSizes);
  597. void __fastcall CalculateFilesChecksum(
  598. const UnicodeString & Alg, TStrings * FileList, TCalculatedChecksumEvent OnCalculatedChecksum);
  599. void __fastcall ClearCaches();
  600. TSynchronizeChecklist * __fastcall SynchronizeCollect(const UnicodeString LocalDirectory,
  601. const UnicodeString RemoteDirectory, TSynchronizeMode Mode,
  602. const TCopyParamType * CopyParam, int Params,
  603. TSynchronizeDirectory OnSynchronizeDirectory, TSynchronizeOptions * Options);
  604. void __fastcall SynchronizeApply(
  605. TSynchronizeChecklist * Checklist,
  606. const TCopyParamType * CopyParam, int Params,
  607. TSynchronizeDirectory OnSynchronizeDirectory, TProcessedSynchronizationChecklistItem OnProcessedItem,
  608. TUpdatedSynchronizationChecklistItems OnUpdatedSynchronizationChecklistItems, void * Token,
  609. TFileOperationStatistics * Statistics);
  610. TQueueItem * SynchronizeToQueue(
  611. const TSynchronizeChecklist::TItem * ChecklistItem, const TCopyParamType * CopyParam, int Params, bool Parallel);
  612. void __fastcall SynchronizeChecklistCalculateSize(
  613. TSynchronizeChecklist * Checklist, const TSynchronizeChecklist::TItemList & Items,
  614. const TCopyParamType * CopyParam);
  615. static TCopyParamType GetSynchronizeCopyParam(const TCopyParamType * CopyParam, int Params);
  616. static int GetSynchronizeCopyParams(int Params);
  617. void __fastcall FilesFind(UnicodeString Directory, const TFileMasks & FileMask,
  618. TFileFoundEvent OnFileFound, TFindingFileEvent OnFindingFile);
  619. void __fastcall SpaceAvailable(const UnicodeString Path, TSpaceAvailable & ASpaceAvailable);
  620. void __fastcall LockFiles(TStrings * FileList);
  621. void __fastcall UnlockFiles(TStrings * FileList);
  622. TRemoteFileList * __fastcall DirectoryFileList(const UnicodeString Path, TDateTime Timestamp, bool CanLoad);
  623. void __fastcall MakeLocalFileList(
  624. const UnicodeString & FileName, const TSearchRecSmart & Rec, void * Param);
  625. bool __fastcall FileOperationLoopQuery(Exception & E,
  626. TFileOperationProgressType * OperationProgress, const UnicodeString Message,
  627. unsigned int Flags, UnicodeString SpecialRetry = L"", UnicodeString HelpKeyword = L"");
  628. void __fastcall FileOperationLoopEnd(Exception & E,
  629. TFileOperationProgressType * OperationProgress, const UnicodeString & Message,
  630. unsigned int Flags, const UnicodeString & SpecialRetry, const UnicodeString & HelpKeyword);
  631. TUsableCopyParamAttrs __fastcall UsableCopyParamAttrs(int Params);
  632. bool __fastcall ContinueReopen(TDateTime Start);
  633. bool __fastcall QueryReopen(Exception * E, int Params,
  634. TFileOperationProgressType * OperationProgress);
  635. UnicodeString __fastcall PeekCurrentDirectory();
  636. void __fastcall FatalAbort();
  637. void __fastcall ReflectSettings();
  638. void __fastcall CollectUsage();
  639. TTerminal * __fastcall CreateSecondarySession(const UnicodeString & Name, TSessionData * SessionData);
  640. void __fastcall FillSessionDataForCode(TSessionData * Data);
  641. void __fastcall UpdateSessionCredentials(TSessionData * Data);
  642. UnicodeString UploadPublicKey(const UnicodeString & FileName);
  643. TCustomFileSystem * GetFileSystemForCapability(TFSCapability Capability, bool NeedCurrentDirectory = false);
  644. void PrepareCommandSession(bool NeedCurrentDirectory = false);
  645. const TSessionInfo & __fastcall GetSessionInfo();
  646. const TFileSystemInfo & __fastcall GetFileSystemInfo(bool Retrieve = false);
  647. void __fastcall LogEvent(const UnicodeString & Str);
  648. void __fastcall LogEvent(int Level, const UnicodeString & Str);
  649. void __fastcall GetSupportedChecksumAlgs(TStrings * Algs);
  650. UnicodeString __fastcall ChangeFileName(const TCopyParamType * CopyParam,
  651. UnicodeString FileName, TOperationSide Side, bool FirstLevel);
  652. UnicodeString __fastcall GetBaseFileName(UnicodeString FileName);
  653. bool __fastcall IsEncryptingFiles() const { return !FEncryptKey.IsEmpty(); }
  654. RawByteString __fastcall GetEncryptKey() { return FEncryptKey; }
  655. static UnicodeString __fastcall ExpandFileName(UnicodeString Path,
  656. const UnicodeString BasePath);
  657. __property TSessionData * SessionData = { read = FSessionData };
  658. __property TSessionLog * Log = { read = FLog };
  659. __property TActionLog * ActionLog = { read = FActionLog };
  660. __property TConfiguration * Configuration = { read = FConfiguration };
  661. __property bool Active = { read = GetActive };
  662. __property TSessionStatus Status = { read = FStatus };
  663. __property UnicodeString CurrentDirectory = { read = GetCurrentDirectory, write = SetCurrentDirectory };
  664. __property bool ExceptionOnFail = { read = GetExceptionOnFail, write = SetExceptionOnFail };
  665. __property TRemoteDirectory * Files = { read = FFiles };
  666. __property TNotifyEvent OnChangeDirectory = { read = FOnChangeDirectory, write = FOnChangeDirectory };
  667. __property TReadDirectoryEvent OnReadDirectory = { read = FOnReadDirectory, write = FOnReadDirectory };
  668. __property TNotifyEvent OnStartReadDirectory = { read = FOnStartReadDirectory, write = FOnStartReadDirectory };
  669. __property TReadDirectoryProgressEvent OnReadDirectoryProgress = { read = FOnReadDirectoryProgress, write = FOnReadDirectoryProgress };
  670. __property TDeleteLocalFileEvent OnDeleteLocalFile = { read = FOnDeleteLocalFile, write = FOnDeleteLocalFile };
  671. __property TNotifyEvent OnInitializeLog = { read = FOnInitializeLog, write = FOnInitializeLog };
  672. __property const TRemoteTokenList * Groups = { read = GetGroups };
  673. __property const TRemoteTokenList * Users = { read = GetUsers };
  674. __property const TRemoteTokenList * Membership = { read = GetMembership };
  675. __property TFileOperationProgressEvent OnProgress = { read=FOnProgress, write=FOnProgress };
  676. __property TFileOperationFinished OnFinished = { read=FOnFinished, write=FOnFinished };
  677. __property TCurrentFSProtocol FSProtocol = { read = FFSProtocol };
  678. __property bool UseBusyCursor = { read = FUseBusyCursor, write = FUseBusyCursor };
  679. __property UnicodeString UserName = { read=GetUserName };
  680. __property bool IsCapable[TFSCapability Capability] = { read = GetIsCapable };
  681. __property bool AreCachesEmpty = { read = GetAreCachesEmpty };
  682. __property bool CommandSessionOpened = { read = GetCommandSessionOpened };
  683. __property TTerminal * CommandSession = { read = GetCommandSession };
  684. __property TTerminal * PrimaryTerminal = { read = GetPrimaryTerminal };
  685. __property bool AutoReadDirectory = { read = FAutoReadDirectory, write = FAutoReadDirectory };
  686. __property TStrings * FixedPaths = { read = GetFixedPaths };
  687. __property bool ResolvingSymlinks = { read = GetResolvingSymlinks };
  688. __property UnicodeString Password = { read = GetPassword };
  689. __property bool StoredCredentialsTried = { read = GetStoredCredentialsTried };
  690. __property TQueryUserEvent OnQueryUser = { read = FOnQueryUser, write = FOnQueryUser };
  691. __property TPromptUserEvent OnPromptUser = { read = FOnPromptUser, write = FOnPromptUser };
  692. __property TDisplayBannerEvent OnDisplayBanner = { read = FOnDisplayBanner, write = FOnDisplayBanner };
  693. __property TExtendedExceptionEvent OnShowExtendedException = { read = FOnShowExtendedException, write = FOnShowExtendedException };
  694. __property TInformationEvent OnInformation = { read = FOnInformation, write = FOnInformation };
  695. __property TCustomCommandEvent OnCustomCommand = { read = FOnCustomCommand, write = FOnCustomCommand };
  696. __property TNotifyEvent OnClose = { read = FOnClose, write = FOnClose };
  697. __property int TunnelLocalPortNumber = { read = FTunnelLocalPortNumber };
  698. };
  699. //---------------------------------------------------------------------------
  700. class TSecondaryTerminal : public TTerminal
  701. {
  702. public:
  703. __fastcall TSecondaryTerminal(
  704. TTerminal * MainTerminal, TSessionData * SessionData, TConfiguration * Configuration,
  705. const UnicodeString & Name, TActionLog * ActionLog);
  706. void __fastcall UpdateFromMain();
  707. __property TTerminal * MainTerminal = { read = FMainTerminal };
  708. protected:
  709. virtual void __fastcall DirectoryLoaded(TRemoteFileList * FileList);
  710. virtual void __fastcall DirectoryModified(const UnicodeString Path,
  711. bool SubDirs);
  712. virtual TTerminal * __fastcall GetPrimaryTerminal();
  713. private:
  714. TTerminal * FMainTerminal;
  715. };
  716. //---------------------------------------------------------------------------
  717. class TTerminalList : public TObjectList
  718. {
  719. public:
  720. __fastcall TTerminalList(TConfiguration * AConfiguration);
  721. __fastcall ~TTerminalList();
  722. virtual TTerminal * __fastcall NewTerminal(TSessionData * Data);
  723. virtual void __fastcall FreeTerminal(TTerminal * Terminal);
  724. void __fastcall FreeAndNullTerminal(TTerminal * & Terminal);
  725. void __fastcall RecryptPasswords();
  726. __property TTerminal * Terminals[int Index] = { read=GetTerminal };
  727. protected:
  728. virtual TTerminal * __fastcall CreateTerminal(TSessionData * Data);
  729. private:
  730. TConfiguration * FConfiguration;
  731. TTerminal * __fastcall GetTerminal(int Index);
  732. };
  733. //---------------------------------------------------------------------------
  734. struct TCustomCommandParams
  735. {
  736. UnicodeString Command;
  737. int Params;
  738. TCaptureOutputEvent OutputEvent;
  739. };
  740. //---------------------------------------------------------------------------
  741. struct TCalculateSizeStats
  742. {
  743. TCalculateSizeStats();
  744. int Files;
  745. int Directories;
  746. int SymLinks;
  747. TStrings * FoundFiles;
  748. TCalculatedSizes * CalculatedSizes;
  749. };
  750. //---------------------------------------------------------------------------
  751. struct TCalculateSizeParams
  752. {
  753. friend class TTerminal;
  754. public:
  755. TCalculateSizeParams();
  756. int Params;
  757. const TCopyParamType * CopyParam;
  758. TCalculateSizeStats * Stats;
  759. bool AllowDirs;
  760. bool UseCache;
  761. private:
  762. TCollectedFileList * Files;
  763. UnicodeString LastDirPath;
  764. __int64 Size;
  765. bool Result;
  766. };
  767. //---------------------------------------------------------------------------
  768. struct TOverwriteFileParams
  769. {
  770. TOverwriteFileParams();
  771. __int64 SourceSize;
  772. __int64 DestSize;
  773. TDateTime SourceTimestamp;
  774. TDateTime DestTimestamp;
  775. TModificationFmt SourcePrecision;
  776. TModificationFmt DestPrecision;
  777. };
  778. //---------------------------------------------------------------------------
  779. typedef std::vector<TDateTime> TDateTimes;
  780. //---------------------------------------------------------------------------
  781. struct TMakeLocalFileListParams
  782. {
  783. TStrings * FileList;
  784. TDateTimes * FileTimes;
  785. bool IncludeDirs;
  786. bool Recursive;
  787. };
  788. //---------------------------------------------------------------------------
  789. struct TSynchronizeOptions
  790. {
  791. TSynchronizeOptions();
  792. ~TSynchronizeOptions();
  793. TStringList * Filter;
  794. int Files;
  795. bool __fastcall FilterFind(const UnicodeString & FileName);
  796. bool __fastcall MatchesFilter(const UnicodeString & FileName);
  797. };
  798. //---------------------------------------------------------------------------
  799. struct TSpaceAvailable
  800. {
  801. TSpaceAvailable();
  802. __int64 BytesOnDevice;
  803. __int64 UnusedBytesOnDevice;
  804. __int64 BytesAvailableToUser;
  805. __int64 UnusedBytesAvailableToUser;
  806. unsigned long BytesPerAllocationUnit;
  807. };
  808. //---------------------------------------------------------------------------
  809. class TRobustOperationLoop
  810. {
  811. public:
  812. TRobustOperationLoop(TTerminal * Terminal, TFileOperationProgressType * OperationProgress, bool * AnyTransfer = NULL, bool CanRetry = true);
  813. ~TRobustOperationLoop();
  814. bool TryReopen(Exception & E);
  815. bool ShouldRetry();
  816. bool Retry();
  817. private:
  818. TTerminal * FTerminal;
  819. TFileOperationProgressType * FOperationProgress;
  820. bool FRetry;
  821. bool * FAnyTransfer;
  822. bool FPrevAnyTransfer;
  823. TDateTime FStart;
  824. bool FCanRetry;
  825. };
  826. //---------------------------------------------------------------------------
  827. class TCollectedFileList : public TObject
  828. {
  829. public:
  830. TCollectedFileList();
  831. virtual __fastcall ~TCollectedFileList();
  832. int Add(const UnicodeString & FileName, TObject * Object, bool Dir);
  833. void DidNotRecurse(int Index);
  834. void Delete(int Index);
  835. int Count() const;
  836. UnicodeString GetFileName(int Index) const;
  837. TObject * GetObject(int Index) const;
  838. bool IsDir(int Index) const;
  839. bool IsRecursed(int Index) const;
  840. int GetState(int Index) const;
  841. void SetState(int Index, int State);
  842. private:
  843. void Deleting(int Index);
  844. struct TFileData
  845. {
  846. UnicodeString FileName;
  847. TObject * Object;
  848. bool Dir;
  849. bool Recursed;
  850. int State;
  851. };
  852. typedef std::vector<TFileData> TFileDataList;
  853. TFileDataList FList;
  854. };
  855. //---------------------------------------------------------------------------
  856. class TQueueFileList;
  857. //---------------------------------------------------------------------------
  858. class TParallelOperation
  859. {
  860. public:
  861. TParallelOperation(TOperationSide Side);
  862. ~TParallelOperation();
  863. void Init(
  864. TStrings * AFiles, const UnicodeString & TargetDir, const TCopyParamType * CopyParam, int Params,
  865. TFileOperationProgressType * MainOperationProgress, const UnicodeString & MainName,
  866. __int64 ParallelFileSize);
  867. bool IsInitialized();
  868. void WaitFor();
  869. bool ShouldAddClient();
  870. void AddClient();
  871. void RemoveClient();
  872. int GetNext(
  873. TTerminal * Terminal, UnicodeString & FileName, TObject *& Object, UnicodeString & TargetDir, bool & Dir,
  874. bool & Recursed, TCopyParamType *& CustomCopyParam);
  875. void Done(
  876. const UnicodeString & FileName, bool Dir, bool Success, const UnicodeString & TargetDir,
  877. const TCopyParamType * CopyParam, TTerminal * Terminal);
  878. bool UpdateFileList(TQueueFileList * UpdateFileList);
  879. static bool GetOnlyFile(TStrings * FileList, UnicodeString & FileName, TObject *& Object);
  880. static TCollectedFileList * GetFileList(TStrings * FileList, int Index);
  881. static UnicodeString GetPartPrefix(const UnicodeString & FileName);
  882. __property TOperationSide Side = { read = FSide };
  883. __property const TCopyParamType * CopyParam = { read = FCopyParam };
  884. __property int Params = { read = FParams };
  885. __property UnicodeString TargetDir = { read = FTargetDir };
  886. __property TFileOperationProgressType * MainOperationProgress = { read = FMainOperationProgress };
  887. __property UnicodeString MainName = { read = FMainName };
  888. __property bool IsParallelFileTransfer = { read = FIsParallelFileTransfer };
  889. private:
  890. struct TDirectoryData
  891. {
  892. UnicodeString OppositePath;
  893. bool Exists;
  894. };
  895. std::unique_ptr<TStrings> FFileList;
  896. int FListIndex;
  897. int FIndex;
  898. typedef std::map<UnicodeString, TDirectoryData> TDirectories;
  899. TDirectories FDirectories;
  900. UnicodeString FTargetDir;
  901. const TCopyParamType * FCopyParam;
  902. int FParams;
  903. bool FProbablyEmpty;
  904. int FClients;
  905. std::unique_ptr<TCriticalSection> FSection;
  906. TFileOperationProgressType * FMainOperationProgress;
  907. TOperationSide FSide;
  908. UnicodeString FMainName;
  909. int FVersion;
  910. bool FIsParallelFileTransfer;
  911. __int64 FParallelFileSize;
  912. __int64 FParallelFileOffset;
  913. int FParallelFileCount;
  914. UnicodeString FParallelFileTargetName;
  915. typedef std::vector<__int64> TParallelFileOffsets;
  916. TParallelFileOffsets FParallelFileOffsets;
  917. std::vector<bool> FParallelFileDones;
  918. bool FParallelFileMerging;
  919. int FParallelFileMerged;
  920. bool CheckEnd(TCollectedFileList * Files);
  921. TCollectedFileList * GetFileList(int Index);
  922. };
  923. //---------------------------------------------------------------------------
  924. struct TLocalFileHandle
  925. {
  926. TLocalFileHandle();
  927. ~TLocalFileHandle();
  928. void Dismiss();
  929. void Close();
  930. void Release();
  931. UnicodeString FileName;
  932. HANDLE Handle;
  933. int Attrs;
  934. bool Directory;
  935. TDateTime Modification;
  936. __int64 MTime;
  937. __int64 ATime;
  938. __int64 Size;
  939. };
  940. //---------------------------------------------------------------------------
  941. class TLocalFile : public TObject
  942. {
  943. public:
  944. TSearchRecSmart SearchRec;
  945. };
  946. //---------------------------------------------------------------------------
  947. #endif