diff options
Diffstat (limited to 'qemu/hw/ide/core.c')
-rw-r--r-- | qemu/hw/ide/core.c | 2842 |
1 files changed, 0 insertions, 2842 deletions
diff --git a/qemu/hw/ide/core.c b/qemu/hw/ide/core.c deleted file mode 100644 index 41e6a2dc4..000000000 --- a/qemu/hw/ide/core.c +++ /dev/null @@ -1,2842 +0,0 @@ -/* - * QEMU IDE disk and CD/DVD-ROM Emulator - * - * Copyright (c) 2003 Fabrice Bellard - * Copyright (c) 2006 Openedhand Ltd. - * - * Permission is hereby granted, free of charge, to any person obtaining a copy - * of this software and associated documentation files (the "Software"), to deal - * in the Software without restriction, including without limitation the rights - * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell - * copies of the Software, and to permit persons to whom the Software is - * furnished to do so, subject to the following conditions: - * - * The above copyright notice and this permission notice shall be included in - * all copies or substantial portions of the Software. - * - * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR - * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, - * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL - * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER - * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, - * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN - * THE SOFTWARE. - */ -#include "qemu/osdep.h" -#include <hw/hw.h> -#include <hw/i386/pc.h> -#include <hw/pci/pci.h> -#include <hw/isa/isa.h> -#include "qemu/error-report.h" -#include "qemu/timer.h" -#include "sysemu/sysemu.h" -#include "sysemu/dma.h" -#include "hw/block/block.h" -#include "sysemu/block-backend.h" -#include "qemu/cutils.h" - -#include <hw/ide/internal.h> - -/* These values were based on a Seagate ST3500418AS but have been modified - to make more sense in QEMU */ -static const int smart_attributes[][12] = { - /* id, flags, hflags, val, wrst, raw (6 bytes), threshold */ - /* raw read error rate*/ - { 0x01, 0x03, 0x00, 0x64, 0x64, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x06}, - /* spin up */ - { 0x03, 0x03, 0x00, 0x64, 0x64, 0x10, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00}, - /* start stop count */ - { 0x04, 0x02, 0x00, 0x64, 0x64, 0x64, 0x00, 0x00, 0x00, 0x00, 0x00, 0x14}, - /* remapped sectors */ - { 0x05, 0x03, 0x00, 0x64, 0x64, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x24}, - /* power on hours */ - { 0x09, 0x03, 0x00, 0x64, 0x64, 0x01, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00}, - /* power cycle count */ - { 0x0c, 0x03, 0x00, 0x64, 0x64, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00}, - /* airflow-temperature-celsius */ - { 190, 0x03, 0x00, 0x45, 0x45, 0x1f, 0x00, 0x1f, 0x1f, 0x00, 0x00, 0x32}, -}; - -static void ide_dummy_transfer_stop(IDEState *s); - -static void padstr(char *str, const char *src, int len) -{ - int i, v; - for(i = 0; i < len; i++) { - if (*src) - v = *src++; - else - v = ' '; - str[i^1] = v; - } -} - -static void put_le16(uint16_t *p, unsigned int v) -{ - *p = cpu_to_le16(v); -} - -static void ide_identify_size(IDEState *s) -{ - uint16_t *p = (uint16_t *)s->identify_data; - put_le16(p + 60, s->nb_sectors); - put_le16(p + 61, s->nb_sectors >> 16); - put_le16(p + 100, s->nb_sectors); - put_le16(p + 101, s->nb_sectors >> 16); - put_le16(p + 102, s->nb_sectors >> 32); - put_le16(p + 103, s->nb_sectors >> 48); -} - -static void ide_identify(IDEState *s) -{ - uint16_t *p; - unsigned int oldsize; - IDEDevice *dev = s->unit ? s->bus->slave : s->bus->master; - - p = (uint16_t *)s->identify_data; - if (s->identify_set) { - goto fill_buffer; - } - memset(p, 0, sizeof(s->identify_data)); - - put_le16(p + 0, 0x0040); - put_le16(p + 1, s->cylinders); - put_le16(p + 3, s->heads); - put_le16(p + 4, 512 * s->sectors); /* XXX: retired, remove ? */ - put_le16(p + 5, 512); /* XXX: retired, remove ? */ - put_le16(p + 6, s->sectors); - padstr((char *)(p + 10), s->drive_serial_str, 20); /* serial number */ - put_le16(p + 20, 3); /* XXX: retired, remove ? */ - put_le16(p + 21, 512); /* cache size in sectors */ - put_le16(p + 22, 4); /* ecc bytes */ - padstr((char *)(p + 23), s->version, 8); /* firmware version */ - padstr((char *)(p + 27), s->drive_model_str, 40); /* model */ -#if MAX_MULT_SECTORS > 1 - put_le16(p + 47, 0x8000 | MAX_MULT_SECTORS); -#endif - put_le16(p + 48, 1); /* dword I/O */ - put_le16(p + 49, (1 << 11) | (1 << 9) | (1 << 8)); /* DMA and LBA supported */ - put_le16(p + 51, 0x200); /* PIO transfer cycle */ - put_le16(p + 52, 0x200); /* DMA transfer cycle */ - put_le16(p + 53, 1 | (1 << 1) | (1 << 2)); /* words 54-58,64-70,88 are valid */ - put_le16(p + 54, s->cylinders); - put_le16(p + 55, s->heads); - put_le16(p + 56, s->sectors); - oldsize = s->cylinders * s->heads * s->sectors; - put_le16(p + 57, oldsize); - put_le16(p + 58, oldsize >> 16); - if (s->mult_sectors) - put_le16(p + 59, 0x100 | s->mult_sectors); - /* *(p + 60) := nb_sectors -- see ide_identify_size */ - /* *(p + 61) := nb_sectors >> 16 -- see ide_identify_size */ - put_le16(p + 62, 0x07); /* single word dma0-2 supported */ - put_le16(p + 63, 0x07); /* mdma0-2 supported */ - put_le16(p + 64, 0x03); /* pio3-4 supported */ - put_le16(p + 65, 120); - put_le16(p + 66, 120); - put_le16(p + 67, 120); - put_le16(p + 68, 120); - if (dev && dev->conf.discard_granularity) { - put_le16(p + 69, (1 << 14)); /* determinate TRIM behavior */ - } - - if (s->ncq_queues) { - put_le16(p + 75, s->ncq_queues - 1); - /* NCQ supported */ - put_le16(p + 76, (1 << 8)); - } - - put_le16(p + 80, 0xf0); /* ata3 -> ata6 supported */ - put_le16(p + 81, 0x16); /* conforms to ata5 */ - /* 14=NOP supported, 5=WCACHE supported, 0=SMART supported */ - put_le16(p + 82, (1 << 14) | (1 << 5) | 1); - /* 13=flush_cache_ext,12=flush_cache,10=lba48 */ - put_le16(p + 83, (1 << 14) | (1 << 13) | (1 <<12) | (1 << 10)); - /* 14=set to 1, 8=has WWN, 1=SMART self test, 0=SMART error logging */ - if (s->wwn) { - put_le16(p + 84, (1 << 14) | (1 << 8) | 0); - } else { - put_le16(p + 84, (1 << 14) | 0); - } - /* 14 = NOP supported, 5=WCACHE enabled, 0=SMART feature set enabled */ - if (blk_enable_write_cache(s->blk)) { - put_le16(p + 85, (1 << 14) | (1 << 5) | 1); - } else { - put_le16(p + 85, (1 << 14) | 1); - } - /* 13=flush_cache_ext,12=flush_cache,10=lba48 */ - put_le16(p + 86, (1 << 13) | (1 <<12) | (1 << 10)); - /* 14=set to 1, 8=has WWN, 1=SMART self test, 0=SMART error logging */ - if (s->wwn) { - put_le16(p + 87, (1 << 14) | (1 << 8) | 0); - } else { - put_le16(p + 87, (1 << 14) | 0); - } - put_le16(p + 88, 0x3f | (1 << 13)); /* udma5 set and supported */ - put_le16(p + 93, 1 | (1 << 14) | 0x2000); - /* *(p + 100) := nb_sectors -- see ide_identify_size */ - /* *(p + 101) := nb_sectors >> 16 -- see ide_identify_size */ - /* *(p + 102) := nb_sectors >> 32 -- see ide_identify_size */ - /* *(p + 103) := nb_sectors >> 48 -- see ide_identify_size */ - - if (dev && dev->conf.physical_block_size) - put_le16(p + 106, 0x6000 | get_physical_block_exp(&dev->conf)); - if (s->wwn) { - /* LE 16-bit words 111-108 contain 64-bit World Wide Name */ - put_le16(p + 108, s->wwn >> 48); - put_le16(p + 109, s->wwn >> 32); - put_le16(p + 110, s->wwn >> 16); - put_le16(p + 111, s->wwn); - } - if (dev && dev->conf.discard_granularity) { - put_le16(p + 169, 1); /* TRIM support */ - } - - ide_identify_size(s); - s->identify_set = 1; - -fill_buffer: - memcpy(s->io_buffer, p, sizeof(s->identify_data)); -} - -static void ide_atapi_identify(IDEState *s) -{ - uint16_t *p; - - p = (uint16_t *)s->identify_data; - if (s->identify_set) { - goto fill_buffer; - } - memset(p, 0, sizeof(s->identify_data)); - - /* Removable CDROM, 50us response, 12 byte packets */ - put_le16(p + 0, (2 << 14) | (5 << 8) | (1 << 7) | (2 << 5) | (0 << 0)); - padstr((char *)(p + 10), s->drive_serial_str, 20); /* serial number */ - put_le16(p + 20, 3); /* buffer type */ - put_le16(p + 21, 512); /* cache size in sectors */ - put_le16(p + 22, 4); /* ecc bytes */ - padstr((char *)(p + 23), s->version, 8); /* firmware version */ - padstr((char *)(p + 27), s->drive_model_str, 40); /* model */ - put_le16(p + 48, 1); /* dword I/O (XXX: should not be set on CDROM) */ -#ifdef USE_DMA_CDROM - put_le16(p + 49, 1 << 9 | 1 << 8); /* DMA and LBA supported */ - put_le16(p + 53, 7); /* words 64-70, 54-58, 88 valid */ - put_le16(p + 62, 7); /* single word dma0-2 supported */ - put_le16(p + 63, 7); /* mdma0-2 supported */ -#else - put_le16(p + 49, 1 << 9); /* LBA supported, no DMA */ - put_le16(p + 53, 3); /* words 64-70, 54-58 valid */ - put_le16(p + 63, 0x103); /* DMA modes XXX: may be incorrect */ -#endif - put_le16(p + 64, 3); /* pio3-4 supported */ - put_le16(p + 65, 0xb4); /* minimum DMA multiword tx cycle time */ - put_le16(p + 66, 0xb4); /* recommended DMA multiword tx cycle time */ - put_le16(p + 67, 0x12c); /* minimum PIO cycle time without flow control */ - put_le16(p + 68, 0xb4); /* minimum PIO cycle time with IORDY flow control */ - - put_le16(p + 71, 30); /* in ns */ - put_le16(p + 72, 30); /* in ns */ - - if (s->ncq_queues) { - put_le16(p + 75, s->ncq_queues - 1); - /* NCQ supported */ - put_le16(p + 76, (1 << 8)); - } - - put_le16(p + 80, 0x1e); /* support up to ATA/ATAPI-4 */ - if (s->wwn) { - put_le16(p + 84, (1 << 8)); /* supports WWN for words 108-111 */ - put_le16(p + 87, (1 << 8)); /* WWN enabled */ - } - -#ifdef USE_DMA_CDROM - put_le16(p + 88, 0x3f | (1 << 13)); /* udma5 set and supported */ -#endif - - if (s->wwn) { - /* LE 16-bit words 111-108 contain 64-bit World Wide Name */ - put_le16(p + 108, s->wwn >> 48); - put_le16(p + 109, s->wwn >> 32); - put_le16(p + 110, s->wwn >> 16); - put_le16(p + 111, s->wwn); - } - - s->identify_set = 1; - -fill_buffer: - memcpy(s->io_buffer, p, sizeof(s->identify_data)); -} - -static void ide_cfata_identify_size(IDEState *s) -{ - uint16_t *p = (uint16_t *)s->identify_data; - put_le16(p + 7, s->nb_sectors >> 16); /* Sectors per card */ - put_le16(p + 8, s->nb_sectors); /* Sectors per card */ - put_le16(p + 60, s->nb_sectors); /* Total LBA sectors */ - put_le16(p + 61, s->nb_sectors >> 16); /* Total LBA sectors */ -} - -static void ide_cfata_identify(IDEState *s) -{ - uint16_t *p; - uint32_t cur_sec; - - p = (uint16_t *)s->identify_data; - if (s->identify_set) { - goto fill_buffer; - } - memset(p, 0, sizeof(s->identify_data)); - - cur_sec = s->cylinders * s->heads * s->sectors; - - put_le16(p + 0, 0x848a); /* CF Storage Card signature */ - put_le16(p + 1, s->cylinders); /* Default cylinders */ - put_le16(p + 3, s->heads); /* Default heads */ - put_le16(p + 6, s->sectors); /* Default sectors per track */ - /* *(p + 7) := nb_sectors >> 16 -- see ide_cfata_identify_size */ - /* *(p + 8) := nb_sectors -- see ide_cfata_identify_size */ - padstr((char *)(p + 10), s->drive_serial_str, 20); /* serial number */ - put_le16(p + 22, 0x0004); /* ECC bytes */ - padstr((char *) (p + 23), s->version, 8); /* Firmware Revision */ - padstr((char *) (p + 27), s->drive_model_str, 40);/* Model number */ -#if MAX_MULT_SECTORS > 1 - put_le16(p + 47, 0x8000 | MAX_MULT_SECTORS); -#else - put_le16(p + 47, 0x0000); -#endif - put_le16(p + 49, 0x0f00); /* Capabilities */ - put_le16(p + 51, 0x0002); /* PIO cycle timing mode */ - put_le16(p + 52, 0x0001); /* DMA cycle timing mode */ - put_le16(p + 53, 0x0003); /* Translation params valid */ - put_le16(p + 54, s->cylinders); /* Current cylinders */ - put_le16(p + 55, s->heads); /* Current heads */ - put_le16(p + 56, s->sectors); /* Current sectors */ - put_le16(p + 57, cur_sec); /* Current capacity */ - put_le16(p + 58, cur_sec >> 16); /* Current capacity */ - if (s->mult_sectors) /* Multiple sector setting */ - put_le16(p + 59, 0x100 | s->mult_sectors); - /* *(p + 60) := nb_sectors -- see ide_cfata_identify_size */ - /* *(p + 61) := nb_sectors >> 16 -- see ide_cfata_identify_size */ - put_le16(p + 63, 0x0203); /* Multiword DMA capability */ - put_le16(p + 64, 0x0001); /* Flow Control PIO support */ - put_le16(p + 65, 0x0096); /* Min. Multiword DMA cycle */ - put_le16(p + 66, 0x0096); /* Rec. Multiword DMA cycle */ - put_le16(p + 68, 0x00b4); /* Min. PIO cycle time */ - put_le16(p + 82, 0x400c); /* Command Set supported */ - put_le16(p + 83, 0x7068); /* Command Set supported */ - put_le16(p + 84, 0x4000); /* Features supported */ - put_le16(p + 85, 0x000c); /* Command Set enabled */ - put_le16(p + 86, 0x7044); /* Command Set enabled */ - put_le16(p + 87, 0x4000); /* Features enabled */ - put_le16(p + 91, 0x4060); /* Current APM level */ - put_le16(p + 129, 0x0002); /* Current features option */ - put_le16(p + 130, 0x0005); /* Reassigned sectors */ - put_le16(p + 131, 0x0001); /* Initial power mode */ - put_le16(p + 132, 0x0000); /* User signature */ - put_le16(p + 160, 0x8100); /* Power requirement */ - put_le16(p + 161, 0x8001); /* CF command set */ - - ide_cfata_identify_size(s); - s->identify_set = 1; - -fill_buffer: - memcpy(s->io_buffer, p, sizeof(s->identify_data)); -} - -static void ide_set_signature(IDEState *s) -{ - s->select &= 0xf0; /* clear head */ - /* put signature */ - s->nsector = 1; - s->sector = 1; - if (s->drive_kind == IDE_CD) { - s->lcyl = 0x14; - s->hcyl = 0xeb; - } else if (s->blk) { - s->lcyl = 0; - s->hcyl = 0; - } else { - s->lcyl = 0xff; - s->hcyl = 0xff; - } -} - -typedef struct TrimAIOCB { - BlockAIOCB common; - BlockBackend *blk; - QEMUBH *bh; - int ret; - QEMUIOVector *qiov; - BlockAIOCB *aiocb; - int i, j; -} TrimAIOCB; - -static void trim_aio_cancel(BlockAIOCB *acb) -{ - TrimAIOCB *iocb = container_of(acb, TrimAIOCB, common); - - /* Exit the loop so ide_issue_trim_cb will not continue */ - iocb->j = iocb->qiov->niov - 1; - iocb->i = (iocb->qiov->iov[iocb->j].iov_len / 8) - 1; - - iocb->ret = -ECANCELED; - - if (iocb->aiocb) { - blk_aio_cancel_async(iocb->aiocb); - iocb->aiocb = NULL; - } -} - -static const AIOCBInfo trim_aiocb_info = { - .aiocb_size = sizeof(TrimAIOCB), - .cancel_async = trim_aio_cancel, -}; - -static void ide_trim_bh_cb(void *opaque) -{ - TrimAIOCB *iocb = opaque; - - iocb->common.cb(iocb->common.opaque, iocb->ret); - - qemu_bh_delete(iocb->bh); - iocb->bh = NULL; - qemu_aio_unref(iocb); -} - -static void ide_issue_trim_cb(void *opaque, int ret) -{ - TrimAIOCB *iocb = opaque; - if (ret >= 0) { - while (iocb->j < iocb->qiov->niov) { - int j = iocb->j; - while (++iocb->i < iocb->qiov->iov[j].iov_len / 8) { - int i = iocb->i; - uint64_t *buffer = iocb->qiov->iov[j].iov_base; - - /* 6-byte LBA + 2-byte range per entry */ - uint64_t entry = le64_to_cpu(buffer[i]); - uint64_t sector = entry & 0x0000ffffffffffffULL; - uint16_t count = entry >> 48; - - if (count == 0) { - continue; - } - - /* Got an entry! Submit and exit. */ - iocb->aiocb = blk_aio_discard(iocb->blk, sector, count, - ide_issue_trim_cb, opaque); - return; - } - - iocb->j++; - iocb->i = -1; - } - } else { - iocb->ret = ret; - } - - iocb->aiocb = NULL; - if (iocb->bh) { - qemu_bh_schedule(iocb->bh); - } -} - -BlockAIOCB *ide_issue_trim(BlockBackend *blk, - int64_t sector_num, QEMUIOVector *qiov, int nb_sectors, - BlockCompletionFunc *cb, void *opaque) -{ - TrimAIOCB *iocb; - - iocb = blk_aio_get(&trim_aiocb_info, blk, cb, opaque); - iocb->blk = blk; - iocb->bh = qemu_bh_new(ide_trim_bh_cb, iocb); - iocb->ret = 0; - iocb->qiov = qiov; - iocb->i = -1; - iocb->j = 0; - ide_issue_trim_cb(iocb, 0); - return &iocb->common; -} - -void ide_abort_command(IDEState *s) -{ - ide_transfer_stop(s); - s->status = READY_STAT | ERR_STAT; - s->error = ABRT_ERR; -} - -/* prepare data transfer and tell what to do after */ -void ide_transfer_start(IDEState *s, uint8_t *buf, int size, - EndTransferFunc *end_transfer_func) -{ - s->end_transfer_func = end_transfer_func; - s->data_ptr = buf; - s->data_end = buf + size; - if (!(s->status & ERR_STAT)) { - s->status |= DRQ_STAT; - } - if (s->bus->dma->ops->start_transfer) { - s->bus->dma->ops->start_transfer(s->bus->dma); - } -} - -static void ide_cmd_done(IDEState *s) -{ - if (s->bus->dma->ops->cmd_done) { - s->bus->dma->ops->cmd_done(s->bus->dma); - } -} - -static void ide_transfer_halt(IDEState *s, - void(*end_transfer_func)(IDEState *), - bool notify) -{ - s->end_transfer_func = end_transfer_func; - s->data_ptr = s->io_buffer; - s->data_end = s->io_buffer; - s->status &= ~DRQ_STAT; - if (notify) { - ide_cmd_done(s); - } -} - -void ide_transfer_stop(IDEState *s) -{ - ide_transfer_halt(s, ide_transfer_stop, true); -} - -static void ide_transfer_cancel(IDEState *s) -{ - ide_transfer_halt(s, ide_transfer_cancel, false); -} - -int64_t ide_get_sector(IDEState *s) -{ - int64_t sector_num; - if (s->select & 0x40) { - /* lba */ - if (!s->lba48) { - sector_num = ((s->select & 0x0f) << 24) | (s->hcyl << 16) | - (s->lcyl << 8) | s->sector; - } else { - sector_num = ((int64_t)s->hob_hcyl << 40) | - ((int64_t) s->hob_lcyl << 32) | - ((int64_t) s->hob_sector << 24) | - ((int64_t) s->hcyl << 16) | - ((int64_t) s->lcyl << 8) | s->sector; - } - } else { - sector_num = ((s->hcyl << 8) | s->lcyl) * s->heads * s->sectors + - (s->select & 0x0f) * s->sectors + (s->sector - 1); - } - return sector_num; -} - -void ide_set_sector(IDEState *s, int64_t sector_num) -{ - unsigned int cyl, r; - if (s->select & 0x40) { - if (!s->lba48) { - s->select = (s->select & 0xf0) | (sector_num >> 24); - s->hcyl = (sector_num >> 16); - s->lcyl = (sector_num >> 8); - s->sector = (sector_num); - } else { - s->sector = sector_num; - s->lcyl = sector_num >> 8; - s->hcyl = sector_num >> 16; - s->hob_sector = sector_num >> 24; - s->hob_lcyl = sector_num >> 32; - s->hob_hcyl = sector_num >> 40; - } - } else { - cyl = sector_num / (s->heads * s->sectors); - r = sector_num % (s->heads * s->sectors); - s->hcyl = cyl >> 8; - s->lcyl = cyl; - s->select = (s->select & 0xf0) | ((r / s->sectors) & 0x0f); - s->sector = (r % s->sectors) + 1; - } -} - -static void ide_rw_error(IDEState *s) { - ide_abort_command(s); - ide_set_irq(s->bus); -} - -static bool ide_sect_range_ok(IDEState *s, - uint64_t sector, uint64_t nb_sectors) -{ - uint64_t total_sectors; - - blk_get_geometry(s->blk, &total_sectors); - if (sector > total_sectors || nb_sectors > total_sectors - sector) { - return false; - } - return true; -} - -static void ide_buffered_readv_cb(void *opaque, int ret) -{ - IDEBufferedRequest *req = opaque; - if (!req->orphaned) { - if (!ret) { - qemu_iovec_from_buf(req->original_qiov, 0, req->iov.iov_base, - req->original_qiov->size); - } - req->original_cb(req->original_opaque, ret); - } - QLIST_REMOVE(req, list); - qemu_vfree(req->iov.iov_base); - g_free(req); -} - -#define MAX_BUFFERED_REQS 16 - -BlockAIOCB *ide_buffered_readv(IDEState *s, int64_t sector_num, - QEMUIOVector *iov, int nb_sectors, - BlockCompletionFunc *cb, void *opaque) -{ - BlockAIOCB *aioreq; - IDEBufferedRequest *req; - int c = 0; - - QLIST_FOREACH(req, &s->buffered_requests, list) { - c++; - } - if (c > MAX_BUFFERED_REQS) { - return blk_abort_aio_request(s->blk, cb, opaque, -EIO); - } - - req = g_new0(IDEBufferedRequest, 1); - req->original_qiov = iov; - req->original_cb = cb; - req->original_opaque = opaque; - req->iov.iov_base = qemu_blockalign(blk_bs(s->blk), iov->size); - req->iov.iov_len = iov->size; - qemu_iovec_init_external(&req->qiov, &req->iov, 1); - - aioreq = blk_aio_readv(s->blk, sector_num, &req->qiov, nb_sectors, - ide_buffered_readv_cb, req); - - QLIST_INSERT_HEAD(&s->buffered_requests, req, list); - return aioreq; -} - -/** - * Cancel all pending DMA requests. - * Any buffered DMA requests are instantly canceled, - * but any pending unbuffered DMA requests must be waited on. - */ -void ide_cancel_dma_sync(IDEState *s) -{ - IDEBufferedRequest *req; - - /* First invoke the callbacks of all buffered requests - * and flag those requests as orphaned. Ideally there - * are no unbuffered (Scatter Gather DMA Requests or - * write requests) pending and we can avoid to drain. */ - QLIST_FOREACH(req, &s->buffered_requests, list) { - if (!req->orphaned) { -#ifdef DEBUG_IDE - printf("%s: invoking cb %p of buffered request %p with" - " -ECANCELED\n", __func__, req->original_cb, req); -#endif - req->original_cb(req->original_opaque, -ECANCELED); - } - req->orphaned = true; - } - - /* - * We can't cancel Scatter Gather DMA in the middle of the - * operation or a partial (not full) DMA transfer would reach - * the storage so we wait for completion instead (we beahve - * like if the DMA was completed by the time the guest trying - * to cancel dma with bmdma_cmd_writeb with BM_CMD_START not - * set). - * - * In the future we'll be able to safely cancel the I/O if the - * whole DMA operation will be submitted to disk with a single - * aio operation with preadv/pwritev. - */ - if (s->bus->dma->aiocb) { -#ifdef DEBUG_IDE - printf("%s: draining all remaining requests", __func__); -#endif - blk_drain(s->blk); - assert(s->bus->dma->aiocb == NULL); - } -} - -static void ide_sector_read(IDEState *s); - -static void ide_sector_read_cb(void *opaque, int ret) -{ - IDEState *s = opaque; - int n; - - s->pio_aiocb = NULL; - s->status &= ~BUSY_STAT; - - if (ret == -ECANCELED) { - return; - } - if (ret != 0) { - if (ide_handle_rw_error(s, -ret, IDE_RETRY_PIO | - IDE_RETRY_READ)) { - return; - } - } - - block_acct_done(blk_get_stats(s->blk), &s->acct); - - n = s->nsector; - if (n > s->req_nb_sectors) { - n = s->req_nb_sectors; - } - - ide_set_sector(s, ide_get_sector(s) + n); - s->nsector -= n; - /* Allow the guest to read the io_buffer */ - ide_transfer_start(s, s->io_buffer, n * BDRV_SECTOR_SIZE, ide_sector_read); - ide_set_irq(s->bus); -} - -static void ide_sector_read(IDEState *s) -{ - int64_t sector_num; - int n; - - s->status = READY_STAT | SEEK_STAT; - s->error = 0; /* not needed by IDE spec, but needed by Windows */ - sector_num = ide_get_sector(s); - n = s->nsector; - - if (n == 0) { - ide_transfer_stop(s); - return; - } - - s->status |= BUSY_STAT; - - if (n > s->req_nb_sectors) { - n = s->req_nb_sectors; - } - -#if defined(DEBUG_IDE) - printf("sector=%" PRId64 "\n", sector_num); -#endif - - if (!ide_sect_range_ok(s, sector_num, n)) { - ide_rw_error(s); - block_acct_invalid(blk_get_stats(s->blk), BLOCK_ACCT_READ); - return; - } - - s->iov.iov_base = s->io_buffer; - s->iov.iov_len = n * BDRV_SECTOR_SIZE; - qemu_iovec_init_external(&s->qiov, &s->iov, 1); - - block_acct_start(blk_get_stats(s->blk), &s->acct, - n * BDRV_SECTOR_SIZE, BLOCK_ACCT_READ); - s->pio_aiocb = ide_buffered_readv(s, sector_num, &s->qiov, n, - ide_sector_read_cb, s); -} - -void dma_buf_commit(IDEState *s, uint32_t tx_bytes) -{ - if (s->bus->dma->ops->commit_buf) { - s->bus->dma->ops->commit_buf(s->bus->dma, tx_bytes); - } - s->io_buffer_offset += tx_bytes; - qemu_sglist_destroy(&s->sg); -} - -void ide_set_inactive(IDEState *s, bool more) -{ - s->bus->dma->aiocb = NULL; - s->bus->retry_unit = -1; - s->bus->retry_sector_num = 0; - s->bus->retry_nsector = 0; - if (s->bus->dma->ops->set_inactive) { - s->bus->dma->ops->set_inactive(s->bus->dma, more); - } - ide_cmd_done(s); -} - -void ide_dma_error(IDEState *s) -{ - dma_buf_commit(s, 0); - ide_abort_command(s); - ide_set_inactive(s, false); - ide_set_irq(s->bus); -} - -int ide_handle_rw_error(IDEState *s, int error, int op) -{ - bool is_read = (op & IDE_RETRY_READ) != 0; - BlockErrorAction action = blk_get_error_action(s->blk, is_read, error); - - if (action == BLOCK_ERROR_ACTION_STOP) { - assert(s->bus->retry_unit == s->unit); - s->bus->error_status = op; - } else if (action == BLOCK_ERROR_ACTION_REPORT) { - block_acct_failed(blk_get_stats(s->blk), &s->acct); - if (IS_IDE_RETRY_DMA(op)) { - ide_dma_error(s); - } else if (IS_IDE_RETRY_ATAPI(op)) { - ide_atapi_io_error(s, -error); - } else { - ide_rw_error(s); - } - } - blk_error_action(s->blk, action, is_read, error); - return action != BLOCK_ERROR_ACTION_IGNORE; -} - -static void ide_dma_cb(void *opaque, int ret) -{ - IDEState *s = opaque; - int n; - int64_t sector_num; - bool stay_active = false; - - if (ret == -ECANCELED) { - return; - } - if (ret < 0) { - if (ide_handle_rw_error(s, -ret, ide_dma_cmd_to_retry(s->dma_cmd))) { - return; - } - } - - n = s->io_buffer_size >> 9; - if (n > s->nsector) { - /* The PRDs were longer than needed for this request. Shorten them so - * we don't get a negative remainder. The Active bit must remain set - * after the request completes. */ - n = s->nsector; - stay_active = true; - } - - sector_num = ide_get_sector(s); - if (n > 0) { - assert(n * 512 == s->sg.size); - dma_buf_commit(s, s->sg.size); - sector_num += n; - ide_set_sector(s, sector_num); - s->nsector -= n; - } - - /* end of transfer ? */ - if (s->nsector == 0) { - s->status = READY_STAT | SEEK_STAT; - ide_set_irq(s->bus); - goto eot; - } - - /* launch next transfer */ - n = s->nsector; - s->io_buffer_index = 0; - s->io_buffer_size = n * 512; - if (s->bus->dma->ops->prepare_buf(s->bus->dma, s->io_buffer_size) < 512) { - /* The PRDs were too short. Reset the Active bit, but don't raise an - * interrupt. */ - s->status = READY_STAT | SEEK_STAT; - dma_buf_commit(s, 0); - goto eot; - } - -#ifdef DEBUG_AIO - printf("ide_dma_cb: sector_num=%" PRId64 " n=%d, cmd_cmd=%d\n", - sector_num, n, s->dma_cmd); -#endif - - if ((s->dma_cmd == IDE_DMA_READ || s->dma_cmd == IDE_DMA_WRITE) && - !ide_sect_range_ok(s, sector_num, n)) { - ide_dma_error(s); - block_acct_invalid(blk_get_stats(s->blk), s->acct.type); - return; - } - - switch (s->dma_cmd) { - case IDE_DMA_READ: - s->bus->dma->aiocb = dma_blk_read(s->blk, &s->sg, sector_num, - ide_dma_cb, s); - break; - case IDE_DMA_WRITE: - s->bus->dma->aiocb = dma_blk_write(s->blk, &s->sg, sector_num, - ide_dma_cb, s); - break; - case IDE_DMA_TRIM: - s->bus->dma->aiocb = dma_blk_io(s->blk, &s->sg, sector_num, - ide_issue_trim, ide_dma_cb, s, - DMA_DIRECTION_TO_DEVICE); - break; - default: - abort(); - } - return; - -eot: - if (s->dma_cmd == IDE_DMA_READ || s->dma_cmd == IDE_DMA_WRITE) { - block_acct_done(blk_get_stats(s->blk), &s->acct); - } - ide_set_inactive(s, stay_active); -} - -static void ide_sector_start_dma(IDEState *s, enum ide_dma_cmd dma_cmd) -{ - s->status = READY_STAT | SEEK_STAT | DRQ_STAT | BUSY_STAT; - s->io_buffer_size = 0; - s->dma_cmd = dma_cmd; - - switch (dma_cmd) { - case IDE_DMA_READ: - block_acct_start(blk_get_stats(s->blk), &s->acct, - s->nsector * BDRV_SECTOR_SIZE, BLOCK_ACCT_READ); - break; - case IDE_DMA_WRITE: - block_acct_start(blk_get_stats(s->blk), &s->acct, - s->nsector * BDRV_SECTOR_SIZE, BLOCK_ACCT_WRITE); - break; - default: - break; - } - - ide_start_dma(s, ide_dma_cb); -} - -void ide_start_dma(IDEState *s, BlockCompletionFunc *cb) -{ - s->io_buffer_index = 0; - s->bus->retry_unit = s->unit; - s->bus->retry_sector_num = ide_get_sector(s); - s->bus->retry_nsector = s->nsector; - if (s->bus->dma->ops->start_dma) { - s->bus->dma->ops->start_dma(s->bus->dma, s, cb); - } -} - -static void ide_sector_write(IDEState *s); - -static void ide_sector_write_timer_cb(void *opaque) -{ - IDEState *s = opaque; - ide_set_irq(s->bus); -} - -static void ide_sector_write_cb(void *opaque, int ret) -{ - IDEState *s = opaque; - int n; - - if (ret == -ECANCELED) { - return; - } - - s->pio_aiocb = NULL; - s->status &= ~BUSY_STAT; - - if (ret != 0) { - if (ide_handle_rw_error(s, -ret, IDE_RETRY_PIO)) { - return; - } - } - - block_acct_done(blk_get_stats(s->blk), &s->acct); - - n = s->nsector; - if (n > s->req_nb_sectors) { - n = s->req_nb_sectors; - } - s->nsector -= n; - - ide_set_sector(s, ide_get_sector(s) + n); - if (s->nsector == 0) { - /* no more sectors to write */ - ide_transfer_stop(s); - } else { - int n1 = s->nsector; - if (n1 > s->req_nb_sectors) { - n1 = s->req_nb_sectors; - } - ide_transfer_start(s, s->io_buffer, n1 * BDRV_SECTOR_SIZE, - ide_sector_write); - } - - if (win2k_install_hack && ((++s->irq_count % 16) == 0)) { - /* It seems there is a bug in the Windows 2000 installer HDD - IDE driver which fills the disk with empty logs when the - IDE write IRQ comes too early. This hack tries to correct - that at the expense of slower write performances. Use this - option _only_ to install Windows 2000. You must disable it - for normal use. */ - timer_mod(s->sector_write_timer, qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL) + - (NANOSECONDS_PER_SECOND / 1000)); - } else { - ide_set_irq(s->bus); - } -} - -static void ide_sector_write(IDEState *s) -{ - int64_t sector_num; - int n; - - s->status = READY_STAT | SEEK_STAT | BUSY_STAT; - sector_num = ide_get_sector(s); -#if defined(DEBUG_IDE) - printf("sector=%" PRId64 "\n", sector_num); -#endif - n = s->nsector; - if (n > s->req_nb_sectors) { - n = s->req_nb_sectors; - } - - if (!ide_sect_range_ok(s, sector_num, n)) { - ide_rw_error(s); - block_acct_invalid(blk_get_stats(s->blk), BLOCK_ACCT_WRITE); - return; - } - - s->iov.iov_base = s->io_buffer; - s->iov.iov_len = n * BDRV_SECTOR_SIZE; - qemu_iovec_init_external(&s->qiov, &s->iov, 1); - - block_acct_start(blk_get_stats(s->blk), &s->acct, - n * BDRV_SECTOR_SIZE, BLOCK_ACCT_WRITE); - s->pio_aiocb = blk_aio_writev(s->blk, sector_num, &s->qiov, n, - ide_sector_write_cb, s); -} - -static void ide_flush_cb(void *opaque, int ret) -{ - IDEState *s = opaque; - - s->pio_aiocb = NULL; - - if (ret == -ECANCELED) { - return; - } - if (ret < 0) { - /* XXX: What sector number to set here? */ - if (ide_handle_rw_error(s, -ret, IDE_RETRY_FLUSH)) { - return; - } - } - - if (s->blk) { - block_acct_done(blk_get_stats(s->blk), &s->acct); - } - s->status = READY_STAT | SEEK_STAT; - ide_cmd_done(s); - ide_set_irq(s->bus); -} - -static void ide_flush_cache(IDEState *s) -{ - if (s->blk == NULL) { - ide_flush_cb(s, 0); - return; - } - - s->status |= BUSY_STAT; - block_acct_start(blk_get_stats(s->blk), &s->acct, 0, BLOCK_ACCT_FLUSH); - s->pio_aiocb = blk_aio_flush(s->blk, ide_flush_cb, s); -} - -static void ide_cfata_metadata_inquiry(IDEState *s) -{ - uint16_t *p; - uint32_t spd; - - p = (uint16_t *) s->io_buffer; - memset(p, 0, 0x200); - spd = ((s->mdata_size - 1) >> 9) + 1; - - put_le16(p + 0, 0x0001); /* Data format revision */ - put_le16(p + 1, 0x0000); /* Media property: silicon */ - put_le16(p + 2, s->media_changed); /* Media status */ - put_le16(p + 3, s->mdata_size & 0xffff); /* Capacity in bytes (low) */ - put_le16(p + 4, s->mdata_size >> 16); /* Capacity in bytes (high) */ - put_le16(p + 5, spd & 0xffff); /* Sectors per device (low) */ - put_le16(p + 6, spd >> 16); /* Sectors per device (high) */ -} - -static void ide_cfata_metadata_read(IDEState *s) -{ - uint16_t *p; - - if (((s->hcyl << 16) | s->lcyl) << 9 > s->mdata_size + 2) { - s->status = ERR_STAT; - s->error = ABRT_ERR; - return; - } - - p = (uint16_t *) s->io_buffer; - memset(p, 0, 0x200); - - put_le16(p + 0, s->media_changed); /* Media status */ - memcpy(p + 1, s->mdata_storage + (((s->hcyl << 16) | s->lcyl) << 9), - MIN(MIN(s->mdata_size - (((s->hcyl << 16) | s->lcyl) << 9), - s->nsector << 9), 0x200 - 2)); -} - -static void ide_cfata_metadata_write(IDEState *s) -{ - if (((s->hcyl << 16) | s->lcyl) << 9 > s->mdata_size + 2) { - s->status = ERR_STAT; - s->error = ABRT_ERR; - return; - } - - s->media_changed = 0; - - memcpy(s->mdata_storage + (((s->hcyl << 16) | s->lcyl) << 9), - s->io_buffer + 2, - MIN(MIN(s->mdata_size - (((s->hcyl << 16) | s->lcyl) << 9), - s->nsector << 9), 0x200 - 2)); -} - -/* called when the inserted state of the media has changed */ -static void ide_cd_change_cb(void *opaque, bool load) -{ - IDEState *s = opaque; - uint64_t nb_sectors; - - s->tray_open = !load; - blk_get_geometry(s->blk, &nb_sectors); - s->nb_sectors = nb_sectors; - - /* - * First indicate to the guest that a CD has been removed. That's - * done on the next command the guest sends us. - * - * Then we set UNIT_ATTENTION, by which the guest will - * detect a new CD in the drive. See ide_atapi_cmd() for details. - */ - s->cdrom_changed = 1; - s->events.new_media = true; - s->events.eject_request = false; - ide_set_irq(s->bus); -} - -static void ide_cd_eject_request_cb(void *opaque, bool force) -{ - IDEState *s = opaque; - - s->events.eject_request = true; - if (force) { - s->tray_locked = false; - } - ide_set_irq(s->bus); -} - -static void ide_cmd_lba48_transform(IDEState *s, int lba48) -{ - s->lba48 = lba48; - - /* handle the 'magic' 0 nsector count conversion here. to avoid - * fiddling with the rest of the read logic, we just store the - * full sector count in ->nsector and ignore ->hob_nsector from now - */ - if (!s->lba48) { - if (!s->nsector) - s->nsector = 256; - } else { - if (!s->nsector && !s->hob_nsector) - s->nsector = 65536; - else { - int lo = s->nsector; - int hi = s->hob_nsector; - - s->nsector = (hi << 8) | lo; - } - } -} - -static void ide_clear_hob(IDEBus *bus) -{ - /* any write clears HOB high bit of device control register */ - bus->ifs[0].select &= ~(1 << 7); - bus->ifs[1].select &= ~(1 << 7); -} - -void ide_ioport_write(void *opaque, uint32_t addr, uint32_t val) -{ - IDEBus *bus = opaque; - -#ifdef DEBUG_IDE - printf("IDE: write addr=0x%x val=0x%02x\n", addr, val); -#endif - - addr &= 7; - - /* ignore writes to command block while busy with previous command */ - if (addr != 7 && (idebus_active_if(bus)->status & (BUSY_STAT|DRQ_STAT))) - return; - - switch(addr) { - case 0: - break; - case 1: - ide_clear_hob(bus); - /* NOTE: data is written to the two drives */ - bus->ifs[0].hob_feature = bus->ifs[0].feature; - bus->ifs[1].hob_feature = bus->ifs[1].feature; - bus->ifs[0].feature = val; - bus->ifs[1].feature = val; - break; - case 2: - ide_clear_hob(bus); - bus->ifs[0].hob_nsector = bus->ifs[0].nsector; - bus->ifs[1].hob_nsector = bus->ifs[1].nsector; - bus->ifs[0].nsector = val; - bus->ifs[1].nsector = val; - break; - case 3: - ide_clear_hob(bus); - bus->ifs[0].hob_sector = bus->ifs[0].sector; - bus->ifs[1].hob_sector = bus->ifs[1].sector; - bus->ifs[0].sector = val; - bus->ifs[1].sector = val; - break; - case 4: - ide_clear_hob(bus); - bus->ifs[0].hob_lcyl = bus->ifs[0].lcyl; - bus->ifs[1].hob_lcyl = bus->ifs[1].lcyl; - bus->ifs[0].lcyl = val; - bus->ifs[1].lcyl = val; - break; - case 5: - ide_clear_hob(bus); - bus->ifs[0].hob_hcyl = bus->ifs[0].hcyl; - bus->ifs[1].hob_hcyl = bus->ifs[1].hcyl; - bus->ifs[0].hcyl = val; - bus->ifs[1].hcyl = val; - break; - case 6: - /* FIXME: HOB readback uses bit 7 */ - bus->ifs[0].select = (val & ~0x10) | 0xa0; - bus->ifs[1].select = (val | 0x10) | 0xa0; - /* select drive */ - bus->unit = (val >> 4) & 1; - break; - default: - case 7: - /* command */ - ide_exec_cmd(bus, val); - break; - } -} - -static void ide_reset(IDEState *s) -{ -#ifdef DEBUG_IDE - printf("ide: reset\n"); -#endif - - if (s->pio_aiocb) { - blk_aio_cancel(s->pio_aiocb); - s->pio_aiocb = NULL; - } - - if (s->drive_kind == IDE_CFATA) - s->mult_sectors = 0; - else - s->mult_sectors = MAX_MULT_SECTORS; - /* ide regs */ - s->feature = 0; - s->error = 0; - s->nsector = 0; - s->sector = 0; - s->lcyl = 0; - s->hcyl = 0; - - /* lba48 */ - s->hob_feature = 0; - s->hob_sector = 0; - s->hob_nsector = 0; - s->hob_lcyl = 0; - s->hob_hcyl = 0; - - s->select = 0xa0; - s->status = READY_STAT | SEEK_STAT; - - s->lba48 = 0; - - /* ATAPI specific */ - s->sense_key = 0; - s->asc = 0; - s->cdrom_changed = 0; - s->packet_transfer_size = 0; - s->elementary_transfer_size = 0; - s->io_buffer_index = 0; - s->cd_sector_size = 0; - s->atapi_dma = 0; - s->tray_locked = 0; - s->tray_open = 0; - /* ATA DMA state */ - s->io_buffer_size = 0; - s->req_nb_sectors = 0; - - ide_set_signature(s); - /* init the transfer handler so that 0xffff is returned on data - accesses */ - s->end_transfer_func = ide_dummy_transfer_stop; - ide_dummy_transfer_stop(s); - s->media_changed = 0; -} - -static bool cmd_nop(IDEState *s, uint8_t cmd) -{ - return true; -} - -static bool cmd_device_reset(IDEState *s, uint8_t cmd) -{ - /* Halt PIO (in the DRQ phase), then DMA */ - ide_transfer_cancel(s); - ide_cancel_dma_sync(s); - - /* Reset any PIO commands, reset signature, etc */ - ide_reset(s); - - /* RESET: ATA8-ACS3 7.10.4 "Normal Outputs"; - * ATA8-ACS3 Table 184 "Device Signatures for Normal Output" */ - s->status = 0x00; - - /* Do not overwrite status register */ - return false; -} - -static bool cmd_data_set_management(IDEState *s, uint8_t cmd) -{ - switch (s->feature) { - case DSM_TRIM: - if (s->blk) { - ide_sector_start_dma(s, IDE_DMA_TRIM); - return false; - } - break; - } - - ide_abort_command(s); - return true; -} - -static bool cmd_identify(IDEState *s, uint8_t cmd) -{ - if (s->blk && s->drive_kind != IDE_CD) { - if (s->drive_kind != IDE_CFATA) { - ide_identify(s); - } else { - ide_cfata_identify(s); - } - s->status = READY_STAT | SEEK_STAT; - ide_transfer_start(s, s->io_buffer, 512, ide_transfer_stop); - ide_set_irq(s->bus); - return false; - } else { - if (s->drive_kind == IDE_CD) { - ide_set_signature(s); - } - ide_abort_command(s); - } - - return true; -} - -static bool cmd_verify(IDEState *s, uint8_t cmd) -{ - bool lba48 = (cmd == WIN_VERIFY_EXT); - - /* do sector number check ? */ - ide_cmd_lba48_transform(s, lba48); - - return true; -} - -static bool cmd_set_multiple_mode(IDEState *s, uint8_t cmd) -{ - if (s->drive_kind == IDE_CFATA && s->nsector == 0) { - /* Disable Read and Write Multiple */ - s->mult_sectors = 0; - } else if ((s->nsector & 0xff) != 0 && - ((s->nsector & 0xff) > MAX_MULT_SECTORS || - (s->nsector & (s->nsector - 1)) != 0)) { - ide_abort_command(s); - } else { - s->mult_sectors = s->nsector & 0xff; - } - - return true; -} - -static bool cmd_read_multiple(IDEState *s, uint8_t cmd) -{ - bool lba48 = (cmd == WIN_MULTREAD_EXT); - - if (!s->blk || !s->mult_sectors) { - ide_abort_command(s); - return true; - } - - ide_cmd_lba48_transform(s, lba48); - s->req_nb_sectors = s->mult_sectors; - ide_sector_read(s); - return false; -} - -static bool cmd_write_multiple(IDEState *s, uint8_t cmd) -{ - bool lba48 = (cmd == WIN_MULTWRITE_EXT); - int n; - - if (!s->blk || !s->mult_sectors) { - ide_abort_command(s); - return true; - } - - ide_cmd_lba48_transform(s, lba48); - - s->req_nb_sectors = s->mult_sectors; - n = MIN(s->nsector, s->req_nb_sectors); - - s->status = SEEK_STAT | READY_STAT; - ide_transfer_start(s, s->io_buffer, 512 * n, ide_sector_write); - - s->media_changed = 1; - - return false; -} - -static bool cmd_read_pio(IDEState *s, uint8_t cmd) -{ - bool lba48 = (cmd == WIN_READ_EXT); - - if (s->drive_kind == IDE_CD) { - ide_set_signature(s); /* odd, but ATA4 8.27.5.2 requires it */ - ide_abort_command(s); - return true; - } - - if (!s->blk) { - ide_abort_command(s); - return true; - } - - ide_cmd_lba48_transform(s, lba48); - s->req_nb_sectors = 1; - ide_sector_read(s); - - return false; -} - -static bool cmd_write_pio(IDEState *s, uint8_t cmd) -{ - bool lba48 = (cmd == WIN_WRITE_EXT); - - if (!s->blk) { - ide_abort_command(s); - return true; - } - - ide_cmd_lba48_transform(s, lba48); - - s->req_nb_sectors = 1; - s->status = SEEK_STAT | READY_STAT; - ide_transfer_start(s, s->io_buffer, 512, ide_sector_write); - - s->media_changed = 1; - - return false; -} - -static bool cmd_read_dma(IDEState *s, uint8_t cmd) -{ - bool lba48 = (cmd == WIN_READDMA_EXT); - - if (!s->blk) { - ide_abort_command(s); - return true; - } - - ide_cmd_lba48_transform(s, lba48); - ide_sector_start_dma(s, IDE_DMA_READ); - - return false; -} - -static bool cmd_write_dma(IDEState *s, uint8_t cmd) -{ - bool lba48 = (cmd == WIN_WRITEDMA_EXT); - - if (!s->blk) { - ide_abort_command(s); - return true; - } - - ide_cmd_lba48_transform(s, lba48); - ide_sector_start_dma(s, IDE_DMA_WRITE); - - s->media_changed = 1; - - return false; -} - -static bool cmd_flush_cache(IDEState *s, uint8_t cmd) -{ - ide_flush_cache(s); - return false; -} - -static bool cmd_seek(IDEState *s, uint8_t cmd) -{ - /* XXX: Check that seek is within bounds */ - return true; -} - -static bool cmd_read_native_max(IDEState *s, uint8_t cmd) -{ - bool lba48 = (cmd == WIN_READ_NATIVE_MAX_EXT); - - /* Refuse if no sectors are addressable (e.g. medium not inserted) */ - if (s->nb_sectors == 0) { - ide_abort_command(s); - return true; - } - - ide_cmd_lba48_transform(s, lba48); - ide_set_sector(s, s->nb_sectors - 1); - - return true; -} - -static bool cmd_check_power_mode(IDEState *s, uint8_t cmd) -{ - s->nsector = 0xff; /* device active or idle */ - return true; -} - -static bool cmd_set_features(IDEState *s, uint8_t cmd) -{ - uint16_t *identify_data; - - if (!s->blk) { - ide_abort_command(s); - return true; - } - - /* XXX: valid for CDROM ? */ - switch (s->feature) { - case 0x02: /* write cache enable */ - blk_set_enable_write_cache(s->blk, true); - identify_data = (uint16_t *)s->identify_data; - put_le16(identify_data + 85, (1 << 14) | (1 << 5) | 1); - return true; - case 0x82: /* write cache disable */ - blk_set_enable_write_cache(s->blk, false); - identify_data = (uint16_t *)s->identify_data; - put_le16(identify_data + 85, (1 << 14) | 1); - ide_flush_cache(s); - return false; - case 0xcc: /* reverting to power-on defaults enable */ - case 0x66: /* reverting to power-on defaults disable */ - case 0xaa: /* read look-ahead enable */ - case 0x55: /* read look-ahead disable */ - case 0x05: /* set advanced power management mode */ - case 0x85: /* disable advanced power management mode */ - case 0x69: /* NOP */ - case 0x67: /* NOP */ - case 0x96: /* NOP */ - case 0x9a: /* NOP */ - case 0x42: /* enable Automatic Acoustic Mode */ - case 0xc2: /* disable Automatic Acoustic Mode */ - return true; - case 0x03: /* set transfer mode */ - { - uint8_t val = s->nsector & 0x07; - identify_data = (uint16_t *)s->identify_data; - - switch (s->nsector >> 3) { - case 0x00: /* pio default */ - case 0x01: /* pio mode */ - put_le16(identify_data + 62, 0x07); - put_le16(identify_data + 63, 0x07); - put_le16(identify_data + 88, 0x3f); - break; - case 0x02: /* sigle word dma mode*/ - put_le16(identify_data + 62, 0x07 | (1 << (val + 8))); - put_le16(identify_data + 63, 0x07); - put_le16(identify_data + 88, 0x3f); - break; - case 0x04: /* mdma mode */ - put_le16(identify_data + 62, 0x07); - put_le16(identify_data + 63, 0x07 | (1 << (val + 8))); - put_le16(identify_data + 88, 0x3f); - break; - case 0x08: /* udma mode */ - put_le16(identify_data + 62, 0x07); - put_le16(identify_data + 63, 0x07); - put_le16(identify_data + 88, 0x3f | (1 << (val + 8))); - break; - default: - goto abort_cmd; - } - return true; - } - } - -abort_cmd: - ide_abort_command(s); - return true; -} - - -/*** ATAPI commands ***/ - -static bool cmd_identify_packet(IDEState *s, uint8_t cmd) -{ - ide_atapi_identify(s); - s->status = READY_STAT | SEEK_STAT; - ide_transfer_start(s, s->io_buffer, 512, ide_transfer_stop); - ide_set_irq(s->bus); - return false; -} - -static bool cmd_exec_dev_diagnostic(IDEState *s, uint8_t cmd) -{ - ide_set_signature(s); - - if (s->drive_kind == IDE_CD) { - s->status = 0; /* ATAPI spec (v6) section 9.10 defines packet - * devices to return a clear status register - * with READY_STAT *not* set. */ - s->error = 0x01; - } else { - s->status = READY_STAT | SEEK_STAT; - /* The bits of the error register are not as usual for this command! - * They are part of the regular output (this is why ERR_STAT isn't set) - * Device 0 passed, Device 1 passed or not present. */ - s->error = 0x01; - ide_set_irq(s->bus); - } - - return false; -} - -static bool cmd_packet(IDEState *s, uint8_t cmd) -{ - /* overlapping commands not supported */ - if (s->feature & 0x02) { - ide_abort_command(s); - return true; - } - - s->status = READY_STAT | SEEK_STAT; - s->atapi_dma = s->feature & 1; - if (s->atapi_dma) { - s->dma_cmd = IDE_DMA_ATAPI; - } - s->nsector = 1; - ide_transfer_start(s, s->io_buffer, ATAPI_PACKET_SIZE, - ide_atapi_cmd); - return false; -} - - -/*** CF-ATA commands ***/ - -static bool cmd_cfa_req_ext_error_code(IDEState *s, uint8_t cmd) -{ - s->error = 0x09; /* miscellaneous error */ - s->status = READY_STAT | SEEK_STAT; - ide_set_irq(s->bus); - - return false; -} - -static bool cmd_cfa_erase_sectors(IDEState *s, uint8_t cmd) -{ - /* WIN_SECURITY_FREEZE_LOCK has the same ID as CFA_WEAR_LEVEL and is - * required for Windows 8 to work with AHCI */ - - if (cmd == CFA_WEAR_LEVEL) { - s->nsector = 0; - } - - if (cmd == CFA_ERASE_SECTORS) { - s->media_changed = 1; - } - - return true; -} - -static bool cmd_cfa_translate_sector(IDEState *s, uint8_t cmd) -{ - s->status = READY_STAT | SEEK_STAT; - - memset(s->io_buffer, 0, 0x200); - s->io_buffer[0x00] = s->hcyl; /* Cyl MSB */ - s->io_buffer[0x01] = s->lcyl; /* Cyl LSB */ - s->io_buffer[0x02] = s->select; /* Head */ - s->io_buffer[0x03] = s->sector; /* Sector */ - s->io_buffer[0x04] = ide_get_sector(s) >> 16; /* LBA MSB */ - s->io_buffer[0x05] = ide_get_sector(s) >> 8; /* LBA */ - s->io_buffer[0x06] = ide_get_sector(s) >> 0; /* LBA LSB */ - s->io_buffer[0x13] = 0x00; /* Erase flag */ - s->io_buffer[0x18] = 0x00; /* Hot count */ - s->io_buffer[0x19] = 0x00; /* Hot count */ - s->io_buffer[0x1a] = 0x01; /* Hot count */ - - ide_transfer_start(s, s->io_buffer, 0x200, ide_transfer_stop); - ide_set_irq(s->bus); - - return false; -} - -static bool cmd_cfa_access_metadata_storage(IDEState *s, uint8_t cmd) -{ - switch (s->feature) { - case 0x02: /* Inquiry Metadata Storage */ - ide_cfata_metadata_inquiry(s); - break; - case 0x03: /* Read Metadata Storage */ - ide_cfata_metadata_read(s); - break; - case 0x04: /* Write Metadata Storage */ - ide_cfata_metadata_write(s); - break; - default: - ide_abort_command(s); - return true; - } - - ide_transfer_start(s, s->io_buffer, 0x200, ide_transfer_stop); - s->status = 0x00; /* NOTE: READY is _not_ set */ - ide_set_irq(s->bus); - - return false; -} - -static bool cmd_ibm_sense_condition(IDEState *s, uint8_t cmd) -{ - switch (s->feature) { - case 0x01: /* sense temperature in device */ - s->nsector = 0x50; /* +20 C */ - break; - default: - ide_abort_command(s); - return true; - } - - return true; -} - - -/*** SMART commands ***/ - -static bool cmd_smart(IDEState *s, uint8_t cmd) -{ - int n; - - if (s->hcyl != 0xc2 || s->lcyl != 0x4f) { - goto abort_cmd; - } - - if (!s->smart_enabled && s->feature != SMART_ENABLE) { - goto abort_cmd; - } - - switch (s->feature) { - case SMART_DISABLE: - s->smart_enabled = 0; - return true; - - case SMART_ENABLE: - s->smart_enabled = 1; - return true; - - case SMART_ATTR_AUTOSAVE: - switch (s->sector) { - case 0x00: - s->smart_autosave = 0; - break; - case 0xf1: - s->smart_autosave = 1; - break; - default: - goto abort_cmd; - } - return true; - - case SMART_STATUS: - if (!s->smart_errors) { - s->hcyl = 0xc2; - s->lcyl = 0x4f; - } else { - s->hcyl = 0x2c; - s->lcyl = 0xf4; - } - return true; - - case SMART_READ_THRESH: - memset(s->io_buffer, 0, 0x200); - s->io_buffer[0] = 0x01; /* smart struct version */ - - for (n = 0; n < ARRAY_SIZE(smart_attributes); n++) { - s->io_buffer[2 + 0 + (n * 12)] = smart_attributes[n][0]; - s->io_buffer[2 + 1 + (n * 12)] = smart_attributes[n][11]; - } - - /* checksum */ - for (n = 0; n < 511; n++) { - s->io_buffer[511] += s->io_buffer[n]; - } - s->io_buffer[511] = 0x100 - s->io_buffer[511]; - - s->status = READY_STAT | SEEK_STAT; - ide_transfer_start(s, s->io_buffer, 0x200, ide_transfer_stop); - ide_set_irq(s->bus); - return false; - - case SMART_READ_DATA: - memset(s->io_buffer, 0, 0x200); - s->io_buffer[0] = 0x01; /* smart struct version */ - - for (n = 0; n < ARRAY_SIZE(smart_attributes); n++) { - int i; - for (i = 0; i < 11; i++) { - s->io_buffer[2 + i + (n * 12)] = smart_attributes[n][i]; - } - } - - s->io_buffer[362] = 0x02 | (s->smart_autosave ? 0x80 : 0x00); - if (s->smart_selftest_count == 0) { - s->io_buffer[363] = 0; - } else { - s->io_buffer[363] = - s->smart_selftest_data[3 + - (s->smart_selftest_count - 1) * - 24]; - } - s->io_buffer[364] = 0x20; - s->io_buffer[365] = 0x01; - /* offline data collection capacity: execute + self-test*/ - s->io_buffer[367] = (1 << 4 | 1 << 3 | 1); - s->io_buffer[368] = 0x03; /* smart capability (1) */ - s->io_buffer[369] = 0x00; /* smart capability (2) */ - s->io_buffer[370] = 0x01; /* error logging supported */ - s->io_buffer[372] = 0x02; /* minutes for poll short test */ - s->io_buffer[373] = 0x36; /* minutes for poll ext test */ - s->io_buffer[374] = 0x01; /* minutes for poll conveyance */ - - for (n = 0; n < 511; n++) { - s->io_buffer[511] += s->io_buffer[n]; - } - s->io_buffer[511] = 0x100 - s->io_buffer[511]; - - s->status = READY_STAT | SEEK_STAT; - ide_transfer_start(s, s->io_buffer, 0x200, ide_transfer_stop); - ide_set_irq(s->bus); - return false; - - case SMART_READ_LOG: - switch (s->sector) { - case 0x01: /* summary smart error log */ - memset(s->io_buffer, 0, 0x200); - s->io_buffer[0] = 0x01; - s->io_buffer[1] = 0x00; /* no error entries */ - s->io_buffer[452] = s->smart_errors & 0xff; - s->io_buffer[453] = (s->smart_errors & 0xff00) >> 8; - - for (n = 0; n < 511; n++) { - s->io_buffer[511] += s->io_buffer[n]; - } - s->io_buffer[511] = 0x100 - s->io_buffer[511]; - break; - case 0x06: /* smart self test log */ - memset(s->io_buffer, 0, 0x200); - s->io_buffer[0] = 0x01; - if (s->smart_selftest_count == 0) { - s->io_buffer[508] = 0; - } else { - s->io_buffer[508] = s->smart_selftest_count; - for (n = 2; n < 506; n++) { - s->io_buffer[n] = s->smart_selftest_data[n]; - } - } - - for (n = 0; n < 511; n++) { - s->io_buffer[511] += s->io_buffer[n]; - } - s->io_buffer[511] = 0x100 - s->io_buffer[511]; - break; - default: - goto abort_cmd; - } - s->status = READY_STAT | SEEK_STAT; - ide_transfer_start(s, s->io_buffer, 0x200, ide_transfer_stop); - ide_set_irq(s->bus); - return false; - - case SMART_EXECUTE_OFFLINE: - switch (s->sector) { - case 0: /* off-line routine */ - case 1: /* short self test */ - case 2: /* extended self test */ - s->smart_selftest_count++; - if (s->smart_selftest_count > 21) { - s->smart_selftest_count = 1; - } - n = 2 + (s->smart_selftest_count - 1) * 24; - s->smart_selftest_data[n] = s->sector; - s->smart_selftest_data[n + 1] = 0x00; /* OK and finished */ - s->smart_selftest_data[n + 2] = 0x34; /* hour count lsb */ - s->smart_selftest_data[n + 3] = 0x12; /* hour count msb */ - break; - default: - goto abort_cmd; - } - return true; - } - -abort_cmd: - ide_abort_command(s); - return true; -} - -#define HD_OK (1u << IDE_HD) -#define CD_OK (1u << IDE_CD) -#define CFA_OK (1u << IDE_CFATA) -#define HD_CFA_OK (HD_OK | CFA_OK) -#define ALL_OK (HD_OK | CD_OK | CFA_OK) - -/* Set the Disk Seek Completed status bit during completion */ -#define SET_DSC (1u << 8) - -/* See ACS-2 T13/2015-D Table B.2 Command codes */ -static const struct { - /* Returns true if the completion code should be run */ - bool (*handler)(IDEState *s, uint8_t cmd); - int flags; -} ide_cmd_table[0x100] = { - /* NOP not implemented, mandatory for CD */ - [CFA_REQ_EXT_ERROR_CODE] = { cmd_cfa_req_ext_error_code, CFA_OK }, - [WIN_DSM] = { cmd_data_set_management, HD_CFA_OK }, - [WIN_DEVICE_RESET] = { cmd_device_reset, CD_OK }, - [WIN_RECAL] = { cmd_nop, HD_CFA_OK | SET_DSC}, - [WIN_READ] = { cmd_read_pio, ALL_OK }, - [WIN_READ_ONCE] = { cmd_read_pio, HD_CFA_OK }, - [WIN_READ_EXT] = { cmd_read_pio, HD_CFA_OK }, - [WIN_READDMA_EXT] = { cmd_read_dma, HD_CFA_OK }, - [WIN_READ_NATIVE_MAX_EXT] = { cmd_read_native_max, HD_CFA_OK | SET_DSC }, - [WIN_MULTREAD_EXT] = { cmd_read_multiple, HD_CFA_OK }, - [WIN_WRITE] = { cmd_write_pio, HD_CFA_OK }, - [WIN_WRITE_ONCE] = { cmd_write_pio, HD_CFA_OK }, - [WIN_WRITE_EXT] = { cmd_write_pio, HD_CFA_OK }, - [WIN_WRITEDMA_EXT] = { cmd_write_dma, HD_CFA_OK }, - [CFA_WRITE_SECT_WO_ERASE] = { cmd_write_pio, CFA_OK }, - [WIN_MULTWRITE_EXT] = { cmd_write_multiple, HD_CFA_OK }, - [WIN_WRITE_VERIFY] = { cmd_write_pio, HD_CFA_OK }, - [WIN_VERIFY] = { cmd_verify, HD_CFA_OK | SET_DSC }, - [WIN_VERIFY_ONCE] = { cmd_verify, HD_CFA_OK | SET_DSC }, - [WIN_VERIFY_EXT] = { cmd_verify, HD_CFA_OK | SET_DSC }, - [WIN_SEEK] = { cmd_seek, HD_CFA_OK | SET_DSC }, - [CFA_TRANSLATE_SECTOR] = { cmd_cfa_translate_sector, CFA_OK }, - [WIN_DIAGNOSE] = { cmd_exec_dev_diagnostic, ALL_OK }, - [WIN_SPECIFY] = { cmd_nop, HD_CFA_OK | SET_DSC }, - [WIN_STANDBYNOW2] = { cmd_nop, HD_CFA_OK }, - [WIN_IDLEIMMEDIATE2] = { cmd_nop, HD_CFA_OK }, - [WIN_STANDBY2] = { cmd_nop, HD_CFA_OK }, - [WIN_SETIDLE2] = { cmd_nop, HD_CFA_OK }, - [WIN_CHECKPOWERMODE2] = { cmd_check_power_mode, HD_CFA_OK | SET_DSC }, - [WIN_SLEEPNOW2] = { cmd_nop, HD_CFA_OK }, - [WIN_PACKETCMD] = { cmd_packet, CD_OK }, - [WIN_PIDENTIFY] = { cmd_identify_packet, CD_OK }, - [WIN_SMART] = { cmd_smart, HD_CFA_OK | SET_DSC }, - [CFA_ACCESS_METADATA_STORAGE] = { cmd_cfa_access_metadata_storage, CFA_OK }, - [CFA_ERASE_SECTORS] = { cmd_cfa_erase_sectors, CFA_OK | SET_DSC }, - [WIN_MULTREAD] = { cmd_read_multiple, HD_CFA_OK }, - [WIN_MULTWRITE] = { cmd_write_multiple, HD_CFA_OK }, - [WIN_SETMULT] = { cmd_set_multiple_mode, HD_CFA_OK | SET_DSC }, - [WIN_READDMA] = { cmd_read_dma, HD_CFA_OK }, - [WIN_READDMA_ONCE] = { cmd_read_dma, HD_CFA_OK }, - [WIN_WRITEDMA] = { cmd_write_dma, HD_CFA_OK }, - [WIN_WRITEDMA_ONCE] = { cmd_write_dma, HD_CFA_OK }, - [CFA_WRITE_MULTI_WO_ERASE] = { cmd_write_multiple, CFA_OK }, - [WIN_STANDBYNOW1] = { cmd_nop, HD_CFA_OK }, - [WIN_IDLEIMMEDIATE] = { cmd_nop, HD_CFA_OK }, - [WIN_STANDBY] = { cmd_nop, HD_CFA_OK }, - [WIN_SETIDLE1] = { cmd_nop, HD_CFA_OK }, - [WIN_CHECKPOWERMODE1] = { cmd_check_power_mode, HD_CFA_OK | SET_DSC }, - [WIN_SLEEPNOW1] = { cmd_nop, HD_CFA_OK }, - [WIN_FLUSH_CACHE] = { cmd_flush_cache, ALL_OK }, - [WIN_FLUSH_CACHE_EXT] = { cmd_flush_cache, HD_CFA_OK }, - [WIN_IDENTIFY] = { cmd_identify, ALL_OK }, - [WIN_SETFEATURES] = { cmd_set_features, ALL_OK | SET_DSC }, - [IBM_SENSE_CONDITION] = { cmd_ibm_sense_condition, CFA_OK | SET_DSC }, - [CFA_WEAR_LEVEL] = { cmd_cfa_erase_sectors, HD_CFA_OK | SET_DSC }, - [WIN_READ_NATIVE_MAX] = { cmd_read_native_max, HD_CFA_OK | SET_DSC }, -}; - -static bool ide_cmd_permitted(IDEState *s, uint32_t cmd) -{ - return cmd < ARRAY_SIZE(ide_cmd_table) - && (ide_cmd_table[cmd].flags & (1u << s->drive_kind)); -} - -void ide_exec_cmd(IDEBus *bus, uint32_t val) -{ - IDEState *s; - bool complete; - -#if defined(DEBUG_IDE) - printf("ide: CMD=%02x\n", val); -#endif - s = idebus_active_if(bus); - /* ignore commands to non existent slave */ - if (s != bus->ifs && !s->blk) { - return; - } - - /* Only RESET is allowed while BSY and/or DRQ are set, - * and only to ATAPI devices. */ - if (s->status & (BUSY_STAT|DRQ_STAT)) { - if (val != WIN_DEVICE_RESET || s->drive_kind != IDE_CD) { - return; - } - } - - if (!ide_cmd_permitted(s, val)) { - ide_abort_command(s); - ide_set_irq(s->bus); - return; - } - - s->status = READY_STAT | BUSY_STAT; - s->error = 0; - s->io_buffer_offset = 0; - - complete = ide_cmd_table[val].handler(s, val); - if (complete) { - s->status &= ~BUSY_STAT; - assert(!!s->error == !!(s->status & ERR_STAT)); - - if ((ide_cmd_table[val].flags & SET_DSC) && !s->error) { - s->status |= SEEK_STAT; - } - - ide_cmd_done(s); - ide_set_irq(s->bus); - } -} - -uint32_t ide_ioport_read(void *opaque, uint32_t addr1) -{ - IDEBus *bus = opaque; - IDEState *s = idebus_active_if(bus); - uint32_t addr; - int ret, hob; - - addr = addr1 & 7; - /* FIXME: HOB readback uses bit 7, but it's always set right now */ - //hob = s->select & (1 << 7); - hob = 0; - switch(addr) { - case 0: - ret = 0xff; - break; - case 1: - if ((!bus->ifs[0].blk && !bus->ifs[1].blk) || - (s != bus->ifs && !s->blk)) { - ret = 0; - } else if (!hob) { - ret = s->error; - } else { - ret = s->hob_feature; - } - break; - case 2: - if (!bus->ifs[0].blk && !bus->ifs[1].blk) { - ret = 0; - } else if (!hob) { - ret = s->nsector & 0xff; - } else { - ret = s->hob_nsector; - } - break; - case 3: - if (!bus->ifs[0].blk && !bus->ifs[1].blk) { - ret = 0; - } else if (!hob) { - ret = s->sector; - } else { - ret = s->hob_sector; - } - break; - case 4: - if (!bus->ifs[0].blk && !bus->ifs[1].blk) { - ret = 0; - } else if (!hob) { - ret = s->lcyl; - } else { - ret = s->hob_lcyl; - } - break; - case 5: - if (!bus->ifs[0].blk && !bus->ifs[1].blk) { - ret = 0; - } else if (!hob) { - ret = s->hcyl; - } else { - ret = s->hob_hcyl; - } - break; - case 6: - if (!bus->ifs[0].blk && !bus->ifs[1].blk) { - ret = 0; - } else { - ret = s->select; - } - break; - default: - case 7: - if ((!bus->ifs[0].blk && !bus->ifs[1].blk) || - (s != bus->ifs && !s->blk)) { - ret = 0; - } else { - ret = s->status; - } - qemu_irq_lower(bus->irq); - break; - } -#ifdef DEBUG_IDE - printf("ide: read addr=0x%x val=%02x\n", addr1, ret); -#endif - return ret; -} - -uint32_t ide_status_read(void *opaque, uint32_t addr) -{ - IDEBus *bus = opaque; - IDEState *s = idebus_active_if(bus); - int ret; - - if ((!bus->ifs[0].blk && !bus->ifs[1].blk) || - (s != bus->ifs && !s->blk)) { - ret = 0; - } else { - ret = s->status; - } -#ifdef DEBUG_IDE - printf("ide: read status addr=0x%x val=%02x\n", addr, ret); -#endif - return ret; -} - -void ide_cmd_write(void *opaque, uint32_t addr, uint32_t val) -{ - IDEBus *bus = opaque; - IDEState *s; - int i; - -#ifdef DEBUG_IDE - printf("ide: write control addr=0x%x val=%02x\n", addr, val); -#endif - /* common for both drives */ - if (!(bus->cmd & IDE_CMD_RESET) && - (val & IDE_CMD_RESET)) { - /* reset low to high */ - for(i = 0;i < 2; i++) { - s = &bus->ifs[i]; - s->status = BUSY_STAT | SEEK_STAT; - s->error = 0x01; - } - } else if ((bus->cmd & IDE_CMD_RESET) && - !(val & IDE_CMD_RESET)) { - /* high to low */ - for(i = 0;i < 2; i++) { - s = &bus->ifs[i]; - if (s->drive_kind == IDE_CD) - s->status = 0x00; /* NOTE: READY is _not_ set */ - else - s->status = READY_STAT | SEEK_STAT; - ide_set_signature(s); - } - } - - bus->cmd = val; -} - -/* - * Returns true if the running PIO transfer is a PIO out (i.e. data is - * transferred from the device to the guest), false if it's a PIO in - */ -static bool ide_is_pio_out(IDEState *s) -{ - if (s->end_transfer_func == ide_sector_write || - s->end_transfer_func == ide_atapi_cmd) { - return false; - } else if (s->end_transfer_func == ide_sector_read || - s->end_transfer_func == ide_transfer_stop || - s->end_transfer_func == ide_atapi_cmd_reply_end || - s->end_transfer_func == ide_dummy_transfer_stop) { - return true; - } - - abort(); -} - -void ide_data_writew(void *opaque, uint32_t addr, uint32_t val) -{ - IDEBus *bus = opaque; - IDEState *s = idebus_active_if(bus); - uint8_t *p; - - /* PIO data access allowed only when DRQ bit is set. The result of a write - * during PIO out is indeterminate, just ignore it. */ - if (!(s->status & DRQ_STAT) || ide_is_pio_out(s)) { - return; - } - - p = s->data_ptr; - if (p + 2 > s->data_end) { - return; - } - - *(uint16_t *)p = le16_to_cpu(val); - p += 2; - s->data_ptr = p; - if (p >= s->data_end) { - s->status &= ~DRQ_STAT; - s->end_transfer_func(s); - } -} - -uint32_t ide_data_readw(void *opaque, uint32_t addr) -{ - IDEBus *bus = opaque; - IDEState *s = idebus_active_if(bus); - uint8_t *p; - int ret; - - /* PIO data access allowed only when DRQ bit is set. The result of a read - * during PIO in is indeterminate, return 0 and don't move forward. */ - if (!(s->status & DRQ_STAT) || !ide_is_pio_out(s)) { - return 0; - } - - p = s->data_ptr; - if (p + 2 > s->data_end) { - return 0; - } - - ret = cpu_to_le16(*(uint16_t *)p); - p += 2; - s->data_ptr = p; - if (p >= s->data_end) { - s->status &= ~DRQ_STAT; - s->end_transfer_func(s); - } - return ret; -} - -void ide_data_writel(void *opaque, uint32_t addr, uint32_t val) -{ - IDEBus *bus = opaque; - IDEState *s = idebus_active_if(bus); - uint8_t *p; - - /* PIO data access allowed only when DRQ bit is set. The result of a write - * during PIO out is indeterminate, just ignore it. */ - if (!(s->status & DRQ_STAT) || ide_is_pio_out(s)) { - return; - } - - p = s->data_ptr; - if (p + 4 > s->data_end) { - return; - } - - *(uint32_t *)p = le32_to_cpu(val); - p += 4; - s->data_ptr = p; - if (p >= s->data_end) { - s->status &= ~DRQ_STAT; - s->end_transfer_func(s); - } -} - -uint32_t ide_data_readl(void *opaque, uint32_t addr) -{ - IDEBus *bus = opaque; - IDEState *s = idebus_active_if(bus); - uint8_t *p; - int ret; - - /* PIO data access allowed only when DRQ bit is set. The result of a read - * during PIO in is indeterminate, return 0 and don't move forward. */ - if (!(s->status & DRQ_STAT) || !ide_is_pio_out(s)) { - return 0; - } - - p = s->data_ptr; - if (p + 4 > s->data_end) { - return 0; - } - - ret = cpu_to_le32(*(uint32_t *)p); - p += 4; - s->data_ptr = p; - if (p >= s->data_end) { - s->status &= ~DRQ_STAT; - s->end_transfer_func(s); - } - return ret; -} - -static void ide_dummy_transfer_stop(IDEState *s) -{ - s->data_ptr = s->io_buffer; - s->data_end = s->io_buffer; - s->io_buffer[0] = 0xff; - s->io_buffer[1] = 0xff; - s->io_buffer[2] = 0xff; - s->io_buffer[3] = 0xff; -} - -void ide_bus_reset(IDEBus *bus) -{ - bus->unit = 0; - bus->cmd = 0; - ide_reset(&bus->ifs[0]); - ide_reset(&bus->ifs[1]); - ide_clear_hob(bus); - - /* pending async DMA */ - if (bus->dma->aiocb) { -#ifdef DEBUG_AIO - printf("aio_cancel\n"); -#endif - blk_aio_cancel(bus->dma->aiocb); - bus->dma->aiocb = NULL; - } - - /* reset dma provider too */ - if (bus->dma->ops->reset) { - bus->dma->ops->reset(bus->dma); - } -} - -static bool ide_cd_is_tray_open(void *opaque) -{ - return ((IDEState *)opaque)->tray_open; -} - -static bool ide_cd_is_medium_locked(void *opaque) -{ - return ((IDEState *)opaque)->tray_locked; -} - -static void ide_resize_cb(void *opaque) -{ - IDEState *s = opaque; - uint64_t nb_sectors; - - if (!s->identify_set) { - return; - } - - blk_get_geometry(s->blk, &nb_sectors); - s->nb_sectors = nb_sectors; - - /* Update the identify data buffer. */ - if (s->drive_kind == IDE_CFATA) { - ide_cfata_identify_size(s); - } else { - /* IDE_CD uses a different set of callbacks entirely. */ - assert(s->drive_kind != IDE_CD); - ide_identify_size(s); - } -} - -static const BlockDevOps ide_cd_block_ops = { - .change_media_cb = ide_cd_change_cb, - .eject_request_cb = ide_cd_eject_request_cb, - .is_tray_open = ide_cd_is_tray_open, - .is_medium_locked = ide_cd_is_medium_locked, -}; - -static const BlockDevOps ide_hd_block_ops = { - .resize_cb = ide_resize_cb, -}; - -int ide_init_drive(IDEState *s, BlockBackend *blk, IDEDriveKind kind, - const char *version, const char *serial, const char *model, - uint64_t wwn, - uint32_t cylinders, uint32_t heads, uint32_t secs, - int chs_trans) -{ - uint64_t nb_sectors; - - s->blk = blk; - s->drive_kind = kind; - - blk_get_geometry(blk, &nb_sectors); - s->cylinders = cylinders; - s->heads = heads; - s->sectors = secs; - s->chs_trans = chs_trans; - s->nb_sectors = nb_sectors; - s->wwn = wwn; - /* The SMART values should be preserved across power cycles - but they aren't. */ - s->smart_enabled = 1; - s->smart_autosave = 1; - s->smart_errors = 0; - s->smart_selftest_count = 0; - if (kind == IDE_CD) { - blk_set_dev_ops(blk, &ide_cd_block_ops, s); - blk_set_guest_block_size(blk, 2048); - } else { - if (!blk_is_inserted(s->blk)) { - error_report("Device needs media, but drive is empty"); - return -1; - } - if (blk_is_read_only(blk)) { - error_report("Can't use a read-only drive"); - return -1; - } - blk_set_dev_ops(blk, &ide_hd_block_ops, s); - } - if (serial) { - pstrcpy(s->drive_serial_str, sizeof(s->drive_serial_str), serial); - } else { - snprintf(s->drive_serial_str, sizeof(s->drive_serial_str), - "QM%05d", s->drive_serial); - } - if (model) { - pstrcpy(s->drive_model_str, sizeof(s->drive_model_str), model); - } else { - switch (kind) { - case IDE_CD: - strcpy(s->drive_model_str, "QEMU DVD-ROM"); - break; - case IDE_CFATA: - strcpy(s->drive_model_str, "QEMU MICRODRIVE"); - break; - default: - strcpy(s->drive_model_str, "QEMU HARDDISK"); - break; - } - } - - if (version) { - pstrcpy(s->version, sizeof(s->version), version); - } else { - pstrcpy(s->version, sizeof(s->version), qemu_hw_version()); - } - - ide_reset(s); - blk_iostatus_enable(blk); - return 0; -} - -static void ide_init1(IDEBus *bus, int unit) -{ - static int drive_serial = 1; - IDEState *s = &bus->ifs[unit]; - - s->bus = bus; - s->unit = unit; - s->drive_serial = drive_serial++; - /* we need at least 2k alignment for accessing CDROMs using O_DIRECT */ - s->io_buffer_total_len = IDE_DMA_BUF_SECTORS*512 + 4; - s->io_buffer = qemu_memalign(2048, s->io_buffer_total_len); - memset(s->io_buffer, 0, s->io_buffer_total_len); - - s->smart_selftest_data = blk_blockalign(s->blk, 512); - memset(s->smart_selftest_data, 0, 512); - - s->sector_write_timer = timer_new_ns(QEMU_CLOCK_VIRTUAL, - ide_sector_write_timer_cb, s); -} - -static int ide_nop_int(IDEDMA *dma, int x) -{ - return 0; -} - -static void ide_nop(IDEDMA *dma) -{ -} - -static int32_t ide_nop_int32(IDEDMA *dma, int32_t l) -{ - return 0; -} - -static const IDEDMAOps ide_dma_nop_ops = { - .prepare_buf = ide_nop_int32, - .restart_dma = ide_nop, - .rw_buf = ide_nop_int, -}; - -static void ide_restart_dma(IDEState *s, enum ide_dma_cmd dma_cmd) -{ - s->unit = s->bus->retry_unit; - ide_set_sector(s, s->bus->retry_sector_num); - s->nsector = s->bus->retry_nsector; - s->bus->dma->ops->restart_dma(s->bus->dma); - s->io_buffer_size = 0; - s->dma_cmd = dma_cmd; - ide_start_dma(s, ide_dma_cb); -} - -static void ide_restart_bh(void *opaque) -{ - IDEBus *bus = opaque; - IDEState *s; - bool is_read; - int error_status; - - qemu_bh_delete(bus->bh); - bus->bh = NULL; - - error_status = bus->error_status; - if (bus->error_status == 0) { - return; - } - - s = idebus_active_if(bus); - is_read = (bus->error_status & IDE_RETRY_READ) != 0; - - /* The error status must be cleared before resubmitting the request: The - * request may fail again, and this case can only be distinguished if the - * called function can set a new error status. */ - bus->error_status = 0; - - /* The HBA has generically asked to be kicked on retry */ - if (error_status & IDE_RETRY_HBA) { - if (s->bus->dma->ops->restart) { - s->bus->dma->ops->restart(s->bus->dma); - } - } else if (IS_IDE_RETRY_DMA(error_status)) { - if (error_status & IDE_RETRY_TRIM) { - ide_restart_dma(s, IDE_DMA_TRIM); - } else { - ide_restart_dma(s, is_read ? IDE_DMA_READ : IDE_DMA_WRITE); - } - } else if (IS_IDE_RETRY_PIO(error_status)) { - if (is_read) { - ide_sector_read(s); - } else { - ide_sector_write(s); - } - } else if (error_status & IDE_RETRY_FLUSH) { - ide_flush_cache(s); - } else if (IS_IDE_RETRY_ATAPI(error_status)) { - assert(s->end_transfer_func == ide_atapi_cmd); - ide_atapi_dma_restart(s); - } else { - abort(); - } -} - -static void ide_restart_cb(void *opaque, int running, RunState state) -{ - IDEBus *bus = opaque; - - if (!running) - return; - - if (!bus->bh) { - bus->bh = qemu_bh_new(ide_restart_bh, bus); - qemu_bh_schedule(bus->bh); - } -} - -void ide_register_restart_cb(IDEBus *bus) -{ - if (bus->dma->ops->restart_dma) { - qemu_add_vm_change_state_handler(ide_restart_cb, bus); - } -} - -static IDEDMA ide_dma_nop = { - .ops = &ide_dma_nop_ops, - .aiocb = NULL, -}; - -void ide_init2(IDEBus *bus, qemu_irq irq) -{ - int i; - - for(i = 0; i < 2; i++) { - ide_init1(bus, i); - ide_reset(&bus->ifs[i]); - } - bus->irq = irq; - bus->dma = &ide_dma_nop; -} - -static const MemoryRegionPortio ide_portio_list[] = { - { 0, 8, 1, .read = ide_ioport_read, .write = ide_ioport_write }, - { 0, 1, 2, .read = ide_data_readw, .write = ide_data_writew }, - { 0, 1, 4, .read = ide_data_readl, .write = ide_data_writel }, - PORTIO_END_OF_LIST(), -}; - -static const MemoryRegionPortio ide_portio2_list[] = { - { 0, 1, 1, .read = ide_status_read, .write = ide_cmd_write }, - PORTIO_END_OF_LIST(), -}; - -void ide_init_ioport(IDEBus *bus, ISADevice *dev, int iobase, int iobase2) -{ - /* ??? Assume only ISA and PCI configurations, and that the PCI-ISA - bridge has been setup properly to always register with ISA. */ - isa_register_portio_list(dev, iobase, ide_portio_list, bus, "ide"); - - if (iobase2) { - isa_register_portio_list(dev, iobase2, ide_portio2_list, bus, "ide"); - } -} - -static bool is_identify_set(void *opaque, int version_id) -{ - IDEState *s = opaque; - - return s->identify_set != 0; -} - -static EndTransferFunc* transfer_end_table[] = { - ide_sector_read, - ide_sector_write, - ide_transfer_stop, - ide_atapi_cmd_reply_end, - ide_atapi_cmd, - ide_dummy_transfer_stop, -}; - -static int transfer_end_table_idx(EndTransferFunc *fn) -{ - int i; - - for (i = 0; i < ARRAY_SIZE(transfer_end_table); i++) - if (transfer_end_table[i] == fn) - return i; - - return -1; -} - -static int ide_drive_post_load(void *opaque, int version_id) -{ - IDEState *s = opaque; - - if (s->blk && s->identify_set) { - blk_set_enable_write_cache(s->blk, !!(s->identify_data[85] & (1 << 5))); - } - return 0; -} - -static int ide_drive_pio_post_load(void *opaque, int version_id) -{ - IDEState *s = opaque; - - if (s->end_transfer_fn_idx >= ARRAY_SIZE(transfer_end_table)) { - return -EINVAL; - } - s->end_transfer_func = transfer_end_table[s->end_transfer_fn_idx]; - s->data_ptr = s->io_buffer + s->cur_io_buffer_offset; - s->data_end = s->data_ptr + s->cur_io_buffer_len; - s->atapi_dma = s->feature & 1; /* as per cmd_packet */ - - return 0; -} - -static void ide_drive_pio_pre_save(void *opaque) -{ - IDEState *s = opaque; - int idx; - - s->cur_io_buffer_offset = s->data_ptr - s->io_buffer; - s->cur_io_buffer_len = s->data_end - s->data_ptr; - - idx = transfer_end_table_idx(s->end_transfer_func); - if (idx == -1) { - fprintf(stderr, "%s: invalid end_transfer_func for DRQ_STAT\n", - __func__); - s->end_transfer_fn_idx = 2; - } else { - s->end_transfer_fn_idx = idx; - } -} - -static bool ide_drive_pio_state_needed(void *opaque) -{ - IDEState *s = opaque; - - return ((s->status & DRQ_STAT) != 0) - || (s->bus->error_status & IDE_RETRY_PIO); -} - -static bool ide_tray_state_needed(void *opaque) -{ - IDEState *s = opaque; - - return s->tray_open || s->tray_locked; -} - -static bool ide_atapi_gesn_needed(void *opaque) -{ - IDEState *s = opaque; - - return s->events.new_media || s->events.eject_request; -} - -static bool ide_error_needed(void *opaque) -{ - IDEBus *bus = opaque; - - return (bus->error_status != 0); -} - -/* Fields for GET_EVENT_STATUS_NOTIFICATION ATAPI command */ -static const VMStateDescription vmstate_ide_atapi_gesn_state = { - .name ="ide_drive/atapi/gesn_state", - .version_id = 1, - .minimum_version_id = 1, - .needed = ide_atapi_gesn_needed, - .fields = (VMStateField[]) { - VMSTATE_BOOL(events.new_media, IDEState), - VMSTATE_BOOL(events.eject_request, IDEState), - VMSTATE_END_OF_LIST() - } -}; - -static const VMStateDescription vmstate_ide_tray_state = { - .name = "ide_drive/tray_state", - .version_id = 1, - .minimum_version_id = 1, - .needed = ide_tray_state_needed, - .fields = (VMStateField[]) { - VMSTATE_BOOL(tray_open, IDEState), - VMSTATE_BOOL(tray_locked, IDEState), - VMSTATE_END_OF_LIST() - } -}; - -static const VMStateDescription vmstate_ide_drive_pio_state = { - .name = "ide_drive/pio_state", - .version_id = 1, - .minimum_version_id = 1, - .pre_save = ide_drive_pio_pre_save, - .post_load = ide_drive_pio_post_load, - .needed = ide_drive_pio_state_needed, - .fields = (VMStateField[]) { - VMSTATE_INT32(req_nb_sectors, IDEState), - VMSTATE_VARRAY_INT32(io_buffer, IDEState, io_buffer_total_len, 1, - vmstate_info_uint8, uint8_t), - VMSTATE_INT32(cur_io_buffer_offset, IDEState), - VMSTATE_INT32(cur_io_buffer_len, IDEState), - VMSTATE_UINT8(end_transfer_fn_idx, IDEState), - VMSTATE_INT32(elementary_transfer_size, IDEState), - VMSTATE_INT32(packet_transfer_size, IDEState), - VMSTATE_END_OF_LIST() - } -}; - -const VMStateDescription vmstate_ide_drive = { - .name = "ide_drive", - .version_id = 3, - .minimum_version_id = 0, - .post_load = ide_drive_post_load, - .fields = (VMStateField[]) { - VMSTATE_INT32(mult_sectors, IDEState), - VMSTATE_INT32(identify_set, IDEState), - VMSTATE_BUFFER_TEST(identify_data, IDEState, is_identify_set), - VMSTATE_UINT8(feature, IDEState), - VMSTATE_UINT8(error, IDEState), - VMSTATE_UINT32(nsector, IDEState), - VMSTATE_UINT8(sector, IDEState), - VMSTATE_UINT8(lcyl, IDEState), - VMSTATE_UINT8(hcyl, IDEState), - VMSTATE_UINT8(hob_feature, IDEState), - VMSTATE_UINT8(hob_sector, IDEState), - VMSTATE_UINT8(hob_nsector, IDEState), - VMSTATE_UINT8(hob_lcyl, IDEState), - VMSTATE_UINT8(hob_hcyl, IDEState), - VMSTATE_UINT8(select, IDEState), - VMSTATE_UINT8(status, IDEState), - VMSTATE_UINT8(lba48, IDEState), - VMSTATE_UINT8(sense_key, IDEState), - VMSTATE_UINT8(asc, IDEState), - VMSTATE_UINT8_V(cdrom_changed, IDEState, 3), - VMSTATE_END_OF_LIST() - }, - .subsections = (const VMStateDescription*[]) { - &vmstate_ide_drive_pio_state, - &vmstate_ide_tray_state, - &vmstate_ide_atapi_gesn_state, - NULL - } -}; - -static const VMStateDescription vmstate_ide_error_status = { - .name ="ide_bus/error", - .version_id = 2, - .minimum_version_id = 1, - .needed = ide_error_needed, - .fields = (VMStateField[]) { - VMSTATE_INT32(error_status, IDEBus), - VMSTATE_INT64_V(retry_sector_num, IDEBus, 2), - VMSTATE_UINT32_V(retry_nsector, IDEBus, 2), - VMSTATE_UINT8_V(retry_unit, IDEBus, 2), - VMSTATE_END_OF_LIST() - } -}; - -const VMStateDescription vmstate_ide_bus = { - .name = "ide_bus", - .version_id = 1, - .minimum_version_id = 1, - .fields = (VMStateField[]) { - VMSTATE_UINT8(cmd, IDEBus), - VMSTATE_UINT8(unit, IDEBus), - VMSTATE_END_OF_LIST() - }, - .subsections = (const VMStateDescription*[]) { - &vmstate_ide_error_status, - NULL - } -}; - -void ide_drive_get(DriveInfo **hd, int n) -{ - int i; - int highest_bus = drive_get_max_bus(IF_IDE) + 1; - int max_devs = drive_get_max_devs(IF_IDE); - int n_buses = max_devs ? (n / max_devs) : n; - - /* - * Note: The number of actual buses available is not known. - * We compute this based on the size of the DriveInfo* array, n. - * If it is less than max_devs * <num_real_buses>, - * We will stop looking for drives prematurely instead of overfilling - * the array. - */ - - if (highest_bus > n_buses) { - error_report("Too many IDE buses defined (%d > %d)", - highest_bus, n_buses); - exit(1); - } - - for (i = 0; i < n; i++) { - hd[i] = drive_get_by_index(IF_IDE, i); - } -} |