Keep last known address and time since reachability changed.
[tinc] / src / node.c
1 /*
2     node.c -- node tree management
3     Copyright (C) 2001-2011 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 "hash.h"
25 #include "logger.h"
26 #include "net.h"
27 #include "netutl.h"
28 #include "node.h"
29 #include "splay_tree.h"
30 #include "utils.h"
31 #include "xalloc.h"
32
33 splay_tree_t *node_tree;                        /* Known nodes, sorted by name */
34 static hash_t *node_udp_cache;
35
36 node_t *myself;
37
38 static int node_compare(const node_t *a, const node_t *b) {
39         return strcmp(a->name, b->name);
40 }
41
42 void init_nodes(void) {
43         node_tree = splay_alloc_tree((splay_compare_t) node_compare, (splay_action_t) free_node);
44         node_udp_cache = hash_alloc(0x100, sizeof(sockaddr_t));
45 }
46
47 void exit_nodes(void) {
48         hash_free(node_udp_cache);
49         splay_delete_tree(node_tree);
50 }
51
52 node_t *new_node(void) {
53         node_t *n = xmalloc_and_zero(sizeof *n);
54
55         if(replaywin) n->late = xmalloc_and_zero(replaywin);
56         n->subnet_tree = new_subnet_tree();
57         n->edge_tree = new_edge_tree();
58         n->mtu = MTU;
59         n->maxmtu = MTU;
60
61         return n;
62 }
63
64 void free_node(node_t *n) {
65         if(n->subnet_tree)
66                 free_subnet_tree(n->subnet_tree);
67
68         if(n->edge_tree)
69                 free_edge_tree(n->edge_tree);
70
71         sockaddrfree(&n->address);
72
73         cipher_close(&n->incipher);
74         digest_close(&n->indigest);
75         cipher_close(&n->outcipher);
76         digest_close(&n->outdigest);
77
78         ecdsa_free(&n->ecdsa);
79         sptps_stop(&n->sptps);
80
81         if(timeout_initialized(&n->mtuevent))
82                 event_del(&n->mtuevent);
83         
84         if(n->hostname)
85                 free(n->hostname);
86
87         if(n->name)
88                 free(n->name);
89
90         if(n->late)
91                 free(n->late);
92
93         free(n);
94 }
95
96 void node_add(node_t *n) {
97         splay_insert(node_tree, n);
98 }
99
100 void node_del(node_t *n) {
101         splay_node_t *node, *next;
102         edge_t *e;
103         subnet_t *s;
104
105         for(node = n->subnet_tree->head; node; node = next) {
106                 next = node->next;
107                 s = node->data;
108                 subnet_del(n, s);
109         }
110
111         for(node = n->edge_tree->head; node; node = next) {
112                 next = node->next;
113                 e = node->data;
114                 edge_del(e);
115         }
116
117         splay_delete(node_tree, n);
118 }
119
120 node_t *lookup_node(char *name) {
121         node_t n = {NULL};
122
123         n.name = name;
124
125         return splay_search(node_tree, &n);
126 }
127
128 node_t *lookup_node_udp(const sockaddr_t *sa) {
129         return hash_search(node_udp_cache, sa);
130 }
131
132 void update_node_udp(node_t *n, const sockaddr_t *sa) {
133         if(n == myself) {
134                 logger(DEBUG_ALWAYS, LOG_WARNING, "Trying to update UDP address of myself!");
135                 return;
136         }
137
138         hash_insert(node_udp_cache, &n->address, NULL);
139
140         if(sa) {
141                 n->address = *sa;
142                 hash_insert(node_udp_cache, sa, n);
143                 free(n->hostname);
144                 n->hostname = sockaddr2hostname(&n->address);
145                 logger(DEBUG_PROTOCOL, LOG_DEBUG, "UDP address of %s set to %s", n->name, n->hostname);
146         }
147 }
148
149 bool dump_nodes(connection_t *c) {
150         splay_node_t *node;
151         node_t *n;
152
153         for(node = node_tree->head; node; node = node->next) {
154                 n = node->data;
155                 send_request(c, "%d %d %s at %s cipher %d digest %d maclength %d compression %d options %x status %04x nexthop %s via %s distance %d pmtu %hd (min %hd max %hd) %ld", CONTROL, REQ_DUMP_NODES,
156                            n->name, n->hostname, cipher_get_nid(&n->outcipher),
157                            digest_get_nid(&n->outdigest), (int)digest_length(&n->outdigest), n->outcompression,
158                            n->options, bitfield_to_int(&n->status, sizeof n->status), n->nexthop ? n->nexthop->name : "-",
159                            n->via ? n->via->name ?: "-" : "-", n->distance, n->mtu, n->minmtu, n->maxmtu, (long)n->last_state_change);
160         }
161
162         return send_request(c, "%d %d", CONTROL, REQ_DUMP_NODES);
163 }
164
165 bool dump_traffic(connection_t *c) {
166         splay_node_t *node;
167         node_t *n;
168
169         for(node = node_tree->head; node; node = node->next) {
170                 n = node->data;
171                 send_request(c, "%d %d %s %"PRIu64" %"PRIu64" %"PRIu64" %"PRIu64, CONTROL, REQ_DUMP_TRAFFIC,
172                            n->name, n->in_packets, n->in_bytes, n->out_packets, n->out_bytes);
173         }
174
175         return send_request(c, "%d %d", CONTROL, REQ_DUMP_TRAFFIC);
176 }