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

   1 /*
   2     protocol.c -- handle the meta-protocol, basic functions
   3     Copyright (C) 1999-2001 Ivo Timmermans <ivo@o2w.nl>,
   4                   2000,2001 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.c,v 1.28.4.130 2002/09/03 20:43:25 guus Exp $
  21 */
  22
  23 #include "config.h"
  24
  25 #include <sys/types.h>
  26
  27 #include <stdlib.h>
  28 #include <string.h>
  29 #include <syslog.h>
  30 #include <stdio.h>
  31 #include <stdarg.h>
  32 #include <errno.h>
  33
  34 #include <utils.h>
  35 #include <xalloc.h>
  36
  37 #include "conf.h"
  38 #include "protocol.h"
  39 #include "meta.h"
  40 #include "connection.h"
  41
  42 #include "system.h"
  43
  44 avl_tree_t *past_request_tree;
  45
  46 int check_id(char *id)
  47 {
  48   int i;
  49
  50   for (i = 0; i < strlen(id); i++)
  51     if(!isalnum(id[i]) && id[i] != '_')
  52       return -1;
  53
  54   return 0;
  55 }
  56
  57 /* Generic request routines - takes care of logging and error
  58    detection as well */
  59
  60 int send_request(connection_t *c, const char *format, ...)
  61 {
  62   va_list args;
  63   char buffer[MAXBUFSIZE];
  64   int len, request;
  65
  66 cp
  67   /* Use vsnprintf instead of vasprintf: faster, no memory
  68      fragmentation, cleanup is automatic, and there is a limit on the
  69      input buffer anyway */
  70
  71   va_start(args, format);
  72   len = vsnprintf(buffer, MAXBUFSIZE, format, args);
  73   va_end(args);
  74
  75   if(len < 0 || len > MAXBUFSIZE-1)
  76     {
  77       syslog(LOG_ERR, _("Output buffer overflow while sending request to %s (%s)"), c->name, c->hostname);
  78       return -1;
  79     }
  80
  81   if(debug_lvl >= DEBUG_PROTOCOL)
  82     {
  83       sscanf(buffer, "%d", &request);
  84       if(debug_lvl >= DEBUG_META)
  85         syslog(LOG_DEBUG, _("Sending %s to %s (%s): %s"), request_name[request], c->name, c->hostname, buffer);
  86       else
  87         syslog(LOG_DEBUG, _("Sending %s to %s (%s)"), request_name[request], c->name, c->hostname);
  88     }
  89
  90   buffer[len++] = '\n';
  91 cp
  92   return send_meta(c, buffer, len);
  93 }
  94
  95 int receive_request(connection_t *c)
  96 {
  97   int request;
  98 cp
  99   if(sscanf(c->buffer, "%d", &request) == 1)
 100     {
 101       if((request < 0) || (request >= LAST) || (request_handlers[request] == NULL))
 102         {
 103           if(debug_lvl >= DEBUG_META)
 104             syslog(LOG_DEBUG, _("Unknown request from %s (%s): %s"),
 105                    c->name, c->hostname, c->buffer);
 106           else
 107             syslog(LOG_ERR, _("Unknown request from %s (%s)"),
 108                    c->name, c->hostname);
 109
 110           return -1;
 111         }
 112       else
 113         {
 114           if(debug_lvl >= DEBUG_PROTOCOL)
 115             {
 116               if(debug_lvl >= DEBUG_META)
 117                 syslog(LOG_DEBUG, _("Got %s from %s (%s): %s"),
 118                        request_name[request], c->name, c->hostname, c->buffer);
 119               else
 120                 syslog(LOG_DEBUG, _("Got %s from %s (%s)"),
 121                        request_name[request], c->name, c->hostname);
 122             }
 123         }
 124
 125       if((c->allow_request != ALL) && (c->allow_request != request))
 126         {
 127           syslog(LOG_ERR, _("Unauthorized request from %s (%s)"), c->name, c->hostname);
 128           return -1;
 129         }
 130
 131       if(request_handlers[request](c))
 132         /* Something went wrong. Probably scriptkiddies. Terminate. */
 133         {
 134           syslog(LOG_ERR, _("Error while processing %s from %s (%s)"),
 135                  request_name[request], c->name, c->hostname);
 136           return -1;
 137         }
 138     }
 139   else
 140     {
 141       syslog(LOG_ERR, _("Bogus data received from %s (%s)"),
 142              c->name, c->hostname);
 143       return -1;
 144     }
 145 cp
 146   return 0;
 147 }
 148
 149 int past_request_compare(past_request_t *a, past_request_t *b)
 150 {
 151 cp
 152   return strcmp(a->request, b->request);
 153 }
 154
 155 void free_past_request(past_request_t *r)
 156 {
 157 cp
 158   if(r->request)
 159     free(r->request);
 160   free(r);
 161 cp
 162 }
 163
 164 void init_requests(void)
 165 {
 166 cp
 167   past_request_tree = avl_alloc_tree((avl_compare_t)past_request_compare, (avl_action_t)free_past_request);
 168 cp
 169 }
 170
 171 void exit_requests(void)
 172 {
 173 cp
 174   avl_delete_tree(past_request_tree);
 175 cp
 176 }
 177
 178 int seen_request(char *request)
 179 {
 180   past_request_t p, *new;
 181 cp
 182   p.request = request;
 183
 184   if(avl_search(past_request_tree, &p))
 185     {
 186       if(debug_lvl >= DEBUG_SCARY_THINGS)
 187         syslog(LOG_DEBUG, _("Already seen request"));
 188       return 1;
 189     }
 190   else
 191     {
 192       new = (past_request_t *)xmalloc(sizeof(*new));
 193       new->request = xstrdup(request);
 194       new->firstseen = now;
 195       avl_insert(past_request_tree, new);
 196       return 0;
 197     }
 198 cp
 199 }
 200
 201 void age_past_requests(void)
 202 {
 203   avl_node_t *node, *next;
 204   past_request_t *p;
 205   int left = 0, deleted = 0;
 206 cp
 207   for(node = past_request_tree->head; node; node = next)
 208     {
 209       next = node->next;
 210       p = (past_request_t *)node->data;
 211       if(p->firstseen + pingtimeout < now)
 212         avl_delete_node(past_request_tree, node), deleted++;
 213       else
 214         left++;
 215     }
 216
 217   if(debug_lvl >= DEBUG_SCARY_THINGS && left + deleted)
 218     syslog(LOG_DEBUG, _("Aging past requests: deleted %d, left %d\n"), deleted, left);
 219 cp
 220 }
 221
 222 /* Jumptable for the request handlers */
 223
 224 int (*request_handlers[])(connection_t*) = {
 225   id_h, metakey_h, challenge_h, chal_reply_h, ack_h,
 226   status_h, error_h, termreq_h,
 227   ping_h, pong_h,
 228   add_subnet_h, del_subnet_h,
 229   add_node_h, del_node_h,
 230   key_changed_h, req_key_h, ans_key_h,
 231   tcppacket_h,
 232 };
 233
 234 /* Request names */
 235
 236 char (*request_name[]) = {
 237   "ID", "METAKEY", "CHALLENGE", "CHAL_REPLY", "ACK",
 238   "STATUS", "ERROR", "TERMREQ",
 239   "PING", "PONG",
 240   "ADD_SUBNET", "DEL_SUBNET",
 241   "ADD_NODE", "DEL_NODE",
 242   "KEY_CHANGED", "REQ_KEY", "ANS_KEY",
 243   "PACKET",
 244 };