- {
- bin2hex(myhash, hishash, SHA_DIGEST_LENGTH);
- hishash[SHA_DIGEST_LENGTH*2] = '\0';
- syslog(LOG_DEBUG, _("Expected challenge reply: %s"), hishash);
- }
- return -1;
- }
-
- /* Identity has now been positively verified.
- Send an acknowledgement with the rest of the information needed.
- */
-
- c->allow_request = ACK;
-cp
- return send_ack(c);
-}
-
-int send_ack(connection_t *c)
-{
- /* ACK message contains rest of the information the other end needs
- to create node_t and vertex_t structures. */
-cp
- return send_request(c, "%d %d", ACK, myself->port);
-}
-
-int ack_h(connection_t *c)
-{
- port_t port;
- node_t *n;
- subnet_t *s;
- avl_node_t *node, *node2;
-cp
- if(sscanf(c->buffer, "%*d %hd", &port) != 1)
- {
- syslog(LOG_ERR, _("Got bad %s from %s"), "ACK", c->hostname);
- return -1;
- }
-
- /* Check if we already have a node_t for him */
-
- n = lookup_node(c->name);
-
- if(!n)
- {
- n = new_node();
- n->name = xstrdup(c->name);
- n->hostname = xstrdup(c->hostname);
- n->port = port;
-
- /* FIXME: Also check if no other tinc daemon uses the same IP and port for UDP traffic */
-
- node_add(n);
- }
- else
- {
- if(n->connection)
- {
- /* Oh dear, we already have a connection to this node. */
- syslog(LOG_DEBUG, _("Established a second connection with %s (%s), closing old connection"), n->name, n->hostname);
- terminate_connection(n->connection, 0);
- }
-
- /* FIXME: check if information in existing node matches that of the other end of this connection */
- }
-
- n->connection = c;
- c->node = n;
-
- /* Check some options
-
- if((cfg = get_config_val(c->config, config_indirectdata)))
- {
- if(cfg->data.val == stupid_true)
- c->options |= OPTION_INDIRECT;
- }
-
- if((cfg = get_config_val(c->config, config_tcponly)))
- {
- if(cfg->data.val == stupid_true)
- c->options |= OPTION_TCPONLY;
- }
-
- if((myself->options | c->options) & OPTION_INDIRECT)
- c->via = myself;
- else
- c->via = c;
-
- */
-
- /* Create a vertex_t for this connection */
-
- c->vertex = new_vertex();
-
- c->vertex->from = myself;
- c->vertex->to = n;
- c->vertex->metric = 1;
- c->vertex->connection = c;
-
- vertex_add(c->vertex);
-
- /* Activate this connection */
-
- c->allow_request = ALL;
-
- if(debug_lvl >= DEBUG_CONNECTIONS)
- syslog(LOG_NOTICE, _("Connection with %s (%s) activated"), c->name, c->hostname);
-
-cp
- /* Send him our subnets */
-
- for(node = myself->subnet_tree->head; node; node = node->next)
- {
- s = (subnet_t *)node->data;
- send_add_subnet(c, s);
- }
-
- /* And send him all known nodes and their subnets */
-
- for(node = node_tree->head; node; node = node->next)
- {
- n = (node_t *)node->data;
-
- if(n != c->node)
- {
- /* Notify others of this connection */
-
- if(n->connection)
- send_add_node(n->connection, c->node);
-
- /* Notify new connection of everything we know */
-
- send_add_node(c, n);
-
- for(node2 = c->node->subnet_tree->head; node2; node2 = node2->next)
- {
- s = (subnet_t *)node2->data;
- send_add_subnet(c, s);
- }
- }
- }
-cp
- return 0;
-}
-
-
-
-/* Address and subnet information exchange */
-
-int send_add_subnet(connection_t *c, subnet_t *subnet)
-{
- int x;
- char *netstr;
-cp
- x = send_request(c, "%d %s %s", ADD_SUBNET,
- subnet->owner->name, netstr = net2str(subnet));
- free(netstr);
-cp
- return x;
-}
-
-int add_subnet_h(connection_t *c)
-{
- char subnetstr[MAX_STRING_SIZE];
- char name[MAX_STRING_SIZE];
- node_t *owner;
- connection_t *other;
- subnet_t *s;
- avl_node_t *node;
-cp
- if(sscanf(c->buffer, "%*d "MAX_STRING" "MAX_STRING, name, subnetstr) != 2)
- {
- syslog(LOG_ERR, _("Got bad ADD_SUBNET from %s (%s)"), c->name, c->hostname);
- return -1;
- }
-
- /* Check if owner name is a valid */
-
- if(check_id(name))
- {
- syslog(LOG_ERR, _("Got bad ADD_SUBNET from %s (%s): invalid identity name"), c->name, c->hostname);
- return -1;
- }
-
- /* Check if subnet string is valid */
-
- if(!(s = str2net(subnetstr)))
- {
- syslog(LOG_ERR, _("Got bad ADD_SUBNET from %s (%s): invalid subnet string"), c->name, c->hostname);
- return -1;
- }
-
- /* Check if the owner of the new subnet is in the connection list */
-
- if(!(owner = lookup_node(name)))
- {
- syslog(LOG_ERR, _("Got ADD_SUBNET for %s from %s (%s) which is not in our connection list"),
- name, c->name, c->hostname);
- return -1;
- }
-
- /* If everything is correct, add the subnet to the list of the owner */
-
- subnet_add(owner, s);
-
- /* Tell the rest */
-
- for(node = connection_tree->head; node; node = node->next)
- {
- other = (connection_t *)node->data;
- if(other->status.active && other != c)
- send_add_subnet(other, s);
- }
-cp
- return 0;
-}
-
-int send_del_subnet(connection_t *c, subnet_t *s)
-{
- int x;
- char *netstr;
-cp
- x = send_request(c, "%d %s %s", DEL_SUBNET, s->owner->name, netstr = net2str(s));
- free(netstr);
-cp
- return x;
-}
-
-int del_subnet_h(connection_t *c)
-{
- char subnetstr[MAX_STRING_SIZE];
- char name[MAX_STRING_SIZE];
- node_t *owner;
- connection_t *other;
- subnet_t *s, *find;
- avl_node_t *node;
-cp
- if(sscanf(c->buffer, "%*d "MAX_STRING" "MAX_STRING, name, subnetstr) != 3)
- {
- syslog(LOG_ERR, _("Got bad DEL_SUBNET from %s (%s)"), c->name, c->hostname);
- return -1;
- }
-
- /* Check if owner name is a valid */
-
- if(check_id(name))
- {
- syslog(LOG_ERR, _("Got bad DEL_SUBNET from %s (%s): invalid identity name"), c->name, c->hostname);
- return -1;
- }
-
- /* Check if subnet string is valid */
-
- if(!(s = str2net(subnetstr)))
- {
- syslog(LOG_ERR, _("Got bad DEL_SUBNET from %s (%s): invalid subnet string"), c->name, c->hostname);
- return -1;
- }
-
- /* Check if the owner of the new subnet is in the connection list */
-
- if(!(owner = lookup_node(name)))
- {
- syslog(LOG_ERR, _("Got DEL_SUBNET for %s from %s (%s) which is not in our connection list"),
- name, c->name, c->hostname);
- return -1;
- }
-
- /* If everything is correct, delete the subnet from the list of the owner */
-
- find = lookup_subnet(owner, s);
-
- if(!find)
- {
- syslog(LOG_ERR, _("Got DEL_SUBNET for %s from %s (%s) which does not appear in his subnet tree"),
- name, c->name, c->hostname);
- return -1;
- }
-
- subnet_del(owner, s);
-
- /* Tell the rest */
-
- for(node = connection_tree->head; node; node = node->next)
- {
- other = (connection_t *)node->data;
- if(other->status.active && other != c)
- send_del_subnet(other, s);
- }
-cp
- return 0;
-}
-
-/* New and closed connections notification */
-
-int send_add_node(connection_t *c, node_t *n)
-{
-cp
- return send_request(c, "%d %s %lx:%d", ADD_NODE,
- n->name, n->address, n->port);
-}
-
-int add_node_h(connection_t *c)
-{
- connection_t *other;
- node_t *n;
- char name[MAX_STRING_SIZE];
- ipv4_t address;
- port_t port;
- avl_node_t *node;
-cp
- if(sscanf(c->buffer, "%*d "MAX_STRING" %lx:%hd", name, &address, &port) != 3)
- {
- syslog(LOG_ERR, _("Got bad ADD_NODE from %s (%s)"), c->name, c->hostname);
- return -1;
- }
-
- /* Check if identity is a valid name */
-
- if(check_id(name))
- {
- syslog(LOG_ERR, _("Got bad ADD_NODE from %s (%s): invalid identity name"), c->name, c->hostname);
- return -1;
- }
-
- /* Check if somebody tries to add ourself */
-
- if(!strcmp(name, myself->name))
- {
- syslog(LOG_ERR, _("Got ADD_NODE from %s (%s) for ourself!"), c->name, c->hostname);
- return -1;
- }
-
- /* Check if node already exists */
-
- n = lookup_node(name);
-
- if(n)
- {
- /* Check if it matches */