123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406 |
- package be.uantwerpen.ansymo.semanticadaptation.cg.cpp.generation
- class StaticGenerators {
- def static String GenFmuCppFile(String adapClassName)
- {
- '''
- #include "fmi2Functions.h"
- #include <string>
-
- #include "«adapClassName».h"
-
- #include "uri.h"
-
- using namespace std;
-
- const fmi2CallbackFunctions *g_functions;
- std::string* name;
-
- shared_ptr<adaptation::«adapClassName»> g_adaptation;
-
- template<class T>
- static void log(const fmi2CallbackFunctions *functions,
- fmi2ComponentEnvironment componentEnvironment, fmi2String instanceName,
- fmi2Status status, fmi2String category, fmi2String message, T arg) {
- if (functions != NULL && functions->logger != NULL) {
- functions->logger(componentEnvironment, instanceName, status, category,
- message, arg);
- }
- }
-
- static void notimplemented(fmi2Component c, fmi2String message) {
- std::string base("Not implemented: %s");
- std::string m(message);
- if (g_functions != NULL) {
- log(g_functions, (void*) 2, "", fmi2Error, "error", (base + m).c_str(),
- "");
- }
- }
-
- template<class T>
- static void fmiprintf(fmi2String message, T arg) {
- if (g_functions != NULL) {
- log(g_functions, (void*) 2, name->c_str(), fmi2OK, "logAll", message,
- arg);
- }
- }
-
- // ---------------------------------------------------------------------------
- // FMI functions
- // ---------------------------------------------------------------------------
- extern "C" fmi2Component fmi2Instantiate(fmi2String instanceName,
- fmi2Type fmuType, fmi2String fmuGUID, fmi2String fmuResourceLocation,
- const fmi2CallbackFunctions *functions, fmi2Boolean visible,
- fmi2Boolean loggingOn) {
- name = new std::string(instanceName);
- g_functions = functions;
- fmiprintf("instantiating %s\n", instanceName);
- auto resourceLoc = make_shared<std::string>(fmuResourceLocation);
- g_adaptation = make_shared<adaptation::«adapClassName»>(resourceLoc,functions);
- g_adaptation->initialize();
-
- if (g_adaptation->getLastErrorState() != fmi2OK)
- return NULL;
-
- return g_adaptation->getComponent();
- }
-
- extern "C" fmi2Status fmi2SetupExperiment(fmi2Component c,
- fmi2Boolean toleranceDefined, fmi2Real tolerance, fmi2Real startTime,
- fmi2Boolean stopTimeDefined, fmi2Real stopTime) {
-
- return g_adaptation->fmi2SetupExperiment(toleranceDefined, tolerance,
- startTime, stopTimeDefined, stopTime);
- }
-
- extern "C" fmi2Status fmi2EnterInitializationMode(fmi2Component c) {
- return g_adaptation->fmi2EnterInitializationMode();
- }
-
- extern "C" fmi2Status fmi2ExitInitializationMode(fmi2Component c) {
- return g_adaptation->fmi2ExitInitializationMode();
- }
-
- extern "C" fmi2Status fmi2Terminate(fmi2Component c) {
- return g_adaptation->fmi2Terminate();
- }
-
- extern "C" fmi2Status fmi2Reset(fmi2Component c) {
- return fmi2OK;
- }
-
- extern "C" void fmi2FreeInstance(fmi2Component c) {
-
- }
-
- // ---------------------------------------------------------------------------
- // FMI functions: class methods not depending of a specific model instance
- // ---------------------------------------------------------------------------
-
- extern "C" const char* fmi2GetVersion() {
- return fmi2Version;
- }
-
- extern "C" const char* fmi2GetTypesPlatform() {
- return fmi2TypesPlatform;
- }
-
- // ---------------------------------------------------------------------------
- // FMI functions: logging control, setters and getters for Real, Integer,
- // Boolean, String
- // ---------------------------------------------------------------------------
-
- extern "C" fmi2Status fmi2SetDebugLogging(fmi2Component c,
- fmi2Boolean loggingOn, size_t nCategories,
- const fmi2String categories[]) {
- return fmi2OK;
- }
-
- extern "C" fmi2Status fmi2GetReal(fmi2Component c,
- const fmi2ValueReference vr[], size_t nvr, fmi2Real value[]) {
- fmi2Status status = g_adaptation->executeOutRules();
- if (status != fmi2OK)
- return status;
-
- status = g_adaptation->flushAllEnabledOutRules();
- if (status != fmi2OK)
- return status;
-
- for (int i = 0; i < nvr; i++) {
- value[i] = g_adaptation->getFmiValueReal(vr[i]);
-
- status = g_adaptation->getLastErrorState();
- if (status != fmi2OK)
- return status;
- }
-
- return fmi2OK;
- }
-
- extern "C" fmi2Status fmi2GetInteger(fmi2Component c,
- const fmi2ValueReference vr[], size_t nvr, fmi2Integer value[]) {
-
- fmi2Status status = g_adaptation->executeOutRules();
- if (status != fmi2OK)
- return status;
- status = g_adaptation->flushAllEnabledOutRules();
- if (status != fmi2OK)
- return status;
-
- for (int i = 0; i < nvr; i++) {
- value[i] = g_adaptation->getFmiValueInteger(vr[i]);
-
- status = g_adaptation->getLastErrorState();
- if (status != fmi2OK)
- return status;
- }
-
- return fmi2OK;
- }
-
- extern "C" fmi2Status fmi2GetBoolean(fmi2Component c,
- const fmi2ValueReference vr[], size_t nvr, fmi2Boolean value[]) {
-
- fmi2Status status = g_adaptation->executeOutRules();
- if (status != fmi2OK)
- return status;
- status = g_adaptation->flushAllEnabledOutRules();
- if (status != fmi2OK)
- return status;
-
- for (int i = 0; i < nvr; i++) {
- value[i] = g_adaptation->getFmiValueBoolean(vr[i]);
-
- status = g_adaptation->getLastErrorState();
- if (status != fmi2OK)
- return status;
- }
-
- return fmi2OK;
- }
-
- extern "C" fmi2Status fmi2GetString(fmi2Component c,
- const fmi2ValueReference vr[], size_t nvr, fmi2String value[]) {
-
- fmi2Status status = g_adaptation->executeOutRules();
- if (status != fmi2OK)
- return status;
- status = g_adaptation->flushAllEnabledOutRules();
- if (status != fmi2OK)
- return status;
-
- return fmi2OK;
- }
-
- extern "C" fmi2Status fmi2SetReal(fmi2Component c,
- const fmi2ValueReference vr[], size_t nvr, const fmi2Real value[]) {
- fmi2Status status = fmi2OK;
- for (int i = 0; i < nvr; i++) {
- // g_functions->logger((void*) 2, name->c_str(), fmi2OK, "logAll", "setting real vr=%d, value: %f\n", vr[i], value[i]);
- g_adaptation->setFmiValue(vr[i], value[i]);
-
- status = g_adaptation->getLastErrorState();
- if (status != fmi2OK)
- return status;
- }
-
- // g_functions->logger((void*) 2, name->c_str(), fmi2OK, "logAll", "setting real executing in rules");
- status = g_adaptation->executeInRules();
- return status;
- }
-
- extern "C" fmi2Status fmi2SetInteger(fmi2Component c,
- const fmi2ValueReference vr[], size_t nvr, const fmi2Integer value[]) {
- fmi2Status status = fmi2OK;
- for (int i = 0; i < nvr; i++) {
- g_adaptation->setFmiValue(vr[i], value[i]);
-
- status = g_adaptation->getLastErrorState();
- if (status != fmi2OK)
- return status;
- }
-
- status = g_adaptation->executeInRules();
- return status;
- }
-
- extern "C" fmi2Status fmi2SetBoolean(fmi2Component c,
- const fmi2ValueReference vr[], size_t nvr, const fmi2Boolean value[]) {
- fmi2Status status = fmi2OK;
- for (int i = 0; i < nvr; i++) {
- g_adaptation->setFmiValue(vr[i], value[i]);
-
- status = g_adaptation->getLastErrorState();
- if (status != fmi2OK)
- return status;
- }
- status = g_adaptation->executeInRules();
- return status;
- }
-
- extern "C" fmi2Status fmi2SetString(fmi2Component c,
- const fmi2ValueReference vr[], size_t nvr, const fmi2String value[]) {
-
- fmi2Status status = g_adaptation->executeInRules();
- return status;
- }
-
- extern "C" fmi2Status fmi2GetFMUstate(fmi2Component c, fmi2FMUstate* FMUstate) {
- return fmi2OK;
- }
- extern "C" fmi2Status fmi2SetFMUstate(fmi2Component c, fmi2FMUstate FMUstate) {
- return fmi2OK;
- }
- extern "C" fmi2Status fmi2FreeFMUstate(fmi2Component c,
- fmi2FMUstate* FMUstate) {
- return fmi2OK;
- }
-
- extern "C" fmi2Status fmi2SerializedFMUstateSize(fmi2Component c,
- fmi2FMUstate FMUstate, size_t *size) {
- notimplemented(c, "fmi2SerializedFMUstateSize");
- return fmi2Error;
- }
- extern "C" fmi2Status fmi2SerializeFMUstate(fmi2Component c,
- fmi2FMUstate FMUstate, fmi2Byte serializedState[], size_t size) {
- notimplemented(c, "fmi2SerializeFMUstate");
- return fmi2Error;
- }
- extern "C" fmi2Status fmi2DeSerializeFMUstate(fmi2Component c,
- const fmi2Byte serializedState[], size_t size, fmi2FMUstate* FMUstate) {
- notimplemented(c, "fmi2DeSerializeFMUstate");
- return fmi2Error;
- }
-
- extern "C" fmi2Status fmi2GetDirectionalDerivative(fmi2Component c,
- const fmi2ValueReference vUnknown_ref[], size_t nUnknown,
- const fmi2ValueReference vKnown_ref[], size_t nKnown,
- const fmi2Real dvKnown[], fmi2Real dvUnknown[]) {
- notimplemented(c, "fmi2GetDirectionalDerivative");
- return fmi2Error;
- }
-
- // ---------------------------------------------------------------------------
- // Functions for FMI for Co-Simulation
- // ---------------------------------------------------------------------------
- #ifdef FMI_COSIMULATION
- /* Simulating the slave */
- extern "C" fmi2Status fmi2SetRealInputDerivatives(fmi2Component c, const fmi2ValueReference vr[], size_t nvr,
- const fmi2Integer order[], const fmi2Real value[])
- {
- notimplemented(c, "fmi2SetRealInputDerivatives");
- return fmi2Error;
- }
-
- extern "C" fmi2Status fmi2GetRealOutputDerivatives(fmi2Component c, const fmi2ValueReference vr[], size_t nvr,
- const fmi2Integer order[], fmi2Real value[])
- {
- notimplemented(c, "fmi2GetRealOutputDerivatives");
- return fmi2Error;
- }
-
- extern "C" fmi2Status fmi2CancelStep(fmi2Component c)
- {
- notimplemented(c, "fmi2CancelStep");
- return fmi2Error;
- }
-
- extern "C" fmi2Status fmi2DoStep(fmi2Component c, fmi2Real currentCommunicationPoint, fmi2Real communicationStepSize,
- fmi2Boolean noSetFMUStatePriorToCurrentPoint)
- {
- // fmiprintf("doStep%s\n", "");
-
- g_adaptation->executeControlFlow(currentCommunicationPoint, communicationStepSize);
- return fmi2OK;
- }
-
- extern "C" fmi2Status fmi2GetStatus(fmi2Component c, const fmi2StatusKind s, fmi2Status *value)
- {
- return fmi2OK;
- }
-
- extern "C" fmi2Status fmi2GetRealStatus(fmi2Component c, const fmi2StatusKind s, fmi2Real *value)
- {
- return fmi2OK;
- }
-
- extern "C" fmi2Status fmi2GetIntegerStatus(fmi2Component c, const fmi2StatusKind s, fmi2Integer *value)
- {
- return fmi2OK;
- }
-
- extern "C" fmi2Status fmi2GetBooleanStatus(fmi2Component c, const fmi2StatusKind s, fmi2Boolean *value)
- {
- return fmi2OK;
- }
-
- extern "C" fmi2Status fmi2GetStringStatus(fmi2Component c, const fmi2StatusKind s, fmi2String *value)
- {
- return fmi2OK;
- }
-
- /* INTO cps specific*/
- /*extern "C" fmi2Status fmi2GetMaxStepsize(fmi2Component c, fmi2Real* size)
- {
- return fmi2OK;
- }*/
-
- // ---------------------------------------------------------------------------
- // Functions for FMI2 for Model Exchange
- // ---------------------------------------------------------------------------
- #else
- /* Enter and exit the different modes */
- fmi2Status fmi2EnterEventMode(fmi2Component c) {
- return fmi2Error;
- }
-
- fmi2Status fmi2NewDiscreteStates(fmi2Component c, fmi2EventInfo *eventInfo) {
- return fmi2Error;
- }
-
- fmi2Status fmi2EnterContinuousTimeMode(fmi2Component c) {
- return fmi2Error;
- }
-
- fmi2Status fmi2CompletedIntegratorStep(fmi2Component c,
- fmi2Boolean noSetFMUStatePriorToCurrentPoint,
- fmi2Boolean *enterEventMode, fmi2Boolean *terminateSimulation) {
- return fmi2Error;
- }
-
- /* Providing independent variables and re-initialization of caching */
- fmi2Status fmi2SetTime(fmi2Component c, fmi2Real time) {
- return fmi2Error;
- }
-
- fmi2Status fmi2SetContinuousStates(fmi2Component c, const fmi2Real x[],
- size_t nx) {
- return fmi2Error;
- }
-
- /* Evaluation of the model equations */
- fmi2Status fmi2GetDerivatives(fmi2Component c, fmi2Real derivatives[],
- size_t nx) {
- return fmi2Error;
- }
-
- fmi2Status fmi2GetEventIndicators(fmi2Component c, fmi2Real eventIndicators[],
- size_t ni) {
- return fmi2Error;
- }
-
- fmi2Status fmi2GetContinuousStates(fmi2Component c, fmi2Real states[],
- size_t nx) {
- return fmi2Error;
- }
-
- fmi2Status fmi2GetNominalsOfContinuousStates(fmi2Component c,
- fmi2Real x_nominal[], size_t nx) {
- return fmi2Error;
- }
- #endif // Model Exchange
-
-
- '''
- }
- }
|