iscsi.c 42.8 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 421 422 423
    if (bs->sg) {
        return 0;
    }

424
    iscsi_co_init_iscsitask(iscsilun, &iTask);
425

426 427 428
retry:
    if (iscsi_synchronizecache10_task(iscsilun->iscsi, iscsilun->lun, 0, 0, 0,
                                      0, iscsi_co_generic_cb, &iTask) == NULL) {
429
        return -ENOMEM;
430
    }
431

432 433 434 435
    while (!iTask.complete) {
        iscsi_set_events(iscsilun);
        qemu_coroutine_yield();
    }
436

437 438 439
    if (iTask.task != NULL) {
        scsi_free_scsi_task(iTask.task);
        iTask.task = NULL;
R
Ronnie Sahlberg 已提交
440 441
    }

442
    if (iTask.do_retry) {
443
        iTask.complete = 0;
444 445
        goto retry;
    }
R
Ronnie Sahlberg 已提交
446

447 448 449 450 451
    if (iTask.status != SCSI_STATUS_GOOD) {
        return -EIO;
    }

    return 0;
R
Ronnie Sahlberg 已提交
452 453
}

454 455 456 457 458 459 460
#ifdef __linux__
static void
iscsi_aio_ioctl_cb(struct iscsi_context *iscsi, int status,
                     void *command_data, void *opaque)
{
    IscsiAIOCB *acb = opaque;

461 462 463
    g_free(acb->buf);
    acb->buf = NULL;

464
    if (acb->canceled != 0) {
465 466 467 468 469 470 471 472 473 474 475 476 477 478 479 480 481 482 483 484 485 486 487 488 489 490 491
        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);
    }

492
    iscsi_schedule_bh(acb);
493 494 495 496 497 498 499 500 501 502 503 504 505
}

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 已提交
506
    acb = qemu_aio_get(&iscsi_aiocb_info, bs, cb, opaque);
507 508 509

    acb->iscsilun = iscsilun;
    acb->canceled    = 0;
510 511
    acb->bh          = NULL;
    acb->status      = -EINPROGRESS;
512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528 529 530 531 532 533 534 535 536 537 538 539
    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;

540
    data.size = 0;
541
    if (acb->task->xfer_dir == SCSI_XFER_WRITE) {
542 543 544 545 546 547 548 549 550 551 552 553 554 555 556 557 558
        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
        }
559
    }
560

561 562
    if (iscsi_scsi_command_async(iscsi, iscsilun->lun, acb->task,
                                 iscsi_aio_ioctl_cb,
563
                                 (data.size > 0) ? &data : NULL,
564 565 566 567 568 569 570 571
                                 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) {
572 573 574 575 576 577 578 579 580 581 582 583 584 585 586 587 588 589 590 591
        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
        }
592 593 594 595 596 597 598
    }

    iscsi_set_events(iscsilun);

    return &acb->common;
}

599 600 601 602 603 604 605

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

606 607 608
static int iscsi_ioctl(BlockDriverState *bs, unsigned long int req, void *buf)
{
    IscsiLun *iscsilun = bs->opaque;
609
    int status;
610 611 612 613 614 615 616 617

    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;
618 619 620 621 622 623 624 625 626
    case SG_IO:
        status = -EINPROGRESS;
        iscsi_aio_ioctl(bs, req, buf, ioctl_cb, &status);

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

        return 0;
627 628 629 630 631 632 633
    default:
        return -1;
    }
    return 0;
}
#endif

R
Ronnie Sahlberg 已提交
634 635 636 637 638 639 640 641 642 643 644 645
static int64_t
iscsi_getlength(BlockDriverState *bs)
{
    IscsiLun *iscsilun = bs->opaque;
    int64_t len;

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

    return len;
}

646
#if defined(LIBISCSI_FEATURE_IOVECTOR)
647

P
Peter Lieven 已提交
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
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) {
680
        ret = -ENOMEM;
P
Peter Lieven 已提交
681 682 683 684 685 686 687 688 689 690 691 692 693
        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;
        }
694
        iTask.complete = 0;
