| Linus Torvalds | 1da177e | 2005-04-16 15:20:36 -0700 | [diff] [blame] | 1 | /* | 
|  | 2 | * identify.c: machine identification code. | 
|  | 3 | * | 
|  | 4 | * Copyright (C) 1998 Harald Koerfgen and Paul M. Antoine | 
|  | 5 | * Copyright (C) 2002, 2003, 2004  Maciej W. Rozycki | 
|  | 6 | */ | 
|  | 7 | #include <linux/init.h> | 
|  | 8 | #include <linux/kernel.h> | 
|  | 9 | #include <linux/mc146818rtc.h> | 
|  | 10 | #include <linux/module.h> | 
|  | 11 | #include <linux/string.h> | 
|  | 12 | #include <linux/types.h> | 
|  | 13 |  | 
|  | 14 | #include <asm/bootinfo.h> | 
|  | 15 | #include <asm/dec/ioasic.h> | 
|  | 16 | #include <asm/dec/ioasic_addrs.h> | 
|  | 17 | #include <asm/dec/kn01.h> | 
|  | 18 | #include <asm/dec/kn02.h> | 
|  | 19 | #include <asm/dec/kn02ba.h> | 
|  | 20 | #include <asm/dec/kn02ca.h> | 
|  | 21 | #include <asm/dec/kn03.h> | 
|  | 22 | #include <asm/dec/kn230.h> | 
|  | 23 | #include <asm/dec/prom.h> | 
|  | 24 |  | 
|  | 25 | #include "dectypes.h" | 
|  | 26 |  | 
|  | 27 | extern unsigned long mips_machgroup; | 
|  | 28 | extern unsigned long mips_machtype; | 
|  | 29 |  | 
|  | 30 | static const char *dec_system_strings[] = { | 
|  | 31 | [MACH_DSUNKNOWN]	"unknown DECstation", | 
|  | 32 | [MACH_DS23100]		"DECstation 2100/3100", | 
|  | 33 | [MACH_DS5100]		"DECsystem 5100", | 
|  | 34 | [MACH_DS5000_200]	"DECstation 5000/200", | 
|  | 35 | [MACH_DS5000_1XX]	"DECstation 5000/1xx", | 
|  | 36 | [MACH_DS5000_XX]	"Personal DECstation 5000/xx", | 
|  | 37 | [MACH_DS5000_2X0]	"DECstation 5000/2x0", | 
|  | 38 | [MACH_DS5400]		"DECsystem 5400", | 
|  | 39 | [MACH_DS5500]		"DECsystem 5500", | 
|  | 40 | [MACH_DS5800]		"DECsystem 5800", | 
|  | 41 | [MACH_DS5900]		"DECsystem 5900", | 
|  | 42 | }; | 
|  | 43 |  | 
|  | 44 | const char *get_system_type(void) | 
|  | 45 | { | 
|  | 46 | #define STR_BUF_LEN	64 | 
|  | 47 | static char system[STR_BUF_LEN]; | 
|  | 48 | static int called = 0; | 
|  | 49 |  | 
|  | 50 | if (called == 0) { | 
|  | 51 | called = 1; | 
|  | 52 | snprintf(system, STR_BUF_LEN, "Digital %s", | 
|  | 53 | dec_system_strings[mips_machtype]); | 
|  | 54 | } | 
|  | 55 |  | 
|  | 56 | return system; | 
|  | 57 | } | 
|  | 58 |  | 
|  | 59 |  | 
|  | 60 | /* | 
|  | 61 | * Setup essential system-specific memory addresses.  We need them | 
|  | 62 | * early.  Semantically the functions belong to prom/init.c, but they | 
|  | 63 | * are compact enough we want them inlined. --macro | 
|  | 64 | */ | 
|  | 65 | volatile u8 *dec_rtc_base; | 
|  | 66 |  | 
|  | 67 | EXPORT_SYMBOL(dec_rtc_base); | 
|  | 68 |  | 
|  | 69 | static inline void prom_init_kn01(void) | 
|  | 70 | { | 
|  | 71 | dec_rtc_base = (void *)KN01_RTC_BASE; | 
|  | 72 | dec_kn_slot_size = KN01_SLOT_SIZE; | 
|  | 73 | } | 
|  | 74 |  | 
|  | 75 | static inline void prom_init_kn230(void) | 
|  | 76 | { | 
|  | 77 | dec_rtc_base = (void *)KN01_RTC_BASE; | 
|  | 78 | dec_kn_slot_size = KN01_SLOT_SIZE; | 
|  | 79 | } | 
|  | 80 |  | 
|  | 81 | static inline void prom_init_kn02(void) | 
|  | 82 | { | 
|  | 83 | dec_rtc_base = (void *)KN02_RTC_BASE; | 
|  | 84 | dec_kn_slot_size = KN02_SLOT_SIZE; | 
|  | 85 | } | 
|  | 86 |  | 
|  | 87 | static inline void prom_init_kn02xa(void) | 
|  | 88 | { | 
|  | 89 | ioasic_base = (void *)KN02XA_IOASIC_BASE; | 
|  | 90 | dec_rtc_base = (void *)KN02XA_RTC_BASE; | 
|  | 91 | dec_kn_slot_size = IOASIC_SLOT_SIZE; | 
|  | 92 | } | 
|  | 93 |  | 
|  | 94 | static inline void prom_init_kn03(void) | 
|  | 95 | { | 
|  | 96 | ioasic_base = (void *)KN03_IOASIC_BASE; | 
|  | 97 | dec_rtc_base = (void *)KN03_RTC_BASE; | 
|  | 98 | dec_kn_slot_size = IOASIC_SLOT_SIZE; | 
|  | 99 | } | 
|  | 100 |  | 
|  | 101 |  | 
|  | 102 | void __init prom_identify_arch(u32 magic) | 
|  | 103 | { | 
|  | 104 | unsigned char dec_cpunum, dec_firmrev, dec_etc, dec_systype; | 
|  | 105 | u32 dec_sysid; | 
|  | 106 |  | 
|  | 107 | if (!prom_is_rex(magic)) { | 
|  | 108 | dec_sysid = simple_strtoul(prom_getenv("systype"), | 
|  | 109 | (char **)0, 0); | 
|  | 110 | } else { | 
|  | 111 | dec_sysid = rex_getsysid(); | 
|  | 112 | if (dec_sysid == 0) { | 
|  | 113 | printk("Zero sysid returned from PROM! " | 
|  | 114 | "Assuming a PMAX-like machine.\n"); | 
|  | 115 | dec_sysid = 1; | 
|  | 116 | } | 
|  | 117 | } | 
|  | 118 |  | 
|  | 119 | dec_cpunum = (dec_sysid & 0xff000000) >> 24; | 
|  | 120 | dec_systype = (dec_sysid & 0xff0000) >> 16; | 
|  | 121 | dec_firmrev = (dec_sysid & 0xff00) >> 8; | 
|  | 122 | dec_etc = dec_sysid & 0xff; | 
|  | 123 |  | 
|  | 124 | /* We're obviously one of the DEC machines */ | 
|  | 125 | mips_machgroup = MACH_GROUP_DEC; | 
|  | 126 |  | 
|  | 127 | /* | 
|  | 128 | * FIXME: This may not be an exhaustive list of DECStations/Servers! | 
|  | 129 | * Put all model-specific initialisation calls here. | 
|  | 130 | */ | 
|  | 131 | switch (dec_systype) { | 
|  | 132 | case DS2100_3100: | 
|  | 133 | mips_machtype = MACH_DS23100; | 
|  | 134 | prom_init_kn01(); | 
|  | 135 | break; | 
|  | 136 | case DS5100:		/* DS5100 MIPSMATE */ | 
|  | 137 | mips_machtype = MACH_DS5100; | 
|  | 138 | prom_init_kn230(); | 
|  | 139 | break; | 
|  | 140 | case DS5000_200:	/* DS5000 3max */ | 
|  | 141 | mips_machtype = MACH_DS5000_200; | 
|  | 142 | prom_init_kn02(); | 
|  | 143 | break; | 
|  | 144 | case DS5000_1XX:	/* DS5000/100 3min */ | 
|  | 145 | mips_machtype = MACH_DS5000_1XX; | 
|  | 146 | prom_init_kn02xa(); | 
|  | 147 | break; | 
|  | 148 | case DS5000_2X0:	/* DS5000/240 3max+ or DS5900 bigmax */ | 
|  | 149 | mips_machtype = MACH_DS5000_2X0; | 
|  | 150 | prom_init_kn03(); | 
|  | 151 | if (!(ioasic_read(IO_REG_SIR) & KN03_IO_INR_3MAXP)) | 
|  | 152 | mips_machtype = MACH_DS5900; | 
|  | 153 | break; | 
|  | 154 | case DS5000_XX:		/* Personal DS5000/xx maxine */ | 
|  | 155 | mips_machtype = MACH_DS5000_XX; | 
|  | 156 | prom_init_kn02xa(); | 
|  | 157 | break; | 
|  | 158 | case DS5800:		/* DS5800 Isis */ | 
|  | 159 | mips_machtype = MACH_DS5800; | 
|  | 160 | break; | 
|  | 161 | case DS5400:		/* DS5400 MIPSfair */ | 
|  | 162 | mips_machtype = MACH_DS5400; | 
|  | 163 | break; | 
|  | 164 | case DS5500:		/* DS5500 MIPSfair-2 */ | 
|  | 165 | mips_machtype = MACH_DS5500; | 
|  | 166 | break; | 
|  | 167 | default: | 
|  | 168 | mips_machtype = MACH_DSUNKNOWN; | 
|  | 169 | break; | 
|  | 170 | } | 
|  | 171 |  | 
|  | 172 | if (mips_machtype == MACH_DSUNKNOWN) | 
|  | 173 | printk("This is an %s, id is %x\n", | 
|  | 174 | dec_system_strings[mips_machtype], dec_systype); | 
|  | 175 | else | 
|  | 176 | printk("This is a %s\n", dec_system_strings[mips_machtype]); | 
|  | 177 | } |