PPC: booke: add tlbnps handling
[qemu.git] / net.c
1 /*
2 * QEMU System Emulator
3 *
4 * Copyright (c) 2003-2008 Fabrice Bellard
5 *
6 * Permission is hereby granted, free of charge, to any person obtaining a copy
7 * of this software and associated documentation files (the "Software"), to deal
8 * in the Software without restriction, including without limitation the rights
9 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
10 * copies of the Software, and to permit persons to whom the Software is
11 * furnished to do so, subject to the following conditions:
12 *
13 * The above copyright notice and this permission notice shall be included in
14 * all copies or substantial portions of the Software.
15 *
16 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
19 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
21 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
22 * THE SOFTWARE.
23 */
24 #include "net.h"
25
26 #include "config-host.h"
27
28 #include "net/tap.h"
29 #include "net/socket.h"
30 #include "net/dump.h"
31 #include "net/slirp.h"
32 #include "net/vde.h"
33 #include "net/util.h"
34 #include "monitor.h"
35 #include "qemu-common.h"
36 #include "qemu_socket.h"
37 #include "qmp-commands.h"
38 #include "hw/qdev.h"
39 #include "iov.h"
40
41 static QTAILQ_HEAD(, VLANState) vlans;
42 static QTAILQ_HEAD(, VLANClientState) non_vlan_clients;
43
44 int default_net = 1;
45
46 /***********************************************************/
47 /* network device redirectors */
48
49 #if defined(DEBUG_NET)
50 static void hex_dump(FILE *f, const uint8_t *buf, int size)
51 {
52 int len, i, j, c;
53
54 for(i=0;i<size;i+=16) {
55 len = size - i;
56 if (len > 16)
57 len = 16;
58 fprintf(f, "%08x ", i);
59 for(j=0;j<16;j++) {
60 if (j < len)
61 fprintf(f, " %02x", buf[i+j]);
62 else
63 fprintf(f, " ");
64 }
65 fprintf(f, " ");
66 for(j=0;j<len;j++) {
67 c = buf[i+j];
68 if (c < ' ' || c > '~')
69 c = '.';
70 fprintf(f, "%c", c);
71 }
72 fprintf(f, "\n");
73 }
74 }
75 #endif
76
77 static int get_str_sep(char *buf, int buf_size, const char **pp, int sep)
78 {
79 const char *p, *p1;
80 int len;
81 p = *pp;
82 p1 = strchr(p, sep);
83 if (!p1)
84 return -1;
85 len = p1 - p;
86 p1++;
87 if (buf_size > 0) {
88 if (len > buf_size - 1)
89 len = buf_size - 1;
90 memcpy(buf, p, len);
91 buf[len] = '\0';
92 }
93 *pp = p1;
94 return 0;
95 }
96
97 int parse_host_port(struct sockaddr_in *saddr, const char *str)
98 {
99 char buf[512];
100 struct hostent *he;
101 const char *p, *r;
102 int port;
103
104 p = str;
105 if (get_str_sep(buf, sizeof(buf), &p, ':') < 0)
106 return -1;
107 saddr->sin_family = AF_INET;
108 if (buf[0] == '\0') {
109 saddr->sin_addr.s_addr = 0;
110 } else {
111 if (qemu_isdigit(buf[0])) {
112 if (!inet_aton(buf, &saddr->sin_addr))
113 return -1;
114 } else {
115 if ((he = gethostbyname(buf)) == NULL)
116 return - 1;
117 saddr->sin_addr = *(struct in_addr *)he->h_addr;
118 }
119 }
120 port = strtol(p, (char **)&r, 0);
121 if (r == p)
122 return -1;
123 saddr->sin_port = htons(port);
124 return 0;
125 }
126
127 void qemu_format_nic_info_str(VLANClientState *vc, uint8_t macaddr[6])
128 {
129 snprintf(vc->info_str, sizeof(vc->info_str),
130 "model=%s,macaddr=%02x:%02x:%02x:%02x:%02x:%02x",
131 vc->model,
132 macaddr[0], macaddr[1], macaddr[2],
133 macaddr[3], macaddr[4], macaddr[5]);
134 }
135
136 void qemu_macaddr_default_if_unset(MACAddr *macaddr)
137 {
138 static int index = 0;
139 static const MACAddr zero = { .a = { 0,0,0,0,0,0 } };
140
141 if (memcmp(macaddr, &zero, sizeof(zero)) != 0)
142 return;
143 macaddr->a[0] = 0x52;
144 macaddr->a[1] = 0x54;
145 macaddr->a[2] = 0x00;
146 macaddr->a[3] = 0x12;
147 macaddr->a[4] = 0x34;
148 macaddr->a[5] = 0x56 + index++;
149 }
150
151 static char *assign_name(VLANClientState *vc1, const char *model)
152 {
153 VLANState *vlan;
154 VLANClientState *vc;
155 char buf[256];
156 int id = 0;
157
158 QTAILQ_FOREACH(vlan, &vlans, next) {
159 QTAILQ_FOREACH(vc, &vlan->clients, next) {
160 if (vc != vc1 && strcmp(vc->model, model) == 0) {
161 id++;
162 }
163 }
164 }
165
166 QTAILQ_FOREACH(vc, &non_vlan_clients, next) {
167 if (vc != vc1 && strcmp(vc->model, model) == 0) {
168 id++;
169 }
170 }
171
172 snprintf(buf, sizeof(buf), "%s.%d", model, id);
173
174 return g_strdup(buf);
175 }
176
177 static ssize_t qemu_deliver_packet(VLANClientState *sender,
178 unsigned flags,
179 const uint8_t *data,
180 size_t size,
181 void *opaque);
182 static ssize_t qemu_deliver_packet_iov(VLANClientState *sender,
183 unsigned flags,
184 const struct iovec *iov,
185 int iovcnt,
186 void *opaque);
187
188 VLANClientState *qemu_new_net_client(NetClientInfo *info,
189 VLANState *vlan,
190 VLANClientState *peer,
191 const char *model,
192 const char *name)
193 {
194 VLANClientState *vc;
195
196 assert(info->size >= sizeof(VLANClientState));
197
198 vc = g_malloc0(info->size);
199
200 vc->info = info;
201 vc->model = g_strdup(model);
202 if (name) {
203 vc->name = g_strdup(name);
204 } else {
205 vc->name = assign_name(vc, model);
206 }
207
208 if (vlan) {
209 assert(!peer);
210 vc->vlan = vlan;
211 QTAILQ_INSERT_TAIL(&vc->vlan->clients, vc, next);
212 } else {
213 if (peer) {
214 assert(!peer->peer);
215 vc->peer = peer;
216 peer->peer = vc;
217 }
218 QTAILQ_INSERT_TAIL(&non_vlan_clients, vc, next);
219
220 vc->send_queue = qemu_new_net_queue(qemu_deliver_packet,
221 qemu_deliver_packet_iov,
222 vc);
223 }
224
225 return vc;
226 }
227
228 NICState *qemu_new_nic(NetClientInfo *info,
229 NICConf *conf,
230 const char *model,
231 const char *name,
232 void *opaque)
233 {
234 VLANClientState *nc;
235 NICState *nic;
236
237 assert(info->type == NET_CLIENT_TYPE_NIC);
238 assert(info->size >= sizeof(NICState));
239
240 nc = qemu_new_net_client(info, conf->vlan, conf->peer, model, name);
241
242 nic = DO_UPCAST(NICState, nc, nc);
243 nic->conf = conf;
244 nic->opaque = opaque;
245
246 return nic;
247 }
248
249 static void qemu_cleanup_vlan_client(VLANClientState *vc)
250 {
251 if (vc->vlan) {
252 QTAILQ_REMOVE(&vc->vlan->clients, vc, next);
253 } else {
254 QTAILQ_REMOVE(&non_vlan_clients, vc, next);
255 }
256
257 if (vc->info->cleanup) {
258 vc->info->cleanup(vc);
259 }
260 }
261
262 static void qemu_free_vlan_client(VLANClientState *vc)
263 {
264 if (!vc->vlan) {
265 if (vc->send_queue) {
266 qemu_del_net_queue(vc->send_queue);
267 }
268 if (vc->peer) {
269 vc->peer->peer = NULL;
270 }
271 }
272 g_free(vc->name);
273 g_free(vc->model);
274 g_free(vc);
275 }
276
277 void qemu_del_vlan_client(VLANClientState *vc)
278 {
279 /* If there is a peer NIC, delete and cleanup client, but do not free. */
280 if (!vc->vlan && vc->peer && vc->peer->info->type == NET_CLIENT_TYPE_NIC) {
281 NICState *nic = DO_UPCAST(NICState, nc, vc->peer);
282 if (nic->peer_deleted) {
283 return;
284 }
285 nic->peer_deleted = true;
286 /* Let NIC know peer is gone. */
287 vc->peer->link_down = true;
288 if (vc->peer->info->link_status_changed) {
289 vc->peer->info->link_status_changed(vc->peer);
290 }
291 qemu_cleanup_vlan_client(vc);
292 return;
293 }
294
295 /* If this is a peer NIC and peer has already been deleted, free it now. */
296 if (!vc->vlan && vc->peer && vc->info->type == NET_CLIENT_TYPE_NIC) {
297 NICState *nic = DO_UPCAST(NICState, nc, vc);
298 if (nic->peer_deleted) {
299 qemu_free_vlan_client(vc->peer);
300 }
301 }
302
303 qemu_cleanup_vlan_client(vc);
304 qemu_free_vlan_client(vc);
305 }
306
307 VLANClientState *
308 qemu_find_vlan_client_by_name(Monitor *mon, int vlan_id,
309 const char *client_str)
310 {
311 VLANState *vlan;
312 VLANClientState *vc;
313
314 vlan = qemu_find_vlan(vlan_id, 0);
315 if (!vlan) {
316 monitor_printf(mon, "unknown VLAN %d\n", vlan_id);
317 return NULL;
318 }
319
320 QTAILQ_FOREACH(vc, &vlan->clients, next) {
321 if (!strcmp(vc->name, client_str)) {
322 break;
323 }
324 }
325 if (!vc) {
326 monitor_printf(mon, "can't find device %s on VLAN %d\n",
327 client_str, vlan_id);
328 }
329
330 return vc;
331 }
332
333 void qemu_foreach_nic(qemu_nic_foreach func, void *opaque)
334 {
335 VLANClientState *nc;
336 VLANState *vlan;
337
338 QTAILQ_FOREACH(nc, &non_vlan_clients, next) {
339 if (nc->info->type == NET_CLIENT_TYPE_NIC) {
340 func(DO_UPCAST(NICState, nc, nc), opaque);
341 }
342 }
343
344 QTAILQ_FOREACH(vlan, &vlans, next) {
345 QTAILQ_FOREACH(nc, &vlan->clients, next) {
346 if (nc->info->type == NET_CLIENT_TYPE_NIC) {
347 func(DO_UPCAST(NICState, nc, nc), opaque);
348 }
349 }
350 }
351 }
352
353 int qemu_can_send_packet(VLANClientState *sender)
354 {
355 VLANState *vlan = sender->vlan;
356 VLANClientState *vc;
357
358 if (sender->peer) {
359 if (sender->peer->receive_disabled) {
360 return 0;
361 } else if (sender->peer->info->can_receive &&
362 !sender->peer->info->can_receive(sender->peer)) {
363 return 0;
364 } else {
365 return 1;
366 }
367 }
368
369 if (!sender->vlan) {
370 return 1;
371 }
372
373 QTAILQ_FOREACH(vc, &vlan->clients, next) {
374 if (vc == sender) {
375 continue;
376 }
377
378 /* no can_receive() handler, they can always receive */
379 if (vc->info->can_receive && !vc->info->can_receive(vc)) {
380 return 0;
381 }
382 }
383 return 1;
384 }
385
386 static ssize_t qemu_deliver_packet(VLANClientState *sender,
387 unsigned flags,
388 const uint8_t *data,
389 size_t size,
390 void *opaque)
391 {
392 VLANClientState *vc = opaque;
393 ssize_t ret;
394
395 if (vc->link_down) {
396 return size;
397 }
398
399 if (vc->receive_disabled) {
400 return 0;
401 }
402
403 if (flags & QEMU_NET_PACKET_FLAG_RAW && vc->info->receive_raw) {
404 ret = vc->info->receive_raw(vc, data, size);
405 } else {
406 ret = vc->info->receive(vc, data, size);
407 }
408
409 if (ret == 0) {
410 vc->receive_disabled = 1;
411 };
412
413 return ret;
414 }
415
416 static ssize_t qemu_vlan_deliver_packet(VLANClientState *sender,
417 unsigned flags,
418 const uint8_t *buf,
419 size_t size,
420 void *opaque)
421 {
422 VLANState *vlan = opaque;
423 VLANClientState *vc;
424 ssize_t ret = -1;
425
426 QTAILQ_FOREACH(vc, &vlan->clients, next) {
427 ssize_t len;
428
429 if (vc == sender) {
430 continue;
431 }
432
433 if (vc->link_down) {
434 ret = size;
435 continue;
436 }
437
438 if (vc->receive_disabled) {
439 ret = 0;
440 continue;
441 }
442
443 if (flags & QEMU_NET_PACKET_FLAG_RAW && vc->info->receive_raw) {
444 len = vc->info->receive_raw(vc, buf, size);
445 } else {
446 len = vc->info->receive(vc, buf, size);
447 }
448
449 if (len == 0) {
450 vc->receive_disabled = 1;
451 }
452
453 ret = (ret >= 0) ? ret : len;
454
455 }
456
457 return ret;
458 }
459
460 void qemu_purge_queued_packets(VLANClientState *vc)
461 {
462 NetQueue *queue;
463
464 if (!vc->peer && !vc->vlan) {
465 return;
466 }
467
468 if (vc->peer) {
469 queue = vc->peer->send_queue;
470 } else {
471 queue = vc->vlan->send_queue;
472 }
473
474 qemu_net_queue_purge(queue, vc);
475 }
476
477 void qemu_flush_queued_packets(VLANClientState *vc)
478 {
479 NetQueue *queue;
480
481 vc->receive_disabled = 0;
482
483 if (vc->vlan) {
484 queue = vc->vlan->send_queue;
485 } else {
486 queue = vc->send_queue;
487 }
488
489 qemu_net_queue_flush(queue);
490 }
491
492 static ssize_t qemu_send_packet_async_with_flags(VLANClientState *sender,
493 unsigned flags,
494 const uint8_t *buf, int size,
495 NetPacketSent *sent_cb)
496 {
497 NetQueue *queue;
498
499 #ifdef DEBUG_NET
500 printf("qemu_send_packet_async:\n");
501 hex_dump(stdout, buf, size);
502 #endif
503
504 if (sender->link_down || (!sender->peer && !sender->vlan)) {
505 return size;
506 }
507
508 if (sender->peer) {
509 queue = sender->peer->send_queue;
510 } else {
511 queue = sender->vlan->send_queue;
512 }
513
514 return qemu_net_queue_send(queue, sender, flags, buf, size, sent_cb);
515 }
516
517 ssize_t qemu_send_packet_async(VLANClientState *sender,
518 const uint8_t *buf, int size,
519 NetPacketSent *sent_cb)
520 {
521 return qemu_send_packet_async_with_flags(sender, QEMU_NET_PACKET_FLAG_NONE,
522 buf, size, sent_cb);
523 }
524
525 void qemu_send_packet(VLANClientState *vc, const uint8_t *buf, int size)
526 {
527 qemu_send_packet_async(vc, buf, size, NULL);
528 }
529
530 ssize_t qemu_send_packet_raw(VLANClientState *vc, const uint8_t *buf, int size)
531 {
532 return qemu_send_packet_async_with_flags(vc, QEMU_NET_PACKET_FLAG_RAW,
533 buf, size, NULL);
534 }
535
536 static ssize_t vc_sendv_compat(VLANClientState *vc, const struct iovec *iov,
537 int iovcnt)
538 {
539 uint8_t buffer[4096];
540 size_t offset;
541
542 offset = iov_to_buf(iov, iovcnt, buffer, 0, sizeof(buffer));
543
544 return vc->info->receive(vc, buffer, offset);
545 }
546
547 static ssize_t qemu_deliver_packet_iov(VLANClientState *sender,
548 unsigned flags,
549 const struct iovec *iov,
550 int iovcnt,
551 void *opaque)
552 {
553 VLANClientState *vc = opaque;
554
555 if (vc->link_down) {
556 return iov_size(iov, iovcnt);
557 }
558
559 if (vc->info->receive_iov) {
560 return vc->info->receive_iov(vc, iov, iovcnt);
561 } else {
562 return vc_sendv_compat(vc, iov, iovcnt);
563 }
564 }
565
566 static ssize_t qemu_vlan_deliver_packet_iov(VLANClientState *sender,
567 unsigned flags,
568 const struct iovec *iov,
569 int iovcnt,
570 void *opaque)
571 {
572 VLANState *vlan = opaque;
573 VLANClientState *vc;
574 ssize_t ret = -1;
575
576 QTAILQ_FOREACH(vc, &vlan->clients, next) {
577 ssize_t len;
578
579 if (vc == sender) {
580 continue;
581 }
582
583 if (vc->link_down) {
584 ret = iov_size(iov, iovcnt);
585 continue;
586 }
587
588 assert(!(flags & QEMU_NET_PACKET_FLAG_RAW));
589
590 if (vc->info->receive_iov) {
591 len = vc->info->receive_iov(vc, iov, iovcnt);
592 } else {
593 len = vc_sendv_compat(vc, iov, iovcnt);
594 }
595
596 ret = (ret >= 0) ? ret : len;
597 }
598
599 return ret;
600 }
601
602 ssize_t qemu_sendv_packet_async(VLANClientState *sender,
603 const struct iovec *iov, int iovcnt,
604 NetPacketSent *sent_cb)
605 {
606 NetQueue *queue;
607
608 if (sender->link_down || (!sender->peer && !sender->vlan)) {
609 return iov_size(iov, iovcnt);
610 }
611
612 if (sender->peer) {
613 queue = sender->peer->send_queue;
614 } else {
615 queue = sender->vlan->send_queue;
616 }
617
618 return qemu_net_queue_send_iov(queue, sender,
619 QEMU_NET_PACKET_FLAG_NONE,
620 iov, iovcnt, sent_cb);
621 }
622
623 ssize_t
624 qemu_sendv_packet(VLANClientState *vc, const struct iovec *iov, int iovcnt)
625 {
626 return qemu_sendv_packet_async(vc, iov, iovcnt, NULL);
627 }
628
629 /* find or alloc a new VLAN */
630 VLANState *qemu_find_vlan(int id, int allocate)
631 {
632 VLANState *vlan;
633
634 QTAILQ_FOREACH(vlan, &vlans, next) {
635 if (vlan->id == id) {
636 return vlan;
637 }
638 }
639
640 if (!allocate) {
641 return NULL;
642 }
643
644 vlan = g_malloc0(sizeof(VLANState));
645 vlan->id = id;
646 QTAILQ_INIT(&vlan->clients);
647
648 vlan->send_queue = qemu_new_net_queue(qemu_vlan_deliver_packet,
649 qemu_vlan_deliver_packet_iov,
650 vlan);
651
652 QTAILQ_INSERT_TAIL(&vlans, vlan, next);
653
654 return vlan;
655 }
656
657 VLANClientState *qemu_find_netdev(const char *id)
658 {
659 VLANClientState *vc;
660
661 QTAILQ_FOREACH(vc, &non_vlan_clients, next) {
662 if (vc->info->type == NET_CLIENT_TYPE_NIC)
663 continue;
664 if (!strcmp(vc->name, id)) {
665 return vc;
666 }
667 }
668
669 return NULL;
670 }
671
672 static int nic_get_free_idx(void)
673 {
674 int index;
675
676 for (index = 0; index < MAX_NICS; index++)
677 if (!nd_table[index].used)
678 return index;
679 return -1;
680 }
681
682 int qemu_show_nic_models(const char *arg, const char *const *models)
683 {
684 int i;
685
686 if (!arg || strcmp(arg, "?"))
687 return 0;
688
689 fprintf(stderr, "qemu: Supported NIC models: ");
690 for (i = 0 ; models[i]; i++)
691 fprintf(stderr, "%s%c", models[i], models[i+1] ? ',' : '\n');
692 return 1;
693 }
694
695 void qemu_check_nic_model(NICInfo *nd, const char *model)
696 {
697 const char *models[2];
698
699 models[0] = model;
700 models[1] = NULL;
701
702 if (qemu_show_nic_models(nd->model, models))
703 exit(0);
704 if (qemu_find_nic_model(nd, models, model) < 0)
705 exit(1);
706 }
707
708 int qemu_find_nic_model(NICInfo *nd, const char * const *models,
709 const char *default_model)
710 {
711 int i;
712
713 if (!nd->model)
714 nd->model = g_strdup(default_model);
715
716 for (i = 0 ; models[i]; i++) {
717 if (strcmp(nd->model, models[i]) == 0)
718 return i;
719 }
720
721 error_report("Unsupported NIC model: %s", nd->model);
722 return -1;
723 }
724
725 int net_handle_fd_param(Monitor *mon, const char *param)
726 {
727 int fd;
728
729 if (!qemu_isdigit(param[0]) && mon) {
730
731 fd = monitor_get_fd(mon, param);
732 if (fd == -1) {
733 error_report("No file descriptor named %s found", param);
734 return -1;
735 }
736 } else {
737 fd = qemu_parse_fd(param);
738 }
739
740 return fd;
741 }
742
743 static int net_init_nic(QemuOpts *opts,
744 Monitor *mon,
745 const char *name,
746 VLANState *vlan)
747 {
748 int idx;
749 NICInfo *nd;
750 const char *netdev;
751
752 idx = nic_get_free_idx();
753 if (idx == -1 || nb_nics >= MAX_NICS) {
754 error_report("Too Many NICs");
755 return -1;
756 }
757
758 nd = &nd_table[idx];
759
760 memset(nd, 0, sizeof(*nd));
761
762 if ((netdev = qemu_opt_get(opts, "netdev"))) {
763 nd->netdev = qemu_find_netdev(netdev);
764 if (!nd->netdev) {
765 error_report("netdev '%s' not found", netdev);
766 return -1;
767 }
768 } else {
769 assert(vlan);
770 nd->vlan = vlan;
771 }
772 if (name) {
773 nd->name = g_strdup(name);
774 }
775 if (qemu_opt_get(opts, "model")) {
776 nd->model = g_strdup(qemu_opt_get(opts, "model"));
777 }
778 if (qemu_opt_get(opts, "addr")) {
779 nd->devaddr = g_strdup(qemu_opt_get(opts, "addr"));
780 }
781
782 if (qemu_opt_get(opts, "macaddr") &&
783 net_parse_macaddr(nd->macaddr.a, qemu_opt_get(opts, "macaddr")) < 0) {
784 error_report("invalid syntax for ethernet address");
785 return -1;
786 }
787 qemu_macaddr_default_if_unset(&nd->macaddr);
788
789 nd->nvectors = qemu_opt_get_number(opts, "vectors",
790 DEV_NVECTORS_UNSPECIFIED);
791 if (nd->nvectors != DEV_NVECTORS_UNSPECIFIED &&
792 (nd->nvectors < 0 || nd->nvectors > 0x7ffffff)) {
793 error_report("invalid # of vectors: %d", nd->nvectors);
794 return -1;
795 }
796
797 nd->used = 1;
798 nb_nics++;
799
800 return idx;
801 }
802
803 #define NET_COMMON_PARAMS_DESC \
804 { \
805 .name = "type", \
806 .type = QEMU_OPT_STRING, \
807 .help = "net client type (nic, tap etc.)", \
808 }, { \
809 .name = "vlan", \
810 .type = QEMU_OPT_NUMBER, \
811 .help = "vlan number", \
812 }, { \
813 .name = "name", \
814 .type = QEMU_OPT_STRING, \
815 .help = "identifier for monitor commands", \
816 }
817
818 typedef int (*net_client_init_func)(QemuOpts *opts,
819 Monitor *mon,
820 const char *name,
821 VLANState *vlan);
822
823 /* magic number, but compiler will warn if too small */
824 #define NET_MAX_DESC 20
825
826 static const struct {
827 const char *type;
828 net_client_init_func init;
829 QemuOptDesc desc[NET_MAX_DESC];
830 } net_client_types[NET_CLIENT_TYPE_MAX] = {
831 [NET_CLIENT_TYPE_NONE] = {
832 .type = "none",
833 .desc = {
834 NET_COMMON_PARAMS_DESC,
835 { /* end of list */ }
836 },
837 },
838 [NET_CLIENT_TYPE_NIC] = {
839 .type = "nic",
840 .init = net_init_nic,
841 .desc = {
842 NET_COMMON_PARAMS_DESC,
843 {
844 .name = "netdev",
845 .type = QEMU_OPT_STRING,
846 .help = "id of -netdev to connect to",
847 },
848 {
849 .name = "macaddr",
850 .type = QEMU_OPT_STRING,
851 .help = "MAC address",
852 }, {
853 .name = "model",
854 .type = QEMU_OPT_STRING,
855 .help = "device model (e1000, rtl8139, virtio etc.)",
856 }, {
857 .name = "addr",
858 .type = QEMU_OPT_STRING,
859 .help = "PCI device address",
860 }, {
861 .name = "vectors",
862 .type = QEMU_OPT_NUMBER,
863 .help = "number of MSI-x vectors, 0 to disable MSI-X",
864 },
865 { /* end of list */ }
866 },
867 },
868 #ifdef CONFIG_SLIRP
869 [NET_CLIENT_TYPE_USER] = {
870 .type = "user",
871 .init = net_init_slirp,
872 .desc = {
873 NET_COMMON_PARAMS_DESC,
874 {
875 .name = "hostname",
876 .type = QEMU_OPT_STRING,
877 .help = "client hostname reported by the builtin DHCP server",
878 }, {
879 .name = "restrict",
880 .type = QEMU_OPT_STRING,
881 .help = "isolate the guest from the host (y|yes|n|no)",
882 }, {
883 .name = "ip",
884 .type = QEMU_OPT_STRING,
885 .help = "legacy parameter, use net= instead",
886 }, {
887 .name = "net",
888 .type = QEMU_OPT_STRING,
889 .help = "IP address and optional netmask",
890 }, {
891 .name = "host",
892 .type = QEMU_OPT_STRING,
893 .help = "guest-visible address of the host",
894 }, {
895 .name = "tftp",
896 .type = QEMU_OPT_STRING,
897 .help = "root directory of the built-in TFTP server",
898 }, {
899 .name = "bootfile",
900 .type = QEMU_OPT_STRING,
901 .help = "BOOTP filename, for use with tftp=",
902 }, {
903 .name = "dhcpstart",
904 .type = QEMU_OPT_STRING,
905 .help = "the first of the 16 IPs the built-in DHCP server can assign",
906 }, {
907 .name = "dns",
908 .type = QEMU_OPT_STRING,
909 .help = "guest-visible address of the virtual nameserver",
910 }, {
911 .name = "smb",
912 .type = QEMU_OPT_STRING,
913 .help = "root directory of the built-in SMB server",
914 }, {
915 .name = "smbserver",
916 .type = QEMU_OPT_STRING,
917 .help = "IP address of the built-in SMB server",
918 }, {
919 .name = "hostfwd",
920 .type = QEMU_OPT_STRING,
921 .help = "guest port number to forward incoming TCP or UDP connections",
922 }, {
923 .name = "guestfwd",
924 .type = QEMU_OPT_STRING,
925 .help = "IP address and port to forward guest TCP connections",
926 },
927 { /* end of list */ }
928 },
929 },
930 #endif
931 [NET_CLIENT_TYPE_TAP] = {
932 .type = "tap",
933 .init = net_init_tap,
934 .desc = {
935 NET_COMMON_PARAMS_DESC,
936 {
937 .name = "ifname",
938 .type = QEMU_OPT_STRING,
939 .help = "interface name",
940 },
941 #ifndef _WIN32
942 {
943 .name = "fd",
944 .type = QEMU_OPT_STRING,
945 .help = "file descriptor of an already opened tap",
946 }, {
947 .name = "script",
948 .type = QEMU_OPT_STRING,
949 .help = "script to initialize the interface",
950 }, {
951 .name = "downscript",
952 .type = QEMU_OPT_STRING,
953 .help = "script to shut down the interface",
954 }, {
955 .name = "sndbuf",
956 .type = QEMU_OPT_SIZE,
957 .help = "send buffer limit"
958 }, {
959 .name = "vnet_hdr",
960 .type = QEMU_OPT_BOOL,
961 .help = "enable the IFF_VNET_HDR flag on the tap interface"
962 }, {
963 .name = "vhost",
964 .type = QEMU_OPT_BOOL,
965 .help = "enable vhost-net network accelerator",
966 }, {
967 .name = "vhostfd",
968 .type = QEMU_OPT_STRING,
969 .help = "file descriptor of an already opened vhost net device",
970 }, {
971 .name = "vhostforce",
972 .type = QEMU_OPT_BOOL,
973 .help = "force vhost on for non-MSIX virtio guests",
974 },
975 #endif /* _WIN32 */
976 { /* end of list */ }
977 },
978 },
979 [NET_CLIENT_TYPE_SOCKET] = {
980 .type = "socket",
981 .init = net_init_socket,
982 .desc = {
983 NET_COMMON_PARAMS_DESC,
984 {
985 .name = "fd",
986 .type = QEMU_OPT_STRING,
987 .help = "file descriptor of an already opened socket",
988 }, {
989 .name = "listen",
990 .type = QEMU_OPT_STRING,
991 .help = "port number, and optional hostname, to listen on",
992 }, {
993 .name = "connect",
994 .type = QEMU_OPT_STRING,
995 .help = "port number, and optional hostname, to connect to",
996 }, {
997 .name = "mcast",
998 .type = QEMU_OPT_STRING,
999 .help = "UDP multicast address and port number",
1000 }, {
1001 .name = "localaddr",
1002 .type = QEMU_OPT_STRING,
1003 .help = "source address and port for multicast and udp packets",
1004 }, {
1005 .name = "udp",
1006 .type = QEMU_OPT_STRING,
1007 .help = "UDP unicast address and port number",
1008 },
1009 { /* end of list */ }
1010 },
1011 },
1012 #ifdef CONFIG_VDE
1013 [NET_CLIENT_TYPE_VDE] = {
1014 .type = "vde",
1015 .init = net_init_vde,
1016 .desc = {
1017 NET_COMMON_PARAMS_DESC,
1018 {
1019 .name = "sock",
1020 .type = QEMU_OPT_STRING,
1021 .help = "socket path",
1022 }, {
1023 .name = "port",
1024 .type = QEMU_OPT_NUMBER,
1025 .help = "port number",
1026 }, {
1027 .name = "group",
1028 .type = QEMU_OPT_STRING,
1029 .help = "group owner of socket",
1030 }, {
1031 .name = "mode",
1032 .type = QEMU_OPT_NUMBER,
1033 .help = "permissions for socket",
1034 },
1035 { /* end of list */ }
1036 },
1037 },
1038 #endif
1039 [NET_CLIENT_TYPE_DUMP] = {
1040 .type = "dump",
1041 .init = net_init_dump,
1042 .desc = {
1043 NET_COMMON_PARAMS_DESC,
1044 {
1045 .name = "len",
1046 .type = QEMU_OPT_SIZE,
1047 .help = "per-packet size limit (64k default)",
1048 }, {
1049 .name = "file",
1050 .type = QEMU_OPT_STRING,
1051 .help = "dump file path (default is qemu-vlan0.pcap)",
1052 },
1053 { /* end of list */ }
1054 },
1055 },
1056 };
1057
1058 int net_client_init(Monitor *mon, QemuOpts *opts, int is_netdev)
1059 {
1060 const char *name;
1061 const char *type;
1062 int i;
1063
1064 type = qemu_opt_get(opts, "type");
1065 if (!type) {
1066 qerror_report(QERR_MISSING_PARAMETER, "type");
1067 return -1;
1068 }
1069
1070 if (is_netdev) {
1071 if (strcmp(type, "tap") != 0 &&
1072 #ifdef CONFIG_SLIRP
1073 strcmp(type, "user") != 0 &&
1074 #endif
1075 #ifdef CONFIG_VDE
1076 strcmp(type, "vde") != 0 &&
1077 #endif
1078 strcmp(type, "socket") != 0) {
1079 qerror_report(QERR_INVALID_PARAMETER_VALUE, "type",
1080 "a netdev backend type");
1081 return -1;
1082 }
1083
1084 if (qemu_opt_get(opts, "vlan")) {
1085 qerror_report(QERR_INVALID_PARAMETER, "vlan");
1086 return -1;
1087 }
1088 if (qemu_opt_get(opts, "name")) {
1089 qerror_report(QERR_INVALID_PARAMETER, "name");
1090 return -1;
1091 }
1092 if (!qemu_opts_id(opts)) {
1093 qerror_report(QERR_MISSING_PARAMETER, "id");
1094 return -1;
1095 }
1096 }
1097
1098 name = qemu_opts_id(opts);
1099 if (!name) {
1100 name = qemu_opt_get(opts, "name");
1101 }
1102
1103 for (i = 0; i < NET_CLIENT_TYPE_MAX; i++) {
1104 if (net_client_types[i].type != NULL &&
1105 !strcmp(net_client_types[i].type, type)) {
1106 VLANState *vlan = NULL;
1107 int ret;
1108
1109 if (qemu_opts_validate(opts, &net_client_types[i].desc[0]) == -1) {
1110 return -1;
1111 }
1112
1113 /* Do not add to a vlan if it's a -netdev or a nic with a
1114 * netdev= parameter. */
1115 if (!(is_netdev ||
1116 (strcmp(type, "nic") == 0 && qemu_opt_get(opts, "netdev")))) {
1117 vlan = qemu_find_vlan(qemu_opt_get_number(opts, "vlan", 0), 1);
1118 }
1119
1120 ret = 0;
1121 if (net_client_types[i].init) {
1122 ret = net_client_types[i].init(opts, mon, name, vlan);
1123 if (ret < 0) {
1124 /* TODO push error reporting into init() methods */
1125 qerror_report(QERR_DEVICE_INIT_FAILED, type);
1126 return -1;
1127 }
1128 }
1129 return ret;
1130 }
1131 }
1132
1133 qerror_report(QERR_INVALID_PARAMETER_VALUE, "type",
1134 "a network client type");
1135 return -1;
1136 }
1137
1138 static int net_host_check_device(const char *device)
1139 {
1140 int i;
1141 const char *valid_param_list[] = { "tap", "socket", "dump"
1142 #ifdef CONFIG_SLIRP
1143 ,"user"
1144 #endif
1145 #ifdef CONFIG_VDE
1146 ,"vde"
1147 #endif
1148 };
1149 for (i = 0; i < sizeof(valid_param_list) / sizeof(char *); i++) {
1150 if (!strncmp(valid_param_list[i], device,
1151 strlen(valid_param_list[i])))
1152 return 1;
1153 }
1154
1155 return 0;
1156 }
1157
1158 void net_host_device_add(Monitor *mon, const QDict *qdict)
1159 {
1160 const char *device = qdict_get_str(qdict, "device");
1161 const char *opts_str = qdict_get_try_str(qdict, "opts");
1162 QemuOpts *opts;
1163
1164 if (!net_host_check_device(device)) {
1165 monitor_printf(mon, "invalid host network device %s\n", device);
1166 return;
1167 }
1168
1169 opts = qemu_opts_parse(qemu_find_opts("net"), opts_str ? opts_str : "", 0);
1170 if (!opts) {
1171 return;
1172 }
1173
1174 qemu_opt_set(opts, "type", device);
1175
1176 if (net_client_init(mon, opts, 0) < 0) {
1177 monitor_printf(mon, "adding host network device %s failed\n", device);
1178 }
1179 }
1180
1181 void net_host_device_remove(Monitor *mon, const QDict *qdict)
1182 {
1183 VLANClientState *vc;
1184 int vlan_id = qdict_get_int(qdict, "vlan_id");
1185 const char *device = qdict_get_str(qdict, "device");
1186
1187 vc = qemu_find_vlan_client_by_name(mon, vlan_id, device);
1188 if (!vc) {
1189 return;
1190 }
1191 if (!net_host_check_device(vc->model)) {
1192 monitor_printf(mon, "invalid host network device %s\n", device);
1193 return;
1194 }
1195 qemu_del_vlan_client(vc);
1196 }
1197
1198 int do_netdev_add(Monitor *mon, const QDict *qdict, QObject **ret_data)
1199 {
1200 QemuOpts *opts;
1201 int res;
1202
1203 opts = qemu_opts_from_qdict(qemu_find_opts("netdev"), qdict);
1204 if (!opts) {
1205 return -1;
1206 }
1207
1208 res = net_client_init(mon, opts, 1);
1209 if (res < 0) {
1210 qemu_opts_del(opts);
1211 }
1212
1213 return res;
1214 }
1215
1216 int do_netdev_del(Monitor *mon, const QDict *qdict, QObject **ret_data)
1217 {
1218 const char *id = qdict_get_str(qdict, "id");
1219 VLANClientState *vc;
1220
1221 vc = qemu_find_netdev(id);
1222 if (!vc) {
1223 qerror_report(QERR_DEVICE_NOT_FOUND, id);
1224 return -1;
1225 }
1226 qemu_del_vlan_client(vc);
1227 qemu_opts_del(qemu_opts_find(qemu_find_opts("netdev"), id));
1228 return 0;
1229 }
1230
1231 static void print_net_client(Monitor *mon, VLANClientState *vc)
1232 {
1233 monitor_printf(mon, "%s: type=%s,%s\n", vc->name,
1234 net_client_types[vc->info->type].type, vc->info_str);
1235 }
1236
1237 void do_info_network(Monitor *mon)
1238 {
1239 VLANState *vlan;
1240 VLANClientState *vc, *peer;
1241 net_client_type type;
1242
1243 QTAILQ_FOREACH(vlan, &vlans, next) {
1244 monitor_printf(mon, "VLAN %d devices:\n", vlan->id);
1245
1246 QTAILQ_FOREACH(vc, &vlan->clients, next) {
1247 monitor_printf(mon, " ");
1248 print_net_client(mon, vc);
1249 }
1250 }
1251 monitor_printf(mon, "Devices not on any VLAN:\n");
1252 QTAILQ_FOREACH(vc, &non_vlan_clients, next) {
1253 peer = vc->peer;
1254 type = vc->info->type;
1255 if (!peer || type == NET_CLIENT_TYPE_NIC) {
1256 monitor_printf(mon, " ");
1257 print_net_client(mon, vc);
1258 } /* else it's a netdev connected to a NIC, printed with the NIC */
1259 if (peer && type == NET_CLIENT_TYPE_NIC) {
1260 monitor_printf(mon, " \\ ");
1261 print_net_client(mon, peer);
1262 }
1263 }
1264 }
1265
1266 void qmp_set_link(const char *name, bool up, Error **errp)
1267 {
1268 VLANState *vlan;
1269 VLANClientState *vc = NULL;
1270
1271 QTAILQ_FOREACH(vlan, &vlans, next) {
1272 QTAILQ_FOREACH(vc, &vlan->clients, next) {
1273 if (strcmp(vc->name, name) == 0) {
1274 goto done;
1275 }
1276 }
1277 }
1278 QTAILQ_FOREACH(vc, &non_vlan_clients, next) {
1279 if (!strcmp(vc->name, name)) {
1280 goto done;
1281 }
1282 }
1283 done:
1284
1285 if (!vc) {
1286 error_set(errp, QERR_DEVICE_NOT_FOUND, name);
1287 return;
1288 }
1289
1290 vc->link_down = !up;
1291
1292 if (vc->info->link_status_changed) {
1293 vc->info->link_status_changed(vc);
1294 }
1295
1296 /* Notify peer. Don't update peer link status: this makes it possible to
1297 * disconnect from host network without notifying the guest.
1298 * FIXME: is disconnected link status change operation useful?
1299 *
1300 * Current behaviour is compatible with qemu vlans where there could be
1301 * multiple clients that can still communicate with each other in
1302 * disconnected mode. For now maintain this compatibility. */
1303 if (vc->peer && vc->peer->info->link_status_changed) {
1304 vc->peer->info->link_status_changed(vc->peer);
1305 }
1306 }
1307
1308 void net_cleanup(void)
1309 {
1310 VLANState *vlan;
1311 VLANClientState *vc, *next_vc;
1312
1313 QTAILQ_FOREACH(vlan, &vlans, next) {
1314 QTAILQ_FOREACH_SAFE(vc, &vlan->clients, next, next_vc) {
1315 qemu_del_vlan_client(vc);
1316 }
1317 }
1318
1319 QTAILQ_FOREACH_SAFE(vc, &non_vlan_clients, next, next_vc) {
1320 qemu_del_vlan_client(vc);
1321 }
1322 }
1323
1324 void net_check_clients(void)
1325 {
1326 VLANState *vlan;
1327 VLANClientState *vc;
1328 int i;
1329
1330 /* Don't warn about the default network setup that you get if
1331 * no command line -net or -netdev options are specified. There
1332 * are two cases that we would otherwise complain about:
1333 * (1) board doesn't support a NIC but the implicit "-net nic"
1334 * requested one
1335 * (2) CONFIG_SLIRP not set, in which case the implicit "-net nic"
1336 * sets up a nic that isn't connected to anything.
1337 */
1338 if (default_net) {
1339 return;
1340 }
1341
1342 QTAILQ_FOREACH(vlan, &vlans, next) {
1343 int has_nic = 0, has_host_dev = 0;
1344
1345 QTAILQ_FOREACH(vc, &vlan->clients, next) {
1346 switch (vc->info->type) {
1347 case NET_CLIENT_TYPE_NIC:
1348 has_nic = 1;
1349 break;
1350 case NET_CLIENT_TYPE_USER:
1351 case NET_CLIENT_TYPE_TAP:
1352 case NET_CLIENT_TYPE_SOCKET:
1353 case NET_CLIENT_TYPE_VDE:
1354 has_host_dev = 1;
1355 break;
1356 default: ;
1357 }
1358 }
1359 if (has_host_dev && !has_nic)
1360 fprintf(stderr, "Warning: vlan %d with no nics\n", vlan->id);
1361 if (has_nic && !has_host_dev)
1362 fprintf(stderr,
1363 "Warning: vlan %d is not connected to host network\n",
1364 vlan->id);
1365 }
1366 QTAILQ_FOREACH(vc, &non_vlan_clients, next) {
1367 if (!vc->peer) {
1368 fprintf(stderr, "Warning: %s %s has no peer\n",
1369 vc->info->type == NET_CLIENT_TYPE_NIC ? "nic" : "netdev",
1370 vc->name);
1371 }
1372 }
1373
1374 /* Check that all NICs requested via -net nic actually got created.
1375 * NICs created via -device don't need to be checked here because
1376 * they are always instantiated.
1377 */
1378 for (i = 0; i < MAX_NICS; i++) {
1379 NICInfo *nd = &nd_table[i];
1380 if (nd->used && !nd->instantiated) {
1381 fprintf(stderr, "Warning: requested NIC (%s, model %s) "
1382 "was not created (not supported by this machine?)\n",
1383 nd->name ? nd->name : "anonymous",
1384 nd->model ? nd->model : "unspecified");
1385 }
1386 }
1387 }
1388
1389 static int net_init_client(QemuOpts *opts, void *dummy)
1390 {
1391 if (net_client_init(NULL, opts, 0) < 0)
1392 return -1;
1393 return 0;
1394 }
1395
1396 static int net_init_netdev(QemuOpts *opts, void *dummy)
1397 {
1398 return net_client_init(NULL, opts, 1);
1399 }
1400
1401 int net_init_clients(void)
1402 {
1403 QemuOptsList *net = qemu_find_opts("net");
1404
1405 if (default_net) {
1406 /* if no clients, we use a default config */
1407 qemu_opts_set(net, NULL, "type", "nic");
1408 #ifdef CONFIG_SLIRP
1409 qemu_opts_set(net, NULL, "type", "user");
1410 #endif
1411 }
1412
1413 QTAILQ_INIT(&vlans);
1414 QTAILQ_INIT(&non_vlan_clients);
1415
1416 if (qemu_opts_foreach(qemu_find_opts("netdev"), net_init_netdev, NULL, 1) == -1)
1417 return -1;
1418
1419 if (qemu_opts_foreach(net, net_init_client, NULL, 1) == -1) {
1420 return -1;
1421 }
1422
1423 return 0;
1424 }
1425
1426 int net_client_parse(QemuOptsList *opts_list, const char *optarg)
1427 {
1428 #if defined(CONFIG_SLIRP)
1429 int ret;
1430 if (net_slirp_parse_legacy(opts_list, optarg, &ret)) {
1431 return ret;
1432 }
1433 #endif
1434
1435 if (!qemu_opts_parse(opts_list, optarg, 1)) {
1436 return -1;
1437 }
1438
1439 default_net = 0;
1440 return 0;
1441 }