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