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 } 178