qemu_driver.c 115.0 KB
Newer Older
D
Daniel P. Berrange 已提交
1 2 3
/*
 * driver.c: core driver methods for managing qemu guests
 *
4
 * Copyright (C) 2006, 2007, 2008 Red Hat, Inc.
D
Daniel P. Berrange 已提交
5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23
 * Copyright (C) 2006 Daniel P. Berrange
 *
 * This library is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2.1 of the License, or (at your option) any later version.
 *
 * This library is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with this library; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307  USA
 *
 * Author: Daniel P. Berrange <berrange@redhat.com>
 */

24
#include <config.h>
25 26

#ifdef WITH_QEMU
27

D
Daniel P. Berrange 已提交
28 29 30 31 32 33 34 35 36 37 38
#include <sys/types.h>
#include <sys/poll.h>
#include <dirent.h>
#include <limits.h>
#include <string.h>
#include <stdio.h>
#include <strings.h>
#include <stdarg.h>
#include <stdlib.h>
#include <unistd.h>
#include <errno.h>
39
#include <sys/utsname.h>
40 41 42 43
#include <sys/stat.h>
#include <fcntl.h>
#include <signal.h>
#include <paths.h>
44 45
#include <pwd.h>
#include <stdio.h>
46
#include <sys/wait.h>
47
#include <libxml/uri.h>
D
Daniel P. Berrange 已提交
48

49 50 51 52
#if HAVE_NUMACTL
#include <numa.h>
#endif

53 54 55 56
#if HAVE_SCHED_H
#include <sched.h>
#endif

57
#include "internal.h"
J
Jim Meyering 已提交
58
#include "c-ctype.h"
59
#include "event.h"
60
#include "buf.h"
61
#include "util.h"
62 63
#include "qemu_driver.h"
#include "qemu_conf.h"
64
#include "nodeinfo.h"
65
#include "stats_linux.h"
66
#include "capabilities.h"
67
#include "memory.h"
68

R
Richard W.M. Jones 已提交
69 70 71
/* For storing short-lived temporary files. */
#define TEMPDIR LOCAL_STATE_DIR "/cache/libvirt"

A
Atsushi SAKAI 已提交
72
#ifdef WITH_LIBVIRTD
73
static int qemudShutdown(void);
A
Atsushi SAKAI 已提交
74
#endif
75

76 77 78
/* qemudDebug statements should be changed to use this macro instead. */
#define DEBUG(fmt,...) VIR_DEBUG(__FILE__, fmt, __VA_ARGS__)
#define DEBUG0(msg) VIR_DEBUG(__FILE__, "%s", msg)
79

80 81
#define qemudLog(level, msg...) fprintf(stderr, msg)

82 83 84 85 86 87 88 89 90
static int qemudSetCloseExec(int fd) {
    int flags;
    if ((flags = fcntl(fd, F_GETFD)) < 0)
        goto error;
    flags |= FD_CLOEXEC;
    if ((fcntl(fd, F_SETFD, flags)) < 0)
        goto error;
    return 0;
 error:
J
Jim Meyering 已提交
91 92
    qemudLog(QEMUD_ERR,
             "%s", _("Failed to set close-on-exec file descriptor flag"));
93 94 95 96 97 98 99 100 101 102 103 104 105
    return -1;
}


static int qemudSetNonBlock(int fd) {
    int flags;
    if ((flags = fcntl(fd, F_GETFL)) < 0)
        goto error;
    flags |= O_NONBLOCK;
    if ((fcntl(fd, F_SETFL, flags)) < 0)
        goto error;
    return 0;
 error:
J
Jim Meyering 已提交
106 107
    qemudLog(QEMUD_ERR,
             "%s", _("Failed to set non-blocking file descriptor flag"));
108 109 110 111
    return -1;
}


112
static void qemudDispatchVMEvent(int fd, int events, void *opaque);
113 114 115
static int qemudStartVMDaemon(virConnectPtr conn,
                              struct qemud_driver *driver,
                              struct qemud_vm *vm);
116

117 118 119
static void qemudShutdownVMDaemon(virConnectPtr conn,
                                  struct qemud_driver *driver,
                                  struct qemud_vm *vm);
120

121 122
static int qemudStartNetworkDaemon(virConnectPtr conn,
                                   struct qemud_driver *driver,
123
                                   virNetworkObjPtr network);
124

125 126
static int qemudShutdownNetworkDaemon(virConnectPtr conn,
                                      struct qemud_driver *driver,
127
                                      virNetworkObjPtr network);
128

129
static int qemudDomainGetMaxVcpus(virDomainPtr dom);
130 131 132 133
static int qemudMonitorCommand (const struct qemud_driver *driver,
                                const struct qemud_vm *vm,
                                const char *cmd,
                                char **reply);
134

J
Jim Meyering 已提交
135
static struct qemud_driver *qemu_driver = NULL;
136 137 138 139


static
void qemudAutostartConfigs(struct qemud_driver *driver) {
140
    virNetworkObjPtr network;
141 142 143 144
    struct qemud_vm *vm;

    network = driver->networks;
    while (network != NULL) {
145
        virNetworkObjPtr next = network->next;
146 147

        if (network->autostart &&
148
            !virNetworkIsActive(network) &&
149
            qemudStartNetworkDaemon(NULL, driver, network) < 0) {
150
            virErrorPtr err = virGetLastError();
151
            qemudLog(QEMUD_ERR, _("Failed to autostart network '%s': %s"),
152 153 154 155 156 157 158 159 160 161 162 163
                     network->def->name, err->message);
        }

        network = next;
    }

    vm = driver->vms;
    while (vm != NULL) {
        struct qemud_vm *next = vm->next;

        if (vm->autostart &&
            !qemudIsActiveVM(vm) &&
164
            qemudStartVMDaemon(NULL, driver, vm) < 0) {
165
            virErrorPtr err = virGetLastError();
166
            qemudLog(QEMUD_ERR, _("Failed to autostart VM '%s': %s"),
167 168 169 170 171
                     vm->def->name, err->message);
        }

        vm = next;
    }
172 173
}

A
Atsushi SAKAI 已提交
174
#ifdef WITH_LIBVIRTD
175 176 177 178 179 180 181
/**
 * qemudStartup:
 *
 * Initialization function for the QEmu daemon
 */
static int
qemudStartup(void) {
182 183 184
    uid_t uid = geteuid();
    struct passwd *pw;
    char *base = NULL;
D
Daniel P. Berrange 已提交
185
    char driverConf[PATH_MAX];
186

187
    if (VIR_ALLOC(qemu_driver) < 0)
188 189 190 191 192 193 194 195 196
        return -1;

    /* Don't have a dom0 so start from 1 */
    qemu_driver->nextvmid = 1;

    if (!uid) {
        if (snprintf(qemu_driver->logDir, PATH_MAX, "%s/log/libvirt/qemu", LOCAL_STATE_DIR) >= PATH_MAX)
            goto snprintf_error;

D
Daniel P. Berrange 已提交
197
        if ((base = strdup (SYSCONF_DIR "/libvirt")) == NULL)
198 199 200
            goto out_of_memory;
    } else {
        if (!(pw = getpwuid(uid))) {
201
            qemudLog(QEMUD_ERR, _("Failed to find user record for uid '%d': %s"),
202 203 204 205 206 207 208
                     uid, strerror(errno));
            goto out_of_memory;
        }

        if (snprintf(qemu_driver->logDir, PATH_MAX, "%s/.libvirt/qemu/log", pw->pw_dir) >= PATH_MAX)
            goto snprintf_error;

D
Daniel P. Berrange 已提交
209
        if (asprintf (&base, "%s/.libvirt", pw->pw_dir) == -1) {
J
Jim Meyering 已提交
210 211
            qemudLog (QEMUD_ERR,
                      "%s", _("out of memory in asprintf"));
212 213 214 215 216 217 218
            goto out_of_memory;
        }
    }

    /* Configuration paths are either ~/.libvirt/qemu/... (session) or
     * /etc/libvirt/qemu/... (system).
     */
D
Daniel P. Berrange 已提交
219
    if (snprintf (driverConf, sizeof(driverConf), "%s/qemu.conf", base) == -1)
220
        goto out_of_memory;
D
Daniel P. Berrange 已提交
221
    driverConf[sizeof(driverConf)-1] = '\0';
222

D
Daniel P. Berrange 已提交
223
    if (asprintf (&qemu_driver->configDir, "%s/qemu", base) == -1)
224 225
        goto out_of_memory;

D
Daniel P. Berrange 已提交
226
    if (asprintf (&qemu_driver->autostartDir, "%s/qemu/autostart", base) == -1)
227 228
        goto out_of_memory;

D
Daniel P. Berrange 已提交
229 230 231 232
    if (asprintf (&qemu_driver->networkConfigDir, "%s/qemu/networks", base) == -1)
        goto out_of_memory;

    if (asprintf (&qemu_driver->networkAutostartDir, "%s/qemu/networks/autostart",
233 234 235
                  base) == -1)
        goto out_of_memory;

236
    VIR_FREE(base);
237 238 239

    if ((qemu_driver->caps = qemudCapsInit()) == NULL)
        goto out_of_memory;
D
Daniel P. Berrange 已提交
240 241

    if (qemudLoadDriverConfig(qemu_driver, driverConf) < 0) {
242
        qemudShutdown();
D
Daniel P. Berrange 已提交
243 244 245 246 247 248 249
        return -1;
    }

    if (qemudScanConfigs(qemu_driver) < 0) {
        qemudShutdown();
        return -1;
    }
250 251 252 253 254 255 256
    if (virNetworkLoadAllConfigs(NULL,
                                 &qemu_driver->networks,
                                 qemu_driver->networkConfigDir,
                                 qemu_driver->networkAutostartDir) < 0) {
        qemudShutdown();
        return -1;
    }
257 258 259 260 261
    qemudAutostartConfigs(qemu_driver);

    return 0;

 snprintf_error:
262
    qemudLog(QEMUD_ERR,
J
Jim Meyering 已提交
263
             "%s", _("Resulting path to long for buffer in qemudInitPaths()"));
264 265 266
    return -1;

 out_of_memory:
J
Jim Meyering 已提交
267 268
    qemudLog (QEMUD_ERR,
              "%s", _("qemudStartup: out of memory"));
269 270
    VIR_FREE(base);
    VIR_FREE(qemu_driver);
271 272 273
    return -1;
}

274 275 276 277 278 279 280 281
/**
 * qemudReload:
 *
 * Function to restart the QEmu daemon, it will recheck the configuration
 * files and update its state and the networking
 */
static int
qemudReload(void) {
282
    qemudScanConfigs(qemu_driver);
283 284 285 286
    virNetworkLoadAllConfigs(NULL,
                             &qemu_driver->networks,
                             qemu_driver->networkConfigDir,
                             qemu_driver->networkAutostartDir);
287 288

     if (qemu_driver->iptables) {
J
Jim Meyering 已提交
289 290
        qemudLog(QEMUD_INFO,
                 "%s", _("Reloading iptables rules"));
291
        iptablesReloadRules(qemu_driver->iptables);
292
    }
293 294

    qemudAutostartConfigs(qemu_driver);
295 296

    return 0;
297 298
}

299 300 301 302 303 304 305 306 307 308
/**
 * qemudActive:
 *
 * Checks if the QEmu daemon is active, i.e. has an active domain or
 * an active network
 *
 * Returns 1 if active, 0 otherwise
 */
static int
qemudActive(void) {
309 310 311 312 313 314 315 316
    virNetworkObjPtr net = qemu_driver->networks;
    while (net) {
        if (net->active)
            return 1;
        net = net->next;
    }

    if (qemu_driver->nactivevms)
317 318 319 320 321 322
        return 1;

    /* Otherwise we're happy to deal with a shutdown */
    return 0;
}

323 324 325 326 327 328 329
/**
 * qemudShutdown:
 *
 * Shutdown the QEmu daemon, it will stop all active domains and networks
 */
static int
qemudShutdown(void) {
330
    struct qemud_vm *vm;
331
    virNetworkObjPtr network;
332

333
    if (!qemu_driver)
334
        return -1;
335

336 337
    virCapabilitiesFree(qemu_driver->caps);

338
    /* shutdown active VMs */
339
    vm = qemu_driver->vms;
340 341 342
    while (vm) {
        struct qemud_vm *next = vm->next;
        if (qemudIsActiveVM(vm))
343
            qemudShutdownVMDaemon(NULL, qemu_driver, vm);
344 345
        if (!vm->configFile[0])
            qemudRemoveInactiveVM(qemu_driver, vm);
346 347
        vm = next;
    }
348

349
    /* free inactive VMs */
350
    vm = qemu_driver->vms;
351 352 353 354 355
    while (vm) {
        struct qemud_vm *next = vm->next;
        qemudFreeVM(vm);
        vm = next;
    }
356 357 358
    qemu_driver->vms = NULL;
    qemu_driver->nactivevms = 0;
    qemu_driver->ninactivevms = 0;
359 360

    /* shutdown active networks */
361
    network = qemu_driver->networks;
362
    while (network) {
363 364
        virNetworkObjPtr next = network->next;
        if (virNetworkIsActive(network))
365
            qemudShutdownNetworkDaemon(NULL, qemu_driver, network);
366 367
        network = next;
    }
368

369
    /* free inactive networks */
370
    network = qemu_driver->networks;
371
    while (network) {
372 373
        virNetworkObjPtr next = network->next;
        virNetworkObjFree(network);
374 375
        network = next;
    }
376 377
    qemu_driver->networks = NULL;

378 379 380 381 382
    VIR_FREE(qemu_driver->configDir);
    VIR_FREE(qemu_driver->autostartDir);
    VIR_FREE(qemu_driver->networkConfigDir);
    VIR_FREE(qemu_driver->networkAutostartDir);
    VIR_FREE(qemu_driver->vncTLSx509certdir);
D
Daniel P. Berrange 已提交
383

384 385 386 387 388
    if (qemu_driver->brctl)
        brShutdown(qemu_driver->brctl);
    if (qemu_driver->iptables)
        iptablesContextFree(qemu_driver->iptables);

389
    VIR_FREE(qemu_driver);
390 391

    return 0;
392
}
A
Atsushi SAKAI 已提交
393
#endif
394 395

/* Return -1 for error, 1 to continue reading and 0 for success */
396 397
typedef int qemudHandlerMonitorOutput(virConnectPtr conn,
                                      struct qemud_driver *driver,
398 399 400 401 402
                                      struct qemud_vm *vm,
                                      const char *output,
                                      int fd);

static int
403 404
qemudReadMonitorOutput(virConnectPtr conn,
                       struct qemud_driver *driver,
405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 421
                       struct qemud_vm *vm,
                       int fd,
                       char *buf,
                       int buflen,
                       qemudHandlerMonitorOutput func,
                       const char *what)
{
#define MONITOR_TIMEOUT 3000
    int got = 0;
    buf[0] = '\0';

   /* Consume & discard the initial greeting */
    while (got < (buflen-1)) {
        int ret;

        ret = read(fd, buf+got, buflen-got-1);
        if (ret == 0) {
422
            qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
423
                             _("QEMU quit during %s startup\n%s"), what, buf);
424 425 426 427 428 429 430 431
            return -1;
        }
        if (ret < 0) {
            struct pollfd pfd = { .fd = fd, .events = POLLIN };
            if (errno == EINTR)
                continue;

            if (errno != EAGAIN) {
432
                qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
433
                                 _("Failure while reading %s startup output: %s"),
434 435 436 437 438 439
                                 what, strerror(errno));
                return -1;
            }

            ret = poll(&pfd, 1, MONITOR_TIMEOUT);
            if (ret == 0) {
440
                qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
441
                                 _("Timed out while reading %s startup output"), what);
442 443 444
                return -1;
            } else if (ret == -1) {
                if (errno != EINTR) {
445
                    qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
446
                                     _("Failure while reading %s startup output: %s"),
447 448 449 450 451 452 453 454 455
                                     what, strerror(errno));
                    return -1;
                }
            } else {
                /* Make sure we continue loop & read any further data
                   available before dealing with EOF */
                if (pfd.revents & (POLLIN | POLLHUP))
                    continue;

456
                qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
457
                                 _("Failure while reading %s startup output"), what);
458 459 460 461 462
                return -1;
            }
        } else {
            got += ret;
            buf[got] = '\0';
463
            if ((ret = func(conn, driver, vm, buf, fd)) != 1)
464 465 466 467
                return ret;
        }
    }

468
    qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
469
                     _("Out of space while reading %s startup output"), what);
470 471 472 473 474 475
    return -1;

#undef MONITOR_TIMEOUT
}

static int
476 477
qemudCheckMonitorPrompt(virConnectPtr conn ATTRIBUTE_UNUSED,
                        struct qemud_driver *driver ATTRIBUTE_UNUSED,
478 479 480 481 482 483 484 485 486 487 488 489
                        struct qemud_vm *vm,
                        const char *output,
                        int fd)
{
    if (strstr(output, "(qemu) ") == NULL)
        return 1; /* keep reading */

    vm->monitor = fd;

    return 0;
}

490 491 492 493
static int qemudOpenMonitor(virConnectPtr conn,
                            struct qemud_driver *driver,
                            struct qemud_vm *vm,
                            const char *monitor) {
494 495 496 497 498
    int monfd;
    char buf[1024];
    int ret = -1;

    if (!(monfd = open(monitor, O_RDWR))) {
499
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
500
                         _("Unable to open monitor path %s"), monitor);
501 502 503
        return -1;
    }
    if (qemudSetCloseExec(monfd) < 0) {
504
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
505
                         "%s", _("Unable to set monitor close-on-exec flag"));
506 507 508
        goto error;
    }
    if (qemudSetNonBlock(monfd) < 0) {
509
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
510
                         "%s", _("Unable to put monitor into non-blocking mode"));
511 512 513
        goto error;
    }

514 515
    ret = qemudReadMonitorOutput(conn,
                                 driver, vm, monfd,
516 517 518
                                 buf, sizeof(buf),
                                 qemudCheckMonitorPrompt,
                                 "monitor");
519 520 521 522 523

    /* Keep monitor open upon success */
    if (ret == 0)
        return ret;

524 525 526 527 528
 error:
    close(monfd);
    return ret;
}

