]>
Commit | Line | Data |
---|---|---|
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 "hw/hw.h" | |
13 | #include "elf.h" | |
14 | #include "hw/loader.h" | |
15 | #include "hw/boards.h" | |
16 | #include "alpha_sys.h" | |
17 | #include "qemu/error-report.h" | |
18 | #include "sysemu/sysemu.h" | |
19 | #include "hw/timer/mc146818rtc.h" | |
20 | #include "hw/ide.h" | |
21 | #include "hw/timer/i8254.h" | |
22 | #include "hw/isa/superio.h" | |
23 | #include "hw/dma/i8257.h" | |
24 | #include "qemu/cutils.h" | |
25 | ||
26 | #define MAX_IDE_BUS 2 | |
27 | ||
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 | ||
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 | ||
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 | ISABus *isa_bus; | |
61 | qemu_irq rtc_irq; | |
62 | long size, i; | |
63 | char *palcode_filename; | |
64 | uint64_t palcode_entry, palcode_low, palcode_high; | |
65 | uint64_t kernel_entry, kernel_low, kernel_high; | |
66 | ||
67 | /* Create up to 4 cpus. */ | |
68 | memset(cpus, 0, sizeof(cpus)); | |
69 | for (i = 0; i < smp_cpus; ++i) { | |
70 | cpus[i] = ALPHA_CPU(cpu_create(machine->cpu_type)); | |
71 | } | |
72 | ||
73 | cpus[0]->env.trap_arg0 = ram_size; | |
74 | cpus[0]->env.trap_arg1 = 0; | |
75 | cpus[0]->env.trap_arg2 = smp_cpus; | |
76 | ||
77 | /* Init the chipset. */ | |
78 | pci_bus = typhoon_init(ram_size, &isa_bus, &rtc_irq, cpus, | |
79 | clipper_pci_map_irq); | |
80 | ||
81 | /* Since we have an SRM-compatible PALcode, use the SRM epoch. */ | |
82 | mc146818_rtc_init(isa_bus, 1900, rtc_irq); | |
83 | ||
84 | i8254_pit_init(isa_bus, 0x40, 0, NULL); | |
85 | ||
86 | /* VGA setup. Don't bother loading the bios. */ | |
87 | pci_vga_init(pci_bus); | |
88 | ||
89 | /* Network setup. e1000 is good enough, failing Tulip support. */ | |
90 | for (i = 0; i < nb_nics; i++) { | |
91 | pci_nic_init_nofail(&nd_table[i], pci_bus, "e1000", NULL); | |
92 | } | |
93 | ||
94 | /* 2 82C37 (dma) */ | |
95 | isa_create_simple(isa_bus, "i82374"); | |
96 | ||
97 | /* Super I/O */ | |
98 | isa_create_simple(isa_bus, TYPE_SMC37C669_SUPERIO); | |
99 | ||
100 | /* IDE disk setup. */ | |
101 | { | |
102 | DriveInfo *hd[MAX_IDE_BUS * MAX_IDE_DEVS]; | |
103 | ide_drive_get(hd, ARRAY_SIZE(hd)); | |
104 | ||
105 | pci_cmd646_ide_init(pci_bus, hd, 0); | |
106 | } | |
107 | ||
108 | /* Load PALcode. Given that this is not "real" cpu palcode, | |
109 | but one explicitly written for the emulation, we might as | |
110 | well load it directly from and ELF image. */ | |
111 | palcode_filename = qemu_find_file(QEMU_FILE_TYPE_BIOS, | |
112 | bios_name ? bios_name : "palcode-clipper"); | |
113 | if (palcode_filename == NULL) { | |
114 | error_report("no palcode provided"); | |
115 | exit(1); | |
116 | } | |
117 | size = load_elf(palcode_filename, cpu_alpha_superpage_to_phys, | |
118 | NULL, &palcode_entry, &palcode_low, &palcode_high, | |
119 | 0, EM_ALPHA, 0, 0); | |
120 | if (size < 0) { | |
121 | error_report("could not load palcode '%s'", palcode_filename); | |
122 | exit(1); | |
123 | } | |
124 | g_free(palcode_filename); | |
125 | ||
126 | /* Start all cpus at the PALcode RESET entry point. */ | |
127 | for (i = 0; i < smp_cpus; ++i) { | |
128 | cpus[i]->env.pc = palcode_entry; | |
129 | cpus[i]->env.palbr = palcode_entry; | |
130 | } | |
131 | ||
132 | /* Load a kernel. */ | |
133 | if (kernel_filename) { | |
134 | uint64_t param_offset; | |
135 | ||
136 | size = load_elf(kernel_filename, cpu_alpha_superpage_to_phys, | |
137 | NULL, &kernel_entry, &kernel_low, &kernel_high, | |
138 | 0, EM_ALPHA, 0, 0); | |
139 | if (size < 0) { | |
140 | error_report("could not load kernel '%s'", kernel_filename); | |
141 | exit(1); | |
142 | } | |
143 | ||
144 | cpus[0]->env.trap_arg1 = kernel_entry; | |
145 | ||
146 | param_offset = kernel_low - 0x6000; | |
147 | ||
148 | if (kernel_cmdline) { | |
149 | pstrcpy_targphys("cmdline", param_offset, 0x100, kernel_cmdline); | |
150 | } | |
151 | ||
152 | if (initrd_filename) { | |
153 | long initrd_base; | |
154 | int64_t initrd_size; | |
155 | ||
156 | initrd_size = get_image_size(initrd_filename); | |
157 | if (initrd_size < 0) { | |
158 | error_report("could not load initial ram disk '%s'", | |
159 | initrd_filename); | |
160 | exit(1); | |
161 | } | |
162 | ||
163 | /* Put the initrd image as high in memory as possible. */ | |
164 | initrd_base = (ram_size - initrd_size) & TARGET_PAGE_MASK; | |
165 | load_image_targphys(initrd_filename, initrd_base, | |
166 | ram_size - initrd_base); | |
167 | ||
168 | address_space_stq(&address_space_memory, param_offset + 0x100, | |
169 | initrd_base + 0xfffffc0000000000ULL, | |
170 | MEMTXATTRS_UNSPECIFIED, | |
171 | NULL); | |
172 | address_space_stq(&address_space_memory, param_offset + 0x108, | |
173 | initrd_size, MEMTXATTRS_UNSPECIFIED, NULL); | |
174 | } | |
175 | } | |
176 | } | |
177 | ||
178 | static void clipper_machine_init(MachineClass *mc) | |
179 | { | |
180 | mc->desc = "Alpha DP264/CLIPPER"; | |
181 | mc->init = clipper_init; | |
182 | mc->block_default_type = IF_IDE; | |
183 | mc->max_cpus = 4; | |
184 | mc->is_default = 1; | |
185 | mc->default_cpu_type = ALPHA_CPU_TYPE_NAME("ev67"); | |
186 | } | |
187 | ||
188 | DEFINE_MACHINE("clipper", clipper_machine_init) |