[qemu.git] / hw / ide / cmd646.c

/*
 * QEMU IDE Emulation: PCI cmd646 support.
 *
 * 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 <hw/hw.h>
#include <hw/pc.h>
#include <hw/pci.h>
#include <hw/isa.h>
#include "block.h"
#include "block_int.h"
#include "sysemu.h"
#include "dma.h"

#include <hw/ide/pci.h>

/* CMD646 specific */
#define MRDMODE		0x71
#define   MRDMODE_INTR_CH0	0x04
#define   MRDMODE_INTR_CH1	0x08
#define   MRDMODE_BLK_CH0	0x10
#define   MRDMODE_BLK_CH1	0x20
#define UDIDETCR0	0x73
#define UDIDETCR1	0x7B

static void cmd646_update_irq(PCIIDEState *d);

static void ide_map(PCIDevice *pci_dev, int region_num,
                    uint32_t addr, uint32_t size, int type)
{
    PCIIDEState *d = DO_UPCAST(PCIIDEState, dev, pci_dev);
    IDEBus *bus;

    if (region_num <= 3) {
        bus = &d->bus[(region_num >> 1)];
        if (region_num & 1) {
            register_ioport_read(addr + 2, 1, 1, ide_status_read, bus);
            register_ioport_write(addr + 2, 1, 1, ide_cmd_write, bus);
        } else {
            register_ioport_write(addr, 8, 1, ide_ioport_write, bus);
            register_ioport_read(addr, 8, 1, ide_ioport_read, bus);

            /* data ports */
            register_ioport_write(addr, 2, 2, ide_data_writew, bus);
            register_ioport_read(addr, 2, 2, ide_data_readw, bus);
            register_ioport_write(addr, 4, 4, ide_data_writel, bus);
            register_ioport_read(addr, 4, 4, ide_data_readl, bus);
        }
    }
}

static uint32_t bmdma_readb(void *opaque, uint32_t addr)
{
    BMDMAState *bm = opaque;
    PCIIDEState *pci_dev;
    uint32_t val;

    switch(addr & 3) {
    case 0:
        val = bm->cmd;
        break;
    case 1:
        pci_dev = bm->pci_dev;
        if (pci_dev->type == IDE_TYPE_CMD646) {
            val = pci_dev->dev.config[MRDMODE];
        } else {
            val = 0xff;
        }
        break;
    case 2:
        val = bm->status;
        break;
    case 3:
        pci_dev = bm->pci_dev;
        if (pci_dev->type == IDE_TYPE_CMD646) {
            if (bm == &pci_dev->bmdma[0])
                val = pci_dev->dev.config[UDIDETCR0];
            else
                val = pci_dev->dev.config[UDIDETCR1];
        } else {
            val = 0xff;
        }
        break;
    default:
        val = 0xff;
        break;
    }
#ifdef DEBUG_IDE
    printf("bmdma: readb 0x%02x : 0x%02x\n", addr, val);
#endif
    return val;
}

static void bmdma_writeb(void *opaque, uint32_t addr, uint32_t val)
{
    BMDMAState *bm = opaque;
    PCIIDEState *pci_dev;
#ifdef DEBUG_IDE
    printf("bmdma: writeb 0x%02x : 0x%02x\n", addr, val);
#endif
    switch(addr & 3) {
    case 1:
        pci_dev = bm->pci_dev;
        if (pci_dev->type == IDE_TYPE_CMD646) {
            pci_dev->dev.config[MRDMODE] =
                (pci_dev->dev.config[MRDMODE] & ~0x30) | (val & 0x30);
            cmd646_update_irq(pci_dev);
        }
        break;
    case 2:
        bm->status = (val & 0x60) | (bm->status & 1) | (bm->status & ~val & 0x06);
        break;
    case 3:
        pci_dev = bm->pci_dev;
        if (pci_dev->type == IDE_TYPE_CMD646) {
            if (bm == &pci_dev->bmdma[0])
                pci_dev->dev.config[UDIDETCR0] = val;
            else
                pci_dev->dev.config[UDIDETCR1] = val;
        }
        break;
    }
}

