netsock.c

   1 /*
   2  * Asterisk -- An open source telephony toolkit.
   3  *
   4  * Copyright (C) 1999 - 2005, Digium, Inc.
   5  *
   6  * Kevin P. Fleming <kpfleming@digium.com>
   7  * Mark Spencer <markster@digium.com>
   8  *
   9  * See http://www.asterisk.org for more information about
  10  * the Asterisk project. Please do not directly contact
  11  * any of the maintainers of this project for assistance;
  12  * the project provides a web site, mailing lists and IRC
  13  * channels for your use.
  14  *
  15  * This program is free software, distributed under the terms of
  16  * the GNU General Public License Version 2. See the LICENSE file
  17  * at the top of the source tree.
  18  */
  19
  20 /*! \file
  21  *
  22  * \brief Network socket handling
  23  *
  24  * \author Kevin P. Fleming <kpfleming@digium.com>
  25  * \author Mark Spencer <markster@digium.com>
  26  */
  27
  28 #include <stdio.h>
  29 #include <stdlib.h>
  30 #include <string.h>
  31 #include <sys/time.h>
  32 #include <signal.h>
  33 #include <errno.h>
  34 #include <unistd.h>
  35 #include <netinet/in.h>
  36 #include <arpa/inet.h>
  37 #include <sys/socket.h>
  38 #include <netdb.h>
  39 #include <net/if.h>
  40 #include <netinet/in_systm.h>
  41 #include <netinet/ip.h>
  42 #include <sys/ioctl.h>
  43
  44 #if defined(__OpenBSD__) || defined(__NetBSD__) || defined(__FreeBSD__)
  45 #include <fcntl.h>
  46 #include <net/route.h>
  47 #endif
  48
  49 #if defined (SOLARIS)
  50 #include <sys/sockio.h>
  51 #endif
  52
  53 #include "asterisk.h"
  54
  55 ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
  56
  57 #include "asterisk/netsock.h"
  58 #include "asterisk/logger.h"
  59 #include "asterisk/channel.h"
  60 #include "asterisk/options.h"
  61 #include "asterisk/utils.h"
  62 #include "asterisk/lock.h"
  63 #include "asterisk/srv.h"
  64
  65 struct ast_netsock {
  66         ASTOBJ_COMPONENTS(struct ast_netsock);
  67         struct sockaddr_in bindaddr;
  68         int sockfd;
  69         int *ioref;
  70         struct io_context *ioc;
  71         void *data;
  72 };
  73
  74 struct ast_netsock_list {
  75         ASTOBJ_CONTAINER_COMPONENTS(struct ast_netsock);
  76         struct io_context *ioc;
  77 };
  78
  79 static void ast_netsock_destroy(struct ast_netsock *netsock)
  80 {
  81         ast_io_remove(netsock->ioc, netsock->ioref);
  82         close(netsock->sockfd);
  83         free(netsock);
  84 }
  85
  86 struct ast_netsock_list *ast_netsock_list_alloc(void)
  87 {
  88         struct ast_netsock_list *res;
  89
  90         res = calloc(1, sizeof(*res));
  91
  92         return res;
  93 }
  94
  95 int ast_netsock_init(struct ast_netsock_list *list)
  96 {
  97         memset(list, 0, sizeof(*list));
  98         ASTOBJ_CONTAINER_INIT(list);
  99
 100         return 0;
 101 }
 102
 103 int ast_netsock_release(struct ast_netsock_list *list)
 104 {
 105         ASTOBJ_CONTAINER_DESTROYALL(list, ast_netsock_destroy);
 106         ASTOBJ_CONTAINER_DESTROY(list);
 107
 108         return 0;
 109 }
 110
 111 struct ast_netsock *ast_netsock_find(struct ast_netsock_list *list,
 112                                      struct sockaddr_in *sa)
 113 {
 114         struct ast_netsock *sock = NULL;
 115
 116         ASTOBJ_CONTAINER_TRAVERSE(list, !sock, {
 117                 ASTOBJ_RDLOCK(iterator);
 118                 if (!inaddrcmp(&iterator->bindaddr, sa))
 119                         sock = iterator;
 120                 ASTOBJ_UNLOCK(iterator);
 121         });
 122
 123         return sock;
 124 }
 125
 126 struct ast_netsock *ast_netsock_bindaddr(struct ast_netsock_list *list, struct io_context *ioc, struct sockaddr_in *bindaddr, int tos, ast_io_cb callback, void *data)
 127 {
 128         int netsocket = -1;
 129         int *ioref;
 130         char iabuf[INET_ADDRSTRLEN];
 131
 132         struct ast_netsock *ns;
 133
 134         /* Make a UDP socket */
 135         netsocket = socket(AF_INET, SOCK_DGRAM, IPPROTO_IP);
 136
 137         if (netsocket < 0) {
 138                 ast_log(LOG_ERROR, "Unable to create network socket: %s\n", strerror(errno));
 139                 return NULL;
 140         }
 141         if (bind(netsocket,(struct sockaddr *)bindaddr, sizeof(struct sockaddr_in))) {
 142                 ast_log(LOG_ERROR, "Unable to bind to %s port %d: %s\n", ast_inet_ntoa(iabuf, sizeof(iabuf), bindaddr->sin_addr), ntohs(bindaddr->sin_port), strerror(errno));
 143                 close(netsocket);
 144                 return NULL;
 145         }
 146         if (option_verbose > 1)
 147                 ast_verbose(VERBOSE_PREFIX_2 "Using TOS bits %d\n", tos);
 148
 149         if (setsockopt(netsocket, IPPROTO_IP, IP_TOS, &tos, sizeof(tos)))
 150                 ast_log(LOG_WARNING, "Unable to set TOS to %d\n", tos);
 151
 152         ns = malloc(sizeof(struct ast_netsock));
 153         if (ns) {
 154                 /* Establish I/O callback for socket read */
 155                 ioref = ast_io_add(ioc, netsocket, callback, AST_IO_IN, ns);
 156                 if (!ioref) {
 157                         ast_log(LOG_WARNING, "Out of memory!\n");
 158                         close(netsocket);
 159                         free(ns);
 160                         return NULL;
 161                 }
 162                 ASTOBJ_INIT(ns);
 163                 ns->ioref = ioref;
 164                 ns->ioc = ioc;
 165                 ns->sockfd = netsocket;
 166                 ns->data = data;
 167                 memcpy(&ns->bindaddr, bindaddr, sizeof(ns->bindaddr));
 168                 ASTOBJ_CONTAINER_LINK(list, ns);
 169         } else {
 170                 ast_log(LOG_WARNING, "Out of memory!\n");
 171                 close(netsocket);
 172         }
 173
 174         return ns;
 175 }
 176
 177 struct ast_netsock *ast_netsock_bind(struct ast_netsock_list *list, struct io_context *ioc, const char *bindinfo, int defaultport, int tos, ast_io_cb callback, void *data)
 178 {
 179         struct sockaddr_in sin;
 180         char *tmp;
 181         char *host;
 182         char *port;
 183         int portno;
 184
 185         memset(&sin, 0, sizeof(sin));
 186         sin.sin_family = AF_INET;
 187         sin.sin_port = htons(defaultport);
 188         tmp = ast_strdupa(bindinfo);
 189         if (!tmp) {
 190                 ast_log(LOG_WARNING, "Out of memory!\n");
 191                 return NULL;
 192         }
 193
 194         host = strsep(&tmp, ":");
 195         port = tmp;
 196
 197         if (port && ((portno = atoi(port)) > 0))
 198                 sin.sin_port = htons(portno);
 199
 200         inet_aton(host, &sin.sin_addr);
 201
 202         return ast_netsock_bindaddr(list, ioc, &sin, tos, callback, data);
 203 }
 204
 205 int ast_netsock_sockfd(const struct ast_netsock *ns)
 206 {
 207         return ns ? ns-> sockfd : -1;
 208 }
 209
 210 const struct sockaddr_in *ast_netsock_boundaddr(const struct ast_netsock *ns)
 211 {
 212         return &(ns->bindaddr);
 213 }
 214
 215 void *ast_netsock_data(const struct ast_netsock *ns)
 216 {
 217         return ns->data;
 218 }
 219
 220 void ast_netsock_unref(struct ast_netsock *ns)
 221 {
 222         ASTOBJ_UNREF(ns, ast_netsock_destroy);
 223 }