machdep.c revision 1.8 
1/*	$NetBSD: machdep.c,v 1.8 2009/11/21 17:40:28 rmind Exp $	*/
2
3/*
4 * Copyright (c) 2002 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Lennart Augustsson (lennart@augustsson.net) at Sandburst Corp.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 *    notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 *    notice, this list of conditions and the following disclaimer in the
17 *    documentation and/or other materials provided with the distribution.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22 * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29 * POSSIBILITY OF SUCH DAMAGE.
30 */
31
32/*
33 * Copyright (C) 1995, 1996 Wolfgang Solfrank.
34 * Copyright (C) 1995, 1996 TooLs GmbH.
35 * All rights reserved.
36 *
37 * Redistribution and use in source and binary forms, with or without
38 * modification, are permitted provided that the following conditions
39 * are met:
40 * 1. Redistributions of source code must retain the above copyright
41 *    notice, this list of conditions and the following disclaimer.
42 * 2. Redistributions in binary form must reproduce the above copyright
43 *    notice, this list of conditions and the following disclaimer in the
44 *    documentation and/or other materials provided with the distribution.
45 * 3. All advertising materials mentioning features or use of this software
46 *    must display the following acknowledgement:
47 *	This product includes software developed by TooLs GmbH.
48 * 4. The name of TooLs GmbH may not be used to endorse or promote products
49 *    derived from this software without specific prior written permission.
50 *
51 * THIS SOFTWARE IS PROVIDED BY TOOLS GMBH ``AS IS'' AND ANY EXPRESS OR
52 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
53 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
54 * IN NO EVENT SHALL TOOLS GMBH BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
55 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
56 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
57 * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
58 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
59 * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
60 * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
61 */
62
63#include <sys/cdefs.h>
64__KERNEL_RCSID(0, "$NetBSD: machdep.c,v 1.8 2009/11/21 17:40:28 rmind Exp $");
65
66#include "opt_compat_netbsd.h"
67#include "opt_ddb.h"
68#include "opt_ddbparam.h"
69#include "opt_inet.h"
70#include "opt_ccitt.h"
71#include "opt_iso.h"
72#include "opt_ns.h"
73#include "opt_ipkdb.h"
74
75#include <sys/param.h>
76#include <sys/buf.h>
77#include <sys/conf.h>
78#include <sys/device.h>
79#include <sys/exec.h>
80#include <sys/extent.h>
81#include <sys/kernel.h>
82#include <sys/kgdb.h>
83#include <sys/malloc.h>
84#include <sys/mbuf.h>
85#include <sys/mount.h>
86#include <sys/msgbuf.h>
87#include <sys/proc.h>
88#include <sys/reboot.h>
89#include <sys/syscallargs.h>
90#include <sys/syslog.h>
91#include <sys/sysctl.h>
92#include <sys/systm.h>
93#include <sys/ksyms.h>
94
95#include <uvm/uvm.h>
96#include <uvm/uvm_extern.h>
97
98#include <net/netisr.h>
99
100#include <machine/bus.h>
101#include <machine/db_machdep.h>
102#include <machine/intr.h>
103#include <machine/pio.h>
104#include <machine/pmap.h>
105#include <machine/powerpc.h>
106#include <machine/trap.h>
107#include <machine/pmppc.h>
108
109#include <powerpc/oea/bat.h>
110#include <arch/powerpc/pic/picvar.h>
111
112#include <ddb/db_extern.h>
113
114#include <dev/cons.h>
115
116#include <dev/ic/cpc700reg.h>
117#include <dev/ic/cpc700uic.h>
118
119#include "com.h"
120#if (NCOM > 0)
121#include <sys/termios.h>
122#include <dev/ic/comreg.h>
123#include <dev/ic/comvar.h>
124#endif
125
126#include "ksyms.h"
127
128struct powerpc_bus_space pmppc_mem_tag = {
129	_BUS_SPACE_LITTLE_ENDIAN|_BUS_SPACE_MEM_TYPE,
130	0, 0, 0xffffffff,
131	NULL,
132};
133struct powerpc_bus_space pmppc_pci_io_tag = {
134	_BUS_SPACE_LITTLE_ENDIAN|_BUS_SPACE_MEM_TYPE,
135	0, CPC_PCI_IO_BASE, 0xffffffff,
136	NULL,
137};
138
139static char ex_storage[1][EXTENT_FIXED_STORAGE_SIZE(8)]
140    __attribute__((aligned(8)));
141
142
143#ifdef KGDB
144char kgdb_devname[] = KGDB_DEVNAME;
145int comkgdbaddr = KGDB_DEVADDR;
146int comkgdbrate = KGDB_DEVRATE;
147
148#ifndef KGDB_DEVMODE
149#define KGDB_DEVMODE ((TTYDEF_CFLAG & ~(CSIZE | CSTOPB | PARENB)) | CS8) /* 8N1 */
150#endif
151int comkgdbmode = KGDB_DEVMODE;
152
153void kgdb_port_init(void);
154#endif /* KGDB */
155
156/*
157 * Global variables used here and there
158 */
159struct mem_region physmemr[2], availmemr[2];
160
161struct a_config a_config;
162
163void initppc(u_int, u_int, u_int, void *); /* Called from locore */
164void pmppc_setup(void);
165void setleds(int leds);
166
167/*
168 * Force cpu_info to be in the data segment to avoid the
169 * memset() blowing away the data set up by locore.S.
170 */
171#if 0
172 /* this is defined in powerpc/oea/cpu_subr.c, I don't understand the above
173  * comment however.
174  */
175struct cpu_info cpu_info[1] = { { .ci_curlwp = &lwp0, }, };
176#endif
177
178void
179initppc(u_int startkernel, u_int endkernel, u_int args, void *btinfo)
180{
181	extern void consinit(void);
182	extern u_long ticks_per_sec;
183	extern unsigned char edata[], end[];
184
185	memset(&edata, 0, end - edata); /* clear BSS */
186
187	pmppc_setup();
188
189	physmemr[0].start = 0;
190	physmemr[0].size = a_config.a_mem_size;
191	physmemr[1].size = 0;
192	availmemr[0].start = (endkernel + PGOFSET) & ~PGOFSET;
193	availmemr[0].size = a_config.a_mem_size - availmemr[0].start;
194	availmemr[1].size = 0;
195
196#ifdef BOOTHOWTO
197	/*
198	 * boothowto
199	 */
200	boothowto = BOOTHOWTO;
201#endif
202
203	if (bus_space_init(&pmppc_mem_tag, "iomem",
204			   ex_storage[0], sizeof(ex_storage[0])))
205		panic("bus_space_init failed");
206
207	/*
208	 * Get CPU clock
209	 */
210	ticks_per_sec = a_config.a_bus_freq;
211	ticks_per_sec /= 4;	/* 4 cycles per DEC tick */
212	cpu_timebase = ticks_per_sec;
213	cpu_initclocks();
214
215	/*
216	 * Initialize the BAT registers
217	 */
218	oea_batinit(
219	    PMPPC_FLASH_BASE, BAT_BL_256M, /* flash (etc) memory 256M area */
220	    CPC_PCI_MEM_BASE, BAT_BL_256M, /* PCI memory 256M area */
221	    CPC_PCI_IO_BASE,  BAT_BL_128M, /* PCI I/O 128M area */
222	    0);
223
224	/*
225	 * Set up trap vectors
226	 */
227	oea_init(NULL);
228
229	/*
230	 * Set up console.
231	 */
232	consinit();		/* XXX should not be here */
233
234	printf("console set up\n");
235
236        /*
237	 * Set the page size.
238	 */
239	uvm_setpagesize();
240
241	/*
242	 * Initialize pmap module.
243	 */
244	pmap_bootstrap(startkernel, endkernel);
245
246#ifdef IPKDB
247	/*
248	 * Now trap to IPKDB
249	 */
250	ipkdb_init();
251	if (boothowto & RB_KDB)
252		ipkdb_connect(0);
253#endif
254#ifdef KGDB
255	kgdb_port_init();
256	if (boothowto & RB_KDB) {
257		kgdb_debug_init = 1;
258		kgdb_connect(1);
259	}
260#endif
261}
262
263void
264mem_regions(struct mem_region **mem, struct mem_region **avail)
265{
266	*mem = physmemr;
267	*avail = availmemr;
268}
269
270/*
271 * Machine dependent startup code.
272 */
273void
274cpu_startup(void)
275{
276
277	oea_startup(NULL);
278
279	/*
280	 * Now that we have VM, malloc()s are OK in bus_space.
281	 */
282	bus_space_mallocok();
283
284	/* Set up the PCI bus tag. */
285	if (bus_space_init(&pmppc_pci_io_tag, "pcimem", NULL, 0))
286		panic("bus_space_init pci failed");
287
288	/* Set up interrupt controller */
289	cpc700_init_intr(&pmppc_mem_tag, CPC_UIC_BASE,
290	    CPC_INTR_MASK(PMPPC_I_ETH_INT), 0);
291
292	pic_init();
293	(void)setup_cpc700();
294	oea_install_extint(pic_ext_intr);
295
296#if 0
297/* XXX doesn't seem to be needed anymore */
298	/*
299	 * Now allow hardware interrupts.
300	 */
301	__asm volatile ("mfmsr %0; ori %0,%0,%1; mtmsr %0"
302	    : "=r"(msr) : "K"(PSL_EE));
303#endif
304}
305
306/*
307 * consinit
308 * Initialize system console.
309 */
310void
311consinit(void)
312{
313	static int initted;
314#if (NCOM > 0)
315	bus_space_tag_t tag;
316#endif
317
318	if (initted)
319		return;
320	initted = 1;
321
322#if (NCOM > 0)
323	tag = &pmppc_mem_tag;
324
325	if(comcnattach(tag, CPC_COM0, 9600, CPC_COM_SPEED(a_config.a_bus_freq),
326	    COM_TYPE_NORMAL,
327            ((TTYDEF_CFLAG & ~(CSIZE | CSTOPB | PARENB)) | CS8)))
328		panic("can't init serial console");
329	else
330		return;
331#endif
332
333	panic("console device missing -- serial console not in kernel");
334	/* Of course, this is moot if there is no console... */
335}
336
337#ifdef KGDB
338void
339kgdb_port_init(void)
340{
341#if (NCOM > 0)
342	if(!strcmp(kgdb_devname, "com")) {
343		bus_space_tag_t tag = &pmppc_mem_tag;
344		com_kgdb_attach(tag, comkgdbaddr, comkgdbrate,
345				CPC_COM_SPEED(a_config.a_bus_freq),
346				COM_TYPE_NORMAL, comkgdbmode);
347	}
348#endif
349}
350#endif
351
352/*
353 * Halt or reboot the machine after syncing/dumping according to howto.
354 */
355void
356cpu_reboot(int howto, char *what)
357{
358	static int syncing;
359	static char str[256];
360	char *ap = str, *ap1 = ap;
361	extern void disable_intr(void);
362
363	boothowto = howto;
364	if (!cold && !(howto & RB_NOSYNC) && !syncing) {
365		syncing = 1;
366		vfs_shutdown();		/* sync */
367		resettodr();		/* set wall clock */
368	}
369	splhigh();
370	if (howto & RB_HALT) {
371		doshutdownhooks();
372		pmf_system_shutdown(boothowto);
373		printf("halted\n\n");
374		while(1);
375	}
376	if (!cold && (howto & RB_DUMP))
377		oea_dumpsys();
378	doshutdownhooks();
379
380	pmf_system_shutdown(boothowto);
381	printf("rebooting\n\n");
382	if (what && *what) {
383		if (strlen(what) > sizeof str - 5)
384			printf("boot string too large, ignored\n");
385		else {
386			strcpy(str, what);
387			ap1 = ap = str + strlen(str);
388			*ap++ = ' ';
389		}
390	}
391	*ap++ = '-';
392	if (howto & RB_SINGLE)
393		*ap++ = 's';
394	if (howto & RB_KDB)
395		*ap++ = 'd';
396	*ap++ = 0;
397	if (ap[-2] == '-')
398		*ap1 = 0;
399
400	disable_intr();
401
402        /* Write the two byte reset sequence to the reset register. */
403	out8(PMPPC_RESET, PMPPC_RESET_SEQ_STEP1);
404	out8(PMPPC_RESET, PMPPC_RESET_SEQ_STEP2);
405
406	while (1);
407}
408
409void
410setleds(int leds)
411{
412	out8(PMPPC_LEDS, leds);
413}
414
415void
416pmppc_setup(void)
417{
418	uint config0, config1;
419
420	config0 = in8(PMPPC_CONFIG0);
421	config1 = in8(PMPPC_CONFIG1);
422
423	/* from page 2-8 in the Artesyn User's manual */
424	a_config.a_boot_device = config1 & 0x80 ? A_BOOT_FLASH : A_BOOT_ROM;
425	a_config.a_has_ecc = (config1 & 0x40) != 0;
426	switch (config1 & 0x30) {
427	case 0x00: a_config.a_mem_size = 32 * 1024 * 1024; break;
428	case 0x10: a_config.a_mem_size = 64 * 1024 * 1024; break;
429	case 0x20: a_config.a_mem_size = 128 * 1024 * 1024; break;
430	case 0x30: a_config.a_mem_size = 256 * 1024 * 1024; break;
431	}
432	a_config.a_l2_cache = (config1 >> 2) & 3;
433	switch (config1 & 0x03) {
434	case 0x00: a_config.a_bus_freq = 66666666; break;
435	case 0x01: a_config.a_bus_freq = 83333333; break;
436	case 0x02: a_config.a_bus_freq = 100000000; break;
437	case 0x03: a_config.a_bus_freq = 0; break; /* XXX */
438	}
439	a_config.a_is_monarch = (config0 & 0x80) == 0;
440	a_config.a_has_eth = (config0 & 0x20) != 0;
441	a_config.a_has_rtc = (config0 & 0x10) == 0;
442	switch (config0 & 0x0c) {
443	case 0x00: a_config.a_flash_size = 256 * 1024 * 1024; break;
444	case 0x04: a_config.a_flash_size = 128 * 1024 * 1024; break;
445	case 0x08: a_config.a_flash_size = 64 * 1024 * 1024; break;
446	case 0x0c: a_config.a_flash_size = 32 * 1024 * 1024; break;
447	}
448	switch (config0 & 0x03) {
449	case 0x00: a_config.a_flash_width = 64; break;
450	case 0x01: a_config.a_flash_width = 32; break;
451	case 0x02: a_config.a_flash_width = 16; break;
452	case 0x03: a_config.a_flash_width = 0; break;
453	}
454}
455