6 #include "../src/meshlink.h"
7 #include "../src/devtools.h"
11 static void log_message(meshlink_handle_t *mesh, meshlink_log_level_t level, const char *text) {
14 static const char *levelstr[] = {
15 [MESHLINK_DEBUG] = "\x1b[34mDEBUG",
16 [MESHLINK_INFO] = "\x1b[32mINFO",
17 [MESHLINK_WARNING] = "\x1b[33mWARNING",
18 [MESHLINK_ERROR] = "\x1b[31mERROR",
19 [MESHLINK_CRITICAL] = "\x1b[31mCRITICAL",
21 fprintf(stderr, "%s:\x1b[0m %s\n", levelstr[level], text);
24 static void channel_receive(meshlink_handle_t *mesh, meshlink_channel_t *channel, const void *data, size_t len) {
27 fprintf(stderr, "Error while reading data from %s: %s\n", channel->node->name, meshlink_strerror(meshlink_errno));
29 fprintf(stderr, "Chat connection closed by %s\n", channel->node->name);
32 channel->node->priv = NULL;
33 meshlink_channel_close(mesh, channel);
37 // TODO: we now have TCP semantics, don't expect exactly one message per receive call.
39 fprintf(stderr, "%s says: ", channel->node->name);
40 fwrite(data, len, 1, stderr);
44 static bool channel_accept(meshlink_handle_t *mesh, meshlink_channel_t *channel, uint16_t port, const void *data, size_t len) {
48 // Only accept connections to the chat port
49 if(port != CHAT_PORT) {
50 fprintf(stderr, "Rejected incoming channel from '%s' to port %u\n", channel->node->name, port);
54 fprintf(stderr, "Accepted incoming channel from '%s'\n", channel->node->name);
56 // Remember the channel
57 channel->node->priv = channel;
59 // Set the receive callback
60 meshlink_set_channel_receive_cb(mesh, channel, channel_receive);
62 // Accept this channel
66 static void channel_poll(meshlink_handle_t *mesh, meshlink_channel_t *channel, size_t len) {
69 fprintf(stderr, "Channel to '%s' connected\n", channel->node->name);
70 meshlink_set_channel_poll_cb(mesh, channel, NULL);
73 static void node_status(meshlink_handle_t *mesh, meshlink_node_t *node, bool reachable) {
77 fprintf(stderr, "%s joined.\n", node->name);
79 fprintf(stderr, "%s left.\n", node->name);
83 static void parse_command(meshlink_handle_t *mesh, char *buf) {
84 char *arg = strchr(buf, ' ');
90 arg1 = strchr(arg, ' ');
98 if(!strcasecmp(buf, "invite")) {
100 fprintf(stderr, "/invite requires an argument!\n");
104 meshlink_submesh_t *s = NULL;
108 meshlink_submesh_t **submeshes = devtool_get_all_submeshes(mesh, NULL, &nmemb);
110 if(!submeshes || !nmemb) {
111 fprintf(stderr, "Group does not exist!\n");
115 for(size_t i = 0; i < nmemb; i++) {
116 if(!strcmp(arg1, submeshes[i]->name)) {
125 fprintf(stderr, "Group is not yet created!\n");
130 char *invitation = meshlink_invite(mesh, s, arg);
133 fprintf(stderr, "Could not invite '%s': %s\n", arg, meshlink_strerror(meshlink_errno));
137 fprintf(stderr, "Invitation for %s: %s\n", arg, invitation);
139 } else if(!strcasecmp(buf, "canonical")) {
141 char *host = NULL, *port = NULL;
144 fprintf(stderr, "/canonical requires an argument!\n");
148 if((0 == strncasecmp(arg, "-h", 2)) && (strlen(arg) > 2)) {
150 } else if((0 == strncasecmp(arg, "-p", 2)) && (strlen(arg) > 2)) {
153 fprintf(stderr, "Unknown argument: %s!\n", arg);
158 if((0 == strncasecmp(arg1, "-h", 2)) && (strlen(arg1) > 2)) {
160 } else if((0 == strncasecmp(arg1, "-p", 2)) && (strlen(arg1) > 2)) {
163 fprintf(stderr, "Unknown argument: %s!\n", arg1);
169 fprintf(stderr, "Unable to set Canonical address because no valid arguments are found!\n");
173 set = meshlink_set_canonical_address(mesh, meshlink_get_self(mesh), host, port);
176 fprintf(stderr, "Could not set canonical address '%s:%s': %s\n", host, port, meshlink_strerror(meshlink_errno));
180 fprintf(stderr, "Canonical address set as '%s:%s'\n", host, port);
181 } else if(!strcasecmp(buf, "group")) {
183 fprintf(stderr, "/group requires an argument!\n");
187 meshlink_submesh_t *s = meshlink_submesh_open(mesh, arg);
190 fprintf(stderr, "Could not create group: %s\n", meshlink_strerror(meshlink_errno));
192 fprintf(stderr, "Group '%s' created!\n", s->name);
194 } else if(!strcasecmp(buf, "join")) {
196 fprintf(stderr, "/join requires an argument!\n");
202 if(!meshlink_join(mesh, arg)) {
203 fprintf(stderr, "Could not join using invitation: %s\n", meshlink_strerror(meshlink_errno));
205 fprintf(stderr, "Invitation accepted!\n");
208 if(!meshlink_start(mesh)) {
209 fprintf(stderr, "Could not restart MeshLink: %s\n", meshlink_strerror(meshlink_errno));
212 } else if(!strcasecmp(buf, "kick")) {
214 fprintf(stderr, "/kick requires an argument!\n");
218 meshlink_node_t *node = meshlink_get_node(mesh, arg);
221 fprintf(stderr, "Error looking up '%s': %s\n", arg, meshlink_strerror(meshlink_errno));
225 if(!meshlink_blacklist(mesh, node)) {
226 fprintf(stderr, "Error blacklising '%s': %s", arg, meshlink_strerror(meshlink_errno));
230 fprintf(stderr, "Node '%s' blacklisted.\n", arg);
231 } else if(!strcasecmp(buf, "whitelist")) {
233 fprintf(stderr, "/whitelist requires an argument!\n");
237 meshlink_node_t *node = meshlink_get_node(mesh, arg);
240 fprintf(stderr, "Error looking up '%s': %s\n", arg, meshlink_strerror(meshlink_errno));
244 if(!meshlink_whitelist(mesh, node)) {
245 fprintf(stderr, "Error whitelising '%s': %s", arg, meshlink_strerror(meshlink_errno));
249 fprintf(stderr, "Node '%s' whitelisted.\n", arg);
250 } else if(!strcasecmp(buf, "who")) {
251 meshlink_submesh_t *node_group = NULL;
255 meshlink_node_t **nodes = meshlink_get_all_nodes(mesh, NULL, &nnodes);
258 fprintf(stderr, "Could not get list of nodes: %s\n", meshlink_strerror(meshlink_errno));
262 fprintf(stderr, "%lu known nodes:\n", (unsigned long)nnodes);
264 for(size_t i = 0; i < nnodes; i++) {
265 fprintf(stderr, " %lu. %s", (unsigned long)i, nodes[i]->name);
267 if((node_group = meshlink_get_node_submesh(mesh, nodes[i]))) {
268 fprintf(stderr, "\t%s", node_group->name);
271 fprintf(stderr, "\n");
274 fprintf(stderr, "\n");
278 meshlink_node_t *node = meshlink_get_node(mesh, arg);
281 fprintf(stderr, "Error looking up '%s': %s\n", arg, meshlink_strerror(meshlink_errno));
283 fprintf(stderr, "Node %s found", arg);
285 if((node_group = meshlink_get_node_submesh(mesh, node))) {
286 fprintf(stderr, " in group %s", node_group->name);
289 fprintf(stderr, "\n");
292 } else if(!strcasecmp(buf, "listgroup")) {
294 fprintf(stderr, "/listgroup requires an argument!\n");
299 meshlink_submesh_t **submeshes = devtool_get_all_submeshes(mesh, NULL, &nmemb);
301 if(!submeshes || !nmemb) {
302 fprintf(stderr, "Group does not exist!\n");
306 meshlink_submesh_t *s = NULL;
308 for(size_t i = 0; i < nmemb; i++) {
309 if(!strcmp(arg, submeshes[i]->name)) {
318 fprintf(stderr, "Group %s does not exist!\n", arg);
323 meshlink_node_t **nodes = meshlink_get_all_nodes_by_submesh(mesh, s, NULL, &nnodes);
325 if(!nodes || !nnodes) {
326 fprintf(stderr, "Group %s does not contain any nodes!\n", arg);
330 fprintf(stderr, "%zu known nodes in group %s:", nnodes, arg);
332 for(size_t i = 0; i < nnodes; i++) {
333 fprintf(stderr, " %s", nodes[i]->name);
336 fprintf(stderr, "\n");
339 } else if(!strcasecmp(buf, "quit")) {
340 fprintf(stderr, "Bye!\n");
342 } else if(!strcasecmp(buf, "help")) {
344 "<name>: <message> Send a message to the given node.\n"
345 " Subsequent messages don't need the <name>: prefix.\n"
346 "/group <name> Create a new group"
347 "/invite <name> [submesh] Create an invitation for a new node.\n"
348 " Node joins either coremesh or submesh depending on submesh parameter.\n"
349 "/join <invitation> Join an existing mesh using an invitation.\n"
350 "/kick <name> Blacklist the given node.\n"
351 "/who [<name>] List all nodes or show information about the given node.\n"
352 "/listgroup <name> List all nodes in a given group.\n"
353 "/canonical -h<hostname> -p<port> Set Canonical address to be present in invitation.\n"
354 " Any one of two options an be specified. At least one option must be present\n"
355 "/quit Exit this program.\n"
358 fprintf(stderr, "Unknown command '/%s'\n", buf);
362 static void parse_input(meshlink_handle_t *mesh, char *buf) {
363 static meshlink_node_t *destination;
374 if(len && buf[len - 1] == '\n') {
378 if(len && buf[len - 1] == '\r') {
382 // Ignore empty lines.
388 // Commands start with '/'
391 parse_command(mesh, buf + 1);
395 // Lines in the form "name: message..." set the destination node.
398 char *colon = strchr(buf, ':');
408 destination = meshlink_get_node(mesh, buf);
411 fprintf(stderr, "Error looking up '%s': %s\n", buf, meshlink_strerror(meshlink_errno));
417 fprintf(stderr, "Who are you talking to? Write 'name: message...'\n");
421 // We want to have one channel per node.
422 // We keep the pointer to the meshlink_channel_t in the priv field of that node.
423 meshlink_channel_t *channel = destination->priv;
426 fprintf(stderr, "Opening chat channel to '%s'\n", destination->name);
427 channel = meshlink_channel_open(mesh, destination, CHAT_PORT, channel_receive, NULL, 0);
430 fprintf(stderr, "Could not create channel to '%s': %s\n", destination->name, meshlink_strerror(meshlink_errno));
434 destination->priv = channel;
435 meshlink_set_channel_poll_cb(mesh, channel, channel_poll);
438 if(!meshlink_channel_send(mesh, channel, msg, strlen(msg))) {
439 fprintf(stderr, "Could not send message to '%s': %s\n", destination->name, meshlink_strerror(meshlink_errno));
443 fprintf(stderr, "Message sent to '%s'.\n", destination->name);
446 int main(int argc, char *argv[]) {
447 const char *confbase = ".chat";
448 const char *nick = NULL;
459 meshlink_set_log_cb(NULL, MESHLINK_DEBUG, log_message);
461 meshlink_handle_t *mesh = meshlink_open(confbase, nick, "chat", DEV_CLASS_STATIONARY);
464 fprintf(stderr, "Could not open MeshLink: %s\n", meshlink_strerror(meshlink_errno));
468 meshlink_set_node_status_cb(mesh, node_status);
469 meshlink_set_log_cb(mesh, MESHLINK_INFO, log_message);
471 // Set the channel accept callback. This implicitly turns on channels for all nodes.
472 // This replaces the call to meshlink_set_receive_cb().
473 meshlink_set_channel_accept_cb(mesh, channel_accept);
475 if(!meshlink_start(mesh)) {
476 fprintf(stderr, "Could not start MeshLink: %s\n", meshlink_strerror(meshlink_errno));
480 fprintf(stderr, "Chat started.\nType /help for a list of commands.\n");
482 while(fgets(buf, sizeof(buf), stdin)) {
483 parse_input(mesh, buf);
486 fprintf(stderr, "Chat stopping.\n");
489 meshlink_close(mesh);