1// SPDX-License-Identifier: GPL-2.0
2#include <linux/init.h>
3#include <linux/types.h>
4#include <linux/kernel.h>
5#include <linux/mm.h>
6#include <linux/tty.h>
7#include <linux/console.h>
8#include <linux/rtc.h>
9#include <linux/vt_kern.h>
10#include <linux/interrupt.h>
11
12#include <asm/setup.h>
13#include <asm/bootinfo.h>
14#include <asm/bootinfo-apollo.h>
15#include <asm/byteorder.h>
16#include <asm/apollohw.h>
17#include <asm/irq.h>
18#include <asm/machdep.h>
19
20u_long sio01_physaddr;
21u_long sio23_physaddr;
22u_long rtc_physaddr;
23u_long pica_physaddr;
24u_long picb_physaddr;
25u_long cpuctrl_physaddr;
26u_long timer_physaddr;
27u_long apollo_model;
28
29extern void dn_sched_init(irq_handler_t handler);
30extern void dn_init_IRQ(void);
31extern int dn_dummy_hwclk(int, struct rtc_time *);
32extern void dn_dummy_reset(void);
33#ifdef CONFIG_HEARTBEAT
34static void dn_heartbeat(int on);
35#endif
36static irqreturn_t dn_timer_int(int irq,void *);
37static void dn_get_model(char *model);
38static const char *apollo_models[] = {
39	[APOLLO_DN3000-APOLLO_DN3000] = "DN3000 (Otter)",
40	[APOLLO_DN3010-APOLLO_DN3000] = "DN3010 (Otter)",
41	[APOLLO_DN3500-APOLLO_DN3000] = "DN3500 (Cougar II)",
42	[APOLLO_DN4000-APOLLO_DN3000] = "DN4000 (Mink)",
43	[APOLLO_DN4500-APOLLO_DN3000] = "DN4500 (Roadrunner)"
44};
45
46int __init apollo_parse_bootinfo(const struct bi_record *record)
47{
48	int unknown = 0;
49	const void *data = record->data;
50
51	switch (be16_to_cpu(record->tag)) {
52	case BI_APOLLO_MODEL:
53		apollo_model = be32_to_cpup(data);
54		break;
55
56	default:
57		 unknown=1;
58	}
59
60	return unknown;
61}
62
63static void __init dn_setup_model(void)
64{
65	pr_info("Apollo hardware found: [%s]\n",
66		apollo_models[apollo_model - APOLLO_DN3000]);
67
68	switch(apollo_model) {
69		case APOLLO_UNKNOWN:
70			panic("Unknown apollo model");
71			break;
72		case APOLLO_DN3000:
73		case APOLLO_DN3010:
74			sio01_physaddr=SAU8_SIO01_PHYSADDR;
75			rtc_physaddr=SAU8_RTC_PHYSADDR;
76			pica_physaddr=SAU8_PICA;
77			picb_physaddr=SAU8_PICB;
78			cpuctrl_physaddr=SAU8_CPUCTRL;
79			timer_physaddr=SAU8_TIMER;
80			break;
81		case APOLLO_DN4000:
82			sio01_physaddr=SAU7_SIO01_PHYSADDR;
83			sio23_physaddr=SAU7_SIO23_PHYSADDR;
84			rtc_physaddr=SAU7_RTC_PHYSADDR;
85			pica_physaddr=SAU7_PICA;
86			picb_physaddr=SAU7_PICB;
87			cpuctrl_physaddr=SAU7_CPUCTRL;
88			timer_physaddr=SAU7_TIMER;
89			break;
90		case APOLLO_DN4500:
91			panic("Apollo model not yet supported");
92			break;
93		case APOLLO_DN3500:
94			sio01_physaddr=SAU7_SIO01_PHYSADDR;
95			sio23_physaddr=SAU7_SIO23_PHYSADDR;
96			rtc_physaddr=SAU7_RTC_PHYSADDR;
97			pica_physaddr=SAU7_PICA;
98			picb_physaddr=SAU7_PICB;
99			cpuctrl_physaddr=SAU7_CPUCTRL;
100			timer_physaddr=SAU7_TIMER;
101			break;
102		default:
103			panic("Undefined apollo model");
104			break;
105	}
106
107
108}
109
110int dn_serial_console_wait_key(struct console *co) {
111
112	while(!(sio01.srb_csrb & 1))
113		barrier();
114	return sio01.rhrb_thrb;
115}
116
117void dn_serial_console_write (struct console *co, const char *str,unsigned int count)
118{
119   while(count--) {
120	if (*str == '\n') {
121	sio01.rhrb_thrb = (unsigned char)'\r';
122	while (!(sio01.srb_csrb & 0x4))
123                ;
124	}
125    sio01.rhrb_thrb = (unsigned char)*str++;
126    while (!(sio01.srb_csrb & 0x4))
127            ;
128  }
129}
130
131void dn_serial_print (const char *str)
132{
133    while (*str) {
134        if (*str == '\n') {
135            sio01.rhrb_thrb = (unsigned char)'\r';
136            while (!(sio01.srb_csrb & 0x4))
137                ;
138        }
139        sio01.rhrb_thrb = (unsigned char)*str++;
140        while (!(sio01.srb_csrb & 0x4))
141            ;
142    }
143}
144
145void __init config_apollo(void)
146{
147	int i;
148
149	dn_setup_model();
150
151	mach_sched_init=dn_sched_init; /* */
152	mach_init_IRQ=dn_init_IRQ;
153	mach_max_dma_address = 0xffffffff;
154	mach_hwclk           = dn_dummy_hwclk; /* */
155	mach_reset	     = dn_dummy_reset;  /* */
156#ifdef CONFIG_HEARTBEAT
157	mach_heartbeat = dn_heartbeat;
158#endif
159	mach_get_model       = dn_get_model;
160
161	cpuctrl=0xaa00;
162
163	/* clear DMA translation table */
164	for(i=0;i<0x400;i++)
165		addr_xlat_map[i]=0;
166
167}
168
169irqreturn_t dn_timer_int(int irq, void *dev_id)
170{
171	irq_handler_t timer_handler = dev_id;
172
173	volatile unsigned char x;
174
175	timer_handler(irq, dev_id);
176
177	x = *(volatile unsigned char *)(apollo_timer + 3);
178	x = *(volatile unsigned char *)(apollo_timer + 5);
179
180	return IRQ_HANDLED;
181}
182
183void dn_sched_init(irq_handler_t timer_routine)
184{
185	/* program timer 1 */
186	*(volatile unsigned char *)(apollo_timer + 3) = 0x01;
187	*(volatile unsigned char *)(apollo_timer + 1) = 0x40;
188	*(volatile unsigned char *)(apollo_timer + 5) = 0x09;
189	*(volatile unsigned char *)(apollo_timer + 7) = 0xc4;
190
191	/* enable IRQ of PIC B */
192	*(volatile unsigned char *)(pica+1)&=(~8);
193
194#if 0
195	pr_info("*(0x10803) %02x\n",
196		*(volatile unsigned char *)(apollo_timer + 0x3));
197	pr_info("*(0x10803) %02x\n",
198		*(volatile unsigned char *)(apollo_timer + 0x3));
199#endif
200
201	if (request_irq(IRQ_APOLLO, dn_timer_int, 0, "time", timer_routine))
202		pr_err("Couldn't register timer interrupt\n");
203}
204
205int dn_dummy_hwclk(int op, struct rtc_time *t) {
206
207
208  if(!op) { /* read */
209    t->tm_sec=rtc->second;
210    t->tm_min=rtc->minute;
211    t->tm_hour=rtc->hours;
212    t->tm_mday=rtc->day_of_month;
213    t->tm_wday=rtc->day_of_week;
214    t->tm_mon = rtc->month - 1;
215    t->tm_year=rtc->year;
216    if (t->tm_year < 70)
217	t->tm_year += 100;
218  } else {
219    rtc->second=t->tm_sec;
220    rtc->minute=t->tm_min;
221    rtc->hours=t->tm_hour;
222    rtc->day_of_month=t->tm_mday;
223    if(t->tm_wday!=-1)
224      rtc->day_of_week=t->tm_wday;
225    rtc->month = t->tm_mon + 1;
226    rtc->year = t->tm_year % 100;
227  }
228
229  return 0;
230
231}
232
233void dn_dummy_reset(void) {
234
235  dn_serial_print("The end !\n");
236
237  for(;;);
238
239}
240
241void dn_dummy_waitbut(void) {
242
243  dn_serial_print("waitbut\n");
244
245}
246
247static void dn_get_model(char *model)
248{
249    strcpy(model, "Apollo ");
250    if (apollo_model >= APOLLO_DN3000 && apollo_model <= APOLLO_DN4500)
251        strcat(model, apollo_models[apollo_model - APOLLO_DN3000]);
252}
253
254#ifdef CONFIG_HEARTBEAT
255static int dn_cpuctrl=0xff00;
256
257static void dn_heartbeat(int on) {
258
259	if(on) {
260		dn_cpuctrl&=~0x100;
261		cpuctrl=dn_cpuctrl;
262	}
263	else {
264		dn_cpuctrl&=~0x100;
265		dn_cpuctrl|=0x100;
266		cpuctrl=dn_cpuctrl;
267	}
268}
269#endif
270
271