Terminal.h 34 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683684685686687688689690691692693694695696697698699700701702703704705706707708709710711712713714715716717718719720
  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 "Exceptions.h"
  10. //---------------------------------------------------------------------------
  11. class TCopyParamType;
  12. class TFileOperationProgressType;
  13. class TRemoteDirectory;
  14. class TRemoteFile;
  15. class TCustomFileSystem;
  16. class TTunnelThread;
  17. class TSecureShell;
  18. struct TCalculateSizeParams;
  19. struct TOverwriteFileParams;
  20. struct TSynchronizeData;
  21. struct TSynchronizeOptions;
  22. class TSynchronizeChecklist;
  23. struct TCalculateSizeStats;
  24. struct TFileSystemInfo;
  25. struct TSpaceAvailable;
  26. struct TFilesFindParams;
  27. class TTunnelUI;
  28. class TCallbackGuard;
  29. //---------------------------------------------------------------------------
  30. typedef void __fastcall (__closure *TQueryUserEvent)
  31. (TObject * Sender, const UnicodeString Query, TStrings * MoreMessages, unsigned int Answers,
  32. const TQueryParams * Params, unsigned int & Answer, TQueryType QueryType, void * Arg);
  33. typedef void __fastcall (__closure *TPromptUserEvent)
  34. (TTerminal * Terminal, TPromptKind Kind, UnicodeString Name, UnicodeString Instructions,
  35. TStrings * Prompts, TStrings * Results, bool & Result, void * Arg);
  36. typedef void __fastcall (__closure *TDisplayBannerEvent)
  37. (TTerminal * Terminal, UnicodeString SessionName, const UnicodeString & Banner,
  38. bool & NeverShowAgain, int Options);
  39. typedef void __fastcall (__closure *TExtendedExceptionEvent)
  40. (TTerminal * Terminal, Exception * E, void * Arg);
  41. typedef void __fastcall (__closure *TReadDirectoryEvent)(System::TObject * Sender, Boolean ReloadOnly);
  42. typedef void __fastcall (__closure *TReadDirectoryProgressEvent)(
  43. System::TObject* Sender, int Progress, int ResolvedLinks, bool & Cancel);
  44. typedef void __fastcall (__closure *TProcessFileEvent)
  45. (const UnicodeString FileName, const TRemoteFile * File, void * Param);
  46. typedef void __fastcall (__closure *TProcessFileEventEx)
  47. (const UnicodeString FileName, const TRemoteFile * File, void * Param, int Index);
  48. typedef int __fastcall (__closure *TFileOperationEvent)
  49. (void * Param1, void * Param2);
  50. typedef void __fastcall (__closure *TSynchronizeDirectory)
  51. (const UnicodeString LocalDirectory, const UnicodeString RemoteDirectory,
  52. bool & Continue, bool Collect);
  53. typedef void __fastcall (__closure *TDeleteLocalFileEvent)(
  54. const UnicodeString FileName, bool Alternative);
  55. typedef int __fastcall (__closure *TDirectoryModifiedEvent)
  56. (TTerminal * Terminal, const UnicodeString Directory, bool SubDirs);
  57. typedef void __fastcall (__closure *TInformationEvent)
  58. (TTerminal * Terminal, const UnicodeString & Str, bool Status, int Phase);
  59. //---------------------------------------------------------------------------
  60. #define THROW_SKIP_FILE(EXCEPTION, MESSAGE) \
  61. throw EScpSkipFile(EXCEPTION, MESSAGE)
  62. #define THROW_SKIP_FILE_NULL THROW_SKIP_FILE(NULL, L"")
  63. /* TODO : Better user interface (query to user) */
  64. #define FILE_OPERATION_LOOP_BEGIN \
  65. { \
  66. bool DoRepeat; \
  67. do { \
  68. DoRepeat = false; \
  69. try \
  70. #define FILE_OPERATION_LOOP_END_CUSTOM(MESSAGE, ALLOW_SKIP, HELPKEYWORD) \
  71. catch (EAbort & E) \
  72. { \
  73. throw; \
  74. } \
  75. catch (EScpSkipFile & E) \
  76. { \
  77. throw; \
  78. } \
  79. catch (EFatal & E) \
  80. { \
  81. throw; \
  82. } \
  83. catch (Exception & E) \
  84. { \
  85. FILE_OPERATION_LOOP_TERMINAL->FileOperationLoopQuery( \
  86. E, OperationProgress, MESSAGE, ALLOW_SKIP, L"", HELPKEYWORD); \
  87. DoRepeat = true; \
  88. } \
  89. } while (DoRepeat); \
  90. }
  91. #define FILE_OPERATION_LOOP_END_EX(MESSAGE, ALLOW_SKIP) \
  92. FILE_OPERATION_LOOP_END_CUSTOM(MESSAGE, ALLOW_SKIP, L"")
  93. #define FILE_OPERATION_LOOP_END(MESSAGE) \
  94. FILE_OPERATION_LOOP_END_EX(MESSAGE, true)
  95. //---------------------------------------------------------------------------
  96. enum TCurrentFSProtocol { cfsUnknown, cfsSCP, cfsSFTP, cfsFTP, cfsWebDAV };
  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. //---------------------------------------------------------------------------
  104. const int ccApplyToDirectories = 0x01;
  105. const int ccRecursive = 0x02;
  106. const int ccUser = 0x100;
  107. //---------------------------------------------------------------------------
  108. const int csIgnoreErrors = 0x01;
  109. //---------------------------------------------------------------------------
  110. const int ropNoReadDirectory = 0x02;
  111. //---------------------------------------------------------------------------
  112. const int boDisableNeverShowAgain = 0x01;
  113. //---------------------------------------------------------------------------
  114. class TTerminal : public TObject, public TSessionUI
  115. {
  116. public:
  117. // TScript::SynchronizeProc relies on the order
  118. enum TSynchronizeMode { smRemote, smLocal, smBoth };
  119. static const int spDelete = 0x01; // cannot be combined with spTimestamp
  120. static const int spNoConfirmation = 0x02; // has no effect for spTimestamp
  121. static const int spExistingOnly = 0x04; // is implicit for spTimestamp
  122. static const int spNoRecurse = 0x08;
  123. static const int spUseCache = 0x10; // cannot be combined with spTimestamp
  124. static const int spDelayProgress = 0x20; // cannot be combined with spTimestamp
  125. static const int spPreviewChanges = 0x40; // not used by core
  126. static const int spSubDirs = 0x80; // cannot be combined with spTimestamp
  127. static const int spTimestamp = 0x100;
  128. static const int spNotByTime = 0x200; // cannot be combined with spTimestamp and smBoth
  129. static const int spBySize = 0x400; // cannot be combined with smBoth, has opposite meaning for spTimestamp
  130. static const int spSelectedOnly = 0x800; // not used by core
  131. static const int spMirror = 0x1000;
  132. static const int spDefault = TTerminal::spNoConfirmation | TTerminal::spPreviewChanges;
  133. // for TranslateLockedPath()
  134. friend class TRemoteFile;
  135. // for ReactOnCommand()
  136. friend class TSCPFileSystem;
  137. friend class TSFTPFileSystem;
  138. friend class TFTPFileSystem;
  139. friend class TWebDAVFileSystem;
  140. friend class TTunnelUI;
  141. friend class TCallbackGuard;
  142. private:
  143. TSessionData * FSessionData;
  144. TSessionLog * FLog;
  145. TActionLog * FActionLog;
  146. TConfiguration * FConfiguration;
  147. UnicodeString FCurrentDirectory;
  148. UnicodeString FLockDirectory;
  149. Integer FExceptionOnFail;
  150. TRemoteDirectory * FFiles;
  151. int FInTransaction;
  152. bool FSuspendTransaction;
  153. TNotifyEvent FOnChangeDirectory;
  154. TReadDirectoryEvent FOnReadDirectory;
  155. TNotifyEvent FOnStartReadDirectory;
  156. TReadDirectoryProgressEvent FOnReadDirectoryProgress;
  157. TDeleteLocalFileEvent FOnDeleteLocalFile;
  158. TNotifyEvent FOnInitializeLog;
  159. TRemoteTokenList FMembership;
  160. TRemoteTokenList FGroups;
  161. TRemoteTokenList FUsers;
  162. bool FUsersGroupsLookedup;
  163. TFileOperationProgressEvent FOnProgress;
  164. TFileOperationFinished FOnFinished;
  165. TFileOperationProgressType * FOperationProgress;
  166. bool FUseBusyCursor;
  167. TRemoteDirectoryCache * FDirectoryCache;
  168. TRemoteDirectoryChangesCache * FDirectoryChangesCache;
  169. TCustomFileSystem * FFileSystem;
  170. TSecureShell * FSecureShell;
  171. UnicodeString FLastDirectoryChange;
  172. TCurrentFSProtocol FFSProtocol;
  173. TTerminal * FCommandSession;
  174. bool FAutoReadDirectory;
  175. bool FReadingCurrentDirectory;
  176. bool * FClosedOnCompletion;
  177. TSessionStatus FStatus;
  178. int FOpening;
  179. RawByteString FRememberedPassword;
  180. RawByteString FRememberedTunnelPassword;
  181. TTunnelThread * FTunnelThread;
  182. TSecureShell * FTunnel;
  183. TSessionData * FTunnelData;
  184. TSessionLog * FTunnelLog;
  185. TTunnelUI * FTunnelUI;
  186. int FTunnelLocalPortNumber;
  187. UnicodeString FTunnelError;
  188. TQueryUserEvent FOnQueryUser;
  189. TPromptUserEvent FOnPromptUser;
  190. TDisplayBannerEvent FOnDisplayBanner;
  191. TExtendedExceptionEvent FOnShowExtendedException;
  192. TInformationEvent FOnInformation;
  193. TNotifyEvent FOnClose;
  194. TCallbackGuard * FCallbackGuard;
  195. TFindingFileEvent FOnFindingFile;
  196. bool FEnableSecureShellUsage;
  197. bool FCollectFileSystemUsage;
  198. bool FRememberedPasswordTried;
  199. bool FRememberedTunnelPasswordTried;
  200. int FNesting;
  201. void __fastcall CommandError(Exception * E, const UnicodeString Msg);
  202. unsigned int __fastcall CommandError(Exception * E, const UnicodeString Msg,
  203. unsigned int Answers, const UnicodeString HelpKeyword = L"");
  204. UnicodeString __fastcall GetCurrentDirectory();
  205. bool __fastcall GetExceptionOnFail() const;
  206. const TRemoteTokenList * __fastcall GetGroups();
  207. const TRemoteTokenList * __fastcall GetUsers();
  208. const TRemoteTokenList * __fastcall GetMembership();
  209. void __fastcall SetCurrentDirectory(UnicodeString value);
  210. void __fastcall SetExceptionOnFail(bool value);
  211. void __fastcall ReactOnCommand(int /*TFSCommand*/ Cmd);
  212. UnicodeString __fastcall GetUserName() const;
  213. bool __fastcall GetAreCachesEmpty() const;
  214. void __fastcall ClearCachedFileList(const UnicodeString Path, bool SubDirs);
  215. void __fastcall AddCachedFileList(TRemoteFileList * FileList);
  216. bool __fastcall GetCommandSessionOpened();
  217. TTerminal * __fastcall GetCommandSession();
  218. bool __fastcall GetResolvingSymlinks();
  219. bool __fastcall GetActive();
  220. UnicodeString __fastcall GetPassword();
  221. UnicodeString __fastcall GetRememberedPassword();
  222. UnicodeString __fastcall GetRememberedTunnelPassword();
  223. bool __fastcall GetStoredCredentialsTried();
  224. inline bool __fastcall InTransaction();
  225. void __fastcall SaveCapabilities(TFileSystemInfo & FileSystemInfo);
  226. static UnicodeString __fastcall SynchronizeModeStr(TSynchronizeMode Mode);
  227. static UnicodeString __fastcall SynchronizeParamsStr(int Params);
  228. protected:
  229. bool FReadCurrentDirectoryPending;
  230. bool FReadDirectoryPending;
  231. bool FTunnelOpening;
  232. void __fastcall DoStartReadDirectory();
  233. void __fastcall DoReadDirectoryProgress(int Progress, int ResolvedLinks, bool & Cancel);
  234. void __fastcall DoReadDirectory(bool ReloadOnly);
  235. void __fastcall DoCreateDirectory(const UnicodeString DirName);
  236. void __fastcall DoDeleteFile(const UnicodeString FileName, const TRemoteFile * File,
  237. int Params);
  238. void __fastcall DoCustomCommandOnFile(UnicodeString FileName,
  239. const TRemoteFile * File, UnicodeString Command, int Params, TCaptureOutputEvent OutputEvent);
  240. void __fastcall DoRenameFile(const UnicodeString FileName,
  241. const UnicodeString NewName, bool Move);
  242. void __fastcall DoCopyFile(const UnicodeString FileName, const UnicodeString NewName);
  243. void __fastcall DoChangeFileProperties(const UnicodeString FileName,
  244. const TRemoteFile * File, const TRemoteProperties * Properties);
  245. void __fastcall DoChangeDirectory();
  246. void __fastcall DoInitializeLog();
  247. void __fastcall EnsureNonExistence(const UnicodeString FileName);
  248. void __fastcall LookupUsersGroups();
  249. void __fastcall FileModified(const TRemoteFile * File,
  250. const UnicodeString FileName, bool ClearDirectoryChange = false);
  251. int __fastcall FileOperationLoop(TFileOperationEvent CallBackFunc,
  252. TFileOperationProgressType * OperationProgress, bool AllowSkip,
  253. const UnicodeString Message, void * Param1 = NULL, void * Param2 = NULL);
  254. bool __fastcall GetIsCapable(TFSCapability Capability) const;
  255. bool __fastcall ProcessFiles(TStrings * FileList, TFileOperation Operation,
  256. TProcessFileEvent ProcessFile, void * Param = NULL, TOperationSide Side = osRemote,
  257. bool Ex = false);
  258. bool __fastcall ProcessFilesEx(TStrings * FileList, TFileOperation Operation,
  259. TProcessFileEventEx ProcessFile, void * Param = NULL, TOperationSide Side = osRemote);
  260. void __fastcall ProcessDirectory(const UnicodeString DirName,
  261. TProcessFileEvent CallBackFunc, void * Param = NULL, bool UseCache = false,
  262. bool IgnoreErrors = false);
  263. void __fastcall AnnounceFileListOperation();
  264. UnicodeString __fastcall TranslateLockedPath(UnicodeString Path, bool Lock);
  265. void __fastcall ReadDirectory(TRemoteFileList * FileList);
  266. void __fastcall CustomReadDirectory(TRemoteFileList * FileList);
  267. void __fastcall DoCreateLink(const UnicodeString FileName, const UnicodeString PointTo, bool Symbolic);
  268. bool __fastcall CreateLocalFile(const UnicodeString FileName,
  269. TFileOperationProgressType * OperationProgress, HANDLE * AHandle,
  270. bool NoConfirmation);
  271. void __fastcall OpenLocalFile(const UnicodeString FileName, unsigned int Access,
  272. int * Attrs, HANDLE * Handle, __int64 * ACTime, __int64 * MTime,
  273. __int64 * ATime, __int64 * Size, bool TryWriteReadOnly = true);
  274. bool __fastcall AllowLocalFileTransfer(UnicodeString FileName,
  275. const TCopyParamType * CopyParam, TFileOperationProgressType * OperationProgress);
  276. bool __fastcall HandleException(Exception * E);
  277. void __fastcall CalculateFileSize(UnicodeString FileName,
  278. const TRemoteFile * File, /*TCalculateSizeParams*/ void * Size);
  279. void __fastcall DoCalculateDirectorySize(const UnicodeString FileName,
  280. const TRemoteFile * File, TCalculateSizeParams * Params);
  281. void __fastcall CalculateLocalFileSize(const UnicodeString FileName,
  282. const TSearchRec Rec, /*__int64*/ void * Size);
  283. bool __fastcall CalculateLocalFilesSize(TStrings * FileList, __int64 & Size,
  284. const TCopyParamType * CopyParam, bool AllowDirs);
  285. TBatchOverwrite __fastcall EffectiveBatchOverwrite(
  286. const UnicodeString & SourceFullFileName, const TCopyParamType * CopyParam, int Params,
  287. TFileOperationProgressType * OperationProgress, bool Special);
  288. bool __fastcall CheckRemoteFile(
  289. const UnicodeString & FileName, const TCopyParamType * CopyParam,
  290. int Params, TFileOperationProgressType * OperationProgress);
  291. unsigned int __fastcall ConfirmFileOverwrite(
  292. const UnicodeString & SourceFullFileName, const UnicodeString & TargetFileName,
  293. const TOverwriteFileParams * FileParams, unsigned int Answers, TQueryParams * QueryParams,
  294. TOperationSide Side, const TCopyParamType * CopyParam, int Params,
  295. TFileOperationProgressType * OperationProgress, UnicodeString Message = L"");
  296. void __fastcall DoSynchronizeCollectDirectory(const UnicodeString LocalDirectory,
  297. const UnicodeString RemoteDirectory, TSynchronizeMode Mode,
  298. const TCopyParamType * CopyParam, int Params,
  299. TSynchronizeDirectory OnSynchronizeDirectory,
  300. TSynchronizeOptions * Options, int Level, TSynchronizeChecklist * Checklist);
  301. void __fastcall DoSynchronizeCollectFile(const UnicodeString FileName,
  302. const TRemoteFile * File, /*TSynchronizeData*/ void * Param);
  303. void __fastcall SynchronizeCollectFile(const UnicodeString FileName,
  304. const TRemoteFile * File, /*TSynchronizeData*/ void * Param);
  305. void __fastcall SynchronizeRemoteTimestamp(const UnicodeString FileName,
  306. const TRemoteFile * File, void * Param);
  307. void __fastcall SynchronizeLocalTimestamp(const UnicodeString FileName,
  308. const TRemoteFile * File, void * Param);
  309. void __fastcall DoSynchronizeProgress(const TSynchronizeData & Data, bool Collect);
  310. void __fastcall DeleteLocalFile(UnicodeString FileName,
  311. const TRemoteFile * File, void * Param);
  312. void __fastcall RecycleFile(UnicodeString FileName, const TRemoteFile * File);
  313. TStrings * __fastcall GetFixedPaths();
  314. void __fastcall DoStartup();
  315. virtual bool __fastcall DoQueryReopen(Exception * E);
  316. virtual void __fastcall FatalError(Exception * E, UnicodeString Msg, UnicodeString HelpKeyword = L"");
  317. void __fastcall ResetConnection();
  318. virtual bool __fastcall DoPromptUser(TSessionData * Data, TPromptKind Kind,
  319. UnicodeString Name, UnicodeString Instructions, TStrings * Prompts,
  320. TStrings * Response);
  321. void __fastcall OpenTunnel();
  322. void __fastcall CloseTunnel();
  323. void __fastcall DoInformation(const UnicodeString & Str, bool Status, int Phase = -1);
  324. bool __fastcall PromptUser(TSessionData * Data, TPromptKind Kind,
  325. UnicodeString Name, UnicodeString Instructions, UnicodeString Prompt, bool Echo,
  326. int MaxLen, UnicodeString & Result);
  327. void __fastcall FileFind(UnicodeString FileName, const TRemoteFile * File, void * Param);
  328. void __fastcall DoFilesFind(UnicodeString Directory, TFilesFindParams & Params);
  329. bool __fastcall DoCreateLocalFile(const UnicodeString FileName,
  330. TFileOperationProgressType * OperationProgress, HANDLE * AHandle,
  331. bool NoConfirmation);
  332. virtual void __fastcall Information(const UnicodeString & Str, bool Status);
  333. virtual unsigned int __fastcall QueryUser(const UnicodeString Query,
  334. TStrings * MoreMessages, unsigned int Answers, const TQueryParams * Params,
  335. TQueryType QueryType = qtConfirmation);
  336. virtual unsigned int __fastcall QueryUserException(const UnicodeString Query,
  337. Exception * E, unsigned int Answers, const TQueryParams * Params,
  338. TQueryType QueryType = qtConfirmation);
  339. virtual bool __fastcall PromptUser(TSessionData * Data, TPromptKind Kind,
  340. UnicodeString Name, UnicodeString Instructions, TStrings * Prompts, TStrings * Results);
  341. virtual void __fastcall DisplayBanner(const UnicodeString & Banner);
  342. virtual void __fastcall Closed();
  343. virtual void __fastcall ProcessGUI();
  344. void __fastcall Progress(TFileOperationProgressType * OperationProgress);
  345. virtual void __fastcall HandleExtendedException(Exception * E);
  346. bool __fastcall IsListenerFree(unsigned int PortNumber);
  347. void __fastcall DoProgress(TFileOperationProgressType & ProgressData);
  348. void __fastcall DoFinished(TFileOperation Operation, TOperationSide Side, bool Temp,
  349. const UnicodeString & FileName, bool Success, TOnceDoneOperation & OnceDoneOperation);
  350. void __fastcall RollbackAction(TSessionAction & Action,
  351. TFileOperationProgressType * OperationProgress, Exception * E = NULL);
  352. void __fastcall DoAnyCommand(const UnicodeString Command, TCaptureOutputEvent OutputEvent,
  353. TCallSessionAction * Action);
  354. TRemoteFileList * __fastcall DoReadDirectoryListing(UnicodeString Directory, bool UseCache);
  355. RawByteString __fastcall EncryptPassword(const UnicodeString & Password);
  356. UnicodeString __fastcall DecryptPassword(const RawByteString & Password);
  357. void __fastcall LogRemoteFile(TRemoteFile * File);
  358. UnicodeString __fastcall FormatFileDetailsForLog(const UnicodeString & FileName, TDateTime Modification, __int64 Size);
  359. void __fastcall LogFileDetails(const UnicodeString & FileName, TDateTime Modification, __int64 Size);
  360. void __fastcall LogFileDone(TFileOperationProgressType * OperationProgress);
  361. virtual TTerminal * __fastcall GetPasswordSource();
  362. void __fastcall DoEndTransaction(bool Inform);
  363. bool __fastcall VerifyCertificate(
  364. const UnicodeString & CertificateStorageKey, const UnicodeString & SiteKey,
  365. const UnicodeString & Fingerprint,
  366. const UnicodeString & CertificateSubject, int Failures);
  367. void __fastcall CacheCertificate(const UnicodeString & CertificateStorageKey,
  368. const UnicodeString & SiteKey, const UnicodeString & Fingerprint, int Failures);
  369. void __fastcall CollectTlsUsage(const UnicodeString & TlsVersionStr);
  370. __property TFileOperationProgressType * OperationProgress = { read=FOperationProgress };
  371. public:
  372. __fastcall TTerminal(TSessionData * SessionData, TConfiguration * Configuration);
  373. __fastcall ~TTerminal();
  374. void __fastcall Open();
  375. void __fastcall Close();
  376. void __fastcall Reopen(int Params);
  377. virtual void __fastcall DirectoryModified(const UnicodeString Path, bool SubDirs);
  378. virtual void __fastcall DirectoryLoaded(TRemoteFileList * FileList);
  379. void __fastcall ShowExtendedException(Exception * E);
  380. void __fastcall Idle();
  381. void __fastcall RecryptPasswords();
  382. bool __fastcall AllowedAnyCommand(const UnicodeString Command);
  383. void __fastcall AnyCommand(const UnicodeString Command, TCaptureOutputEvent OutputEvent);
  384. void __fastcall CloseOnCompletion(TOnceDoneOperation Operation = odoDisconnect, const UnicodeString Message = L"");
  385. UnicodeString __fastcall AbsolutePath(UnicodeString Path, bool Local);
  386. void __fastcall BeginTransaction();
  387. void __fastcall ReadCurrentDirectory();
  388. void __fastcall ReadDirectory(bool ReloadOnly, bool ForceCache = false);
  389. TRemoteFileList * __fastcall ReadDirectoryListing(UnicodeString Directory, const TFileMasks & Mask);
  390. TRemoteFileList * __fastcall CustomReadDirectoryListing(UnicodeString Directory, bool UseCache);
  391. TRemoteFile * __fastcall ReadFileListing(UnicodeString Path);
  392. void __fastcall ReadFile(const UnicodeString FileName, TRemoteFile *& File);
  393. bool __fastcall FileExists(const UnicodeString FileName, TRemoteFile ** File = NULL);
  394. void __fastcall ReadSymlink(TRemoteFile * SymlinkFile, TRemoteFile *& File);
  395. bool __fastcall CopyToLocal(TStrings * FilesToCopy,
  396. const UnicodeString TargetDir, const TCopyParamType * CopyParam, int Params);
  397. bool __fastcall CopyToRemote(TStrings * FilesToCopy,
  398. const UnicodeString TargetDir, const TCopyParamType * CopyParam, int Params);
  399. void __fastcall CreateDirectory(const UnicodeString DirName,
  400. const TRemoteProperties * Properties = NULL);
  401. void __fastcall CreateLink(const UnicodeString FileName, const UnicodeString PointTo, bool Symbolic);
  402. void __fastcall DeleteFile(UnicodeString FileName,
  403. const TRemoteFile * File = NULL, void * Params = NULL);
  404. bool __fastcall DeleteFiles(TStrings * FilesToDelete, int Params = 0);
  405. bool __fastcall DeleteLocalFiles(TStrings * FileList, int Params = 0);
  406. bool __fastcall IsRecycledFile(UnicodeString FileName);
  407. void __fastcall CustomCommandOnFile(UnicodeString FileName,
  408. const TRemoteFile * File, void * AParams);
  409. void __fastcall CustomCommandOnFiles(UnicodeString Command, int Params,
  410. TStrings * Files, TCaptureOutputEvent OutputEvent);
  411. void __fastcall ChangeDirectory(const UnicodeString Directory);
  412. void __fastcall EndTransaction();
  413. void __fastcall HomeDirectory();
  414. void __fastcall ChangeFileProperties(UnicodeString FileName,
  415. const TRemoteFile * File, /*const TRemoteProperties */ void * Properties);
  416. void __fastcall ChangeFilesProperties(TStrings * FileList,
  417. const TRemoteProperties * Properties);
  418. bool __fastcall LoadFilesProperties(TStrings * FileList);
  419. void __fastcall TerminalError(UnicodeString Msg);
  420. void __fastcall TerminalError(Exception * E, UnicodeString Msg, UnicodeString HelpKeyword = L"");
  421. void __fastcall ReloadDirectory();
  422. void __fastcall RefreshDirectory();
  423. void __fastcall RenameFile(const UnicodeString FileName, const UnicodeString NewName);
  424. void __fastcall RenameFile(const TRemoteFile * File, const UnicodeString NewName, bool CheckExistence);
  425. void __fastcall MoveFile(const UnicodeString FileName, const TRemoteFile * File,
  426. /*const TMoveFileParams*/ void * Param);
  427. bool __fastcall MoveFiles(TStrings * FileList, const UnicodeString Target,
  428. const UnicodeString FileMask);
  429. void __fastcall CopyFile(const UnicodeString FileName, const TRemoteFile * File,
  430. /*const TMoveFileParams*/ void * Param);
  431. bool __fastcall CopyFiles(TStrings * FileList, const UnicodeString Target,
  432. const UnicodeString FileMask);
  433. bool __fastcall CalculateFilesSize(TStrings * FileList, __int64 & Size,
  434. int Params, const TCopyParamType * CopyParam, bool AllowDirs,
  435. TCalculateSizeStats * Stats);
  436. void __fastcall CalculateFilesChecksum(const UnicodeString & Alg, TStrings * FileList,
  437. TStrings * Checksums, TCalculatedChecksumEvent OnCalculatedChecksum);
  438. void __fastcall ClearCaches();
  439. TSynchronizeChecklist * __fastcall SynchronizeCollect(const UnicodeString LocalDirectory,
  440. const UnicodeString RemoteDirectory, TSynchronizeMode Mode,
  441. const TCopyParamType * CopyParam, int Params,
  442. TSynchronizeDirectory OnSynchronizeDirectory, TSynchronizeOptions * Options);
  443. void __fastcall SynchronizeApply(TSynchronizeChecklist * Checklist,
  444. const UnicodeString LocalDirectory, const UnicodeString RemoteDirectory,
  445. const TCopyParamType * CopyParam, int Params,
  446. TSynchronizeDirectory OnSynchronizeDirectory);
  447. void __fastcall FilesFind(UnicodeString Directory, const TFileMasks & FileMask,
  448. TFileFoundEvent OnFileFound, TFindingFileEvent OnFindingFile);
  449. void __fastcall SpaceAvailable(const UnicodeString Path, TSpaceAvailable & ASpaceAvailable);
  450. bool __fastcall DirectoryFileList(const UnicodeString Path,
  451. TRemoteFileList *& FileList, bool CanLoad);
  452. void __fastcall MakeLocalFileList(const UnicodeString FileName,
  453. const TSearchRec Rec, void * Param);
  454. bool __fastcall FileOperationLoopQuery(Exception & E,
  455. TFileOperationProgressType * OperationProgress, const UnicodeString Message,
  456. bool AllowSkip, UnicodeString SpecialRetry = L"", UnicodeString HelpKeyword = L"");
  457. TUsableCopyParamAttrs __fastcall UsableCopyParamAttrs(int Params);
  458. bool __fastcall QueryReopen(Exception * E, int Params,
  459. TFileOperationProgressType * OperationProgress);
  460. UnicodeString __fastcall PeekCurrentDirectory();
  461. void __fastcall FatalAbort();
  462. void __fastcall ReflectSettings();
  463. void __fastcall CollectUsage();
  464. const TSessionInfo & __fastcall GetSessionInfo();
  465. const TFileSystemInfo & __fastcall GetFileSystemInfo(bool Retrieve = false);
  466. void __fastcall inline LogEvent(const UnicodeString & Str);
  467. void __fastcall GetSupportedChecksumAlgs(TStrings * Algs);
  468. static UnicodeString __fastcall ExpandFileName(UnicodeString Path,
  469. const UnicodeString BasePath);
  470. __property TSessionData * SessionData = { read = FSessionData };
  471. __property TSessionLog * Log = { read = FLog };
  472. __property TActionLog * ActionLog = { read = FActionLog };
  473. __property TConfiguration * Configuration = { read = FConfiguration };
  474. __property bool Active = { read = GetActive };
  475. __property TSessionStatus Status = { read = FStatus };
  476. __property UnicodeString CurrentDirectory = { read = GetCurrentDirectory, write = SetCurrentDirectory };
  477. __property bool ExceptionOnFail = { read = GetExceptionOnFail, write = SetExceptionOnFail };
  478. __property TRemoteDirectory * Files = { read = FFiles };
  479. __property TNotifyEvent OnChangeDirectory = { read = FOnChangeDirectory, write = FOnChangeDirectory };
  480. __property TReadDirectoryEvent OnReadDirectory = { read = FOnReadDirectory, write = FOnReadDirectory };
  481. __property TNotifyEvent OnStartReadDirectory = { read = FOnStartReadDirectory, write = FOnStartReadDirectory };
  482. __property TReadDirectoryProgressEvent OnReadDirectoryProgress = { read = FOnReadDirectoryProgress, write = FOnReadDirectoryProgress };
  483. __property TDeleteLocalFileEvent OnDeleteLocalFile = { read = FOnDeleteLocalFile, write = FOnDeleteLocalFile };
  484. __property TNotifyEvent OnInitializeLog = { read = FOnInitializeLog, write = FOnInitializeLog };
  485. __property const TRemoteTokenList * Groups = { read = GetGroups };
  486. __property const TRemoteTokenList * Users = { read = GetUsers };
  487. __property const TRemoteTokenList * Membership = { read = GetMembership };
  488. __property TFileOperationProgressEvent OnProgress = { read=FOnProgress, write=FOnProgress };
  489. __property TFileOperationFinished OnFinished = { read=FOnFinished, write=FOnFinished };
  490. __property TCurrentFSProtocol FSProtocol = { read = FFSProtocol };
  491. __property bool UseBusyCursor = { read = FUseBusyCursor, write = FUseBusyCursor };
  492. __property UnicodeString UserName = { read=GetUserName };
  493. __property bool IsCapable[TFSCapability Capability] = { read = GetIsCapable };
  494. __property bool AreCachesEmpty = { read = GetAreCachesEmpty };
  495. __property bool CommandSessionOpened = { read = GetCommandSessionOpened };
  496. __property TTerminal * CommandSession = { read = GetCommandSession };
  497. __property bool AutoReadDirectory = { read = FAutoReadDirectory, write = FAutoReadDirectory };
  498. __property TStrings * FixedPaths = { read = GetFixedPaths };
  499. __property bool ResolvingSymlinks = { read = GetResolvingSymlinks };
  500. __property UnicodeString Password = { read = GetPassword };
  501. __property UnicodeString RememberedPassword = { read = GetRememberedPassword };
  502. __property UnicodeString RememberedTunnelPassword = { read = GetRememberedTunnelPassword };
  503. __property bool StoredCredentialsTried = { read = GetStoredCredentialsTried };
  504. __property TQueryUserEvent OnQueryUser = { read = FOnQueryUser, write = FOnQueryUser };
  505. __property TPromptUserEvent OnPromptUser = { read = FOnPromptUser, write = FOnPromptUser };
  506. __property TDisplayBannerEvent OnDisplayBanner = { read = FOnDisplayBanner, write = FOnDisplayBanner };
  507. __property TExtendedExceptionEvent OnShowExtendedException = { read = FOnShowExtendedException, write = FOnShowExtendedException };
  508. __property TInformationEvent OnInformation = { read = FOnInformation, write = FOnInformation };
  509. __property TNotifyEvent OnClose = { read = FOnClose, write = FOnClose };
  510. __property int TunnelLocalPortNumber = { read = FTunnelLocalPortNumber };
  511. };
  512. //---------------------------------------------------------------------------
  513. class TSecondaryTerminal : public TTerminal
  514. {
  515. public:
  516. __fastcall TSecondaryTerminal(TTerminal * MainTerminal,
  517. TSessionData * SessionData, TConfiguration * Configuration,
  518. const UnicodeString & Name);
  519. __property TTerminal * MainTerminal = { read = FMainTerminal };
  520. protected:
  521. virtual void __fastcall DirectoryLoaded(TRemoteFileList * FileList);
  522. virtual void __fastcall DirectoryModified(const UnicodeString Path,
  523. bool SubDirs);
  524. virtual TTerminal * __fastcall GetPasswordSource();
  525. private:
  526. TTerminal * FMainTerminal;
  527. };
  528. //---------------------------------------------------------------------------
  529. class TTerminalList : public TObjectList
  530. {
  531. public:
  532. __fastcall TTerminalList(TConfiguration * AConfiguration);
  533. __fastcall ~TTerminalList();
  534. virtual TTerminal * __fastcall NewTerminal(TSessionData * Data);
  535. virtual void __fastcall FreeTerminal(TTerminal * Terminal);
  536. void __fastcall FreeAndNullTerminal(TTerminal * & Terminal);
  537. virtual void __fastcall Idle();
  538. void __fastcall RecryptPasswords();
  539. __property TTerminal * Terminals[int Index] = { read=GetTerminal };
  540. protected:
  541. virtual TTerminal * __fastcall CreateTerminal(TSessionData * Data);
  542. private:
  543. TConfiguration * FConfiguration;
  544. TTerminal * __fastcall GetTerminal(int Index);
  545. };
  546. //---------------------------------------------------------------------------
  547. struct TCustomCommandParams
  548. {
  549. UnicodeString Command;
  550. int Params;
  551. TCaptureOutputEvent OutputEvent;
  552. };
  553. //---------------------------------------------------------------------------
  554. struct TCalculateSizeStats
  555. {
  556. TCalculateSizeStats();
  557. int Files;
  558. int Directories;
  559. int SymLinks;
  560. };
  561. //---------------------------------------------------------------------------
  562. struct TCalculateSizeParams
  563. {
  564. __int64 Size;
  565. int Params;
  566. const TCopyParamType * CopyParam;
  567. TCalculateSizeStats * Stats;
  568. bool AllowDirs;
  569. bool Result;
  570. };
  571. //---------------------------------------------------------------------------
  572. struct TOverwriteFileParams
  573. {
  574. TOverwriteFileParams();
  575. __int64 SourceSize;
  576. __int64 DestSize;
  577. TDateTime SourceTimestamp;
  578. TDateTime DestTimestamp;
  579. TModificationFmt SourcePrecision;
  580. TModificationFmt DestPrecision;
  581. };
  582. //---------------------------------------------------------------------------
  583. typedef std::vector<TDateTime> TDateTimes;
  584. //---------------------------------------------------------------------------
  585. struct TMakeLocalFileListParams
  586. {
  587. TStrings * FileList;
  588. TDateTimes * FileTimes;
  589. bool IncludeDirs;
  590. bool Recursive;
  591. };
  592. //---------------------------------------------------------------------------
  593. struct TSynchronizeOptions
  594. {
  595. TSynchronizeOptions();
  596. ~TSynchronizeOptions();
  597. TStringList * Filter;
  598. bool __fastcall FilterFind(const UnicodeString & FileName);
  599. bool __fastcall MatchesFilter(const UnicodeString & FileName);
  600. };
  601. //---------------------------------------------------------------------------
  602. class TSynchronizeChecklist
  603. {
  604. friend class TTerminal;
  605. public:
  606. enum TAction { saNone, saUploadNew, saDownloadNew, saUploadUpdate,
  607. saDownloadUpdate, saDeleteRemote, saDeleteLocal };
  608. static const int ActionCount = saDeleteLocal;
  609. class TItem
  610. {
  611. friend class TTerminal;
  612. public:
  613. struct TFileInfo
  614. {
  615. UnicodeString FileName;
  616. UnicodeString Directory;
  617. TDateTime Modification;
  618. TModificationFmt ModificationFmt;
  619. __int64 Size;
  620. };
  621. TAction Action;
  622. bool IsDirectory;
  623. TFileInfo Local;
  624. TFileInfo Remote;
  625. int ImageIndex;
  626. bool Checked;
  627. TRemoteFile * RemoteFile;
  628. const UnicodeString& GetFileName() const;
  629. ~TItem();
  630. private:
  631. FILETIME FLocalLastWriteTime;
  632. TItem();
  633. };
  634. ~TSynchronizeChecklist();
  635. void __fastcall Update(const TItem * Item, bool Check, TAction Action);
  636. static TAction __fastcall Reverse(TAction Action);
  637. __property int Count = { read = GetCount };
  638. __property const TItem * Item[int Index] = { read = GetItem };
  639. protected:
  640. TSynchronizeChecklist();
  641. void Sort();
  642. void Add(TItem * Item);
  643. int GetCount() const;
  644. const TItem * GetItem(int Index) const;
  645. private:
  646. TList * FList;
  647. static int __fastcall Compare(void * Item1, void * Item2);
  648. };
  649. //---------------------------------------------------------------------------
  650. struct TSpaceAvailable
  651. {
  652. TSpaceAvailable();
  653. __int64 BytesOnDevice;
  654. __int64 UnusedBytesOnDevice;
  655. __int64 BytesAvailableToUser;
  656. __int64 UnusedBytesAvailableToUser;
  657. unsigned long BytesPerAllocationUnit;
  658. };
  659. //---------------------------------------------------------------------------
  660. class TRobustOperationLoop
  661. {
  662. public:
  663. TRobustOperationLoop(TTerminal * Terminal, TFileOperationProgressType * OperationProgress);
  664. bool TryReopen(Exception & E);
  665. bool ShouldRetry();
  666. bool Retry();
  667. private:
  668. TTerminal * FTerminal;
  669. TFileOperationProgressType * FOperationProgress;
  670. bool FRetry;
  671. };
  672. //---------------------------------------------------------------------------
  673. #endif