net/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 "config-host.h"
  25
  26 #include "net/net.h"
  27 #include "clients.h"
  28 #include "hub.h"
  29 #include "net/slirp.h"
  30 #include "util.h"
  31
  32 #include "monitor/monitor.h"
  33 #include "qemu-common.h"
  34 #include "qemu/sockets.h"
  35 #include "qemu/config-file.h"
  36 #include "qmp-commands.h"
  37 #include "hw/qdev.h"
  38 #include "qemu/iov.h"
  39 #include "qapi-visit.h"
  40 #include "qapi/opts-visitor.h"
  41 #include "qapi/dealloc-visitor.h"
  42
  43 /* Net bridge is currently not supported for W32. */
  44 #if !defined(_WIN32)
  45 # define CONFIG_NET_BRIDGE
  46 #endif
  47
  48 static QTAILQ_HEAD(, NetClientState) net_clients;
  49
  50 int default_net = 1;
  51
  52 /***********************************************************/
  53 /* network device redirectors */
  54
  55 #if defined(DEBUG_NET)
  56 static void hex_dump(FILE *f, const uint8_t *buf, int size)
  57 {
  58     int len, i, j, c;
  59
  60     for(i=0;i<size;i+=16) {
  61         len = size - i;
  62         if (len > 16)
  63             len = 16;
  64         fprintf(f, "%08x ", i);
  65         for(j=0;j<16;j++) {
  66             if (j < len)
  67                 fprintf(f, " %02x", buf[i+j]);
  68             else
  69                 fprintf(f, "   ");
  70         }
  71         fprintf(f, " ");
  72         for(j=0;j<len;j++) {
  73             c = buf[i+j];
  74             if (c < ' ' || c > '~')
  75                 c = '.';
  76             fprintf(f, "%c", c);
  77         }
  78         fprintf(f, "\n");
  79     }
  80 }
  81 #endif
  82
  83 static int get_str_sep(char *buf, int buf_size, const char **pp, int sep)
  84 {
  85     const char *p, *p1;
  86     int len;
  87     p = *pp;
  88     p1 = strchr(p, sep);
  89     if (!p1)
  90         return -1;
  91     len = p1 - p;
  92     p1++;
  93     if (buf_size > 0) {
  94         if (len > buf_size - 1)
  95             len = buf_size - 1;
  96         memcpy(buf, p, len);
  97         buf[len] = '\0';
  98     }
  99     *pp = p1;
 100     return 0;
 101 }
 102
 103 int parse_host_port(struct sockaddr_in *saddr, const char *str)
 104 {
 105     char buf[512];
 106     struct hostent *he;
 107     const char *p, *r;
 108     int port;
 109
 110     p = str;
 111     if (get_str_sep(buf, sizeof(buf), &p, ':') < 0)
 112         return -1;
 113     saddr->sin_family = AF_INET;
 114     if (buf[0] == '\0') {
 115         saddr->sin_addr.s_addr = 0;
 116     } else {
 117         if (qemu_isdigit(buf[0])) {
 118             if (!inet_aton(buf, &saddr->sin_addr))
 119                 return -1;
 120         } else {
 121             if ((he = gethostbyname(buf)) == NULL)
 122                 return - 1;
 123             saddr->sin_addr = *(struct in_addr *)he->h_addr;
 124         }
 125     }
 126     port = strtol(p, (char **)&r, 0);
 127     if (r == p)
 128         return -1;
 129     saddr->sin_port = htons(port);
 130     return 0;
 131 }
 132
 133 void qemu_format_nic_info_str(NetClientState *nc, uint8_t macaddr[6])
 134 {
 135     snprintf(nc->info_str, sizeof(nc->info_str),
 136              "model=%s,macaddr=%02x:%02x:%02x:%02x:%02x:%02x",
 137              nc->model,
 138              macaddr[0], macaddr[1], macaddr[2],
 139              macaddr[3], macaddr[4], macaddr[5]);
 140 }
 141
 142 void qemu_macaddr_default_if_unset(MACAddr *macaddr)
 143 {
 144     static int index = 0;
 145     static const MACAddr zero = { .a = { 0,0,0,0,0,0 } };
 146
 147     if (memcmp(macaddr, &zero, sizeof(zero)) != 0)
 148         return;
 149     macaddr->a[0] = 0x52;
 150     macaddr->a[1] = 0x54;
 151     macaddr->a[2] = 0x00;
 152     macaddr->a[3] = 0x12;
 153     macaddr->a[4] = 0x34;
 154     macaddr->a[5] = 0x56 + index++;
 155 }
 156
 157 /**
 158  * Generate a name for net client
 159  *
 160  * Only net clients created with the legacy -net option need this.  Naming is
 161  * mandatory for net clients created with -netdev.
 162  */
 163 static char *assign_name(NetClientState *nc1, const char *model)
 164 {
 165     NetClientState *nc;
 166     char buf[256];
 167     int id = 0;
 168
 169     QTAILQ_FOREACH(nc, &net_clients, next) {
 170         if (nc == nc1) {
 171             continue;
 172         }
 173         /* For compatibility only bump id for net clients on a vlan */
 174         if (strcmp(nc->model, model) == 0 &&
 175             net_hub_id_for_client(nc, NULL) == 0) {
 176             id++;
 177         }
 178     }
 179
 180     snprintf(buf, sizeof(buf), "%s.%d", model, id);
 181
 182     return g_strdup(buf);
 183 }
 184
 185 NetClientState *qemu_new_net_client(NetClientInfo *info,
 186                                     NetClientState *peer,
 187                                     const char *model,
 188                                     const char *name)
 189 {
 190     NetClientState *nc;
 191
 192     assert(info->size >= sizeof(NetClientState));
 193
 194     nc = g_malloc0(info->size);
 195
 196     nc->info = info;
 197     nc->model = g_strdup(model);
 198     if (name) {
 199         nc->name = g_strdup(name);
 200     } else {
 201         nc->name = assign_name(nc, model);
 202     }
 203
 204     if (peer) {
 205         assert(!peer->peer);
 206         nc->peer = peer;
 207         peer->peer = nc;
 208     }
 209     QTAILQ_INSERT_TAIL(&net_clients, nc, next);
 210
 211     nc->send_queue = qemu_new_net_queue(nc);
 212
 213     return nc;
 214 }
 215
 216 NICState *qemu_new_nic(NetClientInfo *info,
 217                        NICConf *conf,
 218                        const char *model,
 219                        const char *name,
 220                        void *opaque)
 221 {
 222     NetClientState *nc;
 223     NICState *nic;
 224
 225     assert(info->type == NET_CLIENT_OPTIONS_KIND_NIC);
 226     assert(info->size >= sizeof(NICState));
 227
 228     nc = qemu_new_net_client(info, conf->peer, model, name);
 229
 230     nic = qemu_get_nic(nc);
 231     nic->conf = conf;
 232     nic->opaque = opaque;
 233
 234     return nic;
 235 }
 236
 237 NetClientState *qemu_get_queue(NICState *nic)
 238 {
 239     return &nic->nc;
 240 }
 241
 242 NICState *qemu_get_nic(NetClientState *nc)
 243 {
 244     return DO_UPCAST(NICState, nc, nc);
 245 }
 246
 247 void *qemu_get_nic_opaque(NetClientState *nc)
 248 {
 249     NICState *nic = qemu_get_nic(nc);
 250
 251     return nic->opaque;
 252 }
 253
 254 static void qemu_cleanup_net_client(NetClientState *nc)
 255 {
 256     QTAILQ_REMOVE(&net_clients, nc, next);
 257
 258     if (nc->info->cleanup) {
 259         nc->info->cleanup(nc);
 260     }
 261 }
 262
 263 static void qemu_free_net_client(NetClientState *nc)
 264 {
 265     if (nc->send_queue) {
 266         qemu_del_net_queue(nc->send_queue);
 267     }
 268     if (nc->peer) {
 269         nc->peer->peer = NULL;
 270     }
 271     g_free(nc->name);
 272     g_free(nc->model);
 273     g_free(nc);
 274 }
 275
 276 void qemu_del_net_client(NetClientState *nc)
 277 {
 278     /* If there is a peer NIC, delete and cleanup client, but do not free. */
 279     if (nc->peer && nc->peer->info->type == NET_CLIENT_OPTIONS_KIND_NIC) {
 280         NICState *nic = qemu_get_nic(nc->peer);
 281         if (nic->peer_deleted) {
 282             return;
 283         }
 284         nic->peer_deleted = true;
 285         /* Let NIC know peer is gone. */
 286         nc->peer->link_down = true;
 287         if (nc->peer->info->link_status_changed) {
 288             nc->peer->info->link_status_changed(nc->peer);
 289         }
 290         qemu_cleanup_net_client(nc);
 291         return;
 292     }
 293
 294     assert(nc->info->type != NET_CLIENT_OPTIONS_KIND_NIC);
 295
 296     qemu_cleanup_net_client(nc);
 297     qemu_free_net_client(nc);
 298 }
 299
 300 void qemu_del_nic(NICState *nic)
 301 {
 302     NetClientState *nc = qemu_get_queue(nic);
 303     /* If this is a peer NIC and peer has already been deleted, free it now. */
 304     if (nc->peer && nc->info->type == NET_CLIENT_OPTIONS_KIND_NIC) {
 305         NICState *nic = qemu_get_nic(nc);
 306         if (nic->peer_deleted) {
 307             qemu_free_net_client(nc->peer);
 308         }
 309     }
 310
 311     qemu_cleanup_net_client(nc);
 312     qemu_free_net_client(nc);
 313 }
 314
 315 void qemu_foreach_nic(qemu_nic_foreach func, void *opaque)
 316 {
 317     NetClientState *nc;
 318
 319     QTAILQ_FOREACH(nc, &net_clients, next) {
 320         if (nc->info->type == NET_CLIENT_OPTIONS_KIND_NIC) {
 321             func(qemu_get_nic(nc), opaque);
 322         }
 323     }
 324 }
 325
 326 int qemu_can_send_packet(NetClientState *sender)
 327 {
 328     if (!sender->peer) {
 329         return 1;
 330     }
 331
 332     if (sender->peer->receive_disabled) {
 333         return 0;
 334     } else if (sender->peer->info->can_receive &&
 335                !sender->peer->info->can_receive(sender->peer)) {
 336         return 0;
 337     }
 338     return 1;
 339 }
 340
 341 ssize_t qemu_deliver_packet(NetClientState *sender,
 342                             unsigned flags,
 343                             const uint8_t *data,
 344                             size_t size,
 345                             void *opaque)
 346 {
 347     NetClientState *nc = opaque;
 348     ssize_t ret;
 349
 350     if (nc->link_down) {
 351         return size;
 352     }
 353
 354     if (nc->receive_disabled) {
 355         return 0;
 356     }
 357
 358     if (flags & QEMU_NET_PACKET_FLAG_RAW && nc->info->receive_raw) {
 359         ret = nc->info->receive_raw(nc, data, size);
 360     } else {
 361         ret = nc->info->receive(nc, data, size);
 362     }
 363
 364     if (ret == 0) {
 365         nc->receive_disabled = 1;
 366     };
 367
 368     return ret;
 369 }
 370
 371 void qemu_purge_queued_packets(NetClientState *nc)
 372 {
 373     if (!nc->peer) {
 374         return;
 375     }
 376
 377     qemu_net_queue_purge(nc->peer->send_queue, nc);
 378 }
 379
 380 void qemu_flush_queued_packets(NetClientState *nc)
 381 {
 382     nc->receive_disabled = 0;
 383
 384     if (qemu_net_queue_flush(nc->send_queue)) {
 385         /* We emptied the queue successfully, signal to the IO thread to repoll
 386          * the file descriptor (for tap, for example).
 387          */
 388         qemu_notify_event();
 389     }
 390 }
 391
 392 static ssize_t qemu_send_packet_async_with_flags(NetClientState *sender,
 393                                                  unsigned flags,
 394                                                  const uint8_t *buf, int size,
 395                                                  NetPacketSent *sent_cb)
 396 {
 397     NetQueue *queue;
 398
 399 #ifdef DEBUG_NET
 400     printf("qemu_send_packet_async:\n");
 401     hex_dump(stdout, buf, size);
 402 #endif
 403
 404     if (sender->link_down || !sender->peer) {
 405         return size;
 406     }
 407
 408     queue = sender->peer->send_queue;
 409
 410     return qemu_net_queue_send(queue, sender, flags, buf, size, sent_cb);
 411 }
 412
 413 ssize_t qemu_send_packet_async(NetClientState *sender,
 414                                const uint8_t *buf, int size,
 415                                NetPacketSent *sent_cb)
 416 {
 417     return qemu_send_packet_async_with_flags(sender, QEMU_NET_PACKET_FLAG_NONE,
 418                                              buf, size, sent_cb);
 419 }
 420
 421 void qemu_send_packet(NetClientState *nc, const uint8_t *buf, int size)
 422 {
 423     qemu_send_packet_async(nc, buf, size, NULL);
 424 }
 425
 426 ssize_t qemu_send_packet_raw(NetClientState *nc, const uint8_t *buf, int size)
 427 {
 428     return qemu_send_packet_async_with_flags(nc, QEMU_NET_PACKET_FLAG_RAW,
 429                                              buf, size, NULL);
 430 }
 431
 432 static ssize_t nc_sendv_compat(NetClientState *nc, const struct iovec *iov,
 433                                int iovcnt)
 434 {
 435     uint8_t buffer[4096];
 436     size_t offset;
 437
 438     offset = iov_to_buf(iov, iovcnt, 0, buffer, sizeof(buffer));
 439
 440     return nc->info->receive(nc, buffer, offset);
 441 }
 442
 443 ssize_t qemu_deliver_packet_iov(NetClientState *sender,
 444                                 unsigned flags,
 445                                 const struct iovec *iov,
 446                                 int iovcnt,
 447                                 void *opaque)
 448 {
 449     NetClientState *nc = opaque;
 450     int ret;
 451
 452     if (nc->link_down) {
 453         return iov_size(iov, iovcnt);
 454     }
 455
 456     if (nc->receive_disabled) {
 457         return 0;
 458     }
 459
 460     if (nc->info->receive_iov) {
 461         ret = nc->info->receive_iov(nc, iov, iovcnt);
 462     } else {
 463         ret = nc_sendv_compat(nc, iov, iovcnt);
 464     }
 465
 466     if (ret == 0) {
 467         nc->receive_disabled = 1;
 468     }
 469
 470     return ret;
 471 }
 472
 473 ssize_t qemu_sendv_packet_async(NetClientState *sender,
 474                                 const struct iovec *iov, int iovcnt,
 475                                 NetPacketSent *sent_cb)
 476 {
 477     NetQueue *queue;
 478
 479     if (sender->link_down || !sender->peer) {
 480         return iov_size(iov, iovcnt);
 481     }
 482
 483     queue = sender->peer->send_queue;
 484
 485     return qemu_net_queue_send_iov(queue, sender,
 486                                    QEMU_NET_PACKET_FLAG_NONE,
 487                                    iov, iovcnt, sent_cb);
 488 }
 489
 490 ssize_t
 491 qemu_sendv_packet(NetClientState *nc, const struct iovec *iov, int iovcnt)
 492 {
 493     return qemu_sendv_packet_async(nc, iov, iovcnt, NULL);
 494 }
 495
 496 NetClientState *qemu_find_netdev(const char *id)
 497 {
 498     NetClientState *nc;
 499
 500     QTAILQ_FOREACH(nc, &net_clients, next) {
 501         if (nc->info->type == NET_CLIENT_OPTIONS_KIND_NIC)
 502             continue;
 503         if (!strcmp(nc->name, id)) {
 504             return nc;
 505         }
 506     }
 507
 508     return NULL;
 509 }
 510
 511 int qemu_find_net_clients_except(const char *id, NetClientState **ncs,
 512                                  NetClientOptionsKind type, int max)
 513 {
 514     NetClientState *nc;
 515     int ret = 0;
 516
 517     QTAILQ_FOREACH(nc, &net_clients, next) {
 518         if (nc->info->type == type) {
 519             continue;
 520         }
 521         if (!strcmp(nc->name, id)) {
 522             if (ret < max) {
 523                 ncs[ret] = nc;
 524             }
 525             ret++;
 526         }
 527     }
 528
 529     return ret;
 530 }
 531
 532 static int nic_get_free_idx(void)
 533 {
 534     int index;
 535
 536     for (index = 0; index < MAX_NICS; index++)
 537         if (!nd_table[index].used)
 538             return index;
 539     return -1;
 540 }
 541
 542 int qemu_show_nic_models(const char *arg, const char *const *models)
 543 {
 544     int i;
 545
 546     if (!arg || !is_help_option(arg)) {
 547         return 0;
 548     }
 549
 550     fprintf(stderr, "qemu: Supported NIC models: ");
 551     for (i = 0 ; models[i]; i++)
 552         fprintf(stderr, "%s%c", models[i], models[i+1] ? ',' : '\n');
 553     return 1;
 554 }
 555
 556 void qemu_check_nic_model(NICInfo *nd, const char *model)
 557 {
 558     const char *models[2];
 559
 560     models[0] = model;
 561     models[1] = NULL;
 562
 563     if (qemu_show_nic_models(nd->model, models))
 564         exit(0);
 565     if (qemu_find_nic_model(nd, models, model) < 0)
 566         exit(1);
 567 }
 568
 569 int qemu_find_nic_model(NICInfo *nd, const char * const *models,
 570                         const char *default_model)
 571 {
 572     int i;
 573
 574     if (!nd->model)
 575         nd->model = g_strdup(default_model);
 576
 577     for (i = 0 ; models[i]; i++) {
 578         if (strcmp(nd->model, models[i]) == 0)
 579             return i;
 580     }
 581
 582     error_report("Unsupported NIC model: %s", nd->model);
 583     return -1;
 584 }
 585
 586 static int net_init_nic(const NetClientOptions *opts, const char *name,
 587                         NetClientState *peer)
 588 {
 589     int idx;
 590     NICInfo *nd;
 591     const NetLegacyNicOptions *nic;
 592
 593     assert(opts->kind == NET_CLIENT_OPTIONS_KIND_NIC);
 594     nic = opts->nic;
 595
 596     idx = nic_get_free_idx();
 597     if (idx == -1 || nb_nics >= MAX_NICS) {
 598         error_report("Too Many NICs");
 599         return -1;
 600     }
 601
 602     nd = &nd_table[idx];
 603
 604     memset(nd, 0, sizeof(*nd));
 605
 606     if (nic->has_netdev) {
 607         nd->netdev = qemu_find_netdev(nic->netdev);
 608         if (!nd->netdev) {
 609             error_report("netdev '%s' not found", nic->netdev);
 610             return -1;
 611         }
 612     } else {
 613         assert(peer);
 614         nd->netdev = peer;
 615     }
 616     nd->name = g_strdup(name);
 617     if (nic->has_model) {
 618         nd->model = g_strdup(nic->model);
 619     }
 620     if (nic->has_addr) {
 621         nd->devaddr = g_strdup(nic->addr);
 622     }
 623
 624     if (nic->has_macaddr &&
 625         net_parse_macaddr(nd->macaddr.a, nic->macaddr) < 0) {
 626         error_report("invalid syntax for ethernet address");
 627         return -1;
 628     }
 629     qemu_macaddr_default_if_unset(&nd->macaddr);
 630
 631     if (nic->has_vectors) {
 632         if (nic->vectors > 0x7ffffff) {
 633             error_report("invalid # of vectors: %"PRIu32, nic->vectors);
 634             return -1;
 635         }
 636         nd->nvectors = nic->vectors;
 637     } else {
 638         nd->nvectors = DEV_NVECTORS_UNSPECIFIED;
 639     }
 640
 641     nd->used = 1;
 642     nb_nics++;
 643
 644     return idx;
 645 }
 646
 647
 648 static int (* const net_client_init_fun[NET_CLIENT_OPTIONS_KIND_MAX])(
 649     const NetClientOptions *opts,
 650     const char *name,
 651     NetClientState *peer) = {
 652         [NET_CLIENT_OPTIONS_KIND_NIC]       = net_init_nic,
 653 #ifdef CONFIG_SLIRP
 654         [NET_CLIENT_OPTIONS_KIND_USER]      = net_init_slirp,
 655 #endif
 656         [NET_CLIENT_OPTIONS_KIND_TAP]       = net_init_tap,
 657         [NET_CLIENT_OPTIONS_KIND_SOCKET]    = net_init_socket,
 658 #ifdef CONFIG_VDE
 659         [NET_CLIENT_OPTIONS_KIND_VDE]       = net_init_vde,
 660 #endif
 661         [NET_CLIENT_OPTIONS_KIND_DUMP]      = net_init_dump,
 662 #ifdef CONFIG_NET_BRIDGE
 663         [NET_CLIENT_OPTIONS_KIND_BRIDGE]    = net_init_bridge,
 664 #endif
 665         [NET_CLIENT_OPTIONS_KIND_HUBPORT]   = net_init_hubport,
 666 };
 667
 668
 669 static int net_client_init1(const void *object, int is_netdev, Error **errp)
 670 {
 671     union {
 672         const Netdev    *netdev;
 673         const NetLegacy *net;
 674     } u;
 675     const NetClientOptions *opts;
 676     const char *name;
 677
 678     if (is_netdev) {
 679         u.netdev = object;
 680         opts = u.netdev->opts;
 681         name = u.netdev->id;
 682
 683         switch (opts->kind) {
 684 #ifdef CONFIG_SLIRP
 685         case NET_CLIENT_OPTIONS_KIND_USER:
 686 #endif
 687         case NET_CLIENT_OPTIONS_KIND_TAP:
 688         case NET_CLIENT_OPTIONS_KIND_SOCKET:
 689 #ifdef CONFIG_VDE
 690         case NET_CLIENT_OPTIONS_KIND_VDE:
 691 #endif
 692 #ifdef CONFIG_NET_BRIDGE
 693         case NET_CLIENT_OPTIONS_KIND_BRIDGE:
 694 #endif
 695         case NET_CLIENT_OPTIONS_KIND_HUBPORT:
 696             break;
 697
 698         default:
 699             error_set(errp, QERR_INVALID_PARAMETER_VALUE, "type",
 700                       "a netdev backend type");
 701             return -1;
 702         }
 703     } else {
 704         u.net = object;
 705         opts = u.net->opts;
 706         /* missing optional values have been initialized to "all bits zero" */
 707         name = u.net->has_id ? u.net->id : u.net->name;
 708     }
 709
 710     if (net_client_init_fun[opts->kind]) {
 711         NetClientState *peer = NULL;
 712
 713         /* Do not add to a vlan if it's a -netdev or a nic with a netdev=
 714          * parameter. */
 715         if (!is_netdev &&
 716             (opts->kind != NET_CLIENT_OPTIONS_KIND_NIC ||
 717              !opts->nic->has_netdev)) {
 718             peer = net_hub_add_port(u.net->has_vlan ? u.net->vlan : 0, NULL);
 719         }
 720
 721         if (net_client_init_fun[opts->kind](opts, name, peer) < 0) {
 722             /* TODO push error reporting into init() methods */
 723             error_set(errp, QERR_DEVICE_INIT_FAILED,
 724                       NetClientOptionsKind_lookup[opts->kind]);
 725             return -1;
 726         }
 727     }
 728     return 0;
 729 }
 730
 731
 732 static void net_visit(Visitor *v, int is_netdev, void **object, Error **errp)
 733 {
 734     if (is_netdev) {
 735         visit_type_Netdev(v, (Netdev **)object, NULL, errp);
 736     } else {
 737         visit_type_NetLegacy(v, (NetLegacy **)object, NULL, errp);
 738     }
 739 }
 740
 741
 742 int net_client_init(QemuOpts *opts, int is_netdev, Error **errp)
 743 {
 744     void *object = NULL;
 745     Error *err = NULL;
 746     int ret = -1;
 747
 748     {
 749         OptsVisitor *ov = opts_visitor_new(opts);
 750
 751         net_visit(opts_get_visitor(ov), is_netdev, &object, &err);
 752         opts_visitor_cleanup(ov);
 753     }
 754
 755     if (!err) {
 756         ret = net_client_init1(object, is_netdev, &err);
 757     }
 758
 759     if (object) {
 760         QapiDeallocVisitor *dv = qapi_dealloc_visitor_new();
 761
 762         net_visit(qapi_dealloc_get_visitor(dv), is_netdev, &object, NULL);
 763         qapi_dealloc_visitor_cleanup(dv);
 764     }
 765
 766     error_propagate(errp, err);
 767     return ret;
 768 }
 769
 770
 771 static int net_host_check_device(const char *device)
 772 {
 773     int i;
 774     const char *valid_param_list[] = { "tap", "socket", "dump"
 775 #ifdef CONFIG_NET_BRIDGE
 776                                        , "bridge"
 777 #endif
 778 #ifdef CONFIG_SLIRP
 779                                        ,"user"
 780 #endif
 781 #ifdef CONFIG_VDE
 782                                        ,"vde"
 783 #endif
 784     };
 785     for (i = 0; i < sizeof(valid_param_list) / sizeof(char *); i++) {
 786         if (!strncmp(valid_param_list[i], device,
 787                      strlen(valid_param_list[i])))
 788             return 1;
 789     }
 790
 791     return 0;
 792 }
 793
 794 void net_host_device_add(Monitor *mon, const QDict *qdict)
 795 {
 796     const char *device = qdict_get_str(qdict, "device");
 797     const char *opts_str = qdict_get_try_str(qdict, "opts");
 798     Error *local_err = NULL;
 799     QemuOpts *opts;
 800
 801     if (!net_host_check_device(device)) {
 802         monitor_printf(mon, "invalid host network device %s\n", device);
 803         return;
 804     }
 805
 806     opts = qemu_opts_parse(qemu_find_opts("net"), opts_str ? opts_str : "", 0);
 807     if (!opts) {
 808         return;
 809     }
 810
 811     qemu_opt_set(opts, "type", device);
 812
 813     net_client_init(opts, 0, &local_err);
 814     if (error_is_set(&local_err)) {
 815         qerror_report_err(local_err);
 816         error_free(local_err);
 817         monitor_printf(mon, "adding host network device %s failed\n", device);
 818     }
 819 }
 820
 821 void net_host_device_remove(Monitor *mon, const QDict *qdict)
 822 {
 823     NetClientState *nc;
 824     int vlan_id = qdict_get_int(qdict, "vlan_id");
 825     const char *device = qdict_get_str(qdict, "device");
 826
 827     nc = net_hub_find_client_by_name(vlan_id, device);
 828     if (!nc) {
 829         return;
 830     }
 831     if (!net_host_check_device(nc->model)) {
 832         monitor_printf(mon, "invalid host network device %s\n", device);
 833         return;
 834     }
 835     qemu_del_net_client(nc);
 836 }
 837
 838 void netdev_add(QemuOpts *opts, Error **errp)
 839 {
 840     net_client_init(opts, 1, errp);
 841 }
 842
 843 int qmp_netdev_add(Monitor *mon, const QDict *qdict, QObject **ret)
 844 {
 845     Error *local_err = NULL;
 846     QemuOptsList *opts_list;
 847     QemuOpts *opts;
 848
 849     opts_list = qemu_find_opts_err("netdev", &local_err);
 850     if (error_is_set(&local_err)) {
 851         goto exit_err;
 852     }
 853
 854     opts = qemu_opts_from_qdict(opts_list, qdict, &local_err);
 855     if (error_is_set(&local_err)) {
 856         goto exit_err;
 857     }
 858
 859     netdev_add(opts, &local_err);
 860     if (error_is_set(&local_err)) {
 861         qemu_opts_del(opts);
 862         goto exit_err;
 863     }
 864
 865     return 0;
 866
 867 exit_err:
 868     qerror_report_err(local_err);
 869     error_free(local_err);
 870     return -1;
 871 }
 872
 873 void qmp_netdev_del(const char *id, Error **errp)
 874 {
 875     NetClientState *nc;
 876     QemuOpts *opts;
 877
 878     nc = qemu_find_netdev(id);
 879     if (!nc) {
 880         error_set(errp, QERR_DEVICE_NOT_FOUND, id);
 881         return;
 882     }
 883
 884     opts = qemu_opts_find(qemu_find_opts_err("netdev", NULL), id);
 885     if (!opts) {
 886         error_setg(errp, "Device '%s' is not a netdev", id);
 887         return;
 888     }
 889
 890     qemu_del_net_client(nc);
 891     qemu_opts_del(opts);
 892 }
 893
 894 void print_net_client(Monitor *mon, NetClientState *nc)
 895 {
 896     monitor_printf(mon, "%s: type=%s,%s\n", nc->name,
 897                    NetClientOptionsKind_lookup[nc->info->type], nc->info_str);
 898 }
 899
 900 void do_info_network(Monitor *mon, const QDict *qdict)
 901 {
 902     NetClientState *nc, *peer;
 903     NetClientOptionsKind type;
 904
 905     net_hub_info(mon);
 906
 907     QTAILQ_FOREACH(nc, &net_clients, next) {
 908         peer = nc->peer;
 909         type = nc->info->type;
 910
 911         /* Skip if already printed in hub info */
 912         if (net_hub_id_for_client(nc, NULL) == 0) {
 913             continue;
 914         }
 915
 916         if (!peer || type == NET_CLIENT_OPTIONS_KIND_NIC) {
 917             print_net_client(mon, nc);
 918         } /* else it's a netdev connected to a NIC, printed with the NIC */
 919         if (peer && type == NET_CLIENT_OPTIONS_KIND_NIC) {
 920             monitor_printf(mon, " \\ ");
 921             print_net_client(mon, peer);
 922         }
 923     }
 924 }
 925
 926 void qmp_set_link(const char *name, bool up, Error **errp)
 927 {
 928     NetClientState *nc = NULL;
 929
 930     QTAILQ_FOREACH(nc, &net_clients, next) {
 931         if (!strcmp(nc->name, name)) {
 932             goto done;
 933         }
 934     }
 935 done:
 936     if (!nc) {
 937         error_set(errp, QERR_DEVICE_NOT_FOUND, name);
 938         return;
 939     }
 940
 941     nc->link_down = !up;
 942
 943     if (nc->info->link_status_changed) {
 944         nc->info->link_status_changed(nc);
 945     }
 946
 947     /* Notify peer. Don't update peer link status: this makes it possible to
 948      * disconnect from host network without notifying the guest.
 949      * FIXME: is disconnected link status change operation useful?
 950      *
 951      * Current behaviour is compatible with qemu vlans where there could be
 952      * multiple clients that can still communicate with each other in
 953      * disconnected mode. For now maintain this compatibility. */
 954     if (nc->peer && nc->peer->info->link_status_changed) {
 955         nc->peer->info->link_status_changed(nc->peer);
 956     }
 957 }
 958
 959 void net_cleanup(void)
 960 {
 961     NetClientState *nc, *next_vc;
 962
 963     QTAILQ_FOREACH_SAFE(nc, &net_clients, next, next_vc) {
 964         if (nc->info->type == NET_CLIENT_OPTIONS_KIND_NIC) {
 965             qemu_del_nic(qemu_get_nic(nc));
 966         } else {
 967             qemu_del_net_client(nc);
 968         }
 969     }
 970 }
 971
 972 void net_check_clients(void)
 973 {
 974     NetClientState *nc;
 975     int i;
 976
 977     /* Don't warn about the default network setup that you get if
 978      * no command line -net or -netdev options are specified. There
 979      * are two cases that we would otherwise complain about:
 980      * (1) board doesn't support a NIC but the implicit "-net nic"
 981      * requested one
 982      * (2) CONFIG_SLIRP not set, in which case the implicit "-net nic"
 983      * sets up a nic that isn't connected to anything.
 984      */
 985     if (default_net) {
 986         return;
 987     }
 988
 989     net_hub_check_clients();
 990
 991     QTAILQ_FOREACH(nc, &net_clients, next) {
 992         if (!nc->peer) {
 993             fprintf(stderr, "Warning: %s %s has no peer\n",
 994                     nc->info->type == NET_CLIENT_OPTIONS_KIND_NIC ?
 995                     "nic" : "netdev", nc->name);
 996         }
 997     }
 998
 999     /* Check that all NICs requested via -net nic actually got created.
1000      * NICs created via -device don't need to be checked here because
1001      * they are always instantiated.
1002      */
1003     for (i = 0; i < MAX_NICS; i++) {
1004         NICInfo *nd = &nd_table[i];
1005         if (nd->used && !nd->instantiated) {
1006             fprintf(stderr, "Warning: requested NIC (%s, model %s) "
1007                     "was not created (not supported by this machine?)\n",
1008                     nd->name ? nd->name : "anonymous",
1009                     nd->model ? nd->model : "unspecified");
1010         }
1011     }
1012 }
1013
1014 static int net_init_client(QemuOpts *opts, void *dummy)
1015 {
1016     Error *local_err = NULL;
1017
1018     net_client_init(opts, 0, &local_err);
1019     if (error_is_set(&local_err)) {
1020         qerror_report_err(local_err);
1021         error_free(local_err);
1022         return -1;
1023     }
1024
1025     return 0;
1026 }
1027
1028 static int net_init_netdev(QemuOpts *opts, void *dummy)
1029 {
1030     Error *local_err = NULL;
1031     int ret;
1032
1033     ret = net_client_init(opts, 1, &local_err);
1034     if (error_is_set(&local_err)) {
1035         qerror_report_err(local_err);
1036         error_free(local_err);
1037         return -1;
1038     }
1039
1040     return ret;
1041 }
1042
1043 int net_init_clients(void)
1044 {
1045     QemuOptsList *net = qemu_find_opts("net");
1046
1047     if (default_net) {
1048         /* if no clients, we use a default config */
1049         qemu_opts_set(net, NULL, "type", "nic");
1050 #ifdef CONFIG_SLIRP
1051         qemu_opts_set(net, NULL, "type", "user");
1052 #endif
1053     }
1054
1055     QTAILQ_INIT(&net_clients);
1056
1057     if (qemu_opts_foreach(qemu_find_opts("netdev"), net_init_netdev, NULL, 1) == -1)
1058         return -1;
1059
1060     if (qemu_opts_foreach(net, net_init_client, NULL, 1) == -1) {
1061         return -1;
1062     }
1063
1064     return 0;
1065 }
1066
1067 int net_client_parse(QemuOptsList *opts_list, const char *optarg)
1068 {
1069 #if defined(CONFIG_SLIRP)
1070     int ret;
1071     if (net_slirp_parse_legacy(opts_list, optarg, &ret)) {
1072         return ret;
1073     }
1074 #endif
1075
1076     if (!qemu_opts_parse(opts_list, optarg, 1)) {
1077         return -1;
1078     }
1079
1080     default_net = 0;
1081     return 0;
1082 }
1083
1084 /* From FreeBSD */
1085 /* XXX: optimize */
1086 unsigned compute_mcast_idx(const uint8_t *ep)
1087 {
1088     uint32_t crc;
1089     int carry, i, j;
1090     uint8_t b;
1091
1092     crc = 0xffffffff;
1093     for (i = 0; i < 6; i++) {
1094         b = *ep++;
1095         for (j = 0; j < 8; j++) {
1096             carry = ((crc & 0x80000000L) ? 1 : 0) ^ (b & 0x01);
1097             crc <<= 1;
1098             b >>= 1;
1099             if (carry) {
1100                 crc = ((crc ^ POLYNOMIAL) | carry);
1101             }
1102         }
1103     }
1104     return crc >> 26;
1105 }
1106
1107 QemuOptsList qemu_netdev_opts = {
1108     .name = "netdev",
1109     .implied_opt_name = "type",
1110     .head = QTAILQ_HEAD_INITIALIZER(qemu_netdev_opts.head),
1111     .desc = {
1112         /*
1113          * no elements => accept any params
1114          * validation will happen later
1115          */
1116         { /* end of list */ }
1117     },
1118 };
1119
1120 QemuOptsList qemu_net_opts = {
1121     .name = "net",
1122     .implied_opt_name = "type",
1123     .head = QTAILQ_HEAD_INITIALIZER(qemu_net_opts.head),
1124     .desc = {
1125         /*
1126          * no elements => accept any params
1127          * validation will happen later
1128          */
1129         { /* end of list */ }
1130     },
1131 };