1 /*
2 * QEMU Alpha DP264/CLIPPER hardware system emulator.
3 *
4 * Choose CLIPPER IRQ mappings over, say, DP264, MONET, or WEBBRICK
5 * variants because CLIPPER doesn't have an SMC669 SuperIO controller
6 * that we need to emulate as well.
7 */
8
9 #include "qemu/osdep.h"
10 #include "qemu-common.h"
11 #include "cpu.h"
12 #include "elf.h"
13 #include "hw/loader.h"
14 #include "alpha_sys.h"
15 #include "qemu/error-report.h"
16 #include "sysemu/sysemu.h"
17 #include "hw/rtc/mc146818rtc.h"
18 #include "hw/ide/pci.h"
19 #include "hw/timer/i8254.h"
20 #include "hw/isa/superio.h"
21 #include "hw/dma/i8257.h"
22 #include "net/net.h"
23 #include "qemu/cutils.h"
24 #include "net/net.h"
25
26 #define MAX_IDE_BUS 2
27
cpu_alpha_superpage_to_phys(void * opaque,uint64_t addr)28 static uint64_t cpu_alpha_superpage_to_phys(void *opaque, uint64_t addr)
29 {
30 if (((addr >> 41) & 3) == 2) {
31 addr &= 0xffffffffffull;
32 }
33 return addr;
34 }
35
36 /* Note that there are at least 3 viewpoints of IRQ numbers on Alpha systems.
37 (0) The dev_irq_n lines into the cpu, which we totally ignore,
38 (1) The DRIR lines in the typhoon chipset,
39 (2) The "vector" aka mangled interrupt number reported by SRM PALcode,
40 (3) The interrupt number assigned by the kernel.
41 The following function is concerned with (1) only. */
42
clipper_pci_map_irq(PCIDevice * d,int irq_num)43 static int clipper_pci_map_irq(PCIDevice *d, int irq_num)
44 {
45 int slot = d->devfn >> 3;
46
47 assert(irq_num >= 0 && irq_num <= 3);
48
49 return (slot + 1) * 4 + irq_num;
50 }
51
clipper_init(MachineState * machine)52 static void clipper_init(MachineState *machine)
53 {
54 ram_addr_t ram_size = machine->ram_size;
55 const char *kernel_filename = machine->kernel_filename;
56 const char *kernel_cmdline = machine->kernel_cmdline;
57 const char *initrd_filename = machine->initrd_filename;
58 AlphaCPU *cpus[4];
59 PCIBus *pci_bus;
60 PCIDevice *pci_dev;
61 ISABus *isa_bus;
62 qemu_irq rtc_irq;
63 long size, i;
64 char *palcode_filename;
65 uint64_t palcode_entry;
66 uint64_t kernel_entry, kernel_low;
67 unsigned int smp_cpus = machine->smp.cpus;
68
69 /* Create up to 4 cpus. */
70 memset(cpus, 0, sizeof(cpus));
71 for (i = 0; i < smp_cpus; ++i) {
72 cpus[i] = ALPHA_CPU(cpu_create(machine->cpu_type));
73 }
74
75 cpus[0]->env.trap_arg0 = ram_size;
76 cpus[0]->env.trap_arg1 = 0;
77 cpus[0]->env.trap_arg2 = smp_cpus;
78
79 /* Init the chipset. */
80 pci_bus = typhoon_init(machine->ram, &isa_bus, &rtc_irq, cpus,
81 clipper_pci_map_irq);
82
83 /* Since we have an SRM-compatible PALcode, use the SRM epoch. */
84 mc146818_rtc_init(isa_bus, 1900, rtc_irq);
85
86 i8254_pit_init(isa_bus, 0x40, 0, NULL);
87
88 /* VGA setup. Don't bother loading the bios. */
89 pci_vga_init(pci_bus);
90
91 /* Network setup. e1000 is good enough, failing Tulip support. */
92 for (i = 0; i < nb_nics; i++) {
93 pci_nic_init_nofail(&nd_table[i], pci_bus, "e1000", NULL);
94 }
95
96 /* 2 82C37 (dma) */
97 isa_create_simple(isa_bus, "i82374");
98
99 /* Super I/O */
100 isa_create_simple(isa_bus, TYPE_SMC37C669_SUPERIO);
101
102 /* IDE disk setup. */
103 pci_dev = pci_create_simple(pci_bus, -1, "cmd646-ide");
104 pci_ide_create_devs(pci_dev);
105
106 /* Load PALcode. Given that this is not "real" cpu palcode,
107 but one explicitly written for the emulation, we might as
108 well load it directly from and ELF image. */
109 palcode_filename = qemu_find_file(QEMU_FILE_TYPE_BIOS,
110 bios_name ? bios_name : "palcode-clipper");
111 if (palcode_filename == NULL) {
112 error_report("no palcode provided");
113 exit(1);
114 }
115 size = load_elf(palcode_filename, NULL, cpu_alpha_superpage_to_phys,
116 NULL, &palcode_entry, NULL, NULL, NULL,
117 0, EM_ALPHA, 0, 0);
118 if (size < 0) {
119 error_report("could not load palcode '%s'", palcode_filename);
120 exit(1);
121 }
122 g_free(palcode_filename);
123
124 /* Start all cpus at the PALcode RESET entry point. */
125 for (i = 0; i < smp_cpus; ++i) {
126 cpus[i]->env.pc = palcode_entry;
127 cpus[i]->env.palbr = palcode_entry;
128 }
129
130 /* Load a kernel. */
131 if (kernel_filename) {
132 uint64_t param_offset;
133
134 size = load_elf(kernel_filename, NULL, cpu_alpha_superpage_to_phys,
135 NULL, &kernel_entry, &kernel_low, NULL, NULL,
136 0, EM_ALPHA, 0, 0);
137 if (size < 0) {
138 error_report("could not load kernel '%s'", kernel_filename);
139 exit(1);
140 }
141
142 cpus[0]->env.trap_arg1 = kernel_entry;
143
144 param_offset = kernel_low - 0x6000;
145
146 if (kernel_cmdline) {
147 pstrcpy_targphys("cmdline", param_offset, 0x100, kernel_cmdline);
148 }
149
150 if (initrd_filename) {
151 long initrd_base;
152 int64_t initrd_size;
153
154 initrd_size = get_image_size(initrd_filename);
155 if (initrd_size < 0) {
156 error_report("could not load initial ram disk '%s'",
157 initrd_filename);
158 exit(1);
159 }
160
161 /* Put the initrd image as high in memory as possible. */
162 initrd_base = (ram_size - initrd_size) & TARGET_PAGE_MASK;
163 load_image_targphys(initrd_filename, initrd_base,
164 ram_size - initrd_base);
165
166 address_space_stq(&address_space_memory, param_offset + 0x100,
167 initrd_base + 0xfffffc0000000000ULL,
168 MEMTXATTRS_UNSPECIFIED,
169 NULL);
170 address_space_stq(&address_space_memory, param_offset + 0x108,
171 initrd_size, MEMTXATTRS_UNSPECIFIED, NULL);
172 }
173 }
174 }
175
clipper_machine_init(MachineClass * mc)176 static void clipper_machine_init(MachineClass *mc)
177 {
178 mc->desc = "Alpha DP264/CLIPPER";
179 mc->init = clipper_init;
180 mc->block_default_type = IF_IDE;
181 mc->max_cpus = 4;
182 mc->is_default = true;
183 mc->default_cpu_type = ALPHA_CPU_TYPE_NAME("ev67");
184 mc->default_ram_id = "ram";
185 }
186
187 DEFINE_MACHINE("clipper", clipper_machine_init)
188