P
Peter Lieven 已提交
695 696 697 698 699 700 701
        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 已提交
702
         * for backwards compatibility */
P
Peter Lieven 已提交
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 735 736 737 738
        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;
}

739
#endif /* LIBISCSI_FEATURE_IOVECTOR */
740

741 742 743 744 745 746 747 748 749 750 751 752 753 754 755 756 757 758
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 已提交
759
    list.num = sector_qemu2lun(nb_sectors, iscsilun);
760

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

P
Peter Lieven 已提交
768 769 770 771
    while (!iTask.complete) {
        iscsi_set_events(iscsilun);
        qemu_coroutine_yield();
    }
772

P
Peter Lieven 已提交
773 774 775 776
    if (iTask.task != NULL) {
        scsi_free_scsi_task(iTask.task);
        iTask.task = NULL;
    }
777

P
Peter Lieven 已提交
778
    if (iTask.do_retry) {
779
        iTask.complete = 0;
P
Peter Lieven 已提交
780 781
        goto retry;
    }
782

P
Peter Lieven 已提交
783 784 785 786 787 788
    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;
    }
789

P
Peter Lieven 已提交
790 791
    if (iTask.status != SCSI_STATUS_GOOD) {
        return -EIO;
792 793 794 795 796
    }

    return 0;
}

P
Peter Lieven 已提交
797 798 799 800 801 802 803 804 805 806 807 808 809 810 811
#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;
    }

812 813 814 815 816 817 818
    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 已提交
819 820 821 822 823 824 825 826 827 828 829 830 831 832 833 834
        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) {
835
        return -ENOMEM;
P
Peter Lieven 已提交
836 837 838 839 840 841 842
    }

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

843 844
    if (iTask.status == SCSI_STATUS_CHECK_CONDITION &&
        iTask.task->sense.key == SCSI_SENSE_ILLEGAL_REQUEST &&
845 846
        (iTask.task->sense.ascq == SCSI_SENSE_ASCQ_INVALID_OPERATION_CODE ||
         iTask.task->sense.ascq == SCSI_SENSE_ASCQ_INVALID_FIELD_IN_CDB)) {
847 848 849 850 851 852
        /* WRITE SAME is not supported by the target */
        iscsilun->has_write_same = false;
        scsi_free_scsi_task(iTask.task);
        return -ENOTSUP;
    }

P
Peter Lieven 已提交
853 854 855 856 857 858
    if (iTask.task != NULL) {
        scsi_free_scsi_task(iTask.task);
        iTask.task = NULL;
    }

    if (iTask.do_retry) {
859
        iTask.complete = 0;
P
Peter Lieven 已提交
860 861 862 863 864 865 866 867 868 869 870 871
        goto retry;
    }

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

    return 0;
}

#endif /* SCSI_SENSE_ASCQ_CAPACITY_DATA_HAS_CHANGED */

872 873
static void parse_chap(struct iscsi_context *iscsi, const char *target,
                       Error **errp)
874 875 876 877 878 879 880 881
{
    QemuOptsList *list;
    QemuOpts *opts;
    const char *user = NULL;
    const char *password = NULL;

    list = qemu_find_opts("iscsi");
    if (!list) {
882
        return;
883 884 885 886 887 888
    }

    opts = qemu_opts_find(list, target);
    if (opts == NULL) {
        opts = QTAILQ_FIRST(&list->head);
        if (!opts) {
889
            return;
890 891 892 893 894
        }
    }

    user = qemu_opt_get(opts, "user");
    if (!user) {
895
        return;
896 897 898 899
    }

    password = qemu_opt_get(opts, "password");
    if (!password) {
900 901
        error_setg(errp, "CHAP username specified but no password was given");
        return;
902 903 904
    }

    if (iscsi_set_initiator_username_pwd(iscsi, user, password)) {
905
        error_setg(errp, "Failed to set initiator username and password");
906 907 908
    }
}

909 910
static void parse_header_digest(struct iscsi_context *iscsi, const char *target,
                                Error **errp)
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 938 939 940 941 942
{
    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 {
943
        error_setg(errp, "Invalid header-digest setting : %s", digest);
944 945 946 947 948 949 950
    }
}

