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