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