Statistics
| Branch: | Revision:

root / net.c @ 4b37156c

History | View | Annotate | Download (38.7 kB)

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 for multicast packets",
1004
            },
1005
            { /* end of list */ }
1006
        },
1007
    },
1008
#ifdef CONFIG_VDE
1009
    [NET_CLIENT_TYPE_VDE] = {
1010
        .type = "vde",
1011
        .init = net_init_vde,
1012
        .desc = {
1013
            NET_COMMON_PARAMS_DESC,
1014
            {
1015
                .name = "sock",
1016
                .type = QEMU_OPT_STRING,
1017
                .help = "socket path",
1018
            }, {
1019
                .name = "port",
1020
                .type = QEMU_OPT_NUMBER,
1021
                .help = "port number",
1022
            }, {
1023
                .name = "group",
1024
                .type = QEMU_OPT_STRING,
1025
                .help = "group owner of socket",
1026
            }, {
1027
                .name = "mode",
1028
                .type = QEMU_OPT_NUMBER,
1029
                .help = "permissions for socket",
1030
            },
1031
            { /* end of list */ }
1032
        },
1033
    },
1034
#endif
1035
    [NET_CLIENT_TYPE_DUMP] = {
1036
        .type = "dump",
1037
        .init = net_init_dump,
1038
        .desc = {
1039
            NET_COMMON_PARAMS_DESC,
1040
            {
1041
                .name = "len",
1042
                .type = QEMU_OPT_SIZE,
1043
                .help = "per-packet size limit (64k default)",
1044
            }, {
1045
                .name = "file",
1046
                .type = QEMU_OPT_STRING,
1047
                .help = "dump file path (default is qemu-vlan0.pcap)",
1048
            },
1049
            { /* end of list */ }
1050
        },
1051
    },
