www.tinc-vpn.org Git - tinc/blob - src/node.c

   1 /*
   2     node.c -- node tree management
   3     Copyright (C) 2001-2002 Guus Sliepen <guus@sliepen.eu.org>,
   4                   2001-2002 Ivo Timmermans <ivo@o2w.nl>
   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: node.c,v 1.1.2.20 2003/07/06 22:11:32 guus Exp $
  21 */
  22
  23 #include "config.h"
  24
  25 #include <string.h>
  26
  27 #include <avl_tree.h>
  28 #include "node.h"
  29 #include "netutl.h"
  30 #include "net.h"
  31 #include "logger.h"
  32
  33 #include <utils.h>
  34 #include <xalloc.h>
  35
  36 #include "system.h"
  37
  38 avl_tree_t *node_tree;                  /* Known nodes, sorted by name */
  39 avl_tree_t *node_udp_tree;              /* Known nodes, sorted by address and port */
  40
  41 node_t *myself;
  42
  43 int node_compare(node_t *a, node_t *b)
  44 {
  45         return strcmp(a->name, b->name);
  46 }
  47
  48 int node_udp_compare(node_t *a, node_t *b)
  49 {
  50         int result;
  51
  52         cp();
  53
  54         result = sockaddrcmp(&a->address, &b->address);
  55
  56         if(result)
  57                 return result;
  58
  59         return (a->name && b->name) ? strcmp(a->name, b->name) : 0;
  60 }
  61
  62 void init_nodes(void)
  63 {
  64         cp();
  65
  66         node_tree = avl_alloc_tree((avl_compare_t) node_compare, NULL);
  67         node_udp_tree = avl_alloc_tree((avl_compare_t) node_udp_compare, NULL);
  68 }
  69
  70 void exit_nodes(void)
  71 {
  72         cp();
  73
  74         avl_delete_tree(node_tree);
  75         avl_delete_tree(node_udp_tree);
  76 }
  77
  78 node_t *new_node(void)
  79 {
  80         node_t *n = (node_t *) xmalloc_and_zero(sizeof(*n));
  81
  82         cp();
  83
  84         n->subnet_tree = new_subnet_tree();
  85         n->edge_tree = new_edge_tree();
  86         n->queue = list_alloc((list_action_t) free);
  87         EVP_CIPHER_CTX_init(&n->packet_ctx);
  88
  89         return n;
  90 }
  91
  92 void free_node(node_t *n)
  93 {
  94         cp();
  95
  96         if(n->queue)
  97                 list_delete_list(n->queue);
  98
  99         if(n->name)
 100                 free(n->name);
 101
 102         if(n->hostname)
 103                 free(n->hostname);
 104
 105         if(n->key)
 106                 free(n->key);
 107
 108         if(n->subnet_tree)
 109                 free_subnet_tree(n->subnet_tree);
 110
 111         if(n->edge_tree)
 112                 free_edge_tree(n->edge_tree);
 113
 114         EVP_CIPHER_CTX_cleanup(&n->packet_ctx);
 115
 116         free(n);
 117 }
 118
 119 void node_add(node_t *n)
 120 {
 121         cp();
 122
 123         avl_insert(node_tree, n);
 124         avl_insert(node_udp_tree, n);
 125 }
 126
 127 void node_del(node_t *n)
 128 {
 129         avl_node_t *node, *next;
 130         edge_t *e;
 131         subnet_t *s;
 132
 133         cp();
 134
 135         for(node = n->subnet_tree->head; node; node = next) {
 136                 next = node->next;
 137                 s = (subnet_t *) node->data;
 138                 subnet_del(n, s);
 139         }
 140
 141         for(node = n->edge_tree->head; node; node = next) {
 142                 next = node->next;
 143                 e = (edge_t *) node->data;
 144                 edge_del(e);
 145         }
 146
 147         avl_delete(node_tree, n);
 148         avl_delete(node_udp_tree, n);
 149 }
 150
 151 node_t *lookup_node(char *name)
 152 {
 153         node_t n;
 154         cp();
 155         n.name = name;
 156         return avl_search(node_tree, &n);
 157 }
 158
 159 node_t *lookup_node_udp(sockaddr_t *sa)
 160 {
 161         node_t n;
 162         cp();
 163         n.address = *sa;
 164         n.name = NULL;
 165
 166         return avl_search(node_udp_tree, &n);
 167 }
 168
 169 void dump_nodes(void)
 170 {
 171         avl_node_t *node;
 172         node_t *n;
 173
 174         cp();
 175
 176         logger(DEBUG_ALWAYS, LOG_DEBUG, _("Nodes:"));
 177
 178         for(node = node_tree->head; node; node = node->next) {
 179                 n = (node_t *) node->data;
 180                 logger(DEBUG_ALWAYS, LOG_DEBUG, _(" %s at %s cipher %d digest %d maclength %d compression %d options %lx status %04x nexthop %s via %s"),
 181                            n->name, n->hostname, n->cipher ? n->cipher->nid : 0,
 182                            n->digest ? n->digest->type : 0, n->maclength, n->compression,
 183                            n->options, n->status, n->nexthop ? n->nexthop->name : "-",
 184                            n->via ? n->via->name : "-");
 185         }
 186
 187         logger(DEBUG_ALWAYS, LOG_DEBUG, _("End of nodes."));
 188 }