]> git.proxmox.com Git - qemu.git/blob - qemu-sockets.c
fips: fix build on !Linux
[qemu.git] / qemu-sockets.c
1 /*
2 * inet and unix socket functions for qemu
3 *
4 * (c) 2008 Gerd Hoffmann <kraxel@redhat.com>
5 *
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; under version 2 of the License.
9 *
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
14 *
15 * Contributions after 2012-01-13 are licensed under the terms of the
16 * GNU GPL, version 2 or (at your option) any later version.
17 */
18 #include <stdio.h>
19 #include <stdlib.h>
20 #include <string.h>
21 #include <ctype.h>
22 #include <errno.h>
23 #include <unistd.h>
24
25 #include "qemu_socket.h"
26 #include "qemu-common.h" /* for qemu_isdigit */
27
28 #ifndef AI_ADDRCONFIG
29 # define AI_ADDRCONFIG 0
30 #endif
31
32 static const int on=1, off=0;
33
34 /* used temporarely until all users are converted to QemuOpts */
35 static QemuOptsList dummy_opts = {
36 .name = "dummy",
37 .head = QTAILQ_HEAD_INITIALIZER(dummy_opts.head),
38 .desc = {
39 {
40 .name = "path",
41 .type = QEMU_OPT_STRING,
42 },{
43 .name = "host",
44 .type = QEMU_OPT_STRING,
45 },{
46 .name = "port",
47 .type = QEMU_OPT_STRING,
48 },{
49 .name = "to",
50 .type = QEMU_OPT_NUMBER,
51 },{
52 .name = "ipv4",
53 .type = QEMU_OPT_BOOL,
54 },{
55 .name = "ipv6",
56 .type = QEMU_OPT_BOOL,
57 },{
58 .name = "block",
59 .type = QEMU_OPT_BOOL,
60 },
61 { /* end if list */ }
62 },
63 };
64
65 static int inet_getport(struct addrinfo *e)
66 {
67 struct sockaddr_in *i4;
68 struct sockaddr_in6 *i6;
69
70 switch (e->ai_family) {
71 case PF_INET6:
72 i6 = (void*)e->ai_addr;
73 return ntohs(i6->sin6_port);
74 case PF_INET:
75 i4 = (void*)e->ai_addr;
76 return ntohs(i4->sin_port);
77 default:
78 return 0;
79 }
80 }
81
82 static void inet_setport(struct addrinfo *e, int port)
83 {
84 struct sockaddr_in *i4;
85 struct sockaddr_in6 *i6;
86
87 switch (e->ai_family) {
88 case PF_INET6:
89 i6 = (void*)e->ai_addr;
90 i6->sin6_port = htons(port);
91 break;
92 case PF_INET:
93 i4 = (void*)e->ai_addr;
94 i4->sin_port = htons(port);
95 break;
96 }
97 }
98
99 const char *inet_strfamily(int family)
100 {
101 switch (family) {
102 case PF_INET6: return "ipv6";
103 case PF_INET: return "ipv4";
104 case PF_UNIX: return "unix";
105 }
106 return "unknown";
107 }
108
109 int inet_listen_opts(QemuOpts *opts, int port_offset, Error **errp)
110 {
111 struct addrinfo ai,*res,*e;
112 const char *addr;
113 char port[33];
114 char uaddr[INET6_ADDRSTRLEN+1];
115 char uport[33];
116 int slisten, rc, to, port_min, port_max, p;
117
118 memset(&ai,0, sizeof(ai));
119 ai.ai_flags = AI_PASSIVE | AI_ADDRCONFIG;
120 ai.ai_family = PF_UNSPEC;
121 ai.ai_socktype = SOCK_STREAM;
122
123 if ((qemu_opt_get(opts, "host") == NULL) ||
124 (qemu_opt_get(opts, "port") == NULL)) {
125 fprintf(stderr, "%s: host and/or port not specified\n", __FUNCTION__);
126 error_set(errp, QERR_SOCKET_CREATE_FAILED);
127 return -1;
128 }
129 pstrcpy(port, sizeof(port), qemu_opt_get(opts, "port"));
130 addr = qemu_opt_get(opts, "host");
131
132 to = qemu_opt_get_number(opts, "to", 0);
133 if (qemu_opt_get_bool(opts, "ipv4", 0))
134 ai.ai_family = PF_INET;
135 if (qemu_opt_get_bool(opts, "ipv6", 0))
136 ai.ai_family = PF_INET6;
137
138 /* lookup */
139 if (port_offset)
140 snprintf(port, sizeof(port), "%d", atoi(port) + port_offset);
141 rc = getaddrinfo(strlen(addr) ? addr : NULL, port, &ai, &res);
142 if (rc != 0) {
143 fprintf(stderr,"getaddrinfo(%s,%s): %s\n", addr, port,
144 gai_strerror(rc));
145 error_set(errp, QERR_SOCKET_CREATE_FAILED);
146 return -1;
147 }
148
149 /* create socket + bind */
150 for (e = res; e != NULL; e = e->ai_next) {
151 getnameinfo((struct sockaddr*)e->ai_addr,e->ai_addrlen,
152 uaddr,INET6_ADDRSTRLEN,uport,32,
153 NI_NUMERICHOST | NI_NUMERICSERV);
154 slisten = qemu_socket(e->ai_family, e->ai_socktype, e->ai_protocol);
155 if (slisten < 0) {
156 fprintf(stderr,"%s: socket(%s): %s\n", __FUNCTION__,
157 inet_strfamily(e->ai_family), strerror(errno));
158 if (!e->ai_next) {
159 error_set(errp, QERR_SOCKET_CREATE_FAILED);
160 }
161 continue;
162 }
163
164 setsockopt(slisten,SOL_SOCKET,SO_REUSEADDR,(void*)&on,sizeof(on));
165 #ifdef IPV6_V6ONLY
166 if (e->ai_family == PF_INET6) {
167 /* listen on both ipv4 and ipv6 */
168 setsockopt(slisten,IPPROTO_IPV6,IPV6_V6ONLY,(void*)&off,
169 sizeof(off));
170 }
171 #endif
172
173 port_min = inet_getport(e);
174 port_max = to ? to + port_offset : port_min;
175 for (p = port_min; p <= port_max; p++) {
176 inet_setport(e, p);
177 if (bind(slisten, e->ai_addr, e->ai_addrlen) == 0) {
178 goto listen;
179 }
180 if (p == port_max) {
181 fprintf(stderr,"%s: bind(%s,%s,%d): %s\n", __FUNCTION__,
182 inet_strfamily(e->ai_family), uaddr, inet_getport(e),
183 strerror(errno));
184 if (!e->ai_next) {
185 error_set(errp, QERR_SOCKET_BIND_FAILED);
186 }
187 }
188 }
189 closesocket(slisten);
190 }
191 fprintf(stderr, "%s: FAILED\n", __FUNCTION__);
192 freeaddrinfo(res);
193 return -1;
194
195 listen:
196 if (listen(slisten,1) != 0) {
197 error_set(errp, QERR_SOCKET_LISTEN_FAILED);
198 perror("listen");
199 closesocket(slisten);
200 freeaddrinfo(res);
201 return -1;
202 }
203 snprintf(uport, sizeof(uport), "%d", inet_getport(e) - port_offset);
204 qemu_opt_set(opts, "host", uaddr);
205 qemu_opt_set(opts, "port", uport);
206 qemu_opt_set(opts, "ipv6", (e->ai_family == PF_INET6) ? "on" : "off");
207 qemu_opt_set(opts, "ipv4", (e->ai_family != PF_INET6) ? "on" : "off");
208 freeaddrinfo(res);
209 return slisten;
210 }
211
212 int inet_connect_opts(QemuOpts *opts, Error **errp)
213 {
214 struct addrinfo ai,*res,*e;
215 const char *addr;
216 const char *port;
217 char uaddr[INET6_ADDRSTRLEN+1];
218 char uport[33];
219 int sock,rc;
220 bool block;
221
222 memset(&ai,0, sizeof(ai));
223 ai.ai_flags = AI_CANONNAME | AI_ADDRCONFIG;
224 ai.ai_family = PF_UNSPEC;
225 ai.ai_socktype = SOCK_STREAM;
226
227 addr = qemu_opt_get(opts, "host");
228 port = qemu_opt_get(opts, "port");
229 block = qemu_opt_get_bool(opts, "block", 0);
230 if (addr == NULL || port == NULL) {
231 fprintf(stderr, "inet_connect: host and/or port not specified\n");
232 error_set(errp, QERR_SOCKET_CREATE_FAILED);
233 return -1;
234 }
235
236 if (qemu_opt_get_bool(opts, "ipv4", 0))
237 ai.ai_family = PF_INET;
238 if (qemu_opt_get_bool(opts, "ipv6", 0))
239 ai.ai_family = PF_INET6;
240
241 /* lookup */
242 if (0 != (rc = getaddrinfo(addr, port, &ai, &res))) {
243 fprintf(stderr,"getaddrinfo(%s,%s): %s\n", addr, port,
244 gai_strerror(rc));
245 error_set(errp, QERR_SOCKET_CREATE_FAILED);
246 return -1;
247 }
248
249 for (e = res; e != NULL; e = e->ai_next) {
250 if (getnameinfo((struct sockaddr*)e->ai_addr,e->ai_addrlen,
251 uaddr,INET6_ADDRSTRLEN,uport,32,
252 NI_NUMERICHOST | NI_NUMERICSERV) != 0) {
253 fprintf(stderr,"%s: getnameinfo: oops\n", __FUNCTION__);
254 continue;
255 }
256 sock = qemu_socket(e->ai_family, e->ai_socktype, e->ai_protocol);
257 if (sock < 0) {
258 fprintf(stderr,"%s: socket(%s): %s\n", __FUNCTION__,
259 inet_strfamily(e->ai_family), strerror(errno));
260 continue;
261 }
262 setsockopt(sock,SOL_SOCKET,SO_REUSEADDR,(void*)&on,sizeof(on));
263 if (!block) {
264 socket_set_nonblock(sock);
265 }
266 /* connect to peer */
267 do {
268 rc = 0;
269 if (connect(sock, e->ai_addr, e->ai_addrlen) < 0) {
270 rc = -socket_error();
271 }
272 } while (rc == -EINTR);
273
274 #ifdef _WIN32
275 if (!block && (rc == -EINPROGRESS || rc == -EWOULDBLOCK
276 || rc == -WSAEALREADY)) {
277 #else
278 if (!block && (rc == -EINPROGRESS)) {
279 #endif
280 error_set(errp, QERR_SOCKET_CONNECT_IN_PROGRESS);
281 } else if (rc < 0) {
282 if (NULL == e->ai_next)
283 fprintf(stderr, "%s: connect(%s,%s,%s,%s): %s\n", __FUNCTION__,
284 inet_strfamily(e->ai_family),
285 e->ai_canonname, uaddr, uport, strerror(errno));
286 closesocket(sock);
287 continue;
288 }
289 freeaddrinfo(res);
290 return sock;
291 }
292 error_set(errp, QERR_SOCKET_CONNECT_FAILED);
293 freeaddrinfo(res);
294 return -1;
295 }
296
297 int inet_dgram_opts(QemuOpts *opts)
298 {
299 struct addrinfo ai, *peer = NULL, *local = NULL;
300 const char *addr;
301 const char *port;
302 char uaddr[INET6_ADDRSTRLEN+1];
303 char uport[33];
304 int sock = -1, rc;
305
306 /* lookup peer addr */
307 memset(&ai,0, sizeof(ai));
308 ai.ai_flags = AI_CANONNAME | AI_ADDRCONFIG;
309 ai.ai_family = PF_UNSPEC;
310 ai.ai_socktype = SOCK_DGRAM;
311
312 addr = qemu_opt_get(opts, "host");
313 port = qemu_opt_get(opts, "port");
314 if (addr == NULL || strlen(addr) == 0) {
315 addr = "localhost";
316 }
317 if (port == NULL || strlen(port) == 0) {
318 fprintf(stderr, "inet_dgram: port not specified\n");
319 return -1;
320 }
321
322 if (qemu_opt_get_bool(opts, "ipv4", 0))
323 ai.ai_family = PF_INET;
324 if (qemu_opt_get_bool(opts, "ipv6", 0))
325 ai.ai_family = PF_INET6;
326
327 if (0 != (rc = getaddrinfo(addr, port, &ai, &peer))) {
328 fprintf(stderr,"getaddrinfo(%s,%s): %s\n", addr, port,
329 gai_strerror(rc));
330 return -1;
331 }
332
333 /* lookup local addr */
334 memset(&ai,0, sizeof(ai));
335 ai.ai_flags = AI_PASSIVE;
336 ai.ai_family = peer->ai_family;
337 ai.ai_socktype = SOCK_DGRAM;
338
339 addr = qemu_opt_get(opts, "localaddr");
340 port = qemu_opt_get(opts, "localport");
341 if (addr == NULL || strlen(addr) == 0) {
342 addr = NULL;
343 }
344 if (!port || strlen(port) == 0)
345 port = "0";
346
347 if (0 != (rc = getaddrinfo(addr, port, &ai, &local))) {
348 fprintf(stderr,"getaddrinfo(%s,%s): %s\n", addr, port,
349 gai_strerror(rc));
350 return -1;
351 }
352
353 /* create socket */
354 sock = qemu_socket(peer->ai_family, peer->ai_socktype, peer->ai_protocol);
355 if (sock < 0) {
356 fprintf(stderr,"%s: socket(%s): %s\n", __FUNCTION__,
357 inet_strfamily(peer->ai_family), strerror(errno));
358 goto err;
359 }
360 setsockopt(sock,SOL_SOCKET,SO_REUSEADDR,(void*)&on,sizeof(on));
361
362 /* bind socket */
363 if (getnameinfo((struct sockaddr*)local->ai_addr,local->ai_addrlen,
364 uaddr,INET6_ADDRSTRLEN,uport,32,
365 NI_NUMERICHOST | NI_NUMERICSERV) != 0) {
366 fprintf(stderr, "%s: getnameinfo: oops\n", __FUNCTION__);
367 goto err;
368 }
369 if (bind(sock, local->ai_addr, local->ai_addrlen) < 0) {
370 fprintf(stderr,"%s: bind(%s,%s,%d): OK\n", __FUNCTION__,
371 inet_strfamily(local->ai_family), uaddr, inet_getport(local));
372 goto err;
373 }
374
375 /* connect to peer */
376 if (getnameinfo((struct sockaddr*)peer->ai_addr, peer->ai_addrlen,
377 uaddr, INET6_ADDRSTRLEN, uport, 32,
378 NI_NUMERICHOST | NI_NUMERICSERV) != 0) {
379 fprintf(stderr, "%s: getnameinfo: oops\n", __FUNCTION__);
380 goto err;
381 }
382 if (connect(sock,peer->ai_addr,peer->ai_addrlen) < 0) {
383 fprintf(stderr, "%s: connect(%s,%s,%s,%s): %s\n", __FUNCTION__,
384 inet_strfamily(peer->ai_family),
385 peer->ai_canonname, uaddr, uport, strerror(errno));
386 goto err;
387 }
388
389 freeaddrinfo(local);
390 freeaddrinfo(peer);
391 return sock;
392
393 err:
394 if (-1 != sock)
395 closesocket(sock);
396 if (local)
397 freeaddrinfo(local);
398 if (peer)
399 freeaddrinfo(peer);
400 return -1;
401 }
402
403 /* compatibility wrapper */
404 static int inet_parse(QemuOpts *opts, const char *str)
405 {
406 const char *optstr, *h;
407 char addr[64];
408 char port[33];
409 int pos;
410
411 /* parse address */
412 if (str[0] == ':') {
413 /* no host given */
414 addr[0] = '\0';
415 if (1 != sscanf(str,":%32[^,]%n",port,&pos)) {
416 fprintf(stderr, "%s: portonly parse error (%s)\n",
417 __FUNCTION__, str);
418 return -1;
419 }
420 } else if (str[0] == '[') {
421 /* IPv6 addr */
422 if (2 != sscanf(str,"[%64[^]]]:%32[^,]%n",addr,port,&pos)) {
423 fprintf(stderr, "%s: ipv6 parse error (%s)\n",
424 __FUNCTION__, str);
425 return -1;
426 }
427 qemu_opt_set(opts, "ipv6", "on");
428 } else if (qemu_isdigit(str[0])) {
429 /* IPv4 addr */
430 if (2 != sscanf(str,"%64[0-9.]:%32[^,]%n",addr,port,&pos)) {
431 fprintf(stderr, "%s: ipv4 parse error (%s)\n",
432 __FUNCTION__, str);
433 return -1;
434 }
435 qemu_opt_set(opts, "ipv4", "on");
436 } else {
437 /* hostname */
438 if (2 != sscanf(str,"%64[^:]:%32[^,]%n",addr,port,&pos)) {
439 fprintf(stderr, "%s: hostname parse error (%s)\n",
440 __FUNCTION__, str);
441 return -1;
442 }
443 }
444 qemu_opt_set(opts, "host", addr);
445 qemu_opt_set(opts, "port", port);
446
447 /* parse options */
448 optstr = str + pos;
449 h = strstr(optstr, ",to=");
450 if (h)
451 qemu_opt_set(opts, "to", h+4);
452 if (strstr(optstr, ",ipv4"))
453 qemu_opt_set(opts, "ipv4", "on");
454 if (strstr(optstr, ",ipv6"))
455 qemu_opt_set(opts, "ipv6", "on");
456 return 0;
457 }
458
459 int inet_listen(const char *str, char *ostr, int olen,
460 int socktype, int port_offset, Error **errp)
461 {
462 QemuOpts *opts;
463 char *optstr;
464 int sock = -1;
465
466 opts = qemu_opts_create(&dummy_opts, NULL, 0, NULL);
467 if (inet_parse(opts, str) == 0) {
468 sock = inet_listen_opts(opts, port_offset, errp);
469 if (sock != -1 && ostr) {
470 optstr = strchr(str, ',');
471 if (qemu_opt_get_bool(opts, "ipv6", 0)) {
472 snprintf(ostr, olen, "[%s]:%s%s",
473 qemu_opt_get(opts, "host"),
474 qemu_opt_get(opts, "port"),
475 optstr ? optstr : "");
476 } else {
477 snprintf(ostr, olen, "%s:%s%s",
478 qemu_opt_get(opts, "host"),
479 qemu_opt_get(opts, "port"),
480 optstr ? optstr : "");
481 }
482 }
483 } else {
484 error_set(errp, QERR_SOCKET_CREATE_FAILED);
485 }
486 qemu_opts_del(opts);
487 return sock;
488 }
489
490 int inet_connect(const char *str, bool block, Error **errp)
491 {
492 QemuOpts *opts;
493 int sock = -1;
494
495 opts = qemu_opts_create(&dummy_opts, NULL, 0, NULL);
496 if (inet_parse(opts, str) == 0) {
497 if (block) {
498 qemu_opt_set(opts, "block", "on");
499 }
500 sock = inet_connect_opts(opts, errp);
501 } else {
502 error_set(errp, QERR_SOCKET_CREATE_FAILED);
503 }
504 qemu_opts_del(opts);
505 return sock;
506 }
507
508 #ifndef _WIN32
509
510 int unix_listen_opts(QemuOpts *opts)
511 {
512 struct sockaddr_un un;
513 const char *path = qemu_opt_get(opts, "path");
514 int sock, fd;
515
516 sock = qemu_socket(PF_UNIX, SOCK_STREAM, 0);
517 if (sock < 0) {
518 perror("socket(unix)");
519 return -1;
520 }
521
522 memset(&un, 0, sizeof(un));
523 un.sun_family = AF_UNIX;
524 if (path && strlen(path)) {
525 snprintf(un.sun_path, sizeof(un.sun_path), "%s", path);
526 } else {
527 char *tmpdir = getenv("TMPDIR");
528 snprintf(un.sun_path, sizeof(un.sun_path), "%s/qemu-socket-XXXXXX",
529 tmpdir ? tmpdir : "/tmp");
530 /*
531 * This dummy fd usage silences the mktemp() unsecure warning.
532 * Using mkstemp() doesn't make things more secure here
533 * though. bind() complains about existing files, so we have
534 * to unlink first and thus re-open the race window. The
535 * worst case possible is bind() failing, i.e. a DoS attack.
536 */
537 fd = mkstemp(un.sun_path); close(fd);
538 qemu_opt_set(opts, "path", un.sun_path);
539 }
540
541 unlink(un.sun_path);
542 if (bind(sock, (struct sockaddr*) &un, sizeof(un)) < 0) {
543 fprintf(stderr, "bind(unix:%s): %s\n", un.sun_path, strerror(errno));
544 goto err;
545 }
546 if (listen(sock, 1) < 0) {
547 fprintf(stderr, "listen(unix:%s): %s\n", un.sun_path, strerror(errno));
548 goto err;
549 }
550
551 return sock;
552
553 err:
554 closesocket(sock);
555 return -1;
556 }
557
558 int unix_connect_opts(QemuOpts *opts)
559 {
560 struct sockaddr_un un;
561 const char *path = qemu_opt_get(opts, "path");
562 int sock;
563
564 if (NULL == path) {
565 fprintf(stderr, "unix connect: no path specified\n");
566 return -1;
567 }
568
569 sock = qemu_socket(PF_UNIX, SOCK_STREAM, 0);
570 if (sock < 0) {
571 perror("socket(unix)");
572 return -1;
573 }
574
575 memset(&un, 0, sizeof(un));
576 un.sun_family = AF_UNIX;
577 snprintf(un.sun_path, sizeof(un.sun_path), "%s", path);
578 if (connect(sock, (struct sockaddr*) &un, sizeof(un)) < 0) {
579 fprintf(stderr, "connect(unix:%s): %s\n", path, strerror(errno));
580 close(sock);
581 return -1;
582 }
583
584 return sock;
585 }
586
587 /* compatibility wrapper */
588 int unix_listen(const char *str, char *ostr, int olen)
589 {
590 QemuOpts *opts;
591 char *path, *optstr;
592 int sock, len;
593
594 opts = qemu_opts_create(&dummy_opts, NULL, 0, NULL);
595
596 optstr = strchr(str, ',');
597 if (optstr) {
598 len = optstr - str;
599 if (len) {
600 path = g_malloc(len+1);
601 snprintf(path, len+1, "%.*s", len, str);
602 qemu_opt_set(opts, "path", path);
603 g_free(path);
604 }
605 } else {
606 qemu_opt_set(opts, "path", str);
607 }
608
609 sock = unix_listen_opts(opts);
610
611 if (sock != -1 && ostr)
612 snprintf(ostr, olen, "%s%s", qemu_opt_get(opts, "path"), optstr ? optstr : "");
613 qemu_opts_del(opts);
614 return sock;
615 }
616
617 int unix_connect(const char *path)
618 {
619 QemuOpts *opts;
620 int sock;
621
622 opts = qemu_opts_create(&dummy_opts, NULL, 0, NULL);
623 qemu_opt_set(opts, "path", path);
624 sock = unix_connect_opts(opts);
625 qemu_opts_del(opts);
626 return sock;
627 }
628
629 #else
630
631 int unix_listen_opts(QemuOpts *opts)
632 {
633 fprintf(stderr, "unix sockets are not available on windows\n");
634 errno = ENOTSUP;
635 return -1;
636 }
637
638 int unix_connect_opts(QemuOpts *opts)
639 {
640 fprintf(stderr, "unix sockets are not available on windows\n");
641 errno = ENOTSUP;
642 return -1;
643 }
644
645 int unix_listen(const char *path, char *ostr, int olen)
646 {
647 fprintf(stderr, "unix sockets are not available on windows\n");
648 errno = ENOTSUP;
649 return -1;
650 }
651
652 int unix_connect(const char *path)
653 {
654 fprintf(stderr, "unix sockets are not available on windows\n");
655 errno = ENOTSUP;
656 return -1;
657 }
658
659 #endif
660
661 #ifdef _WIN32
662 static void socket_cleanup(void)
663 {
664 WSACleanup();
665 }
666 #endif
667
668 int socket_init(void)
669 {
670 #ifdef _WIN32
671 WSADATA Data;
672 int ret, err;
673
674 ret = WSAStartup(MAKEWORD(2,2), &Data);
675 if (ret != 0) {
676 err = WSAGetLastError();
677 fprintf(stderr, "WSAStartup: %d\n", err);
678 return -1;
679 }
680 atexit(socket_cleanup);
681 #endif
682 return 0;
683 }