1052
};
1053

    
1054
int net_client_init(Monitor *mon, QemuOpts *opts, int is_netdev)
1055
{
1056
    const char *name;
1057
    const char *type;
1058
    int i;
1059

    
1060
    type = qemu_opt_get(opts, "type");
1061
    if (!type) {
1062
        qerror_report(QERR_MISSING_PARAMETER, "type");
1063
        return -1;
1064
    }
1065

    
1066
    if (is_netdev) {
1067
        if (strcmp(type, "tap") != 0 &&
1068
#ifdef CONFIG_SLIRP
1069
            strcmp(type, "user") != 0 &&
1070
#endif
1071
#ifdef CONFIG_VDE
1072
            strcmp(type, "vde") != 0 &&
1073
#endif
1074
            strcmp(type, "socket") != 0) {
1075
            qerror_report(QERR_INVALID_PARAMETER_VALUE, "type",
1076
                          "a netdev backend type");
1077
            return -1;
1078
        }
1079

    
1080
        if (qemu_opt_get(opts, "vlan")) {
1081
            qerror_report(QERR_INVALID_PARAMETER, "vlan");
1082
            return -1;
1083
        }
1084
        if (qemu_opt_get(opts, "name")) {
1085
            qerror_report(QERR_INVALID_PARAMETER, "name");
1086
            return -1;
1087
        }
1088
        if (!qemu_opts_id(opts)) {
1089
            qerror_report(QERR_MISSING_PARAMETER, "id");
1090
            return -1;
1091
        }
1092
    }
1093

    
1094
    name = qemu_opts_id(opts);
1095
    if (!name) {
1096
        name = qemu_opt_get(opts, "name");
1097
    }
1098

    
1099
    for (i = 0; i < NET_CLIENT_TYPE_MAX; i++) {
1100
        if (net_client_types[i].type != NULL &&
1101
            !strcmp(net_client_types[i].type, type)) {
1102
            VLANState *vlan = NULL;
1103
            int ret;
1104

    
1105
            if (qemu_opts_validate(opts, &net_client_types[i].desc[0]) == -1) {
1106
                return -1;
1107
            }
1108

    
1109
            /* Do not add to a vlan if it's a -netdev or a nic with a
1110
             * netdev= parameter. */
1111
            if (!(is_netdev ||
1112
                  (strcmp(type, "nic") == 0 && qemu_opt_get(opts, "netdev")))) {
1113
                vlan = qemu_find_vlan(qemu_opt_get_number(opts, "vlan", 0), 1);
1114
            }
1115

    
1116
            ret = 0;
1117
            if (net_client_types[i].init) {
1118
                ret = net_client_types[i].init(opts, mon, name, vlan);
1119
                if (ret < 0) {
1120
                    /* TODO push error reporting into init() methods */
1121
                    qerror_report(QERR_DEVICE_INIT_FAILED, type);
1122
                    return -1;
1123
                }
1124
            }
1125
            return ret;
1126
        }
1127
    }
1128

    
1129
    qerror_report(QERR_INVALID_PARAMETER_VALUE, "type",
1130
                  "a network client type");
1131
    return -1;
1132
}
1133

    
1134
static int net_host_check_device(const char *device)
1135
{
1136
    int i;
1137
    const char *valid_param_list[] = { "tap", "socket", "dump"
1138
#ifdef CONFIG_SLIRP
1139
                                       ,"user"
1140
#endif
1141
#ifdef CONFIG_VDE
1142
                                       ,"vde"
1143
#endif
1144
    };
1145
    for (i = 0; i < sizeof(valid_param_list) / sizeof(char *); i++) {
1146
        if (!strncmp(valid_param_list[i], device,
1147
                     strlen(valid_param_list[i])))
1148
            return 1;
1149
    }
1150

    
1151
    return 0;
1152
}
1153

    
1154
void net_host_device_add(Monitor *mon, const QDict *qdict)
1155
{
1156
    const char *device = qdict_get_str(qdict, "device");
1157
    const char *opts_str = qdict_get_try_str(qdict, "opts");
1158
    QemuOpts *opts;
1159

    
1160
    if (!net_host_check_device(device)) {
1161
        monitor_printf(mon, "invalid host network device %s\n", device);
1162
        return;
1163
    }
1164

    
1165
    opts = qemu_opts_parse(qemu_find_opts("net"), opts_str ? opts_str : "", 0);
1166
    if (!opts) {
1167
        return;
1168
    }
1169

    
1170
    qemu_opt_set(opts, "type", device);
1171

    
1172
    if (net_client_init(mon, opts, 0) < 0) {
1173
        monitor_printf(mon, "adding host network device %s failed\n", device);
1174
    }
1175
}
1176

    
1177
void net_host_device_remove(Monitor *mon, const QDict *qdict)
1178
{
1179
    VLANClientState *vc;
1180
    int vlan_id = qdict_get_int(qdict, "vlan_id");
1181
    const char *device = qdict_get_str(qdict, "device");
1182

    
1183
    vc = qemu_find_vlan_client_by_name(mon, vlan_id, device);
1184
    if (!vc) {
1185
        return;
1186
    }
1187
    if (!net_host_check_device(vc->model)) {
1188
        monitor_printf(mon, "invalid host network device %s\n", device);
1189
        return;
1190
    }
1191
    qemu_del_vlan_client(vc);
1192
}
1193

    
1194
int do_netdev_add(Monitor *mon, const QDict *qdict, QObject **ret_data)
1195
{
1196
    QemuOpts *opts;
1197
    int res;
1198

    
1199
    opts = qemu_opts_from_qdict(qemu_find_opts("netdev"), qdict);
1200
    if (!opts) {
1201
        return -1;
1202
    }
1203

    
1204
    res = net_client_init(mon, opts, 1);
1205
    if (res < 0) {
1206
        qemu_opts_del(opts);
1207
    }
1208

    
1209
    return res;
1210
}
1211

    
1212
int do_netdev_del(Monitor *mon, const QDict *qdict, QObject **ret_data)
1213
{
1214
    const char *id = qdict_get_str(qdict, "id");
1215
    VLANClientState *vc;
1216

    
1217
    vc = qemu_find_netdev(id);
1218
    if (!vc) {
1219
        qerror_report(QERR_DEVICE_NOT_FOUND, id);
1220
        return -1;
1221
    }
1222
    qemu_del_vlan_client(vc);
1223
    qemu_opts_del(qemu_opts_find(qemu_find_opts("netdev"), id));
1224
    return 0;
1225
}
1226

    
1227
static void print_net_client(Monitor *mon, VLANClientState *vc)
1228
{
1229
    monitor_printf(mon, "%s: type=%s,%s\n", vc->name,
1230
                   net_client_types[vc->info->type].type, vc->info_str);
1231
}
1232

    
1233
void do_info_network(Monitor *mon)
1234
{
1235
    VLANState *vlan;
1236
    VLANClientState *vc, *peer;
1237
    net_client_type type;
1238

    
1239
    QTAILQ_FOREACH(vlan, &vlans, next) {
1240
        monitor_printf(mon, "VLAN %d devices:\n", vlan->id);
1241

    
1242
        QTAILQ_FOREACH(vc, &vlan->clients, next) {
1243
            monitor_printf(mon, "  ");
1244
            print_net_client(mon, vc);
1245
        }
1246
    }
1247
    monitor_printf(mon, "Devices not on any VLAN:\n");
1248
    QTAILQ_FOREACH(vc, &non_vlan_clients, next) {
1249
        peer = vc->peer;
1250
        type = vc->info->type;
1251
        if (!peer || type == NET_CLIENT_TYPE_NIC) {
1252
            monitor_printf(mon, "  ");
1253
            print_net_client(mon, vc);
1254
        } /* else it's a netdev connected to a NIC, printed with the NIC */
1255
        if (peer && type == NET_CLIENT_TYPE_NIC) {
1256
            monitor_printf(mon, "   \\ ");
1257
            print_net_client(mon, peer);
1258
        }
1259
    }
1260
}
1261

    
1262
void qmp_set_link(const char *name, bool up, Error **errp)
1263
{
1264
    VLANState *vlan;
1265
    VLANClientState *vc = NULL;
1266

    
1267
    QTAILQ_FOREACH(vlan, &vlans, next) {
1268
        QTAILQ_FOREACH(vc, &vlan->clients, next) {
1269
            if (strcmp(vc->name, name) == 0) {
1270
                goto done;
1271
            }
1272
        }
1273
    }
1274
    QTAILQ_FOREACH(vc, &non_vlan_clients, next) {
1275
        if (!strcmp(vc->name, name)) {
1276
            goto done;
1277
        }
1278
    }
1279
done:
1280

    
1281
    if (!vc) {
1282
        error_set(errp, QERR_DEVICE_NOT_FOUND, name);
1283
        return;
1284
    }
1285

    
1286
    vc->link_down = !up;
1287

    
1288
    if (vc->info->link_status_changed) {
1289
        vc->info->link_status_changed(vc);
1290
    }
1291

    
1292
    /* Notify peer. Don't update peer link status: this makes it possible to
1293
     * disconnect from host network without notifying the guest.
1294
     * FIXME: is disconnected link status change operation useful?
1295
     *
1296
     * Current behaviour is compatible with qemu vlans where there could be
1297
     * multiple clients that can still communicate with each other in
1298
     * disconnected mode. For now maintain this compatibility. */
1299
    if (vc->peer && vc->peer->info->link_status_changed) {
1300
        vc->peer->info->link_status_changed(vc->peer);
1301
    }
1302
}
1303

    
1304
void net_cleanup(void)
1305
{
1306
    VLANState *vlan;
1307
    VLANClientState *vc, *next_vc;
1308

    
1309
    QTAILQ_FOREACH(vlan, &vlans, next) {
1310
        QTAILQ_FOREACH_SAFE(vc, &vlan->clients, next, next_vc) {
1311
            qemu_del_vlan_client(vc);
1312
        }
1313
    }
1314

    
1315
    QTAILQ_FOREACH_SAFE(vc, &non_vlan_clients, next, next_vc) {
1316
        qemu_del_vlan_client(vc);
1317
    }
1318
}
1319

    
1320
void net_check_clients(void)
1321
{
1322
    VLANState *vlan;
1323
    VLANClientState *vc;
1324
    int i;
1325

    
1326
    /* Don't warn about the default network setup that you get if
1327
     * no command line -net or -netdev options are specified. There
1328
     * are two cases that we would otherwise complain about:
1329
     * (1) board doesn't support a NIC but the implicit "-net nic"
1330
     * requested one
1331
     * (2) CONFIG_SLIRP not set, in which case the implicit "-net nic"
1332
     * sets up a nic that isn't connected to anything.
1333
     */
1334
    if (default_net) {
1335
        return;
1336
    }
1337

    
1338
    QTAILQ_FOREACH(vlan, &vlans, next) {
1339
        int has_nic = 0, has_host_dev = 0;
1340

    
1341
        QTAILQ_FOREACH(vc, &vlan->clients, next) {
1342
            switch (vc->info->type) {
1343
            case NET_CLIENT_TYPE_NIC:
1344
                has_nic = 1;
1345
                break;
1346
            case NET_CLIENT_TYPE_USER:
1347
            case NET_CLIENT_TYPE_TAP:
1348
            case NET_CLIENT_TYPE_SOCKET:
1349
            case NET_CLIENT_TYPE_VDE:
1350
                has_host_dev = 1;
1351
                break;
1352
            default: ;
1353
            }
1354
        }
1355
        if (has_host_dev && !has_nic)
1356
            fprintf(stderr, "Warning: vlan %d with no nics\n", vlan->id);
1357
        if (has_nic && !has_host_dev)
1358
            fprintf(stderr,
1359
                    "Warning: vlan %d is not connected to host network\n",
1360
                    vlan->id);
1361
    }
1362
    QTAILQ_FOREACH(vc, &non_vlan_clients, next) {
1363
        if (!vc->peer) {
1364
            fprintf(stderr, "Warning: %s %s has no peer\n",
1365
                    vc->info->type == NET_CLIENT_TYPE_NIC ? "nic" : "netdev",
1366
                    vc->name);
1367
        }
1368
    }
1369

    
1370
    /* Check that all NICs requested via -net nic actually got created.
1371
     * NICs created via -device don't need to be checked here because
1372
     * they are always instantiated.
1373
     */
1374
    for (i = 0; i < MAX_NICS; i++) {
1375
        NICInfo *nd = &nd_table[i];
1376
        if (nd->used && !nd->instantiated) {
1377
            fprintf(stderr, "Warning: requested NIC (%s, model %s) "
1378
                    "was not created (not supported by this machine?)\n",
1379
                    nd->name ? nd->name : "anonymous",
1380
                    nd->model ? nd->model : "unspecified");
1381
        }
1382
    }
1383
}
1384

    
1385
static int net_init_client(QemuOpts *opts, void *dummy)
1386
{
1387
    if (net_client_init(NULL, opts, 0) < 0)
1388
        return -1;
1389
    return 0;
1390
}
1391

    
1392
static int net_init_netdev(QemuOpts *opts, void *dummy)
1393
{
1394
    return net_client_init(NULL, opts, 1);
1395
}
1396

    
1397
int net_init_clients(void)
1398
{
1399
    QemuOptsList *net = qemu_find_opts("net");
1400

    
1401
    if (default_net) {
1402
        /* if no clients, we use a default config */
1403
        qemu_opts_set(net, NULL, "type", "nic");
1404
#ifdef CONFIG_SLIRP
1405
        qemu_opts_set(net, NULL, "type", "user");
1406
#endif
1407
    }
1408

    
1409
    QTAILQ_INIT(&vlans);
1410
    QTAILQ_INIT(&non_vlan_clients);
1411

    
1412
    if (qemu_opts_foreach(qemu_find_opts("netdev"), net_init_netdev, NULL, 1) == -1)
1413
        return -1;
1414

    
1415
    if (qemu_opts_foreach(net, net_init_client, NULL, 1) == -1) {
1416
        return -1;
1417
    }
1418

    
1419
    return 0;
1420
}
1421

    
1422
int net_client_parse(QemuOptsList *opts_list, const char *optarg)
1423
{
1424
#if defined(CONFIG_SLIRP)
1425
    int ret;
1426
    if (net_slirp_parse_legacy(opts_list, optarg, &ret)) {
1427
        return ret;
1428
    }
1429
#endif
1430

    
1431
    if (!qemu_opts_parse(opts_list, optarg, 1)) {
1432
        return -1;
1433
    }
1434

    
1435
    default_net = 0;
1436
    return 0;
1437
}