529 530 531
static int qemudExtractMonitorPath(const char *haystack,
                                   size_t *offset,
                                   char *path, int pathmax) {
532 533 534
    static const char needle[] = "char device redirected to";
    char *tmp;

535 536
    /* First look for our magic string */
    if (!(tmp = strstr(haystack + *offset, needle)))
537 538
        return -1;

539
    /* Grab all the trailing data */
540 541 542
    strncpy(path, tmp+sizeof(needle), pathmax-1);
    path[pathmax-1] = '\0';

543 544 545
    /* Update offset to point to where we found the needle..*/
    *offset = tmp - haystack;

546 547 548 549 550 551
    /*
     * And look for first whitespace character and nul terminate
     * to mark end of the pty path
     */
    tmp = path;
    while (*tmp) {
552
        if (c_isspace(*tmp)) {
553
            *tmp = '\0';
554
            /* ... now further update offset till we get EOL */
555
            *offset += (sizeof(needle)-1) + strlen(path);
556 557
            return 0;
        }
558
        tmp++;
559 560 561 562 563
    }

    /*
     * We found a path, but didn't find any whitespace,
     * so it must be still incomplete - we should at
564 565
     * least see a \n - indicate that we want to carry
     * on trying again
566 567 568 569 570
     */
    return -1;
}

static int
571 572 573 574 575
qemudFindCharDevicePTYs(virConnectPtr conn,
                        struct qemud_driver *driver,
                        struct qemud_vm *vm,
                        const char *output,
                        int fd ATTRIBUTE_UNUSED)
576 577
{
    char monitor[PATH_MAX];
578 579 580 581 582 583 584
    size_t offset = 0;
    struct qemud_vm_chr_def *chr;

    /* The order in which QEMU prints out the PTY paths is
       the order in which it procsses its monitor, serial
       and parallel device args. This code must match that
       ordering.... */
585

586 587
    /* So first comes the monitor device */
    if (qemudExtractMonitorPath(output, &offset, monitor, sizeof(monitor)) < 0)
588 589
        return 1; /* keep reading */

590 591 592 593 594 595 596 597 598 599 600 601 602 603 604 605 606 607 608 609 610 611 612 613 614
    /* then the serial devices */
    chr = vm->def->serials;
    while (chr) {
        if (chr->srcType == QEMUD_CHR_SRC_TYPE_PTY) {
            if (qemudExtractMonitorPath(output, &offset,
                                        chr->srcData.file.path,
                                        sizeof(chr->srcData.file.path)) < 0)
                return 1; /* keep reading */
        }
        chr = chr->next;
    }

    /* and finally the parallel devices */
    chr = vm->def->parallels;
    while (chr) {
        if (chr->srcType == QEMUD_CHR_SRC_TYPE_PTY) {
            if (qemudExtractMonitorPath(output, &offset,
                                        chr->srcData.file.path,
                                        sizeof(chr->srcData.file.path)) < 0)
                return 1; /* keep reading */
        }
        chr = chr->next;
    }

    /* Got them all, so now open the monitor console */
615
    return qemudOpenMonitor(conn, driver, vm, monitor);
616 617
}

618 619 620
static int qemudWaitForMonitor(virConnectPtr conn,
                               struct qemud_driver *driver,
                               struct qemud_vm *vm) {
621
    char buf[1024]; /* Plenty of space to get startup greeting */
622 623
    int ret = qemudReadMonitorOutput(conn,
                                     driver, vm, vm->stderr,
624
                                     buf, sizeof(buf),
625
                                     qemudFindCharDevicePTYs,
626 627 628
                                     "console");

    buf[sizeof(buf)-1] = '\0';
629 630

    if (safewrite(vm->logfile, buf, strlen(buf)) < 0) {
631
        /* Log, but ignore failures to write logfile for VM */
632
        qemudLog(QEMUD_WARN, _("Unable to log VM console data: %s"),
633 634 635 636 637
                 strerror(errno));
    }
    return ret;
}

638 639 640 641 642 643 644 645 646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661 662 663 664 665 666 667 668 669 670 671 672 673 674 675 676 677 678 679 680 681 682 683 684 685 686 687 688 689 690 691 692 693 694 695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718 719 720 721 722
static int
qemudDetectVcpuPIDs(virConnectPtr conn,
                    struct qemud_driver *driver,
                    struct qemud_vm *vm) {
    char *qemucpus = NULL;
    char *line;
    int lastVcpu = -1;

    /* Only KVM has seperate threads for CPUs,
       others just use main QEMU process for CPU */
    if (vm->def->virtType != QEMUD_VIRT_KVM)
        vm->nvcpupids = 1;
    else
        vm->nvcpupids = vm->def->vcpus;

    if (VIR_ALLOC_N(vm->vcpupids, vm->nvcpupids) < 0) {
        qemudReportError(conn, NULL, NULL, VIR_ERR_NO_MEMORY,
                         "%s", _("allocate cpumap"));
        return -1;
    }

    if (vm->def->virtType != QEMUD_VIRT_KVM) {
        vm->vcpupids[0] = vm->pid;
        return 0;
    }

    if (qemudMonitorCommand(driver, vm, "info cpus", &qemucpus) < 0) {
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
                         "%s", _("cannot run monitor command to fetch CPU thread info"));
        VIR_FREE(vm->vcpupids);
        vm->nvcpupids = 0;
        return -1;
    }

    /*
     * This is the gross format we're about to parse :-{
     *
     * (qemu) info cpus
     * * CPU #0: pc=0x00000000000f0c4a thread_id=30019
     *   CPU #1: pc=0x00000000fffffff0 thread_id=30020
     *   CPU #2: pc=0x00000000fffffff0 thread_id=30021
     *
     */
    line = qemucpus;
    do {
        char *offset = strchr(line, '#');
        char *end = NULL;
        int vcpu = 0, tid = 0;

        /* See if we're all done */
        if (offset == NULL)
            break;

        /* Extract VCPU number */
        if (virStrToLong_i(offset + 1, &end, 10, &vcpu) < 0)
            goto error;
        if (end == NULL || *end != ':')
            goto error;

        /* Extract host Thread ID */
        if ((offset = strstr(line, "thread_id=")) == NULL)
            goto error;
        if (virStrToLong_i(offset + strlen("thread_id="), &end, 10, &tid) < 0)
            goto error;
        if (end == NULL || !c_isspace(*end))
            goto error;

        /* Validate the VCPU is in expected range & order */
        if (vcpu > vm->nvcpupids ||
            vcpu != (lastVcpu + 1))
            goto error;

        lastVcpu = vcpu;
        vm->vcpupids[vcpu] = tid;

        /* Skip to next data line */
        line = strchr(offset, '\r');
        if (line == NULL)
            line = strchr(offset, '\n');
    } while (line != NULL);

    /* Validate we got data for all VCPUs we expected */
    if (lastVcpu != (vm->def->vcpus - 1))
        goto error;

723
    VIR_FREE(qemucpus);
724 725 726 727
    return 0;

error:
    VIR_FREE(vm->vcpupids);
728 729
    vm->nvcpupids = 0;
    VIR_FREE(qemucpus);
730 731 732 733 734 735 736 737

    /* Explicitly return success, not error. Older KVM does
       not have vCPU -> Thread mapping info and we don't
       want to break its use. This merely disables ability
       to pin vCPUS with libvirt */
    return 0;
}

738 739 740 741 742 743 744 745 746 747 748 749 750 751 752 753 754 755 756 757 758 759 760 761 762 763 764 765 766 767 768 769 770 771 772 773 774 775 776 777
static int
qemudInitCpus(virConnectPtr conn,
              struct qemud_driver *driver,
              struct qemud_vm *vm) {
    char *info = NULL;
#if HAVE_SCHED_GETAFFINITY
    cpu_set_t mask;
    int i, maxcpu = QEMUD_CPUMASK_LEN;
    virNodeInfo nodeinfo;

    if (virNodeInfoPopulate(conn, &nodeinfo) < 0)
        return -1;

    /* setaffinity fails if you set bits for CPUs which
     * aren't present, so we have to limit ourselves */
    if (maxcpu > nodeinfo.cpus)
        maxcpu = nodeinfo.cpus;

    CPU_ZERO(&mask);
    for (i = 0 ; i < maxcpu ; i++)
        if (vm->def->cpumask[i])
            CPU_SET(i, &mask);

    for (i = 0 ; i < vm->nvcpupids ; i++) {
        if (sched_setaffinity(vm->vcpupids[i],
                              sizeof(mask), &mask) < 0) {
            qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
                             _("failed to set CPU affinity %s"),
                             strerror(errno));
            return -1;
        }
    }
#endif /* HAVE_SCHED_GETAFFINITY */

    /* Allow the CPUS to start executing */
    if (qemudMonitorCommand(driver, vm, "cont", &info) < 0) {
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
                         "%s", _("resume operation failed"));
        return -1;
    }
778
    VIR_FREE(info);
779 780 781 782 783

    return 0;
}


784
static int qemudNextFreeVNCPort(struct qemud_driver *driver ATTRIBUTE_UNUSED) {
785 786 787 788 789 790 791 792 793 794 795 796 797 798 799 800 801 802 803 804 805 806 807 808 809 810 811 812 813 814 815 816 817 818 819
    int i;

    for (i = 5900 ; i < 6000 ; i++) {
        int fd;
        int reuse = 1;
        struct sockaddr_in addr;
        addr.sin_family = AF_INET;
        addr.sin_port = htons(i);
        addr.sin_addr.s_addr = htonl(INADDR_ANY);
        fd = socket(PF_INET, SOCK_STREAM, 0);
        if (fd < 0)
            return -1;

        if (setsockopt(fd, SOL_SOCKET, SO_REUSEADDR, (void*)&reuse, sizeof(reuse)) < 0) {
            close(fd);
            break;
        }

        if (bind(fd, (struct sockaddr*)&addr, sizeof(addr)) == 0) {
            /* Not in use, lets grab it */
            close(fd);
            return i;
        }
        close(fd);

        if (errno == EADDRINUSE) {
            /* In use, try next */
            continue;
        }
        /* Some other bad failure, get out.. */
        break;
    }
    return -1;
}

820 821 822
static int qemudStartVMDaemon(virConnectPtr conn,
                              struct qemud_driver *driver,
                              struct qemud_vm *vm) {
823
    char **argv = NULL, **tmp;
824
    int i, ret;
825
    char logfile[PATH_MAX];
826
    struct stat sb;
827 828

    if (qemudIsActiveVM(vm)) {
829
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
830
                         "%s", _("VM is already active"));
831 832 833 834
        return -1;
    }

    if (vm->def->vncPort < 0) {
835
        int port = qemudNextFreeVNCPort(driver);
836
        if (port < 0) {
837
            qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
838
                             "%s", _("Unable to find an unused VNC port"));
839 840 841 842 843 844
            return -1;
        }
        vm->def->vncActivePort = port;
    } else
        vm->def->vncActivePort = vm->def->vncPort;

845
    if ((strlen(driver->logDir) + /* path */
846 847 848 849
         1 + /* Separator */
         strlen(vm->def->name) + /* basename */
         4 + /* suffix .log */
         1 /* NULL */) > PATH_MAX) {
850
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
851
                         _("config file path too long: %s/%s.log"),
852
                         driver->logDir, vm->def->name);
853 854
        return -1;
    }
855
    strcpy(logfile, driver->logDir);
856 857 858 859
    strcat(logfile, "/");
    strcat(logfile, vm->def->name);
    strcat(logfile, ".log");

860
    if (virFileMakePath(driver->logDir) < 0) {
861
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
862
                         _("cannot create log directory %s: %s"),
863
                         driver->logDir, strerror(errno));
864 865 866 867 868
        return -1;
    }

    if ((vm->logfile = open(logfile, O_CREAT | O_TRUNC | O_WRONLY,
                            S_IRUSR | S_IWUSR)) < 0) {
869
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
870
                         _("failed to create logfile %s: %s"),
871 872 873
                         logfile, strerror(errno));
        return -1;
    }
874 875
    if (qemudSetCloseExec(vm->logfile) < 0) {
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
876
                         _("Unable to set VM logfile close-on-exec flag %s"),
877 878 879 880 881
                         strerror(errno));
        close(vm->logfile);
        vm->logfile = -1;
        return -1;
    }
882

883 884 885 886 887 888 889 890 891 892 893 894 895
    /* Make sure the binary we are about to try exec'ing exists.
     * Technically we could catch the exec() failure, but that's
     * in a sub-process so its hard to feed back a useful error
     */
    if (stat(vm->def->os.binary, &sb) < 0) {
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
                         _("Cannot find QEMU binary %s: %s"),
                         vm->def->os.binary,
                         strerror(errno));
        return -1;
    }


896
    if (qemudBuildCommandLine(conn, driver, vm, &argv) < 0) {
897 898 899 900 901 902 903
        close(vm->logfile);
        vm->logfile = -1;
        return -1;
    }

    tmp = argv;
    while (*tmp) {
904
        if (safewrite(vm->logfile, *tmp, strlen(*tmp)) < 0)
905
            qemudLog(QEMUD_WARN, _("Unable to write argv to logfile %d: %s"),
906
                     errno, strerror(errno));
907
        if (safewrite(vm->logfile, " ", 1) < 0)
908
            qemudLog(QEMUD_WARN, _("Unable to write argv to logfile %d: %s"),
909 910 911
                     errno, strerror(errno));
        tmp++;
    }
912
    if (safewrite(vm->logfile, "\n", 1) < 0)
913
        qemudLog(QEMUD_WARN, _("Unable to write argv to logfile %d: %s"),
914 915
                 errno, strerror(errno));

916 917 918
    ret = virExecNonBlock(conn, argv, &vm->pid,
                          vm->stdin, &vm->stdout, &vm->stderr);
    if (ret == 0) {
919
        vm->id = driver->nextvmid++;
920
        vm->state = vm->migrateFrom[0] ? VIR_DOMAIN_PAUSED : VIR_DOMAIN_RUNNING;
921

922 923
        driver->ninactivevms--;
        driver->nactivevms++;
924 925
    }

926
    for (i = 0 ; argv[i] ; i++)
927 928
        VIR_FREE(argv[i]);
    VIR_FREE(argv);
929

930 931 932 933 934
    if (vm->tapfds) {
        for (i = 0; vm->tapfds[i] != -1; i++) {
            close(vm->tapfds[i]);
            vm->tapfds[i] = -1;
        }
935
        VIR_FREE(vm->tapfds);
936 937 938
        vm->ntapfds = 0;
    }

939
    if (ret == 0) {
940 941 942 943 944 945 946 947 948 949 950
        if ((virEventAddHandle(vm->stdout,
                               POLLIN | POLLERR | POLLHUP,
                               qemudDispatchVMEvent,
                               driver) < 0) ||
            (virEventAddHandle(vm->stderr,
                               POLLIN | POLLERR | POLLHUP,
                               qemudDispatchVMEvent,
                               driver) < 0) ||
            (qemudWaitForMonitor(conn, driver, vm) < 0) ||
            (qemudDetectVcpuPIDs(conn, driver, vm) < 0) ||
            (qemudInitCpus(conn, driver, vm) < 0)) {
951 952 953
            qemudShutdownVMDaemon(conn, driver, vm);
            return -1;
        }
954 955
    }

956
    return ret;
957 958
}

959
static int qemudVMData(struct qemud_driver *driver ATTRIBUTE_UNUSED,
960 961 962 963 964 965 966 967 968 969 970 971 972 973 974 975 976
                       struct qemud_vm *vm, int fd) {
    char buf[4096];
    if (vm->pid < 0)
        return 0;

    for (;;) {
        int ret = read(fd, buf, sizeof(buf)-1);
        if (ret < 0) {
            if (errno == EAGAIN)
                return 0;
            return -1;
        }
        if (ret == 0) {
            return 0;
        }
        buf[ret] = '\0';

977
        if (safewrite(vm->logfile, buf, ret) < 0) {
978
            /* Log, but ignore failures to write logfile for VM */
979
            qemudLog(QEMUD_WARN, _("Unable to log VM console data: %s"),
980 981 982
                     strerror(errno));
        }
    }
983 984

    qemudAutostartConfigs(qemu_driver);
985 986 987
}


988 989
static void qemudShutdownVMDaemon(virConnectPtr conn ATTRIBUTE_UNUSED,
                                  struct qemud_driver *driver, struct qemud_vm *vm) {
990
    if (!qemudIsActiveVM(vm))
991
        return;
992

993
    qemudLog(QEMUD_INFO, _("Shutting down VM '%s'"), vm->def->name);
994 995 996

    kill(vm->pid, SIGTERM);

997 998
    qemudVMData(driver, vm, vm->stdout);
    qemudVMData(driver, vm, vm->stderr);
999 1000 1001 1002 1003

    virEventRemoveHandle(vm->stdout);
    virEventRemoveHandle(vm->stderr);

    if (close(vm->logfile) < 0)
1004 1005
        qemudLog(QEMUD_WARN, _("Unable to close logfile %d: %s"),
                 errno, strerror(errno));
1006 1007 1008 1009 1010 1011 1012 1013 1014 1015 1016 1017
    close(vm->stdout);
    close(vm->stderr);
    if (vm->monitor != -1)
        close(vm->monitor);
    vm->logfile = -1;
    vm->stdout = -1;
    vm->stderr = -1;
    vm->monitor = -1;

    if (waitpid(vm->pid, NULL, WNOHANG) != vm->pid) {
        kill(vm->pid, SIGKILL);
        if (waitpid(vm->pid, NULL, 0) != vm->pid) {
J
Jim Meyering 已提交
1018 1019
            qemudLog(QEMUD_WARN,
                     "%s", _("Got unexpected pid, damn"));
1020 1021 1022 1023 1024
        }
    }

    vm->pid = -1;
    vm->id = -1;
1025
    vm->state = VIR_DOMAIN_SHUTOFF;
1026
    VIR_FREE(vm->vcpupids);
1027
    vm->nvcpupids = 0;
1028 1029 1030 1031 1032 1033 1034

    if (vm->newDef) {
        qemudFreeVMDef(vm->def);
        vm->def = vm->newDef;
        vm->newDef = NULL;
    }

1035 1036
    driver->nactivevms--;
    driver->ninactivevms++;
1037 1038
}

1039
static int qemudDispatchVMLog(struct qemud_driver *driver, struct qemud_vm *vm, int fd) {
1040 1041 1042 1043 1044
    if (qemudVMData(driver, vm, fd) < 0) {
        qemudShutdownVMDaemon(NULL, driver, vm);
        if (!vm->configFile[0])
            qemudRemoveInactiveVM(driver, vm);
    }
1045 1046 1047
    return 0;
}

