iscsi.c 42.6 KB
Newer Older
R
Ronnie Sahlberg 已提交
1 2 3 4
/*
 * QEMU Block driver for iSCSI images
 *
 * Copyright (c) 2010-2011 Ronnie Sahlberg <ronniesahlberg@gmail.com>
P
Peter Lieven 已提交
5
 * Copyright (c) 2012-2013 Peter Lieven <pl@kamp.de>
R
Ronnie Sahlberg 已提交
6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28
 *
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 * of this software and associated documentation files (the "Software"), to deal
 * in the Software without restriction, including without limitation the rights
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 * copies of the Software, and to permit persons to whom the Software is
 * furnished to do so, subject to the following conditions:
 *
 * The above copyright notice and this permission notice shall be included in
 * all copies or substantial portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 * THE SOFTWARE.
 */

#include "config-host.h"

#include <poll.h>
29
#include <arpa/inet.h>
R
Ronnie Sahlberg 已提交
30
#include "qemu-common.h"
31 32
#include "qemu/config-file.h"
#include "qemu/error-report.h"
33
#include "block/block_int.h"
R
Ronnie Sahlberg 已提交
34
#include "trace.h"
P
Paolo Bonzini 已提交
35
#include "block/scsi.h"
36
#include "qemu/iov.h"
37 38
#include "sysemu/sysemu.h"
#include "qmp-commands.h"
R
Ronnie Sahlberg 已提交
39 40 41 42

#include <iscsi/iscsi.h>
#include <iscsi/scsi-lowlevel.h>

43 44
#ifdef __linux__
#include <scsi/sg.h>
P
Paolo Bonzini 已提交
45
#include <block/scsi.h>
46
#endif
R
Ronnie Sahlberg 已提交
47 48 49 50

typedef struct IscsiLun {
    struct iscsi_context *iscsi;
    int lun;
51
    enum scsi_inquiry_peripheral_device_type type;
R
Ronnie Sahlberg 已提交
52
    int block_size;
53
    uint64_t num_blocks;
54
    int events;
55
    QEMUTimer *nop_timer;
56 57
    uint8_t lbpme;
    uint8_t lbprz;
58
    uint8_t has_write_same;
59 60
    struct scsi_inquiry_logical_block_provisioning lbp;
    struct scsi_inquiry_block_limits bl;
P
Peter Lieven 已提交
61
    unsigned char *zeroblock;
R
Ronnie Sahlberg 已提交
62 63
} IscsiLun;

P
Peter Lieven 已提交
64 65 66 67 68 69 70
typedef struct IscsiTask {
    int status;
    int complete;
    int retries;
    int do_retry;
    struct scsi_task *task;
    Coroutine *co;
71
    QEMUBH *bh;
P
Peter Lieven 已提交
72 73
} IscsiTask;

R
Ronnie Sahlberg 已提交
74 75 76 77 78 79 80 81 82
typedef struct IscsiAIOCB {
    BlockDriverAIOCB common;
    QEMUIOVector *qiov;
    QEMUBH *bh;
    IscsiLun *iscsilun;
    struct scsi_task *task;
    uint8_t *buf;
    int status;
    int canceled;
83 84 85
    int retries;
    int64_t sector_num;
    int nb_sectors;
86 87 88
#ifdef __linux__
    sg_io_hdr_t *ioh;
#endif
R
Ronnie Sahlberg 已提交
89 90
} IscsiAIOCB;

91 92
#define NOP_INTERVAL 5000
#define MAX_NOP_FAILURES 3
93
#define ISCSI_CMD_RETRIES 5
94

95
static void
96
iscsi_bh_cb(void *p)
97 98 99 100 101
{
    IscsiAIOCB *acb = p;

    qemu_bh_delete(acb->bh);

102 103 104
    g_free(acb->buf);
    acb->buf = NULL;

105 106 107 108
    if (acb->canceled == 0) {
        acb->common.cb(acb->common.opaque, acb->status);
    }

109 110 111 112 113
    if (acb->task != NULL) {
        scsi_free_scsi_task(acb->task);
        acb->task = NULL;
    }

114 115 116
    qemu_aio_release(acb);
}

117 118
static void
iscsi_schedule_bh(IscsiAIOCB *acb)
119
{
120 121 122
    if (acb->bh) {
        return;
    }
123
    acb->bh = qemu_bh_new(iscsi_bh_cb, acb);
124 125 126
    qemu_bh_schedule(acb->bh);
}

127 128 129 130 131 132 133
static void iscsi_co_generic_bh_cb(void *opaque)
{
    struct IscsiTask *iTask = opaque;
    qemu_bh_delete(iTask->bh);
    qemu_coroutine_enter(iTask->co, NULL);
}

P
Peter Lieven 已提交
134 135 136 137 138 139 140 141 142 143 144 145 146 147
static void
iscsi_co_generic_cb(struct iscsi_context *iscsi, int status,
                        void *command_data, void *opaque)
{
    struct IscsiTask *iTask = opaque;
    struct scsi_task *task = command_data;

    iTask->complete = 1;
    iTask->status = status;
    iTask->do_retry = 0;
    iTask->task = task;

    if (iTask->retries-- > 0 && status == SCSI_STATUS_CHECK_CONDITION
        && task->sense.key == SCSI_SENSE_UNIT_ATTENTION) {
148
        error_report("iSCSI CheckCondition: %s", iscsi_get_error(iscsi));
P
Peter Lieven 已提交
149 150 151 152 153
        iTask->do_retry = 1;
        goto out;
    }

    if (status != SCSI_STATUS_GOOD) {
154
        error_report("iSCSI Failure: %s", iscsi_get_error(iscsi));
P
Peter Lieven 已提交
155 156 157 158
    }

out:
    if (iTask->co) {
159 160
        iTask->bh = qemu_bh_new(iscsi_co_generic_bh_cb, iTask);
        qemu_bh_schedule(iTask->bh);
P
Peter Lieven 已提交
161 162 163 164 165 166 167 168 169 170
    }
}

static void iscsi_co_init_iscsitask(IscsiLun *iscsilun, struct IscsiTask *iTask)
{
    *iTask = (struct IscsiTask) {
        .co         = qemu_coroutine_self(),
        .retries    = ISCSI_CMD_RETRIES,
    };
}
171

R
Ronnie Sahlberg 已提交
172 173 174 175
static void
iscsi_abort_task_cb(struct iscsi_context *iscsi, int status, void *command_data,
                    void *private_data)
{
176 177 178 179
    IscsiAIOCB *acb = private_data;

    acb->status = -ECANCELED;
    iscsi_schedule_bh(acb);
R
Ronnie Sahlberg 已提交
180 181 182 183 184 185 186 187
}

static void
iscsi_aio_cancel(BlockDriverAIOCB *blockacb)
{
    IscsiAIOCB *acb = (IscsiAIOCB *)blockacb;
    IscsiLun *iscsilun = acb->iscsilun;

188 189 190 191
    if (acb->status != -EINPROGRESS) {
        return;
    }

192
    acb->canceled = 1;
R
Ronnie Sahlberg 已提交
193

194
    /* send a task mgmt call to the target to cancel the task on the target */
195
    iscsi_task_mgmt_abort_task_async(iscsilun->iscsi, acb->task,
196
                                     iscsi_abort_task_cb, acb);
197

198 199 200
    while (acb->status == -EINPROGRESS) {
        qemu_aio_wait();
    }
R
Ronnie Sahlberg 已提交
201 202
}

S
Stefan Hajnoczi 已提交
203
static const AIOCBInfo iscsi_aiocb_info = {
R
Ronnie Sahlberg 已提交
204 205 206 207 208 209 210 211 212 213 214 215
    .aiocb_size         = sizeof(IscsiAIOCB),
    .cancel             = iscsi_aio_cancel,
};


static void iscsi_process_read(void *arg);
static void iscsi_process_write(void *arg);

