1 /* $Id: mpcsa_machdep.c,v 1.13 2020/04/18 11:00:40 skrll Exp $ */
2 /* $NetBSD: mpcsa_machdep.c,v 1.13 2020/04/18 11:00:40 skrll 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.13 2020/04/18 11:00:40 skrll Exp $");
81
82 #include "opt_ddb.h"
83 #include "opt_kgdb.h"
84
85 #include <sys/param.h>
86 #include <sys/device.h>
87 #include <sys/systm.h>
88 #include <sys/kernel.h>
89 #include <sys/exec.h>
90 #include <sys/proc.h>
91 #include <sys/msgbuf.h>
92 #include <sys/reboot.h>
93 #include <sys/termios.h>
94 #include <sys/ksyms.h>
95 #include <sys/bus.h>
96 #include <sys/cpu.h>
97
98 #include <uvm/uvm_extern.h>
99
100 #include <dev/cons.h>
101
102 #include <dev/ic/comreg.h>
103 #include <dev/ic/comvar.h>
104
105 #include <machine/db_machdep.h>
106 #include <ddb/db_sym.h>
107 #include <ddb/db_extern.h>
108
109 #include <arm/locore.h>
110 #include <arm/undefined.h>
111
112 #include <arm/arm32/machdep.h>
113
114 #include <arm/at91/at91reg.h>
115 #include <arm/at91/at91var.h>
116
117 #define DRAM_BLOCKS 1
118 #include <machine/bootconfig.h>
119 #include <machine/autoconf.h>
120
121 #include "seeprom.h"
122 #if NSEEPROM > 0
123 #include <net/if.h>
124 #include <net/if_ether.h>
125 #include <dev/i2c/i2cvar.h>
126 #include <dev/i2c/at24cxxvar.h>
127 #endif
128 #include <arm/at91/at91twivar.h>
129
130 #if TODO
131 #include "epcom.h"
132 #if NEPCOM > 0
133 #include <arm/ep93xx/epcomvar.h>
134 #endif
135
136 #include "isa.h"
137 #if NISA > 0
138 #include <dev/isa/isareg.h>
139 #include <dev/isa/isavar.h>
140 #endif
141
142 #include <machine/isa_machdep.h>
143
144 #include <evbarm/mpcsa/mpcsareg.h>
145 #endif // TODO
146
147 #include <arm/at91/at91rm9200reg.h>
148 #include <arm/at91/at91rm9200busvar.h>
149
150 #include "ksyms.h"
151
152 #include <arm/at91/at91busvar.h>
153 #include <arm/at91/at91pdcreg.h>
154 #include <arm/at91/at91dbgureg.h>
155 #include <arm/at91/at91reg.h>
156 #include <arm/at91/at91streg.h>
157
158 /* boot configuration: */
159 BootConfig bootconfig; /* Boot config storage */
160 char *boot_args = NULL;
161 char *boot_file = NULL;
162
163 /* hmmm */
164 static struct arm32_dma_range mpcsa_dma_ranges[4];
165 static struct at91bus_machdep mpcsabus;
166 static at91bus_tag_t old_at91bus_tag;
167
168 /* Prototypes */
169 static void mpcsa_device_register(device_t dev, void *aux);
170 static void mpcsabus_init(struct at91bus_clocks *);
171 static void mpcsabus_peripheral_clock(int pid, int enable);
172 static uint32_t mpcsabus_gpio_mask(int pid);
173
174
175 /*
176 * void cpu_reboot(int howto, char *bootstr)
177 *
178 * Reboots the system
179 *
180 * Deal with any syncing, unmounting, dumping and shutdown hooks,
181 * then reset the CPU.
182 */
183 void
cpu_reboot(int howto,char * bootstr)184 cpu_reboot(int howto, char *bootstr)
185 {
186
187 /*
188 * If we are still cold then hit the air brakes
189 * and crash to earth fast
190 */
191 if (cold) {
192 doshutdownhooks();
193 pmf_system_shutdown(boothowto);
194 printf("\r\n");
195 printf("The operating system has halted.\r\n");
196 printf("Please press any key to reboot.\r\n");
197 cngetc();
198 printf("\r\nrebooting...\r\n");
199 goto reset;
200 }
201
202 /* Disable console buffering */
203
204 /*
205 * If RB_NOSYNC was not specified sync the discs.
206 * Note: Unless cold is set to 1 here, syslogd will die during the
207 * unmount. It looks like syslogd is getting woken up only to find
208 * that it cannot page part of the binary in as the filesystem has
209 * been unmounted.
210 */
211 if (!(howto & RB_NOSYNC))
212 bootsync();
213
214 /* Say NO to interrupts */
215 splhigh();
216
217 /* Do a dump if requested. */
218 if ((howto & (RB_DUMP | RB_HALT)) == RB_DUMP)
219 dumpsys();
220
221 /* Run any shutdown hooks */
222 doshutdownhooks();
223
224 pmf_system_shutdown(boothowto);
225
226 /* Make sure IRQ's are disabled */
227 IRQdisable;
228
229 if (howto & RB_HALT) {
230 printf("\r\n");
231 printf("The operating system has halted.\r\n");
232 printf("Please press any key to reboot.\r\n");
233 cngetc();
234 }
235
236 printf("\r\nrebooting...\r\n");
237 reset:
238 /*
239 * Make really really sure that all interrupts are disabled,
240 * and poke the Internal Bus and Peripheral Bus reset lines.
241 */
242 (void) disable_interrupts(I32_bit|F32_bit);
243 STREG(ST_WDMR) = ST_WDMR_EXTEN | ST_WDMR_RSTEN | 1;
244 STREG(ST_CR) = ST_CR_WDRST;
245 for (;;);
246 }
247
248 /*
249 * vaddr_t initarm(...)
250 *
251 * Initial entry point on startup. This gets called before main() is
252 * entered.
253 * It should be responsible for setting up everything that must be
254 * in place when main is called.
255 * This includes
256 * Taking a copy of the boot configuration structure.
257 * Initialising the physical console so characters can be printed.
258 * Setting up page tables for the kernel
259 * Initialising interrupt controllers to a sane default state
260 */
261 vaddr_t
initarm(void * arg)262 initarm(void *arg)
263 {
264 vaddr_t sp;
265 /*
266 * basic AT91 initialization:
267 */
268 if (at91bus_init())
269 panic("%s: at91bus_init() failed", __FUNCTION__);
270
271 if (AT91_CHIP_ID() == AT91RM9200_CHIP_ID) {
272 memcpy(&mpcsabus, at91bus_tag, sizeof(mpcsabus));
273 mpcsabus.init = mpcsabus_init;
274 mpcsabus.peripheral_clock = mpcsabus_peripheral_clock;
275 mpcsabus.gpio_mask = mpcsabus_gpio_mask;
276 old_at91bus_tag = at91bus_tag;
277 at91bus_tag = &mpcsabus;
278 }
279
280 /* Fake bootconfig structure for the benefit of pmap.c */
281 /* XXX must make the memory description h/w independent */
282 bootconfig.dramblocks = 1;
283 bootconfig.dram[0].address = 0x20000000UL;
284 bootconfig.dram[0].pages = 0x04000000UL / PAGE_SIZE;
285 sp = at91bus_setup(&bootconfig);
286
287 if (AT91_CHIP_ID() != AT91RM9200_CHIP_ID)
288 panic("%s: processor is not AT91RM9200", __FUNCTION__);
289
290 /* we've a specific device_register routine */
291 evbarm_device_register = mpcsa_device_register;
292
293 /* We return the new stack pointer address */
294 return sp;
295 }
296
297
298 bus_dma_tag_t
at91_bus_dma_init(struct arm32_bus_dma_tag * dma_tag_template)299 at91_bus_dma_init(struct arm32_bus_dma_tag *dma_tag_template)
300 {
301 int i;
302 struct arm32_bus_dma_tag *dmat;
303
304 for (i = 0; i < bootconfig.dramblocks; i++) {
305 mpcsa_dma_ranges[i].dr_sysbase = bootconfig.dram[i].address;
306 mpcsa_dma_ranges[i].dr_busbase = bootconfig.dram[i].address;
307 mpcsa_dma_ranges[i].dr_len = bootconfig.dram[i].pages *
308 PAGE_SIZE;
309 }
310
311 dmat = dma_tag_template;
312
313 dmat->_ranges = mpcsa_dma_ranges;
314 dmat->_nranges = bootconfig.dramblocks;
315
316 return dmat;
317 }
318
mpcsabus_init(struct at91bus_clocks * clocks)319 void mpcsabus_init(struct at91bus_clocks *clocks)
320 {
321 (*old_at91bus_tag->init)(clocks);
322 }
323
mpcsabus_gpio_mask(int pid)324 uint32_t mpcsabus_gpio_mask(int pid)
325 {
326 switch (pid) {
327 case PID_PIOA: return ~0x00000300U;
328 case PID_PIOB: return ~0x0000783FU;
329 case PID_PIOC: return ~0x00000000U;
330 case PID_PIOD: return ~0x0003F000U;
331 default: return ~0x00000000U;
332 }
333 }
334
mpcsabus_peripheral_clock(int pid,int enable)335 void mpcsabus_peripheral_clock(int pid, int enable)
336 {
337 switch (pid) {
338 case PID_TWI:
339 if (enable) {
340 PIOA_WRITE(PIO_ASR, 0x06000000); // assign to peripheral A
341 PIOA_WRITE(PIO_PDR, 0x06000000); // assign to peripherals
342 PIOA_WRITE(PIO_MDER, 0x06000000); // I2C pins in open-drain mode
343 }
344 break;
345
346 case PID_SPI:
347 if (enable) {
348 PIOA_WRITE(PIO_ASR, 0x00000007); // assign to peripheral A
349 PIOA_WRITE(PIO_PDR, 0x00000007); // assign to peripherals
350 }
351 break;
352 }
353 (*old_at91bus_tag->peripheral_clock)(pid, enable);
354 }
355
356
mpcsa_device_register(device_t dev,void * aux)357 static void mpcsa_device_register(device_t dev, void *aux)
358 {
359 static uint8_t eth_addr[ETHER_ADDR_LEN];
360
361 if (device_is_a(dev, "at91emac")) {
362 cfdriver_t cd = config_cfdriver_lookup("at91twi");
363 device_t twi_dev = 0;
364 i2c_tag_t i2c = 0;
365 if (cd && (twi_dev = device_lookup(cd, 0)) != NULL) {
366 struct at91twi_softc *sc = device_private(twi_dev);
367 i2c = &sc->sc_i2c;
368 }
369 if (i2c && seeprom_bootstrap_read(i2c, 0x50, 0x00, 4096,
370 eth_addr, ETHER_ADDR_LEN) == 0) {
371 prop_data_t pd = prop_data_create_data_nocopy(
372 eth_addr, ETHER_ADDR_LEN);
373 KASSERT(pd != NULL);
374 if (prop_dictionary_set(device_properties(dev),
375 "mac-address", pd) == FALSE) {
376 printf("WARNING: unable to set mac-addr property "
377 "for %s\n", device_xname(dev));
378 }
379 } else {
380 printf("%s: WARNING: unable to read MAC address from SEEPROM\n",
381 device_xname(dev));
382 }
383 }
384 }
385