5 #include "../src/meshlink.h"
9 static void log_message(meshlink_handle_t *mesh, meshlink_log_level_t level, const char *text) {
12 static const char *levelstr[] = {
13 [MESHLINK_DEBUG] = "\x1b[34mDEBUG",
14 [MESHLINK_INFO] = "\x1b[32mINFO",
15 [MESHLINK_WARNING] = "\x1b[33mWARNING",
16 [MESHLINK_ERROR] = "\x1b[31mERROR",
17 [MESHLINK_CRITICAL] = "\x1b[31mCRITICAL",
19 fprintf(stderr, "%s:\x1b[0m %s\n", levelstr[level], text);
22 static void channel_receive(meshlink_handle_t *mesh, meshlink_channel_t *channel, const void *data, size_t len) {
25 fprintf(stderr, "Error while reading data from %s: %s\n", channel->node->name, meshlink_strerror(meshlink_errno));
27 fprintf(stderr, "Chat connection closed by %s\n", channel->node->name);
30 channel->node->priv = NULL;
31 meshlink_channel_close(mesh, channel);
35 // TODO: we now have TCP semantics, don't expect exactly one message per receive call.
37 printf("%s says: ", channel->node->name);
38 fwrite(data, len, 1, stdout);
42 static bool channel_accept(meshlink_handle_t *mesh, meshlink_channel_t *channel, uint16_t port, const void *data, size_t len) {
46 // Only accept connections to the chat port
47 if(port != CHAT_PORT) {
48 fprintf(stderr, "Rejected incoming channel from '%s' to port %u\n", channel->node->name, port);
52 fprintf(stderr, "Accepted incoming channel from '%s'\n", channel->node->name);
54 // Remember the channel
55 channel->node->priv = channel;
57 // Set the receive callback
58 meshlink_set_channel_receive_cb(mesh, channel, channel_receive);
60 // Accept this channel
64 static void channel_poll(meshlink_handle_t *mesh, meshlink_channel_t *channel, size_t len) {
67 fprintf(stderr, "Channel to '%s' connected\n", channel->node->name);
68 meshlink_set_channel_poll_cb(mesh, channel, NULL);
71 static void node_status(meshlink_handle_t *mesh, meshlink_node_t *node, bool reachable) {
75 printf("%s joined.\n", node->name);
77 printf("%s left.\n", node->name);
81 static meshlink_node_t **nodes;
84 static void parse_command(meshlink_handle_t *mesh, char *buf) {
85 char *arg = strchr(buf, ' ');
91 if(!strcasecmp(buf, "invite")) {
95 fprintf(stderr, "/invite requires an argument!\n");
99 invitation = meshlink_invite(mesh, NULL, arg);
102 fprintf(stderr, "Could not invite '%s': %s\n", arg, meshlink_strerror(meshlink_errno));
106 printf("Invitation for %s: %s\n", arg, invitation);
108 } else if(!strcasecmp(buf, "join")) {
110 fprintf(stderr, "/join requires an argument!\n");
116 if(!meshlink_join(mesh, arg)) {
117 fprintf(stderr, "Could not join using invitation: %s\n", meshlink_strerror(meshlink_errno));
119 fprintf(stderr, "Invitation accepted!\n");
122 if(!meshlink_start(mesh)) {
123 fprintf(stderr, "Could not restart MeshLink: %s\n", meshlink_strerror(meshlink_errno));
126 } else if(!strcasecmp(buf, "kick")) {
128 fprintf(stderr, "/kick requires an argument!\n");
132 meshlink_node_t *node = meshlink_get_node(mesh, arg);
135 fprintf(stderr, "Error looking up '%s': %s\n", arg, meshlink_strerror(meshlink_errno));
139 meshlink_blacklist(mesh, node);
141 printf("Node '%s' blacklisted.\n", arg);
142 } else if(!strcasecmp(buf, "whitelist")) {
144 fprintf(stderr, "/whitelist requires an argument!\n");
148 meshlink_node_t *node = meshlink_get_node(mesh, arg);
151 fprintf(stderr, "Error looking up '%s': %s\n", arg, meshlink_strerror(meshlink_errno));
155 meshlink_whitelist(mesh, node);
157 printf("Node '%s' whitelisted.\n", arg);
158 } else if(!strcasecmp(buf, "who")) {
160 nodes = meshlink_get_all_nodes(mesh, nodes, &nnodes);
163 fprintf(stderr, "Could not get list of nodes: %s\n", meshlink_strerror(meshlink_errno));
165 printf("%zu known nodes:", nnodes);
167 for(size_t i = 0; i < nnodes; i++) {
168 printf(" %s", nodes[i]->name);
174 meshlink_node_t *node = meshlink_get_node(mesh, arg);
177 fprintf(stderr, "Error looking up '%s': %s\n", arg, meshlink_strerror(meshlink_errno));
179 printf("Node %s found\n", arg);
182 } else if(!strcasecmp(buf, "quit")) {
185 } else if(!strcasecmp(buf, "help")) {
187 "<name>: <message> Send a message to the given node.\n"
188 " Subsequent messages don't need the <name>: prefix.\n"
189 "/invite <name> Create an invitation for a new node.\n"
190 "/join <invitation> Join an existing mesh using an invitation.\n"
191 "/kick <name> Blacklist the given node.\n"
192 "/who [<name>] List all nodes or show information about the given node.\n"
193 "/quit Exit this program.\n"
196 fprintf(stderr, "Unknown command '/%s'\n", buf);
200 static void parse_input(meshlink_handle_t *mesh, char *buf) {
201 static meshlink_node_t *destination;
212 if(len && buf[len - 1] == '\n') {
216 if(len && buf[len - 1] == '\r') {
220 // Ignore empty lines.
226 // Commands start with '/'
229 parse_command(mesh, buf + 1);
233 // Lines in the form "name: message..." set the destination node.
236 char *colon = strchr(buf, ':');
246 destination = meshlink_get_node(mesh, buf);
249 fprintf(stderr, "Error looking up '%s': %s\n", buf, meshlink_strerror(meshlink_errno));
255 fprintf(stderr, "Who are you talking to? Write 'name: message...'\n");
259 // We want to have one channel per node.
260 // We keep the pointer to the meshlink_channel_t in the priv field of that node.
261 meshlink_channel_t *channel = destination->priv;
264 fprintf(stderr, "Opening chat channel to '%s'\n", destination->name);
265 channel = meshlink_channel_open(mesh, destination, CHAT_PORT, channel_receive, NULL, 0);
268 fprintf(stderr, "Could not create channel to '%s': %s\n", destination->name, meshlink_strerror(meshlink_errno));
272 destination->priv = channel;
273 meshlink_set_channel_poll_cb(mesh, channel, channel_poll);
276 if(!meshlink_channel_send(mesh, channel, msg, strlen(msg))) {
277 fprintf(stderr, "Could not send message to '%s': %s\n", destination->name, meshlink_strerror(meshlink_errno));
281 printf("Message sent to '%s'.\n", destination->name);
284 int main(int argc, char *argv[]) {
285 const char *confbase = ".chat";
286 const char *nick = NULL;
297 meshlink_set_log_cb(NULL, MESHLINK_DEBUG, log_message);
299 meshlink_handle_t *mesh = meshlink_open(confbase, nick, "chat", DEV_CLASS_STATIONARY);
302 fprintf(stderr, "Could not open MeshLink: %s\n", meshlink_strerror(meshlink_errno));
306 meshlink_set_node_status_cb(mesh, node_status);
307 meshlink_set_log_cb(mesh, MESHLINK_INFO, log_message);
309 // Set the channel accept callback. This implicitly turns on channels for all nodes.
310 // This replaces the call to meshlink_set_receive_cb().
311 meshlink_set_channel_accept_cb(mesh, channel_accept);
313 if(!meshlink_start(mesh)) {
314 fprintf(stderr, "Could not start MeshLink: %s\n", meshlink_strerror(meshlink_errno));
318 printf("Chat started.\nType /help for a list of commands.\n");
320 while(fgets(buf, sizeof(buf), stdin)) {
321 parse_input(mesh, buf);
324 printf("Chat stopping.\n");
327 meshlink_close(mesh);