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
17     along with this program; if not, write to the Free Software
18     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
19
20     $Id$
21 */
22
23 #include "system.h"
24
25 #include "splay_tree.h"
26 #include "logger.h"
27 #include "net.h"
28 #include "netutl.h"
29 #include "node.h"
30 #include "utils.h"
31 #include "xalloc.h"
32
33 splay_tree_t *node_tree;                        /* Known nodes, sorted by name */
34 splay_tree_t *node_udp_tree;            /* Known nodes, sorted by address and port */
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 static int node_udp_compare(const node_t *a, const node_t *b) {
43         int result;
44
45         cp();
46
47         result = sockaddrcmp(&a->address, &b->address);
48
49         if(result)
50                 return result;
51
52         return (a->name && b->name) ? strcmp(a->name, b->name) : 0;
53 }
54
55 void init_nodes(void) {
56         cp();
57
58         node_tree = splay_alloc_tree((splay_compare_t) node_compare, (splay_action_t) free_node);
59         node_udp_tree = splay_alloc_tree((splay_compare_t) node_udp_compare, NULL);
60 }
61
62 void exit_nodes(void) {
63         cp();
64
65         splay_delete_tree(node_udp_tree);
66         splay_delete_tree(node_tree);
67 }
68
69 node_t *new_node(void) {
70         node_t *n = xmalloc_and_zero(sizeof *n);
71
72         cp();
73
74         n->subnet_tree = new_subnet_tree();
75         n->edge_tree = new_edge_tree();
76         n->mtu = MTU;
77         n->maxmtu = MTU;
78
79         return n;
80 }
81
82 void free_node(node_t *n) {
83         cp();
84
85         if(n->subnet_tree)
86                 free_subnet_tree(n->subnet_tree);
87
88         if(n->edge_tree)
89                 free_edge_tree(n->edge_tree);
90
91         sockaddrfree(&n->address);
92
93         cipher_close(&n->cipher);
94         digest_close(&n->digest);
95
96         event_del(&n->mtuevent);
97         
98         if(n->hostname)
99                 free(n->hostname);
100
101         if(n->name)
102                 free(n->name);
103
104         free(n);
105 }
106
107 void node_add(node_t *n) {
108         cp();
109
110         splay_insert(node_tree, n);
111 }
112
113 void node_del(node_t *n) {
114         splay_node_t *node, *next;
115         edge_t *e;
116         subnet_t *s;
117
118         cp();
119
120         for(node = n->subnet_tree->head; node; node = next) {
121                 next = node->next;
122                 s = node->data;
123                 subnet_del(n, s);
124         }
125
126         for(node = n->edge_tree->head; node; node = next) {
127                 next = node->next;
128                 e = node->data;
129                 edge_del(e);
130         }
131
132         splay_delete(node_tree, n);
133 }
134
135 node_t *lookup_node(char *name) {
136         node_t n = {0};
137
138         cp();
139         
140         n.name = name;
141
142         return splay_search(node_tree, &n);
143 }
144
145 node_t *lookup_node_udp(const sockaddr_t *sa) {
146         node_t n = {0};
147
148         cp();
149
150         n.address = *sa;
151         n.name = NULL;
152
153         return splay_search(node_udp_tree, &n);
154 }
155
156 int dump_nodes(struct evbuffer *out) {
157         splay_node_t *node;
158         node_t *n;
159
160         cp();
161
162         for(node = node_tree->head; node; node = node->next) {
163                 n = node->data;
164                 if(evbuffer_add_printf(out, _(" %s at %s cipher %d digest %d maclength %d compression %d options %lx status %04x nexthop %s via %s distance %d pmtu %d (min %d max %d)\n"),
165                            n->name, n->hostname, cipher_get_nid(&n->cipher),
166                            digest_get_nid(&n->digest), n->maclength, n->compression,
167                            n->options, *(uint32_t *)&n->status, n->nexthop ? n->nexthop->name : "-",
168                            n->via ? n->via->name : "-", n->distance, n->mtu, n->minmtu, n->maxmtu) == -1)
169                         return errno;
170         }
171
172         return 0;
173 }