1
0

Terminal.h 46 KB

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