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