tinc-vpn.org Git - tinc/blob - 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 }