xref: /netbsd-src/sys/arch/evbarm/mpcsa/mpcsa_machdep.c (revision bdc22b2e01993381dcefeff2bc9b56ca75a4235c)
1 /*	$Id: mpcsa_machdep.c,v 1.10 2018/07/15 05:16:42 maxv Exp $	*/
2 /*	$NetBSD: mpcsa_machdep.c,v 1.10 2018/07/15 05:16:42 maxv Exp $	*/
3 
4 /*
5  * Copyright (c) 2007 Embedtronics Oy
6  * Based on tsarm_machdep.c
7  *
8  * Copyright (c) 2001, 2002, 2003 Wasabi Systems, Inc.
9  * All rights reserved.
10  *
11  * Based on code written by Jason R. Thorpe and Steve C. Woodford for
12  * Wasabi Systems, Inc.
13  *
14  * Redistribution and use in source and binary forms, with or without
15  * modification, are permitted provided that the following conditions
16  * are met:
17  * 1. Redistributions of source code must retain the above copyright
18  *    notice, this list of conditions and the following disclaimer.
19  * 2. Redistributions in binary form must reproduce the above copyright
20  *    notice, this list of conditions and the following disclaimer in the
21  *    documentation and/or other materials provided with the distribution.
22  * 3. All advertising materials mentioning features or use of this software
23  *    must display the following acknowledgement:
24  *	This product includes software developed for the NetBSD Project by
25  *	Wasabi Systems, Inc.
26  * 4. The name of Wasabi Systems, Inc. may not be used to endorse
27  *    or promote products derived from this software without specific prior
28  *    written permission.
29  *
30  * THIS SOFTWARE IS PROVIDED BY WASABI SYSTEMS, INC. ``AS IS'' AND
31  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
32  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
33  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL WASABI SYSTEMS, INC
34  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
35  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
36  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
37  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
38  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
39  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
40  * POSSIBILITY OF SUCH DAMAGE.
41  */
42 
43 /*
44  * Copyright (c) 1997,1998 Mark Brinicombe.
45  * Copyright (c) 1997,1998 Causality Limited.
46  * All rights reserved.
47  *
48  * Redistribution and use in source and binary forms, with or without
49  * modification, are permitted provided that the following conditions
50  * are met:
51  * 1. Redistributions of source code must retain the above copyright
52  *    notice, this list of conditions and the following disclaimer.
53  * 2. Redistributions in binary form must reproduce the above copyright
54  *    notice, this list of conditions and the following disclaimer in the
55  *    documentation and/or other materials provided with the distribution.
56  * 3. All advertising materials mentioning features or use of this software
57  *    must display the following acknowledgement:
58  *	This product includes software developed by Mark Brinicombe
59  *	for the NetBSD Project.
60  * 4. The name of the company nor the name of the author may be used to
61  *    endorse or promote products derived from this software without specific
62  *    prior written permission.
63  *
64  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR IMPLIED
65  * WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
66  * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
67  * IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT,
68  * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
69  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
70  * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
71  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
72  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
73  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
74  * SUCH DAMAGE.
75  *
76  * Machine dependent functions for kernel setup for Iyonix.
77  */
78 
79 #include <sys/cdefs.h>
80 __KERNEL_RCSID(0, "$NetBSD: mpcsa_machdep.c,v 1.10 2018/07/15 05:16:42 maxv Exp $");
81 
82 #include "opt_ddb.h"
83 #include "opt_kgdb.h"
84 #include "opt_pmap_debug.h"
85 
86 #include <sys/param.h>
87 #include <sys/device.h>
88 #include <sys/systm.h>
89 #include <sys/kernel.h>
90 #include <sys/exec.h>
91 #include <sys/proc.h>
92 #include <sys/msgbuf.h>
93 #include <sys/reboot.h>
94 #include <sys/termios.h>
95 #include <sys/ksyms.h>
96 #include <sys/bus.h>
97 #include <sys/cpu.h>
98 
99 #include <uvm/uvm_extern.h>
100 
101 #include <dev/cons.h>
102 
103 #include <dev/ic/comreg.h>
104 #include <dev/ic/comvar.h>
105 
106 #include <machine/db_machdep.h>
107 #include <ddb/db_sym.h>
108 #include <ddb/db_extern.h>
109 
110 #include <arm/locore.h>
111 #include <arm/undefined.h>
112 
113 #include <arm/arm32/machdep.h>
114 
115 #include <arm/at91/at91reg.h>
116 #include <arm/at91/at91var.h>
117 
118 #define	DRAM_BLOCKS	1
119 #include <machine/bootconfig.h>
120 #include <machine/autoconf.h>
121 
122 #include "seeprom.h"
123 #if NSEEPROM > 0
124 #include <net/if.h>
125 #include <net/if_ether.h>
126 #include <dev/i2c/i2cvar.h>
127 #include <dev/i2c/at24cxxvar.h>
128 #endif
129 #include <arm/at91/at91twivar.h>
130 
131 #if TODO
132 #include "epcom.h"
133 #if NEPCOM > 0
134 #include <arm/ep93xx/epcomvar.h>
135 #endif
136 
137 #include "isa.h"
138 #if NISA > 0
139 #include <dev/isa/isareg.h>
140 #include <dev/isa/isavar.h>
141 #endif
142 
143 #include <machine/isa_machdep.h>
144 
145 #include <evbarm/mpcsa/mpcsareg.h>
146 #endif	// TODO
147 
148 #include <arm/at91/at91rm9200reg.h>
149 #include <arm/at91/at91rm9200busvar.h>
150 
151 #include "ksyms.h"
152 
153 #include <arm/at91/at91busvar.h>
154 #include <arm/at91/at91pdcreg.h>
155 #include <arm/at91/at91dbgureg.h>
156 #include <arm/at91/at91reg.h>
157 #include <arm/at91/at91streg.h>
158 
159 /* boot configuration: */
160 BootConfig bootconfig;		/* Boot config storage */
161 char *boot_args = NULL;
162 char *boot_file = NULL;
163 
164 /* hmmm */
165 static struct arm32_dma_range mpcsa_dma_ranges[4];
166 static struct at91bus_machdep mpcsabus;
167 static at91bus_tag_t old_at91bus_tag;
168 
169 /* Prototypes */
170 static void mpcsa_device_register(device_t dev, void *aux);
171 static void mpcsabus_init(struct at91bus_clocks *);
172 static void mpcsabus_peripheral_clock(int pid, int enable);
173 static uint32_t mpcsabus_gpio_mask(int pid);
174 
175 
176 /*
177  * void cpu_reboot(int howto, char *bootstr)
178  *
179  * Reboots the system
180  *
181  * Deal with any syncing, unmounting, dumping and shutdown hooks,
182  * then reset the CPU.
183  */
184 void
185 cpu_reboot(int howto, char *bootstr)
186 {
187 
188 	/*
189 	 * If we are still cold then hit the air brakes
190 	 * and crash to earth fast
191 	 */
192 	if (cold) {
193 		doshutdownhooks();
194 		pmf_system_shutdown(boothowto);
195 		printf("\r\n");
196 		printf("The operating system has halted.\r\n");
197 		printf("Please press any key to reboot.\r\n");
198 		cngetc();
199 		printf("\r\nrebooting...\r\n");
200 		goto reset;
201 	}
202 
203 	/* Disable console buffering */
204 
205 	/*
206 	 * If RB_NOSYNC was not specified sync the discs.
207 	 * Note: Unless cold is set to 1 here, syslogd will die during the
208 	 * unmount.  It looks like syslogd is getting woken up only to find
209 	 * that it cannot page part of the binary in as the filesystem has
210 	 * been unmounted.
211 	 */
212 	if (!(howto & RB_NOSYNC))
213 		bootsync();
214 
215 	/* Say NO to interrupts */
216 	splhigh();
217 
218 	/* Do a dump if requested. */
219 	if ((howto & (RB_DUMP | RB_HALT)) == RB_DUMP)
220 		dumpsys();
221 
222 	/* Run any shutdown hooks */
223 	doshutdownhooks();
224 
225 	pmf_system_shutdown(boothowto);
226 
227 	/* Make sure IRQ's are disabled */
228 	IRQdisable;
229 
230 	if (howto & RB_HALT) {
231 		printf("\r\n");
232 		printf("The operating system has halted.\r\n");
233 		printf("Please press any key to reboot.\r\n");
234 		cngetc();
235 	}
236 
237 	printf("\r\nrebooting...\r\n");
238  reset:
239 	/*
240 	 * Make really really sure that all interrupts are disabled,
241 	 * and poke the Internal Bus and Peripheral Bus reset lines.
242 	 */
243 	(void) disable_interrupts(I32_bit|F32_bit);
244 	STREG(ST_WDMR)	= ST_WDMR_EXTEN | ST_WDMR_RSTEN | 1;
245 	STREG(ST_CR)	= ST_CR_WDRST;
246 	for (;;);
247 }
248 
249 /*
250  * u_int initarm(...)
251  *
252  * Initial entry point on startup. This gets called before main() is
253  * entered.
254  * It should be responsible for setting up everything that must be
255  * in place when main is called.
256  * This includes
257  *   Taking a copy of the boot configuration structure.
258  *   Initialising the physical console so characters can be printed.
259  *   Setting up page tables for the kernel
260  *   Initialising interrupt controllers to a sane default state
261  */
262 u_int
263 initarm(void *arg)
264 {
265 	u_int ret;
266 	/*
267 	 * basic AT91 initialization:
268 	 */
269 	if (at91bus_init())
270 		panic("%s: at91bus_init() failed", __FUNCTION__);
271 
272 	if (AT91_CHIP_ID() == AT91RM9200_CHIP_ID) {
273 		memcpy(&mpcsabus, at91bus_tag, sizeof(mpcsabus));
274 		mpcsabus.init = mpcsabus_init;
275 		mpcsabus.peripheral_clock = mpcsabus_peripheral_clock;
276 		mpcsabus.gpio_mask = mpcsabus_gpio_mask;
277 		old_at91bus_tag = at91bus_tag;
278 		at91bus_tag = &mpcsabus;
279 	}
280 
281  	/* Fake bootconfig structure for the benefit of pmap.c */
282  	/* XXX must make the memory description h/w independent */
283  	bootconfig.dramblocks = 1;
284  	bootconfig.dram[0].address = 0x20000000UL;
285  	bootconfig.dram[0].pages =   0x04000000UL / PAGE_SIZE;
286 	ret = at91bus_setup(&bootconfig);
287 
288 	if (AT91_CHIP_ID() != AT91RM9200_CHIP_ID)
289 		panic("%s: processor is not AT91RM9200", __FUNCTION__);
290 
291 	/* we've a specific device_register routine */
292 	evbarm_device_register = mpcsa_device_register;
293 
294 	/* We return the new stack pointer address */
295 	return ret;
296 }
297 
298 
299 bus_dma_tag_t
300 at91_bus_dma_init(struct arm32_bus_dma_tag *dma_tag_template)
301 {
302 	int i;
303 	struct arm32_bus_dma_tag *dmat;
304 
305 	for (i = 0; i < bootconfig.dramblocks; i++) {
306 		mpcsa_dma_ranges[i].dr_sysbase = bootconfig.dram[i].address;
307 		mpcsa_dma_ranges[i].dr_busbase = bootconfig.dram[i].address;
308 		mpcsa_dma_ranges[i].dr_len = bootconfig.dram[i].pages *
309 			PAGE_SIZE;
310 	}
311 
312 	dmat = dma_tag_template;
313 
314 	dmat->_ranges = mpcsa_dma_ranges;
315 	dmat->_nranges = bootconfig.dramblocks;
316 
317 	return dmat;
318 }
319 
320 void mpcsabus_init(struct at91bus_clocks *clocks)
321 {
322 	(*old_at91bus_tag->init)(clocks);
323 }
324 
325 uint32_t mpcsabus_gpio_mask(int pid)
326 {
327 	switch (pid) {
328 	case PID_PIOA:	return ~0x00000300U;
329 	case PID_PIOB:	return ~0x0000783FU;
330 	case PID_PIOC:	return ~0x00000000U;
331 	case PID_PIOD:	return ~0x0003F000U;
332 	default:	return ~0x00000000U;
333 	}
334 }
335 
336 void mpcsabus_peripheral_clock(int pid, int enable)
337 {
338 	switch (pid) {
339 	case PID_TWI:
340 		if (enable) {
341 			PIOA_WRITE(PIO_ASR, 0x06000000);	// assign to peripheral A
342 			PIOA_WRITE(PIO_PDR, 0x06000000);	// assign to peripherals
343 			PIOA_WRITE(PIO_MDER, 0x06000000);	// I2C pins in open-drain mode
344 		}
345 		break;
346 
347 	case PID_SPI:
348 		if (enable) {
349 			PIOA_WRITE(PIO_ASR, 0x00000007);	// assign to peripheral A
350 			PIOA_WRITE(PIO_PDR, 0x00000007);	// assign to peripherals
351 		}
352 		break;
353 	}
354 	(*old_at91bus_tag->peripheral_clock)(pid, enable);
355 }
356 
357 
358 static void mpcsa_device_register(device_t dev, void *aux)
359 {
360 	static uint8_t eth_addr[ETHER_ADDR_LEN];
361 
362 	if (device_is_a(dev, "at91emac")) {
363 		cfdriver_t cd = config_cfdriver_lookup("at91twi");
364 		device_t twi_dev = 0;
365 		i2c_tag_t i2c = 0;
366 		if (cd && (twi_dev = device_lookup(cd, 0)) != NULL) {
367 			struct at91twi_softc *sc = device_private(twi_dev);
368 			i2c = &sc->sc_i2c;
369 		}
370 		if (i2c && seeprom_bootstrap_read(i2c, 0x50, 0x00, 4096,
371 					   eth_addr, ETHER_ADDR_LEN) == 0) {
372 			prop_data_t pd = prop_data_create_data_nocopy(
373 				eth_addr, ETHER_ADDR_LEN);
374 			KASSERT(pd != NULL);
375 			if (prop_dictionary_set(device_properties(dev),
376 						"mac-address", pd) == FALSE) {
377 				printf("WARNING: unable to set mac-addr property "
378 				       "for %s\n", device_xname(dev));
379 			}
380 		} else {
381 			printf("%s: WARNING: unable to read MAC address from SEEPROM\n",
382 			       device_xname(dev));
383 		}
384 	}
385 }
386