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

[simantics/fmil.git] / org.simantics.fmil.core / native / FMILibrary / src / Util / src / JM / jm_callbacks.c

diff --git a/org.simantics.fmil.core/native/FMILibrary/src/Util/src/JM/jm_callbacks.c b/org.simantics.fmil.core/native/FMILibrary/src/Util/src/JM/jm_callbacks.c
new file mode 100644 (file)
index 0000000..b07283a
--- /dev/null
+++ b/org.simantics.fmil.core/native/FMILibrary/src/Util/src/JM/jm_callbacks.c
@@ -0,0 +1,118 @@
+/*
+    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 <stdlib.h>
+#include <stdio.h>
+#include <string.h>
+#include <stdarg.h>
+#include <assert.h>
+
+#include "JM/jm_callbacks.h"
+#include "JM/jm_portability.h"
+
+static const char* jm_log_level_str[] = 
+{
+       "NOTHING",
+       "FATAL",
+       "ERROR",
+       "WARNING",
+       "INFO",
+       "VERBOSE",
+       "DEBUG",
+       "ALL"
+};
+
+/** \brief Convert log level into a string */
+const char* jm_log_level_to_string(jm_log_level_enu_t level) {
+       if((level >= jm_log_level_nothing) && (level <= jm_log_level_all))
+               return jm_log_level_str[level];
+       else {
+               assert(0);
+               return "UNEXPECTED";
+       }
+}
+
+void jm_default_logger(jm_callbacks* c, jm_string module, jm_log_level_enu_t log_level, jm_string message) {
+       fprintf(stderr, "[%s][%s] %s\n", jm_log_level_to_string(log_level), module, message);
+}
+
+void jm_log(jm_callbacks* cb, const char* module, jm_log_level_enu_t log_level, const char* fmt, ...) {
+       va_list args;
+       if(log_level > cb->log_level) return;
+    va_start (args, fmt);
+    jm_log_v(cb, module, log_level, fmt, args);
+    va_end (args);
+}
+
+void jm_log_v(jm_callbacks* cb, const char* module, jm_log_level_enu_t log_level, const char* fmt, va_list ap) {
+       if(log_level > cb->log_level) return;
+    jm_vsnprintf(cb->errMessageBuffer, JM_MAX_ERROR_MESSAGE_SIZE, fmt, ap);
+       if(cb->logger) {
+               cb->logger(cb,module, log_level, cb->errMessageBuffer);
+       }
+}
+
+#define CREATE_LOG_FUNCTIONS(log_level) \
+void jm_log_ ## log_level(jm_callbacks* cb, const char* module, const char* fmt, ...) { \
+       va_list args; \
+    va_start (args, fmt); \
+       jm_log_v(cb, module, jm_log_level_ ## log_level, fmt, args); \
+    va_end (args); \
+} \
+       void jm_log_ ## log_level ## _v(jm_callbacks* cb, const char* module, const char* fmt, va_list ap) { \
+    jm_log_v(cb, module, jm_log_level_ ## log_level, fmt, ap); \
+}
+
+CREATE_LOG_FUNCTIONS(fatal)
+CREATE_LOG_FUNCTIONS(error)
+CREATE_LOG_FUNCTIONS(warning)
+CREATE_LOG_FUNCTIONS(info)
+CREATE_LOG_FUNCTIONS(verbose)
+#ifdef FMILIB_ENABLE_LOG_LEVEL_DEBUG
+CREATE_LOG_FUNCTIONS(debug)
+#endif
+
+
+jm_callbacks jm_standard_callbacks;
+
+jm_callbacks* jm_standard_callbacks_ptr = 0;
+
+jm_callbacks* jm_default_callbacks = 0;
+
+void jm_set_default_callbacks(jm_callbacks* c) {
+       if(c)
+               jm_default_callbacks = c;
+       else
+               jm_default_callbacks = jm_standard_callbacks_ptr;
+}
+
+jm_callbacks* jm_get_default_callbacks() { 
+       if(!jm_default_callbacks) {
+               if(!jm_standard_callbacks_ptr) {
+                       jm_standard_callbacks.calloc = calloc;
+                       jm_standard_callbacks.malloc = malloc;
+                       jm_standard_callbacks.realloc = realloc;
+                       jm_standard_callbacks.free = free;
+                       jm_standard_callbacks.logger = jm_default_logger;
+                       jm_standard_callbacks.log_level = jm_log_level_info;
+                       jm_standard_callbacks.context = 0;
+                       jm_standard_callbacks.errMessageBuffer[0] = 0;
+
+                       jm_standard_callbacks_ptr = &jm_standard_callbacks;
+               }
+               jm_default_callbacks = jm_standard_callbacks_ptr;
+       }
+       return jm_default_callbacks; 
+}