xref: /openbmc/linux/arch/mips/dec/prom/identify.c (revision b2441318)
1 // SPDX-License-Identifier: GPL-2.0
2 /*
3  * identify.c: machine identification code.
4  *
5  * Copyright (C) 1998 Harald Koerfgen and Paul M. Antoine
6  * Copyright (C) 2002, 2003, 2004, 2005  Maciej W. Rozycki
7  */
8 #include <linux/init.h>
9 #include <linux/kernel.h>
10 #include <linux/mc146818rtc.h>
11 #include <linux/export.h>
12 #include <linux/string.h>
13 #include <linux/types.h>
14 
15 #include <asm/bootinfo.h>
16 
17 #include <asm/dec/ioasic.h>
18 #include <asm/dec/ioasic_addrs.h>
19 #include <asm/dec/kn01.h>
20 #include <asm/dec/kn02.h>
21 #include <asm/dec/kn02ba.h>
22 #include <asm/dec/kn02ca.h>
23 #include <asm/dec/kn03.h>
24 #include <asm/dec/kn230.h>
25 #include <asm/dec/prom.h>
26 #include <asm/dec/system.h>
27 
28 #include "dectypes.h"
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 
get_system_type(void)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 
prom_init_kn01(void)69 static inline void prom_init_kn01(void)
70 {
71 	dec_kn_slot_base = KN01_SLOT_BASE;
72 	dec_kn_slot_size = KN01_SLOT_SIZE;
73 
74 	dec_rtc_base = (void *)CKSEG1ADDR(dec_kn_slot_base + KN01_RTC);
75 }
76 
prom_init_kn230(void)77 static inline void prom_init_kn230(void)
78 {
79 	dec_kn_slot_base = KN01_SLOT_BASE;
80 	dec_kn_slot_size = KN01_SLOT_SIZE;
81 
82 	dec_rtc_base = (void *)CKSEG1ADDR(dec_kn_slot_base + KN01_RTC);
83 }
84 
prom_init_kn02(void)85 static inline void prom_init_kn02(void)
86 {
87 	dec_kn_slot_base = KN02_SLOT_BASE;
88 	dec_kn_slot_size = KN02_SLOT_SIZE;
89 	dec_tc_bus = 1;
90 
91 	dec_rtc_base = (void *)CKSEG1ADDR(dec_kn_slot_base + KN02_RTC);
92 }
93 
prom_init_kn02xa(void)94 static inline void prom_init_kn02xa(void)
95 {
96 	dec_kn_slot_base = KN02XA_SLOT_BASE;
97 	dec_kn_slot_size = IOASIC_SLOT_SIZE;
98 	dec_tc_bus = 1;
99 
100 	ioasic_base = (void *)CKSEG1ADDR(dec_kn_slot_base + IOASIC_IOCTL);
101 	dec_rtc_base = (void *)CKSEG1ADDR(dec_kn_slot_base + IOASIC_TOY);
102 }
103 
prom_init_kn03(void)104 static inline void prom_init_kn03(void)
105 {
106 	dec_kn_slot_base = KN03_SLOT_BASE;
107 	dec_kn_slot_size = IOASIC_SLOT_SIZE;
108 	dec_tc_bus = 1;
109 
110 	ioasic_base = (void *)CKSEG1ADDR(dec_kn_slot_base + IOASIC_IOCTL);
111 	dec_rtc_base = (void *)CKSEG1ADDR(dec_kn_slot_base + IOASIC_TOY);
112 }
113 
114 
prom_identify_arch(u32 magic)115 void __init prom_identify_arch(u32 magic)
116 {
117 	unsigned char dec_cpunum, dec_firmrev, dec_etc, dec_systype;
118 	u32 dec_sysid;
119 
120 	if (!prom_is_rex(magic)) {
121 		dec_sysid = simple_strtoul(prom_getenv("systype"),
122 					   (char **)0, 0);
123 	} else {
124 		dec_sysid = rex_getsysid();
125 		if (dec_sysid == 0) {
126 			printk("Zero sysid returned from PROM! "
127 			       "Assuming a PMAX-like machine.\n");
128 			dec_sysid = 1;
129 		}
130 	}
131 
132 	dec_cpunum = (dec_sysid & 0xff000000) >> 24;
133 	dec_systype = (dec_sysid & 0xff0000) >> 16;
134 	dec_firmrev = (dec_sysid & 0xff00) >> 8;
135 	dec_etc = dec_sysid & 0xff;
136 
137 	/*
138 	 * FIXME: This may not be an exhaustive list of DECStations/Servers!
139 	 * Put all model-specific initialisation calls here.
140 	 */
141 	switch (dec_systype) {
142 	case DS2100_3100:
143 		mips_machtype = MACH_DS23100;
144 		prom_init_kn01();
145 		break;
146 	case DS5100:		/* DS5100 MIPSMATE */
147 		mips_machtype = MACH_DS5100;
148 		prom_init_kn230();
149 		break;
150 	case DS5000_200:	/* DS5000 3max */
151 		mips_machtype = MACH_DS5000_200;
152 		prom_init_kn02();
153 		break;
154 	case DS5000_1XX:	/* DS5000/100 3min */
155 		mips_machtype = MACH_DS5000_1XX;
156 		prom_init_kn02xa();
157 		break;
158 	case DS5000_2X0:	/* DS5000/240 3max+ or DS5900 bigmax */
159 		mips_machtype = MACH_DS5000_2X0;
160 		prom_init_kn03();
161 		if (!(ioasic_read(IO_REG_SIR) & KN03_IO_INR_3MAXP))
162 			mips_machtype = MACH_DS5900;
163 		break;
164 	case DS5000_XX:		/* Personal DS5000/xx maxine */
165 		mips_machtype = MACH_DS5000_XX;
166 		prom_init_kn02xa();
167 		break;
168 	case DS5800:		/* DS5800 Isis */
169 		mips_machtype = MACH_DS5800;
170 		break;
171 	case DS5400:		/* DS5400 MIPSfair */
172 		mips_machtype = MACH_DS5400;
173 		break;
174 	case DS5500:		/* DS5500 MIPSfair-2 */
175 		mips_machtype = MACH_DS5500;
176 		break;
177 	default:
178 		mips_machtype = MACH_DSUNKNOWN;
179 		break;
180 	}
181 
182 	if (mips_machtype == MACH_DSUNKNOWN)
183 		printk("This is an %s, id is %x\n",
184 		       dec_system_strings[mips_machtype], dec_systype);
185 	else
186 		printk("This is a %s\n", dec_system_strings[mips_machtype]);
187 }
188