along with this program; if not, write to the Free Software
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
- $Id: protocol.c,v 1.28.4.110 2001/10/28 08:41:19 guus Exp $
+ $Id: protocol.c,v 1.28.4.114 2001/10/30 16:34:32 guus Exp $
*/
#include "config.h"
#include "connection.h"
#include "node.h"
#include "edge.h"
+#include "graph.h"
#include "system.h"
{
/* ACK message contains rest of the information the other end needs
to create node_t and edge_t structures. */
+
+ struct timeval now;
+
+ /* Estimate weight */
+
+ gettimeofday(&now, NULL);
+ c->estimated_weight = (now.tv_sec - c->start.tv_sec) * 1000 + (now.tv_usec - c->start.tv_usec) / 1000;
cp
- return send_request(c, "%d %d", ACK, myself->port);
+ return send_request(c, "%d %hd %d", ACK, myself->port, c->estimated_weight);
}
int ack_h(connection_t *c)
{
port_t port;
+ int weight;
node_t *n;
subnet_t *s;
+ edge_t *e;
+ connection_t *other;
avl_node_t *node, *node2;
cp
- if(sscanf(c->buffer, "%*d %hd", &port) != 1)
+ if(sscanf(c->buffer, "%*d %hd %d", &port, &weight) != 2)
{
syslog(LOG_ERR, _("Got bad %s from %s (%s)"), "ACK", c->name, c->hostname);
return -1;
{
n = new_node();
n->name = xstrdup(c->name);
+ n->address = c->address;
n->hostname = xstrdup(c->hostname);
n->port = port;
*/
- /* Create a edge_t for this connection */
+ /* Create an edge_t for this connection */
c->edge = new_edge();
c->edge->from = myself;
c->edge->to = n;
- c->edge->metric = 1;
+ c->edge->weight = (weight + c->estimated_weight) / 2;
c->edge->connection = c;
edge_add(c->edge);
c->allow_request = ALL;
c->status.active = 1;
+ c->node->cipher = EVP_bf_cbc();
+ c->node->keylength = c->node->cipher->key_len + c->node->cipher->iv_len;
if(debug_lvl >= DEBUG_CONNECTIONS)
syslog(LOG_NOTICE, _("Connection with %s (%s) activated"), c->name, c->hostname);
if(n == c->node || n == myself)
continue;
- /* 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)
send_add_subnet(c, s);
}
}
+
+ /* Send all known edges */
+
+ for(node = edge_tree->head; node; node = node->next)
+ {
+ e = (edge_t *)node->data;
+
+ if(e == c->edge)
+ continue;
+
+ send_add_edge(c, e);
+ }
+
+ /* Notify others of this connection */
+
+ for(node = connection_tree->head; node; node = node->next)
+ {
+ other = (connection_t *)node->data;
+
+ if(other == c)
+ continue;
+
+ send_add_node(other, c->node);
+ send_add_edge(other, c->edge);
+ }
+
+ /* Run MST and SSSP algorithms */
+
+ mst_kruskal();
+ sssp_bfs();
cp
return 0;
}
if(n)
{
/* Check if it matches */
+
+ if(n->address != address || n->port != port)
+ syslog(LOG_DEBUG, _("Got %s from %s (%s) for %s which does not match existing entry"), "ADD_NODE", c->name, c->hostname, n->name);
+
+ return 0;
}
else
{
int del_node_h(connection_t *c)
{
node_t *n;
+ edge_t *e;
char name[MAX_STRING_SIZE];
ipv4_t address;
port_t port;
connection_t *other;
- avl_node_t *node;
+ avl_node_t *node, *next;
cp
if(sscanf(c->buffer, "%*d "MAX_STRING" %lx:%hd", name, &address, &port) != 3)
{
if(address != n->address || port != n->port)
{
- syslog(LOG_WARNING, _("Got %s from %s (%s) for %s which doesn't match"), "DEL_NODE", c->name, c->hostname, n->name);
- return 0;
+ syslog(LOG_WARNING, _("Got %s from %s (%s) for %s which does not match existing entry"), "DEL_NODE", c->name, c->hostname, n->name);
}
/* Tell the rest about the deleted node */
send_del_node(other, n);
}
+ /* Delete all edges associated with the node */
+
+ for(node = n->edge_tree->head; node; node = next)
+ {
+ next = node->next;
+ e = (edge_t *)node->data;
+ edge_del(e);
+ }
+
/* Delete the node */
node_del(n);
+
+ mst_kruskal();
+ sssp_bfs();
cp
return 0;
}
-/* Vertices */
+/* Edges */
-int send_add_edge(connection_t *c, edge_t *v)
+int send_add_edge(connection_t *c, edge_t *e)
{
cp
- return send_request(c, "%d %s %s %lx", ADD_NODE,
- v->from->name, v->to->name, v->options);
+ return send_request(c, "%d %s %s %lx %d", ADD_NODE,
+ e->from->name, e->to->name, e->options, e->weight);
}
int add_edge_h(connection_t *c)
{
connection_t *other;
- edge_t *v;
+ edge_t *e;
node_t *from, *to;
char from_name[MAX_STRING_SIZE];
char to_name[MAX_STRING_SIZE];
long int options;
+ int weight;
avl_node_t *node;
cp
- if(sscanf(c->buffer, "%*d "MAX_STRING" "MAX_STRING" %lx", from_name, to_name, &options) != 3)
+ if(sscanf(c->buffer, "%*d "MAX_STRING" "MAX_STRING" %lx %d", from_name, to_name, &options, &weight) != 4)
{
syslog(LOG_ERR, _("Got bad %s from %s (%s)"), "ADD_EDGE", c->name, c->hostname);
return -1;
return -1;
}
- /* Check if node already exists */
+ /* Check if edge already exists */
- v = lookup_edge(from, to);
+ e = lookup_edge(from, to);
- if(v)
+ if(e)
{
- /* Check if it matches */
+ if(e->weight != weight || e->options != options)
+ {
+ syslog(LOG_ERR, _("Got %s from %s (%s) which does not match existing entry"), "ADD_EDGE", c->name, c->hostname);
+ return -1;
+ }
+
+ return 0;
}
else
{
- v = new_edge();
- v->from = from;
- v->to = to;
- v->options = options;
- edge_add(v);
+ e = new_edge();
+ e->from = from;
+ e->to = to;
+ e->options = options;
+ e->weight = weight;
+ edge_add(e);
}
/* Tell the rest about the new edge */
{
other = (connection_t *)node->data;
if(other->status.active && other != c)
- send_add_edge(other, v);
+ send_add_edge(other, e);
}
+ /* Run MST before or after we tell the rest? */
+
+ mst_kruskal();
+ sssp_bfs();
cp
return 0;
}
-int send_del_edge(connection_t *c, edge_t *v)
+int send_del_edge(connection_t *c, edge_t *e)
{
cp
- return send_request(c, "%d %s %s %lx", DEL_EDGE,
- v->from->name, v->to->name, v->options);
+ return send_request(c, "%d %s %s %lx %d", DEL_EDGE,
+ e->from->name, e->to->name, e->options, e->weight);
}
int del_edge_h(connection_t *c)
{
- edge_t *v;
+ edge_t *e;
char from_name[MAX_STRING_SIZE];
char to_name[MAX_STRING_SIZE];
node_t *from, *to;
long int options;
+ int weight;
connection_t *other;
avl_node_t *node;
cp
- if(sscanf(c->buffer, "%*d "MAX_STRING" "MAX_STRING" %lx", from_name, to_name, &options) != 3)
+ if(sscanf(c->buffer, "%*d "MAX_STRING" "MAX_STRING" %lx %d", from_name, to_name, &options, &weight) != 4)
{
syslog(LOG_ERR, _("Got bad %s from %s (%s)"), "DEL_EDGE",
c->name, c->hostname);
/* Check if edge exists */
- v = lookup_edge(from, to);
+ e = lookup_edge(from, to);
- if(v)
+ if(e)
{
- /* Check if it matches */
+ if(e->weight != weight || e->options != options)
+ {
+ syslog(LOG_ERR, _("Got %s from %s (%s) which does not match existing entry"), "ADD_EDGE", c->name, c->hostname);
+ return -1;
+ }
}
else
{
{
other = (connection_t *)node->data;
if(other->status.active && other != c)
- send_del_edge(other, v);
+ send_del_edge(other, e);
}
/* Delete the edge */
- edge_del(v);
+ edge_del(e);
+
+ /* Run MST before or after we tell the rest? */
+
+ mst_kruskal();
+ sssp_bfs();
cp
return 0;
}