Common.h 18 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370
  1. //---------------------------------------------------------------------------
  2. #ifndef CommonH
  3. #define CommonH
  4. //---------------------------------------------------------------------------
  5. #define EXCEPTION throw ExtException(NULL, L"")
  6. #define THROWOSIFFALSE(C) { if (!(C)) RaiseLastOSError(); }
  7. #define SAFE_DESTROY_EX(CLASS, OBJ) { CLASS * PObj = OBJ; OBJ = NULL; delete PObj; }
  8. #define SAFE_DESTROY(OBJ) SAFE_DESTROY_EX(TObject, OBJ)
  9. #define NULL_TERMINATE(S) S[LENOF(S) - 1] = L'\0'
  10. #define ASCOPY(dest, source) \
  11. { \
  12. AnsiString CopyBuf = source; \
  13. strncpy(dest, CopyBuf.c_str(), LENOF(dest)); \
  14. dest[LENOF(dest)-1] = '\0'; \
  15. }
  16. #define SWAP(TYPE, FIRST, SECOND) \
  17. { TYPE __Backup = FIRST; FIRST = SECOND; SECOND = __Backup; }
  18. //---------------------------------------------------------------------------
  19. extern const wchar_t EngShortMonthNames[12][4];
  20. extern const char Bom[3];
  21. extern const wchar_t TokenPrefix;
  22. extern const wchar_t NoReplacement;
  23. extern const wchar_t TokenReplacement;
  24. extern const UnicodeString LocalInvalidChars;
  25. extern const UnicodeString PasswordMask;
  26. //---------------------------------------------------------------------------
  27. UnicodeString ReplaceChar(UnicodeString Str, wchar_t A, wchar_t B);
  28. UnicodeString DeleteChar(UnicodeString Str, wchar_t C);
  29. void PackStr(UnicodeString & Str);
  30. void PackStr(RawByteString & Str);
  31. void PackStr(AnsiString & Str);
  32. void __fastcall Shred(UnicodeString & Str);
  33. void __fastcall Shred(UTF8String & Str);
  34. void __fastcall Shred(AnsiString & Str);
  35. UnicodeString AnsiToString(const RawByteString & S);
  36. UnicodeString AnsiToString(const char * S, size_t Len);
  37. UnicodeString MakeValidFileName(UnicodeString FileName);
  38. UnicodeString RootKeyToStr(HKEY RootKey);
  39. UnicodeString BooleanToStr(bool B);
  40. UnicodeString BooleanToEngStr(bool B);
  41. UnicodeString DefaultStr(const UnicodeString & Str, const UnicodeString & Default);
  42. UnicodeString CutToChar(UnicodeString &Str, wchar_t Ch, bool Trim);
  43. UnicodeString CopyToChars(const UnicodeString & Str, int & From, UnicodeString Chs, bool Trim,
  44. wchar_t * Delimiter = NULL, bool DoubleDelimiterEscapes = false);
  45. UnicodeString CopyToChar(const UnicodeString & Str, wchar_t Ch, bool Trim);
  46. UnicodeString DelimitStr(UnicodeString Str, UnicodeString Chars);
  47. UnicodeString ShellDelimitStr(UnicodeString Str, wchar_t Quote);
  48. UnicodeString ExceptionLogString(Exception *E);
  49. UnicodeString __fastcall MainInstructions(const UnicodeString & S);
  50. bool __fastcall HasParagraphs(const UnicodeString & S);
  51. UnicodeString __fastcall MainInstructionsFirstParagraph(const UnicodeString & S);
  52. bool ExtractMainInstructions(UnicodeString & S, UnicodeString & MainInstructions);
  53. UnicodeString RemoveMainInstructionsTag(UnicodeString S);
  54. UnicodeString UnformatMessage(UnicodeString S);
  55. UnicodeString RemoveInteractiveMsgTag(UnicodeString S);
  56. UnicodeString RemoveEmptyLines(const UnicodeString & S);
  57. bool IsNumber(const UnicodeString Str);
  58. UnicodeString __fastcall SystemTemporaryDirectory();
  59. UnicodeString __fastcall GetShellFolderPath(int CSIdl);
  60. UnicodeString __fastcall StripPathQuotes(const UnicodeString Path);
  61. UnicodeString __fastcall AddQuotes(UnicodeString Str);
  62. UnicodeString __fastcall AddPathQuotes(UnicodeString Path);
  63. void __fastcall SplitCommand(UnicodeString Command, UnicodeString &Program,
  64. UnicodeString & Params, UnicodeString & Dir);
  65. UnicodeString __fastcall ValidLocalFileName(UnicodeString FileName);
  66. UnicodeString __fastcall ValidLocalFileName(
  67. UnicodeString FileName, wchar_t InvalidCharsReplacement,
  68. const UnicodeString & TokenizibleChars, const UnicodeString & LocalInvalidChars);
  69. UnicodeString __fastcall ExtractProgram(UnicodeString Command);
  70. UnicodeString __fastcall ExtractProgramName(UnicodeString Command);
  71. UnicodeString __fastcall FormatCommand(UnicodeString Program, UnicodeString Params);
  72. UnicodeString __fastcall ExpandFileNameCommand(const UnicodeString Command,
  73. const UnicodeString FileName);
  74. void __fastcall ReformatFileNameCommand(UnicodeString & Command);
  75. UnicodeString __fastcall EscapeParam(const UnicodeString & Param);
  76. UnicodeString __fastcall EscapePuttyCommandParam(UnicodeString Param);
  77. UnicodeString __fastcall ExpandEnvironmentVariables(const UnicodeString & Str);
  78. bool __fastcall ComparePaths(const UnicodeString & Path1, const UnicodeString & Path2);
  79. bool __fastcall CompareFileName(const UnicodeString & Path1, const UnicodeString & Path2);
  80. int __fastcall CompareLogicalText(const UnicodeString & S1, const UnicodeString & S2);
  81. bool __fastcall IsReservedName(UnicodeString FileName);
  82. UnicodeString __fastcall ApiPath(UnicodeString Path);
  83. UnicodeString __fastcall DisplayableStr(const RawByteString & Str);
  84. UnicodeString __fastcall ByteToHex(unsigned char B, bool UpperCase = true);
  85. UnicodeString __fastcall BytesToHex(const unsigned char * B, size_t Length, bool UpperCase = true, wchar_t Separator = L'\0');
  86. UnicodeString __fastcall BytesToHex(RawByteString Str, bool UpperCase = true, wchar_t Separator = L'\0');
  87. UnicodeString __fastcall CharToHex(wchar_t Ch, bool UpperCase = true);
  88. RawByteString __fastcall HexToBytes(const UnicodeString Hex);
  89. unsigned char __fastcall HexToByte(const UnicodeString Hex);
  90. bool __fastcall IsLowerCaseLetter(wchar_t Ch);
  91. bool __fastcall IsUpperCaseLetter(wchar_t Ch);
  92. bool __fastcall IsLetter(wchar_t Ch);
  93. bool __fastcall IsDigit(wchar_t Ch);
  94. bool __fastcall IsHex(wchar_t Ch);
  95. UnicodeString __fastcall DecodeUrlChars(UnicodeString S);
  96. UnicodeString __fastcall EncodeUrlString(UnicodeString S);
  97. UnicodeString __fastcall EncodeUrlPath(UnicodeString S);
  98. UnicodeString __fastcall AppendUrlParams(UnicodeString URL, UnicodeString Params);
  99. bool __fastcall RecursiveDeleteFile(const UnicodeString & FileName, bool ToRecycleBin);
  100. void __fastcall RecursiveDeleteFileChecked(const UnicodeString & FileName, bool ToRecycleBin);
  101. void __fastcall DeleteFileChecked(const UnicodeString & FileName);
  102. unsigned int __fastcall CancelAnswer(unsigned int Answers);
  103. unsigned int __fastcall AbortAnswer(unsigned int Answers);
  104. unsigned int __fastcall ContinueAnswer(unsigned int Answers);
  105. UnicodeString __fastcall LoadStr(int Ident, unsigned int MaxLength);
  106. UnicodeString __fastcall LoadStrPart(int Ident, int Part);
  107. UnicodeString __fastcall EscapeHotkey(const UnicodeString & Caption);
  108. bool __fastcall CutToken(UnicodeString & Str, UnicodeString & Token,
  109. UnicodeString * RawToken = NULL, UnicodeString * Separator = NULL);
  110. void __fastcall AddToList(UnicodeString & List, const UnicodeString & Value, const UnicodeString & Delimiter);
  111. bool __fastcall IsWinVista();
  112. bool __fastcall IsWin7();
  113. bool __fastcall IsWin8();
  114. bool __fastcall IsWin10();
  115. bool __fastcall IsWine();
  116. TLibModule * __fastcall FindModule(void * Instance);
  117. __int64 __fastcall Round(double Number);
  118. bool __fastcall TryRelativeStrToDateTime(UnicodeString S, TDateTime & DateTime);
  119. LCID __fastcall GetDefaultLCID();
  120. UnicodeString __fastcall DefaultEncodingName();
  121. UnicodeString __fastcall WindowsProductName();
  122. bool _fastcall GetWindowsProductType(DWORD & Type);
  123. bool __fastcall IsDirectoryWriteable(const UnicodeString & Path);
  124. UnicodeString __fastcall FormatNumber(__int64 Size);
  125. UnicodeString __fastcall FormatSize(__int64 Size);
  126. UnicodeString __fastcall ExtractFileBaseName(const UnicodeString & Path);
  127. TStringList * __fastcall TextToStringList(const UnicodeString & Text);
  128. UnicodeString __fastcall StringsToText(TStrings * Strings);
  129. TStrings * __fastcall CloneStrings(TStrings * Strings);
  130. UnicodeString __fastcall TrimVersion(UnicodeString Version);
  131. UnicodeString __fastcall FormatVersion(int MajovVersion, int MinorVersion, int Release);
  132. TFormatSettings __fastcall GetEngFormatSettings();
  133. int __fastcall ParseShortEngMonthName(const UnicodeString & MonthStr);
  134. // The defaults are equal to defaults of TStringList class (except for Sorted)
  135. TStringList * __fastcall CreateSortedStringList(bool CaseSensitive = false, System::Types::TDuplicates Duplicates = dupIgnore);
  136. UnicodeString __fastcall FindIdent(const UnicodeString & Ident, TStrings * Idents);
  137. void __fastcall CheckCertificate(const UnicodeString & Path);
  138. typedef struct x509_st X509;
  139. typedef struct evp_pkey_st EVP_PKEY;
  140. void __fastcall ParseCertificate(const UnicodeString & Path,
  141. const UnicodeString & Passphrase, X509 *& Certificate, EVP_PKEY *& PrivateKey,
  142. bool & WrongPassphrase);
  143. bool __fastcall IsHttpUrl(const UnicodeString & S);
  144. void __fastcall LoadScriptFromFile(UnicodeString FileName, TStrings * Lines);
  145. //---------------------------------------------------------------------------
  146. typedef void __fastcall (__closure* TProcessLocalFileEvent)
  147. (const UnicodeString FileName, const TSearchRec Rec, void * Param);
  148. bool __fastcall FileSearchRec(const UnicodeString FileName, TSearchRec & Rec);
  149. struct TSearchRecChecked : public TSearchRec
  150. {
  151. UnicodeString Path;
  152. };
  153. int __fastcall FindCheck(int Result, const UnicodeString & Path);
  154. int __fastcall FindFirstUnchecked(const UnicodeString & Path, int Attr, TSearchRecChecked & F);
  155. int __fastcall FindFirstChecked(const UnicodeString & Path, int Attr, TSearchRecChecked & F);
  156. int __fastcall FindNextChecked(TSearchRecChecked & F);
  157. void __fastcall ProcessLocalDirectory(UnicodeString DirName,
  158. TProcessLocalFileEvent CallBackFunc, void * Param = NULL, int FindAttrs = -1);
  159. int __fastcall FileGetAttrFix(const UnicodeString FileName);
  160. //---------------------------------------------------------------------------
  161. extern const wchar_t * DSTModeNames;
  162. enum TDSTMode
  163. {
  164. dstmWin = 0, //
  165. dstmUnix = 1, // adjust UTC time to Windows "bug"
  166. dstmKeep = 2
  167. };
  168. bool __fastcall UsesDaylightHack();
  169. TDateTime __fastcall EncodeDateVerbose(Word Year, Word Month, Word Day);
  170. TDateTime __fastcall EncodeTimeVerbose(Word Hour, Word Min, Word Sec, Word MSec);
  171. double __fastcall DSTDifferenceForTime(TDateTime DateTime);
  172. TDateTime __fastcall SystemTimeToDateTimeVerbose(const SYSTEMTIME & SystemTime);
  173. TDateTime __fastcall UnixToDateTime(__int64 TimeStamp, TDSTMode DSTMode);
  174. TDateTime __fastcall ConvertTimestampToUTC(TDateTime DateTime);
  175. TDateTime __fastcall ConvertTimestampFromUTC(TDateTime DateTime);
  176. FILETIME __fastcall DateTimeToFileTime(const TDateTime DateTime, TDSTMode DSTMode);
  177. TDateTime __fastcall AdjustDateTimeFromUnix(TDateTime DateTime, TDSTMode DSTMode);
  178. void __fastcall UnifyDateTimePrecision(TDateTime & DateTime1, TDateTime & DateTime2);
  179. TDateTime __fastcall FileTimeToDateTime(const FILETIME & FileTime);
  180. __int64 __fastcall ConvertTimestampToUnix(const FILETIME & FileTime,
  181. TDSTMode DSTMode);
  182. __int64 __fastcall ConvertTimestampToUnixSafe(const FILETIME & FileTime,
  183. TDSTMode DSTMode);
  184. UnicodeString __fastcall FixedLenDateTimeFormat(const UnicodeString & Format);
  185. UnicodeString __fastcall StandardTimestamp(const TDateTime & DateTime);
  186. UnicodeString __fastcall StandardTimestamp();
  187. UnicodeString __fastcall StandardDatestamp();
  188. UnicodeString __fastcall FormatTimeZone(long Sec);
  189. UnicodeString __fastcall GetTimeZoneLogString();
  190. bool __fastcall AdjustClockForDSTEnabled();
  191. int __fastcall CompareFileTime(TDateTime T1, TDateTime T2);
  192. int __fastcall TimeToMSec(TDateTime T);
  193. int __fastcall TimeToSeconds(TDateTime T);
  194. int __fastcall TimeToMinutes(TDateTime T);
  195. //---------------------------------------------------------------------------
  196. template<class MethodT>
  197. MethodT __fastcall MakeMethod(void * Data, void * Code)
  198. {
  199. MethodT Method;
  200. ((TMethod*)&Method)->Data = Data;
  201. ((TMethod*)&Method)->Code = Code;
  202. return Method;
  203. }
  204. //---------------------------------------------------------------------------
  205. enum TAssemblyLanguage { alCSharp, alVBNET, alPowerShell };
  206. extern const UnicodeString RtfPara;
  207. extern const UnicodeString AssemblyNamespace;
  208. extern const UnicodeString SessionClassName;
  209. extern const UnicodeString TransferOptionsClassName;
  210. //---------------------------------------------------------------------
  211. UnicodeString __fastcall RtfText(const UnicodeString & Text);
  212. UnicodeString __fastcall RtfColor(int Index);
  213. UnicodeString __fastcall RtfOverrideColorText(const UnicodeString & Text);
  214. UnicodeString __fastcall RtfColorItalicText(int Color, const UnicodeString & Text);
  215. UnicodeString __fastcall RtfColorText(int Color, const UnicodeString & Text);
  216. UnicodeString __fastcall RtfKeyword(const UnicodeString & Text);
  217. UnicodeString __fastcall RtfParameter(const UnicodeString & Text);
  218. UnicodeString __fastcall RtfString(const UnicodeString & Text);
  219. UnicodeString __fastcall RtfLink(const UnicodeString & Link, const UnicodeString & RtfText);
  220. UnicodeString __fastcall RtfSwitch(const UnicodeString & Name, const UnicodeString & Link);
  221. UnicodeString __fastcall RtfSwitchValue(const UnicodeString & Name, const UnicodeString & Link, const UnicodeString & Value);
  222. UnicodeString __fastcall RtfSwitch(const UnicodeString & Name, const UnicodeString & Link, const UnicodeString & Value);
  223. UnicodeString __fastcall RtfSwitch(const UnicodeString & Name, const UnicodeString & Link, int Value);
  224. UnicodeString __fastcall RtfEscapeParam(UnicodeString Param);
  225. UnicodeString __fastcall RtfRemoveHyperlinks(UnicodeString Text);
  226. UnicodeString __fastcall ScriptCommandLink(const UnicodeString & Command);
  227. UnicodeString __fastcall AssemblyBoolean(TAssemblyLanguage Language, bool Value);
  228. UnicodeString __fastcall AssemblyString(TAssemblyLanguage Language, UnicodeString S);
  229. UnicodeString __fastcall AssemblyCommentLine(TAssemblyLanguage Language, const UnicodeString & Text);
  230. UnicodeString __fastcall AssemblyPropertyRaw(
  231. TAssemblyLanguage Language, const UnicodeString & ClassName, const UnicodeString & Name,
  232. const UnicodeString & Value, bool Inline);
  233. UnicodeString __fastcall AssemblyProperty(
  234. TAssemblyLanguage Language, const UnicodeString & ClassName, const UnicodeString & Name,
  235. const UnicodeString & Type, const UnicodeString & Member, bool Inline);
  236. UnicodeString __fastcall AssemblyProperty(
  237. TAssemblyLanguage Language, const UnicodeString & ClassName, const UnicodeString & Name,
  238. const UnicodeString & Value, bool Inline);
  239. UnicodeString __fastcall AssemblyProperty(
  240. TAssemblyLanguage Language, const UnicodeString & ClassName, const UnicodeString & Name, int Value, bool Inline);
  241. UnicodeString __fastcall AssemblyProperty(
  242. TAssemblyLanguage Language, const UnicodeString & ClassName, const UnicodeString & Name, bool Value, bool Inline);
  243. UnicodeString __fastcall RtfLibraryMethod(const UnicodeString & ClassName, const UnicodeString & MethodName, bool Inpage);
  244. UnicodeString __fastcall RtfLibraryClass(const UnicodeString & ClassName);
  245. UnicodeString __fastcall AssemblyVariableName(TAssemblyLanguage Language, const UnicodeString & ClassName);
  246. UnicodeString __fastcall AssemblyStatementSeparator(TAssemblyLanguage Language);
  247. UnicodeString __fastcall AssemblyNewClassInstance(
  248. TAssemblyLanguage Language, const UnicodeString & ClassName, bool Inline);
  249. UnicodeString __fastcall AssemblyNewClassInstanceStart(
  250. TAssemblyLanguage Language, const UnicodeString & ClassName, bool Inline);
  251. UnicodeString __fastcall AssemblyNewClassInstanceEnd(TAssemblyLanguage Language, bool Inline);
  252. //---------------------------------------------------------------------------
  253. #include "Global.h"
  254. //---------------------------------------------------------------------------
  255. template<class T>
  256. class TValueRestorer
  257. {
  258. public:
  259. __fastcall TValueRestorer(T & Target, const T & Value) :
  260. FTarget(Target),
  261. FValue(Value),
  262. FArmed(true)
  263. {
  264. }
  265. __fastcall TValueRestorer(T & Target) :
  266. FTarget(Target),
  267. FValue(Target),
  268. FArmed(true)
  269. {
  270. }
  271. void Release()
  272. {
  273. if (FArmed)
  274. {
  275. FTarget = FValue;
  276. FArmed = false;
  277. }
  278. }
  279. __fastcall ~TValueRestorer()
  280. {
  281. Release();
  282. }
  283. protected:
  284. T & FTarget;
  285. T FValue;
  286. bool FArmed;
  287. };
  288. //---------------------------------------------------------------------------
  289. class TAutoNestingCounter : public TValueRestorer<int>
  290. {
  291. public:
  292. __fastcall TAutoNestingCounter(int & Target) :
  293. TValueRestorer<int>(Target)
  294. {
  295. DebugAssert(Target >= 0);
  296. ++Target;
  297. }
  298. __fastcall ~TAutoNestingCounter()
  299. {
  300. DebugAssert(!FArmed || (FTarget == (FValue + 1)));
  301. }
  302. };
  303. //---------------------------------------------------------------------------
  304. class TAutoFlag : public TValueRestorer<bool>
  305. {
  306. public:
  307. __fastcall TAutoFlag(bool & Target) :
  308. TValueRestorer<bool>(Target)
  309. {
  310. DebugAssert(!Target);
  311. Target = true;
  312. }
  313. __fastcall ~TAutoFlag()
  314. {
  315. DebugAssert(!FArmed || FTarget);
  316. }
  317. };
  318. //---------------------------------------------------------------------------
  319. #include <map>
  320. //---------------------------------------------------------------------------
  321. template<class T1, class T2>
  322. class BiDiMap
  323. {
  324. public:
  325. typedef std::map<T1, T2> TFirstToSecond;
  326. typedef TFirstToSecond::const_iterator const_iterator;
  327. void Add(const T1 & Value1, const T2 & Value2)
  328. {
  329. FFirstToSecond.insert(std::make_pair(Value1, Value2));
  330. FSecondToFirst.insert(std::make_pair(Value2, Value1));
  331. }
  332. T1 LookupFirst(const T2 & Value2) const
  333. {
  334. TSecondToFirst::const_iterator Iterator = FSecondToFirst.find(Value2);
  335. DebugAssert(Iterator != FSecondToFirst.end());
  336. return Iterator->second;
  337. }
  338. T2 LookupSecond(const T1 & Value1) const
  339. {
  340. const_iterator Iterator = FFirstToSecond.find(Value1);
  341. DebugAssert(Iterator != FFirstToSecond.end());
  342. return Iterator->second;
  343. }
  344. const_iterator begin()
  345. {
  346. return FFirstToSecond.begin();
  347. }
  348. const_iterator end()
  349. {
  350. return FFirstToSecond.end();
  351. }
  352. private:
  353. TFirstToSecond FFirstToSecond;
  354. typedef std::map<T2, T1> TSecondToFirst;
  355. TSecondToFirst FSecondToFirst;
  356. };
  357. //---------------------------------------------------------------------------
  358. #endif