Fix DEBUG_THREADS when lock is acquired in __constructor__
[asterisk/asterisk.git] / main / netsock.c
index f6ac83b..598bc4b 100644 (file)
  * \author Mark Spencer <markster@digium.com>
  */
 
+/*** MODULEINFO
+       <support_level>core</support_level>
+ ***/
+
 #include "asterisk.h"
 
 ASTERISK_FILE_VERSION(__FILE__, "$Revision$")
 
-#include <sys/time.h>
-#include <signal.h>
-#include <sys/ioctl.h>
-
-#if defined(__OpenBSD__) || defined(__NetBSD__) || defined(__FreeBSD__)
-#include <fcntl.h>
+#ifndef __linux__
+#if defined(__OpenBSD__) || defined(__NetBSD__) || defined(__FreeBSD__) || defined(__Darwin__) || defined(__GLIBC__)
+#include <net/if_dl.h>
+#endif
 #endif
 
 #if defined (SOLARIS)
 #include <sys/sockio.h>
+#elif defined(HAVE_GETIFADDRS)
+#include <ifaddrs.h>
 #endif
 
 #include "asterisk/netsock.h"
-#include "asterisk/channel.h"
+#include "asterisk/netsock2.h"
 #include "asterisk/utils.h"
-#include "asterisk/lock.h"
-#include "asterisk/srv.h"
+#include "asterisk/astobj.h"
 
 struct ast_netsock {
        ASTOBJ_COMPONENTS(struct ast_netsock);
-       struct sockaddr_in bindaddr;
+       struct ast_sockaddr bindaddr;
        int sockfd;
        int *ioref;
        struct io_context *ioc;
@@ -85,64 +88,68 @@ int ast_netsock_release(struct ast_netsock_list *list)
 {
        ASTOBJ_CONTAINER_DESTROYALL(list, ast_netsock_destroy);
        ASTOBJ_CONTAINER_DESTROY(list);
+       ast_free(list);
 
        return 0;
 }
 
-struct ast_netsock *ast_netsock_find(struct ast_netsock_list *list,
-                                    struct sockaddr_in *sa)
+struct ast_netsock *ast_netsock_find(struct ast_netsock_list *list, struct ast_sockaddr *addr)
 {
        struct ast_netsock *sock = NULL;
 
        ASTOBJ_CONTAINER_TRAVERSE(list, !sock, {
                ASTOBJ_RDLOCK(iterator);
-               if (!inaddrcmp(&iterator->bindaddr, sa))
+               if (!ast_sockaddr_cmp(&iterator->bindaddr, addr)) {
                        sock = iterator;
+               }
                ASTOBJ_UNLOCK(iterator);
        });
 
        return sock;
 }
 
-struct ast_netsock *ast_netsock_bindaddr(struct ast_netsock_list *list, struct io_context *ioc, struct sockaddr_in *bindaddr, int tos, int cos, ast_io_cb callback, void *data)
+struct ast_netsock *ast_netsock_bindaddr(struct ast_netsock_list *list, struct io_context *ioc, struct ast_sockaddr *bindaddr, int tos, int cos, ast_io_cb callback, void *data)
 {
        int netsocket = -1;
        int *ioref;
-       
+
        struct ast_netsock *ns;
        const int reuseFlag = 1;
-       
+
        /* Make a UDP socket */
        netsocket = socket(AF_INET, SOCK_DGRAM, IPPROTO_IP);
-       
+
        if (netsocket < 0) {
                ast_log(LOG_ERROR, "Unable to create network socket: %s\n", strerror(errno));
                return NULL;
        }
        if (setsockopt(netsocket, SOL_SOCKET, SO_REUSEADDR, (char *)&reuseFlag, sizeof reuseFlag) < 0) {
-                       ast_log(LOG_WARNING, "Error setting SO_REUSEADDR on sockfd '%d'\n", netsocket);
+               ast_log(LOG_WARNING, "Error setting SO_REUSEADDR on sockfd '%d'\n", netsocket);
        }
-       if (bind(netsocket,(struct sockaddr *)bindaddr, sizeof(struct sockaddr_in))) {
-               ast_log(LOG_ERROR, "Unable to bind to %s port %d: %s\n", ast_inet_ntoa(bindaddr->sin_addr), ntohs(bindaddr->sin_port), strerror(errno));
+       if (ast_bind(netsocket, bindaddr)) {
+               ast_log(LOG_ERROR,
+                       "Unable to bind to %s: %s\n",
+                       ast_sockaddr_stringify(bindaddr),
+                       strerror(errno));
                close(netsocket);
                return NULL;
        }
 
-       ast_netsock_set_qos(netsocket, tos, cos);
-               
+       ast_set_qos(netsocket, tos, cos, "IAX2");
+
        ast_enable_packet_fragmentation(netsocket);
 
        if (!(ns = ast_calloc(1, sizeof(*ns)))) {
                close(netsocket);
                return NULL;
        }
-       
+
        /* Establish I/O callback for socket read */
        if (!(ioref = ast_io_add(ioc, netsocket, callback, AST_IO_IN, ns))) {
                close(netsocket);
                ast_free(ns);
                return NULL;
-       }       
+       }
        ASTOBJ_INIT(ns);
        ns->ioref = ioref;
        ns->ioc = ioc;
@@ -154,52 +161,29 @@ struct ast_netsock *ast_netsock_bindaddr(struct ast_netsock_list *list, struct i
        return ns;
 }
 
-int ast_netsock_set_qos(int netsocket, int tos, int cos)
+int ast_netsock_set_qos(int sockfd, int tos, int cos, const char *desc)
 {
-       int res;
-       
-       if ((res = setsockopt(netsocket, IPPROTO_IP, IP_TOS, &tos, sizeof(tos))))
-               ast_log(LOG_WARNING, "Unable to set TOS to %d\n", tos);
-       else {
-           if (option_verbose > 1)
-               ast_verbose(VERBOSE_PREFIX_2 "Using TOS bits %d\n", tos);
-       }
-
-#if defined(linux)                                                             
-       if (setsockopt(netsocket, SOL_SOCKET, SO_PRIORITY, &cos, sizeof(cos)))
-           ast_log(LOG_WARNING, "Unable to set CoS to %d\n", cos);
-       else {
-           if (option_verbose > 1)
-               ast_verbose(VERBOSE_PREFIX_2 "Using CoS mark %d\n", cos);
-       }
-#endif
-                                                       
-       return res;
+       return ast_set_qos(sockfd, tos, cos, desc);
 }
-                                                                                                       
 
 struct ast_netsock *ast_netsock_bind(struct ast_netsock_list *list, struct io_context *ioc, const char *bindinfo, int defaultport, int tos, int cos, ast_io_cb callback, void *data)
 {
-       struct sockaddr_in sin;
-       char *tmp;
-       char *host;
-       char *port;
-       int portno;
-
-       memset(&sin, 0, sizeof(sin));
-       sin.sin_family = AF_INET;
-       sin.sin_port = htons(defaultport);
-       tmp = ast_strdupa(bindinfo);
+       struct ast_sockaddr addr;
 
-       host = strsep(&tmp, ":");
-       port = tmp;
+       if (ast_sockaddr_parse(&addr, bindinfo, 0)) {
+               if (!ast_sockaddr_is_ipv4(&addr)) {
+                       ast_log(LOG_WARNING, "Only IPv4 addresses are supported at this time.\n");
+                       return NULL;
+               }
 
-       if (port && ((portno = atoi(port)) > 0))
-               sin.sin_port = htons(portno);
+               if (!ast_sockaddr_port(&addr)) {
+                       ast_sockaddr_set_port(&addr, defaultport);
+               }
 
-       inet_aton(host, &sin.sin_addr);
+               return ast_netsock_bindaddr(list, ioc, &addr, tos, cos, callback, data);
+       }
 
-       return ast_netsock_bindaddr(list, ioc, &sin, tos, cos, callback, data);
+       return NULL;
 }
 
 int ast_netsock_sockfd(const struct ast_netsock *ns)
@@ -207,9 +191,9 @@ int ast_netsock_sockfd(const struct ast_netsock *ns)
        return ns ? ns-> sockfd : -1;
 }
 
-const struct sockaddr_in *ast_netsock_boundaddr(const struct ast_netsock *ns)
+const struct ast_sockaddr *ast_netsock_boundaddr(const struct ast_netsock *ns)
 {
-       return &(ns->bindaddr);
+       return &ns->bindaddr;
 }
 
 void *ast_netsock_data(const struct ast_netsock *ns)
@@ -221,3 +205,106 @@ void ast_netsock_unref(struct ast_netsock *ns)
 {
        ASTOBJ_UNREF(ns, ast_netsock_destroy);
 }
+
+char *ast_eid_to_str(char *s, int maxlen, struct ast_eid *eid)
+{
+       int x;
+       char *os = s;
+       if (maxlen < 18) {
+               if (s && (maxlen > 0))
+                       *s = '\0';
+       } else {
+               for (x = 0; x < 5; x++) {
+                       sprintf(s, "%02x:", eid->eid[x]);
+                       s += 3;
+               }
+               sprintf(s, "%02x", eid->eid[5]);
+       }
+       return os;
+}
+
+void ast_set_default_eid(struct ast_eid *eid)
+{
+#if defined(SIOCGIFHWADDR) && defined(HAVE_STRUCT_IFREQ_IFR_IFRU_IFRU_HWADDR)
+       int s, x = 0;
+       char eid_str[20];
+       struct ifreq ifr;
+       static const unsigned int MAXIF = 10;
+
+       s = socket(AF_INET, SOCK_STREAM, 0);
+       if (s < 0)
+               return;
+       for (x = 0; x < MAXIF; x++) {
+               static const char *prefixes[] = { "eth", "em" };
+               unsigned int i;
+
+               for (i = 0; i < ARRAY_LEN(prefixes); i++) {
+                       memset(&ifr, 0, sizeof(ifr));
+                       snprintf(ifr.ifr_name, sizeof(ifr.ifr_name), "%s%d", prefixes[i], x);
+                       if (!ioctl(s, SIOCGIFHWADDR, &ifr)) {
+                               break;
+                       }
+               }
+
+               if (i == ARRAY_LEN(prefixes)) {
+                       /* Try pciX#[1..N] */
+                       for (i = 0; i < MAXIF; i++) {
+                               memset(&ifr, 0, sizeof(ifr));
+                               snprintf(ifr.ifr_name, sizeof(ifr.ifr_name), "pci%u#%u", x, i);
+                               if (!ioctl(s, SIOCGIFHWADDR, &ifr)) {
+                                       break;
+                               }
+                       }
+                       if (i == MAXIF) {
+                               continue;
+                       }
+               }
+
+               memcpy(eid, ((unsigned char *)&ifr.ifr_hwaddr) + 2, sizeof(*eid));
+               ast_debug(1, "Seeding global EID '%s' from '%s' using 'siocgifhwaddr'\n", ast_eid_to_str(eid_str, sizeof(eid_str), eid), ifr.ifr_name);
+               close(s);
+               return;
+       }
+       close(s);
+#else
+#if defined(ifa_broadaddr) && !defined(SOLARIS)
+       char eid_str[20];
+       struct ifaddrs *ifap;
+
+       if (getifaddrs(&ifap) == 0) {
+               struct ifaddrs *p;
+               for (p = ifap; p; p = p->ifa_next) {
+                       if ((p->ifa_addr->sa_family == AF_LINK) && !(p->ifa_flags & IFF_LOOPBACK) && (p->ifa_flags & IFF_RUNNING)) {
+                               struct sockaddr_dl* sdp = (struct sockaddr_dl*) p->ifa_addr;
+                               memcpy(&(eid->eid), sdp->sdl_data + sdp->sdl_nlen, 6);
+                               ast_debug(1, "Seeding global EID '%s' from '%s' using 'getifaddrs'\n", ast_eid_to_str(eid_str, sizeof(eid_str), eid), p->ifa_name);
+                               freeifaddrs(ifap);
+                               return;
+                       }
+               }
+               freeifaddrs(ifap);
+       }
+#endif
+#endif
+       ast_debug(1, "No ethernet interface found for seeding global EID. You will have to set it manually.\n");
+}
+
+int ast_str_to_eid(struct ast_eid *eid, const char *s)
+{
+       unsigned int eid_int[6];
+       int x;
+
+       if (sscanf(s, "%2x:%2x:%2x:%2x:%2x:%2x", &eid_int[0], &eid_int[1], &eid_int[2],
+                &eid_int[3], &eid_int[4], &eid_int[5]) != 6)
+                       return -1;
+
+       for (x = 0; x < 6; x++)
+               eid->eid[x] = eid_int[x];
+
+       return 0;
+}
+
+int ast_eid_cmp(const struct ast_eid *eid1, const struct ast_eid *eid2)
+{
+       return memcmp(eid1, eid2, sizeof(*eid1));
+}