StaticGenerators.xtend 12 KB

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