static char *parse_initiator_name(const char *target)
{
    QemuOptsList *list;
    QemuOpts *opts;
951 952 953
    const char *name;
    char *iscsi_name;
    UuidInfo *uuid_info;
954 955

    list = qemu_find_opts("iscsi");
956 957
    if (list) {
        opts = qemu_opts_find(list, target);
958
        if (!opts) {
959 960 961 962
            opts = QTAILQ_FIRST(&list->head);
        }
        if (opts) {
            name = qemu_opt_get(opts, "initiator-name");
963 964 965
            if (name) {
                return g_strdup(name);
            }
966 967 968
        }
    }

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

981 982 983 984 985 986 987 988 989 990 991 992 993 994 995
#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;
    }

996
    timer_mod(iscsilun->nop_timer, qemu_clock_get_ms(QEMU_CLOCK_REALTIME) + NOP_INTERVAL);
997 998 999 1000
    iscsi_set_events(iscsilun);
}
#endif

1001
static void iscsi_readcapacity_sync(IscsiLun *iscsilun, Error **errp)
P
Peter Lieven 已提交
1002 1003 1004 1005 1006 1007
{
    struct scsi_task *task = NULL;
    struct scsi_readcapacity10 *rc10 = NULL;
    struct scsi_readcapacity16 *rc16 = NULL;
    int retries = ISCSI_CMD_RETRIES; 

1008 1009 1010 1011
    do {
        if (task != NULL) {
            scsi_free_scsi_task(task);
            task = NULL;
P
Peter Lieven 已提交
1012
        }
1013 1014 1015 1016 1017 1018 1019

        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) {
1020
                    error_setg(errp, "iSCSI: Failed to unmarshall readcapacity16 data.");
1021 1022 1023
                } else {
                    iscsilun->block_size = rc16->block_length;
                    iscsilun->num_blocks = rc16->returned_lba + 1;
1024 1025
                    iscsilun->lbpme = rc16->lbpme;
                    iscsilun->lbprz = rc16->lbprz;
1026 1027 1028 1029 1030 1031 1032 1033
                }
            }
            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) {
1034
                    error_setg(errp, "iSCSI: Failed to unmarshall readcapacity10 data.");
1035 1036 1037 1038 1039 1040 1041 1042 1043 1044 1045 1046
                } 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:
1047
            return;
P
Peter Lieven 已提交
1048
        }
1049 1050 1051
    } while (task != NULL && task->status == SCSI_STATUS_CHECK_CONDITION
             && task->sense.key == SCSI_SENSE_UNIT_ATTENTION
             && retries-- > 0);
P
Peter Lieven 已提交
1052

1053
    if (task == NULL || task->status != SCSI_STATUS_GOOD) {
1054
        error_setg(errp, "iSCSI: failed to send readcapacity10 command.");
1055
    }
P
Peter Lieven 已提交
1056 1057 1058 1059 1060
    if (task) {
        scsi_free_scsi_task(task);
    }
}

1061 1062 1063 1064 1065 1066 1067 1068 1069 1070 1071 1072 1073 1074
/* 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 已提交
1075
static struct scsi_task *iscsi_do_inquiry(struct iscsi_context *iscsi, int lun,
1076
                                          int evpd, int pc, void **inq, Error **errp)
P
Paolo Bonzini 已提交
1077 1078 1079 1080 1081 1082 1083 1084 1085 1086 1087 1088 1089
{
    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);
1090 1091 1092
        if (task == NULL || task->status != SCSI_STATUS_GOOD) {
            goto fail;
        }
P
Paolo Bonzini 已提交
1093
    }
1094

1095 1096 1097 1098 1099 1100
    *inq = scsi_datain_unmarshall(task);
    if (*inq == NULL) {
        error_setg(errp, "iSCSI: failed to unmarshall inquiry datain blob");
        goto fail;
    }

P
Paolo Bonzini 已提交
1101
    return task;
1102 1103

fail:
1104 1105 1106 1107
    if (!error_is_set(errp)) {
        error_setg(errp, "iSCSI: Inquiry command failed : %s",
                   iscsi_get_error(iscsi));
    }
1108
    if (task != NULL) {
P
Paolo Bonzini 已提交
1109 1110 1111
        scsi_free_scsi_task(task);
    }
    return NULL;
1112 1113
}

R
Ronnie Sahlberg 已提交
1114 1115 1116
/*
 * We support iscsi url's on the form
 * iscsi://[<username>%<password>@]<host>[:<port>]/<targetname>/<lun>
1117 1118 1119 1120
 *
 * 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 已提交
1121
 */
