Add FMILibrary-2.0.3 to org.simantics.fmil.core\native.

[simantics/fmil.git] / org.simantics.fmil.core / native / FMILibrary / src / XML / src / FMI1 / fmi1_xml_cosim.c

diff --git a/org.simantics.fmil.core/native/FMILibrary/src/XML/src/FMI1/fmi1_xml_cosim.c b/org.simantics.fmil.core/native/FMILibrary/src/XML/src/FMI1/fmi1_xml_cosim.c
new file mode 100644 (file)
index 0000000..d4519d2
--- /dev/null
+++ b/org.simantics.fmil.core/native/FMILibrary/src/XML/src/FMI1/fmi1_xml_cosim.c
@@ -0,0 +1,142 @@
+/*
+    Copyright (C) 2012 Modelon AB
+
+    This program is free software: you can redistribute it and/or modify
+    it under the terms of the BSD style license.
+
+     This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    FMILIB_License.txt file for more details.
+
+    You should have received a copy of the FMILIB_License.txt file
+    along with this program. If not, contact Modelon AB <http://www.modelon.com>.
+*/
+#include <JM/jm_vector.h>
+#include "fmi1_xml_model_description_impl.h"
+#include "fmi1_xml_parser.h"
+
+static const char * module = "FMI1XML";
+
+fmi1_fmu_kind_enu_t fmi1_xml_get_fmu_kind(fmi1_xml_model_description_t* md) {
+    return md->fmuKind;
+}
+
+fmi1_xml_capabilities_t* fmi1_xml_get_capabilities(fmi1_xml_model_description_t* md){
+    return md->capabilities;
+}
+
+size_t fmi1_xml_get_number_of_additional_models(fmi1_xml_model_description_t* md) {
+    return jm_vector_get_size(jm_string)(&md->additionalModels);
+}
+
+const char* fmi1_xml_get_additional_model_name(fmi1_xml_model_description_t* md, size_t index) {
+    if(fmi1_xml_get_number_of_additional_models(md) <= index) return 0;
+    return jm_vector_get_item(jm_string)(&md->additionalModels,index);
+}
+
+
+const char* fmi1_xml_get_entry_point(fmi1_xml_model_description_t* md) {
+    return jm_vector_char2string(&md->entryPoint);
+}
+
+const char* fmi1_xml_get_mime_type(fmi1_xml_model_description_t* md){
+    return jm_vector_char2string(&md->mimeType);
+}
+
+int fmi1_xml_get_manual_start(fmi1_xml_model_description_t* md){
+    return md->manual_start;
+}
+
+
+int fmi1_xml_handle_Implementation(fmi1_xml_parser_context_t *context, const char* data) {
+    fmi1_xml_model_description_t* md = context->modelDescription;
+    if(!data) {
+               jm_log_info(context->callbacks, module, "Processing implementation element (co-simulation FMU detected)");
+
+        md->fmuKind = fmi1_fmu_kind_enu_unknown; /* Explicitly set the "unknown" FMU kind here, in order to 
+                                                  * detect if the required CoSimulation_StandAlone and 
+                                                  * CoSimulation_Tool elements has been parsed below. 
+                                                  */
+    }
+    else {
+        /* According to https://trac.fmi-standard.org/ticket/309 we should report an error if neither of the
+         * requiered elements CoSimulation_StandAlone and CoSimulation_Tool is present in the Implementation
+         * element.
+         */
+        if (md->fmuKind != fmi1_fmu_kind_enu_cs_tool && md->fmuKind != fmi1_fmu_kind_enu_cs_standalone) {
+            jm_log_error(context->callbacks, module, 
+                "Missing requiered XML element. Expected 'CoSimulation_StandAlone' or 'CoSimulation_Tool' element inside the 'Implementation' element.");
+        }
+        /* might give out a warning if(data[0] != 0) */
+    }
+    return 0;
+}
+
+int fmi1_xml_handle_CoSimulation_StandAlone(fmi1_xml_parser_context_t *context, const char* data) {
+    fmi1_xml_model_description_t* md = context->modelDescription;
+    if(!data) {
+        md->fmuKind = fmi1_fmu_kind_enu_cs_standalone;
+    }
+    else {
+        /* might give out a warning if(data[0] != 0) */
+    }
+    return 0;
+}
+
+
+
+int fmi1_xml_handle_CoSimulation_Tool(fmi1_xml_parser_context_t *context, const char* data) {
+    fmi1_xml_model_description_t* md = context->modelDescription;
+    if(!data) {
+        md->fmuKind = fmi1_fmu_kind_enu_cs_tool;
+    }
+    else {
+        /* might give out a warning if(data[0] != 0) */
+    }
+    return 0;
+}
+
+int fmi1_xml_handle_Model(fmi1_xml_parser_context_t *context, const char* data) {
+    fmi1_xml_model_description_t* md = context->modelDescription;
+    if(!data) {
+        return (
+        /* <xs:attribute name="entryPoint"  type="xs:anyURI" use="required"/> */
+        fmi1_xml_set_attr_string(context, fmi1_xml_elmID_Model, fmi_attr_id_entryPoint, 1, &(md->entryPoint)) ||
+        /* <xs:attribute name="manualStart" type="xs:boolean" default="false"/> */
+        fmi1_xml_set_attr_boolean(context,fmi1_xml_elmID_Model,fmi_attr_id_manualStart,0,&md->manual_start,0) ||
+        /* <xs:attribute name="type"        type="xs:string" use="required"/> */
+        fmi1_xml_set_attr_string(context, fmi1_xml_elmID_Model, fmi_attr_id_type,1,&md->mimeType)
+                    );
+    }
+    else {
+        /* might give out a warning if(data[0] != 0) */
+    }
+    return 0;
+}
+
+int fmi1_xml_handle_File(fmi1_xml_parser_context_t *context, const char* data) {
+    fmi1_xml_model_description_t* md = context->modelDescription;
+    if(!data) {
+            jm_vector(char)* bufFileName = fmi1_xml_get_parse_buffer(context,2);
+            char* fileName = 0;
+            jm_string* pname;
+            size_t len;
+            if(fmi1_xml_set_attr_string(context, fmi1_xml_elmID_Model, fmi_attr_id_file, 1, bufFileName))
+                return -1;
+            len = jm_vector_get_size_char(bufFileName);
+            pname = jm_vector_push_back(jm_string)(&md->additionalModels,fileName);
+            if(pname) *pname = fileName =  md->callbacks->malloc(len + 1);
+            if(!pname || !fileName) {
+                fmi1_xml_parse_fatal(context, "Could not allocate memory");
+                return -1;
+            }
+            memcpy(fileName, jm_vector_get_itemp(char)(bufFileName,0), len);
+            fileName[len] = 0;
+    }
+    else {
+        /* might give out a warning if(data[0] != 0) */
+    }
+    return 0;
+}
+