src/server.c

   1 /* Copyright (C) 2009-2014, Martin Johansson <martin@fatbob.nu>
   2    Copyright (C) 2005-2014, Thorvald Natvig <thorvald@natvig.com>
   3
   4    All rights reserved.
   5
   6    Redistribution and use in source and binary forms, with or without
   7    modification, are permitted provided that the following conditions
   8    are met:
   9
  10    - Redistributions of source code must retain the above copyright notice,
  11      this list of conditions and the following disclaimer.
  12    - Redistributions in binary form must reproduce the above copyright notice,
  13      this list of conditions and the following disclaimer in the documentation
  14      and/or other materials provided with the distribution.
  15    - Neither the name of the Developers nor the names of its contributors may
  16      be used to endorse or promote products derived from this software without
  17      specific prior written permission.
  18
  19    THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
  20    ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
  21    LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
  22    A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR
  23    CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
  24    EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
  25    PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
  26    PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
  27    LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
  28    NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
  29    SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  30 */
  31 #include <stdio.h>
  32 #include <sys/time.h>
  33 #include <sys/poll.h>
  34 #include <netinet/tcp.h>
  35 #include <sys/socket.h>
  36 #include <errno.h>
  37 #include <string.h>
  38 #include <limits.h>
  39 #include <unistd.h>
  40 #include <fcntl.h>
  41 #include <errno.h>
  42 #include <stdlib.h>
  43
  44 #include "client.h"
  45 #include "conf.h"
  46 #include "log.h"
  47 #include "timer.h"
  48 #include "version.h"
  49 #include "util.h"
  50 #include "sharedmemory.h"
  51
  52 /* globals */
  53 bool_t shutdown_server;
  54 extern char *bindaddr;
  55 extern char *bindaddr6;
  56 extern int bindport;
  57 extern int bindport6;
  58 int* udpsocks;
  59 bool_t hasv4 = true, hasv6 = true;
  60
  61 const int on = 1;
  62 int nofServerSocks = 4;
  63
  64 /* Check which IP versions are supported by the system. */
  65 void checkIPversions()
  66 {
  67         int testsocket = -1;
  68
  69         testsocket = socket(PF_INET, SOCK_STREAM, 0);
  70         hasv4 = (errno == EAFNOSUPPORT) ? false : true;
  71         if (!(testsocket < 0)) close(testsocket);
  72
  73         testsocket = socket(PF_INET6, SOCK_STREAM, 0);
  74         hasv6 = (errno == EAFNOSUPPORT) ? false : true;
  75         if (!(testsocket < 0)) close(testsocket);
  76
  77         if(!hasv4)
  78         {
  79                 Log_info("IPv4 is not supported by this system");
  80                 nofServerSocks -= 2;
  81         }
  82
  83         if(!hasv6)
  84         {
  85                 Log_info("IPv6 is not supported by this system");
  86                 nofServerSocks -= 2;
  87         }
  88
  89         if(nofServerSocks == 0)
  90         {
  91                 Log_fatal("Neither IPv4 nor IPv6 are supported by this system");
  92         }
  93 }
  94
  95 /* Initialize the address structures for IPv4 and IPv6 */
  96 struct sockaddr_storage** Server_setupAddressesAndPorts()
  97 {
  98         struct sockaddr_storage** addresses = calloc(2, sizeof(void*));
  99
 100         struct sockaddr_storage* v4address = calloc(1, sizeof(struct sockaddr_storage));
 101         v4address->ss_family = AF_INET;
 102         struct sockaddr_storage* v6address = calloc(1, sizeof(struct sockaddr_storage));
 103         v6address->ss_family = AF_INET6;
 104
 105 #if defined(__NetBSD__) || defined(__FreeBSD__) || defined(__OpenBSD__) || defined(__APPLE__)
 106         v4address->ss_len = sizeof(struct sockaddr_storage);
 107         v6address->ss_len = sizeof(struct sockaddr_storage);
 108 #endif
 109
 110         int error = 0;
 111
 112         error = inet_pton(AF_INET, (!bindaddr) ? ((getStrConf(BINDADDR)) ? getStrConf(BINDADDR) : "0.0.0.0")
 113                 : bindaddr, &(((struct sockaddr_in*)v4address)->sin_addr));
 114         if (error == 0)
 115                 Log_fatal("Invalid IPv4 address supplied!");
 116         else if (error == -1)
 117                 Log_warn("Could not allocate IPv4 address");
 118
 119         error = inet_pton(AF_INET6, (!bindaddr6) ? ((getStrConf(BINDADDR6)) ? getStrConf(BINDADDR6) : "::")
 120                 : bindaddr6, &(((struct sockaddr_in6*)v6address)->sin6_addr));
 121         if (error == 0)
 122                 Log_fatal("Invalid IPv6 address supplied!");
 123         else if (error == -1)
 124                 Log_warn("Could not allocate IPv6 address");
 125
 126         ((struct sockaddr_in*)v4address)->sin_port = htons((bindport) ? bindport : getIntConf(BINDPORT));
 127         ((struct sockaddr_in6*)v6address)->sin6_port = htons((bindport6) ? bindport6 : getIntConf(BINDPORT6));
 128
 129         addresses[0] = v4address;
 130         addresses[1] = v6address;
 131
 132         return addresses;
 133 }
 134
 135 void Server_runLoop(struct pollfd* pollfds)
 136 {
 137         int timeout, rc, clientcount;
 138
 139         etimer_t janitorTimer;
 140         Timer_init(&janitorTimer);
 141
 142         while (!shutdown_server) {
 143                 struct sockaddr_storage remote;
 144                 int i;
 145
 146 #ifdef USE_SHAREDMEMORY_API
 147     Sharedmemory_alivetick();
 148 #endif
 149
 150                 for(i = 0; i < nofServerSocks; i++) {
 151                         pollfds[i].revents = 0;
 152                 }
 153
 154                 clientcount = Client_getfds(&pollfds[nofServerSocks]);
 155
 156                 timeout = (int)(1000000LL - (int64_t)Timer_elapsed(&janitorTimer)) / 1000LL;
 157                 if (timeout <= 0) {
 158                         Client_janitor();
 159                         Timer_restart(&janitorTimer);
 160                         timeout = (int)(1000000LL - (int64_t)Timer_elapsed(&janitorTimer)) / 1000LL;
 161                 }
 162                 rc = poll(pollfds, clientcount + nofServerSocks, timeout);
 163                 if (rc == 0) {
 164                         /* Poll timed out, do maintenance */
 165                         Timer_restart(&janitorTimer);
 166                         Client_janitor();
 167                         continue;
 168                 }
 169                 if (rc < 0) {
 170                         if (errno == EINTR) /* signal */
 171                                 continue;
 172                         else
 173                                 Log_fatal("poll: error %d (%s)", errno, strerror(errno));
 174                 }
 175
 176                 /* Check for new connection */
 177                 for (i = 0; i < nofServerSocks / 2; i++) {
 178                         if (pollfds[i].revents) {
 179                                 int tcpfd;
 180                                 uint32_t addrlen = sizeof(struct sockaddr_storage);
 181                                 tcpfd = accept(pollfds[i].fd, (struct sockaddr *)&remote, &addrlen);
 182                                 fcntl(tcpfd, F_SETFL, O_NONBLOCK);
 183                                 setsockopt(tcpfd, IPPROTO_TCP, TCP_NODELAY, (char *) &on, sizeof(int));
 184                                 char *addressString = Util_addressToString(&remote);
 185                                 Log_debug("Connection from %s port %d\n", addressString, Util_addressToPort(&remote));
 186                                 free(addressString);
 187                                 if (Client_add(tcpfd, &remote) < 0)
 188                                         close(tcpfd);
 189                         }
 190                 }
 191
 192                 for (i = nofServerSocks / 2; i < nofServerSocks; i++) {
 193                         if (pollfds[i].revents)
 194                                 Client_read_udp(udpsocks[i - nofServerSocks / 2]);
 195                 }
 196
 197                 for (i = 0; i < clientcount; i++) {
 198                         if (pollfds[nofServerSocks + i].revents & POLLIN)
 199                                 Client_read_fd(pollfds[nofServerSocks + i].fd);
 200
 201                         if (pollfds[nofServerSocks + i].revents & POLLOUT)
 202                                 Client_write_fd(pollfds[nofServerSocks + i].fd);
 203                 }
 204 #ifdef USE_SHAREDMEMORY_API
 205     Sharedmemory_update();
 206 #endif
 207         }
 208 }
 209
 210 void Server_setupTCPSockets(struct sockaddr_storage* addresses[2], struct pollfd* pollfds)
 211 {
 212         uint8_t yes = 1;
 213         int sockets[2];
 214
 215         if (hasv4) {
 216                 /* IPv4 socket setup */
 217                 sockets[0] = socket(PF_INET, SOCK_STREAM, 0);
 218                 if (sockets[0] < 0)
 219                         Log_fatal("socket IPv4");
 220                 if (setsockopt(sockets[0], SOL_SOCKET, SO_REUSEADDR, &yes, sizeof(int)) != 0)
 221                         Log_fatal("setsockopt IPv4: %s", strerror(errno));
 222                 if (bind(sockets[0], (struct sockaddr *)addresses[0], sizeof (struct sockaddr_in)) < 0) {
 223                         char *addressString = Util_addressToString(addresses[0]);
 224                         Log_fatal("bind %s %d: %s", addressString, Util_addressToPort(addresses[0]), strerror(errno));
 225                         free(addressString);
 226                 }
 227                 if (listen(sockets[0], 3) < 0)
 228                         Log_fatal("listen IPv4");
 229                 fcntl(sockets[0], F_SETFL, O_NONBLOCK);
 230
 231                 pollfds[0].fd = sockets[0];
 232                 pollfds[0].events = POLLIN;
 233         }
 234
 235         if (hasv6) {
 236                 /* IPv6 socket setup */
 237                 sockets[1] = socket(PF_INET6, SOCK_STREAM, 0);
 238                 if (sockets[1] < 0)
 239                         Log_fatal("socket IPv6: %s", strerror(errno));
 240                 if (setsockopt(sockets[1], SOL_SOCKET, SO_REUSEADDR, &yes, sizeof(int)) != 0)
 241                         Log_fatal("setsockopt IPv6: %s", strerror(errno));
 242                 if (setsockopt(sockets[1], IPPROTO_IPV6, IPV6_V6ONLY, &yes, sizeof(int)) != 0)
 243                         Log_fatal("setsockopt IPv6: %s", strerror(errno));
 244                 if (bind(sockets[1], (struct sockaddr *)addresses[1], sizeof (struct sockaddr_in6)) < 0) {
 245                         char *addressString = Util_addressToString(addresses[1]);
 246                         Log_fatal("bind %s %d: %s", addressString, Util_addressToPort(addresses[1]), strerror(errno));
 247                         free(addressString);
 248                 }
 249                 if (listen(sockets[1], 3) < 0)
 250                         Log_fatal("listen IPv6");
 251                 fcntl(sockets[1], F_SETFL, O_NONBLOCK);
 252
 253
 254                 /* If  there is an IPv4 address, then IPv6 will use the second socket, otherwise it uses the first */
 255                 pollfds[(hasv4) ? 1 : 0].fd = sockets[1];
 256                 pollfds[(hasv4) ? 1 : 0].events = POLLIN;
 257         }
 258 }
 259
 260 void Server_setupUDPSockets(struct sockaddr_storage* addresses[2], struct pollfd* pollfds)
 261 {
 262         int val = 0;
 263         int sockets[2] = {-1, -1};
 264
 265         if((udpsocks = calloc(nofServerSocks / 2, sizeof(int))) == NULL)
 266                 Log_fatal("Out of memory (%s:%s)", __FILE__, __LINE__);
 267
 268         if (hasv4) {
 269                 sockets[0] = socket(PF_INET, SOCK_DGRAM, 0);
 270                 if (bind(sockets[0], (struct sockaddr *) addresses[0], sizeof (struct sockaddr_in)) < 0) {
 271                         char *addressString = Util_addressToString(addresses[0]);
 272                         Log_fatal("bind %s %d: %s", addressString, Util_addressToPort(addresses[0]), strerror(errno));
 273                         free(addressString);
 274                 }
 275                 val = 0xe0;
 276                 if (setsockopt(sockets[0], IPPROTO_IP, IP_TOS, &val, sizeof(val)) < 0)
 277                         Log_warn("Server: Failed to set TOS for UDP Socket");
 278                 val = 0x80;
 279                 if (setsockopt(sockets[0], IPPROTO_IP, IP_TOS, &val, sizeof(val)) < 0)
 280                         Log_warn("Server: Failed to set TOS for UDP Socket");
 281
 282                 fcntl(sockets[0], F_SETFL, O_NONBLOCK);
 283                 pollfds[(hasv6) ? 2 : 1].fd = sockets[0];
 284                 pollfds[(hasv6) ? 2 : 1].events = POLLIN | POLLHUP | POLLERR;
 285                 udpsocks[0] = sockets[0];
 286         }
 287
 288         if (hasv6) {
 289                 sockets[1] = socket(PF_INET6, SOCK_DGRAM, 0);
 290                 if (setsockopt(sockets[1], IPPROTO_IPV6, IPV6_V6ONLY, &on, sizeof(int)) != 0)
 291                         Log_fatal("setsockopt IPv6: %s", strerror(errno));
 292                 if (bind(sockets[1], (struct sockaddr *) addresses[1], sizeof (struct sockaddr_in6)) < 0) {
 293                         char *addressString = Util_addressToString(addresses[1]);
 294                         Log_fatal("bind %s %d: %s", addressString, Util_addressToPort(addresses[1]), strerror(errno));
 295                         free(addressString);
 296                 }
 297                 val = 0xe0;
 298                 if (setsockopt(sockets[1], IPPROTO_IPV6, IPV6_TCLASS, &val, sizeof(val)) < 0)
 299                         Log_warn("Server: Failed to set TOS for UDP Socket");
 300                 val = 0x80;
 301                 if (setsockopt(sockets[1], IPPROTO_IPV6, IPV6_TCLASS, &val, sizeof(val)) < 0)
 302                         Log_warn("Server: Failed to set TOS for UDP Socket");
 303
 304                 fcntl(sockets[1], F_SETFL, O_NONBLOCK);
 305                 pollfds[(hasv4) ? 3 : 1].fd = sockets[1];
 306                 pollfds[(hasv4) ? 3 : 1].events = POLLIN | POLLHUP | POLLERR;
 307                 udpsocks[(hasv4) ? 1 : 0] = sockets[1];
 308         }
 309
 310 }
 311
 312 void Server_run()
 313 {
 314         struct pollfd *pollfds;
 315
 316         checkIPversions();
 317
 318         /* max clients + server sokets + client connecting that will be disconnected */
 319         if ((pollfds = calloc((getIntConf(MAX_CLIENTS) + nofServerSocks + 1) , sizeof(struct pollfd))) == NULL)
 320                 Log_fatal("out of memory");
 321
 322         /* Figure out bind address and port */
 323         struct sockaddr_storage** addresses = Server_setupAddressesAndPorts();
 324
 325         /* Prepare TCP sockets */
 326         Server_setupTCPSockets(addresses, pollfds);
 327
 328         /* Prepare UDP sockets */
 329         Server_setupUDPSockets(addresses, pollfds);
 330
 331         Log_info("uMurmur version %s ('%s') protocol version %d.%d.%d",
 332                 UMURMUR_VERSION, UMURMUR_CODENAME, PROTVER_MAJOR, PROTVER_MINOR, PROTVER_PATCH);
 333         Log_info("Visit http://code.google.com/p/umurmur/");
 334
 335         /* Main server loop */
 336         Server_runLoop(pollfds);
 337
 338         /* Disconnect clients and cleanup memory */
 339         Client_disconnect_all();
 340         free(pollfds);
 341         free(addresses[0]);
 342         free(addresses[1]);
 343         free(addresses);
 344         free(udpsocks);
 345 }
 346
 347 void Server_shutdown()
 348 {
 349         shutdown_server = true;
 350 }