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

   1 #ifdef NDEBUG
   2 #undef NDEBUG
   3 #endif
   4
   5 #include <assert.h>
   6 #include <stdio.h>
   7 #include <unistd.h>
   8 #include <stdlib.h>
   9 #include <string.h>
  10 #include <sys/time.h>
  11
  12 #include "meshlink.h"
  13 #include "utils.h"
  14
  15 static const size_t size = 12000000; // size of data to transfer
  16
  17 struct aio_info {
  18         int port;
  19         int callbacks;
  20         size_t size;
  21         struct timeval tv;
  22         struct sync_flag flag;
  23 };
  24
  25 struct channel_info {
  26         char *data;
  27         struct aio_info aio_infos[2];
  28 };
  29
  30 static struct sync_flag b_received_flag;
  31
  32 static void aio_cb(meshlink_handle_t *mesh, meshlink_channel_t *channel, const void *data, size_t len, void *priv) {
  33         (void)mesh;
  34         (void)channel;
  35         (void)data;
  36         (void)len;
  37
  38         struct aio_info *info = priv;
  39
  40         fprintf(stderr, "%d:%s aio_cb %s %p %zu\n", info->port, mesh->name, channel->node->name, data, len);
  41
  42         gettimeofday(&info->tv, NULL);
  43         info->callbacks++;
  44         info->size += len;
  45         set_sync_flag(&info->flag, true);
  46 }
  47
  48 static void aio_cb_close(meshlink_handle_t *mesh, meshlink_channel_t *channel, const void *data, size_t len, void *priv) {
  49         aio_cb(mesh, channel, data, len, priv);
  50         struct aio_info *info = priv;
  51         fprintf(stderr, "%d:%s aio_cb %s closing\n", info->port, mesh->name, channel->node->name);
  52         meshlink_channel_close(mesh, channel);
  53 }
  54
  55 static bool accept_cb(meshlink_handle_t *mesh, meshlink_channel_t *channel, uint16_t port, const void *data, size_t len) {
  56         assert(!data);
  57         assert(!len);
  58
  59         fprintf(stderr, "%d:%s accept_cb %s\n", port, mesh->name, channel->node->name);
  60
  61         struct channel_info *infos = mesh->priv;
  62         struct channel_info *info = &infos[port - 1];
  63
  64         switch(port) {
  65         case 1:
  66         case 3:
  67                 assert(meshlink_channel_aio_receive(mesh, channel, info->data, size / 4, aio_cb, &info->aio_infos[0]));
  68                 assert(meshlink_channel_aio_receive(mesh, channel, info->data + size / 4, size - size / 4, aio_cb_close, &info->aio_infos[1]));
  69                 break;
  70
  71         case 2:
  72         case 4:
  73                 assert(meshlink_channel_aio_receive(mesh, channel, info->data, size / 4, aio_cb_close, &info->aio_infos[0]));
  74                 assert(meshlink_channel_aio_receive(mesh, channel, info->data + size / 4, size - size / 4, aio_cb, &info->aio_infos[1]));
  75                 break;
  76
  77         default:
  78                 return false;
  79         }
  80
  81         return true;
  82 }
  83
  84 int main(void) {
  85         init_sync_flag(&b_received_flag);
  86
  87         meshlink_set_log_cb(NULL, MESHLINK_WARNING, log_cb);
  88
  89         // Prepare data buffers
  90
  91         char *outdata = malloc(size);
  92         assert(outdata);
  93
  94         for(size_t i = 0; i < size; i++) {
  95                 outdata[i] = i;
  96         }
  97
  98         static const size_t nchannels = 4;
  99         struct channel_info in_infos[nchannels];
 100         struct channel_info out_infos[nchannels];
 101
 102         memset(in_infos, 0, sizeof(in_infos));
 103         memset(out_infos, 0, sizeof(out_infos));
 104
 105         for(size_t i = 0; i < nchannels; i++) {
 106                 init_sync_flag(&in_infos[i].aio_infos[0].flag);
 107                 init_sync_flag(&in_infos[i].aio_infos[1].flag);
 108                 init_sync_flag(&out_infos[i].aio_infos[0].flag);
 109                 init_sync_flag(&out_infos[i].aio_infos[1].flag);
 110
 111                 in_infos[i].data = malloc(size);
 112                 assert(in_infos[i].data);
 113                 out_infos[i].data = outdata;
 114
 115                 out_infos[i].aio_infos[0].port = i + 1;
 116                 out_infos[i].aio_infos[1].port = i + 1;
 117                 in_infos[i].aio_infos[0].port = i + 1;
 118                 in_infos[i].aio_infos[1].port = i + 1;
 119         }
 120
 121         // Open two new meshlink instance.
 122
 123         meshlink_handle_t *mesh_a, *mesh_b;
 124         open_meshlink_pair(&mesh_a, &mesh_b, "channels_aio_cornercases");
 125
 126         // Set the callbacks.
 127
 128         mesh_b->priv = in_infos;
 129
 130         meshlink_set_channel_accept_cb(mesh_b, accept_cb);
 131
 132         // Start both instances
 133
 134         start_meshlink_pair(mesh_a, mesh_b);
 135         sleep(1);
 136
 137         // Open channels from a to b.
 138
 139         meshlink_node_t *b = meshlink_get_node(mesh_a, "b");
 140         assert(b);
 141
 142         meshlink_channel_t *channels[nchannels + 1];
 143
 144         // Send a large buffer of data on each channel.
 145
 146         for(size_t i = 0; i < nchannels; i++) {
 147                 channels[i] = meshlink_channel_open(mesh_a, b, i + 1, NULL, NULL, 0);
 148                 assert(channels[i]);
 149
 150                 if(i < 2) {
 151                         assert(meshlink_channel_aio_send(mesh_a, channels[i], outdata, size / 3, aio_cb, &out_infos[i].aio_infos[0]));
 152                         assert(meshlink_channel_aio_send(mesh_a, channels[i], outdata + size / 3, size - size / 3, aio_cb_close, &out_infos[i].aio_infos[1]));
 153                 } else {
 154                         assert(meshlink_channel_aio_send(mesh_a, channels[i], outdata, size / 3, aio_cb_close, &out_infos[i].aio_infos[0]));
 155                         assert(meshlink_channel_aio_send(mesh_a, channels[i], outdata + size / 3, size - size / 3, aio_cb, &out_infos[i].aio_infos[1]));
 156                 }
 157         }
 158
 159         // Wait for all AIO buffers to finish.
 160
 161         for(size_t i = 0; i < nchannels; i++) {
 162                 // The first chunk should always have succeeded
 163                 assert(wait_sync_flag(&in_infos[i].aio_infos[0].flag, 10));
 164                 assert(wait_sync_flag(&out_infos[i].aio_infos[0].flag, 10));
 165
 166                 // The second chunk should only have completed if we didn't close the channel yet
 167                 if(i % 2) {
 168                         assert(!check_sync_flag(&in_infos[i].aio_infos[1].flag));
 169                 } else {
 170                         assert(wait_sync_flag(&in_infos[i].aio_infos[1].flag, 10));
 171                 }
 172
 173                 if(i < 2) {
 174                         assert(wait_sync_flag(&out_infos[i].aio_infos[1].flag, 10));
 175                 } else {
 176                         assert(!check_sync_flag(&out_infos[i].aio_infos[1].flag));
 177                 }
 178
 179         }
 180
 181         // Check that everything is correct.
 182
 183         assert(!memcmp(in_infos[0].data, out_infos[0].data, size));
 184         assert(!memcmp(in_infos[1].data, out_infos[1].data, size / 4));
 185         assert(memcmp(in_infos[1].data, out_infos[1].data + size / 4, size - size / 4));
 186         assert(!memcmp(in_infos[2].data, out_infos[2].data, size / 3));
 187         assert(memcmp(in_infos[2].data, out_infos[2].data + size / 3, size - size / 3));
 188         assert(!memcmp(in_infos[3].data, out_infos[3].data, size / 4));
 189         assert(memcmp(in_infos[3].data, out_infos[3].data + size / 4, size / 3 - size / 4));
 190         assert(memcmp(in_infos[3].data, out_infos[3].data + size / 3, size - size / 3));
 191
 192         // Clean up.
 193
 194         close_meshlink_pair(mesh_a, mesh_b);
 195
 196         free(outdata);
 197
 198         for(size_t i = 0; i < nchannels; i++) {
 199                 free(in_infos[i].data);
 200         }
 201 }