xref: /qemu/hw/pci-host/uninorth.c (revision 9a7dcb711bdaf4082bf333dbecfeb729bbff1f8e)
1 /*
2  * QEMU Uninorth PCI host (for all Mac99 and newer machines)
3  *
4  * Copyright (c) 2006 Fabrice Bellard
5  *
6  * Permission is hereby granted, free of charge, to any person obtaining a copy
7  * of this software and associated documentation files (the "Software"), to deal
8  * in the Software without restriction, including without limitation the rights
9  * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
10  * copies of the Software, and to permit persons to whom the Software is
11  * furnished to do so, subject to the following conditions:
12  *
13  * The above copyright notice and this permission notice shall be included in
14  * all copies or substantial portions of the Software.
15  *
16  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
19  * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20  * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
21  * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
22  * THE SOFTWARE.
23  */
24 #include "hw/hw.h"
25 #include "hw/ppc/mac.h"
26 #include "hw/pci/pci.h"
27 #include "hw/pci/pci_host.h"
28 
29 /* debug UniNorth */
30 //#define DEBUG_UNIN
31 
32 #ifdef DEBUG_UNIN
33 #define UNIN_DPRINTF(fmt, ...)                                  \
34     do { printf("UNIN: " fmt , ## __VA_ARGS__); } while (0)
35 #else
36 #define UNIN_DPRINTF(fmt, ...)
37 #endif
38 
39 static const int unin_irq_line[] = { 0x1b, 0x1c, 0x1d, 0x1e };
40 
41 #define TYPE_UNI_NORTH_PCI_HOST_BRIDGE "uni-north-pci-pcihost"
42 #define TYPE_UNI_NORTH_AGP_HOST_BRIDGE "uni-north-agp-pcihost"
43 #define TYPE_UNI_NORTH_INTERNAL_PCI_HOST_BRIDGE "uni-north-internal-pci-pcihost"
44 #define TYPE_U3_AGP_HOST_BRIDGE "u3-agp-pcihost"
45 
46 #define UNI_NORTH_PCI_HOST_BRIDGE(obj) \
47     OBJECT_CHECK(UNINState, (obj), TYPE_UNI_NORTH_PCI_HOST_BRIDGE)
48 #define UNI_NORTH_AGP_HOST_BRIDGE(obj) \
49     OBJECT_CHECK(UNINState, (obj), TYPE_UNI_NORTH_AGP_HOST_BRIDGE)
50 #define UNI_NORTH_INTERNAL_PCI_HOST_BRIDGE(obj) \
51     OBJECT_CHECK(UNINState, (obj), TYPE_UNI_NORTH_INTERNAL_PCI_HOST_BRIDGE)
52 #define U3_AGP_HOST_BRIDGE(obj) \
53     OBJECT_CHECK(UNINState, (obj), TYPE_U3_AGP_HOST_BRIDGE)
54 
55 typedef struct UNINState {
56     PCIHostState parent_obj;
57 
58     MemoryRegion pci_mmio;
59     MemoryRegion pci_hole;
60 } UNINState;
61 
62 static int pci_unin_map_irq(PCIDevice *pci_dev, int irq_num)
63 {
64     int retval;
65     int devfn = pci_dev->devfn & 0x00FFFFFF;
66 
67     retval = (((devfn >> 11) & 0x1F) + irq_num) & 3;
68 
69     return retval;
70 }
71 
72 static void pci_unin_set_irq(void *opaque, int irq_num, int level)
73 {
74     qemu_irq *pic = opaque;
75 
76     UNIN_DPRINTF("%s: setting INT %d = %d\n", __func__,
77                  unin_irq_line[irq_num], level);
78     qemu_set_irq(pic[unin_irq_line[irq_num]], level);
79 }
80 
81 static uint32_t unin_get_config_reg(uint32_t reg, uint32_t addr)
82 {
83     uint32_t retval;
84 
85     if (reg & (1u << 31)) {
86         /* XXX OpenBIOS compatibility hack */
87         retval = reg | (addr & 3);
88     } else if (reg & 1) {
89         /* CFA1 style */
90         retval = (reg & ~7u) | (addr & 7);
91     } else {
92         uint32_t slot, func;
93 
94         /* Grab CFA0 style values */
95         slot = ffs(reg & 0xfffff800) - 1;
96         func = (reg >> 8) & 7;
97 
98         /* ... and then convert them to x86 format */
99         /* config pointer */
100         retval = (reg & (0xff - 7)) | (addr & 7);
101         /* slot */
102         retval |= slot << 11;
103         /* fn */
104         retval |= func << 8;
105     }
106 
107 
108     UNIN_DPRINTF("Converted config space accessor %08x/%08x -> %08x\n",
109                  reg, addr, retval);
110 
111     return retval;
112 }
113 
114 static void unin_data_write(void *opaque, hwaddr addr,
115                             uint64_t val, unsigned len)
116 {
117     UNINState *s = opaque;
118     PCIHostState *phb = PCI_HOST_BRIDGE(s);
119     UNIN_DPRINTF("write addr %" TARGET_FMT_plx " len %d val %"PRIx64"\n",
120                  addr, len, val);
121     pci_data_write(phb->bus,
122                    unin_get_config_reg(phb->config_reg, addr),
123                    val, len);
124 }
125 
126 static uint64_t unin_data_read(void *opaque, hwaddr addr,
127                                unsigned len)
128 {
129     UNINState *s = opaque;
130     PCIHostState *phb = PCI_HOST_BRIDGE(s);
131     uint32_t val;
132 
133     val = pci_data_read(phb->bus,
134                         unin_get_config_reg(phb->config_reg, addr),
135                         len);
136     UNIN_DPRINTF("read addr %" TARGET_FMT_plx " len %d val %x\n",
137                  addr, len, val);
138     return val;
139 }
140 
141 static const MemoryRegionOps unin_data_ops = {
142     .read = unin_data_read,
143     .write = unin_data_write,
144     .endianness = DEVICE_LITTLE_ENDIAN,
145 };
146 
147 static int pci_unin_main_init_device(SysBusDevice *dev)
148 {
149     PCIHostState *h;
150 
151     /* Use values found on a real PowerMac */
152     /* Uninorth main bus */
153     h = PCI_HOST_BRIDGE(dev);
154 
155     memory_region_init_io(&h->conf_mem, OBJECT(h), &pci_host_conf_le_ops,
156                           dev, "pci-conf-idx", 0x1000);
157     memory_region_init_io(&h->data_mem, OBJECT(h), &unin_data_ops, dev,
158                           "pci-conf-data", 0x1000);
159     sysbus_init_mmio(dev, &h->conf_mem);
160     sysbus_init_mmio(dev, &h->data_mem);
161 
162     return 0;
163 }
164 
165 
166 static int pci_u3_agp_init_device(SysBusDevice *dev)
167 {
168     PCIHostState *h;
169 
170     /* Uninorth U3 AGP bus */
171     h = PCI_HOST_BRIDGE(dev);
172 
173     memory_region_init_io(&h->conf_mem, OBJECT(h), &pci_host_conf_le_ops,
174                           dev, "pci-conf-idx", 0x1000);
175     memory_region_init_io(&h->data_mem, OBJECT(h), &unin_data_ops, dev,
176                           "pci-conf-data", 0x1000);
177     sysbus_init_mmio(dev, &h->conf_mem);
178     sysbus_init_mmio(dev, &h->data_mem);
179 
180     return 0;
181 }
182 
183 static int pci_unin_agp_init_device(SysBusDevice *dev)
184 {
185     PCIHostState *h;
186 
187     /* Uninorth AGP bus */
188     h = PCI_HOST_BRIDGE(dev);
189 
190     memory_region_init_io(&h->conf_mem, OBJECT(h), &pci_host_conf_le_ops,
191                           dev, "pci-conf-idx", 0x1000);
192     memory_region_init_io(&h->data_mem, OBJECT(h), &pci_host_data_le_ops,
193                           dev, "pci-conf-data", 0x1000);
194     sysbus_init_mmio(dev, &h->conf_mem);
195     sysbus_init_mmio(dev, &h->data_mem);
196     return 0;
197 }
198 
199 static int pci_unin_internal_init_device(SysBusDevice *dev)
200 {
201     PCIHostState *h;
202 
203     /* Uninorth internal bus */
204     h = PCI_HOST_BRIDGE(dev);
205 
206     memory_region_init_io(&h->conf_mem, OBJECT(h), &pci_host_conf_le_ops,
207                           dev, "pci-conf-idx", 0x1000);
208     memory_region_init_io(&h->data_mem, OBJECT(h), &pci_host_data_le_ops,
209                           dev, "pci-conf-data", 0x1000);
210     sysbus_init_mmio(dev, &h->conf_mem);
211     sysbus_init_mmio(dev, &h->data_mem);
212     return 0;
213 }
214 
215 PCIBus *pci_pmac_init(qemu_irq *pic,
216                       MemoryRegion *address_space_mem,
217                       MemoryRegion *address_space_io)
218 {
219     DeviceState *dev;
220     SysBusDevice *s;
221     PCIHostState *h;
222     UNINState *d;
223 
224     /* Use values found on a real PowerMac */
225     /* Uninorth main bus */
226     dev = qdev_create(NULL, TYPE_UNI_NORTH_PCI_HOST_BRIDGE);
227     qdev_init_nofail(dev);
228     s = SYS_BUS_DEVICE(dev);
229     h = PCI_HOST_BRIDGE(s);
230     d = UNI_NORTH_PCI_HOST_BRIDGE(dev);
231     memory_region_init(&d->pci_mmio, OBJECT(d), "pci-mmio", 0x100000000ULL);
232     memory_region_init_alias(&d->pci_hole, OBJECT(d), "pci-hole", &d->pci_mmio,
233                              0x80000000ULL, 0x10000000ULL);
234     memory_region_add_subregion(address_space_mem, 0x80000000ULL,
235                                 &d->pci_hole);
236 
237     h->bus = pci_register_bus(dev, NULL,
238                               pci_unin_set_irq, pci_unin_map_irq,
239                               pic,
240                               &d->pci_mmio,
241                               address_space_io,
242                               PCI_DEVFN(11, 0), 4, TYPE_PCI_BUS);
243 
244 #if 0
245     pci_create_simple(h->bus, PCI_DEVFN(11, 0), "uni-north");
246 #endif
247 
248     sysbus_mmio_map(s, 0, 0xf2800000);
249     sysbus_mmio_map(s, 1, 0xf2c00000);
250 
251     /* DEC 21154 bridge */
252 #if 0
253     /* XXX: not activated as PPC BIOS doesn't handle multiple buses properly */
254     pci_create_simple(h->bus, PCI_DEVFN(12, 0), "dec-21154");
255 #endif
256 
257     /* Uninorth AGP bus */
258     pci_create_simple(h->bus, PCI_DEVFN(11, 0), "uni-north-agp");
259     dev = qdev_create(NULL, TYPE_UNI_NORTH_AGP_HOST_BRIDGE);
260     qdev_init_nofail(dev);
261     s = SYS_BUS_DEVICE(dev);
262     sysbus_mmio_map(s, 0, 0xf0800000);
263     sysbus_mmio_map(s, 1, 0xf0c00000);
264 
265     /* Uninorth internal bus */
266 #if 0
267     /* XXX: not needed for now */
268     pci_create_simple(h->bus, PCI_DEVFN(14, 0),
269                       "uni-north-internal-pci");
270     dev = qdev_create(NULL, TYPE_UNI_NORTH_INTERNAL_PCI_HOST_BRIDGE);
271     qdev_init_nofail(dev);
272     s = SYS_BUS_DEVICE(dev);
273     sysbus_mmio_map(s, 0, 0xf4800000);
274     sysbus_mmio_map(s, 1, 0xf4c00000);
275 #endif
276 
277     return h->bus;
278 }
279 
280 PCIBus *pci_pmac_u3_init(qemu_irq *pic,
281                          MemoryRegion *address_space_mem,
282                          MemoryRegion *address_space_io)
283 {
284     DeviceState *dev;
285     SysBusDevice *s;
286     PCIHostState *h;
287     UNINState *d;
288 
289     /* Uninorth AGP bus */
290 
291     dev = qdev_create(NULL, TYPE_U3_AGP_HOST_BRIDGE);
292     qdev_init_nofail(dev);
293     s = SYS_BUS_DEVICE(dev);
294     h = PCI_HOST_BRIDGE(dev);
295     d = U3_AGP_HOST_BRIDGE(dev);
296 
297     memory_region_init(&d->pci_mmio, OBJECT(d), "pci-mmio", 0x100000000ULL);
298     memory_region_init_alias(&d->pci_hole, OBJECT(d), "pci-hole", &d->pci_mmio,
299                              0x80000000ULL, 0x70000000ULL);
300     memory_region_add_subregion(address_space_mem, 0x80000000ULL,
301                                 &d->pci_hole);
302 
303     h->bus = pci_register_bus(dev, NULL,
304                               pci_unin_set_irq, pci_unin_map_irq,
305                               pic,
306                               &d->pci_mmio,
307                               address_space_io,
308                               PCI_DEVFN(11, 0), 4, TYPE_PCI_BUS);
309 
310     sysbus_mmio_map(s, 0, 0xf0800000);
311     sysbus_mmio_map(s, 1, 0xf0c00000);
312 
313     pci_create_simple(h->bus, 11 << 3, "u3-agp");
314 
315     return h->bus;
316 }
317 
318 static void unin_main_pci_host_realize(PCIDevice *d, Error **errp)
319 {
320     d->config[0x0C] = 0x08; // cache_line_size
321     d->config[0x0D] = 0x10; // latency_timer
322     d->config[0x34] = 0x00; // capabilities_pointer
323 }
324 
325 static void unin_agp_pci_host_realize(PCIDevice *d, Error **errp)
326 {
327     d->config[0x0C] = 0x08; // cache_line_size
328     d->config[0x0D] = 0x10; // latency_timer
329     //    d->config[0x34] = 0x80; // capabilities_pointer
330 }
331 
332 static void u3_agp_pci_host_realize(PCIDevice *d, Error **errp)
333 {
334     /* cache line size */
335     d->config[0x0C] = 0x08;
336     /* latency timer */
337     d->config[0x0D] = 0x10;
338 }
339 
340 static void unin_internal_pci_host_realize(PCIDevice *d, Error **errp)
341 {
342     d->config[0x0C] = 0x08; // cache_line_size
343     d->config[0x0D] = 0x10; // latency_timer
344     d->config[0x34] = 0x00; // capabilities_pointer
345 }
346 
347 static void unin_main_pci_host_class_init(ObjectClass *klass, void *data)
348 {
349     PCIDeviceClass *k = PCI_DEVICE_CLASS(klass);
350     DeviceClass *dc = DEVICE_CLASS(klass);
351 
352     k->realize   = unin_main_pci_host_realize;
353     k->vendor_id = PCI_VENDOR_ID_APPLE;
354     k->device_id = PCI_DEVICE_ID_APPLE_UNI_N_PCI;
355     k->revision  = 0x00;
356     k->class_id  = PCI_CLASS_BRIDGE_HOST;
357     /*
358      * PCI-facing part of the host bridge, not usable without the
359      * host-facing part, which can't be device_add'ed, yet.
360      */
361     dc->cannot_instantiate_with_device_add_yet = true;
362 }
363 
364 static const TypeInfo unin_main_pci_host_info = {
365     .name = "uni-north-pci",
366     .parent = TYPE_PCI_DEVICE,
367     .instance_size = sizeof(PCIDevice),
368     .class_init = unin_main_pci_host_class_init,
369 };
370 
371 static void u3_agp_pci_host_class_init(ObjectClass *klass, void *data)
372 {
373     PCIDeviceClass *k = PCI_DEVICE_CLASS(klass);
374     DeviceClass *dc = DEVICE_CLASS(klass);
375 
376     k->realize   = u3_agp_pci_host_realize;
377     k->vendor_id = PCI_VENDOR_ID_APPLE;
378     k->device_id = PCI_DEVICE_ID_APPLE_U3_AGP;
379     k->revision  = 0x00;
380     k->class_id  = PCI_CLASS_BRIDGE_HOST;
381     /*
382      * PCI-facing part of the host bridge, not usable without the
383      * host-facing part, which can't be device_add'ed, yet.
384      */
385     dc->cannot_instantiate_with_device_add_yet = true;
386 }
387 
388 static const TypeInfo u3_agp_pci_host_info = {
389     .name = "u3-agp",
390     .parent = TYPE_PCI_DEVICE,
391     .instance_size = sizeof(PCIDevice),
392     .class_init = u3_agp_pci_host_class_init,
393 };
394 
395 static void unin_agp_pci_host_class_init(ObjectClass *klass, void *data)
396 {
397     PCIDeviceClass *k = PCI_DEVICE_CLASS(klass);
398     DeviceClass *dc = DEVICE_CLASS(klass);
399 
400     k->realize   = unin_agp_pci_host_realize;
401     k->vendor_id = PCI_VENDOR_ID_APPLE;
402     k->device_id = PCI_DEVICE_ID_APPLE_UNI_N_AGP;
403     k->revision  = 0x00;
404     k->class_id  = PCI_CLASS_BRIDGE_HOST;
405     /*
406      * PCI-facing part of the host bridge, not usable without the
407      * host-facing part, which can't be device_add'ed, yet.
408      */
409     dc->cannot_instantiate_with_device_add_yet = true;
410 }
411 
412 static const TypeInfo unin_agp_pci_host_info = {
413     .name = "uni-north-agp",
414     .parent = TYPE_PCI_DEVICE,
415     .instance_size = sizeof(PCIDevice),
416     .class_init = unin_agp_pci_host_class_init,
417 };
418 
419 static void unin_internal_pci_host_class_init(ObjectClass *klass, void *data)
420 {
421     PCIDeviceClass *k = PCI_DEVICE_CLASS(klass);
422     DeviceClass *dc = DEVICE_CLASS(klass);
423 
424     k->realize   = unin_internal_pci_host_realize;
425     k->vendor_id = PCI_VENDOR_ID_APPLE;
426     k->device_id = PCI_DEVICE_ID_APPLE_UNI_N_I_PCI;
427     k->revision  = 0x00;
428     k->class_id  = PCI_CLASS_BRIDGE_HOST;
429     /*
430      * PCI-facing part of the host bridge, not usable without the
431      * host-facing part, which can't be device_add'ed, yet.
432      */
433     dc->cannot_instantiate_with_device_add_yet = true;
434 }
435 
436 static const TypeInfo unin_internal_pci_host_info = {
437     .name = "uni-north-internal-pci",
438     .parent = TYPE_PCI_DEVICE,
439     .instance_size = sizeof(PCIDevice),
440     .class_init = unin_internal_pci_host_class_init,
441 };
442 
443 static void pci_unin_main_class_init(ObjectClass *klass, void *data)
444 {
445     SysBusDeviceClass *sbc = SYS_BUS_DEVICE_CLASS(klass);
446 
447     sbc->init = pci_unin_main_init_device;
448 }
449 
450 static const TypeInfo pci_unin_main_info = {
451     .name          = TYPE_UNI_NORTH_PCI_HOST_BRIDGE,
452     .parent        = TYPE_PCI_HOST_BRIDGE,
453     .instance_size = sizeof(UNINState),
454     .class_init    = pci_unin_main_class_init,
455 };
456 
457 static void pci_u3_agp_class_init(ObjectClass *klass, void *data)
458 {
459     SysBusDeviceClass *sbc = SYS_BUS_DEVICE_CLASS(klass);
460 
461     sbc->init = pci_u3_agp_init_device;
462 }
463 
464 static const TypeInfo pci_u3_agp_info = {
465     .name          = TYPE_U3_AGP_HOST_BRIDGE,
466     .parent        = TYPE_PCI_HOST_BRIDGE,
467     .instance_size = sizeof(UNINState),
468     .class_init    = pci_u3_agp_class_init,
469 };
470 
471 static void pci_unin_agp_class_init(ObjectClass *klass, void *data)
472 {
473     SysBusDeviceClass *sbc = SYS_BUS_DEVICE_CLASS(klass);
474 
475     sbc->init = pci_unin_agp_init_device;
476 }
477 
478 static const TypeInfo pci_unin_agp_info = {
479     .name          = TYPE_UNI_NORTH_AGP_HOST_BRIDGE,
480     .parent        = TYPE_PCI_HOST_BRIDGE,
481     .instance_size = sizeof(UNINState),
482     .class_init    = pci_unin_agp_class_init,
483 };
484 
485 static void pci_unin_internal_class_init(ObjectClass *klass, void *data)
486 {
487     SysBusDeviceClass *sbc = SYS_BUS_DEVICE_CLASS(klass);
488 
489     sbc->init = pci_unin_internal_init_device;
490 }
491 
492 static const TypeInfo pci_unin_internal_info = {
493     .name          = TYPE_UNI_NORTH_INTERNAL_PCI_HOST_BRIDGE,
494     .parent        = TYPE_PCI_HOST_BRIDGE,
495     .instance_size = sizeof(UNINState),
496     .class_init    = pci_unin_internal_class_init,
497 };
498 
499 static void unin_register_types(void)
500 {
501     type_register_static(&unin_main_pci_host_info);
502     type_register_static(&u3_agp_pci_host_info);
503     type_register_static(&unin_agp_pci_host_info);
504     type_register_static(&unin_internal_pci_host_info);
505 
506     type_register_static(&pci_unin_main_info);
507     type_register_static(&pci_u3_agp_info);
508     type_register_static(&pci_unin_agp_info);
509     type_register_static(&pci_unin_internal_info);
510 }
511 
512 type_init(unin_register_types)
513