static void
iscsi_set_events(IscsiLun *iscsilun)
{
    struct iscsi_context *iscsi = iscsilun->iscsi;
216 217 218 219 220 221 222 223 224 225 226 227 228 229
    int ev;

    /* We always register a read handler.  */
    ev = POLLIN;
    ev |= iscsi_which_events(iscsi);
    if (ev != iscsilun->events) {
        qemu_aio_set_fd_handler(iscsi_get_fd(iscsi),
                      iscsi_process_read,
                      (ev & POLLOUT) ? iscsi_process_write : NULL,
                      iscsilun);

    }

    iscsilun->events = ev;
R
Ronnie Sahlberg 已提交
230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251
}

static void
iscsi_process_read(void *arg)
{
    IscsiLun *iscsilun = arg;
    struct iscsi_context *iscsi = iscsilun->iscsi;

    iscsi_service(iscsi, POLLIN);
    iscsi_set_events(iscsilun);
}

static void
iscsi_process_write(void *arg)
{
    IscsiLun *iscsilun = arg;
    struct iscsi_context *iscsi = iscsilun->iscsi;

    iscsi_service(iscsi, POLLOUT);
    iscsi_set_events(iscsilun);
}

252 253 254 255 256
static int64_t sector_lun2qemu(int64_t sector, IscsiLun *iscsilun)
{
    return sector * iscsilun->block_size / BDRV_SECTOR_SIZE;
}

R
Ronnie Sahlberg 已提交
257 258 259 260 261
static int64_t sector_qemu2lun(int64_t sector, IscsiLun *iscsilun)
{
    return sector * BDRV_SECTOR_SIZE / iscsilun->block_size;
}

262 263 264 265 266
static bool is_request_lun_aligned(int64_t sector_num, int nb_sectors,
                                      IscsiLun *iscsilun)
{
    if ((sector_num * BDRV_SECTOR_SIZE) % iscsilun->block_size ||
        (nb_sectors * BDRV_SECTOR_SIZE) % iscsilun->block_size) {
267 268 269
            error_report("iSCSI misaligned request: "
                         "iscsilun->block_size %u, sector_num %" PRIi64
                         ", nb_sectors %d",
270 271 272 273 274 275
                         iscsilun->block_size, sector_num, nb_sectors);
            return 0;
    }
    return 1;
}

276 277 278
static int coroutine_fn iscsi_co_writev(BlockDriverState *bs,
                                        int64_t sector_num, int nb_sectors,
                                        QEMUIOVector *iov)
R
Ronnie Sahlberg 已提交
279
{
280 281
    IscsiLun *iscsilun = bs->opaque;
    struct IscsiTask iTask;
282
    uint64_t lba;
283 284 285
    uint32_t num_sectors;
    uint8_t *data = NULL;
    uint8_t *buf = NULL;
R
Ronnie Sahlberg 已提交
286

287 288 289
    if (!is_request_lun_aligned(sector_num, nb_sectors, iscsilun)) {
        return -EINVAL;
    }
P
Peter Lieven 已提交
290

291 292
    lba = sector_qemu2lun(sector_num, iscsilun);
    num_sectors = sector_qemu2lun(nb_sectors, iscsilun);
P
Peter Lieven 已提交
293
#if !defined(LIBISCSI_FEATURE_IOVECTOR)
294
    /* if the iovec only contains one buffer we can pass it directly */
295 296
    if (iov->niov == 1) {
        data = iov->iov[0].iov_base;
297
    } else {
298 299 300 301
        size_t size = MIN(nb_sectors * BDRV_SECTOR_SIZE, iov->size);
        buf = g_malloc(size);
        qemu_iovec_to_buf(iov, 0, buf, size);
        data = buf;
302
    }
P
Peter Lieven 已提交
303
#endif
304 305 306 307 308 309 310 311
    iscsi_co_init_iscsitask(iscsilun, &iTask);
retry:
    iTask.task = iscsi_write16_task(iscsilun->iscsi, iscsilun->lun, lba,
                                    data, num_sectors * iscsilun->block_size,
                                    iscsilun->block_size, 0, 0, 0, 0, 0,
                                    iscsi_co_generic_cb, &iTask);
    if (iTask.task == NULL) {
        g_free(buf);
312
        return -ENOMEM;
313
    }
P
Peter Lieven 已提交
314
#if defined(LIBISCSI_FEATURE_IOVECTOR)
315 316
    scsi_task_set_iov_out(iTask.task, (struct scsi_iovec *) iov->iov,
                          iov->niov);
P
Peter Lieven 已提交
317
#endif
318 319 320
    while (!iTask.complete) {
        iscsi_set_events(iscsilun);
        qemu_coroutine_yield();
R
Ronnie Sahlberg 已提交
321 322
    }

323 324 325
    if (iTask.task != NULL) {
        scsi_free_scsi_task(iTask.task);
        iTask.task = NULL;
326 327
    }

328
    if (iTask.do_retry) {
329
        iTask.complete = 0;
330
        goto retry;
331 332
    }

333
    g_free(buf);
R
Ronnie Sahlberg 已提交
334

335 336
    if (iTask.status != SCSI_STATUS_GOOD) {
        return -EIO;
R
Ronnie Sahlberg 已提交
337 338
    }

339
    return 0;
R
Ronnie Sahlberg 已提交
340 341
}

342 343 344
static int coroutine_fn iscsi_co_readv(BlockDriverState *bs,
                                       int64_t sector_num, int nb_sectors,
                                       QEMUIOVector *iov)
R
Ronnie Sahlberg 已提交
345
{
346 347
    IscsiLun *iscsilun = bs->opaque;
    struct IscsiTask iTask;
348 349
    uint64_t lba;
    uint32_t num_sectors;
P
Peter Lieven 已提交
350
#if !defined(LIBISCSI_FEATURE_IOVECTOR)
R
Ronnie Sahlberg 已提交
351
    int i;
P
Peter Lieven 已提交
352
#endif
R
Ronnie Sahlberg 已提交
353

354 355
    if (!is_request_lun_aligned(sector_num, nb_sectors, iscsilun)) {
        return -EINVAL;
356 357
    }

358 359
    lba = sector_qemu2lun(sector_num, iscsilun);
    num_sectors = sector_qemu2lun(nb_sectors, iscsilun);
360

361 362 363
    iscsi_co_init_iscsitask(iscsilun, &iTask);
retry:
    switch (iscsilun->type) {
364
    case TYPE_DISK:
365 366 367 368
        iTask.task = iscsi_read16_task(iscsilun->iscsi, iscsilun->lun, lba,
                                       num_sectors * iscsilun->block_size,
                                       iscsilun->block_size, 0, 0, 0, 0, 0,
                                       iscsi_co_generic_cb, &iTask);
369 370
        break;
    default:
371 372
        iTask.task = iscsi_read10_task(iscsilun->iscsi, iscsilun->lun, lba,
                                       num_sectors * iscsilun->block_size,
373 374 375 376
                                       iscsilun->block_size,
#if !defined(CONFIG_LIBISCSI_1_4) /* API change from 1.4.0 to 1.5.0 */
                                       0, 0, 0, 0, 0,
#endif
377
                                       iscsi_co_generic_cb, &iTask);
378 379
        break;
    }
380
    if (iTask.task == NULL) {
381
        return -ENOMEM;
R
Ronnie Sahlberg 已提交
382
    }
P
Peter Lieven 已提交
383
#if defined(LIBISCSI_FEATURE_IOVECTOR)
384
    scsi_task_set_iov_in(iTask.task, (struct scsi_iovec *) iov->iov, iov->niov);
P
Peter Lieven 已提交
385
#else
386 387 388 389
    for (i = 0; i < iov->niov; i++) {
        scsi_task_add_data_in_buffer(iTask.task,
                                     iov->iov[i].iov_len,
                                     iov->iov[i].iov_base);
R
Ronnie Sahlberg 已提交
390
    }
P
Peter Lieven 已提交
391
#endif
392

393 394 395
    while (!iTask.complete) {
        iscsi_set_events(iscsilun);
        qemu_coroutine_yield();
396
    }
R
Ronnie Sahlberg 已提交
397

398 399 400
    if (iTask.task != NULL) {
        scsi_free_scsi_task(iTask.task);
        iTask.task = NULL;
R
Ronnie Sahlberg 已提交
401 402
    }

403
    if (iTask.do_retry) {
404
        iTask.complete = 0;
405
        goto retry;
R
Ronnie Sahlberg 已提交
406 407
    }

408 409
    if (iTask.status != SCSI_STATUS_GOOD) {
        return -EIO;
410 411 412 413 414
    }

    return 0;
}