M
Max Reitz 已提交
1122 1123
static int iscsi_open(BlockDriverState *bs, QDict *options, int flags,
                      Error **errp)
R
Ronnie Sahlberg 已提交
1124 1125 1126 1127
{
    IscsiLun *iscsilun = bs->opaque;
    struct iscsi_context *iscsi = NULL;
    struct iscsi_url *iscsi_url = NULL;
P
Peter Lieven 已提交
1128 1129
    struct scsi_task *task = NULL;
    struct scsi_inquiry_standard *inq = NULL;
1130
    struct scsi_inquiry_supported_pages *inq_vpd;
1131
    char *initiator_name = NULL;
1132 1133 1134
    QemuOpts *opts;
    Error *local_err = NULL;
    const char *filename;
1135
    int i, ret;
R
Ronnie Sahlberg 已提交
1136 1137

    if ((BDRV_SECTOR_SIZE % 512) != 0) {
1138 1139 1140
        error_setg(errp, "iSCSI: Invalid BDRV_SECTOR_SIZE. "
                   "BDRV_SECTOR_SIZE(%lld) is not a multiple "
                   "of 512", BDRV_SECTOR_SIZE);
R
Ronnie Sahlberg 已提交
1141 1142 1143
        return -EINVAL;
    }

1144
    opts = qemu_opts_create(&runtime_opts, NULL, 0, &error_abort);
1145
    qemu_opts_absorb_qdict(opts, options, &local_err);
1146
    if (local_err) {
1147
        error_propagate(errp, local_err);
1148 1149 1150 1151 1152 1153
        ret = -EINVAL;
        goto out;
    }

    filename = qemu_opt_get(opts, "filename");

R
Ronnie Sahlberg 已提交
1154 1155
    iscsi_url = iscsi_parse_full_url(iscsi, filename);
    if (iscsi_url == NULL) {
1156
        error_setg(errp, "Failed to parse URL : %s", filename);
R
Ronnie Sahlberg 已提交
1157
        ret = -EINVAL;
1158
        goto out;
R
Ronnie Sahlberg 已提交
1159 1160
    }

1161 1162 1163 1164 1165 1166
    memset(iscsilun, 0, sizeof(IscsiLun));

    initiator_name = parse_initiator_name(iscsi_url->target);

    iscsi = iscsi_create_context(initiator_name);
    if (iscsi == NULL) {
1167
        error_setg(errp, "iSCSI: Failed to create iSCSI context.");
1168
        ret = -ENOMEM;
1169
        goto out;
1170 1171
    }

R
Ronnie Sahlberg 已提交
1172
    if (iscsi_set_targetname(iscsi, iscsi_url->target)) {
1173
        error_setg(errp, "iSCSI: Failed to set target name.");
R
Ronnie Sahlberg 已提交
1174
        ret = -EINVAL;
1175
        goto out;
R
Ronnie Sahlberg 已提交
1176 1177 1178 1179 1180 1181
    }

    if (iscsi_url->user != NULL) {
        ret = iscsi_set_initiator_username_pwd(iscsi, iscsi_url->user,
                                              iscsi_url->passwd);
        if (ret != 0) {
1182
            error_setg(errp, "Failed to set initiator username and password");
R
Ronnie Sahlberg 已提交
1183
            ret = -EINVAL;
1184
            goto out;
R
Ronnie Sahlberg 已提交
1185 1186
        }
    }
1187 1188

    /* check if we got CHAP username/password via the options */
1189 1190 1191
    parse_chap(iscsi, iscsi_url->target, &local_err);
    if (local_err != NULL) {
        error_propagate(errp, local_err);
1192
        ret = -EINVAL;
1193
        goto out;
1194 1195
    }

R
Ronnie Sahlberg 已提交
1196
    if (iscsi_set_session_type(iscsi, ISCSI_SESSION_NORMAL) != 0) {
1197
        error_setg(errp, "iSCSI: Failed to set session type to normal.");
R
Ronnie Sahlberg 已提交
1198
        ret = -EINVAL;
1199
        goto out;
R
Ronnie Sahlberg 已提交
1200 1201 1202 1203
    }

    iscsi_set_header_digest(iscsi, ISCSI_HEADER_DIGEST_NONE_CRC32C);

1204
    /* check if we got HEADER_DIGEST via the options */
1205 1206 1207 1208 1209 1210
    parse_header_digest(iscsi, iscsi_url->target, &local_err);
    if (local_err != NULL) {
        error_propagate(errp, local_err);
        ret = -EINVAL;
        goto out;
    }
1211

P
Peter Lieven 已提交
1212
    if (iscsi_full_connect_sync(iscsi, iscsi_url->portal, iscsi_url->lun) != 0) {
1213
        error_setg(errp, "iSCSI: Failed to connect to LUN : %s",
P
Peter Lieven 已提交
1214 1215 1216 1217
            iscsi_get_error(iscsi));
        ret = -EINVAL;
        goto out;
    }
R
Ronnie Sahlberg 已提交
1218 1219 1220

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

1223 1224 1225
    task = iscsi_do_inquiry(iscsilun->iscsi, iscsilun->lun, 0, 0,
                            (void **) &inq, errp);
    if (task == NULL) {
R
Ronnie Sahlberg 已提交
1226
        ret = -EINVAL;
1227
        goto out;
R
Ronnie Sahlberg 已提交
1228
    }
P
Peter Lieven 已提交
1229
    iscsilun->type = inq->periperal_device_type;
1230 1231
    scsi_free_scsi_task(task);
    task = NULL;
P
Peter Lieven 已提交
1232

1233 1234 1235
    iscsi_readcapacity_sync(iscsilun, &local_err);
    if (local_err != NULL) {
        error_propagate(errp, local_err);
P
Peter Lieven 已提交
1236
        goto out;
P
Peter Lieven 已提交
1237
    }
1238
    bs->total_sectors = sector_lun2qemu(iscsilun->num_blocks, iscsilun);
P
Paolo Bonzini 已提交
1239
    bs->request_alignment = iscsilun->block_size;
P
Peter Lieven 已提交
1240

1241 1242 1243
    /* We don't have any emulation for devices other than disks and CD-ROMs, 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.
1244
     */
1245
    if (iscsilun->type != TYPE_DISK && iscsilun->type != TYPE_ROM) {
1246 1247 1248
        bs->sg = 1;
    }

1249 1250 1251 1252 1253 1254
    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;
1255
    }
