7 #include <linux/limits.h>
9 #include "../src/meshlink.h"
10 #include "../src/devtools.h"
12 #include <sys/types.h>
20 static meshlink_handle_t **mesh;
22 static int nodeindex = 0;
24 static meshlink_node_t **nodes;
27 static void log_message(meshlink_handle_t *mesh, meshlink_log_level_t level, const char *text) {
28 const char *levelstr[] = {
29 [MESHLINK_DEBUG] = "\x1b[34mDEBUG",
30 [MESHLINK_INFO] = "\x1b[32mINFO",
31 [MESHLINK_WARNING] = "\x1b[33mWARNING",
32 [MESHLINK_ERROR] = "\x1b[31mERROR",
33 [MESHLINK_CRITICAL] = "\x1b[31mCRITICAL",
35 fprintf(stderr, "%s\t%s:\x1b[0m %s\n", mesh ? mesh->name : "global",levelstr[level], text);
38 //Test mesh sending data
39 static void testmesh () {
41 for(int nindex = 0; nindex < n; nindex++) {
43 nodes = meshlink_get_all_nodes(mesh[nindex], nodes, &nnodes);
45 fprintf(stderr, "Could not get list of nodes: %s\n", meshlink_strerror(meshlink_errno));
47 printf("%zu known nodes:\n", nnodes);
48 for(int i = 0; i < nnodes; i++) {
49 //printf(" %s\n", nodes[i]->name);
50 if(!meshlink_send(mesh[nindex], nodes[i], "magic", strlen("magic") + 1)) {
51 fprintf(stderr, "Could not send message to '%s': %s\n", nodes[i]->name, meshlink_strerror(meshlink_errno));
59 // Make all nodes know about each other by importing each others public keys and addresses.
60 static void linkmesh() {
61 for(int i = 0; i < n; i++) {
62 char *datai = meshlink_export(mesh[i]);
64 for(int j = i + 1; j < n; j++) {
65 char *dataj = meshlink_export(mesh[j]);
66 meshlink_import(mesh[i], dataj);
67 meshlink_import(mesh[j], datai);
75 static bool exportmeshgraph(const char* path)
78 int psr = stat(path, &ps);
80 if(psr == 0 || errno != ENOENT)
85 { fprintf(stderr, "%s exists already\n", path); }
90 FILE* stream = fopen(path, "w");
98 if(!devtool_export_json_all_edges_state(mesh[0], stream))
101 fprintf(stderr, "could not export graph\n");
110 void exportmeshgraph_timer(int signum)
113 gettimeofday(&ts, NULL);
116 snprintf(name, sizeof(name), "graph_%ld_%03ld.json", ts.tv_sec, ts.tv_usec/1000);
118 exportmeshgraph(name);
121 static bool exportmeshgraph_started = false;
123 static bool exportmeshgraph_end(const char* none)
125 if(!exportmeshgraph_started)
128 struct itimerval zero_timer = { 0 };
129 setitimer (ITIMER_REAL, &zero_timer, NULL);
131 exportmeshgraph_started = false;
136 static bool exportmeshgraph_begin(const char* timeout_str)
141 if(exportmeshgraph_started)
143 if(!exportmeshgraph_end(NULL))
148 int timeout = atoi(timeout_str);
153 int timeout_sec = timeout / 1000;
154 int timeout_msec = timeout % 1000;
156 /* Install timer_handler as the signal handler for SIGALRM. */
157 signal(SIGALRM, exportmeshgraph_timer);
159 /* Configure the timer to expire immediately... */
160 struct itimerval timer;
161 timer.it_value.tv_sec = 0;
162 timer.it_value.tv_usec = 1000;
164 /* ... and every X msec after that. */
165 timer.it_interval.tv_sec = timeout_sec;
166 timer.it_interval.tv_usec = timeout_msec * 1000;
168 /* Start a real timer. */
169 setitimer (ITIMER_REAL, &timer, NULL);
171 exportmeshgraph_started = true;
176 static void parse_command(char *buf) {
177 char *arg = strchr(buf, ' ');
181 if(!strcasecmp(buf, "invite")) {
185 fprintf(stderr, "/invite requires an argument!\n");
189 invitation = meshlink_invite(mesh[nodeindex], arg);
191 fprintf(stderr, "Could not invite '%s': %s\n", arg, meshlink_strerror(meshlink_errno));
195 printf("Invitation for %s: %s\n", arg, invitation);
197 } else if(!strcasecmp(buf, "join")) {
199 fprintf(stderr, "/join requires an argument!\n");
202 meshlink_stop(mesh[nodeindex]);
203 if(!meshlink_join(mesh[nodeindex], arg))
204 fprintf(stderr, "Could not join using invitation: %s\n", meshlink_strerror(meshlink_errno));
206 fprintf(stderr, "Invitation accepted!\n");
207 meshlink_start(mesh[nodeindex]);
209 } else if(!strcasecmp(buf, "kick")) {
211 fprintf(stderr, "/kick requires an argument!\n");
215 meshlink_node_t *node = meshlink_get_node(mesh[nodeindex], arg);
217 fprintf(stderr, "Unknown node '%s'\n", arg);
221 meshlink_blacklist(mesh[nodeindex], node);
223 printf("Node '%s' blacklisted.\n", arg);
224 } else if(!strcasecmp(buf, "who")) {
226 nodes = meshlink_get_all_nodes(mesh[nodeindex], nodes, &nnodes);
228 fprintf(stderr, "Could not get list of nodes: %s\n", meshlink_strerror(meshlink_errno));
230 printf("%zu known nodes:", nnodes);
231 for(int i = 0; i < nnodes; i++)
232 printf(" %s", nodes[i]->name);
236 meshlink_node_t *node = meshlink_get_node(mesh[nodeindex], arg);
238 fprintf(stderr, "Unknown node '%s'\n", arg);
240 printf("Node %s found, pmtu %zd\n", arg, meshlink_get_pmtu(mesh[nodeindex], node));
243 } else if(!strcasecmp(buf, "link")) {
245 } else if(!strcasecmp(buf, "eg")) {
246 exportmeshgraph(arg);
247 } else if(!strcasecmp(buf, "egb")) {
248 exportmeshgraph_begin(arg);
249 } else if(!strcasecmp(buf, "ege")) {
250 exportmeshgraph_end(NULL);
251 } else if(!strcasecmp(buf, "test")) {
253 } else if(!strcasecmp(buf, "select")) {
255 fprintf(stderr, "/select requires an argument!\n");
258 nodeindex = atoi(arg);
259 printf("Index is now %d\n",nodeindex);
260 } else if(!strcasecmp(buf, "stop")) {
261 meshlink_stop(mesh[nodeindex]);
262 } else if(!strcasecmp(buf, "quit")) {
265 } else if(!strcasecmp(buf, "help")) {
267 "<name>: <message> Send a message to the given node.\n"
268 " Subsequent messages don't need the <name>: prefix.\n"
269 "/invite <name> Create an invitation for a new node.\n"
270 "/join <invitation> Join an existing mesh using an invitation.\n"
271 "/kick <name> Blacklist the given node.\n"
272 "/who [<name>] List all nodes or show information about the given node.\n"
273 "/link Link all nodes together.\n"
274 "/eg <path> Export graph as json file.\n"
275 "/test Test functionality sending some data to all nodes\n"
276 "/select <number> Select the active node running the user commands\n"
277 "/stop Call meshlink_stop, use /select first to select which node to stop\n"
278 "/quit Exit this program.\n"
281 fprintf(stderr, "Unknown command '/%s'\n", buf);
285 static void parse_input(char *buf) {
286 static meshlink_node_t *destination;
296 if(len && buf[len - 1] == '\n')
299 if(len && buf[len - 1] == '\r')
302 // Ignore empty lines.
307 // Commands start with '/'
310 return parse_command(buf + 1);
312 // Lines in the form "name: message..." set the destination node.
315 char *colon = strchr(buf, ':');
323 destination = meshlink_get_node(mesh[nodeindex], buf);
325 fprintf(stderr, "Unknown node '%s'\n", buf);
331 fprintf(stderr, "Who are you talking to? Write 'name: message...'\n");
335 if(!meshlink_send(mesh[nodeindex], destination, msg, strlen(msg) + 1)) {
336 fprintf(stderr, "Could not send message to '%s': %s\n", destination->name, meshlink_strerror(meshlink_errno));
340 printf("Message sent to '%s'.\n", destination->name);
343 int main(int argc, char *argv[]) {
344 const char *basebase = ".manynodes";
345 const char *namesprefix = "machine1";
346 const char *graphexporttimeout = NULL;
353 fprintf(stderr, "Usage: %s [number of local nodes] [confbase] [prefixnodenames] [graphexport timeout]\n", argv[0]);
361 namesprefix = argv[3];
364 graphexporttimeout = argv[4];
366 mesh = calloc(n, sizeof *mesh);
368 meshlink_set_log_cb(NULL, MESHLINK_DEBUG, log_message);
369 mkdir(basebase, 0750);
371 char filename[PATH_MAX];
373 for(int i = 0; i < n; i++) {
374 snprintf(nodename, sizeof nodename, "%snode%d", namesprefix,i);
375 snprintf(filename, sizeof filename, "%s/%s", basebase, nodename);
376 bool itsnew = access(filename, R_OK);
378 mesh[i] = meshlink_open(filename, nodename, "manynodes", DEV_CLASS_BACKBONE);
381 mesh[i] = meshlink_open(filename, nodename, "manynodes", DEV_CLASS_PORTABLE);
383 meshlink_set_log_cb(mesh[i], MESHLINK_DEBUG, log_message);
385 fprintf(stderr, "errno is: %d\n", meshlink_errno);
386 fprintf(stderr, "Could not open %s: %s\n", filename, meshlink_strerror(meshlink_errno));
393 for(int i = 0; i < n; i++) {
394 if(!meshlink_start(mesh[i]))
395 fprintf(stderr, "Could not start node %d: %s\n", i, meshlink_strerror(meshlink_errno));
401 fprintf(stderr, "Could not start any node!\n");
405 if(graphexporttimeout)
406 { exportmeshgraph_begin(graphexporttimeout); }
408 printf("%d nodes started.\nType /help for a list of commands.\n", started);
411 while(fgets(buf, sizeof buf, stdin))
414 exportmeshgraph_end(NULL);
416 printf("Nodes stopping.\n");
418 for(int i = 0; i < n; i++)
419 meshlink_close(mesh[i]);