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

   1 #define _GNU_SOURCE 1
   2 #include <stdio.h>
   3 #include <unistd.h>
   4 #include <stdlib.h>
   5 #include <string.h>
   6 #include <assert.h>
   7 #include <sys/types.h>
   8 #include <sys/wait.h>
   9 #include <errno.h>
  10
  11 #ifdef __linux__
  12 #include <sys/prctl.h>
  13 #endif
  14
  15 #include "utils.h"
  16 #include "../src/meshlink.h"
  17
  18 static struct sync_flag bar_responded;
  19 static struct sync_flag foo_gone;
  20
  21 static void foo_receive_cb(meshlink_handle_t *mesh, meshlink_channel_t *channel, const void *data, size_t len) {
  22         (void)mesh;
  23         (void)channel;
  24         (void)len;
  25
  26         if(len == 5 && !memcmp(data, "Hello", 5)) {
  27                 set_sync_flag(&bar_responded, true);
  28         }
  29 }
  30
  31 static void bar_status_cb(meshlink_handle_t *mesh, meshlink_node_t *node, bool reachable) {
  32         (void)mesh;
  33
  34         if(!strcmp(node->name, "foo") && !reachable) {
  35                 set_sync_flag(&foo_gone, true);
  36         }
  37 }
  38
  39 static void bar_receive_cb(meshlink_handle_t *mesh, meshlink_channel_t *channel, const void *data, size_t len) {
  40         // Echo the data back.
  41         if(len) {
  42                 meshlink_channel_send(mesh, channel, data, len);
  43         } else {
  44                 meshlink_channel_close(mesh, channel);
  45         }
  46 }
  47
  48 static bool reject_cb(meshlink_handle_t *mesh, meshlink_channel_t *channel, uint16_t port, const void *data, size_t len) {
  49         (void)mesh;
  50         (void)channel;
  51         (void)port;
  52         (void)data;
  53         (void)len;
  54
  55         return false;
  56 }
  57
  58 static bool accept_cb(meshlink_handle_t *mesh, meshlink_channel_t *channel, uint16_t port, const void *data, size_t len) {
  59         if(port != 7) {
  60                 return false;
  61         }
  62
  63         meshlink_set_node_status_cb(mesh, bar_status_cb);
  64         meshlink_set_channel_receive_cb(mesh, channel, bar_receive_cb);
  65
  66         if(data) {
  67                 bar_receive_cb(mesh, channel, data, len);
  68         }
  69
  70         return true;
  71 }
  72
  73 static void poll_cb(meshlink_handle_t *mesh, meshlink_channel_t *channel, size_t len) {
  74         (void)len;
  75
  76         meshlink_set_channel_poll_cb(mesh, channel, NULL);
  77
  78         if(meshlink_channel_send(mesh, channel, "Hello", 5) != 5) {
  79                 fprintf(stderr, "Could not send whole message\n");
  80         }
  81 }
  82
  83 static int main1(int rfd, int wfd) {
  84         meshlink_set_log_cb(NULL, MESHLINK_DEBUG, log_cb);
  85
  86         assert(meshlink_destroy("channels_fork_conf.1"));
  87         meshlink_handle_t *mesh = meshlink_open("channels_fork_conf.1", "foo", "channels", DEV_CLASS_BACKBONE);
  88         assert(mesh);
  89
  90         meshlink_enable_discovery(mesh, false);
  91
  92         meshlink_add_address(mesh, "localhost");
  93
  94         char *data = meshlink_export(mesh);
  95         assert(data);
  96
  97         ssize_t len = strlen(data);
  98         assert(write(wfd, &len, sizeof(len)) == sizeof(len));
  99         assert(write(wfd, data, len) == len);
 100         free(data);
 101
 102         assert(read(rfd, &len, sizeof(len)) == sizeof(len));
 103         char indata[len + 1];
 104         assert(read(rfd, indata, len) == len);
 105         indata[len] = 0;
 106
 107         assert(meshlink_import(mesh, indata));
 108
 109         meshlink_set_channel_accept_cb(mesh, reject_cb);
 110
 111         assert(meshlink_start(mesh));
 112
 113         // Open a channel from foo to bar.
 114
 115         meshlink_node_t *bar = meshlink_get_node(mesh, "bar");
 116         assert(bar);
 117
 118         meshlink_channel_t *channel = meshlink_channel_open(mesh, bar, 7, foo_receive_cb, NULL, 0);
 119         assert(channel);
 120
 121         meshlink_set_channel_poll_cb(mesh, channel, poll_cb);
 122
 123         assert(wait_sync_flag(&bar_responded, 20));
 124
 125         meshlink_channel_close(mesh, channel);
 126
 127         // Clean up.
 128
 129         meshlink_close(mesh);
 130
 131         return 0;
 132 }
 133
 134
 135 static int main2(int rfd, int wfd) {
 136 #ifdef __linux__
 137         prctl(PR_SET_PDEATHSIG, SIGTERM);
 138 #endif
 139
 140         meshlink_set_log_cb(NULL, MESHLINK_DEBUG, log_cb);
 141
 142         assert(meshlink_destroy("channels_fork_conf.2"));
 143         meshlink_handle_t *mesh = meshlink_open("channels_fork_conf.2", "bar", "channels", DEV_CLASS_BACKBONE);
 144         assert(mesh);
 145
 146         meshlink_enable_discovery(mesh, false);
 147
 148         meshlink_add_address(mesh, "localhost");
 149
 150         char *data = meshlink_export(mesh);
 151         assert(data);
 152
 153         ssize_t len = strlen(data);
 154         assert(write(wfd, &len, sizeof(len)) == sizeof(len));
 155         assert(write(wfd, data, len) == len);
 156         free(data);
 157
 158         assert(read(rfd, &len, sizeof(len)) == sizeof(len));
 159         char indata[len + 1];
 160         assert(read(rfd, indata, len) == len);
 161         indata[len] = 0;
 162
 163         assert(meshlink_import(mesh, indata));
 164
 165         meshlink_set_channel_accept_cb(mesh, accept_cb);
 166
 167         assert(meshlink_start(mesh));
 168
 169         assert(wait_sync_flag(&foo_gone, 20));
 170
 171         meshlink_close(mesh);
 172
 173         return 0;
 174 }
 175
 176 static void alarm_handler(int sig) {
 177         (void)sig;
 178         assert(0);
 179 }
 180
 181 int main() {
 182         int fda[2], fdb[2];
 183
 184         assert(pipe2(fda, 0) != -1);
 185         assert(pipe2(fdb, 0) != -1);
 186
 187         if(!fork()) {
 188                 return main2(fdb[0], fda[1]);
 189         }
 190
 191         signal(SIGALRM, alarm_handler);
 192         alarm(30);
 193         assert(main1(fda[0], fdb[1]) == 0);
 194
 195         int wstatus;
 196         assert(wait(&wstatus) != -1 || errno == ECHILD);
 197         assert(WIFEXITED(wstatus));
 198         assert(WEXITSTATUS(wstatus) == 0);
 199 }