Terminal.h 29 KB

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