?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
qemu: add castagnoli crc32c checksum algorithm
[qemu/ar7.git] / hw / scsi / spapr_vscsi.c
blob3d322d5d1eddc70abbb5188ddbe3b0289f20fbef
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/hw.h"
35 #include "hw/scsi/scsi.h"
36 #include "block/scsi.h"
37 #include "srp.h"
38 #include "hw/qdev.h"
39 #include "hw/ppc/spapr.h"
40 #include "hw/ppc/spapr_vio.h"
41 #include "viosrp.h"
42
43 #include <libfdt.h>
44
45 /*#define DEBUG_VSCSI*/
46
47 #ifdef DEBUG_VSCSI
48 #define dprintf(fmt, ...) \
49 do { fprintf(stderr, fmt, ## __VA_ARGS__); } while (0)
50 #else
51 #define dprintf(fmt, ...) \
52 do { } while (0)
53 #endif
54
55 /*
56 * Virtual SCSI device
57 */
58
59 /* Random numbers */
60 #define VSCSI_MAX_SECTORS 4096
61 #define VSCSI_REQ_LIMIT 24
62
63 #define SCSI_SENSE_BUF_SIZE 96
64 #define SRP_RSP_SENSE_DATA_LEN 18
65
66 typedef union vscsi_crq {
67 struct viosrp_crq s;
68 uint8_t raw[16];
69 } vscsi_crq;
70
71 typedef struct vscsi_req {
72 vscsi_crq crq;
73 union viosrp_iu iu;
74
75 /* SCSI request tracking */
76 SCSIRequest *sreq;
77 uint32_t qtag; /* qemu tag != srp tag */
78 int lun;
79 int active;
80 long data_len;
81 int writing;
82 int senselen;
83 uint8_t sense[SCSI_SENSE_BUF_SIZE];
84
85 /* RDMA related bits */
86 uint8_t dma_fmt;
87 struct srp_direct_buf ext_desc;
88 struct srp_direct_buf *cur_desc;
89 struct srp_indirect_buf *ind_desc;
90 int local_desc;
91 int total_desc;
92 } vscsi_req;
93
94 #define TYPE_VIO_SPAPR_VSCSI_DEVICE "spapr-vscsi"
95 #define VIO_SPAPR_VSCSI_DEVICE(obj) \
96 OBJECT_CHECK(VSCSIState, (obj), TYPE_VIO_SPAPR_VSCSI_DEVICE)
97
98 typedef struct {
99 VIOsPAPRDevice vdev;
100 SCSIBus bus;
101 vscsi_req reqs[VSCSI_REQ_LIMIT];
102 } VSCSIState;
103
104 static struct vscsi_req *vscsi_get_req(VSCSIState *s)
105 {
106 vscsi_req *req;
107 int i;
108
109 for (i = 0; i < VSCSI_REQ_LIMIT; i++) {
110 req = &s->reqs[i];
111 if (!req->active) {
112 memset(req, 0, sizeof(*req));
113 req->qtag = i;
114 req->active = 1;
115 return req;
116 }
117 }
118 return NULL;
119 }
120
121 static void vscsi_put_req(vscsi_req *req)
122 {
123 if (req->sreq != NULL) {
124 scsi_req_unref(req->sreq);
125 }
126 req->sreq = NULL;
127 req->active = 0;
128 }
129
130 static SCSIDevice *vscsi_device_find(SCSIBus *bus, uint64_t srp_lun, int *lun)
131 {
132 int channel = 0, id = 0;
133
134 retry:
135 switch (srp_lun >> 62) {
136 case 0:
137 if ((srp_lun >> 56) != 0) {
138 channel = (srp_lun >> 56) & 0x3f;
139 id = (srp_lun >> 48) & 0xff;
140 srp_lun <<= 16;
141 goto retry;
142 }
143 *lun = (srp_lun >> 48) & 0xff;
144 break;
145
146 case 1:
147 *lun = (srp_lun >> 48) & 0x3fff;
148 break;
149 case 2:
150 channel = (srp_lun >> 53) & 0x7;
151 id = (srp_lun >> 56) & 0x3f;
152 *lun = (srp_lun >> 48) & 0x1f;
153 break;
154 case 3:
155 *lun = -1;
156 return NULL;
157 default:
158 abort();
159 }
160
161 return scsi_device_find(bus, channel, id, *lun);
162 }
163
164 static int vscsi_send_iu(VSCSIState *s, vscsi_req *req,
165 uint64_t length, uint8_t format)
166 {
167 long rc, rc1;
168
169 /* First copy the SRP */
170 rc = spapr_vio_dma_write(&s->vdev, req->crq.s.IU_data_ptr,
171 &req->iu, length);
172 if (rc) {
173 fprintf(stderr, "vscsi_send_iu: DMA write failure !\n");
174 }
175
176 req->crq.s.valid = 0x80;
177 req->crq.s.format = format;
178 req->crq.s.reserved = 0x00;
179 req->crq.s.timeout = cpu_to_be16(0x0000);
180 req->crq.s.IU_length = cpu_to_be16(length);
181 req->crq.s.IU_data_ptr = req->iu.srp.rsp.tag; /* right byte order */
182
183 if (rc == 0) {
184 req->crq.s.status = 0x99; /* Just needs to be non-zero */
185 } else {
186 req->crq.s.status = 0x00;
187 }
188
189 rc1 = spapr_vio_send_crq(&s->vdev, req->crq.raw);
190 if (rc1) {
191 fprintf(stderr, "vscsi_send_iu: Error sending response\n");
192 return rc1;
193 }
194
195 return rc;
196 }
197
198 static void vscsi_makeup_sense(VSCSIState *s, vscsi_req *req,
199 uint8_t key, uint8_t asc, uint8_t ascq)
200 {
201 req->senselen = SRP_RSP_SENSE_DATA_LEN;
202
203 /* Valid bit and 'current errors' */
204 req->sense[0] = (0x1 << 7 | 0x70);
205 /* Sense key */
206 req->sense[2] = key;
207 /* Additional sense length */
208 req->sense[7] = 0xa; /* 10 bytes */
209 /* Additional sense code */
210 req->sense[12] = asc;
211 req->sense[13] = ascq;
212 }
213
214 static int vscsi_send_rsp(VSCSIState *s, vscsi_req *req,
215 uint8_t status, int32_t res_in, int32_t res_out)
216 {
217 union viosrp_iu *iu = &req->iu;
218 uint64_t tag = iu->srp.rsp.tag;
219 int total_len = sizeof(iu->srp.rsp);
220
221 dprintf("VSCSI: Sending resp status: 0x%x, "
222 "res_in: %d, res_out: %d\n", status, res_in, res_out);
223
224 memset(iu, 0, sizeof(struct srp_rsp));
225 iu->srp.rsp.opcode = SRP_RSP;
226 iu->srp.rsp.req_lim_delta = cpu_to_be32(1);
227 iu->srp.rsp.tag = tag;
228
229 /* Handle residuals */
230 if (res_in < 0) {
231 iu->srp.rsp.flags |= SRP_RSP_FLAG_DIUNDER;
232 res_in = -res_in;
233 } else if (res_in) {
234 iu->srp.rsp.flags |= SRP_RSP_FLAG_DIOVER;
235 }
236 if (res_out < 0) {
237 iu->srp.rsp.flags |= SRP_RSP_FLAG_DOUNDER;
238 res_out = -res_out;
239 } else if (res_out) {
240 iu->srp.rsp.flags |= SRP_RSP_FLAG_DOOVER;
241 }
242 iu->srp.rsp.data_in_res_cnt = cpu_to_be32(res_in);
243 iu->srp.rsp.data_out_res_cnt = cpu_to_be32(res_out);
244
245 /* We don't do response data */
246 /* iu->srp.rsp.flags &= ~SRP_RSP_FLAG_RSPVALID; */
247 iu->srp.rsp.resp_data_len = cpu_to_be32(0);
248
249 /* Handle success vs. failure */
250 iu->srp.rsp.status = status;
251 if (status) {
252 iu->srp.rsp.sol_not = (iu->srp.cmd.sol_not & 0x04) >> 2;
253 if (req->senselen) {
254 req->iu.srp.rsp.flags |= SRP_RSP_FLAG_SNSVALID;
255 req->iu.srp.rsp.sense_data_len = cpu_to_be32(req->senselen);
256 memcpy(req->iu.srp.rsp.data, req->sense, req->senselen);
257 total_len += req->senselen;
258 }
259 } else {
260 iu->srp.rsp.sol_not = (iu->srp.cmd.sol_not & 0x02) >> 1;
261 }
262
263 vscsi_send_iu(s, req, total_len, VIOSRP_SRP_FORMAT);
264 return 0;
265 }
266
267 static inline void vscsi_swap_desc(struct srp_direct_buf *desc)
268 {
269 desc->va = be64_to_cpu(desc->va);
270 desc->len = be32_to_cpu(desc->len);
271 }
272
273 static int vscsi_srp_direct_data(VSCSIState *s, vscsi_req *req,
274 uint8_t *buf, uint32_t len)
275 {
276 struct srp_direct_buf *md = req->cur_desc;
277 uint32_t llen;
278 int rc = 0;
279
280 dprintf("VSCSI: direct segment 0x%x bytes, va=0x%llx desc len=0x%x\n",
281 len, (unsigned long long)md->va, md->len);
282
283 llen = MIN(len, md->len);
284 if (llen) {
285 if (req->writing) { /* writing = to device = reading from memory */
286 rc = spapr_vio_dma_read(&s->vdev, md->va, buf, llen);
287 } else {
288 rc = spapr_vio_dma_write(&s->vdev, md->va, buf, llen);
289 }
290 }
291 md->len -= llen;
292 md->va += llen;
293
294 if (rc) {
295 return -1;
296 }
297 return llen;
298 }
299
300 static int vscsi_srp_indirect_data(VSCSIState *s, vscsi_req *req,
301 uint8_t *buf, uint32_t len)
302 {
303 struct srp_direct_buf *td = &req->ind_desc->table_desc;
304 struct srp_direct_buf *md = req->cur_desc;
305 int rc = 0;
306 uint32_t llen, total = 0;
307
308 dprintf("VSCSI: indirect segment 0x%x bytes, td va=0x%llx len=0x%x\n",
309 len, (unsigned long long)td->va, td->len);
310
311 /* While we have data ... */
312 while (len) {
313 /* If we have a descriptor but it's empty, go fetch a new one */
314 if (md && md->len == 0) {
315 /* More local available, use one */
316 if (req->local_desc) {
317 md = ++req->cur_desc;
318 --req->local_desc;
319 --req->total_desc;
320 td->va += sizeof(struct srp_direct_buf);
321 } else {
322 md = req->cur_desc = NULL;
323 }
324 }
325 /* No descriptor at hand, fetch one */
326 if (!md) {
327 if (!req->total_desc) {
328 dprintf("VSCSI: Out of descriptors !\n");
329 break;
330 }
331 md = req->cur_desc = &req->ext_desc;
332 dprintf("VSCSI: Reading desc from 0x%llx\n",
333 (unsigned long long)td->va);
334 rc = spapr_vio_dma_read(&s->vdev, td->va, md,
335 sizeof(struct srp_direct_buf));
336 if (rc) {
337 dprintf("VSCSI: spapr_vio_dma_read -> %d reading ext_desc\n",
338 rc);
339 break;
340 }
341 vscsi_swap_desc(md);
342 td->va += sizeof(struct srp_direct_buf);
343 --req->total_desc;
344 }
345 dprintf("VSCSI: [desc va=0x%llx,len=0x%x] remaining=0x%x\n",
346 (unsigned long long)md->va, md->len, len);
347
348 /* Perform transfer */
349 llen = MIN(len, md->len);
350 if (req->writing) { /* writing = to device = reading from memory */
351 rc = spapr_vio_dma_read(&s->vdev, md->va, buf, llen);
352 } else {
353 rc = spapr_vio_dma_write(&s->vdev, md->va, buf, llen);
354 }
355 if (rc) {
356 dprintf("VSCSI: spapr_vio_dma_r/w(%d) -> %d\n", req->writing, rc);
357 break;
358 }
359 dprintf("VSCSI: data: %02x %02x %02x %02x...\n",
360 buf[0], buf[1], buf[2], buf[3]);
361
362 len -= llen;
363 buf += llen;
364 total += llen;
365 md->va += llen;
366 md->len -= llen;
367 }
368 return rc ? -1 : total;
369 }
370
371 static int vscsi_srp_transfer_data(VSCSIState *s, vscsi_req *req,
372 int writing, uint8_t *buf, uint32_t len)
373 {
374 int err = 0;
375
376 switch (req->dma_fmt) {
377 case SRP_NO_DATA_DESC:
378 dprintf("VSCSI: no data desc transfer, skipping 0x%x bytes\n", len);
379 break;
380 case SRP_DATA_DESC_DIRECT:
381 err = vscsi_srp_direct_data(s, req, buf, len);
382 break;
383 case SRP_DATA_DESC_INDIRECT:
384 err = vscsi_srp_indirect_data(s, req, buf, len);
385 break;
386 }
387 return err;
388 }
389
390 /* Bits from linux srp */
391 static int data_out_desc_size(struct srp_cmd *cmd)
392 {
393 int size = 0;
394 uint8_t fmt = cmd->buf_fmt >> 4;
395
396 switch (fmt) {
397 case SRP_NO_DATA_DESC:
398 break;
399 case SRP_DATA_DESC_DIRECT:
400 size = sizeof(struct srp_direct_buf);
401 break;
402 case SRP_DATA_DESC_INDIRECT:
403 size = sizeof(struct srp_indirect_buf) +
404 sizeof(struct srp_direct_buf)*cmd->data_out_desc_cnt;
405 break;
406 default:
407 break;
408 }
409 return size;
410 }
411
412 static int vscsi_preprocess_desc(vscsi_req *req)
413 {
414 struct srp_cmd *cmd = &req->iu.srp.cmd;
415 int offset, i;
416
417 offset = cmd->add_cdb_len & ~3;
418
419 if (req->writing) {
420 req->dma_fmt = cmd->buf_fmt >> 4;
421 } else {
422 offset += data_out_desc_size(cmd);
423 req->dma_fmt = cmd->buf_fmt & ((1U << 4) - 1);
424 }
425
426 switch (req->dma_fmt) {
427 case SRP_NO_DATA_DESC:
428 break;
429 case SRP_DATA_DESC_DIRECT:
430 req->cur_desc = (struct srp_direct_buf *)(cmd->add_data + offset);
431 req->total_desc = req->local_desc = 1;
432 vscsi_swap_desc(req->cur_desc);
433 dprintf("VSCSI: using direct RDMA %s, 0x%x bytes MD: 0x%llx\n",
434 req->writing ? "write" : "read",
435 req->cur_desc->len, (unsigned long long)req->cur_desc->va);
436 break;
437 case SRP_DATA_DESC_INDIRECT:
438 req->ind_desc = (struct srp_indirect_buf *)(cmd->add_data + offset);
439 vscsi_swap_desc(&req->ind_desc->table_desc);
440 req->total_desc = req->ind_desc->table_desc.len /
441 sizeof(struct srp_direct_buf);
442 req->local_desc = req->writing ? cmd->data_out_desc_cnt :
443 cmd->data_in_desc_cnt;
444 for (i = 0; i < req->local_desc; i++) {
445 vscsi_swap_desc(&req->ind_desc->desc_list[i]);
446 }
447 req->cur_desc = req->local_desc ? &req->ind_desc->desc_list[0] : NULL;
448 dprintf("VSCSI: using indirect RDMA %s, 0x%x bytes %d descs "
449 "(%d local) VA: 0x%llx\n",
450 req->writing ? "read" : "write",
451 be32_to_cpu(req->ind_desc->len),
452 req->total_desc, req->local_desc,
453 (unsigned long long)req->ind_desc->table_desc.va);
454 break;
455 default:
456 fprintf(stderr,
457 "vscsi_preprocess_desc: Unknown format %x\n", req->dma_fmt);
458 return -1;
459 }
460
461 return 0;
462 }
463
464 /* Callback to indicate that the SCSI layer has completed a transfer. */
465 static void vscsi_transfer_data(SCSIRequest *sreq, uint32_t len)
466 {
467 VSCSIState *s = VIO_SPAPR_VSCSI_DEVICE(sreq->bus->qbus.parent);
468 vscsi_req *req = sreq->hba_private;
469 uint8_t *buf;
470 int rc = 0;
471
472 dprintf("VSCSI: SCSI xfer complete tag=0x%x len=0x%x, req=%p\n",
473 sreq->tag, len, req);
474 if (req == NULL) {
475 fprintf(stderr, "VSCSI: Can't find request for tag 0x%x\n", sreq->tag);
476 return;
477 }
478
479 if (len) {
480 buf = scsi_req_get_buf(sreq);
481 rc = vscsi_srp_transfer_data(s, req, req->writing, buf, len);
482 }
483 if (rc < 0) {
484 fprintf(stderr, "VSCSI: RDMA error rc=%d!\n", rc);
485 vscsi_makeup_sense(s, req, HARDWARE_ERROR, 0, 0);
486 scsi_req_abort(req->sreq, CHECK_CONDITION);
487 return;
488 }
489
490 /* Start next chunk */
491 req->data_len -= rc;
492 scsi_req_continue(sreq);
493 }
494
495 /* Callback to indicate that the SCSI layer has completed a transfer. */
496 static void vscsi_command_complete(SCSIRequest *sreq, uint32_t status, size_t resid)
497 {
498 VSCSIState *s = VIO_SPAPR_VSCSI_DEVICE(sreq->bus->qbus.parent);
499 vscsi_req *req = sreq->hba_private;
500 int32_t res_in = 0, res_out = 0;
501
502 dprintf("VSCSI: SCSI cmd complete, r=0x%x tag=0x%x status=0x%x, req=%p\n",
503 reason, sreq->tag, status, req);
504 if (req == NULL) {
505 fprintf(stderr, "VSCSI: Can't find request for tag 0x%x\n", sreq->tag);
506 return;
507 }
508
509 if (status == CHECK_CONDITION) {
510 req->senselen = scsi_req_get_sense(req->sreq, req->sense,
511 sizeof(req->sense));
512 dprintf("VSCSI: Sense data, %d bytes:\n", len);
513 dprintf(" %02x %02x %02x %02x %02x %02x %02x %02x\n",
514 req->sense[0], req->sense[1], req->sense[2], req->sense[3],
515 req->sense[4], req->sense[5], req->sense[6], req->sense[7]);
516 dprintf(" %02x %02x %02x %02x %02x %02x %02x %02x\n",
517 req->sense[8], req->sense[9], req->sense[10], req->sense[11],
518 req->sense[12], req->sense[13], req->sense[14], req->sense[15]);
519 }
520
521 dprintf("VSCSI: Command complete err=%d\n", status);
522 if (status == 0) {
523 /* We handle overflows, not underflows for normal commands,
524 * but hopefully nobody cares
525 */
526 if (req->writing) {
527 res_out = req->data_len;
528 } else {
529 res_in = req->data_len;
530 }
531 }
532 vscsi_send_rsp(s, req, status, res_in, res_out);
533 vscsi_put_req(req);
534 }
535
536 static void vscsi_request_cancelled(SCSIRequest *sreq)
537 {
538 vscsi_req *req = sreq->hba_private;
539
540 vscsi_put_req(req);
541 }
542
543 static void vscsi_process_login(VSCSIState *s, vscsi_req *req)
544 {
545 union viosrp_iu *iu = &req->iu;
546 struct srp_login_rsp *rsp = &iu->srp.login_rsp;
547 uint64_t tag = iu->srp.rsp.tag;
548
549 dprintf("VSCSI: Got login, sendin response !\n");
550
551 /* TODO handle case that requested size is wrong and
552 * buffer format is wrong
553 */
554 memset(iu, 0, sizeof(struct srp_login_rsp));
555 rsp->opcode = SRP_LOGIN_RSP;
556 /* Don't advertise quite as many request as we support to
557 * keep room for management stuff etc...
558 */
559 rsp->req_lim_delta = cpu_to_be32(VSCSI_REQ_LIMIT-2);
560 rsp->tag = tag;
561 rsp->max_it_iu_len = cpu_to_be32(sizeof(union srp_iu));
562 rsp->max_ti_iu_len = cpu_to_be32(sizeof(union srp_iu));
563 /* direct and indirect */
564 rsp->buf_fmt = cpu_to_be16(SRP_BUF_FORMAT_DIRECT | SRP_BUF_FORMAT_INDIRECT);
565
566 vscsi_send_iu(s, req, sizeof(*rsp), VIOSRP_SRP_FORMAT);
567 }
568
569 static void vscsi_inquiry_no_target(VSCSIState *s, vscsi_req *req)
570 {
571 uint8_t *cdb = req->iu.srp.cmd.cdb;
572 uint8_t resp_data[36];
573 int rc, len, alen;
574
575 /* We dont do EVPD. Also check that page_code is 0 */
576 if ((cdb[1] & 0x01) || (cdb[1] & 0x01) || cdb[2] != 0) {
577 /* Send INVALID FIELD IN CDB */
578 vscsi_makeup_sense(s, req, ILLEGAL_REQUEST, 0x24, 0);
579 vscsi_send_rsp(s, req, CHECK_CONDITION, 0, 0);
580 return;
581 }
582 alen = cdb[3];
583 alen = (alen << 8) | cdb[4];
584 len = MIN(alen, 36);
585
586 /* Fake up inquiry using PQ=3 */
587 memset(resp_data, 0, 36);
588 resp_data[0] = 0x7f; /* Not capable of supporting a device here */
589 resp_data[2] = 0x06; /* SPS-4 */
590 resp_data[3] = 0x02; /* Resp data format */
591 resp_data[4] = 36 - 5; /* Additional length */
592 resp_data[7] = 0x10; /* Sync transfers */
593 memcpy(&resp_data[16], "QEMU EMPTY ", 16);
594 memcpy(&resp_data[8], "QEMU ", 8);
595
596 req->writing = 0;
597 vscsi_preprocess_desc(req);
598 rc = vscsi_srp_transfer_data(s, req, 0, resp_data, len);
599 if (rc < 0) {
600 vscsi_makeup_sense(s, req, HARDWARE_ERROR, 0, 0);
601 vscsi_send_rsp(s, req, CHECK_CONDITION, 0, 0);
602 } else {
603 vscsi_send_rsp(s, req, 0, 36 - rc, 0);
604 }
605 }
606
607 static int vscsi_queue_cmd(VSCSIState *s, vscsi_req *req)
608 {
609 union srp_iu *srp = &req->iu.srp;
610 SCSIDevice *sdev;
611 int n, lun;
612
613 sdev = vscsi_device_find(&s->bus, be64_to_cpu(srp->cmd.lun), &lun);
614 if (!sdev) {
615 dprintf("VSCSI: Command for lun %08" PRIx64 " with no drive\n", be64_to_cpu(srp->cmd.lun));
616 if (srp->cmd.cdb[0] == INQUIRY) {
617 vscsi_inquiry_no_target(s, req);
618 } else {
619 vscsi_makeup_sense(s, req, ILLEGAL_REQUEST, 0x24, 0x00);
620 vscsi_send_rsp(s, req, CHECK_CONDITION, 0, 0);
621 } return 1;
622 }
623
624 req->lun = lun;
625 req->sreq = scsi_req_new(sdev, req->qtag, lun, srp->cmd.cdb, req);
626 n = scsi_req_enqueue(req->sreq);
627
628 dprintf("VSCSI: Queued command tag 0x%x CMD 0x%x ID %d LUN %d ret: %d\n",
629 req->qtag, srp->cmd.cdb[0], id, lun, n);
630
631 if (n) {
632 /* Transfer direction must be set before preprocessing the
633 * descriptors
634 */
635 req->writing = (n < 1);
636
637 /* Preprocess RDMA descriptors */
638 vscsi_preprocess_desc(req);
639
640 /* Get transfer direction and initiate transfer */
641 if (n > 0) {
642 req->data_len = n;
643 } else if (n < 0) {
644 req->data_len = -n;
645 }
646 scsi_req_continue(req->sreq);
647 }
648 /* Don't touch req here, it may have been recycled already */
649
650 return 0;
651 }
652
653 static int vscsi_process_tsk_mgmt(VSCSIState *s, vscsi_req *req)
654 {
655 union viosrp_iu *iu = &req->iu;
656 int fn;
657
658 fprintf(stderr, "vscsi_process_tsk_mgmt %02x\n",
659 iu->srp.tsk_mgmt.tsk_mgmt_func);
660
661 switch (iu->srp.tsk_mgmt.tsk_mgmt_func) {
662 #if 0 /* We really don't deal with these for now */
663 case SRP_TSK_ABORT_TASK:
664 fn = ABORT_TASK;
665 break;
666 case SRP_TSK_ABORT_TASK_SET:
667 fn = ABORT_TASK_SET;
668 break;
669 case SRP_TSK_CLEAR_TASK_SET:
670 fn = CLEAR_TASK_SET;
671 break;
672 case SRP_TSK_LUN_RESET:
673 fn = LOGICAL_UNIT_RESET;
674 break;
675 case SRP_TSK_CLEAR_ACA:
676 fn = CLEAR_ACA;
677 break;
678 #endif
679 default:
680 fn = 0;
681 }
682 if (fn) {
683 /* XXX Send/Handle target task management */
684 ;
685 } else {
686 vscsi_makeup_sense(s, req, ILLEGAL_REQUEST, 0x20, 0);
687 vscsi_send_rsp(s, req, CHECK_CONDITION, 0, 0);
688 }
689 return !fn;
690 }
691
692 static int vscsi_handle_srp_req(VSCSIState *s, vscsi_req *req)
693 {
694 union srp_iu *srp = &req->iu.srp;
695 int done = 1;
696 uint8_t opcode = srp->rsp.opcode;
697
698 switch (opcode) {
699 case SRP_LOGIN_REQ:
700 vscsi_process_login(s, req);
701 break;
702 case SRP_TSK_MGMT:
703 done = vscsi_process_tsk_mgmt(s, req);
704 break;
705 case SRP_CMD:
706 done = vscsi_queue_cmd(s, req);
707 break;
708 case SRP_LOGIN_RSP:
709 case SRP_I_LOGOUT:
710 case SRP_T_LOGOUT:
711 case SRP_RSP:
712 case SRP_CRED_REQ:
713 case SRP_CRED_RSP:
714 case SRP_AER_REQ:
715 case SRP_AER_RSP:
716 fprintf(stderr, "VSCSI: Unsupported opcode %02x\n", opcode);
717 break;
718 default:
719 fprintf(stderr, "VSCSI: Unknown type %02x\n", opcode);
720 }
721
722 return done;
723 }
724
725 static int vscsi_send_adapter_info(VSCSIState *s, vscsi_req *req)
726 {
727 struct viosrp_adapter_info *sinfo;
728 struct mad_adapter_info_data info;
729 int rc;
730
731 sinfo = &req->iu.mad.adapter_info;
732
733 #if 0 /* What for ? */
734 rc = spapr_vio_dma_read(&s->vdev, be64_to_cpu(sinfo->buffer),
735 &info, be16_to_cpu(sinfo->common.length));
736 if (rc) {
737 fprintf(stderr, "vscsi_send_adapter_info: DMA read failure !\n");
738 }
739 #endif
740 memset(&info, 0, sizeof(info));
741 strcpy(info.srp_version, SRP_VERSION);
742 memcpy(info.partition_name, "qemu", sizeof("qemu"));
743 info.partition_number = cpu_to_be32(0);
744 info.mad_version = cpu_to_be32(1);
745 info.os_type = cpu_to_be32(2);
746 info.port_max_txu[0] = cpu_to_be32(VSCSI_MAX_SECTORS << 9);
747
748 rc = spapr_vio_dma_write(&s->vdev, be64_to_cpu(sinfo->buffer),
749 &info, be16_to_cpu(sinfo->common.length));
750 if (rc) {
751 fprintf(stderr, "vscsi_send_adapter_info: DMA write failure !\n");
752 }
753
754 sinfo->common.status = rc ? cpu_to_be32(1) : 0;
755
756 return vscsi_send_iu(s, req, sizeof(*sinfo), VIOSRP_MAD_FORMAT);
757 }
758
759 static int vscsi_handle_mad_req(VSCSIState *s, vscsi_req *req)
760 {
761 union mad_iu *mad = &req->iu.mad;
762
763 switch (be32_to_cpu(mad->empty_iu.common.type)) {
764 case VIOSRP_EMPTY_IU_TYPE:
765 fprintf(stderr, "Unsupported EMPTY MAD IU\n");
766 break;
767 case VIOSRP_ERROR_LOG_TYPE:
768 fprintf(stderr, "Unsupported ERROR LOG MAD IU\n");
769 mad->error_log.common.status = cpu_to_be16(1);
770 vscsi_send_iu(s, req, sizeof(mad->error_log), VIOSRP_MAD_FORMAT);
771 break;
772 case VIOSRP_ADAPTER_INFO_TYPE:
773 vscsi_send_adapter_info(s, req);
774 break;
775 case VIOSRP_HOST_CONFIG_TYPE:
776 mad->host_config.common.status = cpu_to_be16(1);
777 vscsi_send_iu(s, req, sizeof(mad->host_config), VIOSRP_MAD_FORMAT);
778 break;
779 default:
780 fprintf(stderr, "VSCSI: Unknown MAD type %02x\n",
781 be32_to_cpu(mad->empty_iu.common.type));
782 }
783
784 return 1;
785 }
786
787 static void vscsi_got_payload(VSCSIState *s, vscsi_crq *crq)
788 {
789 vscsi_req *req;
790 int done;
791
792 req = vscsi_get_req(s);
793 if (req == NULL) {
794 fprintf(stderr, "VSCSI: Failed to get a request !\n");
795 return;
796 }
797
798 /* We only support a limited number of descriptors, we know
799 * the ibmvscsi driver uses up to 10 max, so it should fit
800 * in our 256 bytes IUs. If not we'll have to increase the size
801 * of the structure.
802 */
803 if (crq->s.IU_length > sizeof(union viosrp_iu)) {
804 fprintf(stderr, "VSCSI: SRP IU too long (%d bytes) !\n",
805 crq->s.IU_length);
806 vscsi_put_req(req);
807 return;
808 }
809
810 /* XXX Handle failure differently ? */
811 if (spapr_vio_dma_read(&s->vdev, crq->s.IU_data_ptr, &req->iu,
812 crq->s.IU_length)) {
813 fprintf(stderr, "vscsi_got_payload: DMA read failure !\n");
814 vscsi_put_req(req);
815 return;
816 }
817 memcpy(&req->crq, crq, sizeof(vscsi_crq));
818
819 if (crq->s.format == VIOSRP_MAD_FORMAT) {
820 done = vscsi_handle_mad_req(s, req);
821 } else {
822 done = vscsi_handle_srp_req(s, req);
823 }
824
825 if (done) {
826 vscsi_put_req(req);
827 }
828 }
829
830
831 static int vscsi_do_crq(struct VIOsPAPRDevice *dev, uint8_t *crq_data)
832 {
833 VSCSIState *s = VIO_SPAPR_VSCSI_DEVICE(dev);
834 vscsi_crq crq;
835
836 memcpy(crq.raw, crq_data, 16);
837 crq.s.timeout = be16_to_cpu(crq.s.timeout);
838 crq.s.IU_length = be16_to_cpu(crq.s.IU_length);
839 crq.s.IU_data_ptr = be64_to_cpu(crq.s.IU_data_ptr);
840
841 dprintf("VSCSI: do_crq %02x %02x ...\n", crq.raw[0], crq.raw[1]);
842
843 switch (crq.s.valid) {
844 case 0xc0: /* Init command/response */
845
846 /* Respond to initialization request */
847 if (crq.s.format == 0x01) {
848 memset(crq.raw, 0, 16);
849 crq.s.valid = 0xc0;
850 crq.s.format = 0x02;
851 spapr_vio_send_crq(dev, crq.raw);
852 }
853
854 /* Note that in hotplug cases, we might get a 0x02
855 * as a result of us emitting the init request
856 */
857
858 break;
859 case 0xff: /* Link event */
860
861 /* Not handled for now */
862
863 break;
864 case 0x80: /* Payloads */
865 switch (crq.s.format) {
866 case VIOSRP_SRP_FORMAT: /* AKA VSCSI request */
867 case VIOSRP_MAD_FORMAT: /* AKA VSCSI response */
868 vscsi_got_payload(s, &crq);
869 break;
870 case VIOSRP_OS400_FORMAT:
871 case VIOSRP_AIX_FORMAT:
872 case VIOSRP_LINUX_FORMAT:
873 case VIOSRP_INLINE_FORMAT:
874 fprintf(stderr, "vscsi_do_srq: Unsupported payload format %02x\n",
875 crq.s.format);
876 break;
877 default:
878 fprintf(stderr, "vscsi_do_srq: Unknown payload format %02x\n",
879 crq.s.format);
880 }
881 break;
882 default:
883 fprintf(stderr, "vscsi_do_crq: unknown CRQ %02x %02x ...\n",
884 crq.raw[0], crq.raw[1]);
885 };
886
887 return 0;
888 }
889
890 static const struct SCSIBusInfo vscsi_scsi_info = {
891 .tcq = true,
892 .max_channel = 7, /* logical unit addressing format */
893 .max_target = 63,
894 .max_lun = 31,
895
896 .transfer_data = vscsi_transfer_data,
897 .complete = vscsi_command_complete,
898 .cancel = vscsi_request_cancelled
899 };
900
901 static void spapr_vscsi_reset(VIOsPAPRDevice *dev)
902 {
903 VSCSIState *s = VIO_SPAPR_VSCSI_DEVICE(dev);
904 int i;
905
906 memset(s->reqs, 0, sizeof(s->reqs));
907 for (i = 0; i < VSCSI_REQ_LIMIT; i++) {
908 s->reqs[i].qtag = i;
909 }
910 }
911
912 static int spapr_vscsi_init(VIOsPAPRDevice *dev)
913 {
914 VSCSIState *s = VIO_SPAPR_VSCSI_DEVICE(dev);
915
916 dev->crq.SendFunc = vscsi_do_crq;
917
918 scsi_bus_new(&s->bus, &dev->qdev, &vscsi_scsi_info);
919 if (!dev->qdev.hotplugged) {
920 scsi_bus_legacy_handle_cmdline(&s->bus);
921 }
922
923 return 0;
924 }
925
926 void spapr_vscsi_create(VIOsPAPRBus *bus)
927 {
928 DeviceState *dev;
929
930 dev = qdev_create(&bus->bus, "spapr-vscsi");
931
932 qdev_init_nofail(dev);
933 }
934
935 static int spapr_vscsi_devnode(VIOsPAPRDevice *dev, void *fdt, int node_off)
936 {
937 int ret;
938
939 ret = fdt_setprop_cell(fdt, node_off, "#address-cells", 2);
940 if (ret < 0) {
941 return ret;
942 }
943
944 ret = fdt_setprop_cell(fdt, node_off, "#size-cells", 0);
945 if (ret < 0) {
946 return ret;
947 }
948
949 return 0;
950 }
951
952 static Property spapr_vscsi_properties[] = {
953 DEFINE_SPAPR_PROPERTIES(VSCSIState, vdev),
954 DEFINE_PROP_END_OF_LIST(),
955 };
956
957 static void spapr_vscsi_class_init(ObjectClass *klass, void *data)
958 {
959 DeviceClass *dc = DEVICE_CLASS(klass);
960 VIOsPAPRDeviceClass *k = VIO_SPAPR_DEVICE_CLASS(klass);
961
962 k->init = spapr_vscsi_init;
963 k->reset = spapr_vscsi_reset;
964 k->devnode = spapr_vscsi_devnode;
965 k->dt_name = "v-scsi";
966 k->dt_type = "vscsi";
967 k->dt_compatible = "IBM,v-scsi";
968 k->signal_mask = 0x00000001;
969 dc->props = spapr_vscsi_properties;
970 k->rtce_window_size = 0x10000000;
971 }
972
973 static const TypeInfo spapr_vscsi_info = {
974 .name = TYPE_VIO_SPAPR_VSCSI_DEVICE,
975 .parent = TYPE_VIO_SPAPR_DEVICE,
976 .instance_size = sizeof(VSCSIState),
977 .class_init = spapr_vscsi_class_init,
978 };
979
980 static void spapr_vscsi_register_types(void)
981 {
982 type_register_static(&spapr_vscsi_info);
983 }
984
985 type_init(spapr_vscsi_register_types)
AR7 emulation for QEMU