1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
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
34static void ide_atapi_cmd_read_dma_cb(void *opaque, int ret);
35
36static 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
47static inline void cpu_to_ube16(uint8_t *buf, int val)
48{
49 buf[0] = val >> 8;
50 buf[1] = val & 0xff;
51}
52
53static 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
61static inline int ube16_to_cpu(const uint8_t *buf)
62{
63 return (buf[0] << 8) | buf[1];
64}
65
66static 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
71static 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
79static inline int media_present(IDEState *s)
80{
81 return !s->tray_open && s->nb_sectors > 0;
82}
83
84
85static inline int media_is_dvd(IDEState *s)
86{
87 return (media_present(s) && s->nb_sectors > CD_MAX_SECTORS);
88}
89
90static inline int media_is_cd(IDEState *s)
91{
92 return (media_present(s) && s->nb_sectors <= CD_MAX_SECTORS);
93}
94
95static void cd_data_to_raw(uint8_t *buf, int lba)
96{
97
98 buf[0] = 0x00;
99 memset(buf + 1, 0xff, 10);
100 buf[11] = 0x00;
101 buf += 12;
102
103 lba_to_msf(buf, lba);
104 buf[3] = 0x01;
105 buf += 4;
106
107 buf += 2048;
108
109 memset(buf, 0, 288);
110}
111
112static int
113cd_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
151static 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
178static 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
205void 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
214void 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
228void ide_atapi_io_error(IDEState *s, int ret)
229{
230
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
240static 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
252void 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
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
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
279
280
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
290
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
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
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
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
335static 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;
340 s->packet_transfer_size = size;
341 s->io_buffer_size = size;
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
357static 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
369static 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
380
381static 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
399
400
401
402
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
450eot:
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
460
461static 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
473 s->status = READY_STAT | SEEK_STAT | DRQ_STAT | BUSY_STAT;
474 ide_start_dma(s, ide_atapi_cmd_read_dma_cb);
475}
476
477static 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
491void ide_atapi_dma_restart(IDEState *s)
492{
493
494
495
496
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
503static 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;
507
508 buf_profile += ((*index) * 4);
509 cpu_to_ube16 (buf_profile, profile);
510 buf_profile[2] = ((buf_profile[0] == buf[6]) && (buf_profile[1] == buf[7]));
511
512
513 (*index)++;
514 buf[11] += 4;
515
516 return 4;
517}
518
519static int ide_dvd_read_structure(IDEState *s, int format,
520 const uint8_t *packet, uint8_t *buf)
521{
522 switch (format) {
523 case 0x0:
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;
537 buf[5] = 0xf;
538 buf[6] = 1;
539 buf[7] = 0;
540
541
542 cpu_to_ube32(buf + 8, 0);
543 cpu_to_ube32(buf + 12, total_sectors - 1);
544 cpu_to_ube32(buf + 16, total_sectors - 1);
545
546
547 stw_be_p(buf, 2048 + 2);
548
549
550 return (2048 + 4);
551 }
552
553 case 0x01:
554 buf[4] = 0;
555 buf[5] = 0;
556
557
558 stw_be_p(buf, 4 + 2);
559
560
561 return (4 + 4);
562
563 case 0x03:
564 return -ASC_INV_FIELD_IN_CMD_PACKET;
565
566 case 0x04:
567
568 stw_be_p(buf, 2048 + 2);
569
570
571 return (2048 + 4);
572
573 case 0xff:
574
575
576
577
578
579 buf[4] = 0x00;
580 buf[5] = 0x40;
581 stw_be_p(buf + 6, 2048 + 4);
582
583 buf[8] = 0x01;
584 buf[9] = 0x40;
585 stw_be_p(buf + 10, 4 + 4);
586
587 buf[12] = 0x03;
588 buf[13] = 0x40;
589 stw_be_p(buf + 14, 188 + 4);
590
591 buf[16] = 0x04;
592 buf[17] = 0x40;
593 stw_be_p(buf + 18, 2048 + 4);
594
595
596 stw_be_p(buf, 16 + 2);
597
598
599 return (16 + 4);
600
601 default:
602 return -ASC_INV_FIELD_IN_CMD_PACKET;
603 }
604}
605
606static 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
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
634 buf[6] = 0;
635 buf[7] = 0;
636
637 return 8;
638}
639
640static void cmd_get_event_status_notification(IDEState *s,
641 uint8_t *buf)
642{
643 const uint8_t *packet = buf;
644
645 struct {
646 uint8_t opcode;
647 uint8_t polled;
648 uint8_t reserved2[2];
649 uint8_t class;
650 uint8_t reserved3[2];
651 uint16_t len;
652 uint8_t control;
653 } QEMU_PACKED *gesn_cdb;
654
655 struct {
656 uint16_t len;
657 uint8_t notification_class;
658 uint8_t supported_events;
659 } QEMU_PACKED *gesn_event_header;
660 unsigned int max_len, used_len;
661
662 gesn_cdb = (void *)packet;
663 gesn_event_header = (void *)buf;
664
665 max_len = be16_to_cpu(gesn_cdb->len);
666
667
668 if (!(gesn_cdb->polled & 0x01)) {
669
670 ide_atapi_cmd_error(s, ILLEGAL_REQUEST,
671 ASC_INV_FIELD_IN_CMD_PACKET);
672 return;
673 }
674
675
676
677
678
679
680
681
682
683
684
685 gesn_event_header->supported_events = 1 << GESN_MEDIA;
686
687
688
689
690
691
692 gesn_event_header->notification_class = 0;
693
694
695
696
697
698
699 if (gesn_cdb->class & (1 << GESN_MEDIA)) {
700 gesn_event_header->notification_class |= GESN_MEDIA;
701 used_len = event_status_media(s, buf);
702 } else {
703 gesn_event_header->notification_class = 0x80;
704 used_len = sizeof(*gesn_event_header);
705 }
706 gesn_event_header->len = cpu_to_be16(used_len
707 - sizeof(*gesn_event_header));
708 ide_atapi_cmd_reply(s, used_len, max_len);
709}
710
711static void cmd_request_sense(IDEState *s, uint8_t *buf)
712{
713 int max_len = buf[4];
714
715 memset(buf, 0, 18);
716 buf[0] = 0x70 | (1 << 7);
717 buf[2] = s->sense_key;
718 buf[7] = 10;
719 buf[12] = s->asc;
720
721 if (s->sense_key == UNIT_ATTENTION) {
722 s->sense_key = NO_SENSE;
723 }
724
725 ide_atapi_cmd_reply(s, 18, max_len);
726}
727
728static void cmd_inquiry(IDEState *s, uint8_t *buf)
729{
730 uint8_t page_code = buf[2];
731 int max_len = buf[4];
732
733 unsigned idx = 0;
734 unsigned size_idx;
735 unsigned preamble_len;
736
737
738
739 if (buf[1] & 0x01) {
740 preamble_len = 4;
741 size_idx = 3;
742
743 buf[idx++] = 0x05;
744 buf[idx++] = page_code;
745 buf[idx++] = 0x00;
746 idx++;
747
748 switch (page_code) {
749 case 0x00:
750
751 buf[idx++] = 0x00;
752 buf[idx++] = 0x83;
753 break;
754
755 case 0x83:
756
757
758
759
760
761 if (idx + 24 > max_len) {
762
763
764 ide_atapi_cmd_error(s, ILLEGAL_REQUEST,
765 ASC_DATA_PHASE_ERROR);
766 return;
767 }
768 buf[idx++] = 0x02;
769 buf[idx++] = 0x00;
770 buf[idx++] = 0x00;
771 buf[idx++] = 20;
772 padstr8(buf + idx, 20, s->drive_serial_str);
773 idx += 20;
774
775
776 if (idx + 72 > max_len) {
777
778 goto out;
779 }
780 buf[idx++] = 0x02;
781 buf[idx++] = 0x01;
782 buf[idx++] = 0x00;
783 buf[idx++] = 68;
784 padstr8(buf + idx, 8, "ATA");
785 idx += 8;
786 padstr8(buf + idx, 40, s->drive_model_str);
787 idx += 40;
788 padstr8(buf + idx, 20, s->drive_serial_str);
789 idx += 20;
790
791
792 if (s->wwn && (idx + 12 <= max_len)) {
793
794 buf[idx++] = 0x01;
795 buf[idx++] = 0x03;
796 buf[idx++] = 0x00;
797 buf[idx++] = 0x08;
798 stq_be_p(&buf[idx], s->wwn);
799 idx += 8;
800 }
801 break;
802
803 default:
804
805 ide_atapi_cmd_error(s, ILLEGAL_REQUEST,
806 ASC_INV_FIELD_IN_CMD_PACKET);
807 return;
808 }
809 } else {
810 preamble_len = 5;
811 size_idx = 4;
812
813 buf[0] = 0x05;
814 buf[1] = 0x80;
815 buf[2] = 0x00;
816 buf[3] = 0x21;
817
818 buf[5] = 0;
819 buf[6] = 0;
820 buf[7] = 0;
821 padstr8(buf + 8, 8, "QEMU");
822 padstr8(buf + 16, 16, "QEMU DVD-ROM");
823 padstr8(buf + 32, 4, s->version);
824 idx = 36;
825 }
826
827 out:
828 buf[size_idx] = idx - preamble_len;
829 ide_atapi_cmd_reply(s, idx, max_len);
830}
831
832static void cmd_get_configuration(IDEState *s, uint8_t *buf)
833{
834 uint32_t len;
835 uint8_t index = 0;
836 int max_len;
837
838
839 if (buf[2] != 0 || buf[3] != 0) {
840 ide_atapi_cmd_error(s, ILLEGAL_REQUEST,
841 ASC_INV_FIELD_IN_CMD_PACKET);
842 return;
843 }
844
845
846 max_len = ube16_to_cpu(buf + 7);
847
848
849
850
851
852
853
854
855 if (max_len > 512) {
856
857 max_len = 512;
858 }
859
860 memset(buf, 0, max_len);
861
862
863
864
865 if (media_is_dvd(s)) {
866 cpu_to_ube16(buf + 6, MMC_PROFILE_DVD_ROM);
867 } else if (media_is_cd(s)) {
868 cpu_to_ube16(buf + 6, MMC_PROFILE_CD_ROM);
869 }
870
871 buf[10] = 0x02 | 0x01;
872 len = 12;
873 len += ide_atapi_set_profile(buf, &index, MMC_PROFILE_DVD_ROM);
874 len += ide_atapi_set_profile(buf, &index, MMC_PROFILE_CD_ROM);
875 cpu_to_ube32(buf, len - 4);
876
877 ide_atapi_cmd_reply(s, len, max_len);
878}
879
880static void cmd_mode_sense(IDEState *s, uint8_t *buf)
881{
882 int action, code;
883 int max_len;
884
885 max_len = ube16_to_cpu(buf + 7);
886 action = buf[2] >> 6;
887 code = buf[2] & 0x3f;
888
889 switch(action) {
890 case 0:
891 switch(code) {
892 case MODE_PAGE_R_W_ERROR:
893 cpu_to_ube16(&buf[0], 16 - 2);
894 buf[2] = 0x70;
895 buf[3] = 0;
896 buf[4] = 0;
897 buf[5] = 0;
898 buf[6] = 0;
899 buf[7] = 0;
900
901 buf[8] = MODE_PAGE_R_W_ERROR;
902 buf[9] = 16 - 10;
903 buf[10] = 0x00;
904 buf[11] = 0x05;
905 buf[12] = 0x00;
906 buf[13] = 0x00;
907 buf[14] = 0x00;
908 buf[15] = 0x00;
909 ide_atapi_cmd_reply(s, 16, max_len);
910 break;
911 case MODE_PAGE_AUDIO_CTL:
912 cpu_to_ube16(&buf[0], 24 - 2);
913 buf[2] = 0x70;
914 buf[3] = 0;
915 buf[4] = 0;
916 buf[5] = 0;
917 buf[6] = 0;
918 buf[7] = 0;
919
920 buf[8] = MODE_PAGE_AUDIO_CTL;
921 buf[9] = 24 - 10;
922
923 buf[17] = 0;
924 buf[19] = 0;
925 buf[21] = 0;
926 buf[23] = 0;
927
928 ide_atapi_cmd_reply(s, 24, max_len);
929 break;
930 case MODE_PAGE_CAPABILITIES:
931 cpu_to_ube16(&buf[0], 30 - 2);
932 buf[2] = 0x70;
933 buf[3] = 0;
934 buf[4] = 0;
935 buf[5] = 0;
936 buf[6] = 0;
937 buf[7] = 0;
938
939 buf[8] = MODE_PAGE_CAPABILITIES;
940 buf[9] = 30 - 10;
941 buf[10] = 0x3b;
942 buf[11] = 0x00;
943
944
945
946 buf[12] = 0x71;
947 buf[13] = 3 << 5;
948 buf[14] = (1 << 0) | (1 << 3) | (1 << 5);
949 if (s->tray_locked) {
950 buf[14] |= 1 << 1;
951 }
952 buf[15] = 0x00;
953 cpu_to_ube16(&buf[16], 704);
954 buf[18] = 0;
955 buf[19] = 2;
956 cpu_to_ube16(&buf[20], 512);
957 cpu_to_ube16(&buf[22], 704);
958 buf[24] = 0;
959 buf[25] = 0;
960 buf[26] = 0;
961 buf[27] = 0;
962 buf[28] = 0;
963 buf[29] = 0;
964 ide_atapi_cmd_reply(s, 30, max_len);
965 break;
966 default:
967 goto error_cmd;
968 }
969 break;
970 case 1:
971 goto error_cmd;
972 case 2:
973 goto error_cmd;
974 default:
975 case 3:
976 ide_atapi_cmd_error(s, ILLEGAL_REQUEST,
977 ASC_SAVING_PARAMETERS_NOT_SUPPORTED);
978 break;
979 }
980 return;
981
982error_cmd:
983 ide_atapi_cmd_error(s, ILLEGAL_REQUEST, ASC_INV_FIELD_IN_CMD_PACKET);
984}
985
986static void cmd_test_unit_ready(IDEState *s, uint8_t *buf)
987{
988
989
990 ide_atapi_cmd_ok(s);
991}
992
993static void cmd_prevent_allow_medium_removal(IDEState *s, uint8_t* buf)
994{
995 s->tray_locked = buf[4] & 1;
996 blk_lock_medium(s->blk, buf[4] & 1);
997 ide_atapi_cmd_ok(s);
998}
999
1000static void cmd_read(IDEState *s, uint8_t* buf)
1001{
1002 int nb_sectors, lba;
1003
1004 if (buf[0] == GPCMD_READ_10) {
1005 nb_sectors = ube16_to_cpu(buf + 7);
1006 } else {
1007 nb_sectors = ube32_to_cpu(buf + 6);
1008 }
1009
1010 lba = ube32_to_cpu(buf + 2);
1011 if (nb_sectors == 0) {
1012 ide_atapi_cmd_ok(s);
1013 return;
1014 }
1015
1016 ide_atapi_cmd_read(s, lba, nb_sectors, 2048);
1017}
1018
1019static void cmd_read_cd(IDEState *s, uint8_t* buf)
1020{
1021 int nb_sectors, lba, transfer_request;
1022
1023 nb_sectors = (buf[6] << 16) | (buf[7] << 8) | buf[8];
1024 lba = ube32_to_cpu(buf + 2);
1025
1026 if (nb_sectors == 0) {
1027 ide_atapi_cmd_ok(s);
1028 return;
1029 }
1030
1031 transfer_request = buf[9];
1032 switch(transfer_request & 0xf8) {
1033 case 0x00:
1034
1035 ide_atapi_cmd_ok(s);
1036 break;
1037 case 0x10:
1038
1039 ide_atapi_cmd_read(s, lba, nb_sectors, 2048);
1040 break;
1041 case 0xf8:
1042
1043 ide_atapi_cmd_read(s, lba, nb_sectors, 2352);
1044 break;
1045 default:
1046 ide_atapi_cmd_error(s, ILLEGAL_REQUEST,
1047 ASC_INV_FIELD_IN_CMD_PACKET);
1048 break;
1049 }
1050}
1051
1052static void cmd_seek(IDEState *s, uint8_t* buf)
1053{
1054 unsigned int lba;
1055 uint64_t total_sectors = s->nb_sectors >> 2;
1056
1057 lba = ube32_to_cpu(buf + 2);
1058 if (lba >= total_sectors) {
1059 ide_atapi_cmd_error(s, ILLEGAL_REQUEST, ASC_LOGICAL_BLOCK_OOR);
1060 return;
1061 }
1062
1063 ide_atapi_cmd_ok(s);
1064}
1065
1066static void cmd_start_stop_unit(IDEState *s, uint8_t* buf)
1067{
1068 int sense;
1069 bool start = buf[4] & 1;
1070 bool loej = buf[4] & 2;
1071 int pwrcnd = buf[4] & 0xf0;
1072
1073 if (pwrcnd) {
1074
1075 ide_atapi_cmd_ok(s);
1076 return;
1077 }
1078
1079 if (loej) {
1080 if (!start && !s->tray_open && s->tray_locked) {
1081 sense = blk_is_inserted(s->blk)
1082 ? NOT_READY : ILLEGAL_REQUEST;
1083 ide_atapi_cmd_error(s, sense, ASC_MEDIA_REMOVAL_PREVENTED);
1084 return;
1085 }
1086
1087 if (s->tray_open != !start) {
1088 blk_eject(s->blk, !start);
1089 s->tray_open = !start;
1090 }
1091 }
1092
1093 ide_atapi_cmd_ok(s);
1094}
1095
1096static void cmd_mechanism_status(IDEState *s, uint8_t* buf)
1097{
1098 int max_len = ube16_to_cpu(buf + 8);
1099
1100 cpu_to_ube16(buf, 0);
1101
1102 buf[2] = 0;
1103 buf[3] = 0;
1104 buf[4] = 0;
1105 buf[5] = 1;
1106 cpu_to_ube16(buf + 6, 0);
1107 ide_atapi_cmd_reply(s, 8, max_len);
1108}
1109
1110static void cmd_read_toc_pma_atip(IDEState *s, uint8_t* buf)
1111{
1112 int format, msf, start_track, len;
1113 int max_len;
1114 uint64_t total_sectors = s->nb_sectors >> 2;
1115
1116 max_len = ube16_to_cpu(buf + 7);
1117 format = buf[9] >> 6;
1118 msf = (buf[1] >> 1) & 1;
1119 start_track = buf[6];
1120
1121 switch(format) {
1122 case 0:
1123 len = cdrom_read_toc(total_sectors, buf, msf, start_track);
1124 if (len < 0)
1125 goto error_cmd;
1126 ide_atapi_cmd_reply(s, len, max_len);
1127 break;
1128 case 1:
1129
1130 memset(buf, 0, 12);
1131 buf[1] = 0x0a;
1132 buf[2] = 0x01;
1133 buf[3] = 0x01;
1134 ide_atapi_cmd_reply(s, 12, max_len);
1135 break;
1136 case 2:
1137 len = cdrom_read_toc_raw(total_sectors, buf, msf, start_track);
1138 if (len < 0)
1139 goto error_cmd;
1140 ide_atapi_cmd_reply(s, len, max_len);
1141 break;
1142 default:
1143 error_cmd:
1144 ide_atapi_cmd_error(s, ILLEGAL_REQUEST,
1145 ASC_INV_FIELD_IN_CMD_PACKET);
1146 }
1147}
1148
1149static void cmd_read_cdvd_capacity(IDEState *s, uint8_t* buf)
1150{
1151 uint64_t total_sectors = s->nb_sectors >> 2;
1152
1153
1154 cpu_to_ube32(buf, total_sectors - 1);
1155 cpu_to_ube32(buf + 4, 2048);
1156 ide_atapi_cmd_reply(s, 8, 8);
1157}
1158
1159static void cmd_read_disc_information(IDEState *s, uint8_t* buf)
1160{
1161 uint8_t type = buf[1] & 7;
1162 uint32_t max_len = ube16_to_cpu(buf + 7);
1163
1164
1165 if (type != 0) {
1166 ide_atapi_cmd_error(s, ILLEGAL_REQUEST,
1167 ASC_INV_FIELD_IN_CMD_PACKET);
1168 return;
1169 }
1170
1171 memset(buf, 0, 34);
1172 buf[1] = 32;
1173 buf[2] = 0xe;
1174 buf[3] = 1;
1175 buf[4] = 1;
1176 buf[5] = 1;
1177 buf[6] = 1;
1178 buf[7] = 0x20;
1179 buf[8] = 0x00;
1180
1181
1182
1183
1184
1185
1186 ide_atapi_cmd_reply(s, 34, max_len);
1187}
1188
1189static void cmd_read_dvd_structure(IDEState *s, uint8_t* buf)
1190{
1191 int max_len;
1192 int media = buf[1];
1193 int format = buf[7];
1194 int ret;
1195
1196 max_len = ube16_to_cpu(buf + 8);
1197
1198 if (format < 0xff) {
1199 if (media_is_cd(s)) {
1200 ide_atapi_cmd_error(s, ILLEGAL_REQUEST,
1201 ASC_INCOMPATIBLE_FORMAT);
1202 return;
1203 } else if (!media_present(s)) {
1204 ide_atapi_cmd_error(s, ILLEGAL_REQUEST,
1205 ASC_INV_FIELD_IN_CMD_PACKET);
1206 return;
1207 }
1208 }
1209
1210 memset(buf, 0, max_len > IDE_DMA_BUF_SECTORS * 512 + 4 ?
1211 IDE_DMA_BUF_SECTORS * 512 + 4 : max_len);
1212
1213 switch (format) {
1214 case 0x00 ... 0x7f:
1215 case 0xff:
1216 if (media == 0) {
1217 ret = ide_dvd_read_structure(s, format, buf, buf);
1218
1219 if (ret < 0) {
1220 ide_atapi_cmd_error(s, ILLEGAL_REQUEST, -ret);
1221 } else {
1222 ide_atapi_cmd_reply(s, ret, max_len);
1223 }
1224
1225 break;
1226 }
1227
1228
1229
1230 case 0x80:
1231 case 0x81:
1232 case 0x82:
1233 case 0x83:
1234 case 0x90:
1235 case 0xc0:
1236 default:
1237 ide_atapi_cmd_error(s, ILLEGAL_REQUEST,
1238 ASC_INV_FIELD_IN_CMD_PACKET);
1239 break;
1240 }
1241}
1242
1243static void cmd_set_speed(IDEState *s, uint8_t* buf)
1244{
1245 ide_atapi_cmd_ok(s);
1246}
1247
1248enum {
1249
1250
1251
1252
1253 ALLOW_UA = 0x01,
1254
1255
1256
1257
1258
1259
1260 CHECK_READY = 0x02,
1261
1262
1263
1264
1265
1266
1267
1268 NONDATA = 0x04,
1269};
1270
1271static const struct AtapiCmd {
1272 void (*handler)(IDEState *s, uint8_t *buf);
1273 int flags;
1274} atapi_cmd_table[0x100] = {
1275 [ 0x00 ] = { cmd_test_unit_ready, CHECK_READY | NONDATA },
1276 [ 0x03 ] = { cmd_request_sense, ALLOW_UA },
1277 [ 0x12 ] = { cmd_inquiry, ALLOW_UA },
1278 [ 0x1b ] = { cmd_start_stop_unit, NONDATA },
1279 [ 0x1e ] = { cmd_prevent_allow_medium_removal, NONDATA },
1280 [ 0x25 ] = { cmd_read_cdvd_capacity, CHECK_READY },
1281 [ 0x28 ] = { cmd_read, CHECK_READY },
1282 [ 0x2b ] = { cmd_seek, CHECK_READY | NONDATA },
1283 [ 0x43 ] = { cmd_read_toc_pma_atip, CHECK_READY },
1284 [ 0x46 ] = { cmd_get_configuration, ALLOW_UA },
1285 [ 0x4a ] = { cmd_get_event_status_notification, ALLOW_UA },
1286 [ 0x51 ] = { cmd_read_disc_information, CHECK_READY },
1287 [ 0x5a ] = { cmd_mode_sense, 0 },
1288 [ 0xa8 ] = { cmd_read, CHECK_READY },
1289 [ 0xad ] = { cmd_read_dvd_structure, CHECK_READY },
1290 [ 0xbb ] = { cmd_set_speed, NONDATA },
1291 [ 0xbd ] = { cmd_mechanism_status, 0 },
1292 [ 0xbe ] = { cmd_read_cd, CHECK_READY },
1293
1294};
1295
1296void ide_atapi_cmd(IDEState *s)
1297{
1298 uint8_t *buf = s->io_buffer;
1299 const struct AtapiCmd *cmd = &atapi_cmd_table[s->io_buffer[0]];
1300
1301#ifdef DEBUG_IDE_ATAPI
1302 {
1303 int i;
1304 printf("ATAPI limit=0x%x packet:", s->lcyl | (s->hcyl << 8));
1305 for(i = 0; i < ATAPI_PACKET_SIZE; i++) {
1306 printf(" %02x", buf[i]);
1307 }
1308 printf("\n");
1309 }
1310#endif
1311
1312
1313
1314
1315
1316
1317
1318 if (s->sense_key == UNIT_ATTENTION && !(cmd->flags & ALLOW_UA)) {
1319 ide_atapi_cmd_check_status(s);
1320 return;
1321 }
1322
1323
1324
1325
1326
1327
1328
1329 if (!(cmd->flags & ALLOW_UA) &&
1330 !s->tray_open && blk_is_inserted(s->blk) && s->cdrom_changed) {
1331
1332 if (s->cdrom_changed == 1) {
1333 ide_atapi_cmd_error(s, NOT_READY, ASC_MEDIUM_NOT_PRESENT);
1334 s->cdrom_changed = 2;
1335 } else {
1336 ide_atapi_cmd_error(s, UNIT_ATTENTION, ASC_MEDIUM_MAY_HAVE_CHANGED);
1337 s->cdrom_changed = 0;
1338 }
1339
1340 return;
1341 }
1342
1343
1344 if ((cmd->flags & CHECK_READY) &&
1345 (!media_present(s) || !blk_is_inserted(s->blk)))
1346 {
1347 ide_atapi_cmd_error(s, NOT_READY, ASC_MEDIUM_NOT_PRESENT);
1348 return;
1349 }
1350
1351
1352
1353
1354
1355 if (cmd->handler && !(cmd->flags & NONDATA)) {
1356
1357 if (!(atapi_byte_count_limit(s) || s->atapi_dma)) {
1358
1359 ide_abort_command(s);
1360 return;
1361 }
1362 }
1363
1364
1365 if (cmd->handler) {
1366 cmd->handler(s, buf);
1367 return;
1368 }
1369
1370 ide_atapi_cmd_error(s, ILLEGAL_REQUEST, ASC_ILLEGAL_OPCODE);
1371}
1372