Statistics
| Branch: | Revision:

root / hw / spapr_vscsi.c @ 7267c094

History | View | Annotate | Download (27.8 kB)

1
/*
2
 * QEMU PowerPC pSeries Logical Partition (aka sPAPR) hardware System Emulator
3
 *
4
 * PAPR Virtual SCSI, aka ibmvscsi
5
 *
6
 * Copyright (c) 2010,2011 Benjamin Herrenschmidt, IBM Corporation.
7
 *
8
 * Permission is hereby granted, free of charge, to any person obtaining a copy
9
 * of this software and associated documentation files (the "Software"), to deal
10
 * in the Software without restriction, including without limitation the rights
11
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
12
 * copies of the Software, and to permit persons to whom the Software is
13
 * furnished to do so, subject to the following conditions:
14
 *
15
 * The above copyright notice and this permission notice shall be included in
16
 * all copies or substantial portions of the Software.
17
 *
18
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
19
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
20
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
21
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
22
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
23
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
24
 * THE SOFTWARE.
25
 *
26
 * TODO:
27
 *
28
 *  - Cleanups :-)
29
 *  - Sort out better how to assign devices to VSCSI instances
30
 *  - Fix residual counts
31
 *  - Add indirect descriptors support
32
 *  - Maybe do autosense (PAPR seems to mandate it, linux doesn't care)
33
 */