static void bmdma_map(PCIDevice *pci_dev, int region_num,
                    uint32_t addr, uint32_t size, int type)
{
    PCIIDEState *d = DO_UPCAST(PCIIDEState, dev, pci_dev);
    int i;

    for(i = 0;i < 2; i++) {
        BMDMAState *bm = &d->bmdma[i];
        d->bus[i].bmdma = bm;
        bm->pci_dev = DO_UPCAST(PCIIDEState, dev, pci_dev);
        bm->bus = d->bus+i;
        qemu_add_vm_change_state_handler(ide_dma_restart_cb, bm);

        register_ioport_write(addr, 1, 1, bmdma_cmd_writeb, bm);

        register_ioport_write(addr + 1, 3, 1, bmdma_writeb, bm);
        register_ioport_read(addr, 4, 1, bmdma_readb, bm);

        register_ioport_write(addr + 4, 4, 1, bmdma_addr_writeb, bm);
        register_ioport_read(addr + 4, 4, 1, bmdma_addr_readb, bm);
        register_ioport_write(addr + 4, 4, 2, bmdma_addr_writew, bm);
        register_ioport_read(addr + 4, 4, 2, bmdma_addr_readw, bm);
        register_ioport_write(addr + 4, 4, 4, bmdma_addr_writel, bm);
        register_ioport_read(addr + 4, 4, 4, bmdma_addr_readl, bm);
        addr += 8;
    }
}

/* XXX: call it also when the MRDMODE is changed from the PCI config
   registers */
static void cmd646_update_irq(PCIIDEState *d)
{
    int pci_level;
    pci_level = ((d->dev.config[MRDMODE] & MRDMODE_INTR_CH0) &&
                 !(d->dev.config[MRDMODE] & MRDMODE_BLK_CH0)) ||
        ((d->dev.config[MRDMODE] & MRDMODE_INTR_CH1) &&
         !(d->dev.config[MRDMODE] & MRDMODE_BLK_CH1));
    qemu_set_irq(d->dev.irq[0], pci_level);
}

/* the PCI irq level is the logical OR of the two channels */
static void cmd646_set_irq(void *opaque, int channel, int level)
{
    PCIIDEState *d = opaque;
    int irq_mask;

    irq_mask = MRDMODE_INTR_CH0 << channel;
    if (level)
        d->dev.config[MRDMODE] |= irq_mask;
    else
        d->dev.config[MRDMODE] &= ~irq_mask;
    cmd646_update_irq(d);
}

static void cmd646_reset(void *opaque)
{
    PCIIDEState *d = opaque;
    unsigned int i;

    for (i = 0; i < 2; i++)
        ide_dma_cancel(&d->bmdma[i]);
}

/* CMD646 PCI IDE controller */
static int pci_cmd646_ide_initfn(PCIDevice *dev)
{
    PCIIDEState *d = DO_UPCAST(PCIIDEState, dev, dev);
    uint8_t *pci_conf = d->dev.config;
    qemu_irq *irq;

    d->type = IDE_TYPE_CMD646;
    pci_config_set_vendor_id(pci_conf, PCI_VENDOR_ID_CMD);
    pci_config_set_device_id(pci_conf, PCI_DEVICE_ID_CMD_646);

    pci_conf[0x08] = 0x07; // IDE controller revision
    pci_conf[0x09] = 0x8f;

    pci_config_set_class(pci_conf, PCI_CLASS_STORAGE_IDE);
    pci_conf[PCI_HEADER_TYPE] = PCI_HEADER_TYPE_NORMAL; // header_type

    pci_conf[0x51] = 0x04; // enable IDE0
    if (d->secondary) {
        /* XXX: if not enabled, really disable the seconday IDE controller */
        pci_conf[0x51] |= 0x08; /* enable IDE1 */
    }

    pci_register_bar(dev, 0, 0x8, PCI_ADDRESS_SPACE_IO, ide_map);
    pci_register_bar(dev, 1, 0x4, PCI_ADDRESS_SPACE_IO, ide_map);
    pci_register_bar(dev, 2, 0x8, PCI_ADDRESS_SPACE_IO, ide_map);
    pci_register_bar(dev, 3, 0x4, PCI_ADDRESS_SPACE_IO, ide_map);
    pci_register_bar(dev, 4, 0x10, PCI_ADDRESS_SPACE_IO, bmdma_map);

    pci_conf[0x3d] = 0x01; // interrupt on pin 1

    irq = qemu_allocate_irqs(cmd646_set_irq, d, 2);
    ide_bus_new(&d->bus[0], &d->dev.qdev);
    ide_bus_new(&d->bus[1], &d->dev.qdev);
    ide_init2(&d->bus[0], NULL, NULL, irq[0]);
    ide_init2(&d->bus[1], NULL, NULL, irq[1]);

    register_savevm("ide", 0, 3, pci_ide_save, pci_ide_load, d);
    qemu_register_reset(cmd646_reset, d);
    cmd646_reset(d);
    return 0;
}

