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 creted!\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 meshlink_blacklist(mesh, node);
232 fprintf(stderr, "Node '%s' blacklisted.\n", arg);
233 } else if(!strcasecmp(buf, "whitelist")) {
235 fprintf(stderr, "/whitelist requires an argument!\n");
239 meshlink_node_t *node = meshlink_get_node(mesh, arg);
242 fprintf(stderr, "Error looking up '%s': %s\n", arg, meshlink_strerror(meshlink_errno));
246 meshlink_whitelist(mesh, node);
248 fprintf(stderr, "Node '%s' whitelisted.\n", arg);
249 } else if(!strcasecmp(buf, "who")) {
250 meshlink_submesh_t *node_group = NULL;
253 nodes = meshlink_get_all_nodes(mesh, nodes, &nnodes);
256 fprintf(stderr, "Could not get list of nodes: %s\n", meshlink_strerror(meshlink_errno));
258 fprintf(stderr, "%lu known nodes:\n", (unsigned long)nnodes);
260 for(size_t i = 0; i < nnodes; i++) {
261 fprintf(stderr, " %lu. %s", (unsigned long)i, nodes[i]->name);
263 if((node_group = meshlink_get_node_submesh(mesh, nodes[i]))) {
264 fprintf(stderr, "\t%s", node_group->name);
267 fprintf(stderr, "\n");
270 fprintf(stderr, "\n");
273 meshlink_node_t *node = meshlink_get_node(mesh, arg);
276 fprintf(stderr, "Error looking up '%s': %s\n", arg, meshlink_strerror(meshlink_errno));
278 fprintf(stderr, "Node %s found", arg);
280 if((node_group = meshlink_get_node_submesh(mesh, node))) {
281 fprintf(stderr, " in group %s", node_group->name);
284 fprintf(stderr, "\n");
287 } else if(!strcasecmp(buf, "listgroup")) {
289 fprintf(stderr, "/listgroup requires an argument!\n");
293 submesh = devtool_get_all_submeshes(mesh, submesh, &nmemb);
295 if(!submesh || !nmemb) {
296 fprintf(stderr, "Group does not exist!\n");
300 for(i = 0; i < nmemb; i++) {
301 if(!strcmp(arg, submesh[i]->name)) {
310 fprintf(stderr, "Group %s does not exist!\n", arg);
314 nodes = meshlink_get_all_nodes_by_submesh(mesh, s, nodes, &nnodes);
317 fprintf(stderr, "Group %s does not contain any nodes!\n", arg);
322 fprintf(stderr, "Could not get list of nodes for group %s: %s\n", arg, meshlink_strerror(meshlink_errno));
324 fprintf(stderr, "%zu known nodes in group %s:", nnodes, arg);
326 for(size_t i = 0; i < nnodes; i++) {
327 fprintf(stderr, " %s", nodes[i]->name);
330 fprintf(stderr, "\n");
332 } else if(!strcasecmp(buf, "quit")) {
333 fprintf(stderr, "Bye!\n");
335 } else if(!strcasecmp(buf, "help")) {
337 "<name>: <message> Send a message to the given node.\n"
338 " Subsequent messages don't need the <name>: prefix.\n"
339 "/group <name> Create a new group"
340 "/invite <name> [submesh] Create an invitation for a new node.\n"
341 " Node joins either coremesh or submesh depending on submesh parameter.\n"
342 "/join <invitation> Join an existing mesh using an invitation.\n"
343 "/kick <name> Blacklist the given node.\n"
344 "/who [<name>] List all nodes or show information about the given node.\n"
345 "/listgroup <name> List all nodes in a given group.\n"
346 "/canonical -h<hostname> -p<port> Set Canonical address to be present in invitation.\n"
347 " Any one of two options an be specified. At least one option must be present\n"
348 "/quit Exit this program.\n"
351 fprintf(stderr, "Unknown command '/%s'\n", buf);
355 static void parse_input(meshlink_handle_t *mesh, char *buf) {
356 static meshlink_node_t *destination;
367 if(len && buf[len - 1] == '\n') {
371 if(len && buf[len - 1] == '\r') {
375 // Ignore empty lines.
381 // Commands start with '/'
384 parse_command(mesh, buf + 1);
388 // Lines in the form "name: message..." set the destination node.
391 char *colon = strchr(buf, ':');
401 destination = meshlink_get_node(mesh, buf);
404 fprintf(stderr, "Error looking up '%s': %s\n", buf, meshlink_strerror(meshlink_errno));
410 fprintf(stderr, "Who are you talking to? Write 'name: message...'\n");
414 // We want to have one channel per node.
415 // We keep the pointer to the meshlink_channel_t in the priv field of that node.
416 meshlink_channel_t *channel = destination->priv;
419 fprintf(stderr, "Opening chat channel to '%s'\n", destination->name);
420 channel = meshlink_channel_open(mesh, destination, CHAT_PORT, channel_receive, NULL, 0);
423 fprintf(stderr, "Could not create channel to '%s': %s\n", destination->name, meshlink_strerror(meshlink_errno));
427 destination->priv = channel;
428 meshlink_set_channel_poll_cb(mesh, channel, channel_poll);
431 if(!meshlink_channel_send(mesh, channel, msg, strlen(msg))) {
432 fprintf(stderr, "Could not send message to '%s': %s\n", destination->name, meshlink_strerror(meshlink_errno));
436 fprintf(stderr, "Message sent to '%s'.\n", destination->name);
439 int main(int argc, char *argv[]) {
440 const char *confbase = ".chat";
441 const char *nick = NULL;
452 meshlink_set_log_cb(NULL, MESHLINK_DEBUG, log_message);
454 meshlink_handle_t *mesh = meshlink_open(confbase, nick, "chat", DEV_CLASS_STATIONARY);
457 fprintf(stderr, "Could not open MeshLink: %s\n", meshlink_strerror(meshlink_errno));
461 meshlink_set_node_status_cb(mesh, node_status);
462 meshlink_set_log_cb(mesh, MESHLINK_INFO, log_message);
464 // Set the channel accept callback. This implicitly turns on channels for all nodes.
465 // This replaces the call to meshlink_set_receive_cb().
466 meshlink_set_channel_accept_cb(mesh, channel_accept);
468 if(!meshlink_start(mesh)) {
469 fprintf(stderr, "Could not start MeshLink: %s\n", meshlink_strerror(meshlink_errno));
473 fprintf(stderr, "Chat started.\nType /help for a list of commands.\n");
475 while(fgets(buf, sizeof(buf), stdin)) {
476 parse_input(mesh, buf);
479 fprintf(stderr, "Chat stopping.\n");
482 meshlink_close(mesh);