Add LogLevel config option
[tinc] / src / protocol_subnet.c
1 /*
2     protocol_subnet.c -- handle the meta-protocol, subnets
3     Copyright (C) 1999-2005 Ivo Timmermans,
4                   2000-2012 Guus Sliepen <guus@tinc-vpn.org>
5                   2009      Michael Tokarev <mjt@tls.msk.ru>
6
7     This program is free software; you can redistribute it and/or modify
8     it under the terms of the GNU General Public License as published by
9     the Free Software Foundation; either version 2 of the License, or
10     (at your option) any later version.
11
12     This program is distributed in the hope that it will be useful,
13     but WITHOUT ANY WARRANTY; without even the implied warranty of
14     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15     GNU General Public License for more details.
16
17     You should have received a copy of the GNU General Public License along
18     with this program; if not, write to the Free Software Foundation, Inc.,
19     51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
20 */
21
22 #include "system.h"
23
24 #include "conf.h"
25 #include "connection.h"
26 #include "logger.h"
27 #include "net.h"
28 #include "netutl.h"
29 #include "node.h"
30 #include "protocol.h"
31 #include "subnet.h"
32 #include "utils.h"
33 #include "xalloc.h"
34
35 bool send_add_subnet(connection_t *c, const subnet_t *subnet) {
36         char netstr[MAXNETSTR];
37
38         if(!net2str(netstr, sizeof netstr, subnet))
39                 return false;
40
41         return send_request(c, "%d %x %s %s", ADD_SUBNET, rand(), subnet->owner->name, netstr);
42 }
43
44 bool add_subnet_h(connection_t *c, const char *request) {
45         char subnetstr[MAX_STRING_SIZE];
46         char name[MAX_STRING_SIZE];
47         node_t *owner;
48         subnet_t s = {NULL}, *new, *old;
49
50         if(sscanf(request, "%*d %*x " MAX_STRING " " MAX_STRING, name, subnetstr) != 2) {
51                 logger(DEBUG_ALWAYS, LOG_ERR, "Got bad %s from %s (%s)", "ADD_SUBNET", c->name,
52                            c->hostname);
53                 return false;
54         }
55
56         /* Check if owner name is valid */
57
58         if(!check_id(name)) {
59                 logger(DEBUG_ALWAYS, LOG_ERR, "Got bad %s from %s (%s): %s", "ADD_SUBNET", c->name,
60                            c->hostname, "invalid name");
61                 return false;
62         }
63
64         /* Check if subnet string is valid */
65
66         if(!str2net(&s, subnetstr)) {
67                 logger(DEBUG_ALWAYS, LOG_ERR, "Got bad %s from %s (%s): %s", "ADD_SUBNET", c->name,
68                            c->hostname, "invalid subnet string");
69                 return false;
70         }
71
72         if(seen_request(request))
73                 return true;
74
75         /* Check if the owner of the new subnet is in the connection list */
76
77         owner = lookup_node(name);
78
79         if(tunnelserver && owner != myself && owner != c->node) {
80                 /* in case of tunnelserver, ignore indirect subnet registrations */
81                 logger(DEBUG_PROTOCOL, LOG_WARNING, "Ignoring indirect %s from %s (%s) for %s",
82                                    "ADD_SUBNET", c->name, c->hostname, subnetstr);
83                 return true;
84         }
85
86         if(!owner) {
87                 owner = new_node();
88                 owner->name = xstrdup(name);
89                 node_add(owner);
90         }
91
92         /* Check if we already know this subnet */
93
94         if(lookup_subnet(owner, &s))
95                 return true;
96
97         /* If we don't know this subnet, but we are the owner, retaliate with a DEL_SUBNET */
98
99         if(owner == myself) {
100                 logger(DEBUG_PROTOCOL, LOG_WARNING, "Got %s from %s (%s) for ourself",
101                                    "ADD_SUBNET", c->name, c->hostname);
102                 s.owner = myself;
103                 send_del_subnet(c, &s);
104                 return true;
105         }
106
107         /* In tunnel server mode, we should already know all allowed subnets */
108
109         if(tunnelserver) {
110                 logger(DEBUG_ALWAYS, LOG_WARNING, "Ignoring unauthorized %s from %s (%s): %s",
111                                 "ADD_SUBNET", c->name, c->hostname, subnetstr);
112                 return true;
113         }
114
115         /* Ignore if strictsubnets is true, but forward it to others */
116
117         if(strictsubnets) {
118                 logger(DEBUG_ALWAYS, LOG_WARNING, "Ignoring unauthorized %s from %s (%s): %s",
119                                 "ADD_SUBNET", c->name, c->hostname, subnetstr);
120                 forward_request(c, request);
121                 return true;
122         }
123
124         /* If everything is correct, add the subnet to the list of the owner */
125
126         *(new = new_subnet()) = s;
127         subnet_add(owner, new);
128
129         if(owner->status.reachable)
130                 subnet_update(owner, new, true);
131
132         /* Tell the rest */
133
134         if(!tunnelserver)
135                 forward_request(c, request);
136
137         /* Fast handoff of roaming MAC addresses */
138
139         if(s.type == SUBNET_MAC && owner != myself && (old = lookup_subnet(myself, &s)) && old->expires)
140                 old->expires = 1;
141
142         return true;
143 }
144
145 bool send_del_subnet(connection_t *c, const subnet_t *s) {
146         char netstr[MAXNETSTR];
147
148         if(!net2str(netstr, sizeof netstr, s))
149                 return false;
150
151         return send_request(c, "%d %x %s %s", DEL_SUBNET, rand(), s->owner->name, netstr);
152 }
153
154 bool del_subnet_h(connection_t *c, const char *request) {
155         char subnetstr[MAX_STRING_SIZE];
156         char name[MAX_STRING_SIZE];
157         node_t *owner;
158         subnet_t s = {NULL}, *find;
159
160         if(sscanf(request, "%*d %*x " MAX_STRING " " MAX_STRING, name, subnetstr) != 2) {
161                 logger(DEBUG_ALWAYS, LOG_ERR, "Got bad %s from %s (%s)", "DEL_SUBNET", c->name,
162                            c->hostname);
163                 return false;
164         }
165
166         /* Check if owner name is valid */
167
168         if(!check_id(name)) {
169                 logger(DEBUG_ALWAYS, LOG_ERR, "Got bad %s from %s (%s): %s", "DEL_SUBNET", c->name,
170                            c->hostname, "invalid name");
171                 return false;
172         }
173
174         /* Check if subnet string is valid */
175
176         if(!str2net(&s, subnetstr)) {
177                 logger(DEBUG_ALWAYS, LOG_ERR, "Got bad %s from %s (%s): %s", "DEL_SUBNET", c->name,
178                            c->hostname, "invalid subnet string");
179                 return false;
180         }
181
182         if(seen_request(request))
183                 return true;
184
185         /* Check if the owner of the subnet being deleted is in the connection list */
186
187         owner = lookup_node(name);
188
189         if(tunnelserver && owner != myself && owner != c->node) {
190                 /* in case of tunnelserver, ignore indirect subnet deletion */
191                 logger(DEBUG_PROTOCOL, LOG_WARNING, "Ignoring indirect %s from %s (%s) for %s",
192                                   "DEL_SUBNET", c->name, c->hostname, subnetstr);
193                 return true;
194         }
195
196         if(!owner) {
197                 logger(DEBUG_PROTOCOL, LOG_WARNING, "Got %s from %s (%s) for %s which is not in our node tree",
198                                    "DEL_SUBNET", c->name, c->hostname, name);
199                 return true;
200         }
201
202         /* If everything is correct, delete the subnet from the list of the owner */
203
204         s.owner = owner;
205
206         find = lookup_subnet(owner, &s);
207
208         if(!find) {
209                 logger(DEBUG_PROTOCOL, LOG_WARNING, "Got %s from %s (%s) for %s which does not appear in his subnet tree",
210                                    "DEL_SUBNET", c->name, c->hostname, name);
211                 if(strictsubnets)
212                         forward_request(c, request);
213                 return true;
214         }
215
216         /* If we are the owner of this subnet, retaliate with an ADD_SUBNET */
217
218         if(owner == myself) {
219                 logger(DEBUG_PROTOCOL, LOG_WARNING, "Got %s from %s (%s) for ourself",
220                                    "DEL_SUBNET", c->name, c->hostname);
221                 send_add_subnet(c, find);
222                 return true;
223         }
224
225         if(tunnelserver)
226                 return true;
227
228         /* Tell the rest */
229
230         if(!tunnelserver)
231                 forward_request(c, request);
232         if(strictsubnets)
233                 return true;
234
235         /* Finally, delete it. */
236
237         if(owner->status.reachable)
238                 subnet_update(owner, find, false);
239
240         subnet_del(owner, find);
241
242         return true;
243 }