| /* |
| * inet and unix socket functions for qemu |
| * |
| * (c) 2008 Gerd Hoffmann <kraxel@redhat.com> |
| * |
| * This program is free software; you can redistribute it and/or modify |
| * it under the terms of the GNU General Public License as published by |
| * the Free Software Foundation; under version 2 of the License. |
| * |
| * This program is distributed in the hope that it will be useful, |
| * but WITHOUT ANY WARRANTY; without even the implied warranty of |
| * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
| * GNU General Public License for more details. |
| */ |
| #include <stdio.h> |
| #include <stdlib.h> |
| #include <string.h> |
| #include <ctype.h> |
| #include <errno.h> |
| #include <unistd.h> |
| |
| #include "qemu_socket.h" |
| #include "qemu-common.h" /* for qemu_isdigit */ |
| |
| #ifndef AI_ADDRCONFIG |
| # define AI_ADDRCONFIG 0 |
| #endif |
| |
| static int sockets_debug = 0; |
| static const int on=1, off=0; |
| |
| /* used temporarely until all users are converted to QemuOpts */ |
| QemuOptsList dummy_opts = { |
| .name = "dummy", |
| .head = TAILQ_HEAD_INITIALIZER(dummy_opts.head), |
| .desc = { |
| { |
| .name = "path", |
| .type = QEMU_OPT_STRING, |
| },{ |
| .name = "host", |
| .type = QEMU_OPT_STRING, |
| },{ |
| .name = "port", |
| .type = QEMU_OPT_STRING, |
| },{ |
| .name = "to", |
| .type = QEMU_OPT_NUMBER, |
| },{ |
| .name = "ipv4", |
| .type = QEMU_OPT_BOOL, |
| },{ |
| .name = "ipv6", |
| .type = QEMU_OPT_BOOL, |
| }, |
| { /* end if list */ } |
| }, |
| }; |
| |
| static int inet_getport(struct addrinfo *e) |
| { |
| struct sockaddr_in *i4; |
| struct sockaddr_in6 *i6; |
| |
| switch (e->ai_family) { |
| case PF_INET6: |
| i6 = (void*)e->ai_addr; |
| return ntohs(i6->sin6_port); |
| case PF_INET: |
| i4 = (void*)e->ai_addr; |
| return ntohs(i4->sin_port); |
| default: |
| return 0; |
| } |
| } |
| |
| static void inet_setport(struct addrinfo *e, int port) |
| { |
| struct sockaddr_in *i4; |
| struct sockaddr_in6 *i6; |
| |
| switch (e->ai_family) { |
| case PF_INET6: |
| i6 = (void*)e->ai_addr; |
| i6->sin6_port = htons(port); |
| break; |
| case PF_INET: |
| i4 = (void*)e->ai_addr; |
| i4->sin_port = htons(port); |
| break; |
| } |
| } |
| |
| static const char *inet_strfamily(int family) |
| { |
| switch (family) { |
| case PF_INET6: return "ipv6"; |
| case PF_INET: return "ipv4"; |
| case PF_UNIX: return "unix"; |
| } |
| return "????"; |
| } |
| |
| static void inet_print_addrinfo(const char *tag, struct addrinfo *res) |
| { |
| struct addrinfo *e; |
| char uaddr[INET6_ADDRSTRLEN+1]; |
| char uport[33]; |
| |
| for (e = res; e != NULL; e = e->ai_next) { |
| getnameinfo((struct sockaddr*)e->ai_addr,e->ai_addrlen, |
| uaddr,INET6_ADDRSTRLEN,uport,32, |
| NI_NUMERICHOST | NI_NUMERICSERV); |
| fprintf(stderr,"%s: getaddrinfo: family %s, host %s, port %s\n", |
| tag, inet_strfamily(e->ai_family), uaddr, uport); |
| } |
| } |
| |
| int inet_listen_opts(QemuOpts *opts, int port_offset) |
| { |
| struct addrinfo ai,*res,*e; |
| const char *addr; |
| char port[33]; |
| char uaddr[INET6_ADDRSTRLEN+1]; |
| char uport[33]; |
| int slisten,rc,to,try_next; |
| |
| memset(&ai,0, sizeof(ai)); |
| ai.ai_flags = AI_PASSIVE | AI_ADDRCONFIG; |
| ai.ai_family = PF_UNSPEC; |
| ai.ai_socktype = SOCK_STREAM; |
| |
| if (qemu_opt_get(opts, "port") == NULL) { |
| fprintf(stderr, "%s: host and/or port not specified\n", __FUNCTION__); |
| return -1; |
| } |
| pstrcpy(port, sizeof(port), qemu_opt_get(opts, "port")); |
| addr = qemu_opt_get(opts, "host"); |
| |
| to = qemu_opt_get_number(opts, "to", 0); |
| if (qemu_opt_get_bool(opts, "ipv4", 0)) |
| ai.ai_family = PF_INET; |
| if (qemu_opt_get_bool(opts, "ipv6", 0)) |
| ai.ai_family = PF_INET6; |
| |
| /* lookup */ |
| if (port_offset) |
| snprintf(port, sizeof(port), "%d", atoi(port) + port_offset); |
| rc = getaddrinfo(strlen(addr) ? addr : NULL, port, &ai, &res); |
| if (rc != 0) { |
| fprintf(stderr,"getaddrinfo(%s,%s): %s\n", addr, port, |
| gai_strerror(rc)); |
| return -1; |
| } |
| if (sockets_debug) |
| inet_print_addrinfo(__FUNCTION__, res); |
| |
| /* create socket + bind */ |
| for (e = res; e != NULL; e = e->ai_next) { |
| getnameinfo((struct sockaddr*)e->ai_addr,e->ai_addrlen, |
| uaddr,INET6_ADDRSTRLEN,uport,32, |
| NI_NUMERICHOST | NI_NUMERICSERV); |
| slisten = socket(e->ai_family, e->ai_socktype, e->ai_protocol); |
| if (slisten < 0) { |
| fprintf(stderr,"%s: socket(%s): %s\n", __FUNCTION__, |
| inet_strfamily(e->ai_family), strerror(errno)); |
| continue; |
| } |
| |
| setsockopt(slisten,SOL_SOCKET,SO_REUSEADDR,(void*)&on,sizeof(on)); |
| #ifdef IPV6_V6ONLY |
| if (e->ai_family == PF_INET6) { |
| /* listen on both ipv4 and ipv6 */ |
| setsockopt(slisten,IPPROTO_IPV6,IPV6_V6ONLY,(void*)&off, |
| sizeof(off)); |
| } |
| #endif |
| |
| for (;;) { |
| if (bind(slisten, e->ai_addr, e->ai_addrlen) == 0) { |
| if (sockets_debug) |
| fprintf(stderr,"%s: bind(%s,%s,%d): OK\n", __FUNCTION__, |
| inet_strfamily(e->ai_family), uaddr, inet_getport(e)); |
| goto listen; |
| } |
| try_next = to && (inet_getport(e) <= to + port_offset); |
| if (!try_next || sockets_debug) |
| fprintf(stderr,"%s: bind(%s,%s,%d): %s\n", __FUNCTION__, |
| inet_strfamily(e->ai_family), uaddr, inet_getport(e), |
| strerror(errno)); |
| if (try_next) { |
| inet_setport(e, inet_getport(e) + 1); |
| continue; |
| } |
| break; |
| } |
| closesocket(slisten); |
| } |
| fprintf(stderr, "%s: FAILED\n", __FUNCTION__); |
| freeaddrinfo(res); |
| return -1; |
| |
| listen: |
| if (listen(slisten,1) != 0) { |
| perror("listen"); |
| closesocket(slisten); |
| freeaddrinfo(res); |
| return -1; |
| } |
| snprintf(uport, sizeof(uport), "%d", inet_getport(e) - port_offset); |
| qemu_opt_set(opts, "host", uaddr); |
| qemu_opt_set(opts, "port", uport); |
| qemu_opt_set(opts, "ipv6", (e->ai_family == PF_INET6) ? "on" : "off"); |
| qemu_opt_set(opts, "ipv4", (e->ai_family != PF_INET6) ? "on" : "off"); |
| freeaddrinfo(res); |
| return slisten; |
| } |
| |
| int inet_connect_opts(QemuOpts *opts) |
| { |
| struct addrinfo ai,*res,*e; |
| const char *addr; |
| const char *port; |
| char uaddr[INET6_ADDRSTRLEN+1]; |
| char uport[33]; |
| int sock,rc; |
| |
| memset(&ai,0, sizeof(ai)); |
| ai.ai_flags = AI_CANONNAME | AI_ADDRCONFIG; |
| ai.ai_family = PF_UNSPEC; |
| ai.ai_socktype = SOCK_STREAM; |
| |
| addr = qemu_opt_get(opts, "host"); |
| port = qemu_opt_get(opts, "port"); |
| if (addr == NULL || port == NULL) { |
| fprintf(stderr, "inet_connect: host and/or port not specified\n"); |
| return -1; |
| } |
| |
| if (qemu_opt_get_bool(opts, "ipv4", 0)) |
| ai.ai_family = PF_INET; |
| if (qemu_opt_get_bool(opts, "ipv6", 0)) |
| ai.ai_family = PF_INET6; |
| |
| /* lookup */ |
| if (0 != (rc = getaddrinfo(addr, port, &ai, &res))) { |
| fprintf(stderr,"getaddrinfo(%s,%s): %s\n", addr, port, |
| gai_strerror(rc)); |
| return -1; |
| } |
| if (sockets_debug) |
| inet_print_addrinfo(__FUNCTION__, res); |
| |
| for (e = res; e != NULL; e = e->ai_next) { |
| if (getnameinfo((struct sockaddr*)e->ai_addr,e->ai_addrlen, |
| uaddr,INET6_ADDRSTRLEN,uport,32, |
| NI_NUMERICHOST | NI_NUMERICSERV) != 0) { |
| fprintf(stderr,"%s: getnameinfo: oops\n", __FUNCTION__); |
| continue; |
| } |
| sock = socket(e->ai_family, e->ai_socktype, e->ai_protocol); |
| if (sock < 0) { |
| fprintf(stderr,"%s: socket(%s): %s\n", __FUNCTION__, |
| inet_strfamily(e->ai_family), strerror(errno)); |
| continue; |
| } |
| setsockopt(sock,SOL_SOCKET,SO_REUSEADDR,(void*)&on,sizeof(on)); |
| |
| /* connect to peer */ |
| if (connect(sock,e->ai_addr,e->ai_addrlen) < 0) { |
| if (sockets_debug || NULL == e->ai_next) |
| fprintf(stderr, "%s: connect(%s,%s,%s,%s): %s\n", __FUNCTION__, |
| inet_strfamily(e->ai_family), |
| e->ai_canonname, uaddr, uport, strerror(errno)); |
| closesocket(sock); |
| continue; |
| } |
| if (sockets_debug) |
| fprintf(stderr, "%s: connect(%s,%s,%s,%s): OK\n", __FUNCTION__, |
| inet_strfamily(e->ai_family), |
| e->ai_canonname, uaddr, uport); |
| freeaddrinfo(res); |
| return sock; |
| } |
| freeaddrinfo(res); |
| return -1; |
| } |
| |
| /* compatibility wrapper */ |
| static int inet_parse(QemuOpts *opts, const char *str) |
| { |
| const char *optstr, *h; |
| char addr[64]; |
| char port[33]; |
| int pos; |
| |
| /* parse address */ |
| if (str[0] == ':') { |
| /* no host given */ |
| addr[0] = '\0'; |
| if (1 != sscanf(str,":%32[^,]%n",port,&pos)) { |
| fprintf(stderr, "%s: portonly parse error (%s)\n", |
| __FUNCTION__, str); |
| return -1; |
| } |
| } else if (str[0] == '[') { |
| /* IPv6 addr */ |
| if (2 != sscanf(str,"[%64[^]]]:%32[^,]%n",addr,port,&pos)) { |
| fprintf(stderr, "%s: ipv6 parse error (%s)\n", |
| __FUNCTION__, str); |
| return -1; |
| } |
| qemu_opt_set(opts, "ipv6", "yes"); |
| } else if (qemu_isdigit(str[0])) { |
| /* IPv4 addr */ |
| if (2 != sscanf(str,"%64[0-9.]:%32[^,]%n",addr,port,&pos)) { |
| fprintf(stderr, "%s: ipv4 parse error (%s)\n", |
| __FUNCTION__, str); |
| return -1; |
| } |
| qemu_opt_set(opts, "ipv4", "yes"); |
| } else { |
| /* hostname */ |
| if (2 != sscanf(str,"%64[^:]:%32[^,]%n",addr,port,&pos)) { |
| fprintf(stderr, "%s: hostname parse error (%s)\n", |
| __FUNCTION__, str); |
| return -1; |
| } |
| } |
| qemu_opt_set(opts, "host", addr); |
| qemu_opt_set(opts, "port", port); |
| |
| /* parse options */ |
| optstr = str + pos; |
| h = strstr(optstr, ",to="); |
| if (h) |
| qemu_opt_set(opts, "to", h+4); |
| if (strstr(optstr, ",ipv4")) |
| qemu_opt_set(opts, "ipv4", "yes"); |
| if (strstr(optstr, ",ipv6")) |
| qemu_opt_set(opts, "ipv6", "yes"); |
| return 0; |
| } |
| |
| int inet_listen(const char *str, char *ostr, int olen, |
| int socktype, int port_offset) |
| { |
| QemuOpts *opts; |
| char *optstr; |
| int sock = -1; |
| |
| opts = qemu_opts_create(&dummy_opts, NULL, 0); |
| if (inet_parse(opts, str) == 0) { |
| sock = inet_listen_opts(opts, port_offset); |
| if (sock != -1 && ostr) { |
| optstr = strchr(str, ','); |
| if (qemu_opt_get_bool(opts, "ipv6", 0)) { |
| snprintf(ostr, olen, "[%s]:%s%s", |
| qemu_opt_get(opts, "host"), |
| qemu_opt_get(opts, "port"), |
| optstr ? optstr : ""); |
| } else { |
| snprintf(ostr, olen, "%s:%s%s", |
| qemu_opt_get(opts, "host"), |
| qemu_opt_get(opts, "port"), |
| optstr ? optstr : ""); |
| } |
| } |
| } |
| qemu_opts_del(opts); |
| return sock; |
| } |
| |
| int inet_connect(const char *str, int socktype) |
| { |
| QemuOpts *opts; |
| int sock = -1; |
| |
| opts = qemu_opts_create(&dummy_opts, NULL, 0); |
| if (inet_parse(opts, str) == 0) |
| sock = inet_connect_opts(opts); |
| qemu_opts_del(opts); |
| return sock; |
| } |
| |
| #ifndef _WIN32 |
| |
| int unix_listen_opts(QemuOpts *opts) |
| { |
| struct sockaddr_un un; |
| const char *path = qemu_opt_get(opts, "path"); |
| int sock, fd; |
| |
| sock = socket(PF_UNIX, SOCK_STREAM, 0); |
| if (sock < 0) { |
| perror("socket(unix)"); |
| return -1; |
| } |
| |
| memset(&un, 0, sizeof(un)); |
| un.sun_family = AF_UNIX; |
| if (path && strlen(path)) { |
| snprintf(un.sun_path, sizeof(un.sun_path), "%s", path); |
| } else { |
| char *tmpdir = getenv("TMPDIR"); |
| snprintf(un.sun_path, sizeof(un.sun_path), "%s/qemu-socket-XXXXXX", |
| tmpdir ? tmpdir : "/tmp"); |
| /* |
| * This dummy fd usage silences the mktemp() unsecure warning. |
| * Using mkstemp() doesn't make things more secure here |
| * though. bind() complains about existing files, so we have |
| * to unlink first and thus re-open the race window. The |
| * worst case possible is bind() failing, i.e. a DoS attack. |
| */ |
| fd = mkstemp(un.sun_path); close(fd); |
| qemu_opt_set(opts, "path", un.sun_path); |
| } |
| |
| unlink(un.sun_path); |
| if (bind(sock, (struct sockaddr*) &un, sizeof(un)) < 0) { |
| fprintf(stderr, "bind(unix:%s): %s\n", un.sun_path, strerror(errno)); |
| goto err; |
| } |
| if (listen(sock, 1) < 0) { |
| fprintf(stderr, "listen(unix:%s): %s\n", un.sun_path, strerror(errno)); |
| goto err; |
| } |
| |
| if (sockets_debug) |
| fprintf(stderr, "bind(unix:%s): OK\n", un.sun_path); |
| return sock; |
| |
| err: |
| closesocket(sock); |
| return -1; |
| } |
| |
| int unix_connect_opts(QemuOpts *opts) |
| { |
| struct sockaddr_un un; |
| const char *path = qemu_opt_get(opts, "path"); |
| int sock; |
| |
| if (NULL == path) { |
| fprintf(stderr, "unix connect: no path specified\n"); |
| return -1; |
| } |
| |
| sock = socket(PF_UNIX, SOCK_STREAM, 0); |
| if (sock < 0) { |
| perror("socket(unix)"); |
| return -1; |
| } |
| |
| memset(&un, 0, sizeof(un)); |
| un.sun_family = AF_UNIX; |
| snprintf(un.sun_path, sizeof(un.sun_path), "%s", path); |
| if (connect(sock, (struct sockaddr*) &un, sizeof(un)) < 0) { |
| fprintf(stderr, "connect(unix:%s): %s\n", path, strerror(errno)); |
| return -1; |
| } |
| |
| if (sockets_debug) |
| fprintf(stderr, "connect(unix:%s): OK\n", path); |
| return sock; |
| } |
| |
| /* compatibility wrapper */ |
| int unix_listen(const char *str, char *ostr, int olen) |
| { |
| QemuOpts *opts; |
| char *path, *optstr; |
| int sock, len; |
| |
| opts = qemu_opts_create(&dummy_opts, NULL, 0); |
| |
| optstr = strchr(str, ','); |
| if (optstr) { |
| len = optstr - str; |
| if (len) { |
| path = qemu_malloc(len+1); |
| snprintf(path, len+1, "%.*s", len, str); |
| qemu_opt_set(opts, "path", path); |
| qemu_free(path); |
| } |
| } else { |
| qemu_opt_set(opts, "path", str); |
| } |
| |
| sock = unix_listen_opts(opts); |
| |
| if (sock != -1 && ostr) |
| snprintf(ostr, olen, "%s%s", qemu_opt_get(opts, "path"), optstr ? optstr : ""); |
| qemu_opts_del(opts); |
| return sock; |
| } |
| |
| int unix_connect(const char *path) |
| { |
| QemuOpts *opts; |
| int sock; |
| |
| opts = qemu_opts_create(&dummy_opts, NULL, 0); |
| qemu_opt_set(opts, "path", path); |
| sock = unix_connect_opts(opts); |
| qemu_opts_del(opts); |
| return sock; |
| } |
| |
| #else |
| |
| int unix_listen_opts(QemuOpts *opts) |
| { |
| fprintf(stderr, "unix sockets are not available on windows\n"); |
| return -1; |
| } |
| |
| int unix_connect_opts(QemuOpts *opts) |
| { |
| fprintf(stderr, "unix sockets are not available on windows\n"); |
| return -1; |
| } |
| |
| int unix_listen(const char *path, char *ostr, int olen) |
| { |
| fprintf(stderr, "unix sockets are not available on windows\n"); |
| return -1; |
| } |
| |
| int unix_connect(const char *path) |
| { |
| fprintf(stderr, "unix sockets are not available on windows\n"); |
| return -1; |
| } |
| |
| #endif |