Merge branch 'master' into 1.1
[tinc] / src / node.c
1 /*
2     node.c -- node tree management
3     Copyright (C) 2001-2009 Guus Sliepen <guus@tinc-vpn.org>,
4                   2001-2005 Ivo Timmermans
5
6     This program is free software; you can redistribute it and/or modify
7     it under the terms of the GNU General Public License as published by
8     the Free Software Foundation; either version 2 of the License, or
9     (at your option) any later version.
10
11     This program is distributed in the hope that it will be useful,
12     but WITHOUT ANY WARRANTY; without even the implied warranty of
13     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14     GNU General Public License for more details.
15
16     You should have received a copy of the GNU General Public License along
17     with this program; if not, write to the Free Software Foundation, Inc.,
18     51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
19 */
20
21 #include "system.h"
22
23 #include "control_common.h"
24 #include "splay_tree.h"
25 #include "logger.h"
26 #include "net.h"
27 #include "netutl.h"
28 #include "node.h"
29 #include "utils.h"
30 #include "xalloc.h"
31
32 splay_tree_t *node_tree;                        /* Known nodes, sorted by name */
33 splay_tree_t *node_udp_tree;            /* Known nodes, sorted by address and port */
34
35 node_t *myself;
36
37 static int node_compare(const node_t *a, const node_t *b) {
38         return strcmp(a->name, b->name);
39 }
40
41 static int node_udp_compare(const node_t *a, const node_t *b) {
42         int result;
43
44         result = sockaddrcmp(&a->address, &b->address);
45
46         if(result)
47                 return result;
48
49         return (a->name && b->name) ? strcmp(a->name, b->name) : 0;
50 }
51
52 void init_nodes(void) {
53         node_tree = splay_alloc_tree((splay_compare_t) node_compare, (splay_action_t) free_node);
54         node_udp_tree = splay_alloc_tree((splay_compare_t) node_udp_compare, NULL);
55 }
56
57 void exit_nodes(void) {
58         splay_delete_tree(node_udp_tree);
59         splay_delete_tree(node_tree);
60 }
61
62 node_t *new_node(void) {
63         node_t *n = xmalloc_and_zero(sizeof *n);
64
65         n->subnet_tree = new_subnet_tree();
66         n->edge_tree = new_edge_tree();
67         n->mtu = MTU;
68         n->maxmtu = MTU;
69
70         return n;
71 }
72
73 void free_node(node_t *n) {
74         if(n->subnet_tree)
75                 free_subnet_tree(n->subnet_tree);
76
77         if(n->edge_tree)
78                 free_edge_tree(n->edge_tree);
79
80         sockaddrfree(&n->address);
81
82         cipher_close(&n->incipher);
83         digest_close(&n->indigest);
84         cipher_close(&n->outcipher);
85         digest_close(&n->outdigest);
86
87         event_del(&n->mtuevent);
88         
89         if(n->hostname)
90                 free(n->hostname);
91
92         if(n->name)
93                 free(n->name);
94
95         free(n);
96 }
97
98 void node_add(node_t *n) {
99         splay_insert(node_tree, n);
100 }
101
102 void node_del(node_t *n) {
103         splay_node_t *node, *next;
104         edge_t *e;
105         subnet_t *s;
106
107         for(node = n->subnet_tree->head; node; node = next) {
108                 next = node->next;
109                 s = node->data;
110                 subnet_del(n, s);
111         }
112
113         for(node = n->edge_tree->head; node; node = next) {
114                 next = node->next;
115                 e = node->data;
116                 edge_del(e);
117         }
118
119         splay_delete(node_udp_tree, n);
120         splay_delete(node_tree, n);
121 }
122
123 node_t *lookup_node(char *name) {
124         node_t n = {0};
125
126         n.name = name;
127
128         return splay_search(node_tree, &n);
129 }
130
131 node_t *lookup_node_udp(const sockaddr_t *sa) {
132         node_t n = {0};
133
134         n.address = *sa;
135         n.name = NULL;
136
137         return splay_search(node_udp_tree, &n);
138 }
139
140 void update_node_udp(node_t *n, const sockaddr_t *sa) {
141         splay_delete(node_udp_tree, n);
142
143         if(n->hostname)
144                 free(n->hostname);
145
146         if(sa) {
147                 n->address = *sa;
148                 n->hostname = sockaddr2hostname(&n->address);
149                 splay_insert(node_udp_tree, n);
150                 logger(LOG_DEBUG, "UDP address of %s set to %s", n->name, n->hostname);
151         } else {
152                 memset(&n->address, 0, sizeof n->address);
153                 n->hostname = 0;
154                 ifdebug(PROTOCOL) logger(LOG_DEBUG, "UDP address of %s cleared", n->name);
155         }
156 }
157
158 bool dump_nodes(connection_t *c) {
159         splay_node_t *node;
160         node_t *n;
161
162         for(node = node_tree->head; node; node = node->next) {
163                 n = node->data;
164                 send_request(c, "%d %d %s at %s cipher %d digest %d maclength %zd compression %d options %x status %04x nexthop %s via %s distance %d pmtu %d (min %d max %d)", CONTROL, REQ_DUMP_NODES,
165                            n->name, n->hostname, cipher_get_nid(&n->outcipher),
166                            digest_get_nid(&n->outdigest), digest_length(&n->outdigest), n->outcompression,
167                            n->options, bitfield_to_int(&n->status, sizeof n->status), n->nexthop ? n->nexthop->name : "-",
168                            n->via ? n->via->name : "-", n->distance, n->mtu, n->minmtu, n->maxmtu);
169         }
170
171         return send_request(c, "%d %d", CONTROL, REQ_DUMP_NODES);
172 }