1256 1257 1258
    for (i = 0; i < inq_vpd->num_pages; i++) {
        struct scsi_task *inq_task;
        struct scsi_inquiry_logical_block_provisioning *inq_lbp;
1259
        struct scsi_inquiry_block_limits *inq_bl;
1260 1261 1262 1263 1264 1265 1266 1267 1268 1269 1270 1271 1272 1273 1274 1275 1276 1277 1278 1279 1280 1281 1282 1283 1284 1285 1286
        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;
1287 1288
        }
    }
1289 1290
    scsi_free_scsi_task(task);
    task = NULL;
1291

1292 1293
#if defined(LIBISCSI_FEATURE_NOP_COUNTER)
    /* Set up a timer for sending out iSCSI NOPs */
1294 1295
    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);
1296 1297
#endif

1298
out:
1299
    qemu_opts_del(opts);
1300 1301 1302
    if (initiator_name != NULL) {
        g_free(initiator_name);
    }
R
Ronnie Sahlberg 已提交
1303 1304 1305
    if (iscsi_url != NULL) {
        iscsi_destroy_url(iscsi_url);
    }
P
Peter Lieven 已提交
1306 1307 1308
    if (task != NULL) {
        scsi_free_scsi_task(task);
    }
1309 1310 1311 1312 1313 1314

    if (ret) {
        if (iscsi != NULL) {
            iscsi_destroy_context(iscsi);
        }
        memset(iscsilun, 0, sizeof(IscsiLun));
R
Ronnie Sahlberg 已提交
1315 1316 1317 1318 1319 1320 1321 1322 1323
    }
    return ret;
}

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