415
static int coroutine_fn iscsi_co_flush(BlockDriverState *bs)
416 417
{
    IscsiLun *iscsilun = bs->opaque;
418
    struct IscsiTask iTask;
419

420
    iscsi_co_init_iscsitask(iscsilun, &iTask);
421

422 423 424
retry:
    if (iscsi_synchronizecache10_task(iscsilun->iscsi, iscsilun->lun, 0, 0, 0,
                                      0, iscsi_co_generic_cb, &iTask) == NULL) {
425
        return -ENOMEM;
426
    }
427

428 429 430 431
    while (!iTask.complete) {
        iscsi_set_events(iscsilun);
        qemu_coroutine_yield();
    }
432

433 434 435
    if (iTask.task != NULL) {
        scsi_free_scsi_task(iTask.task);
        iTask.task = NULL;
R
Ronnie Sahlberg 已提交
436 437
    }

438
    if (iTask.do_retry) {
439
        iTask.complete = 0;
440 441
        goto retry;
    }
R
Ronnie Sahlberg 已提交
442

443 444 445 446 447
    if (iTask.status != SCSI_STATUS_GOOD) {
        return -EIO;
    }

    return 0;
R
Ronnie Sahlberg 已提交
448 449
}

450 451 452 453 454 455 456
#ifdef __linux__
static void
iscsi_aio_ioctl_cb(struct iscsi_context *iscsi, int status,
                     void *command_data, void *opaque)
{
    IscsiAIOCB *acb = opaque;

457 458 459
    g_free(acb->buf);
    acb->buf = NULL;

460
    if (acb->canceled != 0) {
461 462 463 464 465 466 467 468 469 470 471 472 473 474 475 476 477 478 479 480 481 482 483 484 485 486 487
        return;
    }

    acb->status = 0;
    if (status < 0) {
        error_report("Failed to ioctl(SG_IO) to iSCSI lun. %s",
                     iscsi_get_error(iscsi));
        acb->status = -EIO;
    }

    acb->ioh->driver_status = 0;
    acb->ioh->host_status   = 0;
    acb->ioh->resid         = 0;

#define SG_ERR_DRIVER_SENSE    0x08

    if (status == SCSI_STATUS_CHECK_CONDITION && acb->task->datain.size >= 2) {
        int ss;

        acb->ioh->driver_status |= SG_ERR_DRIVER_SENSE;

        acb->ioh->sb_len_wr = acb->task->datain.size - 2;
        ss = (acb->ioh->mx_sb_len >= acb->ioh->sb_len_wr) ?
             acb->ioh->mx_sb_len : acb->ioh->sb_len_wr;
        memcpy(acb->ioh->sbp, &acb->task->datain.data[2], ss);
    }

488
    iscsi_schedule_bh(acb);
489 490 491 492 493 494 495 496 497 498 499 500 501
}

static BlockDriverAIOCB *iscsi_aio_ioctl(BlockDriverState *bs,
        unsigned long int req, void *buf,
        BlockDriverCompletionFunc *cb, void *opaque)
{
    IscsiLun *iscsilun = bs->opaque;
    struct iscsi_context *iscsi = iscsilun->iscsi;
    struct iscsi_data data;
    IscsiAIOCB *acb;

    assert(req == SG_IO);

S
Stefan Hajnoczi 已提交
502
    acb = qemu_aio_get(&iscsi_aiocb_info, bs, cb, opaque);
503 504 505

    acb->iscsilun = iscsilun;
    acb->canceled    = 0;
506 507
    acb->bh          = NULL;
    acb->status      = -EINPROGRESS;
508 509 510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528 529 530 531 532 533 534 535
    acb->buf         = NULL;
    acb->ioh         = buf;

    acb->task = malloc(sizeof(struct scsi_task));
    if (acb->task == NULL) {
        error_report("iSCSI: Failed to allocate task for scsi command. %s",
                     iscsi_get_error(iscsi));
        qemu_aio_release(acb);
        return NULL;
    }
    memset(acb->task, 0, sizeof(struct scsi_task));

    switch (acb->ioh->dxfer_direction) {
    case SG_DXFER_TO_DEV:
        acb->task->xfer_dir = SCSI_XFER_WRITE;
        break;
    case SG_DXFER_FROM_DEV:
        acb->task->xfer_dir = SCSI_XFER_READ;
        break;
    default:
        acb->task->xfer_dir = SCSI_XFER_NONE;
        break;
    }

    acb->task->cdb_size = acb->ioh->cmd_len;
    memcpy(&acb->task->cdb[0], acb->ioh->cmdp, acb->ioh->cmd_len);
    acb->task->expxferlen = acb->ioh->dxfer_len;

536
    data.size = 0;
537
    if (acb->task->xfer_dir == SCSI_XFER_WRITE) {
538 539 540 541 542 543 544 545 546 547 548 549 550 551 552 553 554
        if (acb->ioh->iovec_count == 0) {
            data.data = acb->ioh->dxferp;
            data.size = acb->ioh->dxfer_len;
        } else {
#if defined(LIBISCSI_FEATURE_IOVECTOR)
            scsi_task_set_iov_out(acb->task,
                                 (struct scsi_iovec *) acb->ioh->dxferp,
                                 acb->ioh->iovec_count);
#else
            struct iovec *iov = (struct iovec *)acb->ioh->dxferp;

            acb->buf = g_malloc(acb->ioh->dxfer_len);
            data.data = acb->buf;
            data.size = iov_to_buf(iov, acb->ioh->iovec_count, 0,
                                   acb->buf, acb->ioh->dxfer_len);
#endif
        }
555
    }
556

557 558
    if (iscsi_scsi_command_async(iscsi, iscsilun->lun, acb->task,
                                 iscsi_aio_ioctl_cb,
559
                                 (data.size > 0) ? &data : NULL,
560 561 562 563 564 565 566 567
                                 acb) != 0) {
        scsi_free_scsi_task(acb->task);
        qemu_aio_release(acb);
        return NULL;
    }

    /* tell libiscsi to read straight into the buffer we got from ioctl */
    if (acb->task->xfer_dir == SCSI_XFER_READ) {
568 569 570 571 572 573 574 575 576 577 578 579 580 581 582 583 584 585 586 587
        if (acb->ioh->iovec_count == 0) {
            scsi_task_add_data_in_buffer(acb->task,
                                         acb->ioh->dxfer_len,
                                         acb->ioh->dxferp);
        } else {
#if defined(LIBISCSI_FEATURE_IOVECTOR)
            scsi_task_set_iov_in(acb->task,
                                 (struct scsi_iovec *) acb->ioh->dxferp,
                                 acb->ioh->iovec_count);
#else
            int i;
            for (i = 0; i < acb->ioh->iovec_count; i++) {
                struct iovec *iov = (struct iovec *)acb->ioh->dxferp;

                scsi_task_add_data_in_buffer(acb->task,
                    iov[i].iov_len,
                    iov[i].iov_base);
            }
#endif
        }
588 589 590 591 592 593 594
    }

    iscsi_set_events(iscsilun);

    return &acb->common;
}

595 596 597 598 599 600 601

static void ioctl_cb(void *opaque, int status)
{
    int *p_status = opaque;
    *p_status = status;
}

602 603 604
static int iscsi_ioctl(BlockDriverState *bs, unsigned long int req, void *buf)
{
    IscsiLun *iscsilun = bs->opaque;
605
    int status;
606 607 608 609 610 611 612 613

    switch (req) {
    case SG_GET_VERSION_NUM:
        *(int *)buf = 30000;
        break;
    case SG_GET_SCSI_ID:
        ((struct sg_scsi_id *)buf)->scsi_type = iscsilun->type;
        break;
614 615 616 617 618 619 620 621 622
    case SG_IO:
        status = -EINPROGRESS;
        iscsi_aio_ioctl(bs, req, buf, ioctl_cb, &status);

        while (status == -EINPROGRESS) {
            qemu_aio_wait();
        }

        return 0;
623 624 625 626 627 628 629
    default:
        return -1;
    }
    return 0;
}
#endif

