![Stefan Weil](/assets/img/avatar_default.png)
On i386, these errors were reported: qemu/hw/alpha_dp264.c: In function ‘clipper_init’: qemu/hw/alpha_dp264.c:158: error: integer constant is too large for ‘unsigned long’ type qemu/hw/alpha_typhoon.c: In function ‘typhoon_init’: qemu/hw/alpha_typhoon.c:737: error: integer constant is too large for ‘long’ type qemu/hw/alpha_typhoon.c:741: error: integer constant is too large for ‘long’ type qemu/hw/alpha_typhoon.c:745: error: integer constant is too large for ‘long’ type qemu/hw/alpha_typhoon.c:749: error: integer constant is too large for ‘long’ type qemu/hw/alpha_typhoon.c:757: error: integer constant is too large for ‘long’ type qemu/hw/alpha_typhoon.c:767: error: integer constant is too large for ‘long’ type qemu/hw/alpha_typhoon.c:772: error: integer constant is too large for ‘long’ type Signed-off-by: Stefan Weil <sw@weilnetz.de> Signed-off-by: Blue Swirl <blauwirbel@gmail.com>
178 lines
5.2 KiB
C
178 lines
5.2 KiB
C
/*
|
|
* QEMU Alpha DP264/CLIPPER hardware system emulator.
|
|
*
|
|
* Choose CLIPPER IRQ mappings over, say, DP264, MONET, or WEBBRICK
|
|
* variants because CLIPPER doesn't have an SMC669 SuperIO controler
|
|
* that we need to emulate as well.
|
|
*/
|
|
|
|
#include "hw.h"
|
|
#include "elf.h"
|
|
#include "loader.h"
|
|
#include "boards.h"
|
|
#include "alpha_sys.h"
|
|
#include "sysemu.h"
|
|
#include "mc146818rtc.h"
|
|
#include "ide.h"
|
|
|
|
#define MAX_IDE_BUS 2
|
|
|
|
static uint64_t cpu_alpha_superpage_to_phys(void *opaque, uint64_t addr)
|
|
{
|
|
if (((addr >> 41) & 3) == 2) {
|
|
addr &= 0xffffffffffull;
|
|
}
|
|
return addr;
|
|
}
|
|
|
|
/* Note that there are at least 3 viewpoints of IRQ numbers on Alpha systems.
|
|
(0) The dev_irq_n lines into the cpu, which we totally ignore,
|
|
(1) The DRIR lines in the typhoon chipset,
|
|
(2) The "vector" aka mangled interrupt number reported by SRM PALcode,
|
|
(3) The interrupt number assigned by the kernel.
|
|
The following function is concerned with (1) only. */
|
|
|
|
static int clipper_pci_map_irq(PCIDevice *d, int irq_num)
|
|
{
|
|
int slot = d->devfn >> 3;
|
|
|
|
assert(irq_num >= 0 && irq_num <= 3);
|
|
|
|
return (slot + 1) * 4 + irq_num;
|
|
}
|
|
|
|
static void clipper_init(ram_addr_t ram_size,
|
|
const char *boot_device,
|
|
const char *kernel_filename,
|
|
const char *kernel_cmdline,
|
|
const char *initrd_filename,
|
|
const char *cpu_model)
|
|
{
|
|
CPUState *cpus[4];
|
|
PCIBus *pci_bus;
|
|
qemu_irq rtc_irq;
|
|
long size, i;
|
|
const char *palcode_filename;
|
|
uint64_t palcode_entry, palcode_low, palcode_high;
|
|
uint64_t kernel_entry, kernel_low, kernel_high;
|
|
|
|
/* Create up to 4 cpus. */
|
|
memset(cpus, 0, sizeof(cpus));
|
|
for (i = 0; i < smp_cpus; ++i) {
|
|
cpus[i] = cpu_init(cpu_model ? cpu_model : "ev67");
|
|
}
|
|
|
|
cpus[0]->trap_arg0 = ram_size;
|
|
cpus[0]->trap_arg1 = 0;
|
|
cpus[0]->trap_arg2 = smp_cpus;
|
|
|
|
/* Init the chipset. */
|
|
pci_bus = typhoon_init(ram_size, &rtc_irq, cpus, clipper_pci_map_irq);
|
|
|
|
rtc_init(1980, rtc_irq);
|
|
pit_init(0x40, 0);
|
|
isa_create_simple("i8042");
|
|
|
|
/* VGA setup. Don't bother loading the bios. */
|
|
alpha_pci_vga_setup(pci_bus);
|
|
|
|
/* Serial code setup. */
|
|
for (i = 0; i < MAX_SERIAL_PORTS; ++i) {
|
|
if (serial_hds[i]) {
|
|
serial_isa_init(i, serial_hds[i]);
|
|
}
|
|
}
|
|
|
|
/* Network setup. e1000 is good enough, failing Tulip support. */
|
|
for (i = 0; i < nb_nics; i++) {
|
|
pci_nic_init_nofail(&nd_table[i], "e1000", NULL);
|
|
}
|
|
|
|
/* IDE disk setup. */
|
|
{
|
|
DriveInfo *hd[MAX_IDE_BUS * MAX_IDE_DEVS];
|
|
ide_drive_get(hd, MAX_IDE_BUS);
|
|
|
|
pci_cmd646_ide_init(pci_bus, hd, 0);
|
|
}
|
|
|
|
/* Load PALcode. Given that this is not "real" cpu palcode,
|
|
but one explicitly written for the emulation, we might as
|
|
well load it directly from and ELF image. */
|
|
palcode_filename = (bios_name ? bios_name : "palcode-clipper");
|
|
palcode_filename = qemu_find_file(QEMU_FILE_TYPE_BIOS, palcode_filename);
|
|
if (palcode_filename == NULL) {
|
|
hw_error("no palcode provided\n");
|
|
exit(1);
|
|
}
|
|
size = load_elf(palcode_filename, cpu_alpha_superpage_to_phys,
|
|
NULL, &palcode_entry, &palcode_low, &palcode_high,
|
|
0, EM_ALPHA, 0);
|
|
if (size < 0) {
|
|
hw_error("could not load palcode '%s'\n", palcode_filename);
|
|
exit(1);
|
|
}
|
|
|
|
/* Start all cpus at the PALcode RESET entry point. */
|
|
for (i = 0; i < smp_cpus; ++i) {
|
|
cpus[i]->pal_mode = 1;
|
|
cpus[i]->pc = palcode_entry;
|
|
cpus[i]->palbr = palcode_entry;
|
|
}
|
|
|
|
/* Load a kernel. */
|
|
if (kernel_filename) {
|
|
uint64_t param_offset;
|
|
|
|
size = load_elf(kernel_filename, cpu_alpha_superpage_to_phys,
|
|
NULL, &kernel_entry, &kernel_low, &kernel_high,
|
|
0, EM_ALPHA, 0);
|
|
if (size < 0) {
|
|
hw_error("could not load kernel '%s'\n", kernel_filename);
|
|
exit(1);
|
|
}
|
|
|
|
cpus[0]->trap_arg1 = kernel_entry;
|
|
|
|
param_offset = kernel_low - 0x6000;
|
|
|
|
if (kernel_cmdline) {
|
|
pstrcpy_targphys("cmdline", param_offset, 0x100, kernel_cmdline);
|
|
}
|
|
|
|
if (initrd_filename) {
|
|
long initrd_base, initrd_size;
|
|
|
|
initrd_size = get_image_size(initrd_filename);
|
|
if (initrd_size < 0) {
|
|
hw_error("could not load initial ram disk '%s'\n",
|
|
initrd_filename);
|
|
exit(1);
|
|
}
|
|
|
|
/* Put the initrd image as high in memory as possible. */
|
|
initrd_base = (ram_size - initrd_size) & TARGET_PAGE_MASK;
|
|
load_image_targphys(initrd_filename, initrd_base,
|
|
ram_size - initrd_base);
|
|
|
|
stq_phys(param_offset + 0x100, initrd_base + 0xfffffc0000000000ULL);
|
|
stq_phys(param_offset + 0x108, initrd_size);
|
|
}
|
|
}
|
|
}
|
|
|
|
static QEMUMachine clipper_machine = {
|
|
.name = "clipper",
|
|
.desc = "Alpha DP264/CLIPPER",
|
|
.init = clipper_init,
|
|
.max_cpus = 4,
|
|
.is_default = 1,
|
|
};
|
|
|
|
static void clipper_machine_init(void)
|
|
{
|
|
qemu_register_machine(&clipper_machine);
|
|
}
|
|
|
|
machine_init(clipper_machine_init);
|