]> gerrit.simantics Code Review - simantics/fmil.git/blobdiff - org.simantics.fmil.core/native/FMILibrary/src/CAPI/src/FMI1/fmi1_capi_cs.c
Add FMILibrary-2.0.3 to org.simantics.fmil.core\native.
[simantics/fmil.git] / org.simantics.fmil.core / native / FMILibrary / src / CAPI / src / FMI1 / fmi1_capi_cs.c
diff --git a/org.simantics.fmil.core/native/FMILibrary/src/CAPI/src/FMI1/fmi1_capi_cs.c b/org.simantics.fmil.core/native/FMILibrary/src/CAPI/src/FMI1/fmi1_capi_cs.c
new file mode 100644 (file)
index 0000000..62a9fc0
--- /dev/null
@@ -0,0 +1,92 @@
+/*\r
+    Copyright (C) 2012 Modelon AB\r
+\r
+    This program is free software: you can redistribute it and/or modify\r
+    it under the terms of the BSD style license.
+\r
+    This program is distributed in the hope that it will be useful,\r
+    but WITHOUT ANY WARRANTY; without even the implied warranty of\r
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the\r
+    FMILIB_License.txt file for more details.\r
+\r
+    You should have received a copy of the FMILIB_License.txt file\r
+    along with this program. If not, contact Modelon AB <http://www.modelon.com>.\r
+*/\r
+\r
+#ifdef __cplusplus \r
+extern "C" {\r
+#endif\r
+\r
+#include <FMI1/fmi1_capi.h>\r
+#include <FMI1/fmi1_capi_impl.h>\r
+\r
+fmi1_component_t fmi1_capi_instantiate_slave(fmi1_capi_t* fmu, fmi1_string_t instanceName, fmi1_string_t fmuGUID, fmi1_string_t fmuLocation, fmi1_string_t mimeType, fmi1_real_t timeout, fmi1_boolean_t visible, fmi1_boolean_t interactive, fmi1_boolean_t loggingOn)\r
+{\r
+       return fmu->c = fmu->fmiInstantiateSlave(instanceName, fmuGUID, fmuLocation, mimeType, timeout, visible, interactive, fmu->callBackFunctions, loggingOn);\r
+}\r
+\r
+void fmi1_capi_free_slave_instance(fmi1_capi_t* fmu)\r
+{\r
+       if(fmu->c) {\r
+               fmu->fmiFreeSlaveInstance(fmu->c);\r
+               fmu->c = 0;\r
+       }\r
+}\r
+\r
+fmi1_status_t fmi1_capi_initialize_slave(fmi1_capi_t* fmu, fmi1_real_t tStart, fmi1_boolean_t StopTimeDefined, fmi1_real_t tStop)\r
+{\r
+       return fmu->fmiInitializeSlave(fmu->c, tStart, StopTimeDefined, tStop);\r
+}\r
+\r
+\r
+const char* fmi1_capi_get_types_platform(fmi1_capi_t* fmu)\r
+{\r
+       return fmu->fmiGetTypesPlatform();\r
+}\r
+\r
+fmi1_status_t fmi1_capi_terminate_slave(fmi1_capi_t* fmu)\r
+{\r
+       return fmu->fmiTerminateSlave(fmu->c);\r
+}\r
+\r
+fmi1_status_t fmi1_capi_reset_slave(fmi1_capi_t* fmu)\r
+{\r
+       return fmu->fmiResetSlave(fmu->c);\r
+}\r
+\r
+fmi1_status_t fmi1_capi_set_real_input_derivatives(fmi1_capi_t* fmu, const  fmi1_value_reference_t vr[], size_t nvr, const fmi1_integer_t order[], const  fmi1_real_t value[])  \r
+{\r
+       return fmu->fmiSetRealInputDerivatives(fmu->c, vr, nvr, order, value);\r
+}\r
+\r
+fmi1_status_t fmi1_capi_get_real_output_derivatives(fmi1_capi_t* fmu, const  fmi1_value_reference_t vr[], size_t nvr, const fmi1_integer_t order[], fmi1_real_t value[])   \r
+{\r
+       return fmu->fmiGetRealOutputDerivatives(fmu->c, vr, nvr, order, value);\r
+}\r
+\r
+fmi1_status_t fmi1_capi_cancel_step(fmi1_capi_t* fmu)   \r
+{\r
+       return fmu->fmiCancelStep(fmu->c);\r
+}\r
+\r
+fmi1_status_t fmi1_capi_do_step(fmi1_capi_t* fmu, fmi1_real_t currentCommunicationPoint, fmi1_real_t communicationStepSize, fmi1_boolean_t newStep)\r
+{\r
+       return fmu->fmiDoStep(fmu->c, currentCommunicationPoint, communicationStepSize, newStep);\r
+}\r
+\r
+/* fmiGetStatus* */\r
+#define FMIGETSTATUSX(FNAME1, FNAME2,FSTATUSTYPE) \\r
+fmi1_status_t FNAME1(fmi1_capi_t* fmu, const fmi1_status_kind_t s, FSTATUSTYPE*  value) \\r
+{ \\r
+       return fmu->FNAME2(fmu->c, s, value); \\r
+}\r
+\r
+FMIGETSTATUSX(fmi1_capi_get_status,            fmiGetStatus,           fmi1_status_t)\r
+FMIGETSTATUSX(fmi1_capi_get_real_status,               fmiGetRealStatus,       fmi1_real_t)\r
+FMIGETSTATUSX(fmi1_capi_get_integer_status,    fmiGetIntegerStatus,    fmi1_integer_t)\r
+FMIGETSTATUSX(fmi1_capi_get_boolean_status,    fmiGetBooleanStatus,    fmi1_boolean_t)\r
+FMIGETSTATUSX(fmi1_capi_get_string_status,             fmiGetStringStatus,     fmi1_string_t)\r
+\r
+#ifdef __cplusplus\r
+}\r
+#endif
\ No newline at end of file