R
Ronnie Sahlberg 已提交
630 631 632 633 634 635 636 637 638 639 640 641
static int64_t
iscsi_getlength(BlockDriverState *bs)
{
    IscsiLun *iscsilun = bs->opaque;
    int64_t len;

    len  = iscsilun->num_blocks;
    len *= iscsilun->block_size;

    return len;
}

642
#if defined(LIBISCSI_FEATURE_IOVECTOR)
643

P
Peter Lieven 已提交
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
static int64_t coroutine_fn iscsi_co_get_block_status(BlockDriverState *bs,
                                                  int64_t sector_num,
                                                  int nb_sectors, int *pnum)
{
    IscsiLun *iscsilun = bs->opaque;
    struct scsi_get_lba_status *lbas = NULL;
    struct scsi_lba_status_descriptor *lbasd = NULL;
    struct IscsiTask iTask;
    int64_t ret;

    iscsi_co_init_iscsitask(iscsilun, &iTask);

    if (!is_request_lun_aligned(sector_num, nb_sectors, iscsilun)) {
        ret = -EINVAL;
        goto out;
    }

    /* default to all sectors allocated */
    ret = BDRV_BLOCK_DATA;
    ret |= (sector_num << BDRV_SECTOR_BITS) | BDRV_BLOCK_OFFSET_VALID;
    *pnum = nb_sectors;

    /* LUN does not support logical block provisioning */
    if (iscsilun->lbpme == 0) {
        goto out;
    }

retry:
    if (iscsi_get_lba_status_task(iscsilun->iscsi, iscsilun->lun,
                                  sector_qemu2lun(sector_num, iscsilun),
                                  8 + 16, iscsi_co_generic_cb,
                                  &iTask) == NULL) {
676
        ret = -ENOMEM;
P
Peter Lieven 已提交
677 678 679 680 681 682 683 684 685 686 687 688 689
        goto out;
    }

    while (!iTask.complete) {
        iscsi_set_events(iscsilun);
        qemu_coroutine_yield();
    }

    if (iTask.do_retry) {
        if (iTask.task != NULL) {
            scsi_free_scsi_task(iTask.task);
            iTask.task = NULL;
        }
690
        iTask.complete = 0;
P
Peter Lieven 已提交
691 692 693 694 695 696 697
        goto retry;
    }

    if (iTask.status != SCSI_STATUS_GOOD) {
        /* in case the get_lba_status_callout fails (i.e.
         * because the device is busy or the cmd is not
         * supported) we pretend all blocks are allocated
S
Stefan Weil 已提交
698
         * for backwards compatibility */
P
Peter Lieven 已提交
699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718 719 720 721 722 723 724 725 726 727 728 729 730 731 732 733 734
        goto out;
    }

    lbas = scsi_datain_unmarshall(iTask.task);
    if (lbas == NULL) {
        ret = -EIO;
        goto out;
    }

    lbasd = &lbas->descriptors[0];

    if (sector_qemu2lun(sector_num, iscsilun) != lbasd->lba) {
        ret = -EIO;
        goto out;
    }

    *pnum = sector_lun2qemu(lbasd->num_blocks, iscsilun);
    if (*pnum > nb_sectors) {
        *pnum = nb_sectors;
    }

    if (lbasd->provisioning == SCSI_PROVISIONING_TYPE_DEALLOCATED ||
        lbasd->provisioning == SCSI_PROVISIONING_TYPE_ANCHORED) {
        ret &= ~BDRV_BLOCK_DATA;
        if (iscsilun->lbprz) {
            ret |= BDRV_BLOCK_ZERO;
        }
    }

out:
    if (iTask.task != NULL) {
        scsi_free_scsi_task(iTask.task);
    }
    return ret;
}

735
#endif /* LIBISCSI_FEATURE_IOVECTOR */
736

737 738 739 740 741 742 743 744 745 746 747 748 749 750 751 752 753 754
static int
coroutine_fn iscsi_co_discard(BlockDriverState *bs, int64_t sector_num,
                                   int nb_sectors)
{
    IscsiLun *iscsilun = bs->opaque;
    struct IscsiTask iTask;
    struct unmap_list list;

    if (!is_request_lun_aligned(sector_num, nb_sectors, iscsilun)) {
        return -EINVAL;
    }

    if (!iscsilun->lbp.lbpu) {
        /* UNMAP is not supported by the target */
        return 0;
    }

    list.lba = sector_qemu2lun(sector_num, iscsilun);
P
Peter Lieven 已提交
755
    list.num = sector_qemu2lun(nb_sectors, iscsilun);
756

P
Peter Lieven 已提交
757
    iscsi_co_init_iscsitask(iscsilun, &iTask);
758
retry:
P
Peter Lieven 已提交
759 760
    if (iscsi_unmap_task(iscsilun->iscsi, iscsilun->lun, 0, 0, &list, 1,
                     iscsi_co_generic_cb, &iTask) == NULL) {
761
        return -ENOMEM;
P
Peter Lieven 已提交
762
    }
763

P
Peter Lieven 已提交
764 765 766 767
    while (!iTask.complete) {
        iscsi_set_events(iscsilun);
        qemu_coroutine_yield();
    }
768

P
Peter Lieven 已提交
769 770 771 772
    if (iTask.task != NULL) {
        scsi_free_scsi_task(iTask.task);
        iTask.task = NULL;
    }
773

P
Peter Lieven 已提交
774
    if (iTask.do_retry) {
775
        iTask.complete = 0;
P
Peter Lieven 已提交
776 777
        goto retry;
    }
778

P
Peter Lieven 已提交
779 780 781 782 783 784
    if (iTask.status == SCSI_STATUS_CHECK_CONDITION) {
        /* the target might fail with a check condition if it
           is not happy with the alignment of the UNMAP request
           we silently fail in this case */
        return 0;
    }
785

P
Peter Lieven 已提交
786 787
    if (iTask.status != SCSI_STATUS_GOOD) {
        return -EIO;
788 789 790 791 792
    }

    return 0;
}

P
Peter Lieven 已提交
793 794 795 796 797 798 799 800 801 802 803 804 805 806 807
#if defined(SCSI_SENSE_ASCQ_CAPACITY_DATA_HAS_CHANGED)

static int
coroutine_fn iscsi_co_write_zeroes(BlockDriverState *bs, int64_t sector_num,
                                   int nb_sectors, BdrvRequestFlags flags)
{
    IscsiLun *iscsilun = bs->opaque;
    struct IscsiTask iTask;
    uint64_t lba;
    uint32_t nb_blocks;

    if (!is_request_lun_aligned(sector_num, nb_sectors, iscsilun)) {
        return -EINVAL;
    }

808 809 810 811 812 813 814
    if (!(flags & BDRV_REQ_MAY_UNMAP) && !iscsilun->has_write_same) {
        /* WRITE SAME without UNMAP is not supported by the target */
        return -ENOTSUP;
    }

    if ((flags & BDRV_REQ_MAY_UNMAP) && !iscsilun->lbp.lbpws) {
        /* WRITE SAME with UNMAP is not supported by the target */
P
Peter Lieven 已提交
815 816 817 818 819 820 821 822 823 824 825 826 827 828 829 830
        return -ENOTSUP;
    }

    lba = sector_qemu2lun(sector_num, iscsilun);
    nb_blocks = sector_qemu2lun(nb_sectors, iscsilun);

    if (iscsilun->zeroblock == NULL) {
        iscsilun->zeroblock = g_malloc0(iscsilun->block_size);
    }

    iscsi_co_init_iscsitask(iscsilun, &iTask);
retry:
    if (iscsi_writesame16_task(iscsilun->iscsi, iscsilun->lun, lba,
                               iscsilun->zeroblock, iscsilun->block_size,
                               nb_blocks, 0, !!(flags & BDRV_REQ_MAY_UNMAP),
                               0, 0, iscsi_co_generic_cb, &iTask) == NULL) {
831
        return -ENOMEM;
P
Peter Lieven 已提交
832 833 834 835 836 837 838
    }

    while (!iTask.complete) {
        iscsi_set_events(iscsilun);
        qemu_coroutine_yield();
    }

839 840 841 842 843 844 845 846 847
    if (iTask.status == SCSI_STATUS_CHECK_CONDITION &&
        iTask.task->sense.key == SCSI_SENSE_ILLEGAL_REQUEST &&
        iTask.task->sense.ascq == SCSI_SENSE_ASCQ_INVALID_OPERATION_CODE) {
        /* WRITE SAME is not supported by the target */
        iscsilun->has_write_same = false;
        scsi_free_scsi_task(iTask.task);
        return -ENOTSUP;
    }

P
Peter Lieven 已提交
848 849 850 851 852 853
    if (iTask.task != NULL) {
        scsi_free_scsi_task(iTask.task);
        iTask.task = NULL;
    }

    if (iTask.do_retry) {
854
        iTask.complete = 0;
P
Peter Lieven 已提交
855 856 857 858 859 860 861 862 863 864 865 866
        goto retry;
    }

    if (iTask.status != SCSI_STATUS_GOOD) {
        return -EIO;
    }

    return 0;
}