1048
static int qemudDispatchVMFailure(struct qemud_driver *driver, struct qemud_vm *vm,
1049
                                  int fd ATTRIBUTE_UNUSED) {
1050 1051 1052
    qemudShutdownVMDaemon(NULL, driver, vm);
    if (!vm->configFile[0])
        qemudRemoveInactiveVM(driver, vm);
1053 1054 1055 1056
    return 0;
}

static int
1057
qemudBuildDnsmasqArgv(virConnectPtr conn,
1058
                      virNetworkObjPtr network,
1059
                      char ***argv) {
1060
    int i, len, r;
1061 1062 1063 1064 1065 1066 1067 1068 1069 1070 1071 1072 1073 1074 1075 1076
    char buf[PATH_MAX];

    len =
        1 + /* dnsmasq */
        1 + /* --keep-in-foreground */
        1 + /* --strict-order */
        1 + /* --bind-interfaces */
        2 + /* --pid-file "" */
        2 + /* --conf-file "" */
        /*2 + *//* --interface virbr0 */
        2 + /* --except-interface lo */
        2 + /* --listen-address 10.0.0.1 */
        1 + /* --dhcp-leasefile=path */
        (2 * network->def->nranges) + /* --dhcp-range 10.0.0.2,10.0.0.254 */
        1;  /* NULL */

1077
    if (VIR_ALLOC_N(*argv, len) < 0)
1078 1079 1080 1081 1082 1083 1084 1085 1086
        goto no_memory;

#define APPEND_ARG(v, n, s) do {     \
        if (!((v)[(n)] = strdup(s))) \
            goto no_memory;          \
    } while (0)

    i = 0;

1087
    APPEND_ARG(*argv, i++, DNSMASQ);
1088 1089 1090 1091

    APPEND_ARG(*argv, i++, "--keep-in-foreground");
    /*
     * Needed to ensure dnsmasq uses same algorithm for processing
1092
     * multiple namedriver entries in /etc/resolv.conf as GLibC.
1093 1094 1095 1096 1097 1098 1099 1100 1101 1102 1103 1104 1105 1106 1107 1108 1109 1110 1111 1112 1113 1114 1115 1116 1117 1118 1119 1120 1121 1122 1123 1124 1125 1126
     */
    APPEND_ARG(*argv, i++, "--strict-order");
    APPEND_ARG(*argv, i++, "--bind-interfaces");

    APPEND_ARG(*argv, i++, "--pid-file");
    APPEND_ARG(*argv, i++, "");

    APPEND_ARG(*argv, i++, "--conf-file");
    APPEND_ARG(*argv, i++, "");

    /*
     * XXX does not actually work, due to some kind of
     * race condition setting up ipv6 addresses on the
     * interface. A sleep(10) makes it work, but that's
     * clearly not practical
     *
     * APPEND_ARG(*argv, i++, "--interface");
     * APPEND_ARG(*argv, i++, network->def->bridge);
     */
    APPEND_ARG(*argv, i++, "--listen-address");
    APPEND_ARG(*argv, i++, network->def->ipAddress);

    APPEND_ARG(*argv, i++, "--except-interface");
    APPEND_ARG(*argv, i++, "lo");

    /*
     * NB, dnsmasq command line arg bug means we need to
     * use a single arg '--dhcp-leasefile=path' rather than
     * two separate args in '--dhcp-leasefile path' style
     */
    snprintf(buf, sizeof(buf), "--dhcp-leasefile=%s/lib/libvirt/dhcp-%s.leases",
             LOCAL_STATE_DIR, network->def->name);
    APPEND_ARG(*argv, i++, buf);

1127
    for (r = 0 ; r < network->def->nranges ; r++) {
1128
        snprintf(buf, sizeof(buf), "%s,%s",
1129 1130
                 network->def->ranges[r].start,
                 network->def->ranges[r].end);
1131 1132 1133 1134 1135 1136 1137 1138 1139 1140 1141 1142

        APPEND_ARG(*argv, i++, "--dhcp-range");
        APPEND_ARG(*argv, i++, buf);
    }

#undef APPEND_ARG

    return 0;

 no_memory:
    if (argv) {
        for (i = 0; (*argv)[i]; i++)
1143 1144
            VIR_FREE((*argv)[i]);
        VIR_FREE(*argv);
1145
    }
1146 1147
    qemudReportError(conn, NULL, NULL, VIR_ERR_NO_MEMORY,
                     "%s", _("failed to allocate space for dnsmasq argv"));
1148 1149 1150 1151 1152
    return -1;
}


static int
1153
dhcpStartDhcpDaemon(virConnectPtr conn,
1154
                    virNetworkObjPtr network)
1155 1156 1157 1158
{
    char **argv;
    int ret, i;

1159
    if (network->def->ipAddress == NULL) {
1160
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
1161
                         "%s", _("cannot start dhcp daemon without IP address for server"));
1162 1163 1164 1165
        return -1;
    }

    argv = NULL;
1166
    if (qemudBuildDnsmasqArgv(conn, network, &argv) < 0)
1167 1168
        return -1;

1169
    ret = virExecNonBlock(conn, argv, &network->dnsmasqPid, -1, NULL, NULL);
1170 1171

    for (i = 0; argv[i]; i++)
1172 1173
        VIR_FREE(argv[i]);
    VIR_FREE(argv);
1174 1175 1176 1177

    return ret;
}

1178 1179 1180
static int
qemudAddMasqueradingIptablesRules(virConnectPtr conn,
                      struct qemud_driver *driver,
1181
                      virNetworkObjPtr network) {
1182 1183 1184 1185
    int err;
    /* allow forwarding packets from the bridge interface */
    if ((err = iptablesAddForwardAllowOut(driver->iptables,
                                          network->def->network,
1186
                                          network->def->bridge,
1187 1188 1189
                                          network->def->forwardDev))) {
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
                         _("failed to add iptables rule to allow forwarding from '%s' : %s\n"),
1190
                         network->def->bridge, strerror(err));
1191 1192 1193 1194 1195 1196
        goto masqerr1;
    }

    /* allow forwarding packets to the bridge interface if they are part of an existing connection */
    if ((err = iptablesAddForwardAllowRelatedIn(driver->iptables,
                                         network->def->network,
1197
                                         network->def->bridge,
1198 1199 1200
                                         network->def->forwardDev))) {
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
                         _("failed to add iptables rule to allow forwarding to '%s' : %s\n"),
1201
                         network->def->bridge, strerror(err));
1202 1203 1204 1205 1206 1207 1208 1209 1210 1211 1212 1213 1214 1215 1216 1217 1218 1219
        goto masqerr2;
    }

    /* enable masquerading */
    if ((err = iptablesAddForwardMasquerade(driver->iptables,
                                            network->def->network,
                                            network->def->forwardDev))) {
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
                         _("failed to add iptables rule to enable masquerading : %s\n"),
                         strerror(err));
        goto masqerr3;
    }

    return 1;

 masqerr3:
    iptablesRemoveForwardAllowRelatedIn(driver->iptables,
                                 network->def->network,
1220
                                 network->def->bridge,
1221 1222 1223 1224
                                 network->def->forwardDev);
 masqerr2:
    iptablesRemoveForwardAllowOut(driver->iptables,
                                  network->def->network,
1225
                                  network->def->bridge,
1226 1227 1228 1229 1230 1231 1232 1233
                                  network->def->forwardDev);
 masqerr1:
    return 0;
}

static int
qemudAddRoutingIptablesRules(virConnectPtr conn,
                      struct qemud_driver *driver,
1234
                      virNetworkObjPtr network) {
1235 1236 1237 1238
    int err;
    /* allow routing packets from the bridge interface */
    if ((err = iptablesAddForwardAllowOut(driver->iptables,
                                          network->def->network,
1239
                                          network->def->bridge,
1240 1241 1242
                                          network->def->forwardDev))) {
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
                         _("failed to add iptables rule to allow routing from '%s' : %s\n"),
1243
                         network->def->bridge, strerror(err));
1244 1245 1246 1247 1248 1249
        goto routeerr1;
    }

    /* allow routing packets to the bridge interface */
    if ((err = iptablesAddForwardAllowIn(driver->iptables,
                                         network->def->network,
1250
                                         network->def->bridge,
1251 1252 1253
                                         network->def->forwardDev))) {
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
                         _("failed to add iptables rule to allow routing to '%s' : %s\n"),
1254
                         network->def->bridge, strerror(err));
1255 1256 1257 1258 1259 1260 1261 1262 1263
        goto routeerr2;
    }

    return 1;


 routeerr2:
    iptablesRemoveForwardAllowOut(driver->iptables,
                                  network->def->network,
1264
                                  network->def->bridge,
1265 1266 1267 1268 1269
                                  network->def->forwardDev);
 routeerr1:
    return 0;
}

1270
static int
1271 1272
qemudAddIptablesRules(virConnectPtr conn,
                      struct qemud_driver *driver,
1273
                      virNetworkObjPtr network) {
1274 1275
    int err;

1276
    if (!driver->iptables && !(driver->iptables = iptablesContextNew())) {
1277 1278
        qemudReportError(conn, NULL, NULL, VIR_ERR_NO_MEMORY,
                     "%s", _("failed to allocate space for IP tables support"));
1279
        return 0;
1280 1281 1282 1283
    }


    /* allow DHCP requests through to dnsmasq */
1284
    if ((err = iptablesAddTcpInput(driver->iptables, network->def->bridge, 67))) {
1285
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
1286
                         _("failed to add iptables rule to allow DHCP requests from '%s' : %s"),
1287
                         network->def->bridge, strerror(err));
1288 1289 1290
        goto err1;
    }

1291
    if ((err = iptablesAddUdpInput(driver->iptables, network->def->bridge, 67))) {
1292
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
1293
                         _("failed to add iptables rule to allow DHCP requests from '%s' : %s"),
1294
                         network->def->bridge, strerror(err));
1295 1296 1297 1298
        goto err2;
    }

    /* allow DNS requests through to dnsmasq */
1299
    if ((err = iptablesAddTcpInput(driver->iptables, network->def->bridge, 53))) {
1300
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
1301
                         _("failed to add iptables rule to allow DNS requests from '%s' : %s"),
1302
                         network->def->bridge, strerror(err));
1303 1304 1305
        goto err3;
    }

1306
    if ((err = iptablesAddUdpInput(driver->iptables, network->def->bridge, 53))) {
1307
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
1308
                         _("failed to add iptables rule to allow DNS requests from '%s' : %s"),
1309
                         network->def->bridge, strerror(err));
1310 1311 1312 1313 1314 1315
        goto err4;
    }


    /* Catch all rules to block forwarding to/from bridges */

1316
    if ((err = iptablesAddForwardRejectOut(driver->iptables, network->def->bridge))) {
1317
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
1318
                         _("failed to add iptables rule to block outbound traffic from '%s' : %s"),
1319
                         network->def->bridge, strerror(err));
1320 1321 1322
        goto err5;
    }

1323
    if ((err = iptablesAddForwardRejectIn(driver->iptables, network->def->bridge))) {
1324
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
1325
                         _("failed to add iptables rule to block inbound traffic to '%s' : %s"),
1326
                         network->def->bridge, strerror(err));
1327 1328 1329 1330
        goto err6;
    }

    /* Allow traffic between guests on the same bridge */
1331
    if ((err = iptablesAddForwardAllowCross(driver->iptables, network->def->bridge))) {
1332
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
1333
                         _("failed to add iptables rule to allow cross bridge traffic on '%s' : %s"),
1334
                         network->def->bridge, strerror(err));
1335 1336 1337 1338
        goto err7;
    }


1339 1340 1341 1342 1343 1344 1345 1346
    /* If masquerading is enabled, set up the rules*/
    if (network->def->forwardType == VIR_NETWORK_FORWARD_NAT &&
        !qemudAddMasqueradingIptablesRules(conn, driver, network))
        goto err8;
    /* else if routing is enabled, set up the rules*/
    else if (network->def->forwardType == VIR_NETWORK_FORWARD_ROUTE &&
             !qemudAddRoutingIptablesRules(conn, driver, network))
        goto err8;
1347

1348 1349 1350
    iptablesSaveRules(driver->iptables);

    return 1;
1351

1352
 err8:
1353
    iptablesRemoveForwardAllowCross(driver->iptables,
1354
                                    network->def->bridge);
1355
 err7:
1356
    iptablesRemoveForwardRejectIn(driver->iptables,
1357
                                  network->def->bridge);
1358
 err6:
1359
    iptablesRemoveForwardRejectOut(driver->iptables,
1360
                                   network->def->bridge);
1361
 err5:
1362
    iptablesRemoveUdpInput(driver->iptables, network->def->bridge, 53);
1363
 err4:
1364
    iptablesRemoveTcpInput(driver->iptables, network->def->bridge, 53);
1365
 err3:
1366
    iptablesRemoveUdpInput(driver->iptables, network->def->bridge, 67);
1367
 err2:
1368
    iptablesRemoveTcpInput(driver->iptables, network->def->bridge, 67);
1369 1370 1371 1372 1373
 err1:
    return 0;
}

static void
1374
qemudRemoveIptablesRules(struct qemud_driver *driver,
1375 1376
                         virNetworkObjPtr network) {
    if (network->def->forwardType != VIR_NETWORK_FORWARD_NONE) {
1377
        iptablesRemoveForwardMasquerade(driver->iptables,
1378 1379 1380
                                        network->def->network,
                                        network->def->forwardDev);

1381
        if (network->def->forwardType == VIR_NETWORK_FORWARD_NAT)
1382 1383
            iptablesRemoveForwardAllowRelatedIn(driver->iptables,
                                                network->def->network,
1384
                                                network->def->bridge,
1385
                                                network->def->forwardDev);
1386
        else if (network->def->forwardType == VIR_NETWORK_FORWARD_ROUTE)
1387 1388
            iptablesRemoveForwardAllowIn(driver->iptables,
                                         network->def->network,
1389
                                         network->def->bridge,
1390 1391
                                         network->def->forwardDev);

1392
        iptablesRemoveForwardAllowOut(driver->iptables,
1393
                                      network->def->network,
1394
                                      network->def->bridge,
1395 1396
                                      network->def->forwardDev);
    }
1397 1398 1399 1400 1401 1402 1403
    iptablesRemoveForwardAllowCross(driver->iptables, network->def->bridge);
    iptablesRemoveForwardRejectIn(driver->iptables, network->def->bridge);
    iptablesRemoveForwardRejectOut(driver->iptables, network->def->bridge);
    iptablesRemoveUdpInput(driver->iptables, network->def->bridge, 53);
    iptablesRemoveTcpInput(driver->iptables, network->def->bridge, 53);
    iptablesRemoveUdpInput(driver->iptables, network->def->bridge, 67);
    iptablesRemoveTcpInput(driver->iptables, network->def->bridge, 67);
1404
    iptablesSaveRules(driver->iptables);
1405 1406 1407 1408 1409 1410 1411 1412 1413 1414 1415 1416
}

static int
qemudEnableIpForwarding(void)
{
#define PROC_IP_FORWARD "/proc/sys/net/ipv4/ip_forward"

    int fd, ret;

    if ((fd = open(PROC_IP_FORWARD, O_WRONLY|O_TRUNC)) == -1)
        return 0;

1417
    if (safewrite(fd, "1\n", 2) < 0)
1418 1419 1420 1421 1422 1423 1424 1425 1426
        ret = 0;

    close (fd);

    return 1;

#undef PROC_IP_FORWARD
}

1427 1428
static int qemudStartNetworkDaemon(virConnectPtr conn,
                                   struct qemud_driver *driver,
1429
                                   virNetworkObjPtr network) {
1430 1431
    int err;

1432
    if (virNetworkIsActive(network)) {
1433
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
1434
                         "%s", _("network is already active"));
1435 1436 1437
        return -1;
    }

1438
    if (!driver->brctl && (err = brInit(&driver->brctl))) {
1439
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
1440
                         _("cannot initialize bridge support: %s"), strerror(err));
1441 1442 1443
        return -1;
    }

1444
    if ((err = brAddBridge(driver->brctl, &network->def->bridge))) {
1445
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
1446 1447
                         _("cannot create bridge '%s' : %s"),
                         network->def->bridge, strerror(err));
1448 1449 1450
        return -1;
    }

1451

1452 1453
    if (network->def->delay &&
        (err = brSetForwardDelay(driver->brctl, network->def->bridge, network->def->delay))) {
1454
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
1455 1456
                         _("failed to set bridge forward delay to %ld"),
                         network->def->delay);
1457 1458 1459
        goto err_delbr;
    }

1460
    if ((err = brSetEnableSTP(driver->brctl, network->def->bridge, network->def->stp ? 1 : 0))) {
1461
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
1462
                         _("failed to set bridge STP to %s"),
1463
                         network->def->stp ? "on" : "off");
1464 1465 1466
        goto err_delbr;
    }

1467 1468
    if (network->def->ipAddress &&
        (err = brSetInetAddress(driver->brctl, network->def->bridge, network->def->ipAddress))) {
1469
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
1470
                         _("cannot set IP address on bridge '%s' to '%s' : %s"),
1471
                         network->def->bridge, network->def->ipAddress, strerror(err));
1472 1473 1474
        goto err_delbr;
    }

1475 1476
    if (network->def->netmask &&
        (err = brSetInetNetmask(driver->brctl, network->def->bridge, network->def->netmask))) {
1477
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
1478
                         _("cannot set netmask on bridge '%s' to '%s' : %s"),
1479
                         network->def->bridge, network->def->netmask, strerror(err));
1480 1481 1482
        goto err_delbr;
    }

1483 1484
    if (network->def->ipAddress &&
        (err = brSetInterfaceUp(driver->brctl, network->def->bridge, 1))) {
1485
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
1486
                         _("failed to bring the bridge '%s' up : %s"),
1487
                         network->def->bridge, strerror(err));
1488 1489 1490
        goto err_delbr;
    }

1491
    if (!qemudAddIptablesRules(conn, driver, network))
1492 1493
        goto err_delbr1;

1494
    if (network->def->forwardType != VIR_NETWORK_FORWARD_NONE &&
1495
        !qemudEnableIpForwarding()) {
1496
        qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
1497
                         _("failed to enable IP forwarding : %s"), strerror(err));
