25 |
* SUCH DAMAGE. |
* SUCH DAMAGE. |
26 |
* |
* |
27 |
* |
* |
28 |
* $Id: machine.c,v 1.453 2005/06/12 12:31:54 debug Exp $ |
* $Id: machine.c,v 1.470 2005/06/26 11:36:28 debug Exp $ |
29 |
* |
* |
30 |
* Emulation of specific machines. |
* Emulation of specific machines. |
31 |
* |
* |
83 |
#include "hpc_bootinfo.h" |
#include "hpc_bootinfo.h" |
84 |
#include "vripreg.h" |
#include "vripreg.h" |
85 |
|
|
86 |
|
#define BOOTSTR_BUFLEN 1000 |
87 |
|
#define BOOTARG_BUFLEN 2000 |
88 |
|
#define ETHERNET_STRING_MAXLEN 40 |
89 |
|
|
90 |
struct machine_entry_subtype { |
struct machine_entry_subtype { |
91 |
int machine_subtype;/* Old-style subtype */ |
int machine_subtype;/* Old-style subtype */ |
140 |
m->name = strdup(name); |
m->name = strdup(name); |
141 |
|
|
142 |
/* Sane default values: */ |
/* Sane default values: */ |
143 |
m->serial_nr = 0; |
m->serial_nr = 1; |
144 |
m->machine_type = MACHINE_NONE; |
m->machine_type = MACHINE_NONE; |
145 |
m->machine_subtype = MACHINE_NONE; |
m->machine_subtype = MACHINE_NONE; |
146 |
|
#ifdef BINTRANS |
147 |
m->bintrans_enable = 1; |
m->bintrans_enable = 1; |
148 |
|
m->old_bintrans_enable = 1; |
149 |
|
#endif |
150 |
m->prom_emulation = 1; |
m->prom_emulation = 1; |
151 |
m->speed_tricks = 1; |
m->speed_tricks = 1; |
152 |
m->byte_order_override = NO_BYTE_ORDER_OVERRIDE; |
m->byte_order_override = NO_BYTE_ORDER_OVERRIDE; |
1059 |
* interrupt 2 should be asserted. |
* interrupt 2 should be asserted. |
1060 |
* |
* |
1061 |
* TODO: how should all this be done nicely? |
* TODO: how should all this be done nicely? |
|
* |
|
|
* TODO: mace interrupt mask |
|
1062 |
*/ |
*/ |
1063 |
|
|
1064 |
uint64_t crime_addr = CRIME_INTSTAT; |
uint64_t crime_addr = CRIME_INTSTAT; |
1065 |
uint64_t mace_addr = 0x14; |
uint64_t mace_addr = 0x10; |
1066 |
uint64_t crime_interrupts, crime_interrupts_mask, mace_interrupts; |
uint64_t crime_interrupts, crime_interrupts_mask; |
1067 |
|
uint64_t mace_interrupts, mace_interrupt_mask; |
1068 |
unsigned int i; |
unsigned int i; |
1069 |
unsigned char x[8]; |
unsigned char x[8]; |
1070 |
|
|
1071 |
|
/* Read current MACE interrupt assertions: */ |
1072 |
|
memcpy(x, m->md_int.ip32.mace_data->reg + mace_addr, |
1073 |
|
sizeof(uint64_t)); |
1074 |
|
mace_interrupts = 0; |
1075 |
|
for (i=0; i<sizeof(uint64_t); i++) { |
1076 |
|
mace_interrupts <<= 8; |
1077 |
|
mace_interrupts |= x[i]; |
1078 |
|
} |
1079 |
|
|
1080 |
|
/* Read current MACE interrupt mask: */ |
1081 |
|
memcpy(x, m->md_int.ip32.mace_data->reg + mace_addr + 8, |
1082 |
|
sizeof(uint64_t)); |
1083 |
|
mace_interrupt_mask = 0; |
1084 |
|
for (i=0; i<sizeof(uint64_t); i++) { |
1085 |
|
mace_interrupt_mask <<= 8; |
1086 |
|
mace_interrupt_mask |= x[i]; |
1087 |
|
} |
1088 |
|
|
1089 |
/* |
/* |
1090 |
* This mapping of both MACE and CRIME interrupts into the same |
* This mapping of both MACE and CRIME interrupts into the same |
1091 |
* 'int' is really ugly. |
* 'int' is really ugly. |
1097 |
* TODO: fix. |
* TODO: fix. |
1098 |
*/ |
*/ |
1099 |
if (irq_nr & MACE_PERIPH_SERIAL) { |
if (irq_nr & MACE_PERIPH_SERIAL) { |
|
/* Read current MACE interrupt bits: */ |
|
|
memcpy(x, m->md_int.ip32.mace_data->reg + mace_addr, sizeof(uint32_t)); |
|
|
mace_interrupts = 0; |
|
|
for (i=0; i<sizeof(uint32_t); i++) { |
|
|
/* SGI is big-endian... */ |
|
|
mace_interrupts <<= 8; |
|
|
mace_interrupts |= x[i]; |
|
|
} |
|
|
|
|
1100 |
if (assrt) |
if (assrt) |
1101 |
mace_interrupts |= (irq_nr & ~MACE_PERIPH_SERIAL); |
mace_interrupts |= (irq_nr & ~MACE_PERIPH_SERIAL); |
1102 |
else |
else |
1103 |
mace_interrupts &= ~(irq_nr & ~MACE_PERIPH_SERIAL); |
mace_interrupts &= ~(irq_nr & ~MACE_PERIPH_SERIAL); |
1104 |
|
|
|
/* Write back MACE interrupt bits: */ |
|
|
for (i=0; i<4; i++) |
|
|
x[3-i] = mace_interrupts >> (i*8); |
|
|
memcpy(m->md_int.ip32.mace_data->reg + mace_addr, x, sizeof(uint32_t)); |
|
|
|
|
1105 |
irq_nr = MACE_PERIPH_SERIAL; |
irq_nr = MACE_PERIPH_SERIAL; |
1106 |
if (mace_interrupts == 0) |
if ((mace_interrupts & mace_interrupt_mask) == 0) |
1107 |
assrt = 0; |
assrt = 0; |
1108 |
else |
else |
1109 |
assrt = 1; |
assrt = 1; |
1111 |
|
|
1112 |
/* Hopefully _MISC and _SERIAL will not be both on at the same time. */ |
/* Hopefully _MISC and _SERIAL will not be both on at the same time. */ |
1113 |
if (irq_nr & MACE_PERIPH_MISC) { |
if (irq_nr & MACE_PERIPH_MISC) { |
|
/* Read current MACE interrupt bits: */ |
|
|
memcpy(x, m->md_int.ip32.mace_data->reg + mace_addr, sizeof(uint32_t)); |
|
|
mace_interrupts = 0; |
|
|
for (i=0; i<sizeof(uint32_t); i++) { |
|
|
/* SGI is big-endian... */ |
|
|
mace_interrupts <<= 8; |
|
|
mace_interrupts |= x[i]; |
|
|
} |
|
|
|
|
1114 |
if (assrt) |
if (assrt) |
1115 |
mace_interrupts |= (irq_nr & ~MACE_PERIPH_MISC); |
mace_interrupts |= (irq_nr & ~MACE_PERIPH_MISC); |
1116 |
else |
else |
1117 |
mace_interrupts &= ~(irq_nr & ~MACE_PERIPH_MISC); |
mace_interrupts &= ~(irq_nr & ~MACE_PERIPH_MISC); |
1118 |
|
|
|
/* Write back MACE interrupt bits: */ |
|
|
for (i=0; i<4; i++) |
|
|
x[3-i] = mace_interrupts >> (i*8); |
|
|
memcpy(m->md_int.ip32.mace_data->reg + mace_addr, x, sizeof(uint32_t)); |
|
|
|
|
1119 |
irq_nr = MACE_PERIPH_MISC; |
irq_nr = MACE_PERIPH_MISC; |
1120 |
if (mace_interrupts == 0) |
if ((mace_interrupts & mace_interrupt_mask) == 0) |
1121 |
assrt = 0; |
assrt = 0; |
1122 |
else |
else |
1123 |
assrt = 1; |
assrt = 1; |
1124 |
} |
} |
1125 |
|
|
1126 |
|
/* Write back MACE interrupt assertions: */ |
1127 |
|
for (i=0; i<sizeof(uint64_t); i++) |
1128 |
|
x[7-i] = mace_interrupts >> (i*8); |
1129 |
|
memcpy(m->md_int.ip32.mace_data->reg + mace_addr, x, sizeof(uint64_t)); |
1130 |
|
|
1131 |
/* Read CRIME_INTSTAT: */ |
/* Read CRIME_INTSTAT: */ |
1132 |
memcpy(x, m->md_int.ip32.crime_data->reg + crime_addr, sizeof(uint64_t)); |
memcpy(x, m->md_int.ip32.crime_data->reg + crime_addr, |
1133 |
|
sizeof(uint64_t)); |
1134 |
crime_interrupts = 0; |
crime_interrupts = 0; |
1135 |
for (i=0; i<8; i++) { |
for (i=0; i<sizeof(uint64_t); i++) { |
|
/* SGI is big-endian... */ |
|
1136 |
crime_interrupts <<= 8; |
crime_interrupts <<= 8; |
1137 |
crime_interrupts |= x[i]; |
crime_interrupts |= x[i]; |
1138 |
} |
} |
1143 |
crime_interrupts &= ~irq_nr; |
crime_interrupts &= ~irq_nr; |
1144 |
|
|
1145 |
/* Write back CRIME_INTSTAT: */ |
/* Write back CRIME_INTSTAT: */ |
1146 |
for (i=0; i<8; i++) |
for (i=0; i<sizeof(uint64_t); i++) |
1147 |
x[7-i] = crime_interrupts >> (i*8); |
x[7-i] = crime_interrupts >> (i*8); |
1148 |
memcpy(m->md_int.ip32.crime_data->reg + crime_addr, x, sizeof(uint64_t)); |
memcpy(m->md_int.ip32.crime_data->reg + crime_addr, x, |
1149 |
|
sizeof(uint64_t)); |
1150 |
|
|
1151 |
/* Read CRIME_INTMASK: */ |
/* Read CRIME_INTMASK: */ |
1152 |
memcpy(x, m->md_int.ip32.crime_data->reg + CRIME_INTMASK, sizeof(uint64_t)); |
memcpy(x, m->md_int.ip32.crime_data->reg + CRIME_INTMASK, |
1153 |
|
sizeof(uint64_t)); |
1154 |
crime_interrupts_mask = 0; |
crime_interrupts_mask = 0; |
1155 |
for (i=0; i<8; i++) { |
for (i=0; i<sizeof(uint64_t); i++) { |
1156 |
crime_interrupts_mask <<= 8; |
crime_interrupts_mask <<= 8; |
1157 |
crime_interrupts_mask |= x[i]; |
crime_interrupts_mask |= x[i]; |
1158 |
} |
} |
1162 |
else |
else |
1163 |
cpu_interrupt(cpu, 2); |
cpu_interrupt(cpu, 2); |
1164 |
|
|
1165 |
/* printf("sgi_crime_machine_irq(%i,%i): new interrupts = 0x%08x\n", assrt, irq_nr, crime_interrupts); */ |
/* printf("sgi_crime_machine_irq(%i,%i): new interrupts = 0x%08x\n", |
1166 |
|
assrt, irq_nr, crime_interrupts); */ |
1167 |
} |
} |
1168 |
|
|
1169 |
|
|
1216 |
|
|
1217 |
|
|
1218 |
/* |
/* |
1219 |
|
* Malta (evbmips) interrupts: |
1220 |
|
* |
1221 |
|
* ISA interrupts. |
1222 |
|
* (irq_nr = 16+8 can be used to just reassert/deassert interrupts.) |
1223 |
|
*/ |
1224 |
|
void malta_interrupt(struct machine *m, struct cpu *cpu, int irq_nr, |
1225 |
|
int assrt) |
1226 |
|
{ |
1227 |
|
int mask; |
1228 |
|
|
1229 |
|
irq_nr -= 8; |
1230 |
|
mask = 1 << (irq_nr & 7); |
1231 |
|
|
1232 |
|
if (irq_nr < 8) { |
1233 |
|
if (assrt) |
1234 |
|
m->md_int.malta_data->assert_lo |= mask; |
1235 |
|
else |
1236 |
|
m->md_int.malta_data->assert_lo &= ~mask; |
1237 |
|
} else if (irq_nr < 16) { |
1238 |
|
if (assrt) |
1239 |
|
m->md_int.malta_data->assert_hi |= mask; |
1240 |
|
else |
1241 |
|
m->md_int.malta_data->assert_hi &= ~mask; |
1242 |
|
} |
1243 |
|
|
1244 |
|
/* Any interrupt assertions on PIC2 go to irq 2 on PIC1 */ |
1245 |
|
if (m->md_int.malta_data->assert_hi & |
1246 |
|
~m->md_int.malta_data->disable_hi) |
1247 |
|
m->md_int.malta_data->assert_lo |= 0x04; |
1248 |
|
else |
1249 |
|
m->md_int.malta_data->assert_lo &= ~0x04; |
1250 |
|
|
1251 |
|
/* Now, PIC1: */ |
1252 |
|
if (m->md_int.malta_data->assert_lo & |
1253 |
|
~m->md_int.malta_data->disable_lo) |
1254 |
|
cpu_interrupt(cpu, 2); |
1255 |
|
else |
1256 |
|
cpu_interrupt_ack(cpu, 2); |
1257 |
|
} |
1258 |
|
|
1259 |
|
|
1260 |
|
/* |
1261 |
* x86 (PC) interrupts: |
* x86 (PC) interrupts: |
1262 |
* |
* |
1263 |
* (irq_nr = 16 can be used to just reassert/deassert interrupts.) |
* (irq_nr = 16 can be used to just reassert/deassert interrupts.) |
1403 |
|
|
1404 |
case MACHINE_TESTMIPS: |
case MACHINE_TESTMIPS: |
1405 |
/* |
/* |
1406 |
* A MIPS test machine (which happens to work with my |
* A MIPS test machine (which happens to work with the |
1407 |
* thesis work). |
* code in my master's thesis). :-) |
1408 |
*/ |
*/ |
1409 |
cpu->byte_order = EMUL_BIG_ENDIAN; |
cpu->byte_order = EMUL_BIG_ENDIAN; |
1410 |
machine->machine_name = "MIPS test machine"; |
machine->machine_name = "MIPS test machine"; |
1972 |
|
|
1973 |
#if 0 |
#if 0 |
1974 |
if (machine->machine_subtype == MACHINE_DEC_PMAX_3100) |
if (machine->machine_subtype == MACHINE_DEC_PMAX_3100) |
1975 |
strcpy(bootpath, "rz(0,0,0)"); |
strlcpy(bootpath, "rz(0,0,0)", sizeof(bootpath)); |
1976 |
else |
else |
1977 |
#endif |
#endif |
1978 |
strcpy(bootpath, "5/rz1/"); |
strlcpy(bootpath, "5/rz1/", sizeof(bootpath)); |
1979 |
|
|
1980 |
if (bootdev_id < 0 || machine->force_netboot) { |
if (bootdev_id < 0 || machine->force_netboot) { |
1981 |
/* tftp boot: */ |
/* tftp boot: */ |
1982 |
strcpy(bootpath, "5/tftp/"); |
strlcpy(bootpath, "5/tftp/", sizeof(bootpath)); |
1983 |
bootpath[0] = '0' + boot_net_boardnumber; |
bootpath[0] = '0' + boot_net_boardnumber; |
1984 |
} else { |
} else { |
1985 |
/* disk boot: */ |
/* disk boot: */ |
1993 |
init_bootpath = bootpath; |
init_bootpath = bootpath; |
1994 |
} |
} |
1995 |
|
|
1996 |
bootarg = malloc(strlen(init_bootpath) + |
bootarg = malloc(BOOTARG_BUFLEN); |
1997 |
strlen(machine->boot_kernel_filename) + 1 + |
if (bootarg == NULL) { |
1998 |
strlen(machine->boot_string_argument) + 1); |
fprintf(stderr, "out of memory\n"); |
1999 |
strcpy(bootarg, init_bootpath); |
exit(1); |
2000 |
strcat(bootarg, machine->boot_kernel_filename); |
} |
2001 |
|
strlcpy(bootarg, init_bootpath, BOOTARG_BUFLEN); |
2002 |
|
if (strlcat(bootarg, machine->boot_kernel_filename, |
2003 |
|
BOOTARG_BUFLEN) > BOOTARG_BUFLEN) { |
2004 |
|
fprintf(stderr, "bootarg truncated?\n"); |
2005 |
|
exit(1); |
2006 |
|
} |
2007 |
|
|
2008 |
bootstr = "boot"; |
bootstr = "boot"; |
2009 |
|
|
2018 |
cpu->cd.mips.gpr[MIPS_GPR_A0] --; |
cpu->cd.mips.gpr[MIPS_GPR_A0] --; |
2019 |
|
|
2020 |
if (machine->boot_string_argument[0] != '\0') { |
if (machine->boot_string_argument[0] != '\0') { |
2021 |
strcat(bootarg, " "); |
strlcat(bootarg, " ", BOOTARG_BUFLEN); |
2022 |
strcat(bootarg, machine->boot_string_argument); |
if (strlcat(bootarg, machine->boot_string_argument, |
2023 |
|
BOOTARG_BUFLEN) >= BOOTARG_BUFLEN) { |
2024 |
|
fprintf(stderr, "bootstr truncated?\n"); |
2025 |
|
exit(1); |
2026 |
|
} |
2027 |
} |
} |
2028 |
|
|
2029 |
xx.a.common.next = (char *)&xx.b - (char *)&xx; |
xx.a.common.next = (char *)&xx.b - (char *)&xx; |
2032 |
|
|
2033 |
xx.b.common.next = (char *)&xx.c - (char *)&xx.b; |
xx.b.common.next = (char *)&xx.c - (char *)&xx.b; |
2034 |
xx.b.common.type = BTINFO_BOOTPATH; |
xx.b.common.type = BTINFO_BOOTPATH; |
2035 |
strcpy(xx.b.bootpath, bootstr); |
strlcpy(xx.b.bootpath, bootstr, sizeof(xx.b.bootpath)); |
2036 |
|
|
2037 |
xx.c.common.next = 0; |
xx.c.common.next = 0; |
2038 |
xx.c.common.type = BTINFO_SYMTAB; |
xx.c.common.type = BTINFO_SYMTAB; |
2073 |
*/ |
*/ |
2074 |
{ |
{ |
2075 |
char tmps[300]; |
char tmps[300]; |
2076 |
sprintf(tmps, "cca=%x", |
snprintf(tmps, sizeof(tmps), "cca=%x", |
2077 |
(int)(DEC_DECCCA_BASEADDR + 0xa0000000ULL)); |
(int)(DEC_DECCCA_BASEADDR + 0xa0000000ULL)); |
2078 |
add_environment_string(cpu, tmps, &addr); |
add_environment_string(cpu, tmps, &addr); |
2079 |
} |
} |
2080 |
|
|
2081 |
/* These are needed for Sprite to boot: */ |
/* These are needed for Sprite to boot: */ |
2082 |
{ |
{ |
2083 |
char tmps[300]; |
char tmps[500]; |
2084 |
|
|
2085 |
sprintf(tmps, "boot=%s", bootarg); |
snprintf(tmps, sizeof(tmps), "boot=%s", bootarg); |
2086 |
|
tmps[sizeof(tmps)-1] = '\0'; |
2087 |
add_environment_string(cpu, tmps, &addr); |
add_environment_string(cpu, tmps, &addr); |
2088 |
|
|
2089 |
sprintf(tmps, "bitmap=0x%x", (uint32_t)(( |
snprintf(tmps, sizeof(tmps), "bitmap=0x%x", (uint32_t)(( |
2090 |
DEC_MEMMAP_ADDR + sizeof(memmap.pagesize)) |
DEC_MEMMAP_ADDR + sizeof(memmap.pagesize)) |
2091 |
& 0xffffffffULL)); |
& 0xffffffffULL)); |
2092 |
|
tmps[sizeof(tmps)-1] = '\0'; |
2093 |
add_environment_string(cpu, tmps, &addr); |
add_environment_string(cpu, tmps, &addr); |
2094 |
|
|
2095 |
sprintf(tmps, "bitmaplen=0x%x", |
snprintf(tmps, sizeof(tmps), "bitmaplen=0x%x", |
2096 |
machine->physical_ram_in_mb * 1048576 / 4096 / 8); |
machine->physical_ram_in_mb * 1048576 / 4096 / 8); |
2097 |
|
tmps[sizeof(tmps)-1] = '\0'; |
2098 |
add_environment_string(cpu, tmps, &addr); |
add_environment_string(cpu, tmps, &addr); |
2099 |
} |
} |
2100 |
|
|
2153 |
* pciide0 at pci0 dev 9 function 1: VIA Technologies VT82C586 (Apollo VP) ATA33 cr |
* pciide0 at pci0 dev 9 function 1: VIA Technologies VT82C586 (Apollo VP) ATA33 cr |
2154 |
* tlp1 at pci0 dev 12 function 0: DECchip 21143 Ethernet, pass 4.1 |
* tlp1 at pci0 dev 12 function 0: DECchip 21143 Ethernet, pass 4.1 |
2155 |
*/ |
*/ |
2156 |
pci_data = dev_gt_init(machine, mem, 0x14000000, 2, 6); /* 7 for PCI, not 6? */ |
pci_data = dev_gt_init(machine, mem, 0x14000000, 2, 6, 11); /* 7 for PCI, not 6? */ |
2157 |
/* bus_pci_add(machine, pci_data, mem, 0, 7, 0, pci_dec21143_init, pci_dec21143_rr); */ |
/* bus_pci_add(machine, pci_data, mem, 0, 7, 0, pci_dec21143_init, pci_dec21143_rr); */ |
2158 |
bus_pci_add(machine, pci_data, mem, 0, 8, 0, NULL, NULL); /* PCI_VENDOR_SYMBIOS, PCI_PRODUCT_SYMBIOS_860 */ |
bus_pci_add(machine, pci_data, mem, 0, 8, 0, NULL, NULL); /* PCI_VENDOR_SYMBIOS, PCI_PRODUCT_SYMBIOS_860 */ |
2159 |
bus_pci_add(machine, pci_data, mem, 0, 9, 0, pci_vt82c586_isa_init, pci_vt82c586_isa_rr); |
bus_pci_add(machine, pci_data, mem, 0, 9, 0, pci_vt82c586_isa_init, pci_vt82c586_isa_rr); |
2577 |
exit(1); |
exit(1); |
2578 |
} |
} |
2579 |
|
|
2580 |
strcpy(tmp, "root=/dev/hda1 crtmode=vesa0,60"); |
strlcpy(tmp, "root=/dev/hda1 crtmode=vesa0,60", tmplen); |
2581 |
|
|
2582 |
if (machine->boot_string_argument[0]) |
if (machine->boot_string_argument[0]) |
2583 |
snprintf(tmp+strlen(tmp), tmplen-strlen(tmp), |
snprintf(tmp+strlen(tmp), tmplen-strlen(tmp), |
2620 |
* detailed list of IP ("Inhouse Processor") model numbers. |
* detailed list of IP ("Inhouse Processor") model numbers. |
2621 |
* (Or http://hardware.majix.org/computers/sgi/iptable.shtml) |
* (Or http://hardware.majix.org/computers/sgi/iptable.shtml) |
2622 |
*/ |
*/ |
2623 |
machine->machine_name = malloc(500); |
machine->machine_name = malloc(MACHINE_NAME_MAXBUF); |
2624 |
if (machine->machine_name == NULL) { |
if (machine->machine_name == NULL) { |
2625 |
fprintf(stderr, "out of memory\n"); |
fprintf(stderr, "out of memory\n"); |
2626 |
exit(1); |
exit(1); |
2628 |
|
|
2629 |
if (machine->machine_type == MACHINE_SGI) { |
if (machine->machine_type == MACHINE_SGI) { |
2630 |
cpu->byte_order = EMUL_BIG_ENDIAN; |
cpu->byte_order = EMUL_BIG_ENDIAN; |
2631 |
sprintf(machine->machine_name, "SGI-IP%i", machine->machine_subtype); |
snprintf(machine->machine_name, MACHINE_NAME_MAXBUF, |
2632 |
|
"SGI-IP%i", machine->machine_subtype); |
2633 |
|
|
2634 |
sgi_ram_offset = 1048576 * machine->memory_offset_in_mb; |
sgi_ram_offset = 1048576 * machine->memory_offset_in_mb; |
2635 |
|
|
2647 |
} |
} |
2648 |
} else { |
} else { |
2649 |
cpu->byte_order = EMUL_LITTLE_ENDIAN; |
cpu->byte_order = EMUL_LITTLE_ENDIAN; |
2650 |
sprintf(machine->machine_name, "ARC"); |
snprintf(machine->machine_name, |
2651 |
|
MACHINE_NAME_MAXBUF, "ARC"); |
2652 |
} |
} |
2653 |
|
|
2654 |
if (machine->machine_type == MACHINE_SGI) { |
if (machine->machine_type == MACHINE_SGI) { |
2655 |
/* TODO: Other SGI machine types? */ |
/* TODO: Other SGI machine types? */ |
2656 |
switch (machine->machine_subtype) { |
switch (machine->machine_subtype) { |
2657 |
case 12: |
case 12: |
2658 |
strcat(machine->machine_name, " (Iris Indigo IP12)"); |
strlcat(machine->machine_name, |
2659 |
|
" (Iris Indigo IP12)", MACHINE_NAME_MAXBUF); |
2660 |
|
|
2661 |
/* TODO */ |
/* TODO */ |
2662 |
/* 33 MHz R3000, according to http://www.irisindigo.com/ */ |
/* 33 MHz R3000, according to http://www.irisindigo.com/ */ |
2664 |
|
|
2665 |
break; |
break; |
2666 |
case 19: |
case 19: |
2667 |
strcat(machine->machine_name, " (Everest IP19)"); |
strlcat(machine->machine_name, |
2668 |
|
" (Everest IP19)", MACHINE_NAME_MAXBUF); |
2669 |
machine->main_console_handle = |
machine->main_console_handle = |
2670 |
dev_zs_init(machine, mem, 0x1fbd9830, 0, 1, "serial zs"); /* serial? netbsd? */ |
dev_zs_init(machine, mem, 0x1fbd9830, 0, 1, "serial zs"); /* serial? netbsd? */ |
2671 |
dev_scc_init(machine, mem, 0x10086000, 0, machine->use_x11, 0, 8); /* serial? irix? */ |
dev_scc_init(machine, mem, 0x10086000, 0, machine->use_x11, 0, 8); /* serial? irix? */ |
2685 |
|
|
2686 |
break; |
break; |
2687 |
case 20: |
case 20: |
2688 |
strcat(machine->machine_name, " (Indigo)"); |
strlcat(machine->machine_name, |
2689 |
|
" (Indigo)", MACHINE_NAME_MAXBUF); |
2690 |
|
|
2691 |
/* |
/* |
2692 |
* Guesses based on NetBSD 2.0 beta, 20040606. |
* Guesses based on NetBSD 2.0 beta, 20040606. |
2731 |
|
|
2732 |
break; |
break; |
2733 |
case 21: |
case 21: |
2734 |
strcat(machine->machine_name, " (uknown SGI-IP21 ?)"); /* TODO */ |
strlcat(machine->machine_name, /* TODO */ |
2735 |
|
" (uknown SGI-IP21 ?)", MACHINE_NAME_MAXBUF); |
2736 |
/* NOTE: Special case for arc_wordlen: */ |
/* NOTE: Special case for arc_wordlen: */ |
2737 |
arc_wordlen = sizeof(uint64_t); |
arc_wordlen = sizeof(uint64_t); |
2738 |
|
|
2742 |
case 22: |
case 22: |
2743 |
case 24: |
case 24: |
2744 |
if (machine->machine_subtype == 22) { |
if (machine->machine_subtype == 22) { |
2745 |
strcat(machine->machine_name, " (Indy, Indigo2, Challenge S; Full-house)"); |
strlcat(machine->machine_name, |
2746 |
|
" (Indy, Indigo2, Challenge S; Full-house)", |
2747 |
|
MACHINE_NAME_MAXBUF); |
2748 |
machine->md_int.sgi_ip22_data = dev_sgi_ip22_init(machine, mem, 0x1fbd9000, 0); |
machine->md_int.sgi_ip22_data = dev_sgi_ip22_init(machine, mem, 0x1fbd9000, 0); |
2749 |
} else { |
} else { |
2750 |
strcat(machine->machine_name, " (Indy, Indigo2, Challenge S; Guiness)"); |
strlcat(machine->machine_name, |
2751 |
|
" (Indy, Indigo2, Challenge S; Guiness)", |
2752 |
|
MACHINE_NAME_MAXBUF); |
2753 |
machine->md_int.sgi_ip22_data = dev_sgi_ip22_init(machine, mem, 0x1fbd9880, 1); |
machine->md_int.sgi_ip22_data = dev_sgi_ip22_init(machine, mem, 0x1fbd9880, 1); |
2754 |
} |
} |
2755 |
|
|
2822 |
case 25: |
case 25: |
2823 |
/* NOTE: Special case for arc_wordlen: */ |
/* NOTE: Special case for arc_wordlen: */ |
2824 |
arc_wordlen = sizeof(uint64_t); |
arc_wordlen = sizeof(uint64_t); |
2825 |
strcat(machine->machine_name, " (Everest IP25)"); |
strlcat(machine->machine_name, |
2826 |
|
" (Everest IP25)", MACHINE_NAME_MAXBUF); |
2827 |
|
|
2828 |
/* serial? irix? */ |
/* serial? irix? */ |
2829 |
dev_scc_init(machine, mem, |
dev_scc_init(machine, mem, |
2844 |
case 26: |
case 26: |
2845 |
/* NOTE: Special case for arc_wordlen: */ |
/* NOTE: Special case for arc_wordlen: */ |
2846 |
arc_wordlen = sizeof(uint64_t); |
arc_wordlen = sizeof(uint64_t); |
2847 |
strcat(machine->machine_name, |
strlcat(machine->machine_name, |
2848 |
" (uknown SGI-IP26 ?)"); /* TODO */ |
" (uknown SGI-IP26 ?)", |
2849 |
|
MACHINE_NAME_MAXBUF); /* TODO */ |
2850 |
machine->main_console_handle = |
machine->main_console_handle = |
2851 |
dev_zs_init(machine, mem, 0x1fbd9830, |
dev_zs_init(machine, mem, 0x1fbd9830, |
2852 |
0, 1, "zs console"); |
0, 1, "zs console"); |
2853 |
break; |
break; |
2854 |
case 27: |
case 27: |
2855 |
strcat(machine->machine_name, |
strlcat(machine->machine_name, |
2856 |
" (Origin 200/2000, Onyx2)"); |
" (Origin 200/2000, Onyx2)", |
2857 |
|
MACHINE_NAME_MAXBUF); |
2858 |
arc_wordlen = sizeof(uint64_t); |
arc_wordlen = sizeof(uint64_t); |
2859 |
/* 2 cpus per node */ |
/* 2 cpus per node */ |
2860 |
|
|
2865 |
case 28: |
case 28: |
2866 |
/* NOTE: Special case for arc_wordlen: */ |
/* NOTE: Special case for arc_wordlen: */ |
2867 |
arc_wordlen = sizeof(uint64_t); |
arc_wordlen = sizeof(uint64_t); |
2868 |
strcat(machine->machine_name, " (Impact Indigo2 ?)"); |
strlcat(machine->machine_name, |
2869 |
|
" (Impact Indigo2 ?)", MACHINE_NAME_MAXBUF); |
2870 |
|
|
2871 |
device_add(machine, "random addr=0x1fbe0000, len=1"); |
device_add(machine, "random addr=0x1fbe0000, len=1"); |
2872 |
|
|
2876 |
case 30: |
case 30: |
2877 |
/* NOTE: Special case for arc_wordlen: */ |
/* NOTE: Special case for arc_wordlen: */ |
2878 |
arc_wordlen = sizeof(uint64_t); |
arc_wordlen = sizeof(uint64_t); |
2879 |
strcat(machine->machine_name, " (Octane)"); |
strlcat(machine->machine_name, |
2880 |
|
" (Octane)", MACHINE_NAME_MAXBUF); |
2881 |
|
|
2882 |
machine->md_int.sgi_ip30_data = dev_sgi_ip30_init(machine, mem, 0x0ff00000); |
machine->md_int.sgi_ip30_data = dev_sgi_ip30_init(machine, mem, 0x0ff00000); |
2883 |
machine->md_interrupt = sgi_ip30_interrupt; |
machine->md_interrupt = sgi_ip30_interrupt; |
2911 |
|
|
2912 |
break; |
break; |
2913 |
case 32: |
case 32: |
2914 |
strcat(machine->machine_name, " (O2)"); |
strlcat(machine->machine_name, |
2915 |
|
" (O2)", MACHINE_NAME_MAXBUF); |
2916 |
|
|
2917 |
/* TODO: Find out where the physical ram is actually located. */ |
/* TODO: Find out where the physical ram is actually located. */ |
2918 |
dev_ram_init(mem, 0x07ffff00ULL, 256, DEV_RAM_MIRROR, 0x03ffff00); |
dev_ram_init(mem, 0x07ffff00ULL, 256, DEV_RAM_MIRROR, 0x03ffff00); |
2967 |
* intr 7 = MACE_PCI_BRIDGE |
* intr 7 = MACE_PCI_BRIDGE |
2968 |
*/ |
*/ |
2969 |
|
|
2970 |
|
#if 0 |
2971 |
i = dev_pckbc_init(machine, mem, 0x1f320000, |
i = dev_pckbc_init(machine, mem, 0x1f320000, |
2972 |
PCKBC_8242, 0x200 + MACE_PERIPH_MISC, |
PCKBC_8242, 0x200 + MACE_PERIPH_MISC, |
2973 |
0x800 + MACE_PERIPH_MISC, machine->use_x11, 0); |
0x800 + MACE_PERIPH_MISC, machine->use_x11, 0); |
2974 |
/* keyb+mouse (mace irq numbers) */ |
/* keyb+mouse (mace irq numbers) */ |
2975 |
|
#endif |
2976 |
|
|
2977 |
net_generate_unique_mac(machine, macaddr); |
net_generate_unique_mac(machine, macaddr); |
2978 |
eaddr_string = malloc(30); |
eaddr_string = malloc(ETHERNET_STRING_MAXLEN); |
2979 |
if (eaddr_string == NULL) { |
if (eaddr_string == NULL) { |
2980 |
fprintf(stderr, "out of memory\n"); |
fprintf(stderr, "out of memory\n"); |
2981 |
exit(1); |
exit(1); |
2982 |
} |
} |
2983 |
sprintf(eaddr_string, "eaddr=%02x:%02x:" |
snprintf(eaddr_string, ETHERNET_STRING_MAXLEN, |
2984 |
"%02x:%02x:%02x:%02x", |
"eaddr=%02x:%02x:%02x:%02x:%02x:%02x", |
2985 |
macaddr[0], macaddr[1], macaddr[2], |
macaddr[0], macaddr[1], macaddr[2], |
2986 |
macaddr[3], macaddr[4], macaddr[5]); |
macaddr[3], macaddr[4], macaddr[5]); |
2987 |
dev_sgi_mec_init(machine, mem, 0x1f280000, MACE_ETHERNET, macaddr); |
dev_sgi_mec_init(machine, mem, 0x1f280000, |
2988 |
|
MACE_ETHERNET, macaddr); |
2989 |
|
|
2990 |
dev_sgi_ust_init(mem, 0x1f340000); /* ust? */ |
dev_sgi_ust_init(mem, 0x1f340000); /* ust? */ |
2991 |
|
|
2996 |
(1<<26) + MACE_PERIPH_SERIAL, 0x100, |
(1<<26) + MACE_PERIPH_SERIAL, 0x100, |
2997 |
0, "serial 1"); /* com1 */ |
0, "serial 1"); /* com1 */ |
2998 |
|
|
2999 |
|
#if 0 |
3000 |
if (machine->use_x11) |
if (machine->use_x11) |
3001 |
machine->main_console_handle = i; |
machine->main_console_handle = i; |
3002 |
else |
else |
3003 |
|
#endif |
3004 |
machine->main_console_handle = j; |
machine->main_console_handle = j; |
3005 |
|
|
3006 |
dev_mc146818_init(machine, mem, 0x1f3a0000, (1<<8) + MACE_PERIPH_MISC, MC146818_SGI, 0x40); /* mcclock0 */ |
dev_mc146818_init(machine, mem, 0x1f3a0000, (1<<8) + MACE_PERIPH_MISC, MC146818_SGI, 0x40); /* mcclock0 */ |
3033 |
|
|
3034 |
break; |
break; |
3035 |
case 35: |
case 35: |
3036 |
strcat(machine->machine_name, " (Origin 3000)"); |
strlcat(machine->machine_name, |
3037 |
|
" (Origin 3000)", MACHINE_NAME_MAXBUF); |
3038 |
/* 4 cpus per node */ |
/* 4 cpus per node */ |
3039 |
|
|
3040 |
machine->main_console_handle = |
machine->main_console_handle = |
3042 |
0, 1, "zs console"); |
0, 1, "zs console"); |
3043 |
break; |
break; |
3044 |
case 53: |
case 53: |
3045 |
strcat(machine->machine_name, " (Origin 350)"); |
strlcat(machine->machine_name, |
3046 |
|
" (Origin 350)", MACHINE_NAME_MAXBUF); |
3047 |
/* |
/* |
3048 |
* According to http://kumba.drachentekh.net/xml/myguide.html |
* According to http://kumba.drachentekh.net/xml/myguide.html |
3049 |
* Origin 350, Tezro IP53 R16000 |
* Origin 350, Tezro IP53 R16000 |
3070 |
|
|
3071 |
switch (machine->machine_subtype) { |
switch (machine->machine_subtype) { |
3072 |
case MACHINE_ARC_NEC_RD94: |
case MACHINE_ARC_NEC_RD94: |
3073 |
strcat(machine->machine_name, " (NEC-RD94, NEC RISCstation 2250)"); |
strlcat(machine->machine_name, |
3074 |
|
" (NEC-RD94, NEC RISCstation 2250)", |
3075 |
|
MACHINE_NAME_MAXBUF); |
3076 |
break; |
break; |
3077 |
case MACHINE_ARC_NEC_R94: |
case MACHINE_ARC_NEC_R94: |
3078 |
strcat(machine->machine_name, " (NEC-R94; NEC RISCstation 2200)"); |
strlcat(machine->machine_name, " (NEC-R94; NEC RISCstation 2200)", |
3079 |
|
MACHINE_NAME_MAXBUF); |
3080 |
break; |
break; |
3081 |
case MACHINE_ARC_NEC_R96: |
case MACHINE_ARC_NEC_R96: |
3082 |
strcat(machine->machine_name, " (NEC-R96; NEC Express RISCserver)"); |
strlcat(machine->machine_name, " (NEC-R96; NEC Express RISCserver)", |
3083 |
|
MACHINE_NAME_MAXBUF); |
3084 |
break; |
break; |
3085 |
} |
} |
3086 |
|
|
3134 |
* Parallel at "start: 0x 0 18c10278, length: 0x1000, level: 5, vector: 5" |
* Parallel at "start: 0x 0 18c10278, length: 0x1000, level: 5, vector: 5" |
3135 |
*/ |
*/ |
3136 |
|
|
3137 |
strcat(machine->machine_name, " (NEC-R98; NEC RISCserver 4200)"); |
strlcat(machine->machine_name, |
3138 |
|
" (NEC-R98; NEC RISCserver 4200)", |
3139 |
|
MACHINE_NAME_MAXBUF); |
3140 |
|
|
3141 |
/* |
/* |
3142 |
* Windows NT access stuff at these addresses: |
* Windows NT access stuff at these addresses: |
3192 |
|
|
3193 |
switch (machine->machine_subtype) { |
switch (machine->machine_subtype) { |
3194 |
case MACHINE_ARC_JAZZ_PICA: |
case MACHINE_ARC_JAZZ_PICA: |
3195 |
strcat(machine->machine_name, " (Microsoft Jazz, Acer PICA-61)"); |
strlcat(machine->machine_name, " (Microsoft Jazz, Acer PICA-61)", |
3196 |
|
MACHINE_NAME_MAXBUF); |
3197 |
break; |
break; |
3198 |
case MACHINE_ARC_JAZZ_MAGNUM: |
case MACHINE_ARC_JAZZ_MAGNUM: |
3199 |
strcat(machine->machine_name, " (Microsoft Jazz, MIPS Magnum)"); |
strlcat(machine->machine_name, " (Microsoft Jazz, MIPS Magnum)", |
3200 |
|
MACHINE_NAME_MAXBUF); |
3201 |
break; |
break; |
3202 |
default: |
default: |
3203 |
fatal("error in machine.c. jazz\n"); |
fatal("error in machine.c. jazz\n"); |
3275 |
* See http://mail-index.netbsd.org/port-arc/2000/10/18/0001.html. |
* See http://mail-index.netbsd.org/port-arc/2000/10/18/0001.html. |
3276 |
*/ |
*/ |
3277 |
|
|
3278 |
strcat(machine->machine_name, " (Microsoft Jazz, Olivetti M700)"); |
strlcat(machine->machine_name, " (Microsoft Jazz, Olivetti M700)", |
3279 |
|
MACHINE_NAME_MAXBUF); |
3280 |
|
|
3281 |
machine->md_int.jazz_data = device_add(machine, |
machine->md_int.jazz_data = device_add(machine, |
3282 |
"jazz addr=0x80000000"); |
"jazz addr=0x80000000"); |
3314 |
* http://mail-index.netbsd.org/port-arc/2000/10/14/0000.html |
* http://mail-index.netbsd.org/port-arc/2000/10/14/0000.html |
3315 |
*/ |
*/ |
3316 |
|
|
3317 |
strcat(machine->machine_name, " (Deskstation Tyne)"); |
strlcat(machine->machine_name, " (Deskstation Tyne)", |
3318 |
|
MACHINE_NAME_MAXBUF); |
3319 |
|
|
3320 |
i = dev_ns16550_init(machine, mem, 0x9000003f8ULL, 0, 1, machine->use_x11? 0 : 1, "serial 0"); |
i = dev_ns16550_init(machine, mem, 0x9000003f8ULL, 0, 1, machine->use_x11? 0 : 1, "serial 0"); |
3321 |
dev_ns16550_init(machine, mem, 0x9000002f8ULL, 0, 1, 0, "serial 1"); |
dev_ns16550_init(machine, mem, 0x9000002f8ULL, 0, 1, 0, "serial 1"); |
3391 |
/* TODO: Make this nicer. */ |
/* TODO: Make this nicer. */ |
3392 |
if (machine->machine_type == MACHINE_SGI) { |
if (machine->machine_type == MACHINE_SGI) { |
3393 |
if (machine->machine_subtype == 30) |
if (machine->machine_subtype == 30) |
3394 |
strcat(init_bootpath, "xio(0)pci(15)"); |
strlcat(init_bootpath, "xio(0)pci(15)", |
3395 |
|
MACHINE_NAME_MAXBUF); |
3396 |
if (machine->machine_subtype == 32) |
if (machine->machine_subtype == 32) |
3397 |
strcat(init_bootpath, "pci(0)"); |
strlcat(init_bootpath, "pci(0)", |
3398 |
|
MACHINE_NAME_MAXBUF); |
3399 |
} |
} |
3400 |
|
|
3401 |
if (diskimage_is_a_cdrom(machine, bootdev_id, |
if (diskimage_is_a_cdrom(machine, bootdev_id, |
3409 |
} |
} |
3410 |
|
|
3411 |
if (machine->machine_type == MACHINE_ARC) |
if (machine->machine_type == MACHINE_ARC) |
3412 |
strcat(init_bootpath, "\\"); |
strlcat(init_bootpath, "\\", MACHINE_NAME_MAXBUF); |
3413 |
|
|
3414 |
bootstr = malloc(strlen(init_bootpath) + |
bootstr = malloc(BOOTSTR_BUFLEN); |
3415 |
strlen(machine->boot_kernel_filename) + 1); |
if (bootstr == NULL) { |
3416 |
strcpy(bootstr, init_bootpath); |
fprintf(stderr, "out of memory\n"); |
3417 |
strcat(bootstr, machine->boot_kernel_filename); |
exit(1); |
3418 |
|
} |
3419 |
|
strlcpy(bootstr, init_bootpath, BOOTSTR_BUFLEN); |
3420 |
|
if (strlcat(bootstr, machine->boot_kernel_filename, |
3421 |
|
BOOTSTR_BUFLEN) >= BOOTSTR_BUFLEN) { |
3422 |
|
fprintf(stderr, "boot string too long?\n"); |
3423 |
|
exit(1); |
3424 |
|
} |
3425 |
|
|
3426 |
/* Boot args., eg "-a" */ |
/* Boot args., eg "-a" */ |
3427 |
bootarg = machine->boot_string_argument; |
bootarg = machine->boot_string_argument; |
3549 |
add_environment_string(cpu, "kernname=unix", &addr); |
add_environment_string(cpu, "kernname=unix", &addr); |
3550 |
} else { |
} else { |
3551 |
char *tmp; |
char *tmp; |
3552 |
tmp = malloc(strlen(bootarg) + strlen("OSLOADOPTIONS=") + 2); |
size_t mlen = strlen(bootarg) + strlen("OSLOADOPTIONS=") + 2; |
3553 |
sprintf(tmp, "OSLOADOPTIONS=%s", bootarg); |
tmp = malloc(mlen); |
3554 |
|
snprintf(tmp, mlen, "OSLOADOPTIONS=%s", bootarg); |
3555 |
store_pointer_and_advance(cpu, &addr2, addr, arc_wordlen==sizeof(uint64_t)); |
store_pointer_and_advance(cpu, &addr2, addr, arc_wordlen==sizeof(uint64_t)); |
3556 |
add_environment_string(cpu, tmp, &addr); |
add_environment_string(cpu, tmp, &addr); |
3557 |
|
|
3671 |
break; |
break; |
3672 |
|
|
3673 |
case MACHINE_EVBMIPS: |
case MACHINE_EVBMIPS: |
3674 |
/* |
/* http://www.netbsd.org/Ports/evbmips/ */ |
3675 |
* http://www.netbsd.org/Ports/evbmips/ |
cpu->byte_order = EMUL_LITTLE_ENDIAN; |
3676 |
*/ |
|
3677 |
switch (machine->machine_subtype) { |
switch (machine->machine_subtype) { |
3678 |
case MACHINE_EVBMIPS_MALTA: |
case MACHINE_EVBMIPS_MALTA: |
3679 |
machine->machine_name = "MALTA (evbmips)"; |
machine->machine_name = "MALTA (evbmips)"; |
3680 |
|
|
3681 |
|
machine->md_int.malta_data = |
3682 |
|
device_add(machine, "malta addr=0x18000020"); |
3683 |
|
machine->md_interrupt = malta_interrupt; |
3684 |
|
|
3685 |
|
dev_mc146818_init(machine, mem, 0x18000070, |
3686 |
|
8 + 8, MC146818_PC_CMOS, 1); |
3687 |
|
machine->main_console_handle = dev_ns16550_init(machine, mem, |
3688 |
|
0x180003f8, 8 + 4, 1, 1, "serial console"); |
3689 |
|
|
3690 |
|
/* TODO: Irqs */ |
3691 |
|
pci_data = dev_gt_init(machine, mem, 0x1be00000, |
3692 |
|
8+16, 8+16, 120); |
3693 |
|
|
3694 |
|
/* TODO: Haha, this is bogus. Just a cut&paste |
3695 |
|
from the Cobalt emulation above. */ |
3696 |
|
bus_pci_add(machine, pci_data, mem, 0, 9, 0, |
3697 |
|
pci_vt82c586_isa_init, pci_vt82c586_isa_rr); |
3698 |
|
bus_pci_add(machine, pci_data, mem, 0, 9, 1, |
3699 |
|
pci_vt82c586_ide_init, pci_vt82c586_ide_rr); |
3700 |
|
|
3701 |
|
device_add(machine, "malta_lcd addr=0x1f000400"); |
3702 |
break; |
break; |
3703 |
case MACHINE_EVBMIPS_PB1000: |
case MACHINE_EVBMIPS_PB1000: |
3704 |
machine->machine_name = "PB1000 (evbmips)"; |
machine->machine_name = "PB1000 (evbmips)"; |
3705 |
|
machine->md_interrupt = au1x00_interrupt; |
3706 |
|
machine->md_int.au1x00_ic_data = |
3707 |
|
dev_au1x00_init(machine, mem); |
3708 |
break; |
break; |
3709 |
default: |
default: |
3710 |
fatal("Unimplemented EVBMIPS model.\n"); |
fatal("Unimplemented EVBMIPS model.\n"); |
3712 |
} |
} |
3713 |
|
|
3714 |
/* This is just a test. TODO */ |
/* This is just a test. TODO */ |
3715 |
{ |
for (i=0; i<32; i++) |
3716 |
int i; |
cpu->cd.mips.gpr[i] = |
3717 |
for (i=0; i<32; i++) |
0x01230000 + (i << 8) + 0x55; |
|
cpu->cd.mips.gpr[i] = |
|
|
0x01230000 + (i << 8) + 0x55; |
|
|
} |
|
3718 |
|
|
3719 |
/* TODO: Yamon emulation. 0x9fc00504 = putchar? etc. */ |
/* NetBSD/evbmips wants these: (at least for Malta) */ |
3720 |
|
|
3721 |
|
/* a0 = argc */ |
3722 |
|
cpu->cd.mips.gpr[MIPS_GPR_A0] = 2; |
3723 |
|
|
3724 |
|
/* a1 = argv */ |
3725 |
|
cpu->cd.mips.gpr[MIPS_GPR_A1] = (int32_t)0x9fc01000; |
3726 |
|
store_32bit_word(cpu, (int32_t)0x9fc01000, 0x9fc01040); |
3727 |
|
store_32bit_word(cpu, (int32_t)0x9fc01004, 0x9fc01200); |
3728 |
|
|
3729 |
|
bootstr = strdup(machine->boot_kernel_filename); |
3730 |
|
bootarg = strdup(machine->boot_string_argument); |
3731 |
|
store_string(cpu, (int32_t)0x9fc01040, bootstr); |
3732 |
|
store_string(cpu, (int32_t)0x9fc01200, bootarg); |
3733 |
|
|
3734 |
|
/* a2 = (yamon_env_var *)envp */ |
3735 |
|
cpu->cd.mips.gpr[MIPS_GPR_A2] = 0; |
3736 |
|
|
3737 |
|
/* a3 = memsize */ |
3738 |
|
cpu->cd.mips.gpr[MIPS_GPR_A3] = |
3739 |
|
machine->physical_ram_in_mb * 1048576; |
3740 |
|
|
3741 |
|
/* Yamon emulation vectors at 0x9fc005xx: */ |
3742 |
|
for (i=0; i<0x100; i+=4) |
3743 |
|
store_32bit_word(cpu, (int64_t)(int32_t)0x9fc00500 + i, |
3744 |
|
(int64_t)(int32_t)0x9fc00800 + i); |
3745 |
|
break; |
3746 |
|
|
3747 |
|
case MACHINE_PSP: |
3748 |
|
/* |
3749 |
|
* The Playstation Portable seems to be a strange beast. |
3750 |
|
* |
3751 |
|
* http://yun.cup.com/psppg004.html (in Japanese) seems to |
3752 |
|
* suggest that virtual addresses are not displaced by |
3753 |
|
* 0x80000000 as on normal CPUs, but by 0x40000000? |
3754 |
|
*/ |
3755 |
|
machine->machine_name = "Playstation Portable"; |
3756 |
|
cpu->byte_order = EMUL_LITTLE_ENDIAN; |
3757 |
|
|
3758 |
|
if (!machine->use_x11 && !quiet_mode) |
3759 |
|
fprintf(stderr, "-------------------------------------" |
3760 |
|
"------------------------------------------\n" |
3761 |
|
"\n WARNING! You are emulating a PSP without -X. " |
3762 |
|
"You will miss graphical output!\n\n" |
3763 |
|
"-------------------------------------" |
3764 |
|
"------------------------------------------\n"); |
3765 |
|
|
3766 |
|
/* 480 x 272 pixels framebuffer (512 bytes per line) */ |
3767 |
|
fb = dev_fb_init(machine, mem, 0x04000000, VFB_HPCMIPS, |
3768 |
|
480,272, 512,1088, -15, "Playstation Portable", 0); |
3769 |
|
|
3770 |
|
/* |
3771 |
|
* TODO/NOTE: This is ugly, but necessary since GXemul doesn't |
3772 |
|
* emulate any MIPS CPU without MMU right now. |
3773 |
|
*/ |
3774 |
|
mips_coproc_tlb_set_entry(cpu, 0, 1048576*16, |
3775 |
|
0x44000000 /*vaddr*/, 0x4000000, 0x4000000 + 1048576*16, |
3776 |
|
1,1,1,1,1, 0, 2, 2); |
3777 |
|
mips_coproc_tlb_set_entry(cpu, 1, 1048576*16, |
3778 |
|
0x8000000 /*vaddr*/, 0x0, 0x0 + 1048576*16, |
3779 |
|
1,1,1,1,1, 0, 2, 2); |
3780 |
|
mips_coproc_tlb_set_entry(cpu, 2, 1048576*16, |
3781 |
|
0x9000000 /*vaddr*/, 0x01000000, 0x01000000 + 1048576*16, |
3782 |
|
1,1,1,1,1, 0, 2, 2); |
3783 |
|
mips_coproc_tlb_set_entry(cpu, 3, 1048576*16, |
3784 |
|
0x0 /*vaddr*/, 0, 0 + 1048576*16, 1,1,1,1,1, 0, 2, 2); |
3785 |
|
|
3786 |
|
cpu->cd.mips.gpr[MIPS_GPR_SP] = 0xfff0; |
3787 |
|
|
3788 |
break; |
break; |
3789 |
|
|
4013 |
case MACHINE_TESTARM: |
case MACHINE_TESTARM: |
4014 |
machine->machine_name = "ARM test machine"; |
machine->machine_name = "ARM test machine"; |
4015 |
|
|
4016 |
/* TODO */ |
machine->main_console_handle = dev_cons_init( |
4017 |
|
machine, mem, DEV_CONS_ADDRESS, "console", 2); |
4018 |
|
|
4019 |
|
fb = dev_fb_init(machine, mem, 0x12000000, VFB_GENERIC, |
4020 |
|
640,480, 640,480, 24, "generic", 1); |
4021 |
break; |
break; |
4022 |
|
|
4023 |
case MACHINE_BAREX86: |
case MACHINE_BAREX86: |
4159 |
case MACHINE_NETGEAR: |
case MACHINE_NETGEAR: |
4160 |
m->physical_ram_in_mb = 16; |
m->physical_ram_in_mb = 16; |
4161 |
break; |
break; |
4162 |
|
case MACHINE_EVBMIPS: |
4163 |
|
m->physical_ram_in_mb = 64; |
4164 |
|
break; |
4165 |
|
case MACHINE_PSP: |
4166 |
|
/* |
4167 |
|
* According to |
4168 |
|
* http://wiki.ps2dev.org/psp:memory_map: |
4169 |
|
* 0×08000000 = 8 MB kernel memory |
4170 |
|
* 0×08800000 = 24 MB user memory |
4171 |
|
*/ |
4172 |
|
m->physical_ram_in_mb = 8 + 24; |
4173 |
|
break; |
4174 |
case MACHINE_ARC: |
case MACHINE_ARC: |
4175 |
switch (m->machine_subtype) { |
switch (m->machine_subtype) { |
4176 |
case MACHINE_ARC_JAZZ_PICA: |
case MACHINE_ARC_JAZZ_PICA: |
4267 |
case MACHINE_SONYNEWS: |
case MACHINE_SONYNEWS: |
4268 |
m->cpu_name = strdup("R3000"); |
m->cpu_name = strdup("R3000"); |
4269 |
break; |
break; |
|
case MACHINE_EVBMIPS: |
|
|
switch (m->machine_subtype) { |
|
|
case MACHINE_EVBMIPS_MALTA: |
|
|
m->cpu_name = strdup("5Kc"); |
|
|
break; |
|
|
case MACHINE_EVBMIPS_PB1000: |
|
|
m->cpu_name = strdup("AU1000"); |
|
|
break; |
|
|
default:fatal("Unimpl. evbmips.\n"); |
|
|
exit(1); |
|
|
} |
|
|
break; |
|
4270 |
case MACHINE_HPCMIPS: |
case MACHINE_HPCMIPS: |
4271 |
switch (m->machine_subtype) { |
switch (m->machine_subtype) { |
4272 |
case MACHINE_HPCMIPS_CASIO_BE300: |
case MACHINE_HPCMIPS_CASIO_BE300: |
4334 |
if (m->cpu_name == NULL) |
if (m->cpu_name == NULL) |
4335 |
m->cpu_name = strdup("R4400"); |
m->cpu_name = strdup("R4400"); |
4336 |
break; |
break; |
4337 |
|
case MACHINE_EVBMIPS: |
4338 |
|
switch (m->machine_subtype) { |
4339 |
|
case MACHINE_EVBMIPS_MALTA: |
4340 |
|
m->cpu_name = strdup("5Kc"); |
4341 |
|
break; |
4342 |
|
case MACHINE_EVBMIPS_PB1000: |
4343 |
|
m->cpu_name = strdup("AU1000"); |
4344 |
|
break; |
4345 |
|
default:fatal("Unimpl. evbmips.\n"); |
4346 |
|
exit(1); |
4347 |
|
} |
4348 |
|
break; |
4349 |
|
case MACHINE_PSP: |
4350 |
|
m->cpu_name = strdup("Allegrex"); |
4351 |
|
break; |
4352 |
|
|
4353 |
/* PowerPC: */ |
/* PowerPC: */ |
4354 |
case MACHINE_BAREPPC: |
case MACHINE_BAREPPC: |
4817 |
me->next = first_machine_entry; first_machine_entry = me; |
me->next = first_machine_entry; first_machine_entry = me; |
4818 |
} |
} |
4819 |
|
|
4820 |
|
/* Playstation Portable: */ |
4821 |
|
me = machine_entry_new("Playstation Portable", ARCH_MIPS, |
4822 |
|
MACHINE_PSP, 1, 0); |
4823 |
|
me->aliases[0] = "psp"; |
4824 |
|
if (cpu_family_ptr_by_number(ARCH_MIPS) != NULL) { |
4825 |
|
me->next = first_machine_entry; first_machine_entry = me; |
4826 |
|
} |
4827 |
|
|
4828 |
/* NetGear: */ |
/* NetGear: */ |
4829 |
me = machine_entry_new("NetGear WG602", ARCH_MIPS, |
me = machine_entry_new("NetGear WG602", ARCH_MIPS, |
4830 |
MACHINE_NETGEAR, 2, 0); |
MACHINE_NETGEAR, 2, 0); |