1 // SPDX-License-Identifier: GPL-2.0
2 /*
3 * linux/arch/m68k/hp300/config.c
4 *
5 * Copyright (C) 1998 Philip Blundell <philb@gnu.org>
6 *
7 * This file contains the HP300-specific initialisation code. It gets
8 * called by setup.c.
9 */
10
11 #include <linux/module.h>
12 #include <linux/init.h>
13 #include <linux/string.h>
14 #include <linux/kernel.h>
15 #include <linux/console.h>
16 #include <linux/rtc.h>
17
18 #include <asm/bootinfo.h>
19 #include <asm/bootinfo-hp300.h>
20 #include <asm/byteorder.h>
21 #include <asm/machdep.h>
22 #include <asm/blinken.h>
23 #include <asm/io.h> /* readb() and writeb() */
24 #include <asm/hp300hw.h>
25 #include <asm/config.h>
26
27 #include "time.h"
28
29 unsigned long hp300_model;
30 unsigned long hp300_uart_scode = -1;
31 unsigned char hp300_ledstate;
32 EXPORT_SYMBOL(hp300_ledstate);
33
34 static char s_hp330[] __initdata = "330";
35 static char s_hp340[] __initdata = "340";
36 static char s_hp345[] __initdata = "345";
37 static char s_hp360[] __initdata = "360";
38 static char s_hp370[] __initdata = "370";
39 static char s_hp375[] __initdata = "375";
40 static char s_hp380[] __initdata = "380";
41 static char s_hp385[] __initdata = "385";
42 static char s_hp400[] __initdata = "400";
43 static char s_hp425t[] __initdata = "425t";
44 static char s_hp425s[] __initdata = "425s";
45 static char s_hp425e[] __initdata = "425e";
46 static char s_hp433t[] __initdata = "433t";
47 static char s_hp433s[] __initdata = "433s";
48 static char *hp300_models[] __initdata = {
49 [HP_320] = NULL,
50 [HP_330] = s_hp330,
51 [HP_340] = s_hp340,
52 [HP_345] = s_hp345,
53 [HP_350] = NULL,
54 [HP_360] = s_hp360,
55 [HP_370] = s_hp370,
56 [HP_375] = s_hp375,
57 [HP_380] = s_hp380,
58 [HP_385] = s_hp385,
59 [HP_400] = s_hp400,
60 [HP_425T] = s_hp425t,
61 [HP_425S] = s_hp425s,
62 [HP_425E] = s_hp425e,
63 [HP_433T] = s_hp433t,
64 [HP_433S] = s_hp433s,
65 };
66
67 static char hp300_model_name[13] = "HP9000/";
68
69 extern void hp300_reset(void);
70 #ifdef CONFIG_SERIAL_8250_CONSOLE
71 extern int hp300_setup_serial_console(void) __init;
72 #endif
73
hp300_parse_bootinfo(const struct bi_record * record)74 int __init hp300_parse_bootinfo(const struct bi_record *record)
75 {
76 int unknown = 0;
77 const void *data = record->data;
78
79 switch (be16_to_cpu(record->tag)) {
80 case BI_HP300_MODEL:
81 hp300_model = be32_to_cpup(data);
82 break;
83
84 case BI_HP300_UART_SCODE:
85 hp300_uart_scode = be32_to_cpup(data);
86 break;
87
88 case BI_HP300_UART_ADDR:
89 /* serial port address: ignored here */
90 break;
91
92 default:
93 unknown = 1;
94 }
95
96 return unknown;
97 }
98
99 #ifdef CONFIG_HEARTBEAT
hp300_pulse(int x)100 static void hp300_pulse(int x)
101 {
102 if (x)
103 blinken_leds(0x10, 0);
104 else
105 blinken_leds(0, 0x10);
106 }
107 #endif
108
hp300_get_model(char * model)109 static void hp300_get_model(char *model)
110 {
111 strcpy(model, hp300_model_name);
112 }
113
114 #define RTCBASE 0xf0420000
115 #define RTC_DATA 0x1
116 #define RTC_CMD 0x3
117
118 #define RTC_BUSY 0x02
119 #define RTC_DATA_RDY 0x01
120
121 #define rtc_busy() (in_8(RTCBASE + RTC_CMD) & RTC_BUSY)
122 #define rtc_data_available() (in_8(RTCBASE + RTC_CMD) & RTC_DATA_RDY)
123 #define rtc_status() (in_8(RTCBASE + RTC_CMD))
124 #define rtc_command(x) out_8(RTCBASE + RTC_CMD, (x))
125 #define rtc_read_data() (in_8(RTCBASE + RTC_DATA))
126 #define rtc_write_data(x) out_8(RTCBASE + RTC_DATA, (x))
127
128 #define RTC_SETREG 0xe0
129 #define RTC_WRITEREG 0xc2
130 #define RTC_READREG 0xc3
131
132 #define RTC_REG_SEC2 0
133 #define RTC_REG_SEC1 1
134 #define RTC_REG_MIN2 2
135 #define RTC_REG_MIN1 3
136 #define RTC_REG_HOUR2 4
137 #define RTC_REG_HOUR1 5
138 #define RTC_REG_WDAY 6
139 #define RTC_REG_DAY2 7
140 #define RTC_REG_DAY1 8
141 #define RTC_REG_MON2 9
142 #define RTC_REG_MON1 10
143 #define RTC_REG_YEAR2 11
144 #define RTC_REG_YEAR1 12
145
146 #define RTC_HOUR1_24HMODE 0x8
147
148 #define RTC_STAT_MASK 0xf0
149 #define RTC_STAT_RDY 0x40
150
hp300_rtc_read(unsigned char reg)151 static inline unsigned char hp300_rtc_read(unsigned char reg)
152 {
153 unsigned char s, ret;
154 unsigned long flags;
155
156 local_irq_save(flags);
157
158 while (rtc_busy());
159 rtc_command(RTC_SETREG);
160 while (rtc_busy());
161 rtc_write_data(reg);
162 while (rtc_busy());
163 rtc_command(RTC_READREG);
164
165 do {
166 while (!rtc_data_available());
167 s = rtc_status();
168 ret = rtc_read_data();
169 } while ((s & RTC_STAT_MASK) != RTC_STAT_RDY);
170
171 local_irq_restore(flags);
172
173 return ret;
174 }
175
hp300_rtc_write(unsigned char reg,unsigned char val)176 static inline unsigned char hp300_rtc_write(unsigned char reg,
177 unsigned char val)
178 {
179 unsigned char s, ret;
180 unsigned long flags;
181
182 local_irq_save(flags);
183
184 while (rtc_busy());
185 rtc_command(RTC_SETREG);
186 while (rtc_busy());
187 rtc_write_data((val << 4) | reg);
188 while (rtc_busy());
189 rtc_command(RTC_WRITEREG);
190 while (rtc_busy());
191 rtc_command(RTC_READREG);
192
193 do {
194 while (!rtc_data_available());
195 s = rtc_status();
196 ret = rtc_read_data();
197 } while ((s & RTC_STAT_MASK) != RTC_STAT_RDY);
198
199 local_irq_restore(flags);
200
201 return ret;
202 }
203
hp300_hwclk(int op,struct rtc_time * t)204 static int hp300_hwclk(int op, struct rtc_time *t)
205 {
206 if (!op) { /* read */
207 t->tm_sec = hp300_rtc_read(RTC_REG_SEC1) * 10 +
208 hp300_rtc_read(RTC_REG_SEC2);
209 t->tm_min = hp300_rtc_read(RTC_REG_MIN1) * 10 +
210 hp300_rtc_read(RTC_REG_MIN2);
211 t->tm_hour = (hp300_rtc_read(RTC_REG_HOUR1) & 3) * 10 +
212 hp300_rtc_read(RTC_REG_HOUR2);
213 t->tm_wday = -1;
214 t->tm_mday = hp300_rtc_read(RTC_REG_DAY1) * 10 +
215 hp300_rtc_read(RTC_REG_DAY2);
216 t->tm_mon = hp300_rtc_read(RTC_REG_MON1) * 10 +
217 hp300_rtc_read(RTC_REG_MON2) - 1;
218 t->tm_year = hp300_rtc_read(RTC_REG_YEAR1) * 10 +
219 hp300_rtc_read(RTC_REG_YEAR2);
220 if (t->tm_year <= 69)
221 t->tm_year += 100;
222 } else {
223 hp300_rtc_write(RTC_REG_SEC1, t->tm_sec / 10);
224 hp300_rtc_write(RTC_REG_SEC2, t->tm_sec % 10);
225 hp300_rtc_write(RTC_REG_MIN1, t->tm_min / 10);
226 hp300_rtc_write(RTC_REG_MIN2, t->tm_min % 10);
227 hp300_rtc_write(RTC_REG_HOUR1,
228 ((t->tm_hour / 10) & 3) | RTC_HOUR1_24HMODE);
229 hp300_rtc_write(RTC_REG_HOUR2, t->tm_hour % 10);
230 hp300_rtc_write(RTC_REG_DAY1, t->tm_mday / 10);
231 hp300_rtc_write(RTC_REG_DAY2, t->tm_mday % 10);
232 hp300_rtc_write(RTC_REG_MON1, (t->tm_mon + 1) / 10);
233 hp300_rtc_write(RTC_REG_MON2, (t->tm_mon + 1) % 10);
234 if (t->tm_year >= 100)
235 t->tm_year -= 100;
236 hp300_rtc_write(RTC_REG_YEAR1, t->tm_year / 10);
237 hp300_rtc_write(RTC_REG_YEAR2, t->tm_year % 10);
238 }
239
240 return 0;
241 }
242
hp300_init_IRQ(void)243 static void __init hp300_init_IRQ(void)
244 {
245 }
246
config_hp300(void)247 void __init config_hp300(void)
248 {
249 mach_sched_init = hp300_sched_init;
250 mach_init_IRQ = hp300_init_IRQ;
251 mach_get_model = hp300_get_model;
252 mach_hwclk = hp300_hwclk;
253 mach_reset = hp300_reset;
254 #ifdef CONFIG_HEARTBEAT
255 mach_heartbeat = hp300_pulse;
256 #endif
257
258 if (hp300_model >= HP_330 && hp300_model <= HP_433S &&
259 hp300_model != HP_350) {
260 pr_info("Detected HP9000 model %s\n",
261 hp300_models[hp300_model-HP_320]);
262 strcat(hp300_model_name, hp300_models[hp300_model-HP_320]);
263 } else {
264 panic("Unknown HP9000 Model");
265 }
266 #ifdef CONFIG_SERIAL_8250_CONSOLE
267 hp300_setup_serial_console();
268 #endif
269 }
270