iscsi.c 42.7 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
    if (iTask.status == SCSI_STATUS_CHECK_CONDITION &&
        iTask.task->sense.key == SCSI_SENSE_ILLEGAL_REQUEST &&
841 842
        (iTask.task->sense.ascq == SCSI_SENSE_ASCQ_INVALID_OPERATION_CODE ||
         iTask.task->sense.ascq == SCSI_SENSE_ASCQ_INVALID_FIELD_IN_CDB)) {
843 844 845 846 847 848
        /* WRITE SAME is not supported by the target */
        iscsilun->has_write_same = false;
        scsi_free_scsi_task(iTask.task);
        return -ENOTSUP;
    }

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

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

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

    return 0;
}

#endif /* SCSI_SENSE_ASCQ_CAPACITY_DATA_HAS_CHANGED */

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

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

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

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

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

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

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

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

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

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

977 978 979 980 981 982 983 984 985 986 987 988 989 990 991
#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;
    }

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

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

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

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

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

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

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

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

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

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

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

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

    filename = qemu_opt_get(opts, "filename");

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

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

    initiator_name = parse_initiator_name(iscsi_url->target);

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

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

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

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

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

    iscsi_set_header_digest(iscsi, ISCSI_HEADER_DIGEST_NONE_CRC32C);

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

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

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

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

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

1235 1236 1237
    /* 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.
1238
     */
1239
    if (iscsilun->type != TYPE_DISK && iscsilun->type != TYPE_ROM) {
1240 1241 1242
        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);