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