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

   1 #define _GNU_SOURCE
   2
   3 #include <stdio.h>
   4 #include <unistd.h>
   5 #include <stdlib.h>
   6 #include <string.h>
   7 #include <sys/time.h>
   8 #include <assert.h>
   9 #include <pthread.h>
  10
  11 #include "../src/meshlink.h"
  12 #include "utils.h"
  13
  14 static volatile bool b_responded = false;
  15 static volatile bool b_closed = false;
  16 static volatile size_t a_poll_cb_len;
  17
  18 static void log_cb(meshlink_handle_t *mesh, meshlink_log_level_t level, const char *text) {
  19         static struct timeval tv0;
  20         struct timeval tv;
  21
  22         if(tv0.tv_sec == 0) {
  23                 gettimeofday(&tv0, NULL);
  24         }
  25
  26         gettimeofday(&tv, NULL);
  27         fprintf(stderr, "%u.%.03u ", (unsigned int)(tv.tv_sec - tv0.tv_sec), (unsigned int)tv.tv_usec / 1000);
  28
  29         if(mesh) {
  30                 fprintf(stderr, "(%s) ", mesh->name);
  31         }
  32
  33         fprintf(stderr, "[%d] %s\n", level, text);
  34 }
  35
  36 static void a_receive_cb(meshlink_handle_t *mesh, meshlink_channel_t *channel, const void *data, size_t len) {
  37         (void)mesh;
  38         (void)channel;
  39
  40         if(len == 5 && !memcmp(data, "Hello", 5)) {
  41                 b_responded = true;
  42         } else if(len == 0) {
  43                 b_closed = true;
  44                 set_sync_flag(channel->priv, true);
  45         }
  46 }
  47
  48 static void b_receive_cb(meshlink_handle_t *mesh, meshlink_channel_t *channel, const void *data, size_t len) {
  49         // Send one message back, then close the channel.
  50         if(len) {
  51                 meshlink_channel_send(mesh, channel, data, len);
  52         }
  53
  54         meshlink_channel_close(mesh, channel);
  55 }
  56
  57 static bool reject_cb(meshlink_handle_t *mesh, meshlink_channel_t *channel, uint16_t port, const void *data, size_t len) {
  58         (void)mesh;
  59         (void)channel;
  60         (void)port;
  61         (void)data;
  62         (void)len;
  63
  64         return false;
  65 }
  66
  67 static bool accept_cb(meshlink_handle_t *mesh, meshlink_channel_t *channel, uint16_t port, const void *data, size_t len) {
  68         (void)port;
  69
  70         meshlink_set_channel_accept_cb(mesh, NULL);
  71         meshlink_set_channel_receive_cb(mesh, channel, b_receive_cb);
  72
  73         if(data) {
  74                 b_receive_cb(mesh, channel, data, len);
  75         }
  76
  77         return true;
  78 }
  79
  80 static void poll_cb(meshlink_handle_t *mesh, meshlink_channel_t *channel, size_t len) {
  81         (void)len;
  82
  83         meshlink_set_channel_poll_cb(mesh, channel, NULL);
  84         set_sync_flag(channel->priv, true);
  85 }
  86
  87 static void poll_cb2(meshlink_handle_t *mesh, meshlink_channel_t *channel, size_t len) {
  88         (void)mesh;
  89         (void)channel;
  90
  91         a_poll_cb_len = len;
  92         meshlink_set_channel_poll_cb(mesh, channel, NULL);
  93         set_sync_flag(channel->priv, true);
  94 }
  95
  96 int main() {
  97         meshlink_set_log_cb(NULL, MESHLINK_DEBUG, log_cb);
  98
  99         meshlink_handle_t *a, *b;
 100         open_meshlink_pair(&a, &b, "channels-cornercases");
 101
 102         // Set the callbacks.
 103
 104         meshlink_set_channel_accept_cb(a, reject_cb);
 105         meshlink_set_channel_accept_cb(b, accept_cb);
 106
 107         // Open a channel from a to b before starting the mesh.
 108
 109         meshlink_node_t *nb = meshlink_get_node(a, "b");
 110         assert(nb);
 111
 112         struct sync_flag channel_opened = {.flag = false};
 113
 114         meshlink_channel_t *channel = meshlink_channel_open(a, nb, 7, a_receive_cb, NULL, 0);
 115         assert(channel);
 116
 117         channel->priv = &channel_opened;
 118         meshlink_set_channel_poll_cb(a, channel, poll_cb);
 119
 120         // Start MeshLink and wait for the channel to become connected.
 121         start_meshlink_pair(a, b);
 122
 123         assert(wait_sync_flag(&channel_opened, 20));
 124
 125         // Re-initialize everything
 126         meshlink_channel_close(a, channel);
 127         close_meshlink_pair(a, b, "channels-cornercases");
 128         b_responded = false;
 129         b_closed = false;
 130         channel_opened.flag = false;
 131         open_meshlink_pair(&a, &b, "channels-cornercases");
 132
 133         meshlink_set_channel_accept_cb(a, reject_cb);
 134         meshlink_set_channel_accept_cb(b, accept_cb);
 135
 136         start_meshlink_pair(a, b);
 137
 138         // Create a channel to b
 139         nb = meshlink_get_node(a, "b");
 140         assert(nb);
 141
 142         channel = meshlink_channel_open(a, nb, 7, a_receive_cb, NULL, 0);
 143         assert(channel);
 144         channel->priv = &channel_opened;
 145         meshlink_set_channel_poll_cb(a, channel, poll_cb);
 146
 147         assert(wait_sync_flag(&channel_opened, 20));
 148
 149         assert(!b_responded);
 150         assert(!b_closed);
 151
 152         // Send a message to b
 153
 154         struct sync_flag channel_closed = {.flag = false};
 155         channel->priv = &channel_closed;
 156
 157         meshlink_channel_send(a, channel, "Hello", 5);
 158
 159         assert(wait_sync_flag(&channel_closed, 20));
 160         assert(b_responded);
 161         assert(b_closed);
 162
 163         // Try to create a second channel
 164
 165         struct sync_flag channel_polled = {.flag = false};
 166
 167         meshlink_channel_t *channel2 = meshlink_channel_open(a, nb, 7, a_receive_cb, NULL, 0);
 168         assert(channel2);
 169         channel2->priv = &channel_polled;
 170         meshlink_set_channel_poll_cb(a, channel2, poll_cb2);
 171
 172         assert(wait_sync_flag(&channel_polled, 20));
 173
 174         assert(0 == a_poll_cb_len);
 175
 176         meshlink_channel_close(a, channel);
 177         meshlink_channel_close(a, channel2);
 178         close_meshlink_pair(a, b, "channels-cornercases");
 179
 180         return 0;
 181 }