X-Git-Url: http://git.meshlink.io/?p=meshlink;a=blobdiff_plain;f=src%2Fprotocol_edge.c;h=c42a10d28701825adef6440f3ccd3b82a4c96e7f;hp=5d81462b6c9bb019914860b82885f8ae35bc8286;hb=963c5055505f2fc117cd5efa06eaa02c9b2bf85d;hpb=ea415ccc1690d6e5864a7500977b181e5c8faafe

diff --git a/src/protocol_edge.c b/src/protocol_edge.c
index 5d81462b..c42a10d2 100644
--- a/src/protocol_edge.c
+++ b/src/protocol_edge.c
@@ -1,8 +1,6 @@
 /*
     protocol_edge.c -- handle the meta-protocol, edges
-    Copyright (C) 1999-2005 Ivo Timmermans,
-                  2000-2009 Guus Sliepen <guus@tinc-vpn.org>
-                  2009      Michael Tokarev <mjt@corpit.ru>
+    Copyright (C) 2014 Guus Sliepen <guus@meshlink.io>
 
     This program is free software; you can redistribute it and/or modify
     it under the terms of the GNU General Public License as published by
@@ -21,12 +19,12 @@
 
 #include "system.h"
 
-#include "avl_tree.h"
 #include "conf.h"
 #include "connection.h"
 #include "edge.h"
 #include "graph.h"
 #include "logger.h"
+#include "meshlink_internal.h"
 #include "meta.h"
 #include "net.h"
 #include "netutl.h"
@@ -34,78 +32,163 @@
 #include "protocol.h"
 #include "utils.h"
 #include "xalloc.h"
+#include "submesh.h"
 
-bool send_add_edge(connection_t *c, const edge_t *e) {
+bool send_add_edge(meshlink_handle_t *mesh, connection_t *c, const edge_t *e, int contradictions) {
 	bool x;
 	char *address, *port;
+	char *from_submesh, *to_submesh;
+	submesh_t *s = NULL;
+
+	if(c->node && c->node->submesh) {
+		if(!submesh_allows_node(e->from->submesh, c->node)) {
+			return true;
+		}
+
+		if(!submesh_allows_node(e->to->submesh, c->node)) {
+			return true;
+		}
+	}
+
+	if(e->from->submesh && e->to->submesh && (e->from->submesh != e->to->submesh)) {
+		return true;
+	}
 
 	sockaddr2str(&e->address, &address, &port);
 
-	x = send_request(c, "%d %x %s %s %s %s %x %d", ADD_EDGE, rand(),
-					 e->from->name, e->to->name, address, port,
-					 e->options, e->weight);
+	if(e->from->submesh) {
+		from_submesh = e->from->submesh->name;
+	} else {
+		from_submesh = CORE_MESH;
+	}
+
+	if(e->to->submesh) {
+		to_submesh = e->to->submesh->name;
+	} else {
+		to_submesh = CORE_MESH;
+	}
+
+	if(e->from->submesh) {
+		s = e->from->submesh;
+	} else {
+		s = e->to->submesh;
+	}
+
+	x = send_request(mesh, c, s, "%d %x %s %d %s %s %s %s %d %s %x %d %d %x", ADD_EDGE, prng(mesh, UINT_MAX),
+	                 e->from->name, e->from->devclass, from_submesh, e->to->name, address, port,
+	                 e->to->devclass, to_submesh, OPTION_PMTU_DISCOVERY, e->weight, contradictions, e->from->session_id);
 	free(address);
 	free(port);
 
 	return x;
 }
 
-bool add_edge_h(connection_t *c) {
+bool add_edge_h(meshlink_handle_t *mesh, connection_t *c, const char *request) {
+	assert(request);
+	assert(*request);
+
 	edge_t *e;
 	node_t *from, *to;
 	char from_name[MAX_STRING_SIZE];
+	int from_devclass;
+	char from_submesh_name[MAX_STRING_SIZE] = "";
 	char to_name[MAX_STRING_SIZE];
 	char to_address[MAX_STRING_SIZE];
 	char to_port[MAX_STRING_SIZE];
+	int to_devclass;
+	char to_submesh_name[MAX_STRING_SIZE] = "";
 	sockaddr_t address;
-	uint32_t options;
 	int weight;
-
-	if(sscanf(c->buffer, "%*d %*x "MAX_STRING" "MAX_STRING" "MAX_STRING" "MAX_STRING" %x %d",
-			  from_name, to_name, to_address, to_port, &options, &weight) != 6) {
-		logger(LOG_ERR, "Got bad %s from %s (%s)", "ADD_EDGE", c->name,
-			   c->hostname);
+	int contradictions = 0;
+	uint32_t session_id = 0;
+	submesh_t *s = NULL;
+
+	if(sscanf(request, "%*d %*x "MAX_STRING" %d "MAX_STRING" "MAX_STRING" "MAX_STRING" "MAX_STRING" %d "MAX_STRING" %*x %d %d %x",
+	                from_name, &from_devclass, from_submesh_name, to_name, to_address, to_port, &to_devclass, to_submesh_name,
+	                &weight, &contradictions, &session_id) < 9) {
+		logger(mesh, MESHLINK_ERROR, "Got bad %s from %s", "ADD_EDGE", c->name);
 		return false;
 	}
 
-	/* Check if names are valid */
+	// Check if devclasses are valid
 
