vbox_tmpl.c 302.3 KB
Newer Older
1 2 3 4 5 6 7 8 9 10
/** @file vbox_tmpl.c
 * Template File to support multiple versions of VirtualBox
 * at runtime :).
 *
 * IMPORTANT:
 * Please dont include this file in the src/Makefile.am, it
 * is automatically include by other files.
 */

/*
11
 * Copyright (C) 2010 Red Hat, Inc.
12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37
 * Copyright (C) 2008-2009 Sun Microsystems, Inc.
 *
 * This file is part of a free software library; you can redistribute
 * it and/or modify it under the terms of the GNU Lesser General
 * Public License version 2.1 as published by the Free Software
 * Foundation and shipped in the "COPYING" file with this library.
 * The library is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY of any kind.
 *
 * Sun LGPL Disclaimer: For the avoidance of doubt, except that if
 * any license choice other than GPL or LGPL is available it will
 * apply instead, Sun elects to use only the Lesser General Public
 * License version 2.1 (LGPLv2) at this time for any software where
 * a choice of LGPL license versions is made available with the
 * language indicating that LGPLv2 or any later version may be used,
 * or where a choice of which version of the LGPL is applied is
 * otherwise unspecified.
 *
 * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa
 * Clara, CA 95054 USA or visit http://www.sun.com if you need
 * additional information or have any questions.
 */

#include <config.h>

#include <sys/utsname.h>
38
#include <stdbool.h>
39
#include <unistd.h>
40 41 42 43

#include "internal.h"
#include "datatypes.h"
#include "domain_conf.h"
44
#include "network_conf.h"
45
#include "virterror_internal.h"
46
#include "domain_event.h"
47
#include "storage_conf.h"
48
#include "storage_file.h"
49
#include "uuid.h"
50
#include "event.h"
51 52 53 54 55 56 57 58
#include "memory.h"
#include "nodeinfo.h"
#include "logging.h"
#include "vbox_driver.h"

/* This one changes from version to version. */
#if VBOX_API_VERSION == 2002
# include "vbox_CAPI_v2_2.h"
59 60
#elif VBOX_API_VERSION == 3000
# include "vbox_CAPI_v3_0.h"
61 62
#elif VBOX_API_VERSION == 3001
# include "vbox_CAPI_v3_1.h"
63 64
#elif VBOX_API_VERSION == 3002
# include "vbox_CAPI_v3_2.h"
65 66
#else
# error "Unsupport VBOX_API_VERSION"
67 68
#endif

69
/* Include this *last* or we'll get the wrong vbox_CAPI_*.h. */
70
#include "vbox_glue.h"
71 72


73 74 75 76 77 78 79
#define VIR_FROM_THIS                   VIR_FROM_VBOX
#define VBOX_UTF16_FREE(arg)            data->pFuncs->pfnUtf16Free(arg)
#define VBOX_UTF8_FREE(arg)             data->pFuncs->pfnUtf8Free(arg)
#define VBOX_COM_UNALLOC_MEM(arg)       data->pFuncs->pfnComUnallocMem(arg)
#define VBOX_UTF16_TO_UTF8(arg1, arg2)  data->pFuncs->pfnUtf16ToUtf8(arg1, arg2)
#define VBOX_UTF8_TO_UTF16(arg1, arg2)  data->pFuncs->pfnUtf8ToUtf16(arg1, arg2)

80 81
#define VBOX_ADDREF(arg) (arg)->vtbl->nsisupports.AddRef((nsISupports *)(arg))

82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106
#define VBOX_RELEASE(arg) \
if(arg)\
    (arg)->vtbl->nsisupports.Release((nsISupports *)(arg))

#define VBOX_OBJECT_CHECK(conn, type, value) \
vboxGlobalData *data = conn->privateData;\
type ret = value;\
if(!data->vboxObj) {\
    return ret;\
}

#define VBOX_OBJECT_HOST_CHECK(conn, type, value) \
vboxGlobalData *data = conn->privateData;\
type ret = value;\
IHost *host = NULL;\
if(!data->vboxObj) {\
    return ret;\
}\
data->vboxObj->vtbl->GetHost(data->vboxObj, &host);\
if (!host) {\
    return ret;\
}

#if VBOX_API_VERSION < 3001

107
# define VBOX_MEDIUM_RELEASE(arg) \
108 109
if(arg)\
    (arg)->vtbl->imedium.nsisupports.Release((nsISupports *)(arg))
110
# define VBOX_MEDIUM_FUNC_ARG1(object, func, arg1) \
111
    (object)->vtbl->imedium.func((IMedium *)(object), arg1)
112
# define VBOX_MEDIUM_FUNC_ARG2(object, func, arg1, arg2) \
113 114 115 116 117 118
    (object)->vtbl->imedium.func((IMedium *)(object), arg1, arg2)

#else  /* VBOX_API_VERSION >= 3001 */

typedef IMedium IHardDisk;
typedef IMediumAttachment IHardDiskAttachment;
119 120 121 122 123
# define MediaState_Inaccessible     MediumState_Inaccessible
# define HardDiskVariant_Standard    MediumVariant_Standard
# define HardDiskVariant_Fixed       MediumVariant_Fixed
# define VBOX_MEDIUM_RELEASE(arg) VBOX_RELEASE(arg)
# define VBOX_MEDIUM_FUNC_ARG1(object, func, arg1) \
124
    (object)->vtbl->func(object, arg1)
125
# define VBOX_MEDIUM_FUNC_ARG2(object, func, arg1, arg2) \
126 127 128
    (object)->vtbl->func(object, arg1, arg2)

#endif /* VBOX_API_VERSION >= 3001 */
129

130 131
#define vboxError(code, ...) \
        virReportErrorHelper(NULL, VIR_FROM_VBOX, code, __FILE__, \
132
                             __FUNCTION__, __LINE__, __VA_ARGS__)
133

134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160
#define DEBUGPRUnichar(msg, strUtf16) \
if (strUtf16) {\
    char *strUtf8 = NULL;\
\
    g_pVBoxGlobalData->pFuncs->pfnUtf16ToUtf8(strUtf16, &strUtf8);\
    if (strUtf8) {\
        DEBUG("%s: %s", msg, strUtf8);\
        g_pVBoxGlobalData->pFuncs->pfnUtf8Free(strUtf8);\
    }\
}

#define DEBUGUUID(msg, iid) \
{\
    DEBUG (msg ": {%08x-%04x-%04x-%02x%02x-%02x%02x%02x%02x%02x%02x}",\
          (unsigned)(iid)->m0,\
          (unsigned)(iid)->m1,\
          (unsigned)(iid)->m2,\
          (unsigned)(iid)->m3[0],\
          (unsigned)(iid)->m3[1],\
          (unsigned)(iid)->m3[2],\
          (unsigned)(iid)->m3[3],\
          (unsigned)(iid)->m3[4],\
          (unsigned)(iid)->m3[5],\
          (unsigned)(iid)->m3[6],\
          (unsigned)(iid)->m3[7]);\
}\

161 162
typedef struct {
    virMutex lock;
163
    unsigned long version;
164 165 166 167 168

    virCapsPtr caps;

    IVirtualBox *vboxObj;
    ISession *vboxSession;
169 170 171

    /** Our version specific API table pointer. */
    PCVBOXXPCOM pFuncs;
172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192

#if VBOX_API_VERSION == 2002

} vboxGlobalData;

#else /* !(VBOX_API_VERSION == 2002) */

    /* An array of callbacks */
    virDomainEventCallbackListPtr domainEventCallbacks;

    int fdWatch;
    int domainEventDispatching;

    IVirtualBoxCallback *vboxCallback;

    nsIEventQueue  *vboxQueue;
    int volatile vboxCallBackRefCount;

    /* pointer back to the connection */
    virConnectPtr conn;

193 194
} vboxGlobalData;

195 196 197 198 199 200 201 202 203 204
/* g_pVBoxGlobalData has to be global variable,
 * there is no other way to make the callbacks
 * work other then having g_pVBoxGlobalData as
 * global, because the functions namely AddRef,
 * Release, etc consider it as global and you
 * can't change the function definition as it
 * is XPCOM nsISupport::* function and it expects
 * them that way
 */

205
static vboxGlobalData *g_pVBoxGlobalData = NULL;
206 207

#endif /* !(VBOX_API_VERSION == 2002) */
208

209 210 211 212
static virDomainPtr vboxDomainDefineXML(virConnectPtr conn, const char *xml);
static int vboxDomainCreate(virDomainPtr dom);
static int vboxDomainUndefine(virDomainPtr dom);

213 214 215 216 217 218 219 220 221
static void vboxDriverLock(vboxGlobalData *data) {
    virMutexLock(&data->lock);
}

static void vboxDriverUnlock(vboxGlobalData *data) {
    virMutexUnlock(&data->lock);
}

#if VBOX_API_VERSION == 2002
222

223
static void nsIDtoChar(unsigned char *uuid, const nsID *iid) {
224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262
    char uuidstrsrc[VIR_UUID_STRING_BUFLEN];
    char uuidstrdst[VIR_UUID_STRING_BUFLEN];
    unsigned char uuidinterim[VIR_UUID_BUFLEN];
    int i;

    memcpy(uuidinterim, iid, VIR_UUID_BUFLEN);
    virUUIDFormat(uuidinterim, uuidstrsrc);

    uuidstrdst[0]  = uuidstrsrc[6];
    uuidstrdst[1]  = uuidstrsrc[7];
    uuidstrdst[2]  = uuidstrsrc[4];
    uuidstrdst[3]  = uuidstrsrc[5];
    uuidstrdst[4]  = uuidstrsrc[2];
    uuidstrdst[5]  = uuidstrsrc[3];
    uuidstrdst[6]  = uuidstrsrc[0];
    uuidstrdst[7]  = uuidstrsrc[1];

    uuidstrdst[8]  = uuidstrsrc[8];

    uuidstrdst[9]  = uuidstrsrc[11];
    uuidstrdst[10] = uuidstrsrc[12];
    uuidstrdst[11] = uuidstrsrc[9];
    uuidstrdst[12] = uuidstrsrc[10];

    uuidstrdst[13] = uuidstrsrc[13];

    uuidstrdst[14] = uuidstrsrc[16];
    uuidstrdst[15] = uuidstrsrc[17];
    uuidstrdst[16] = uuidstrsrc[14];
    uuidstrdst[17] = uuidstrsrc[15];

    for(i = 18; i < VIR_UUID_STRING_BUFLEN; i++) {
        uuidstrdst[i] = uuidstrsrc[i];
    }

    uuidstrdst[VIR_UUID_STRING_BUFLEN-1] = '\0';
    virUUIDParse(uuidstrdst, uuid);
}

263
static void nsIDFromChar(nsID *iid, const unsigned char *uuid) {
264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302
    char uuidstrsrc[VIR_UUID_STRING_BUFLEN];
    char uuidstrdst[VIR_UUID_STRING_BUFLEN];
    unsigned char uuidinterim[VIR_UUID_BUFLEN];
    int i;

    virUUIDFormat(uuid, uuidstrsrc);

    uuidstrdst[0]  = uuidstrsrc[6];
    uuidstrdst[1]  = uuidstrsrc[7];
    uuidstrdst[2]  = uuidstrsrc[4];
    uuidstrdst[3]  = uuidstrsrc[5];
    uuidstrdst[4]  = uuidstrsrc[2];
    uuidstrdst[5]  = uuidstrsrc[3];
    uuidstrdst[6]  = uuidstrsrc[0];
    uuidstrdst[7]  = uuidstrsrc[1];

    uuidstrdst[8]  = uuidstrsrc[8];

    uuidstrdst[9]  = uuidstrsrc[11];
    uuidstrdst[10] = uuidstrsrc[12];
    uuidstrdst[11] = uuidstrsrc[9];
    uuidstrdst[12] = uuidstrsrc[10];

    uuidstrdst[13] = uuidstrsrc[13];

    uuidstrdst[14] = uuidstrsrc[16];
    uuidstrdst[15] = uuidstrsrc[17];
    uuidstrdst[16] = uuidstrsrc[14];
    uuidstrdst[17] = uuidstrsrc[15];

    for(i = 18; i < VIR_UUID_STRING_BUFLEN; i++) {
        uuidstrdst[i] = uuidstrsrc[i];
    }

    uuidstrdst[VIR_UUID_STRING_BUFLEN-1] = '\0';
    virUUIDParse(uuidstrdst, uuidinterim);
    memcpy(iid, uuidinterim, VIR_UUID_BUFLEN);
}

303
# ifdef WIN32
304

305 306 307 308 309 310 311 312 313 314 315 316 317 318 319
typedef struct _vboxIID_v2_x_WIN32 vboxIID;
typedef struct _vboxIID_v2_x_WIN32 vboxIID_v2_x_WIN32;

struct _vboxIID_v2_x_WIN32 {
    /* IID is represented by a GUID value. */
    GUID value;
};

#  define VBOX_IID_INITIALIZER { { 0, 0, 0, { 0, 0, 0, 0, 0, 0, 0, 0 } } }

static void
vboxIIDUnalloc_v2_x_WIN32(vboxGlobalData *data ATTRIBUTE_UNUSED,
                          vboxIID_v2_x_WIN32 *iid ATTRIBUTE_UNUSED)
{
    /* Nothing to free */
320
}
321

322 323 324 325 326
static void
vboxIIDToUUID_v2_x_WIN32(vboxIID_v2_x_WIN32 *iid, unsigned char *uuid)
{
    nsIDtoChar(uuid, (nsID *)&iid->value);
}
327

328 329 330 331 332
static void
vboxIIDFromUUID_v2_x_WIN32(vboxGlobalData *data, vboxIID_v2_x_WIN32 *iid,
                           const unsigned char *uuid)
{
    vboxIIDUnalloc_v2_x_WIN32(data, iid);
333

334
    nsIDFromChar((nsID *)&iid->value, uuid);
335 336
}

337 338 339 340 341
static bool
vboxIIDIsEqual_v2_x_WIN32(vboxIID_v2_x_WIN32 *iid1, vboxIID_v2_x_WIN32 *iid2)
{
    return memcmp(&iid1->value, &iid2->value, sizeof (GUID)) == 0;
}
342

343 344 345 346 347 348 349 350 351 352 353 354 355 356 357 358 359 360 361 362 363 364 365 366 367 368 369 370 371 372 373 374 375 376 377 378 379 380 381 382
static void
vboxIIDFromArrayItem_v2_x_WIN32(vboxGlobalData *data, vboxIID_v2_x_WIN32 *iid,
                                vboxArray *array, int idx)
{
    GUID *items = (GUID *)array->items;

    vboxIIDUnalloc_v2_x_WIN32(data, iid);

    memcpy(&iid->value, &items[idx], sizeof (GUID));
}

#  define vboxIIDUnalloc(iid) vboxIIDUnalloc_v2_x_WIN32(data, iid)
#  define vboxIIDToUUID(iid, uuid) vboxIIDToUUID_v2_x_WIN32(iid, uuid)
#  define vboxIIDFromUUID(iid, uuid) vboxIIDFromUUID_v2_x_WIN32(data, iid, uuid)
#  define vboxIIDIsEqual(iid1, iid2) vboxIIDIsEqual_v2_x_WIN32(iid1, iid2)
#  define vboxIIDFromArrayItem(iid, array, idx) \
    vboxIIDFromArrayItem_v2_x_WIN32(data, iid, array, idx)
#  define DEBUGIID(msg, iid) DEBUGUUID(msg, (nsID *)&(iid))

# else /* !WIN32 */

typedef struct _vboxIID_v2_x vboxIID;
typedef struct _vboxIID_v2_x vboxIID_v2_x;

struct _vboxIID_v2_x {
    /* IID is represented by a pointer to a nsID. */
    nsID *value;

    /* backing is used in cases where we need to create or copy an IID.
     * We cannot allocate memory that can be freed by ComUnallocMem.
     * Therefore, we use this stack allocated nsID instead. */
    nsID backing;
};

#  define VBOX_IID_INITIALIZER { NULL, { 0, 0, 0, { 0, 0, 0, 0, 0, 0, 0, 0 } } }

static void
vboxIIDUnalloc_v2_x(vboxGlobalData *data, vboxIID_v2_x *iid)
{
    if (iid->value == NULL) {
383 384 385
        return;
    }

386 387 388 389 390 391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406 407
    if (iid->value != &iid->backing) {
        data->pFuncs->pfnComUnallocMem(iid->value);
    }

    iid->value = NULL;
}

static void
vboxIIDToUUID_v2_x(vboxIID_v2_x *iid, unsigned char *uuid)
{
    nsIDtoChar(uuid, iid->value);
}

static void
vboxIIDFromUUID_v2_x(vboxGlobalData *data, vboxIID_v2_x *iid,
                     const unsigned char *uuid)
{
    vboxIIDUnalloc_v2_x(data, iid);

    iid->value = &iid->backing;

    nsIDFromChar(iid->value, uuid);
408 409
}

410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 431 432 433 434 435 436
static bool
vboxIIDIsEqual_v2_x(vboxIID_v2_x *iid1, vboxIID_v2_x *iid2)
{
    return memcmp(iid1->value, iid2->value, sizeof (nsID)) == 0;
}

static void
vboxIIDFromArrayItem_v2_x(vboxGlobalData *data, vboxIID_v2_x *iid,
                          vboxArray *array, int idx)
{
    vboxIIDUnalloc_v2_x(data, iid);

    iid->value = &iid->backing;

    memcpy(iid->value, array->items[idx], sizeof (nsID));
}

#  define vboxIIDUnalloc(iid) vboxIIDUnalloc_v2_x(data, iid)
#  define vboxIIDToUUID(iid, uuid) vboxIIDToUUID_v2_x(iid, uuid)
#  define vboxIIDFromUUID(iid, uuid) vboxIIDFromUUID_v2_x(data, iid, uuid)
#  define vboxIIDIsEqual(iid1, iid2) vboxIIDIsEqual_v2_x(iid1, iid2)
#  define vboxIIDFromArrayItem(iid, array, idx) \
    vboxIIDFromArrayItem_v2_x(data, iid, array, idx)
#  define DEBUGIID(msg, iid) DEBUGUUID(msg, iid)

# endif /* !WIN32 */

437
#else /* VBOX_API_VERSION != 2002 */
438

439 440 441 442 443 444 445 446 447 448 449 450 451 452 453 454 455 456 457 458 459 460
typedef struct _vboxIID_v3_x vboxIID;
typedef struct _vboxIID_v3_x vboxIID_v3_x;

struct _vboxIID_v3_x {
    /* IID is represented by a UTF-16 encoded UUID in string form. */
    PRUnichar *value;

    /* owner indicates if we own the value and need to free it. */
    bool owner;
};

# define VBOX_IID_INITIALIZER { NULL, true }

static void
vboxIIDUnalloc_v3_x(vboxGlobalData *data, vboxIID_v3_x *iid)
{
    if (iid->value != NULL && iid->owner) {
        data->pFuncs->pfnUtf16Free(iid->value);
    }

    iid->value = NULL;
    iid->owner = true;
461 462
}

463 464 465 466 467 468 469 470 471 472 473
static void
vboxIIDToUUID_v3_x(vboxGlobalData *data, vboxIID_v3_x *iid,
                   unsigned char *uuid)
{
    char *utf8 = NULL;

    data->pFuncs->pfnUtf16ToUtf8(iid->value, &utf8);

    virUUIDParse(utf8, uuid);

    data->pFuncs->pfnUtf8Free(utf8);
474 475
}

476 477 478 479 480
static void
vboxIIDFromUUID_v3_x(vboxGlobalData *data, vboxIID_v3_x *iid,
                     const unsigned char *uuid)
{
    char utf8[VIR_UUID_STRING_BUFLEN];
481

482
    vboxIIDUnalloc_v3_x(data, iid);
483

484
    virUUIDFormat(uuid, utf8);
485

486 487
    data->pFuncs->pfnUtf8ToUtf16(utf8, &iid->value);
}
488

489 490 491 492 493 494
static bool
vboxIIDIsEqual_v3_x(vboxGlobalData *data, vboxIID_v3_x *iid1,
                    vboxIID_v3_x *iid2)
{
    unsigned char uuid1[VIR_UUID_BUFLEN];
    unsigned char uuid2[VIR_UUID_BUFLEN];
495 496 497 498 499

    /* Note: we can't directly compare the utf8 strings here
     * cause the two UUID's may have seperators as space or '-'
     * or mixture of both and we don't want to fail here by
     * using direct string comparison. Here virUUIDParse() takes
500 501 502
     * care of these cases. */
    vboxIIDToUUID_v3_x(data, iid1, uuid1);
    vboxIIDToUUID_v3_x(data, iid2, uuid2);
503

504 505
    return memcmp(uuid1, uuid2, VIR_UUID_BUFLEN) == 0;
}
506 507


508 509 510 511 512
static void
vboxIIDFromArrayItem_v3_x(vboxGlobalData *data, vboxIID_v3_x *iid,
                          vboxArray *array, int idx)
{
    vboxIIDUnalloc_v3_x(data, iid);
513

514 515
    iid->value = array->items[idx];
    iid->owner = false;
516 517
}

518 519 520 521 522 523 524 525

# define vboxIIDUnalloc(iid) vboxIIDUnalloc_v3_x(data, iid)
# define vboxIIDToUUID(iid, uuid) vboxIIDToUUID_v3_x(data, iid, uuid)
# define vboxIIDFromUUID(iid, uuid) vboxIIDFromUUID_v3_x(data, iid, uuid)
# define vboxIIDIsEqual(iid1, iid2) vboxIIDIsEqual_v3_x(data, iid1, iid2)
# define vboxIIDFromArrayItem(iid, array, idx) \
    vboxIIDFromArrayItem_v3_x(data, iid, array, idx)
# define DEBUGIID(msg, strUtf16) DEBUGPRUnichar(msg, strUtf16)
526

527
# if VBOX_API_VERSION >= 3001
528 529 530 531 532 533 534 535 536 537 538 539 540 541 542 543

/**
 * function to generate the name for medium,
 * for e.g: hda, sda, etc
 *
 * @returns     null terminated string with device name or NULL
 *              for failures
 * @param       conn            Input Connection Pointer
 * @param       storageBus      Input storage bus type
 * @param       deviceInst      Input device instance number
 * @param       devicePort      Input port number
 * @param       deviceSlot      Input slot number
 * @param       aMaxPortPerInst Input array of max port per device instance
 * @param       aMaxSlotPerPort Input array of max slot per device port
 *
 */
544
static char *vboxGenerateMediumName(PRUint32  storageBus,
545 546 547 548 549
                                    PRInt32   deviceInst,
                                    PRInt32   devicePort,
                                    PRInt32   deviceSlot,
                                    PRUint32 *aMaxPortPerInst,
                                    PRUint32 *aMaxSlotPerPort) {
550
    const char *prefix = NULL;
551 552 553 554 555 556 557 558 559 560 561 562 563 564 565 566 567 568 569 570
    char *name  = NULL;
    int   total = 0;
    PRUint32 maxPortPerInst = 0;
    PRUint32 maxSlotPerPort = 0;

    if (   !aMaxPortPerInst
        || !aMaxSlotPerPort)
        return NULL;

    if (   (storageBus < StorageBus_IDE)
        || (storageBus > StorageBus_Floppy))
        return NULL;

    maxPortPerInst = aMaxPortPerInst[storageBus];
    maxSlotPerPort = aMaxSlotPerPort[storageBus];
    total =   (deviceInst * maxPortPerInst * maxSlotPerPort)
            + (devicePort * maxSlotPerPort)
            + deviceSlot;

    if (storageBus == StorageBus_IDE) {
571
        prefix = "hd";
572 573
    } else if (   (storageBus == StorageBus_SATA)
               || (storageBus == StorageBus_SCSI)) {
574
        prefix = "sd";
575
    } else if (storageBus == StorageBus_Floppy) {
576
        prefix = "fd";
577 578
    }

579
    name = virIndexToDiskName(total, prefix);
580

581
    DEBUG("name=%s, total=%d, storageBus=%u, deviceInst=%d, "
582
          "devicePort=%d deviceSlot=%d, maxPortPerInst=%u maxSlotPerPort=%u",
583
          NULLSTR(name), total, storageBus, deviceInst, devicePort,
584 585 586 587 588 589 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 615 616 617 618 619 620 621 622 623 624 625 626 627 628 629 630 631 632 633 634 635 636 637 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
          deviceSlot, maxPortPerInst, maxSlotPerPort);
    return name;
}

/**
 * function to get the StorageBus, Port number
 * and Device number for the given devicename
 * e.g: hda has StorageBus = IDE, port = 0,
 *      device = 0
 *
 * @returns     true on Success, false on failure.
 * @param       deviceName      Input device name
 * @param       aMaxPortPerInst Input array of max port per device instance
 * @param       aMaxSlotPerPort Input array of max slot per device port
 * @param       storageBus      Input storage bus type
 * @param       deviceInst      Output device instance number
 * @param       devicePort      Output port number
 * @param       deviceSlot      Output slot number
 *
 */
static bool vboxGetDeviceDetails(const char *deviceName,
                                 PRUint32   *aMaxPortPerInst,
                                 PRUint32   *aMaxSlotPerPort,
                                 PRUint32    storageBus,
                                 PRInt32    *deviceInst,
                                 PRInt32    *devicePort,
                                 PRInt32    *deviceSlot) {
    int total = 0;
    PRUint32 maxPortPerInst = 0;
    PRUint32 maxSlotPerPort = 0;

    if (   !deviceName
        || !deviceInst
        || !devicePort
        || !deviceSlot
        || !aMaxPortPerInst
        || !aMaxSlotPerPort)
        return false;

    if (   (storageBus < StorageBus_IDE)
        || (storageBus > StorageBus_Floppy))
        return false;

    total = virDiskNameToIndex(deviceName);

    maxPortPerInst = aMaxPortPerInst[storageBus];
    maxSlotPerPort = aMaxSlotPerPort[storageBus];

    if (   !maxPortPerInst
        || !maxSlotPerPort
        || (total < 0))
        return false;

    *deviceInst = total / (maxPortPerInst * maxSlotPerPort);
    *devicePort = (total % (maxPortPerInst * maxSlotPerPort)) / maxSlotPerPort;
    *deviceSlot = (total % (maxPortPerInst * maxSlotPerPort)) % maxSlotPerPort;

    DEBUG("name=%s, total=%d, storageBus=%u, deviceInst=%d, "
          "devicePort=%d deviceSlot=%d, maxPortPerInst=%u maxSlotPerPort=%u",
          deviceName, total, storageBus, *deviceInst, *devicePort,
          *deviceSlot, maxPortPerInst, maxSlotPerPort);

    return true;
}

/**
 * function to get the values for max port per
 * instance and max slots per port for the devices
 *
 * @returns     true on Success, false on failure.
 * @param       vbox            Input IVirtualBox pointer
 * @param       maxPortPerInst  Output array of max port per instance
 * @param       maxSlotPerPort  Output array of max slot per port
 *
 */

static bool vboxGetMaxPortSlotValues(IVirtualBox *vbox,
                                     PRUint32 *maxPortPerInst,
                                     PRUint32 *maxSlotPerPort) {
    ISystemProperties *sysProps = NULL;

    if (!vbox)
        return false;

    vbox->vtbl->GetSystemProperties(vbox, &sysProps);

    if (!sysProps)
        return false;

    sysProps->vtbl->GetMaxPortCountForStorageBus(sysProps,
                                                 StorageBus_IDE,
                                                 &maxPortPerInst[StorageBus_IDE]);
    sysProps->vtbl->GetMaxPortCountForStorageBus(sysProps,
                                                 StorageBus_SATA,
                                                 &maxPortPerInst[StorageBus_SATA]);
    sysProps->vtbl->GetMaxPortCountForStorageBus(sysProps,
                                                 StorageBus_SCSI,
                                                 &maxPortPerInst[StorageBus_SCSI]);
    sysProps->vtbl->GetMaxPortCountForStorageBus(sysProps,
                                                 StorageBus_Floppy,
                                                 &maxPortPerInst[StorageBus_Floppy]);

    sysProps->vtbl->GetMaxDevicesPerPortForStorageBus(sysProps,
                                                      StorageBus_IDE,
                                                      &maxSlotPerPort[StorageBus_IDE]);
    sysProps->vtbl->GetMaxDevicesPerPortForStorageBus(sysProps,
                                                      StorageBus_SATA,
                                                      &maxSlotPerPort[StorageBus_SATA]);
    sysProps->vtbl->GetMaxDevicesPerPortForStorageBus(sysProps,
                                                      StorageBus_SCSI,
                                                      &maxSlotPerPort[StorageBus_SCSI]);
    sysProps->vtbl->GetMaxDevicesPerPortForStorageBus(sysProps,
                                                      StorageBus_Floppy,
                                                      &maxSlotPerPort[StorageBus_Floppy]);

    VBOX_RELEASE(sysProps);

    return true;
}

/**
 * Converts Utf-16 string to int
 */
static int PRUnicharToInt(PRUnichar *strUtf16) {
    char *strUtf8 = NULL;
    int ret = 0;

    if (!strUtf16)
        return -1;

    g_pVBoxGlobalData->pFuncs->pfnUtf16ToUtf8(strUtf16, &strUtf8);
    if (!strUtf8)
        return -1;

718 719 720
    if (virStrToLong_i(strUtf8, NULL, 10, &ret) < 0)
        ret = -1;

721 722 723 724 725 726 727 728 729 730 731 732 733 734 735 736 737 738 739
    g_pVBoxGlobalData->pFuncs->pfnUtf8Free(strUtf8);

    return ret;
}

/**
 * Converts int to Utf-16 string
 */
static PRUnichar *PRUnicharFromInt(int n) {
    PRUnichar *strUtf16 = NULL;
    char s[24];

    snprintf(s, sizeof(s), "%d", n);

    g_pVBoxGlobalData->pFuncs->pfnUtf8ToUtf16(s, &strUtf16);

    return strUtf16;
}

740
# endif /* VBOX_API_VERSION >= 3001 */
741

742 743
#endif /* !(VBOX_API_VERSION == 2002) */

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 778 779 780 781 782
static PRUnichar *
vboxSocketFormatAddrUtf16(vboxGlobalData *data, virSocketAddrPtr addr)
{
    char *utf8 = NULL;
    PRUnichar *utf16 = NULL;

    utf8 = virSocketFormatAddr(addr);

    if (utf8 == NULL) {
        return NULL;
    }

    VBOX_UTF8_TO_UTF16(utf8, &utf16);
    VIR_FREE(utf8);

    return utf16;
}

static int
vboxSocketParseAddrUtf16(vboxGlobalData *data, const PRUnichar *utf16,
                         virSocketAddrPtr addr)
{
    int result = -1;
    char *utf8 = NULL;

    VBOX_UTF16_TO_UTF8(utf16, &utf8);

    if (virSocketParseAddr(utf8, addr, AF_UNSPEC) < 0) {
        goto cleanup;
    }

    result = 0;

cleanup:
    VBOX_UTF8_FREE(utf8);

    return result;
}

783 784 785 786 787 788 789 790 791 792 793
static virCapsPtr vboxCapsInit(void) {
    struct utsname utsname;
    virCapsPtr caps;
    virCapsGuestPtr guest;

    uname(&utsname);

    if ((caps = virCapabilitiesNew(utsname.machine,
                                   0, 0)) == NULL)
        goto no_memory;

794
    if (nodeCapsInitNUMA(caps) < 0)
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 820 821 822
        goto no_memory;

    virCapabilitiesSetMacPrefix(caps, (unsigned char[]){ 0x08, 0x00, 0x27 });

    if ((guest = virCapabilitiesAddGuest(caps,
                                         "hvm",
                                         utsname.machine,
                                         sizeof(void *) * CHAR_BIT,
                                         NULL,
                                         NULL,
                                         0,
                                         NULL)) == NULL)
        goto no_memory;

    if (virCapabilitiesAddGuestDomain(guest,
                                      "vbox",
                                      NULL,
                                      NULL,
                                      0,
                                      NULL) == NULL)
        goto no_memory;
    return caps;

no_memory:
    virCapabilitiesFree(caps);
    return NULL;
}

823 824 825
static int
vboxInitialize(vboxGlobalData *data)
{
826 827 828
    data->pFuncs = g_pfnGetFunctions(VBOX_XPCOMC_VERSION);

    if (data->pFuncs == NULL)
829
        goto cleanup;
830 831 832

#if VBOX_XPCOMC_VERSION == 0x00010000U
    data->pFuncs->pfnComInitialize(&data->vboxObj, &data->vboxSession);
833
#else  /* !(VBOX_XPCOMC_VERSION == 0x00010000U) */
834 835
    data->pFuncs->pfnComInitialize(IVIRTUALBOX_IID_STR, &data->vboxObj,
                               ISESSION_IID_STR, &data->vboxSession);
836

837
# if VBOX_API_VERSION == 2002
838 839 840

    /* No event queue functionality in 2.2.* as of now */

841
# else  /* !(VBOX_API_VERSION == 2002) */
842 843 844 845 846 847 848

    /* Initial the fWatch needed for Event Callbacks */
    data->fdWatch = -1;

    data->pFuncs->pfnGetEventQueue(&data->vboxQueue);

    if (data->vboxQueue == NULL) {
849 850
        vboxError(VIR_ERR_INTERNAL_ERROR, "%s",
                  _("nsIEventQueue object is null"));
851 852 853
        goto cleanup;
    }

854
# endif /* !(VBOX_API_VERSION == 2002) */
855
#endif /* !(VBOX_XPCOMC_VERSION == 0x00010000U) */
856 857

    if (data->vboxObj == NULL) {
858 859
        vboxError(VIR_ERR_INTERNAL_ERROR, "%s",
                  _("IVirtualBox object is null"));
860
        goto cleanup;
861 862 863
    }

    if (data->vboxSession == NULL) {
864 865
        vboxError(VIR_ERR_INTERNAL_ERROR, "%s",
                  _("ISession object is null"));
866 867
        goto cleanup;
    }
868 869 870 871 872 873 874

    return 0;

cleanup:
    return -1;
}

875
static int vboxExtractVersion(vboxGlobalData *data) {
876
    int ret = -1;
877 878 879 880 881 882 883 884 885 886
    PRUnichar *versionUtf16 = NULL;
    nsresult rc;

    if (data->version > 0)
        return 0;

    rc = data->vboxObj->vtbl->GetVersion(data->vboxObj, &versionUtf16);
    if (NS_SUCCEEDED(rc)) {
        char *vboxVersion = NULL;

887
        VBOX_UTF16_TO_UTF8(versionUtf16, &vboxVersion);
888

889
        if (virParseVersionString(vboxVersion, &data->version) >= 0)
890 891
            ret = 0;

892 893
        VBOX_UTF8_FREE(vboxVersion);
        VBOX_COM_UNALLOC_MEM(versionUtf16);
894 895 896
    }

    if (ret != 0)
897 898
        vboxError(VIR_ERR_INTERNAL_ERROR, "%s",
                  _("Cound not extract VirtualBox version"));
899

900 901 902 903
    return ret;
}

static void vboxUninitialize(vboxGlobalData *data) {
904 905 906
    if (!data)
        return;

907 908
    if (data->pFuncs)
        data->pFuncs->pfnComUninitialize();
909 910

    virCapabilitiesFree(data->caps);
911 912 913 914 915
#if VBOX_API_VERSION == 2002
    /* No domainEventCallbacks in 2.2.* version */
#else  /* !(VBOX_API_VERSION == 2002) */
    VIR_FREE(data->domainEventCallbacks);
#endif /* !(VBOX_API_VERSION == 2002) */
916 917 918 919 920 921
    VIR_FREE(data);
}

static virDrvOpenStatus vboxOpen(virConnectPtr conn,
                                 virConnectAuthPtr auth ATTRIBUTE_UNUSED,
                                 int flags ATTRIBUTE_UNUSED) {
922
    vboxGlobalData *data = NULL;
923 924 925 926 927
    uid_t uid = getuid();

    if (conn->uri == NULL) {
        conn->uri = xmlParseURI(uid ? "vbox:///session" : "vbox:///system");
        if (conn->uri == NULL) {
928
            virReportOOMError();
929 930 931 932
            return VIR_DRV_OPEN_ERROR;
        }
    }

933 934 935 936 937 938
    if (conn->uri->scheme == NULL ||
        STRNEQ (conn->uri->scheme, "vbox"))
        return VIR_DRV_OPEN_DECLINED;

    /* Leave for remote driver */
    if (conn->uri->server != NULL)
939 940
        return VIR_DRV_OPEN_DECLINED;

941
    if (conn->uri->path == NULL || STREQ(conn->uri->path, "")) {
942
        vboxError(VIR_ERR_INTERNAL_ERROR, "%s",
943 944 945 946
                  _("no VirtualBox driver path specified (try vbox:///session)"));
        return VIR_DRV_OPEN_ERROR;
    }

947
    if (uid != 0) {
948
        if (STRNEQ (conn->uri->path, "/session")) {
949
            vboxError(VIR_ERR_INTERNAL_ERROR,
950 951 952
                      _("unknown driver path '%s' specified (try vbox:///session)"), conn->uri->path);
            return VIR_DRV_OPEN_ERROR;
        }
953 954
    } else { /* root */
        if (STRNEQ (conn->uri->path, "/system") &&
955
            STRNEQ (conn->uri->path, "/session")) {
956
            vboxError(VIR_ERR_INTERNAL_ERROR,
957 958 959
                      _("unknown driver path '%s' specified (try vbox:///system)"), conn->uri->path);
            return VIR_DRV_OPEN_ERROR;
        }
960 961 962
    }

    if (VIR_ALLOC(data) < 0) {
963
        virReportOOMError();
964
        return VIR_DRV_OPEN_ERROR;
965 966
    }

967
    if (!(data->caps = vboxCapsInit()) ||
968 969
        vboxInitialize(data) < 0 ||
        vboxExtractVersion(data) < 0) {
970 971 972
        vboxUninitialize(data);
        return VIR_DRV_OPEN_ERROR;
    }
973

974 975 976 977 978 979 980
#if VBOX_API_VERSION == 2002

    /* No domainEventCallbacks in 2.2.* version */

#else  /* !(VBOX_API_VERSION == 2002) */

    if (VIR_ALLOC(data->domainEventCallbacks) < 0) {
981
        virReportOOMError();
982 983 984 985 986 987 988 989
        return VIR_DRV_OPEN_ERROR;
    }

    data->conn = conn;
    g_pVBoxGlobalData = data;

#endif /* !(VBOX_API_VERSION == 2002) */

990 991 992 993 994 995 996 997 998 999 1000 1001 1002 1003 1004 1005 1006 1007 1008 1009 1010 1011 1012 1013 1014 1015 1016
    conn->privateData = data;
    DEBUG0("in vboxOpen");

    return VIR_DRV_OPEN_SUCCESS;
}

static int vboxClose(virConnectPtr conn) {
    vboxGlobalData *data = conn->privateData;
    DEBUG("%s: in vboxClose",conn->driver->name);

    vboxUninitialize(data);
    conn->privateData = NULL;

    return 0;
}

static int vboxGetVersion(virConnectPtr conn, unsigned long *version) {
    vboxGlobalData *data = conn->privateData;
    DEBUG("%s: in vboxGetVersion",conn->driver->name);

    vboxDriverLock(data);
    *version = data->version;
    vboxDriverUnlock(data);

    return 0;
}

1017 1018 1019 1020 1021 1022 1023 1024 1025 1026
static int vboxIsSecure(virConnectPtr conn ATTRIBUTE_UNUSED) {
    /* Driver is using local, non-network based transport */
    return 1;
}

static int vboxIsEncrypted(virConnectPtr conn ATTRIBUTE_UNUSED) {
    /* No encryption is needed, or used on the local transport*/
    return 0;
}

1027
static int vboxGetMaxVcpus(virConnectPtr conn, const char *type ATTRIBUTE_UNUSED) {
1028
    VBOX_OBJECT_CHECK(conn, int, -1);
1029 1030 1031 1032 1033
    PRUint32 maxCPUCount = 0;

    /* VirtualBox Supports only hvm and thus the type passed to it
     * has no meaning, setting it to ATTRIBUTE_UNUSED
     */
1034
    ISystemProperties *systemProperties = NULL;
1035

1036 1037 1038 1039
    data->vboxObj->vtbl->GetSystemProperties(data->vboxObj, &systemProperties);
    if (systemProperties) {
        systemProperties->vtbl->GetMaxGuestCPUCount(systemProperties, &maxCPUCount);
        VBOX_RELEASE(systemProperties);
1040 1041 1042 1043 1044 1045 1046 1047 1048 1049
    }

    if (maxCPUCount > 0)
        ret = maxCPUCount;

    return ret;
}


static char *vboxGetCapabilities(virConnectPtr conn) {
1050
    VBOX_OBJECT_CHECK(conn, char *, NULL);
1051 1052 1053 1054 1055 1056 1057 1058 1059

    vboxDriverLock(data);
    ret = virCapabilitiesFormatXML(data->caps);
    vboxDriverUnlock(data);

    return ret;
}

static int vboxListDomains(virConnectPtr conn, int *ids, int nids) {
1060
    VBOX_OBJECT_CHECK(conn, int, -1);
1061
    vboxArray machines = VBOX_ARRAY_INITIALIZER;
1062
    PRUint32 state;
1063
    nsresult rc;
1064 1065
    int i, j;

1066
    rc = vboxArrayGet(&machines, data->vboxObj, data->vboxObj->vtbl->GetMachines);
1067
    if (NS_FAILED(rc)) {
1068 1069
        vboxError(VIR_ERR_INTERNAL_ERROR,
                  _("Could not get list of Domains, rc=%08x"),(unsigned)rc);
1070 1071
        goto cleanup;
    }
1072

1073 1074 1075
    ret = 0;
    for (i = 0, j = 0; (i < machines.count) && (j < nids); ++i) {
        IMachine *machine = machines.items[i];
1076 1077 1078 1079 1080 1081 1082 1083 1084 1085

        if (machine) {
            PRBool isAccessible = PR_FALSE;
            machine->vtbl->GetAccessible(machine, &isAccessible);
            if (isAccessible) {
                machine->vtbl->GetState(machine, &state);
                if (   (state >= MachineState_FirstOnline)
                    && (state <= MachineState_LastOnline) ) {
                    ret++;
                    ids[j++] = i + 1;
1086 1087 1088 1089 1090 1091
                }
            }
        }
    }

cleanup:
1092
    vboxArrayRelease(&machines);
1093 1094 1095 1096
    return ret;
}

static int vboxNumOfDomains(virConnectPtr conn) {
1097
    VBOX_OBJECT_CHECK(conn, int, -1);
1098
    vboxArray machines = VBOX_ARRAY_INITIALIZER;
1099
    PRUint32 state;
1100
    nsresult rc;
1101 1102
    int i;

1103
    rc = vboxArrayGet(&machines, data->vboxObj, data->vboxObj->vtbl->GetMachines);
1104
    if (NS_FAILED(rc)) {
1105 1106
        vboxError(VIR_ERR_INTERNAL_ERROR,
                  _("Could not get number of Domains, rc=%08x"), (unsigned)rc);
1107 1108
        goto cleanup;
    }
1109

1110 1111 1112
    ret = 0;
    for (i = 0; i < machines.count; ++i) {
        IMachine *machine = machines.items[i];
1113 1114 1115 1116 1117 1118 1119 1120 1121

        if (machine) {
            PRBool isAccessible = PR_FALSE;
            machine->vtbl->GetAccessible(machine, &isAccessible);
            if (isAccessible) {
                machine->vtbl->GetState(machine, &state);
                if (   (state >= MachineState_FirstOnline)
                    && (state <= MachineState_LastOnline) )
                    ret++;
1122 1123 1124 1125 1126
            }
        }
    }

cleanup:
1127
    vboxArrayRelease(&machines);
1128 1129 1130 1131
    return ret;
}

static virDomainPtr vboxDomainCreateXML(virConnectPtr conn, const char *xml,
1132
                                        unsigned int flags) {
1133 1134 1135 1136 1137 1138 1139 1140
    /* VirtualBox currently doesn't have support for running
     * virtual machines without actually defining them and thus
     * for time being just define new machine and start it.
     *
     * TODO: After the appropriate API's are added in VirtualBox
     * change this behaviour to the expected one.
     */

1141 1142 1143 1144 1145
    virDomainPtr dom;

    virCheckFlags(0, NULL);

    dom = vboxDomainDefineXML(conn, xml);
1146 1147 1148 1149 1150
    if (dom == NULL)
        return NULL;

    if (vboxDomainCreate(dom) < 0) {
        vboxDomainUndefine(dom);
1151
        virUnrefDomain(dom);
1152
        return NULL;
1153 1154 1155 1156 1157 1158
    }

    return dom;
}

static virDomainPtr vboxDomainLookupByID(virConnectPtr conn, int id) {
1159
    VBOX_OBJECT_CHECK(conn, virDomainPtr, NULL);
1160
    vboxArray machines = VBOX_ARRAY_INITIALIZER;
1161 1162
    vboxIID iid = VBOX_IID_INITIALIZER;
    unsigned char uuid[VIR_UUID_BUFLEN];
1163
    PRUint32 state;
1164
    nsresult rc;
1165

1166 1167 1168
    /* Internal vbox IDs start from 0, the public libvirt ID
     * starts from 1, so refuse id==0, and adjust the rest*/
    if (id == 0) {
1169
        vboxError(VIR_ERR_NO_DOMAIN,
1170 1171 1172 1173 1174
                  _("no domain with matching id %d"), id);
        return NULL;
    }
    id = id - 1;

1175
    rc = vboxArrayGet(&machines, data->vboxObj, data->vboxObj->vtbl->GetMachines);
1176
    if (NS_FAILED(rc)) {
1177 1178
        vboxError(VIR_ERR_INTERNAL_ERROR,
                  _("Could not get list of machines, rc=%08x"), (unsigned)rc);
1179 1180
        return NULL;
    }
1181

1182 1183 1184 1185
    if (id < machines.count) {
        IMachine *machine = machines.items[id];

        if (machine) {
1186
            PRBool isAccessible = PR_FALSE;
1187
            machine->vtbl->GetAccessible(machine, &isAccessible);
1188
            if (isAccessible) {
1189
                machine->vtbl->GetState(machine, &state);
1190 1191 1192 1193
                if (   (state >= MachineState_FirstOnline)
                    && (state <= MachineState_LastOnline) ) {
                    PRUnichar *machineNameUtf16 = NULL;
                    char      *machineNameUtf8  = NULL;
1194

1195
                    machine->vtbl->GetName(machine, &machineNameUtf16);
1196
                    VBOX_UTF16_TO_UTF8(machineNameUtf16, &machineNameUtf8);
1197

1198 1199 1200
                    machine->vtbl->GetId(machine, &iid.value);
                    vboxIIDToUUID(&iid, uuid);
                    vboxIIDUnalloc(&iid);
1201 1202 1203 1204 1205 1206 1207

                    /* get a new domain pointer from virGetDomain, if it fails
                     * then no need to assign the id, else assign the id, cause
                     * it is -1 by default. rest is taken care by virGetDomain
                     * itself, so need not worry.
                     */

1208
                    ret = virGetDomain(conn, machineNameUtf8, uuid);
1209 1210 1211 1212 1213 1214
                    if (ret)
                        ret->id = id + 1;

                    /* Cleanup all the XPCOM allocated stuff here */
                    VBOX_UTF8_FREE(machineNameUtf8);
                    VBOX_UTF16_FREE(machineNameUtf16);
1215 1216 1217 1218 1219
                }
            }
        }
    }

1220
    vboxArrayRelease(&machines);
1221 1222

    return ret;
1223 1224 1225
}

static virDomainPtr vboxDomainLookupByUUID(virConnectPtr conn, const unsigned char *uuid) {
1226
    VBOX_OBJECT_CHECK(conn, virDomainPtr, NULL);
1227
    vboxArray machines = VBOX_ARRAY_INITIALIZER;
1228
    vboxIID iid = VBOX_IID_INITIALIZER;
1229
    char      *machineNameUtf8  = NULL;
1230
    PRUnichar *machineNameUtf16 = NULL;
1231
    unsigned char iid_as_uuid[VIR_UUID_BUFLEN];
1232
    int i, matched = 0;
1233
    nsresult rc;
1234

1235
    rc = vboxArrayGet(&machines, data->vboxObj, data->vboxObj->vtbl->GetMachines);
1236
    if (NS_FAILED(rc)) {
1237 1238
        vboxError(VIR_ERR_INTERNAL_ERROR,
                  _("Could not get list of machines, rc=%08x"), (unsigned)rc);
1239 1240
        return NULL;
    }
1241

1242 1243
    for (i = 0; i < machines.count; ++i) {
        IMachine *machine = machines.items[i];
1244
        PRBool isAccessible = PR_FALSE;
1245

1246 1247
        if (!machine)
            continue;
1248

1249 1250
        machine->vtbl->GetAccessible(machine, &isAccessible);
        if (isAccessible) {
1251

1252 1253
            rc = machine->vtbl->GetId(machine, &iid.value);
            if (NS_FAILED(rc))
1254
                continue;
1255 1256
            vboxIIDToUUID(&iid, iid_as_uuid);
            vboxIIDUnalloc(&iid);
1257

1258
            if (memcmp(uuid, iid_as_uuid, VIR_UUID_BUFLEN) == 0) {
1259

1260
                PRUint32 state;
1261

1262
                matched = 1;
1263

1264 1265
                machine->vtbl->GetName(machine, &machineNameUtf16);
                VBOX_UTF16_TO_UTF8(machineNameUtf16, &machineNameUtf8);
1266

1267
                machine->vtbl->GetState(machine, &state);
1268

1269 1270 1271 1272 1273
                /* get a new domain pointer from virGetDomain, if it fails
                 * then no need to assign the id, else assign the id, cause
                 * it is -1 by default. rest is taken care by virGetDomain
                 * itself, so need not worry.
                 */
1274

1275
                ret = virGetDomain(conn, machineNameUtf8, iid_as_uuid);
1276 1277 1278 1279
                if (   ret
                    && (state >= MachineState_FirstOnline)
                    && (state <= MachineState_LastOnline) )
                    ret->id = i + 1;
1280 1281
            }

1282 1283
            if (matched == 1)
                break;
1284 1285 1286
        }
    }

1287 1288 1289
    /* Do the cleanup and take care you dont leak any memory */
    VBOX_UTF8_FREE(machineNameUtf8);
    VBOX_COM_UNALLOC_MEM(machineNameUtf16);
1290
    vboxArrayRelease(&machines);
1291 1292

    return ret;
1293 1294 1295
}

static virDomainPtr vboxDomainLookupByName(virConnectPtr conn, const char *name) {
1296
    VBOX_OBJECT_CHECK(conn, virDomainPtr, NULL);
1297
    vboxArray machines = VBOX_ARRAY_INITIALIZER;
1298
    vboxIID iid = VBOX_IID_INITIALIZER;
1299
    char      *machineNameUtf8  = NULL;
1300
    PRUnichar *machineNameUtf16 = NULL;
1301
    unsigned char uuid[VIR_UUID_BUFLEN];
1302
    int i, matched = 0;
1303
    nsresult rc;
1304

1305
    rc = vboxArrayGet(&machines, data->vboxObj, data->vboxObj->vtbl->GetMachines);
1306
    if (NS_FAILED(rc)) {
1307 1308
        vboxError(VIR_ERR_INTERNAL_ERROR,
                  _("Could not get list of machines, rc=%08x"), (unsigned)rc);
1309 1310
        return NULL;
    }
1311

1312 1313
    for (i = 0; i < machines.count; ++i) {
        IMachine *machine = machines.items[i];
1314
        PRBool isAccessible = PR_FALSE;
1315

1316 1317
        if (!machine)
            continue;
1318

1319 1320
        machine->vtbl->GetAccessible(machine, &isAccessible);
        if (isAccessible) {
1321

1322 1323
            machine->vtbl->GetName(machine, &machineNameUtf16);
            VBOX_UTF16_TO_UTF8(machineNameUtf16, &machineNameUtf8);
1324

1325
            if (STREQ(name, machineNameUtf8)) {
1326

1327
                PRUint32 state;
1328

1329
                matched = 1;
1330

1331 1332 1333
                machine->vtbl->GetId(machine, &iid.value);
                vboxIIDToUUID(&iid, uuid);
                vboxIIDUnalloc(&iid);
1334

1335
                machine->vtbl->GetState(machine, &state);
1336

1337 1338 1339 1340 1341
                /* get a new domain pointer from virGetDomain, if it fails
                 * then no need to assign the id, else assign the id, cause
                 * it is -1 by default. rest is taken care by virGetDomain
                 * itself, so need not worry.
                 */
1342

1343
                ret = virGetDomain(conn, machineNameUtf8, uuid);
1344 1345 1346 1347
                if (   ret
                    && (state >= MachineState_FirstOnline)
                    && (state <= MachineState_LastOnline) )
                    ret->id = i + 1;
1348 1349
            }

1350 1351 1352 1353 1354 1355 1356 1357 1358 1359
            if (machineNameUtf8) {
                VBOX_UTF8_FREE(machineNameUtf8);
                machineNameUtf8 = NULL;
            }
            if (machineNameUtf16) {
                VBOX_COM_UNALLOC_MEM(machineNameUtf16);
                machineNameUtf16 = NULL;
            }
            if (matched == 1)
                break;
1360 1361 1362
        }
    }

1363
    vboxArrayRelease(&machines);
1364 1365

    return ret;
1366 1367
}

1368 1369

static int vboxDomainIsActive(virDomainPtr dom) {
1370
    VBOX_OBJECT_CHECK(dom->conn, int, -1);
1371
    vboxArray machines = VBOX_ARRAY_INITIALIZER;
1372
    vboxIID iid = VBOX_IID_INITIALIZER;
1373 1374
    char      *machineNameUtf8  = NULL;
    PRUnichar *machineNameUtf16 = NULL;
1375
    unsigned char uuid[VIR_UUID_BUFLEN];
1376
    int i, matched = 0;
1377
    nsresult rc;
1378

1379
    rc = vboxArrayGet(&machines, data->vboxObj, data->vboxObj->vtbl->GetMachines);
1380
    if (NS_FAILED(rc)) {
1381 1382
        vboxError(VIR_ERR_INTERNAL_ERROR,
                  _("Could not get list of machines, rc=%08x"), (unsigned)rc);
1383 1384
        return ret;
    }
1385

1386 1387
    for (i = 0; i < machines.count; ++i) {
        IMachine *machine = machines.items[i];
1388 1389 1390 1391 1392 1393 1394
        PRBool isAccessible = PR_FALSE;

        if (!machine)
            continue;

        machine->vtbl->GetAccessible(machine, &isAccessible);
        if (isAccessible) {
1395

1396 1397
            rc = machine->vtbl->GetId(machine, &iid.value);
            if (NS_FAILED(rc))
1398
                continue;
1399 1400
            vboxIIDToUUID(&iid, uuid);
            vboxIIDUnalloc(&iid);
1401

1402
            if (memcmp(dom->uuid, uuid, VIR_UUID_BUFLEN) == 0) {
1403

1404
                PRUint32 state;
1405

1406
                matched = 1;
1407

1408 1409
                machine->vtbl->GetName(machine, &machineNameUtf16);
                VBOX_UTF16_TO_UTF8(machineNameUtf16, &machineNameUtf8);
1410

1411
                machine->vtbl->GetState(machine, &state);
1412

1413 1414 1415 1416 1417
                if (   (state >= MachineState_FirstOnline)
                    && (state <= MachineState_LastOnline) )
                    ret = 1;
                else
                    ret = 0;
1418 1419
            }

1420 1421
            if (matched == 1)
                break;
1422 1423 1424
        }
    }

1425 1426 1427
    /* Do the cleanup and take care you dont leak any memory */
    VBOX_UTF8_FREE(machineNameUtf8);
    VBOX_COM_UNALLOC_MEM(machineNameUtf16);
1428
    vboxArrayRelease(&machines);
1429

1430 1431 1432 1433 1434
    return ret;
}


static int vboxDomainIsPersistent(virDomainPtr dom ATTRIBUTE_UNUSED) {
1435
    /* All domains are persistent. */
1436 1437 1438 1439
    return 1;
}


1440 1441 1442 1443
static int vboxDomainIsUpdated(virDomainPtr dom ATTRIBUTE_UNUSED) {
    return 0;
}

1444
static int vboxDomainSuspend(virDomainPtr dom) {
1445
    VBOX_OBJECT_CHECK(dom->conn, int, -1);
1446
    IMachine *machine    = NULL;
1447
    vboxIID iid = VBOX_IID_INITIALIZER;
1448
    IConsole *console    = NULL;
1449
    PRBool isAccessible  = PR_FALSE;
1450
    PRUint32 state;
1451
    nsresult rc;
1452

1453 1454
    vboxIIDFromUUID(&iid, dom->uuid);
    rc = data->vboxObj->vtbl->GetMachine(data->vboxObj, iid.value, &machine);
1455
    if (NS_FAILED(rc)) {
1456
        vboxError(VIR_ERR_INVALID_DOMAIN,
1457
                  _("no domain with matching id %d"), dom->id);
1458 1459
        goto cleanup;
    }
1460

1461 1462
    if (!machine)
        goto cleanup;
1463

1464 1465 1466
    machine->vtbl->GetAccessible(machine, &isAccessible);
    if (isAccessible) {
        machine->vtbl->GetState(machine, &state);
1467

1468 1469
        if (state == MachineState_Running) {
             /* set state pause */
1470
            data->vboxObj->vtbl->OpenExistingSession(data->vboxObj, data->vboxSession, iid.value);
1471 1472 1473 1474 1475
            data->vboxSession->vtbl->GetConsole(data->vboxSession, &console);
            if (console) {
                console->vtbl->Pause(console);
                VBOX_RELEASE(console);
                ret = 0;
1476
            } else {
1477 1478
                vboxError(VIR_ERR_OPERATION_FAILED, "%s",
                          _("error while suspending the domain"));
1479 1480
                goto cleanup;
            }
1481 1482
            data->vboxSession->vtbl->Close(data->vboxSession);
        } else {
1483 1484
            vboxError(VIR_ERR_OPERATION_FAILED, "%s",
                      _("machine not in running state to suspend it"));
1485
            goto cleanup;
1486 1487 1488 1489
        }
    }

cleanup:
1490
    VBOX_RELEASE(machine);
1491
    vboxIIDUnalloc(&iid);
1492 1493 1494 1495
    return ret;
}

static int vboxDomainResume(virDomainPtr dom) {
1496
    VBOX_OBJECT_CHECK(dom->conn, int, -1);
1497
    IMachine *machine    = NULL;
1498
    vboxIID iid = VBOX_IID_INITIALIZER;
1499 1500
    IConsole *console    = NULL;
    PRUint32 state       = MachineState_Null;
1501
    nsresult rc;
1502

1503
    PRBool isAccessible = PR_FALSE;
1504

1505 1506
    vboxIIDFromUUID(&iid, dom->uuid);
    rc = data->vboxObj->vtbl->GetMachine(data->vboxObj, iid.value, &machine);
1507
    if (NS_FAILED(rc)) {
1508
        vboxError(VIR_ERR_INVALID_DOMAIN,
1509
                  _("no domain with matching id %d"), dom->id);
1510 1511
        goto cleanup;
    }
1512

1513 1514
    if (!machine)
        goto cleanup;
1515

1516 1517 1518 1519 1520 1521
    machine->vtbl->GetAccessible(machine, &isAccessible);
    if (isAccessible) {
        machine->vtbl->GetState(machine, &state);

        if (state == MachineState_Paused) {
             /* resume the machine here */
1522
            data->vboxObj->vtbl->OpenExistingSession(data->vboxObj, data->vboxSession, iid.value);
1523 1524 1525 1526 1527
            data->vboxSession->vtbl->GetConsole(data->vboxSession, &console);
            if (console) {
                console->vtbl->Resume(console);
                VBOX_RELEASE(console);
                ret = 0;
1528
            } else {
1529 1530
                vboxError(VIR_ERR_OPERATION_FAILED, "%s",
                          _("error while resuming the domain"));
1531 1532
                goto cleanup;
            }
1533 1534
            data->vboxSession->vtbl->Close(data->vboxSession);
        } else {
1535 1536
            vboxError(VIR_ERR_OPERATION_FAILED, "%s",
                      _("machine not paused, so can't resume it"));
1537
            goto cleanup;
1538 1539 1540 1541
        }
    }

cleanup:
1542
    VBOX_RELEASE(machine);
1543
    vboxIIDUnalloc(&iid);
1544 1545 1546 1547
    return ret;
}

static int vboxDomainShutdown(virDomainPtr dom) {
1548
    VBOX_OBJECT_CHECK(dom->conn, int, -1);
1549
    IMachine *machine    = NULL;
1550
    vboxIID iid = VBOX_IID_INITIALIZER;
1551 1552
    IConsole *console    = NULL;
    PRUint32 state       = MachineState_Null;
1553 1554
    PRBool isAccessible  = PR_FALSE;
    nsresult rc;
1555

1556 1557
    vboxIIDFromUUID(&iid, dom->uuid);
    rc = data->vboxObj->vtbl->GetMachine(data->vboxObj, iid.value, &machine);
1558
    if (NS_FAILED(rc)) {
1559
        vboxError(VIR_ERR_INVALID_DOMAIN,
1560
                  _("no domain with matching id %d"), dom->id);
1561 1562
        goto cleanup;
    }
1563

1564 1565
    if (!machine)
        goto cleanup;
1566

1567 1568 1569
    machine->vtbl->GetAccessible(machine, &isAccessible);
    if (isAccessible) {
        machine->vtbl->GetState(machine, &state);
1570

1571
        if (state == MachineState_Paused) {
1572 1573
            vboxError(VIR_ERR_OPERATION_FAILED, "%s",
                      _("machine paused, so can't power it down"));
1574 1575
            goto cleanup;
        } else if (state == MachineState_PoweredOff) {
1576 1577
            vboxError(VIR_ERR_OPERATION_FAILED, "%s",
                      _("machine already powered down"));
1578 1579
            goto cleanup;
        }
1580

1581
        data->vboxObj->vtbl->OpenExistingSession(data->vboxObj, data->vboxSession, iid.value);
1582 1583 1584 1585 1586
        data->vboxSession->vtbl->GetConsole(data->vboxSession, &console);
        if (console) {
            console->vtbl->PowerButton(console);
            VBOX_RELEASE(console);
            ret = 0;
1587
        }
1588
        data->vboxSession->vtbl->Close(data->vboxSession);
1589 1590 1591
    }

cleanup:
1592
    VBOX_RELEASE(machine);
1593
    vboxIIDUnalloc(&iid);
1594 1595 1596 1597
    return ret;
}

static int vboxDomainReboot(virDomainPtr dom, unsigned int flags ATTRIBUTE_UNUSED) {
1598
    VBOX_OBJECT_CHECK(dom->conn, int, -1);
1599
    IMachine *machine    = NULL;
1600
    vboxIID iid = VBOX_IID_INITIALIZER;
1601 1602
    IConsole *console    = NULL;
    PRUint32 state       = MachineState_Null;
1603 1604
    PRBool isAccessible  = PR_FALSE;
    nsresult rc;
1605

1606 1607
    vboxIIDFromUUID(&iid, dom->uuid);
    rc = data->vboxObj->vtbl->GetMachine(data->vboxObj, iid.value, &machine);
1608
    if (NS_FAILED(rc)) {
1609
        vboxError(VIR_ERR_INVALID_DOMAIN,
1610
                  _("no domain with matching id %d"), dom->id);
1611 1612
        goto cleanup;
    }
1613

1614 1615
    if (!machine)
        goto cleanup;
1616

1617 1618 1619
    machine->vtbl->GetAccessible(machine, &isAccessible);
    if (isAccessible) {
        machine->vtbl->GetState(machine, &state);
1620

1621
        if (state == MachineState_Running) {
1622
            data->vboxObj->vtbl->OpenExistingSession(data->vboxObj, data->vboxSession, iid.value);
1623 1624 1625 1626 1627
            data->vboxSession->vtbl->GetConsole(data->vboxSession, &console);
            if (console) {
                console->vtbl->Reset(console);
                VBOX_RELEASE(console);
                ret = 0;
1628
            }
1629 1630
            data->vboxSession->vtbl->Close(data->vboxSession);
        } else {
1631 1632
            vboxError(VIR_ERR_OPERATION_FAILED, "%s",
                      _("machine not running, so can't reboot it"));
1633
            goto cleanup;
1634 1635 1636 1637
        }
    }

cleanup:
1638
    VBOX_RELEASE(machine);
1639
    vboxIIDUnalloc(&iid);
1640 1641 1642 1643
    return ret;
}

static int vboxDomainDestroy(virDomainPtr dom) {
1644
    VBOX_OBJECT_CHECK(dom->conn, int, -1);
1645
    IMachine *machine    = NULL;
1646
    vboxIID iid = VBOX_IID_INITIALIZER;
1647 1648
    IConsole *console    = NULL;
    PRUint32 state       = MachineState_Null;
1649 1650
    PRBool isAccessible  = PR_FALSE;
    nsresult rc;
1651

1652 1653
    vboxIIDFromUUID(&iid, dom->uuid);
    rc = data->vboxObj->vtbl->GetMachine(data->vboxObj, iid.value, &machine);
1654
    if (NS_FAILED(rc)) {
1655
        vboxError(VIR_ERR_INVALID_DOMAIN,
1656
                  _("no domain with matching id %d"), dom->id);
1657 1658
        goto cleanup;
    }
1659

1660 1661
    if (!machine)
        goto cleanup;
1662

1663 1664 1665
    machine->vtbl->GetAccessible(machine, &isAccessible);
    if (isAccessible) {
        machine->vtbl->GetState(machine, &state);
1666

1667
        if (state == MachineState_PoweredOff) {
1668 1669
            vboxError(VIR_ERR_OPERATION_FAILED, "%s",
                      _("machine already powered down"));
1670 1671
            goto cleanup;
        }
1672

1673
        data->vboxObj->vtbl->OpenExistingSession(data->vboxObj, data->vboxSession, iid.value);
1674 1675
        data->vboxSession->vtbl->GetConsole(data->vboxSession, &console);
        if (console) {
1676 1677

#if VBOX_API_VERSION == 2002
1678
            console->vtbl->PowerDown(console);
1679
#else
1680
            IProgress *progress = NULL;
1681 1682 1683 1684
            console->vtbl->PowerDown(console, &progress);
            if (progress) {
                progress->vtbl->WaitForCompletion(progress, -1);
                VBOX_RELEASE(progress);
1685
            }
1686 1687
#endif
            VBOX_RELEASE(console);
1688
            dom->id = -1;
1689
            ret = 0;
1690
        }
1691
        data->vboxSession->vtbl->Close(data->vboxSession);
1692 1693 1694
    }

cleanup:
1695
    VBOX_RELEASE(machine);
1696
    vboxIIDUnalloc(&iid);
1697 1698 1699
    return ret;
}

1700
static char *vboxDomainGetOSType(virDomainPtr dom ATTRIBUTE_UNUSED) {
1701 1702 1703 1704 1705
    /* Returning "hvm" always as suggested on list, cause
     * this functions seems to be badly named and it
     * is supposed to pass the ABI name and not the domain
     * operating system driver as I had imagined ;)
     */
1706 1707 1708
    char *osType = strdup("hvm");

    if (osType == NULL)
1709
        virReportOOMError();
1710 1711

    return osType;
1712 1713 1714
}

static int vboxDomainSetMemory(virDomainPtr dom, unsigned long memory) {
1715
    VBOX_OBJECT_CHECK(dom->conn, int, -1);
1716
    IMachine *machine    = NULL;
1717
    vboxIID iid = VBOX_IID_INITIALIZER;
1718
    PRUint32 state       = MachineState_Null;
1719 1720
    PRBool isAccessible  = PR_FALSE;
    nsresult rc;
1721

1722 1723
    vboxIIDFromUUID(&iid, dom->uuid);
    rc = data->vboxObj->vtbl->GetMachine(data->vboxObj, iid.value, &machine);
1724
    if (NS_FAILED(rc)) {
1725
        vboxError(VIR_ERR_INVALID_DOMAIN,
1726
                  _("no domain with matching id %d"), dom->id);
1727 1728
        goto cleanup;
    }
1729

1730 1731
    if (!machine)
        goto cleanup;
1732

1733 1734 1735
    machine->vtbl->GetAccessible(machine, &isAccessible);
    if (isAccessible) {
        machine->vtbl->GetState(machine, &state);
1736

1737
        if (state != MachineState_PoweredOff) {
1738 1739
            vboxError(VIR_ERR_OPERATION_FAILED, "%s",
                      _("memory size can't be changed unless domain is powered down"));
1740 1741
            goto cleanup;
        }
1742

1743
        rc = data->vboxObj->vtbl->OpenSession(data->vboxObj, data->vboxSession, iid.value);
1744 1745 1746
        if (NS_SUCCEEDED(rc)) {
            rc = data->vboxSession->vtbl->GetMachine(data->vboxSession, &machine);
            if (NS_SUCCEEDED(rc) && machine) {
1747

1748 1749 1750 1751 1752
                rc = machine->vtbl->SetMemorySize(machine, memory / 1024);
                if (NS_SUCCEEDED(rc)) {
                    machine->vtbl->SaveSettings(machine);
                    ret = 0;
                } else {
1753 1754 1755
                    vboxError(VIR_ERR_INTERNAL_ERROR,
                              _("could not set the memory size of the "
                                "domain to: %lu Kb, rc=%08x"),
1756
                              memory, (unsigned)rc);
1757 1758
                }
            }
1759
            data->vboxSession->vtbl->Close(data->vboxSession);
1760 1761 1762 1763
        }
    }

cleanup:
1764
    VBOX_RELEASE(machine);
1765
    vboxIIDUnalloc(&iid);
1766 1767 1768 1769
    return ret;
}

static int vboxDomainGetInfo(virDomainPtr dom, virDomainInfoPtr info) {
1770
    VBOX_OBJECT_CHECK(dom->conn, int, -1);
1771
    vboxArray machines = VBOX_ARRAY_INITIALIZER;
1772 1773
    char *machineName    = NULL;
    PRUnichar *machineNameUtf16 = NULL;
1774 1775
    nsresult rc;
    int i = 0;
1776

1777
    rc = vboxArrayGet(&machines, data->vboxObj, data->vboxObj->vtbl->GetMachines);
1778
    if (NS_FAILED(rc)) {
1779 1780
        vboxError(VIR_ERR_INTERNAL_ERROR,
                  _("Could not get list of machines, rc=%08x"), (unsigned)rc);
1781 1782
        goto cleanup;
    }
1783

1784
    info->nrVirtCpu = 0;
1785 1786
    for (i = 0; i < machines.count; ++i) {
        IMachine *machine = machines.items[i];
1787
        PRBool isAccessible = PR_FALSE;
1788

1789 1790
        if (!machine)
            continue;
1791

1792 1793
        machine->vtbl->GetAccessible(machine, &isAccessible);
        if (isAccessible) {
1794

1795 1796 1797 1798 1799 1800
            machine->vtbl->GetName(machine, &machineNameUtf16);
            VBOX_UTF16_TO_UTF8(machineNameUtf16, &machineName);

            if (STREQ(dom->name, machineName)) {
                /* Get the Machine State (also match it with
                * virDomainState). Get the Machine memory and
1801
                * for time being set max_balloon and cur_balloon to same
1802 1803 1804 1805 1806 1807 1808 1809 1810 1811 1812 1813 1814 1815 1816 1817 1818
                * Also since there is no direct way of checking
                * the cputime required (one condition being the
                * VM is remote), return zero for cputime. Get the
                * number of CPU.
                */
                PRUint32 CPUCount   = 0;
                PRUint32 memorySize = 0;
                PRUint32 state      = MachineState_Null;
                PRUint32 maxMemorySize = 4 * 1024;
                ISystemProperties *systemProperties = NULL;

                data->vboxObj->vtbl->GetSystemProperties(data->vboxObj, &systemProperties);
                if (systemProperties) {
                    systemProperties->vtbl->GetMaxGuestRAM(systemProperties, &maxMemorySize);
                    VBOX_RELEASE(systemProperties);
                    systemProperties = NULL;
                }
1819 1820


1821 1822 1823 1824 1825 1826
                machine->vtbl->GetCPUCount(machine, &CPUCount);
                machine->vtbl->GetMemorySize(machine, &memorySize);
                machine->vtbl->GetState(machine, &state);

                info->cpuTime = 0;
                info->nrVirtCpu = CPUCount;
1827 1828
                info->memory = memorySize * 1024;
                info->maxMem = maxMemorySize * 1024;
1829 1830 1831 1832 1833 1834 1835 1836 1837 1838 1839 1840 1841 1842 1843 1844 1845 1846 1847 1848 1849 1850 1851
                switch(state) {
                    case MachineState_Running:
                        info->state = VIR_DOMAIN_RUNNING;
                        break;
                    case MachineState_Stuck:
                        info->state = VIR_DOMAIN_BLOCKED;
                        break;
                    case MachineState_Paused:
                        info->state = VIR_DOMAIN_PAUSED;
                        break;
                    case MachineState_Stopping:
                        info->state = VIR_DOMAIN_SHUTDOWN;
                        break;
                    case MachineState_PoweredOff:
                        info->state = VIR_DOMAIN_SHUTOFF;
                        break;
                    case MachineState_Aborted:
                        info->state = VIR_DOMAIN_CRASHED;
                        break;
                    case MachineState_Null:
                    default:
                        info->state = VIR_DOMAIN_NOSTATE;
                        break;
1852 1853
                }

1854
                ret = 0;
1855 1856
            }

1857 1858 1859 1860 1861 1862
            if (machineName)
                VBOX_UTF8_FREE(machineName);
            if (machineNameUtf16)
                VBOX_COM_UNALLOC_MEM(machineNameUtf16);
            if (info->nrVirtCpu)
                break;
1863 1864 1865 1866
        }

    }

1867
    vboxArrayRelease(&machines);
1868 1869 1870 1871 1872 1873

cleanup:
    return ret;
}

static int vboxDomainSave(virDomainPtr dom, const char *path ATTRIBUTE_UNUSED) {
1874
    VBOX_OBJECT_CHECK(dom->conn, int, -1);
1875
    IConsole *console    = NULL;
1876
    vboxIID iid = VBOX_IID_INITIALIZER;
1877
    nsresult rc;
1878 1879 1880 1881 1882 1883 1884 1885

    /* VirtualBox currently doesn't support saving to a file
     * at a location other then the machine folder and thus
     * setting path to ATTRIBUTE_UNUSED for now, will change
     * this behaviour once get the VirtualBox API in right
     * shape to do this
     */

1886
    /* Open a Session for the machine */
1887 1888
    vboxIIDFromUUID(&iid, dom->uuid);
    rc = data->vboxObj->vtbl->OpenExistingSession(data->vboxObj, data->vboxSession, iid.value);
1889 1890 1891 1892
    if (NS_SUCCEEDED(rc)) {
        rc = data->vboxSession->vtbl->GetConsole(data->vboxSession, &console);
        if (NS_SUCCEEDED(rc) && console) {
            IProgress *progress = NULL;
1893

1894
            console->vtbl->SaveState(console, &progress);
1895

1896
            if (progress) {
1897
#if VBOX_API_VERSION == 2002
1898
                nsresult resultCode;
1899
#else
1900
                PRInt32 resultCode;
1901
#endif
1902

1903 1904 1905 1906
                progress->vtbl->WaitForCompletion(progress, -1);
                progress->vtbl->GetResultCode(progress, &resultCode);
                if (NS_SUCCEEDED(resultCode)) {
                    ret = 0;
1907
                }
1908
                VBOX_RELEASE(progress);
1909
            }
1910
            VBOX_RELEASE(console);
1911
        }
1912
        data->vboxSession->vtbl->Close(data->vboxSession);
1913 1914
    }

1915
    DEBUGIID("UUID of machine being saved:", iid.value);
1916

1917
    vboxIIDUnalloc(&iid);
1918 1919 1920
    return ret;
}

1921 1922 1923 1924
static int
vboxDomainSetVcpusFlags(virDomainPtr dom, unsigned int nvcpus,
                        unsigned int flags)
{
1925
    VBOX_OBJECT_CHECK(dom->conn, int, -1);
1926
    IMachine *machine    = NULL;
1927
    vboxIID iid = VBOX_IID_INITIALIZER;
1928
    PRUint32  CPUCount   = nvcpus;
1929
    nsresult rc;
1930

1931 1932 1933 1934 1935
    if (flags != VIR_DOMAIN_VCPU_LIVE) {
        vboxError(VIR_ERR_INVALID_ARG, _("unsupported flags: (0x%x)"), flags);
        return -1;
    }

1936 1937
    vboxIIDFromUUID(&iid, dom->uuid);
    rc = data->vboxObj->vtbl->OpenSession(data->vboxObj, data->vboxSession, iid.value);
1938 1939 1940 1941 1942 1943 1944
    if (NS_SUCCEEDED(rc)) {
        data->vboxSession->vtbl->GetMachine(data->vboxSession, &machine);
        if (machine) {
            rc = machine->vtbl->SetCPUCount(machine, CPUCount);
            if (NS_SUCCEEDED(rc)) {
                machine->vtbl->SaveSettings(machine);
                ret = 0;
1945
            } else {
1946 1947 1948
                vboxError(VIR_ERR_INTERNAL_ERROR,
                          _("could not set the number of cpus of the domain "
                            "to: %u, rc=%08x"),
1949
                          CPUCount, (unsigned)rc);
1950
            }
1951
            VBOX_RELEASE(machine);
1952
        } else {
1953
            vboxError(VIR_ERR_INVALID_DOMAIN,
1954
                      _("no domain with matching id %d"), dom->id);
1955
        }
1956
    } else {
1957
        vboxError(VIR_ERR_INVALID_DOMAIN,
1958
                  _("can't open session to the domain with id %d"), dom->id);
1959
    }
1960
    data->vboxSession->vtbl->Close(data->vboxSession);
1961

1962
    vboxIIDUnalloc(&iid);
1963 1964 1965
    return ret;
}

1966 1967 1968 1969 1970 1971 1972 1973 1974
static int
vboxDomainSetVcpus(virDomainPtr dom, unsigned int nvcpus)
{
    return vboxDomainSetVcpusFlags(dom, nvcpus, VIR_DOMAIN_VCPU_LIVE);
}

static int
vboxDomainGetVcpusFlags(virDomainPtr dom, unsigned int flags)
{
1975 1976
    VBOX_OBJECT_CHECK(dom->conn, int, -1);
    ISystemProperties *systemProperties = NULL;
1977 1978
    PRUint32 maxCPUCount = 0;

1979 1980 1981 1982 1983
    if (flags != (VIR_DOMAIN_VCPU_LIVE | VIR_DOMAIN_VCPU_MAXIMUM)) {
        vboxError(VIR_ERR_INVALID_ARG, _("unsupported flags: (0x%x)"), flags);
        return -1;
    }

1984 1985 1986 1987 1988
    /* Currently every domain supports the same number of max cpus
     * as that supported by vbox and thus take it directly from
     * the systemproperties.
     */

1989 1990 1991 1992
    data->vboxObj->vtbl->GetSystemProperties(data->vboxObj, &systemProperties);
    if (systemProperties) {
        systemProperties->vtbl->GetMaxGuestCPUCount(systemProperties, &maxCPUCount);
        VBOX_RELEASE(systemProperties);
1993 1994 1995 1996 1997 1998 1999 2000
    }

    if (maxCPUCount > 0)
        ret = maxCPUCount;

    return ret;
}

2001 2002 2003 2004 2005 2006 2007
static int
vboxDomainGetMaxVcpus(virDomainPtr dom)
{
    return vboxDomainGetVcpusFlags(dom, (VIR_DOMAIN_VCPU_LIVE |
                                         VIR_DOMAIN_VCPU_MAXIMUM));
}

2008
static char *vboxDomainDumpXML(virDomainPtr dom, int flags) {
2009
    VBOX_OBJECT_CHECK(dom->conn, char *, NULL);
2010 2011
    virDomainDefPtr def  = NULL;
    IMachine *machine    = NULL;
2012
    vboxIID iid = VBOX_IID_INITIALIZER;
2013
    int gotAllABoutDef   = -1;
2014
    nsresult rc;
2015
    char *tmp;
2016 2017

    if (VIR_ALLOC(def) < 0) {
2018
        virReportOOMError();
2019 2020 2021
        goto cleanup;
    }

2022 2023 2024
    vboxIIDFromUUID(&iid, dom->uuid);
    rc = data->vboxObj->vtbl->GetMachine(data->vboxObj, iid.value, &machine);
    if (NS_SUCCEEDED(rc)) {
2025
        PRBool accessible = PR_FALSE;
2026

2027 2028 2029 2030 2031 2032 2033 2034 2035 2036 2037 2038 2039 2040 2041 2042 2043 2044 2045 2046 2047 2048 2049 2050 2051 2052 2053 2054 2055 2056
        machine->vtbl->GetAccessible(machine, &accessible);
        if (accessible) {
            int i = 0;
            struct utsname utsname;
            PRBool PAEEnabled                   = PR_FALSE;
            PRBool ACPIEnabled                  = PR_FALSE;
            PRBool IOAPICEnabled                = PR_FALSE;
            PRBool VRDPEnabled                  = PR_FALSE;
            PRUint32 CPUCount                   = 0;
            PRUint32 memorySize                 = 0;
            PRUint32 netAdpCnt                  = 0;
            PRUint32 netAdpIncCnt               = 0;
            PRUint32 maxMemorySize              = 4 * 1024;
            PRUint32 USBFilterCount             = 0;
            PRUint32 maxBootPosition            = 0;
            PRUint32 serialPortCount            = 0;
            PRUint32 serialPortIncCount         = 0;
            PRUint32 parallelPortCount          = 0;
            PRUint32 parallelPortIncCount       = 0;
            IBIOSSettings *bios                 = NULL;
#if VBOX_API_VERSION < 3001
            PRInt32       hddNum                = 0;
            IDVDDrive    *dvdDrive              = NULL;
            IHardDisk    *hardDiskPM            = NULL;
            IHardDisk    *hardDiskPS            = NULL;
            IHardDisk    *hardDiskSS            = NULL;
            const char   *hddBus                = "IDE";
            PRUnichar    *hddBusUtf16           = NULL;
            IFloppyDrive *floppyDrive           = NULL;
#else  /* VBOX_API_VERSION >= 3001 */
2057
            vboxArray mediumAttachments         = VBOX_ARRAY_INITIALIZER;
2058 2059 2060 2061 2062
#endif /* VBOX_API_VERSION >= 3001 */
            IVRDPServer *VRDPServer             = NULL;
            IAudioAdapter *audioAdapter         = NULL;
            IUSBController *USBController       = NULL;
            ISystemProperties *systemProperties = NULL;
2063 2064


2065 2066 2067 2068
            def->virtType = VIR_DOMAIN_VIRT_VBOX;
            def->id = dom->id;
            memcpy(def->uuid, dom->uuid, VIR_UUID_BUFLEN);
            def->name = strdup(dom->name);
2069

2070
            machine->vtbl->GetMemorySize(machine, &memorySize);
2071
            def->mem.cur_balloon = memorySize * 1024;
2072

2073 2074 2075 2076 2077 2078 2079 2080 2081 2082 2083 2084 2085 2086
            data->vboxObj->vtbl->GetSystemProperties(data->vboxObj, &systemProperties);
            if (systemProperties) {
                systemProperties->vtbl->GetMaxGuestRAM(systemProperties, &maxMemorySize);
                systemProperties->vtbl->GetMaxBootPosition(systemProperties, &maxBootPosition);
                systemProperties->vtbl->GetNetworkAdapterCount(systemProperties, &netAdpCnt);
                systemProperties->vtbl->GetSerialPortCount(systemProperties, &serialPortCount);
                systemProperties->vtbl->GetParallelPortCount(systemProperties, &parallelPortCount);
                VBOX_RELEASE(systemProperties);
                systemProperties = NULL;
            }
            /* Currently setting memory and maxMemory as same, cause
             * the notation here seems to be inconsistent while
             * reading and while dumping xml
             */
2087 2088
            /* def->mem.max_balloon = maxMemorySize * 1024; */
            def->mem.max_balloon = memorySize * 1024;
2089 2090

            machine->vtbl->GetCPUCount(machine, &CPUCount);
E
Eric Blake 已提交
2091
            def->maxvcpus = def->vcpus = CPUCount;
2092 2093 2094 2095

            /* Skip cpumasklen, cpumask, onReboot, onPoweroff, onCrash */

            def->os.type = strdup("hvm");
2096

2097 2098 2099 2100 2101 2102 2103 2104 2105 2106 2107 2108 2109 2110 2111 2112 2113 2114 2115 2116 2117 2118 2119 2120 2121
            uname(&utsname);
            def->os.arch = strdup(utsname.machine);

            def->os.nBootDevs = 0;
            for (i = 0; (i < VIR_DOMAIN_BOOT_LAST) && (i < maxBootPosition); i++) {
                PRUint32 device = DeviceType_Null;

                machine->vtbl->GetBootOrder(machine, i+1, &device);

                if (device == DeviceType_Floppy) {
                    def->os.bootDevs[i] = VIR_DOMAIN_BOOT_FLOPPY;
                    def->os.nBootDevs++;
                } else if (device == DeviceType_DVD) {
                    def->os.bootDevs[i] = VIR_DOMAIN_BOOT_CDROM;
                    def->os.nBootDevs++;
                } else if (device == DeviceType_HardDisk) {
                    def->os.bootDevs[i] = VIR_DOMAIN_BOOT_DISK;
                    def->os.nBootDevs++;
                } else if (device == DeviceType_Network) {
                    def->os.bootDevs[i] = VIR_DOMAIN_BOOT_NET;
                    def->os.nBootDevs++;
                } else if (device == DeviceType_USB) {
                    /* Not supported by libvirt yet */
                } else if (device == DeviceType_SharedFolder) {
                    /* Not supported by libvirt yet */
2122
                }
2123
            }
2124

2125 2126 2127
            def->features = 0;
#if VBOX_API_VERSION < 3001
            machine->vtbl->GetPAEEnabled(machine, &PAEEnabled);
2128
#elif VBOX_API_VERSION == 3001
2129
            machine->vtbl->GetCpuProperty(machine, CpuPropertyType_PAE, &PAEEnabled);
2130 2131 2132
#elif VBOX_API_VERSION >= 3002
            machine->vtbl->GetCPUProperty(machine, CPUPropertyType_PAE, &PAEEnabled);
#endif
2133 2134 2135
            if (PAEEnabled) {
                def->features = def->features | (1 << VIR_DOMAIN_FEATURE_PAE);
            }
2136

2137 2138 2139 2140 2141 2142
            machine->vtbl->GetBIOSSettings(machine, &bios);
            if (bios) {
                bios->vtbl->GetACPIEnabled(bios, &ACPIEnabled);
                if (ACPIEnabled) {
                    def->features = def->features | (1 << VIR_DOMAIN_FEATURE_ACPI);
                }
2143

2144 2145 2146
                bios->vtbl->GetIOAPICEnabled(bios, &IOAPICEnabled);
                if (IOAPICEnabled) {
                    def->features = def->features | (1 << VIR_DOMAIN_FEATURE_APIC);
2147 2148
                }

2149 2150 2151 2152 2153
                VBOX_RELEASE(bios);
            }

            /* Currently VirtualBox always uses locatime
             * so locatime is always true here */
2154
            def->clock.offset = VIR_DOMAIN_CLOCK_OFFSET_LOCALTIME;
2155 2156 2157 2158 2159 2160 2161 2162 2163 2164 2165 2166 2167 2168 2169 2170 2171 2172 2173 2174 2175 2176 2177 2178 2179 2180

            /* dump video options vram/2d/3d/directx/etc. */
            {
                /* Currently supports only one graphics card */
                def->nvideos = 1;
                if (VIR_ALLOC_N(def->videos, def->nvideos) >= 0) {
                    if (VIR_ALLOC(def->videos[0]) >= 0) {
                        /* the default is: vram is 8MB, One monitor, 3dAccel Off */
                        PRUint32 VRAMSize          = 8 * 1024;
                        PRUint32 monitorCount      = 1;
                        PRBool accelerate3DEnabled = PR_FALSE;
                        PRBool accelerate2DEnabled = PR_FALSE;

                        machine->vtbl->GetVRAMSize(machine, &VRAMSize);
                        machine->vtbl->GetMonitorCount(machine, &monitorCount);
                        machine->vtbl->GetAccelerate3DEnabled(machine, &accelerate3DEnabled);
#if VBOX_API_VERSION >= 3001
                        machine->vtbl->GetAccelerate2DVideoEnabled(machine, &accelerate2DEnabled);
#endif /* VBOX_API_VERSION >= 3001 */

                        def->videos[0]->type            = VIR_DOMAIN_VIDEO_TYPE_VBOX;
                        def->videos[0]->vram            = VRAMSize;
                        def->videos[0]->heads           = monitorCount;
                        if (VIR_ALLOC(def->videos[0]->accel) >= 0) {
                            def->videos[0]->accel->support3d = accelerate3DEnabled;
                            def->videos[0]->accel->support2d = accelerate2DEnabled;
2181
                        } else
2182
                            virReportOOMError();
2183
                    } else
2184
                        virReportOOMError();
2185
                } else
2186
                    virReportOOMError();
2187
            }
2188

2189 2190 2191 2192 2193 2194 2195 2196 2197 2198 2199
            /* dump display options vrdp/gui/sdl */
            {
                int vrdpPresent           = 0;
                int sdlPresent            = 0;
                int guiPresent            = 0;
                int totalPresent          = 0;
                char *guiDisplay          = NULL;
                char *sdlDisplay          = NULL;
                PRUnichar *keyTypeUtf16   = NULL;
                PRUnichar *valueTypeUtf16 = NULL;
                char      *valueTypeUtf8  = NULL;
2200

2201
                def->ngraphics = 0;
2202

2203 2204 2205
                VBOX_UTF8_TO_UTF16("FRONTEND/Type", &keyTypeUtf16);
                machine->vtbl->GetExtraData(machine, keyTypeUtf16, &valueTypeUtf16);
                VBOX_UTF16_FREE(keyTypeUtf16);
2206

2207 2208 2209
                if (valueTypeUtf16) {
                    VBOX_UTF16_TO_UTF8(valueTypeUtf16, &valueTypeUtf8);
                    VBOX_UTF16_FREE(valueTypeUtf16);
2210

2211 2212 2213 2214
                    if ( STREQ(valueTypeUtf8, "sdl") || STREQ(valueTypeUtf8, "gui") ) {
                        PRUnichar *keyDislpayUtf16   = NULL;
                        PRUnichar *valueDisplayUtf16 = NULL;
                        char      *valueDisplayUtf8  = NULL;
2215

2216 2217 2218
                        VBOX_UTF8_TO_UTF16("FRONTEND/Display", &keyDislpayUtf16);
                        machine->vtbl->GetExtraData(machine, keyDislpayUtf16, &valueDisplayUtf16);
                        VBOX_UTF16_FREE(keyDislpayUtf16);
2219

2220 2221 2222
                        if (valueDisplayUtf16) {
                            VBOX_UTF16_TO_UTF8(valueDisplayUtf16, &valueDisplayUtf8);
                            VBOX_UTF16_FREE(valueDisplayUtf16);
2223

2224 2225 2226
                            if (strlen(valueDisplayUtf8) <= 0) {
                                VBOX_UTF8_FREE(valueDisplayUtf8);
                                valueDisplayUtf8 = NULL;
2227 2228
                            }
                        }
2229

2230 2231 2232 2233 2234
                        if (STREQ(valueTypeUtf8, "sdl")) {
                            sdlPresent = 1;
                            if (valueDisplayUtf8)
                                sdlDisplay = strdup(valueDisplayUtf8);
                            if (sdlDisplay == NULL) {
2235
                                virReportOOMError();
2236 2237 2238 2239 2240 2241
                                /* just don't go to cleanup yet as it is ok to have
                                 * sdlDisplay as NULL and we check it below if it
                                 * exist and then only use it there
                                 */
                            }
                            totalPresent++;
2242
                        }
2243

2244 2245 2246 2247 2248
                        if (STREQ(valueTypeUtf8, "gui")) {
                            guiPresent = 1;
                            if (valueDisplayUtf8)
                                guiDisplay = strdup(valueDisplayUtf8);
                            if (guiDisplay == NULL) {
2249
                                virReportOOMError();
2250
                                /* just don't go to cleanup yet as it is ok to have
2251 2252
                                 * guiDisplay as NULL and we check it below if it
                                 * exist and then only use it there
2253
                                 */
2254
                            }
2255 2256
                            totalPresent++;
                        }
2257 2258
                        if (valueDisplayUtf8)
                            VBOX_UTF8_FREE(valueDisplayUtf8);
2259 2260
                    }

2261 2262
                    if (STREQ(valueTypeUtf8, "vrdp"))
                        vrdpPresent = 1;
2263

2264 2265
                    VBOX_UTF8_FREE(valueTypeUtf8);
                }
2266

2267 2268 2269 2270 2271 2272 2273
                if ((totalPresent > 0) && (VIR_ALLOC_N(def->graphics, totalPresent) >= 0)) {
                    if ((guiPresent) && (VIR_ALLOC(def->graphics[def->ngraphics]) >= 0)) {
                        def->graphics[def->ngraphics]->type = VIR_DOMAIN_GRAPHICS_TYPE_DESKTOP;
                        if (guiDisplay)
                            def->graphics[def->ngraphics]->data.desktop.display = guiDisplay;
                        def->ngraphics++;
                    }
2274

2275 2276 2277 2278 2279 2280 2281 2282 2283
                    if ((sdlPresent) && (VIR_ALLOC(def->graphics[def->ngraphics]) >= 0)) {
                        def->graphics[def->ngraphics]->type = VIR_DOMAIN_GRAPHICS_TYPE_SDL;
                        if (sdlDisplay)
                            def->graphics[def->ngraphics]->data.sdl.display = sdlDisplay;
                        def->ngraphics++;
                    }
                } else if ((vrdpPresent != 1) && (totalPresent == 0) && (VIR_ALLOC_N(def->graphics, 1) >= 0)) {
                    if (VIR_ALLOC(def->graphics[def->ngraphics]) >= 0) {
                        def->graphics[def->ngraphics]->type = VIR_DOMAIN_GRAPHICS_TYPE_DESKTOP;
2284 2285 2286 2287 2288 2289 2290 2291 2292
                        tmp = getenv("DISPLAY");
                        if (tmp != NULL) {
                            def->graphics[def->ngraphics]->data.desktop.display = strdup(tmp);
                            if (def->graphics[def->ngraphics]->data.desktop.display == NULL) {
                                virReportOOMError();
                                /* just don't go to cleanup yet as it is ok to have
                                 * display as NULL
                                 */
                            }
2293 2294 2295 2296 2297
                        }
                        totalPresent++;
                        def->ngraphics++;
                    }
                }
2298

2299 2300 2301 2302 2303 2304 2305 2306 2307 2308 2309 2310 2311 2312 2313 2314 2315 2316 2317 2318 2319 2320 2321 2322 2323 2324 2325 2326 2327
                machine->vtbl->GetVRDPServer(machine, &VRDPServer);
                if (VRDPServer) {
                    VRDPServer->vtbl->GetEnabled(VRDPServer, &VRDPEnabled);
                    if (VRDPEnabled) {

                        totalPresent++;

                        if ((VIR_REALLOC_N(def->graphics, totalPresent) >= 0) &&
                            (VIR_ALLOC(def->graphics[def->ngraphics]) >= 0)) {
                            PRUnichar *netAddressUtf16   = NULL;
                            char      *netAddressUtf8    = NULL;
                            PRBool allowMultiConnection  = PR_FALSE;
                            PRBool reuseSingleConnection = PR_FALSE;
#if VBOX_API_VERSION < 3001
                            PRUint32 VRDPport = 0;
                            VRDPServer->vtbl->GetPort(VRDPServer, &VRDPport);
                            if (VRDPport) {
                                def->graphics[def->ngraphics]->data.rdp.port = VRDPport;
#else  /* VBOX_API_VERSION >= 3001 */
                            PRUnichar *VRDPport = NULL;
                            VRDPServer->vtbl->GetPorts(VRDPServer, &VRDPport);
                            if (VRDPport) {
                                /* even if vbox supports mutilpe ports, single port for now here */
                                def->graphics[def->ngraphics]->data.rdp.port = PRUnicharToInt(VRDPport);
                                VBOX_UTF16_FREE(VRDPport);
#endif /* VBOX_API_VERSION >= 3001 */
                            } else {
                                def->graphics[def->ngraphics]->data.rdp.autoport = 1;
                            }
2328

2329
                            def->graphics[def->ngraphics]->type = VIR_DOMAIN_GRAPHICS_TYPE_RDP;
2330

2331 2332 2333 2334 2335 2336 2337 2338
                            VRDPServer->vtbl->GetNetAddress(VRDPServer, &netAddressUtf16);
                            if (netAddressUtf16) {
                                VBOX_UTF16_TO_UTF8(netAddressUtf16, &netAddressUtf8);
                                if (STRNEQ(netAddressUtf8, ""))
                                        def->graphics[def->ngraphics]->data.rdp.listenAddr = strdup(netAddressUtf8);
                                VBOX_UTF16_FREE(netAddressUtf16);
                                VBOX_UTF8_FREE(netAddressUtf8);
                            }
2339

2340 2341 2342 2343
                            VRDPServer->vtbl->GetAllowMultiConnection(VRDPServer, &allowMultiConnection);
                            if (allowMultiConnection) {
                                def->graphics[def->ngraphics]->data.rdp.multiUser = 1;
                            }
2344

2345 2346 2347 2348
                            VRDPServer->vtbl->GetReuseSingleConnection(VRDPServer, &reuseSingleConnection);
                            if (reuseSingleConnection) {
                                def->graphics[def->ngraphics]->data.rdp.replaceUser = 1;
                            }
2349

2350
                            def->ngraphics++;
2351
                        } else
2352
                            virReportOOMError();
2353
                    }
2354
                    VBOX_RELEASE(VRDPServer);
2355
                }
2356
            }
2357

2358 2359 2360
#if VBOX_API_VERSION < 3001
            /* dump IDE hdds if present */
            VBOX_UTF8_TO_UTF16(hddBus, &hddBusUtf16);
2361

2362 2363 2364 2365
            def->ndisks = 0;
            machine->vtbl->GetHardDisk(machine, hddBusUtf16, 0, 0,  &hardDiskPM);
            if (hardDiskPM)
                def->ndisks++;
2366

2367 2368 2369
            machine->vtbl->GetHardDisk(machine, hddBusUtf16, 0, 1,  &hardDiskPS);
            if (hardDiskPS)
                def->ndisks++;
2370

2371 2372 2373
            machine->vtbl->GetHardDisk(machine, hddBusUtf16, 1, 1,  &hardDiskSS);
            if (hardDiskSS)
                def->ndisks++;
2374

2375 2376 2377 2378 2379 2380 2381 2382 2383
            VBOX_UTF16_FREE(hddBusUtf16);

            if ((def->ndisks > 0) && (VIR_ALLOC_N(def->disks, def->ndisks) >= 0)) {
                for (i = 0; i < def->ndisks; i++) {
                    if (VIR_ALLOC(def->disks[i]) >= 0) {
                        def->disks[i]->device = VIR_DOMAIN_DISK_DEVICE_DISK;
                        def->disks[i]->bus = VIR_DOMAIN_DISK_BUS_IDE;
                        def->disks[i]->type = VIR_DOMAIN_DISK_TYPE_FILE;
                    } else
2384
                        virReportOOMError();
2385
                }
2386
            }
2387

2388 2389 2390 2391
            if (hardDiskPM) {
                PRUnichar *hddlocationUtf16 = NULL;
                char *hddlocation           = NULL;
                PRUint32 hddType            = HardDiskType_Normal;
2392

2393 2394
                hardDiskPM->vtbl->imedium.GetLocation((IMedium *)hardDiskPM, &hddlocationUtf16);
                VBOX_UTF16_TO_UTF8(hddlocationUtf16, &hddlocation);
2395

2396
                hardDiskPM->vtbl->GetType(hardDiskPM, &hddType);
2397

2398 2399 2400 2401 2402
                if (hddType == HardDiskType_Immutable)
                    def->disks[hddNum]->readonly = 1;
                def->disks[hddNum]->src = strdup(hddlocation);
                def->disks[hddNum]->dst = strdup("hda");
                hddNum++;
2403

2404 2405 2406 2407
                VBOX_UTF8_FREE(hddlocation);
                VBOX_UTF16_FREE(hddlocationUtf16);
                VBOX_MEDIUM_RELEASE(hardDiskPM);
            }
2408

2409 2410 2411 2412
            if (hardDiskPS) {
                PRUnichar *hddlocationUtf16 = NULL;
                char *hddlocation           = NULL;
                PRUint32 hddType            = HardDiskType_Normal;
2413

2414 2415
                hardDiskPS->vtbl->imedium.GetLocation((IMedium *)hardDiskPS, &hddlocationUtf16);
                VBOX_UTF16_TO_UTF8(hddlocationUtf16, &hddlocation);
2416

2417
                hardDiskPS->vtbl->GetType(hardDiskPS, &hddType);
2418

2419 2420 2421 2422 2423
                if (hddType == HardDiskType_Immutable)
                    def->disks[hddNum]->readonly = 1;
                def->disks[hddNum]->src = strdup(hddlocation);
                def->disks[hddNum]->dst = strdup("hdb");
                hddNum++;
2424

2425 2426 2427 2428
                VBOX_UTF8_FREE(hddlocation);
                VBOX_UTF16_FREE(hddlocationUtf16);
                VBOX_MEDIUM_RELEASE(hardDiskPS);
            }
2429

2430 2431 2432 2433
            if (hardDiskSS) {
                PRUnichar *hddlocationUtf16 = NULL;
                char *hddlocation           = NULL;
                PRUint32 hddType            = HardDiskType_Normal;
2434

2435 2436
                hardDiskSS->vtbl->imedium.GetLocation((IMedium *)hardDiskSS, &hddlocationUtf16);
                VBOX_UTF16_TO_UTF8(hddlocationUtf16, &hddlocation);
2437

2438
                hardDiskSS->vtbl->GetType(hardDiskSS, &hddType);
2439

2440 2441 2442 2443 2444 2445 2446 2447 2448 2449 2450 2451 2452 2453 2454 2455 2456 2457
                if (hddType == HardDiskType_Immutable)
                    def->disks[hddNum]->readonly = 1;
                def->disks[hddNum]->src = strdup(hddlocation);
                def->disks[hddNum]->dst = strdup("hdd");
                hddNum++;

                VBOX_UTF8_FREE(hddlocation);
                VBOX_UTF16_FREE(hddlocationUtf16);
                VBOX_MEDIUM_RELEASE(hardDiskSS);
            }
#else  /* VBOX_API_VERSION >= 3001 */
            /* dump IDE hdds if present */

            bool error = false;
            int diskCount = 0;
            PRUint32   maxPortPerInst[StorageBus_Floppy + 1] = {};
            PRUint32   maxSlotPerPort[StorageBus_Floppy + 1] = {};
            def->ndisks = 0;
2458
            vboxArrayGet(&mediumAttachments, machine, machine->vtbl->GetMediumAttachments);
2459 2460

            /* get the number of attachments */
2461 2462
            for (i = 0; i < mediumAttachments.count; i++) {
                IMediumAttachment *imediumattach = mediumAttachments.items[i];
2463 2464 2465 2466 2467 2468 2469
                if (imediumattach) {
                    IMedium *medium = NULL;

                    imediumattach->vtbl->GetMedium(imediumattach, &medium);
                    if (medium) {
                        def->ndisks++;
                        VBOX_RELEASE(medium);
2470 2471
                    }
                }
2472
            }
2473

2474 2475 2476 2477
            /* Allocate mem, if fails return error */
            if (VIR_ALLOC_N(def->disks, def->ndisks) >= 0) {
                for (i = 0; i < def->ndisks; i++) {
                    if (VIR_ALLOC(def->disks[i]) < 0) {
2478
                        virReportOOMError();
2479 2480
                        error = true;
                        break;
2481 2482
                    }
                }
2483
            } else {
2484
                virReportOOMError();
2485 2486 2487 2488 2489 2490 2491
                error = true;
            }

            if (!error)
                error = !vboxGetMaxPortSlotValues(data->vboxObj, maxPortPerInst, maxSlotPerPort);

            /* get the attachment details here */
2492 2493
            for (i = 0; i < mediumAttachments.count && diskCount < def->ndisks && !error; i++) {
                IMediumAttachment *imediumattach = mediumAttachments.items[i];
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
                IStorageController *storageController = NULL;
                PRUnichar *storageControllerName = NULL;
                PRUint32   deviceType     = DeviceType_Null;
                PRUint32   storageBus     = StorageBus_Null;
                PRBool     readOnly       = PR_FALSE;
                IMedium   *medium         = NULL;
                PRUnichar *mediumLocUtf16 = NULL;
                char      *mediumLocUtf8  = NULL;
                PRUint32   deviceInst     = 0;
                PRInt32    devicePort     = 0;
                PRInt32    deviceSlot     = 0;

                if (!imediumattach)
                    continue;

                imediumattach->vtbl->GetMedium(imediumattach, &medium);
                if (!medium)
                    continue;

                imediumattach->vtbl->GetController(imediumattach, &storageControllerName);
                if (!storageControllerName) {
                    VBOX_RELEASE(medium);
                    continue;
                }

                machine->vtbl->GetStorageControllerByName(machine,
                                                          storageControllerName,
                                                          &storageController);
                VBOX_UTF16_FREE(storageControllerName);
                if (!storageController) {
                    VBOX_RELEASE(medium);
                    continue;
                }
2527

2528 2529 2530 2531 2532 2533 2534 2535 2536
                medium->vtbl->GetLocation(medium, &mediumLocUtf16);
                VBOX_UTF16_TO_UTF8(mediumLocUtf16, &mediumLocUtf8);
                VBOX_UTF16_FREE(mediumLocUtf16);
                def->disks[diskCount]->src = strdup(mediumLocUtf8);
                VBOX_UTF8_FREE(mediumLocUtf8);

                if (!(def->disks[diskCount]->src)) {
                    VBOX_RELEASE(medium);
                    VBOX_RELEASE(storageController);
2537
                    virReportOOMError();
2538 2539 2540
                    error = true;
                    break;
                }
2541

2542 2543 2544 2545 2546 2547 2548 2549 2550 2551
                storageController->vtbl->GetBus(storageController, &storageBus);
                if (storageBus == StorageBus_IDE) {
                    def->disks[diskCount]->bus = VIR_DOMAIN_DISK_BUS_IDE;
                } else if (storageBus == StorageBus_SATA) {
                    def->disks[diskCount]->bus = VIR_DOMAIN_DISK_BUS_SATA;
                } else if (storageBus == StorageBus_SCSI) {
                    def->disks[diskCount]->bus = VIR_DOMAIN_DISK_BUS_SCSI;
                } else if (storageBus == StorageBus_Floppy) {
                    def->disks[diskCount]->bus = VIR_DOMAIN_DISK_BUS_FDC;
                }
2552

2553 2554 2555 2556 2557 2558 2559 2560 2561 2562
                imediumattach->vtbl->GetType(imediumattach, &deviceType);
                if (deviceType == DeviceType_HardDisk)
                    def->disks[diskCount]->device = VIR_DOMAIN_DISK_DEVICE_DISK;
                else if (deviceType == DeviceType_Floppy)
                    def->disks[diskCount]->device = VIR_DOMAIN_DISK_DEVICE_FLOPPY;
                else if (deviceType == DeviceType_DVD)
                    def->disks[diskCount]->device = VIR_DOMAIN_DISK_DEVICE_CDROM;

                imediumattach->vtbl->GetPort(imediumattach, &devicePort);
                imediumattach->vtbl->GetDevice(imediumattach, &deviceSlot);
2563
                def->disks[diskCount]->dst = vboxGenerateMediumName(storageBus,
2564 2565 2566 2567 2568 2569
                                                                    deviceInst,
                                                                    devicePort,
                                                                    deviceSlot,
                                                                    maxPortPerInst,
                                                                    maxSlotPerPort);
                if (!def->disks[diskCount]->dst) {
2570
                    vboxError(VIR_ERR_INTERNAL_ERROR,
2571 2572
                              _("Could not generate medium name for the disk "
                                "at: controller instance:%u, port:%d, slot:%d"),
2573 2574 2575 2576 2577 2578
                              deviceInst, devicePort, deviceSlot);
                    VBOX_RELEASE(medium);
                    VBOX_RELEASE(storageController);
                    error = true;
                    break;
                }
2579

2580 2581 2582
                medium->vtbl->GetReadOnly(medium, &readOnly);
                if (readOnly == PR_TRUE)
                    def->disks[diskCount]->readonly = 1;
2583

2584
                def->disks[diskCount]->type = VIR_DOMAIN_DISK_TYPE_FILE;
2585

2586 2587 2588 2589
                VBOX_RELEASE(medium);
                VBOX_RELEASE(storageController);
                diskCount++;
            }
2590

2591
            vboxArrayRelease(&mediumAttachments);
2592

2593 2594 2595 2596 2597 2598 2599 2600
            /* cleanup on error */
            if (error) {
                for (i = 0; i < def->ndisks; i++) {
                    VIR_FREE(def->disks[i]);
                }
                VIR_FREE(def->disks);
                def->ndisks = 0;
            }
2601

2602
#endif /* VBOX_API_VERSION >= 3001 */
2603

2604 2605 2606 2607 2608
            /* dump network cards if present */
            def->nnets = 0;
            /* Get which network cards are enabled */
            for (i = 0; i < netAdpCnt; i++) {
                INetworkAdapter *adapter = NULL;
2609

2610 2611 2612
                machine->vtbl->GetNetworkAdapter(machine, i, &adapter);
                if (adapter) {
                    PRBool enabled = PR_FALSE;
2613

2614 2615 2616 2617
                    adapter->vtbl->GetEnabled(adapter, &enabled);
                    if (enabled) {
                        def->nnets++;
                    }
2618

2619 2620 2621
                    VBOX_RELEASE(adapter);
                }
            }
2622

2623 2624 2625 2626 2627
            /* Allocate memory for the networkcards which are enabled */
            if ((def->nnets > 0) && (VIR_ALLOC_N(def->nets, def->nnets) >= 0)) {
                for (i = 0; i < def->nnets; i++) {
                    if (VIR_ALLOC(def->nets[i]) >= 0) {
                    } else
2628
                        virReportOOMError();
2629 2630
                }
            }
2631

2632 2633 2634
            /* Now get the details about the network cards here */
            for (i = 0;(netAdpIncCnt < def->nnets) && (i < netAdpCnt); i++) {
                INetworkAdapter *adapter = NULL;
2635

2636 2637 2638
                machine->vtbl->GetNetworkAdapter(machine, i, &adapter);
                if (adapter) {
                    PRBool enabled = PR_FALSE;
2639

2640 2641 2642 2643 2644 2645 2646
                    adapter->vtbl->GetEnabled(adapter, &enabled);
                    if (enabled) {
                        PRUint32 attachmentType    = NetworkAttachmentType_Null;
                        PRUint32 adapterType       = NetworkAdapterType_Null;
                        PRUnichar *MACAddressUtf16 = NULL;
                        char *MACAddress           = NULL;
                        char macaddr[VIR_MAC_STRING_BUFLEN] = {0};
2647

2648 2649
                        adapter->vtbl->GetAttachmentType(adapter, &attachmentType);
                        if (attachmentType == NetworkAttachmentType_NAT) {
2650

2651
                            def->nets[netAdpIncCnt]->type = VIR_DOMAIN_NET_TYPE_USER;
2652

2653 2654 2655
                        } else if (attachmentType == NetworkAttachmentType_Bridged) {
                            PRUnichar *hostIntUtf16 = NULL;
                            char *hostInt           = NULL;
2656

2657
                            def->nets[netAdpIncCnt]->type = VIR_DOMAIN_NET_TYPE_BRIDGE;
2658

2659
                            adapter->vtbl->GetHostInterface(adapter, &hostIntUtf16);
2660

2661 2662
                            VBOX_UTF16_TO_UTF8(hostIntUtf16, &hostInt);
                            def->nets[netAdpIncCnt]->data.bridge.brname = strdup(hostInt);
2663

2664 2665
                            VBOX_UTF8_FREE(hostInt);
                            VBOX_UTF16_FREE(hostIntUtf16);
2666

2667 2668 2669
                        } else if (attachmentType == NetworkAttachmentType_Internal) {
                            PRUnichar *intNetUtf16 = NULL;
                            char *intNet           = NULL;
2670

2671 2672 2673 2674 2675 2676 2677 2678 2679 2680 2681 2682 2683 2684 2685 2686 2687 2688 2689 2690 2691 2692 2693 2694 2695 2696 2697 2698 2699 2700 2701 2702 2703 2704 2705 2706 2707 2708 2709 2710 2711 2712 2713 2714 2715 2716
                            def->nets[netAdpIncCnt]->type = VIR_DOMAIN_NET_TYPE_INTERNAL;

                            adapter->vtbl->GetInternalNetwork(adapter, &intNetUtf16);

                            VBOX_UTF16_TO_UTF8(intNetUtf16, &intNet);
                            def->nets[netAdpIncCnt]->data.internal.name = strdup(intNet);

                            VBOX_UTF8_FREE(intNet);
                            VBOX_UTF16_FREE(intNetUtf16);

                        } else if (attachmentType == NetworkAttachmentType_HostOnly) {
                            PRUnichar *hostIntUtf16 = NULL;
                            char *hostInt           = NULL;

                            def->nets[netAdpIncCnt]->type = VIR_DOMAIN_NET_TYPE_NETWORK;

                            adapter->vtbl->GetHostInterface(adapter, &hostIntUtf16);

                            VBOX_UTF16_TO_UTF8(hostIntUtf16, &hostInt);
                            def->nets[netAdpIncCnt]->data.network.name = strdup(hostInt);

                            VBOX_UTF8_FREE(hostInt);
                            VBOX_UTF16_FREE(hostIntUtf16);

                        } else {
                            /* default to user type i.e. NAT in VirtualBox if this
                             * dump is ever used to create a machine.
                             */
                            def->nets[netAdpIncCnt]->type = VIR_DOMAIN_NET_TYPE_USER;
                        }

                        adapter->vtbl->GetAdapterType(adapter, &adapterType);
                        if (adapterType == NetworkAdapterType_Am79C970A) {
                            def->nets[netAdpIncCnt]->model = strdup("Am79C970A");
                        } else if (adapterType == NetworkAdapterType_Am79C973) {
                            def->nets[netAdpIncCnt]->model = strdup("Am79C973");
                        } else if (adapterType == NetworkAdapterType_I82540EM) {
                            def->nets[netAdpIncCnt]->model = strdup("82540EM");
                        } else if (adapterType == NetworkAdapterType_I82545EM) {
                            def->nets[netAdpIncCnt]->model = strdup("82545EM");
                        } else if (adapterType == NetworkAdapterType_I82543GC) {
                            def->nets[netAdpIncCnt]->model = strdup("82543GC");
#if VBOX_API_VERSION >= 3001
                        } else if (adapterType == NetworkAdapterType_Virtio) {
                            def->nets[netAdpIncCnt]->model = strdup("virtio");
#endif /* VBOX_API_VERSION >= 3001 */
2717 2718
                        }

2719 2720 2721 2722 2723 2724 2725 2726 2727 2728 2729 2730 2731 2732 2733 2734
                        adapter->vtbl->GetMACAddress(adapter, &MACAddressUtf16);
                        VBOX_UTF16_TO_UTF8(MACAddressUtf16, &MACAddress);
                        snprintf(macaddr, VIR_MAC_STRING_BUFLEN,
                                 "%c%c:%c%c:%c%c:%c%c:%c%c:%c%c",
                                 MACAddress[0], MACAddress[1], MACAddress[2], MACAddress[3],
                                 MACAddress[4], MACAddress[5], MACAddress[6], MACAddress[7],
                                 MACAddress[8], MACAddress[9], MACAddress[10], MACAddress[11]);

                        /* XXX some real error handling here some day ... */
                        if (virParseMacAddr(macaddr, def->nets[netAdpIncCnt]->mac) < 0)
                        {}

                        netAdpIncCnt++;

                        VBOX_UTF16_FREE(MACAddressUtf16);
                        VBOX_UTF8_FREE(MACAddress);
2735
                    }
2736 2737

                    VBOX_RELEASE(adapter);
2738
                }
2739
            }
2740

2741
            /* dump sound card if active */
2742

2743 2744 2745
            /* Set def->nsounds to one as VirtualBox currently supports
             * only one sound card
             */
2746

2747 2748 2749 2750 2751 2752 2753 2754 2755 2756 2757 2758 2759 2760 2761 2762 2763 2764 2765 2766
            machine->vtbl->GetAudioAdapter(machine, &audioAdapter);
            if (audioAdapter) {
                PRBool enabled = PR_FALSE;

                audioAdapter->vtbl->GetEnabled(audioAdapter, &enabled);
                if (enabled) {
                    PRUint32 audioController = AudioControllerType_AC97;

                    def->nsounds = 1;
                    if (VIR_ALLOC_N(def->sounds, def->nsounds) >= 0) {
                        if (VIR_ALLOC(def->sounds[0]) >= 0) {
                            audioAdapter->vtbl->GetAudioController(audioAdapter, &audioController);
                            if (audioController == AudioControllerType_SB16) {
                                def->sounds[0]->model = VIR_DOMAIN_SOUND_MODEL_SB16;
                            } else if (audioController == AudioControllerType_AC97) {
                                def->sounds[0]->model = VIR_DOMAIN_SOUND_MODEL_AC97;
                            }
                        } else {
                            VIR_FREE(def->sounds);
                            def->nsounds = 0;
2767
                            virReportOOMError();
2768 2769 2770
                        }
                    } else {
                        def->nsounds = 0;
2771
                        virReportOOMError();
2772 2773 2774 2775
                    }
                }
                VBOX_RELEASE(audioAdapter);
            }
2776

2777 2778 2779 2780 2781 2782 2783 2784 2785 2786 2787 2788 2789 2790 2791 2792 2793 2794 2795 2796 2797 2798 2799 2800 2801 2802 2803
#if VBOX_API_VERSION < 3001
            /* dump CDROM/DVD if the drive is attached and has DVD/CD in it */
            machine->vtbl->GetDVDDrive(machine, &dvdDrive);
            if (dvdDrive) {
                PRUint32 state = DriveState_Null;

                dvdDrive->vtbl->GetState(dvdDrive, &state);
                if (state == DriveState_ImageMounted) {
                    IDVDImage *dvdImage = NULL;

                    dvdDrive->vtbl->GetImage(dvdDrive, &dvdImage);
                    if (dvdImage) {
                        PRUnichar *locationUtf16 = NULL;
                        char *location           = NULL;

                        dvdImage->vtbl->imedium.GetLocation((IMedium *)dvdImage, &locationUtf16);
                        VBOX_UTF16_TO_UTF8(locationUtf16, &location);

                        def->ndisks++;
                        if (VIR_REALLOC_N(def->disks, def->ndisks) >= 0) {
                            if (VIR_ALLOC(def->disks[def->ndisks - 1]) >= 0) {
                                def->disks[def->ndisks - 1]->device = VIR_DOMAIN_DISK_DEVICE_CDROM;
                                def->disks[def->ndisks - 1]->bus = VIR_DOMAIN_DISK_BUS_IDE;
                                def->disks[def->ndisks - 1]->type = VIR_DOMAIN_DISK_TYPE_FILE;
                                def->disks[def->ndisks - 1]->readonly = 1;
                                def->disks[def->ndisks - 1]->src = strdup(location);
                                def->disks[def->ndisks - 1]->dst = strdup("hdc");
2804
                            } else {
2805
                                def->ndisks--;
2806
                                virReportOOMError();
2807 2808
                            }
                        } else {
2809
                            def->ndisks--;
2810
                            virReportOOMError();
2811
                        }
2812 2813 2814 2815

                        VBOX_UTF8_FREE(location);
                        VBOX_UTF16_FREE(locationUtf16);
                        VBOX_MEDIUM_RELEASE(dvdImage);
2816 2817
                    }
                }
2818 2819
                VBOX_RELEASE(dvdDrive);
            }
2820

2821 2822 2823 2824 2825 2826 2827
            /* dump Floppy if the drive is attached and has floppy in it */
            machine->vtbl->GetFloppyDrive(machine, &floppyDrive);
            if (floppyDrive) {
                PRBool enabled = PR_FALSE;

                floppyDrive->vtbl->GetEnabled(floppyDrive, &enabled);
                if (enabled) {
2828 2829
                    PRUint32 state = DriveState_Null;

2830
                    floppyDrive->vtbl->GetState(floppyDrive, &state);
2831
                    if (state == DriveState_ImageMounted) {
2832
                        IFloppyImage *floppyImage = NULL;
2833

2834 2835
                        floppyDrive->vtbl->GetImage(floppyDrive, &floppyImage);
                        if (floppyImage) {
2836 2837 2838
                            PRUnichar *locationUtf16 = NULL;
                            char *location           = NULL;

2839 2840
                            floppyImage->vtbl->imedium.GetLocation((IMedium *)floppyImage, &locationUtf16);
                            VBOX_UTF16_TO_UTF8(locationUtf16, &location);
2841 2842 2843 2844

                            def->ndisks++;
                            if (VIR_REALLOC_N(def->disks, def->ndisks) >= 0) {
                                if (VIR_ALLOC(def->disks[def->ndisks - 1]) >= 0) {
2845 2846
                                    def->disks[def->ndisks - 1]->device = VIR_DOMAIN_DISK_DEVICE_FLOPPY;
                                    def->disks[def->ndisks - 1]->bus = VIR_DOMAIN_DISK_BUS_FDC;
2847
                                    def->disks[def->ndisks - 1]->type = VIR_DOMAIN_DISK_TYPE_FILE;
2848
                                    def->disks[def->ndisks - 1]->readonly = 0;
2849
                                    def->disks[def->ndisks - 1]->src = strdup(location);
2850
                                    def->disks[def->ndisks - 1]->dst = strdup("fda");
2851 2852
                                } else {
                                    def->ndisks--;
2853
                                    virReportOOMError();
2854 2855 2856
                                }
                            } else {
                                def->ndisks--;
2857
                                virReportOOMError();
2858 2859
                            }

2860 2861 2862
                            VBOX_UTF8_FREE(location);
                            VBOX_UTF16_FREE(locationUtf16);
                            VBOX_MEDIUM_RELEASE(floppyImage);
2863 2864 2865 2866
                        }
                    }
                }

2867 2868 2869 2870 2871 2872 2873 2874 2875 2876 2877 2878 2879
                VBOX_RELEASE(floppyDrive);
            }
#else  /* VBOX_API_VERSION >= 3001 */
#endif /* VBOX_API_VERSION >= 3001 */

            /* dump serial port if active */
            def->nserials = 0;
            /* Get which serial ports are enabled/active */
            for (i = 0; i < serialPortCount; i++) {
                ISerialPort *serialPort = NULL;

                machine->vtbl->GetSerialPort(machine, i, &serialPort);
                if (serialPort) {
2880 2881
                    PRBool enabled = PR_FALSE;

2882
                    serialPort->vtbl->GetEnabled(serialPort, &enabled);
2883
                    if (enabled) {
2884
                        def->nserials++;
2885 2886
                    }

2887
                    VBOX_RELEASE(serialPort);
2888
                }
2889
            }
2890

2891 2892 2893 2894 2895
            /* Allocate memory for the serial ports which are enabled */
            if ((def->nserials > 0) && (VIR_ALLOC_N(def->serials, def->nserials) >= 0)) {
                for (i = 0; i < def->nserials; i++) {
                    if (VIR_ALLOC(def->serials[i]) >= 0) {
                    } else
2896
                        virReportOOMError();
2897 2898
                }
            }
2899

2900 2901 2902
            /* Now get the details about the serial ports here */
            for (i = 0;(serialPortIncCount < def->nserials) && (i < serialPortCount); i++) {
                ISerialPort *serialPort = NULL;
2903

2904 2905 2906
                machine->vtbl->GetSerialPort(machine, i, &serialPort);
                if (serialPort) {
                    PRBool enabled = PR_FALSE;
2907

2908 2909 2910 2911 2912 2913 2914 2915 2916 2917 2918 2919 2920 2921 2922 2923 2924 2925 2926 2927
                    serialPort->vtbl->GetEnabled(serialPort, &enabled);
                    if (enabled) {
                        PRUint32 hostMode    = PortMode_Disconnected;
                        PRUint32 IOBase      = 0;
                        PRUint32 IRQ         = 0;
                        PRUnichar *pathUtf16 = NULL;
                        char *path           = NULL;

                        serialPort->vtbl->GetHostMode(serialPort, &hostMode);
                        if (hostMode == PortMode_HostPipe) {
                            def->serials[serialPortIncCount]->type = VIR_DOMAIN_CHR_TYPE_PIPE;
                        } else if (hostMode == PortMode_HostDevice) {
                            def->serials[serialPortIncCount]->type = VIR_DOMAIN_CHR_TYPE_DEV;
#if VBOX_API_VERSION >= 3000
                        } else if (hostMode == PortMode_RawFile) {
                            def->serials[serialPortIncCount]->type = VIR_DOMAIN_CHR_TYPE_FILE;
#endif /* VBOX_API_VERSION >= 3000 */
                        } else {
                            def->serials[serialPortIncCount]->type = VIR_DOMAIN_CHR_TYPE_NULL;
                        }
2928

2929
                        def->serials[serialPortIncCount]->deviceType = VIR_DOMAIN_CHR_DEVICE_TYPE_SERIAL;
2930

2931 2932 2933 2934 2935 2936 2937
                        serialPort->vtbl->GetIRQ(serialPort, &IRQ);
                        serialPort->vtbl->GetIOBase(serialPort, &IOBase);
                        if ((IRQ == 4) && (IOBase == 1016)) {
                            def->serials[serialPortIncCount]->target.port = 0;
                        } else if ((IRQ == 3) && (IOBase == 760)) {
                            def->serials[serialPortIncCount]->target.port = 1;
                        }
2938

2939
                        serialPort->vtbl->GetPath(serialPort, &pathUtf16);
2940

2941 2942
                        if (pathUtf16) {
                            VBOX_UTF16_TO_UTF8(pathUtf16, &path);
2943 2944 2945
                            def->serials[serialPortIncCount]->data.file.path = strdup(path);
                        }

2946 2947 2948 2949
                        serialPortIncCount++;

                        VBOX_UTF16_FREE(pathUtf16);
                        VBOX_UTF8_FREE(path);
2950 2951
                    }

2952 2953 2954
                    VBOX_RELEASE(serialPort);
                }
            }
2955

2956 2957 2958 2959 2960
            /* dump parallel ports if active */
            def->nparallels = 0;
            /* Get which parallel ports are enabled/active */
            for (i = 0; i < parallelPortCount; i++) {
                IParallelPort *parallelPort = NULL;
2961

2962 2963 2964
                machine->vtbl->GetParallelPort(machine, i, &parallelPort);
                if (parallelPort) {
                    PRBool enabled = PR_FALSE;
2965

2966 2967 2968
                    parallelPort->vtbl->GetEnabled(parallelPort, &enabled);
                    if (enabled) {
                        def->nparallels++;
2969
                    }
2970 2971

                    VBOX_RELEASE(parallelPort);
2972
                }
2973
            }
2974

2975 2976 2977 2978 2979
            /* Allocate memory for the parallel ports which are enabled */
            if ((def->nparallels > 0) && (VIR_ALLOC_N(def->parallels, def->nparallels) >= 0)) {
                for (i = 0; i < def->nparallels; i++) {
                    if (VIR_ALLOC(def->parallels[i]) >= 0) {
                    } else
2980
                        virReportOOMError();
2981
                }
2982
            }
2983

2984 2985 2986
            /* Now get the details about the parallel ports here */
            for (i = 0;(parallelPortIncCount < def->nparallels) && (i < parallelPortCount); i++) {
                IParallelPort *parallelPort = NULL;
2987

2988 2989 2990
                machine->vtbl->GetParallelPort(machine, i, &parallelPort);
                if (parallelPort) {
                    PRBool enabled = PR_FALSE;
2991

2992 2993 2994 2995 2996 2997 2998 2999 3000 3001 3002 3003 3004 3005
                    parallelPort->vtbl->GetEnabled(parallelPort, &enabled);
                    if (enabled) {
                        PRUint32 IOBase      = 0;
                        PRUint32 IRQ         = 0;
                        PRUnichar *pathUtf16 = NULL;
                        char *path           = NULL;

                        parallelPort->vtbl->GetIRQ(parallelPort, &IRQ);
                        parallelPort->vtbl->GetIOBase(parallelPort, &IOBase);
                        if ((IRQ == 7) && (IOBase == 888)) {
                            def->parallels[parallelPortIncCount]->target.port = 0;
                        } else if ((IRQ == 5) && (IOBase == 632)) {
                            def->parallels[parallelPortIncCount]->target.port = 1;
                        }
3006

3007
                        def->parallels[parallelPortIncCount]->type = VIR_DOMAIN_CHR_TYPE_FILE;
3008
                        def->parallels[parallelPortIncCount]->deviceType = VIR_DOMAIN_CHR_DEVICE_TYPE_PARALLEL;
3009

3010
                        parallelPort->vtbl->GetPath(parallelPort, &pathUtf16);
3011

3012 3013
                        VBOX_UTF16_TO_UTF8(pathUtf16, &path);
                        def->parallels[parallelPortIncCount]->data.file.path = strdup(path);
3014

3015 3016 3017 3018
                        parallelPortIncCount++;

                        VBOX_UTF16_FREE(pathUtf16);
                        VBOX_UTF8_FREE(path);
3019
                    }
3020 3021

                    VBOX_RELEASE(parallelPort);
3022
                }
3023
            }
3024

3025 3026 3027 3028 3029
            /* dump USB devices/filters if active */
            def->nhostdevs = 0;
            machine->vtbl->GetUSBController(machine, &USBController);
            if (USBController) {
                PRBool enabled = PR_FALSE;
3030

3031 3032
                USBController->vtbl->GetEnabled(USBController, &enabled);
                if (enabled) {
3033
                    vboxArray deviceFilters = VBOX_ARRAY_INITIALIZER;
3034

3035 3036
                    vboxArrayGet(&deviceFilters, USBController,
                                 USBController->vtbl->GetDeviceFilters);
3037

3038
                    if (deviceFilters.count > 0) {
3039

3040 3041 3042
                        /* check if the filters are active and then only
                         * alloc mem and set def->nhostdevs
                         */
3043

3044
                        for(i = 0; i < deviceFilters.count; i++) {
3045
                            PRBool active = PR_FALSE;
3046
                            IUSBDeviceFilter *deviceFilter = deviceFilters.items[i];
3047

3048
                            deviceFilter->vtbl->GetActive(deviceFilter, &active);
3049 3050
                            if (active) {
                                def->nhostdevs++;
3051
                            }
3052
                        }
3053

3054 3055 3056
                        if (def->nhostdevs > 0) {
                            /* Alloc mem needed for the filters now */
                            if (VIR_ALLOC_N(def->hostdevs, def->nhostdevs) >= 0) {
3057

3058
                                for(i = 0; (USBFilterCount < def->nhostdevs) || (i < deviceFilters.count); i++) {
3059
                                    PRBool active = PR_FALSE;
3060
                                    IUSBDeviceFilter *deviceFilter = deviceFilters.items[i];
3061

3062
                                    deviceFilter->vtbl->GetActive(deviceFilter, &active);
3063 3064 3065 3066 3067 3068 3069 3070 3071
                                    if (active) {
                                        if (VIR_ALLOC(def->hostdevs[USBFilterCount]) >= 0) {
                                            PRUnichar *vendorIdUtf16  = NULL;
                                            char *vendorIdUtf8        = NULL;
                                            unsigned vendorId         = 0;
                                            PRUnichar *productIdUtf16 = NULL;
                                            char *productIdUtf8       = NULL;
                                            unsigned productId        = 0;
                                            char *endptr              = NULL;
3072

3073 3074 3075 3076
                                            def->hostdevs[USBFilterCount]->mode =
                                                VIR_DOMAIN_HOSTDEV_MODE_SUBSYS;
                                            def->hostdevs[USBFilterCount]->source.subsys.type =
                                                VIR_DOMAIN_HOSTDEV_SUBSYS_TYPE_USB;
3077

3078 3079
                                            deviceFilter->vtbl->GetVendorId(deviceFilter, &vendorIdUtf16);
                                            deviceFilter->vtbl->GetProductId(deviceFilter, &productIdUtf16);
3080

3081 3082
                                            VBOX_UTF16_TO_UTF8(vendorIdUtf16, &vendorIdUtf8);
                                            VBOX_UTF16_TO_UTF8(productIdUtf16, &productIdUtf8);
3083

3084 3085
                                            vendorId  = strtol(vendorIdUtf8, &endptr, 16);
                                            productId = strtol(productIdUtf8, &endptr, 16);
3086

3087 3088
                                            def->hostdevs[USBFilterCount]->source.subsys.u.usb.vendor  = vendorId;
                                            def->hostdevs[USBFilterCount]->source.subsys.u.usb.product = productId;
3089

3090 3091
                                            VBOX_UTF16_FREE(vendorIdUtf16);
                                            VBOX_UTF8_FREE(vendorIdUtf8);
3092

3093 3094
                                            VBOX_UTF16_FREE(productIdUtf16);
                                            VBOX_UTF8_FREE(productIdUtf8);
3095

3096 3097
                                            USBFilterCount++;
                                        } else
3098
                                            virReportOOMError();
3099
                                    }
3100 3101
                                }
                            } else
3102
                                virReportOOMError();
3103 3104 3105
                        }
                    }

3106
                    /* Cleanup */
3107
                    vboxArrayRelease(&deviceFilters);
3108 3109
                }
                VBOX_RELEASE(USBController);
3110
            }
3111 3112 3113 3114 3115

            /* all done so set gotAllABoutDef and pass def to virDomainDefFormat
             * to generate XML for it
             */
            gotAllABoutDef = 0;
3116
        }
3117 3118
        VBOX_RELEASE(machine);
        machine = NULL;
3119 3120 3121
    }

    if (gotAllABoutDef == 0)
3122
        ret = virDomainDefFormat(def, flags);
3123 3124

cleanup:
3125
    vboxIIDUnalloc(&iid);
3126 3127 3128 3129 3130
    virDomainDefFree(def);
    return ret;
}

static int vboxListDefinedDomains(virConnectPtr conn, char ** const names, int maxnames) {
3131
    VBOX_OBJECT_CHECK(conn, int, -1);
3132
    vboxArray machines = VBOX_ARRAY_INITIALIZER;
3133 3134 3135
    char *machineName    = NULL;
    PRUnichar *machineNameUtf16 = NULL;
    PRUint32 state;
3136
    nsresult rc;
3137 3138
    int i, j;

3139
    rc = vboxArrayGet(&machines, data->vboxObj, data->vboxObj->vtbl->GetMachines);
3140
    if (NS_FAILED(rc)) {
3141 3142 3143
        vboxError(VIR_ERR_INTERNAL_ERROR,
                  _("Could not get list of Defined Domains, rc=%08x"),
                  (unsigned)rc);
3144 3145
        goto cleanup;
    }
3146

3147 3148 3149
    ret = 0;
    for (i = 0, j = 0; (i < machines.count) && (j < maxnames); i++) {
        IMachine *machine = machines.items[i];
3150 3151 3152 3153 3154 3155 3156 3157 3158 3159

        if (machine) {
            PRBool isAccessible = PR_FALSE;
            machine->vtbl->GetAccessible(machine, &isAccessible);
            if (isAccessible) {
                machine->vtbl->GetState(machine, &state);
                if (   (state < MachineState_FirstOnline)
                    || (state > MachineState_LastOnline) ) {
                    machine->vtbl->GetName(machine, &machineNameUtf16);
                    VBOX_UTF16_TO_UTF8(machineNameUtf16, &machineName);
3160 3161 3162 3163
                    names[j] = strdup(machineName);
                    VBOX_UTF16_FREE(machineNameUtf16);
                    VBOX_UTF8_FREE(machineName);
                    if (!names[j]) {
3164
                        virReportOOMError();
3165 3166 3167 3168
                        for ( ; j >= 0 ; j--)
                            VIR_FREE(names[j]);
                        ret = -1;
                        goto cleanup;
3169
                    }
3170
                    j++;
3171
                    ret++;
3172 3173 3174 3175 3176 3177
                }
            }
        }
    }

cleanup:
3178
    vboxArrayRelease(&machines);
3179 3180 3181 3182
    return ret;
}

static int vboxNumOfDefinedDomains(virConnectPtr conn) {
3183
    VBOX_OBJECT_CHECK(conn, int, -1);
3184
    vboxArray machines = VBOX_ARRAY_INITIALIZER;
3185
    PRUint32 state       = MachineState_Null;
3186
    nsresult rc;
3187 3188
    int i;

3189
    rc = vboxArrayGet(&machines, data->vboxObj, data->vboxObj->vtbl->GetMachines);
3190
    if (NS_FAILED(rc)) {
3191 3192 3193
        vboxError(VIR_ERR_INTERNAL_ERROR,
                  _("Could not get number of Defined Domains, rc=%08x"),
                  (unsigned)rc);
3194 3195
        goto cleanup;
    }
3196

3197 3198 3199
    ret = 0;
    for (i = 0; i < machines.count; ++i) {
        IMachine *machine = machines.items[i];
3200 3201 3202 3203 3204 3205 3206 3207 3208

        if (machine) {
            PRBool isAccessible = PR_FALSE;
            machine->vtbl->GetAccessible(machine, &isAccessible);
            if (isAccessible) {
                machine->vtbl->GetState(machine, &state);
                if (   (state < MachineState_FirstOnline)
                    || (state > MachineState_LastOnline) ) {
                    ret++;
3209 3210 3211 3212 3213 3214
                }
            }
        }
    }

cleanup:
3215
    vboxArrayRelease(&machines);
3216 3217 3218
    return ret;
}

E
Eric Blake 已提交
3219 3220 3221 3222 3223 3224 3225 3226 3227 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 3290 3291 3292 3293 3294 3295 3296 3297 3298 3299 3300 3301 3302 3303 3304 3305 3306 3307 3308 3309 3310 3311 3312 3313 3314

static int
vboxStartMachine(virDomainPtr dom, int i, IMachine *machine, vboxIID *iid)
{
    VBOX_OBJECT_CHECK(dom->conn, int, -1);
    int vrdpPresent              = 0;
    int sdlPresent               = 0;
    int guiPresent               = 0;
    char *guiDisplay             = NULL;
    char *sdlDisplay             = NULL;
    PRUnichar *keyTypeUtf16      = NULL;
    PRUnichar *valueTypeUtf16    = NULL;
    char      *valueTypeUtf8     = NULL;
    PRUnichar *keyDislpayUtf16   = NULL;
    PRUnichar *valueDisplayUtf16 = NULL;
    char      *valueDisplayUtf8  = NULL;
    IProgress *progress          = NULL;
    PRUnichar *env               = NULL;
    PRUnichar *sessionType       = NULL;
    nsresult rc;

    VBOX_UTF8_TO_UTF16("FRONTEND/Type", &keyTypeUtf16);
    machine->vtbl->GetExtraData(machine, keyTypeUtf16, &valueTypeUtf16);
    VBOX_UTF16_FREE(keyTypeUtf16);

    if (valueTypeUtf16) {
        VBOX_UTF16_TO_UTF8(valueTypeUtf16, &valueTypeUtf8);
        VBOX_UTF16_FREE(valueTypeUtf16);

        if ( STREQ(valueTypeUtf8, "sdl") || STREQ(valueTypeUtf8, "gui") ) {

            VBOX_UTF8_TO_UTF16("FRONTEND/Display", &keyDislpayUtf16);
            machine->vtbl->GetExtraData(machine, keyDislpayUtf16,
                                        &valueDisplayUtf16);
            VBOX_UTF16_FREE(keyDislpayUtf16);

            if (valueDisplayUtf16) {
                VBOX_UTF16_TO_UTF8(valueDisplayUtf16, &valueDisplayUtf8);
                VBOX_UTF16_FREE(valueDisplayUtf16);

                if (strlen(valueDisplayUtf8) <= 0) {
                    VBOX_UTF8_FREE(valueDisplayUtf8);
                    valueDisplayUtf8 = NULL;
                }
            }

            if (STREQ(valueTypeUtf8, "sdl")) {
                sdlPresent = 1;
                if (valueDisplayUtf8) {
                    sdlDisplay = strdup(valueDisplayUtf8);
                    if (sdlDisplay == NULL) {
                        virReportOOMError();
                        /* just don't go to cleanup yet as it is ok to have
                         * sdlDisplay as NULL and we check it below if it
                         * exist and then only use it there
                         */
                    }
                }
            }

            if (STREQ(valueTypeUtf8, "gui")) {
                guiPresent = 1;
                if (valueDisplayUtf8) {
                    guiDisplay = strdup(valueDisplayUtf8);
                    if (guiDisplay == NULL) {
                        virReportOOMError();
                        /* just don't go to cleanup yet as it is ok to have
                         * guiDisplay as NULL and we check it below if it
                         * exist and then only use it there
                         */
                    }
                }
            }
        }

        if (STREQ(valueTypeUtf8, "vrdp")) {
            vrdpPresent = 1;
        }

        if (!vrdpPresent && !sdlPresent && !guiPresent) {
            /* if nothing is selected it means either the machine xml
             * file is really old or some values are missing so fallback
             */
            guiPresent = 1;
        }

        VBOX_UTF8_FREE(valueTypeUtf8);

    } else {
        guiPresent = 1;
    }
    if (valueDisplayUtf8)
        VBOX_UTF8_FREE(valueDisplayUtf8);

    if (guiPresent) {
        if (guiDisplay) {
E
Eric Blake 已提交
3315 3316 3317 3318 3319 3320 3321
            char *displayutf8;
            if (virAsprintf(&displayutf8, "DISPLAY=%s", guiDisplay) < 0)
                virReportOOMError();
            else {
                VBOX_UTF8_TO_UTF16(displayutf8, &env);
                VIR_FREE(displayutf8);
            }
E
Eric Blake 已提交
3322 3323 3324 3325 3326 3327 3328 3329
            VIR_FREE(guiDisplay);
        }

        VBOX_UTF8_TO_UTF16("gui", &sessionType);
    }

    if (sdlPresent) {
        if (sdlDisplay) {
E
Eric Blake 已提交
3330 3331 3332 3333 3334 3335 3336
            char *displayutf8;
            if (virAsprintf(&displayutf8, "DISPLAY=%s", sdlDisplay) < 0)
                virReportOOMError();
            else {
                VBOX_UTF8_TO_UTF16(displayutf8, &env);
                VIR_FREE(displayutf8);
            }
E
Eric Blake 已提交
3337 3338 3339 3340 3341 3342 3343 3344 3345 3346 3347 3348
            VIR_FREE(sdlDisplay);
        }

        VBOX_UTF8_TO_UTF16("sdl", &sessionType);
    }

    if (vrdpPresent) {
        VBOX_UTF8_TO_UTF16("vrdp", &sessionType);
    }

    rc = data->vboxObj->vtbl->OpenRemoteSession(data->vboxObj,
                                                data->vboxSession,
3349
                                                iid->value,
E
Eric Blake 已提交
3350 3351 3352 3353 3354 3355 3356 3357 3358 3359 3360 3361 3362 3363 3364 3365 3366 3367 3368 3369 3370 3371 3372 3373 3374 3375 3376 3377 3378 3379 3380 3381 3382 3383 3384 3385 3386 3387 3388 3389 3390
                                                sessionType,
                                                env,
                                                &progress );
    if (NS_FAILED(rc)) {
        vboxError(VIR_ERR_OPERATION_FAILED, "%s",
                  _("openremotesession failed, domain can't be started"));
        ret = -1;
    } else {
        PRBool completed = 0;
#if VBOX_API_VERSION == 2002
        nsresult resultCode;
#else
        PRInt32  resultCode;
#endif
        progress->vtbl->WaitForCompletion(progress, -1);
        rc = progress->vtbl->GetCompleted(progress, &completed);
        if (NS_FAILED(rc)) {
            /* error */
            ret = -1;
        }
        progress->vtbl->GetResultCode(progress, &resultCode);
        if (NS_FAILED(resultCode)) {
            /* error */
            ret = -1;
        } else {
            /* all ok set the domid */
            dom->id = i + 1;
            ret = 0;
        }
    }

    VBOX_RELEASE(progress);

    data->vboxSession->vtbl->Close(data->vboxSession);

    VBOX_UTF16_FREE(env);
    VBOX_UTF16_FREE(sessionType);

    return ret;
}

3391
static int vboxDomainCreateWithFlags(virDomainPtr dom, unsigned int flags) {
3392
    VBOX_OBJECT_CHECK(dom->conn, int, -1);
3393
    vboxArray machines = VBOX_ARRAY_INITIALIZER;
3394
    unsigned char uuid[VIR_UUID_BUFLEN] = {0};
3395 3396
    nsresult rc;
    int i = 0;
3397

3398 3399
    virCheckFlags(0, -1);

3400
    if (!dom->name) {
3401
        vboxError(VIR_ERR_INTERNAL_ERROR, "%s",
3402
                  _("Error while reading the domain name"));
3403 3404 3405
        goto cleanup;
    }

3406
    rc = vboxArrayGet(&machines, data->vboxObj, data->vboxObj->vtbl->GetMachines);
3407
    if (NS_FAILED(rc)) {
3408 3409
        vboxError(VIR_ERR_INTERNAL_ERROR,
                  _("Could not get list of machines, rc=%08x"), (unsigned)rc);
3410 3411
        goto cleanup;
    }
3412

3413 3414
    for (i = 0; i < machines.count; ++i) {
        IMachine *machine = machines.items[i];
3415
        PRBool isAccessible = PR_FALSE;
3416

3417 3418
        if (!machine)
            continue;
3419

3420 3421
        machine->vtbl->GetAccessible(machine, &isAccessible);
        if (isAccessible) {
3422
            vboxIID iid = VBOX_IID_INITIALIZER;
3423

3424 3425
            rc = machine->vtbl->GetId(machine, &iid.value);
            if (NS_FAILED(rc))
3426
                continue;
3427
            vboxIIDToUUID(&iid, uuid);
3428

3429
            if (memcmp(dom->uuid, uuid, VIR_UUID_BUFLEN) == 0) {
3430 3431 3432 3433 3434 3435
                PRUint32 state = MachineState_Null;
                machine->vtbl->GetState(machine, &state);

                if ( (state == MachineState_PoweredOff) ||
                     (state == MachineState_Saved) ||
                     (state == MachineState_Aborted) ) {
3436
                    ret = vboxStartMachine(dom, i, machine, &iid);
3437
                } else {
3438 3439 3440
                    vboxError(VIR_ERR_OPERATION_FAILED, "%s",
                              _("machine is not in poweroff|saved|"
                                "aborted state, so couldn't start it"));
3441
                    ret = -1;
3442 3443
                }
            }
3444
            vboxIIDUnalloc(&iid);
3445 3446
            if (ret != -1)
                break;
3447 3448 3449
        }
    }

3450
    /* Do the cleanup and take care you dont leak any memory */
3451
    vboxArrayRelease(&machines);
3452

3453 3454 3455 3456
cleanup:
    return ret;
}

3457 3458 3459 3460
static int vboxDomainCreate(virDomainPtr dom) {
    return vboxDomainCreateWithFlags(dom, 0);
}

E
Eric Blake 已提交
3461 3462 3463 3464 3465 3466 3467
static void
vboxSetBootDeviceOrder(virDomainDefPtr def, vboxGlobalData *data,
                       IMachine *machine)
{
    ISystemProperties *systemProperties = NULL;
    PRUint32 maxBootPosition            = 0;
    int i = 0;
3468

E
Eric Blake 已提交
3469 3470 3471 3472 3473 3474 3475 3476 3477 3478 3479 3480 3481 3482 3483 3484
    DEBUG("def->os.type             %s", def->os.type);
    DEBUG("def->os.arch             %s", def->os.arch);
    DEBUG("def->os.machine          %s", def->os.machine);
    DEBUG("def->os.nBootDevs        %d", def->os.nBootDevs);
    DEBUG("def->os.bootDevs[0]      %d", def->os.bootDevs[0]);
    DEBUG("def->os.bootDevs[1]      %d", def->os.bootDevs[1]);
    DEBUG("def->os.bootDevs[2]      %d", def->os.bootDevs[2]);
    DEBUG("def->os.bootDevs[3]      %d", def->os.bootDevs[3]);
    DEBUG("def->os.init             %s", def->os.init);
    DEBUG("def->os.kernel           %s", def->os.kernel);
    DEBUG("def->os.initrd           %s", def->os.initrd);
    DEBUG("def->os.cmdline          %s", def->os.cmdline);
    DEBUG("def->os.root             %s", def->os.root);
    DEBUG("def->os.loader           %s", def->os.loader);
    DEBUG("def->os.bootloader       %s", def->os.bootloader);
    DEBUG("def->os.bootloaderArgs   %s", def->os.bootloaderArgs);
3485

E
Eric Blake 已提交
3486 3487 3488 3489 3490 3491
    data->vboxObj->vtbl->GetSystemProperties(data->vboxObj, &systemProperties);
    if (systemProperties) {
        systemProperties->vtbl->GetMaxBootPosition(systemProperties,
                                                   &maxBootPosition);
        VBOX_RELEASE(systemProperties);
        systemProperties = NULL;
3492
    }
3493

E
Eric Blake 已提交
3494 3495 3496
    /* Clear the defaults first */
    for (i = 0; i < maxBootPosition; i++) {
        machine->vtbl->SetBootOrder(machine, i+1, DeviceType_Null);
3497
    }
3498

E
Eric Blake 已提交
3499 3500 3501 3502 3503 3504 3505 3506 3507 3508 3509
    for (i = 0; (i < def->os.nBootDevs) && (i < maxBootPosition); i++) {
        PRUint32 device = DeviceType_Null;

        if (def->os.bootDevs[i] == VIR_DOMAIN_BOOT_FLOPPY) {
            device = DeviceType_Floppy;
        } else if (def->os.bootDevs[i] == VIR_DOMAIN_BOOT_CDROM) {
            device = DeviceType_DVD;
        } else if (def->os.bootDevs[i] == VIR_DOMAIN_BOOT_DISK) {
            device = DeviceType_HardDisk;
        } else if (def->os.bootDevs[i] == VIR_DOMAIN_BOOT_NET) {
            device = DeviceType_Network;
3510
        }
E
Eric Blake 已提交
3511
        machine->vtbl->SetBootOrder(machine, i+1, device);
3512
    }
E
Eric Blake 已提交
3513
}
3514

E
Eric Blake 已提交
3515 3516 3517 3518 3519
static void
vboxAttachDrives(virDomainDefPtr def, vboxGlobalData *data, IMachine *machine)
{
    int i;
    nsresult rc;
3520 3521

#if VBOX_API_VERSION < 3001
E
Eric Blake 已提交
3522 3523 3524 3525 3526 3527 3528 3529 3530 3531 3532 3533 3534 3535 3536 3537 3538 3539 3540 3541 3542 3543 3544 3545 3546 3547 3548
    if (def->ndisks == 0)
        return;

    for (i = 0; i < def->ndisks; i++) {
        DEBUG("disk(%d) type:       %d", i, def->disks[i]->type);
        DEBUG("disk(%d) device:     %d", i, def->disks[i]->device);
        DEBUG("disk(%d) bus:        %d", i, def->disks[i]->bus);
        DEBUG("disk(%d) src:        %s", i, def->disks[i]->src);
        DEBUG("disk(%d) dst:        %s", i, def->disks[i]->dst);
        DEBUG("disk(%d) driverName: %s", i, def->disks[i]->driverName);
        DEBUG("disk(%d) driverType: %s", i, def->disks[i]->driverType);
        DEBUG("disk(%d) cachemode:  %d", i, def->disks[i]->cachemode);
        DEBUG("disk(%d) readonly:   %s", i, (def->disks[i]->readonly
                                             ? "True" : "False"));
        DEBUG("disk(%d) shared:     %s", i, (def->disks[i]->shared
                                             ? "True" : "False"));

        if (def->disks[i]->device == VIR_DOMAIN_DISK_DEVICE_CDROM) {
            if (def->disks[i]->type == VIR_DOMAIN_DISK_TYPE_FILE &&
                def->disks[i]->src != NULL) {
                IDVDDrive *dvdDrive = NULL;
                /* Currently CDROM/DVD Drive is always IDE
                 * Secondary Master so neglecting the following
                 * parameters:
                 *      def->disks[i]->bus
                 *      def->disks[i]->dst
                 */
3549

E
Eric Blake 已提交
3550 3551 3552 3553
                machine->vtbl->GetDVDDrive(machine, &dvdDrive);
                if (dvdDrive) {
                    IDVDImage *dvdImage          = NULL;
                    PRUnichar *dvdfileUtf16      = NULL;
3554 3555
                    vboxIID dvduuid = VBOX_IID_INITIALIZER;
                    vboxIID dvdemptyuuid = VBOX_IID_INITIALIZER;
3556

E
Eric Blake 已提交
3557
                    VBOX_UTF8_TO_UTF16(def->disks[i]->src, &dvdfileUtf16);
3558

E
Eric Blake 已提交
3559 3560 3561 3562 3563
                    data->vboxObj->vtbl->FindDVDImage(data->vboxObj,
                                                      dvdfileUtf16, &dvdImage);
                    if (!dvdImage) {
                        data->vboxObj->vtbl->OpenDVDImage(data->vboxObj,
                                                          dvdfileUtf16,
3564
                                                          dvdemptyuuid.value,
E
Eric Blake 已提交
3565 3566 3567 3568
                                                          &dvdImage);
                    }
                    if (dvdImage) {
                        rc = dvdImage->vtbl->imedium.GetId((IMedium *)dvdImage,
3569
                                                           &dvduuid.value);
E
Eric Blake 已提交
3570 3571 3572 3573 3574 3575
                        if (NS_FAILED(rc)) {
                            vboxError(VIR_ERR_INTERNAL_ERROR,
                                      _("can't get the uuid of the file to "
                                        "be attached to cdrom: %s, rc=%08x"),
                                      def->disks[i]->src, (unsigned)rc);
                        } else {
3576
                            rc = dvdDrive->vtbl->MountImage(dvdDrive, dvduuid.value);
E
Eric Blake 已提交
3577 3578 3579 3580 3581
                            if (NS_FAILED(rc)) {
                                vboxError(VIR_ERR_INTERNAL_ERROR,
                                          _("could not attach the file to cdrom: %s, rc=%08x"),
                                          def->disks[i]->src, (unsigned)rc);
                            } else {
3582
                                DEBUGIID("CD/DVDImage UUID:", dvduuid.value);
3583
                            }
3584
                        }
E
Eric Blake 已提交
3585 3586

                        VBOX_MEDIUM_RELEASE(dvdImage);
3587
                    }
3588
                    vboxIIDUnalloc(&dvduuid);
E
Eric Blake 已提交
3589 3590 3591 3592 3593 3594 3595 3596 3597 3598
                    VBOX_UTF16_FREE(dvdfileUtf16);
                    VBOX_RELEASE(dvdDrive);
                }
            } else if (def->disks[i]->type == VIR_DOMAIN_DISK_TYPE_BLOCK) {
            }
        } else if (def->disks[i]->device == VIR_DOMAIN_DISK_DEVICE_DISK) {
            if (def->disks[i]->type == VIR_DOMAIN_DISK_TYPE_FILE &&
                def->disks[i]->src != NULL) {
                IHardDisk *hardDisk     = NULL;
                PRUnichar *hddfileUtf16 = NULL;
3599
                vboxIID hdduuid = VBOX_IID_INITIALIZER;
E
Eric Blake 已提交
3600 3601 3602 3603 3604 3605
                PRUnichar *hddEmpty     = NULL;
                /* Current Limitation: Harddisk can't be connected to
                 * Secondary Master as Secondary Master is always used
                 * for CD/DVD Drive, so don't connect the harddisk if it
                 * is requested to be connected to Secondary master
                 */
3606

E
Eric Blake 已提交
3607 3608
                VBOX_UTF8_TO_UTF16(def->disks[i]->src, &hddfileUtf16);
                VBOX_UTF8_TO_UTF16("", &hddEmpty);
3609

E
Eric Blake 已提交
3610 3611
                data->vboxObj->vtbl->FindHardDisk(data->vboxObj, hddfileUtf16,
                                                  &hardDisk);
3612

E
Eric Blake 已提交
3613
                if (!hardDisk) {
3614
# if VBOX_API_VERSION == 2002
E
Eric Blake 已提交
3615 3616 3617 3618
                    data->vboxObj->vtbl->OpenHardDisk(data->vboxObj,
                                                      hddfileUtf16,
                                                      AccessMode_ReadWrite,
                                                      &hardDisk);
3619
# else
E
Eric Blake 已提交
3620 3621 3622 3623 3624 3625 3626 3627
                    data->vboxObj->vtbl->OpenHardDisk(data->vboxObj,
                                                      hddfileUtf16,
                                                      AccessMode_ReadWrite,
                                                      0,
                                                      hddEmpty,
                                                      0,
                                                      hddEmpty,
                                                      &hardDisk);
3628
# endif
E
Eric Blake 已提交
3629
                }
3630

E
Eric Blake 已提交
3631 3632
                if (hardDisk) {
                    rc = hardDisk->vtbl->imedium.GetId((IMedium *)hardDisk,
3633
                                                       &hdduuid.value);
E
Eric Blake 已提交
3634 3635 3636 3637 3638 3639 3640 3641 3642 3643 3644 3645 3646 3647 3648 3649 3650 3651 3652
                    if (NS_FAILED(rc)) {
                        vboxError(VIR_ERR_INTERNAL_ERROR,
                                  _("can't get the uuid of the file to be "
                                    "attached as harddisk: %s, rc=%08x"),
                                  def->disks[i]->src, (unsigned)rc);
                    } else {
                        if (def->disks[i]->readonly) {
                            hardDisk->vtbl->SetType(hardDisk,
                                                    HardDiskType_Immutable);
                            DEBUG0("setting harddisk to readonly");
                        } else if (!def->disks[i]->readonly) {
                            hardDisk->vtbl->SetType(hardDisk,
                                                    HardDiskType_Normal);
                            DEBUG0("setting harddisk type to normal");
                        }
                        if (def->disks[i]->bus == VIR_DOMAIN_DISK_BUS_IDE) {
                            if (STREQ(def->disks[i]->dst, "hdc")) {
                                DEBUG0("Not connecting harddisk to hdc as hdc"
                                       " is taken by CD/DVD Drive");
3653
                            } else {
E
Eric Blake 已提交
3654 3655 3656 3657 3658 3659 3660 3661 3662 3663 3664 3665 3666 3667 3668 3669 3670
                                PRInt32 channel          = 0;
                                PRInt32 device           = 0;
                                PRUnichar *hddcnameUtf16 = NULL;

                                char *hddcname = strdup("IDE");
                                VBOX_UTF8_TO_UTF16(hddcname, &hddcnameUtf16);
                                VIR_FREE(hddcname);

                                if (STREQ(def->disks[i]->dst, "hda")) {
                                    channel = 0;
                                    device  = 0;
                                } else if (STREQ(def->disks[i]->dst, "hdb")) {
                                    channel = 0;
                                    device  = 1;
                                } else if (STREQ(def->disks[i]->dst, "hdd")) {
                                    channel = 1;
                                    device  = 1;
3671
                                }
E
Eric Blake 已提交
3672 3673

                                rc = machine->vtbl->AttachHardDisk(machine,
3674
                                                                   hdduuid.value,
E
Eric Blake 已提交
3675 3676 3677 3678 3679 3680 3681 3682 3683 3684 3685
                                                                   hddcnameUtf16,
                                                                   channel,
                                                                   device);
                                VBOX_UTF16_FREE(hddcnameUtf16);

                                if (NS_FAILED(rc)) {
                                    vboxError(VIR_ERR_INTERNAL_ERROR,
                                              _("could not attach the file as "
                                                "harddisk: %s, rc=%08x"),
                                              def->disks[i]->src, (unsigned)rc);
                                } else {
3686
                                    DEBUGIID("Attached HDD with UUID", hdduuid.value);
3687 3688 3689
                                }
                            }
                        }
3690
                    }
E
Eric Blake 已提交
3691 3692
                    VBOX_MEDIUM_RELEASE(hardDisk);
                }
3693
                vboxIIDUnalloc(&hdduuid);
E
Eric Blake 已提交
3694 3695 3696 3697 3698 3699 3700 3701 3702 3703 3704 3705 3706 3707
                VBOX_UTF16_FREE(hddEmpty);
                VBOX_UTF16_FREE(hddfileUtf16);
            } else if (def->disks[i]->type == VIR_DOMAIN_DISK_TYPE_BLOCK) {
            }
        } else if (def->disks[i]->device == VIR_DOMAIN_DISK_DEVICE_FLOPPY) {
            if (def->disks[i]->type == VIR_DOMAIN_DISK_TYPE_FILE &&
                def->disks[i]->src != NULL) {
                IFloppyDrive *floppyDrive;
                machine->vtbl->GetFloppyDrive(machine, &floppyDrive);
                if (floppyDrive) {
                    rc = floppyDrive->vtbl->SetEnabled(floppyDrive, 1);
                    if (NS_SUCCEEDED(rc)) {
                        IFloppyImage *floppyImage   = NULL;
                        PRUnichar *fdfileUtf16      = NULL;
3708 3709
                        vboxIID fduuid = VBOX_IID_INITIALIZER;
                        vboxIID fdemptyuuid = VBOX_IID_INITIALIZER;
3710

E
Eric Blake 已提交
3711 3712 3713 3714
                        VBOX_UTF8_TO_UTF16(def->disks[i]->src, &fdfileUtf16);
                        rc = data->vboxObj->vtbl->FindFloppyImage(data->vboxObj,
                                                                  fdfileUtf16,
                                                                  &floppyImage);
3715

E
Eric Blake 已提交
3716 3717 3718
                        if (!floppyImage) {
                            data->vboxObj->vtbl->OpenFloppyImage(data->vboxObj,
                                                                 fdfileUtf16,
3719
                                                                 fdemptyuuid.value,
E
Eric Blake 已提交
3720 3721
                                                                 &floppyImage);
                        }
3722

E
Eric Blake 已提交
3723 3724
                        if (floppyImage) {
                            rc = floppyImage->vtbl->imedium.GetId((IMedium *)floppyImage,
3725
                                                                  &fduuid.value);
E
Eric Blake 已提交
3726 3727 3728 3729 3730 3731 3732
                            if (NS_FAILED(rc)) {
                                vboxError(VIR_ERR_INTERNAL_ERROR,
                                          _("can't get the uuid of the file to "
                                            "be attached to floppy drive: %s, rc=%08x"),
                                          def->disks[i]->src, (unsigned)rc);
                            } else {
                                rc = floppyDrive->vtbl->MountImage(floppyDrive,
3733
                                                                   fduuid.value);
E
Eric Blake 已提交
3734 3735 3736 3737 3738 3739
                                if (NS_FAILED(rc)) {
                                    vboxError(VIR_ERR_INTERNAL_ERROR,
                                              _("could not attach the file to "
                                                "floppy drive: %s, rc=%08x"),
                                              def->disks[i]->src, (unsigned)rc);
                                } else {
3740
                                    DEBUGIID("floppyImage UUID", fduuid.value);
3741 3742
                                }
                            }
E
Eric Blake 已提交
3743
                            VBOX_MEDIUM_RELEASE(floppyImage);
3744
                        }
3745
                        vboxIIDUnalloc(&fduuid);
E
Eric Blake 已提交
3746
                        VBOX_UTF16_FREE(fdfileUtf16);
3747
                    }
E
Eric Blake 已提交
3748
                    VBOX_RELEASE(floppyDrive);
3749
                }
E
Eric Blake 已提交
3750
            } else if (def->disks[i]->type == VIR_DOMAIN_DISK_TYPE_BLOCK) {
3751
            }
3752
        }
E
Eric Blake 已提交
3753
    }
3754
#else  /* VBOX_API_VERSION >= 3001 */
E
Eric Blake 已提交
3755 3756 3757 3758 3759 3760 3761 3762 3763 3764 3765 3766
    PRUint32 maxPortPerInst[StorageBus_Floppy + 1] = {};
    PRUint32 maxSlotPerPort[StorageBus_Floppy + 1] = {};
    PRUnichar *storageCtlName = NULL;
    bool error = false;

    /* get the max port/slots/etc for the given storage bus */
    error = !vboxGetMaxPortSlotValues(data->vboxObj, maxPortPerInst,
                                      maxSlotPerPort);

    /* add a storage controller for the mediums to be attached */
    /* this needs to change when multiple controller are supported for
     * ver > 3.1 */
3767
    {
E
Eric Blake 已提交
3768 3769 3770 3771 3772 3773 3774 3775 3776 3777 3778 3779 3780 3781 3782 3783 3784 3785 3786 3787 3788 3789 3790 3791 3792 3793 3794 3795 3796 3797 3798 3799 3800 3801 3802
        IStorageController *storageCtl = NULL;
        PRUnichar *sName = NULL;

        VBOX_UTF8_TO_UTF16("IDE Controller", &sName);
        machine->vtbl->AddStorageController(machine,
                                            sName,
                                            StorageBus_IDE,
                                            &storageCtl);
        VBOX_UTF16_FREE(sName);
        VBOX_RELEASE(storageCtl);

        VBOX_UTF8_TO_UTF16("SATA Controller", &sName);
        machine->vtbl->AddStorageController(machine,
                                            sName,
                                            StorageBus_SATA,
                                            &storageCtl);
        VBOX_UTF16_FREE(sName);
        VBOX_RELEASE(storageCtl);

        VBOX_UTF8_TO_UTF16("SCSI Controller", &sName);
        machine->vtbl->AddStorageController(machine,
                                            sName,
                                            StorageBus_SCSI,
                                            &storageCtl);
        VBOX_UTF16_FREE(sName);
        VBOX_RELEASE(storageCtl);

        VBOX_UTF8_TO_UTF16("Floppy Controller", &sName);
        machine->vtbl->AddStorageController(machine,
                                            sName,
                                            StorageBus_Floppy,
                                            &storageCtl);
        VBOX_UTF16_FREE(sName);
        VBOX_RELEASE(storageCtl);
    }
3803

E
Eric Blake 已提交
3804 3805 3806 3807 3808 3809 3810 3811 3812 3813 3814 3815 3816 3817 3818 3819 3820 3821 3822 3823 3824 3825 3826 3827 3828 3829 3830 3831 3832 3833 3834 3835 3836 3837 3838 3839 3840 3841 3842 3843 3844 3845 3846
    for (i = 0; i < def->ndisks && !error; i++) {
        DEBUG("disk(%d) type:       %d", i, def->disks[i]->type);
        DEBUG("disk(%d) device:     %d", i, def->disks[i]->device);
        DEBUG("disk(%d) bus:        %d", i, def->disks[i]->bus);
        DEBUG("disk(%d) src:        %s", i, def->disks[i]->src);
        DEBUG("disk(%d) dst:        %s", i, def->disks[i]->dst);
        DEBUG("disk(%d) driverName: %s", i, def->disks[i]->driverName);
        DEBUG("disk(%d) driverType: %s", i, def->disks[i]->driverType);
        DEBUG("disk(%d) cachemode:  %d", i, def->disks[i]->cachemode);
        DEBUG("disk(%d) readonly:   %s", i, (def->disks[i]->readonly
                                             ? "True" : "False"));
        DEBUG("disk(%d) shared:     %s", i, (def->disks[i]->shared
                                             ? "True" : "False"));

        if (def->disks[i]->type == VIR_DOMAIN_DISK_TYPE_FILE &&
            def->disks[i]->src != NULL) {
            IMedium   *medium          = NULL;
            PRUnichar *mediumUUID      = NULL;
            PRUnichar *mediumFileUtf16 = NULL;
            PRUint32   storageBus      = StorageBus_Null;
            PRUint32   deviceType      = DeviceType_Null;
            PRInt32    deviceInst      = 0;
            PRInt32    devicePort      = 0;
            PRInt32    deviceSlot      = 0;

            VBOX_UTF8_TO_UTF16(def->disks[i]->src, &mediumFileUtf16);

            if (def->disks[i]->device == VIR_DOMAIN_DISK_DEVICE_DISK) {
                deviceType = DeviceType_HardDisk;
                data->vboxObj->vtbl->FindHardDisk(data->vboxObj,
                                                  mediumFileUtf16, &medium);
            } else if (def->disks[i]->device == VIR_DOMAIN_DISK_DEVICE_CDROM) {
                deviceType = DeviceType_DVD;
                data->vboxObj->vtbl->FindDVDImage(data->vboxObj,
                                                  mediumFileUtf16, &medium);
            } else if (def->disks[i]->device == VIR_DOMAIN_DISK_DEVICE_FLOPPY) {
                deviceType = DeviceType_Floppy;
                data->vboxObj->vtbl->FindFloppyImage(data->vboxObj,
                                                     mediumFileUtf16, &medium);
            } else {
                VBOX_UTF16_FREE(mediumFileUtf16);
                continue;
            }
3847

E
Eric Blake 已提交
3848 3849
            if (!medium) {
                PRUnichar *mediumEmpty = NULL;
3850

E
Eric Blake 已提交
3851
                VBOX_UTF8_TO_UTF16("", &mediumEmpty);
3852 3853

                if (def->disks[i]->device == VIR_DOMAIN_DISK_DEVICE_DISK) {
3854 3855 3856 3857 3858 3859 3860 3861
                    rc = data->vboxObj->vtbl->OpenHardDisk(data->vboxObj,
                                                           mediumFileUtf16,
                                                           AccessMode_ReadWrite,
                                                           false,
                                                           mediumEmpty,
                                                           false,
                                                           mediumEmpty,
                                                           &medium);
E
Eric Blake 已提交
3862 3863
                } else if (def->disks[i]->device ==
                           VIR_DOMAIN_DISK_DEVICE_CDROM) {
3864 3865 3866 3867
                    rc = data->vboxObj->vtbl->OpenDVDImage(data->vboxObj,
                                                           mediumFileUtf16,
                                                           mediumEmpty,
                                                           &medium);
E
Eric Blake 已提交
3868 3869
                } else if (def->disks[i]->device ==
                           VIR_DOMAIN_DISK_DEVICE_FLOPPY) {
3870 3871 3872 3873 3874 3875
                    rc = data->vboxObj->vtbl->OpenFloppyImage(data->vboxObj,
                                                              mediumFileUtf16,
                                                              mediumEmpty,
                                                              &medium);
                } else {
                    rc = 0;
3876 3877
                }

E
Eric Blake 已提交
3878 3879
                VBOX_UTF16_FREE(mediumEmpty);
            }
3880

E
Eric Blake 已提交
3881 3882 3883 3884 3885 3886 3887 3888
            if (!medium) {
                vboxError(VIR_ERR_INTERNAL_ERROR,
                          _("Failed to attach the following disk/dvd/floppy "
                            "to the machine: %s, rc=%08x"),
                          def->disks[i]->src, (unsigned)rc);
                VBOX_UTF16_FREE(mediumFileUtf16);
                continue;
            }
3889

E
Eric Blake 已提交
3890 3891 3892 3893 3894 3895 3896 3897 3898 3899
            rc = medium->vtbl->GetId(medium, &mediumUUID);
            if (NS_FAILED(rc)) {
                vboxError(VIR_ERR_INTERNAL_ERROR,
                          _("can't get the uuid of the file to be attached "
                            "as harddisk/dvd/floppy: %s, rc=%08x"),
                          def->disks[i]->src, (unsigned)rc);
                VBOX_RELEASE(medium);
                VBOX_UTF16_FREE(mediumFileUtf16);
                continue;
            }
3900

E
Eric Blake 已提交
3901 3902 3903 3904 3905 3906 3907
            if (def->disks[i]->device == VIR_DOMAIN_DISK_DEVICE_DISK) {
                if (def->disks[i]->readonly) {
                    medium->vtbl->SetType(medium, MediumType_Immutable);
                    DEBUG0("setting harddisk to immutable");
                } else if (!def->disks[i]->readonly) {
                    medium->vtbl->SetType(medium, MediumType_Normal);
                    DEBUG0("setting harddisk type to normal");
3908
                }
E
Eric Blake 已提交
3909
            }
3910

E
Eric Blake 已提交
3911 3912 3913 3914 3915 3916 3917 3918 3919 3920 3921 3922 3923
            if (def->disks[i]->bus == VIR_DOMAIN_DISK_BUS_IDE) {
                VBOX_UTF8_TO_UTF16("IDE Controller", &storageCtlName);
                storageBus = StorageBus_IDE;
            } else if (def->disks[i]->bus == VIR_DOMAIN_DISK_BUS_SATA) {
                VBOX_UTF8_TO_UTF16("SATA Controller", &storageCtlName);
                storageBus = StorageBus_SATA;
            } else if (def->disks[i]->bus == VIR_DOMAIN_DISK_BUS_SCSI) {
                VBOX_UTF8_TO_UTF16("SCSI Controller", &storageCtlName);
                storageBus = StorageBus_SCSI;
            } else if (def->disks[i]->bus == VIR_DOMAIN_DISK_BUS_FDC) {
                VBOX_UTF8_TO_UTF16("Floppy Controller", &storageCtlName);
                storageBus = StorageBus_Floppy;
            }
3924

E
Eric Blake 已提交
3925 3926 3927 3928 3929 3930 3931 3932 3933 3934 3935 3936
            /* get the device details i.e instance, port and slot */
            if (!vboxGetDeviceDetails(def->disks[i]->dst,
                                      maxPortPerInst,
                                      maxSlotPerPort,
                                      storageBus,
                                      &deviceInst,
                                      &devicePort,
                                      &deviceSlot)) {
                vboxError(VIR_ERR_INTERNAL_ERROR,
                          _("can't get the port/slot number of harddisk/"
                            "dvd/floppy to be attached: %s, rc=%08x"),
                          def->disks[i]->src, (unsigned)rc);
3937 3938 3939
                VBOX_RELEASE(medium);
                VBOX_UTF16_FREE(mediumUUID);
                VBOX_UTF16_FREE(mediumFileUtf16);
E
Eric Blake 已提交
3940 3941 3942 3943 3944 3945 3946 3947 3948 3949 3950 3951 3952 3953 3954 3955 3956 3957
                continue;
            }

            /* attach the harddisk/dvd/Floppy to the storage controller */
            rc = machine->vtbl->AttachDevice(machine,
                                             storageCtlName,
                                             devicePort,
                                             deviceSlot,
                                             deviceType,
                                             mediumUUID);

            if (NS_FAILED(rc)) {
                vboxError(VIR_ERR_INTERNAL_ERROR,
                          _("could not attach the file as harddisk/"
                            "dvd/floppy: %s, rc=%08x"),
                          def->disks[i]->src, (unsigned)rc);
            } else {
                DEBUGIID("Attached HDD/DVD/Floppy with UUID", mediumUUID);
3958
            }
E
Eric Blake 已提交
3959 3960 3961 3962 3963

            VBOX_RELEASE(medium);
            VBOX_UTF16_FREE(mediumUUID);
            VBOX_UTF16_FREE(mediumFileUtf16);
            VBOX_UTF16_FREE(storageCtlName);
3964 3965 3966
        }
    }
#endif /* VBOX_API_VERSION >= 3001 */
E
Eric Blake 已提交
3967
}
3968

E
Eric Blake 已提交
3969 3970 3971 3972
static void
vboxAttachSound(virDomainDefPtr def, IMachine *machine)
{
    nsresult rc;
3973

E
Eric Blake 已提交
3974 3975 3976 3977 3978 3979 3980 3981 3982 3983 3984 3985 3986 3987 3988 3989
    /* Check if def->nsounds is one as VirtualBox currently supports
     * only one sound card
     */
    if (def->nsounds == 1) {
        IAudioAdapter *audioAdapter = NULL;

        machine->vtbl->GetAudioAdapter(machine, &audioAdapter);
        if (audioAdapter) {
            rc = audioAdapter->vtbl->SetEnabled(audioAdapter, 1);
            if (NS_SUCCEEDED(rc)) {
                if (def->sounds[0]->model == VIR_DOMAIN_SOUND_MODEL_SB16) {
                    audioAdapter->vtbl->SetAudioController(audioAdapter,
                                                           AudioControllerType_SB16);
                } else if (def->sounds[0]->model == VIR_DOMAIN_SOUND_MODEL_AC97) {
                    audioAdapter->vtbl->SetAudioController(audioAdapter,
                                                           AudioControllerType_AC97);
3990
                }
3991
            }
E
Eric Blake 已提交
3992
            VBOX_RELEASE(audioAdapter);
3993
        }
E
Eric Blake 已提交
3994 3995 3996 3997 3998 3999 4000 4001 4002 4003 4004 4005 4006 4007 4008 4009 4010 4011 4012 4013 4014 4015 4016 4017 4018 4019 4020 4021 4022 4023 4024 4025 4026 4027 4028 4029 4030 4031 4032 4033 4034 4035 4036 4037 4038 4039 4040 4041 4042 4043 4044 4045
    }
}

static void
vboxAttachNetwork(virDomainDefPtr def, vboxGlobalData *data, IMachine *machine)
{
    ISystemProperties *systemProperties = NULL;
    PRUint32 networkAdapterCount        = 0;
    int i = 0;

    data->vboxObj->vtbl->GetSystemProperties(data->vboxObj, &systemProperties);
    if (systemProperties) {
        systemProperties->vtbl->GetNetworkAdapterCount(systemProperties,
                                                       &networkAdapterCount);
        VBOX_RELEASE(systemProperties);
        systemProperties = NULL;
    }

    DEBUG("Number of Network Cards to be connected: %d", def->nnets);
    DEBUG("Number of Network Cards available: %d", networkAdapterCount);

    for (i = 0; (i < def->nnets) && (i < networkAdapterCount); i++) {
        INetworkAdapter *adapter = NULL;
        PRUint32 adapterType     = NetworkAdapterType_Null;
        char macaddr[VIR_MAC_STRING_BUFLEN] = {0};
        char macaddrvbox[VIR_MAC_STRING_BUFLEN - 5] = {0};

        virFormatMacAddr(def->nets[i]->mac, macaddr);
        snprintf(macaddrvbox, VIR_MAC_STRING_BUFLEN - 5,
                 "%02X%02X%02X%02X%02X%02X",
                 def->nets[i]->mac[0],
                 def->nets[i]->mac[1],
                 def->nets[i]->mac[2],
                 def->nets[i]->mac[3],
                 def->nets[i]->mac[4],
                 def->nets[i]->mac[5]);
        macaddrvbox[VIR_MAC_STRING_BUFLEN - 6] = '\0';

        DEBUG("NIC(%d): Type:   %d", i, def->nets[i]->type);
        DEBUG("NIC(%d): Model:  %s", i, def->nets[i]->model);
        DEBUG("NIC(%d): Mac:    %s", i, macaddr);
        DEBUG("NIC(%d): ifname: %s", i, def->nets[i]->ifname);
        if (def->nets[i]->type == VIR_DOMAIN_NET_TYPE_NETWORK) {
            DEBUG("NIC(%d): name:    %s", i, def->nets[i]->data.network.name);
        } else if (def->nets[i]->type == VIR_DOMAIN_NET_TYPE_INTERNAL) {
            DEBUG("NIC(%d): name:   %s", i, def->nets[i]->data.internal.name);
        } else if (def->nets[i]->type == VIR_DOMAIN_NET_TYPE_USER) {
            DEBUG("NIC(%d): NAT.", i);
        } else if (def->nets[i]->type == VIR_DOMAIN_NET_TYPE_BRIDGE) {
            DEBUG("NIC(%d): brname: %s", i, def->nets[i]->data.bridge.brname);
            DEBUG("NIC(%d): script: %s", i, def->nets[i]->data.bridge.script);
            DEBUG("NIC(%d): ipaddr: %s", i, def->nets[i]->data.bridge.ipaddr);
4046 4047
        }

E
Eric Blake 已提交
4048 4049 4050 4051 4052
        machine->vtbl->GetNetworkAdapter(machine, i, &adapter);
        if (adapter) {
            PRUnichar *MACAddress = NULL;

            adapter->vtbl->SetEnabled(adapter, 1);
4053

E
Eric Blake 已提交
4054 4055 4056 4057 4058 4059 4060 4061 4062 4063 4064
            if (def->nets[i]->model) {
                if (STRCASEEQ(def->nets[i]->model , "Am79C970A")) {
                    adapterType = NetworkAdapterType_Am79C970A;
                } else if (STRCASEEQ(def->nets[i]->model , "Am79C973")) {
                    adapterType = NetworkAdapterType_Am79C973;
                } else if (STRCASEEQ(def->nets[i]->model , "82540EM")) {
                    adapterType = NetworkAdapterType_I82540EM;
                } else if (STRCASEEQ(def->nets[i]->model , "82545EM")) {
                    adapterType = NetworkAdapterType_I82545EM;
                } else if (STRCASEEQ(def->nets[i]->model , "82543GC")) {
                    adapterType = NetworkAdapterType_I82543GC;
4065
#if VBOX_API_VERSION >= 3001
E
Eric Blake 已提交
4066 4067
                } else if (STRCASEEQ(def->nets[i]->model , "virtio")) {
                    adapterType = NetworkAdapterType_Virtio;
4068 4069
#endif /* VBOX_API_VERSION >= 3001 */
                }
E
Eric Blake 已提交
4070 4071 4072
            } else {
                adapterType = NetworkAdapterType_Am79C973;
            }
4073

E
Eric Blake 已提交
4074
            adapter->vtbl->SetAdapterType(adapter, adapterType);
4075

E
Eric Blake 已提交
4076 4077 4078
            if (def->nets[i]->type == VIR_DOMAIN_NET_TYPE_BRIDGE) {
                PRUnichar *hostInterface = NULL;
                /* Bridged Network */
4079

E
Eric Blake 已提交
4080
                adapter->vtbl->AttachToBridgedInterface(adapter);
4081

E
Eric Blake 已提交
4082 4083 4084 4085 4086 4087 4088 4089 4090
                if (def->nets[i]->data.bridge.brname) {
                    VBOX_UTF8_TO_UTF16(def->nets[i]->data.bridge.brname,
                                       &hostInterface);
                    adapter->vtbl->SetHostInterface(adapter, hostInterface);
                    VBOX_UTF16_FREE(hostInterface);
                }
            } else if (def->nets[i]->type == VIR_DOMAIN_NET_TYPE_INTERNAL) {
                PRUnichar *internalNetwork = NULL;
                /* Internal Network */
4091

E
Eric Blake 已提交
4092
                adapter->vtbl->AttachToInternalNetwork(adapter);
4093

E
Eric Blake 已提交
4094 4095 4096 4097 4098
                if (def->nets[i]->data.internal.name) {
                    VBOX_UTF8_TO_UTF16(def->nets[i]->data.internal.name,
                                       &internalNetwork);
                    adapter->vtbl->SetInternalNetwork(adapter, internalNetwork);
                    VBOX_UTF16_FREE(internalNetwork);
4099
                }
E
Eric Blake 已提交
4100 4101 4102 4103 4104 4105 4106
            } else if (def->nets[i]->type == VIR_DOMAIN_NET_TYPE_NETWORK) {
                PRUnichar *hostInterface = NULL;
                /* Host Only Networking (currently only vboxnet0 available
                 * on *nix and mac, on windows you can create and configure
                 * as many as you want)
                 */
                adapter->vtbl->AttachToHostOnlyInterface(adapter);
4107

E
Eric Blake 已提交
4108 4109 4110 4111 4112 4113 4114 4115 4116 4117 4118 4119 4120 4121
                if (def->nets[i]->data.network.name) {
                    VBOX_UTF8_TO_UTF16(def->nets[i]->data.network.name,
                                       &hostInterface);
                    adapter->vtbl->SetHostInterface(adapter, hostInterface);
                    VBOX_UTF16_FREE(hostInterface);
                }
            } else if (def->nets[i]->type == VIR_DOMAIN_NET_TYPE_USER) {
                /* NAT */
                adapter->vtbl->AttachToNAT(adapter);
            } else {
                /* else always default to NAT if we don't understand
                 * what option is been passed to us
                 */
                adapter->vtbl->AttachToNAT(adapter);
4122
            }
E
Eric Blake 已提交
4123 4124 4125 4126

            VBOX_UTF8_TO_UTF16(macaddrvbox, &MACAddress);
            adapter->vtbl->SetMACAddress(adapter, MACAddress);
            VBOX_UTF16_FREE(MACAddress);
4127
        }
E
Eric Blake 已提交
4128 4129 4130 4131 4132 4133 4134 4135 4136
    }
}

static void
vboxAttachSerial(virDomainDefPtr def, vboxGlobalData *data, IMachine *machine)
{
    ISystemProperties *systemProperties = NULL;
    PRUint32 serialPortCount            = 0;
    int i = 0;
4137

E
Eric Blake 已提交
4138 4139 4140 4141 4142 4143 4144
    data->vboxObj->vtbl->GetSystemProperties(data->vboxObj, &systemProperties);
    if (systemProperties) {
        systemProperties->vtbl->GetSerialPortCount(systemProperties,
                                                   &serialPortCount);
        VBOX_RELEASE(systemProperties);
        systemProperties = NULL;
    }
4145

E
Eric Blake 已提交
4146 4147 4148 4149
    DEBUG("Number of Serial Ports to be connected: %d", def->nserials);
    DEBUG("Number of Serial Ports available: %d", serialPortCount);
    for (i = 0; (i < def->nserials) && (i < serialPortCount); i++) {
        ISerialPort *serialPort = NULL;
4150

E
Eric Blake 已提交
4151 4152 4153
        DEBUG("SerialPort(%d): Type: %d", i, def->serials[i]->type);
        DEBUG("SerialPort(%d): target.port: %d", i,
              def->serials[i]->target.port);
4154

E
Eric Blake 已提交
4155 4156 4157
        machine->vtbl->GetSerialPort(machine, i, &serialPort);
        if (serialPort) {
            PRUnichar *pathUtf16 = NULL;
4158

E
Eric Blake 已提交
4159
            serialPort->vtbl->SetEnabled(serialPort, 1);
4160

E
Eric Blake 已提交
4161 4162 4163 4164 4165 4166 4167 4168 4169 4170 4171 4172 4173 4174 4175 4176 4177 4178 4179 4180 4181 4182 4183 4184 4185
            if (def->serials[i]->data.file.path) {
                VBOX_UTF8_TO_UTF16(def->serials[i]->data.file.path, &pathUtf16);
                serialPort->vtbl->SetPath(serialPort, pathUtf16);
            }

            /* For now hard code the serial ports to COM1 and COM2,
             * COM1 (Base Addr: 0x3F8 (decimal: 1016), IRQ: 4)
             * COM2 (Base Addr: 0x2F8 (decimal:  760), IRQ: 3)
             * TODO: make this more flexible
             */
            /* TODO: to improve the libvirt XMl handling so
             * that def->serials[i]->target.port shows real port
             * and not always start at 0
             */
            if (def->serials[i]->target.port == 0) {
                serialPort->vtbl->SetIRQ(serialPort, 4);
                serialPort->vtbl->SetIOBase(serialPort, 1016);
                DEBUG(" serialPort-%d irq: %d, iobase 0x%x, path: %s",
                      i, 4, 1016, def->serials[i]->data.file.path);
            } else if (def->serials[i]->target.port == 1) {
                serialPort->vtbl->SetIRQ(serialPort, 3);
                serialPort->vtbl->SetIOBase(serialPort, 760);
                DEBUG(" serialPort-%d irq: %d, iobase 0x%x, path: %s",
                      i, 3, 760, def->serials[i]->data.file.path);
            }
4186

E
Eric Blake 已提交
4187 4188 4189 4190
            if (def->serials[i]->type == VIR_DOMAIN_CHR_TYPE_DEV) {
                serialPort->vtbl->SetHostMode(serialPort, PortMode_HostDevice);
            } else if (def->serials[i]->type == VIR_DOMAIN_CHR_TYPE_PIPE) {
                serialPort->vtbl->SetHostMode(serialPort, PortMode_HostPipe);
4191
#if VBOX_API_VERSION >= 3000
E
Eric Blake 已提交
4192 4193
            } else if (def->serials[i]->type == VIR_DOMAIN_CHR_TYPE_FILE) {
                serialPort->vtbl->SetHostMode(serialPort, PortMode_RawFile);
4194
#endif /* VBOX_API_VERSION >= 3000 */
E
Eric Blake 已提交
4195 4196 4197 4198
            } else {
                serialPort->vtbl->SetHostMode(serialPort,
                                              PortMode_Disconnected);
            }
4199

E
Eric Blake 已提交
4200 4201 4202 4203
            VBOX_RELEASE(serialPort);
            if (pathUtf16) {
                VBOX_UTF16_FREE(pathUtf16);
                pathUtf16 = NULL;
4204
            }
4205
        }
E
Eric Blake 已提交
4206 4207
    }
}
4208

E
Eric Blake 已提交
4209 4210 4211 4212 4213 4214
static void
vboxAttachParallel(virDomainDefPtr def, vboxGlobalData *data, IMachine *machine)
{
    ISystemProperties *systemProperties = NULL;
    PRUint32 parallelPortCount          = 0;
    int i = 0;
4215

E
Eric Blake 已提交
4216 4217 4218 4219 4220 4221 4222
    data->vboxObj->vtbl->GetSystemProperties(data->vboxObj, &systemProperties);
    if (systemProperties) {
        systemProperties->vtbl->GetParallelPortCount(systemProperties,
                                                     &parallelPortCount);
        VBOX_RELEASE(systemProperties);
        systemProperties = NULL;
    }
4223

E
Eric Blake 已提交
4224 4225 4226 4227
    DEBUG("Number of Parallel Ports to be connected: %d", def->nparallels);
    DEBUG("Number of Parallel Ports available: %d", parallelPortCount);
    for (i = 0; (i < def->nparallels) && (i < parallelPortCount); i++) {
        IParallelPort *parallelPort = NULL;
4228

E
Eric Blake 已提交
4229 4230 4231
        DEBUG("ParallelPort(%d): Type: %d", i, def->parallels[i]->type);
        DEBUG("ParallelPort(%d): target.port: %d", i,
              def->parallels[i]->target.port);
4232

E
Eric Blake 已提交
4233 4234 4235
        machine->vtbl->GetParallelPort(machine, i, &parallelPort);
        if (parallelPort) {
            PRUnichar *pathUtf16 = NULL;
4236

E
Eric Blake 已提交
4237
            VBOX_UTF8_TO_UTF16(def->parallels[i]->data.file.path, &pathUtf16);
4238

E
Eric Blake 已提交
4239 4240 4241 4242 4243 4244 4245 4246 4247 4248 4249 4250 4251 4252 4253 4254 4255 4256 4257 4258
            /* For now hard code the parallel ports to
             * LPT1 (Base Addr: 0x378 (decimal: 888), IRQ: 7)
             * LPT2 (Base Addr: 0x278 (decimal: 632), IRQ: 5)
             * TODO: make this more flexible
             */
            if ((def->parallels[i]->type == VIR_DOMAIN_CHR_TYPE_DEV)  ||
                (def->parallels[i]->type == VIR_DOMAIN_CHR_TYPE_PTY)  ||
                (def->parallels[i]->type == VIR_DOMAIN_CHR_TYPE_FILE) ||
                (def->parallels[i]->type == VIR_DOMAIN_CHR_TYPE_PIPE)) {
                parallelPort->vtbl->SetPath(parallelPort, pathUtf16);
                if (i == 0) {
                    parallelPort->vtbl->SetIRQ(parallelPort, 7);
                    parallelPort->vtbl->SetIOBase(parallelPort, 888);
                    DEBUG(" parallePort-%d irq: %d, iobase 0x%x, path: %s",
                          i, 7, 888, def->parallels[i]->data.file.path);
                } else if (i == 1) {
                    parallelPort->vtbl->SetIRQ(parallelPort, 5);
                    parallelPort->vtbl->SetIOBase(parallelPort, 632);
                    DEBUG(" parallePort-%d irq: %d, iobase 0x%x, path: %s",
                          i, 5, 632, def->parallels[i]->data.file.path);
4259 4260
                }
            }
E
Eric Blake 已提交
4261 4262 4263 4264 4265 4266 4267 4268 4269 4270 4271

            /* like serial port, parallel port can't be enabled unless
             * correct IRQ and IOBase values are specified.
             */
            parallelPort->vtbl->SetEnabled(parallelPort, 1);

            VBOX_RELEASE(parallelPort);
            if (pathUtf16) {
                VBOX_UTF16_FREE(pathUtf16);
                pathUtf16 = NULL;
            }
4272
        }
E
Eric Blake 已提交
4273 4274 4275 4276 4277 4278 4279 4280 4281 4282 4283 4284 4285
    }
}

static void
vboxAttachVideo(virDomainDefPtr def, IMachine *machine)
{
    if ((def->nvideos == 1) &&
        (def->videos[0]->type == VIR_DOMAIN_VIDEO_TYPE_VBOX)) {
        machine->vtbl->SetVRAMSize(machine, def->videos[0]->vram);
        machine->vtbl->SetMonitorCount(machine, def->videos[0]->heads);
        if (def->videos[0]->accel) {
            machine->vtbl->SetAccelerate3DEnabled(machine,
                                                  def->videos[0]->accel->support3d);
4286
#if VBOX_API_VERSION >= 3001
E
Eric Blake 已提交
4287 4288
            machine->vtbl->SetAccelerate2DVideoEnabled(machine,
                                                       def->videos[0]->accel->support2d);
4289
#endif /* VBOX_API_VERSION >= 3001 */
E
Eric Blake 已提交
4290 4291
        } else {
            machine->vtbl->SetAccelerate3DEnabled(machine, 0);
4292
#if VBOX_API_VERSION >= 3001
E
Eric Blake 已提交
4293
            machine->vtbl->SetAccelerate2DVideoEnabled(machine, 0);
4294 4295
#endif /* VBOX_API_VERSION >= 3001 */
        }
E
Eric Blake 已提交
4296 4297
    }
}
4298

E
Eric Blake 已提交
4299 4300 4301 4302 4303 4304 4305 4306 4307
static void
vboxAttachDisplay(virDomainDefPtr def, vboxGlobalData *data, IMachine *machine)
{
    int vrdpPresent  = 0;
    int sdlPresent   = 0;
    int guiPresent   = 0;
    char *guiDisplay = NULL;
    char *sdlDisplay = NULL;
    int i = 0;
4308

E
Eric Blake 已提交
4309 4310
    for (i = 0; i < def->ngraphics; i++) {
        IVRDPServer *VRDPServer = NULL;
4311

E
Eric Blake 已提交
4312 4313
        if ((def->graphics[i]->type == VIR_DOMAIN_GRAPHICS_TYPE_RDP) &&
            (vrdpPresent == 0)) {
4314

E
Eric Blake 已提交
4315 4316 4317 4318 4319
            vrdpPresent = 1;
            machine->vtbl->GetVRDPServer(machine, &VRDPServer);
            if (VRDPServer) {
                VRDPServer->vtbl->SetEnabled(VRDPServer, PR_TRUE);
                DEBUG0("VRDP Support turned ON.");
4320 4321

#if VBOX_API_VERSION < 3001
E
Eric Blake 已提交
4322 4323 4324 4325 4326 4327 4328 4329 4330 4331 4332 4333
                if (def->graphics[i]->data.rdp.port) {
                    VRDPServer->vtbl->SetPort(VRDPServer,
                                              def->graphics[i]->data.rdp.port);
                    DEBUG("VRDP Port changed to: %d",
                          def->graphics[i]->data.rdp.port);
                } else if (def->graphics[i]->data.rdp.autoport) {
                    /* Setting the port to 0 will reset its value to
                     * the default one which is 3389 currently
                     */
                    VRDPServer->vtbl->SetPort(VRDPServer, 0);
                    DEBUG0("VRDP Port changed to default, which is 3389 currently");
                }
4334
#else  /* VBOX_API_VERSION >= 3001 */
E
Eric Blake 已提交
4335 4336 4337 4338
                PRUnichar *portUtf16 = NULL;
                portUtf16 = PRUnicharFromInt(def->graphics[i]->data.rdp.port);
                VRDPServer->vtbl->SetPorts(VRDPServer, portUtf16);
                VBOX_UTF16_FREE(portUtf16);
4339 4340
#endif /* VBOX_API_VERSION >= 3001 */

E
Eric Blake 已提交
4341 4342 4343 4344 4345
                if (def->graphics[i]->data.rdp.replaceUser) {
                    VRDPServer->vtbl->SetReuseSingleConnection(VRDPServer,
                                                               PR_TRUE);
                    DEBUG0("VRDP set to reuse single connection");
                }
4346

E
Eric Blake 已提交
4347 4348 4349 4350 4351
                if (def->graphics[i]->data.rdp.multiUser) {
                    VRDPServer->vtbl->SetAllowMultiConnection(VRDPServer,
                                                              PR_TRUE);
                    DEBUG0("VRDP set to allow multiple connection");
                }
4352

E
Eric Blake 已提交
4353 4354
                if (def->graphics[i]->data.rdp.listenAddr) {
                    PRUnichar *netAddressUtf16 = NULL;
4355

E
Eric Blake 已提交
4356 4357 4358 4359 4360 4361
                    VBOX_UTF8_TO_UTF16(def->graphics[i]->data.rdp.listenAddr,
                                       &netAddressUtf16);
                    VRDPServer->vtbl->SetNetAddress(VRDPServer,
                                                    netAddressUtf16);
                    DEBUG("VRDP listen address is set to: %s",
                          def->graphics[i]->data.rdp.listenAddr);
4362

E
Eric Blake 已提交
4363
                    VBOX_UTF16_FREE(netAddressUtf16);
4364
                }
E
Eric Blake 已提交
4365 4366

                VBOX_RELEASE(VRDPServer);
4367
            }
E
Eric Blake 已提交
4368
        }
4369

E
Eric Blake 已提交
4370 4371 4372 4373 4374 4375 4376 4377 4378 4379 4380
        if ((def->graphics[i]->type == VIR_DOMAIN_GRAPHICS_TYPE_DESKTOP) &&
            (guiPresent == 0)) {
            guiPresent = 1;
            if (def->graphics[i]->data.desktop.display) {
                guiDisplay = strdup(def->graphics[i]->data.desktop.display);
                if (guiDisplay == NULL) {
                    virReportOOMError();
                    /* just don't go to cleanup yet as it is ok to have
                     * guiDisplay as NULL and we check it below if it
                     * exist and then only use it there
                     */
4381
                }
4382
            }
E
Eric Blake 已提交
4383
        }
4384

E
Eric Blake 已提交
4385 4386 4387 4388 4389 4390 4391 4392 4393 4394 4395
        if ((def->graphics[i]->type == VIR_DOMAIN_GRAPHICS_TYPE_SDL) &&
            (sdlPresent == 0)) {
            sdlPresent = 1;
            if (def->graphics[i]->data.sdl.display) {
                sdlDisplay = strdup(def->graphics[i]->data.sdl.display);
                if (sdlDisplay == NULL) {
                    virReportOOMError();
                    /* just don't go to cleanup yet as it is ok to have
                     * sdlDisplay as NULL and we check it below if it
                     * exist and then only use it there
                     */
4396
                }
4397
            }
4398
        }
E
Eric Blake 已提交
4399
    }
4400

E
Eric Blake 已提交
4401 4402 4403 4404
    if ((vrdpPresent == 1) && (guiPresent == 0) && (sdlPresent == 0)) {
        /* store extradata key that frontend is set to vrdp */
        PRUnichar *keyTypeUtf16   = NULL;
        PRUnichar *valueTypeUtf16 = NULL;
4405

E
Eric Blake 已提交
4406 4407
        VBOX_UTF8_TO_UTF16("FRONTEND/Type", &keyTypeUtf16);
        VBOX_UTF8_TO_UTF16("vrdp", &valueTypeUtf16);
4408

E
Eric Blake 已提交
4409
        machine->vtbl->SetExtraData(machine, keyTypeUtf16, valueTypeUtf16);
4410

E
Eric Blake 已提交
4411 4412
        VBOX_UTF16_FREE(keyTypeUtf16);
        VBOX_UTF16_FREE(valueTypeUtf16);
4413

E
Eric Blake 已提交
4414 4415 4416 4417 4418 4419
    } else if ((guiPresent == 0) && (sdlPresent == 1)) {
        /* store extradata key that frontend is set to sdl */
        PRUnichar *keyTypeUtf16      = NULL;
        PRUnichar *valueTypeUtf16    = NULL;
        PRUnichar *keyDislpayUtf16   = NULL;
        PRUnichar *valueDisplayUtf16 = NULL;
4420

E
Eric Blake 已提交
4421 4422
        VBOX_UTF8_TO_UTF16("FRONTEND/Type", &keyTypeUtf16);
        VBOX_UTF8_TO_UTF16("sdl", &valueTypeUtf16);
4423

E
Eric Blake 已提交
4424
        machine->vtbl->SetExtraData(machine, keyTypeUtf16, valueTypeUtf16);
4425

E
Eric Blake 已提交
4426 4427
        VBOX_UTF16_FREE(keyTypeUtf16);
        VBOX_UTF16_FREE(valueTypeUtf16);
4428

E
Eric Blake 已提交
4429 4430 4431
        if (sdlDisplay) {
            VBOX_UTF8_TO_UTF16("FRONTEND/Display", &keyDislpayUtf16);
            VBOX_UTF8_TO_UTF16(sdlDisplay, &valueDisplayUtf16);
4432

E
Eric Blake 已提交
4433 4434
            machine->vtbl->SetExtraData(machine, keyDislpayUtf16,
                                        valueDisplayUtf16);
4435

E
Eric Blake 已提交
4436 4437 4438
            VBOX_UTF16_FREE(keyDislpayUtf16);
            VBOX_UTF16_FREE(valueDisplayUtf16);
        }
4439

E
Eric Blake 已提交
4440 4441 4442 4443 4444 4445
    } else {
        /* if all are set then default is gui, with vrdp turned on */
        PRUnichar *keyTypeUtf16      = NULL;
        PRUnichar *valueTypeUtf16    = NULL;
        PRUnichar *keyDislpayUtf16   = NULL;
        PRUnichar *valueDisplayUtf16 = NULL;
4446

E
Eric Blake 已提交
4447 4448
        VBOX_UTF8_TO_UTF16("FRONTEND/Type", &keyTypeUtf16);
        VBOX_UTF8_TO_UTF16("gui", &valueTypeUtf16);
4449

E
Eric Blake 已提交
4450
        machine->vtbl->SetExtraData(machine, keyTypeUtf16, valueTypeUtf16);
4451

E
Eric Blake 已提交
4452 4453
        VBOX_UTF16_FREE(keyTypeUtf16);
        VBOX_UTF16_FREE(valueTypeUtf16);
4454

E
Eric Blake 已提交
4455 4456 4457
        if (guiDisplay) {
            VBOX_UTF8_TO_UTF16("FRONTEND/Display", &keyDislpayUtf16);
            VBOX_UTF8_TO_UTF16(guiDisplay, &valueDisplayUtf16);
4458

E
Eric Blake 已提交
4459 4460
            machine->vtbl->SetExtraData(machine, keyDislpayUtf16,
                                        valueDisplayUtf16);
4461

E
Eric Blake 已提交
4462 4463
            VBOX_UTF16_FREE(keyDislpayUtf16);
            VBOX_UTF16_FREE(valueDisplayUtf16);
4464
        }
E
Eric Blake 已提交
4465
    }
4466

E
Eric Blake 已提交
4467 4468 4469
    VIR_FREE(guiDisplay);
    VIR_FREE(sdlDisplay);
}
4470

E
Eric Blake 已提交
4471 4472 4473 4474 4475 4476 4477 4478 4479 4480 4481 4482 4483 4484 4485 4486 4487 4488 4489 4490 4491 4492 4493 4494 4495 4496 4497 4498 4499 4500 4501 4502 4503 4504 4505 4506 4507 4508 4509 4510
static void
vboxAttachUSB(virDomainDefPtr def, vboxGlobalData *data, IMachine *machine)
{
    IUSBController *USBController = NULL;
    int i = 0;
    bool isUSB = false;

    if (def->nhostdevs == 0)
        return;

    /* Loop through the devices first and see if you
     * have a USB Device, only if you have one then
     * start the USB controller else just proceed as
     * usual
     */
    for (i = 0; i < def->nhostdevs; i++) {
        if (def->hostdevs[i]->mode ==
            VIR_DOMAIN_HOSTDEV_MODE_SUBSYS) {
            if (def->hostdevs[i]->source.subsys.type ==
                VIR_DOMAIN_HOSTDEV_SUBSYS_TYPE_USB) {
                if (def->hostdevs[i]->source.subsys.u.usb.vendor ||
                    def->hostdevs[i]->source.subsys.u.usb.product) {
                    DEBUG("USB Device detected, VendorId:0x%x, ProductId:0x%x",
                          def->hostdevs[i]->source.subsys.u.usb.vendor,
                          def->hostdevs[i]->source.subsys.u.usb.product);
                    isUSB = true;
                    break;
                }
            }
        }
    }

    if (isUSB) {
        /* First Start the USB Controller and then loop
         * to attach USB Devices to it
         */
        machine->vtbl->GetUSBController(machine, &USBController);
        if (USBController) {
            USBController->vtbl->SetEnabled(USBController, 1);
            USBController->vtbl->SetEnabledEhci(USBController, 1);
4511

4512 4513
            for (i = 0; i < def->nhostdevs; i++) {
                if (def->hostdevs[i]->mode ==
E
Eric Blake 已提交
4514
                    VIR_DOMAIN_HOSTDEV_MODE_SUBSYS) {
4515
                    if (def->hostdevs[i]->source.subsys.type ==
E
Eric Blake 已提交
4516
                        VIR_DOMAIN_HOSTDEV_SUBSYS_TYPE_USB) {
4517

E
Eric Blake 已提交
4518
                        char *filtername           = NULL;
E
Eric Blake 已提交
4519 4520
                        PRUnichar *filternameUtf16 = NULL;
                        IUSBDeviceFilter *filter   = NULL;
4521

E
Eric Blake 已提交
4522 4523
                        /* Zero pad for nice alignment when fewer than 9999
                         * devices.
E
Eric Blake 已提交
4524
                         */
E
Eric Blake 已提交
4525 4526 4527 4528 4529 4530 4531 4532 4533
                        if (virAsprintf(&filtername, "filter%04d", i) < 0) {
                            virReportOOMError();
                        } else {
                            VBOX_UTF8_TO_UTF16(filtername, &filternameUtf16);
                            VIR_FREE(filtername);
                            USBController->vtbl->CreateDeviceFilter(USBController,
                                                                    filternameUtf16,
                                                                    &filter);
                        }
E
Eric Blake 已提交
4534 4535 4536 4537 4538 4539 4540 4541 4542 4543 4544 4545
                        VBOX_UTF16_FREE(filternameUtf16);

                        if (filter &&
                            (def->hostdevs[i]->source.subsys.u.usb.vendor ||
                             def->hostdevs[i]->source.subsys.u.usb.product)) {

                            PRUnichar *vendorIdUtf16  = NULL;
                            char vendorId[40]         = {0};
                            PRUnichar *productIdUtf16 = NULL;
                            char productId[40]        = {0};

                            if (def->hostdevs[i]->source.subsys.u.usb.vendor) {
E
Eric Blake 已提交
4546 4547
                                snprintf(vendorId, sizeof(vendorId), "%x",
                                         def->hostdevs[i]->source.subsys.u.usb.vendor);
E
Eric Blake 已提交
4548 4549 4550 4551 4552
                                VBOX_UTF8_TO_UTF16(vendorId, &vendorIdUtf16);
                                filter->vtbl->SetVendorId(filter, vendorIdUtf16);
                                VBOX_UTF16_FREE(vendorIdUtf16);
                            }
                            if (def->hostdevs[i]->source.subsys.u.usb.product) {
E
Eric Blake 已提交
4553 4554
                                snprintf(productId, sizeof(productId), "%x",
                                         def->hostdevs[i]->source.subsys.u.usb.product);
E
Eric Blake 已提交
4555 4556 4557 4558
                                VBOX_UTF8_TO_UTF16(productId, &productIdUtf16);
                                filter->vtbl->SetProductId(filter,
                                                           productIdUtf16);
                                VBOX_UTF16_FREE(productIdUtf16);
4559
                            }
E
Eric Blake 已提交
4560 4561 4562 4563 4564
                            filter->vtbl->SetActive(filter, 1);
                            USBController->vtbl->InsertDeviceFilter(USBController,
                                                                    i,
                                                                    filter);
                            VBOX_RELEASE(filter);
4565
                        }
E
Eric Blake 已提交
4566

4567 4568 4569
                    }
                }
            }
E
Eric Blake 已提交
4570 4571 4572 4573 4574 4575 4576 4577 4578
            VBOX_RELEASE(USBController);
        }
    }
}

static virDomainPtr vboxDomainDefineXML(virConnectPtr conn, const char *xml) {
    VBOX_OBJECT_CHECK(conn, virDomainPtr, NULL);
    IMachine       *machine     = NULL;
    IBIOSSettings  *bios        = NULL;
4579 4580
    vboxIID iid = VBOX_IID_INITIALIZER;
    vboxIID mchiid = VBOX_IID_INITIALIZER;
E
Eric Blake 已提交
4581 4582 4583 4584 4585 4586 4587 4588 4589 4590 4591 4592 4593
    virDomainDefPtr def         = NULL;
    PRUnichar *machineNameUtf16 = NULL;
#if VBOX_API_VERSION >= 3002
    PRBool override             = PR_FALSE;
#endif
    nsresult rc;

    if (!(def = virDomainDefParseString(data->caps, xml,
                                        VIR_DOMAIN_XML_INACTIVE))) {
        goto cleanup;
    }

    VBOX_UTF8_TO_UTF16(def->name, &machineNameUtf16);
4594
    vboxIIDFromUUID(&iid, def->uuid);
E
Eric Blake 已提交
4595 4596 4597 4598 4599
#if VBOX_API_VERSION < 3002
    rc = data->vboxObj->vtbl->CreateMachine(data->vboxObj,
                                            machineNameUtf16,
                                            NULL,
                                            NULL,
4600
                                            iid.value,
E
Eric Blake 已提交
4601 4602 4603 4604 4605 4606
                                            &machine);
#else /* VBOX_API_VERSION >= 3002 */
    rc = data->vboxObj->vtbl->CreateMachine(data->vboxObj,
                                            machineNameUtf16,
                                            NULL,
                                            NULL,
4607
                                            iid.value,
E
Eric Blake 已提交
4608 4609 4610 4611 4612 4613 4614 4615 4616 4617 4618
                                            override,
                                            &machine);
#endif /* VBOX_API_VERSION >= 3002 */
    VBOX_UTF16_FREE(machineNameUtf16);

    if (NS_FAILED(rc)) {
        vboxError(VIR_ERR_INTERNAL_ERROR,
                  _("could not define a domain, rc=%08x"), (unsigned)rc);
        goto cleanup;
    }

4619
    rc = machine->vtbl->SetMemorySize(machine, def->mem.cur_balloon / 1024);
E
Eric Blake 已提交
4620 4621 4622 4623
    if (NS_FAILED(rc)) {
        vboxError(VIR_ERR_INTERNAL_ERROR,
                  _("could not set the memory size of the domain to: %lu Kb, "
                    "rc=%08x"),
4624
                  def->mem.cur_balloon, (unsigned)rc);
E
Eric Blake 已提交
4625 4626
    }

E
Eric Blake 已提交
4627 4628 4629 4630 4631
    if (def->vcpus != def->maxvcpus) {
        vboxError(VIR_ERR_CONFIG_UNSUPPORTED, "%s",
                    _("current vcpu count must equal maximum"));
    }
    rc = machine->vtbl->SetCPUCount(machine, def->maxvcpus);
E
Eric Blake 已提交
4632 4633
    if (NS_FAILED(rc)) {
        vboxError(VIR_ERR_INTERNAL_ERROR,
E
Eric Blake 已提交
4634 4635
                  _("could not set the number of virtual CPUs to: %u, rc=%08x"),
                  def->maxvcpus, (unsigned)rc);
E
Eric Blake 已提交
4636 4637 4638 4639 4640 4641 4642 4643 4644 4645 4646 4647 4648 4649 4650 4651 4652 4653 4654 4655 4656 4657 4658 4659 4660 4661 4662 4663 4664 4665 4666 4667 4668 4669 4670 4671 4672 4673
    }

#if VBOX_API_VERSION < 3001
    rc = machine->vtbl->SetPAEEnabled(machine, (def->features) &
                                      (1 << VIR_DOMAIN_FEATURE_PAE));
#elif VBOX_API_VERSION == 3001
    rc = machine->vtbl->SetCpuProperty(machine, CpuPropertyType_PAE,
                                       (def->features) &
                                       (1 << VIR_DOMAIN_FEATURE_PAE));
#elif VBOX_API_VERSION >= 3002
    rc = machine->vtbl->SetCPUProperty(machine, CPUPropertyType_PAE,
                                       (def->features) &
                                       (1 << VIR_DOMAIN_FEATURE_PAE));
#endif
    if (NS_FAILED(rc)) {
        vboxError(VIR_ERR_INTERNAL_ERROR,
                  _("could not change PAE status to: %s, rc=%08x"),
                  ((def->features) & (1 << VIR_DOMAIN_FEATURE_PAE))
                  ? _("Enabled") : _("Disabled"), (unsigned)rc);
    }

    machine->vtbl->GetBIOSSettings(machine, &bios);
    if (bios) {
        rc = bios->vtbl->SetACPIEnabled(bios, (def->features) &
                                        (1 << VIR_DOMAIN_FEATURE_ACPI));
        if (NS_FAILED(rc)) {
            vboxError(VIR_ERR_INTERNAL_ERROR,
                      _("could not change ACPI status to: %s, rc=%08x"),
                      ((def->features) & (1 << VIR_DOMAIN_FEATURE_ACPI))
                      ? _("Enabled") : _("Disabled"), (unsigned)rc);
        }
        rc = bios->vtbl->SetIOAPICEnabled(bios, (def->features) &
                                          (1 << VIR_DOMAIN_FEATURE_APIC));
        if (NS_FAILED(rc)) {
            vboxError(VIR_ERR_INTERNAL_ERROR,
                      _("could not change APIC status to: %s, rc=%08x"),
                      ((def->features) & (1 << VIR_DOMAIN_FEATURE_APIC))
                      ? _("Enabled") : _("Disabled"), (unsigned)rc);
4674
        }
E
Eric Blake 已提交
4675 4676 4677 4678 4679 4680 4681 4682 4683 4684 4685 4686 4687 4688 4689
        VBOX_RELEASE(bios);
    }

    /* Register the machine before attaching other devices to it */
    rc = data->vboxObj->vtbl->RegisterMachine(data->vboxObj, machine);
    if (NS_FAILED(rc)) {
        vboxError(VIR_ERR_INTERNAL_ERROR,
                  _("could not define a domain, rc=%08x"), (unsigned)rc);
        goto cleanup;
    }

    /* Get the uuid of the machine, currently it is immutable
     * object so open a session to it and get it back, so that
     * you can make changes to the machine setting
     */
4690 4691
    machine->vtbl->GetId(machine, &mchiid.value);
    data->vboxObj->vtbl->OpenSession(data->vboxObj, data->vboxSession, mchiid.value);
E
Eric Blake 已提交
4692 4693 4694 4695 4696 4697 4698 4699 4700 4701 4702
    data->vboxSession->vtbl->GetMachine(data->vboxSession, &machine);

    vboxSetBootDeviceOrder(def, data, machine);
    vboxAttachDrives(def, data, machine);
    vboxAttachSound(def, machine);
    vboxAttachNetwork(def, data, machine);
    vboxAttachSerial(def, data, machine);
    vboxAttachParallel(def, data, machine);
    vboxAttachVideo(def, machine);
    vboxAttachDisplay(def, data, machine);
    vboxAttachUSB(def, data, machine);
4703

4704 4705 4706 4707 4708
    /* Save the machine settings made till now and close the
     * session. also free up the mchiid variable used.
     */
    rc = machine->vtbl->SaveSettings(machine);
    data->vboxSession->vtbl->Close(data->vboxSession);
4709
    vboxIIDUnalloc(&mchiid);
4710

4711 4712 4713
    ret = virGetDomain(conn, def->name, def->uuid);
    VBOX_RELEASE(machine);
    machine = NULL;
4714

4715
    vboxIIDUnalloc(&iid);
4716 4717
    virDomainDefFree(def);

4718
    return ret;
4719 4720

cleanup:
4721
    VBOX_RELEASE(machine);
4722
    vboxIIDUnalloc(&iid);
4723 4724 4725 4726 4727
    virDomainDefFree(def);
    return NULL;
}

static int vboxDomainUndefine(virDomainPtr dom) {
4728
    VBOX_OBJECT_CHECK(dom->conn, int, -1);
4729
    IMachine *machine    = NULL;
4730
    vboxIID iid = VBOX_IID_INITIALIZER;
4731
    nsresult rc;
4732

4733
    vboxIIDFromUUID(&iid, dom->uuid);
4734

4735 4736 4737 4738 4739 4740 4741
    /* Block for checking if HDD's are attched to VM.
     * considering just IDE bus for now. Also skipped
     * chanel=1 and device=0 (Secondary Master) as currenlty
     * it is allocated to CD/DVD Drive bt default
     */
    {
        PRUnichar *hddcnameUtf16 = NULL;
4742

4743 4744 4745
        char *hddcname = strdup("IDE");
        VBOX_UTF8_TO_UTF16(hddcname, &hddcnameUtf16);
        VIR_FREE(hddcname);
4746

4747
        /* Open a Session for the machine */
4748
        rc = data->vboxObj->vtbl->OpenSession(data->vboxObj, data->vboxSession, iid.value);
4749 4750 4751 4752 4753 4754 4755 4756 4757 4758 4759 4760 4761
        if (NS_SUCCEEDED(rc)) {
            rc = data->vboxSession->vtbl->GetMachine(data->vboxSession, &machine);
            if (NS_SUCCEEDED(rc) && machine) {

#if VBOX_API_VERSION < 3001
                /* Disconnect all the drives if present */
                machine->vtbl->DetachHardDisk(machine, hddcnameUtf16, 0, 0);
                machine->vtbl->DetachHardDisk(machine, hddcnameUtf16, 0, 1);
                machine->vtbl->DetachHardDisk(machine, hddcnameUtf16, 1, 1);
#else  /* VBOX_API_VERSION >= 3001 */
                /* get all the controller first, then the attachments and
                 * remove them all so that the machine can be undefined
                 */
4762
                vboxArray storageControllers = VBOX_ARRAY_INITIALIZER;
4763 4764
                int i = 0, j = 0;

4765 4766
                vboxArrayGet(&storageControllers, machine,
                             machine->vtbl->GetStorageControllers);
4767

4768 4769
                for (i = 0; i < storageControllers.count; i++) {
                    IStorageController *strCtl = storageControllers.items[i];
4770
                    PRUnichar *strCtlName = NULL;
4771
                    vboxArray mediumAttachments = VBOX_ARRAY_INITIALIZER;
4772 4773 4774 4775 4776

                    if (!strCtl)
                        continue;

                    strCtl->vtbl->GetName(strCtl, &strCtlName);
4777 4778 4779
                    vboxArrayGetWithArg(&mediumAttachments, machine,
                                        machine->vtbl->GetMediumAttachmentsOfController,
                                        strCtlName);
4780

4781 4782
                    for (j = 0; j < mediumAttachments.count; j++) {
                        IMediumAttachment *medAtt = mediumAttachments.items[j];
4783 4784 4785 4786 4787 4788 4789 4790 4791 4792 4793 4794 4795 4796 4797 4798
                        PRInt32 port = ~0U;
                        PRInt32 device = ~0U;

                        if (!medAtt)
                            continue;

                        medAtt->vtbl->GetPort(medAtt, &port);
                        medAtt->vtbl->GetDevice(medAtt, &device);

                        if ((port != ~0U) && (device != ~0U)) {
                            machine->vtbl->DetachDevice(machine,
                                                        strCtlName,
                                                        port,
                                                        device);
                        }
                    }
4799

4800 4801
                    vboxArrayRelease(&storageControllers);

4802 4803
                    machine->vtbl->RemoveStorageController(machine, strCtlName);
                    VBOX_UTF16_FREE(strCtlName);
4804
                }
4805 4806

                vboxArrayRelease(&storageControllers);
4807 4808 4809
#endif /* VBOX_API_VERSION >= 3001 */

                machine->vtbl->SaveSettings(machine);
4810
            }
4811
            data->vboxSession->vtbl->Close(data->vboxSession);
4812
        }
4813 4814
        VBOX_UTF16_FREE(hddcnameUtf16);
    }
4815

4816 4817
    rc = data->vboxObj->vtbl->UnregisterMachine(data->vboxObj, iid.value, &machine);
    DEBUGIID("UUID of machine being undefined", iid.value);
4818

4819 4820 4821 4822
    if (NS_SUCCEEDED(rc) && machine){
        machine->vtbl->DeleteSettings(machine);
        ret = 0;
    } else {
4823 4824
        vboxError(VIR_ERR_INTERNAL_ERROR,
                  _("could not delete the domain, rc=%08x"), (unsigned)rc);
4825 4826
    }

4827
    vboxIIDUnalloc(&iid);
4828
    VBOX_RELEASE(machine);
4829 4830 4831 4832

    return ret;
}

4833 4834 4835
static int vboxDomainAttachDeviceImpl(virDomainPtr dom,
                                      const char *xml,
                                      int mediaChangeOnly ATTRIBUTE_UNUSED) {
4836
    VBOX_OBJECT_CHECK(dom->conn, int, -1);
4837
    IMachine *machine    = NULL;
4838
    vboxIID iid = VBOX_IID_INITIALIZER;
4839 4840 4841
    PRUint32 state       = MachineState_Null;
    virDomainDefPtr def  = NULL;
    virDomainDeviceDefPtr dev  = NULL;
4842
    nsresult rc;
4843 4844

    if (VIR_ALLOC(def) < 0) {
4845
        virReportOOMError();
4846 4847 4848 4849 4850
        return ret;
    }

    def->os.type = strdup("hvm");

4851
    if (def->os.type == NULL) {
4852
        virReportOOMError();
4853 4854 4855
        goto cleanup;
    }

4856
    dev = virDomainDeviceDefParse(data->caps, def, xml,
4857 4858
                                  VIR_DOMAIN_XML_INACTIVE);
    if (dev == NULL) {
4859
        virReportOOMError();
4860 4861 4862
        goto cleanup;
    }

4863 4864
    vboxIIDFromUUID(&iid, dom->uuid);
    rc = data->vboxObj->vtbl->GetMachine(data->vboxObj, iid.value, &machine);
4865
    if (NS_FAILED(rc)) {
4866 4867
        vboxError(VIR_ERR_INVALID_DOMAIN, "%s",
                  _("no domain with matching uuid"));
4868 4869
        goto cleanup;
    }
4870

4871 4872
    if (machine) {
        machine->vtbl->GetState(machine, &state);
4873

4874 4875
        if ((state == MachineState_Running) ||
            (state == MachineState_Paused)) {
4876
            rc = data->vboxObj->vtbl->OpenExistingSession(data->vboxObj, data->vboxSession, iid.value);
4877
        } else {
4878
            rc = data->vboxObj->vtbl->OpenSession(data->vboxObj, data->vboxSession, iid.value);
4879 4880 4881 4882 4883 4884 4885
        }
        if (NS_SUCCEEDED(rc)) {
            rc = data->vboxSession->vtbl->GetMachine(data->vboxSession, &machine);
            if (NS_SUCCEEDED(rc) && machine) {
                if (dev->type == VIR_DOMAIN_DEVICE_DISK) {
#if VBOX_API_VERSION < 3001
                    if (dev->data.disk->device == VIR_DOMAIN_DISK_DEVICE_CDROM) {
4886 4887
                        if (dev->data.disk->type == VIR_DOMAIN_DISK_TYPE_FILE &&
                            dev->data.disk->src != NULL) {
4888 4889 4890 4891 4892 4893 4894 4895 4896
                            IDVDDrive *dvdDrive = NULL;
                            /* Currently CDROM/DVD Drive is always IDE
                             * Secondary Master so neglecting the following
                             * parameter dev->data.disk->bus
                             */
                            machine->vtbl->GetDVDDrive(machine, &dvdDrive);
                            if (dvdDrive) {
                                IDVDImage *dvdImage          = NULL;
                                PRUnichar *dvdfileUtf16      = NULL;
4897 4898
                                vboxIID dvduuid = VBOX_IID_INITIALIZER;
                                vboxIID dvdemptyuuid = VBOX_IID_INITIALIZER;
4899

4900
                                VBOX_UTF8_TO_UTF16(dev->data.disk->src, &dvdfileUtf16);
4901

4902 4903
                                data->vboxObj->vtbl->FindDVDImage(data->vboxObj, dvdfileUtf16, &dvdImage);
                                if (!dvdImage) {
4904
                                    data->vboxObj->vtbl->OpenDVDImage(data->vboxObj, dvdfileUtf16, dvdemptyuuid.value, &dvdImage);
4905 4906
                                }
                                if (dvdImage) {
4907
                                    rc = dvdImage->vtbl->imedium.GetId((IMedium *)dvdImage, &dvduuid.value);
4908
                                    if (NS_FAILED(rc)) {
4909 4910 4911
                                        vboxError(VIR_ERR_INTERNAL_ERROR,
                                                  _("can't get the uuid of the file to "
                                                    "be attached to cdrom: %s, rc=%08x"),
4912 4913 4914 4915
                                                  dev->data.disk->src, (unsigned)rc);
                                    } else {
                                        /* unmount the previous mounted image */
                                        dvdDrive->vtbl->Unmount(dvdDrive);
4916
                                        rc = dvdDrive->vtbl->MountImage(dvdDrive, dvduuid.value);
4917
                                        if (NS_FAILED(rc)) {
4918 4919
                                            vboxError(VIR_ERR_INTERNAL_ERROR,
                                                      _("could not attach the file to cdrom: %s, rc=%08x"),
4920 4921
                                                      dev->data.disk->src, (unsigned)rc);
                                        } else {
4922
                                            ret = 0;
4923
                                            DEBUGIID("CD/DVD Image UUID:", dvduuid.value);
4924 4925
                                        }
                                    }
4926 4927

                                    VBOX_MEDIUM_RELEASE(dvdImage);
4928
                                }
4929
                                vboxIIDUnalloc(&dvduuid);
4930 4931
                                VBOX_UTF16_FREE(dvdfileUtf16);
                                VBOX_RELEASE(dvdDrive);
4932
                            }
4933 4934 4935
                        } else if (dev->data.disk->type == VIR_DOMAIN_DISK_TYPE_BLOCK) {
                        }
                    } else if (dev->data.disk->device == VIR_DOMAIN_DISK_DEVICE_FLOPPY) {
4936 4937
                        if (dev->data.disk->type == VIR_DOMAIN_DISK_TYPE_FILE &&
                            dev->data.disk->src != NULL) {
4938 4939 4940 4941 4942 4943 4944
                            IFloppyDrive *floppyDrive;
                            machine->vtbl->GetFloppyDrive(machine, &floppyDrive);
                            if (floppyDrive) {
                                rc = floppyDrive->vtbl->SetEnabled(floppyDrive, 1);
                                if (NS_SUCCEEDED(rc)) {
                                    IFloppyImage *floppyImage   = NULL;
                                    PRUnichar *fdfileUtf16      = NULL;
4945 4946
                                    vboxIID fduuid = VBOX_IID_INITIALIZER;
                                    vboxIID fdemptyuuid = VBOX_IID_INITIALIZER;
4947 4948 4949 4950 4951 4952 4953 4954
                                    VBOX_UTF8_TO_UTF16(dev->data.disk->src, &fdfileUtf16);
                                    rc = data->vboxObj->vtbl->FindFloppyImage(data->vboxObj,
                                                                              fdfileUtf16,
                                                                              &floppyImage);

                                    if (!floppyImage) {
                                        data->vboxObj->vtbl->OpenFloppyImage(data->vboxObj,
                                                                             fdfileUtf16,
4955
                                                                             fdemptyuuid.value,
4956 4957
                                                                             &floppyImage);
                                    }
4958

4959
                                    if (floppyImage) {
4960
                                        rc = floppyImage->vtbl->imedium.GetId((IMedium *)floppyImage, &fduuid.value);
4961
                                        if (NS_FAILED(rc)) {
4962 4963 4964
                                            vboxError(VIR_ERR_INTERNAL_ERROR,
                                                      _("can't get the uuid of the file to be "
                                                        "attached to floppy drive: %s, rc=%08x"),
4965 4966
                                                      dev->data.disk->src, (unsigned)rc);
                                        } else {
4967
                                            rc = floppyDrive->vtbl->MountImage(floppyDrive, fduuid.value);
4968
                                            if (NS_FAILED(rc)) {
4969 4970
                                                vboxError(VIR_ERR_INTERNAL_ERROR,
                                                          _("could not attach the file to floppy drive: %s, rc=%08x"),
4971 4972
                                                          dev->data.disk->src, (unsigned)rc);
                                            } else {
4973
                                                ret = 0;
4974
                                                DEBUGIID("attached floppy, UUID:", fduuid.value);
4975 4976
                                            }
                                        }
4977
                                        VBOX_MEDIUM_RELEASE(floppyImage);
4978
                                    }
4979
                                    vboxIIDUnalloc(&fduuid);
4980
                                    VBOX_UTF16_FREE(fdfileUtf16);
4981
                                }
4982
                                VBOX_RELEASE(floppyDrive);
4983
                            }
4984
                        } else if (dev->data.disk->type == VIR_DOMAIN_DISK_TYPE_BLOCK) {
4985
                        }
4986 4987 4988 4989 4990 4991 4992
                    }
#else  /* VBOX_API_VERSION >= 3001 */
#endif /* VBOX_API_VERSION >= 3001 */
                } else if (dev->type == VIR_DOMAIN_DEVICE_NET) {
                } else if (dev->type == VIR_DOMAIN_DEVICE_HOSTDEV) {
                    if (dev->data.hostdev->mode == VIR_DOMAIN_HOSTDEV_MODE_SUBSYS) {
                        if (dev->data.hostdev->source.subsys.type == VIR_DOMAIN_HOSTDEV_SUBSYS_TYPE_USB) {
4993 4994 4995
                        }
                    }
                }
4996 4997
                machine->vtbl->SaveSettings(machine);
                VBOX_RELEASE(machine);
4998
            }
4999
            data->vboxSession->vtbl->Close(data->vboxSession);
5000 5001 5002 5003
        }
    }

cleanup:
5004
    vboxIIDUnalloc(&iid);
5005 5006 5007 5008 5009
    virDomainDefFree(def);
    virDomainDeviceDefFree(dev);
    return ret;
}

5010 5011 5012 5013
static int vboxDomainAttachDevice(virDomainPtr dom, const char *xml) {
    return vboxDomainAttachDeviceImpl(dom, xml, 0);
}

5014 5015 5016
static int vboxDomainAttachDeviceFlags(virDomainPtr dom, const char *xml,
                                       unsigned int flags) {
    if (flags & VIR_DOMAIN_DEVICE_MODIFY_CONFIG) {
5017
        vboxError(VIR_ERR_OPERATION_INVALID, "%s",
5018 5019 5020 5021
                  _("cannot modify the persistent configuration of a domain"));
        return -1;
    }

5022 5023 5024 5025 5026
    return vboxDomainAttachDeviceImpl(dom, xml, 0);
}

static int vboxDomainUpdateDeviceFlags(virDomainPtr dom, const char *xml,
                                       unsigned int flags) {
5027 5028 5029 5030
    virCheckFlags(VIR_DOMAIN_DEVICE_MODIFY_CURRENT |
                  VIR_DOMAIN_DEVICE_MODIFY_LIVE |
                  VIR_DOMAIN_DEVICE_MODIFY_CONFIG, -1);

5031
    if (flags & VIR_DOMAIN_DEVICE_MODIFY_CONFIG) {
5032
        vboxError(VIR_ERR_OPERATION_INVALID, "%s",
5033 5034 5035 5036 5037
                  _("cannot modify the persistent configuration of a domain"));
        return -1;
    }

    return vboxDomainAttachDeviceImpl(dom, xml, 1);
5038 5039
}

5040
static int vboxDomainDetachDevice(virDomainPtr dom, const char *xml) {
5041
    VBOX_OBJECT_CHECK(dom->conn, int, -1);
5042
    IMachine *machine    = NULL;
5043
    vboxIID iid = VBOX_IID_INITIALIZER;
5044 5045 5046
    PRUint32 state       = MachineState_Null;
    virDomainDefPtr def  = NULL;
    virDomainDeviceDefPtr dev  = NULL;
5047
    nsresult rc;
5048 5049

    if (VIR_ALLOC(def) < 0) {
5050
        virReportOOMError();
5051 5052 5053 5054 5055
        return ret;
    }

    def->os.type = strdup("hvm");

5056
    if (def->os.type == NULL) {
5057
        virReportOOMError();
5058 5059 5060
        goto cleanup;
    }

5061
    dev = virDomainDeviceDefParse(data->caps, def, xml,
5062 5063
                                  VIR_DOMAIN_XML_INACTIVE);
    if (dev == NULL) {
5064
        virReportOOMError();
5065 5066 5067
        goto cleanup;
    }

5068 5069
    vboxIIDFromUUID(&iid, dom->uuid);
    rc = data->vboxObj->vtbl->GetMachine(data->vboxObj, iid.value, &machine);
5070
    if (NS_FAILED(rc)) {
5071 5072
        vboxError(VIR_ERR_INVALID_DOMAIN, "%s",
                  _("no domain with matching uuid"));
5073 5074
        goto cleanup;
    }
5075

5076 5077
    if (machine) {
        machine->vtbl->GetState(machine, &state);
5078

5079 5080
        if ((state == MachineState_Running) ||
            (state == MachineState_Paused)) {
5081
            rc = data->vboxObj->vtbl->OpenExistingSession(data->vboxObj, data->vboxSession, iid.value);
5082
        } else {
5083
            rc = data->vboxObj->vtbl->OpenSession(data->vboxObj, data->vboxSession, iid.value);
5084
        }
5085

5086 5087 5088 5089 5090 5091 5092 5093 5094 5095 5096 5097 5098 5099 5100 5101
        if (NS_SUCCEEDED(rc)) {
            rc = data->vboxSession->vtbl->GetMachine(data->vboxSession, &machine);
            if (NS_SUCCEEDED(rc) && machine) {
                if (dev->type == VIR_DOMAIN_DEVICE_DISK) {
#if VBOX_API_VERSION < 3001
                    if (dev->data.disk->device == VIR_DOMAIN_DISK_DEVICE_CDROM) {
                        if (dev->data.disk->type == VIR_DOMAIN_DISK_TYPE_FILE) {
                            IDVDDrive *dvdDrive = NULL;
                            /* Currently CDROM/DVD Drive is always IDE
                             * Secondary Master so neglecting the following
                             * parameter dev->data.disk->bus
                             */
                            machine->vtbl->GetDVDDrive(machine, &dvdDrive);
                            if (dvdDrive) {
                                rc = dvdDrive->vtbl->Unmount(dvdDrive);
                                if (NS_FAILED(rc)) {
5102 5103
                                    vboxError(VIR_ERR_INTERNAL_ERROR,
                                              _("could not de-attach the mounted ISO, rc=%08x"),
5104 5105 5106 5107 5108 5109 5110 5111 5112 5113 5114 5115 5116 5117 5118 5119 5120 5121
                                              (unsigned)rc);
                                } else {
                                    ret = 0;
                                }
                                VBOX_RELEASE(dvdDrive);
                            }
                        } else if (dev->data.disk->type == VIR_DOMAIN_DISK_TYPE_BLOCK) {
                        }
                    } else if (dev->data.disk->device == VIR_DOMAIN_DISK_DEVICE_FLOPPY) {
                        if (dev->data.disk->type == VIR_DOMAIN_DISK_TYPE_FILE) {
                            IFloppyDrive *floppyDrive;
                            machine->vtbl->GetFloppyDrive(machine, &floppyDrive);
                            if (floppyDrive) {
                                PRBool enabled = PR_FALSE;

                                floppyDrive->vtbl->GetEnabled(floppyDrive, &enabled);
                                if (enabled) {
                                    rc = floppyDrive->vtbl->Unmount(floppyDrive);
5122
                                    if (NS_FAILED(rc)) {
5123 5124 5125
                                        vboxError(VIR_ERR_INTERNAL_ERROR,
                                                  _("could not attach the file "
                                                    "to floppy drive, rc=%08x"),
5126 5127 5128 5129
                                                  (unsigned)rc);
                                    } else {
                                        ret = 0;
                                    }
5130 5131 5132 5133 5134
                                } else {
                                    /* If you are here means floppy drive is already unmounted
                                     * so don't flag error, just say everything is fine and quit
                                     */
                                    ret = 0;
5135
                                }
5136
                                VBOX_RELEASE(floppyDrive);
5137
                            }
5138
                        } else if (dev->data.disk->type == VIR_DOMAIN_DISK_TYPE_BLOCK) {
5139
                        }
5140 5141 5142 5143 5144 5145 5146
                    }
#else  /* VBOX_API_VERSION >= 3001 */
#endif /* VBOX_API_VERSION >= 3001 */
                } else if (dev->type == VIR_DOMAIN_DEVICE_NET) {
                } else if (dev->type == VIR_DOMAIN_DEVICE_HOSTDEV) {
                    if (dev->data.hostdev->mode == VIR_DOMAIN_HOSTDEV_MODE_SUBSYS) {
                        if (dev->data.hostdev->source.subsys.type == VIR_DOMAIN_HOSTDEV_SUBSYS_TYPE_USB) {
5147 5148 5149
                        }
                    }
                }
5150 5151
                machine->vtbl->SaveSettings(machine);
                VBOX_RELEASE(machine);
5152
            }
5153
            data->vboxSession->vtbl->Close(data->vboxSession);
5154 5155 5156 5157
        }
    }

cleanup:
5158
    vboxIIDUnalloc(&iid);
5159 5160 5161 5162 5163
    virDomainDefFree(def);
    virDomainDeviceDefFree(dev);
    return ret;
}

5164 5165 5166
static int vboxDomainDetachDeviceFlags(virDomainPtr dom, const char *xml,
                                       unsigned int flags) {
    if (flags & VIR_DOMAIN_DEVICE_MODIFY_CONFIG) {
5167
        vboxError(VIR_ERR_OPERATION_INVALID, "%s",
5168 5169 5170 5171 5172 5173 5174
                  _("cannot modify the persistent configuration of a domain"));
        return -1;
    }

    return vboxDomainDetachDevice(dom, xml);
}

J
Jiri Denemark 已提交
5175 5176 5177 5178 5179
static int
vboxDomainSnapshotGetAll(virDomainPtr dom,
                         IMachine *machine,
                         ISnapshot ***snapshots)
{
5180
    vboxIID empty = VBOX_IID_INITIALIZER;
J
Jiri Denemark 已提交
5181 5182 5183 5184 5185 5186 5187 5188
    ISnapshot **list = NULL;
    PRUint32 count;
    nsresult rc;
    unsigned int next;
    unsigned int top;

    rc = machine->vtbl->GetSnapshotCount(machine, &count);
    if (NS_FAILED(rc)) {
5189
        vboxError(VIR_ERR_INTERNAL_ERROR,
J
Jiri Denemark 已提交
5190 5191 5192 5193 5194 5195 5196 5197 5198 5199 5200 5201 5202
                  _("could not get snapshot count for domain %s"),
                  dom->name);
        goto error;
    }

    if (count == 0)
        goto out;

    if (VIR_ALLOC_N(list, count) < 0) {
        virReportOOMError();
        goto error;
    }

5203
    rc = machine->vtbl->GetSnapshot(machine, empty.value, list);
J
Jiri Denemark 已提交
5204
    if (NS_FAILED(rc) || !list[0]) {
5205
        vboxError(VIR_ERR_INTERNAL_ERROR,
J
Jiri Denemark 已提交
5206 5207 5208 5209 5210 5211 5212 5213
                  _("could not get root snapshot for domain %s"),
                  dom->name);
        goto error;
    }

    /* BFS walk through snapshot tree */
    top = 1;
    for (next = 0; next < count; next++) {
5214
        vboxArray children = VBOX_ARRAY_INITIALIZER;
J
Jiri Denemark 已提交
5215 5216 5217
        unsigned int i;

        if (!list[next]) {
5218
            vboxError(VIR_ERR_INTERNAL_ERROR,
J
Jiri Denemark 已提交
5219 5220 5221 5222
                      _("unexpected number of snapshots < %u"), count);
            goto error;
        }

5223 5224
        rc = vboxArrayGet(&children, list[next],
                               list[next]->vtbl->GetChildren);
J
Jiri Denemark 已提交
5225
        if (NS_FAILED(rc)) {
5226
            vboxError(VIR_ERR_INTERNAL_ERROR,
J
Jiri Denemark 已提交
5227 5228 5229
                      "%s", _("could not get children snapshots"));
            goto error;
        }
5230 5231 5232
        for (i = 0; i < children.count; i++) {
            ISnapshot *child = children.items[i];
            if (!child)
J
Jiri Denemark 已提交
5233 5234
                continue;
            if (top == count) {
5235
                vboxError(VIR_ERR_INTERNAL_ERROR,
J
Jiri Denemark 已提交
5236
                          _("unexpected number of snapshots > %u"), count);
5237
                vboxArrayRelease(&children);
J
Jiri Denemark 已提交
5238 5239
                goto error;
            }
5240 5241
            VBOX_ADDREF(child);
            list[top++] = child;
J
Jiri Denemark 已提交
5242
        }
5243
        vboxArrayRelease(&children);
J
Jiri Denemark 已提交
5244 5245 5246 5247 5248 5249 5250 5251 5252 5253 5254 5255 5256 5257 5258 5259 5260 5261 5262 5263 5264 5265 5266 5267 5268 5269 5270 5271 5272 5273 5274 5275 5276 5277 5278 5279 5280
    }

out:
    *snapshots = list;
    return count;

error:
    if (list) {
        for (next = 0; next < count; next++)
            VBOX_RELEASE(list[next]);
    }
    VIR_FREE(list);

    return -1;
}

static ISnapshot *
vboxDomainSnapshotGet(vboxGlobalData *data,
                      virDomainPtr dom,
                      IMachine *machine,
                      const char *name)
{
    ISnapshot **snapshots = NULL;
    ISnapshot *snapshot = NULL;
    nsresult rc;
    int count = 0;
    int i;

    if ((count = vboxDomainSnapshotGetAll(dom, machine, &snapshots)) < 0)
        goto cleanup;

    for (i = 0; i < count; i++) {
        PRUnichar *nameUtf16;
        char *nameUtf8;

        rc = snapshots[i]->vtbl->GetName(snapshots[i], &nameUtf16);
        if (NS_FAILED(rc) || !nameUtf16) {
5281
            vboxError(VIR_ERR_INTERNAL_ERROR,
J
Jiri Denemark 已提交
5282 5283 5284 5285 5286 5287 5288 5289 5290 5291 5292 5293 5294 5295
                      "%s", _("could not get snapshot name"));
            goto cleanup;
        }
        VBOX_UTF16_TO_UTF8(nameUtf16, &nameUtf8);
        VBOX_UTF16_FREE(nameUtf16);
        if (STREQ(name, nameUtf8))
            snapshot = snapshots[i];
        VBOX_UTF8_FREE(nameUtf8);

        if (snapshot)
            break;
    }

    if (!snapshot) {
5296
        vboxError(VIR_ERR_OPERATION_INVALID,
J
Jiri Denemark 已提交
5297 5298 5299 5300 5301 5302 5303 5304 5305 5306 5307 5308 5309 5310 5311 5312 5313 5314 5315
                  _("domain %s has no snapshots with name %s"),
                  dom->name, name);
        goto cleanup;
    }

cleanup:
    if (count > 0) {
        for (i = 0; i < count; i++) {
            if (snapshots[i] != snapshot)
                VBOX_RELEASE(snapshots[i]);
        }
    }
    VIR_FREE(snapshots);
    return snapshot;
}

static virDomainSnapshotPtr
vboxDomainSnapshotCreateXML(virDomainPtr dom,
                            const char *xmlDesc,
5316
                            unsigned int flags)
J
Jiri Denemark 已提交
5317 5318 5319
{
    VBOX_OBJECT_CHECK(dom->conn, virDomainSnapshotPtr, NULL);
    virDomainSnapshotDefPtr def = NULL;
5320
    vboxIID domiid = VBOX_IID_INITIALIZER;
J
Jiri Denemark 已提交
5321 5322 5323 5324 5325 5326 5327 5328 5329 5330 5331 5332 5333 5334
    IMachine *machine = NULL;
    IConsole *console = NULL;
    IProgress *progress = NULL;
    ISnapshot *snapshot = NULL;
    PRUnichar *name = NULL;
    PRUnichar *description = NULL;
    PRUint32 state;
    nsresult rc;
#if VBOX_API_VERSION == 2002
    nsresult result;
#else
    PRInt32 result;
#endif

5335 5336
    virCheckFlags(0, NULL);

J
Jiri Denemark 已提交
5337 5338 5339
    if (!(def = virDomainSnapshotDefParseString(xmlDesc, 1)))
        goto cleanup;

5340 5341 5342
    vboxIIDFromUUID(&domiid, dom->uuid);
    rc = data->vboxObj->vtbl->GetMachine(data->vboxObj, domiid.value, &machine);
    if (NS_FAILED(rc)) {
5343
        vboxError(VIR_ERR_INVALID_DOMAIN, "%s",
J
Jiri Denemark 已提交
5344 5345 5346 5347 5348 5349
                  _("no domain with matching UUID"));
        goto cleanup;
    }

    rc = machine->vtbl->GetState(machine, &state);
    if (NS_FAILED(rc)) {
5350
        vboxError(VIR_ERR_INTERNAL_ERROR, "%s",
J
Jiri Denemark 已提交
5351 5352 5353 5354 5355 5356 5357 5358
                  _("could not get domain state"));
        goto cleanup;
    }

    if ((state >= MachineState_FirstOnline)
        && (state <= MachineState_LastOnline)) {
        rc = data->vboxObj->vtbl->OpenExistingSession(data->vboxObj,
                                                      data->vboxSession,
5359
                                                      domiid.value);
J
Jiri Denemark 已提交
5360 5361 5362
    } else {
        rc = data->vboxObj->vtbl->OpenSession(data->vboxObj,
                                              data->vboxSession,
5363
                                              domiid.value);
J
Jiri Denemark 已提交
5364 5365 5366 5367
    }
    if (NS_SUCCEEDED(rc))
        rc = data->vboxSession->vtbl->GetConsole(data->vboxSession, &console);
    if (NS_FAILED(rc)) {
5368
        vboxError(VIR_ERR_INTERNAL_ERROR,
J
Jiri Denemark 已提交
5369 5370 5371 5372 5373 5374 5375 5376 5377 5378 5379 5380 5381 5382 5383 5384 5385 5386 5387 5388 5389
                  _("could not open VirtualBox session with domain %s"),
                  dom->name);
        goto cleanup;
    }

    VBOX_UTF8_TO_UTF16(def->name, &name);
    if (!name) {
        virReportOOMError();
        goto cleanup;
    }

    if (def->description) {
        VBOX_UTF8_TO_UTF16(def->description, &description);
        if (!description) {
            virReportOOMError();
            goto cleanup;
        }
    }

    rc = console->vtbl->TakeSnapshot(console, name, description, &progress);
    if (NS_FAILED(rc) || !progress) {
5390
        vboxError(VIR_ERR_INTERNAL_ERROR,
J
Jiri Denemark 已提交
5391 5392 5393 5394 5395 5396 5397
                  _("could not take snapshot of domain %s"), dom->name);
        goto cleanup;
    }

    progress->vtbl->WaitForCompletion(progress, -1);
    progress->vtbl->GetResultCode(progress, &result);
    if (NS_FAILED(result)) {
5398
        vboxError(VIR_ERR_INTERNAL_ERROR,
J
Jiri Denemark 已提交
5399 5400 5401 5402 5403 5404
                  _("could not take snapshot of domain %s"), dom->name);
        goto cleanup;
    }

    rc = machine->vtbl->GetCurrentSnapshot(machine, &snapshot);
    if (NS_FAILED(rc)) {
5405
        vboxError(VIR_ERR_INTERNAL_ERROR,
J
Jiri Denemark 已提交
5406 5407 5408 5409 5410 5411 5412 5413 5414 5415 5416 5417 5418 5419
                  _("could not get current snapshot of domain %s"),
                  dom->name);
        goto cleanup;
    }

    ret = virGetDomainSnapshot(dom, def->name);

cleanup:
    VBOX_RELEASE(progress);
    VBOX_UTF16_FREE(description);
    VBOX_UTF16_FREE(name);
    VBOX_RELEASE(console);
    data->vboxSession->vtbl->Close(data->vboxSession);
    VBOX_RELEASE(machine);
5420
    vboxIIDUnalloc(&domiid);
J
Jiri Denemark 已提交
5421 5422 5423 5424 5425 5426
    virDomainSnapshotDefFree(def);
    return ret;
}

static char *
vboxDomainSnapshotDumpXML(virDomainSnapshotPtr snapshot,
5427
                          unsigned int flags)
J
Jiri Denemark 已提交
5428 5429 5430
{
    virDomainPtr dom = snapshot->domain;
    VBOX_OBJECT_CHECK(dom->conn, char *, NULL);
5431
    vboxIID domiid = VBOX_IID_INITIALIZER;
J
Jiri Denemark 已提交
5432 5433 5434 5435 5436 5437 5438 5439 5440 5441 5442
    IMachine *machine = NULL;
    ISnapshot *snap = NULL;
    ISnapshot *parent = NULL;
    nsresult rc;
    virDomainSnapshotDefPtr def = NULL;
    PRUnichar *str16;
    char *str8;
    PRInt64 timestamp;
    PRBool online = PR_FALSE;
    char uuidstr[VIR_UUID_STRING_BUFLEN];

5443 5444
    virCheckFlags(0, NULL);

5445 5446
    vboxIIDFromUUID(&domiid, dom->uuid);
    rc = data->vboxObj->vtbl->GetMachine(data->vboxObj, domiid.value, &machine);
J
Jiri Denemark 已提交
5447
    if (NS_FAILED(rc)) {
5448
        vboxError(VIR_ERR_INVALID_DOMAIN, "%s",
J
Jiri Denemark 已提交
5449 5450 5451 5452 5453 5454 5455 5456 5457 5458 5459 5460 5461
                  _("no domain with matching UUID"));
        goto cleanup;
    }

    if (!(snap = vboxDomainSnapshotGet(data, dom, machine, snapshot->name)))
        goto cleanup;

    if (VIR_ALLOC(def) < 0
        || !(def->name = strdup(snapshot->name)))
        goto no_memory;

    rc = snap->vtbl->GetDescription(snap, &str16);
    if (NS_FAILED(rc)) {
5462
        vboxError(VIR_ERR_INTERNAL_ERROR,
J
Jiri Denemark 已提交
5463 5464 5465 5466 5467 5468 5469 5470 5471 5472 5473 5474 5475 5476 5477
                  _("could not get description of snapshot %s"),
                  snapshot->name);
        goto cleanup;
    }
    if (str16) {
        VBOX_UTF16_TO_UTF8(str16, &str8);
        VBOX_UTF16_FREE(str16);
        def->description = strdup(str8);
        VBOX_UTF8_FREE(str8);
        if (!def->description)
            goto no_memory;
    }

    rc = snap->vtbl->GetTimeStamp(snap, &timestamp);
    if (NS_FAILED(rc)) {
5478
        vboxError(VIR_ERR_INTERNAL_ERROR,
J
Jiri Denemark 已提交
5479 5480 5481 5482 5483 5484 5485 5486 5487
                  _("could not get creation time of snapshot %s"),
                  snapshot->name);
        goto cleanup;
    }
    /* timestamp is in milliseconds while creationTime in seconds */
    def->creationTime = timestamp / 1000;

    rc = snap->vtbl->GetParent(snap, &parent);
    if (NS_FAILED(rc)) {
5488
        vboxError(VIR_ERR_INTERNAL_ERROR,
J
Jiri Denemark 已提交
5489 5490 5491 5492 5493 5494 5495
                  _("could not get parent of snapshot %s"),
                  snapshot->name);
        goto cleanup;
    }
    if (parent) {
        rc = parent->vtbl->GetName(parent, &str16);
        if (NS_FAILED(rc) || !str16) {
5496
            vboxError(VIR_ERR_INTERNAL_ERROR,
J
Jiri Denemark 已提交
5497 5498 5499 5500 5501 5502 5503 5504 5505 5506 5507 5508 5509 5510
                      _("could not get name of parent of snapshot %s"),
                      snapshot->name);
            goto cleanup;
        }
        VBOX_UTF16_TO_UTF8(str16, &str8);
        VBOX_UTF16_FREE(str16);
        def->parent = strdup(str8);
        VBOX_UTF8_FREE(str8);
        if (!def->parent)
            goto no_memory;
    }

    rc = snap->vtbl->GetOnline(snap, &online);
    if (NS_FAILED(rc)) {
5511
        vboxError(VIR_ERR_INTERNAL_ERROR,
J
Jiri Denemark 已提交
5512 5513 5514 5515 5516 5517 5518 5519 5520 5521 5522 5523 5524 5525 5526 5527 5528
                  _("could not get online state of snapshot %s"),
                  snapshot->name);
        goto cleanup;
    }
    if (online)
        def->state = VIR_DOMAIN_RUNNING;
    else
        def->state = VIR_DOMAIN_SHUTOFF;

    virUUIDFormat(dom->uuid, uuidstr);
    ret = virDomainSnapshotDefFormat(uuidstr, def, 0);

cleanup:
    virDomainSnapshotDefFree(def);
    VBOX_RELEASE(parent);
    VBOX_RELEASE(snap);
    VBOX_RELEASE(machine);
5529
    vboxIIDUnalloc(&domiid);
J
Jiri Denemark 已提交
5530 5531 5532 5533 5534 5535 5536 5537 5538
    return ret;

no_memory:
    virReportOOMError();
    goto cleanup;
}

static int
vboxDomainSnapshotNum(virDomainPtr dom,
5539
                      unsigned int flags)
J
Jiri Denemark 已提交
5540 5541
{
    VBOX_OBJECT_CHECK(dom->conn, int, -1);
5542
    vboxIID iid = VBOX_IID_INITIALIZER;
J
Jiri Denemark 已提交
5543 5544 5545 5546
    IMachine *machine = NULL;
    nsresult rc;
    PRUint32 snapshotCount;

5547 5548
    virCheckFlags(0, -1);

5549 5550
    vboxIIDFromUUID(&iid, dom->uuid);
    rc = data->vboxObj->vtbl->GetMachine(data->vboxObj, iid.value, &machine);
J
Jiri Denemark 已提交
5551
    if (NS_FAILED(rc)) {
5552
        vboxError(VIR_ERR_INVALID_DOMAIN, "%s",
J
Jiri Denemark 已提交
5553 5554 5555 5556 5557 5558
                  _("no domain with matching UUID"));
        goto cleanup;
    }

    rc = machine->vtbl->GetSnapshotCount(machine, &snapshotCount);
    if (NS_FAILED(rc)) {
5559
        vboxError(VIR_ERR_INTERNAL_ERROR,
J
Jiri Denemark 已提交
5560 5561 5562 5563 5564 5565 5566 5567 5568
                  _("could not get snapshot count for domain %s"),
                  dom->name);
        goto cleanup;
    }

    ret = snapshotCount;

cleanup:
    VBOX_RELEASE(machine);
5569
    vboxIIDUnalloc(&iid);
J
Jiri Denemark 已提交
5570 5571 5572 5573 5574 5575 5576
    return ret;
}

static int
vboxDomainSnapshotListNames(virDomainPtr dom,
                            char **names,
                            int nameslen,
5577
                            unsigned int flags)
J
Jiri Denemark 已提交
5578 5579
{
    VBOX_OBJECT_CHECK(dom->conn, int, -1);
5580
    vboxIID iid = VBOX_IID_INITIALIZER;
J
Jiri Denemark 已提交
5581 5582 5583 5584 5585 5586
    IMachine *machine = NULL;
    nsresult rc;
    ISnapshot **snapshots = NULL;
    int count = 0;
    int i;

5587 5588
    virCheckFlags(0, -1);

5589 5590
    vboxIIDFromUUID(&iid, dom->uuid);
    rc = data->vboxObj->vtbl->GetMachine(data->vboxObj, iid.value, &machine);
J
Jiri Denemark 已提交
5591
    if (NS_FAILED(rc)) {
5592
        vboxError(VIR_ERR_INVALID_DOMAIN, "%s",
J
Jiri Denemark 已提交
5593 5594 5595 5596 5597 5598 5599 5600 5601 5602 5603 5604 5605 5606 5607 5608
                  _("no domain with matching UUID"));
        goto cleanup;
    }

    if ((count = vboxDomainSnapshotGetAll(dom, machine, &snapshots)) < 0)
        goto cleanup;

    for (i = 0; i < nameslen; i++) {
        PRUnichar *nameUtf16;
        char *name;

        if (i >= count)
            break;

        rc = snapshots[i]->vtbl->GetName(snapshots[i], &nameUtf16);
        if (NS_FAILED(rc) || !nameUtf16) {
5609
            vboxError(VIR_ERR_INTERNAL_ERROR,
J
Jiri Denemark 已提交
5610 5611 5612 5613 5614 5615 5616 5617 5618 5619 5620 5621 5622 5623 5624 5625 5626 5627 5628 5629 5630 5631 5632 5633 5634
                      "%s", _("could not get snapshot name"));
            goto cleanup;
        }
        VBOX_UTF16_TO_UTF8(nameUtf16, &name);
        VBOX_UTF16_FREE(nameUtf16);
        names[i] = strdup(name);
        VBOX_UTF8_FREE(name);
        if (!names[i]) {
            virReportOOMError();
            goto cleanup;
        }
    }

    if (count <= nameslen)
        ret = count;
    else
        ret = nameslen;

cleanup:
    if (count > 0) {
        for (i = 0; i < count; i++)
            VBOX_RELEASE(snapshots[i]);
    }
    VIR_FREE(snapshots);
    VBOX_RELEASE(machine);
5635
    vboxIIDUnalloc(&iid);
J
Jiri Denemark 已提交
5636 5637 5638 5639 5640 5641
    return ret;
}

static virDomainSnapshotPtr
vboxDomainSnapshotLookupByName(virDomainPtr dom,
                               const char *name,
5642
                               unsigned int flags)
J
Jiri Denemark 已提交
5643 5644
{
    VBOX_OBJECT_CHECK(dom->conn, virDomainSnapshotPtr, NULL);
5645
    vboxIID iid = VBOX_IID_INITIALIZER;
J
Jiri Denemark 已提交
5646 5647 5648 5649
    IMachine *machine = NULL;
    ISnapshot *snapshot = NULL;
    nsresult rc;

5650 5651
    virCheckFlags(0, NULL);

5652 5653
    vboxIIDFromUUID(&iid, dom->uuid);
    rc = data->vboxObj->vtbl->GetMachine(data->vboxObj, iid.value, &machine);
J
Jiri Denemark 已提交
5654
    if (NS_FAILED(rc)) {
5655
        vboxError(VIR_ERR_INVALID_DOMAIN, "%s",
J
Jiri Denemark 已提交
5656 5657 5658 5659 5660 5661 5662 5663 5664 5665 5666 5667
                  _("no domain with matching UUID"));
        goto cleanup;
    }

    if (!(snapshot = vboxDomainSnapshotGet(data, dom, machine, name)))
        goto cleanup;

    ret = virGetDomainSnapshot(dom, name);

cleanup:
    VBOX_RELEASE(snapshot);
    VBOX_RELEASE(machine);
5668
    vboxIIDUnalloc(&iid);
J
Jiri Denemark 已提交
5669 5670 5671 5672 5673
    return ret;
}

static int
vboxDomainHasCurrentSnapshot(virDomainPtr dom,
5674
                             unsigned int flags)
J
Jiri Denemark 已提交
5675 5676
{
    VBOX_OBJECT_CHECK(dom->conn, int, -1);
5677
    vboxIID iid = VBOX_IID_INITIALIZER;
J
Jiri Denemark 已提交
5678 5679 5680 5681
    IMachine *machine = NULL;
    ISnapshot *snapshot = NULL;
    nsresult rc;

5682 5683
    virCheckFlags(0, -1);

5684 5685 5686
    vboxIIDFromUUID(&iid, dom->uuid);
    rc = data->vboxObj->vtbl->GetMachine(data->vboxObj, iid.value, &machine);
    if (NS_FAILED(rc)) {
5687
        vboxError(VIR_ERR_INVALID_DOMAIN, "%s",
J
Jiri Denemark 已提交
5688 5689 5690 5691 5692 5693
                  _("no domain with matching UUID"));
        goto cleanup;
    }

    rc = machine->vtbl->GetCurrentSnapshot(machine, &snapshot);
    if (NS_FAILED(rc)) {
5694
        vboxError(VIR_ERR_INTERNAL_ERROR, "%s",
J
Jiri Denemark 已提交
5695 5696 5697 5698 5699 5700 5701 5702 5703 5704 5705
                  _("could not get current snapshot"));
        goto cleanup;
    }

    if (snapshot)
        ret = 1;
    else
        ret = 0;

cleanup:
    VBOX_RELEASE(machine);
5706
    vboxIIDUnalloc(&iid);
J
Jiri Denemark 已提交
5707 5708 5709 5710 5711
    return ret;
}

static virDomainSnapshotPtr
vboxDomainSnapshotCurrent(virDomainPtr dom,
5712
                          unsigned int flags)
J
Jiri Denemark 已提交
5713 5714
{
    VBOX_OBJECT_CHECK(dom->conn, virDomainSnapshotPtr, NULL);
5715
    vboxIID iid = VBOX_IID_INITIALIZER;
J
Jiri Denemark 已提交
5716 5717 5718 5719 5720 5721
    IMachine *machine = NULL;
    ISnapshot *snapshot = NULL;
    PRUnichar *nameUtf16 = NULL;
    char *name = NULL;
    nsresult rc;

5722 5723
    virCheckFlags(0, NULL);

5724 5725 5726
    vboxIIDFromUUID(&iid, dom->uuid);
    rc = data->vboxObj->vtbl->GetMachine(data->vboxObj, iid.value, &machine);
    if (NS_FAILED(rc)) {
5727
        vboxError(VIR_ERR_INVALID_DOMAIN, "%s",
J
Jiri Denemark 已提交
5728 5729 5730 5731 5732 5733
                  _("no domain with matching UUID"));
        goto cleanup;
    }

    rc = machine->vtbl->GetCurrentSnapshot(machine, &snapshot);
    if (NS_FAILED(rc)) {
5734
        vboxError(VIR_ERR_INTERNAL_ERROR, "%s",
J
Jiri Denemark 已提交
5735 5736 5737 5738 5739
                  _("could not get current snapshot"));
        goto cleanup;
    }

    if (!snapshot) {
5740
        vboxError(VIR_ERR_OPERATION_INVALID, "%s",
J
Jiri Denemark 已提交
5741 5742 5743 5744 5745 5746
                  _("domain has no snapshots"));
        goto cleanup;
    }

    rc = snapshot->vtbl->GetName(snapshot, &nameUtf16);
    if (NS_FAILED(rc) || !nameUtf16) {
5747
        vboxError(VIR_ERR_INTERNAL_ERROR, "%s",
J
Jiri Denemark 已提交
5748 5749 5750 5751 5752 5753 5754 5755 5756 5757 5758 5759 5760 5761 5762 5763 5764
                  _("could not get current snapshot name"));
        goto cleanup;
    }

    VBOX_UTF16_TO_UTF8(nameUtf16, &name);
    if (!name) {
        virReportOOMError();
        goto cleanup;
    }

    ret = virGetDomainSnapshot(dom, name);

cleanup:
    VBOX_UTF8_FREE(name);
    VBOX_UTF16_FREE(nameUtf16);
    VBOX_RELEASE(snapshot);
    VBOX_RELEASE(machine);
5765
    vboxIIDUnalloc(&iid);
J
Jiri Denemark 已提交
5766 5767 5768 5769 5770 5771 5772 5773 5774 5775
    return ret;
}

#if VBOX_API_VERSION < 3001
static int
vboxDomainSnapshotRestore(virDomainPtr dom,
                          IMachine *machine,
                          ISnapshot *snapshot)
{
    VBOX_OBJECT_CHECK(dom->conn, int, -1);
5776
    vboxIID iid = VBOX_IID_INITIALIZER;
J
Jiri Denemark 已提交
5777 5778
    nsresult rc;

5779 5780
    rc = snapshot->vtbl->GetId(snapshot, &iid.value);
    if (NS_FAILED(rc)) {
5781
        vboxError(VIR_ERR_INTERNAL_ERROR, "%s",
J
Jiri Denemark 已提交
5782 5783 5784 5785
                  _("could not get snapshot UUID"));
        goto cleanup;
    }

5786
    rc = machine->vtbl->SetCurrentSnapshot(machine, iid.value);
J
Jiri Denemark 已提交
5787
    if (NS_FAILED(rc)) {
5788
        vboxError(VIR_ERR_INTERNAL_ERROR,
J
Jiri Denemark 已提交
5789 5790 5791 5792 5793 5794 5795
                  _("could not restore snapshot for domain %s"), dom->name);
        goto cleanup;
    }

    ret = 0;

cleanup:
5796
    vboxIIDUnalloc(&iid);
J
Jiri Denemark 已提交
5797 5798 5799 5800 5801 5802 5803 5804 5805 5806 5807 5808 5809 5810
    return ret;
}
#else
static int
vboxDomainSnapshotRestore(virDomainPtr dom,
                          IMachine *machine,
                          ISnapshot *snapshot)
{
    VBOX_OBJECT_CHECK(dom->conn, int, -1);
    IConsole *console = NULL;
    IProgress *progress = NULL;
    PRUint32 state;
    nsresult rc;
    PRInt32 result;
5811
    vboxIID domiid = VBOX_IID_INITIALIZER;
J
Jiri Denemark 已提交
5812

5813 5814
    rc = machine->vtbl->GetId(machine, &domiid.value);
    if (NS_FAILED(rc)) {
5815
        vboxError(VIR_ERR_INTERNAL_ERROR, "%s",
J
Jiri Denemark 已提交
5816 5817 5818 5819 5820 5821
                  _("could not get domain UUID"));
        goto cleanup;
    }

    rc = machine->vtbl->GetState(machine, &state);
    if (NS_FAILED(rc)) {
5822
        vboxError(VIR_ERR_INTERNAL_ERROR, "%s",
J
Jiri Denemark 已提交
5823 5824 5825 5826 5827 5828
                  _("could not get domain state"));
        goto cleanup;
    }

    if (state >= MachineState_FirstOnline
        && state <= MachineState_LastOnline) {
5829
        vboxError(VIR_ERR_OPERATION_INVALID,
J
Jiri Denemark 已提交
5830 5831 5832 5833 5834
                  _("domain %s is already running"), dom->name);
        goto cleanup;
    }

    rc = data->vboxObj->vtbl->OpenSession(data->vboxObj, data->vboxSession,
5835
                                          domiid.value);
J
Jiri Denemark 已提交
5836 5837 5838
    if (NS_SUCCEEDED(rc))
        rc = data->vboxSession->vtbl->GetConsole(data->vboxSession, &console);
    if (NS_FAILED(rc)) {
5839
        vboxError(VIR_ERR_INTERNAL_ERROR,
J
Jiri Denemark 已提交
5840 5841 5842 5843 5844 5845 5846 5847
                  _("could not open VirtualBox session with domain %s"),
                  dom->name);
        goto cleanup;
    }

    rc = console->vtbl->RestoreSnapshot(console, snapshot, &progress);
    if (NS_FAILED(rc) || !progress) {
        if (rc == VBOX_E_INVALID_VM_STATE) {
5848
            vboxError(VIR_ERR_OPERATION_INVALID, "%s",
J
Jiri Denemark 已提交
5849 5850
                      _("cannot restore domain snapshot for running domain"));
        } else {
5851
            vboxError(VIR_ERR_INTERNAL_ERROR,
J
Jiri Denemark 已提交
5852 5853 5854 5855 5856 5857 5858 5859 5860
                      _("could not restore snapshot for domain %s"),
                      dom->name);
        }
        goto cleanup;
    }

    progress->vtbl->WaitForCompletion(progress, -1);
    progress->vtbl->GetResultCode(progress, &result);
    if (NS_FAILED(result)) {
5861
        vboxError(VIR_ERR_INTERNAL_ERROR,
J
Jiri Denemark 已提交
5862 5863 5864 5865 5866 5867 5868 5869 5870 5871
                  _("could not restore snapshot for domain %s"), dom->name);
        goto cleanup;
    }

    ret = 0;

cleanup:
    VBOX_RELEASE(progress);
    VBOX_RELEASE(console);
    data->vboxSession->vtbl->Close(data->vboxSession);
5872
    vboxIIDUnalloc(&domiid);
J
Jiri Denemark 已提交
5873 5874 5875 5876 5877 5878
    return ret;
}
#endif

static int
vboxDomainRevertToSnapshot(virDomainSnapshotPtr snapshot,
5879
                           unsigned int flags)
J
Jiri Denemark 已提交
5880 5881 5882
{
    virDomainPtr dom = snapshot->domain;
    VBOX_OBJECT_CHECK(dom->conn, int, -1);
5883
    vboxIID domiid = VBOX_IID_INITIALIZER;
J
Jiri Denemark 已提交
5884 5885 5886 5887 5888 5889 5890
    IMachine *machine = NULL;
    ISnapshot *newSnapshot = NULL;
    ISnapshot *prevSnapshot = NULL;
    PRBool online = PR_FALSE;
    PRUint32 state;
    nsresult rc;

5891 5892
    virCheckFlags(0, -1);

5893 5894
    vboxIIDFromUUID(&domiid, dom->uuid);
    rc = data->vboxObj->vtbl->GetMachine(data->vboxObj, domiid.value, &machine);
J
Jiri Denemark 已提交
5895
    if (NS_FAILED(rc)) {
5896
        vboxError(VIR_ERR_INVALID_DOMAIN, "%s",
J
Jiri Denemark 已提交
5897 5898 5899 5900 5901 5902 5903 5904 5905 5906
                  _("no domain with matching UUID"));
        goto cleanup;
    }

    newSnapshot = vboxDomainSnapshotGet(data, dom, machine, snapshot->name);
    if (!newSnapshot)
        goto cleanup;

    rc = newSnapshot->vtbl->GetOnline(newSnapshot, &online);
    if (NS_FAILED(rc)) {
5907
        vboxError(VIR_ERR_INTERNAL_ERROR,
J
Jiri Denemark 已提交
5908 5909 5910 5911 5912 5913 5914
                  _("could not get online state of snapshot %s"),
                  snapshot->name);
        goto cleanup;
    }

    rc = machine->vtbl->GetCurrentSnapshot(machine, &prevSnapshot);
    if (NS_FAILED(rc)) {
5915
        vboxError(VIR_ERR_INTERNAL_ERROR,
J
Jiri Denemark 已提交
5916 5917 5918 5919 5920 5921 5922
                  _("could not get current snapshot of domain %s"),
                  dom->name);
        goto cleanup;
    }

    rc = machine->vtbl->GetState(machine, &state);
    if (NS_FAILED(rc)) {
5923
        vboxError(VIR_ERR_INTERNAL_ERROR, "%s",
J
Jiri Denemark 已提交
5924 5925 5926 5927 5928 5929
                  _("could not get domain state"));
        goto cleanup;
    }

    if (state >= MachineState_FirstOnline
        && state <= MachineState_LastOnline) {
5930
        vboxError(VIR_ERR_OPERATION_INVALID, "%s",
J
Jiri Denemark 已提交
5931 5932 5933 5934 5935 5936 5937 5938 5939 5940 5941 5942 5943 5944 5945 5946 5947
                  _("cannot revert snapshot of running domain"));
        goto cleanup;
    }

    if (vboxDomainSnapshotRestore(dom, machine, newSnapshot))
        goto cleanup;

    if (online) {
        ret = vboxDomainCreate(dom);
        if (!ret)
            vboxDomainSnapshotRestore(dom, machine, prevSnapshot);
    } else
        ret = 0;

cleanup:
    VBOX_RELEASE(prevSnapshot);
    VBOX_RELEASE(newSnapshot);
5948
    vboxIIDUnalloc(&domiid);
J
Jiri Denemark 已提交
5949 5950 5951 5952 5953 5954 5955 5956 5957
    return ret;
}

static int
vboxDomainSnapshotDeleteSingle(vboxGlobalData *data,
                               IConsole *console,
                               ISnapshot *snapshot)
{
    IProgress *progress = NULL;
5958
    vboxIID iid = VBOX_IID_INITIALIZER;
J
Jiri Denemark 已提交
5959 5960 5961 5962 5963 5964 5965 5966
    int ret = -1;
    nsresult rc;
#if VBOX_API_VERSION == 2002
    nsresult result;
#else
    PRInt32 result;
#endif

5967 5968
    rc = snapshot->vtbl->GetId(snapshot, &iid.value);
    if (NS_FAILED(rc)) {
5969
        vboxError(VIR_ERR_INTERNAL_ERROR, "%s",
J
Jiri Denemark 已提交
5970 5971 5972 5973 5974
                  _("could not get snapshot UUID"));
        goto cleanup;
    }

#if VBOX_API_VERSION < 3001
5975
    rc = console->vtbl->DiscardSnapshot(console, iid.value, &progress);
J
Jiri Denemark 已提交
5976
#else
5977
    rc = console->vtbl->DeleteSnapshot(console, iid.value, &progress);
J
Jiri Denemark 已提交
5978 5979 5980
#endif
    if (NS_FAILED(rc) || !progress) {
        if (rc == VBOX_E_INVALID_VM_STATE) {
5981
            vboxError(VIR_ERR_OPERATION_INVALID, "%s",
J
Jiri Denemark 已提交
5982 5983
                      _("cannot delete domain snapshot for running domain"));
        } else {
5984
            vboxError(VIR_ERR_INTERNAL_ERROR, "%s",
J
Jiri Denemark 已提交
5985 5986 5987 5988 5989 5990 5991 5992
                      _("could not delete snapshot"));
        }
        goto cleanup;
    }

    progress->vtbl->WaitForCompletion(progress, -1);
    progress->vtbl->GetResultCode(progress, &result);
    if (NS_FAILED(result)) {
5993
        vboxError(VIR_ERR_INTERNAL_ERROR, "%s",
J
Jiri Denemark 已提交
5994 5995 5996 5997 5998 5999 6000 6001
                  _("could not delete snapshot"));
        goto cleanup;
    }

    ret = 0;

cleanup:
    VBOX_RELEASE(progress);
6002
    vboxIIDUnalloc(&iid);
J
Jiri Denemark 已提交
6003 6004 6005 6006 6007 6008 6009 6010
    return ret;
}

static int
vboxDomainSnapshotDeleteTree(vboxGlobalData *data,
                             IConsole *console,
                             ISnapshot *snapshot)
{
6011
    vboxArray children = VBOX_ARRAY_INITIALIZER;
J
Jiri Denemark 已提交
6012 6013 6014 6015
    int ret = -1;
    nsresult rc;
    unsigned int i;

6016
    rc = vboxArrayGet(&children, snapshot, snapshot->vtbl->GetChildren);
J
Jiri Denemark 已提交
6017
    if (NS_FAILED(rc)) {
6018
        vboxError(VIR_ERR_INTERNAL_ERROR, "%s",
J
Jiri Denemark 已提交
6019 6020 6021 6022
                  _("could not get children snapshots"));
        goto cleanup;
    }

6023 6024 6025
    for (i = 0; i < children.count; i++) {
        if (vboxDomainSnapshotDeleteTree(data, console, children.items[i]))
            goto cleanup;
J
Jiri Denemark 已提交
6026 6027 6028 6029 6030
    }

    ret = vboxDomainSnapshotDeleteSingle(data, console, snapshot);

cleanup:
6031
    vboxArrayRelease(&children);
J
Jiri Denemark 已提交
6032 6033 6034 6035 6036 6037 6038 6039 6040
    return ret;
}

static int
vboxDomainSnapshotDelete(virDomainSnapshotPtr snapshot,
                         unsigned int flags)
{
    virDomainPtr dom = snapshot->domain;
    VBOX_OBJECT_CHECK(dom->conn, int, -1);
6041
    vboxIID domiid = VBOX_IID_INITIALIZER;
J
Jiri Denemark 已提交
6042 6043 6044 6045 6046 6047
    IMachine *machine = NULL;
    ISnapshot *snap = NULL;
    IConsole *console = NULL;
    PRUint32 state;
    nsresult rc;

6048 6049
    virCheckFlags(VIR_DOMAIN_SNAPSHOT_DELETE_CHILDREN, -1);

6050 6051
    vboxIIDFromUUID(&domiid, dom->uuid);
    rc = data->vboxObj->vtbl->GetMachine(data->vboxObj, domiid.value, &machine);
J
Jiri Denemark 已提交
6052
    if (NS_FAILED(rc)) {
6053
        vboxError(VIR_ERR_INVALID_DOMAIN, "%s",
J
Jiri Denemark 已提交
6054 6055 6056 6057 6058 6059 6060 6061 6062 6063
                  _("no domain with matching UUID"));
        goto cleanup;
    }

    snap = vboxDomainSnapshotGet(data, dom, machine, snapshot->name);
    if (!snap)
        goto cleanup;

    rc = machine->vtbl->GetState(machine, &state);
    if (NS_FAILED(rc)) {
6064
        vboxError(VIR_ERR_INTERNAL_ERROR, "%s",
J
Jiri Denemark 已提交
6065 6066 6067 6068 6069 6070
                  _("could not get domain state"));
        goto cleanup;
    }

    if (state >= MachineState_FirstOnline
        && state <= MachineState_LastOnline) {
6071
        vboxError(VIR_ERR_OPERATION_INVALID, "%s",
J
Jiri Denemark 已提交
6072 6073 6074 6075 6076
                  _("cannot delete snapshots of running domain"));
        goto cleanup;
    }

    rc = data->vboxObj->vtbl->OpenSession(data->vboxObj, data->vboxSession,
6077
                                          domiid.value);
J
Jiri Denemark 已提交
6078 6079 6080
    if (NS_SUCCEEDED(rc))
        rc = data->vboxSession->vtbl->GetConsole(data->vboxSession, &console);
    if (NS_FAILED(rc)) {
6081
        vboxError(VIR_ERR_INTERNAL_ERROR,
J
Jiri Denemark 已提交
6082 6083 6084 6085 6086 6087 6088 6089 6090 6091 6092 6093 6094
                  _("could not open VirtualBox session with domain %s"),
                  dom->name);
        goto cleanup;
    }

    if (flags & VIR_DOMAIN_SNAPSHOT_DELETE_CHILDREN)
        ret = vboxDomainSnapshotDeleteTree(data, console, snap);
    else
        ret = vboxDomainSnapshotDeleteSingle(data, console, snap);

cleanup:
    VBOX_RELEASE(console);
    VBOX_RELEASE(snap);
6095
    vboxIIDUnalloc(&domiid);
J
Jiri Denemark 已提交
6096 6097 6098 6099
    data->vboxSession->vtbl->Close(data->vboxSession);
    return ret;
}

6100 6101 6102 6103 6104
#if VBOX_API_VERSION == 2002
    /* No Callback support for VirtualBox 2.2.* series */
#else /* !(VBOX_API_VERSION == 2002) */

/* Functions needed for Callbacks */
6105 6106 6107 6108
static nsresult PR_COM_METHOD
vboxCallbackOnMachineStateChange(IVirtualBoxCallback *pThis,
                                 PRUnichar *machineId, PRUint32 state)
{
6109 6110 6111 6112 6113 6114 6115 6116 6117 6118 6119 6120 6121 6122 6123 6124 6125 6126 6127
    virDomainPtr dom = NULL;
    int event        = 0;
    int detail       = 0;

    g_pVBoxGlobalData->domainEventDispatching = 1;
    vboxDriverLock(g_pVBoxGlobalData);

    DEBUG("IVirtualBoxCallback: %p, State: %d", pThis, state);
    DEBUGPRUnichar("machineId", machineId);

    if (machineId) {
        char *machineIdUtf8       = NULL;
        unsigned char uuid[VIR_UUID_BUFLEN];

        g_pVBoxGlobalData->pFuncs->pfnUtf16ToUtf8(machineId, &machineIdUtf8);
        virUUIDParse(machineIdUtf8, uuid);

        dom = vboxDomainLookupByUUID(g_pVBoxGlobalData->conn, uuid);
        if (dom) {
6128
            virDomainEventPtr ev;
6129 6130 6131 6132 6133 6134 6135 6136 6137 6138 6139 6140 6141 6142 6143 6144 6145 6146 6147 6148 6149 6150 6151 6152 6153 6154 6155 6156 6157 6158

            if (state == MachineState_Starting) {
                event  = VIR_DOMAIN_EVENT_STARTED;
                detail = VIR_DOMAIN_EVENT_STARTED_BOOTED;
            } else if (state == MachineState_Restoring) {
                event  = VIR_DOMAIN_EVENT_STARTED;
                detail = VIR_DOMAIN_EVENT_STARTED_RESTORED;
            } else if (state == MachineState_Paused) {
                event  = VIR_DOMAIN_EVENT_SUSPENDED;
                detail = VIR_DOMAIN_EVENT_SUSPENDED_PAUSED;
            } else if (state == MachineState_Running) {
                event  = VIR_DOMAIN_EVENT_RESUMED;
                detail = VIR_DOMAIN_EVENT_RESUMED_UNPAUSED;
            } else if (state == MachineState_PoweredOff) {
                event  = VIR_DOMAIN_EVENT_STOPPED;
                detail = VIR_DOMAIN_EVENT_STOPPED_SHUTDOWN;
            } else if (state == MachineState_Stopping) {
                event  = VIR_DOMAIN_EVENT_STOPPED;
                detail = VIR_DOMAIN_EVENT_STOPPED_DESTROYED;
            } else if (state == MachineState_Aborted) {
                event  = VIR_DOMAIN_EVENT_STOPPED;
                detail = VIR_DOMAIN_EVENT_STOPPED_CRASHED;
            } else if (state == MachineState_Saving) {
                event  = VIR_DOMAIN_EVENT_STOPPED;
                detail = VIR_DOMAIN_EVENT_STOPPED_SAVED;
            } else {
                event  = VIR_DOMAIN_EVENT_STOPPED;
                detail = VIR_DOMAIN_EVENT_STOPPED_SHUTDOWN;
            }

6159 6160 6161 6162 6163 6164 6165 6166
            ev = virDomainEventNewFromDom(dom, event, detail);

            if (ev) {
                virDomainEventDispatch(ev,
                                       g_pVBoxGlobalData->domainEventCallbacks,
                                       virDomainEventDispatchDefaultFunc,
                                       NULL);
                virDomainEventFree(ev);
6167 6168 6169 6170 6171 6172 6173 6174 6175 6176 6177 6178
            }
        }
    }

    virDomainEventCallbackListPurgeMarked(g_pVBoxGlobalData->domainEventCallbacks);

    vboxDriverUnlock(g_pVBoxGlobalData);
    g_pVBoxGlobalData->domainEventDispatching = 0;

    return NS_OK;
}

6179 6180 6181 6182
static nsresult PR_COM_METHOD
vboxCallbackOnMachineDataChange(IVirtualBoxCallback *pThis,
                                PRUnichar *machineId)
{
6183 6184 6185 6186 6187 6188
    DEBUG("IVirtualBoxCallback: %p", pThis);
    DEBUGPRUnichar("machineId", machineId);

    return NS_OK;
}

6189 6190 6191 6192 6193 6194 6195
static nsresult PR_COM_METHOD
vboxCallbackOnExtraDataCanChange(IVirtualBoxCallback *pThis,
                                 PRUnichar *machineId, PRUnichar *key,
                                 PRUnichar *value,
                                 PRUnichar **error ATTRIBUTE_UNUSED,
                                 PRBool *allowChange)
{
6196 6197 6198 6199 6200 6201 6202 6203
    DEBUG("IVirtualBoxCallback: %p, allowChange: %s", pThis, *allowChange ? "true" : "false");
    DEBUGPRUnichar("machineId", machineId);
    DEBUGPRUnichar("key", key);
    DEBUGPRUnichar("value", value);

    return NS_OK;
}

6204 6205 6206 6207
static nsresult PR_COM_METHOD
vboxCallbackOnExtraDataChange(IVirtualBoxCallback *pThis, PRUnichar *machineId,
                              PRUnichar *key, PRUnichar *value)
{
6208 6209 6210 6211 6212 6213 6214 6215
    DEBUG("IVirtualBoxCallback: %p", pThis);
    DEBUGPRUnichar("machineId", machineId);
    DEBUGPRUnichar("key", key);
    DEBUGPRUnichar("value", value);

    return NS_OK;
}

6216
# if VBOX_API_VERSION < 3001
6217 6218 6219 6220
static nsresult PR_COM_METHOD
vboxCallbackOnMediaRegistered(IVirtualBoxCallback *pThis, PRUnichar *mediaId,
                              PRUint32 mediaType, PRBool registered)
{
6221 6222 6223 6224 6225 6226
    DEBUG("IVirtualBoxCallback: %p, registered: %s", pThis, registered ? "true" : "false");
    DEBUG("mediaType: %d", mediaType);
    DEBUGPRUnichar("mediaId", mediaId);

    return NS_OK;
}
6227 6228
# else  /* VBOX_API_VERSION >= 3001 */
# endif /* VBOX_API_VERSION >= 3001 */
6229

6230 6231 6232 6233
static nsresult PR_COM_METHOD
vboxCallbackOnMachineRegistered(IVirtualBoxCallback *pThis,
                                PRUnichar *machineId, PRBool registered)
{
6234 6235 6236 6237 6238 6239 6240 6241 6242 6243 6244 6245 6246 6247 6248 6249 6250 6251 6252
    virDomainPtr dom = NULL;
    int event        = 0;
    int detail       = 0;

    g_pVBoxGlobalData->domainEventDispatching = 1;
    vboxDriverLock(g_pVBoxGlobalData);

    DEBUG("IVirtualBoxCallback: %p, registered: %s", pThis, registered ? "true" : "false");
    DEBUGPRUnichar("machineId", machineId);

    if (machineId) {
        char *machineIdUtf8       = NULL;
        unsigned char uuid[VIR_UUID_BUFLEN];

        g_pVBoxGlobalData->pFuncs->pfnUtf16ToUtf8(machineId, &machineIdUtf8);
        virUUIDParse(machineIdUtf8, uuid);

        dom = vboxDomainLookupByUUID(g_pVBoxGlobalData->conn, uuid);
        if (dom) {
6253
            virDomainEventPtr ev;
6254 6255 6256 6257 6258 6259 6260 6261 6262 6263 6264 6265 6266 6267 6268

            /* CURRENT LIMITATION: we never get the VIR_DOMAIN_EVENT_UNDEFINED
             * event becuase the when the machine is de-registered the call
             * to vboxDomainLookupByUUID fails and thus we don't get any
             * dom pointer which is necessary (null dom pointer doesn't work)
             * to show the VIR_DOMAIN_EVENT_UNDEFINED event
             */
            if (registered) {
                event  = VIR_DOMAIN_EVENT_DEFINED;
                detail = VIR_DOMAIN_EVENT_DEFINED_ADDED;
            } else {
                event  = VIR_DOMAIN_EVENT_UNDEFINED;
                detail = VIR_DOMAIN_EVENT_UNDEFINED_REMOVED;
            }

6269 6270 6271 6272 6273 6274 6275 6276
            ev = virDomainEventNewFromDom(dom, event, detail);

            if (ev) {
                virDomainEventDispatch(ev,
                                       g_pVBoxGlobalData->domainEventCallbacks,
                                       virDomainEventDispatchDefaultFunc,
                                       NULL);
                virDomainEventFree(ev);
6277 6278 6279 6280 6281 6282 6283 6284 6285 6286 6287 6288
            }
        }
    }

    virDomainEventCallbackListPurgeMarked(g_pVBoxGlobalData->domainEventCallbacks);

    vboxDriverUnlock(g_pVBoxGlobalData);
    g_pVBoxGlobalData->domainEventDispatching = 0;

    return NS_OK;
}

6289 6290 6291 6292
static nsresult PR_COM_METHOD
vboxCallbackOnSessionStateChange(IVirtualBoxCallback *pThis,
                                 PRUnichar *machineId, PRUint32 state)
{
6293 6294 6295 6296 6297 6298
    DEBUG("IVirtualBoxCallback: %p, state: %d", pThis, state);
    DEBUGPRUnichar("machineId", machineId);

    return NS_OK;
}

6299 6300 6301 6302
static nsresult PR_COM_METHOD
vboxCallbackOnSnapshotTaken(IVirtualBoxCallback *pThis, PRUnichar *machineId,
                            PRUnichar *snapshotId)
{
6303 6304 6305 6306 6307 6308 6309
    DEBUG("IVirtualBoxCallback: %p", pThis);
    DEBUGPRUnichar("machineId", machineId);
    DEBUGPRUnichar("snapshotId", snapshotId);

    return NS_OK;
}

6310 6311 6312 6313
static nsresult PR_COM_METHOD
vboxCallbackOnSnapshotDiscarded(IVirtualBoxCallback *pThis, PRUnichar *machineId,
                                PRUnichar *snapshotId)
{
6314 6315 6316 6317 6318 6319 6320
    DEBUG("IVirtualBoxCallback: %p", pThis);
    DEBUGPRUnichar("machineId", machineId);
    DEBUGPRUnichar("snapshotId", snapshotId);

    return NS_OK;
}

6321 6322 6323 6324
static nsresult PR_COM_METHOD
vboxCallbackOnSnapshotChange(IVirtualBoxCallback *pThis, PRUnichar *machineId,
                             PRUnichar *snapshotId)
{
6325 6326 6327 6328 6329 6330 6331
    DEBUG("IVirtualBoxCallback: %p", pThis);
    DEBUGPRUnichar("machineId", machineId);
    DEBUGPRUnichar("snapshotId", snapshotId);

    return NS_OK;
}

6332 6333 6334 6335 6336
static nsresult PR_COM_METHOD
vboxCallbackOnGuestPropertyChange(IVirtualBoxCallback *pThis,
                                  PRUnichar *machineId, PRUnichar *name,
                                  PRUnichar *value, PRUnichar *flags)
{
6337 6338 6339 6340 6341 6342 6343 6344 6345
    DEBUG("IVirtualBoxCallback: %p", pThis);
    DEBUGPRUnichar("machineId", machineId);
    DEBUGPRUnichar("name", name);
    DEBUGPRUnichar("value", value);
    DEBUGPRUnichar("flags", flags);

    return NS_OK;
}

6346 6347 6348
static nsresult PR_COM_METHOD
vboxCallbackAddRef(nsISupports *pThis)
{
6349 6350 6351 6352 6353 6354 6355 6356 6357
    nsresult c;

    c = ++g_pVBoxGlobalData->vboxCallBackRefCount;

    DEBUG("pThis: %p, vboxCallback AddRef: %d", pThis, c);

    return c;
}

6358 6359 6360
static nsresult PR_COM_METHOD
vboxCallbackRelease(nsISupports *pThis)
{
6361 6362 6363 6364 6365 6366 6367 6368 6369 6370 6371 6372 6373 6374
    nsresult c;

    c = --g_pVBoxGlobalData->vboxCallBackRefCount;
    if (c == 0) {
        /* delete object */
        VIR_FREE(pThis->vtbl);
        VIR_FREE(pThis);
    }

    DEBUG("pThis: %p, vboxCallback Release: %d", pThis, c);

    return c;
}

6375 6376 6377
static nsresult PR_COM_METHOD
vboxCallbackQueryInterface(nsISupports *pThis, const nsID *iid, void **resultp)
{
6378 6379 6380 6381 6382 6383 6384 6385 6386 6387 6388 6389 6390 6391 6392 6393 6394 6395 6396 6397 6398 6399 6400
    IVirtualBoxCallback *that = (IVirtualBoxCallback *)pThis;
    static const nsID ivirtualboxCallbackUUID = IVIRTUALBOXCALLBACK_IID;
    static const nsID isupportIID = NS_ISUPPORTS_IID;

    /* Match UUID for IVirtualBoxCallback class */
    if (    memcmp(iid, &ivirtualboxCallbackUUID, sizeof(nsID)) == 0
        ||  memcmp(iid, &isupportIID, sizeof(nsID)) == 0) {
        g_pVBoxGlobalData->vboxCallBackRefCount++;
        *resultp = that;

        DEBUG("pThis: %p, vboxCallback QueryInterface: %d", pThis, g_pVBoxGlobalData->vboxCallBackRefCount);

        return NS_OK;
    }


    DEBUG("pThis: %p, vboxCallback QueryInterface didn't find a matching interface", pThis);
    DEBUGUUID("The UUID Callback Interface expects", iid);
    DEBUGUUID("The UUID Callback Interface got", &ivirtualboxCallbackUUID);
    return NS_NOINTERFACE;
}


6401
static IVirtualBoxCallback *vboxAllocCallbackObj(void) {
6402 6403
    IVirtualBoxCallback *vboxCallback = NULL;

6404
    /* Allocate, Initialize and return a valid
6405 6406 6407
     * IVirtualBoxCallback object here
     */
    if ((VIR_ALLOC(vboxCallback) < 0) || (VIR_ALLOC(vboxCallback->vtbl) < 0)) {
6408
        VIR_FREE(vboxCallback);
6409
        virReportOOMError();
6410 6411 6412 6413 6414 6415 6416 6417 6418 6419 6420
        return NULL;
    }

    {
        vboxCallback->vtbl->nsisupports.AddRef          = &vboxCallbackAddRef;
        vboxCallback->vtbl->nsisupports.Release         = &vboxCallbackRelease;
        vboxCallback->vtbl->nsisupports.QueryInterface  = &vboxCallbackQueryInterface;
        vboxCallback->vtbl->OnMachineStateChange        = &vboxCallbackOnMachineStateChange;
        vboxCallback->vtbl->OnMachineDataChange         = &vboxCallbackOnMachineDataChange;
        vboxCallback->vtbl->OnExtraDataCanChange        = &vboxCallbackOnExtraDataCanChange;
        vboxCallback->vtbl->OnExtraDataChange           = &vboxCallbackOnExtraDataChange;
6421
# if VBOX_API_VERSION < 3001
6422
        vboxCallback->vtbl->OnMediaRegistered           = &vboxCallbackOnMediaRegistered;
6423 6424
# else  /* VBOX_API_VERSION >= 3001 */
# endif /* VBOX_API_VERSION >= 3001 */
6425 6426 6427
        vboxCallback->vtbl->OnMachineRegistered         = &vboxCallbackOnMachineRegistered;
        vboxCallback->vtbl->OnSessionStateChange        = &vboxCallbackOnSessionStateChange;
        vboxCallback->vtbl->OnSnapshotTaken             = &vboxCallbackOnSnapshotTaken;
6428
# if VBOX_API_VERSION < 3002
6429
        vboxCallback->vtbl->OnSnapshotDiscarded         = &vboxCallbackOnSnapshotDiscarded;
6430 6431 6432
# else /* VBOX_API_VERSION >= 3002 */
        vboxCallback->vtbl->OnSnapshotDeleted           = &vboxCallbackOnSnapshotDiscarded;
# endif /* VBOX_API_VERSION >= 3002 */
6433 6434 6435 6436 6437 6438 6439 6440 6441 6442 6443 6444 6445 6446 6447 6448 6449 6450 6451 6452 6453 6454 6455 6456 6457 6458 6459 6460 6461
        vboxCallback->vtbl->OnSnapshotChange            = &vboxCallbackOnSnapshotChange;
        vboxCallback->vtbl->OnGuestPropertyChange       = &vboxCallbackOnGuestPropertyChange;
        g_pVBoxGlobalData->vboxCallBackRefCount = 1;

    }

    return vboxCallback;
}

static void vboxReadCallback(int watch ATTRIBUTE_UNUSED,
                             int fd,
                             int events ATTRIBUTE_UNUSED,
                             void *opaque ATTRIBUTE_UNUSED) {
    if (fd >= 0) {
        g_pVBoxGlobalData->vboxQueue->vtbl->ProcessPendingEvents(g_pVBoxGlobalData->vboxQueue);
    } else {
        nsresult rc;
        PLEvent *pEvent = NULL;

        rc = g_pVBoxGlobalData->vboxQueue->vtbl->WaitForEvent(g_pVBoxGlobalData->vboxQueue, &pEvent);
        if (NS_SUCCEEDED(rc))
            g_pVBoxGlobalData->vboxQueue->vtbl->HandleEvent(g_pVBoxGlobalData->vboxQueue, pEvent);
    }
}

static int vboxDomainEventRegister (virConnectPtr conn,
                                    virConnectDomainEventCallback callback,
                                    void *opaque,
                                    virFreeCallback freecb) {
6462
    VBOX_OBJECT_CHECK(conn, int, -1);
6463
    int vboxRet          = -1;
6464
    nsresult rc;
6465 6466 6467 6468 6469 6470

    /* Locking has to be there as callbacks are not
     * really fully thread safe
     */
    vboxDriverLock(data);

6471
    if (data->vboxCallback == NULL) {
6472
        data->vboxCallback = vboxAllocCallbackObj();
6473 6474 6475 6476
        if (data->vboxCallback != NULL) {
            rc = data->vboxObj->vtbl->RegisterCallback(data->vboxObj, data->vboxCallback);
            if (NS_SUCCEEDED(rc)) {
                vboxRet = 0;
6477 6478
            }
        }
6479 6480 6481
    } else {
        vboxRet = 0;
    }
6482

6483 6484 6485 6486 6487 6488 6489
    /* Get the vbox file handle and add a event handle to it
     * so that the events can be passed down to the user
     */
    if (vboxRet == 0) {
        if (data->fdWatch < 0) {
            PRInt32 vboxFileHandle;
            vboxFileHandle = data->vboxQueue->vtbl->GetEventQueueSelectFD(data->vboxQueue);
6490

6491 6492
            data->fdWatch = virEventAddHandle(vboxFileHandle, VIR_EVENT_HANDLE_READABLE, vboxReadCallback, NULL, NULL);
        }
6493

6494 6495 6496 6497 6498
        if (data->fdWatch >= 0) {
            /* Once a callback is registered with virtualbox, use a list
             * to store the callbacks registered with libvirt so that
             * later you can iterate over them
             */
6499

6500 6501 6502 6503 6504 6505
            ret = virDomainEventCallbackListAdd(conn, data->domainEventCallbacks,
                                                callback, opaque, freecb);
            DEBUG("virDomainEventCallbackListAdd (ret = %d) ( conn: %p, "
                  "data->domainEventCallbacks: %p, callback: %p, opaque: %p, "
                  "freecb: %p )", ret, conn, data->domainEventCallbacks, callback,
                  opaque, freecb);
6506 6507 6508 6509 6510 6511 6512 6513 6514 6515 6516 6517 6518 6519 6520 6521 6522
        }
    }

    vboxDriverUnlock(data);

    if (ret >= 0) {
        return ret;
    } else {
        if (data->vboxObj && data->vboxCallback) {
            data->vboxObj->vtbl->UnregisterCallback(data->vboxObj, data->vboxCallback);
        }
        return -1;
    }
}

static int vboxDomainEventDeregister (virConnectPtr conn,
                                      virConnectDomainEventCallback callback) {
6523
    VBOX_OBJECT_CHECK(conn, int, -1);
6524 6525 6526 6527 6528 6529 6530 6531 6532 6533 6534 6535 6536

    /* Locking has to be there as callbacks are not
     * really fully thread safe
     */
    vboxDriverLock(data);

    if (data->domainEventDispatching)
        ret = virDomainEventCallbackListMarkDelete(conn, data->domainEventCallbacks,
                                                   callback);
    else
        ret = virDomainEventCallbackListRemove(conn, data->domainEventCallbacks,
                                               callback);

6537
    if (data->vboxCallback) {
6538 6539 6540
        /* check count here of how many times register was called
         * and only on the last de-register do the un-register call
         */
6541
        if (data->domainEventCallbacks && virDomainEventCallbackListCount(data->domainEventCallbacks) == 0) {
6542
            data->vboxObj->vtbl->UnregisterCallback(data->vboxObj, data->vboxCallback);
6543
            VBOX_RELEASE(data->vboxCallback);
6544 6545 6546 6547 6548 6549 6550 6551 6552 6553 6554 6555

            /* Remove the Event file handle on which we are listening as well */
            virEventRemoveHandle(data->fdWatch);
            data->fdWatch = -1;
        }
    }

    vboxDriverUnlock(data);

    return ret;
}

6556 6557 6558 6559 6560 6561 6562 6563 6564 6565 6566 6567 6568 6569 6570 6571 6572 6573 6574 6575 6576 6577 6578 6579 6580 6581 6582 6583 6584 6585 6586 6587 6588 6589 6590 6591 6592 6593 6594 6595 6596 6597 6598 6599 6600 6601 6602 6603 6604 6605 6606 6607 6608 6609 6610 6611 6612 6613 6614 6615 6616 6617 6618 6619 6620 6621 6622 6623 6624 6625 6626 6627 6628 6629 6630 6631 6632 6633 6634 6635 6636 6637 6638 6639 6640 6641 6642 6643 6644 6645 6646 6647 6648 6649 6650 6651 6652 6653 6654 6655 6656
static int vboxDomainEventRegisterAny(virConnectPtr conn,
                                      virDomainPtr dom,
                                      int eventID,
                                      virConnectDomainEventGenericCallback callback,
                                      void *opaque,
                                      virFreeCallback freecb) {
    VBOX_OBJECT_CHECK(conn, int, -1);
    int vboxRet          = -1;
    nsresult rc;

    /* Locking has to be there as callbacks are not
     * really fully thread safe
     */
    vboxDriverLock(data);

    if (data->vboxCallback == NULL) {
        data->vboxCallback = vboxAllocCallbackObj();
        if (data->vboxCallback != NULL) {
            rc = data->vboxObj->vtbl->RegisterCallback(data->vboxObj, data->vboxCallback);
            if (NS_SUCCEEDED(rc)) {
                vboxRet = 0;
            }
        }
    } else {
        vboxRet = 0;
    }

    /* Get the vbox file handle and add a event handle to it
     * so that the events can be passed down to the user
     */
    if (vboxRet == 0) {
        if (data->fdWatch < 0) {
            PRInt32 vboxFileHandle;
            vboxFileHandle = data->vboxQueue->vtbl->GetEventQueueSelectFD(data->vboxQueue);

            data->fdWatch = virEventAddHandle(vboxFileHandle, VIR_EVENT_HANDLE_READABLE, vboxReadCallback, NULL, NULL);
        }

        if (data->fdWatch >= 0) {
            /* Once a callback is registered with virtualbox, use a list
             * to store the callbacks registered with libvirt so that
             * later you can iterate over them
             */

            ret = virDomainEventCallbackListAddID(conn, data->domainEventCallbacks,
                                                  dom, eventID,
                                                  callback, opaque, freecb);
            DEBUG("virDomainEventCallbackListAddID (ret = %d) ( conn: %p, "
                  "data->domainEventCallbacks: %p, callback: %p, opaque: %p, "
                  "freecb: %p )", ret, conn, data->domainEventCallbacks, callback,
                  opaque, freecb);
        }
    }

    vboxDriverUnlock(data);

    if (ret >= 0) {
        return ret;
    } else {
        if (data->vboxObj && data->vboxCallback) {
            data->vboxObj->vtbl->UnregisterCallback(data->vboxObj, data->vboxCallback);
        }
        return -1;
    }
}

static int vboxDomainEventDeregisterAny(virConnectPtr conn,
                                        int callbackID) {
    VBOX_OBJECT_CHECK(conn, int, -1);

    /* Locking has to be there as callbacks are not
     * really fully thread safe
     */
    vboxDriverLock(data);

    if (data->domainEventDispatching)
        ret = virDomainEventCallbackListMarkDeleteID(conn, data->domainEventCallbacks,
                                                     callbackID);
    else
        ret = virDomainEventCallbackListRemoveID(conn, data->domainEventCallbacks,
                                                 callbackID);

    if (data->vboxCallback) {
        /* check count here of how many times register was called
         * and only on the last de-register do the un-register call
         */
        if (data->domainEventCallbacks && virDomainEventCallbackListCount(data->domainEventCallbacks) == 0) {
            data->vboxObj->vtbl->UnregisterCallback(data->vboxObj, data->vboxCallback);
            VBOX_RELEASE(data->vboxCallback);

            /* Remove the Event file handle on which we are listening as well */
            virEventRemoveHandle(data->fdWatch);
            data->fdWatch = -1;
        }
    }

    vboxDriverUnlock(data);

    return ret;
}

6657 6658
#endif /* !(VBOX_API_VERSION == 2002) */

6659 6660 6661 6662 6663 6664 6665 6666 6667 6668 6669 6670 6671 6672 6673 6674
/**
 * The Network Functions here on
 */
static virDrvOpenStatus vboxNetworkOpen(virConnectPtr conn,
                                        virConnectAuthPtr auth ATTRIBUTE_UNUSED,
                                        int flags ATTRIBUTE_UNUSED) {
    vboxGlobalData *data = conn->privateData;

    if (STRNEQ(conn->driver->name, "VBOX"))
        goto cleanup;

    if ((data->pFuncs      == NULL) ||
        (data->vboxObj     == NULL) ||
        (data->vboxSession == NULL))
        goto cleanup;

6675
    DEBUG0("network initialized");
6676 6677 6678 6679 6680 6681 6682 6683
    /* conn->networkPrivateData = some network specific data */
    return VIR_DRV_OPEN_SUCCESS;

cleanup:
    return VIR_DRV_OPEN_DECLINED;
}

static int vboxNetworkClose(virConnectPtr conn) {
6684
    DEBUG0("network uninitialized");
6685 6686 6687 6688 6689
    conn->networkPrivateData = NULL;
    return 0;
}

static int vboxNumOfNetworks(virConnectPtr conn) {
6690
    VBOX_OBJECT_HOST_CHECK(conn, int, 0);
6691
    vboxArray networkInterfaces = VBOX_ARRAY_INITIALIZER;
6692
    int i = 0;
6693

6694
    vboxArrayGet(&networkInterfaces, host, host->vtbl->GetNetworkInterfaces);
6695

6696 6697 6698 6699
    for (i = 0; i < networkInterfaces.count; i++) {
        IHostNetworkInterface *networkInterface = networkInterfaces.items[i];

        if (networkInterface) {
6700
            PRUint32 interfaceType = 0;
6701

6702
            networkInterface->vtbl->GetInterfaceType(networkInterface, &interfaceType);
6703 6704
            if (interfaceType == HostNetworkInterfaceType_HostOnly) {
                PRUint32 status = HostNetworkInterfaceStatus_Unknown;
6705

6706
                networkInterface->vtbl->GetStatus(networkInterface, &status);
6707

6708 6709
                if (status == HostNetworkInterfaceStatus_Up)
                    ret++;
6710 6711 6712 6713
            }
        }
    }

6714 6715
    vboxArrayRelease(&networkInterfaces);

6716 6717 6718 6719
    VBOX_RELEASE(host);

    DEBUG("numActive: %d", ret);
    return ret;
6720 6721 6722
}

static int vboxListNetworks(virConnectPtr conn, char **const names, int nnames) {
6723
    VBOX_OBJECT_HOST_CHECK(conn, int, 0);
6724
    vboxArray networkInterfaces = VBOX_ARRAY_INITIALIZER;
6725
    int i = 0;
6726

6727 6728 6729 6730
    vboxArrayGet(&networkInterfaces, host, host->vtbl->GetNetworkInterfaces);

    for (i = 0; (ret < nnames) && (i < networkInterfaces.count); i++) {
        IHostNetworkInterface *networkInterface = networkInterfaces.items[i];
6731

6732
        if (networkInterface) {
6733
            PRUint32 interfaceType = 0;
6734

6735
            networkInterface->vtbl->GetInterfaceType(networkInterface, &interfaceType);
6736

6737 6738
            if (interfaceType == HostNetworkInterfaceType_HostOnly) {
                PRUint32 status = HostNetworkInterfaceStatus_Unknown;
6739

6740
                networkInterface->vtbl->GetStatus(networkInterface, &status);
6741

6742 6743 6744
                if (status == HostNetworkInterfaceStatus_Up) {
                    char *nameUtf8       = NULL;
                    PRUnichar *nameUtf16 = NULL;
6745

6746
                    networkInterface->vtbl->GetName(networkInterface, &nameUtf16);
6747
                    VBOX_UTF16_TO_UTF8(nameUtf16, &nameUtf8);
6748

6749 6750 6751
                    DEBUG("nnames[%d]: %s", ret, nameUtf8);
                    names[ret] = strdup(nameUtf8);
                    if (names[ret] == NULL) {
6752
                        virReportOOMError();
6753 6754
                    } else {
                        ret++;
6755 6756
                    }

6757 6758
                    VBOX_UTF8_FREE(nameUtf8);
                    VBOX_UTF16_FREE(nameUtf16);
6759 6760 6761 6762 6763
                }
            }
        }
    }

6764
    vboxArrayRelease(&networkInterfaces);
6765

6766
    VBOX_RELEASE(host);
6767

6768 6769
    return ret;
}
6770

6771 6772
static int vboxNumOfDefinedNetworks(virConnectPtr conn) {
    VBOX_OBJECT_HOST_CHECK(conn, int, 0);
6773
    vboxArray networkInterfaces = VBOX_ARRAY_INITIALIZER;
6774
    int i = 0;
6775

6776
    vboxArrayGet(&networkInterfaces, host, host->vtbl->GetNetworkInterfaces);
6777

6778 6779 6780 6781
    for (i = 0; i < networkInterfaces.count; i++) {
        IHostNetworkInterface *networkInterface = networkInterfaces.items[i];

        if (networkInterface) {
6782
            PRUint32 interfaceType = 0;
6783

6784
            networkInterface->vtbl->GetInterfaceType(networkInterface, &interfaceType);
6785 6786
            if (interfaceType == HostNetworkInterfaceType_HostOnly) {
                PRUint32 status = HostNetworkInterfaceStatus_Unknown;
6787

6788
                networkInterface->vtbl->GetStatus(networkInterface, &status);
6789

6790 6791
                if (status == HostNetworkInterfaceStatus_Down)
                    ret++;
6792 6793 6794 6795
            }
        }
    }

6796 6797
    vboxArrayRelease(&networkInterfaces);

6798 6799 6800 6801
    VBOX_RELEASE(host);

    DEBUG("numActive: %d", ret);
    return ret;
6802 6803 6804
}

static int vboxListDefinedNetworks(virConnectPtr conn, char **const names, int nnames) {
6805
    VBOX_OBJECT_HOST_CHECK(conn, int, 0);
6806
    vboxArray networkInterfaces = VBOX_ARRAY_INITIALIZER;
6807
    int i = 0;
6808

6809 6810 6811 6812
    vboxArrayGet(&networkInterfaces, host, host->vtbl->GetNetworkInterfaces);

    for (i = 0; (ret < nnames) && (i < networkInterfaces.count); i++) {
        IHostNetworkInterface *networkInterface = networkInterfaces.items[i];
6813

6814
        if (networkInterface) {
6815
            PRUint32 interfaceType = 0;
6816

6817
            networkInterface->vtbl->GetInterfaceType(networkInterface, &interfaceType);
6818

6819 6820
            if (interfaceType == HostNetworkInterfaceType_HostOnly) {
                PRUint32 status = HostNetworkInterfaceStatus_Unknown;
6821

6822
                networkInterface->vtbl->GetStatus(networkInterface, &status);
6823

6824 6825 6826
                if (status == HostNetworkInterfaceStatus_Down) {
                    char *nameUtf8       = NULL;
                    PRUnichar *nameUtf16 = NULL;
6827

6828
                    networkInterface->vtbl->GetName(networkInterface, &nameUtf16);
6829
                    VBOX_UTF16_TO_UTF8(nameUtf16, &nameUtf8);
6830

6831 6832 6833
                    DEBUG("nnames[%d]: %s", ret, nameUtf8);
                    names[ret] = strdup(nameUtf8);
                    if (names[ret] == NULL) {
6834
                        virReportOOMError();
6835 6836
                    } else {
                        ret++;
6837 6838
                    }

6839 6840
                    VBOX_UTF8_FREE(nameUtf8);
                    VBOX_UTF16_FREE(nameUtf16);
6841 6842 6843 6844 6845
                }
            }
        }
    }

6846
    vboxArrayRelease(&networkInterfaces);
6847 6848 6849 6850

    VBOX_RELEASE(host);

    return ret;
6851 6852
}

6853 6854 6855
static virNetworkPtr
vboxNetworkLookupByUUID(virConnectPtr conn, const unsigned char *uuid)
{
6856
    VBOX_OBJECT_HOST_CHECK(conn, virNetworkPtr, NULL);
6857
    vboxIID iid = VBOX_IID_INITIALIZER;
6858

6859
    vboxIIDFromUUID(&iid, uuid);
6860

6861 6862 6863
    /* TODO: "internal" networks are just strings and
     * thus can't do much with them
     */
6864
    IHostNetworkInterface *networkInterface = NULL;
6865

6866
    host->vtbl->FindHostNetworkInterfaceById(host, iid.value, &networkInterface);
6867 6868
    if (networkInterface) {
        PRUint32 interfaceType = 0;
6869

6870
        networkInterface->vtbl->GetInterfaceType(networkInterface, &interfaceType);
6871

6872 6873 6874
        if (interfaceType == HostNetworkInterfaceType_HostOnly) {
            char *nameUtf8       = NULL;
            PRUnichar *nameUtf16 = NULL;
6875

6876 6877
            networkInterface->vtbl->GetName(networkInterface, &nameUtf16);
            VBOX_UTF16_TO_UTF8(nameUtf16, &nameUtf8);
6878

6879
            ret = virGetNetwork(conn, nameUtf8, uuid);
6880

6881
            DEBUG("Network Name: %s", nameUtf8);
6882
            DEBUGIID("Network UUID", iid.value);
6883

6884 6885
            VBOX_UTF8_FREE(nameUtf8);
            VBOX_UTF16_FREE(nameUtf16);
6886
        }
6887 6888

        VBOX_RELEASE(networkInterface);
6889 6890
    }

6891 6892
    VBOX_RELEASE(host);

6893
    vboxIIDUnalloc(&iid);
6894 6895 6896 6897
    return ret;
}

static virNetworkPtr vboxNetworkLookupByName(virConnectPtr conn, const char *name) {
6898 6899 6900
    VBOX_OBJECT_HOST_CHECK(conn, virNetworkPtr, NULL);
    PRUnichar *nameUtf16                    = NULL;
    IHostNetworkInterface *networkInterface = NULL;
6901

6902
    VBOX_UTF8_TO_UTF16(name, &nameUtf16);
6903

6904
    host->vtbl->FindHostNetworkInterfaceByName(host, nameUtf16, &networkInterface);
6905

6906 6907
    if (networkInterface) {
        PRUint32 interfaceType = 0;
6908

6909
        networkInterface->vtbl->GetInterfaceType(networkInterface, &interfaceType);
6910

6911 6912
        if (interfaceType == HostNetworkInterfaceType_HostOnly) {
            unsigned char uuid[VIR_UUID_BUFLEN];
6913
            vboxIID iid = VBOX_IID_INITIALIZER;
6914

6915 6916
            networkInterface->vtbl->GetId(networkInterface, &iid.value);
            vboxIIDToUUID(&iid, uuid);
6917 6918
            ret = virGetNetwork(conn, name, uuid);
            DEBUG("Network Name: %s", name);
6919

6920 6921
            DEBUGIID("Network UUID", iid.value);
            vboxIIDUnalloc(&iid);
6922
        }
6923 6924

        VBOX_RELEASE(networkInterface);
6925 6926
    }

6927 6928 6929
    VBOX_UTF16_FREE(nameUtf16);
    VBOX_RELEASE(host);

6930 6931 6932
    return ret;
}

6933
static virNetworkPtr vboxNetworkDefineCreateXML(virConnectPtr conn, const char *xml, bool start) {
6934 6935 6936 6937
    VBOX_OBJECT_HOST_CHECK(conn, virNetworkPtr, NULL);
    PRUnichar *networkInterfaceNameUtf16    = NULL;
    char      *networkInterfaceNameUtf8     = NULL;
    IHostNetworkInterface *networkInterface = NULL;
6938
    nsresult rc;
6939

6940
    virNetworkDefPtr def = virNetworkDefParseString(xml);
6941 6942
    virNetworkIpDefPtr ipdef;
    virSocketAddr netmask;
6943

6944
    if (   (!def)
6945 6946 6947 6948 6949 6950 6951 6952 6953 6954 6955 6956 6957
        || (def->forwardType != VIR_NETWORK_FORWARD_NONE)
        || (def->nips == 0 || !def->ips))
        goto cleanup;

    /* Look for the first IPv4 IP address definition and use that.
     * If there weren't any IPv4 addresses, ignore the network (since it's
     * required below to have an IPv4 address)
    */
    ipdef = virNetworkDefGetIpByIndex(def, AF_INET, 0);
    if (!ipdef)
        goto cleanup;

    if (virNetworkIpDefNetmask(ipdef, &netmask) < 0)
6958
        goto cleanup;
6959

6960 6961 6962 6963 6964 6965
    /* the current limitation of hostonly network is that you can't
     * assign a name to it and it defaults to vboxnet*, for e.g:
     * vboxnet0, vboxnet1, etc. Also the UUID is assigned to it
     * automatically depending on the mac address and thus both
     * these paramters are ignored here for now.
     */
6966

6967
#if VBOX_API_VERSION == 2002
6968
    if (STREQ(def->name, "vboxnet0")) {
6969
        PRUint32 interfaceType = 0;
6970

6971 6972
        VBOX_UTF8_TO_UTF16(def->name, &networkInterfaceNameUtf16);
        host->vtbl->FindHostNetworkInterfaceByName(host, networkInterfaceNameUtf16, &networkInterface);
6973

6974 6975 6976 6977 6978 6979
        networkInterface->vtbl->GetInterfaceType(networkInterface, &interfaceType);
        if (interfaceType != HostNetworkInterfaceType_HostOnly) {
            VBOX_RELEASE(networkInterface);
            networkInterface = NULL;
        }
    }
6980
#else /* VBOX_API_VERSION != 2002 */
6981 6982
    IProgress *progress = NULL;
    host->vtbl->CreateHostOnlyNetworkInterface(host, &networkInterface, &progress);
6983

6984 6985 6986 6987
    if (progress) {
        progress->vtbl->WaitForCompletion(progress, -1);
        VBOX_RELEASE(progress);
    }
6988
#endif /* VBOX_API_VERSION != 2002 */
6989

6990 6991 6992 6993
    if (networkInterface) {
        unsigned char uuid[VIR_UUID_BUFLEN];
        char      *networkNameUtf8  = NULL;
        PRUnichar *networkNameUtf16 = NULL;
6994
        vboxIID vboxnetiid = VBOX_IID_INITIALIZER;
6995 6996 6997 6998 6999 7000 7001 7002

        networkInterface->vtbl->GetName(networkInterface, &networkInterfaceNameUtf16);
        if (networkInterfaceNameUtf16) {
            VBOX_UTF16_TO_UTF8(networkInterfaceNameUtf16, &networkInterfaceNameUtf8);

            if (virAsprintf(&networkNameUtf8, "HostInterfaceNetworking-%s", networkInterfaceNameUtf8) < 0) {
                VBOX_RELEASE(host);
                VBOX_RELEASE(networkInterface);
7003
                virReportOOMError();
7004 7005 7006
                goto cleanup;
            }
        }
7007

7008
        VBOX_UTF8_TO_UTF16(networkNameUtf8 , &networkNameUtf16);
7009

7010 7011 7012
        /* Currently support only one dhcp server per network
         * with contigious address space from start to end
         */
7013 7014 7015
        if ((ipdef->nranges >= 1) &&
            VIR_SOCKET_HAS_ADDR(&ipdef->ranges[0].start) &&
            VIR_SOCKET_HAS_ADDR(&ipdef->ranges[0].end)) {
7016 7017 7018 7019 7020 7021 7022 7023 7024 7025 7026 7027 7028 7029 7030 7031 7032 7033 7034
            IDHCPServer *dhcpServer = NULL;

            data->vboxObj->vtbl->FindDHCPServerByNetworkName(data->vboxObj,
                                                             networkNameUtf16,
                                                             &dhcpServer);
            if (!dhcpServer) {
                /* create a dhcp server */
                data->vboxObj->vtbl->CreateDHCPServer(data->vboxObj,
                                                      networkNameUtf16,
                                                      &dhcpServer);
                DEBUG0("couldn't find dhcp server so creating one");
            }
            if (dhcpServer) {
                PRUnichar *ipAddressUtf16     = NULL;
                PRUnichar *networkMaskUtf16   = NULL;
                PRUnichar *fromIPAddressUtf16 = NULL;
                PRUnichar *toIPAddressUtf16   = NULL;
                PRUnichar *trunkTypeUtf16     = NULL;

7035 7036 7037 7038
                ipAddressUtf16 = vboxSocketFormatAddrUtf16(data, &ipdef->address);
                networkMaskUtf16 = vboxSocketFormatAddrUtf16(data, &netmask);
                fromIPAddressUtf16 = vboxSocketFormatAddrUtf16(data, &ipdef->ranges[0].start);
                toIPAddressUtf16 = vboxSocketFormatAddrUtf16(data, &ipdef->ranges[0].end);
7039 7040 7041 7042 7043 7044 7045 7046 7047 7048

                if (ipAddressUtf16 == NULL || networkMaskUtf16 == NULL ||
                    fromIPAddressUtf16 == NULL || toIPAddressUtf16 == NULL) {
                    VBOX_UTF16_FREE(ipAddressUtf16);
                    VBOX_UTF16_FREE(networkMaskUtf16);
                    VBOX_UTF16_FREE(fromIPAddressUtf16);
                    VBOX_UTF16_FREE(toIPAddressUtf16);
                    VBOX_RELEASE(dhcpServer);
                    goto cleanup;
                }
7049 7050 7051 7052 7053 7054 7055 7056 7057 7058 7059 7060 7061 7062 7063 7064 7065 7066 7067 7068 7069 7070 7071 7072 7073

                VBOX_UTF8_TO_UTF16("netflt", &trunkTypeUtf16);

                dhcpServer->vtbl->SetEnabled(dhcpServer, PR_TRUE);

                dhcpServer->vtbl->SetConfiguration(dhcpServer,
                                                   ipAddressUtf16,
                                                   networkMaskUtf16,
                                                   fromIPAddressUtf16,
                                                   toIPAddressUtf16);

                if (start)
                    dhcpServer->vtbl->Start(dhcpServer,
                                            networkNameUtf16,
                                            networkInterfaceNameUtf16,
                                            trunkTypeUtf16);

                VBOX_UTF16_FREE(ipAddressUtf16);
                VBOX_UTF16_FREE(networkMaskUtf16);
                VBOX_UTF16_FREE(fromIPAddressUtf16);
                VBOX_UTF16_FREE(toIPAddressUtf16);
                VBOX_UTF16_FREE(trunkTypeUtf16);
                VBOX_RELEASE(dhcpServer);
            }
        }
7074

7075 7076
        if ((ipdef->nhosts >= 1) &&
            VIR_SOCKET_HAS_ADDR(&ipdef->hosts[0].ip)) {
7077 7078
            PRUnichar *ipAddressUtf16   = NULL;
            PRUnichar *networkMaskUtf16 = NULL;
7079

7080 7081
            ipAddressUtf16 = vboxSocketFormatAddrUtf16(data, &ipdef->hosts[0].ip);
            networkMaskUtf16 = vboxSocketFormatAddrUtf16(data, &netmask);
7082 7083 7084 7085 7086 7087

            if (ipAddressUtf16 == NULL || networkMaskUtf16 == NULL) {
                VBOX_UTF16_FREE(ipAddressUtf16);
                VBOX_UTF16_FREE(networkMaskUtf16);
                goto cleanup;
            }
7088

7089 7090 7091 7092 7093 7094 7095
            /* Current drawback is that since EnableStaticIpConfig() sets
             * IP and enables the interface so even if the dhcpserver is not
             * started the interface is still up and running
             */
            networkInterface->vtbl->EnableStaticIpConfig(networkInterface,
                                                         ipAddressUtf16,
                                                         networkMaskUtf16);
7096

7097 7098 7099 7100 7101 7102
            VBOX_UTF16_FREE(ipAddressUtf16);
            VBOX_UTF16_FREE(networkMaskUtf16);
        } else {
            networkInterface->vtbl->EnableDynamicIpConfig(networkInterface);
            networkInterface->vtbl->DhcpRediscover(networkInterface);
        }
7103

7104 7105 7106 7107 7108
        rc = networkInterface->vtbl->GetId(networkInterface, &vboxnetiid.value);
        if (NS_SUCCEEDED(rc)) {
            vboxIIDToUUID(&vboxnetiid, uuid);
            DEBUGIID("Real Network UUID", vboxnetiid.value);
            vboxIIDUnalloc(&vboxnetiid);
7109
            ret = virGetNetwork(conn, networkInterfaceNameUtf8, uuid);
7110
        }
7111 7112 7113 7114

        VIR_FREE(networkNameUtf8);
        VBOX_UTF16_FREE(networkNameUtf16);
        VBOX_RELEASE(networkInterface);
7115 7116
    }

7117 7118 7119 7120
    VBOX_UTF8_FREE(networkInterfaceNameUtf8);
    VBOX_UTF16_FREE(networkInterfaceNameUtf16);
    VBOX_RELEASE(host);

7121 7122 7123 7124 7125
cleanup:
    virNetworkDefFree(def);
    return ret;
}

7126 7127 7128 7129 7130 7131 7132 7133
static virNetworkPtr vboxNetworkCreateXML(virConnectPtr conn, const char *xml) {
    return vboxNetworkDefineCreateXML(conn, xml, true);
}

static virNetworkPtr vboxNetworkDefineXML(virConnectPtr conn, const char *xml) {
    return vboxNetworkDefineCreateXML(conn, xml, false);
}

7134
static int vboxNetworkUndefineDestroy(virNetworkPtr network, bool removeinterface) {
7135
    VBOX_OBJECT_HOST_CHECK(network->conn, int, -1);
7136 7137 7138 7139 7140 7141 7142 7143 7144 7145 7146
    char *networkNameUtf8 = NULL;

    /* Current limitation of the function for VirtualBox 2.2.* is
     * that you can't delete the default hostonly adaptor namely:
     * vboxnet0 and thus all this functions does is remove the
     * dhcp server configuration, but the network can still be used
     * by giving the machine static IP and also it will still
     * show up in the net-list in virsh
     */

    if (virAsprintf(&networkNameUtf8, "HostInterfaceNetworking-%s", network->name) < 0) {
7147
        virReportOOMError();
7148 7149 7150
        goto cleanup;
    }

7151 7152
    PRUnichar *networkInterfaceNameUtf16    = NULL;
    IHostNetworkInterface *networkInterface = NULL;
7153

7154
    VBOX_UTF8_TO_UTF16(network->name, &networkInterfaceNameUtf16);
7155

7156
    host->vtbl->FindHostNetworkInterfaceByName(host, networkInterfaceNameUtf16, &networkInterface);
7157

7158 7159
    if (networkInterface) {
        PRUint32 interfaceType = 0;
7160

7161
        networkInterface->vtbl->GetInterfaceType(networkInterface, &interfaceType);
7162

7163 7164 7165
        if (interfaceType == HostNetworkInterfaceType_HostOnly) {
            PRUnichar *networkNameUtf16 = NULL;
            IDHCPServer *dhcpServer     = NULL;
7166

7167
#if VBOX_API_VERSION != 2002
7168 7169 7170
            if (removeinterface) {
                PRUnichar *iidUtf16 = NULL;
                IProgress *progress = NULL;
7171

7172
                networkInterface->vtbl->GetId(networkInterface, &iidUtf16);
7173

7174
                if (iidUtf16) {
7175
# if VBOX_API_VERSION == 3000
7176 7177 7178
                    IHostNetworkInterface *netInt = NULL;
                    host->vtbl->RemoveHostOnlyNetworkInterface(host, iidUtf16, &netInt, &progress);
                    VBOX_RELEASE(netInt);
7179
# else  /* VBOX_API_VERSION > 3000 */
7180
                    host->vtbl->RemoveHostOnlyNetworkInterface(host, iidUtf16, &progress);
7181
# endif /* VBOX_API_VERSION > 3000 */
7182 7183
                    VBOX_UTF16_FREE(iidUtf16);
                }
7184

7185 7186 7187 7188 7189
                if (progress) {
                    progress->vtbl->WaitForCompletion(progress, -1);
                    VBOX_RELEASE(progress);
                }
            }
7190 7191
#endif /* VBOX_API_VERSION != 2002 */

7192 7193 7194 7195 7196 7197 7198 7199 7200 7201 7202
            VBOX_UTF8_TO_UTF16(networkNameUtf8 , &networkNameUtf16);

            data->vboxObj->vtbl->FindDHCPServerByNetworkName(data->vboxObj,
                                                             networkNameUtf16,
                                                             &dhcpServer);
            if (dhcpServer) {
                dhcpServer->vtbl->SetEnabled(dhcpServer, PR_FALSE);
                dhcpServer->vtbl->Stop(dhcpServer);
                if (removeinterface)
                    data->vboxObj->vtbl->RemoveDHCPServer(data->vboxObj, dhcpServer);
                VBOX_RELEASE(dhcpServer);
7203 7204
            }

7205 7206
            VBOX_UTF16_FREE(networkNameUtf16);

7207
        }
7208
        VBOX_RELEASE(networkInterface);
7209 7210
    }

7211 7212 7213
    VBOX_UTF16_FREE(networkInterfaceNameUtf16);
    VBOX_RELEASE(host);

7214 7215 7216 7217 7218 7219 7220
    ret = 0;

cleanup:
    VIR_FREE(networkNameUtf8);
    return ret;
}

7221 7222 7223 7224
static int vboxNetworkUndefine(virNetworkPtr network) {
    return vboxNetworkUndefineDestroy(network, true);
}

7225
static int vboxNetworkCreate(virNetworkPtr network) {
7226
    VBOX_OBJECT_HOST_CHECK(network->conn, int, -1);
7227 7228 7229 7230 7231 7232 7233 7234 7235 7236
    char *networkNameUtf8 = NULL;

    /* Current limitation of the function for VirtualBox 2.2.* is
     * that the default hostonly network "vboxnet0" is always active
     * and thus all this functions does is start the dhcp server,
     * but the network can still be used without starting the dhcp
     * server by giving the machine static IP
     */

    if (virAsprintf(&networkNameUtf8, "HostInterfaceNetworking-%s", network->name) < 0) {
7237
        virReportOOMError();
7238 7239 7240
        goto cleanup;
    }

7241 7242
    PRUnichar *networkInterfaceNameUtf16    = NULL;
    IHostNetworkInterface *networkInterface = NULL;
7243

7244
    VBOX_UTF8_TO_UTF16(network->name, &networkInterfaceNameUtf16);
7245

7246
    host->vtbl->FindHostNetworkInterfaceByName(host, networkInterfaceNameUtf16, &networkInterface);
7247

7248 7249
    if (networkInterface) {
        PRUint32 interfaceType = 0;
7250

7251
        networkInterface->vtbl->GetInterfaceType(networkInterface, &interfaceType);
7252

7253 7254 7255
        if (interfaceType == HostNetworkInterfaceType_HostOnly) {
            PRUnichar *networkNameUtf16 = NULL;
            IDHCPServer *dhcpServer     = NULL;
7256 7257


7258
            VBOX_UTF8_TO_UTF16(networkNameUtf8 , &networkNameUtf16);
7259

7260 7261 7262 7263 7264
            data->vboxObj->vtbl->FindDHCPServerByNetworkName(data->vboxObj,
                                                             networkNameUtf16,
                                                             &dhcpServer);
            if (dhcpServer) {
                PRUnichar *trunkTypeUtf16 = NULL;
7265

7266
                dhcpServer->vtbl->SetEnabled(dhcpServer, PR_TRUE);
7267

7268
                VBOX_UTF8_TO_UTF16("netflt", &trunkTypeUtf16);
7269

7270 7271 7272 7273
                dhcpServer->vtbl->Start(dhcpServer,
                                        networkNameUtf16,
                                        networkInterfaceNameUtf16,
                                        trunkTypeUtf16);
7274

7275 7276
                VBOX_UTF16_FREE(trunkTypeUtf16);
                VBOX_RELEASE(dhcpServer);
7277 7278
            }

7279
            VBOX_UTF16_FREE(networkNameUtf16);
7280
        }
7281 7282

        VBOX_RELEASE(networkInterface);
7283 7284
    }

7285 7286 7287
    VBOX_UTF16_FREE(networkInterfaceNameUtf16);
    VBOX_RELEASE(host);

7288 7289 7290 7291 7292 7293 7294 7295
    ret = 0;

cleanup:
    VIR_FREE(networkNameUtf8);
    return ret;
}

static int vboxNetworkDestroy(virNetworkPtr network) {
7296
    return vboxNetworkUndefineDestroy(network, false);
7297 7298 7299
}

static char *vboxNetworkDumpXML(virNetworkPtr network, int flags ATTRIBUTE_UNUSED) {
7300
    VBOX_OBJECT_HOST_CHECK(network->conn, char *, NULL);
7301
    virNetworkDefPtr def  = NULL;
7302
    virNetworkIpDefPtr ipdef = NULL;
7303 7304 7305
    char *networkNameUtf8 = NULL;

    if (VIR_ALLOC(def) < 0) {
7306
        virReportOOMError();
7307 7308
        goto cleanup;
    }
7309 7310 7311 7312 7313 7314
    if (VIR_ALLOC(ipdef) < 0) {
        virReportOOMError();
        goto cleanup;
    }
    def->ips = ipdef;
    def->nips = 1;
7315 7316

    if (virAsprintf(&networkNameUtf8, "HostInterfaceNetworking-%s", network->name) < 0) {
7317
        virReportOOMError();
7318 7319 7320
        goto cleanup;
    }

7321 7322
    PRUnichar *networkInterfaceNameUtf16    = NULL;
    IHostNetworkInterface *networkInterface = NULL;
7323

7324
    VBOX_UTF8_TO_UTF16(network->name, &networkInterfaceNameUtf16);
7325

7326
    host->vtbl->FindHostNetworkInterfaceByName(host, networkInterfaceNameUtf16, &networkInterface);
7327

7328 7329
    if (networkInterface) {
        PRUint32 interfaceType = 0;
7330

7331
        networkInterface->vtbl->GetInterfaceType(networkInterface, &interfaceType);
7332

7333 7334 7335 7336 7337
        if (interfaceType == HostNetworkInterfaceType_HostOnly) {
            def->name = strdup(network->name);
            if (def->name != NULL) {
                PRUnichar *networkNameUtf16 = NULL;
                IDHCPServer *dhcpServer     = NULL;
7338
                vboxIID vboxnet0IID = VBOX_IID_INITIALIZER;
7339

7340 7341
                networkInterface->vtbl->GetId(networkInterface, &vboxnet0IID.value);
                vboxIIDToUUID(&vboxnet0IID, def->uuid);
7342

7343
                VBOX_UTF8_TO_UTF16(networkNameUtf8 , &networkNameUtf16);
7344

7345
                def->forwardType = VIR_NETWORK_FORWARD_NONE;
7346

7347 7348 7349 7350
                data->vboxObj->vtbl->FindDHCPServerByNetworkName(data->vboxObj,
                                                                 networkNameUtf16,
                                                                 &dhcpServer);
                if (dhcpServer) {
7351 7352
                    ipdef->nranges = 1;
                    if (VIR_ALLOC_N(ipdef->ranges, ipdef->nranges) >=0 ) {
7353 7354 7355 7356
                        PRUnichar *ipAddressUtf16     = NULL;
                        PRUnichar *networkMaskUtf16   = NULL;
                        PRUnichar *fromIPAddressUtf16 = NULL;
                        PRUnichar *toIPAddressUtf16   = NULL;
7357
                        bool errorOccurred = false;
7358

7359 7360 7361 7362 7363 7364 7365
                        dhcpServer->vtbl->GetIPAddress(dhcpServer, &ipAddressUtf16);
                        dhcpServer->vtbl->GetNetworkMask(dhcpServer, &networkMaskUtf16);
                        dhcpServer->vtbl->GetLowerIP(dhcpServer, &fromIPAddressUtf16);
                        dhcpServer->vtbl->GetUpperIP(dhcpServer, &toIPAddressUtf16);
                        /* Currently virtualbox supports only one dhcp server per network
                         * with contigious address space from start to end
                         */
7366
                        if (vboxSocketParseAddrUtf16(data, ipAddressUtf16,
7367
                                                     &ipdef->address) < 0 ||
7368
                            vboxSocketParseAddrUtf16(data, networkMaskUtf16,
7369
                                                     &ipdef->netmask) < 0 ||
7370
                            vboxSocketParseAddrUtf16(data, fromIPAddressUtf16,
7371
                                                     &ipdef->ranges[0].start) < 0 ||
7372
                            vboxSocketParseAddrUtf16(data, toIPAddressUtf16,
7373
                                                     &ipdef->ranges[0].end) < 0) {
7374 7375
                            errorOccurred = true;
                        }
7376 7377 7378 7379 7380

                        VBOX_UTF16_FREE(ipAddressUtf16);
                        VBOX_UTF16_FREE(networkMaskUtf16);
                        VBOX_UTF16_FREE(fromIPAddressUtf16);
                        VBOX_UTF16_FREE(toIPAddressUtf16);
7381 7382 7383 7384

                        if (errorOccurred) {
                            goto cleanup;
                        }
7385
                    } else {
7386
                        ipdef->nranges = 0;
7387
                        virReportOOMError();
7388
                    }
7389

7390 7391 7392 7393 7394 7395
                    ipdef->nhosts = 1;
                    if (VIR_ALLOC_N(ipdef->hosts, ipdef->nhosts) >=0 ) {
                        ipdef->hosts[0].name = strdup(network->name);
                        if (ipdef->hosts[0].name == NULL) {
                            VIR_FREE(ipdef->hosts);
                            ipdef->nhosts = 0;
7396
                            virReportOOMError();
7397
                        } else {
7398 7399
                            PRUnichar *macAddressUtf16 = NULL;
                            PRUnichar *ipAddressUtf16  = NULL;
7400
                            bool errorOccurred = false;
7401

7402
                            networkInterface->vtbl->GetHardwareAddress(networkInterface, &macAddressUtf16);
7403 7404
                            networkInterface->vtbl->GetIPAddress(networkInterface, &ipAddressUtf16);

7405
                            VBOX_UTF16_TO_UTF8(macAddressUtf16, &ipdef->hosts[0].mac);
7406 7407

                            if (vboxSocketParseAddrUtf16(data, ipAddressUtf16,
7408
                                                         &ipdef->hosts[0].ip) < 0) {
7409 7410
                                errorOccurred = true;
                            }
7411

7412 7413
                            VBOX_UTF16_FREE(macAddressUtf16);
                            VBOX_UTF16_FREE(ipAddressUtf16);
7414 7415 7416 7417

                            if (errorOccurred) {
                                goto cleanup;
                            }
7418 7419
                        }
                    } else {
7420
                        ipdef->nhosts = 0;
7421
                    }
7422 7423 7424 7425 7426

                    VBOX_RELEASE(dhcpServer);
                } else {
                    PRUnichar *networkMaskUtf16 = NULL;
                    PRUnichar *ipAddressUtf16   = NULL;
7427
                    bool errorOccurred = false;
7428 7429 7430 7431

                    networkInterface->vtbl->GetNetworkMask(networkInterface, &networkMaskUtf16);
                    networkInterface->vtbl->GetIPAddress(networkInterface, &ipAddressUtf16);

7432
                    if (vboxSocketParseAddrUtf16(data, networkMaskUtf16,
7433
                                                 &ipdef->netmask) < 0 ||
7434
                        vboxSocketParseAddrUtf16(data, ipAddressUtf16,
7435
                                                 &ipdef->address) < 0) {
7436 7437
                        errorOccurred = true;
                    }
7438 7439 7440

                    VBOX_UTF16_FREE(networkMaskUtf16);
                    VBOX_UTF16_FREE(ipAddressUtf16);
7441 7442 7443 7444

                    if (errorOccurred) {
                        goto cleanup;
                    }
7445 7446
                }

7447 7448
                DEBUGIID("Network UUID", vboxnet0IID.value);
                vboxIIDUnalloc(&vboxnet0IID);
7449 7450
                VBOX_UTF16_FREE(networkNameUtf16);
            } else {
7451
                virReportOOMError();
7452 7453
            }
        }
7454 7455

        VBOX_RELEASE(networkInterface);
7456 7457
    }

7458 7459 7460
    VBOX_UTF16_FREE(networkInterfaceNameUtf16);
    VBOX_RELEASE(host);

7461
    ret = virNetworkDefFormat(def);
7462 7463

cleanup:
7464
    virNetworkDefFree(def);
7465 7466 7467 7468
    VIR_FREE(networkNameUtf8);
    return ret;
}

7469 7470 7471 7472 7473 7474 7475 7476 7477 7478 7479 7480 7481 7482 7483 7484 7485
/**
 * The Storage Functions here on
 */

static virDrvOpenStatus vboxStorageOpen (virConnectPtr conn,
                                         virConnectAuthPtr auth ATTRIBUTE_UNUSED,
                                         int flags ATTRIBUTE_UNUSED) {
    vboxGlobalData *data = conn->privateData;

    if (STRNEQ(conn->driver->name, "VBOX"))
        goto cleanup;

    if ((data->pFuncs      == NULL) ||
        (data->vboxObj     == NULL) ||
        (data->vboxSession == NULL))
        goto cleanup;

7486
    DEBUG0("vbox storage initialized");
7487 7488 7489 7490 7491 7492 7493 7494
    /* conn->storagePrivateData = some storage specific data */
    return VIR_DRV_OPEN_SUCCESS;

cleanup:
    return VIR_DRV_OPEN_DECLINED;
}

static int vboxStorageClose (virConnectPtr conn) {
7495
    DEBUG0("vbox storage uninitialized");
7496 7497 7498 7499 7500 7501 7502 7503 7504 7505 7506 7507 7508
    conn->storagePrivateData = NULL;
    return 0;
}

static int vboxStorageNumOfPools(virConnectPtr conn ATTRIBUTE_UNUSED) {

    /** Currently only one pool supported, the default one
     * given by ISystemProperties::defaultHardDiskFolder()
     */

    return 1;
}

7509 7510
static int vboxStorageListPools(virConnectPtr conn ATTRIBUTE_UNUSED,
                                char **const names, int nnames) {
7511 7512 7513 7514 7515
    int numActive = 0;

    if (nnames == 1) {
        names[numActive] = strdup("default-pool");
        if (names[numActive] == NULL) {
7516
            virReportOOMError();
7517 7518 7519 7520 7521 7522 7523 7524 7525 7526 7527 7528 7529 7530 7531 7532 7533 7534 7535 7536 7537 7538 7539 7540 7541 7542 7543
        } else {
            numActive++;
        }
    }
    return numActive;
}

static virStoragePoolPtr vboxStoragePoolLookupByName(virConnectPtr conn, const char *name) {
    virStoragePoolPtr ret = NULL;

    /** Current limitation of the function: since
     * the default pool doesn't have UUID just assign
     * one till vbox can handle pools
     */
    if (STREQ("default-pool", name)) {
        unsigned char uuid[VIR_UUID_BUFLEN];
        const char *uuidstr = "1deff1ff-1481-464f-967f-a50fe8936cc4";

        virUUIDParse(uuidstr, uuid);

        ret = virGetStoragePool(conn, name, uuid);
    }

    return ret;
}

static int vboxStoragePoolNumOfVolumes(virStoragePoolPtr pool) {
7544
    VBOX_OBJECT_CHECK(pool->conn, int, -1);
7545
    vboxArray hardDisks = VBOX_ARRAY_INITIALIZER;
7546 7547 7548 7549
    PRUint32 hardDiskAccessible = 0;
    nsresult rc;
    int i;

7550
    rc = vboxArrayGet(&hardDisks, data->vboxObj, data->vboxObj->vtbl->GetHardDisks);
7551
    if (NS_SUCCEEDED(rc)) {
7552 7553
        for (i = 0; i < hardDisks.count; ++i) {
            IHardDisk *hardDisk = hardDisks.items[i];
7554 7555
            if (hardDisk) {
                PRUint32 hddstate;
7556

7557 7558 7559
                VBOX_MEDIUM_FUNC_ARG1(hardDisk, GetState, &hddstate);
                if (hddstate != MediaState_Inaccessible)
                    hardDiskAccessible++;
7560 7561
            }
        }
7562 7563 7564 7565

        vboxArrayRelease(&hardDisks);

        ret = hardDiskAccessible;
7566
    } else {
7567
        ret = -1;
7568 7569
        vboxError(VIR_ERR_INTERNAL_ERROR,
                  _("could not get number of volumes in the pool: %s, rc=%08x"),
7570
                  pool->name, (unsigned)rc);
7571 7572
    }

7573
    return ret;
7574 7575 7576
}

static int vboxStoragePoolListVolumes(virStoragePoolPtr pool, char **const names, int nnames) {
7577
    VBOX_OBJECT_CHECK(pool->conn, int, -1);
7578
    vboxArray hardDisks = VBOX_ARRAY_INITIALIZER;
7579 7580 7581 7582
    PRUint32 numActive     = 0;
    nsresult rc;
    int i;

7583
    rc = vboxArrayGet(&hardDisks, data->vboxObj, data->vboxObj->vtbl->GetHardDisks);
7584
    if (NS_SUCCEEDED(rc)) {
7585 7586
        for (i = 0; i < hardDisks.count && numActive < nnames; ++i) {
            IHardDisk *hardDisk = hardDisks.items[i];
7587

7588 7589 7590 7591
            if (hardDisk) {
                PRUint32 hddstate;
                char      *nameUtf8  = NULL;
                PRUnichar *nameUtf16 = NULL;
7592

7593 7594 7595
                VBOX_MEDIUM_FUNC_ARG1(hardDisk, GetState, &hddstate);
                if (hddstate != MediaState_Inaccessible) {
                    VBOX_MEDIUM_FUNC_ARG1(hardDisk, GetName, &nameUtf16);
7596

7597 7598
                    VBOX_UTF16_TO_UTF8(nameUtf16, &nameUtf8);
                    VBOX_UTF16_FREE(nameUtf16);
7599

7600 7601 7602 7603
                    if (nameUtf8) {
                        DEBUG("nnames[%d]: %s", numActive, nameUtf8);
                        names[numActive] = strdup(nameUtf8);
                        if (names[numActive] == NULL) {
7604
                            virReportOOMError();
7605 7606
                        } else {
                            numActive++;
7607
                        }
7608 7609

                        VBOX_UTF8_FREE(nameUtf8);
7610 7611 7612 7613
                    }
                }
            }
        }
7614 7615 7616 7617

        vboxArrayRelease(&hardDisks);

        ret = numActive;
7618
    } else {
7619
        ret = -1;
7620 7621
        vboxError(VIR_ERR_INTERNAL_ERROR,
                  _("could not get the volume list in the pool: %s, rc=%08x"),
7622
                  pool->name, (unsigned)rc);
7623 7624
    }

7625
    return ret;
7626 7627 7628
}

static virStorageVolPtr vboxStorageVolLookupByName(virStoragePoolPtr pool, const char *name) {
7629
    VBOX_OBJECT_CHECK(pool->conn, virStorageVolPtr, NULL);
7630
    vboxArray hardDisks = VBOX_ARRAY_INITIALIZER;
7631 7632 7633
    nsresult rc;
    int i;

7634 7635
    if(!name)
        return ret;
7636

7637
    rc = vboxArrayGet(&hardDisks, data->vboxObj, data->vboxObj->vtbl->GetHardDisks);
7638
    if (NS_SUCCEEDED(rc)) {
7639 7640
        for (i = 0; i < hardDisks.count; ++i) {
            IHardDisk *hardDisk = hardDisks.items[i];
7641

7642 7643 7644 7645
            if (hardDisk) {
                PRUint32 hddstate;
                char      *nameUtf8  = NULL;
                PRUnichar *nameUtf16 = NULL;
7646

7647 7648 7649
                VBOX_MEDIUM_FUNC_ARG1(hardDisk, GetState, &hddstate);
                if (hddstate != MediaState_Inaccessible) {
                    VBOX_MEDIUM_FUNC_ARG1(hardDisk, GetName, &nameUtf16);
7650

7651 7652 7653 7654
                    if (nameUtf16) {
                        VBOX_UTF16_TO_UTF8(nameUtf16, &nameUtf8);
                        VBOX_UTF16_FREE(nameUtf16);
                    }
7655

7656
                    if (nameUtf8 && STREQ(nameUtf8, name)) {
7657 7658 7659
                        vboxIID hddIID = VBOX_IID_INITIALIZER;
                        unsigned char uuid[VIR_UUID_BUFLEN];
                        char key[VIR_UUID_STRING_BUFLEN] = "";
7660

7661 7662 7663 7664
                        rc = VBOX_MEDIUM_FUNC_ARG1(hardDisk, GetId, &hddIID.value);
                        if (NS_SUCCEEDED(rc)) {
                            vboxIIDToUUID(&hddIID, uuid);
                            virUUIDFormat(uuid, key);
7665

7666
                            ret = virGetStorageVol(pool->conn, pool->name, name, key);
7667

7668 7669
                            DEBUG("virStorageVolPtr: %p", ret);
                            DEBUG("Storage Volume Name: %s", name);
7670
                            DEBUG("Storage Volume key : %s", key);
7671
                            DEBUG("Storage Volume Pool: %s", pool->name);
7672 7673
                        }

7674
                        vboxIIDUnalloc(&hddIID);
7675 7676
                        VBOX_UTF8_FREE(nameUtf8);
                        break;
7677
                    }
7678 7679 7680

                    if (nameUtf8)
                        VBOX_UTF8_FREE(nameUtf8);
7681 7682 7683
                }
            }
        }
7684

7685
        vboxArrayRelease(&hardDisks);
7686 7687 7688 7689 7690 7691
    }

    return ret;
}

static virStorageVolPtr vboxStorageVolLookupByKey(virConnectPtr conn, const char *key) {
7692
    VBOX_OBJECT_CHECK(conn, virStorageVolPtr, NULL);
7693 7694
    vboxIID hddIID = VBOX_IID_INITIALIZER;
    unsigned char uuid[VIR_UUID_BUFLEN];
7695 7696 7697
    IHardDisk *hardDisk  = NULL;
    nsresult rc;

7698 7699 7700
    if (!key)
        return ret;

7701 7702 7703 7704
    if (virUUIDParse(key, uuid) < 0) {
        vboxError(VIR_ERR_INVALID_ARG,
                  _("Could not parse UUID from '%s'"), key);
        return NULL;
7705 7706
    }

7707 7708
    vboxIIDFromUUID(&hddIID, uuid);
    rc = data->vboxObj->vtbl->GetHardDisk(data->vboxObj, hddIID.value, &hardDisk);
7709 7710
    if (NS_SUCCEEDED(rc)) {
        PRUint32 hddstate;
7711

7712 7713 7714 7715
        VBOX_MEDIUM_FUNC_ARG1(hardDisk, GetState, &hddstate);
        if (hddstate != MediaState_Inaccessible) {
            PRUnichar *hddNameUtf16 = NULL;
            char      *hddNameUtf8  = NULL;
7716

7717 7718
            VBOX_MEDIUM_FUNC_ARG1(hardDisk, GetName, &hddNameUtf16);
            VBOX_UTF16_TO_UTF8(hddNameUtf16, &hddNameUtf8);
7719

7720 7721 7722 7723 7724 7725 7726 7727
            if (hddNameUtf8) {
                if (vboxStorageNumOfPools(conn) == 1) {
                    ret = virGetStorageVol(conn, "default-pool", hddNameUtf8, key);
                    DEBUG("Storage Volume Pool: %s", "default-pool");
                } else {
                    /* TODO: currently only one default pool and thus
                     * nothing here, change it when pools are supported
                     */
7728 7729
                }

7730 7731 7732 7733 7734
                DEBUG("Storage Volume Name: %s", key);
                DEBUG("Storage Volume key : %s", hddNameUtf8);

                VBOX_UTF8_FREE(hddNameUtf8);
                VBOX_UTF16_FREE(hddNameUtf16);
7735 7736
            }
        }
7737 7738

        VBOX_MEDIUM_RELEASE(hardDisk);
7739 7740
    }

7741
    vboxIIDUnalloc(&hddIID);
7742 7743 7744 7745
    return ret;
}

static virStorageVolPtr vboxStorageVolLookupByPath(virConnectPtr conn, const char *path) {
7746
    VBOX_OBJECT_CHECK(conn, virStorageVolPtr, NULL);
7747 7748 7749 7750
    PRUnichar *hddPathUtf16 = NULL;
    IHardDisk *hardDisk     = NULL;
    nsresult rc;

7751 7752
    if (!path)
        return ret;
7753

7754
    VBOX_UTF8_TO_UTF16(path, &hddPathUtf16);
7755

7756 7757
    if (!hddPathUtf16)
        return ret;
7758

7759 7760 7761
    rc = data->vboxObj->vtbl->FindHardDisk(data->vboxObj, hddPathUtf16, &hardDisk);
    if (NS_SUCCEEDED(rc)) {
        PRUint32 hddstate;
7762

7763 7764 7765 7766
        VBOX_MEDIUM_FUNC_ARG1(hardDisk, GetState, &hddstate);
        if (hddstate != MediaState_Inaccessible) {
            PRUnichar *hddNameUtf16 = NULL;
            char      *hddNameUtf8  = NULL;
7767

7768
            VBOX_MEDIUM_FUNC_ARG1(hardDisk, GetName, &hddNameUtf16);
7769

7770 7771 7772 7773
            if (hddNameUtf16) {
                VBOX_UTF16_TO_UTF8(hddNameUtf16, &hddNameUtf8);
                VBOX_UTF16_FREE(hddNameUtf16);
            }
7774

7775 7776 7777 7778
            if (hddNameUtf8) {
                vboxIID hddIID = VBOX_IID_INITIALIZER;
                unsigned char uuid[VIR_UUID_BUFLEN];
                char key[VIR_UUID_STRING_BUFLEN] = "";
7779

7780 7781 7782 7783
                rc = VBOX_MEDIUM_FUNC_ARG1(hardDisk, GetId, &hddIID.value);
                if (NS_SUCCEEDED(rc)) {
                    vboxIIDToUUID(&hddIID, uuid);
                    virUUIDFormat(uuid, key);
7784

7785 7786 7787 7788 7789
                    /* TODO: currently only one default pool and thus
                     * the check below, change it when pools are supported
                     */
                    if (vboxStorageNumOfPools(conn) == 1)
                        ret = virGetStorageVol(conn, "default-pool", hddNameUtf8, key);
7790

7791 7792 7793 7794
                    DEBUG("Storage Volume Pool: %s", "default-pool");
                    DEBUG("Storage Volume Name: %s", hddNameUtf8);
                    DEBUG("Storage Volume key : %s", key);
                }
7795

7796
                vboxIIDUnalloc(&hddIID);
7797 7798
            }

7799 7800
            if (hddNameUtf8)
                VBOX_UTF8_FREE(hddNameUtf8);
7801
        }
7802 7803

        VBOX_MEDIUM_RELEASE(hardDisk);
7804 7805
    }

7806 7807
    VBOX_UTF16_FREE(hddPathUtf16);

7808 7809 7810 7811 7812 7813
    return ret;
}

static virStorageVolPtr vboxStorageVolCreateXML(virStoragePoolPtr pool,
                                                const char *xml,
                                                unsigned int flags ATTRIBUTE_UNUSED) {
7814
    VBOX_OBJECT_CHECK(pool->conn, virStorageVolPtr, NULL);
7815
    virStorageVolDefPtr  def  = NULL;
7816 7817
    PRUnichar *hddFormatUtf16 = NULL;
    PRUnichar *hddNameUtf16   = NULL;
7818 7819 7820 7821 7822 7823 7824 7825 7826 7827 7828
    virStoragePoolDef poolDef;
    nsresult rc;

    /* since there is currently one default pool now
     * and virStorageVolDefFormat() just checks it type
     * so just assign it for now, change the behaviour
     * when vbox supports pools.
     */
    memset(&poolDef, 0, sizeof(poolDef));
    poolDef.type = VIR_STORAGE_POOL_DIR;

7829
    if ((def = virStorageVolDefParseString(&poolDef, xml)) == NULL)
7830 7831
        goto cleanup;

7832 7833 7834
    if (   !def->name
        || (def->type != VIR_STORAGE_VOL_FILE))
        goto cleanup;
7835

7836 7837 7838 7839 7840 7841
    /* TODO: for now only the vmdk, vpc and vdi type harddisk
     * variants can be created, also since there is no vdi
     * type in enum virStorageFileFormat {} the default
     * will be to create vdi if nothing is specified in
     * def->target.format
     */
7842

7843 7844 7845 7846 7847 7848 7849
    if (def->target.format == VIR_STORAGE_FILE_VMDK) {
        VBOX_UTF8_TO_UTF16("VMDK", &hddFormatUtf16);
    } else if (def->target.format == VIR_STORAGE_FILE_VPC) {
        VBOX_UTF8_TO_UTF16("VHD", &hddFormatUtf16);
    } else {
        VBOX_UTF8_TO_UTF16("VDI", &hddFormatUtf16);
    }
7850

7851
    VBOX_UTF8_TO_UTF16(def->name, &hddNameUtf16);
7852

7853 7854
    if (hddFormatUtf16 && hddNameUtf16) {
        IHardDisk *hardDisk = NULL;
7855

7856 7857 7858 7859 7860
        rc = data->vboxObj->vtbl->CreateHardDisk(data->vboxObj, hddFormatUtf16, hddNameUtf16, &hardDisk);
        if (NS_SUCCEEDED(rc)) {
            IProgress *progress    = NULL;
            PRUint64   logicalSize = def->capacity / 1024 / 1024;
            PRUint32   variant     = HardDiskVariant_Standard;
7861

7862 7863
            if (def->capacity == def->allocation)
                variant = HardDiskVariant_Fixed;
7864

7865 7866
            rc = hardDisk->vtbl->CreateBaseStorage(hardDisk, logicalSize, variant, &progress);
            if (NS_SUCCEEDED(rc) && progress) {
7867
#if VBOX_API_VERSION == 2002
7868
                nsresult resultCode;
7869
#else
7870
                PRInt32  resultCode;
7871 7872
#endif

7873 7874
                progress->vtbl->WaitForCompletion(progress, -1);
                progress->vtbl->GetResultCode(progress, &resultCode);
7875

7876
                if (NS_SUCCEEDED(resultCode)) {
7877 7878 7879
                    vboxIID hddIID = VBOX_IID_INITIALIZER;
                    unsigned char uuid[VIR_UUID_BUFLEN];
                    char key[VIR_UUID_STRING_BUFLEN] = "";
7880

7881
                    rc = VBOX_MEDIUM_FUNC_ARG1(hardDisk, GetId, &hddIID.value);
7882
                    if (NS_SUCCEEDED(rc)) {
7883 7884
                        vboxIIDToUUID(&hddIID, uuid);
                        virUUIDFormat(uuid, key);
7885

7886
                        ret = virGetStorageVol(pool->conn, pool->name, def->name, key);
7887
                    }
7888 7889

                    vboxIIDUnalloc(&hddIID);
7890 7891
                }

7892
                VBOX_RELEASE(progress);
7893
            }
7894
        }
7895 7896
    }

7897 7898 7899
    VBOX_UTF16_FREE(hddFormatUtf16);
    VBOX_UTF16_FREE(hddNameUtf16);

7900 7901 7902 7903 7904 7905 7906
cleanup:
    virStorageVolDefFree(def);
    return ret;
}

static int vboxStorageVolDelete(virStorageVolPtr vol,
                                unsigned int flags ATTRIBUTE_UNUSED) {
7907
    VBOX_OBJECT_CHECK(vol->conn, int, -1);
7908 7909
    vboxIID hddIID = VBOX_IID_INITIALIZER;
    unsigned char uuid[VIR_UUID_BUFLEN];
7910 7911 7912
    IHardDisk *hardDisk  = NULL;
    int deregister = 0;
    nsresult rc;
7913 7914
    int i = 0;
    int j = 0;
7915

7916 7917 7918 7919 7920
    if (virUUIDParse(vol->key, uuid) < 0) {
        vboxError(VIR_ERR_INVALID_ARG,
                  _("Could not parse UUID from '%s'"), vol->key);
        return -1;
    }
7921

7922 7923
    vboxIIDFromUUID(&hddIID, uuid);
    rc = data->vboxObj->vtbl->GetHardDisk(data->vboxObj, hddIID.value, &hardDisk);
7924 7925
    if (NS_SUCCEEDED(rc)) {
        PRUint32 hddstate;
7926

7927 7928 7929
        VBOX_MEDIUM_FUNC_ARG1(hardDisk, GetState, &hddstate);
        if (hddstate != MediaState_Inaccessible) {
            PRUint32  machineIdsSize = 0;
7930 7931 7932 7933 7934 7935 7936
            vboxArray machineIds = VBOX_ARRAY_INITIALIZER;

#if VBOX_API_VERSION < 3001
            vboxArrayGet(&machineIds, hardDisk, hardDisk->vtbl->imedium.GetMachineIds);
#else  /* VBOX_API_VERSION >= 3001 */
            vboxArrayGet(&machineIds, hardDisk, hardDisk->vtbl->GetMachineIds);
#endif /* VBOX_API_VERSION >= 3001 */
7937

7938 7939 7940 7941 7942 7943 7944 7945 7946 7947 7948 7949
#if VBOX_API_VERSION == 2002 && defined WIN32
            /* VirtualBox 2.2 on Windows represents IIDs as GUIDs and the
             * machineIds array contains direct instances of the GUID struct
             * instead of pointers to the actual struct instances. But there
             * is no 128bit width simple item type for a SafeArray to fit a
             * GUID in. The largest simple type it 64bit width and VirtualBox
             * uses two of this 64bit items to represents one GUID. Therefore,
             * we devide the size of the SafeArray by two, to compensate for
             * this workaround in VirtualBox */
            machineIds.count /= 2;
#endif /* VBOX_API_VERSION >= 2002 */

7950
            machineIdsSize = machineIds.count;
7951

7952
            for (i = 0; i < machineIds.count; i++) {
7953
                IMachine *machine = NULL;
7954 7955 7956
                vboxIID machineId = VBOX_IID_INITIALIZER;

                vboxIIDFromArrayItem(&machineId, &machineIds, i);
7957

7958
                rc = data->vboxObj->vtbl->OpenSession(data->vboxObj, data->vboxSession, machineId.value);
7959
                if (NS_SUCCEEDED(rc)) {
7960

7961 7962
                    rc = data->vboxSession->vtbl->GetMachine(data->vboxSession, &machine);
                    if (NS_SUCCEEDED(rc)) {
7963
                        vboxArray hddAttachments = VBOX_ARRAY_INITIALIZER;
7964 7965

#if VBOX_API_VERSION < 3001
7966 7967
                        vboxArrayGet(&hddAttachments, machine,
                                     machine->vtbl->GetHardDiskAttachments);
7968
#else  /* VBOX_API_VERSION >= 3001 */
7969 7970
                        vboxArrayGet(&hddAttachments, machine,
                                     machine->vtbl->GetMediumAttachments);
7971
#endif /* VBOX_API_VERSION >= 3001 */
7972 7973
                        for (j = 0; j < hddAttachments.count; j++) {
                            IHardDiskAttachment *hddAttachment = hddAttachments.items[j];
7974 7975 7976 7977 7978 7979 7980 7981 7982 7983

                            if (hddAttachment) {
                                IHardDisk *hdd = NULL;

#if VBOX_API_VERSION < 3001
                                rc = hddAttachment->vtbl->GetHardDisk(hddAttachment, &hdd);
#else  /* VBOX_API_VERSION >= 3001 */
                                rc = hddAttachment->vtbl->GetMedium(hddAttachment, &hdd);
#endif /* VBOX_API_VERSION >= 3001 */
                                if (NS_SUCCEEDED(rc) && hdd) {
7984
                                    vboxIID iid = VBOX_IID_INITIALIZER;
7985

7986 7987
                                    rc = VBOX_MEDIUM_FUNC_ARG1(hdd, GetId, &iid.value);
                                    if (NS_SUCCEEDED(rc)) {
7988

7989 7990
                                            DEBUGIID("HardDisk (to delete) UUID", hddIID.value);
                                            DEBUGIID("HardDisk (currently processing) UUID", iid.value);
7991

7992
                                        if (vboxIIDIsEqual(&hddIID, &iid)) {
7993 7994 7995 7996
                                            PRUnichar *controller = NULL;
                                            PRInt32    port       = 0;
                                            PRInt32    device     = 0;

7997
                                            DEBUGIID("Found HardDisk to delete, UUID", hddIID.value);
7998 7999 8000 8001 8002 8003 8004 8005 8006 8007 8008 8009 8010 8011

                                            hddAttachment->vtbl->GetController(hddAttachment, &controller);
                                            hddAttachment->vtbl->GetPort(hddAttachment, &port);
                                            hddAttachment->vtbl->GetDevice(hddAttachment, &device);

#if VBOX_API_VERSION < 3001
                                            rc = machine->vtbl->DetachHardDisk(machine, controller, port, device);
#else  /* VBOX_API_VERSION >= 3001 */
                                            rc = machine->vtbl->DetachDevice(machine, controller, port, device);
#endif /* VBOX_API_VERSION >= 3001 */
                                            if (NS_SUCCEEDED(rc)) {
                                                rc = machine->vtbl->SaveSettings(machine);
                                                DEBUG0("saving machine settings");
                                            }
8012

8013 8014 8015
                                            if (NS_SUCCEEDED(rc)) {
                                                deregister++;
                                                DEBUG("deregistering hdd:%d", deregister);
8016
                                            }
8017 8018 8019

                                            if (controller)
                                                VBOX_UTF16_FREE(controller);
8020
                                        }
8021
                                        vboxIIDUnalloc(&iid);
8022
                                    }
8023
                                    VBOX_MEDIUM_RELEASE(hdd);
8024 8025 8026
                                }
                            }
                        }
8027
                        vboxArrayRelease(&hddAttachments);
8028
                        VBOX_RELEASE(machine);
8029
                    }
8030 8031
                    data->vboxSession->vtbl->Close(data->vboxSession);
                }
8032 8033

                vboxIIDUnalloc(&machineId);
8034
            }
8035

8036
            vboxArrayUnalloc(&machineIds);
8037

8038 8039
            if (machineIdsSize == 0 || machineIdsSize == deregister) {
                IProgress *progress = NULL;
8040

8041
                rc = hardDisk->vtbl->DeleteStorage(hardDisk, &progress);
8042

8043 8044 8045
                if (NS_SUCCEEDED(rc) && progress) {
                    progress->vtbl->WaitForCompletion(progress, -1);
                    VBOX_RELEASE(progress);
8046
                    DEBUGIID("HardDisk deleted, UUID", hddIID.value);
8047
                    ret = 0;
8048 8049 8050
                }
            }
        }
8051 8052

        VBOX_MEDIUM_RELEASE(hardDisk);
8053 8054
    }

8055
    vboxIIDUnalloc(&hddIID);
8056

8057 8058 8059 8060
    return ret;
}

static int vboxStorageVolGetInfo(virStorageVolPtr vol, virStorageVolInfoPtr info) {
8061
    VBOX_OBJECT_CHECK(vol->conn, int, -1);
8062
    IHardDisk *hardDisk  = NULL;
8063 8064
    unsigned char uuid[VIR_UUID_BUFLEN];
    vboxIID hddIID = VBOX_IID_INITIALIZER;
8065 8066
    nsresult rc;

8067
    if (!info)
8068
        return ret;
8069

8070 8071 8072
    if (virUUIDParse(vol->key, uuid) < 0) {
        vboxError(VIR_ERR_INVALID_ARG,
                  _("Could not parse UUID from '%s'"), vol->key);
8073
        return ret;
8074
    }
8075

8076 8077
    vboxIIDFromUUID(&hddIID, uuid);
    rc = data->vboxObj->vtbl->GetHardDisk(data->vboxObj, hddIID.value, &hardDisk);
8078 8079
    if (NS_SUCCEEDED(rc)) {
        PRUint32 hddstate;
8080

8081 8082 8083 8084
        VBOX_MEDIUM_FUNC_ARG1(hardDisk, GetState, &hddstate);
        if (hddstate != MediaState_Inaccessible) {
            PRUint64 hddLogicalSize;
            PRUint64 hddActualSize;
8085

8086
            info->type = VIR_STORAGE_VOL_FILE;
8087

8088 8089
            hardDisk->vtbl->GetLogicalSize(hardDisk, &hddLogicalSize);
            info->capacity = hddLogicalSize * 1024 * 1024; /* MB => Bytes */
8090

8091 8092
            VBOX_MEDIUM_FUNC_ARG1(hardDisk, GetSize, &hddActualSize);
            info->allocation = hddActualSize;
8093

8094
            ret = 0;
8095

8096 8097 8098 8099
            DEBUG("Storage Volume Name: %s", vol->name);
            DEBUG("Storage Volume Type: %s", info->type == VIR_STORAGE_VOL_BLOCK ? "Block" : "File");
            DEBUG("Storage Volume Capacity: %llu", info->capacity);
            DEBUG("Storage Volume Allocation: %llu", info->allocation);
8100
        }
8101 8102

        VBOX_MEDIUM_RELEASE(hardDisk);
8103 8104
    }

8105
    vboxIIDUnalloc(&hddIID);
8106

8107 8108 8109 8110
    return ret;
}

static char *vboxStorageVolGetXMLDesc(virStorageVolPtr vol, unsigned int flags ATTRIBUTE_UNUSED) {
8111
    VBOX_OBJECT_CHECK(vol->conn, char *, NULL);
8112
    IHardDisk *hardDisk  = NULL;
8113 8114
    unsigned char uuid[VIR_UUID_BUFLEN];
    vboxIID hddIID = VBOX_IID_INITIALIZER;
8115 8116 8117 8118 8119 8120 8121 8122
    virStoragePoolDef pool;
    virStorageVolDef def;
    int defOk = 0;
    nsresult rc;

    memset(&pool, 0, sizeof(pool));
    memset(&def, 0, sizeof(def));

8123 8124 8125
    if (virUUIDParse(vol->key, uuid) < 0) {
        vboxError(VIR_ERR_INVALID_ARG,
                  _("Could not parse UUID from '%s'"), vol->key);
8126
        return ret;
8127
    }
8128

8129 8130
    vboxIIDFromUUID(&hddIID, uuid);
    rc = data->vboxObj->vtbl->GetHardDisk(data->vboxObj, hddIID.value, &hardDisk);
8131 8132 8133 8134 8135 8136 8137 8138 8139 8140 8141 8142 8143 8144 8145 8146 8147 8148 8149 8150 8151 8152 8153 8154 8155 8156 8157 8158 8159 8160 8161 8162 8163 8164 8165 8166 8167 8168 8169 8170 8171 8172 8173 8174 8175 8176 8177 8178 8179 8180 8181
    if (NS_SUCCEEDED(rc)) {
        PRUint32 hddstate;

        VBOX_MEDIUM_FUNC_ARG1(hardDisk, GetState, &hddstate);
        if (NS_SUCCEEDED(rc) && hddstate != MediaState_Inaccessible) {
            PRUnichar *hddFormatUtf16 = NULL;
            PRUint64 hddLogicalSize;
            PRUint64 hddActualSize;

            /* since there is currently one default pool now
             * and virStorageVolDefFormat() just checks it type
             * so just assign it for now, change the behaviour
             * when vbox supports pools.
             */
            pool.type = VIR_STORAGE_POOL_DIR;
            def.type = VIR_STORAGE_VOL_FILE;
            defOk = 1;

            rc = hardDisk->vtbl->GetLogicalSize(hardDisk, &hddLogicalSize);
            if (NS_SUCCEEDED(rc) && defOk)
                def.capacity = hddLogicalSize * 1024 * 1024; /* MB => Bytes */
            else
                defOk = 0;

            rc = VBOX_MEDIUM_FUNC_ARG1(hardDisk, GetSize, &hddActualSize);
            if (NS_SUCCEEDED(rc) && defOk)
                def.allocation = hddActualSize;
            else
                defOk = 0;

            def.name = strdup(vol->name);
            if (!(def.name && defOk))
                defOk = 0;

            def.key = strdup(vol->key);
            if (!(def.key && defOk))
                defOk = 0;

            rc = hardDisk->vtbl->GetFormat(hardDisk, &hddFormatUtf16);
            if (NS_SUCCEEDED(rc) && defOk) {
                char *hddFormatUtf8 = NULL;

                VBOX_UTF16_TO_UTF8(hddFormatUtf16, &hddFormatUtf8);
                if (hddFormatUtf8) {

                    DEBUG("Storage Volume Format: %s", hddFormatUtf8);

                    if (STRCASEEQ("vmdk", hddFormatUtf8))
                        def.target.format = VIR_STORAGE_FILE_VMDK;
                    else if (STRCASEEQ("vhd", hddFormatUtf8))
                        def.target.format = VIR_STORAGE_FILE_VPC;
8182
                    else
8183
                        def.target.format = VIR_STORAGE_FILE_RAW;
8184

8185 8186 8187
                    /* TODO: need to add vdi to enum virStorageFileFormat {}
                     * and then add it here
                     */
8188

8189
                    VBOX_UTF8_FREE(hddFormatUtf8);
8190 8191
                }

8192 8193 8194
                VBOX_UTF16_FREE(hddFormatUtf16);
            } else {
                defOk = 0;
8195 8196
            }
        }
8197 8198

        VBOX_MEDIUM_RELEASE(hardDisk);
8199 8200
    }

8201
    vboxIIDUnalloc(&hddIID);
8202

8203
    if (defOk)
8204
        ret = virStorageVolDefFormat(&pool, &def);
8205 8206 8207 8208 8209

    return ret;
}

static char *vboxStorageVolGetPath(virStorageVolPtr vol) {
8210
    VBOX_OBJECT_CHECK(vol->conn, char *, NULL);
8211
    IHardDisk *hardDisk  = NULL;
8212 8213
    unsigned char uuid[VIR_UUID_BUFLEN];
    vboxIID hddIID = VBOX_IID_INITIALIZER;
8214 8215
    nsresult rc;

8216 8217 8218
    if (virUUIDParse(vol->key, uuid) < 0) {
        vboxError(VIR_ERR_INVALID_ARG,
                  _("Could not parse UUID from '%s'"), vol->key);
8219
        return ret;
8220
    }
8221

8222 8223
    vboxIIDFromUUID(&hddIID, uuid);
    rc = data->vboxObj->vtbl->GetHardDisk(data->vboxObj, hddIID.value, &hardDisk);
8224 8225
    if (NS_SUCCEEDED(rc)) {
        PRUint32 hddstate;
8226

8227 8228 8229 8230
        VBOX_MEDIUM_FUNC_ARG1(hardDisk, GetState, &hddstate);
        if (hddstate != MediaState_Inaccessible) {
            PRUnichar *hddLocationUtf16 = NULL;
            char      *hddLocationUtf8  = NULL;
8231

8232
            VBOX_MEDIUM_FUNC_ARG1(hardDisk, GetLocation, &hddLocationUtf16);
8233

8234 8235
            VBOX_UTF16_TO_UTF8(hddLocationUtf16, &hddLocationUtf8);
            if (hddLocationUtf8) {
8236

8237 8238
                ret = strdup(hddLocationUtf8);
                if (!ret)
8239
                    virReportOOMError();
8240

8241 8242 8243
                DEBUG("Storage Volume Name: %s", vol->name);
                DEBUG("Storage Volume Path: %s", hddLocationUtf8);
                DEBUG("Storage Volume Pool: %s", vol->pool);
8244

8245
                VBOX_UTF8_FREE(hddLocationUtf8);
8246 8247
            }

8248
            VBOX_UTF16_FREE(hddLocationUtf16);
8249
        }
8250 8251

        VBOX_MEDIUM_RELEASE(hardDisk);
8252 8253
    }

8254
    vboxIIDUnalloc(&hddIID);
8255

8256 8257
    return ret;
}
8258 8259 8260 8261 8262

/**
 * Function Tables
 */

8263 8264 8265
virDriver NAME(Driver) = {
    VIR_DRV_VBOX,
    "VBOX",
8266 8267 8268 8269 8270
    vboxOpen, /* open */
    vboxClose, /* close */
    NULL, /* supports_feature */
    NULL, /* type */
    vboxGetVersion, /* version */
8271
    NULL, /* libvirtVersion (impl. in libvirt.c) */
8272
    virGetHostname, /* getHostname */
8273 8274 8275 8276 8277 8278 8279 8280 8281 8282 8283 8284 8285 8286 8287 8288 8289 8290 8291 8292 8293 8294
    vboxGetMaxVcpus, /* getMaxVcpus */
    nodeGetInfo, /* nodeGetInfo */
    vboxGetCapabilities, /* getCapabilities */
    vboxListDomains, /* listDomains */
    vboxNumOfDomains, /* numOfDomains */
    vboxDomainCreateXML, /* domainCreateXML */
    vboxDomainLookupByID, /* domainLookupByID */
    vboxDomainLookupByUUID, /* domainLookupByUUID */
    vboxDomainLookupByName, /* domainLookupByName */
    vboxDomainSuspend, /* domainSuspend */
    vboxDomainResume, /* domainResume */
    vboxDomainShutdown, /* domainShutdown */
    vboxDomainReboot, /* domainReboot */
    vboxDomainDestroy, /* domainDestroy */
    vboxDomainGetOSType, /* domainGetOSType */
    NULL, /* domainGetMaxMemory */
    NULL, /* domainSetMaxMemory */
    vboxDomainSetMemory, /* domainSetMemory */
    vboxDomainGetInfo, /* domainGetInfo */
    vboxDomainSave, /* domainSave */
    NULL, /* domainRestore */
    NULL, /* domainCoreDump */
8295
    vboxDomainSetVcpus, /* domainSetVcpus */
8296 8297
    vboxDomainSetVcpusFlags, /* domainSetVcpusFlags */
    vboxDomainGetVcpusFlags, /* domainGetVcpusFlags */
8298 8299
    NULL, /* domainPinVcpu */
    NULL, /* domainGetVcpus */
8300
    vboxDomainGetMaxVcpus, /* domainGetMaxVcpus */
8301 8302 8303
    NULL, /* domainGetSecurityLabel */
    NULL, /* nodeGetSecurityModel */
    vboxDomainDumpXML, /* domainDumpXML */
8304 8305
    NULL, /* domainXMLFromNative */
    NULL, /* domainXMLToNative */
8306 8307 8308
    vboxListDefinedDomains, /* listDefinedDomains */
    vboxNumOfDefinedDomains, /* numOfDefinedDomains */
    vboxDomainCreate, /* domainCreate */
8309
    vboxDomainCreateWithFlags, /* domainCreateWithFlags */
8310 8311 8312
    vboxDomainDefineXML, /* domainDefineXML */
    vboxDomainUndefine, /* domainUndefine */
    vboxDomainAttachDevice, /* domainAttachDevice */
8313
    vboxDomainAttachDeviceFlags, /* domainAttachDeviceFlags */
8314
    vboxDomainDetachDevice, /* domainDetachDevice */
8315
    vboxDomainDetachDeviceFlags, /* domainDetachDeviceFlags */
8316
    vboxDomainUpdateDeviceFlags, /* domainUpdateDeviceFlags */
8317 8318 8319 8320 8321 8322 8323 8324 8325 8326
    NULL, /* domainGetAutostart */
    NULL, /* domainSetAutostart */
    NULL, /* domainGetSchedulerType */
    NULL, /* domainGetSchedulerParameters */
    NULL, /* domainSetSchedulerParameters */
    NULL, /* domainMigratePrepare */
    NULL, /* domainMigratePerform */
    NULL, /* domainMigrateFinish */
    NULL, /* domainBlockStats */
    NULL, /* domainInterfaceStats */
8327
    NULL, /* domainMemoryStats */
8328 8329
    NULL, /* domainBlockPeek */
    NULL, /* domainMemoryPeek */
8330
    NULL, /* domainGetBlockInfo */
8331 8332
    nodeGetCellsFreeMemory, /* nodeGetCellsFreeMemory */
    nodeGetFreeMemory,  /* getFreeMemory */
8333
#if VBOX_API_VERSION == 2002
8334 8335
    NULL, /* domainEventRegister */
    NULL, /* domainEventDeregister */
8336 8337 8338 8339
#else
    vboxDomainEventRegister, /* domainEventRegister */
    vboxDomainEventDeregister, /* domainEventDeregister */
#endif
8340 8341 8342 8343 8344
    NULL, /* domainMigratePrepare2 */
    NULL, /* domainMigrateFinish2 */
    NULL, /* nodeDeviceDettach */
    NULL, /* nodeDeviceReAttach */
    NULL, /* nodeDeviceReset */
C
Chris Lalancette 已提交
8345
    NULL, /* domainMigratePrepareTunnel */
8346 8347 8348 8349
    vboxIsEncrypted, /* isEncrypted */
    vboxIsSecure, /* isSecure */
    vboxDomainIsActive, /* domainIsActive */
    vboxDomainIsPersistent, /* domainIsPersistent */
8350
    vboxDomainIsUpdated, /* domainIsUpdated */
J
Jiri Denemark 已提交
8351
    NULL, /* cpuCompare */
8352
    NULL, /* cpuBaseline */
8353
    NULL, /* domainGetJobInfo */
8354
    NULL, /* domainAbortJob */
8355
    NULL, /* domainMigrateSetMaxDowntime */
8356
#if VBOX_API_VERSION == 2002
8357 8358
    NULL, /* domainEventRegisterAny */
    NULL, /* domainEventDeregisterAny */
8359 8360 8361 8362
#else
    vboxDomainEventRegisterAny, /* domainEventRegisterAny */
    vboxDomainEventDeregisterAny, /* domainEventDeregisterAny */
#endif
8363 8364 8365
    NULL, /* domainManagedSave */
    NULL, /* domainHasManagedSaveImage */
    NULL, /* domainManagedSaveRemove */
J
Jiri Denemark 已提交
8366 8367 8368 8369 8370 8371 8372 8373 8374
    vboxDomainSnapshotCreateXML, /* domainSnapshotCreateXML */
    vboxDomainSnapshotDumpXML, /* domainSnapshotDumpXML */
    vboxDomainSnapshotNum, /* domainSnapshotNum */
    vboxDomainSnapshotListNames, /* domainSnapshotListNames */
    vboxDomainSnapshotLookupByName, /* domainSnapshotLookupByName */
    vboxDomainHasCurrentSnapshot, /* domainHasCurrentSnapshot */
    vboxDomainSnapshotCurrent, /* domainSnapshotCurrent */
    vboxDomainRevertToSnapshot, /* domainRevertToSnapshot */
    vboxDomainSnapshotDelete, /* domainSnapshotDelete */
C
Chris Lalancette 已提交
8375
    NULL, /* qemuDomainMonitorCommand */
8376 8377
    NULL, /* domainSetMemoryParameters */
    NULL, /* domainGetMemoryParameters */
8378
    NULL, /* domainOpenConsole */
8379
};
8380 8381 8382 8383 8384 8385 8386 8387 8388 8389 8390 8391 8392 8393 8394 8395 8396 8397 8398 8399 8400

virNetworkDriver NAME(NetworkDriver) = {
    "VBOX",
    .open                   = vboxNetworkOpen,
    .close                  = vboxNetworkClose,
    .numOfNetworks          = vboxNumOfNetworks,
    .listNetworks           = vboxListNetworks,
    .numOfDefinedNetworks   = vboxNumOfDefinedNetworks,
    .listDefinedNetworks    = vboxListDefinedNetworks,
    .networkLookupByUUID    = vboxNetworkLookupByUUID,
    .networkLookupByName    = vboxNetworkLookupByName,
    .networkCreateXML       = vboxNetworkCreateXML,
    .networkDefineXML       = vboxNetworkDefineXML,
    .networkUndefine        = vboxNetworkUndefine,
    .networkCreate          = vboxNetworkCreate,
    .networkDestroy         = vboxNetworkDestroy,
    .networkDumpXML         = vboxNetworkDumpXML,
    .networkGetBridgeName   = NULL,
    .networkGetAutostart    = NULL,
    .networkSetAutostart    = NULL
};
8401 8402 8403 8404 8405 8406 8407 8408 8409 8410 8411 8412 8413 8414 8415 8416 8417 8418 8419 8420 8421 8422 8423 8424 8425 8426 8427 8428 8429 8430 8431 8432 8433 8434 8435 8436

virStorageDriver NAME(StorageDriver) = {
    .name               = "VBOX",
    .open               = vboxStorageOpen,
    .close              = vboxStorageClose,
    .numOfPools         = vboxStorageNumOfPools,
    .listPools          = vboxStorageListPools,
    .numOfDefinedPools  = NULL,
    .listDefinedPools   = NULL,
    .findPoolSources    = NULL,
    .poolLookupByName   = vboxStoragePoolLookupByName,
    .poolLookupByUUID   = NULL,
    .poolLookupByVolume = NULL,
    .poolCreateXML      = NULL,
    .poolDefineXML      = NULL,
    .poolBuild          = NULL,
    .poolUndefine       = NULL,
    .poolCreate         = NULL,
    .poolDestroy        = NULL,
    .poolDelete         = NULL,
    .poolRefresh        = NULL,
    .poolGetInfo        = NULL,
    .poolGetXMLDesc     = NULL,
    .poolGetAutostart   = NULL,
    .poolSetAutostart   = NULL,
    .poolNumOfVolumes   = vboxStoragePoolNumOfVolumes,
    .poolListVolumes    = vboxStoragePoolListVolumes,

    .volLookupByName    = vboxStorageVolLookupByName,
    .volLookupByKey     = vboxStorageVolLookupByKey,
    .volLookupByPath    = vboxStorageVolLookupByPath,
    .volCreateXML       = vboxStorageVolCreateXML,
    .volCreateXMLFrom   = NULL,
    .volDelete          = vboxStorageVolDelete,
    .volGetInfo         = vboxStorageVolGetInfo,
    .volGetXMLDesc      = vboxStorageVolGetXMLDesc,
8437
    .volGetPath         = vboxStorageVolGetPath
8438
};