1498 1499 1500
        goto err_delbr2;
    }

1501
    if (network->def->nranges &&
1502
        dhcpStartDhcpDaemon(conn, network) < 0)
1503 1504 1505 1506 1507 1508 1509
        goto err_delbr2;

    network->active = 1;

    return 0;

 err_delbr2:
1510
    qemudRemoveIptablesRules(driver, network);
1511 1512

 err_delbr1:
1513 1514
    if (network->def->ipAddress &&
        (err = brSetInterfaceUp(driver->brctl, network->def->bridge, 0))) {
1515
        qemudLog(QEMUD_WARN, _("Failed to bring down bridge '%s' : %s"),
1516
                 network->def->bridge, strerror(err));
1517 1518 1519
    }

 err_delbr:
1520
    if ((err = brDeleteBridge(driver->brctl, network->def->bridge))) {
1521
        qemudLog(QEMUD_WARN, _("Failed to delete bridge '%s' : %s"),
1522
                 network->def->bridge, strerror(err));
1523 1524 1525 1526 1527 1528
    }

    return -1;
}


1529 1530
static int qemudShutdownNetworkDaemon(virConnectPtr conn ATTRIBUTE_UNUSED,
                                      struct qemud_driver *driver,
1531
                                      virNetworkObjPtr network) {
1532 1533
    int err;

1534
    qemudLog(QEMUD_INFO, _("Shutting down network '%s'"), network->def->name);
1535

1536
    if (!virNetworkIsActive(network))
1537 1538 1539 1540 1541
        return 0;

    if (network->dnsmasqPid > 0)
        kill(network->dnsmasqPid, SIGTERM);

1542
    qemudRemoveIptablesRules(driver, network);
1543

1544 1545
    if (network->def->ipAddress &&
        (err = brSetInterfaceUp(driver->brctl, network->def->bridge, 0))) {
1546
        qemudLog(QEMUD_WARN, _("Failed to bring down bridge '%s' : %s"),
1547
                 network->def->bridge, strerror(err));
1548 1549
    }

1550
    if ((err = brDeleteBridge(driver->brctl, network->def->bridge))) {
1551
        qemudLog(QEMUD_WARN, _("Failed to delete bridge '%s' : %s"),
1552
                 network->def->bridge, strerror(err));
1553 1554 1555 1556 1557 1558
    }

    if (network->dnsmasqPid > 0 &&
        waitpid(network->dnsmasqPid, NULL, WNOHANG) != network->dnsmasqPid) {
        kill(network->dnsmasqPid, SIGKILL);
        if (waitpid(network->dnsmasqPid, NULL, 0) != network->dnsmasqPid)
J
Jim Meyering 已提交
1559
            qemudLog(QEMUD_WARN,
1560
                     "%s", _("Got unexpected pid for dnsmasq"));
1561 1562 1563 1564 1565 1566
    }

    network->dnsmasqPid = -1;
    network->active = 0;

    if (network->newDef) {
1567
        virNetworkDefFree(network->def);
1568 1569 1570 1571
        network->def = network->newDef;
        network->newDef = NULL;
    }

1572 1573 1574
    if (!network->configFile)
        virNetworkRemoveInactive(&driver->networks,
                                 network);
1575

1576 1577 1578 1579 1580
    return 0;
}


static void qemudDispatchVMEvent(int fd, int events, void *opaque) {
1581 1582
    struct qemud_driver *driver = (struct qemud_driver *)opaque;
    struct qemud_vm *vm = driver->vms;
1583 1584 1585 1586 1587 1588 1589 1590 1591 1592 1593 1594 1595

    while (vm) {
        if (qemudIsActiveVM(vm) &&
            (vm->stdout == fd ||
             vm->stderr == fd))
            break;

        vm = vm->next;
    }

    if (!vm)
        return;

1596
    if (events == POLLIN)
1597
        qemudDispatchVMLog(driver, vm, fd);
1598
    else
1599
        qemudDispatchVMFailure(driver, vm, fd);
1600 1601
}

1602 1603 1604 1605 1606
static int
qemudMonitorCommand (const struct qemud_driver *driver ATTRIBUTE_UNUSED,
                     const struct qemud_vm *vm,
                     const char *cmd,
                     char **reply) {
D
Daniel P. Berrange 已提交
1607 1608
    int size = 0;
    char *buf = NULL;
1609
    size_t cmdlen = strlen(cmd);
D
Daniel P. Berrange 已提交
1610

1611 1612 1613
    if (safewrite(vm->monitor, cmd, cmdlen) != cmdlen)
        return -1;
    if (safewrite(vm->monitor, "\r", 1) != 1)
D
Daniel P. Berrange 已提交
1614 1615 1616 1617 1618 1619 1620 1621 1622 1623 1624 1625
        return -1;

    *reply = NULL;

    for (;;) {
        struct pollfd fd = { vm->monitor, POLLIN | POLLERR | POLLHUP, 0 };
        char *tmp;

        /* Read all the data QEMU has sent thus far */
        for (;;) {
            char data[1024];
            int got = read(vm->monitor, data, sizeof(data));
D
Daniel P. Berrange 已提交
1626

1627 1628
            if (got == 0)
                goto error;
D
Daniel P. Berrange 已提交
1629 1630 1631 1632 1633
            if (got < 0) {
                if (errno == EINTR)
                    continue;
                if (errno == EAGAIN)
                    break;
1634
                goto error;
1635
            }
1636
            if (VIR_REALLOC_N(buf, size+got+1) < 0)
1637 1638
                goto error;

D
Daniel P. Berrange 已提交
1639 1640 1641 1642
            memmove(buf+size, data, got);
            buf[size+got] = '\0';
            size += got;
        }
1643

D
Daniel P. Berrange 已提交
1644
        /* Look for QEMU prompt to indicate completion */
D
Daniel P. Berrange 已提交
1645
        if (buf && ((tmp = strstr(buf, "\n(qemu) ")) != NULL)) {
D
Daniel P. Berrange 已提交
1646 1647 1648 1649 1650 1651 1652 1653
            tmp[0] = '\0';
            break;
        }
    pollagain:
        /* Need to wait for more data */
        if (poll(&fd, 1, -1) < 0) {
            if (errno == EINTR)
                goto pollagain;
1654
            goto error;
D
Daniel P. Berrange 已提交
1655 1656 1657
        }
    }

1658 1659
    /* Log, but ignore failures to write logfile for VM */
    if (safewrite(vm->logfile, buf, strlen(buf)) < 0)
1660
        qemudLog(QEMUD_WARN, _("Unable to log VM console data: %s"),
1661 1662
                 strerror(errno));

D
Daniel P. Berrange 已提交
1663 1664
    *reply = buf;
    return 0;
1665 1666 1667 1668 1669

 error:
    if (buf) {
        /* Log, but ignore failures to write logfile for VM */
        if (safewrite(vm->logfile, buf, strlen(buf)) < 0)
1670
            qemudLog(QEMUD_WARN, _("Unable to log VM console data: %s"),
1671
                     strerror(errno));
1672
        VIR_FREE(buf);
1673 1674
    }
    return -1;
D
Daniel P. Berrange 已提交
1675 1676
}

1677 1678 1679 1680 1681 1682 1683 1684 1685 1686
/**
 * qemudProbe:
 *
 * Probe for the availability of the qemu driver, assume the
 * presence of QEmu emulation if the binaries are installed
 */
static const char *qemudProbe(void)
{
    if ((virFileExists("/usr/bin/qemu")) ||
        (virFileExists("/usr/bin/qemu-kvm")) ||
1687
        (virFileExists("/usr/bin/xenner"))) {
1688
        if (getuid() == 0) {
1689 1690 1691 1692
            return("qemu:///system");
        } else {
            return("qemu:///session");
        }
1693 1694 1695
    }
    return(NULL);
}
1696

1697
static virDrvOpenStatus qemudOpen(virConnectPtr conn,
1698
                                  xmlURIPtr uri,
1699
                                  virConnectAuthPtr auth ATTRIBUTE_UNUSED,
1700
                                  int flags ATTRIBUTE_UNUSED) {
1701 1702 1703
    uid_t uid = getuid();

    if (qemu_driver == NULL)
1704
        goto decline;
1705

1706 1707 1708 1709 1710 1711
    if (uri == NULL || uri->scheme == NULL || uri->path == NULL)
        goto decline;

    if (STRNEQ (uri->scheme, "qemu"))
        goto decline;

1712
    if (uid != 0) {
1713 1714
        if (STRNEQ (uri->path, "/session"))
            goto decline;
1715
    } else { /* root */
1716 1717
        if (STRNEQ (uri->path, "/system") &&
            STRNEQ (uri->path, "/session"))
1718
            goto decline;
1719 1720 1721 1722 1723
    }

    conn->privateData = qemu_driver;

    return VIR_DRV_OPEN_SUCCESS;
1724 1725

 decline:
1726
    return VIR_DRV_OPEN_DECLINED;
1727 1728 1729 1730 1731 1732 1733 1734 1735 1736 1737
}

static int qemudClose(virConnectPtr conn) {
    /*struct qemud_driver *driver = (struct qemud_driver *)conn->privateData;*/

    conn->privateData = NULL;

    return 0;
}

static const char *qemudGetType(virConnectPtr conn ATTRIBUTE_UNUSED) {
1738
    return "QEMU";
1739 1740
}

1741
static int qemudGetMaxVCPUs(virConnectPtr conn, const char *type) {
1742 1743 1744
    if (!type)
        return 16;

1745
    if (STRCASEEQ(type, "qemu"))
1746 1747 1748 1749
        return 16;

    /* XXX future KVM will support SMP. Need to probe
       kernel to figure out KVM module version i guess */
1750
    if (STRCASEEQ(type, "kvm"))
1751 1752
        return 1;

1753
    if (STRCASEEQ(type, "kqemu"))
1754
        return 1;
1755 1756 1757

    qemudReportError(conn, NULL, NULL, VIR_ERR_INVALID_ARG,
                     _("unknown type '%s'"), type);
1758 1759 1760
    return -1;
}

1761 1762 1763
static int qemudGetNodeInfo(virConnectPtr conn,
                            virNodeInfoPtr nodeinfo) {
    return virNodeInfoPopulate(conn, nodeinfo);
1764 1765 1766
}


1767 1768 1769
static char *qemudGetCapabilities(virConnectPtr conn) {
    struct qemud_driver *driver = (struct qemud_driver *)conn->privateData;
    char *xml;
1770

1771
    if ((xml = virCapabilitiesFormatXML(driver->caps)) == NULL) {
1772 1773
        qemudReportError(conn, NULL, NULL, VIR_ERR_NO_MEMORY,
                 "%s", _("failed to allocate space for capabilities support"));
1774 1775 1776
        return NULL;
    }

1777
    return xml;
1778 1779 1780
}


1781 1782 1783 1784 1785 1786 1787 1788 1789 1790 1791 1792 1793 1794 1795 1796 1797 1798 1799 1800 1801 1802 1803 1804 1805 1806 1807 1808 1809 1810 1811 1812 1813 1814 1815 1816 1817 1818 1819 1820 1821 1822 1823 1824 1825 1826 1827 1828 1829 1830 1831 1832 1833 1834 1835
#if HAVE_NUMACTL
static int
qemudNodeGetCellsFreeMemory(virConnectPtr conn,
                            unsigned long long *freeMems,
                            int startCell,
                            int maxCells)
{
    int n, lastCell, numCells;

    if (numa_available() < 0) {
        qemudReportError(conn, NULL, NULL, VIR_ERR_NO_SUPPORT,
                         "%s", _("NUMA not supported on this host"));
        return -1;
    }
    lastCell = startCell + maxCells - 1;
    if (lastCell > numa_max_node())
        lastCell = numa_max_node();

    for (numCells = 0, n = startCell ; n <= lastCell ; n++) {
        long long mem;
        if (numa_node_size64(n, &mem) < 0) {
            qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
                             "%s", _("Failed to query NUMA free memory"));
            return -1;
        }
        freeMems[numCells++] = mem;
    }
    return numCells;
}

static unsigned long long
qemudNodeGetFreeMemory (virConnectPtr conn)
{
    unsigned long long freeMem = 0;
    int n;
    if (numa_available() < 0) {
        qemudReportError(conn, NULL, NULL, VIR_ERR_NO_SUPPORT,
                         "%s", _("NUMA not supported on this host"));
        return -1;
    }

    for (n = 0 ; n <= numa_max_node() ; n++) {
        long long mem;
        if (numa_node_size64(n, &mem) < 0) {
            qemudReportError(conn, NULL, NULL, VIR_ERR_INTERNAL_ERROR,
                             "%s", _("Failed to query NUMA free memory"));
            return -1;
        }
        freeMem += mem;
    }

    return freeMem;
}

#endif
1836

D
Daniel P. Berrange 已提交
1837 1838 1839
static int qemudGetProcessInfo(unsigned long long *cpuTime, int pid) {
    char proc[PATH_MAX];
    FILE *pidinfo;
1840
    unsigned long long usertime, systime;
D
Daniel P. Berrange 已提交
1841 1842 1843 1844 1845 1846 1847 1848 1849 1850 1851 1852

    if (snprintf(proc, sizeof(proc), "/proc/%d/stat", pid) >= (int)sizeof(proc)) {
        return -1;
    }

    if (!(pidinfo = fopen(proc, "r"))) {
        /*printf("cannnot read pid info");*/
        /* VM probably shut down, so fake 0 */
        *cpuTime = 0;
        return 0;
    }

1853
    if (fscanf(pidinfo, "%*d %*s %*c %*d %*d %*d %*d %*d %*u %*u %*u %*u %*u %llu %llu", &usertime, &systime) != 2) {
1854
        qemudDebug("not enough arg");
D
Daniel P. Berrange 已提交
1855 1856 1857 1858 1859 1860 1861 1862
        return -1;
    }

    /* We got jiffies
     * We want nanoseconds
     * _SC_CLK_TCK is jiffies per second
     * So calulate thus....
     */
1863
    *cpuTime = 1000ull * 1000ull * 1000ull * (usertime + systime) / (unsigned long long)sysconf(_SC_CLK_TCK);
D
Daniel P. Berrange 已提交
1864

1865
    qemudDebug("Got %llu %llu %llu", usertime, systime, *cpuTime);
D
Daniel P. Berrange 已提交
1866 1867 1868 1869 1870 1871 1872

    fclose(pidinfo);

    return 0;
}


1873
static virDomainPtr qemudDomainLookupByID(virConnectPtr conn,
1874 1875 1876 1877 1878 1879
                                   int id) {
    struct qemud_driver *driver = (struct qemud_driver *)conn->privateData;
    struct qemud_vm *vm = qemudFindVMByID(driver, id);
    virDomainPtr dom;

    if (!vm) {
1880
        qemudReportError(conn, NULL, NULL, VIR_ERR_NO_DOMAIN, NULL);
1881 1882 1883
        return NULL;
    }

1884
    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
1885
    if (dom) dom->id = vm->id;
1886 1887
    return dom;
}
1888
static virDomainPtr qemudDomainLookupByUUID(virConnectPtr conn,
1889 1890 1891 1892 1893 1894
                                     const unsigned char *uuid) {
    struct qemud_driver *driver = (struct qemud_driver *)conn->privateData;
    struct qemud_vm *vm = qemudFindVMByUUID(driver, uuid);
    virDomainPtr dom;

    if (!vm) {
1895
        qemudReportError(conn, NULL, NULL, VIR_ERR_NO_DOMAIN, NULL);
1896 1897 1898
        return NULL;
    }

1899
    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
1900
    if (dom) dom->id = vm->id;
1901 1902
    return dom;
}
1903
static virDomainPtr qemudDomainLookupByName(virConnectPtr conn,
1904 1905 1906 1907 1908 1909
                                     const char *name) {
    struct qemud_driver *driver = (struct qemud_driver *)conn->privateData;
    struct qemud_vm *vm = qemudFindVMByName(driver, name);
    virDomainPtr dom;

    if (!vm) {
1910
        qemudReportError(conn, NULL, NULL, VIR_ERR_NO_DOMAIN, NULL);
1911 1912 1913
        return NULL;
    }

1914
    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
1915
    if (dom) dom->id = vm->id;
1916 1917 1918
    return dom;
}

1919
static int qemudGetVersion(virConnectPtr conn, unsigned long *version) {
1920
    struct qemud_driver *driver = (struct qemud_driver *)conn->privateData;
1921
    if (qemudExtractVersion(conn, driver) < 0)
1922 1923
        return -1;

1924 1925
    *version = qemu_driver->qemuVersion;
    return 0;
D
Daniel P. Berrange 已提交
1926 1927
}

1928 1929 1930 1931 1932 1933 1934 1935 1936 1937 1938 1939 1940 1941 1942 1943 1944 1945 1946 1947 1948 1949
static char *
qemudGetHostname (virConnectPtr conn)
{
    int r;
    char hostname[HOST_NAME_MAX+1], *str;

    r = gethostname (hostname, HOST_NAME_MAX+1);
    if (r == -1) {
        qemudReportError (conn, NULL, NULL, VIR_ERR_SYSTEM_ERROR,
                          "%s", strerror (errno));
        return NULL;
    }
    /* Caller frees this string. */
    str = strdup (hostname);
    if (str == NULL) {
        qemudReportError (conn, NULL, NULL, VIR_ERR_SYSTEM_ERROR,
                         "%s", strerror (errno));
        return NULL;
    }
    return str;
}

