Add Opaque option which prevent information from being forwarded to certain nodes.
[tinc] / src / protocol_subnet.c
1 /*
2     protocol_subnet.c -- handle the meta-protocol, subnets
3     Copyright (C) 1999-2003 Ivo Timmermans <ivo@o2w.nl>,
4                   2000-2003 Guus Sliepen <guus@sliepen.eu.org>
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: protocol_subnet.c,v 1.1.4.16 2003/11/10 22:31:53 guus Exp $
21 */
22
23 #include "system.h"
24
25 #include "conf.h"
26 #include "connection.h"
27 #include "logger.h"
28 #include "net.h"
29 #include "netutl.h"
30 #include "node.h"
31 #include "protocol.h"
32 #include "subnet.h"
33 #include "utils.h"
34 #include "xalloc.h"
35
36 bool send_add_subnet(connection_t *c, const subnet_t *subnet)
37 {
38         bool x;
39         char *netstr;
40
41         cp();
42
43         x = send_request(c, "%d %lx %s %s", ADD_SUBNET, random(),
44                                          subnet->owner->name, netstr = net2str(subnet));
45
46         free(netstr);
47
48         return x;
49 }
50
51 bool add_subnet_h(connection_t *c)
52 {
53         char subnetstr[MAX_STRING_SIZE];
54         char name[MAX_STRING_SIZE];
55         node_t *owner;
56         subnet_t *s;
57
58         cp();
59
60         if(sscanf(c->buffer, "%*d %*x " MAX_STRING " " MAX_STRING, name, subnetstr) != 2) {
61                 logger(LOG_ERR, _("Got bad %s from %s (%s)"), "ADD_SUBNET", c->name,
62                            c->hostname);
63                 return false;
64         }
65
66         /* Check if owner name is a valid */
67
68         if(!check_id(name)) {
69                 logger(LOG_ERR, _("Got bad %s from %s (%s): %s"), "ADD_SUBNET", c->name,
70                            c->hostname, _("invalid name"));
71                 return false;
72         }
73
74         /* Check if subnet string is valid */
75
76         s = str2net(subnetstr);
77
78         if(!s) {
79                 logger(LOG_ERR, _("Got bad %s from %s (%s): %s"), "ADD_SUBNET", c->name,
80                            c->hostname, _("invalid subnet string"));
81                 return false;
82         }
83
84         if(seen_request(c->buffer))
85                 return true;
86
87         /* Check if the owner of the new subnet is in the connection list */
88
89         owner = lookup_node(name);
90
91         if(!owner) {
92                 owner = new_node();
93                 owner->name = xstrdup(name);
94                 node_add(owner);
95         }
96
97         if(c->status.opaque && owner != myself && owner != c->node)
98                 return false;
99
100         /* Check if we already know this subnet */
101
102         if(lookup_subnet(owner, s)) {
103                 free_subnet(s);
104                 return true;
105         }
106
107         /* If we don't know this subnet, but we are the owner, retaliate with a DEL_SUBNET */
108
109         if(owner == myself) {
110                 ifdebug(PROTOCOL) logger(LOG_WARNING, _("Got %s from %s (%s) for ourself"),
111                                    "ADD_SUBNET", c->name, c->hostname);
112                 s->owner = myself;
113                 send_del_subnet(c, s);
114                 return true;
115         }
116
117         /* If everything is correct, add the subnet to the list of the owner */
118
119         subnet_add(owner, s);
120
121         /* Tell the rest */
122
123         if(!c->status.opaque)
124                 forward_request(c);
125
126         return true;
127 }
128
129 bool send_del_subnet(connection_t *c, const subnet_t *s)
130 {
131         bool x;
132         char *netstr;
133
134         cp();
135
136         netstr = net2str(s);
137
138         x = send_request(c, "%d %lx %s %s", DEL_SUBNET, random(), s->owner->name, netstr);
139
140         free(netstr);
141
142         return x;
143 }
144
145 bool del_subnet_h(connection_t *c)
146 {
147         char subnetstr[MAX_STRING_SIZE];
148         char name[MAX_STRING_SIZE];
149         node_t *owner;
150         subnet_t *s, *find;
151
152         cp();
153
154         if(sscanf(c->buffer, "%*d %*x " MAX_STRING " " MAX_STRING, name, subnetstr) != 2) {
155                 logger(LOG_ERR, _("Got bad %s from %s (%s)"), "DEL_SUBNET", c->name,
156                            c->hostname);
157                 return false;
158         }
159
160         /* Check if owner name is a valid */
161
162         if(!check_id(name)) {
163                 logger(LOG_ERR, _("Got bad %s from %s (%s): %s"), "DEL_SUBNET", c->name,
164                            c->hostname, _("invalid name"));
165                 return false;
166         }
167
168         /* Check if the owner of the new subnet is in the connection list */
169
170         owner = lookup_node(name);
171
172         if(!owner) {
173                 ifdebug(PROTOCOL) logger(LOG_WARNING, _("Got %s from %s (%s) for %s which is not in our node tree"),
174                                    "DEL_SUBNET", c->name, c->hostname, name);
175                 return true;
176         }
177
178         if(c->status.opaque && owner != myself && owner != c->node)
179                 return false;
180
181         /* Check if subnet string is valid */
182
183         s = str2net(subnetstr);
184
185         if(!s) {
186                 logger(LOG_ERR, _("Got bad %s from %s (%s): %s"), "DEL_SUBNET", c->name,
187                            c->hostname, _("invalid subnet string"));
188                 return false;
189         }
190
191         if(seen_request(c->buffer))
192                 return true;
193
194         /* If everything is correct, delete the subnet from the list of the owner */
195
196         s->owner = owner;
197
198         find = lookup_subnet(owner, s);
199
200         free_subnet(s);
201
202         if(!find) {
203                 ifdebug(PROTOCOL) logger(LOG_WARNING, _("Got %s from %s (%s) for %s which does not appear in his subnet tree"),
204                                    "DEL_SUBNET", c->name, c->hostname, name);
205                 return true;
206         }
207
208         /* If we are the owner of this subnet, retaliate with an ADD_SUBNET */
209
210         if(owner == myself) {
211                 ifdebug(PROTOCOL) logger(LOG_WARNING, _("Got %s from %s (%s) for ourself"),
212                                    "DEL_SUBNET", c->name, c->hostname);
213                 send_add_subnet(c, find);
214                 return true;
215         }
216
217         /* Tell the rest */
218
219         if(!c->status.opaque)
220                 forward_request(c);
221
222         /* Finally, delete it. */
223
224         subnet_del(owner, find);
225
226         return true;
227 }