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

   1 /*
   2     control.c -- Control socket handling.
   3     Copyright (C) 2013 Guus Sliepen <guus@tinc-vpn.org>
   4
   5     This program is free software; you can redistribute it and/or modify
   6     it under the terms of the GNU General Public License as published by
   7     the Free Software Foundation; either version 2 of the License, or
   8     (at your option) any later version.
   9
  10     This program is distributed in the hope that it will be useful,
  11     but WITHOUT ANY WARRANTY; without even the implied warranty of
  12     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13     GNU General Public License for more details.
  14
  15     You should have received a copy of the GNU General Public License along
  16     with this program; if not, write to the Free Software Foundation, Inc.,
  17     51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  18 */
  19
  20 #include "system.h"
  21 #include "conf.h"
  22 #include "control.h"
  23 #include "control_common.h"
  24 #include "logger.h"
  25 #include "names.h"
  26 #include "net.h"
  27 #include "netutl.h"
  28 #include "protocol.h"
  29 #include "route.h"
  30 #include "utils.h"
  31 #include "xalloc.h"
  32 #include "random.h"
  33 #include "pidfile.h"
  34
  35 char controlcookie[65];
  36
  37 static bool control_return(connection_t *c, int type, int error) {
  38         return send_request(c, "%d %d %d", CONTROL, type, error);
  39 }
  40
  41 static bool control_ok(connection_t *c, int type) {
  42         return control_return(c, type, 0);
  43 }
  44
  45 bool control_h(connection_t *c, const char *request) {
  46         int type;
  47
  48         if(!c->status.control || c->allow_request != CONTROL) {
  49                 logger(DEBUG_ALWAYS, LOG_ERR, "Unauthorized control request from %s (%s)", c->name, c->hostname);
  50                 return false;
  51         }
  52
  53         if(sscanf(request, "%*d %d", &type) != 1) {
  54                 logger(DEBUG_ALWAYS, LOG_ERR, "Got bad %s from %s (%s)", "CONTROL", c->name, c->hostname);
  55                 return false;
  56         }
  57
  58         switch(type) {
  59         case REQ_STOP:
  60                 event_exit();
  61                 return control_ok(c, REQ_STOP);
  62
  63         case REQ_DUMP_NODES:
  64                 return dump_nodes(c);
  65
  66         case REQ_DUMP_EDGES:
  67                 return dump_edges(c);
  68
  69         case REQ_DUMP_SUBNETS:
  70                 return dump_subnets(c);
  71
  72         case REQ_DUMP_CONNECTIONS:
  73                 return dump_connections(c);
  74
  75         case REQ_PURGE:
  76                 purge();
  77                 return control_ok(c, REQ_PURGE);
  78
  79         case REQ_SET_DEBUG: {
  80                 int new_level;
  81
  82                 if(sscanf(request, "%*d %*d %d", &new_level) != 1) {
  83                         return false;
  84                 }
  85
  86                 send_request(c, "%d %d %d", CONTROL, REQ_SET_DEBUG, debug_level);
  87
  88                 if(new_level >= 0) {
  89                         debug_level = new_level;
  90                 }
  91
  92                 return true;
  93         }
  94
  95         case REQ_RETRY:
  96                 retry();
  97                 return control_ok(c, REQ_RETRY);
  98
  99         case REQ_RELOAD:
 100                 logger(DEBUG_ALWAYS, LOG_NOTICE, "Got '%s' command", "reload");
 101                 int result = reload_configuration();
 102                 return control_return(c, REQ_RELOAD, result);
 103
 104         case REQ_DISCONNECT: {
 105                 char name[MAX_STRING_SIZE];
 106                 bool found = false;
 107
 108                 if(sscanf(request, "%*d %*d " MAX_STRING, name) != 1) {
 109                         return control_return(c, REQ_DISCONNECT, -1);
 110                 }
 111
 112                 for list_each(connection_t, other, &connection_list) {
 113                         if(strcmp(other->name, name)) {
 114                                 continue;
 115                         }
 116
 117                         terminate_connection(other, other->edge);
 118                         found = true;
 119                 }
 120
 121                 return control_return(c, REQ_DISCONNECT, found ? 0 : -2);
 122         }
 123
 124         case REQ_DUMP_TRAFFIC:
 125                 return dump_traffic(c);
 126
 127         case REQ_PCAP:
 128                 sscanf(request, "%*d %*d %d", &c->outmaclength);
 129                 c->status.pcap = true;
 130                 pcap = true;
 131                 return true;
 132
 133         case REQ_LOG: {
 134                 int level = 0, colorize = 0;
 135                 sscanf(request, "%*d %*d %d %d", &level, &colorize);
 136                 c->log_level = CLAMP(level, DEBUG_UNSET, DEBUG_SCARY_THINGS);
 137                 c->status.log = true;
 138                 c->status.log_color = colorize;
 139                 logcontrol = true;
 140                 return true;
 141         }
 142
 143         default:
 144                 return send_request(c, "%d %d", CONTROL, REQ_INVALID);
 145         }
 146 }
 147
 148 bool init_control(void) {
 149         randomize(controlcookie, sizeof(controlcookie) / 2);
 150         bin2hex(controlcookie, controlcookie, sizeof(controlcookie) / 2);
 151
 152         // Get the address and port of the first listening socket
 153
 154         char *localhost = NULL;
 155         sockaddr_t sa = {0};
 156         socklen_t len = sizeof(sa);
 157
 158         // Make sure we have a valid address, and map 0.0.0.0 and :: to 127.0.0.1 and ::1.
 159
 160         if(getsockname(listen_socket[0].tcp.fd, &sa.sa, &len)) {
 161                 xasprintf(&localhost, "127.0.0.1 port %s", myport.tcp);
 162         } else {
 163                 if(sa.sa.sa_family == AF_INET) {
 164                         if(sa.in.sin_addr.s_addr == 0) {
 165                                 sa.in.sin_addr.s_addr = htonl(0x7f000001);
 166                         }
 167                 } else if(sa.sa.sa_family == AF_INET6) {
 168                         static const uint8_t zero[16] = {0};
 169
 170                         if(!memcmp(sa.in6.sin6_addr.s6_addr, zero, sizeof(zero))) {
 171                                 sa.in6.sin6_addr.s6_addr[15] = 1;
 172                         }
 173                 }
 174
 175                 localhost = sockaddr2hostname(&sa);
 176         }
 177
 178         bool wrote = write_pidfile(controlcookie, localhost);
 179         free(localhost);
 180
 181         if(!wrote) {
 182                 logger(DEBUG_ALWAYS, LOG_ERR, "Cannot write control socket cookie file %s: %s", pidfilename, strerror(errno));
 183                 return false;
 184         }
 185
 186 #ifndef HAVE_WINDOWS
 187         int unix_fd = socket(AF_UNIX, SOCK_STREAM, 0);
 188
 189         if(unix_fd < 0) {
 190                 logger(DEBUG_ALWAYS, LOG_ERR, "Could not create UNIX socket: %s", sockstrerror(sockerrno));
 191                 return false;
 192         }
 193
 194         struct sockaddr_un sa_un = {
 195                 .sun_family = AF_UNIX,
 196         };
 197
 198         if(strlen(unixsocketname) >= sizeof(sa_un.sun_path)) {
 199                 logger(DEBUG_ALWAYS, LOG_ERR, "UNIX socket filename %s is too long!", unixsocketname);
 200                 return false;
 201         }
 202
 203         strncpy(sa_un.sun_path, unixsocketname, sizeof(sa_un.sun_path));
 204
 205         if(connect(unix_fd, (struct sockaddr *)&sa_un, sizeof(sa_un)) >= 0) {
 206                 logger(DEBUG_ALWAYS, LOG_ERR, "UNIX socket %s is still in use!", unixsocketname);
 207                 return false;
 208         }
 209
 210         unlink(unixsocketname);
 211
 212         mode_t mask = umask(0);
 213         umask(mask | 077);
 214         int result = bind(unix_fd, (struct sockaddr *)&sa_un, sizeof(sa_un));
 215         umask(mask);
 216
 217         if(result < 0) {
 218                 logger(DEBUG_ALWAYS, LOG_ERR, "Could not bind UNIX socket to %s: %s", unixsocketname, sockstrerror(sockerrno));
 219                 return false;
 220         }
 221
 222         if(listen(unix_fd, 3) < 0) {
 223                 logger(DEBUG_ALWAYS, LOG_ERR, "Could not listen on UNIX socket %s: %s", unixsocketname, sockstrerror(sockerrno));
 224                 return false;
 225         }
 226
 227         io_add(&unix_socket, handle_new_unix_connection, &unix_socket, unix_fd, IO_READ);
 228 #endif
 229
 230         return true;
 231 }
 232
 233 void exit_control(void) {
 234 #ifndef HAVE_WINDOWS
 235         unlink(unixsocketname);
 236         io_del(&unix_socket);
 237         close(unix_socket.fd);
 238 #endif
 239
 240         unlink(pidfilename);
 241 }