silly people that don't want to install/run autoconf :-)
[asterisk/asterisk.git] / 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 }