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