1950
static int qemudListDomains(virConnectPtr conn, int *ids, int nids) {
1951
    struct qemud_driver *driver = (struct qemud_driver *)conn->privateData;
1952
    struct qemud_vm *vm = driver->vms;
D
Daniel P. Berrange 已提交
1953 1954
    int got = 0;
    while (vm && got < nids) {
1955 1956 1957 1958
        if (qemudIsActiveVM(vm)) {
            ids[got] = vm->id;
            got++;
        }
D
Daniel P. Berrange 已提交
1959 1960 1961 1962
        vm = vm->next;
    }
    return got;
}
1963
static int qemudNumDomains(virConnectPtr conn) {
1964
    struct qemud_driver *driver = (struct qemud_driver *)conn->privateData;
1965
    return driver->nactivevms;
D
Daniel P. Berrange 已提交
1966
}
1967
static virDomainPtr qemudDomainCreate(virConnectPtr conn, const char *xml,
1968
                                      unsigned int flags ATTRIBUTE_UNUSED) {
1969
    struct qemud_vm_def *def;
D
Daniel P. Berrange 已提交
1970
    struct qemud_vm *vm;
1971 1972
    virDomainPtr dom;
    struct qemud_driver *driver = (struct qemud_driver *)conn->privateData;
D
Daniel P. Berrange 已提交
1973

1974
    if (!(def = qemudParseVMDef(conn, driver, xml, NULL)))
1975 1976
        return NULL;

1977
    if (!(vm = qemudAssignVMDef(conn, driver, def))) {
1978
        qemudFreeVMDef(def);
D
Daniel P. Berrange 已提交
1979 1980 1981
        return NULL;
    }

1982
    if (qemudStartVMDaemon(conn, driver, vm) < 0) {
1983
        qemudRemoveInactiveVM(driver, vm);
D
Daniel P. Berrange 已提交
1984 1985 1986
        return NULL;
    }

1987
    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
1988
    if (dom) dom->id = vm->id;
1989
    return dom;
D
Daniel P. Berrange 已提交
1990 1991 1992
}


1993
static int qemudDomainSuspend(virDomainPtr dom) {
1994
    struct qemud_driver *driver = (struct qemud_driver *)dom->conn->privateData;
D
Daniel P. Berrange 已提交
1995
    char *info;
1996
    struct qemud_vm *vm = qemudFindVMByID(driver, dom->id);
D
Daniel P. Berrange 已提交
1997
    if (!vm) {
1998
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_INVALID_DOMAIN, _("no domain with matching id %d"), dom->id);
D
Daniel P. Berrange 已提交
1999 2000
        return -1;
    }
2001
    if (!qemudIsActiveVM(vm)) {
2002 2003
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_OPERATION_FAILED,
                         "%s", _("domain is not running"));
D
Daniel P. Berrange 已提交
2004 2005
        return -1;
    }
2006
    if (vm->state == VIR_DOMAIN_PAUSED)
D
Daniel P. Berrange 已提交
2007
        return 0;
D
Daniel P. Berrange 已提交
2008

2009
    if (qemudMonitorCommand(driver, vm, "stop", &info) < 0) {
2010 2011
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_OPERATION_FAILED,
                         "%s", _("suspend operation failed"));
D
Daniel P. Berrange 已提交
2012 2013
        return -1;
    }
2014
    vm->state = VIR_DOMAIN_PAUSED;
2015
    qemudDebug("Reply %s", info);
2016
    VIR_FREE(info);
D
Daniel P. Berrange 已提交
2017 2018 2019 2020
    return 0;
}


2021
static int qemudDomainResume(virDomainPtr dom) {
2022
    struct qemud_driver *driver = (struct qemud_driver *)dom->conn->privateData;
D
Daniel P. Berrange 已提交
2023
    char *info;
2024
    struct qemud_vm *vm = qemudFindVMByID(driver, dom->id);
D
Daniel P. Berrange 已提交
2025
    if (!vm) {
2026 2027
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_INVALID_DOMAIN,
                         _("no domain with matching id %d"), dom->id);
D
Daniel P. Berrange 已提交
2028 2029
        return -1;
    }
2030
    if (!qemudIsActiveVM(vm)) {
2031 2032
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_OPERATION_FAILED,
                         "%s", _("domain is not running"));
D
Daniel P. Berrange 已提交
2033 2034
        return -1;
    }
2035
    if (vm->state == VIR_DOMAIN_RUNNING)
D
Daniel P. Berrange 已提交
2036
        return 0;
2037
    if (qemudMonitorCommand(driver, vm, "cont", &info) < 0) {
2038 2039
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_OPERATION_FAILED,
                         "%s", _("resume operation failed"));
D
Daniel P. Berrange 已提交
2040 2041
        return -1;
    }
2042
    vm->state = VIR_DOMAIN_RUNNING;
2043
    qemudDebug("Reply %s", info);
2044
    VIR_FREE(info);
D
Daniel P. Berrange 已提交
2045
    return 0;
D
Daniel P. Berrange 已提交
2046 2047 2048
}


2049 2050 2051 2052 2053 2054 2055
static int qemudDomainShutdown(virDomainPtr dom) {
    struct qemud_driver *driver = (struct qemud_driver *)dom->conn->privateData;
    struct qemud_vm *vm = qemudFindVMByID(driver, dom->id);
    char* info;

    if (!vm) {
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_INVALID_DOMAIN,
2056
                         _("no domain with matching id %d"), dom->id);
2057 2058 2059 2060 2061
        return -1;
    }

    if (qemudMonitorCommand(driver, vm, "system_powerdown", &info) < 0) {
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_OPERATION_FAILED,
2062
                         "%s", _("shutdown operation failed"));
2063 2064 2065 2066 2067 2068 2069
        return -1;
    }
    return 0;

}


2070
static int qemudDomainDestroy(virDomainPtr dom) {
2071 2072
    struct qemud_driver *driver = (struct qemud_driver *)dom->conn->privateData;
    struct qemud_vm *vm = qemudFindVMByID(driver, dom->id);
2073

D
Daniel P. Berrange 已提交
2074
    if (!vm) {
2075
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_INVALID_DOMAIN,
2076
                         _("no domain with matching id %d"), dom->id);
D
Daniel P. Berrange 已提交
2077 2078
        return -1;
    }
2079

2080 2081 2082
    qemudShutdownVMDaemon(dom->conn, driver, vm);
    if (!vm->configFile[0])
        qemudRemoveInactiveVM(driver, vm);
2083

2084
    return 0;
D
Daniel P. Berrange 已提交
2085 2086 2087
}


2088 2089 2090 2091 2092 2093 2094
static char *qemudDomainGetOSType(virDomainPtr dom) {
    struct qemud_driver *driver = (struct qemud_driver *)dom->conn->privateData;
    struct qemud_vm *vm = qemudFindVMByUUID(driver, dom->uuid);
    char *type;

    if (!vm) {
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_INVALID_DOMAIN,
2095
                         "%s", _("no domain with matching uuid"));
2096 2097 2098 2099
        return NULL;
    }

    if (!(type = strdup(vm->def->os.type))) {
2100 2101
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_NO_MEMORY,
                         "%s", _("failed to allocate space for ostype"));
2102 2103 2104 2105 2106
        return NULL;
    }
    return type;
}

2107 2108 2109 2110 2111 2112 2113 2114 2115 2116 2117 2118 2119 2120 2121 2122 2123 2124 2125 2126 2127 2128 2129 2130 2131 2132
/* Returns max memory in kb, 0 if error */
static unsigned long qemudDomainGetMaxMemory(virDomainPtr dom) {
    struct qemud_driver *driver = (struct qemud_driver *)dom->conn->privateData;
    struct qemud_vm *vm = qemudFindVMByUUID(driver, dom->uuid);

    if (!vm) {
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_INVALID_DOMAIN,
                         _("no domain with matching uuid '%s'"), dom->uuid);
        return 0;
    }

    return vm->def->maxmem;
}

static int qemudDomainSetMaxMemory(virDomainPtr dom, unsigned long newmax) {
    struct qemud_driver *driver = (struct qemud_driver *)dom->conn->privateData;
    struct qemud_vm *vm = qemudFindVMByUUID(driver, dom->uuid);

    if (!vm) {
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_INVALID_DOMAIN,
                         _("no domain with matching uuid '%s'"), dom->uuid);
        return -1;
    }

    if (newmax < vm->def->memory) {
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_INVALID_ARG,
2133
                         "%s", _("cannot set max memory lower than current memory"));
2134 2135 2136 2137 2138 2139 2140 2141 2142 2143 2144 2145 2146 2147 2148 2149 2150 2151
        return -1;
    }

    vm->def->maxmem = newmax;
    return 0;
}

static int qemudDomainSetMemory(virDomainPtr dom, unsigned long newmem) {
    struct qemud_driver *driver = (struct qemud_driver *)dom->conn->privateData;
    struct qemud_vm *vm = qemudFindVMByUUID(driver, dom->uuid);

    if (!vm) {
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_INVALID_DOMAIN,
                         _("no domain with matching uuid '%s'"), dom->uuid);
        return -1;
    }

    if (qemudIsActiveVM(vm)) {
2152
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_NO_SUPPORT,
2153
                         "%s", _("cannot set memory of an active domain"));
2154 2155 2156 2157 2158
        return -1;
    }

    if (newmem > vm->def->maxmem) {
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_INVALID_ARG,
2159
                         "%s", _("cannot set memory higher than max memory"));
2160 2161 2162 2163 2164 2165 2166
        return -1;
    }

    vm->def->memory = newmem;
    return 0;
}

2167
static int qemudDomainGetInfo(virDomainPtr dom,
2168 2169 2170
                       virDomainInfoPtr info) {
    struct qemud_driver *driver = (struct qemud_driver *)dom->conn->privateData;
    struct qemud_vm *vm = qemudFindVMByUUID(driver, dom->uuid);
D
Daniel P. Berrange 已提交
2171
    if (!vm) {
2172 2173
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_INVALID_DOMAIN,
                         "%s", _("no domain with matching uuid"));
D
Daniel P. Berrange 已提交
2174 2175 2176
        return -1;
    }

2177
    info->state = vm->state;
D
Daniel P. Berrange 已提交
2178

2179
    if (!qemudIsActiveVM(vm)) {
2180
        info->cpuTime = 0;
D
Daniel P. Berrange 已提交
2181
    } else {
2182
        if (qemudGetProcessInfo(&(info->cpuTime), vm->pid) < 0) {
2183
            qemudReportError(dom->conn, dom, NULL, VIR_ERR_OPERATION_FAILED, ("cannot read cputime for domain"));
D
Daniel P. Berrange 已提交
2184 2185 2186 2187
            return -1;
        }
    }

2188 2189 2190
    info->maxMem = vm->def->maxmem;
    info->memory = vm->def->memory;
    info->nrVirtCpu = vm->def->vcpus;
D
Daniel P. Berrange 已提交
2191 2192 2193 2194
    return 0;
}


D
Daniel P. Berrange 已提交
2195
static char *qemudEscape(const char *in, int shell)
2196 2197 2198 2199 2200 2201 2202 2203 2204 2205 2206 2207 2208 2209 2210 2211 2212 2213 2214 2215 2216
{
    int len = 0;
    int i, j;
    char *out;

    /* To pass through the QEMU monitor, we need to use escape
       sequences: \r, \n, \", \\

       To pass through both QEMU + the shell, we need to escape
       the single character ' as the five characters '\\''
    */

    for (i = 0; in[i] != '\0'; i++) {
        switch(in[i]) {
        case '\r':
        case '\n':
        case '"':
        case '\\':
            len += 2;
            break;
        case '\'':
D
Daniel P. Berrange 已提交
2217 2218 2219 2220
            if (shell)
                len += 5;
            else
                len += 1;
2221 2222 2223 2224 2225 2226 2227
            break;
        default:
            len += 1;
            break;
        }
    }

2228
    if (VIR_ALLOC_N(out, len + 1) < 0)
2229 2230 2231 2232 2233 2234 2235 2236 2237 2238 2239 2240 2241 2242 2243 2244 2245 2246
        return NULL;

    for (i = j = 0; in[i] != '\0'; i++) {
        switch(in[i]) {
        case '\r':
            out[j++] = '\\';
            out[j++] = 'r';
            break;
        case '\n':
            out[j++] = '\\';
            out[j++] = 'n';
            break;
        case '"':
        case '\\':
            out[j++] = '\\';
            out[j++] = in[i];
            break;
        case '\'':
D
Daniel P. Berrange 已提交
2247 2248 2249 2250 2251 2252 2253 2254 2255
            if (shell) {
                out[j++] = '\'';
                out[j++] = '\\';
                out[j++] = '\\';
                out[j++] = '\'';
                out[j++] = '\'';
            } else {
                out[j++] = in[i];
            }
2256 2257 2258 2259 2260 2261 2262 2263 2264 2265 2266
            break;
        default:
            out[j++] = in[i];
            break;
        }
    }
    out[j] = '\0';

    return out;
}

2267 2268 2269 2270 2271
static char *qemudEscapeMonitorArg(const char *in)
{
    return qemudEscape(in, 0);
}

D
Daniel P. Berrange 已提交
2272 2273 2274 2275
static char *qemudEscapeShellArg(const char *in)
{
    return qemudEscape(in, 1);
}
2276

2277 2278 2279 2280 2281 2282 2283 2284 2285 2286 2287
#define QEMUD_SAVE_MAGIC "LibvirtQemudSave"
#define QEMUD_SAVE_VERSION 1

struct qemud_save_header {
    char magic[sizeof(QEMUD_SAVE_MAGIC)-1];
    int version;
    int xml_len;
    int was_running;
    int unused[16];
};

2288
static int qemudDomainSave(virDomainPtr dom,
2289
                           const char *path) {
2290 2291
    struct qemud_driver *driver = (struct qemud_driver *)dom->conn->privateData;
    struct qemud_vm *vm = qemudFindVMByID(driver, dom->id);
2292 2293 2294 2295 2296 2297 2298 2299 2300 2301
    char *command, *info;
    int fd;
    char *safe_path;
    char *xml;
    struct qemud_save_header header;

    memset(&header, 0, sizeof(header));
    memcpy(header.magic, QEMUD_SAVE_MAGIC, sizeof(header.magic));
    header.version = QEMUD_SAVE_VERSION;

D
Daniel P. Berrange 已提交
2302
    if (!vm) {
2303
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_INVALID_DOMAIN,
2304
                         _("no domain with matching id %d"), dom->id);
D
Daniel P. Berrange 已提交
2305 2306
        return -1;
    }
2307

2308
    if (!qemudIsActiveVM(vm)) {
2309
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_OPERATION_FAILED,
2310
                         "%s", _("domain is not running"));
D
Daniel P. Berrange 已提交
2311 2312
        return -1;
    }
2313 2314 2315 2316 2317 2318

    /* Pause */
    if (vm->state == VIR_DOMAIN_RUNNING) {
        header.was_running = 1;
        if (qemudDomainSuspend(dom) != 0) {
            qemudReportError(dom->conn, dom, NULL, VIR_ERR_OPERATION_FAILED,
2319
                             "%s", _("failed to pause domain"));
2320 2321 2322 2323 2324 2325 2326 2327
            return -1;
        }
    }

    /* Get XML for the domain */
    xml = qemudGenerateXML(dom->conn, driver, vm, vm->def, 0);
    if (!xml) {
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_OPERATION_FAILED,
2328
                         "%s", _("failed to get domain xml"));
2329 2330 2331 2332 2333 2334 2335
        return -1;
    }
    header.xml_len = strlen(xml) + 1;

    /* Write header to file, followed by XML */
    if ((fd = open(path, O_CREAT|O_TRUNC|O_WRONLY, S_IRUSR|S_IWUSR)) < 0) {
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_OPERATION_FAILED,
2336
                         _("failed to create '%s'"), path);
2337
        VIR_FREE(xml);
2338 2339 2340 2341 2342
        return -1;
    }

    if (safewrite(fd, &header, sizeof(header)) != sizeof(header)) {
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_OPERATION_FAILED,
2343
                         "%s", _("failed to write save header"));
2344
        close(fd);
2345
        VIR_FREE(xml);
2346 2347 2348 2349 2350
        return -1;
    }

    if (safewrite(fd, xml, header.xml_len) != header.xml_len) {
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_OPERATION_FAILED,
2351
                         "%s", _("failed to write xml"));
2352
        close(fd);
2353
        VIR_FREE(xml);
2354 2355 2356 2357
        return -1;
    }

    close(fd);
2358
    VIR_FREE(xml);
2359 2360 2361 2362 2363

    /* Migrate to file */
    safe_path = qemudEscapeShellArg(path);
    if (!safe_path) {
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_OPERATION_FAILED,
2364
                         "%s", _("out of memory"));
2365 2366 2367 2368
        return -1;
    }
    if (asprintf (&command, "migrate \"exec:"
                  "dd of='%s' oflag=append conv=notrunc 2>/dev/null"
2369
                  "\"", safe_path) == -1) {
2370
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_OPERATION_FAILED,
2371
                         "%s", _("out of memory"));
2372
        VIR_FREE(safe_path);
2373 2374 2375 2376 2377 2378
        return -1;
    }
    free(safe_path);

    if (qemudMonitorCommand(driver, vm, command, &info) < 0) {
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_OPERATION_FAILED,
2379
                         "%s", _("migrate operation failed"));
2380
        VIR_FREE(command);
2381 2382 2383
        return -1;
    }

2384 2385
    VIR_FREE(info);
    VIR_FREE(command);
2386 2387 2388 2389 2390 2391 2392

    /* Shut it down */
    qemudShutdownVMDaemon(dom->conn, driver, vm);
    if (!vm->configFile[0])
        qemudRemoveInactiveVM(driver, vm);

    return 0;
D
Daniel P. Berrange 已提交
2393 2394 2395
}


2396 2397 2398 2399 2400 2401 2402 2403 2404 2405 2406 2407
static int qemudDomainSetVcpus(virDomainPtr dom, unsigned int nvcpus) {
    const struct qemud_driver *driver = (struct qemud_driver *)dom->conn->privateData;
    struct qemud_vm *vm = qemudFindVMByUUID(driver, dom->uuid);
    int max;

    if (!vm) {
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_INVALID_DOMAIN,
                         _("no domain with matching uuid '%s'"), dom->uuid);
        return -1;
    }

    if (qemudIsActiveVM(vm)) {
2408
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_NO_SUPPORT, "%s",
2409 2410 2411 2412 2413 2414 2415 2416 2417 2418 2419 2420 2421 2422 2423 2424 2425 2426 2427 2428 2429
                         _("cannot change vcpu count of an active domain"));
        return -1;
    }

    if ((max = qemudDomainGetMaxVcpus(dom)) < 0) {
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_INTERNAL_ERROR, "%s",
                         _("could not determine max vcpus for the domain"));
        return -1;
    }

    if (nvcpus > max) {
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_INVALID_ARG,
                         _("requested vcpus is greater than max allowable"
                           " vcpus for the domain: %d > %d"), nvcpus, max);
        return -1;
    }

    vm->def->vcpus = nvcpus;
    return 0;
}