1324
    if (iscsilun->nop_timer) {
1325 1326
        timer_del(iscsilun->nop_timer);
        timer_free(iscsilun->nop_timer);
1327
    }
S
Stefan Hajnoczi 已提交
1328
    qemu_aio_set_fd_handler(iscsi_get_fd(iscsi), NULL, NULL, NULL);
R
Ronnie Sahlberg 已提交
1329
    iscsi_destroy_context(iscsi);
P
Peter Lieven 已提交
1330
    g_free(iscsilun->zeroblock);
R
Ronnie Sahlberg 已提交
1331 1332 1333
    memset(iscsilun, 0, sizeof(IscsiLun));
}

1334 1335 1336 1337 1338 1339
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. */
1340
    if (iscsilun->lbp.lbpu) {
1341 1342 1343 1344 1345 1346
        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);
1347
    }
1348

1349 1350 1351 1352 1353
    if (iscsilun->bl.max_ws_len < 0xffffffff) {
        bs->bl.max_write_zeroes = sector_lun2qemu(iscsilun->bl.max_ws_len,
                                                  iscsilun);
    }
    if (iscsilun->lbp.lbpws) {
1354 1355 1356
        bs->bl.write_zeroes_alignment = sector_lun2qemu(iscsilun->bl.opt_unmap_gran,
                                                        iscsilun);
    }
1357 1358
    bs->bl.opt_transfer_length = sector_lun2qemu(iscsilun->bl.opt_xfer_len,
                                                 iscsilun);
1359 1360
    return 0;
}
1361

1362 1363 1364
/* 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.  */
1365 1366 1367
static int iscsi_reopen_prepare(BDRVReopenState *state,
                                BlockReopenQueue *queue, Error **errp)
{
1368
    /* NOP */
1369 1370 1371
    return 0;
}

P
Peter Lieven 已提交
1372 1373 1374
static int iscsi_truncate(BlockDriverState *bs, int64_t offset)
{
    IscsiLun *iscsilun = bs->opaque;
1375
    Error *local_err = NULL;
P
Peter Lieven 已提交
1376 1377 1378 1379 1380

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

1381 1382 1383 1384
    iscsi_readcapacity_sync(iscsilun, &local_err);
    if (local_err != NULL) {
        error_free(local_err);
        return -EIO;
P
Peter Lieven 已提交
1385 1386 1387 1388 1389 1390 1391 1392 1393
    }

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

    return 0;
}

1394 1395
static int iscsi_create(const char *filename, QEMUOptionParameter *options,
                        Error **errp)
P
Peter Lieven 已提交
1396 1397 1398
{
    int ret = 0;
    int64_t total_size = 0;
1399
    BlockDriverState *bs;
P
Peter Lieven 已提交
1400
    IscsiLun *iscsilun = NULL;
1401
    QDict *bs_options;
P
Peter Lieven 已提交
1402

1403
    bs = bdrv_new("");
P
Peter Lieven 已提交
1404 1405 1406 1407 1408 1409 1410 1411 1412

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

1413 1414
    bs->opaque = g_malloc0(sizeof(struct IscsiLun));
    iscsilun = bs->opaque;
P
Peter Lieven 已提交
1415

1416 1417
    bs_options = qdict_new();
    qdict_put(bs_options, "filename", qstring_from_str(filename));
M
Max Reitz 已提交
1418
    ret = iscsi_open(bs, bs_options, 0, NULL);
1419 1420
    QDECREF(bs_options);

P
Peter Lieven 已提交
1421 1422 1423
    if (ret != 0) {
        goto out;
    }
1424
    if (iscsilun->nop_timer) {
1425 1426
        timer_del(iscsilun->nop_timer);
        timer_free(iscsilun->nop_timer);
1427
    }
P
Peter Lieven 已提交
1428 1429 1430 1431
    if (iscsilun->type != TYPE_DISK) {
        ret = -ENODEV;
        goto out;
    }
1432
    if (bs->total_sectors < total_size) {
P
Peter Lieven 已提交
1433
        ret = -ENOSPC;
1434
        goto out;
P
Peter Lieven 已提交
1435 1436 1437 1438 1439 1440 1441
    }

    ret = 0;
out:
    if (iscsilun->iscsi != NULL) {
        iscsi_destroy_context(iscsilun->iscsi);
    }
1442 1443
    g_free(bs->opaque);
    bs->opaque = NULL;
F
Fam Zheng 已提交
1444
    bdrv_unref(bs);
P
Peter Lieven 已提交
1445 1446 1447
    return ret;
}