void pci_cmd646_ide_init(PCIBus *bus, DriveInfo **hd_table,
                         int secondary_ide_enabled)
{
    PCIDevice *dev;

    dev = pci_create(bus, -1, "CMD646 IDE");
    qdev_prop_set_uint32(&dev->qdev, "secondary", secondary_ide_enabled);
    qdev_init_nofail(&dev->qdev);

    pci_ide_create_devs(dev, hd_table);
}

static PCIDeviceInfo cmd646_ide_info[] = {
    {
        .qdev.name    = "CMD646 IDE",
        .qdev.size    = sizeof(PCIIDEState),
        .init         = pci_cmd646_ide_initfn,
        .qdev.props   = (Property[]) {
            DEFINE_PROP_UINT32("secondary", PCIIDEState, secondary, 0),
            DEFINE_PROP_END_OF_LIST(),
        },
    },{
        /* end of list */
    }
};

static void cmd646_ide_register(void)
{
    pci_qdev_register_many(cmd646_ide_info);
}
device_init(cmd646_ide_register);
Commit	Line	Data
4c3df0ec JQ	1	/*
	2	* QEMU IDE Emulation: PCI cmd646 support.
	3	*
	4	* Copyright (c) 2003 Fabrice Bellard
	5	* Copyright (c) 2006 Openedhand Ltd.
	6	*
	7	* Permission is hereby granted, free of charge, to any person obtaining a copy
	8	* of this software and associated documentation files (the "Software"), to deal
	9	* in the Software without restriction, including without limitation the rights
	10	* to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
	11	* copies of the Software, and to permit persons to whom the Software is
	12	* furnished to do so, subject to the following conditions:
	13	*
	14	* The above copyright notice and this permission notice shall be included in
	15	* all copies or substantial portions of the Software.
	16	*
	17	* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
	18	* IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
	19	* FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
	20	* THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
	21	* LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
	22	* OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
	23	* THE SOFTWARE.
	24	*/
	25	#include <hw/hw.h>
	26	#include <hw/pc.h>
	27	#include <hw/pci.h>
	28	#include <hw/isa.h>
	29	#include "block.h"
	30	#include "block_int.h"
	31	#include "sysemu.h"
	32	#include "dma.h"
	33
	34	#include <hw/ide/pci.h>
	35
	36	/* CMD646 specific */
	37	#define MRDMODE 0x71
	38	#define MRDMODE_INTR_CH0 0x04
	39	#define MRDMODE_INTR_CH1 0x08
	40	#define MRDMODE_BLK_CH0 0x10
	41	#define MRDMODE_BLK_CH1 0x20
	42	#define UDIDETCR0 0x73
	43	#define UDIDETCR1 0x7B
	44
	45	static void cmd646_update_irq(PCIIDEState *d);
	46
	47	static void ide_map(PCIDevice *pci_dev, int region_num,
	48	uint32_t addr, uint32_t size, int type)
	49	{
	50	PCIIDEState *d = DO_UPCAST(PCIIDEState, dev, pci_dev);
	51	IDEBus *bus;
	52
	53	if (region_num <= 3) {
	54	bus = &d->bus[(region_num >> 1)];
	55	if (region_num & 1) {
	56	register_ioport_read(addr + 2, 1, 1, ide_status_read, bus);
	57	register_ioport_write(addr + 2, 1, 1, ide_cmd_write, bus);
	58	} else {
	59	register_ioport_write(addr, 8, 1, ide_ioport_write, bus);
	60	register_ioport_read(addr, 8, 1, ide_ioport_read, bus);
	61
	62	/* data ports */
	63	register_ioport_write(addr, 2, 2, ide_data_writew, bus);
	64	register_ioport_read(addr, 2, 2, ide_data_readw, bus);
65	register_ioport_write(addr, 4, 4, ide_data_writel, bus);
66	register_ioport_read(addr, 4, 4, ide_data_readl, bus);
67	}
68	}
69	}
70
71	static uint32_t bmdma_readb(void *opaque, uint32_t addr)
72	{
73	BMDMAState *bm = opaque;
74	PCIIDEState *pci_dev;
75	uint32_t val;
76
77	switch(addr & 3) {
78	case 0:
79	val = bm->cmd;
80	break;
81	case 1:
82	pci_dev = bm->pci_dev;
83	if (pci_dev->type == IDE_TYPE_CMD646) {
84	val = pci_dev->dev.config[MRDMODE];
85	} else {
86	val = 0xff;
87	}
88	break;
89	case 2:
90	val = bm->status;
91	break;
92	case 3:
93	pci_dev = bm->pci_dev;
94	if (pci_dev->type == IDE_TYPE_CMD646) {
95	if (bm == &pci_dev->bmdma[0])
96	val = pci_dev->dev.config[UDIDETCR0];
97	else
98	val = pci_dev->dev.config[UDIDETCR1];
99	} else {
100	val = 0xff;
101	}
102	break;
103	default:
104	val = 0xff;
105	break;
106	}
107	#ifdef DEBUG_IDE
108	printf("bmdma: readb 0x%02x : 0x%02x\n", addr, val);
109	#endif
110	return val;
111	}
112
113	static void bmdma_writeb(void *opaque, uint32_t addr, uint32_t val)
114	{
115	BMDMAState *bm = opaque;
116	PCIIDEState *pci_dev;
117	#ifdef DEBUG_IDE
118	printf("bmdma: writeb 0x%02x : 0x%02x\n", addr, val);
119	#endif
120	switch(addr & 3) {
121	case 1:
122	pci_dev = bm->pci_dev;
123	if (pci_dev->type == IDE_TYPE_CMD646) {
124	pci_dev->dev.config[MRDMODE] =
125	(pci_dev->dev.config[MRDMODE] & ~0x30) \| (val & 0x30);
126	cmd646_update_irq(pci_dev);
127	}
128	break;
129	case 2:
130	bm->status = (val & 0x60) \| (bm->status & 1) \| (bm->status & ~val & 0x06);
131	break;
132	case 3:
133	pci_dev = bm->pci_dev;
134	if (pci_dev->type == IDE_TYPE_CMD646) {
135	if (bm == &pci_dev->bmdma[0])
136	pci_dev->dev.config[UDIDETCR0] = val;
137	else
138	pci_dev->dev.config[UDIDETCR1] = val;
139	}
140	break;
141	}
142	}
143
144	static void bmdma_map(PCIDevice *pci_dev, int region_num,
145	uint32_t addr, uint32_t size, int type)
146	{
147	PCIIDEState *d = DO_UPCAST(PCIIDEState, dev, pci_dev);
148	int i;
149
150	for(i = 0;i < 2; i++) {
151	BMDMAState *bm = &d->bmdma[i];
152	d->bus[i].bmdma = bm;
153	bm->pci_dev = DO_UPCAST(PCIIDEState, dev, pci_dev);
154	bm->bus = d->bus+i;
155	qemu_add_vm_change_state_handler(ide_dma_restart_cb, bm);
156
157	register_ioport_write(addr, 1, 1, bmdma_cmd_writeb, bm);
158
159	register_ioport_write(addr + 1, 3, 1, bmdma_writeb, bm);
160	register_ioport_read(addr, 4, 1, bmdma_readb, bm);
161
162	register_ioport_write(addr + 4, 4, 1, bmdma_addr_writeb, bm);
163	register_ioport_read(addr + 4, 4, 1, bmdma_addr_readb, bm);
164	register_ioport_write(addr + 4, 4, 2, bmdma_addr_writew, bm);
165	register_ioport_read(addr + 4, 4, 2, bmdma_addr_readw, bm);
166	register_ioport_write(addr + 4, 4, 4, bmdma_addr_writel, bm);
167	register_ioport_read(addr + 4, 4, 4, bmdma_addr_readl, bm);
168	addr += 8;
169	}
170	}
171
172	/* XXX: call it also when the MRDMODE is changed from the PCI config
173	registers */
174	static void cmd646_update_irq(PCIIDEState *d)
175	{
176	int pci_level;
177	pci_level = ((d->dev.config[MRDMODE] & MRDMODE_INTR_CH0) &&
178	!(d->dev.config[MRDMODE] & MRDMODE_BLK_CH0)) \|\|
179	((d->dev.config[MRDMODE] & MRDMODE_INTR_CH1) &&
180	!(d->dev.config[MRDMODE] & MRDMODE_BLK_CH1));
181	qemu_set_irq(d->dev.irq[0], pci_level);
182	}
183
184	/* the PCI irq level is the logical OR of the two channels */
185	static void cmd646_set_irq(void *opaque, int channel, int level)
186	{
187	PCIIDEState *d = opaque;
188	int irq_mask;
189
190	irq_mask = MRDMODE_INTR_CH0 << channel;
191	if (level)
192	d->dev.config[MRDMODE] \|= irq_mask;
193	else
194	d->dev.config[MRDMODE] &= ~irq_mask;
195	cmd646_update_irq(d);
196	}
197
198	static void cmd646_reset(void *opaque)
199	{
200	PCIIDEState *d = opaque;
201	unsigned int i;
202
203	for (i = 0; i < 2; i++)
204	ide_dma_cancel(&d->bmdma[i]);
205	}
206
207	/* CMD646 PCI IDE controller */
208	static int pci_cmd646_ide_initfn(PCIDevice *dev)
209	{
210	PCIIDEState *d = DO_UPCAST(PCIIDEState, dev, dev);
211	uint8_t *pci_conf = d->dev.config;
212	qemu_irq *irq;
213
214	d->type = IDE_TYPE_CMD646;
215	pci_config_set_vendor_id(pci_conf, PCI_VENDOR_ID_CMD);
216	pci_config_set_device_id(pci_conf, PCI_DEVICE_ID_CMD_646);
217
218	pci_conf[0x08] = 0x07; // IDE controller revision
219	pci_conf[0x09] = 0x8f;
220
221	pci_config_set_class(pci_conf, PCI_CLASS_STORAGE_IDE);
222	pci_conf[PCI_HEADER_TYPE] = PCI_HEADER_TYPE_NORMAL; // header_type
223
224	pci_conf[0x51] = 0x04; // enable IDE0
225	if (d->secondary) {
226	/* XXX: if not enabled, really disable the seconday IDE controller */
227	pci_conf[0x51] \|= 0x08; /* enable IDE1 */
228	}
229
230	pci_register_bar(dev, 0, 0x8, PCI_ADDRESS_SPACE_IO, ide_map);
231	pci_register_bar(dev, 1, 0x4, PCI_ADDRESS_SPACE_IO, ide_map);
232	pci_register_bar(dev, 2, 0x8, PCI_ADDRESS_SPACE_IO, ide_map);
233	pci_register_bar(dev, 3, 0x4, PCI_ADDRESS_SPACE_IO, ide_map);
234	pci_register_bar(dev, 4, 0x10, PCI_ADDRESS_SPACE_IO, bmdma_map);
235
236	pci_conf[0x3d] = 0x01; // interrupt on pin 1
237
238	irq = qemu_allocate_irqs(cmd646_set_irq, d, 2);
239	ide_bus_new(&d->bus[0], &d->dev.qdev);
240	ide_bus_new(&d->bus[1], &d->dev.qdev);
241	ide_init2(&d->bus[0], NULL, NULL, irq[0]);
242	ide_init2(&d->bus[1], NULL, NULL, irq[1]);
243
244	register_savevm("ide", 0, 3, pci_ide_save, pci_ide_load, d);
245	qemu_register_reset(cmd646_reset, d);
246	cmd646_reset(d);
247	return 0;
248	}
249
250	void pci_cmd646_ide_init(PCIBus bus, DriveInfo *hd_table,
251	int secondary_ide_enabled)
252	{
253	PCIDevice *dev;
254
255	dev = pci_create(bus, -1, "CMD646 IDE");
256	qdev_prop_set_uint32(&dev->qdev, "secondary", secondary_ide_enabled);
257	qdev_init_nofail(&dev->qdev);
258
259	pci_ide_create_devs(dev, hd_table);
260	}
261
262	static PCIDeviceInfo cmd646_ide_info[] = {
263	{
264	.qdev.name = "CMD646 IDE",
265	.qdev.size = sizeof(PCIIDEState),
266	.init = pci_cmd646_ide_initfn,
267	.qdev.props = (Property[]) {
268	DEFINE_PROP_UINT32("secondary", PCIIDEState, secondary, 0),
269	DEFINE_PROP_END_OF_LIST(),
270	},
271	},{
272	/* end of list */
273	}
274	};
275
276	static void cmd646_ide_register(void)
277	{
278	pci_qdev_register_many(cmd646_ide_info);
279	}
280	device_init(cmd646_ide_register);