git.meshlink.io Git - meshlink/blob - test/blackbox/test_cases_submesh02/node_sim_app2node2.c

   1 /*
   2     node_sim_peer.c -- Implementation of Node Simulation for Meshlink Testing
   3                     for meta connection test case 01 - re-connection of
   4                     two nodes when relay node goes down
   5     Copyright (C) 2018  Guus Sliepen <guus@meshlink.io>
   6
   7     This program is free software; you can redistribute it and/or modify
   8     it under the terms of the GNU General Public License as published by
   9     the Free Software Foundation; either version 2 of the License, or
  10     (at your option) any later version.
  11
  12     This program is distributed in the hope that it will be useful,
  13     but WITHOUT ANY WARRANTY; without even the implied warranty of
  14     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15     GNU General Public License for more details.
  16
  17     You should have received a copy of the GNU General Public License along
  18     with this program; if not, write to the Free Software Foundation, Inc.,
  19     51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  20 */
  21 #include <stdio.h>
  22 #include <stdlib.h>
  23 #include <string.h>
  24 #include <pthread.h>
  25 #include <assert.h>
  26 #include <signal.h>
  27 #include <time.h>
  28 #include "../common/common_handlers.h"
  29 #include "../common/test_step.h"
  30 #include "../common/mesh_event_handler.h"
  31 #include "../../utils.h"
  32
  33 #define CMD_LINE_ARG_NODENAME   1
  34 #define CMD_LINE_ARG_DEVCLASS   2
  35 #define CMD_LINE_ARG_CLIENTID   3
  36 #define CMD_LINE_ARG_IMPORTSTR  4
  37 #define CMD_LINE_ARG_INVITEURL  5
  38 #define CHANNEL_PORT 1234
  39
  40 static void channel_receive_cb(meshlink_handle_t *mesh, meshlink_channel_t *channel, const void *dat, size_t len);
  41 static bool channel_accept(meshlink_handle_t *mesh, meshlink_channel_t *channel, uint16_t port, const void *dat, size_t len);
  42
  43 static int client_id = -1;
  44 static meshlink_handle_t *mesh = NULL;
  45
  46 static struct sync_flag peer_reachable = {.mutex  = PTHREAD_MUTEX_INITIALIZER, .cond = PTHREAD_COND_INITIALIZER, .flag = false};
  47 static struct sync_flag start_test = {.mutex  = PTHREAD_MUTEX_INITIALIZER, .cond = PTHREAD_COND_INITIALIZER, .flag = false};
  48 static struct sync_flag app_reachable = {.mutex  = PTHREAD_MUTEX_INITIALIZER, .cond = PTHREAD_COND_INITIALIZER, .flag = false};
  49 static struct sync_flag channel_opened = {.mutex  = PTHREAD_MUTEX_INITIALIZER, .cond = PTHREAD_COND_INITIALIZER, .flag = false};
  50 static struct sync_flag channel_data_recieved = {.mutex  = PTHREAD_MUTEX_INITIALIZER, .cond = PTHREAD_COND_INITIALIZER, .flag = false};
  51
  52 static void send_event(mesh_event_t event) {
  53         int attempts;
  54
  55         for(attempts = 0; attempts < 5; attempts += 1) {
  56                 if(mesh_event_sock_send(client_id, event, NULL, 0)) {
  57                         break;
  58                 }
  59         }
  60
  61         assert(attempts < 5);
  62
  63         return;
  64 }
  65
  66 static bool channel_accept(meshlink_handle_t *mesh, meshlink_channel_t *channel, uint16_t port, const void *dat, size_t len) {
  67         (void)dat;
  68         (void)len;
  69
  70         assert(port == CHANNEL_PORT);
  71
  72         fprintf(stderr, "\tapp2node2 got channel request from %s\n", channel->node->name);
  73
  74         if(!strcmp(channel->node->name, "corenode1")) {
  75                 meshlink_set_channel_receive_cb(mesh, channel, channel_receive_cb);
  76                 mesh->priv = channel;
  77
  78                 return true;
  79         }
  80
  81         return false;
  82 }
  83
  84 /* channel receive callback */
  85 static void channel_receive_cb(meshlink_handle_t *mesh, meshlink_channel_t *channel, const void *dat, size_t len) {
  86         char data[100] = {0};
  87
  88         if(len == 0) {
  89                 fprintf(stderr, "\tapp2node2 got error from %s at %lu\n", channel->node->name, time(NULL));
  90                 send_event(ERR_NETWORK);
  91                 return;
  92         }
  93
  94         memcpy(data, dat, len);
  95
  96         fprintf(stderr, "\tapp2node2 got message from %s as %s\n", channel->node->name, data);
  97
  98         if(!strcmp(channel->node->name, "corenode1")) {
  99                 if(!memcmp(dat, "Channel Message", len)) {
 100                         set_sync_flag(&channel_data_recieved, true);
 101                 } else if(!memcmp(dat, "failure", 7)) {
 102                         assert(false);
 103                 }
 104         } else if(!strcmp(channel->node->name, "app2node1")) {
 105                 if(!memcmp(dat, "Channel Message", len)) {
 106                         set_sync_flag(&channel_data_recieved, true);
 107                 } else if(!memcmp(dat, "failure", 7)) {
 108                         assert(false);
 109                 }
 110         } else {
 111                 assert(false);
 112         }
 113
 114         return;
 115 }
 116
 117 static void poll_cb(meshlink_handle_t *mesh, meshlink_channel_t *channel, size_t len) {
 118         char *message = "Channel Message";
 119         char *node = (char *)channel->node->name;
 120         (void)len;
 121         meshlink_set_channel_poll_cb(mesh, channel, NULL);
 122         fprintf(stderr, "\tapp2node2's Channel request has been accepted by %s at : %lu\n", node, time(NULL));
 123         set_sync_flag(&channel_opened, true);
 124         assert(meshlink_channel_send(mesh, channel, message, strlen(message)) >= 0);
 125         return;
 126 }
 127
 128
 129 static void node_status_cb(meshlink_handle_t *mesh, meshlink_node_t *node,
 130                            bool reachable) {
 131         if(!strcasecmp(node->name, "corenode1")) {
 132                 if(reachable) {
 133                         fprintf(stderr, "\tNode corenode1 became reachable\n");
 134                         set_sync_flag(&peer_reachable, true);
 135                 }
 136         } else if(!strcasecmp(node->name, "app2node1")) {
 137                 if(reachable) {
 138                         fprintf(stderr, "\tNode app2node1 became reachable\n");
 139                         set_sync_flag(&app_reachable, true);
 140                 }
 141         }
 142
 143         return;
 144 }
 145
 146 void mesh_start_test_handler(int a) {
 147         fprintf(stderr, "Starting test in app2node2\n");
 148         set_sync_flag(&start_test, true);
 149 }
 150
 151 int main(int argc, char *argv[]) {
 152         size_t num_nodes, i;
 153         struct timeval main_loop_wait = { 2, 0 };
 154         meshlink_channel_t *channel = NULL;
 155         meshlink_node_t *core_node = NULL;
 156         meshlink_node_t **node_handles = NULL;
 157
 158         fprintf(stderr, "\tMesh node 'app2node2' starting up........\n");
 159
 160         // Import mesh event handler
 161
 162         if((argv[CMD_LINE_ARG_CLIENTID]) && (argv[CMD_LINE_ARG_IMPORTSTR])) {
 163                 client_id = atoi(argv[CMD_LINE_ARG_CLIENTID]);
 164                 mesh_event_sock_connect(argv[CMD_LINE_ARG_IMPORTSTR]);
 165         }
 166
 167         // Setup required signals
 168
 169         setup_signals();
 170         signal(SIGIO, mesh_start_test_handler);
 171
 172         // Run peer node instance
 173
 174         mesh = meshlink_open("app2node2conf", argv[CMD_LINE_ARG_NODENAME],
 175                              "test_channel_conn", atoi(argv[CMD_LINE_ARG_DEVCLASS]));
 176         assert(mesh);
 177         meshlink_set_log_cb(mesh, MESHLINK_DEBUG, meshlink_callback_logger);
 178         meshlink_set_channel_accept_cb(mesh, channel_accept);
 179         meshlink_set_node_status_cb(mesh, node_status_cb);
 180
 181         if(argv[CMD_LINE_ARG_INVITEURL]) {
 182                 assert(meshlink_join(mesh, argv[CMD_LINE_ARG_INVITEURL]));
 183         }
 184
 185         assert(meshlink_start(mesh));
 186
 187         send_event(NODE_STARTED);
 188
 189         // Wait for peer node to join
 190
 191         assert(wait_sync_flag(&peer_reachable, 15));
 192         send_event(NODE_JOINED);
 193
 194         while(false == wait_sync_flag(&start_test, 10));
 195
 196         // Open a channel to peer node
 197         core_node = meshlink_get_node(mesh, "corenode1");
 198         assert(core_node);
 199         fprintf(stderr, "\tapp2node2 Sending Channel request to corenode1 at : %lu\n", time(NULL));
 200         channel = meshlink_channel_open(mesh, core_node, CHANNEL_PORT,
 201                                         channel_receive_cb, NULL, 0);
 202         meshlink_set_channel_poll_cb(mesh, channel, poll_cb);
 203         assert(wait_sync_flag(&channel_opened, 30));
 204         send_event(CHANNEL_OPENED);
 205
 206         assert(wait_sync_flag(&channel_data_recieved, 30));
 207         send_event(CHANNEL_DATA_RECIEVED);
 208
 209         // Open a channel to peer node
 210         channel_opened.flag = false;
 211         channel_data_recieved.flag = false;
 212
 213         assert(wait_sync_flag(&app_reachable, 60));
 214
 215         core_node = meshlink_get_node(mesh, "app2node1");
 216         assert(core_node);
 217         fprintf(stderr, "\tapp2node2 Sending Channel request to app2node1 at : %lu\n", time(NULL));
 218         channel = meshlink_channel_open(mesh, core_node, CHANNEL_PORT,
 219                                         channel_receive_cb, NULL, 0);
 220         meshlink_set_channel_poll_cb(mesh, channel, poll_cb);
 221         assert(wait_sync_flag(&channel_opened, 15));
 222         send_event(CHANNEL_OPENED);
 223
 224         assert(wait_sync_flag(&channel_data_recieved, 30));
 225         send_event(CHANNEL_DATA_RECIEVED);
 226
 227         num_nodes = 0;
 228         node_handles = meshlink_get_all_nodes(mesh, NULL, &num_nodes);
 229         fprintf(stderr, "\tGot %d nodes in list with error : %s\n", num_nodes, meshlink_strerror(meshlink_errno));
 230         assert(node_handles);
 231         assert((num_nodes == 4));
 232
 233         for(i = 0; i < num_nodes; i++) {
 234                 fprintf(stderr, "\tChecking the node : %s\n", node_handles[i]->name);
 235
 236                 if(0 == strcmp(node_handles[i]->name, "app1node1")) {
 237                         send_event(SIG_ABORT);
 238                         assert(false);
 239                 } else if(0 == strcmp(node_handles[i]->name, "app1node2")) {
 240                         send_event(SIG_ABORT);
 241                         assert(false);
 242                 }
 243         }
 244
 245         meshlink_node_t *node = meshlink_get_self(mesh);
 246         assert(node);
 247         meshlink_submesh_t *submesh = meshlink_get_node_submesh(mesh, node);
 248         assert(submesh);
 249
 250         node_handles = meshlink_get_all_nodes_by_submesh(mesh, submesh, node_handles, &num_nodes);
 251         assert(node_handles);
 252         assert((num_nodes == 2));
 253
 254         for(i = 0; i < num_nodes; i++) {
 255                 fprintf(stderr, "\tChecking the node : %s\n", node_handles[i]->name);
 256
 257                 if((0 == strcmp(node_handles[i]->name, "app1node1")) || (0 == strcmp(node_handles[i]->name, "app1node2"))) {
 258                         send_event(SIG_ABORT);
 259                         assert(false);
 260                 }
 261         }
 262
 263         send_event(MESH_EVENT_COMPLETED);
 264
 265         // All test steps executed - wait for signals to stop/start or close the mesh
 266
 267         while(test_running) {
 268                 select(1, NULL, NULL, NULL, &main_loop_wait);
 269         }
 270
 271         meshlink_close(mesh);
 272
 273         return EXIT_SUCCESS;
 274 }