EMILE/second/arch.c

171 lines
3.5 KiB
C

/*
*
* (c) 2004 Laurent Vivier <Laurent@lvivier.info>
*
* some parts from BootX, (c) Benjamin Herrenschmidt
*
*/
#include <macos/lowmem.h>
#include <macos/gestalt.h>
#include <macos/errors.h>
#include "misc.h"
#include "arch.h"
#ifdef ARCH_PPC
#include "bootx.h"
#endif
unsigned long cpu_type;
unsigned long mmu_type;
unsigned long fpu_type;
unsigned long machine_id;
unsigned long arch_type;
unsigned long ram_size;
unsigned long gmt_bias;
#ifdef ARCH_PPC
unsigned long bus_type;
#endif
struct older_macintosh_info {
char *name;
unsigned short ROMID;
unsigned short SSW;
unsigned long cpu_type;
unsigned long mmu_type;
unsigned long fpu_type;
unsigned long machine_id;
unsigned long arch_type;
};
struct older_macintosh_info older_macintosh[] = {
{ "Macintosh SE/30", 0x0178, 0x0603,
gestalt68030, gestalt68030MMU, gestalt68882,
gestaltMacSE030, gestalt68k },
{ "Macintosh Classic", 0x0276, 0x0607,
gestalt68000, gestaltNoMMU, gestaltNoFPU,
gestaltClassic, gestalt68k },
{ 0 }
};
void arch_init()
{
MachineLocation where;
int i = 0;
/* Some systems don't support Gestalt() */
while (older_macintosh[i].name != 0 )
{
if (ROMBase[4] == older_macintosh[i].ROMID)
{
/* Doesn't support Gestalt(), nor SysEnvirons() */
cpu_type = older_macintosh[i].cpu_type;
mmu_type = older_macintosh[i].mmu_type;
fpu_type = older_macintosh[i].fpu_type;
machine_id = older_macintosh[i].machine_id;
arch_type = older_macintosh[i].arch_type;
ram_size = MemTop;
return;
}
i++;
}
/* get RAM size */
Gestalt('ram ', (long*)&ram_size);
/* get processor type */
Gestalt(gestaltProcessorType, (long*)&cpu_type);
/* check FPU */
if (Gestalt('FPUE', (long*)&fpu_type) == noErr)
fpu_type = 0;
else
Gestalt(gestaltFPUType, (long*)&fpu_type);
/* check MMU */
Gestalt(gestaltMMUType, (long*)&mmu_type);
/* I'v got a 'noMMU' with my 68030, not cool... */
if (mmu_type == gestaltNoMMU)
{
switch(cpu_type)
{
case gestalt68030:
mmu_type = gestalt68030MMU;
break;
case gestalt68040:
mmu_type = gestalt68040MMU;
break;
}
}
/* get architecture type: powerPC or m68k */
if (Gestalt(gestaltSysArchitecture, (long*)&arch_type) != noErr)
arch_type = gestalt68k;
/* check machine type */
Gestalt(gestaltMachineType, (long*)&machine_id);
/* GMT bias */
ReadLocation(&where);
gmt_bias = where.u.gmtDelta & 0x00FFFFFF;
if (gmt_bias & 0x00800000)
gmt_bias |= 0xFF000000; /* sign-extend to 32 bits */
gmt_bias = (long)gmt_bias / 60; /* convert to whole minutes, remember sign */
#ifdef ARCH_PPC
/* check bus type */
if (arch_type == gestaltPowerPC)
{
unsigned long response;
/* OpenFirmware implies PCI */
if ( (Gestalt('opfw', &response) == noErr) &&
(Gestalt('nreg', &response) == noErr) )
bus_type = BOOT_ARCH_PCI;
else
bus_type = BOOT_ARCH_NUBUS;
switch(machine_id)
{
case gestaltPowerMac6100_60:
case gestaltPowerMac6100_66:
case gestaltPowerMac6100_80:
case gestaltPowerMac7100_66:
case gestaltPowerMac7100_80:
case gestaltPowerMac7100_80_chipped:
case gestaltPowerMac8100_80:
case gestaltPowerMac8100_100:
case gestaltPowerMac8100_110:
case gestaltPowerMac8100_120:
case gestaltAWS9150_80:
case gestaltAWS9150_120:
bus_type |= BOOT_ARCH_NUBUS_PDM;
break;
case gestaltPowerMac5200:
case gestaltPowerMac6200:
bus_type |= BOOT_ARCH_NUBUS_PERFORMA;
break;
case gestaltPowerBook1400:
case gestaltPowerBook5300:
case gestaltPowerBookDuo2300:
bus_type |= BOOT_ARCH_NUBUS_POWERBOOK;
break;
}
}
#endif
}