* @brief sensor service reporting functionality
* @author Omar Tarabai
*/
+#include <inttypes.h>
#include "platform.h"
#include "gnunet_util_lib.h"
#include "sensor.h"
#include "gnunet_peerstore_service.h"
#include "gnunet_cadet_service.h"
+#include "gnunet_applications.h"
#define LOG(kind,...) GNUNET_log_from (kind, "sensor-reporting",__VA_ARGS__)
/**
- * Context of reporting to collection
- * point
+ * Retry interval (seconds) in case channel to collection point is busy
*/
-struct CollectionReportingContext
+#define COLLECTION_RETRY 1
+
+/**
+ * Context of reporting operations
+ */
+struct ReportingContext
{
+ /**
+ * DLL
+ */
+ struct ReportingContext *prev;
+
+ /**
+ * DLL
+ */
+ struct ReportingContext *next;
+
/**
* Sensor information
*/
struct SensorInfo *sensor;
/**
- * Reporting task (OR GNUNET_SCHEDULER_NO_TASK)
+ * Collection point reporting task
+ * (or #GNUNET_SCHEDULER_NO_TASK)
+ */
+ GNUNET_SCHEDULER_TaskIdentifier cp_task;
+
+ /**
+ * Watcher of sensor values
+ */
+ struct GNUNET_PEERSTORE_WatchContext *wc;
+
+ /**
+ * Last value read from sensor
+ */
+ void *last_value;
+
+ /**
+ * Size of @e last_value
+ */
+ size_t last_value_size;
+
+ /**
+ * Timestamp of last value reading
+ */
+ uint64_t timestamp;
+
+};
+
+/**
+ * Context of a created CADET channel
+ */
+struct CadetChannelContext
+{
+
+ /**
+ * DLL
+ */
+ struct CadetChannelContext *prev;
+
+ /**
+ * DLL
+ */
+ struct CadetChannelContext *next;
+
+ /**
+ * Peer Id of
+ */
+ struct GNUNET_PeerIdentity pid;
+
+ /**
+ * CADET channel handle
+ */
+ struct GNUNET_CADET_Channel *c;
+
+ /**
+ * Are we sending data on this channel?
+ * #GNUNET_YES / #GNUNET_NO
*/
- GNUNET_SCHEDULER_TaskIdentifier task;
+ int sending;
+
+ /**
+ * Pointer to a pending message to be sent over the channel
+ */
+ void *pending_msg;
+
+ /**
+ * Size of @e pending_msg
+ */
+ size_t pending_msg_size;
+
+ /**
+ * Handle to CADET tranmission request in case we are sending
+ * (sending == #GNUNET_YES)
+ */
+ struct GNUNET_CADET_TransmitHandle *th;
+
+ /**
+ * Are we currently destroying the channel and its context?
+ */
+ int destroying;
};
/**
* My peer id
*/
-static struct GNUNET_PeerIdentity peerid;
+static struct GNUNET_PeerIdentity mypeerid;
/**
* Handle to CADET service
*/
static struct GNUNET_CADET_Handle *cadet;
+/**
+ * Head of DLL of all reporting contexts
+ */
+struct ReportingContext *rc_head;
+
+/**
+ * Tail of DLL of all reporting contexts
+ */
+struct ReportingContext *rc_tail;
+
+/**
+ * Head of DLL of all cadet channels
+ */
+struct CadetChannelContext *cc_head;
+
+/**
+ * Tail of DLL of all cadet channels
+ */
+struct CadetChannelContext *cc_tail;
+
+
+/**
+ * Destroy a reporting context structure
+ */
+static void
+destroy_reporting_context (struct ReportingContext *rc)
+{
+ if (NULL != rc->wc)
+ {
+ GNUNET_PEERSTORE_watch_cancel (rc->wc);
+ rc->wc = NULL;
+ }
+ if (GNUNET_SCHEDULER_NO_TASK != rc->cp_task)
+ {
+ GNUNET_SCHEDULER_cancel(rc->cp_task);
+ rc->cp_task = GNUNET_SCHEDULER_NO_TASK;
+ }
+ if (NULL != rc->last_value)
+ {
+ GNUNET_free (rc->last_value);
+ rc->last_value_size = 0;
+ }
+ GNUNET_free(rc);
+}
+
+/**
+ * Destroy a CADET channel context struct
+ */
+static void
+destroy_cadet_channel_context (struct CadetChannelContext *cc)
+{
+ cc->destroying = GNUNET_YES;
+ if (NULL != cc->th)
+ {
+ GNUNET_CADET_notify_transmit_ready_cancel (cc->th);
+ cc->th = NULL;
+ }
+ if (NULL != cc->pending_msg)
+ {
+ GNUNET_free (cc->pending_msg);
+ cc->pending_msg = NULL;
+ }
+ if (NULL != cc->c)
+ {
+ GNUNET_CADET_channel_destroy (cc->c);
+ cc->c = NULL;
+ }
+ GNUNET_free (cc);
+}
+
/**
* Stop sensor reporting module
*/
-void SENSOR_reporting_stop ()
+void
+SENSOR_reporting_stop ()
{
- LOG (GNUNET_ERROR_TYPE_DEBUG, "Stopping sensor reporting module.\n");
+ struct ReportingContext *rc;
+ struct CadetChannelContext *cc;
+
+ LOG (GNUNET_ERROR_TYPE_DEBUG,
+ "Stopping sensor reporting module.\n");
+ while (NULL != cc_head)
+ {
+ cc = cc_head;
+ GNUNET_CONTAINER_DLL_remove (cc_head, cc_tail, cc);
+ destroy_cadet_channel_context (cc);
+ }
+ while (NULL != rc_head)
+ {
+ rc = rc_head;
+ GNUNET_CONTAINER_DLL_remove (rc_head, rc_tail, rc);
+ destroy_reporting_context (rc);
+ }
if (NULL != peerstore)
{
- GNUNET_PEERSTORE_disconnect (peerstore);
+ GNUNET_PEERSTORE_disconnect (peerstore, GNUNET_YES);
peerstore = NULL;
}
+ if (NULL != cadet)
+ {
+ GNUNET_CADET_disconnect (cadet);
+ cadet = NULL;
+ }
+}
+
+
+/**
+ * Returns CADET channel established to given peer
+ * or creates a new one
+ *
+ * @param pid Peer Identity
+ * @return Context of established cadet channel
+ */
+static struct CadetChannelContext *
+get_cadet_channel (struct GNUNET_PeerIdentity pid)
+{
+ struct CadetChannelContext *cc;
+
+ cc = cc_head;
+ while (NULL != cc)
+ {
+ if (0 == GNUNET_CRYPTO_cmp_peer_identity (&pid, &cc->pid))
+ return cc;
+ cc = cc->next;
+ }
+ cc = GNUNET_new (struct CadetChannelContext);
+ cc->c = GNUNET_CADET_channel_create(cadet,
+ cc,
+ &pid,
+ GNUNET_APPLICATION_TYPE_SENSORDASHBOARD,
+ GNUNET_CADET_OPTION_DEFAULT);
+ cc->pid = pid;
+ cc->sending = GNUNET_NO;
+ cc->destroying = GNUNET_NO;
+ GNUNET_CONTAINER_DLL_insert (cc_head, cc_tail, cc);
+ return cc;
}
+
+/**
+ * Construct a reading message ready to be sent over CADET channel
+ *
+ * @param rc reporting context to read data from
+ * @param msg used to return the created message structure
+ * @return size of created message
+ */
+static size_t
+construct_reading_message (struct ReportingContext *rc,
+ struct GNUNET_SENSOR_ReadingMessage **msg)
+{
+ struct GNUNET_SENSOR_ReadingMessage *ret;
+ uint16_t sensorname_size;
+ uint16_t total_size;
+ void *dummy;
+
+ sensorname_size = strlen (rc->sensor->name) + 1;
+ total_size = sizeof(struct GNUNET_SENSOR_ReadingMessage) +
+ sensorname_size +
+ rc->last_value_size;
+ ret = GNUNET_malloc (total_size);
+ ret->header.size = htons (total_size);
+ ret->header.type = htons (GNUNET_MESSAGE_TYPE_SENSOR_READING);
+ ret->sensorname_size = htons (sensorname_size);
+ ret->sensorversion_major = htons (rc->sensor->version_major);
+ ret->sensorversion_minor = htons (rc->sensor->version_minor);
+ ret->timestamp = GNUNET_htobe64 (rc->timestamp);
+ ret->value_size = htons (rc->last_value_size);
+ dummy = &ret[1];
+ memcpy (dummy, rc->sensor->name, sensorname_size);
+ dummy += sensorname_size;
+ memcpy (dummy, rc->last_value, rc->last_value_size);
+ *msg = ret;
+ return total_size;
+}
+
+
+/**
+ * Function called to notify a client about the connection begin ready
+ * to queue more data. @a buf will be NULL and @a size zero if the
+ * connection was closed for writing in the meantime.
+ *
+ * @param cls closure
+ * @param size number of bytes available in @a buf
+ * @param buf where the callee should write the message
+ * @return number of bytes written to @a buf
+ */
+static size_t
+do_report_collection_point (void *cls, size_t size, void *buf)
+{
+ struct CadetChannelContext *cc = cls;
+ size_t written = 0;
+
+ cc->th = NULL;
+ cc->sending = GNUNET_NO;
+ LOG (GNUNET_ERROR_TYPE_DEBUG,
+ "Copying to CADET transmit buffer.\n");
+ if (NULL == buf)
+ {
+ LOG (GNUNET_ERROR_TYPE_WARNING,
+ "CADET failed to transmit message (NULL buf), discarding.\n");
+ }
+ else if (size < cc->pending_msg_size)
+ {
+ LOG (GNUNET_ERROR_TYPE_WARNING,
+ "CADET failed to transmit message (small size, expected: %u, got: %u)"
+ ", discarding.\n", cc->pending_msg_size, size);
+ }
+ else
+ {
+ memcpy (buf, cc->pending_msg, cc->pending_msg_size);
+ written = cc->pending_msg_size;
+ }
+ GNUNET_free (cc->pending_msg);
+ cc->pending_msg = NULL;
+ cc->pending_msg_size = 0;
+ return written;
+}
+
+
/**
* Task scheduled to send values to collection point
*
- * @param cls closure, a 'struct CollectionReportingContext *'
+ * @param cls closure, a `struct CollectionReportingContext *`
* @param tc unused
*/
-void report_collection_point
-(void *cls, const struct GNUNET_SCHEDULER_TaskContext* tc)
+static void
+report_collection_point (void *cls,
+ const struct GNUNET_SCHEDULER_TaskContext* tc)
{
- struct CollectionReportingContext *crc = cls;
+ struct ReportingContext *rc = cls;
+ struct SensorInfo *sensor = rc->sensor;
+ struct CadetChannelContext *cc;
+ struct GNUNET_SENSOR_ReadingMessage *msg;
+ size_t msg_size;
- crc->task = GNUNET_SCHEDULER_NO_TASK;
+ rc->cp_task = GNUNET_SCHEDULER_NO_TASK;
+ if (0 == rc->last_value_size) /* Did not receive a sensor value yet */
+ {
+ LOG (GNUNET_ERROR_TYPE_WARNING,
+ "Did not receive a value from `%s' to report yet.\n",
+ rc->sensor->name);
+ rc->cp_task = GNUNET_SCHEDULER_add_delayed (sensor->collection_interval,
+ &report_collection_point, rc);
+ return;
+ }
+ LOG (GNUNET_ERROR_TYPE_DEBUG,
+ "Now trying to report last seen value of `%s' "
+ "to collection point.\n",
+ rc->sensor->name);
+ GNUNET_assert (NULL != sensor->collection_point);
+ cc = get_cadet_channel (*sensor->collection_point);
+ if (GNUNET_YES == cc->sending)
+ {
+ LOG (GNUNET_ERROR_TYPE_DEBUG,
+ "Cadet channel to collection point busy, "
+ "trying again for sensor `%s' after %d seconds.\n",
+ rc->sensor->name,
+ COLLECTION_RETRY);
+ rc->cp_task = GNUNET_SCHEDULER_add_delayed (
+ GNUNET_TIME_relative_multiply(GNUNET_TIME_UNIT_SECONDS, COLLECTION_RETRY),
+ &report_collection_point, rc);
+ return;
+ }
+ msg_size = construct_reading_message (rc, &msg);
+ cc->sending = GNUNET_YES;
+ cc->pending_msg = msg;
+ cc->pending_msg_size = msg_size;
+ cc->th = GNUNET_CADET_notify_transmit_ready (cc->c,
+ GNUNET_YES,
+ sensor->collection_interval,
+ msg_size,
+ &do_report_collection_point,
+ cc);
+ rc->cp_task = GNUNET_SCHEDULER_add_delayed (sensor->collection_interval,
+ &report_collection_point, rc);
+}
+
+
+/**
+ * Sensor value watch callback
+ */
+static int
+sensor_watch_cb (void *cls,
+ struct GNUNET_PEERSTORE_Record *record,
+ char *emsg)
+{
+ struct ReportingContext *rc = cls;
+
+ if (NULL != emsg)
+ return GNUNET_YES;
+ if (NULL != rc->last_value)
+ {
+ GNUNET_free (rc->last_value);
+ rc->last_value_size = 0;
+ }
+ rc->last_value = GNUNET_malloc(record->value_size);
+ memcpy (rc->last_value, record->value, record->value_size);
+ rc->last_value_size = record->value_size;
+ rc->timestamp = GNUNET_TIME_absolute_get().abs_value_us;
+ LOG (GNUNET_ERROR_TYPE_DEBUG,
+ "Received a sensor `%s' watch value at "
+ "timestamp %" PRIu64 ", updating notification last_value.\n",
+ rc->sensor->name,
+ rc->timestamp);
+ return GNUNET_YES;
}
+
/**
* Iterator for defined sensors
* Watches sensors for readings to report
void *value)
{
struct SensorInfo *sensor = value;
- struct CollectionReportingContext *crc;
+ struct ReportingContext *rc;
+ if (NULL == sensor->collection_point &&
+ GNUNET_NO == sensor->p2p_report)
+ return GNUNET_YES;
+ rc = GNUNET_new (struct ReportingContext);
+ rc->sensor = sensor;
+ rc->last_value = NULL;
+ rc->last_value_size = 0;
+ rc->wc = GNUNET_PEERSTORE_watch(peerstore,
+ "sensor",
+ &mypeerid,
+ sensor->name,
+ &sensor_watch_cb,
+ rc);
if (NULL != sensor->collection_point)
{
LOG (GNUNET_ERROR_TYPE_INFO,
- "Will start reporting sensor `%s' values to collection point `%s' every %s.\n",
+ "Will start reporting sensor `%s' values to "
+ "collection point `%s' every %s.\n",
sensor->name, GNUNET_i2s_full(sensor->collection_point),
- GNUNET_STRINGS_relative_time_to_string(sensor->collection_interval, GNUNET_YES));
- crc = GNUNET_new (struct CollectionReportingContext);
- crc->sensor = sensor;
- crc->task =
+ GNUNET_STRINGS_relative_time_to_string(sensor->collection_interval,
+ GNUNET_YES));
+ rc->cp_task =
GNUNET_SCHEDULER_add_delayed (sensor->collection_interval,
&report_collection_point,
- crc);
+ rc);
}
if (GNUNET_YES == sensor->p2p_report)
{
LOG (GNUNET_ERROR_TYPE_INFO,
"Will start reporting sensor `%s' values to p2p network every %s.\n",
sensor->name,
- GNUNET_STRINGS_relative_time_to_string(sensor->p2p_interval, GNUNET_YES));
+ GNUNET_STRINGS_relative_time_to_string(sensor->p2p_interval,
+ GNUNET_YES));
}
+ GNUNET_CONTAINER_DLL_insert (rc_head, rc_tail, rc);
return GNUNET_YES;
}
+
/**
* Function called whenever a channel is destroyed. Should clean up
* any associated state.
* @param channel_ctx place where local state associated
* with the channel is stored
*/
-static void cadet_channel_destroyed (void *cls,
- const struct GNUNET_CADET_Channel *channel,
- void *channel_ctx)
+static void
+cadet_channel_destroyed (void *cls,
+ const struct GNUNET_CADET_Channel *channel,
+ void *channel_ctx)
{
+ struct CadetChannelContext *cc = channel_ctx;
+ if (GNUNET_YES == cc->destroying)
+ return;
+ LOG (GNUNET_ERROR_TYPE_DEBUG,
+ "Received a `channel destroyed' notification from CADET, "
+ "cleaning up.\n");
+ GNUNET_CONTAINER_DLL_remove (cc_head, cc_tail, cc);
+ cc->c = NULL;
+ destroy_cadet_channel_context (cc);
}
/**
*/
int
SENSOR_reporting_start (const struct GNUNET_CONFIGURATION_Handle *c,
- struct GNUNET_CONTAINER_MultiHashMap *sensors)
+ struct GNUNET_CONTAINER_MultiHashMap *sensors)
{
static struct GNUNET_CADET_MessageHandler cadet_handlers[] = {
{NULL, 0, 0}
};
+ LOG (GNUNET_ERROR_TYPE_DEBUG,
+ "Starting sensor reporting module.\n");
GNUNET_assert(NULL != sensors);
cfg = c;
- GNUNET_CRYPTO_get_peer_identity(cfg, &peerid);
- GNUNET_CONTAINER_multihashmap_iterate(sensors, &init_sensor_reporting, NULL);
peerstore = GNUNET_PEERSTORE_connect(cfg);
if (NULL == peerstore)
{
if (NULL == cadet)
{
LOG (GNUNET_ERROR_TYPE_ERROR,
- _("Failed to connect to CADET service.\n"));
+ _("Failed to connect to CADET service.\n"));
SENSOR_reporting_stop ();
return GNUNET_SYSERR;
}
-
+ GNUNET_CRYPTO_get_peer_identity (cfg,
+ &mypeerid);
+ GNUNET_CONTAINER_multihashmap_iterate(sensors,
+ &init_sensor_reporting, NULL);
return GNUNET_OK;
}