#endif /* SCSI_SENSE_ASCQ_CAPACITY_DATA_HAS_CHANGED */

867 868
static void parse_chap(struct iscsi_context *iscsi, const char *target,
                       Error **errp)
869 870 871 872 873 874 875 876
{
    QemuOptsList *list;
    QemuOpts *opts;
    const char *user = NULL;
    const char *password = NULL;

    list = qemu_find_opts("iscsi");
    if (!list) {
877
        return;
878 879 880 881 882 883
    }

    opts = qemu_opts_find(list, target);
    if (opts == NULL) {
        opts = QTAILQ_FIRST(&list->head);
        if (!opts) {
884
            return;
885 886 887 888 889
        }
    }

    user = qemu_opt_get(opts, "user");
    if (!user) {
890
        return;
891 892 893 894
    }

    password = qemu_opt_get(opts, "password");
    if (!password) {
895 896
        error_setg(errp, "CHAP username specified but no password was given");
        return;
897 898 899
    }

    if (iscsi_set_initiator_username_pwd(iscsi, user, password)) {
900
        error_setg(errp, "Failed to set initiator username and password");
901 902 903
    }
}

904 905
static void parse_header_digest(struct iscsi_context *iscsi, const char *target,
                                Error **errp)
906 907 908 909 910 911 912 913 914 915 916 917 918 919 920 921 922 923 924 925 926 927 928 929 930 931 932 933 934 935 936 937
{
    QemuOptsList *list;
    QemuOpts *opts;
    const char *digest = NULL;

    list = qemu_find_opts("iscsi");
    if (!list) {
        return;
    }

    opts = qemu_opts_find(list, target);
    if (opts == NULL) {
        opts = QTAILQ_FIRST(&list->head);
        if (!opts) {
            return;
        }
    }

    digest = qemu_opt_get(opts, "header-digest");
    if (!digest) {
        return;
    }

    if (!strcmp(digest, "CRC32C")) {
        iscsi_set_header_digest(iscsi, ISCSI_HEADER_DIGEST_CRC32C);
    } else if (!strcmp(digest, "NONE")) {
        iscsi_set_header_digest(iscsi, ISCSI_HEADER_DIGEST_NONE);
    } else if (!strcmp(digest, "CRC32C-NONE")) {
        iscsi_set_header_digest(iscsi, ISCSI_HEADER_DIGEST_CRC32C_NONE);
    } else if (!strcmp(digest, "NONE-CRC32C")) {
        iscsi_set_header_digest(iscsi, ISCSI_HEADER_DIGEST_NONE_CRC32C);
    } else {
938
        error_setg(errp, "Invalid header-digest setting : %s", digest);
939 940 941 942 943 944 945
    }
}

static char *parse_initiator_name(const char *target)
{
    QemuOptsList *list;
    QemuOpts *opts;
946 947 948
    const char *name;
    char *iscsi_name;
    UuidInfo *uuid_info;
949 950

    list = qemu_find_opts("iscsi");
951 952
    if (list) {
        opts = qemu_opts_find(list, target);
953
        if (!opts) {
954 955 956 957
            opts = QTAILQ_FIRST(&list->head);
        }
        if (opts) {
            name = qemu_opt_get(opts, "initiator-name");
958 959 960
            if (name) {
                return g_strdup(name);
            }
961 962 963
        }
    }

964 965 966
    uuid_info = qmp_query_uuid(NULL);
    if (strcmp(uuid_info->UUID, UUID_NONE) == 0) {
        name = qemu_get_vm_name();
967
    } else {
968
        name = uuid_info->UUID;
969
    }
970 971 972 973
    iscsi_name = g_strdup_printf("iqn.2008-11.org.linux-kvm%s%s",
                                 name ? ":" : "", name ? name : "");
    qapi_free_UuidInfo(uuid_info);
    return iscsi_name;
974 975
}

976 977 978 979 980 981 982 983 984 985 986 987 988 989 990
#if defined(LIBISCSI_FEATURE_NOP_COUNTER)
static void iscsi_nop_timed_event(void *opaque)
{
    IscsiLun *iscsilun = opaque;

    if (iscsi_get_nops_in_flight(iscsilun->iscsi) > MAX_NOP_FAILURES) {
        error_report("iSCSI: NOP timeout. Reconnecting...");
        iscsi_reconnect(iscsilun->iscsi);
    }

    if (iscsi_nop_out_async(iscsilun->iscsi, NULL, NULL, 0, NULL) != 0) {
        error_report("iSCSI: failed to sent NOP-Out. Disabling NOP messages.");
        return;
    }

991
    timer_mod(iscsilun->nop_timer, qemu_clock_get_ms(QEMU_CLOCK_REALTIME) + NOP_INTERVAL);
992 993 994 995
    iscsi_set_events(iscsilun);
}
#endif

996
static void iscsi_readcapacity_sync(IscsiLun *iscsilun, Error **errp)
P
Peter Lieven 已提交
997 998 999 1000 1001 1002
{
    struct scsi_task *task = NULL;
    struct scsi_readcapacity10 *rc10 = NULL;
    struct scsi_readcapacity16 *rc16 = NULL;
    int retries = ISCSI_CMD_RETRIES; 

1003 1004 1005 1006
    do {
        if (task != NULL) {
            scsi_free_scsi_task(task);
            task = NULL;
P
Peter Lieven 已提交
1007
        }
1008 1009 1010 1011 1012 1013 1014

        switch (iscsilun->type) {
        case TYPE_DISK:
            task = iscsi_readcapacity16_sync(iscsilun->iscsi, iscsilun->lun);
            if (task != NULL && task->status == SCSI_STATUS_GOOD) {
                rc16 = scsi_datain_unmarshall(task);
                if (rc16 == NULL) {
1015
                    error_setg(errp, "iSCSI: Failed to unmarshall readcapacity16 data.");
1016 1017 1018
                } else {
                    iscsilun->block_size = rc16->block_length;
                    iscsilun->num_blocks = rc16->returned_lba + 1;
1019 1020
                    iscsilun->lbpme = rc16->lbpme;
                    iscsilun->lbprz = rc16->lbprz;
1021 1022 1023 1024 1025 1026 1027 1028
                }
            }
            break;
        case TYPE_ROM:
            task = iscsi_readcapacity10_sync(iscsilun->iscsi, iscsilun->lun, 0, 0);
            if (task != NULL && task->status == SCSI_STATUS_GOOD) {
                rc10 = scsi_datain_unmarshall(task);
                if (rc10 == NULL) {
1029
                    error_setg(errp, "iSCSI: Failed to unmarshall readcapacity10 data.");
1030 1031 1032 1033 1034 1035 1036 1037 1038 1039 1040 1041
                } else {
                    iscsilun->block_size = rc10->block_size;
                    if (rc10->lba == 0) {
                        /* blank disk loaded */
                        iscsilun->num_blocks = 0;
                    } else {
                        iscsilun->num_blocks = rc10->lba + 1;
                    }
                }
            }
            break;
        default:
1042
            return;
P
Peter Lieven 已提交
1043
        }
1044 1045 1046
    } while (task != NULL && task->status == SCSI_STATUS_CHECK_CONDITION
             && task->sense.key == SCSI_SENSE_UNIT_ATTENTION
             && retries-- > 0);
P
Peter Lieven 已提交
1047

1048
    if (task == NULL || task->status != SCSI_STATUS_GOOD) {
1049
        error_setg(errp, "iSCSI: failed to send readcapacity10 command.");
1050
    }
P
Peter Lieven 已提交
1051 1052 1053 1054 1055
    if (task) {
        scsi_free_scsi_task(task);
    }
}

