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

   1 #include <stdio.h>
   2 #include <unistd.h>
   3 #include <stdlib.h>
   4 #include <string.h>
   5 #include <sys/time.h>
   6
   7 #include "../src/meshlink.h"
   8 #include "../src/node.h"
   9
  10 volatile bool bar_reachable = false;
  11 volatile bool bar_responded = false;
  12
  13 void log_cb(meshlink_handle_t *mesh, meshlink_log_level_t level, const char *text) {
  14         static struct timeval tv0;
  15         struct timeval tv;
  16
  17         if(tv0.tv_sec == 0) {
  18                 gettimeofday(&tv0, NULL);
  19         }
  20
  21         gettimeofday(&tv, NULL);
  22         fprintf(stderr, "%u.%.03u ", (unsigned int)(tv.tv_sec - tv0.tv_sec), (unsigned int)tv.tv_usec / 1000);
  23
  24         if(mesh) {
  25                 fprintf(stderr, "(%s) ", mesh->name);
  26         }
  27
  28         fprintf(stderr, "[%d] %s\n", level, text);
  29 }
  30
  31 void status_cb(meshlink_handle_t *mesh, meshlink_node_t *node, bool reachable) {
  32         (void)mesh;
  33
  34         printf("status_cb: %s %sreachable\n", node->name, reachable ? "" : "un");
  35
  36         if(!strcmp(node->name, "bar")) {
  37                 bar_reachable = reachable;
  38         }
  39 }
  40
  41 void foo_receive_cb(meshlink_handle_t *mesh, meshlink_channel_t *channel, const void *data, size_t len) {
  42         (void)mesh;
  43         (void)channel;
  44
  45         printf("foo_receive_cb %zu: ", len);
  46         fwrite(data, 1, len, stdout);
  47         printf("\n");
  48
  49         if(len == 5 && !memcmp(data, "Hello", 5)) {
  50                 bar_responded = true;
  51         }
  52 }
  53
  54 void bar_receive_cb(meshlink_handle_t *mesh, meshlink_channel_t *channel, const void *data, size_t len) {
  55         printf("bar_receive_cb %zu: ", len);
  56         fwrite(data, 1, len, stdout);
  57         printf("\n");
  58         // Echo the data back.
  59         meshlink_channel_send(mesh, channel, data, len);
  60 }
  61
  62 bool reject_cb(meshlink_handle_t *mesh, meshlink_channel_t *channel, uint16_t port, const void *data, size_t len) {
  63         (void)mesh;
  64         (void)channel;
  65         (void)port;
  66         (void)data;
  67         (void)len;
  68
  69         return false;
  70 }
  71
  72 bool accept_cb(meshlink_handle_t *mesh, meshlink_channel_t *channel, uint16_t port, const void *data, size_t len) {
  73         printf("accept_cb: (from %s on port %u) ", channel->node->name, (unsigned int)port);
  74
  75         if(data) {
  76                 fwrite(data, 1, len, stdout);
  77         }
  78
  79         printf("\n");
  80
  81         if(port != 7) {
  82                 return false;
  83         }
  84
  85         meshlink_set_channel_receive_cb(mesh, channel, bar_receive_cb);
  86
  87         if(data) {
  88                 bar_receive_cb(mesh, channel, data, len);
  89         }
  90
  91         return true;
  92 }
  93
  94 void poll_cb(meshlink_handle_t *mesh, meshlink_channel_t *channel, size_t len) {
  95         (void)len;
  96
  97         meshlink_set_channel_poll_cb(mesh, channel, NULL);
  98
  99         if(meshlink_channel_send(mesh, channel, "Hello", 5) != 5) {
 100                 fprintf(stderr, "Could not send whole message\n");
 101         }
 102 }
 103
 104 int main() {
 105         meshlink_set_log_cb(NULL, MESHLINK_DEBUG, log_cb);
 106
 107         // Open two new meshlink instance.
 108
 109         meshlink_handle_t *mesh1 = meshlink_open("channels_conf.1", "foo", "channels", DEV_CLASS_BACKBONE);
 110
 111         if(!mesh1) {
 112                 fprintf(stderr, "Could not initialize configuration for foo\n");
 113                 return 1;
 114         }
 115
 116         meshlink_handle_t *mesh2 = meshlink_open("channels_conf.2", "bar", "channels", DEV_CLASS_BACKBONE);
 117
 118         if(!mesh2) {
 119                 fprintf(stderr, "Could not initialize configuration for bar\n");
 120                 return 1;
 121         }
 122
 123         meshlink_enable_discovery(mesh1, false);
 124         meshlink_enable_discovery(mesh2, false);
 125         meshlink_set_log_cb(mesh1, MESHLINK_DEBUG, log_cb);
 126         meshlink_set_log_cb(mesh2, MESHLINK_DEBUG, log_cb);
 127
 128         // Import and export both side's data
 129
 130         meshlink_add_address(mesh1, "localhost");
 131
 132         char *data = meshlink_export(mesh1);
 133
 134         if(!data) {
 135                 fprintf(stderr, "Foo could not export its configuration\n");
 136                 return 1;
 137         }
 138
 139         if(!meshlink_import(mesh2, data)) {
 140                 fprintf(stderr, "Bar could not import foo's configuration\n");
 141                 return 1;
 142         }
 143
 144         free(data);
 145
 146         data = meshlink_export(mesh2);
 147
 148         if(!data) {
 149                 fprintf(stderr, "Bar could not export its configuration\n");
 150                 return 1;
 151         }
 152
 153         if(!meshlink_import(mesh1, data)) {
 154                 fprintf(stderr, "Foo could not import bar's configuration\n");
 155                 return 1;
 156         }
 157
 158         free(data);
 159
 160         // Set the callbacks.
 161
 162         meshlink_set_channel_accept_cb(mesh1, reject_cb);
 163         meshlink_set_channel_accept_cb(mesh2, accept_cb);
 164
 165         meshlink_set_node_status_cb(mesh1, status_cb);
 166
 167         // Start both instances
 168
 169         if(!meshlink_start(mesh1)) {
 170                 fprintf(stderr, "Foo could not start\n");
 171                 return 1;
 172         }
 173
 174         if(!meshlink_start(mesh2)) {
 175                 fprintf(stderr, "Bar could not start\n");
 176                 return 1;
 177         }
 178
 179         // Wait for the two to connect.
 180
 181         for(int i = 0; i < 20; i++) {
 182                 sleep(1);
 183
 184                 if(bar_reachable) {
 185                         break;
 186                 }
 187         }
 188
 189         if(!bar_reachable) {
 190                 fprintf(stderr, "Bar not reachable for foo after 20 seconds\n");
 191                 return 1;
 192         }
 193
 194         // Open a channel from foo to bar.
 195
 196         meshlink_node_t *bar = meshlink_get_node(mesh1, "bar");
 197
 198         if(!bar) {
 199                 fprintf(stderr, "Foo could not find bar\n");
 200                 return 1;
 201         }
 202
 203         meshlink_channel_t *channel = meshlink_channel_open(mesh1, bar, 7, foo_receive_cb, NULL, 0);
 204         meshlink_set_channel_poll_cb(mesh1, channel, poll_cb);
 205
 206         for(int i = 0; i < 20; i++) {
 207                 sleep(1);
 208
 209                 if(bar_responded) {
 210                         break;
 211                 }
 212         }
 213
 214         if(!bar_responded) {
 215                 fprintf(stderr, "Bar did not respond to foo's channel message\n");
 216                 return 1;
 217         }
 218
 219         meshlink_channel_close(mesh1, channel);
 220
 221         // Clean up.
 222
 223         meshlink_stop(mesh2);
 224         meshlink_stop(mesh1);
 225         meshlink_close(mesh2);
 226         meshlink_close(mesh1);
 227
 228         return 0;
 229 }