2430 2431 2432 2433 2434 2435 2436 2437 2438 2439 2440 2441 2442 2443 2444 2445 2446 2447 2448 2449 2450 2451 2452 2453 2454 2455 2456 2457 2458 2459 2460 2461 2462 2463 2464 2465 2466 2467 2468 2469 2470 2471 2472 2473 2474 2475 2476 2477 2478 2479 2480 2481 2482 2483 2484 2485 2486 2487 2488 2489 2490 2491 2492 2493 2494 2495 2496 2497 2498 2499 2500 2501 2502 2503 2504 2505 2506 2507 2508 2509 2510 2511 2512 2513 2514 2515 2516 2517 2518 2519 2520 2521 2522 2523 2524 2525 2526 2527 2528 2529 2530 2531 2532 2533 2534 2535 2536 2537 2538 2539 2540 2541 2542 2543 2544 2545 2546 2547 2548 2549 2550 2551 2552 2553

#if HAVE_SCHED_GETAFFINITY
static int
qemudDomainPinVcpu(virDomainPtr dom,
                   unsigned int vcpu,
                   unsigned char *cpumap,
                   int maplen) {
    struct qemud_driver *driver = (struct qemud_driver *)dom->conn->privateData;
    struct qemud_vm *vm = qemudFindVMByUUID(driver, dom->uuid);
    cpu_set_t mask;
    int i, maxcpu;
    virNodeInfo nodeinfo;

    if (!qemudIsActiveVM(vm)) {
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_INVALID_ARG,
                         "%s",_("cannot pin vcpus on an inactive domain"));
        return -1;
    }

    if (vcpu > (vm->nvcpupids-1)) {
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_INVALID_ARG,
                         _("vcpu number out of range %d > %d"),
                         vcpu, vm->nvcpupids);
        return -1;
    }

    if (virNodeInfoPopulate(dom->conn, &nodeinfo) < 0)
        return -1;

    maxcpu = maplen * 8;
    if (maxcpu > nodeinfo.cpus)
        maxcpu = nodeinfo.cpus;

    CPU_ZERO(&mask);
    for (i = 0 ; i < maxcpu ; i++) {
        if ((cpumap[i/8] >> (i % 8)) & 1)
            CPU_SET(i, &mask);
    }

    if (vm->vcpupids != NULL) {
        if (sched_setaffinity(vm->vcpupids[vcpu], sizeof(mask), &mask) < 0) {
            qemudReportError(dom->conn, dom, NULL, VIR_ERR_INVALID_ARG,
                             _("cannot set affinity: %s"), strerror(errno));
            return -1;
        }
    } else {
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_NO_SUPPORT,
                         "%s", _("cpu affinity is not supported"));
        return -1;
    }

    return 0;
}

static int
qemudDomainGetVcpus(virDomainPtr dom,
                    virVcpuInfoPtr info,
                    int maxinfo,
                    unsigned char *cpumaps,
                    int maplen) {
    struct qemud_driver *driver = (struct qemud_driver *)dom->conn->privateData;
    struct qemud_vm *vm = qemudFindVMByUUID(driver, dom->uuid);
    virNodeInfo nodeinfo;
    int i, v, maxcpu;

    if (!qemudIsActiveVM(vm)) {
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_INVALID_ARG,
                         "%s",_("cannot pin vcpus on an inactive domain"));
        return -1;
    }

    if (virNodeInfoPopulate(dom->conn, &nodeinfo) < 0)
        return -1;

    maxcpu = maplen * 8;
    if (maxcpu > nodeinfo.cpus)
        maxcpu = nodeinfo.cpus;

    /* Clamp to actual number of vcpus */
    if (maxinfo > vm->nvcpupids)
        maxinfo = vm->nvcpupids;

    if (maxinfo < 1)
        return 0;

    if (info != NULL) {
        memset(info, 0, sizeof(*info) * maxinfo);
        for (i = 0 ; i < maxinfo ; i++) {
            info[i].number = i;
            info[i].state = VIR_VCPU_RUNNING;
            /* XXX cpu time, current pCPU mapping */
        }
    }

    if (cpumaps != NULL) {
        memset(cpumaps, 0, maplen * maxinfo);
        if (vm->vcpupids != NULL) {
            for (v = 0 ; v < maxinfo ; v++) {
                cpu_set_t mask;
                unsigned char *cpumap = VIR_GET_CPUMAP(cpumaps, maplen, v);
                CPU_ZERO(&mask);

                if (sched_getaffinity(vm->vcpupids[v], sizeof(mask), &mask) < 0) {
                    qemudReportError(dom->conn, dom, NULL, VIR_ERR_INVALID_ARG,
                                     _("cannot get affinity: %s"), strerror(errno));
                    return -1;
                }

                for (i = 0 ; i < maxcpu ; i++)
                    if (CPU_ISSET(i, &mask))
                        VIR_USE_CPU(cpumap, i);
            }
        } else {
            qemudReportError(dom->conn, dom, NULL, VIR_ERR_NO_SUPPORT,
                             "%s", _("cpu affinity is not available"));
            return -1;
        }
    }

    return maxinfo;
}
#endif /* HAVE_SCHED_GETAFFINITY */


2554 2555 2556 2557 2558 2559 2560 2561 2562 2563 2564 2565 2566 2567 2568 2569 2570 2571 2572 2573 2574 2575 2576 2577 2578 2579 2580
static int qemudDomainGetMaxVcpus(virDomainPtr dom) {
    struct qemud_driver *driver = (struct qemud_driver *)dom->conn->privateData;
    struct qemud_vm *vm = qemudFindVMByUUID(driver, dom->uuid);
    const char *type;
    int ret;

    if (!vm) {
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_INVALID_DOMAIN,
                         _("no domain with matching uuid '%s'"), dom->uuid);
        return -1;
    }

    if (!(type = qemudVirtTypeToString(vm->def->virtType))) {
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_INTERNAL_ERROR,
                         _("unknown virt type in domain definition '%d'"),
                         vm->def->virtType);
        return -1;
    }

    if ((ret = qemudGetMaxVCPUs(dom->conn, type)) < 0) {
        return -1;
    }

    return ret;
}


2581
static int qemudDomainRestore(virConnectPtr conn,
2582 2583 2584 2585 2586
                       const char *path) {
    struct qemud_driver *driver = (struct qemud_driver *)conn->privateData;
    struct qemud_vm_def *def;
    struct qemud_vm *vm;
    int fd;
2587
    int ret;
2588 2589 2590 2591 2592 2593
    char *xml;
    struct qemud_save_header header;

    /* Verify the header and read the XML */
    if ((fd = open(path, O_RDONLY)) < 0) {
        qemudReportError(conn, NULL, NULL, VIR_ERR_OPERATION_FAILED,
2594
                         "%s", _("cannot read domain image"));
2595 2596 2597 2598 2599
        return -1;
    }

    if (saferead(fd, &header, sizeof(header)) != sizeof(header)) {
        qemudReportError(conn, NULL, NULL, VIR_ERR_OPERATION_FAILED,
2600
                         "%s", _("failed to read qemu header"));
2601 2602 2603 2604 2605 2606
        close(fd);
        return -1;
    }

    if (memcmp(header.magic, QEMUD_SAVE_MAGIC, sizeof(header.magic)) != 0) {
        qemudReportError(conn, NULL, NULL, VIR_ERR_OPERATION_FAILED,
2607
                         "%s", _("image magic is incorrect"));
2608 2609 2610 2611 2612 2613
        close(fd);
        return -1;
    }

    if (header.version > QEMUD_SAVE_VERSION) {
        qemudReportError(conn, NULL, NULL, VIR_ERR_OPERATION_FAILED,
2614
                         _("image version is not supported (%d > %d)"),
2615 2616 2617 2618 2619
                         header.version, QEMUD_SAVE_VERSION);
        close(fd);
        return -1;
    }

2620
    if (VIR_ALLOC_N(xml, header.xml_len) < 0) {
2621
        qemudReportError(conn, NULL, NULL, VIR_ERR_OPERATION_FAILED,
2622
                         "%s", _("out of memory"));
2623 2624 2625 2626 2627 2628
        close(fd);
        return -1;
    }

    if (saferead(fd, xml, header.xml_len) != header.xml_len) {
        qemudReportError(conn, NULL, NULL, VIR_ERR_OPERATION_FAILED,
2629
                         "%s", _("failed to read XML"));
2630
        close(fd);
2631
        VIR_FREE(xml);
2632 2633 2634 2635 2636 2637
        return -1;
    }

    /* Create a domain from this XML */
    if (!(def = qemudParseVMDef(conn, driver, xml, NULL))) {
        qemudReportError(conn, NULL, NULL, VIR_ERR_OPERATION_FAILED,
2638
                         "%s", _("failed to parse XML"));
2639
        close(fd);
2640
        VIR_FREE(xml);
2641 2642
        return -1;
    }
2643
    VIR_FREE(xml);
2644 2645 2646 2647 2648 2649

    /* Ensure the name and UUID don't already exist in an active VM */
    vm = qemudFindVMByUUID(driver, def->uuid);
    if (!vm) vm = qemudFindVMByName(driver, def->name);
    if (vm && qemudIsActiveVM(vm)) {
        qemudReportError(conn, NULL, NULL, VIR_ERR_OPERATION_FAILED,
2650
                         _("domain is already active as '%s'"), vm->def->name);
2651 2652 2653 2654 2655 2656
        close(fd);
        return -1;
    }

    if (!(vm = qemudAssignVMDef(conn, driver, def))) {
        qemudReportError(conn, NULL, NULL, VIR_ERR_OPERATION_FAILED,
2657
                         "%s", _("failed to assign new VM"));
2658 2659 2660 2661 2662 2663 2664 2665
        qemudFreeVMDef(def);
        close(fd);
        return -1;
    }

    /* Set the migration source and start it up. */
    snprintf(vm->migrateFrom, sizeof(vm->migrateFrom), "stdio");
    vm->stdin = fd;
2666 2667 2668 2669 2670
    ret = qemudStartVMDaemon(conn, driver, vm);
    close(fd);
    vm->migrateFrom[0] = '\0';
    vm->stdin = -1;
    if (ret < 0) {
2671
        qemudReportError(conn, NULL, NULL, VIR_ERR_OPERATION_FAILED,
2672
                         "%s", _("failed to start VM"));
2673 2674 2675 2676 2677 2678 2679 2680
        if (!vm->configFile[0])
            qemudRemoveInactiveVM(driver, vm);
        return -1;
    }

    /* If it was running before, resume it now. */
    if (header.was_running) {
        char *info;
2681
        if (qemudMonitorCommand(driver, vm, "cont", &info) < 0) {
2682
            qemudReportError(conn, NULL, NULL, VIR_ERR_OPERATION_FAILED,
2683
                             "%s", _("failed to resume domain"));
2684 2685
            return -1;
        }
2686
        VIR_FREE(info);
2687 2688 2689 2690
        vm->state = VIR_DOMAIN_RUNNING;
    }

    return 0;
D
Daniel P. Berrange 已提交
2691 2692 2693
}


2694
static char *qemudDomainDumpXML(virDomainPtr dom,
2695 2696 2697
                         int flags ATTRIBUTE_UNUSED) {
    struct qemud_driver *driver = (struct qemud_driver *)dom->conn->privateData;
    struct qemud_vm *vm = qemudFindVMByUUID(driver, dom->uuid);
D
Daniel P. Berrange 已提交
2698
    if (!vm) {
2699 2700
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_INVALID_DOMAIN,
                         "%s", _("no domain with matching uuid"));
2701
        return NULL;
D
Daniel P. Berrange 已提交
2702 2703
    }

2704
    return qemudGenerateXML(dom->conn, driver, vm, vm->def, 1);
D
Daniel P. Berrange 已提交
2705 2706 2707
}


2708
static int qemudListDefinedDomains(virConnectPtr conn,
2709 2710
                            char **const names, int nnames) {
    struct qemud_driver *driver = (struct qemud_driver *)conn->privateData;
2711
    struct qemud_vm *vm = driver->vms;
2712
    int got = 0, i;
D
Daniel P. Berrange 已提交
2713
    while (vm && got < nnames) {
2714
        if (!qemudIsActiveVM(vm)) {
2715
            if (!(names[got] = strdup(vm->def->name))) {
2716 2717
                qemudReportError(conn, NULL, NULL, VIR_ERR_NO_MEMORY,
                     "%s", _("failed to allocate space for VM name string"));
2718 2719
                goto cleanup;
            }
2720 2721
            got++;
        }
D
Daniel P. Berrange 已提交
2722 2723 2724
        vm = vm->next;
    }
    return got;
2725 2726 2727

 cleanup:
    for (i = 0 ; i < got ; i++)
2728
        VIR_FREE(names[i]);
2729
    return -1;
D
Daniel P. Berrange 已提交
2730 2731 2732
}


2733
static int qemudNumDefinedDomains(virConnectPtr conn) {
2734
    struct qemud_driver *driver = (struct qemud_driver *)conn->privateData;
2735
    return driver->ninactivevms;
D
Daniel P. Berrange 已提交
2736 2737 2738
}


2739
static int qemudDomainStart(virDomainPtr dom) {
2740 2741
    struct qemud_driver *driver = (struct qemud_driver *)dom->conn->privateData;
    struct qemud_vm *vm = qemudFindVMByUUID(driver, dom->uuid);
2742 2743

    if (!vm) {
2744
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_INVALID_DOMAIN,
2745
                         "%s", _("no domain with matching uuid"));
2746
        return -1;
2747 2748
    }

2749
    return qemudStartVMDaemon(dom->conn, driver, vm);
D
Daniel P. Berrange 已提交
2750 2751 2752
}


2753
static virDomainPtr qemudDomainDefine(virConnectPtr conn, const char *xml) {
2754
    struct qemud_driver *driver = (struct qemud_driver *)conn->privateData;
2755 2756
    struct qemud_vm_def *def;
    struct qemud_vm *vm;
2757
    virDomainPtr dom;
2758

2759
    if (!(def = qemudParseVMDef(conn, driver, xml, NULL)))
2760 2761
        return NULL;

2762
    if (!(vm = qemudAssignVMDef(conn, driver, def))) {
2763 2764 2765 2766
        qemudFreeVMDef(def);
        return NULL;
    }

2767
    if (qemudSaveVMDef(conn, driver, vm, def) < 0) {
2768
        qemudRemoveInactiveVM(driver, vm);
2769 2770 2771
        return NULL;
    }

2772
    dom = virGetDomain(conn, vm->def->name, vm->def->uuid);
2773
    if (dom) dom->id = vm->id;
2774
    return dom;
D
Daniel P. Berrange 已提交
2775 2776
}

2777
static int qemudDomainUndefine(virDomainPtr dom) {
2778 2779
    struct qemud_driver *driver = (struct qemud_driver *)dom->conn->privateData;
    struct qemud_vm *vm = qemudFindVMByUUID(driver, dom->uuid);
D
Daniel P. Berrange 已提交
2780 2781

    if (!vm) {
2782 2783
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_INVALID_DOMAIN,
                         "%s", _("no domain with matching uuid"));
D
Daniel P. Berrange 已提交
2784 2785 2786
        return -1;
    }

2787
    if (qemudIsActiveVM(vm)) {
2788 2789
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_INTERNAL_ERROR,
                         "%s", _("cannot delete active domain"));
D
Daniel P. Berrange 已提交
2790 2791 2792
        return -1;
    }

2793
    if (qemudDeleteConfig(dom->conn, driver, vm->configFile, vm->def->name) < 0)
D
Daniel P. Berrange 已提交
2794 2795
        return -1;

2796
    if (unlink(vm->autostartLink) < 0 && errno != ENOENT && errno != ENOTDIR)
2797
        qemudLog(QEMUD_WARN, _("Failed to delete autostart link '%s': %s"),
2798 2799
                 vm->autostartLink, strerror(errno));

2800
    vm->configFile[0] = '\0';
2801
    vm->autostartLink[0] = '\0';
2802

2803
    qemudRemoveInactiveVM(driver, vm);
D
Daniel P. Berrange 已提交
2804 2805 2806 2807

    return 0;
}

2808 2809 2810 2811 2812 2813 2814
static int qemudDomainChangeCDROM(virDomainPtr dom,
                                  struct qemud_vm *vm,
                                  struct qemud_vm_disk_def *olddisk,
                                  struct qemud_vm_disk_def *newdisk) {
    struct qemud_driver *driver = (struct qemud_driver *)dom->conn->privateData;
    char *cmd, *reply, *safe_path;

2815 2816 2817 2818
    if (newdisk->src[0]) {
        safe_path = qemudEscapeMonitorArg(newdisk->src);
        if (!safe_path) {
            qemudReportError(dom->conn, dom, NULL, VIR_ERR_OPERATION_FAILED,
2819
                             "%s", _("out of memory"));
2820 2821 2822 2823 2824 2825 2826
            return -1;
        }
        if (asprintf (&cmd, "change %s \"%s\"",
                      /* XXX qemu may support multiple CDROM in future */
                      /* olddisk->dst */ "cdrom",
                      safe_path) == -1) {
            qemudReportError(dom->conn, dom, NULL, VIR_ERR_OPERATION_FAILED,
2827
                             "%s", _("out of memory"));
2828
            VIR_FREE(safe_path);
2829 2830
            return -1;
        }
2831
        VIR_FREE(safe_path);
2832 2833

    } else if (asprintf(&cmd, "eject cdrom") == -1) {
2834
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_OPERATION_FAILED,
2835
                         "%s", _("out of memory"));
2836 2837 2838 2839
        return -1;
    }

    if (qemudMonitorCommand(driver, vm, cmd, &reply) < 0) {
2840 2841
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_OPERATION_FAILED,
                         "%s", _("cannot change cdrom media"));
2842
        VIR_FREE(cmd);
2843 2844
        return -1;
    }
2845 2846
    VIR_FREE(reply);
    VIR_FREE(cmd);
2847
    strcpy(olddisk->src, newdisk->src);
2848 2849 2850 2851 2852 2853 2854 2855 2856 2857 2858 2859
    olddisk->type = newdisk->type;
    return 0;
}