1056 1057 1058 1059 1060 1061 1062 1063 1064 1065 1066 1067 1068 1069
/* TODO Convert to fine grained options */
static QemuOptsList runtime_opts = {
    .name = "iscsi",
    .head = QTAILQ_HEAD_INITIALIZER(runtime_opts.head),
    .desc = {
        {
            .name = "filename",
            .type = QEMU_OPT_STRING,
            .help = "URL to the iscsi image",
        },
        { /* end of list */ }
    },
};

P
Paolo Bonzini 已提交
1070
static struct scsi_task *iscsi_do_inquiry(struct iscsi_context *iscsi, int lun,
1071
                                          int evpd, int pc, void **inq, Error **errp)
P
Paolo Bonzini 已提交
1072 1073 1074 1075 1076 1077 1078 1079 1080 1081 1082 1083 1084
{
    int full_size;
    struct scsi_task *task = NULL;
    task = iscsi_inquiry_sync(iscsi, lun, evpd, pc, 64);
    if (task == NULL || task->status != SCSI_STATUS_GOOD) {
        goto fail;
    }
    full_size = scsi_datain_getfullsize(task);
    if (full_size > task->datain.size) {
        scsi_free_scsi_task(task);

        /* we need more data for the full list */
        task = iscsi_inquiry_sync(iscsi, lun, evpd, pc, full_size);
1085 1086 1087
        if (task == NULL || task->status != SCSI_STATUS_GOOD) {
            goto fail;
        }
P
Paolo Bonzini 已提交
1088
    }
1089

1090 1091 1092 1093 1094 1095
    *inq = scsi_datain_unmarshall(task);
    if (*inq == NULL) {
        error_setg(errp, "iSCSI: failed to unmarshall inquiry datain blob");
        goto fail;
    }

P
Paolo Bonzini 已提交
1096
    return task;
1097 1098

fail:
1099 1100
    error_setg(errp, "iSCSI: Inquiry command failed : %s",
               iscsi_get_error(iscsi));
1101
    if (task != NULL) {
P
Paolo Bonzini 已提交
1102 1103 1104
        scsi_free_scsi_task(task);
    }
    return NULL;
1105 1106
}

R
Ronnie Sahlberg 已提交
1107 1108 1109
/*
 * We support iscsi url's on the form
 * iscsi://[<username>%<password>@]<host>[:<port>]/<targetname>/<lun>
1110 1111 1112 1113
 *
 * Note: flags are currently not used by iscsi_open.  If this function
 * is changed such that flags are used, please examine iscsi_reopen_prepare()
 * to see if needs to be changed as well.
R
Ronnie Sahlberg 已提交
1114
 */
M
Max Reitz 已提交
1115 1116
static int iscsi_open(BlockDriverState *bs, QDict *options, int flags,
                      Error **errp)
