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