]> git.meshlink.io Git - meshlink/blob - src/node.c
Thank Scott Lamb, Sven-Haegar Koch and Loïc Grenié in the NEWS file.
[meshlink] / 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 "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         if(replaywin) n->late = xmalloc_and_zero(replaywin);
66         n->subnet_tree = new_subnet_tree();
67         n->edge_tree = new_edge_tree();
68         n->mtu = MTU;
69         n->maxmtu = MTU;
70
71         return n;
72 }
73
74 void free_node(node_t *n) {
75         if(n->subnet_tree)
76                 free_subnet_tree(n->subnet_tree);
77
78         if(n->edge_tree)
79                 free_edge_tree(n->edge_tree);
80
81         sockaddrfree(&n->address);
82
83         cipher_close(&n->incipher);
84         digest_close(&n->indigest);
85         cipher_close(&n->outcipher);
86         digest_close(&n->outdigest);
87
88         if(timeout_initialized(&n->mtuevent))
89                 event_del(&n->mtuevent);
90         
91         if(n->hostname)
92                 free(n->hostname);
93
94         if(n->name)
95                 free(n->name);
96
97         if(n->late)
98                 free(n->late);
99
100         free(n);
101 }
102
103 void node_add(node_t *n) {
104         splay_insert(node_tree, n);
105 }
106
107 void node_del(node_t *n) {
108         splay_node_t *node, *next;
109         edge_t *e;
110         subnet_t *s;
111
112         for(node = n->subnet_tree->head; node; node = next) {
113                 next = node->next;
114                 s = node->data;
115                 subnet_del(n, s);
116         }
117
118         for(node = n->edge_tree->head; node; node = next) {
119                 next = node->next;
120                 e = node->data;
121                 edge_del(e);
122         }
123
124         splay_delete(node_udp_tree, n);
125         splay_delete(node_tree, n);
126 }
127
128 node_t *lookup_node(char *name) {
129         node_t n = {NULL};
130
131         n.name = name;
132
133         return splay_search(node_tree, &n);
134 }
135
136 node_t *lookup_node_udp(const sockaddr_t *sa) {
137         node_t n = {NULL};
138
139         n.address = *sa;
140         n.name = NULL;
141
142         return splay_search(node_udp_tree, &n);
143 }
144
145 void update_node_udp(node_t *n, const sockaddr_t *sa) {
146         if(n == myself) {
147                 logger(LOG_WARNING, "Trying to update UDP address of myself!");
148                 return;
149         }
150
151         splay_delete(node_udp_tree, n);
152
153         if(n->hostname)
154                 free(n->hostname);
155
156         if(sa) {
157                 n->address = *sa;
158                 n->hostname = sockaddr2hostname(&n->address);
159                 splay_insert(node_udp_tree, n);
160                 ifdebug(PROTOCOL) logger(LOG_DEBUG, "UDP address of %s set to %s", n->name, n->hostname);
161         } else {
162                 memset(&n->address, 0, sizeof n->address);
163                 n->hostname = NULL;
164                 ifdebug(PROTOCOL) logger(LOG_DEBUG, "UDP address of %s cleared", n->name);
165         }
166 }
167
168 bool dump_nodes(connection_t *c) {
169         splay_node_t *node;
170         node_t *n;
171
172         for(node = node_tree->head; node; node = node->next) {
173                 n = node->data;
174                 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)", CONTROL, REQ_DUMP_NODES,
175                            n->name, n->hostname, cipher_get_nid(&n->outcipher),
176                            digest_get_nid(&n->outdigest), (int)digest_length(&n->outdigest), n->outcompression,
177                            n->options, bitfield_to_int(&n->status, sizeof n->status), n->nexthop ? n->nexthop->name : "-",
178                            n->via ? n->via->name ?: "-" : "-", n->distance, n->mtu, n->minmtu, n->maxmtu);
179         }
180
181         return send_request(c, "%d %d", CONTROL, REQ_DUMP_NODES);
182 }
183
184 bool dump_traffic(connection_t *c) {
185         splay_node_t *node;
186         node_t *n;
187
188         for(node = node_tree->head; node; node = node->next) {
189                 n = node->data;
190                 send_request(c, "%d %d %s %"PRIu64" %"PRIu64" %"PRIu64" %"PRIu64, CONTROL, REQ_DUMP_TRAFFIC,
191                            n->name, n->in_packets, n->in_bytes, n->out_packets, n->out_bytes);
192         }
193
194         return send_request(c, "%d %d", CONTROL, REQ_DUMP_TRAFFIC);
195 }