2 * HP-PARISC Lasi chipset emulation.
4 * (C) 2019 by Helge Deller <deller@gmx.de>
6 * This work is licensed under the GNU GPL license version 2 or later.
8 * Documentation available at:
9 * https://parisc.wiki.kernel.org/images-parisc/7/79/Lasi_ers.pdf
12 #include "qemu/osdep.h"
13 #include "qemu/units.h"
15 #include "qapi/error.h"
18 #include "sysemu/sysemu.h"
19 #include "sysemu/runstate.h"
21 #include "hw/net/lasi_82596.h"
22 #include "hw/char/parallel.h"
23 #include "hw/char/serial.h"
24 #include "hw/input/lasips2.h"
25 #include "migration/vmstate.h"
26 #include "qom/object.h"
28 #define TYPE_LASI_CHIP "lasi-chip"
30 #define LASI_IRR 0x00 /* RO */
36 #define LASI_PCR 0x0C000 /* LASI Power Control register */
37 #define LASI_ERRLOG 0x0C004 /* LASI Error Logging register */
38 #define LASI_VER 0x0C008 /* LASI Version Control register */
39 #define LASI_IORESET 0x0C00C /* LASI I/O Reset register */
40 #define LASI_AMR 0x0C010 /* LASI Arbitration Mask register */
41 #define LASI_IO_CONF 0x7FFFE /* LASI primary configuration register */
42 #define LASI_IO_CONF2 0x7FFFF /* LASI secondary configuration register */
44 #define LASI_BIT(x) (1ul << (x))
45 #define LASI_IRQ_BITS (LASI_BIT(5) | LASI_BIT(7) | LASI_BIT(8) | LASI_BIT(9) \
46 | LASI_BIT(13) | LASI_BIT(14) | LASI_BIT(16) | LASI_BIT(17) \
47 | LASI_BIT(18) | LASI_BIT(19) | LASI_BIT(20) | LASI_BIT(21) \
50 #define ICR_BUS_ERROR_BIT LASI_BIT(8) /* bit 8 in ICR */
51 #define ICR_TOC_BIT LASI_BIT(1) /* bit 1 in ICR */
53 OBJECT_DECLARE_SIMPLE_TYPE(LasiState
, LASI_CHIP
)
56 PCIHostState parent_obj
;
69 MemoryRegion this_mem
;
72 static bool lasi_chip_mem_valid(void *opaque
, hwaddr addr
,
73 unsigned size
, bool is_write
,
85 case (LASI_LAN_HPA
- LASI_HPA
):
86 case (LASI_LPT_HPA
- LASI_HPA
):
87 case (LASI_UART_HPA
- LASI_HPA
):
88 case (LASI_RTC_HPA
- LASI_HPA
):
90 case LASI_PCR
... LASI_AMR
:
94 trace_lasi_chip_mem_valid(addr
, ret
);
98 static MemTxResult
lasi_chip_read_with_attrs(void *opaque
, hwaddr addr
,
99 uint64_t *data
, unsigned size
,
102 LasiState
*s
= opaque
;
103 MemTxResult ret
= MEMTX_OK
;
115 /* Any read to IPR clears the register. */
119 val
= s
->icr
& ICR_BUS_ERROR_BIT
; /* bus_error */
125 case (LASI_LAN_HPA
- LASI_HPA
):
126 case (LASI_LPT_HPA
- LASI_HPA
):
127 case (LASI_UART_HPA
- LASI_HPA
):
130 case (LASI_RTC_HPA
- LASI_HPA
):
136 case LASI_VER
: /* only version 0 existed. */
148 /* Controlled by lasi_chip_mem_valid above. */
149 g_assert_not_reached();
152 trace_lasi_chip_read(addr
, val
);
158 static MemTxResult
lasi_chip_write_with_attrs(void *opaque
, hwaddr addr
,
159 uint64_t val
, unsigned size
,
162 LasiState
*s
= opaque
;
164 trace_lasi_chip_write(addr
, val
);
172 if (((val
& LASI_IRQ_BITS
) != val
) && (val
!= 0xffffffff)) {
173 qemu_log_mask(LOG_GUEST_ERROR
,
174 "LASI: tried to set invalid %lx IMR value.\n",
175 (unsigned long) val
);
179 /* Any write to IPR clears the register. */
184 /* if (val & ICR_TOC_BIT) issue_toc(); */
190 case (LASI_LAN_HPA
- LASI_HPA
):
191 /* XXX: reset LAN card */
193 case (LASI_LPT_HPA
- LASI_HPA
):
194 /* XXX: reset parallel port */
196 case (LASI_UART_HPA
- LASI_HPA
):
197 /* XXX: reset serial port */
199 case (LASI_RTC_HPA
- LASI_HPA
):
200 s
->rtc_ref
= val
- time(NULL
);
204 if (val
== 0x02) { /* immediately power off */
205 qemu_system_shutdown_request(SHUTDOWN_CAUSE_GUEST_SHUTDOWN
);
215 break; /* XXX: TODO: Reset various devices. */
221 /* Controlled by lasi_chip_mem_valid above. */
222 g_assert_not_reached();
227 static const MemoryRegionOps lasi_chip_ops
= {
228 .read_with_attrs
= lasi_chip_read_with_attrs
,
229 .write_with_attrs
= lasi_chip_write_with_attrs
,
230 .endianness
= DEVICE_BIG_ENDIAN
,
232 .min_access_size
= 1,
233 .max_access_size
= 4,
234 .accepts
= lasi_chip_mem_valid
,
237 .min_access_size
= 1,
238 .max_access_size
= 4,
242 static const VMStateDescription vmstate_lasi
= {
245 .minimum_version_id
= 1,
246 .fields
= (VMStateField
[]) {
247 VMSTATE_UINT32(irr
, LasiState
),
248 VMSTATE_UINT32(imr
, LasiState
),
249 VMSTATE_UINT32(ipr
, LasiState
),
250 VMSTATE_UINT32(icr
, LasiState
),
251 VMSTATE_UINT32(iar
, LasiState
),
252 VMSTATE_UINT32(errlog
, LasiState
),
253 VMSTATE_UINT32(amr
, LasiState
),
254 VMSTATE_END_OF_LIST()
259 static void lasi_set_irq(void *opaque
, int irq
, int level
)
261 LasiState
*s
= opaque
;
262 uint32_t bit
= 1u << irq
;
267 uint32_t iar
= s
->iar
;
269 if ((s
->icr
& ICR_BUS_ERROR_BIT
) == 0) {
270 stl_be_phys(&address_space_memory
, iar
& -32, iar
& 31);
276 static int lasi_get_irq(unsigned long hpa
)
291 case LASI_PS2KBD_HPA
:
292 case LASI_PS2MOU_HPA
:
295 g_assert_not_reached();
299 DeviceState
*lasi_init(MemoryRegion
*address_space
)
304 dev
= qdev_new(TYPE_LASI_CHIP
);
306 s
->iar
= CPU_HPA
+ 3;
308 /* Lasi access from main memory. */
309 memory_region_init_io(&s
->this_mem
, OBJECT(s
), &lasi_chip_ops
,
310 s
, "lasi", 0x100000);
311 memory_region_add_subregion(address_space
, LASI_HPA
, &s
->this_mem
);
313 sysbus_realize_and_unref(SYS_BUS_DEVICE(dev
), &error_fatal
);
316 if (enable_lasi_lan()) {
317 qemu_irq lan_irq
= qemu_allocate_irq(lasi_set_irq
, s
,
318 lasi_get_irq(LASI_LAN_HPA
));
319 lasi_82596_init(address_space
, LASI_LAN_HPA
, lan_irq
);
323 qemu_irq lpt_irq
= qemu_allocate_irq(lasi_set_irq
, s
,
324 lasi_get_irq(LASI_LPT_HPA
));
325 parallel_mm_init(address_space
, LASI_LPT_HPA
+ 0x800, 0,
326 lpt_irq
, parallel_hds
[0]);
328 /* Real time clock (RTC), it's only one 32-bit counter @9000 */
335 qemu_irq serial_irq
= qemu_allocate_irq(lasi_set_irq
, s
,
336 lasi_get_irq(LASI_UART_HPA
));
337 serial_mm_init(address_space
, LASI_UART_HPA
+ 0x800, 0,
338 serial_irq
, 8000000 / 16,
339 serial_hd(0), DEVICE_NATIVE_ENDIAN
);
342 /* PS/2 Keyboard/Mouse */
343 qemu_irq ps2kbd_irq
= qemu_allocate_irq(lasi_set_irq
, s
,
344 lasi_get_irq(LASI_PS2KBD_HPA
));
345 lasips2_init(address_space
, LASI_PS2KBD_HPA
, ps2kbd_irq
);
350 static void lasi_class_init(ObjectClass
*klass
, void *data
)
352 DeviceClass
*dc
= DEVICE_CLASS(klass
);
354 dc
->vmsd
= &vmstate_lasi
;
357 static const TypeInfo lasi_pcihost_info
= {
358 .name
= TYPE_LASI_CHIP
,
359 .parent
= TYPE_SYS_BUS_DEVICE
,
360 .instance_size
= sizeof(LasiState
),
361 .class_init
= lasi_class_init
,
364 static void lasi_register_types(void)
366 type_register_static(&lasi_pcihost_info
);
369 type_init(lasi_register_types
)