-	if(!check_id(from_name) || !check_id(to_name)) {
-		logger(LOG_ERR, "Got bad %s from %s (%s): %s", "ADD_EDGE", c->name,
-			   c->hostname, "invalid name");
+	if(from_devclass < 0 || from_devclass >= DEV_CLASS_COUNT) {
+		logger(mesh, MESHLINK_ERROR, "Got bad %s from %s: %s", "ADD_EDGE", c->name, "from devclass invalid");
 		return false;
 	}
 
-	if(seen_request(c->buffer))
-		return true;
+	if(to_devclass < 0 || to_devclass >= DEV_CLASS_COUNT) {
+		logger(mesh, MESHLINK_ERROR, "Got bad %s from %s: %s", "ADD_EDGE", c->name, "to devclass invalid");
+		return false;
+	}
 
-	/* Lookup nodes */
+	if(0 == strcmp(from_submesh_name, "")) {
+		logger(mesh, MESHLINK_ERROR, "Got bad %s from %s: %s", "ADD_EDGE", c->name, "invalid submesh id");
+		return false;
+	}
 
-	from = lookup_node(from_name);
-	to = lookup_node(to_name);
+	if(0 == strcmp(to_submesh_name, "")) {
+		logger(mesh, MESHLINK_ERROR, "Got bad %s from %s: %s", "ADD_EDGE", c->name, "invalid submesh id");
+		return false;
+	}
 
-	if(tunnelserver &&
-	   from != myself && from != c->node &&
-	   to != myself && to != c->node) {
-		/* ignore indirect edge registrations for tunnelserver */
-		ifdebug(PROTOCOL) logger(LOG_WARNING,
-		   "Ignoring indirect %s from %s (%s)",
-		   "ADD_EDGE", c->name, c->hostname);
+	if(seen_request(mesh, request)) {
 		return true;
 	}
 
+	/* Lookup nodes */
+
+	from = lookup_node(mesh, from_name);
+	to = lookup_node(mesh, to_name);
+
 	if(!from) {
 		from = new_node();
+		from->status.dirty = true;
+		from->status.blacklisted = mesh->default_blacklist;
 		from->name = xstrdup(from_name);
-		node_add(from);
+		from->devclass = from_devclass;
+
+		from->submesh = NULL;
+
+		if(0 != strcmp(from_submesh_name, CORE_MESH)) {
+			if(!(from->submesh = lookup_or_create_submesh(mesh, from_submesh_name))) {
+				return false;
+			}
+		}
+
+		node_add(mesh, from);
+	}
+
+	if(contradictions > 50) {
+		handle_duplicate_node(mesh, from);
+	}
+
+	from->devclass = from_devclass;
+
+	if(!from->session_id) {
+		from->session_id = session_id;
 	}
 
 	if(!to) {
 		to = new_node();
+		to->status.dirty = true;
+		to->status.blacklisted = mesh->default_blacklist;
 		to->name = xstrdup(to_name);
-		node_add(to);
+		to->devclass = to_devclass;
+
+		to->submesh = NULL;
+
+		if(0 != strcmp(to_submesh_name, CORE_MESH)) {
+			if(!(to->submesh = lookup_or_create_submesh(mesh, to_submesh_name))) {
+				return false;
+
+			}
+		}
+
+		node_add(mesh, to);
 	}
 
+	to->devclass = to_devclass;
 
 	/* Convert addresses */
 
@@ -116,28 +199,26 @@ bool add_edge_h(connection_t *c) {
 	e = lookup_edge(from, to);
 
 	if(e) {
-		if(e->weight != weight || e->options != options || sockaddrcmp(&e->address, &address)) {
-			if(from == myself) {
-				ifdebug(PROTOCOL) logger(LOG_WARNING, "Got %s from %s (%s) for ourself which does not match existing entry",
-						   "ADD_EDGE", c->name, c->hostname);
-				send_add_edge(c, e);
+		if(e->weight != weight || e->session_id != session_id || sockaddrcmp(&e->address, &address)) {
+			if(from == mesh->self) {
+				logger(mesh, MESHLINK_DEBUG, "Got %s from %s for ourself which does not match existing entry", "ADD_EDGE", c->name);
+				send_add_edge(mesh, c, e, 0);
 				return true;
 			} else {
-				ifdebug(PROTOCOL) logger(LOG_WARNING, "Got %s from %s (%s) which does not match existing entry",
-						   "ADD_EDGE", c->name, c->hostname);
-				edge_del(e);
-				graph();
+				logger(mesh, MESHLINK_DEBUG, "Got %s from %s which does not match existing entry", "ADD_EDGE", c->name);
+				edge_del(mesh, e);
 			}
-		} else
+		} else {
 			return true;
-	} else if(from == myself) {
-		ifdebug(PROTOCOL) logger(LOG_WARNING, "Got %s from %s (%s) for ourself which does not exist",
-				   "ADD_EDGE", c->name, c->hostname);
-		contradicting_add_edge++;
+		}
+	} else if(from == mesh->self) {
+		logger(mesh, MESHLINK_WARNING, "Got %s from %s for ourself which does not exist", "ADD_EDGE", c->name);
+		mesh->contradicting_add_edge++;
 		e = new_edge();
 		e->from = from;
 		e->to = to;
-		send_del_edge(c, e);
+		e->session_id = session_id;
+		send_del_edge(mesh, c, e, mesh->contradicting_add_edge);
 		free_edge(e);
 		return true;
 	}
@@ -146,116 +227,150 @@ bool add_edge_h(connection_t *c) {
 	e->from = from;
 	e->to = to;
 	e->address = address;
-	e->options = options;
 	e->weight = weight;
-	edge_add(e);
+	e->session_id = session_id;
+	edge_add(mesh, e);
 
-	/* Tell the rest about the new edge */
+	/* Run MST before or after we tell the rest? */
 
-	if(!tunnelserver)
-		forward_request(c);
+	graph(mesh);
 
-	/* Run MST before or after we tell the rest? */
+	if(e->from->submesh && e->to->submesh && (e->from->submesh != e->to->submesh)) {
+		logger(mesh, MESHLINK_ERROR, "Dropping add edge ( %s to %s )", e->from->submesh->name, e->to->submesh->name);
+		return false;
+	}
+
+	if(e->from->submesh) {
+		s = e->from->submesh;
+	} else {
+		s = e->to->submesh;
+	}
+
+	/* Tell the rest about the new edge */
 
-	graph();
+	forward_request(mesh, c, s, request);
 
 	return true;
 }
 
-bool send_del_edge(connection_t *c, const edge_t *e) {
-	return send_request(c, "%d %x %s %s", DEL_EDGE, rand(),
-						e->from->name, e->to->name);
+bool send_del_edge(meshlink_handle_t *mesh, connection_t *c, const edge_t *e, int contradictions) {
+	submesh_t *s = NULL;
+
+	if(c->node && c->node->submesh) {
+		if(!submesh_allows_node(e->from->submesh, c->node)) {
+			return true;
+		}
+
+		if(!submesh_allows_node(e->to->submesh, c->node)) {
+			return true;
+		}
+	}
+
+	if(e->from->submesh && e->to->submesh && (e->from->submesh != e->to->submesh)) {
+		return true;
+	}
+
+
+	if(e->from->submesh) {
+		s = e->from->submesh;
+	} else {
+		s = e->to->submesh;
+	}
+
+	return send_request(mesh, c, s, "%d %x %s %s %d %x", DEL_EDGE, prng(mesh, UINT_MAX),
+	                    e->from->name, e->to->name, contradictions, e->session_id);
 }
 
-bool del_edge_h(connection_t *c) {
+bool del_edge_h(meshlink_handle_t *mesh, connection_t *c, const char *request) {
+	assert(request);
+	assert(*request);
+
 	edge_t *e;
 	char from_name[MAX_STRING_SIZE];
 	char to_name[MAX_STRING_SIZE];
 	node_t *from, *to;
+	int contradictions = 0;
+	uint32_t session_id = 0;
+	submesh_t *s = NULL;
 
-	if(sscanf(c->buffer, "%*d %*x "MAX_STRING" "MAX_STRING, from_name, to_name) != 2) {
-		logger(LOG_ERR, "Got bad %s from %s (%s)", "DEL_EDGE", c->name,
-			   c->hostname);
+	if(sscanf(request, "%*d %*x "MAX_STRING" "MAX_STRING" %d %x", from_name, to_name, &contradictions, &session_id) < 2) {
+		logger(mesh, MESHLINK_ERROR, "Got bad %s from %s", "DEL_EDGE", c->name);
 		return false;
 	}
 
-	/* Check if names are valid */
-
-	if(!check_id(from_name) || !check_id(to_name)) {
-		logger(LOG_ERR, "Got bad %s from %s (%s): %s", "DEL_EDGE", c->name,
-			   c->hostname, "invalid name");
-		return false;
-	}
-
-	if(seen_request(c->buffer))
+	if(seen_request(mesh, request)) {
 		return true;
+	}
 
 	/* Lookup nodes */
 
-	from = lookup_node(from_name);
-	to = lookup_node(to_name);
-
-	if(tunnelserver &&
-	   from != myself && from != c->node &&
-	   to != myself && to != c->node) {
-		/* ignore indirect edge registrations for tunnelserver */
-		ifdebug(PROTOCOL) logger(LOG_WARNING,
-		   "Ignoring indirect %s from %s (%s)",
-		   "DEL_EDGE", c->name, c->hostname);
-		return true;
-	}
+	from = lookup_node(mesh, from_name);
+	to = lookup_node(mesh, to_name);
 
 	if(!from) {
-		ifdebug(PROTOCOL) logger(LOG_ERR, "Got %s from %s (%s) which does not appear in the edge tree",
-				   "DEL_EDGE", c->name, c->hostname);
+		logger(mesh, MESHLINK_WARNING, "Got %s from %s which does not appear in the edge tree", "DEL_EDGE", c->name);
 		return true;
 	}
 
 	if(!to) {
-		ifdebug(PROTOCOL) logger(LOG_ERR, "Got %s from %s (%s) which does not appear in the edge tree",
-				   "DEL_EDGE", c->name, c->hostname);
+		logger(mesh, MESHLINK_WARNING, "Got %s from %s which does not appear in the edge tree", "DEL_EDGE", c->name);
 		return true;
 	}
 
+	if(contradictions > 50) {
+		handle_duplicate_node(mesh, from);
+	}
+
 	/* Check if edge exists */
 
 	e = lookup_edge(from, to);
 
 	if(!e) {
-		ifdebug(PROTOCOL) logger(LOG_WARNING, "Got %s from %s (%s) which does not appear in the edge tree",
-				   "DEL_EDGE", c->name, c->hostname);
+		logger(mesh, MESHLINK_WARNING, "Got %s from %s which does not appear in the edge tree", "DEL_EDGE", c->name);
 		return true;
 	}
 
-	if(e->from == myself) {
-		ifdebug(PROTOCOL) logger(LOG_WARNING, "Got %s from %s (%s) for ourself",
-				   "DEL_EDGE", c->name, c->hostname);
-		contradicting_del_edge++;
-		send_add_edge(c, e);	/* Send back a correction */
+	if(e->from == mesh->self) {
+		logger(mesh, MESHLINK_WARNING, "Got %s from %s for ourself", "DEL_EDGE", c->name);
+		mesh->contradicting_del_edge++;
+		send_add_edge(mesh, c, e, mesh->contradicting_del_edge);    /* Send back a correction */
 		return true;
 	}
 
 	/* Tell the rest about the deleted edge */
 
-	if(!tunnelserver)
-		forward_request(c);
+
+	if(!e->from->submesh || !e->to->submesh || (e->from->submesh == e->to->submesh)) {
+		if(e->from->submesh) {
+			s = e->from->submesh;
+		} else {
+			s = e->to->submesh;
+		}
+
+		/* Tell the rest about the deleted edge */
+		forward_request(mesh, c, s, request);
+
+	} else {
+		logger(mesh, MESHLINK_ERROR, "Dropping del edge ( %s to %s )", e->from->submesh->name, e->to->submesh->name);
+		return false;
+	}
 
 	/* Delete the edge */
 
-	edge_del(e);
+	edge_del(mesh, e);
 
 	/* Run MST before or after we tell the rest? */
 
-	graph();
+	graph(mesh);
 
 	/* If the node is not reachable anymore but we remember it had an edge to us, clean it up */
 
 	if(!to->status.reachable) {
-		e = lookup_edge(to, myself);
+		e = lookup_edge(to, mesh->self);
+
 		if(e) {
-			if(!tunnelserver)
-				send_del_edge(everyone, e);
-			edge_del(e);
+			send_del_edge(mesh, mesh->everyone, e, 0);
+			edge_del(mesh, e);
 		}
 	}