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