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 meshlink_node_t **nodes;
86 static void parse_command(meshlink_handle_t *mesh, char *buf) {
87 char *arg = strchr(buf, ' ');
89 meshlink_submesh_t *s = NULL;
90 static meshlink_submesh_t **submesh = NULL;
91 static size_t nmemb = 0;
97 arg1 = strchr(arg, ' ');
105 if(!strcasecmp(buf, "invite")) {
109 fprintf(stderr, "/invite requires an argument!\n");
115 submesh = devtool_get_all_submeshes(mesh, submesh, &nmemb);
117 if(!submesh || !nmemb) {
118 fprintf(stderr, "Group does not exist!\n");
122 for(i = 0; i < nmemb; i++) {
123 if(!strcmp(arg1, submesh[i]->name)) {
132 fprintf(stderr, "Group is not yet created!\n");
137 invitation = meshlink_invite(mesh, s, arg);
140 fprintf(stderr, "Could not invite '%s': %s\n", arg, meshlink_strerror(meshlink_errno));
144 fprintf(stderr, "Invitation for %s: %s\n", arg, invitation);
146 } else if(!strcasecmp(buf, "canonical")) {
148 char *host = NULL, *port = NULL;
151 fprintf(stderr, "/canonical requires an argument!\n");
155 if((0 == strncasecmp(arg, "-h", 2)) && (strlen(arg) > 2)) {
157 } else if((0 == strncasecmp(arg, "-p", 2)) && (strlen(arg) > 2)) {
160 fprintf(stderr, "Unknown argument: %s!\n", arg);
165 if((0 == strncasecmp(arg1, "-h", 2)) && (strlen(arg1) > 2)) {
167 } else if((0 == strncasecmp(arg1, "-p", 2)) && (strlen(arg1) > 2)) {
170 fprintf(stderr, "Unknown argument: %s!\n", arg1);
176 fprintf(stderr, "Unable to set Canonical address because no valid arguments are found!\n");
180 set = meshlink_set_canonical_address(mesh, meshlink_get_self(mesh), host, port);
183 fprintf(stderr, "Could not set canonical address '%s:%s': %s\n", host, port, meshlink_strerror(meshlink_errno));
187 fprintf(stderr, "Canonical address set as '%s:%s'\n", host, port);
188 } else if(!strcasecmp(buf, "group")) {
190 fprintf(stderr, "/group requires an argument!\n");
194 if(!(s = meshlink_submesh_open(mesh, arg))) {
195 fprintf(stderr, "Could not create group: %s\n", meshlink_strerror(meshlink_errno));
197 fprintf(stderr, "Group '%s' created!\n", s->name);
199 } else if(!strcasecmp(buf, "join")) {
201 fprintf(stderr, "/join requires an argument!\n");
207 if(!meshlink_join(mesh, arg)) {
208 fprintf(stderr, "Could not join using invitation: %s\n", meshlink_strerror(meshlink_errno));
210 fprintf(stderr, "Invitation accepted!\n");
213 if(!meshlink_start(mesh)) {
214 fprintf(stderr, "Could not restart MeshLink: %s\n", meshlink_strerror(meshlink_errno));
217 } else if(!strcasecmp(buf, "kick")) {
219 fprintf(stderr, "/kick requires an argument!\n");
223 meshlink_node_t *node = meshlink_get_node(mesh, arg);
226 fprintf(stderr, "Error looking up '%s': %s\n", arg, meshlink_strerror(meshlink_errno));
230 if(!meshlink_blacklist(mesh, node)) {
231 fprintf(stderr, "Error blacklising '%s': %s", arg, meshlink_strerror(meshlink_errno));
235 fprintf(stderr, "Node '%s' blacklisted.\n", arg);
236 } else if(!strcasecmp(buf, "whitelist")) {
238 fprintf(stderr, "/whitelist requires an argument!\n");
242 meshlink_node_t *node = meshlink_get_node(mesh, arg);
245 fprintf(stderr, "Error looking up '%s': %s\n", arg, meshlink_strerror(meshlink_errno));
249 if(!meshlink_whitelist(mesh, node)) {
250 fprintf(stderr, "Error whitelising '%s': %s", arg, meshlink_strerror(meshlink_errno));
254 fprintf(stderr, "Node '%s' whitelisted.\n", arg);
255 } else if(!strcasecmp(buf, "who")) {
256 meshlink_submesh_t *node_group = NULL;
259 nodes = meshlink_get_all_nodes(mesh, nodes, &nnodes);
262 fprintf(stderr, "Could not get list of nodes: %s\n", meshlink_strerror(meshlink_errno));
264 fprintf(stderr, "%lu known nodes:\n", (unsigned long)nnodes);
266 for(size_t i = 0; i < nnodes; i++) {
267 fprintf(stderr, " %lu. %s", (unsigned long)i, nodes[i]->name);
269 if((node_group = meshlink_get_node_submesh(mesh, nodes[i]))) {
270 fprintf(stderr, "\t%s", node_group->name);
273 fprintf(stderr, "\n");
276 fprintf(stderr, "\n");
279 meshlink_node_t *node = meshlink_get_node(mesh, arg);
282 fprintf(stderr, "Error looking up '%s': %s\n", arg, meshlink_strerror(meshlink_errno));
284 fprintf(stderr, "Node %s found", arg);
286 if((node_group = meshlink_get_node_submesh(mesh, node))) {
287 fprintf(stderr, " in group %s", node_group->name);
290 fprintf(stderr, "\n");
293 } else if(!strcasecmp(buf, "listgroup")) {
295 fprintf(stderr, "/listgroup requires an argument!\n");
299 submesh = devtool_get_all_submeshes(mesh, submesh, &nmemb);
301 if(!submesh || !nmemb) {
302 fprintf(stderr, "Group does not exist!\n");
306 for(i = 0; i < nmemb; i++) {
307 if(!strcmp(arg, submesh[i]->name)) {
316 fprintf(stderr, "Group %s does not exist!\n", arg);
320 nodes = meshlink_get_all_nodes_by_submesh(mesh, s, nodes, &nnodes);
323 fprintf(stderr, "Group %s does not contain any nodes!\n", arg);
328 fprintf(stderr, "Could not get list of nodes for group %s: %s\n", arg, meshlink_strerror(meshlink_errno));
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");
338 } else if(!strcasecmp(buf, "quit")) {
339 fprintf(stderr, "Bye!\n");
341 } else if(!strcasecmp(buf, "help")) {
343 "<name>: <message> Send a message to the given node.\n"
344 " Subsequent messages don't need the <name>: prefix.\n"
345 "/group <name> Create a new group"
346 "/invite <name> [submesh] Create an invitation for a new node.\n"
347 " Node joins either coremesh or submesh depending on submesh parameter.\n"
348 "/join <invitation> Join an existing mesh using an invitation.\n"
349 "/kick <name> Blacklist the given node.\n"
350 "/who [<name>] List all nodes or show information about the given node.\n"
351 "/listgroup <name> List all nodes in a given group.\n"
352 "/canonical -h<hostname> -p<port> Set Canonical address to be present in invitation.\n"
353 " Any one of two options an be specified. At least one option must be present\n"
354 "/quit Exit this program.\n"
357 fprintf(stderr, "Unknown command '/%s'\n", buf);
361 static void parse_input(meshlink_handle_t *mesh, char *buf) {
362 static meshlink_node_t *destination;
373 if(len && buf[len - 1] == '\n') {
377 if(len && buf[len - 1] == '\r') {
381 // Ignore empty lines.
387 // Commands start with '/'
390 parse_command(mesh, buf + 1);
394 // Lines in the form "name: message..." set the destination node.
397 char *colon = strchr(buf, ':');
407 destination = meshlink_get_node(mesh, buf);
410 fprintf(stderr, "Error looking up '%s': %s\n", buf, meshlink_strerror(meshlink_errno));
416 fprintf(stderr, "Who are you talking to? Write 'name: message...'\n");
420 // We want to have one channel per node.
421 // We keep the pointer to the meshlink_channel_t in the priv field of that node.
422 meshlink_channel_t *channel = destination->priv;
425 fprintf(stderr, "Opening chat channel to '%s'\n", destination->name);
426 channel = meshlink_channel_open(mesh, destination, CHAT_PORT, channel_receive, NULL, 0);
429 fprintf(stderr, "Could not create channel to '%s': %s\n", destination->name, meshlink_strerror(meshlink_errno));
433 destination->priv = channel;
434 meshlink_set_channel_poll_cb(mesh, channel, channel_poll);
437 if(!meshlink_channel_send(mesh, channel, msg, strlen(msg))) {
438 fprintf(stderr, "Could not send message to '%s': %s\n", destination->name, meshlink_strerror(meshlink_errno));
442 fprintf(stderr, "Message sent to '%s'.\n", destination->name);
445 int main(int argc, char *argv[]) {
446 const char *confbase = ".chat";
447 const char *nick = NULL;
458 meshlink_set_log_cb(NULL, MESHLINK_DEBUG, log_message);
460 meshlink_handle_t *mesh = meshlink_open(confbase, nick, "chat", DEV_CLASS_STATIONARY);
463 fprintf(stderr, "Could not open MeshLink: %s\n", meshlink_strerror(meshlink_errno));
467 meshlink_set_node_status_cb(mesh, node_status);
468 meshlink_set_log_cb(mesh, MESHLINK_INFO, log_message);
470 // Set the channel accept callback. This implicitly turns on channels for all nodes.
471 // This replaces the call to meshlink_set_receive_cb().
472 meshlink_set_channel_accept_cb(mesh, channel_accept);
474 if(!meshlink_start(mesh)) {
475 fprintf(stderr, "Could not start MeshLink: %s\n", meshlink_strerror(meshlink_errno));
479 fprintf(stderr, "Chat started.\nType /help for a list of commands.\n");
481 while(fgets(buf, sizeof(buf), stdin)) {
482 parse_input(mesh, buf);
485 fprintf(stderr, "Chat stopping.\n");
488 meshlink_close(mesh);