P
Peter Lieven 已提交
1448 1449 1450 1451 1452
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 已提交
1453 1454 1455 1456 1457 1458 1459
    /* 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 已提交
1460 1461 1462
    return 0;
}

P
Peter Lieven 已提交
1463 1464 1465 1466 1467 1468 1469 1470 1471
static QEMUOptionParameter iscsi_create_options[] = {
    {
        .name = BLOCK_OPT_SIZE,
        .type = OPT_SIZE,
        .help = "Virtual disk size"
    },
    { NULL }
};

R
Ronnie Sahlberg 已提交
1472 1473 1474 1475 1476
static BlockDriver bdrv_iscsi = {
    .format_name     = "iscsi",
    .protocol_name   = "iscsi",

    .instance_size   = sizeof(IscsiLun),
1477
    .bdrv_needs_filename = true,
R
Ronnie Sahlberg 已提交
1478 1479
    .bdrv_file_open  = iscsi_open,
    .bdrv_close      = iscsi_close,
P
Peter Lieven 已提交
1480 1481
    .bdrv_create     = iscsi_create,
    .create_options  = iscsi_create_options,
1482
    .bdrv_reopen_prepare  = iscsi_reopen_prepare,
R
Ronnie Sahlberg 已提交
1483 1484

    .bdrv_getlength  = iscsi_getlength,
P
Peter Lieven 已提交
1485
    .bdrv_get_info   = iscsi_get_info,
P
Peter Lieven 已提交
1486
    .bdrv_truncate   = iscsi_truncate,
1487
    .bdrv_refresh_limits = iscsi_refresh_limits,
R
Ronnie Sahlberg 已提交
1488

1489
#if defined(LIBISCSI_FEATURE_IOVECTOR)
P
Peter Lieven 已提交
1490
    .bdrv_co_get_block_status = iscsi_co_get_block_status,
1491
#endif
1492
    .bdrv_co_discard      = iscsi_co_discard,
P
Peter Lieven 已提交
1493 1494 1495
#if defined(SCSI_SENSE_ASCQ_CAPACITY_DATA_HAS_CHANGED)
    .bdrv_co_write_zeroes = iscsi_co_write_zeroes,
#endif
1496 1497 1498
    .bdrv_co_readv         = iscsi_co_readv,
    .bdrv_co_writev        = iscsi_co_writev,
    .bdrv_co_flush_to_disk = iscsi_co_flush,
1499

1500 1501 1502 1503
#ifdef __linux__
    .bdrv_ioctl       = iscsi_ioctl,
    .bdrv_aio_ioctl   = iscsi_aio_ioctl,
#endif
R
Ronnie Sahlberg 已提交
1504 1505
};

1506 1507 1508 1509 1510 1511 1512 1513 1514 1515 1516 1517 1518 1519 1520 1521 1522 1523 1524 1525 1526 1527 1528 1529 1530 1531
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 已提交
1532 1533 1534
static void iscsi_block_init(void)
{
    bdrv_register(&bdrv_iscsi);
1535
    qemu_add_opts(&qemu_iscsi_opts);
R
Ronnie Sahlberg 已提交
1536 1537 1538
}

block_init(iscsi_block_init);