1fa2ba3b8SLaurent Vivier /*
2fa2ba3b8SLaurent Vivier * QEMU Macintosh Nubus
3fa2ba3b8SLaurent Vivier *
4fa2ba3b8SLaurent Vivier * Copyright (c) 2013-2018 Laurent Vivier <laurent@vivier.eu>
5fa2ba3b8SLaurent Vivier *
6fa2ba3b8SLaurent Vivier * This work is licensed under the terms of the GNU GPL, version 2 or later.
7fa2ba3b8SLaurent Vivier * See the COPYING file in the top-level directory.
8fa2ba3b8SLaurent Vivier *
9fa2ba3b8SLaurent Vivier */
10fa2ba3b8SLaurent Vivier
115d1fa7e4SMark Cave-Ayland /*
125d1fa7e4SMark Cave-Ayland * References:
135d1fa7e4SMark Cave-Ayland * Nubus Specification (TI)
145d1fa7e4SMark Cave-Ayland * http://www.bitsavers.org/pdf/ti/nubus/2242825-0001_NuBus_Spec1983.pdf
155d1fa7e4SMark Cave-Ayland *
165d1fa7e4SMark Cave-Ayland * Designing Cards and Drivers for the Macintosh Family (Apple)
175d1fa7e4SMark Cave-Ayland */
185d1fa7e4SMark Cave-Ayland
19fa2ba3b8SLaurent Vivier #include "qemu/osdep.h"
20fa2ba3b8SLaurent Vivier #include "hw/nubus/nubus.h"
21fa2ba3b8SLaurent Vivier #include "qapi/error.h"
22ce0e6a2cSMark Cave-Ayland #include "trace.h"
23fa2ba3b8SLaurent Vivier
24fa2ba3b8SLaurent Vivier
nubus_find(void)25fa2ba3b8SLaurent Vivier static NubusBus *nubus_find(void)
26fa2ba3b8SLaurent Vivier {
27fa2ba3b8SLaurent Vivier /* Returns NULL unless there is exactly one nubus device */
28fa2ba3b8SLaurent Vivier return NUBUS_BUS(object_resolve_path_type("", TYPE_NUBUS_BUS, NULL));
29fa2ba3b8SLaurent Vivier }
30fa2ba3b8SLaurent Vivier
nubus_slot_write(void * opaque,hwaddr addr,uint64_t val,unsigned size,MemTxAttrs attrs)311d3d62dfSMark Cave-Ayland static MemTxResult nubus_slot_write(void *opaque, hwaddr addr, uint64_t val,
321d3d62dfSMark Cave-Ayland unsigned size, MemTxAttrs attrs)
33fa2ba3b8SLaurent Vivier {
34ce0e6a2cSMark Cave-Ayland trace_nubus_slot_write(addr, val, size);
351d3d62dfSMark Cave-Ayland return MEMTX_DECODE_ERROR;
36fa2ba3b8SLaurent Vivier }
37fa2ba3b8SLaurent Vivier
nubus_slot_read(void * opaque,hwaddr addr,uint64_t * data,unsigned size,MemTxAttrs attrs)381d3d62dfSMark Cave-Ayland static MemTxResult nubus_slot_read(void *opaque, hwaddr addr, uint64_t *data,
391d3d62dfSMark Cave-Ayland unsigned size, MemTxAttrs attrs)
40fa2ba3b8SLaurent Vivier {
41ce0e6a2cSMark Cave-Ayland trace_nubus_slot_read(addr, size);
421d3d62dfSMark Cave-Ayland return MEMTX_DECODE_ERROR;
43fa2ba3b8SLaurent Vivier }
44fa2ba3b8SLaurent Vivier
45fa2ba3b8SLaurent Vivier static const MemoryRegionOps nubus_slot_ops = {
461d3d62dfSMark Cave-Ayland .read_with_attrs = nubus_slot_read,
471d3d62dfSMark Cave-Ayland .write_with_attrs = nubus_slot_write,
48fa2ba3b8SLaurent Vivier .endianness = DEVICE_BIG_ENDIAN,
49fa2ba3b8SLaurent Vivier .valid = {
50fa2ba3b8SLaurent Vivier .min_access_size = 1,
51ce0e6a2cSMark Cave-Ayland .max_access_size = 4,
52fa2ba3b8SLaurent Vivier },
53fa2ba3b8SLaurent Vivier };
54fa2ba3b8SLaurent Vivier
nubus_super_slot_write(void * opaque,hwaddr addr,uint64_t val,unsigned size,MemTxAttrs attrs)551d3d62dfSMark Cave-Ayland static MemTxResult nubus_super_slot_write(void *opaque, hwaddr addr,
561d3d62dfSMark Cave-Ayland uint64_t val, unsigned size,
571d3d62dfSMark Cave-Ayland MemTxAttrs attrs)
58fa2ba3b8SLaurent Vivier {
59ce0e6a2cSMark Cave-Ayland trace_nubus_super_slot_write(addr, val, size);
601d3d62dfSMark Cave-Ayland return MEMTX_DECODE_ERROR;
61fa2ba3b8SLaurent Vivier }
62fa2ba3b8SLaurent Vivier
nubus_super_slot_read(void * opaque,hwaddr addr,uint64_t * data,unsigned size,MemTxAttrs attrs)631d3d62dfSMark Cave-Ayland static MemTxResult nubus_super_slot_read(void *opaque, hwaddr addr,
641d3d62dfSMark Cave-Ayland uint64_t *data, unsigned size,
651d3d62dfSMark Cave-Ayland MemTxAttrs attrs)
66fa2ba3b8SLaurent Vivier {
67ce0e6a2cSMark Cave-Ayland trace_nubus_super_slot_read(addr, size);
681d3d62dfSMark Cave-Ayland return MEMTX_DECODE_ERROR;
69fa2ba3b8SLaurent Vivier }
70fa2ba3b8SLaurent Vivier
71fa2ba3b8SLaurent Vivier static const MemoryRegionOps nubus_super_slot_ops = {
721d3d62dfSMark Cave-Ayland .read_with_attrs = nubus_super_slot_read,
731d3d62dfSMark Cave-Ayland .write_with_attrs = nubus_super_slot_write,
74fa2ba3b8SLaurent Vivier .endianness = DEVICE_BIG_ENDIAN,
75fa2ba3b8SLaurent Vivier .valid = {
76fa2ba3b8SLaurent Vivier .min_access_size = 1,
77ce0e6a2cSMark Cave-Ayland .max_access_size = 4,
78fa2ba3b8SLaurent Vivier },
79fa2ba3b8SLaurent Vivier };
80fa2ba3b8SLaurent Vivier
nubus_unrealize(BusState * bus)81*62437f90SMark Cave-Ayland static void nubus_unrealize(BusState *bus)
82*62437f90SMark Cave-Ayland {
83*62437f90SMark Cave-Ayland NubusBus *nubus = NUBUS_BUS(bus);
84*62437f90SMark Cave-Ayland
85*62437f90SMark Cave-Ayland address_space_destroy(&nubus->nubus_as);
86*62437f90SMark Cave-Ayland }
87*62437f90SMark Cave-Ayland
nubus_realize(BusState * bus,Error ** errp)88fa2ba3b8SLaurent Vivier static void nubus_realize(BusState *bus, Error **errp)
89fa2ba3b8SLaurent Vivier {
90*62437f90SMark Cave-Ayland NubusBus *nubus = NUBUS_BUS(bus);
91*62437f90SMark Cave-Ayland
92fa2ba3b8SLaurent Vivier if (!nubus_find()) {
93fa2ba3b8SLaurent Vivier error_setg(errp, "at most one %s device is permitted", TYPE_NUBUS_BUS);
94fa2ba3b8SLaurent Vivier return;
95fa2ba3b8SLaurent Vivier }
96*62437f90SMark Cave-Ayland
97*62437f90SMark Cave-Ayland address_space_init(&nubus->nubus_as, &nubus->nubus_mr, "nubus");
98fa2ba3b8SLaurent Vivier }
99fa2ba3b8SLaurent Vivier
nubus_init(Object * obj)100fa2ba3b8SLaurent Vivier static void nubus_init(Object *obj)
101fa2ba3b8SLaurent Vivier {
102fa2ba3b8SLaurent Vivier NubusBus *nubus = NUBUS_BUS(obj);
103fa2ba3b8SLaurent Vivier
104*62437f90SMark Cave-Ayland memory_region_init(&nubus->nubus_mr, obj, "nubus", 0x100000000);
105*62437f90SMark Cave-Ayland
106fa2ba3b8SLaurent Vivier memory_region_init_io(&nubus->super_slot_io, obj, &nubus_super_slot_ops,
107fa2ba3b8SLaurent Vivier nubus, "nubus-super-slots",
10803deab99SMark Cave-Ayland (NUBUS_SUPER_SLOT_NB + 1) * NUBUS_SUPER_SLOT_SIZE);
109*62437f90SMark Cave-Ayland memory_region_add_subregion(&nubus->nubus_mr, 0x0, &nubus->super_slot_io);
110fa2ba3b8SLaurent Vivier
111fa2ba3b8SLaurent Vivier memory_region_init_io(&nubus->slot_io, obj, &nubus_slot_ops,
112fa2ba3b8SLaurent Vivier nubus, "nubus-slots",
113fa2ba3b8SLaurent Vivier NUBUS_SLOT_NB * NUBUS_SLOT_SIZE);
114*62437f90SMark Cave-Ayland memory_region_add_subregion(&nubus->nubus_mr,
115*62437f90SMark Cave-Ayland (NUBUS_SUPER_SLOT_NB + 1) *
116*62437f90SMark Cave-Ayland NUBUS_SUPER_SLOT_SIZE, &nubus->slot_io);
117fa2ba3b8SLaurent Vivier
11803deab99SMark Cave-Ayland nubus->slot_available_mask = MAKE_64BIT_MASK(NUBUS_FIRST_SLOT,
11903deab99SMark Cave-Ayland NUBUS_SLOT_NB);
120fa2ba3b8SLaurent Vivier }
121fa2ba3b8SLaurent Vivier
nubus_get_dev_path(DeviceState * dev)122c0ad4eafSMark Cave-Ayland static char *nubus_get_dev_path(DeviceState *dev)
123c0ad4eafSMark Cave-Ayland {
124c0ad4eafSMark Cave-Ayland NubusDevice *nd = NUBUS_DEVICE(dev);
125c0ad4eafSMark Cave-Ayland BusState *bus = qdev_get_parent_bus(dev);
126c0ad4eafSMark Cave-Ayland char *p = qdev_get_dev_path(bus->parent);
127c0ad4eafSMark Cave-Ayland
128c0ad4eafSMark Cave-Ayland if (p) {
129c0ad4eafSMark Cave-Ayland char *ret = g_strdup_printf("%s/%s/%02x", p, bus->name, nd->slot);
130c0ad4eafSMark Cave-Ayland g_free(p);
131c0ad4eafSMark Cave-Ayland return ret;
132c0ad4eafSMark Cave-Ayland } else {
133c0ad4eafSMark Cave-Ayland return g_strdup_printf("%s/%02x", bus->name, nd->slot);
134c0ad4eafSMark Cave-Ayland }
135c0ad4eafSMark Cave-Ayland }
136c0ad4eafSMark Cave-Ayland
nubus_check_address(BusState * bus,DeviceState * dev,Error ** errp)137c10a576cSMark Cave-Ayland static bool nubus_check_address(BusState *bus, DeviceState *dev, Error **errp)
138c10a576cSMark Cave-Ayland {
139c10a576cSMark Cave-Ayland NubusDevice *nd = NUBUS_DEVICE(dev);
140c10a576cSMark Cave-Ayland NubusBus *nubus = NUBUS_BUS(bus);
141c10a576cSMark Cave-Ayland
142c10a576cSMark Cave-Ayland if (nd->slot == -1) {
143c10a576cSMark Cave-Ayland /* No slot specified, find first available free slot */
144c10a576cSMark Cave-Ayland int s = ctz32(nubus->slot_available_mask);
145c10a576cSMark Cave-Ayland if (s != 32) {
146c10a576cSMark Cave-Ayland nd->slot = s;
147c10a576cSMark Cave-Ayland } else {
148c10a576cSMark Cave-Ayland error_setg(errp, "Cannot register nubus card, no free slot "
149c10a576cSMark Cave-Ayland "available");
150c10a576cSMark Cave-Ayland return false;
151c10a576cSMark Cave-Ayland }
152c10a576cSMark Cave-Ayland } else {
153c10a576cSMark Cave-Ayland /* Slot specified, make sure the slot is available */
154c10a576cSMark Cave-Ayland if (!(nubus->slot_available_mask & BIT(nd->slot))) {
155c10a576cSMark Cave-Ayland error_setg(errp, "Cannot register nubus card, slot %d is "
156c10a576cSMark Cave-Ayland "unavailable or already occupied", nd->slot);
157c10a576cSMark Cave-Ayland return false;
158c10a576cSMark Cave-Ayland }
159c10a576cSMark Cave-Ayland }
160c10a576cSMark Cave-Ayland
161c10a576cSMark Cave-Ayland nubus->slot_available_mask &= ~BIT(nd->slot);
162c10a576cSMark Cave-Ayland return true;
163c10a576cSMark Cave-Ayland }
164c10a576cSMark Cave-Ayland
nubus_class_init(ObjectClass * oc,void * data)165fa2ba3b8SLaurent Vivier static void nubus_class_init(ObjectClass *oc, void *data)
166fa2ba3b8SLaurent Vivier {
167fa2ba3b8SLaurent Vivier BusClass *bc = BUS_CLASS(oc);
168fa2ba3b8SLaurent Vivier
169fa2ba3b8SLaurent Vivier bc->realize = nubus_realize;
170*62437f90SMark Cave-Ayland bc->unrealize = nubus_unrealize;
171c10a576cSMark Cave-Ayland bc->check_address = nubus_check_address;
172c0ad4eafSMark Cave-Ayland bc->get_dev_path = nubus_get_dev_path;
173fa2ba3b8SLaurent Vivier }
174fa2ba3b8SLaurent Vivier
175fa2ba3b8SLaurent Vivier static const TypeInfo nubus_bus_info = {
176fa2ba3b8SLaurent Vivier .name = TYPE_NUBUS_BUS,
177fa2ba3b8SLaurent Vivier .parent = TYPE_BUS,
178fa2ba3b8SLaurent Vivier .instance_size = sizeof(NubusBus),
179fa2ba3b8SLaurent Vivier .instance_init = nubus_init,
180fa2ba3b8SLaurent Vivier .class_init = nubus_class_init,
181fa2ba3b8SLaurent Vivier };
182fa2ba3b8SLaurent Vivier
nubus_register_types(void)183fa2ba3b8SLaurent Vivier static void nubus_register_types(void)
184fa2ba3b8SLaurent Vivier {
185fa2ba3b8SLaurent Vivier type_register_static(&nubus_bus_info);
186fa2ba3b8SLaurent Vivier }
187fa2ba3b8SLaurent Vivier
188fa2ba3b8SLaurent Vivier type_init(nubus_register_types)
189