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.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 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 unsigned int smp_cpus = machine->smp.cpus; 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, NULL, 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, NULL, 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) 189