2 invitation.c -- Create and accept invitations
3 Copyright (C) 2013-2022 Guus Sliepen <guus@tinc-vpn.org>
5 This program is free software; you can redistribute it and/or modify
6 it under the terms of the GNU General Public License as published by
7 the Free Software Foundation; either version 2 of the License, or
8 (at your option) any later version.
10 This program is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 GNU General Public License for more details.
15 You should have received a copy of the GNU General Public License along
16 with this program; if not, write to the Free Software Foundation, Inc.,
17 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
22 #include "control_common.h"
27 #include "invitation.h"
40 #include "ed25519/sha512.h"
42 int addressfamily = AF_UNSPEC;
44 static void scan_for_hostname(const char *filename, char **hostname, char **port) {
45 if(!filename || (*hostname && *port)) {
49 FILE *f = fopen(filename, "r");
55 while(fgets(line, sizeof(line), f)) {
61 p += strcspn(p, "\t =");
67 q = p + strspn(p, "\t ");
70 q += 1 + strspn(q + 1, "\t ");
74 p = q + strcspn(q, "\t ");
80 p += strspn(p, "\t ");
81 p[strcspn(p, "\t ")] = 0;
83 if(!*port && !strcasecmp(line, "Port")) {
86 } else if(!*hostname && !strcasecmp(line, "Address")) {
88 *hostname = xstrdup(q);
96 if(*hostname && *port) {
104 static bool get_my_hostname(char **out_address, char **out_port) {
105 char *hostname = NULL;
107 char *hostport = NULL;
108 char *name = get_my_name(false);
109 char filename[PATH_MAX] = {0};
111 // Use first Address statement in own host config file
113 snprintf(filename, sizeof(filename), "%s" SLASH "hosts" SLASH "%s", confbase, name);
114 scan_for_hostname(filename, &hostname, &port);
115 scan_for_hostname(tinc_conf, &hostname, &port);
121 if(!port || (is_decimal(port) && atoi(port) == 0)) {
122 pidfile_t *pidfile = read_pidfile();
126 port = xstrdup(pidfile->port);
129 fprintf(stderr, "tincd is using a dynamic port and is not running. Please start tincd or set the Port option to a non-zero value.\n");
138 // If that doesn't work, guess externally visible hostname
139 fprintf(stderr, "Trying to discover externally visible hostname...\n");
140 struct addrinfo *ai = str2addrinfo("tinc-vpn.org", "80", SOCK_STREAM);
141 struct addrinfo *aip = ai;
142 static const char request[] = "GET http://tinc-vpn.org/host.cgi HTTP/1.0\r\n\r\n";
145 int s = socket(aip->ai_family, aip->ai_socktype, aip->ai_protocol);
148 if(connect(s, aip->ai_addr, aip->ai_addrlen)) {
155 send(s, request, sizeof(request) - 1, 0);
156 ssize_t len = recv(s, line, sizeof(line) - 1, MSG_WAITALL);
161 if(line[len - 1] == '\n') {
165 char *p = strrchr(line, '\n');
168 hostname = xstrdup(p + 1);
187 // Check that the hostname is reasonable
189 for(char *p = hostname; *p; p++) {
190 if(isalnum((uint8_t) *p) || *p == '-' || *p == '.' || *p == ':') {
194 // If not, forget it.
203 fprintf(stderr, "Could not determine the external address or hostname. Please set Address manually.\n");
212 fprintf(stderr, "Please enter your host's external address or hostname");
215 fprintf(stderr, " [%s]", hostname);
218 fprintf(stderr, ": ");
220 if(!fgets(line, sizeof(line), stdin)) {
221 fprintf(stderr, "Error while reading stdin: %s\n", strerror(errno));
235 for(char *p = line; *p; p++) {
236 if(isalnum((uint8_t) *p) || *p == '-' || *p == '.') {
240 fprintf(stderr, "Invalid address or hostname.\n");
245 hostname = xstrdup(line);
250 FILE *f = fopen(filename, "a");
253 fprintf(f, "\nAddress = %s\n", hostname);
256 fprintf(stderr, "Could not append Address to %s: %s\n", filename, strerror(errno));
263 if(strchr(hostname, ':')) {
264 xasprintf(&hostport, "[%s]:%s", hostname, port);
266 xasprintf(&hostport, "%s:%s", hostname, port);
269 if(strchr(hostname, ':')) {
270 xasprintf(&hostport, "[%s]", hostname);
272 hostport = xstrdup(hostname);
279 if(hostport && port) {
280 *out_address = hostport;
290 // Copy host configuration file, replacing Port with the value passed here. Host
291 // configs may contain this clause: `Port = 0`, which means 'ask the operating
292 // system to allocate any available port'. This obviously won't do for invitation
293 // files, so replace it with an actual port we've obtained previously.
294 static bool copy_config_replacing_port(FILE *out, const char *filename, const char *port) {
295 FILE *in = fopen(filename, "r");
298 fprintf(stderr, "Could not open %s: %s\n", filename, strerror(errno));
304 while(fgets(line, sizeof(line), in)) {
305 const char *var_beg = line + strspn(line, "\t ");
306 const char *var_end = var_beg + strcspn(var_beg, "\t ");
308 // Check the name of the variable we've read. If it's Port, replace it with
309 // a port we'll use in invitation URL. Otherwise, just copy the line.
310 if(var_end > var_beg && !strncasecmp(var_beg, "Port", var_end - var_beg)) {
311 fprintf(out, "Port = %s\n", port);
313 fprintf(out, "%s", line);
317 memzero(line, sizeof(line));
322 static bool append_host_config(FILE *f, const char *nodename, const char *port) {
324 snprintf(path, sizeof(path), "%s" SLASH "hosts" SLASH "%s", confbase, nodename);
325 bool success = copy_config_replacing_port(f, path, port);
330 int cmd_invite(int argc, char *argv[]) {
332 fprintf(stderr, "Not enough arguments!\n");
337 fprintf(stderr, "Too many arguments!\n");
341 // Check validity of the new node's name
342 if(!check_id(argv[1])) {
343 fprintf(stderr, "Invalid name for node.\n");
348 myname = get_my_name(true);
354 // Ensure no host configuration file with that name exists
355 char filename[PATH_MAX];
356 snprintf(filename, sizeof(filename), "%s" SLASH "hosts" SLASH "%s", confbase, argv[1]);
358 if(!access(filename, F_OK)) {
359 fprintf(stderr, "A host config file for %s already exists!\n", argv[1]);
363 // If a daemon is running, ensure no other nodes know about this name
364 if(connect_tincd(false)) {
366 sendline(fd, "%d %d", CONTROL, REQ_DUMP_NODES);
368 while(recvline(fd, line, sizeof(line))) {
372 if(sscanf(line, "%d %d %4095s", &code, &req, node) != 3) {
376 if(!strcmp(node, argv[1])) {
382 fprintf(stderr, "A node with name %s is already known!\n", argv[1]);
387 if(!makedirs(DIR_INVITATIONS)) {
391 snprintf(filename, sizeof(filename), "%s" SLASH "invitations", confbase);
393 // Count the number of valid invitations, clean up old ones
394 DIR *dir = opendir(filename);
397 fprintf(stderr, "Could not read directory %s: %s\n", filename, strerror(errno));
404 time_t deadline = time(NULL) - 604800; // 1 week in the past
406 while((ent = readdir(dir))) {
407 if(strlen(ent->d_name) != 24) {
411 char invname[PATH_MAX];
414 if((size_t)snprintf(invname, sizeof(invname), "%s" SLASH "%s", filename, ent->d_name) >= sizeof(invname)) {
415 fprintf(stderr, "Filename too long: %s" SLASH "%s\n", filename, ent->d_name);
419 if(!stat(invname, &st)) {
420 if(deadline < st.st_mtime) {
426 fprintf(stderr, "Could not stat %s: %s\n", invname, strerror(errno));
434 fprintf(stderr, "Error while reading directory %s: %s\n", filename, strerror(errno));
439 snprintf(filename, sizeof(filename), "%s" SLASH "invitations" SLASH "ed25519_key.priv", confbase);
441 // Remove the key if there are no outstanding invitations.
446 // Create a new key if necessary.
447 FILE *f = fopen(filename, "r");
450 if(errno != ENOENT) {
451 fprintf(stderr, "Could not read %s: %s\n", filename, strerror(errno));
455 key = ecdsa_generate();
461 f = fopen(filename, "w");
464 fprintf(stderr, "Could not write %s: %s\n", filename, strerror(errno));
469 chmod(filename, 0600);
471 if(!ecdsa_write_pem_private_key(key, f)) {
472 fprintf(stderr, "Could not write ECDSA private key\n");
480 if(connect_tincd(true)) {
481 sendline(fd, "%d %d", CONTROL, REQ_RELOAD);
483 fprintf(stderr, "Could not signal the tinc daemon. Please restart or reload it manually.\n");
486 key = ecdsa_read_pem_private_key(f);
490 fprintf(stderr, "Could not read private key from %s\n", filename);
498 // Create a hash of the key.
500 char *fingerprint = ecdsa_get_base64_public_key(key);
501 sha512(fingerprint, strlen(fingerprint), hash);
502 b64encode_tinc_urlsafe(hash, hash, 18);
506 // Create a random cookie for this invitation.
508 randomize(cookie, 18);
510 // Create a filename that doesn't reveal the cookie itself
511 const size_t buflen = 18 + strlen(fingerprint);
512 uint8_t *buf = alloca(buflen);
515 memcpy(buf, cookie, 18);
516 memcpy(buf + 18, fingerprint, buflen - 18);
517 sha512(buf, buflen, cookiehash);
518 b64encode_tinc_urlsafe(cookiehash, cookiehash, 18);
522 b64encode_tinc_urlsafe(cookie, cookie, 18);
524 // Create a file containing the details of the invitation.
525 snprintf(filename, sizeof(filename), "%s" SLASH "invitations" SLASH "%s", confbase, cookiehash);
526 int ifd = open(filename, O_RDWR | O_CREAT | O_EXCL, 0600);
529 memzero(cookie, sizeof(cookie));
530 fprintf(stderr, "Could not create invitation file %s: %s\n", filename, strerror(errno));
534 f = fdopen(ifd, "w");
540 // Get the local address
541 char *address = NULL;
544 if(!get_my_hostname(&address, &port)) {
545 memzero(cookie, sizeof(cookie));
549 // Create an URL from the local address, key hash and cookie
551 xasprintf(&url, "%s/%s%s", address, hash, cookie);
553 memzero(cookie, sizeof(cookie));
556 // Fill in the details.
557 fprintf(f, "Name = %s\n", argv[1]);
559 if(check_netname(netname, true)) {
560 fprintf(f, "NetName = %s\n", netname);
563 fprintf(f, "ConnectTo = %s\n", myname);
565 // Copy Broadcast and Mode
566 FILE *tc = fopen(tinc_conf, "r");
571 while(fgets(buf, sizeof(buf), tc)) {
572 if((!strncasecmp(buf, "Mode", 4) && strchr(" \t=", buf[4]))
573 || (!strncasecmp(buf, "Broadcast", 9) && strchr(" \t=", buf[9]))) {
576 // Make sure there is a newline character.
577 if(!strchr(buf, '\n')) {
586 fprintf(f, "#---------------------------------------------------------------#\n");
587 fprintf(f, "Name = %s\n", myname);
589 bool appended = append_host_config(f, myname, port);
593 fprintf(stderr, "Could not append my config to invitation file: %s.\n", strerror(errno));
598 // Call the inviation-created script
600 environment_init(&env);
601 environment_add(&env, "NODE=%s", argv[1]);
602 environment_add(&env, "INVITATION_FILE=%s", filename);
603 environment_add(&env, "INVITATION_URL=%s", url);
604 execute_script("invitation-created", &env);
605 environment_exit(&env);
614 static char cookie[18], hash[18];
615 static sptps_t sptps;
617 static size_t datalen;
618 static bool success = false;
620 static char *get_line(char *line, size_t linelen, const char **data) {
621 if(!data || !*data) {
630 const char *end = strchr(*data, '\n');
631 size_t len = end ? (size_t)(end - *data) : strlen(*data);
634 fprintf(stderr, "Maximum line length exceeded!\n");
638 if(len && !isprint((uint8_t) **data)) {
642 memcpy(line, *data, len);
654 static char *get_value(const char *data, const char *var) {
655 static char buf[1024];
657 char *line = get_line(buf, sizeof(buf), &data);
663 char *sep = line + strcspn(line, " \t=");
664 char *val = sep + strspn(sep, " \t");
667 val += 1 + strspn(val + 1, " \t");
672 if(strcasecmp(line, var)) {
679 static char *grep(const char *data, const char *var) {
682 const char *p = data;
683 size_t varlen = strlen(var);
685 // Skip all lines not starting with var
686 while(strncasecmp(p, var, varlen) || !strchr(" \t=", p[varlen])) {
701 p += strspn(p, " \t");
704 p += 1 + strspn(p + 1, " \t");
707 const char *e = strchr(p, '\n');
713 if((size_t)(e - p) >= sizeof(value)) {
714 fprintf(stderr, "Maximum line length exceeded!\n");
718 memcpy(value, p, e - p);
720 return xstrdup(value);
723 static bool finalize_join(void) {
724 const char *name = get_value(data, "Name");
727 fprintf(stderr, "No Name found in invitation!\n");
731 if(!check_id(name)) {
732 fprintf(stderr, "Invalid Name found in invitation!\n");
737 char *net = grep(data, "NetName");
742 if(!check_netname(netname, true)) {
743 fprintf(stderr, "Unsafe NetName found in invitation!\n");
749 bool ask_netname = false;
750 char temp_netname[32];
764 xasprintf(&tinc_conf, "%s" SLASH "tinc.conf", confbase);
765 xasprintf(&hosts_dir, "%s" SLASH "hosts", confbase);
767 if(!access(tinc_conf, F_OK)) {
768 fprintf(stderr, "Configuration file %s already exists!\n", tinc_conf);
774 // Generate a random netname, ask for a better one later.
776 snprintf(temp_netname, sizeof(temp_netname), "join_%x", prng(UINT32_MAX));
777 netname = temp_netname;
781 if(!makedirs(DIR_HOSTS | DIR_CONFBASE | DIR_CACHE)) {
785 FILE *f = fopen(tinc_conf, "w");
788 fprintf(stderr, "Could not create file %s: %s\n", tinc_conf, strerror(errno));
792 fprintf(f, "Name = %s\n", name);
794 char filename[PATH_MAX];
795 snprintf(filename, sizeof(filename), "%s" SLASH "%s", hosts_dir, name);
796 FILE *fh = fopen(filename, "w");
799 fprintf(stderr, "Could not create file %s: %s\n", filename, strerror(errno));
804 snprintf(filename, sizeof(filename), "%s" SLASH "invitation-data", confbase);
805 FILE *finv = fopen(filename, "w");
807 if(!finv || fwrite(data, datalen, 1, finv) != 1) {
808 fprintf(stderr, "Could not create file %s: %s\n", filename, strerror(errno));
817 snprintf(filename, sizeof(filename), "%s" SLASH "tinc-up.invitation", confbase);
818 FILE *fup = fopen(filename, "w");
821 fprintf(stderr, "Could not create file %s: %s\n", filename, strerror(errno));
827 ifconfig_header(fup);
829 // Filter first chunk on approved keywords, split between tinc.conf and hosts/Name
830 // Generate a tinc-up script from Ifconfig and Route keywords.
831 // Other chunks go unfiltered to their respective host config files
832 const char *p = data;
835 static char line[1024];
837 while((l = get_line(line, sizeof(line), &p))) {
843 // Split line into variable and value
844 size_t len = strcspn(l, "\t =");
846 value += strspn(value, "\t ");
850 value += strspn(value, "\t ");
855 // Ignore lines with empty variable names
861 if(!strcasecmp(l, "Name")) {
862 if(strcmp(value, name)) {
867 } else if(!strcasecmp(l, "NetName")) {
871 // Check the list of known variables
875 for(i = 0; variables[i].name; i++) {
876 if(strcasecmp(l, variables[i].name)) {
884 // Handle Ifconfig and Route statements
886 if(!strcasecmp(l, "Ifconfig")) {
887 if(!strcasecmp(value, "dhcp")) {
889 } else if(!strcasecmp(value, "dhcp6")) {
891 } else if(!strcasecmp(value, "slaac")) {
894 ifconfig_address(fup, value);
898 } else if(!strcasecmp(l, "Route")) {
899 ifconfig_route(fup, value);
904 // Ignore unknown and unsafe variables
906 fprintf(stderr, "Ignoring unknown variable '%s' in invitation.\n", l);
908 } else if(!(variables[i].type & VAR_SAFE)) {
910 fprintf(stderr, "Warning: unsafe variable '%s' in invitation.\n", l);
912 fprintf(stderr, "Ignoring unsafe variable '%s' in invitation.\n", l);
917 // Copy the safe variable to the right config file
918 fprintf((variables[i].type & VAR_HOST) ? fh : f, "%s = %s\n", l, value);
922 bool valid_tinc_up = ifconfig_footer(fup);
925 while(l && !strcasecmp(l, "Name")) {
926 if(!check_id(value)) {
927 fprintf(stderr, "Invalid Name found in invitation.\n");
931 if(!strcmp(value, name)) {
932 fprintf(stderr, "Secondary chunk would overwrite our own host config file.\n");
936 snprintf(filename, sizeof(filename), "%s" SLASH "%s", hosts_dir, value);
937 f = fopen(filename, "w");
940 fprintf(stderr, "Could not create file %s: %s\n", filename, strerror(errno));
944 while((l = get_line(line, sizeof(line), &p))) {
945 if(!strcmp(l, "#---------------------------------------------------------------#")) {
949 size_t len = strcspn(l, "\t =");
951 if(len == 4 && !strncasecmp(l, "Name", 4)) {
953 value += strspn(value, "\t ");
957 value += strspn(value, "\t ");
971 // Generate our key and send a copy to the server
972 ecdsa_t *key = ecdsa_generate();
978 char *b64_pubkey = ecdsa_get_base64_public_key(key);
984 snprintf(filename, sizeof(filename), "%s" SLASH "ed25519_key.priv", confbase);
985 f = fopenmask(filename, "w", 0600);
991 if(!ecdsa_write_pem_private_key(key, f)) {
992 fprintf(stderr, "Error writing private key!\n");
1000 fprintf(fh, "Ed25519PublicKey = %s\n", b64_pubkey);
1002 sptps_send_record(&sptps, 1, b64_pubkey, strlen(b64_pubkey));
1006 #ifndef DISABLE_LEGACY
1007 rsa_t *rsa = rsa_generate(2048, 0x1001);
1008 snprintf(filename, sizeof(filename), "%s" SLASH "rsa_key.priv", confbase);
1009 f = fopenmask(filename, "w", 0600);
1011 if(!f || !rsa_write_pem_private_key(rsa, f)) {
1012 fprintf(stderr, "Could not write private RSA key\n");
1013 } else if(!rsa_write_pem_public_key(rsa, fh)) {
1014 fprintf(stderr, "Could not write public RSA key\n");
1028 if(ask_netname && tty) {
1029 fprintf(stderr, "Enter a new netname: ");
1031 if(!fgets(line, sizeof(line), stdin)) {
1032 fprintf(stderr, "Error while reading stdin: %s\n", strerror(errno));
1036 if(!*line || *line == '\n') {
1040 line[strlen(line) - 1] = 0;
1042 char newbase[PATH_MAX];
1044 if((size_t)snprintf(newbase, sizeof(newbase), CONFDIR SLASH "tinc" SLASH "%s", line) >= sizeof(newbase)) {
1045 fprintf(stderr, "Filename too long: " CONFDIR SLASH "tinc" SLASH "%s\n", line);
1049 if(rename(confbase, newbase)) {
1050 fprintf(stderr, "Error trying to rename %s to %s: %s\n", confbase, newbase, strerror(errno));
1058 char filename2[PATH_MAX];
1059 snprintf(filename, sizeof(filename), "%s" SLASH "tinc-up.invitation", confbase);
1062 snprintf(filename2, sizeof(filename2), "%s" SLASH "tinc-up.bat", confbase);
1064 snprintf(filename2, sizeof(filename2), "%s" SLASH "tinc-up", confbase);
1069 FILE *fup = fopen(filename, "r");
1072 fprintf(stderr, "\nPlease review the following tinc-up script:\n\n");
1076 while(fgets(buf, sizeof(buf), fup)) {
1085 fprintf(stderr, "\nDo you want to use this script [y]es/[n]o/[e]dit? ");
1086 response = tolower(getchar());
1087 } while(!strchr("yne", response));
1089 fprintf(stderr, "\n");
1091 if(response == 'e') {
1093 #ifndef HAVE_WINDOWS
1094 const char *editor = getenv("VISUAL");
1097 editor = getenv("EDITOR");
1104 xasprintf(&command, "\"%s\" \"%s\"", editor, filename);
1106 xasprintf(&command, "edit \"%s\"", filename);
1109 if(system(command)) {
1118 if(response == 'y') {
1119 rename(filename, filename2);
1120 chmod(filename2, 0755);
1121 fprintf(stderr, "tinc-up enabled.\n");
1123 fprintf(stderr, "tinc-up has been left disabled.\n");
1128 rename(filename, filename2);
1129 chmod(filename2, 0755);
1130 fprintf(stderr, "tinc-up enabled.\n");
1132 fprintf(stderr, "A tinc-up script was generated, but has been left disabled.\n");
1136 // A placeholder was generated.
1137 rename(filename, filename2);
1138 chmod(filename2, 0755);
1141 fprintf(stderr, "Configuration stored in: %s\n", confbase);
1147 static bool invitation_send(void *handle, uint8_t type, const void *vdata, size_t len) {
1150 const char *data = vdata;
1153 ssize_t result = send(sock, data, len, 0);
1155 if(result == -1 && sockwouldblock(sockerrno)) {
1157 } else if(result <= 0) {
1168 static bool invitation_receive(void *handle, uint8_t type, const void *msg, uint16_t len) {
1172 case SPTPS_HANDSHAKE:
1173 return sptps_send_record(&sptps, 0, cookie, sizeof(cookie));
1176 data = xrealloc(data, datalen + len + 1);
1177 memcpy(data + datalen, msg, len);
1183 return finalize_join();
1186 fprintf(stderr, "Invitation successfully accepted.\n");
1187 shutdown(sock, SHUT_RDWR);
1198 int cmd_join(int argc, char *argv[]) {
1204 fprintf(stderr, "Too many arguments!\n");
1208 // Make sure confbase exists and is accessible.
1209 if(!makedirs(DIR_CONFDIR | DIR_CONFBASE)) {
1213 if(access(confbase, R_OK | W_OK | X_OK)) {
1214 fprintf(stderr, "No permission to write in directory %s: %s\n", confbase, strerror(errno));
1218 // If a netname or explicit configuration directory is specified, check for an existing tinc.conf.
1219 if((netname || confbasegiven) && !access(tinc_conf, F_OK)) {
1220 fprintf(stderr, "Configuration file %s already exists!\n", tinc_conf);
1224 // Either read the invitation from the command line or from stdin.
1228 invitation = argv[1];
1231 fprintf(stderr, "Enter invitation URL: ");
1236 if(!fgets(line, sizeof(line), stdin)) {
1237 fprintf(stderr, "Error while reading stdin: %s\n", strerror(errno));
1244 // Parse the invitation URL.
1247 char *slash = strchr(invitation, '/');
1255 if(strlen(slash) != 48) {
1259 char *address = invitation;
1262 if(*address == '[') {
1264 char *bracket = strchr(address, ']');
1272 if(bracket[1] == ':') {
1276 port = strchr(address, ':');
1283 if(!port || !*port) {
1284 static char default_port[] = "655";
1285 port = default_port;
1288 if(!b64decode_tinc(slash, hash, 24) || !b64decode_tinc(slash + 24, cookie, 24)) {
1292 // Generate a throw-away key for the invitation.
1293 ecdsa_t *key = ecdsa_generate();
1299 char *b64_pubkey = ecdsa_get_base64_public_key(key);
1301 // Connect to the tinc daemon mentioned in the URL.
1302 struct addrinfo *ai = str2addrinfo(address, port, SOCK_STREAM);
1310 struct addrinfo *aip = NULL;
1326 sock = socket(aip->ai_family, aip->ai_socktype, aip->ai_protocol);
1329 fprintf(stderr, "Could not open socket: %s\n", strerror(errno));
1333 if(connect(sock, aip->ai_addr, aip->ai_addrlen)) {
1334 char *addrstr, *portstr;
1335 sockaddr2str((sockaddr_t *)aip->ai_addr, &addrstr, &portstr);
1336 fprintf(stderr, "Could not connect to %s port %s: %s\n", addrstr, portstr, strerror(errno));
1343 fprintf(stderr, "Connected to %s port %s...\n", address, port);
1345 // Tell him we have an invitation, and give him our throw-away key.
1346 ssize_t len = snprintf(line, sizeof(line), "0 ?%s %d.%d\n", b64_pubkey, PROT_MAJOR, PROT_MINOR);
1348 if(len <= 0 || (size_t)len >= sizeof(line)) {
1352 if(!sendline(sock, "0 ?%s %d.%d", b64_pubkey, PROT_MAJOR, 1)) {
1353 fprintf(stderr, "Error sending request to %s port %s: %s\n", address, port, strerror(errno));
1358 char hisname[4096] = "";
1359 int code, hismajor, hisminor = 0;
1361 if(!recvline(sock, line, sizeof(line)) || sscanf(line, "%d %4095s %d.%d", &code, hisname, &hismajor, &hisminor) < 3 || code != 0 || hismajor != PROT_MAJOR || !check_id(hisname) || !recvline(sock, line, sizeof(line)) || !rstrip(line) || sscanf(line, "%d ", &code) != 1 || code != ACK || strlen(line) < 3) {
1362 fprintf(stderr, "Cannot read greeting from peer\n");
1374 // Check if the hash of the key he gave us matches the hash in the URL.
1375 char *fingerprint = line + 2;
1378 if(sha512(fingerprint, strlen(fingerprint), hishash)) {
1379 fprintf(stderr, "Could not create digest\n%s\n", line + 2);
1384 if(memcmp(hishash, hash, 18)) {
1385 fprintf(stderr, "Peer has an invalid key!\n%s\n", line + 2);
1391 ecdsa_t *hiskey = ecdsa_set_base64_public_key(fingerprint);
1398 // Start an SPTPS session
1399 if(!sptps_start(&sptps, NULL, true, false, key, hiskey, "tinc invitation", 15, invitation_send, invitation_receive)) {
1405 // Feed rest of input buffer to SPTPS
1406 if(!sptps_receive_data(&sptps, buffer, blen)) {
1411 while((len = recv(sock, line, sizeof(line), 0))) {
1413 if(sockwouldblock(sockerrno)) {
1419 // If socket has been shut down, recv() on Windows returns -1 and sets sockerrno
1420 // to WSAESHUTDOWN, while on UNIX-like operating systems recv() returns 0, so we
1421 // have to do an explicit check here.
1422 if(sockshutdown(sockerrno)) {
1427 fprintf(stderr, "Error reading data from %s port %s: %s\n", address, port, sockstrerror(sockerrno));
1435 size_t done = sptps_receive_data(&sptps, p, len);
1442 len -= (ssize_t) done;
1454 fprintf(stderr, "Invitation cancelled.\n");
1461 fprintf(stderr, "Invalid invitation URL.\n");