ChaiScriptOnCopy.cpp 1.7 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970717273747576
  1. #include "stdafx.h"
  2. #include "ChaiScriptOnCopy.h"
  3. #include "Shared\TextConvert.h"
  4. #include "chaiscript/chaiscript.hpp"
  5. using namespace chaiscript;
  6. ChaiScriptOnCopy::ChaiScriptOnCopy()
  7. {
  8. }
  9. ChaiScriptOnCopy::~ChaiScriptOnCopy()
  10. {
  11. }
  12. bool ChaiScriptOnCopy::ProcessScript(CDittoChaiScript &clipData, std::string script)
  13. {
  14. m_lastError = _T("");
  15. bool continueCopy = true;
  16. try
  17. {
  18. ChaiScript chai;
  19. chai.add(chaiscript::fun(&CDittoChaiScript::GetClipMD5), "GetClipMD5");
  20. chai.add(chaiscript::fun(&CDittoChaiScript::GetClipSize), "GetClipSize");
  21. chai.add(chaiscript::fun(&CDittoChaiScript::GetAsciiString), "GetAsciiString");
  22. chai.add(chaiscript::fun(&CDittoChaiScript::SetAsciiString), "SetAsciiString");
  23. chai.add(chaiscript::var(&clipData), "clip");
  24. //loop over all scripts
  25. /*std::string script = R""(
  26. var md5 = clip.GetClipMD5(13)
  27. return md5 == "4FF8DB22A28559FB23AB9EB90523AE3E"
  28. )"";*/
  29. Boxed_Value bv = chai.eval(script);
  30. if (chaiscript::boxed_cast<bool> (bv) == true)
  31. {
  32. m_lastError = _T("Script returned true, canceling copy");
  33. continueCopy = false;
  34. }
  35. }
  36. catch (const chaiscript::exception::eval_error &ee)
  37. {
  38. std::string eString;
  39. eString += ee.pretty_print();
  40. m_lastError = CTextConvert::MultiByteToUnicodeString(eString.c_str());
  41. }
  42. catch (std::exception &e)
  43. {
  44. std::string eString;
  45. eString += e.what();
  46. m_lastError = CTextConvert::MultiByteToUnicodeString(eString.c_str());
  47. }
  48. catch (CException *ex)
  49. {
  50. TCHAR szCause[255];
  51. ex->GetErrorMessage(szCause, 255);
  52. m_lastError.Format(_T("ProcessScript exception: %s"), szCause);
  53. }
  54. catch (...)
  55. {
  56. m_lastError.Format(_T("ProcessScript exception"));
  57. }
  58. return continueCopy;
  59. }