static int qemudDomainAttachDevice(virDomainPtr dom,
                                   const char *xml) {
    struct qemud_driver *driver = (struct qemud_driver *)dom->conn->privateData;
    struct qemud_vm *vm = qemudFindVMByUUID(driver, dom->uuid);
    struct qemud_vm_device_def *dev;
    struct qemud_vm_disk_def *disk;

    if (!vm) {
2860 2861
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_INVALID_DOMAIN,
                         "%s", _("no domain with matching uuid"));
2862 2863 2864 2865
        return -1;
    }

    if (!qemudIsActiveVM(vm)) {
2866 2867
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_INTERNAL_ERROR,
                         "%s", _("cannot attach device on inactive domain"));
2868 2869 2870
        return -1;
    }

2871
    dev = qemudParseVMDeviceDef(dom->conn, vm->def, xml);
2872 2873 2874 2875 2876
    if (dev == NULL) {
        return -1;
    }

    if (dev->type != QEMUD_DEVICE_DISK || dev->data.disk.device != QEMUD_DISK_CDROM) {
2877 2878
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_NO_SUPPORT,
                         "%s", _("only CDROM disk devices can be attached"));
2879
        VIR_FREE(dev);
2880 2881 2882 2883 2884 2885 2886 2887 2888 2889 2890 2891
        return -1;
    }

    disk = vm->def->disks;
    while (disk) {
        if (disk->device == QEMUD_DISK_CDROM &&
            STREQ(disk->dst, dev->data.disk.dst))
            break;
        disk = disk->next;
    }

    if (!disk) {
2892 2893
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_NO_SUPPORT,
                         "%s", _("CDROM not attached, cannot change media"));
2894
        VIR_FREE(dev);
2895 2896 2897 2898
        return -1;
    }

    if (qemudDomainChangeCDROM(dom, vm, disk, &dev->data.disk) < 0) {
2899
        VIR_FREE(dev);
2900 2901 2902
        return -1;
    }

2903
    VIR_FREE(dev);
2904 2905 2906
    return 0;
}

2907
static int qemudDomainGetAutostart(virDomainPtr dom,
2908 2909 2910
                            int *autostart) {
    struct qemud_driver *driver = (struct qemud_driver *)dom->conn->privateData;
    struct qemud_vm *vm = qemudFindVMByUUID(driver, dom->uuid);
2911 2912

    if (!vm) {
2913 2914
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_INVALID_DOMAIN,
                         "%s", _("no domain with matching uuid"));
2915 2916 2917 2918 2919 2920 2921 2922
        return -1;
    }

    *autostart = vm->autostart;

    return 0;
}

2923
static int qemudDomainSetAutostart(virDomainPtr dom,
2924 2925 2926
                            int autostart) {
    struct qemud_driver *driver = (struct qemud_driver *)dom->conn->privateData;
    struct qemud_vm *vm = qemudFindVMByUUID(driver, dom->uuid);
2927 2928

    if (!vm) {
2929 2930
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_INVALID_DOMAIN,
                         "%s", _("no domain with matching uuid"));
2931 2932 2933 2934 2935 2936 2937 2938
        return -1;
    }

    autostart = (autostart != 0);

    if (vm->autostart == autostart)
        return 0;

2939 2940 2941
    if (autostart) {
        int err;

2942
        if ((err = virFileMakePath(driver->autostartDir))) {
2943
            qemudReportError(dom->conn, dom, NULL, VIR_ERR_INTERNAL_ERROR,
2944
                             _("cannot create autostart directory %s: %s"),
2945
                             driver->autostartDir, strerror(err));
2946 2947 2948 2949
            return -1;
        }

        if (symlink(vm->configFile, vm->autostartLink) < 0) {
2950
            qemudReportError(dom->conn, dom, NULL, VIR_ERR_INTERNAL_ERROR,
2951
                             _("Failed to create symlink '%s' to '%s': %s"),
2952 2953 2954 2955 2956
                             vm->autostartLink, vm->configFile, strerror(errno));
            return -1;
        }
    } else {
        if (unlink(vm->autostartLink) < 0 && errno != ENOENT && errno != ENOTDIR) {
2957
            qemudReportError(dom->conn, dom, NULL, VIR_ERR_INTERNAL_ERROR,
2958
                             _("Failed to delete symlink '%s': %s"),
2959 2960 2961 2962 2963
                             vm->autostartLink, strerror(errno));
            return -1;
        }
    }

2964 2965 2966 2967 2968
    vm->autostart = autostart;

    return 0;
}

2969 2970 2971 2972 2973 2974 2975 2976 2977 2978 2979 2980 2981 2982 2983 2984 2985 2986 2987 2988 2989 2990 2991 2992 2993 2994 2995 2996 2997 2998 2999 3000 3001 3002 3003 3004
/* This uses the 'info blockstats' monitor command which was
 * integrated into both qemu & kvm in late 2007.  If the command is
 * not supported we detect this and return the appropriate error.
 */
static int
qemudDomainBlockStats (virDomainPtr dom,
                       const char *path,
                       struct _virDomainBlockStats *stats)
{
    const struct qemud_driver *driver =
        (struct qemud_driver *)dom->conn->privateData;
    char *dummy, *info;
    const char *p, *eol;
    char qemu_dev_name[32];
    size_t len;
    const struct qemud_vm *vm = qemudFindVMByID(driver, dom->id);

    if (!vm) {
        qemudReportError (dom->conn, dom, NULL, VIR_ERR_INVALID_DOMAIN,
                          _("no domain with matching id %d"), dom->id);
        return -1;
    }
    if (!qemudIsActiveVM (vm)) {
        qemudReportError (dom->conn, dom, NULL, VIR_ERR_OPERATION_FAILED,
                          "%s", _("domain is not running"));
        return -1;
    }

    /*
     * QEMU internal block device names are different from the device
     * names we use in libvirt, so we need to map between them:
     *
     *   hd[a-]   to  ide0-hd[0-]
     *   cdrom    to  ide1-cd0
     *   fd[a-]   to  floppy[0-]
     */
J
Jim Meyering 已提交
3005
    if (STRPREFIX (path, "hd") && c_islower(path[2]))
3006 3007 3008 3009
        snprintf (qemu_dev_name, sizeof (qemu_dev_name),
                  "ide0-hd%d", path[2] - 'a');
    else if (STREQ (path, "cdrom"))
        strcpy (qemu_dev_name, "ide1-cd0");
J
Jim Meyering 已提交
3010
    else if (STRPREFIX (path, "fd") && c_islower(path[2]))
3011 3012 3013 3014 3015 3016 3017 3018 3019 3020 3021 3022 3023 3024 3025 3026 3027 3028 3029 3030 3031 3032 3033
        snprintf (qemu_dev_name, sizeof (qemu_dev_name),
                  "floppy%d", path[2] - 'a');
    else {
        qemudReportError (dom->conn, dom, NULL, VIR_ERR_INVALID_ARG,
                          _("invalid path: %s"), path);
        return -1;
    }

    len = strlen (qemu_dev_name);

    if (qemudMonitorCommand (driver, vm, "info blockstats", &info) < 0) {
        qemudReportError (dom->conn, dom, NULL, VIR_ERR_OPERATION_FAILED,
                          "%s", _("'info blockstats' command failed"));
        return -1;
    }

    DEBUG ("info blockstats reply: %s", info);

    /* If the command isn't supported then qemu prints the supported
     * info commands, so the output starts "info ".  Since this is
     * unlikely to be the name of a block device, we can use this
     * to detect if qemu supports the command.
     */
3034
    if (STRPREFIX (info, "info ")) {
3035 3036 3037 3038 3039 3040 3041 3042 3043 3044 3045 3046 3047 3048 3049 3050 3051 3052 3053 3054 3055 3056 3057 3058 3059 3060 3061 3062 3063 3064 3065
        free (info);
        qemudReportError (dom->conn, dom, NULL, VIR_ERR_NO_SUPPORT,
                          "%s",
                          _("'info blockstats' not supported by this qemu"));
        return -1;
    }

    stats->rd_req = -1;
    stats->rd_bytes = -1;
    stats->wr_req = -1;
    stats->wr_bytes = -1;
    stats->errs = -1;

    /* The output format for both qemu & KVM is:
     *   blockdevice: rd_bytes=% wr_bytes=% rd_operations=% wr_operations=%
     *   (repeated for each block device)
     * where '%' is a 64 bit number.
     */
    p = info;

    while (*p) {
        if (STREQLEN (p, qemu_dev_name, len)
            && p[len] == ':' && p[len+1] == ' ') {

            eol = strchr (p, '\n');
            if (!eol)
                eol = p + strlen (p);

            p += len+2;         /* Skip to first label. */

            while (*p) {
3066
                if (STRPREFIX (p, "rd_bytes=")) {
3067 3068 3069
                    p += 9;
                    if (virStrToLong_ll (p, &dummy, 10, &stats->rd_bytes) == -1)
                        DEBUG ("error reading rd_bytes: %s", p);
3070
                } else if (STRPREFIX (p, "wr_bytes=")) {
3071 3072 3073
                    p += 9;
                    if (virStrToLong_ll (p, &dummy, 10, &stats->wr_bytes) == -1)
                        DEBUG ("error reading wr_bytes: %s", p);
3074
                } else if (STRPREFIX (p, "rd_operations=")) {
3075 3076 3077
                    p += 14;
                    if (virStrToLong_ll (p, &dummy, 10, &stats->rd_req) == -1)
                        DEBUG ("error reading rd_req: %s", p);
3078
                } else if (STRPREFIX (p, "wr_operations=")) {
3079 3080 3081 3082 3083 3084 3085 3086 3087 3088 3089 3090 3091 3092 3093 3094 3095 3096 3097 3098 3099 3100 3101 3102 3103 3104 3105 3106 3107 3108 3109 3110
                    p += 14;
                    if (virStrToLong_ll (p, &dummy, 10, &stats->wr_req) == -1)
                        DEBUG ("error reading wr_req: %s", p);
                } else
                    DEBUG ("unknown block stat near %s", p);

                /* Skip to next label. */
                p = strchr (p, ' ');
                if (!p || p >= eol) break;
                p++;
            }

            goto done;
        }

        /* Skip to next line. */
        p = strchr (p, '\n');
        if (!p) break;
        p++;
    }

    /* If we reach here then the device was not found. */
    free (info);
    qemudReportError (dom->conn, dom, NULL, VIR_ERR_INVALID_ARG,
                      _("device not found: %s (%s)"), path, qemu_dev_name);
    return -1;

 done:
    free (info);
    return 0;
}

3111 3112 3113 3114 3115 3116 3117 3118 3119 3120 3121 3122
static int
qemudDomainInterfaceStats (virDomainPtr dom,
                           const char *path,
                           struct _virDomainInterfaceStats *stats)
{
#ifdef __linux__
    struct qemud_driver *driver = (struct qemud_driver *)dom->conn->privateData;
    struct qemud_vm *vm = qemudFindVMByID (driver, dom->id);
    struct qemud_vm_net_def *net;

    if (!vm) {
        qemudReportError (dom->conn, dom, NULL, VIR_ERR_INVALID_DOMAIN,
3123
                          _("no domain with matching id %d"), dom->id);
3124 3125 3126 3127 3128
        return -1;
    }

    if (!qemudIsActiveVM(vm)) {
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_OPERATION_FAILED,
3129
                         "%s", _("domain is not running"));
3130 3131 3132 3133 3134
        return -1;
    }

    if (!path || path[0] == '\0') {
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_INVALID_ARG,
3135
                         "%s", _("NULL or empty path"));
3136 3137 3138 3139 3140 3141 3142 3143 3144 3145 3146 3147 3148 3149 3150 3151 3152 3153 3154 3155 3156 3157
        return -1;
    }

    /* Check the path is one of the domain's network interfaces. */
    for (net = vm->def->nets; net; net = net->next) {
        switch (net->type) {
        case QEMUD_NET_NETWORK:
            if (STREQ (net->dst.network.ifname, path))
                goto ok;
            break;
        case QEMUD_NET_ETHERNET:
            if (STREQ (net->dst.ethernet.ifname, path))
                goto ok;
            break;
        case QEMUD_NET_BRIDGE:
            if (STREQ (net->dst.bridge.ifname, path))
                goto ok;
            break;
        }
    }

    qemudReportError (dom->conn, dom, NULL, VIR_ERR_INVALID_ARG,
3158
                      _("invalid path, '%s' is not a known interface"), path);
3159 3160 3161 3162 3163 3164 3165 3166 3167 3168 3169
    return -1;
 ok:

    return linuxDomainInterfaceStats (dom->conn, path, stats);
#else
    qemudReportError (dom->conn, dom, NULL, VIR_ERR_NO_SUPPORT,
                      "%s", __FUNCTION__);
    return -1;
#endif
}

3170 3171 3172 3173 3174 3175 3176 3177 3178 3179 3180 3181 3182 3183 3184 3185 3186 3187 3188 3189 3190 3191 3192 3193 3194 3195 3196 3197 3198 3199 3200 3201 3202 3203 3204 3205 3206 3207 3208 3209 3210 3211 3212 3213 3214 3215 3216 3217 3218 3219 3220 3221 3222 3223 3224 3225 3226 3227
static int
qemudDomainBlockPeek (virDomainPtr dom,
                      const char *path,
                      unsigned long long offset, size_t size,
                      void *buffer,
                      unsigned int flags ATTRIBUTE_UNUSED)
{
    struct qemud_driver *driver = (struct qemud_driver *)dom->conn->privateData;
    struct qemud_vm *vm = qemudFindVMByUUID (driver, dom->uuid);
    int i;
    int fd, ret = -1;

    if (!vm) {
        qemudReportError (dom->conn, dom, NULL, VIR_ERR_INVALID_DOMAIN,
                          _("no domain with matching uuid"));
        return -1;
    }

    if (!path || path[0] == '\0') {
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_INVALID_ARG,
                         _("NULL or empty path"));
        return -1;
    }

    /* Check the path belongs to this domain. */
    for (i = 0; i < vm->def->ndisks; ++i) {
        if (STREQ (vm->def->disks[i].src, path)) goto found;
    }
    qemudReportError (dom->conn, dom, NULL, VIR_ERR_INVALID_ARG,
                      _("invalid path"));
    return -1;

found:
    /* The path is correct, now try to open it and get its size. */
    fd = open (path, O_RDONLY);
    if (fd == -1) {
        qemudReportError (dom->conn, dom, NULL, VIR_ERR_SYSTEM_ERROR,
                          "%s", strerror (errno));
        goto done;
    }

    /* Seek and read. */
    /* NB. Because we configure with AC_SYS_LARGEFILE, off_t should
     * be 64 bits on all platforms.
     */
    if (lseek (fd, offset, SEEK_SET) == (off_t) -1 ||
        saferead (fd, buffer, size) == (ssize_t) -1) {
        qemudReportError (dom->conn, dom, NULL, VIR_ERR_SYSTEM_ERROR,
                          "%s", strerror (errno));
        goto done;
    }

    ret = 0;
 done:
    if (fd >= 0) close (fd);
    return ret;
}

R
Richard W.M. Jones 已提交
3228 3229 3230 3231 3232 3233 3234 3235 3236 3237 3238 3239 3240 3241 3242 3243 3244 3245 3246 3247 3248 3249 3250 3251 3252 3253 3254 3255 3256 3257 3258 3259 3260 3261 3262 3263 3264 3265 3266 3267 3268 3269 3270 3271 3272 3273 3274 3275 3276 3277 3278 3279 3280 3281 3282 3283 3284 3285 3286 3287 3288 3289
static int
qemudDomainMemoryPeek (virDomainPtr dom,
                       unsigned long long offset, size_t size,
                       void *buffer,
                       unsigned int flags)
{
    struct qemud_driver *driver = (struct qemud_driver *)dom->conn->privateData;
    struct qemud_vm *vm = qemudFindVMByID (driver, dom->id);
    char cmd[256], *info;
    char tmp[] = TEMPDIR "/qemu.mem.XXXXXX";
    int fd = -1, ret = -1;

    if (flags != VIR_MEMORY_VIRTUAL) {
        qemudReportError (dom->conn, dom, NULL, VIR_ERR_INVALID_ARG,
                          _("QEMU driver only supports virtual memory addrs"));
        return -1;
    }

    if (!vm) {
        qemudReportError (dom->conn, dom, NULL, VIR_ERR_INVALID_DOMAIN,
                          _("no domain with matching id %d"), dom->id);
        return -1;
    }

    if (!qemudIsActiveVM(vm)) {
        qemudReportError(dom->conn, dom, NULL, VIR_ERR_OPERATION_FAILED,
                         "%s", _("domain is not running"));
        return -1;
    }

    /* Create a temporary filename. */
    if ((fd = mkstemp (tmp)) == -1) {
        qemudReportError (dom->conn, dom, NULL, VIR_ERR_SYSTEM_ERROR,
                          "%s", strerror (errno));
        return -1;
    }

    /* Issue the memsave command. */
    snprintf (cmd, sizeof cmd, "memsave %llu %zi \"%s\"", offset, size, tmp);
    if (qemudMonitorCommand (driver, vm, cmd, &info) < 0) {
        qemudReportError (dom->conn, dom, NULL, VIR_ERR_OPERATION_FAILED,
                          "%s", _("'info blockstats' command failed"));
        goto done;
    }

    DEBUG ("memsave reply: %s", info);
    free (info);

    /* Read the memory file into buffer. */
    if (saferead (fd, buffer, size) == (ssize_t) -1) {
        qemudReportError (dom->conn, dom, NULL, VIR_ERR_SYSTEM_ERROR,
                          "%s", strerror (errno));
        goto done;
    }

    ret = 0;
done:
    if (fd >= 0) close (fd);
    unlink (tmp);
    return ret;
}

3290
static virNetworkPtr qemudNetworkLookupByUUID(virConnectPtr conn ATTRIBUTE_UNUSED,
3291
                                              const unsigned char *uuid) {
3292
    struct qemud_driver *driver = (struct qemud_driver *)conn->networkPrivateData;
3293
    virNetworkObjPtr network = virNetworkFindByUUID(driver->networks, uuid);
3294 3295 3296
    virNetworkPtr net;

    if (!network) {
3297 3298
        qemudReportError(conn, NULL, NULL, VIR_ERR_NO_NETWORK,
                         "%s", _("no network with matching uuid"));
3299 3300 3301
        return NULL;
    }

3302
    net = virGetNetwork(conn, network->def->name, network->def->uuid);
3303 3304
    return net;
}
3305
static virNetworkPtr qemudNetworkLookupByName(virConnectPtr conn ATTRIBUTE_UNUSED,
3306
                                              const char *name) {
3307
    struct qemud_driver *driver = (struct qemud_driver *)conn->networkPrivateData;
3308
    virNetworkObjPtr network = virNetworkFindByName(driver->networks, name);
3309 3310 3311
    virNetworkPtr net;

    if (!network) {
3312 3313
        qemudReportError(conn, NULL, NULL, VIR_ERR_NO_NETWORK,
                         "%s", _("no network with matching name"));
3314 3315 3316
        return NULL;
    }

3317
    net = virGetNetwork(conn, network->def->name, network->def->uuid);
3318 3319 3320 3321
    return net;
}

