Fix a few small memory leaks.
[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 "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         ecdh_free(&n->ecdh);
89         ecdsa_free(&n->ecdsa);
90
91         if(timeout_initialized(&n->mtuevent))
92                 event_del(&n->mtuevent);
93         
94         if(n->hostname)
95                 free(n->hostname);
96
97         if(n->name)
98                 free(n->name);
99
100         if(n->late)
101                 free(n->late);
102
103         free(n);
104 }
105
106 void node_add(node_t *n) {
107         splay_insert(node_tree, n);
108 }
109
110 void node_del(node_t *n) {
111         splay_node_t *node, *next;
112         edge_t *e;
113         subnet_t *s;
114
115         for(node = n->subnet_tree->head; node; node = next) {
116                 next = node->next;
117                 s = node->data;
118                 subnet_del(n, s);
119         }
120
121         for(node = n->edge_tree->head; node; node = next) {
122                 next = node->next;
123                 e = node->data;
124                 edge_del(e);
125         }
126
127         splay_delete(node_udp_tree, n);
128         splay_delete(node_tree, n);
129 }
130
131 node_t *lookup_node(char *name) {
132         node_t n = {NULL};
133
134         n.name = name;
135
136         return splay_search(node_tree, &n);
137 }
138
139 node_t *lookup_node_udp(const sockaddr_t *sa) {
140         node_t n = {NULL};
141
142         n.address = *sa;
143         n.name = NULL;
144
145         return splay_search(node_udp_tree, &n);
146 }
147
148 void update_node_udp(node_t *n, const sockaddr_t *sa) {
149         if(n == myself) {
150                 logger(LOG_WARNING, "Trying to update UDP address of myself!");
151                 return;
152         }
153
154         splay_delete(node_udp_tree, n);
155
156         if(n->hostname)
157                 free(n->hostname);
158
159         if(sa) {
160                 n->address = *sa;
161                 n->hostname = sockaddr2hostname(&n->address);
162                 splay_insert(node_udp_tree, n);
163                 ifdebug(PROTOCOL) logger(LOG_DEBUG, "UDP address of %s set to %s", n->name, n->hostname);
164         } else {
165                 memset(&n->address, 0, sizeof n->address);
166                 n->hostname = NULL;
167                 ifdebug(PROTOCOL) logger(LOG_DEBUG, "UDP address of %s cleared", n->name);
168         }
169 }
170
171 bool dump_nodes(connection_t *c) {
172         splay_node_t *node;
173         node_t *n;
174
175         for(node = node_tree->head; node; node = node->next) {
176                 n = node->data;
177                 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,
178                            n->name, n->hostname, cipher_get_nid(&n->outcipher),
179                            digest_get_nid(&n->outdigest), (int)digest_length(&n->outdigest), n->outcompression,
180                            n->options, bitfield_to_int(&n->status, sizeof n->status), n->nexthop ? n->nexthop->name : "-",
181                            n->via ? n->via->name ?: "-" : "-", n->distance, n->mtu, n->minmtu, n->maxmtu);
182         }
183
184         return send_request(c, "%d %d", CONTROL, REQ_DUMP_NODES);
185 }
186
187 bool dump_traffic(connection_t *c) {
188         splay_node_t *node;
189         node_t *n;
190
191         for(node = node_tree->head; node; node = node->next) {
192                 n = node->data;
193                 send_request(c, "%d %d %s %"PRIu64" %"PRIu64" %"PRIu64" %"PRIu64, CONTROL, REQ_DUMP_TRAFFIC,
194                            n->name, n->in_packets, n->in_bytes, n->out_packets, n->out_bytes);
195         }
196
197         return send_request(c, "%d %d", CONTROL, REQ_DUMP_TRAFFIC);
198 }