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