git.meshlink.io Git - meshlink/blob - test/utils.c

   1 #define _GNU_SOURCE 1
   2 #define _POSIX_C_SOURCE 200809L
   3
   4 #ifdef NDEBUG
   5 #undef NDEBUG
   6 #endif
   7
   8 #include <stdio.h>
   9 #include <stdlib.h>
  10 #include <pthread.h>
  11 #include <assert.h>
  12 #include <errno.h>
  13 #include <time.h>
  14
  15 #include "utils.h"
  16
  17 void init_sync_flag(struct sync_flag *s) {
  18         assert(pthread_mutex_init(&s->mutex, NULL) == 0);
  19         assert(pthread_cond_init(&s->cond, NULL) == 0);
  20         s->flag = false;
  21 }
  22
  23 void set_sync_flag(struct sync_flag *s, bool value) {
  24         assert(pthread_mutex_lock(&s->mutex) == 0);
  25         s->flag = value;
  26         assert(pthread_cond_broadcast(&s->cond) == 0);
  27         assert(pthread_mutex_unlock(&s->mutex) == 0);
  28 }
  29
  30 void reset_sync_flag(struct sync_flag *s) {
  31         assert(pthread_mutex_lock(&s->mutex) == 0);
  32         s->flag = false;
  33         assert(pthread_mutex_unlock(&s->mutex) == 0);
  34 }
  35
  36 bool check_sync_flag(struct sync_flag *s) {
  37         bool flag;
  38         assert(pthread_mutex_lock(&s->mutex) == 0);
  39         flag = s->flag;
  40         assert(pthread_mutex_unlock(&s->mutex) == 0);
  41         return flag;
  42 }
  43
  44 bool wait_sync_flag(struct sync_flag *s, int seconds) {
  45         struct timespec timeout;
  46         clock_gettime(CLOCK_REALTIME, &timeout);
  47         timeout.tv_sec += seconds;
  48
  49         assert(pthread_mutex_lock(&s->mutex) == 0);
  50
  51         while(!s->flag) {
  52                 if(!pthread_cond_timedwait(&s->cond, &s->mutex, &timeout) || errno != EINTR) {
  53                         break;
  54                 }
  55         }
  56
  57         assert(pthread_mutex_unlock(&s->mutex) == 0);
  58
  59         return s->flag;
  60 }
  61
  62 void link_meshlink_pair(meshlink_handle_t *a, meshlink_handle_t *b) {
  63         // Import and export both side's data
  64
  65         assert(meshlink_set_canonical_address(a, meshlink_get_self(a), "localhost", NULL));
  66         assert(meshlink_set_canonical_address(b, meshlink_get_self(b), "localhost", NULL));
  67
  68         char *data = meshlink_export(a);
  69         assert(data);
  70         assert(meshlink_import(b, data));
  71         free(data);
  72
  73         data = meshlink_export(b);
  74         assert(data);
  75         assert(meshlink_import(a, data));
  76         free(data);
  77 }
  78
  79 void open_meshlink_pair(meshlink_handle_t **pa, meshlink_handle_t **pb, const char *prefix) {
  80         // Create two new MeshLink instances
  81
  82         *pa = *pb = NULL;
  83
  84         char *a_name, *b_name;
  85
  86         assert(asprintf(&a_name, "%s_conf.1", prefix) > 0);
  87         assert(a_name);
  88
  89         assert(asprintf(&b_name, "%s_conf.2", prefix) > 0);
  90         assert(b_name);
  91
  92         assert(meshlink_destroy(a_name));
  93         assert(meshlink_destroy(b_name));
  94
  95         meshlink_handle_t *a = meshlink_open(a_name, "a", prefix, DEV_CLASS_BACKBONE);
  96         assert(a);
  97
  98         meshlink_handle_t *b = meshlink_open(b_name, "b", prefix, DEV_CLASS_BACKBONE);
  99         assert(b);
 100
 101         free(a_name);
 102         free(b_name);
 103
 104         meshlink_enable_discovery(a, false);
 105         meshlink_enable_discovery(b, false);
 106
 107         link_meshlink_pair(a, b);
 108
 109         *pa = a;
 110         *pb = b;
 111 }
 112
 113 void open_meshlink_pair_ephemeral(meshlink_handle_t **pa, meshlink_handle_t **pb, const char *prefix) {
 114         // Create two new MeshLink instances
 115
 116         *pa = *pb = NULL;
 117
 118         meshlink_handle_t *a = meshlink_open_ephemeral("a", prefix, DEV_CLASS_BACKBONE);
 119         meshlink_handle_t *b = meshlink_open_ephemeral("b", prefix, DEV_CLASS_BACKBONE);
 120
 121         assert(a);
 122         assert(b);
 123
 124         meshlink_enable_discovery(a, false);
 125         meshlink_enable_discovery(b, false);
 126
 127         link_meshlink_pair(a, b);
 128
 129         *pa = a;
 130         *pb = b;
 131 }
 132
 133 // Don't poll in the application thread, use a condition variable to signal when the peer is online.
 134 static void pair_status_cb(meshlink_handle_t *mesh, meshlink_node_t *node, bool reachable) {
 135         (void)node;
 136
 137         if(reachable && meshlink_get_self(mesh) != node) {
 138                 set_sync_flag(mesh->priv, true);
 139         }
 140 }
 141
 142 void start_meshlink_pair(meshlink_handle_t *a, meshlink_handle_t *b) {
 143         struct sync_flag pair_status = {.flag = false};
 144         init_sync_flag(&pair_status);
 145
 146         a->priv = &pair_status;
 147         meshlink_set_node_status_cb(a, pair_status_cb);
 148
 149         assert(meshlink_start(a));
 150         assert(meshlink_start(b));
 151
 152         assert(wait_sync_flag(&pair_status, 5));
 153
 154         meshlink_set_node_status_cb(a, NULL);
 155         a->priv = NULL;
 156 }
 157
 158 void stop_meshlink_pair(meshlink_handle_t *a, meshlink_handle_t *b) {
 159         meshlink_stop(a);
 160         meshlink_stop(b);
 161 }
 162
 163 void close_meshlink_pair(meshlink_handle_t *a, meshlink_handle_t *b) {
 164         meshlink_close(a);
 165         meshlink_close(b);
 166 }
 167
 168 void log_cb(meshlink_handle_t *mesh, meshlink_log_level_t level, const char *text) {
 169         static const char *levelstr[] = {
 170                 [MESHLINK_DEBUG] = "DEBUG",
 171                 [MESHLINK_INFO] = "INFO",
 172                 [MESHLINK_WARNING] = "WARNING",
 173                 [MESHLINK_ERROR] = "ERROR",
 174                 [MESHLINK_CRITICAL] = "CRITICAL",
 175         };
 176
 177         static struct timespec ts0;
 178         struct timespec ts;
 179
 180         clock_gettime(CLOCK_MONOTONIC, &ts);
 181
 182         if(ts0.tv_sec == 0) {
 183                 ts0 = ts;
 184         }
 185
 186         float diff = (ts.tv_sec - ts0.tv_sec) + (ts.tv_nsec - ts0.tv_nsec) * 1e-9;
 187
 188         fprintf(stderr, "%7.3f (%s) [%s] %s\n",
 189                 diff,
 190                 mesh ? mesh->name : "",
 191                 levelstr[level],
 192                 text);
 193 }