StaticGenerators.xtend 12 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427
  1. package be.uantwerpen.ansymo.semanticadaptation.cg.cpp.generation
  2. class StaticGenerators {
  3. def static String GenFmuCppFile(String adapClassName)
  4. {
  5. '''
  6. #include <stdio.h>
  7. #include "fmi2Functions.h"
  8. #include <string>
  9. #include "«adapClassName».h"
  10. #include "uri.h"
  11. using namespace std;
  12. const fmi2CallbackFunctions *g_functions;
  13. std::string* name;
  14. shared_ptr<adaptation::«adapClassName»> g_adaptation;
  15. template<class T>
  16. static void log(const fmi2CallbackFunctions *functions, fmi2ComponentEnvironment componentEnvironment,
  17. fmi2String instanceName, fmi2Status status, fmi2String category, fmi2String message, T arg)
  18. {
  19. if (functions != NULL && functions->logger != NULL)
  20. {
  21. functions->logger(componentEnvironment, instanceName, status, category, message, arg);
  22. }
  23. }
  24. static void notimplemented(fmi2Component c, fmi2String message)
  25. {
  26. std::string base("Not implemented: %s");
  27. std::string m(message);
  28. if (g_functions != NULL)
  29. {
  30. log(g_functions, (void*) 2, "", fmi2Error, "error", (base + m).c_str(), "");
  31. }
  32. }
  33. template<class T>
  34. static void fmiprintf(fmi2String message, T arg)
  35. {
  36. if (g_functions != NULL)
  37. {
  38. log(g_functions, (void*) 2, name->c_str(), fmi2OK, "logAll", message, arg);
  39. }
  40. }
  41. // ---------------------------------------------------------------------------
  42. // FMI functions
  43. // ---------------------------------------------------------------------------
  44. extern "C" fmi2Component fmi2Instantiate(fmi2String instanceName, fmi2Type fmuType, fmi2String fmuGUID,
  45. fmi2String fmuResourceLocation, const fmi2CallbackFunctions *functions, fmi2Boolean visible,
  46. fmi2Boolean loggingOn)
  47. {
  48. name = new std::string(instanceName);
  49. g_functions = functions;
  50. fmiprintf("instantiating %s\n", instanceName);
  51. auto resourceLoc = make_shared<std::string>(URIToNativePath(fmuResourceLocation));
  52. g_adaptation = make_shared<adaptation::«adapClassName»>(resourceLoc, functions);
  53. try
  54. {
  55. g_adaptation->initialize();
  56. } catch (adaptation::SemanticAdaptationFmiException& e)
  57. {
  58. return NULL;
  59. }
  60. if (g_adaptation->getLastErrorState() != fmi2OK)
  61. return NULL;
  62. return g_adaptation->getComponent();
  63. }
  64. extern "C" fmi2Status fmi2SetupExperiment(fmi2Component c, fmi2Boolean toleranceDefined, fmi2Real tolerance,
  65. fmi2Real startTime, fmi2Boolean stopTimeDefined, fmi2Real stopTime)
  66. {
  67. try
  68. {
  69. return g_adaptation->fmi2SetupExperiment(toleranceDefined, tolerance, startTime, stopTimeDefined, stopTime);
  70. } catch (adaptation::SemanticAdaptationFmiException& e)
  71. {
  72. return e.status;
  73. }
  74. }
  75. extern "C" fmi2Status fmi2EnterInitializationMode(fmi2Component c)
  76. {
  77. try
  78. {
  79. return g_adaptation->fmi2EnterInitializationMode();
  80. } catch (adaptation::SemanticAdaptationFmiException& e)
  81. {
  82. return e.status;
  83. }
  84. }
  85. extern "C" fmi2Status fmi2ExitInitializationMode(fmi2Component c)
  86. {
  87. try
  88. {
  89. return g_adaptation->fmi2ExitInitializationMode();
  90. } catch (adaptation::SemanticAdaptationFmiException& e)
  91. {
  92. return e.status;
  93. }
  94. }
  95. extern "C" fmi2Status fmi2Terminate(fmi2Component c)
  96. {
  97. try
  98. {
  99. return g_adaptation->fmi2Terminate();
  100. } catch (adaptation::SemanticAdaptationFmiException& e)
  101. {
  102. return e.status;
  103. }
  104. }
  105. extern "C" fmi2Status fmi2Reset(fmi2Component c)
  106. {
  107. return fmi2OK;
  108. }
  109. extern "C" void fmi2FreeInstance(fmi2Component c)
  110. {
  111. }
  112. // ---------------------------------------------------------------------------
  113. // FMI functions: class methods not depending of a specific model instance
  114. // ---------------------------------------------------------------------------
  115. extern "C" const char* fmi2GetVersion()
  116. {
  117. return fmi2Version;
  118. }
  119. extern "C" const char* fmi2GetTypesPlatform()
  120. {
  121. return fmi2TypesPlatform;
  122. }
  123. // ---------------------------------------------------------------------------
  124. // FMI functions: logging control, setters and getters for Real, Integer,
  125. // Boolean, String
  126. // ---------------------------------------------------------------------------
  127. extern "C" fmi2Status fmi2SetDebugLogging(fmi2Component c, fmi2Boolean loggingOn, size_t nCategories,
  128. const fmi2String categories[])
  129. {
  130. return fmi2OK;
  131. }
  132. template<class T>
  133. fmi2Status getX(const fmi2ValueReference vr[], size_t nvr, T value[],
  134. T (adaptation::«adapClassName»::*getter)(fmi2ValueReference vr))
  135. {
  136. try
  137. {
  138. fmi2Status status = g_adaptation->executeOutRules();
  139. if (status != fmi2OK)
  140. return status;
  141. status = g_adaptation->flushAllEnabledOutRules();
  142. if (status != fmi2OK)
  143. return status;
  144. for (int i = 0; i < nvr; i++)
  145. {
  146. value[i] = ((*g_adaptation).*getter)(vr[i]);
  147. status = g_adaptation->getLastErrorState();
  148. if (status != fmi2OK)
  149. return status;
  150. }
  151. return fmi2OK;
  152. } catch (adaptation::SemanticAdaptationFmiException& e)
  153. {
  154. return e.status;
  155. }
  156. }
  157. extern "C" fmi2Status fmi2GetReal(fmi2Component c, const fmi2ValueReference vr[], size_t nvr, fmi2Real value[])
  158. {
  159. return getX(vr, nvr, value, &adaptation::«adapClassName»::getFmiValueReal);
  160. }
  161. extern "C" fmi2Status fmi2GetInteger(fmi2Component c, const fmi2ValueReference vr[], size_t nvr, fmi2Integer value[])
  162. {
  163. return getX(vr, nvr, value, &adaptation::«adapClassName»::getFmiValueInteger);
  164. }
  165. extern "C" fmi2Status fmi2GetBoolean(fmi2Component c, const fmi2ValueReference vr[], size_t nvr, fmi2Boolean value[])
  166. {
  167. typedef bool (adaptation::«adapClassName»::*GB)(fmi2ValueReference);
  168. typedef int (adaptation::«adapClassName»::*GI)(fmi2ValueReference);
  169. GB g = &adaptation::«adapClassName»::getFmiValueBoolean;
  170. GI i = reinterpret_cast<GI>(g);
  171. return getX(vr, nvr, value, i);
  172. }
  173. extern "C" fmi2Status fmi2GetString(fmi2Component c, const fmi2ValueReference vr[], size_t nvr, fmi2String value[])
  174. {
  175. return fmi2Discard;
  176. }
  177. template<class T>
  178. fmi2Status setX(const fmi2ValueReference vr[], size_t nvr, T value[])
  179. {
  180. try
  181. {
  182. fmi2Status status = fmi2OK;
  183. for (int i = 0; i < nvr; i++)
  184. {
  185. g_adaptation->setFmiValue(vr[i], value[i]);
  186. status = g_adaptation->getLastErrorState();
  187. if (status != fmi2OK)
  188. return status;
  189. }
  190. status = g_adaptation->executeInRules();
  191. return status;
  192. } catch (adaptation::SemanticAdaptationFmiException& e)
  193. {
  194. return e.status;
  195. }
  196. }
  197. extern "C" fmi2Status fmi2SetReal(fmi2Component c, const fmi2ValueReference vr[], size_t nvr, const fmi2Real value[])
  198. {
  199. return setX(vr, nvr, value);
  200. }
  201. extern "C" fmi2Status fmi2SetInteger(fmi2Component c, const fmi2ValueReference vr[], size_t nvr,
  202. const fmi2Integer value[])
  203. {
  204. return setX(vr, nvr, value);
  205. }
  206. extern "C" fmi2Status fmi2SetBoolean(fmi2Component c, const fmi2ValueReference vr[], size_t nvr,
  207. const fmi2Boolean value[])
  208. {
  209. return setX(vr, nvr, value);
  210. }
  211. extern "C" fmi2Status fmi2SetString(fmi2Component c, const fmi2ValueReference vr[], size_t nvr,
  212. const fmi2String value[])
  213. {
  214. return fmi2Discard;
  215. }
  216. extern "C" fmi2Status fmi2GetFMUstate(fmi2Component c, fmi2FMUstate* FMUstate)
  217. {
  218. return fmi2OK;
  219. }
  220. extern "C" fmi2Status fmi2SetFMUstate(fmi2Component c, fmi2FMUstate FMUstate)
  221. {
  222. return fmi2OK;
  223. }
  224. extern "C" fmi2Status fmi2FreeFMUstate(fmi2Component c, fmi2FMUstate* FMUstate)
  225. {
  226. return fmi2OK;
  227. }
  228. extern "C" fmi2Status fmi2SerializedFMUstateSize(fmi2Component c, fmi2FMUstate FMUstate, size_t *size)
  229. {
  230. notimplemented(c, "fmi2SerializedFMUstateSize");
  231. return fmi2Error;
  232. }
  233. extern "C" fmi2Status fmi2SerializeFMUstate(fmi2Component c, fmi2FMUstate FMUstate, fmi2Byte serializedState[],
  234. size_t size)
  235. {
  236. notimplemented(c, "fmi2SerializeFMUstate");
  237. return fmi2Error;
  238. }
  239. extern "C" fmi2Status fmi2DeSerializeFMUstate(fmi2Component c, const fmi2Byte serializedState[], size_t size,
  240. fmi2FMUstate* FMUstate)
  241. {
  242. notimplemented(c, "fmi2DeSerializeFMUstate");
  243. return fmi2Error;
  244. }
  245. extern "C" fmi2Status fmi2GetDirectionalDerivative(fmi2Component c, const fmi2ValueReference vUnknown_ref[],
  246. size_t nUnknown, const fmi2ValueReference vKnown_ref[], size_t nKnown, const fmi2Real dvKnown[],
  247. fmi2Real dvUnknown[])
  248. {
  249. notimplemented(c, "fmi2GetDirectionalDerivative");
  250. return fmi2Error;
  251. }
  252. // ---------------------------------------------------------------------------
  253. // Functions for FMI for Co-Simulation
  254. // ---------------------------------------------------------------------------
  255. #ifdef FMI_COSIMULATION
  256. /* Simulating the slave */
  257. extern "C" fmi2Status fmi2SetRealInputDerivatives(fmi2Component c, const fmi2ValueReference vr[], size_t nvr,
  258. const fmi2Integer order[], const fmi2Real value[])
  259. {
  260. notimplemented(c, "fmi2SetRealInputDerivatives");
  261. return fmi2Error;
  262. }
  263. extern "C" fmi2Status fmi2GetRealOutputDerivatives(fmi2Component c, const fmi2ValueReference vr[], size_t nvr,
  264. const fmi2Integer order[], fmi2Real value[])
  265. {
  266. notimplemented(c, "fmi2GetRealOutputDerivatives");
  267. return fmi2Error;
  268. }
  269. extern "C" fmi2Status fmi2CancelStep(fmi2Component c)
  270. {
  271. notimplemented(c, "fmi2CancelStep");
  272. return fmi2Error;
  273. }
  274. extern "C" fmi2Status fmi2DoStep(fmi2Component c, fmi2Real currentCommunicationPoint, fmi2Real communicationStepSize,
  275. fmi2Boolean noSetFMUStatePriorToCurrentPoint)
  276. {
  277. try
  278. {
  279. g_adaptation->executeControlFlow(currentCommunicationPoint, communicationStepSize);
  280. return fmi2OK;
  281. } catch (adaptation::SemanticAdaptationFmiException& e)
  282. {
  283. return e.status;
  284. }
  285. }
  286. extern "C" fmi2Status fmi2GetStatus(fmi2Component c, const fmi2StatusKind s, fmi2Status *value)
  287. {
  288. return fmi2OK;
  289. }
  290. extern "C" fmi2Status fmi2GetRealStatus(fmi2Component c, const fmi2StatusKind s, fmi2Real *value)
  291. {
  292. return fmi2OK;
  293. }
  294. extern "C" fmi2Status fmi2GetIntegerStatus(fmi2Component c, const fmi2StatusKind s, fmi2Integer *value)
  295. {
  296. return fmi2OK;
  297. }
  298. extern "C" fmi2Status fmi2GetBooleanStatus(fmi2Component c, const fmi2StatusKind s, fmi2Boolean *value)
  299. {
  300. return fmi2OK;
  301. }
  302. extern "C" fmi2Status fmi2GetStringStatus(fmi2Component c, const fmi2StatusKind s, fmi2String *value)
  303. {
  304. return fmi2OK;
  305. }
  306. /* INTO cps specific*/
  307. /*extern "C" fmi2Status fmi2GetMaxStepsize(fmi2Component c, fmi2Real* size)
  308. {
  309. return fmi2OK;
  310. }*/
  311. // ---------------------------------------------------------------------------
  312. // Functions for FMI2 for Model Exchange
  313. // ---------------------------------------------------------------------------
  314. #else
  315. /* Enter and exit the different modes */
  316. fmi2Status fmi2EnterEventMode(fmi2Component c)
  317. {
  318. return fmi2Error;
  319. }
  320. fmi2Status fmi2NewDiscreteStates(fmi2Component c, fmi2EventInfo *eventInfo)
  321. {
  322. return fmi2Error;
  323. }
  324. fmi2Status fmi2EnterContinuousTimeMode(fmi2Component c)
  325. {
  326. return fmi2Error;
  327. }
  328. fmi2Status fmi2CompletedIntegratorStep(fmi2Component c, fmi2Boolean noSetFMUStatePriorToCurrentPoint,
  329. fmi2Boolean *enterEventMode, fmi2Boolean *terminateSimulation)
  330. {
  331. return fmi2Error;
  332. }
  333. /* Providing independent variables and re-initialization of caching */
  334. fmi2Status fmi2SetTime(fmi2Component c, fmi2Real time)
  335. {
  336. return fmi2Error;
  337. }
  338. fmi2Status fmi2SetContinuousStates(fmi2Component c, const fmi2Real x[], size_t nx)
  339. {
  340. return fmi2Error;
  341. }
  342. /* Evaluation of the model equations */
  343. fmi2Status fmi2GetDerivatives(fmi2Component c, fmi2Real derivatives[], size_t nx)
  344. {
  345. return fmi2Error;
  346. }
  347. fmi2Status fmi2GetEventIndicators(fmi2Component c, fmi2Real eventIndicators[], size_t ni)
  348. {
  349. return fmi2Error;
  350. }
  351. fmi2Status fmi2GetContinuousStates(fmi2Component c, fmi2Real states[], size_t nx)
  352. {
  353. return fmi2Error;
  354. }
  355. fmi2Status fmi2GetNominalsOfContinuousStates(fmi2Component c, fmi2Real x_nominal[], size_t nx)
  356. {
  357. return fmi2Error;
  358. }
  359. #endif // Model Exchange
  360. '''
  361. }
  362. }