static virDrvOpenStatus qemudOpenNetwork(virConnectPtr conn,
3322
                                         xmlURIPtr uri ATTRIBUTE_UNUSED,
3323
                                         virConnectAuthPtr auth ATTRIBUTE_UNUSED,
3324 3325 3326 3327 3328 3329 3330 3331 3332 3333 3334 3335 3336
                                         int flags ATTRIBUTE_UNUSED) {
    if (!qemu_driver)
        return VIR_DRV_OPEN_DECLINED;

    conn->networkPrivateData = qemu_driver;
    return VIR_DRV_OPEN_SUCCESS;
}

static int qemudCloseNetwork(virConnectPtr conn) {
    conn->networkPrivateData = NULL;
    return 0;
}

3337
static int qemudNumNetworks(virConnectPtr conn) {
3338
    int nactive = 0;
3339
    struct qemud_driver *driver = (struct qemud_driver *)conn->networkPrivateData;
3340 3341 3342 3343 3344 3345 3346
    virNetworkObjPtr net = driver->networks;
    while (net) {
        if (virNetworkIsActive(net))
            nactive++;
        net = net->next;
    }
    return nactive;
3347 3348
}

3349
static int qemudListNetworks(virConnectPtr conn, char **const names, int nnames) {
3350
    struct qemud_driver *driver = (struct qemud_driver *)conn->networkPrivateData;
3351
    virNetworkObjPtr network = driver->networks;
3352
    int got = 0, i;
3353
    while (network && got < nnames) {
3354
        if (virNetworkIsActive(network)) {
3355
            if (!(names[got] = strdup(network->def->name))) {
3356 3357
                qemudReportError(conn, NULL, NULL, VIR_ERR_NO_MEMORY,
                     "%s", _("failed to allocate space for VM name string"));
3358 3359
                goto cleanup;
            }
3360 3361
            got++;
        }
3362 3363 3364
        network = network->next;
    }
    return got;
3365 3366 3367

 cleanup:
    for (i = 0 ; i < got ; i++)
3368
        VIR_FREE(names[i]);
3369
    return -1;
3370 3371
}

3372
static int qemudNumDefinedNetworks(virConnectPtr conn) {
3373
    int ninactive = 0;
3374
    struct qemud_driver *driver = (struct qemud_driver *)conn->networkPrivateData;
3375 3376 3377 3378 3379 3380 3381
    virNetworkObjPtr net = driver->networks;
    while (net) {
        if (!virNetworkIsActive(net))
            ninactive++;
        net = net->next;
    }
    return ninactive;
3382 3383
}

3384
static int qemudListDefinedNetworks(virConnectPtr conn, char **const names, int nnames) {
3385
    struct qemud_driver *driver = (struct qemud_driver *)conn->networkPrivateData;
3386
    virNetworkObjPtr network = driver->networks;
3387
    int got = 0, i;
3388
    while (network && got < nnames) {
3389
        if (!virNetworkIsActive(network)) {
3390
            if (!(names[got] = strdup(network->def->name))) {
3391 3392
                qemudReportError(conn, NULL, NULL, VIR_ERR_NO_MEMORY,
                     "%s", _("failed to allocate space for VM name string"));
3393 3394
                goto cleanup;
            }
3395 3396
            got++;
        }
3397 3398 3399
        network = network->next;
    }
    return got;
3400 3401 3402

 cleanup:
    for (i = 0 ; i < got ; i++)
3403
        VIR_FREE(names[i]);
3404
    return -1;
3405 3406
}

3407
static virNetworkPtr qemudNetworkCreate(virConnectPtr conn, const char *xml) {
3408
    struct qemud_driver *driver = (struct qemud_driver *)conn->networkPrivateData;
3409 3410
    virNetworkDefPtr def;
    virNetworkObjPtr network;
3411
    virNetworkPtr net;
3412

3413
    if (!(def = virNetworkDefParseString(conn, xml)))
3414 3415
        return NULL;

3416 3417 3418 3419
    if (!(network = virNetworkAssignDef(conn,
                                        &driver->networks,
                                        def))) {
        virNetworkDefFree(def);
3420 3421 3422
        return NULL;
    }

3423
    if (qemudStartNetworkDaemon(conn, driver, network) < 0) {
3424 3425
        virNetworkRemoveInactive(&driver->networks,
                                 network);
3426 3427 3428
        return NULL;
    }

3429
    net = virGetNetwork(conn, network->def->name, network->def->uuid);
3430
    return net;
3431 3432
}

3433
static virNetworkPtr qemudNetworkDefine(virConnectPtr conn, const char *xml) {
3434
    struct qemud_driver *driver = (struct qemud_driver *)conn->networkPrivateData;
3435 3436
    virNetworkDefPtr def;
    virNetworkObjPtr network;
3437

3438
    if (!(def = virNetworkDefParseString(conn, xml)))
3439 3440
        return NULL;

3441 3442 3443 3444
    if (!(network = virNetworkAssignDef(conn,
                                        &driver->networks,
                                        def))) {
        virNetworkDefFree(def);
3445 3446 3447
        return NULL;
    }

3448 3449 3450 3451 3452 3453
    if (virNetworkSaveConfig(conn,
                             driver->networkConfigDir,
                             driver->networkAutostartDir,
                             network) < 0) {
        virNetworkRemoveInactive(&driver->networks,
                                 network);
3454 3455 3456
        return NULL;
    }

3457
    return virGetNetwork(conn, network->def->name, network->def->uuid);
3458 3459
}

3460
static int qemudNetworkUndefine(virNetworkPtr net) {
3461
    struct qemud_driver *driver = (struct qemud_driver *)net->conn->networkPrivateData;
3462
    virNetworkObjPtr network = virNetworkFindByUUID(driver->networks, net->uuid);
3463 3464

    if (!network) {
3465 3466
        qemudReportError(net->conn, NULL, net, VIR_ERR_INVALID_DOMAIN,
                         "%s", _("no network with matching uuid"));
3467 3468 3469
        return -1;
    }

3470 3471 3472
    if (virNetworkIsActive(network)) {
        qemudReportError(net->conn, NULL, net, VIR_ERR_INTERNAL_ERROR,
                         "%s", _("network is still active"));
3473
        return -1;
3474
    }
3475

3476 3477
    if (virNetworkDeleteConfig(net->conn, network) < 0)
        return -1;
3478

3479 3480
    virNetworkRemoveInactive(&driver->networks,
                             network);
3481 3482

    return 0;
3483 3484
}

3485
static int qemudNetworkStart(virNetworkPtr net) {
3486
    struct qemud_driver *driver = (struct qemud_driver *)net->conn->networkPrivateData;
3487
    virNetworkObjPtr network = virNetworkFindByUUID(driver->networks, net->uuid);
3488 3489

    if (!network) {
3490
        qemudReportError(net->conn, NULL, net, VIR_ERR_INVALID_NETWORK,
3491
                         "%s", _("no network with matching uuid"));
3492
        return -1;
3493 3494
    }

3495
    return qemudStartNetworkDaemon(net->conn, driver, network);
3496 3497
}

3498
static int qemudNetworkDestroy(virNetworkPtr net) {
3499
    struct qemud_driver *driver = (struct qemud_driver *)net->conn->networkPrivateData;
3500
    virNetworkObjPtr network = virNetworkFindByUUID(driver->networks, net->uuid);
3501
    int ret;
3502

3503
    if (!network) {
3504
        qemudReportError(net->conn, NULL, net, VIR_ERR_INVALID_NETWORK,
3505
                         "%s", _("no network with matching uuid"));
3506 3507 3508
        return -1;
    }

3509
    ret = qemudShutdownNetworkDaemon(net->conn, driver, network);
3510 3511

    return ret;
3512 3513
}

3514
static char *qemudNetworkDumpXML(virNetworkPtr net, int flags ATTRIBUTE_UNUSED) {
3515
    struct qemud_driver *driver = (struct qemud_driver *)net->conn->networkPrivateData;
3516
    virNetworkObjPtr network = virNetworkFindByUUID(driver->networks, net->uuid);
3517

3518
    if (!network) {
3519
        qemudReportError(net->conn, NULL, net, VIR_ERR_INVALID_NETWORK,
3520
                         "%s", _("no network with matching uuid"));
3521
        return NULL;
3522 3523
    }

3524
    return virNetworkDefFormat(net->conn, network->def);
3525
}
D
Daniel P. Berrange 已提交
3526

3527
static char *qemudNetworkGetBridgeName(virNetworkPtr net) {
3528
    struct qemud_driver *driver = (struct qemud_driver *)net->conn->networkPrivateData;
3529
    virNetworkObjPtr network = virNetworkFindByUUID(driver->networks, net->uuid);
3530
    char *bridge;
3531
    if (!network) {
3532 3533
        qemudReportError(net->conn, NULL, net, VIR_ERR_INVALID_NETWORK,
                         "%s", _("no network with matching id"));
3534
        return NULL;
3535 3536
    }

3537
    bridge = strdup(network->def->bridge);
3538
    if (!bridge) {
3539 3540
        qemudReportError(net->conn, NULL, net, VIR_ERR_NO_MEMORY,
                 "%s", _("failed to allocate space for network bridge string"));
3541 3542 3543
        return NULL;
    }
    return bridge;
3544 3545
}

3546
static int qemudNetworkGetAutostart(virNetworkPtr net,
3547
                             int *autostart) {
3548
    struct qemud_driver *driver = (struct qemud_driver *)net->conn->networkPrivateData;
3549
    virNetworkObjPtr network = virNetworkFindByUUID(driver->networks, net->uuid);
3550 3551

    if (!network) {
3552 3553
        qemudReportError(net->conn, NULL, net, VIR_ERR_INVALID_NETWORK,
                         "%s", _("no network with matching uuid"));
3554 3555 3556 3557 3558 3559 3560 3561
        return -1;
    }

    *autostart = network->autostart;

    return 0;
}

3562
static int qemudNetworkSetAutostart(virNetworkPtr net,
3563
                             int autostart) {
3564
    struct qemud_driver *driver = (struct qemud_driver *)net->conn->networkPrivateData;
3565
    virNetworkObjPtr network = virNetworkFindByUUID(driver->networks, net->uuid);
3566 3567

    if (!network) {
3568 3569
        qemudReportError(net->conn, NULL, net, VIR_ERR_INVALID_NETWORK,
                         "%s", _("no network with matching uuid"));
3570 3571 3572 3573 3574 3575 3576 3577
        return -1;
    }

    autostart = (autostart != 0);

    if (network->autostart == autostart)
        return 0;

3578 3579 3580
    if (autostart) {
        int err;

3581
        if ((err = virFileMakePath(driver->networkAutostartDir))) {
3582
            qemudReportError(net->conn, NULL, net, VIR_ERR_INTERNAL_ERROR,
3583
                             _("cannot create autostart directory %s: %s"),
3584
                             driver->networkAutostartDir, strerror(err));
3585 3586 3587 3588
            return -1;
        }

        if (symlink(network->configFile, network->autostartLink) < 0) {
3589
            qemudReportError(net->conn, NULL, net, VIR_ERR_INTERNAL_ERROR,
3590
                             _("Failed to create symlink '%s' to '%s': %s"),
3591 3592 3593 3594 3595
                             network->autostartLink, network->configFile, strerror(errno));
            return -1;
        }
    } else {
        if (unlink(network->autostartLink) < 0 && errno != ENOENT && errno != ENOTDIR) {
3596
            qemudReportError(net->conn, NULL, net, VIR_ERR_INTERNAL_ERROR,
3597
                             _("Failed to delete symlink '%s': %s"),
3598 3599 3600 3601 3602
                             network->autostartLink, strerror(errno));
            return -1;
        }
    }

3603 3604 3605 3606 3607
    network->autostart = autostart;

    return 0;
}

3608 3609 3610 3611
static virDriver qemuDriver = {
    VIR_DRV_QEMU,
    "QEMU",
    LIBVIR_VERSION_NUMBER,
3612
    qemudProbe, /* probe */
3613 3614
    qemudOpen, /* open */
    qemudClose, /* close */
3615
    NULL, /* supports_feature */
3616 3617
    qemudGetType, /* type */
    qemudGetVersion, /* version */
3618
    qemudGetHostname, /* hostname */
3619
    NULL, /* URI  */
3620 3621 3622 3623 3624 3625 3626 3627 3628 3629 3630
    qemudGetMaxVCPUs, /* getMaxVcpus */
    qemudGetNodeInfo, /* nodeGetInfo */
    qemudGetCapabilities, /* getCapabilities */
    qemudListDomains, /* listDomains */
    qemudNumDomains, /* numOfDomains */
    qemudDomainCreate, /* domainCreateLinux */
    qemudDomainLookupByID, /* domainLookupByID */
    qemudDomainLookupByUUID, /* domainLookupByUUID */
    qemudDomainLookupByName, /* domainLookupByName */
    qemudDomainSuspend, /* domainSuspend */
    qemudDomainResume, /* domainResume */
3631
    qemudDomainShutdown, /* domainShutdown */
3632 3633 3634
    NULL, /* domainReboot */
    qemudDomainDestroy, /* domainDestroy */
    qemudDomainGetOSType, /* domainGetOSType */
3635 3636 3637
    qemudDomainGetMaxMemory, /* domainGetMaxMemory */
    qemudDomainSetMaxMemory, /* domainSetMaxMemory */
    qemudDomainSetMemory, /* domainSetMemory */
3638 3639 3640 3641
    qemudDomainGetInfo, /* domainGetInfo */
    qemudDomainSave, /* domainSave */
    qemudDomainRestore, /* domainRestore */
    NULL, /* domainCoreDump */
3642
    qemudDomainSetVcpus, /* domainSetVcpus */
3643 3644 3645 3646
#if HAVE_SCHED_GETAFFINITY
    qemudDomainPinVcpu, /* domainPinVcpu */
    qemudDomainGetVcpus, /* domainGetVcpus */
#else
3647 3648
    NULL, /* domainPinVcpu */
    NULL, /* domainGetVcpus */
3649
#endif
3650
    qemudDomainGetMaxVcpus, /* domainGetMaxVcpus */
3651 3652 3653 3654 3655 3656
    qemudDomainDumpXML, /* domainDumpXML */
    qemudListDefinedDomains, /* listDomains */
    qemudNumDefinedDomains, /* numOfDomains */
    qemudDomainStart, /* domainCreate */
    qemudDomainDefine, /* domainDefineXML */
    qemudDomainUndefine, /* domainUndefine */
3657
    qemudDomainAttachDevice, /* domainAttachDevice */
3658 3659 3660 3661 3662 3663
    NULL, /* domainDetachDevice */
    qemudDomainGetAutostart, /* domainGetAutostart */
    qemudDomainSetAutostart, /* domainSetAutostart */
    NULL, /* domainGetSchedulerType */
    NULL, /* domainGetSchedulerParameters */
    NULL, /* domainSetSchedulerParameters */
3664 3665 3666
    NULL, /* domainMigratePrepare */
    NULL, /* domainMigratePerform */
    NULL, /* domainMigrateFinish */
3667
    qemudDomainBlockStats, /* domainBlockStats */
3668
    qemudDomainInterfaceStats, /* domainInterfaceStats */
3669
    qemudDomainBlockPeek, /* domainBlockPeek */
R
Richard W.M. Jones 已提交
3670
    qemudDomainMemoryPeek, /* domainMemoryPeek */
3671 3672 3673 3674
#if HAVE_NUMACTL
    qemudNodeGetCellsFreeMemory, /* nodeGetCellsFreeMemory */
    qemudNodeGetFreeMemory,  /* getFreeMemory */
#else
3675
    NULL, /* nodeGetCellsFreeMemory */
3676
    NULL, /* getFreeMemory */
3677
#endif
3678 3679 3680
};

static virNetworkDriver qemuNetworkDriver = {
3681
    "QEMU",
3682 3683 3684 3685 3686 3687 3688 3689 3690 3691 3692 3693 3694 3695 3696 3697 3698 3699 3700
    qemudOpenNetwork, /* open */
    qemudCloseNetwork, /* close */
    qemudNumNetworks, /* numOfNetworks */
    qemudListNetworks, /* listNetworks */
    qemudNumDefinedNetworks, /* numOfDefinedNetworks */
    qemudListDefinedNetworks, /* listDefinedNetworks */
    qemudNetworkLookupByUUID, /* networkLookupByUUID */
    qemudNetworkLookupByName, /* networkLookupByName */
    qemudNetworkCreate, /* networkCreateXML */
    qemudNetworkDefine, /* networkDefineXML */
    qemudNetworkUndefine, /* networkUndefine */
    qemudNetworkStart, /* networkCreate */
    qemudNetworkDestroy, /* networkDestroy */
    qemudNetworkDumpXML, /* networkDumpXML */
    qemudNetworkGetBridgeName, /* networkGetBridgeName */
    qemudNetworkGetAutostart, /* networkGetAutostart */
    qemudNetworkSetAutostart, /* networkSetAutostart */
};

A
Atsushi SAKAI 已提交
3701
#ifdef WITH_LIBVIRTD
3702 3703 3704 3705 3706
static virStateDriver qemuStateDriver = {
    qemudStartup,
    qemudShutdown,
    qemudReload,
    qemudActive,
3707
    NULL
3708
};
A
Atsushi SAKAI 已提交
3709
#endif
3710

3711 3712 3713
int qemudRegister(void) {
    virRegisterDriver(&qemuDriver);
    virRegisterNetworkDriver(&qemuNetworkDriver);
A
Atsushi SAKAI 已提交
3714
#ifdef WITH_LIBVIRTD
3715
    virRegisterStateDriver(&qemuStateDriver);
A
Atsushi SAKAI 已提交
3716
#endif
3717 3718 3719
    return 0;
}

3720
#endif /* WITH_QEMU */