R
Ronnie Sahlberg 已提交
1117 1118 1119 1120
{
    IscsiLun *iscsilun = bs->opaque;
    struct iscsi_context *iscsi = NULL;
    struct iscsi_url *iscsi_url = NULL;
P
Peter Lieven 已提交
1121 1122
    struct scsi_task *task = NULL;
    struct scsi_inquiry_standard *inq = NULL;
1123
    struct scsi_inquiry_supported_pages *inq_vpd;
1124
    char *initiator_name = NULL;
1125 1126 1127
    QemuOpts *opts;
    Error *local_err = NULL;
    const char *filename;
1128
    int i, ret;
R
Ronnie Sahlberg 已提交
1129 1130

    if ((BDRV_SECTOR_SIZE % 512) != 0) {
1131 1132 1133
        error_setg(errp, "iSCSI: Invalid BDRV_SECTOR_SIZE. "
                   "BDRV_SECTOR_SIZE(%lld) is not a multiple "
                   "of 512", BDRV_SECTOR_SIZE);
R
Ronnie Sahlberg 已提交
1134 1135 1136
        return -EINVAL;
    }

1137
    opts = qemu_opts_create(&runtime_opts, NULL, 0, &error_abort);
1138
    qemu_opts_absorb_qdict(opts, options, &local_err);
1139
    if (local_err) {
1140
        error_propagate(errp, local_err);
1141 1142 1143 1144 1145 1146
        ret = -EINVAL;
        goto out;
    }

    filename = qemu_opt_get(opts, "filename");

R
Ronnie Sahlberg 已提交
1147 1148
    iscsi_url = iscsi_parse_full_url(iscsi, filename);
    if (iscsi_url == NULL) {
1149
        error_setg(errp, "Failed to parse URL : %s", filename);
R
Ronnie Sahlberg 已提交
1150
        ret = -EINVAL;
1151
        goto out;
R
Ronnie Sahlberg 已提交
1152 1153
    }

1154 1155 1156 1157 1158 1159
    memset(iscsilun, 0, sizeof(IscsiLun));

    initiator_name = parse_initiator_name(iscsi_url->target);

    iscsi = iscsi_create_context(initiator_name);
    if (iscsi == NULL) {
1160
        error_setg(errp, "iSCSI: Failed to create iSCSI context.");
1161
        ret = -ENOMEM;
1162
        goto out;
1163 1164
    }

R
Ronnie Sahlberg 已提交
1165
    if (iscsi_set_targetname(iscsi, iscsi_url->target)) {
1166
        error_setg(errp, "iSCSI: Failed to set target name.");
R
Ronnie Sahlberg 已提交
1167
        ret = -EINVAL;
1168
        goto out;
R
Ronnie Sahlberg 已提交
1169 1170 1171 1172 1173 1174
    }

    if (iscsi_url->user != NULL) {
        ret = iscsi_set_initiator_username_pwd(iscsi, iscsi_url->user,
                                              iscsi_url->passwd);
        if (ret != 0) {
1175
            error_setg(errp, "Failed to set initiator username and password");
R
Ronnie Sahlberg 已提交
1176
            ret = -EINVAL;
1177
            goto out;
R
Ronnie Sahlberg 已提交
1178 1179
        }
    }
1180 1181

    /* check if we got CHAP username/password via the options */
1182 1183 1184
    parse_chap(iscsi, iscsi_url->target, &local_err);
    if (local_err != NULL) {
        error_propagate(errp, local_err);
1185
        ret = -EINVAL;
1186
        goto out;
1187 1188
    }

R
Ronnie Sahlberg 已提交
1189
    if (iscsi_set_session_type(iscsi, ISCSI_SESSION_NORMAL) != 0) {
1190
        error_setg(errp, "iSCSI: Failed to set session type to normal.");
R
Ronnie Sahlberg 已提交
1191
        ret = -EINVAL;
1192
        goto out;
R
Ronnie Sahlberg 已提交
1193 1194 1195 1196
    }

    iscsi_set_header_digest(iscsi, ISCSI_HEADER_DIGEST_NONE_CRC32C);

1197
    /* check if we got HEADER_DIGEST via the options */
1198 1199 1200 1201 1202 1203
    parse_header_digest(iscsi, iscsi_url->target, &local_err);
    if (local_err != NULL) {
        error_propagate(errp, local_err);
        ret = -EINVAL;
        goto out;
    }
1204

P
Peter Lieven 已提交
1205
    if (iscsi_full_connect_sync(iscsi, iscsi_url->portal, iscsi_url->lun) != 0) {
1206
        error_setg(errp, "iSCSI: Failed to connect to LUN : %s",
P
Peter Lieven 已提交
1207 1208 1209 1210
            iscsi_get_error(iscsi));
        ret = -EINVAL;
        goto out;
    }
R
Ronnie Sahlberg 已提交
1211 1212 1213

    iscsilun->iscsi = iscsi;
    iscsilun->lun   = iscsi_url->lun;
1214
    iscsilun->has_write_same = true;
R
Ronnie Sahlberg 已提交
1215

1216 1217 1218
    task = iscsi_do_inquiry(iscsilun->iscsi, iscsilun->lun, 0, 0,
                            (void **) &inq, errp);
    if (task == NULL) {
R
Ronnie Sahlberg 已提交
1219
        ret = -EINVAL;
1220
        goto out;
R
Ronnie Sahlberg 已提交
1221
    }
P
Peter Lieven 已提交
1222
    iscsilun->type = inq->periperal_device_type;
1223 1224
    scsi_free_scsi_task(task);
    task = NULL;
P
Peter Lieven 已提交
1225

1226 1227 1228
    iscsi_readcapacity_sync(iscsilun, &local_err);
    if (local_err != NULL) {
        error_propagate(errp, local_err);
P
Peter Lieven 已提交
1229
        goto out;
P
Peter Lieven 已提交
1230
    }
1231
    bs->total_sectors = sector_lun2qemu(iscsilun->num_blocks, iscsilun);
P
Paolo Bonzini 已提交
1232
    bs->request_alignment = iscsilun->block_size;
P
Peter Lieven 已提交
1233

1234 1235 1236 1237 1238 1239 1240 1241 1242
    /* Medium changer or tape. We dont have any emulation for this so this must
     * be sg ioctl compatible. We force it to be sg, otherwise qemu will try
     * to read from the device to guess the image format.
     */
    if (iscsilun->type == TYPE_MEDIUM_CHANGER ||
        iscsilun->type == TYPE_TAPE) {
        bs->sg = 1;
    }

1243 1244 1245 1246 1247 1248
    task = iscsi_do_inquiry(iscsilun->iscsi, iscsilun->lun, 1,
                            SCSI_INQUIRY_PAGECODE_SUPPORTED_VPD_PAGES,
                            (void **) &inq_vpd, errp);
    if (task == NULL) {
        ret = -EINVAL;
        goto out;
1249
    }
1250 1251 1252
    for (i = 0; i < inq_vpd->num_pages; i++) {
        struct scsi_task *inq_task;
        struct scsi_inquiry_logical_block_provisioning *inq_lbp;
1253
        struct scsi_inquiry_block_limits *inq_bl;
1254 1255 1256 1257 1258 1259 1260 1261 1262 1263 1264 1265 1266 1267 1268 1269 1270 1271 1272 1273 1274 1275 1276 1277 1278 1279 1280
        switch (inq_vpd->pages[i]) {
        case SCSI_INQUIRY_PAGECODE_LOGICAL_BLOCK_PROVISIONING:
            inq_task = iscsi_do_inquiry(iscsilun->iscsi, iscsilun->lun, 1,
                                        SCSI_INQUIRY_PAGECODE_LOGICAL_BLOCK_PROVISIONING,
                                        (void **) &inq_lbp, errp);
            if (inq_task == NULL) {
                ret = -EINVAL;
                goto out;
            }
            memcpy(&iscsilun->lbp, inq_lbp,
                   sizeof(struct scsi_inquiry_logical_block_provisioning));
            scsi_free_scsi_task(inq_task);
            break;
        case SCSI_INQUIRY_PAGECODE_BLOCK_LIMITS:
            inq_task = iscsi_do_inquiry(iscsilun->iscsi, iscsilun->lun, 1,
                                    SCSI_INQUIRY_PAGECODE_BLOCK_LIMITS,
                                    (void **) &inq_bl, errp);
            if (inq_task == NULL) {
                ret = -EINVAL;
                goto out;
            }
            memcpy(&iscsilun->bl, inq_bl,
                   sizeof(struct scsi_inquiry_block_limits));
            scsi_free_scsi_task(inq_task);
            break;
        default:
            break;
1281 1282
        }
    }
1283 1284
    scsi_free_scsi_task(task);
    task = NULL;
1285

1286 1287
#if defined(LIBISCSI_FEATURE_NOP_COUNTER)
    /* Set up a timer for sending out iSCSI NOPs */
1288 1289
    iscsilun->nop_timer = timer_new_ms(QEMU_CLOCK_REALTIME, iscsi_nop_timed_event, iscsilun);
    timer_mod(iscsilun->nop_timer, qemu_clock_get_ms(QEMU_CLOCK_REALTIME) + NOP_INTERVAL);
1290 1291
#endif

1292
out:
1293
    qemu_opts_del(opts);
1294 1295 1296
    if (initiator_name != NULL) {
        g_free(initiator_name);
    }
R
Ronnie Sahlberg 已提交
1297 1298 1299
    if (iscsi_url != NULL) {
        iscsi_destroy_url(iscsi_url);
    }
P
Peter Lieven 已提交
1300 1301 1302
    if (task != NULL) {
        scsi_free_scsi_task(task);
    }
1303 1304 1305 1306 1307 1308

    if (ret) {
        if (iscsi != NULL) {
            iscsi_destroy_context(iscsi);
        }
        memset(iscsilun, 0, sizeof(IscsiLun));
R
Ronnie Sahlberg 已提交
1309 1310 1311 1312 1313 1314 1315 1316 1317
    }
    return ret;
}

static void iscsi_close(BlockDriverState *bs)
{
    IscsiLun *iscsilun = bs->opaque;
    struct iscsi_context *iscsi = iscsilun->iscsi;

1318
    if (iscsilun->nop_timer) {
1319 1320
        timer_del(iscsilun->nop_timer);
        timer_free(iscsilun->nop_timer);
1321
    }
S
Stefan Hajnoczi 已提交
1322
    qemu_aio_set_fd_handler(iscsi_get_fd(iscsi), NULL, NULL, NULL);
R
Ronnie Sahlberg 已提交
1323
    iscsi_destroy_context(iscsi);
P
Peter Lieven 已提交
1324
    g_free(iscsilun->zeroblock);
R
Ronnie Sahlberg 已提交
1325 1326 1327
    memset(iscsilun, 0, sizeof(IscsiLun));
}

1328 1329 1330 1331 1332 1333 1334 1335 1336 1337 1338 1339 1340 1341 1342 1343 1344 1345 1346 1347 1348
static int iscsi_refresh_limits(BlockDriverState *bs)
{
    IscsiLun *iscsilun = bs->opaque;

    /* We don't actually refresh here, but just return data queried in
     * iscsi_open(): iscsi targets don't change their limits. */
    if (iscsilun->lbp.lbpu || iscsilun->lbp.lbpws) {
        if (iscsilun->bl.max_unmap < 0xffffffff) {
            bs->bl.max_discard = sector_lun2qemu(iscsilun->bl.max_unmap,
                                                 iscsilun);
        }
        bs->bl.discard_alignment = sector_lun2qemu(iscsilun->bl.opt_unmap_gran,
                                                   iscsilun);

        if (iscsilun->bl.max_ws_len < 0xffffffff) {
            bs->bl.max_write_zeroes = sector_lun2qemu(iscsilun->bl.max_ws_len,
                                                      iscsilun);
        }
        bs->bl.write_zeroes_alignment = sector_lun2qemu(iscsilun->bl.opt_unmap_gran,
                                                        iscsilun);
    }
1349 1350
    bs->bl.opt_transfer_length = sector_lun2qemu(iscsilun->bl.opt_xfer_len,
                                                 iscsilun);
1351 1352
    return 0;
}
1353

1354 1355 1356
/* Since iscsi_open() ignores bdrv_flags, there is nothing to do here in
 * prepare.  Note that this will not re-establish a connection with an iSCSI
 * target - it is effectively a NOP.  */
