diff -r 9c41e865144a -r a8a6901b5a99 bmsd/co2meters.c
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/bmsd/co2meters.c	Thu Oct 10 20:42:39 2019 +0200
@@ -0,0 +1,346 @@
+/**
+ * @file co2meters.c
+ * @brief Handle co2meters status
+ * @author Michiel Broek <mbroek at mbse dot eu>
+ *
+ * Copyright (C) 2019
+ *
+ * This file is part of the bms (Brewery Management System)
+ *
+ * This is free software; you can redistribute it and/or modify it
+ * under the terms of the GNU General Public License as published by the
+ * Free Software Foundation; either version 2, or (at your option) any
+ * later version.
+ *
+ * bms 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 GNU
+ * General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with ThermFerm; see the file COPYING.  If not, write to the Free
+ * Software Foundation, 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
+ */
+
+
+#include "bms.h"
+#include "xutil.h"
+#include "co2meters.h"
+#include "mysql.h"
+
+
+sys_co2meter_list	*co2meters = NULL;
+
+extern int		debug;
+extern sys_config       Config;
+
+
+
+void co2meter_set(char *edge_node, char *alias, char *payload)
+{
+    struct json_object	*jobj, *val, *sensor;
+    sys_co2meter_list	*co2meter, *tmpp;
+    bool		new_co2meter = true;
+
+//    fprintf(stdout, "co2meter_set: %s/%s %s\n", edge_node, alias, payload);
+
+    /*
+     * Search co2meter record in the memory array and use it if found.
+     */
+    if (co2meters) {
+	for (tmpp = co2meters; tmpp; tmpp = tmpp->next) {
+	    if ((strcmp(tmpp->alias, alias) == 0) && (strcmp(tmpp->node, edge_node) == 0)) {
+		new_co2meter = false;
+		co2meter = tmpp;
+		break;
+	    }
+	}
+    }
+
+//    printf("new_co2meter %s\n", new_co2meter ? "true":"false");
+
+    /*
+     * Allocate new co2meter if not yet known.
+     */
+    if (new_co2meter) {
+	co2meter = (sys_co2meter_list *)malloc(sizeof(sys_co2meter_list));
+	memset(co2meter, 0, sizeof(sys_co2meter_list));
+	co2meter->alias = xstrcpy(alias);
+	co2meter->node = xstrcpy(edge_node);
+	co2meter->mode = xstrcpy((char *)"OFF");
+    }
+
+    if (! co2meter->online) {
+    	co2meter->online = true;
+    	syslog(LOG_NOTICE, "Online co2meter %s/%s mode %s", edge_node, alias, co2meter->mode);
+    }
+
+    /*
+     * Process the JSON formatted payload. 
+     * Update only the fields that are found in the payload.
+     */
+    jobj = json_tokener_parse(payload);
+
+    if (json_object_object_get_ex(jobj, "uuid", &val)) {
+	if (co2meter->uuid)
+	    free(co2meter->uuid);
+	co2meter->uuid = xstrcpy((char *)json_object_get_string(val));
+    }
+    if (json_object_object_get_ex(jobj, "mode", &val)) {
+	if (co2meter->mode) {
+	    if (strcmp(co2meter->mode, (char *)json_object_get_string(val))) {
+		syslog(LOG_NOTICE, "Change mode co2meter %s/%s: %s to %s", edge_node, alias, co2meter->mode, (char *)json_object_get_string(val));
+	    }
+	    free(co2meter->mode);
+	}
+	co2meter->mode = xstrcpy((char *)json_object_get_string(val));
+    }
+    if (json_object_object_get_ex(jobj, "temperature", &sensor)) {
+	if (json_object_object_get_ex(sensor, "address", &val)) {
+	    if (co2meter->temperature_address)
+		free(co2meter->temperature_address);
+	    co2meter->temperature_address = xstrcpy((char *)json_object_get_string(val));
+	}
+	if (json_object_object_get_ex(sensor, "state", &val)) {
+	    if (co2meter->temperature_state)
+		free(co2meter->temperature_state);
+	    co2meter->temperature_state = xstrcpy((char *)json_object_get_string(val));
+	}
+	if (json_object_object_get_ex(sensor, "temperature", &val)) {
+	    co2meter->temperature = json_object_get_double(val);
+	}
+    }
+    if (json_object_object_get_ex(jobj, "pressure", &sensor)) {
+	if (json_object_object_get_ex(sensor, "state", &val)) {
+            if (co2meter->pressure_state)
+                free(co2meter->pressure_state);
+            co2meter->pressure_state = xstrcpy((char *)json_object_get_string(val));
+        }
+	if (json_object_object_get_ex(sensor, "channel", &val)) {
+            co2meter->pressure_channel = json_object_get_int(val);
+        }
+	if (json_object_object_get_ex(sensor, "voltage", &val)) {
+            co2meter->pressure_voltage = json_object_get_double(val);
+        }
+	if (json_object_object_get_ex(sensor, "zero", &val)) {
+            co2meter->pressure_zero = json_object_get_double(val);
+        }
+	if (json_object_object_get_ex(sensor, "bar", &val)) {
+            co2meter->pressure_bar = json_object_get_double(val);
+        }
+    }
+    json_object_put(jobj);
+
+//    co2meter_dump(co2meter);
+
+    if (new_co2meter) {
+    	if (co2meters == NULL) {
+	    co2meters = co2meter;
+	} else {
+	    for (tmpp = co2meters; tmpp; tmpp = tmpp->next) {
+		if (tmpp->next == NULL) {
+		    tmpp->next = co2meter;
+		    break;
+		}
+	    }
+	}
+	co2meter_mysql_insert(co2meter);
+    } else {
+	co2meter_mysql_update(co2meter);
+    }
+
+}
+
+
+
+/*
+ * With DBIRTH all active co2meters are publishd in an array.
+ */
+void co2meter_birth_data(char *topic, char *payload)
+{
+    char		*message_type, *edge_node, *alias;
+    struct json_object  *jobj, *val, *metric, *units, *unit;
+    int			arraylen;
+
+    strtok(topic, "/"); // ignore namespace
+    strtok(NULL, "/");
+    message_type = strtok(NULL, "/");
+    edge_node = strtok(NULL, "/\0");
+    alias = strtok(NULL, "/\0");
+
+    if ((alias == NULL) && (strcmp("DBIRTH", message_type) == 0)) {
+	/*
+	 * Global initial DBIRTH message with array of co2meters.
+	 */
+	jobj = json_tokener_parse(payload);
+
+	if (json_object_object_get_ex(jobj, "metric", &metric)) {
+	    if (json_object_object_get_ex(metric, "units", &units)) {
+		arraylen = json_object_array_length(units);
+		for (int i = 0; i < arraylen; i++) {
+		    /*
+		     * Parse the array of units
+		     */
+		    unit = json_object_array_get_idx(units, i);
+
+		    if (json_object_object_get_ex(unit, "alias", &val)) {
+			if (alias)
+			    free(alias);
+			alias = xstrcpy((char *)json_object_get_string(val));
+		    	co2meter_set(edge_node, alias, (char *)json_object_to_json_string_ext(unit, 0));
+			free(alias);
+			alias = NULL;
+		    }
+		}
+	    }
+	}
+	json_object_put(jobj);
+	return;
+    }
+
+    /*
+     * The rest are errors.
+     */
+    printf("ERROR co2meter_birth_data: %s %s %s\n", message_type, edge_node, alias);
+}
+
+
+
+void co2meter_log(char *topic, char *payload)
+{
+    char                *edge_node, *alias, *line, buf[65], *logfile;
+    struct json_object  *jobj, *val, *metric;
+    co2pressure_log	*log;
+    struct tm		*mytime;
+    time_t		timestamp;
+    FILE		*fp;
+
+    strtok(topic, "/"); // ignore namespace
+    strtok(NULL, "/");	// group_id
+    strtok(NULL, "/");	// message_type
+    edge_node = strtok(NULL, "/\0");
+    alias = strtok(NULL, "/\0");
+
+    log = (co2pressure_log *)malloc(sizeof(co2pressure_log));
+    memset(log, 0, sizeof(co2pressure_log));
+
+    log->co2meter_node = xstrcpy(edge_node);
+    log->co2meter_alias = xstrcpy(alias);
+    jobj = json_tokener_parse(payload);
+
+    timestamp = time(NULL);
+    log->datetime = malloc(21);
+    mytime = localtime(&timestamp);
+    snprintf(log->datetime, 20, "%04d-%02d-%02d %02d:%02d:%02d", 
+	mytime->tm_year + 1900, mytime->tm_mon + 1, mytime->tm_mday, mytime->tm_hour, mytime->tm_min, mytime->tm_sec);
+
+    if (json_object_object_get_ex(jobj, "metric", &metric)) {
+
+/*	    if (json_object_object_get_ex(metric2, "uuid", &val)) {
+		if (strcmp((char *)"(null)", json_object_get_string(val)))
+		    log->product_uuid = xstrcpy((char *)json_object_get_string(val));
+	    }
+	    if (json_object_object_get_ex(metric2, "code", &val)) {
+		if (strcmp((char *)"(null)", json_object_get_string(val)))
+		    log->product_code = xstrcpy((char *)json_object_get_string(val));
+	    }
+	    if (json_object_object_get_ex(metric2, "name", &val)) {
+		if (strcmp((char *)"(null)", json_object_get_string(val)))
+		    log->product_name = xstrcpy((char *)json_object_get_string(val));
+	    }
+*/
+	if (json_object_object_get_ex(metric, "co2meter_uuid", &val)) {
+	    if (strcmp((char *)"(null)", json_object_get_string(val)))
+	    	log->co2meter_uuid = xstrcpy((char *)json_object_get_string(val));
+	}
+	if (json_object_object_get_ex(metric, "temperature", &val)) {
+	    log->temperature = json_object_get_double(val);
+	}
+	if (json_object_object_get_ex(metric, "pressure", &val)) {
+            log->pressure = json_object_get_double(val);
+        }
+    }
+    json_object_put(jobj);
+
+    /*
+     * Because co2meters are not so smart and don't hold product information
+     * search the missing pieces in the database.
+     */
+    // log->co2meter_uuid is the search, fill:
+    // log->product_uuid log->product_name log->product_code
+    // log->co2meter_node log->co2meter_alias
+
+    /*
+     * Build csv log line
+     */
+    line = xstrcpy(log->datetime);
+    line = xstrcat(line, (char *)",");
+    snprintf(buf, 64, "%.3f", log->temperature);
+    line = xstrcat(line, buf);
+    line = xstrcat(line, (char *)",");
+    snprintf(buf, 64, "%.3f", log->pressure);
+    line = xstrcat(line, buf);
+    line = xstrcat(line, (char *)",");
+    line = xstrcat(line, log->co2meter_uuid);
+
+    /*
+     * Build logfile name
+     */
+    logfile = xstrcpy(Config.web_root);
+    logfile = xstrcat(logfile, (char *)"/log/co2pressure/");
+    logfile = xstrcat(logfile, log->product_code);
+    logfile = xstrcat(logfile, (char *)" ");
+    logfile = xstrcat(logfile, log->product_name);
+    logfile = xstrcat(logfile, (char *)".log");
+
+    if (debug)
+	fprintf(stdout, "%s %s\n", logfile, line);
+
+    fp = fopen(logfile, "a");
+    if (fp) {
+	fprintf(fp, "%s\n", line);
+	fclose(fp);
+    } else {
+	syslog(LOG_NOTICE, "cannot append to `%s'", logfile);
+    }
+
+    free(logfile);
+    logfile = NULL;
+    free(line);
+    line = NULL;
+
+    if (log->datetime)
+    	free(log->datetime);
+    if (log->product_uuid )
+	free(log->product_uuid );
+    if (log->product_code )
+	free(log->product_code );
+    if (log->product_name )
+	free(log->product_name );
+    if (log->co2meter_uuid)
+	free(log->co2meter_uuid);
+    if (log->co2meter_node)
+	free(log->co2meter_node);
+    if (log->co2meter_alias)
+	free(log->co2meter_alias);
+    free(log);
+}
+
+
+
+void co2meter_dump(sys_co2meter_list *co2meter)
+{
+    if (debug) {
+    	printf("uuid        %s\n", co2meter->uuid);
+    	printf("alias       %s\n", co2meter->alias);
+    	printf("node        %s\n", co2meter->node);
+	printf("online      %s\n", co2meter->online ? "yes":"no");
+	printf("product     %s / %s\n", co2meter->beercode, co2meter->beername);
+	printf("Temperature %-16s %10s %8.3f\n", co2meter->temperature_address, co2meter->temperature_state, co2meter->temperature);
+	printf("Pressure    %10s %d %.3f %.3f %.3f\n", co2meter->pressure_state, co2meter->pressure_channel,
+				co2meter->pressure_voltage, co2meter->pressure_zero, co2meter->pressure_bar);
+	printf("mode        %s\n", co2meter->mode);
+    }
+}
+
+