pcie_aer: support configurable AER capa version
[qemu.git] / hw / ide / atapi.c
1 /*
2 * QEMU ATAPI Emulation
3 *
4 * Copyright (c) 2003 Fabrice Bellard
5 * Copyright (c) 2006 Openedhand Ltd.
6 *
7 * Permission is hereby granted, free of charge, to any person obtaining a copy
8 * of this software and associated documentation files (the "Software"), to deal
9 * in the Software without restriction, including without limitation the rights
10 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
11 * copies of the Software, and to permit persons to whom the Software is
12 * furnished to do so, subject to the following conditions:
13 *
14 * The above copyright notice and this permission notice shall be included in
15 * all copies or substantial portions of the Software.
16 *
17 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
18 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
19 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
20 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
21 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
22 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
23 * THE SOFTWARE.
24 */
25
26 #include "qemu/osdep.h"
27 #include "hw/ide/internal.h"
28 #include "hw/scsi/scsi.h"
29 #include "sysemu/block-backend.h"
30
31 #define ATAPI_SECTOR_BITS (2 + BDRV_SECTOR_BITS)
32 #define ATAPI_SECTOR_SIZE (1 << ATAPI_SECTOR_BITS)
33
34 static void ide_atapi_cmd_read_dma_cb(void *opaque, int ret);
35
36 static void padstr8(uint8_t *buf, int buf_size, const char *src)
37 {
38 int i;
39 for(i = 0; i < buf_size; i++) {
40 if (*src)
41 buf[i] = *src++;
42 else
43 buf[i] = ' ';
44 }
45 }
46
47 static inline void cpu_to_ube16(uint8_t *buf, int val)
48 {
49 buf[0] = val >> 8;
50 buf[1] = val & 0xff;
51 }
52
53 static inline void cpu_to_ube32(uint8_t *buf, unsigned int val)
54 {
55 buf[0] = val >> 24;
56 buf[1] = val >> 16;
57 buf[2] = val >> 8;
58 buf[3] = val & 0xff;
59 }
60
61 static inline int ube16_to_cpu(const uint8_t *buf)
62 {
63 return (buf[0] << 8) | buf[1];
64 }
65
66 static inline int ube32_to_cpu(const uint8_t *buf)
67 {
68 return (buf[0] << 24) | (buf[1] << 16) | (buf[2] << 8) | buf[3];
69 }
70
71 static void lba_to_msf(uint8_t *buf, int lba)
72 {
73 lba += 150;
74 buf[0] = (lba / 75) / 60;
75 buf[1] = (lba / 75) % 60;
76 buf[2] = lba % 75;
77 }
78
79 static inline int media_present(IDEState *s)
80 {
81 return !s->tray_open && s->nb_sectors > 0;
82 }
83
84 /* XXX: DVDs that could fit on a CD will be reported as a CD */
85 static inline int media_is_dvd(IDEState *s)
86 {
87 return (media_present(s) && s->nb_sectors > CD_MAX_SECTORS);
88 }
89
90 static inline int media_is_cd(IDEState *s)
91 {
92 return (media_present(s) && s->nb_sectors <= CD_MAX_SECTORS);
93 }
94
95 static void cd_data_to_raw(uint8_t *buf, int lba)
96 {
97 /* sync bytes */
98 buf[0] = 0x00;
99 memset(buf + 1, 0xff, 10);
100 buf[11] = 0x00;
101 buf += 12;
102 /* MSF */
103 lba_to_msf(buf, lba);
104 buf[3] = 0x01; /* mode 1 data */
105 buf += 4;
106 /* data */
107 buf += 2048;
108 /* XXX: ECC not computed */
109 memset(buf, 0, 288);
110 }
111
112 static int
113 cd_read_sector_sync(IDEState *s)
114 {
115 int ret;
116 block_acct_start(blk_get_stats(s->blk), &s->acct,
117 ATAPI_SECTOR_SIZE, BLOCK_ACCT_READ);
118
119 #ifdef DEBUG_IDE_ATAPI
120 printf("cd_read_sector_sync: lba=%d\n", s->lba);
121 #endif
122
123 switch (s->cd_sector_size) {
124 case 2048:
125 ret = blk_pread(s->blk, (int64_t)s->lba << ATAPI_SECTOR_BITS,
126 s->io_buffer, ATAPI_SECTOR_SIZE);
127 break;
128 case 2352:
129 ret = blk_pread(s->blk, (int64_t)s->lba << ATAPI_SECTOR_BITS,
130 s->io_buffer + 16, ATAPI_SECTOR_SIZE);
131 if (ret >= 0) {
132 cd_data_to_raw(s->io_buffer, s->lba);
133 }
134 break;
135 default:
136 block_acct_invalid(blk_get_stats(s->blk), BLOCK_ACCT_READ);
137 return -EIO;
138 }
139
140 if (ret < 0) {
141 block_acct_failed(blk_get_stats(s->blk), &s->acct);
142 } else {
143 block_acct_done(blk_get_stats(s->blk), &s->acct);
144 s->lba++;
145 s->io_buffer_index = 0;
146 }
147
148 return ret;
149 }
150
151 static void cd_read_sector_cb(void *opaque, int ret)
152 {
153 IDEState *s = opaque;
154
155 #ifdef DEBUG_IDE_ATAPI
156 printf("cd_read_sector_cb: lba=%d ret=%d\n", s->lba, ret);
157 #endif
158
159 if (ret < 0) {
160 block_acct_failed(blk_get_stats(s->blk), &s->acct);
161 ide_atapi_io_error(s, ret);
162 return;
163 }
164
165 block_acct_done(blk_get_stats(s->blk), &s->acct);
166
167 if (s->cd_sector_size == 2352) {
168 cd_data_to_raw(s->io_buffer, s->lba);
169 }
170
171 s->lba++;
172 s->io_buffer_index = 0;
173 s->status &= ~BUSY_STAT;
174
175 ide_atapi_cmd_reply_end(s);
176 }
177
178 static int cd_read_sector(IDEState *s)
179 {
180 if (s->cd_sector_size != 2048 && s->cd_sector_size != 2352) {
181 block_acct_invalid(blk_get_stats(s->blk), BLOCK_ACCT_READ);
182 return -EINVAL;
183 }
184
185 s->iov.iov_base = (s->cd_sector_size == 2352) ?
186 s->io_buffer + 16 : s->io_buffer;
187
188 s->iov.iov_len = ATAPI_SECTOR_SIZE;
189 qemu_iovec_init_external(&s->qiov, &s->iov, 1);
190
191 #ifdef DEBUG_IDE_ATAPI
192 printf("cd_read_sector: lba=%d\n", s->lba);
193 #endif
194
195 block_acct_start(blk_get_stats(s->blk), &s->acct,
196 ATAPI_SECTOR_SIZE, BLOCK_ACCT_READ);
197
198 ide_buffered_readv(s, (int64_t)s->lba << 2, &s->qiov, 4,
199 cd_read_sector_cb, s);
200
201 s->status |= BUSY_STAT;
202 return 0;
203 }
204
205 void ide_atapi_cmd_ok(IDEState *s)
206 {
207 s->error = 0;
208 s->status = READY_STAT | SEEK_STAT;
209 s->nsector = (s->nsector & ~7) | ATAPI_INT_REASON_IO | ATAPI_INT_REASON_CD;
210 ide_transfer_stop(s);
211 ide_set_irq(s->bus);
212 }
213
214 void ide_atapi_cmd_error(IDEState *s, int sense_key, int asc)
215 {
216 #ifdef DEBUG_IDE_ATAPI
217 printf("atapi_cmd_error: sense=0x%x asc=0x%x\n", sense_key, asc);
218 #endif
219 s->error = sense_key << 4;
220 s->status = READY_STAT | ERR_STAT;
221 s->nsector = (s->nsector & ~7) | ATAPI_INT_REASON_IO | ATAPI_INT_REASON_CD;
222 s->sense_key = sense_key;
223 s->asc = asc;
224 ide_transfer_stop(s);
225 ide_set_irq(s->bus);
226 }
227
228 void ide_atapi_io_error(IDEState *s, int ret)
229 {
230 /* XXX: handle more errors */
231 if (ret == -ENOMEDIUM) {
232 ide_atapi_cmd_error(s, NOT_READY,
233 ASC_MEDIUM_NOT_PRESENT);
234 } else {
235 ide_atapi_cmd_error(s, ILLEGAL_REQUEST,
236 ASC_LOGICAL_BLOCK_OOR);
237 }
238 }
239
240 static uint16_t atapi_byte_count_limit(IDEState *s)
241 {
242 uint16_t bcl;
243
244 bcl = s->lcyl | (s->hcyl << 8);
245 if (bcl == 0xffff) {
246 return 0xfffe;
247 }
248 return bcl;
249 }
250
251 /* The whole ATAPI transfer logic is handled in this function */
252 void ide_atapi_cmd_reply_end(IDEState *s)
253 {
254 int byte_count_limit, size, ret;
255 #ifdef DEBUG_IDE_ATAPI
256 printf("reply: tx_size=%d elem_tx_size=%d index=%d\n",
257 s->packet_transfer_size,
258 s->elementary_transfer_size,
259 s->io_buffer_index);
260 #endif
261 if (s->packet_transfer_size <= 0) {
262 /* end of transfer */
263 ide_atapi_cmd_ok(s);
264 ide_set_irq(s->bus);
265 #ifdef DEBUG_IDE_ATAPI
266 printf("end of transfer, status=0x%x\n", s->status);
267 #endif
268 } else {
269 /* see if a new sector must be read */
270 if (s->lba != -1 && s->io_buffer_index >= s->cd_sector_size) {
271 if (!s->elementary_transfer_size) {
272 ret = cd_read_sector(s);
273 if (ret < 0) {
274 ide_atapi_io_error(s, ret);
275 }
276 return;
277 } else {
278 /* rebuffering within an elementary transfer is
279 * only possible with a sync request because we
280 * end up with a race condition otherwise */
281 ret = cd_read_sector_sync(s);
282 if (ret < 0) {
283 ide_atapi_io_error(s, ret);
284 return;
285 }
286 }
287 }
288 if (s->elementary_transfer_size > 0) {
289 /* there are some data left to transmit in this elementary
290 transfer */
291 size = s->cd_sector_size - s->io_buffer_index;
292 if (size > s->elementary_transfer_size)
293 size = s->elementary_transfer_size;
294 s->packet_transfer_size -= size;
295 s->elementary_transfer_size -= size;
296 s->io_buffer_index += size;
297 ide_transfer_start(s, s->io_buffer + s->io_buffer_index - size,
298 size, ide_atapi_cmd_reply_end);
299 } else {
300 /* a new transfer is needed */
301 s->nsector = (s->nsector & ~7) | ATAPI_INT_REASON_IO;
302 byte_count_limit = atapi_byte_count_limit(s);
303 #ifdef DEBUG_IDE_ATAPI
304 printf("byte_count_limit=%d\n", byte_count_limit);
305 #endif
306 size = s->packet_transfer_size;
307 if (size > byte_count_limit) {
308 /* byte count limit must be even if this case */
309 if (byte_count_limit & 1)
310 byte_count_limit--;
311 size = byte_count_limit;
312 }
313 s->lcyl = size;
314 s->hcyl = size >> 8;
315 s->elementary_transfer_size = size;
316 /* we cannot transmit more than one sector at a time */
317 if (s->lba != -1) {
318 if (size > (s->cd_sector_size - s->io_buffer_index))
319 size = (s->cd_sector_size - s->io_buffer_index);
320 }
321 s->packet_transfer_size -= size;
322 s->elementary_transfer_size -= size;
323 s->io_buffer_index += size;
324 ide_transfer_start(s, s->io_buffer + s->io_buffer_index - size,
325 size, ide_atapi_cmd_reply_end);
326 ide_set_irq(s->bus);
327 #ifdef DEBUG_IDE_ATAPI
328 printf("status=0x%x\n", s->status);
329 #endif
330 }
331 }
332 }
333
334 /* send a reply of 'size' bytes in s->io_buffer to an ATAPI command */
335 static void ide_atapi_cmd_reply(IDEState *s, int size, int max_size)
336 {
337 if (size > max_size)
338 size = max_size;
339 s->lba = -1; /* no sector read */
340 s->packet_transfer_size = size;
341 s->io_buffer_size = size; /* dma: send the reply data as one chunk */
342 s->elementary_transfer_size = 0;
343
344 if (s->atapi_dma) {
345 block_acct_start(blk_get_stats(s->blk), &s->acct, size,
346 BLOCK_ACCT_READ);
347 s->status = READY_STAT | SEEK_STAT | DRQ_STAT;
348 ide_start_dma(s, ide_atapi_cmd_read_dma_cb);
349 } else {
350 s->status = READY_STAT | SEEK_STAT;
351 s->io_buffer_index = 0;
352 ide_atapi_cmd_reply_end(s);
353 }
354 }
355
356 /* start a CD-CDROM read command */
357 static void ide_atapi_cmd_read_pio(IDEState *s, int lba, int nb_sectors,
358 int sector_size)
359 {
360 s->lba = lba;
361 s->packet_transfer_size = nb_sectors * sector_size;
362 s->elementary_transfer_size = 0;
363 s->io_buffer_index = sector_size;
364 s->cd_sector_size = sector_size;
365
366 ide_atapi_cmd_reply_end(s);
367 }
368
369 static void ide_atapi_cmd_check_status(IDEState *s)
370 {
371 #ifdef DEBUG_IDE_ATAPI
372 printf("atapi_cmd_check_status\n");
373 #endif
374 s->error = MC_ERR | (UNIT_ATTENTION << 4);
375 s->status = ERR_STAT;
376 s->nsector = 0;
377 ide_set_irq(s->bus);
378 }
379 /* ATAPI DMA support */
380
381 static void ide_atapi_cmd_read_dma_cb(void *opaque, int ret)
382 {
383 IDEState *s = opaque;
384 int data_offset, n;
385
386 if (ret < 0) {
387 if (ide_handle_rw_error(s, -ret, ide_dma_cmd_to_retry(s->dma_cmd))) {
388 if (s->bus->error_status) {
389 s->bus->dma->aiocb = NULL;
390 return;
391 }
392 goto eot;
393 }
394 }
395
396 if (s->io_buffer_size > 0) {
397 /*
398 * For a cdrom read sector command (s->lba != -1),
399 * adjust the lba for the next s->io_buffer_size chunk
400 * and dma the current chunk.
401 * For a command != read (s->lba == -1), just transfer
402 * the reply data.
403 */
404 if (s->lba != -1) {
405 if (s->cd_sector_size == 2352) {
406 n = 1;
407 cd_data_to_raw(s->io_buffer, s->lba);
408 } else {
409 n = s->io_buffer_size >> 11;
410 }
411 s->lba += n;
412 }
413 s->packet_transfer_size -= s->io_buffer_size;
414 if (s->bus->dma->ops->rw_buf(s->bus->dma, 1) == 0)
415 goto eot;
416 }
417
418 if (s->packet_transfer_size <= 0) {
419 s->status = READY_STAT | SEEK_STAT;
420 s->nsector = (s->nsector & ~7) | ATAPI_INT_REASON_IO | ATAPI_INT_REASON_CD;
421 ide_set_irq(s->bus);
422 goto eot;
423 }
424
425 s->io_buffer_index = 0;
426 if (s->cd_sector_size == 2352) {
427 n = 1;
428 s->io_buffer_size = s->cd_sector_size;
429 data_offset = 16;
430 } else {
431 n = s->packet_transfer_size >> 11;
432 if (n > (IDE_DMA_BUF_SECTORS / 4))
433 n = (IDE_DMA_BUF_SECTORS / 4);
434 s->io_buffer_size = n * 2048;
435 data_offset = 0;
436 }
437 #ifdef DEBUG_AIO
438 printf("aio_read_cd: lba=%u n=%d\n", s->lba, n);
439 #endif
440
441 s->bus->dma->iov.iov_base = (void *)(s->io_buffer + data_offset);
442 s->bus->dma->iov.iov_len = n * ATAPI_SECTOR_SIZE;
443 qemu_iovec_init_external(&s->bus->dma->qiov, &s->bus->dma->iov, 1);
444
445 s->bus->dma->aiocb = ide_buffered_readv(s, (int64_t)s->lba << 2,
446 &s->bus->dma->qiov, n * 4,
447 ide_atapi_cmd_read_dma_cb, s);
448 return;
449
450 eot:
451 if (ret < 0) {
452 block_acct_failed(blk_get_stats(s->blk), &s->acct);
453 } else {
454 block_acct_done(blk_get_stats(s->blk), &s->acct);
455 }
456 ide_set_inactive(s, false);
457 }
458
459 /* start a CD-CDROM read command with DMA */
460 /* XXX: test if DMA is available */
461 static void ide_atapi_cmd_read_dma(IDEState *s, int lba, int nb_sectors,
462 int sector_size)
463 {
464 s->lba = lba;
465 s->packet_transfer_size = nb_sectors * sector_size;
466 s->io_buffer_size = 0;
467 s->cd_sector_size = sector_size;
468
469 block_acct_start(blk_get_stats(s->blk), &s->acct, s->packet_transfer_size,
470 BLOCK_ACCT_READ);
471
472 /* XXX: check if BUSY_STAT should be set */
473 s->status = READY_STAT | SEEK_STAT | DRQ_STAT | BUSY_STAT;
474 ide_start_dma(s, ide_atapi_cmd_read_dma_cb);
475 }
476
477 static void ide_atapi_cmd_read(IDEState *s, int lba, int nb_sectors,
478 int sector_size)
479 {
480 #ifdef DEBUG_IDE_ATAPI
481 printf("read %s: LBA=%d nb_sectors=%d\n", s->atapi_dma ? "dma" : "pio",
482 lba, nb_sectors);
483 #endif
484 if (s->atapi_dma) {
485 ide_atapi_cmd_read_dma(s, lba, nb_sectors, sector_size);
486 } else {
487 ide_atapi_cmd_read_pio(s, lba, nb_sectors, sector_size);
488 }
489 }
490
491 void ide_atapi_dma_restart(IDEState *s)
492 {
493 /*
494 * At this point we can just re-evaluate the packet command and start over.
495 * The presence of ->dma_cb callback in the pre_save ensures that the packet
496 * command has been completely sent and we can safely restart command.
497 */
498 s->unit = s->bus->retry_unit;
499 s->bus->dma->ops->restart_dma(s->bus->dma);
500 ide_atapi_cmd(s);
501 }
502
503 static inline uint8_t ide_atapi_set_profile(uint8_t *buf, uint8_t *index,
504 uint16_t profile)
505 {
506 uint8_t *buf_profile = buf + 12; /* start of profiles */
507
508 buf_profile += ((*index) * 4); /* start of indexed profile */
509 cpu_to_ube16 (buf_profile, profile);
510 buf_profile[2] = ((buf_profile[0] == buf[6]) && (buf_profile[1] == buf[7]));
511
512 /* each profile adds 4 bytes to the response */
513 (*index)++;
514 buf[11] += 4; /* Additional Length */
515
516 return 4;
517 }
518
519 static int ide_dvd_read_structure(IDEState *s, int format,
520 const uint8_t *packet, uint8_t *buf)
521 {
522 switch (format) {
523 case 0x0: /* Physical format information */
524 {
525 int layer = packet[6];
526 uint64_t total_sectors;
527
528 if (layer != 0)
529 return -ASC_INV_FIELD_IN_CMD_PACKET;
530
531 total_sectors = s->nb_sectors >> 2;
532 if (total_sectors == 0) {
533 return -ASC_MEDIUM_NOT_PRESENT;
534 }
535
536 buf[4] = 1; /* DVD-ROM, part version 1 */
537 buf[5] = 0xf; /* 120mm disc, minimum rate unspecified */
538 buf[6] = 1; /* one layer, read-only (per MMC-2 spec) */
539 buf[7] = 0; /* default densities */
540
541 /* FIXME: 0x30000 per spec? */
542 cpu_to_ube32(buf + 8, 0); /* start sector */
543 cpu_to_ube32(buf + 12, total_sectors - 1); /* end sector */
544 cpu_to_ube32(buf + 16, total_sectors - 1); /* l0 end sector */
545
546 /* Size of buffer, not including 2 byte size field */
547 stw_be_p(buf, 2048 + 2);
548
549 /* 2k data + 4 byte header */
550 return (2048 + 4);
551 }
552
553 case 0x01: /* DVD copyright information */
554 buf[4] = 0; /* no copyright data */
555 buf[5] = 0; /* no region restrictions */
556
557 /* Size of buffer, not including 2 byte size field */
558 stw_be_p(buf, 4 + 2);
559
560 /* 4 byte header + 4 byte data */
561 return (4 + 4);
562
563 case 0x03: /* BCA information - invalid field for no BCA info */
564 return -ASC_INV_FIELD_IN_CMD_PACKET;
565
566 case 0x04: /* DVD disc manufacturing information */
567 /* Size of buffer, not including 2 byte size field */
568 stw_be_p(buf, 2048 + 2);
569
570 /* 2k data + 4 byte header */
571 return (2048 + 4);
572
573 case 0xff:
574 /*
575 * This lists all the command capabilities above. Add new ones
576 * in order and update the length and buffer return values.
577 */
578
579 buf[4] = 0x00; /* Physical format */
580 buf[5] = 0x40; /* Not writable, is readable */
581 stw_be_p(buf + 6, 2048 + 4);
582
583 buf[8] = 0x01; /* Copyright info */
584 buf[9] = 0x40; /* Not writable, is readable */
585 stw_be_p(buf + 10, 4 + 4);
586
587 buf[12] = 0x03; /* BCA info */
588 buf[13] = 0x40; /* Not writable, is readable */
589 stw_be_p(buf + 14, 188 + 4);
590
591 buf[16] = 0x04; /* Manufacturing info */
592 buf[17] = 0x40; /* Not writable, is readable */
593 stw_be_p(buf + 18, 2048 + 4);
594
595 /* Size of buffer, not including 2 byte size field */
596 stw_be_p(buf, 16 + 2);
597
598 /* data written + 4 byte header */
599 return (16 + 4);
600
601 default: /* TODO: formats beyond DVD-ROM requires */
602 return -ASC_INV_FIELD_IN_CMD_PACKET;
603 }
604 }
605
606 static unsigned int event_status_media(IDEState *s,
607 uint8_t *buf)
608 {
609 uint8_t event_code, media_status;
610
611 media_status = 0;
612 if (s->tray_open) {
613 media_status = MS_TRAY_OPEN;
614 } else if (blk_is_inserted(s->blk)) {
615 media_status = MS_MEDIA_PRESENT;
616 }
617
618 /* Event notification descriptor */
619 event_code = MEC_NO_CHANGE;
620 if (media_status != MS_TRAY_OPEN) {
621 if (s->events.new_media) {
622 event_code = MEC_NEW_MEDIA;
623 s->events.new_media = false;
624 } else if (s->events.eject_request) {
625 event_code = MEC_EJECT_REQUESTED;
626 s->events.eject_request = false;
627 }
628 }
629
630 buf[4] = event_code;
631 buf[5] = media_status;
632
633 /* These fields are reserved, just clear them. */
634 buf[6] = 0;
635 buf[7] = 0;
636
637 return 8; /* We wrote to 4 extra bytes from the header */
638 }
639
640 /*
641 * Before transferring data or otherwise signalling acceptance of a command
642 * marked CONDDATA, we must check the validity of the byte_count_limit.
643 */
644 static bool validate_bcl(IDEState *s)
645 {
646 /* TODO: Check IDENTIFY data word 125 for defacult BCL (currently 0) */
647 if (s->atapi_dma || atapi_byte_count_limit(s)) {
648 return true;
649 }
650
651 /* TODO: Move abort back into core.c and introduce proper error flow between
652 * ATAPI layer and IDE core layer */
653 ide_abort_command(s);
654 return false;
655 }
656
657 static void cmd_get_event_status_notification(IDEState *s,
658 uint8_t *buf)
659 {
660 const uint8_t *packet = buf;
661
662 struct {
663 uint8_t opcode;
664 uint8_t polled; /* lsb bit is polled; others are reserved */
665 uint8_t reserved2[2];
666 uint8_t class;
667 uint8_t reserved3[2];
668 uint16_t len;
669 uint8_t control;
670 } QEMU_PACKED *gesn_cdb;
671
672 struct {
673 uint16_t len;
674 uint8_t notification_class;
675 uint8_t supported_events;
676 } QEMU_PACKED *gesn_event_header;
677 unsigned int max_len, used_len;
678
679 gesn_cdb = (void *)packet;
680 gesn_event_header = (void *)buf;
681
682 max_len = be16_to_cpu(gesn_cdb->len);
683
684 /* It is fine by the MMC spec to not support async mode operations */
685 if (!(gesn_cdb->polled & 0x01)) { /* asynchronous mode */
686 /* Only polling is supported, asynchronous mode is not. */
687 ide_atapi_cmd_error(s, ILLEGAL_REQUEST,
688 ASC_INV_FIELD_IN_CMD_PACKET);
689 return;
690 }
691
692 /* polling mode operation */
693
694 /*
695 * These are the supported events.
696 *
697 * We currently only support requests of the 'media' type.
698 * Notification class requests and supported event classes are bitmasks,
699 * but they are build from the same values as the "notification class"
700 * field.
701 */
702 gesn_event_header->supported_events = 1 << GESN_MEDIA;
703
704 /*
705 * We use |= below to set the class field; other bits in this byte
706 * are reserved now but this is useful to do if we have to use the
707 * reserved fields later.
708 */
709 gesn_event_header->notification_class = 0;
710
711 /*
712 * Responses to requests are to be based on request priority. The
713 * notification_class_request_type enum above specifies the
714 * priority: upper elements are higher prio than lower ones.
715 */
716 if (gesn_cdb->class & (1 << GESN_MEDIA)) {
717 gesn_event_header->notification_class |= GESN_MEDIA;
718 used_len = event_status_media(s, buf);
719 } else {
720 gesn_event_header->notification_class = 0x80; /* No event available */
721 used_len = sizeof(*gesn_event_header);
722 }
723 gesn_event_header->len = cpu_to_be16(used_len
724 - sizeof(*gesn_event_header));
725 ide_atapi_cmd_reply(s, used_len, max_len);
726 }
727
728 static void cmd_request_sense(IDEState *s, uint8_t *buf)
729 {
730 int max_len = buf[4];
731
732 memset(buf, 0, 18);
733 buf[0] = 0x70 | (1 << 7);
734 buf[2] = s->sense_key;
735 buf[7] = 10;
736 buf[12] = s->asc;
737
738 if (s->sense_key == UNIT_ATTENTION) {
739 s->sense_key = NO_SENSE;
740 }
741
742 ide_atapi_cmd_reply(s, 18, max_len);
743 }
744
745 static void cmd_inquiry(IDEState *s, uint8_t *buf)
746 {
747 uint8_t page_code = buf[2];
748 int max_len = buf[4];
749
750 unsigned idx = 0;
751 unsigned size_idx;
752 unsigned preamble_len;
753
754 /* If the EVPD (Enable Vital Product Data) bit is set in byte 1,
755 * we are being asked for a specific page of info indicated by byte 2. */
756 if (buf[1] & 0x01) {
757 preamble_len = 4;
758 size_idx = 3;
759
760 buf[idx++] = 0x05; /* CD-ROM */
761 buf[idx++] = page_code; /* Page Code */
762 buf[idx++] = 0x00; /* reserved */
763 idx++; /* length (set later) */
764
765 switch (page_code) {
766 case 0x00:
767 /* Supported Pages: List of supported VPD responses. */
768 buf[idx++] = 0x00; /* 0x00: Supported Pages, and: */
769 buf[idx++] = 0x83; /* 0x83: Device Identification. */
770 break;
771
772 case 0x83:
773 /* Device Identification. Each entry is optional, but the entries
774 * included here are modeled after libata's VPD responses.
775 * If the response is given, at least one entry must be present. */
776
777 /* Entry 1: Serial */
778 if (idx + 24 > max_len) {
779 /* Not enough room for even the first entry: */
780 /* 4 byte header + 20 byte string */
781 ide_atapi_cmd_error(s, ILLEGAL_REQUEST,
782 ASC_DATA_PHASE_ERROR);
783 return;
784 }
785 buf[idx++] = 0x02; /* Ascii */
786 buf[idx++] = 0x00; /* Vendor Specific */
787 buf[idx++] = 0x00;
788 buf[idx++] = 20; /* Remaining length */
789 padstr8(buf + idx, 20, s->drive_serial_str);
790 idx += 20;
791
792 /* Entry 2: Drive Model and Serial */
793 if (idx + 72 > max_len) {
794 /* 4 (header) + 8 (vendor) + 60 (model & serial) */
795 goto out;
796 }
797 buf[idx++] = 0x02; /* Ascii */
798 buf[idx++] = 0x01; /* T10 Vendor */
799 buf[idx++] = 0x00;
800 buf[idx++] = 68;
801 padstr8(buf + idx, 8, "ATA"); /* Generic T10 vendor */
802 idx += 8;
803 padstr8(buf + idx, 40, s->drive_model_str);
804 idx += 40;
805 padstr8(buf + idx, 20, s->drive_serial_str);
806 idx += 20;
807
808 /* Entry 3: WWN */
809 if (s->wwn && (idx + 12 <= max_len)) {
810 /* 4 byte header + 8 byte wwn */
811 buf[idx++] = 0x01; /* Binary */
812 buf[idx++] = 0x03; /* NAA */
813 buf[idx++] = 0x00;
814 buf[idx++] = 0x08;
815 stq_be_p(&buf[idx], s->wwn);
816 idx += 8;
817 }
818 break;
819
820 default:
821 /* SPC-3, revision 23 sec. 6.4 */
822 ide_atapi_cmd_error(s, ILLEGAL_REQUEST,
823 ASC_INV_FIELD_IN_CMD_PACKET);
824 return;
825 }
826 } else {
827 preamble_len = 5;
828 size_idx = 4;
829
830 buf[0] = 0x05; /* CD-ROM */
831 buf[1] = 0x80; /* removable */
832 buf[2] = 0x00; /* ISO */
833 buf[3] = 0x21; /* ATAPI-2 (XXX: put ATAPI-4 ?) */
834 /* buf[size_idx] set below. */
835 buf[5] = 0; /* reserved */
836 buf[6] = 0; /* reserved */
837 buf[7] = 0; /* reserved */
838 padstr8(buf + 8, 8, "QEMU");
839 padstr8(buf + 16, 16, "QEMU DVD-ROM");
840 padstr8(buf + 32, 4, s->version);
841 idx = 36;
842 }
843
844 out:
845 buf[size_idx] = idx - preamble_len;
846 ide_atapi_cmd_reply(s, idx, max_len);
847 }
848
849 static void cmd_get_configuration(IDEState *s, uint8_t *buf)
850 {
851 uint32_t len;
852 uint8_t index = 0;
853 int max_len;
854
855 /* only feature 0 is supported */
856 if (buf[2] != 0 || buf[3] != 0) {
857 ide_atapi_cmd_error(s, ILLEGAL_REQUEST,
858 ASC_INV_FIELD_IN_CMD_PACKET);
859 return;
860 }
861
862 /* XXX: could result in alignment problems in some architectures */
863 max_len = ube16_to_cpu(buf + 7);
864
865 /*
866 * XXX: avoid overflow for io_buffer if max_len is bigger than
867 * the size of that buffer (dimensioned to max number of
868 * sectors to transfer at once)
869 *
870 * Only a problem if the feature/profiles grow.
871 */
872 if (max_len > 512) {
873 /* XXX: assume 1 sector */
874 max_len = 512;
875 }
876
877 memset(buf, 0, max_len);
878 /*
879 * the number of sectors from the media tells us which profile
880 * to use as current. 0 means there is no media
881 */
882 if (media_is_dvd(s)) {
883 cpu_to_ube16(buf + 6, MMC_PROFILE_DVD_ROM);
884 } else if (media_is_cd(s)) {
885 cpu_to_ube16(buf + 6, MMC_PROFILE_CD_ROM);
886 }
887
888 buf[10] = 0x02 | 0x01; /* persistent and current */
889 len = 12; /* headers: 8 + 4 */
890 len += ide_atapi_set_profile(buf, &index, MMC_PROFILE_DVD_ROM);
891 len += ide_atapi_set_profile(buf, &index, MMC_PROFILE_CD_ROM);
892 cpu_to_ube32(buf, len - 4); /* data length */
893
894 ide_atapi_cmd_reply(s, len, max_len);
895 }
896
897 static void cmd_mode_sense(IDEState *s, uint8_t *buf)
898 {
899 int action, code;
900 int max_len;
901
902 max_len = ube16_to_cpu(buf + 7);
903 action = buf[2] >> 6;
904 code = buf[2] & 0x3f;
905
906 switch(action) {
907 case 0: /* current values */
908 switch(code) {
909 case MODE_PAGE_R_W_ERROR: /* error recovery */
910 cpu_to_ube16(&buf[0], 16 - 2);
911 buf[2] = 0x70;
912 buf[3] = 0;
913 buf[4] = 0;
914 buf[5] = 0;
915 buf[6] = 0;
916 buf[7] = 0;
917
918 buf[8] = MODE_PAGE_R_W_ERROR;
919 buf[9] = 16 - 10;
920 buf[10] = 0x00;
921 buf[11] = 0x05;
922 buf[12] = 0x00;
923 buf[13] = 0x00;
924 buf[14] = 0x00;
925 buf[15] = 0x00;
926 ide_atapi_cmd_reply(s, 16, max_len);
927 break;
928 case MODE_PAGE_AUDIO_CTL:
929 cpu_to_ube16(&buf[0], 24 - 2);
930 buf[2] = 0x70;
931 buf[3] = 0;
932 buf[4] = 0;
933 buf[5] = 0;
934 buf[6] = 0;
935 buf[7] = 0;
936
937 buf[8] = MODE_PAGE_AUDIO_CTL;
938 buf[9] = 24 - 10;
939 /* Fill with CDROM audio volume */
940 buf[17] = 0;
941 buf[19] = 0;
942 buf[21] = 0;
943 buf[23] = 0;
944
945 ide_atapi_cmd_reply(s, 24, max_len);
946 break;
947 case MODE_PAGE_CAPABILITIES:
948 cpu_to_ube16(&buf[0], 30 - 2);
949 buf[2] = 0x70;
950 buf[3] = 0;
951 buf[4] = 0;
952 buf[5] = 0;
953 buf[6] = 0;
954 buf[7] = 0;
955
956 buf[8] = MODE_PAGE_CAPABILITIES;
957 buf[9] = 30 - 10;
958 buf[10] = 0x3b; /* read CDR/CDRW/DVDROM/DVDR/DVDRAM */
959 buf[11] = 0x00;
960
961 /* Claim PLAY_AUDIO capability (0x01) since some Linux
962 code checks for this to automount media. */
963 buf[12] = 0x71;
964 buf[13] = 3 << 5;
965 buf[14] = (1 << 0) | (1 << 3) | (1 << 5);
966 if (s->tray_locked) {
967 buf[14] |= 1 << 1;
968 }
969 buf[15] = 0x00; /* No volume & mute control, no changer */
970 cpu_to_ube16(&buf[16], 704); /* 4x read speed */
971 buf[18] = 0; /* Two volume levels */
972 buf[19] = 2;
973 cpu_to_ube16(&buf[20], 512); /* 512k buffer */
974 cpu_to_ube16(&buf[22], 704); /* 4x read speed current */
975 buf[24] = 0;
976 buf[25] = 0;
977 buf[26] = 0;
978 buf[27] = 0;
979 buf[28] = 0;
980 buf[29] = 0;
981 ide_atapi_cmd_reply(s, 30, max_len);
982 break;
983 default:
984 goto error_cmd;
985 }
986 break;
987 case 1: /* changeable values */
988 goto error_cmd;
989 case 2: /* default values */
990 goto error_cmd;
991 default:
992 case 3: /* saved values */
993 ide_atapi_cmd_error(s, ILLEGAL_REQUEST,
994 ASC_SAVING_PARAMETERS_NOT_SUPPORTED);
995 break;
996 }
997 return;
998
999 error_cmd:
1000 ide_atapi_cmd_error(s, ILLEGAL_REQUEST, ASC_INV_FIELD_IN_CMD_PACKET);
1001 }
1002
1003 static void cmd_test_unit_ready(IDEState *s, uint8_t *buf)
1004 {
1005 /* Not Ready Conditions are already handled in ide_atapi_cmd(), so if we
1006 * come here, we know that it's ready. */
1007 ide_atapi_cmd_ok(s);
1008 }
1009
1010 static void cmd_prevent_allow_medium_removal(IDEState *s, uint8_t* buf)
1011 {
1012 s->tray_locked = buf[4] & 1;
1013 blk_lock_medium(s->blk, buf[4] & 1);
1014 ide_atapi_cmd_ok(s);
1015 }
1016
1017 static void cmd_read(IDEState *s, uint8_t* buf)
1018 {
1019 int nb_sectors, lba;
1020
1021 if (buf[0] == GPCMD_READ_10) {
1022 nb_sectors = ube16_to_cpu(buf + 7);
1023 } else {
1024 nb_sectors = ube32_to_cpu(buf + 6);
1025 }
1026
1027 lba = ube32_to_cpu(buf + 2);
1028 if (nb_sectors == 0) {
1029 ide_atapi_cmd_ok(s);
1030 return;
1031 }
1032
1033 ide_atapi_cmd_read(s, lba, nb_sectors, 2048);
1034 }
1035
1036 static void cmd_read_cd(IDEState *s, uint8_t* buf)
1037 {
1038 int nb_sectors, lba, transfer_request;
1039
1040 nb_sectors = (buf[6] << 16) | (buf[7] << 8) | buf[8];
1041 lba = ube32_to_cpu(buf + 2);
1042
1043 if (nb_sectors == 0) {
1044 ide_atapi_cmd_ok(s);
1045 return;
1046 }
1047
1048 transfer_request = buf[9] & 0xf8;
1049 if (transfer_request == 0x00) {
1050 /* nothing */
1051 ide_atapi_cmd_ok(s);
1052 return;
1053 }
1054
1055 /* Check validity of BCL before transferring data */
1056 if (!validate_bcl(s)) {
1057 return;
1058 }
1059
1060 switch (transfer_request) {
1061 case 0x10:
1062 /* normal read */
1063 ide_atapi_cmd_read(s, lba, nb_sectors, 2048);
1064 break;
1065 case 0xf8:
1066 /* read all data */
1067 ide_atapi_cmd_read(s, lba, nb_sectors, 2352);
1068 break;
1069 default:
1070 ide_atapi_cmd_error(s, ILLEGAL_REQUEST,
1071 ASC_INV_FIELD_IN_CMD_PACKET);
1072 break;
1073 }
1074 }
1075
1076 static void cmd_seek(IDEState *s, uint8_t* buf)
1077 {
1078 unsigned int lba;
1079 uint64_t total_sectors = s->nb_sectors >> 2;
1080
1081 lba = ube32_to_cpu(buf + 2);
1082 if (lba >= total_sectors) {
1083 ide_atapi_cmd_error(s, ILLEGAL_REQUEST, ASC_LOGICAL_BLOCK_OOR);
1084 return;
1085 }
1086
1087 ide_atapi_cmd_ok(s);
1088 }
1089
1090 static void cmd_start_stop_unit(IDEState *s, uint8_t* buf)
1091 {
1092 int sense;
1093 bool start = buf[4] & 1;
1094 bool loej = buf[4] & 2; /* load on start, eject on !start */
1095 int pwrcnd = buf[4] & 0xf0;
1096
1097 if (pwrcnd) {
1098 /* eject/load only happens for power condition == 0 */
1099 ide_atapi_cmd_ok(s);
1100 return;
1101 }
1102
1103 if (loej) {
1104 if (!start && !s->tray_open && s->tray_locked) {
1105 sense = blk_is_inserted(s->blk)
1106 ? NOT_READY : ILLEGAL_REQUEST;
1107 ide_atapi_cmd_error(s, sense, ASC_MEDIA_REMOVAL_PREVENTED);
1108 return;
1109 }
1110
1111 if (s->tray_open != !start) {
1112 blk_eject(s->blk, !start);
1113 s->tray_open = !start;
1114 }
1115 }
1116
1117 ide_atapi_cmd_ok(s);
1118 }
1119
1120 static void cmd_mechanism_status(IDEState *s, uint8_t* buf)
1121 {
1122 int max_len = ube16_to_cpu(buf + 8);
1123
1124 cpu_to_ube16(buf, 0);
1125 /* no current LBA */
1126 buf[2] = 0;
1127 buf[3] = 0;
1128 buf[4] = 0;
1129 buf[5] = 1;
1130 cpu_to_ube16(buf + 6, 0);
1131 ide_atapi_cmd_reply(s, 8, max_len);
1132 }
1133
1134 static void cmd_read_toc_pma_atip(IDEState *s, uint8_t* buf)
1135 {
1136 int format, msf, start_track, len;
1137 int max_len;
1138 uint64_t total_sectors = s->nb_sectors >> 2;
1139
1140 max_len = ube16_to_cpu(buf + 7);
1141 format = buf[9] >> 6;
1142 msf = (buf[1] >> 1) & 1;
1143 start_track = buf[6];
1144
1145 switch(format) {
1146 case 0:
1147 len = cdrom_read_toc(total_sectors, buf, msf, start_track);
1148 if (len < 0)
1149 goto error_cmd;
1150 ide_atapi_cmd_reply(s, len, max_len);
1151 break;
1152 case 1:
1153 /* multi session : only a single session defined */
1154 memset(buf, 0, 12);
1155 buf[1] = 0x0a;
1156 buf[2] = 0x01;
1157 buf[3] = 0x01;
1158 ide_atapi_cmd_reply(s, 12, max_len);
1159 break;
1160 case 2:
1161 len = cdrom_read_toc_raw(total_sectors, buf, msf, start_track);
1162 if (len < 0)
1163 goto error_cmd;
1164 ide_atapi_cmd_reply(s, len, max_len);
1165 break;
1166 default:
1167 error_cmd:
1168 ide_atapi_cmd_error(s, ILLEGAL_REQUEST,
1169 ASC_INV_FIELD_IN_CMD_PACKET);
1170 }
1171 }
1172
1173 static void cmd_read_cdvd_capacity(IDEState *s, uint8_t* buf)
1174 {
1175 uint64_t total_sectors = s->nb_sectors >> 2;
1176
1177 /* NOTE: it is really the number of sectors minus 1 */
1178 cpu_to_ube32(buf, total_sectors - 1);
1179 cpu_to_ube32(buf + 4, 2048);
1180 ide_atapi_cmd_reply(s, 8, 8);
1181 }
1182
1183 static void cmd_read_disc_information(IDEState *s, uint8_t* buf)
1184 {
1185 uint8_t type = buf[1] & 7;
1186 uint32_t max_len = ube16_to_cpu(buf + 7);
1187
1188 /* Types 1/2 are only defined for Blu-Ray. */
1189 if (type != 0) {
1190 ide_atapi_cmd_error(s, ILLEGAL_REQUEST,
1191 ASC_INV_FIELD_IN_CMD_PACKET);
1192 return;
1193 }
1194
1195 memset(buf, 0, 34);
1196 buf[1] = 32;
1197 buf[2] = 0xe; /* last session complete, disc finalized */
1198 buf[3] = 1; /* first track on disc */
1199 buf[4] = 1; /* # of sessions */
1200 buf[5] = 1; /* first track of last session */
1201 buf[6] = 1; /* last track of last session */
1202 buf[7] = 0x20; /* unrestricted use */
1203 buf[8] = 0x00; /* CD-ROM or DVD-ROM */
1204 /* 9-10-11: most significant byte corresponding bytes 4-5-6 */
1205 /* 12-23: not meaningful for CD-ROM or DVD-ROM */
1206 /* 24-31: disc bar code */
1207 /* 32: disc application code */
1208 /* 33: number of OPC tables */
1209
1210 ide_atapi_cmd_reply(s, 34, max_len);
1211 }
1212
1213 static void cmd_read_dvd_structure(IDEState *s, uint8_t* buf)
1214 {
1215 int max_len;
1216 int media = buf[1];
1217 int format = buf[7];
1218 int ret;
1219
1220 max_len = ube16_to_cpu(buf + 8);
1221
1222 if (format < 0xff) {
1223 if (media_is_cd(s)) {
1224 ide_atapi_cmd_error(s, ILLEGAL_REQUEST,
1225 ASC_INCOMPATIBLE_FORMAT);
1226 return;
1227 } else if (!media_present(s)) {
1228 ide_atapi_cmd_error(s, ILLEGAL_REQUEST,
1229 ASC_INV_FIELD_IN_CMD_PACKET);
1230 return;
1231 }
1232 }
1233
1234 memset(buf, 0, max_len > IDE_DMA_BUF_SECTORS * 512 + 4 ?
1235 IDE_DMA_BUF_SECTORS * 512 + 4 : max_len);
1236
1237 switch (format) {
1238 case 0x00 ... 0x7f:
1239 case 0xff:
1240 if (media == 0) {
1241 ret = ide_dvd_read_structure(s, format, buf, buf);
1242
1243 if (ret < 0) {
1244 ide_atapi_cmd_error(s, ILLEGAL_REQUEST, -ret);
1245 } else {
1246 ide_atapi_cmd_reply(s, ret, max_len);
1247 }
1248
1249 break;
1250 }
1251 /* TODO: BD support, fall through for now */
1252
1253 /* Generic disk structures */
1254 case 0x80: /* TODO: AACS volume identifier */
1255 case 0x81: /* TODO: AACS media serial number */
1256 case 0x82: /* TODO: AACS media identifier */
1257 case 0x83: /* TODO: AACS media key block */
1258 case 0x90: /* TODO: List of recognized format layers */
1259 case 0xc0: /* TODO: Write protection status */
1260 default:
1261 ide_atapi_cmd_error(s, ILLEGAL_REQUEST,
1262 ASC_INV_FIELD_IN_CMD_PACKET);
1263 break;
1264 }
1265 }
1266
1267 static void cmd_set_speed(IDEState *s, uint8_t* buf)
1268 {
1269 ide_atapi_cmd_ok(s);
1270 }
1271
1272 enum {
1273 /*
1274 * Only commands flagged as ALLOW_UA are allowed to run under a
1275 * unit attention condition. (See MMC-5, section 4.1.6.1)
1276 */
1277 ALLOW_UA = 0x01,
1278
1279 /*
1280 * Commands flagged with CHECK_READY can only execute if a medium is present.
1281 * Otherwise they report the Not Ready Condition. (See MMC-5, section
1282 * 4.1.8)
1283 */
1284 CHECK_READY = 0x02,
1285
1286 /*
1287 * Commands flagged with NONDATA do not in any circumstances return
1288 * any data via ide_atapi_cmd_reply. These commands are exempt from
1289 * the normal byte_count_limit constraints.
1290 * See ATA8-ACS3 "7.21.5 Byte Count Limit"
1291 */
1292 NONDATA = 0x04,
1293
1294 /*
1295 * CONDDATA implies a command that transfers data only conditionally based
1296 * on the presence of suboptions. It should be exempt from the BCL check at
1297 * command validation time, but it needs to be checked at the command
1298 * handler level instead.
1299 */
1300 CONDDATA = 0x08,
1301 };
1302
1303 static const struct AtapiCmd {
1304 void (*handler)(IDEState *s, uint8_t *buf);
1305 int flags;
1306 } atapi_cmd_table[0x100] = {
1307 [ 0x00 ] = { cmd_test_unit_ready, CHECK_READY | NONDATA },
1308 [ 0x03 ] = { cmd_request_sense, ALLOW_UA },
1309 [ 0x12 ] = { cmd_inquiry, ALLOW_UA },
1310 [ 0x1b ] = { cmd_start_stop_unit, NONDATA }, /* [1] */
1311 [ 0x1e ] = { cmd_prevent_allow_medium_removal, NONDATA },
1312 [ 0x25 ] = { cmd_read_cdvd_capacity, CHECK_READY },
1313 [ 0x28 ] = { cmd_read, /* (10) */ CHECK_READY },
1314 [ 0x2b ] = { cmd_seek, CHECK_READY | NONDATA },
1315 [ 0x43 ] = { cmd_read_toc_pma_atip, CHECK_READY },
1316 [ 0x46 ] = { cmd_get_configuration, ALLOW_UA },
1317 [ 0x4a ] = { cmd_get_event_status_notification, ALLOW_UA },
1318 [ 0x51 ] = { cmd_read_disc_information, CHECK_READY },
1319 [ 0x5a ] = { cmd_mode_sense, /* (10) */ 0 },
1320 [ 0xa8 ] = { cmd_read, /* (12) */ CHECK_READY },
1321 [ 0xad ] = { cmd_read_dvd_structure, CHECK_READY },
1322 [ 0xbb ] = { cmd_set_speed, NONDATA },
1323 [ 0xbd ] = { cmd_mechanism_status, 0 },
1324 [ 0xbe ] = { cmd_read_cd, CHECK_READY | CONDDATA },
1325 /* [1] handler detects and reports not ready condition itself */
1326 };
1327
1328 void ide_atapi_cmd(IDEState *s)
1329 {
1330 uint8_t *buf = s->io_buffer;
1331 const struct AtapiCmd *cmd = &atapi_cmd_table[s->io_buffer[0]];
1332
1333 #ifdef DEBUG_IDE_ATAPI
1334 {
1335 int i;
1336 printf("ATAPI limit=0x%x packet:", s->lcyl | (s->hcyl << 8));
1337 for(i = 0; i < ATAPI_PACKET_SIZE; i++) {
1338 printf(" %02x", buf[i]);
1339 }
1340 printf("\n");
1341 }
1342 #endif
1343
1344 /*
1345 * If there's a UNIT_ATTENTION condition pending, only command flagged with
1346 * ALLOW_UA are allowed to complete. with other commands getting a CHECK
1347 * condition response unless a higher priority status, defined by the drive
1348 * here, is pending.
1349 */
1350 if (s->sense_key == UNIT_ATTENTION && !(cmd->flags & ALLOW_UA)) {
1351 ide_atapi_cmd_check_status(s);
1352 return;
1353 }
1354 /*
1355 * When a CD gets changed, we have to report an ejected state and
1356 * then a loaded state to guests so that they detect tray
1357 * open/close and media change events. Guests that do not use
1358 * GET_EVENT_STATUS_NOTIFICATION to detect such tray open/close
1359 * states rely on this behavior.
1360 */
1361 if (!(cmd->flags & ALLOW_UA) &&
1362 !s->tray_open && blk_is_inserted(s->blk) && s->cdrom_changed) {
1363
1364 if (s->cdrom_changed == 1) {
1365 ide_atapi_cmd_error(s, NOT_READY, ASC_MEDIUM_NOT_PRESENT);
1366 s->cdrom_changed = 2;
1367 } else {
1368 ide_atapi_cmd_error(s, UNIT_ATTENTION, ASC_MEDIUM_MAY_HAVE_CHANGED);
1369 s->cdrom_changed = 0;
1370 }
1371
1372 return;
1373 }
1374
1375 /* Report a Not Ready condition if appropriate for the command */
1376 if ((cmd->flags & CHECK_READY) &&
1377 (!media_present(s) || !blk_is_inserted(s->blk)))
1378 {
1379 ide_atapi_cmd_error(s, NOT_READY, ASC_MEDIUM_NOT_PRESENT);
1380 return;
1381 }
1382
1383 /* Commands that don't transfer DATA permit the byte_count_limit to be 0.
1384 * If this is a data-transferring PIO command and BCL is 0,
1385 * we abort at the /ATA/ level, not the ATAPI level.
1386 * See ATA8 ACS3 section 7.17.6.49 and 7.21.5 */
1387 if (cmd->handler && !(cmd->flags & (NONDATA | CONDDATA))) {
1388 if (!validate_bcl(s)) {
1389 return;
1390 }
1391 }
1392
1393 /* Execute the command */
1394 if (cmd->handler) {
1395 cmd->handler(s, buf);
1396 return;
1397 }
1398
1399 ide_atapi_cmd_error(s, ILLEGAL_REQUEST, ASC_ILLEGAL_OPCODE);
1400 }