34
#include "hw.h"
35
#include "scsi.h"
36
#include "scsi-defs.h"
37
#include "net.h" /* Remove that when we can */
38
#include "srp.h"
39
#include "hw/qdev.h"
40
#include "hw/spapr.h"
41
#include "hw/spapr_vio.h"
42
#include "hw/ppc-viosrp.h"
43

    
44
#include <libfdt.h>
45

    
46
/*#define DEBUG_VSCSI*/
47

    
48
#ifdef DEBUG_VSCSI
49
#define dprintf(fmt, ...) \
50
    do { fprintf(stderr, fmt, ## __VA_ARGS__); } while (0)
51
#else
52
#define dprintf(fmt, ...) \
53
    do { } while (0)
54
#endif
55

    
56
/*
57
 * Virtual SCSI device
58
 */
59

    
60
/* Random numbers */
61
#define VSCSI_MAX_SECTORS       4096
62
#define VSCSI_REQ_LIMIT         24
63

    
64
#define SCSI_SENSE_BUF_SIZE     96
65
#define SRP_RSP_SENSE_DATA_LEN  18
66

    
67
typedef union vscsi_crq {
68
    struct viosrp_crq s;
69
    uint8_t raw[16];
70
} vscsi_crq;
71

    
72
typedef struct vscsi_req {
73
    vscsi_crq               crq;
74
    union viosrp_iu         iu;
75

    
76
    /* SCSI request tracking */
77
    SCSIRequest             *sreq;
78
    uint32_t                qtag; /* qemu tag != srp tag */
79
    int                     lun;
80
    int                     active;
81
    long                    data_len;
82
    int                     writing;
83
    int                     senselen;
84
    uint8_t                 sense[SCSI_SENSE_BUF_SIZE];
85

    
86
    /* RDMA related bits */
87
    uint8_t                 dma_fmt;
88
    struct srp_direct_buf   ext_desc;
89
    struct srp_direct_buf   *cur_desc;
90
    struct srp_indirect_buf *ind_desc;
91
    int                     local_desc;
92
    int                     total_desc;
93
} vscsi_req;
94

    
95

    
96
typedef struct {
97
    VIOsPAPRDevice vdev;
98
    SCSIBus bus;
99
    vscsi_req reqs[VSCSI_REQ_LIMIT];
100
} VSCSIState;
101

    
102
/* XXX Debug only */
103
static VSCSIState *dbg_vscsi_state;
104

    
105

    
106
static struct vscsi_req *vscsi_get_req(VSCSIState *s)
107
{
108
    vscsi_req *req;
109
    int i;
110

    
111
    for (i = 0; i < VSCSI_REQ_LIMIT; i++) {
112
        req = &s->reqs[i];
113
        if (!req->active) {
114
            memset(req, 0, sizeof(*req));
115
            req->qtag = i;
116
            req->active = 1;
117
            return req;
118
        }
119
    }
120
    return NULL;
121
}
122

    
123
static void vscsi_put_req(vscsi_req *req)
124
{
125
    if (req->sreq != NULL) {
126
        scsi_req_unref(req->sreq);
127
    }
128
    req->sreq = NULL;
129
    req->active = 0;
130
}
131

    
132
static void vscsi_decode_id_lun(uint64_t srp_lun, int *id, int *lun)
133
{
134
    /* XXX Figure that one out properly ! This is crackpot */
135
    *id = (srp_lun >> 56) & 0x7f;
136
    *lun = (srp_lun >> 48) & 0xff;
137
}
138

    
139
static int vscsi_send_iu(VSCSIState *s, vscsi_req *req,
140
                         uint64_t length, uint8_t format)
141
{
142
    long rc, rc1;
143

    
144
    /* First copy the SRP */
145
    rc = spapr_tce_dma_write(&s->vdev, req->crq.s.IU_data_ptr,
146
                             &req->iu, length);
147
    if (rc) {
148
        fprintf(stderr, "vscsi_send_iu: DMA write failure !\n");
149
    }
150

    
151
    req->crq.s.valid = 0x80;
152
    req->crq.s.format = format;
153
    req->crq.s.reserved = 0x00;
154
    req->crq.s.timeout = cpu_to_be16(0x0000);
155
    req->crq.s.IU_length = cpu_to_be16(length);
156
    req->crq.s.IU_data_ptr = req->iu.srp.rsp.tag; /* right byte order */
157

    
158
    if (rc == 0) {
159
        req->crq.s.status = 0x99; /* Just needs to be non-zero */
160
    } else {
161
        req->crq.s.status = 0x00;
162
    }
163

    
164
    rc1 = spapr_vio_send_crq(&s->vdev, req->crq.raw);
165
    if (rc1) {
166
        fprintf(stderr, "vscsi_send_iu: Error sending response\n");
167
        return rc1;
168
    }
169

    
170
    return rc;
171
}
172

    
173
static void vscsi_makeup_sense(VSCSIState *s, vscsi_req *req,
174
                               uint8_t key, uint8_t asc, uint8_t ascq)
175
{
176
    req->senselen = SRP_RSP_SENSE_DATA_LEN;
177

    
178
    /* Valid bit and 'current errors' */
179
    req->sense[0] = (0x1 << 7 | 0x70);
180
    /* Sense key */
181
    req->sense[2] = key;
182
    /* Additional sense length */
183
    req->sense[7] = 0xa; /* 10 bytes */
184
    /* Additional sense code */
185
    req->sense[12] = asc;
186
    req->sense[13] = ascq;
187
}
188

    
189
static int vscsi_send_rsp(VSCSIState *s, vscsi_req *req,
190
                          uint8_t status, int32_t res_in, int32_t res_out)
191
{
192
    union viosrp_iu *iu = &req->iu;
193
    uint64_t tag = iu->srp.rsp.tag;
194
    int total_len = sizeof(iu->srp.rsp);
195

    
196
    dprintf("VSCSI: Sending resp status: 0x%x, "
197
            "res_in: %d, res_out: %d\n", status, res_in, res_out);
198

    
199
    memset(iu, 0, sizeof(struct srp_rsp));
200
    iu->srp.rsp.opcode = SRP_RSP;
201
    iu->srp.rsp.req_lim_delta = cpu_to_be32(1);
202
    iu->srp.rsp.tag = tag;
203

    
204
    /* Handle residuals */
205
    if (res_in < 0) {
206
        iu->srp.rsp.flags |= SRP_RSP_FLAG_DIUNDER;
207
        res_in = -res_in;
208
    } else if (res_in) {
209
        iu->srp.rsp.flags |= SRP_RSP_FLAG_DIOVER;
210
    }
211
    if (res_out < 0) {
212
        iu->srp.rsp.flags |= SRP_RSP_FLAG_DOUNDER;
213
        res_out = -res_out;
214
    } else if (res_out) {
215
        iu->srp.rsp.flags |= SRP_RSP_FLAG_DOOVER;
216
    }
217
    iu->srp.rsp.data_in_res_cnt = cpu_to_be32(res_in);
218
    iu->srp.rsp.data_out_res_cnt = cpu_to_be32(res_out);
219

    
220
    /* We don't do response data */
221
    /* iu->srp.rsp.flags &= ~SRP_RSP_FLAG_RSPVALID; */
222
    iu->srp.rsp.resp_data_len = cpu_to_be32(0);
223

    
224
    /* Handle success vs. failure */
225
    iu->srp.rsp.status = status;
226
    if (status) {
227
        iu->srp.rsp.sol_not = (iu->srp.cmd.sol_not & 0x04) >> 2;
228
        if (req->senselen) {
229
            req->iu.srp.rsp.flags |= SRP_RSP_FLAG_SNSVALID;
230
            req->iu.srp.rsp.sense_data_len = cpu_to_be32(req->senselen);
231
            memcpy(req->iu.srp.rsp.data, req->sense, req->senselen);
232
            total_len += req->senselen;
233
        }
234
    } else {
235
        iu->srp.rsp.sol_not = (iu->srp.cmd.sol_not & 0x02) >> 1;
236
    }
237

    
238
    vscsi_send_iu(s, req, total_len, VIOSRP_SRP_FORMAT);
239
    return 0;
240
}
241

    
242
static inline void vscsi_swap_desc(struct srp_direct_buf *desc)
243
{
244
    desc->va = be64_to_cpu(desc->va);
245
    desc->len = be32_to_cpu(desc->len);
246
}
247

    
248
static int vscsi_srp_direct_data(VSCSIState *s, vscsi_req *req,
249
                                 uint8_t *buf, uint32_t len)
250
{
251
    struct srp_direct_buf *md = req->cur_desc;
252
    uint32_t llen;
253
    int rc = 0;
254

    
255
    dprintf("VSCSI: direct segment 0x%x bytes, va=0x%llx desc len=0x%x\n",
256
            len, (unsigned long long)md->va, md->len);
257

    
258
    llen = MIN(len, md->len);
259
    if (llen) {
260
        if (req->writing) { /* writing = to device = reading from memory */
261
            rc = spapr_tce_dma_read(&s->vdev, md->va, buf, llen);
262
        } else {
263
            rc = spapr_tce_dma_write(&s->vdev, md->va, buf, llen);
264
        }
265
    }
266
    md->len -= llen;
267
    md->va += llen;
268

    
269
    if (rc) {
270
        return -1;
271
    }
272
    return llen;
273
}
274

    
275
static int vscsi_srp_indirect_data(VSCSIState *s, vscsi_req *req,
276
                                   uint8_t *buf, uint32_t len)
277
{
278
    struct srp_direct_buf *td = &req->ind_desc->table_desc;
279
    struct srp_direct_buf *md = req->cur_desc;
280
    int rc = 0;
281
    uint32_t llen, total = 0;
282

    
283
    dprintf("VSCSI: indirect segment 0x%x bytes, td va=0x%llx len=0x%x\n",
284
            len, (unsigned long long)td->va, td->len);
285

    
286
    /* While we have data ... */
287
    while (len) {
288
        /* If we have a descriptor but it's empty, go fetch a new one */
289
        if (md && md->len == 0) {
290
            /* More local available, use one */
291
            if (req->local_desc) {
292
                md = ++req->cur_desc;
293
                --req->local_desc;
294
                --req->total_desc;
295
                td->va += sizeof(struct srp_direct_buf);
296
            } else {
297
                md = req->cur_desc = NULL;
298
            }
299
        }
300
        /* No descriptor at hand, fetch one */
301
        if (!md) {
302
            if (!req->total_desc) {
303
                dprintf("VSCSI:   Out of descriptors !\n");
304
                break;
305
            }
306
            md = req->cur_desc = &req->ext_desc;
307
            dprintf("VSCSI:   Reading desc from 0x%llx\n",
308
                    (unsigned long long)td->va);
309
            rc = spapr_tce_dma_read(&s->vdev, td->va, md,
310
                                    sizeof(struct srp_direct_buf));
311
            if (rc) {
312
                dprintf("VSCSI: tce_dma_read -> %d reading ext_desc\n", rc);
313
                break;
314
            }
315
            vscsi_swap_desc(md);
316
            td->va += sizeof(struct srp_direct_buf);
317
            --req->total_desc;
318
        }
319
        dprintf("VSCSI:   [desc va=0x%llx,len=0x%x] remaining=0x%x\n",
320
                (unsigned long long)md->va, md->len, len);
321

    
322
        /* Perform transfer */
323
        llen = MIN(len, md->len);
324
        if (req->writing) { /* writing = to device = reading from memory */
325
            rc = spapr_tce_dma_read(&s->vdev, md->va, buf, llen);
326
        } else {
327
            rc = spapr_tce_dma_write(&s->vdev, md->va, buf, llen);
328
        }
329
        if (rc) {
330
            dprintf("VSCSI: tce_dma_r/w(%d) -> %d\n", req->writing, rc);
331
            break;
332
        }
333
        dprintf("VSCSI:     data: %02x %02x %02x %02x...\n",
334
                buf[0], buf[1], buf[2], buf[3]);
335

    
336
        len -= llen;
337
        buf += llen;
338
        total += llen;
339
        md->va += llen;
340
        md->len -= llen;
341
    }
342
    return rc ? -1 : total;
343
}
344

    
345
static int vscsi_srp_transfer_data(VSCSIState *s, vscsi_req *req,
346
                                   int writing, uint8_t *buf, uint32_t len)
347
{
348
    int err = 0;
349

    
350
    switch (req->dma_fmt) {
351
    case SRP_NO_DATA_DESC:
352
        dprintf("VSCSI: no data desc transfer, skipping 0x%x bytes\n", len);
353
        break;
354
    case SRP_DATA_DESC_DIRECT:
355
        err = vscsi_srp_direct_data(s, req, buf, len);
356
        break;
357
    case SRP_DATA_DESC_INDIRECT:
358
        err = vscsi_srp_indirect_data(s, req, buf, len);
359
        break;
360
    }
361
    return err;
362
}
363

    
364
/* Bits from linux srp */
365
static int data_out_desc_size(struct srp_cmd *cmd)
366
{
367
    int size = 0;
368
    uint8_t fmt = cmd->buf_fmt >> 4;
369

    
370
    switch (fmt) {
371
    case SRP_NO_DATA_DESC:
372
        break;
373
    case SRP_DATA_DESC_DIRECT:
374
        size = sizeof(struct srp_direct_buf);
375
        break;
376
    case SRP_DATA_DESC_INDIRECT:
377
        size = sizeof(struct srp_indirect_buf) +
378
            sizeof(struct srp_direct_buf)*cmd->data_out_desc_cnt;
379
        break;
380
    default:
381
        break;
382
    }
383
    return size;
384
}
385

    
386
static int vscsi_preprocess_desc(vscsi_req *req)
387
{
388
    struct srp_cmd *cmd = &req->iu.srp.cmd;
389
    int offset, i;
390

    
391
    offset = cmd->add_cdb_len & ~3;
392

    
393
    if (req->writing) {
394
        req->dma_fmt = cmd->buf_fmt >> 4;
395
    } else {
396
        offset += data_out_desc_size(cmd);
397
        req->dma_fmt = cmd->buf_fmt & ((1U << 4) - 1);
398
    }
399

    
400
    switch (req->dma_fmt) {
401
    case SRP_NO_DATA_DESC:
402
        break;
403
    case SRP_DATA_DESC_DIRECT:
404
        req->cur_desc = (struct srp_direct_buf *)(cmd->add_data + offset);
405
        req->total_desc = req->local_desc = 1;
406
        vscsi_swap_desc(req->cur_desc);
407
        dprintf("VSCSI: using direct RDMA %s, 0x%x bytes MD: 0x%llx\n",
408
                req->writing ? "write" : "read",
409
                req->cur_desc->len, (unsigned long long)req->cur_desc->va);
410
        break;
411
    case SRP_DATA_DESC_INDIRECT:
412
        req->ind_desc = (struct srp_indirect_buf *)(cmd->add_data + offset);
413
        vscsi_swap_desc(&req->ind_desc->table_desc);
414
        req->total_desc = req->ind_desc->table_desc.len /
415
            sizeof(struct srp_direct_buf);
416
        req->local_desc = req->writing ? cmd->data_out_desc_cnt :
417
            cmd->data_in_desc_cnt;
418
        for (i = 0; i < req->local_desc; i++) {
419
            vscsi_swap_desc(&req->ind_desc->desc_list[i]);
420
        }
421
        req->cur_desc = req->local_desc ? &req->ind_desc->desc_list[0] : NULL;
422
        dprintf("VSCSI: using indirect RDMA %s, 0x%x bytes %d descs "
423
                "(%d local) VA: 0x%llx\n",
424
                req->writing ? "read" : "write",
425
                be32_to_cpu(req->ind_desc->len),
426
                req->total_desc, req->local_desc,
427
                (unsigned long long)req->ind_desc->table_desc.va);
428
        break;
429
    default:
430
        fprintf(stderr,
431
                "vscsi_preprocess_desc: Unknown format %x\n", req->dma_fmt);
432
        return -1;
433
    }
434

    
435
    return 0;
436
}
437

    
438
/* Callback to indicate that the SCSI layer has completed a transfer.  */
439
static void vscsi_transfer_data(SCSIRequest *sreq, uint32_t len)
440
{
441
    VSCSIState *s = DO_UPCAST(VSCSIState, vdev.qdev, sreq->bus->qbus.parent);
442
    vscsi_req *req = sreq->hba_private;
443
    uint8_t *buf;
444
    int rc = 0;
445

    
446
    dprintf("VSCSI: SCSI xfer complete tag=0x%x len=0x%x, req=%p\n",
447
            sreq->tag, len, req);
448
    if (req == NULL) {
449
        fprintf(stderr, "VSCSI: Can't find request for tag 0x%x\n", sreq->tag);
450
        return;
451
    }
452

    
453
    if (len) {
454
        buf = scsi_req_get_buf(sreq);
455
        rc = vscsi_srp_transfer_data(s, req, req->writing, buf, len);
456
    }
457
    if (rc < 0) {
458
        fprintf(stderr, "VSCSI: RDMA error rc=%d!\n", rc);
459
        vscsi_makeup_sense(s, req, HARDWARE_ERROR, 0, 0);
460
        scsi_req_abort(req->sreq, CHECK_CONDITION);
461
        return;
462
    }
463

    
464
    /* Start next chunk */
465
    req->data_len -= rc;
466
    scsi_req_continue(sreq);
467
}
468

    
469
/* Callback to indicate that the SCSI layer has completed a transfer.  */
470
static void vscsi_command_complete(SCSIRequest *sreq, uint32_t status)
471
{
472
    VSCSIState *s = DO_UPCAST(VSCSIState, vdev.qdev, sreq->bus->qbus.parent);
473
    vscsi_req *req = sreq->hba_private;
474
    int32_t res_in = 0, res_out = 0;
475

    
476
    dprintf("VSCSI: SCSI cmd complete, r=0x%x tag=0x%x status=0x%x, req=%p\n",
477
            reason, sreq->tag, status, req);
478
    if (req == NULL) {
479
        fprintf(stderr, "VSCSI: Can't find request for tag 0x%x\n", sreq->tag);
480
        return;
481
    }
482

    
483
    if (status == CHECK_CONDITION) {
484
        req->senselen = scsi_req_get_sense(req->sreq, req->sense,
485
                                           sizeof(req->sense));
486
        status = 0;
487
        dprintf("VSCSI: Sense data, %d bytes:\n", len);
488
        dprintf("       %02x  %02x  %02x  %02x  %02x  %02x  %02x  %02x\n",
489
                req->sense[0], req->sense[1], req->sense[2], req->sense[3],
490
                req->sense[4], req->sense[5], req->sense[6], req->sense[7]);
491
        dprintf("       %02x  %02x  %02x  %02x  %02x  %02x  %02x  %02x\n",
492
                req->sense[8], req->sense[9], req->sense[10], req->sense[11],
493
                req->sense[12], req->sense[13], req->sense[14], req->sense[15]);
494
    }
495

    
496
    dprintf("VSCSI: Command complete err=%d\n", status);
497
    if (status == 0) {
498
        /* We handle overflows, not underflows for normal commands,
499
         * but hopefully nobody cares
500
         */
501
        if (req->writing) {
502
            res_out = req->data_len;
503
        } else {
504
            res_in = req->data_len;
505
        }
506
    }
507
    vscsi_send_rsp(s, req, status, res_in, res_out);
508
    vscsi_put_req(req);
509
}
510

    
511
static void vscsi_request_cancelled(SCSIRequest *sreq)
512
{
513
    vscsi_req *req = sreq->hba_private;
514

    
515
    vscsi_put_req(req);
516
}
517

    
518
static void vscsi_process_login(VSCSIState *s, vscsi_req *req)
519
{
520
    union viosrp_iu *iu = &req->iu;
521
    struct srp_login_rsp *rsp = &iu->srp.login_rsp;
522
    uint64_t tag = iu->srp.rsp.tag;
523

    
524
    dprintf("VSCSI: Got login, sendin response !\n");
525

    
526
    /* TODO handle case that requested size is wrong and
527
     * buffer format is wrong
528
     */
529
    memset(iu, 0, sizeof(struct srp_login_rsp));
530
    rsp->opcode = SRP_LOGIN_RSP;
531
    /* Don't advertise quite as many request as we support to
532
     * keep room for management stuff etc...
533
     */
534
    rsp->req_lim_delta = cpu_to_be32(VSCSI_REQ_LIMIT-2);
535
    rsp->tag = tag;
536
    rsp->max_it_iu_len = cpu_to_be32(sizeof(union srp_iu));
537
    rsp->max_ti_iu_len = cpu_to_be32(sizeof(union srp_iu));
538
    /* direct and indirect */
539
    rsp->buf_fmt = cpu_to_be16(SRP_BUF_FORMAT_DIRECT | SRP_BUF_FORMAT_INDIRECT);
540

    
541
    vscsi_send_iu(s, req, sizeof(*rsp), VIOSRP_SRP_FORMAT);
542
}
543

    
544
static void vscsi_inquiry_no_target(VSCSIState *s, vscsi_req *req)
545
{
546
    uint8_t *cdb = req->iu.srp.cmd.cdb;
547
    uint8_t resp_data[36];
548
    int rc, len, alen;
549

    
550
    /* We dont do EVPD. Also check that page_code is 0 */
551
    if ((cdb[1] & 0x01) || (cdb[1] & 0x01) || cdb[2] != 0) {
552
        /* Send INVALID FIELD IN CDB */
553
        vscsi_makeup_sense(s, req, ILLEGAL_REQUEST, 0x24, 0);
554
        vscsi_send_rsp(s, req, CHECK_CONDITION, 0, 0);
555
        return;
556
    }
557
    alen = cdb[3];
558
    alen = (alen << 8) | cdb[4];
559
    len = MIN(alen, 36);
560

    
561
    /* Fake up inquiry using PQ=3 */
562
    memset(resp_data, 0, 36);
563
    resp_data[0] = 0x7f;   /* Not capable of supporting a device here */
564
    resp_data[2] = 0x06;   /* SPS-4 */
565
    resp_data[3] = 0x02;   /* Resp data format */
566
    resp_data[4] = 36 - 5; /* Additional length */
567
    resp_data[7] = 0x10;   /* Sync transfers */
568
    memcpy(&resp_data[16], "QEMU EMPTY      ", 16);
569
    memcpy(&resp_data[8], "QEMU    ", 8);
570

    
571
    req->writing = 0;
572
    vscsi_preprocess_desc(req);
573
    rc = vscsi_srp_transfer_data(s, req, 0, resp_data, len);
574
    if (rc < 0) {
575
        vscsi_makeup_sense(s, req, HARDWARE_ERROR, 0, 0);
576
        vscsi_send_rsp(s, req, CHECK_CONDITION, 0, 0);
577
    } else {
578
        vscsi_send_rsp(s, req, 0, 36 - rc, 0);
579
    }
580
}
581

    
582
static int vscsi_queue_cmd(VSCSIState *s, vscsi_req *req)
583
{
584
    union srp_iu *srp = &req->iu.srp;
585
    SCSIDevice *sdev;
586
    int n, id, lun;
587

    
588
    vscsi_decode_id_lun(be64_to_cpu(srp->cmd.lun), &id, &lun);
589

    
590
    /* Qemu vs. linux issue with LUNs to be sorted out ... */
591
    sdev = (id < 8 && lun < 16) ? s->bus.devs[id] : NULL;
592
    if (!sdev) {
593
        dprintf("VSCSI: Command for id %d with no drive\n", id);
594
        if (srp->cmd.cdb[0] == INQUIRY) {
595
            vscsi_inquiry_no_target(s, req);
596
        } else {
597
            vscsi_makeup_sense(s, req, ILLEGAL_REQUEST, 0x24, 0x00);
598
            vscsi_send_rsp(s, req, CHECK_CONDITION, 0, 0);
599
        } return 1;
600
    }
601

    
602
    req->lun = lun;
603
    req->sreq = scsi_req_new(sdev, req->qtag, lun, srp->cmd.cdb, req);
604
    n = scsi_req_enqueue(req->sreq);
605

    
606
    dprintf("VSCSI: Queued command tag 0x%x CMD 0x%x ID %d LUN %d ret: %d\n",
607
            req->qtag, srp->cmd.cdb[0], id, lun, n);
608

    
609
    if (n) {
610
        /* Transfer direction must be set before preprocessing the
611
         * descriptors
612
         */
613
        req->writing = (n < 1);
614

    
615
        /* Preprocess RDMA descriptors */
616
        vscsi_preprocess_desc(req);
617

    
618
        /* Get transfer direction and initiate transfer */
619
        if (n > 0) {
620
            req->data_len = n;
621
        } else if (n < 0) {
622
            req->data_len = -n;
623
        }
624
        scsi_req_continue(req->sreq);
625
    }
626
    /* Don't touch req here, it may have been recycled already */
627

    
628
    return 0;
629
}
630

    
631
static int vscsi_process_tsk_mgmt(VSCSIState *s, vscsi_req *req)
632
{
633
    union viosrp_iu *iu = &req->iu;
634
    int fn;
635

    
636
    fprintf(stderr, "vscsi_process_tsk_mgmt %02x\n",
637
            iu->srp.tsk_mgmt.tsk_mgmt_func);
638

    
639
    switch (iu->srp.tsk_mgmt.tsk_mgmt_func) {
640
#if 0 /* We really don't deal with these for now */
641
    case SRP_TSK_ABORT_TASK:
642
        fn = ABORT_TASK;
643
        break;
644
    case SRP_TSK_ABORT_TASK_SET:
645
        fn = ABORT_TASK_SET;
646
        break;
647
    case SRP_TSK_CLEAR_TASK_SET:
648
        fn = CLEAR_TASK_SET;
649
        break;
650
    case SRP_TSK_LUN_RESET:
651
        fn = LOGICAL_UNIT_RESET;
652
        break;
653
    case SRP_TSK_CLEAR_ACA:
654
        fn = CLEAR_ACA;
655
        break;
656
#endif
657
    default:
658
        fn = 0;
659
    }
660
    if (fn) {
661
        /* XXX Send/Handle target task management */
662
        ;
663
    } else {
664
        vscsi_makeup_sense(s, req, ILLEGAL_REQUEST, 0x20, 0);
665
        vscsi_send_rsp(s, req, CHECK_CONDITION, 0, 0);
666
    }
667
    return !fn;
668
}
669

    
670
static int vscsi_handle_srp_req(VSCSIState *s, vscsi_req *req)
671
{
672
    union srp_iu *srp = &req->iu.srp;
673
    int done = 1;
674
    uint8_t opcode = srp->rsp.opcode;
675

    
676
    switch (opcode) {
677
    case SRP_LOGIN_REQ:
678
        vscsi_process_login(s, req);
679
        break;
680
    case SRP_TSK_MGMT:
681
        done = vscsi_process_tsk_mgmt(s, req);
682
        break;
683
    case SRP_CMD:
684
        done = vscsi_queue_cmd(s, req);
685
        break;
686
    case SRP_LOGIN_RSP:
687
    case SRP_I_LOGOUT:
688
    case SRP_T_LOGOUT:
689
    case SRP_RSP:
690
    case SRP_CRED_REQ:
691
    case SRP_CRED_RSP:
692
    case SRP_AER_REQ:
693
    case SRP_AER_RSP:
694
        fprintf(stderr, "VSCSI: Unsupported opcode %02x\n", opcode);
695
        break;
696
    default:
697
        fprintf(stderr, "VSCSI: Unknown type %02x\n", opcode);
698
    }
699

    
700
    return done;
701
}
702

    
703
static int vscsi_send_adapter_info(VSCSIState *s, vscsi_req *req)
704
{
705
    struct viosrp_adapter_info *sinfo;
706
    struct mad_adapter_info_data info;
707
    int rc;
708

    
709
    sinfo = &req->iu.mad.adapter_info;
710

    
711
#if 0 /* What for ? */
712
    rc = spapr_tce_dma_read(&s->vdev, be64_to_cpu(sinfo->buffer),
713
                            &info, be16_to_cpu(sinfo->common.length));
714
    if (rc) {
715
        fprintf(stderr, "vscsi_send_adapter_info: DMA read failure !\n");
716
    }
717
#endif
718
    memset(&info, 0, sizeof(info));
719
    strcpy(info.srp_version, SRP_VERSION);
720
    strncpy(info.partition_name, "qemu", sizeof("qemu"));
721
    info.partition_number = cpu_to_be32(0);
722
    info.mad_version = cpu_to_be32(1);
723
    info.os_type = cpu_to_be32(2);
724
    info.port_max_txu[0] = cpu_to_be32(VSCSI_MAX_SECTORS << 9);
725

    
726
    rc = spapr_tce_dma_write(&s->vdev, be64_to_cpu(sinfo->buffer),
727
                             &info, be16_to_cpu(sinfo->common.length));
728
    if (rc)  {
729
        fprintf(stderr, "vscsi_send_adapter_info: DMA write failure !\n");
730
    }
731

    
732
    sinfo->common.status = rc ? cpu_to_be32(1) : 0;
733

    
734
    return vscsi_send_iu(s, req, sizeof(*sinfo), VIOSRP_MAD_FORMAT);
735
}
736

    
737
static int vscsi_handle_mad_req(VSCSIState *s, vscsi_req *req)
738
{
739
    union mad_iu *mad = &req->iu.mad;
740

    
741
    switch (be32_to_cpu(mad->empty_iu.common.type)) {
742
    case VIOSRP_EMPTY_IU_TYPE:
743
        fprintf(stderr, "Unsupported EMPTY MAD IU\n");
744
        break;
745
    case VIOSRP_ERROR_LOG_TYPE:
746
        fprintf(stderr, "Unsupported ERROR LOG MAD IU\n");
747
        mad->error_log.common.status = cpu_to_be16(1);
748
        vscsi_send_iu(s, req, sizeof(mad->error_log), VIOSRP_MAD_FORMAT);
749
        break;
750
    case VIOSRP_ADAPTER_INFO_TYPE:
751
        vscsi_send_adapter_info(s, req);
752
        break;
753
    case VIOSRP_HOST_CONFIG_TYPE:
754
        mad->host_config.common.status = cpu_to_be16(1);
755
        vscsi_send_iu(s, req, sizeof(mad->host_config), VIOSRP_MAD_FORMAT);
756
        break;
757
    default:
758
        fprintf(stderr, "VSCSI: Unknown MAD type %02x\n",
759
                be32_to_cpu(mad->empty_iu.common.type));
760
    }
761

    
762
    return 1;
763
}
764

    
765
static void vscsi_got_payload(VSCSIState *s, vscsi_crq *crq)
766
{
767
    vscsi_req *req;
768
    int done;
769

    
770
    req = vscsi_get_req(s);
771
    if (req == NULL) {
772
        fprintf(stderr, "VSCSI: Failed to get a request !\n");
773
        return;
774
    }
775

    
776
    /* We only support a limited number of descriptors, we know
777
     * the ibmvscsi driver uses up to 10 max, so it should fit
778
     * in our 256 bytes IUs. If not we'll have to increase the size
779
     * of the structure.
780
     */
781
    if (crq->s.IU_length > sizeof(union viosrp_iu)) {
782
        fprintf(stderr, "VSCSI: SRP IU too long (%d bytes) !\n",
783
                crq->s.IU_length);
784
        return;
785
    }
786

    
787
    /* XXX Handle failure differently ? */
788
    if (spapr_tce_dma_read(&s->vdev, crq->s.IU_data_ptr, &req->iu,
789
                           crq->s.IU_length)) {
790
        fprintf(stderr, "vscsi_got_payload: DMA read failure !\n");
791
        g_free(req);
792
    }
793
    memcpy(&req->crq, crq, sizeof(vscsi_crq));
794

    
795
    if (crq->s.format == VIOSRP_MAD_FORMAT) {
796
        done = vscsi_handle_mad_req(s, req);
797
    } else {
798
        done = vscsi_handle_srp_req(s, req);
799
    }
800

    
801
    if (done) {
802
        vscsi_put_req(req);
803
    }
804
}
805

    
806

    
807
static int vscsi_do_crq(struct VIOsPAPRDevice *dev, uint8_t *crq_data)
808
{
809
    VSCSIState *s = DO_UPCAST(VSCSIState, vdev, dev);
810
    vscsi_crq crq;
811

    
812
    memcpy(crq.raw, crq_data, 16);
813
    crq.s.timeout = be16_to_cpu(crq.s.timeout);
814
    crq.s.IU_length = be16_to_cpu(crq.s.IU_length);
815
    crq.s.IU_data_ptr = be64_to_cpu(crq.s.IU_data_ptr);
816

    
817
    dprintf("VSCSI: do_crq %02x %02x ...\n", crq.raw[0], crq.raw[1]);
818

    
819
    switch (crq.s.valid) {
820
    case 0xc0: /* Init command/response */
821

    
822
        /* Respond to initialization request */
823
        if (crq.s.format == 0x01) {
824
            memset(crq.raw, 0, 16);
825
            crq.s.valid = 0xc0;
826
            crq.s.format = 0x02;
827
            spapr_vio_send_crq(dev, crq.raw);
828
        }
829

    
830
        /* Note that in hotplug cases, we might get a 0x02
831
         * as a result of us emitting the init request
832
         */
833

    
834
        break;
835
    case 0xff: /* Link event */
836

    
837
        /* Not handled for now */
838

    
839
        break;
840
    case 0x80: /* Payloads */
841
        switch (crq.s.format) {
842
        case VIOSRP_SRP_FORMAT: /* AKA VSCSI request */
843
        case VIOSRP_MAD_FORMAT: /* AKA VSCSI response */
844
            vscsi_got_payload(s, &crq);
845
            break;
846
        case VIOSRP_OS400_FORMAT:
847
        case VIOSRP_AIX_FORMAT:
848
        case VIOSRP_LINUX_FORMAT:
849
        case VIOSRP_INLINE_FORMAT:
850
            fprintf(stderr, "vscsi_do_srq: Unsupported payload format %02x\n",
851
                    crq.s.format);
852
            break;
853
        default:
854
            fprintf(stderr, "vscsi_do_srq: Unknown payload format %02x\n",
855
                    crq.s.format);
856
        }
857
        break;
858
    default:
859
        fprintf(stderr, "vscsi_do_crq: unknown CRQ %02x %02x ...\n",
860
                crq.raw[0], crq.raw[1]);
861
    };
862

    
863
    return 0;
864
}
865

    
866
static const struct SCSIBusOps vscsi_scsi_ops = {
867
    .transfer_data = vscsi_transfer_data,
868
    .complete = vscsi_command_complete,
869
    .cancel = vscsi_request_cancelled
870
};
871

    
872
static int spapr_vscsi_init(VIOsPAPRDevice *dev)
873
{
874
    VSCSIState *s = DO_UPCAST(VSCSIState, vdev, dev);
875
    int i;
876

    
877
    dbg_vscsi_state = s;
878

    
879
    /* Initialize qemu request tags */
880
    memset(s->reqs, 0, sizeof(s->reqs));
881
    for (i = 0; i < VSCSI_REQ_LIMIT; i++) {
882
        s->reqs[i].qtag = i;
883
    }
884

    
885
    dev->crq.SendFunc = vscsi_do_crq;
886

    
887
    scsi_bus_new(&s->bus, &dev->qdev, 1, VSCSI_REQ_LIMIT,
888
                 &vscsi_scsi_ops);
889
    if (!dev->qdev.hotplugged) {
890
        scsi_bus_legacy_handle_cmdline(&s->bus);
891
    }
892

    
893
    return 0;
894
}
895

    
896
void spapr_vscsi_create(VIOsPAPRBus *bus, uint32_t reg,
897
                        qemu_irq qirq, uint32_t vio_irq_num)
898
{
899
    DeviceState *dev;
900
    VIOsPAPRDevice *sdev;
901

    
902
    dev = qdev_create(&bus->bus, "spapr-vscsi");
903
    qdev_prop_set_uint32(dev, "reg", reg);
904

    
905
    qdev_init_nofail(dev);
906

    
907
    sdev = (VIOsPAPRDevice *)dev;
908
    sdev->qirq = qirq;
909
    sdev->vio_irq_num = vio_irq_num;
910
}
911

    
912
static int spapr_vscsi_devnode(VIOsPAPRDevice *dev, void *fdt, int node_off)
913
{
914
    int ret;
915

    
916
    ret = fdt_setprop_cell(fdt, node_off, "#address-cells", 2);
917
    if (ret < 0) {
918
        return ret;
919
    }
920

    
921
    ret = fdt_setprop_cell(fdt, node_off, "#size-cells", 0);
922
    if (ret < 0) {
923
        return ret;
924
    }
925

    
926
    return 0;
927
}
928

    
929
static VIOsPAPRDeviceInfo spapr_vscsi = {
930
    .init = spapr_vscsi_init,
931
    .devnode = spapr_vscsi_devnode,
932
    .dt_name = "v-scsi",
933
    .dt_type = "vscsi",
934
    .dt_compatible = "IBM,v-scsi",
935
    .signal_mask = 0x00000001,
936
    .qdev.name = "spapr-vscsi",
937
    .qdev.size = sizeof(VSCSIState),
938
    .qdev.props = (Property[]) {
939
        DEFINE_PROP_UINT32("reg", VIOsPAPRDevice, reg, 0x2000),
940
        DEFINE_PROP_UINT32("dma-window", VIOsPAPRDevice,
941
                           rtce_window_size, 0x10000000),
942
        DEFINE_PROP_END_OF_LIST(),
943
    },
944
};
945

    
946
static void spapr_vscsi_register(void)
947
{
948
    spapr_vio_bus_register_withprop(&spapr_vscsi);
949
}
950
device_init(spapr_vscsi_register);