1357 1358 1359
static int iscsi_reopen_prepare(BDRVReopenState *state,
                                BlockReopenQueue *queue, Error **errp)
{
1360
    /* NOP */
1361 1362 1363
    return 0;
}

P
Peter Lieven 已提交
1364 1365 1366
static int iscsi_truncate(BlockDriverState *bs, int64_t offset)
{
    IscsiLun *iscsilun = bs->opaque;
1367
    Error *local_err = NULL;
P
Peter Lieven 已提交
1368 1369 1370 1371 1372

    if (iscsilun->type != TYPE_DISK) {
        return -ENOTSUP;
    }

1373 1374 1375 1376
    iscsi_readcapacity_sync(iscsilun, &local_err);
    if (local_err != NULL) {
        error_free(local_err);
        return -EIO;
P
Peter Lieven 已提交
1377 1378 1379 1380 1381 1382 1383 1384 1385
    }

    if (offset > iscsi_getlength(bs)) {
        return -EINVAL;
    }

    return 0;
}

1386 1387
static int iscsi_create(const char *filename, QEMUOptionParameter *options,
                        Error **errp)
P
Peter Lieven 已提交
1388 1389 1390
{
    int ret = 0;
    int64_t total_size = 0;
1391
    BlockDriverState *bs;
P
Peter Lieven 已提交
1392
    IscsiLun *iscsilun = NULL;
1393
    QDict *bs_options;
P
Peter Lieven 已提交
1394

1395
    bs = bdrv_new("");
P
Peter Lieven 已提交
1396 1397 1398 1399 1400 1401 1402 1403 1404

    /* Read out options */
    while (options && options->name) {
        if (!strcmp(options->name, "size")) {
            total_size = options->value.n / BDRV_SECTOR_SIZE;
        }
        options++;
    }

1405 1406
    bs->opaque = g_malloc0(sizeof(struct IscsiLun));
    iscsilun = bs->opaque;
P
Peter Lieven 已提交
1407

1408 1409
    bs_options = qdict_new();
    qdict_put(bs_options, "filename", qstring_from_str(filename));
M
Max Reitz 已提交
1410
    ret = iscsi_open(bs, bs_options, 0, NULL);
1411 1412
    QDECREF(bs_options);

P
Peter Lieven 已提交
1413 1414 1415
    if (ret != 0) {
        goto out;
    }
1416
    if (iscsilun->nop_timer) {
1417 1418
        timer_del(iscsilun->nop_timer);
        timer_free(iscsilun->nop_timer);
1419
    }
P
Peter Lieven 已提交
1420 1421 1422 1423
    if (iscsilun->type != TYPE_DISK) {
        ret = -ENODEV;
        goto out;
    }
1424
    if (bs->total_sectors < total_size) {
P
Peter Lieven 已提交
1425
        ret = -ENOSPC;
1426
        goto out;
P
Peter Lieven 已提交
1427 1428 1429 1430 1431 1432 1433
    }

    ret = 0;
out:
    if (iscsilun->iscsi != NULL) {
        iscsi_destroy_context(iscsilun->iscsi);
    }
1434 1435
    g_free(bs->opaque);
    bs->opaque = NULL;
F
Fam Zheng 已提交
1436
    bdrv_unref(bs);
P
Peter Lieven 已提交
1437 1438 1439
    return ret;
}

P
Peter Lieven 已提交
1440 1441 1442 1443 1444
static int iscsi_get_info(BlockDriverState *bs, BlockDriverInfo *bdi)
{
    IscsiLun *iscsilun = bs->opaque;
    bdi->unallocated_blocks_are_zero = !!iscsilun->lbprz;
    bdi->can_write_zeroes_with_unmap = iscsilun->lbprz && iscsilun->lbp.lbpws;
P
Peter Lieven 已提交
1445 1446 1447 1448 1449 1450 1451
    /* Guess the internal cluster (page) size of the iscsi target by the means
     * of opt_unmap_gran. Transfer the unmap granularity only if it has a
     * reasonable size for bdi->cluster_size */
    if (iscsilun->bl.opt_unmap_gran * iscsilun->block_size >= 64 * 1024 &&
        iscsilun->bl.opt_unmap_gran * iscsilun->block_size <= 16 * 1024 * 1024) {
        bdi->cluster_size = iscsilun->bl.opt_unmap_gran * iscsilun->block_size;
    }
P
Peter Lieven 已提交
1452 1453 1454
    return 0;
}

P
Peter Lieven 已提交
1455 1456 1457 1458 1459 1460 1461 1462 1463
static QEMUOptionParameter iscsi_create_options[] = {
    {
        .name = BLOCK_OPT_SIZE,
        .type = OPT_SIZE,
        .help = "Virtual disk size"
    },
    { NULL }
};

R
Ronnie Sahlberg 已提交
1464 1465 1466 1467 1468
static BlockDriver bdrv_iscsi = {
    .format_name     = "iscsi",
    .protocol_name   = "iscsi",

    .instance_size   = sizeof(IscsiLun),
1469
    .bdrv_needs_filename = true,
R
Ronnie Sahlberg 已提交
1470 1471
    .bdrv_file_open  = iscsi_open,
    .bdrv_close      = iscsi_close,
P
Peter Lieven 已提交
1472 1473
    .bdrv_create     = iscsi_create,
    .create_options  = iscsi_create_options,
1474
    .bdrv_reopen_prepare  = iscsi_reopen_prepare,
R
Ronnie Sahlberg 已提交
1475 1476

    .bdrv_getlength  = iscsi_getlength,
P
Peter Lieven 已提交
1477
    .bdrv_get_info   = iscsi_get_info,
P
Peter Lieven 已提交
1478
    .bdrv_truncate   = iscsi_truncate,
1479
    .bdrv_refresh_limits = iscsi_refresh_limits,
R
Ronnie Sahlberg 已提交
1480

1481
#if defined(LIBISCSI_FEATURE_IOVECTOR)
P
Peter Lieven 已提交
1482
    .bdrv_co_get_block_status = iscsi_co_get_block_status,
1483
#endif
1484
    .bdrv_co_discard      = iscsi_co_discard,
P
Peter Lieven 已提交
1485 1486 1487
#if defined(SCSI_SENSE_ASCQ_CAPACITY_DATA_HAS_CHANGED)
    .bdrv_co_write_zeroes = iscsi_co_write_zeroes,
#endif
1488 1489 1490
    .bdrv_co_readv         = iscsi_co_readv,
    .bdrv_co_writev        = iscsi_co_writev,
    .bdrv_co_flush_to_disk = iscsi_co_flush,
1491

1492 1493 1494 1495
#ifdef __linux__
    .bdrv_ioctl       = iscsi_ioctl,
    .bdrv_aio_ioctl   = iscsi_aio_ioctl,
#endif
R
Ronnie Sahlberg 已提交
1496 1497
};

1498 1499 1500 1501 1502 1503 1504 1505 1506 1507 1508 1509 1510 1511 1512 1513 1514 1515 1516 1517 1518 1519 1520 1521 1522 1523
static QemuOptsList qemu_iscsi_opts = {
    .name = "iscsi",
    .head = QTAILQ_HEAD_INITIALIZER(qemu_iscsi_opts.head),
    .desc = {
        {
            .name = "user",
            .type = QEMU_OPT_STRING,
            .help = "username for CHAP authentication to target",
        },{
            .name = "password",
            .type = QEMU_OPT_STRING,
            .help = "password for CHAP authentication to target",
        },{
            .name = "header-digest",
            .type = QEMU_OPT_STRING,
            .help = "HeaderDigest setting. "
                    "{CRC32C|CRC32C-NONE|NONE-CRC32C|NONE}",
        },{
            .name = "initiator-name",
            .type = QEMU_OPT_STRING,
            .help = "Initiator iqn name to use when connecting",
        },
        { /* end of list */ }
    },
};

R
Ronnie Sahlberg 已提交
1524 1525 1526
static void iscsi_block_init(void)
{
    bdrv_register(&bdrv_iscsi);
1527
    qemu_add_opts(&qemu_iscsi_opts);
R
Ronnie Sahlberg 已提交
1528 1529 1530
}

block_init(iscsi_block_init);