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