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

source code of linux/arch/m68k/hp300/config.c