Home | History | Annotate | Line # | Download | only in gdium
machdep.c revision 1.6
      1 /*	$NetBSD: machdep.c,v 1.6 2009/08/11 03:56:34 cliff Exp $	*/
      2 
      3 /*
      4  * Copyright 2001, 2002 Wasabi Systems, Inc.
      5  * All rights reserved.
      6  *
      7  * Written by Jason R. Thorpe and Simon Burge for Wasabi Systems, Inc.
      8  *
      9  * Redistribution and use in source and binary forms, with or without
     10  * modification, are permitted provided that the following conditions
     11  * are met:
     12  * 1. Redistributions of source code must retain the above copyright
     13  *    notice, this list of conditions and the following disclaimer.
     14  * 2. Redistributions in binary form must reproduce the above copyright
     15  *    notice, this list of conditions and the following disclaimer in the
     16  *    documentation and/or other materials provided with the distribution.
     17  * 3. All advertising materials mentioning features or use of this software
     18  *    must display the following acknowledgement:
     19  *      This product includes software developed for the NetBSD Project by
     20  *      Wasabi Systems, Inc.
     21  * 4. The name of Wasabi Systems, Inc. may not be used to endorse
     22  *    or promote products derived from this software without specific prior
     23  *    written permission.
     24  *
     25  * THIS SOFTWARE IS PROVIDED BY WASABI SYSTEMS, INC. ``AS IS'' AND
     26  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     27  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     28  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL WASABI SYSTEMS, INC
     29  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     30  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     31  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     32  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     33  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     34  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     35  * POSSIBILITY OF SUCH DAMAGE.
     36  */
     37 
     38 /*
     39  * Copyright (c) 1992, 1993
     40  *	The Regents of the University of California.  All rights reserved.
     41  *
     42  * This code is derived from software contributed to Berkeley by
     43  * the Systems Programming Group of the University of Utah Computer
     44  * Science Department, The Mach Operating System project at
     45  * Carnegie-Mellon University and Ralph Campbell.
     46  *
     47  * Redistribution and use in source and binary forms, with or without
     48  * modification, are permitted provided that the following conditions
     49  * are met:
     50  * 1. Redistributions of source code must retain the above copyright
     51  *    notice, this list of conditions and the following disclaimer.
     52  * 2. Redistributions in binary form must reproduce the above copyright
     53  *    notice, this list of conditions and the following disclaimer in the
     54  *    documentation and/or other materials provided with the distribution.
     55  * 3. Neither the name of the University nor the names of its contributors
     56  *    may be used to endorse or promote products derived from this software
     57  *    without specific prior written permission.
     58  *
     59  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     60  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     61  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     62  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     63  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     64  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     65  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     66  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     67  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     68  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     69  * SUCH DAMAGE.
     70  *
     71  *	@(#)machdep.c   8.3 (Berkeley) 1/12/94
     72  *	from: Utah Hdr: machdep.c 1.63 91/04/24
     73  */
     74 /*
     75  * Copyright (c) 1988 University of Utah.
     76  *
     77  * This code is derived from software contributed to Berkeley by
     78  * the Systems Programming Group of the University of Utah Computer
     79  * Science Department, The Mach Operating System project at
     80  * Carnegie-Mellon University and Ralph Campbell.
     81  *
     82  * Redistribution and use in source and binary forms, with or without
     83  * modification, are permitted provided that the following conditions
     84  * are met:
     85  * 1. Redistributions of source code must retain the above copyright
     86  *    notice, this list of conditions and the following disclaimer.
     87  * 2. Redistributions in binary form must reproduce the above copyright
     88  *    notice, this list of conditions and the following disclaimer in the
     89  *    documentation and/or other materials provided with the distribution.
     90  * 3. All advertising materials mentioning features or use of this software
     91  *    must display the following acknowledgement:
     92  *	This product includes software developed by the University of
     93  *	California, Berkeley and its contributors.
     94  * 4. Neither the name of the University nor the names of its contributors
     95  *    may be used to endorse or promote products derived from this software
     96  *    without specific prior written permission.
     97  *
     98  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     99  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
    100  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
    101  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
    102  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
    103  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
    104  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
    105  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
    106  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
    107  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
    108  * SUCH DAMAGE.
    109  *
    110  *	@(#)machdep.c   8.3 (Berkeley) 1/12/94
    111  *	from: Utah Hdr: machdep.c 1.63 91/04/24
    112  */
    113 
    114 #include <sys/cdefs.h>
    115 __KERNEL_RCSID(0, "$NetBSD: machdep.c,v 1.6 2009/08/11 03:56:34 cliff Exp $");
    116 
    117 #include "opt_ddb.h"
    118 #include "opt_execfmt.h"
    119 #include "opt_modular.h"
    120 
    121 #include <sys/param.h>
    122 #include <sys/systm.h>
    123 #include <sys/kernel.h>
    124 #include <sys/buf.h>
    125 #include <sys/reboot.h>
    126 #include <sys/user.h>
    127 #include <sys/mount.h>
    128 #include <sys/kcore.h>
    129 #include <sys/boot_flag.h>
    130 #include <sys/termios.h>
    131 #include <sys/ksyms.h>
    132 #include <sys/device.h>
    133 
    134 #include <uvm/uvm_extern.h>
    135 
    136 #include <dev/cons.h>
    137 
    138 #include "ksyms.h"
    139 
    140 #if NKSYMS || defined(DDB) || defined(MODULAR)
    141 #include <machine/db_machdep.h>
    142 #include <ddb/db_extern.h>
    143 #endif
    144 
    145 #include <machine/cpu.h>
    146 #include <machine/psl.h>
    147 
    148 #include <mips/bonito/bonitoreg.h>
    149 #include <evbmips/gdium/gdiumvar.h>
    150 
    151 #include "com.h"
    152 #if NCOM > 0
    153 #include <dev/ic/comreg.h>
    154 #include <dev/ic/comvar.h>
    155 
    156 int	comcnrate = 38400;	/* XXX should be config option */
    157 #endif /* NCOM > 0 */
    158 
    159 struct gdium_config gdium_configuration = {
    160 	.gc_bonito = {
    161 		.bc_adbase = 11,	/* magic */
    162 	},
    163 };
    164 
    165 /* For sysctl_hw. */
    166 extern char cpu_model[];
    167 
    168 /* Our exported CPU info; we can have only one. */
    169 struct cpu_info cpu_info_store;
    170 
    171 /* Maps for VM objects. */
    172 struct vm_map *mb_map = NULL;
    173 struct vm_map *phys_map = NULL;
    174 
    175 int	physmem;		/* Total physical memory */
    176 int	netboot;		/* Are we netbooting? */
    177 
    178 phys_ram_seg_t mem_clusters[VM_PHYSSEG_MAX];
    179 int mem_cluster_cnt;
    180 
    181 void	configure(void);
    182 void	mach_init(int, char **, char **, void *);
    183 
    184 /*
    185  * safepri is a safe priority for sleep to set for a spin-wait during
    186  * autoconfiguration or after a panic.  Used as an argument to splx().
    187  */
    188 int	safepri = MIPS1_PSL_LOWIPL;
    189 
    190 extern struct user *proc0paddr;
    191 
    192 /*
    193  * For some reason, PMON doesn't assign a real address to the Ralink's BAR.
    194  * So we have to do it.
    195  */
    196 static void
    197 gdium_pci_attach_hook(device_t parent, device_t self,
    198     struct pcibus_attach_args *pba)
    199 {
    200 	const pcitag_t high_dev = pci_make_tag(pba->pba_pc, 0, 17, 1);
    201 	const pcitag_t ralink_dev = pci_make_tag(pba->pba_pc, 0, 13, 0);
    202 	bus_size_t high_size, ralink_size;
    203 	pcireg_t v;
    204 
    205 	/*
    206 	 * Get the highest PCI addr used from the last PCI dev.
    207 	 */
    208 	v = pci_conf_read(pba->pba_pc, high_dev, PCI_MAPREG_START);
    209 	v &= PCI_MAPREG_MEM_ADDR_MASK;
    210 
    211 	/*
    212 	 * Get the sizes of the map registers.
    213 	 */
    214 	pci_mapreg_info(pba->pba_pc, high_dev, PCI_MAPREG_START,
    215 	    PCI_MAPREG_MEM_TYPE_32BIT, NULL, &high_size, NULL);
    216 	pci_mapreg_info(pba->pba_pc, ralink_dev, PCI_MAPREG_START,
    217 	    PCI_MAPREG_MEM_TYPE_32BIT, NULL, &ralink_size, NULL);
    218 
    219 	/*
    220 	 * Position the ralink register space after the last device.
    221 	 */
    222 	v = (v + high_size + ralink_size - 1) & ~(ralink_size - 1);
    223 
    224 	/*
    225 	 * Set the mapreg.
    226 	 */
    227 	pci_conf_write(pba->pba_pc, ralink_dev, PCI_MAPREG_START, v);
    228 
    229 #if 0
    230 	/*
    231 	 * Why does linux do this?
    232 	 */
    233 	for (int dev = 15; dev <= 17; dev +=2) {
    234 		for (int func = 0; func <= 1; func++) {
    235 			pcitag_t usb_dev = pci_make_tag(pba->pba_pc, 0, dev, func);
    236 			v = pci_conf_read(pba->pba_pc, usb_dev, 0xe0);
    237 			v |= 3;
    238 			pci_conf_write(pba->pba_pc, usb_dev, 0xe0, v);
    239 		}
    240 	}
    241 #endif
    242 }
    243 
    244 /*
    245  * Do all the stuff that locore normally does before calling main().
    246  */
    247 void
    248 mach_init(int argc, char **argv, char **envp, void *callvec)
    249 {
    250 	struct gdium_config *gc = &gdium_configuration;
    251 	void *kernend, *v;
    252         u_long first, last;
    253 #ifdef NOTYET
    254 	char *cp;
    255 	int howto;
    256 #endif
    257 	int i;
    258 	psize_t memsize;
    259 
    260 	extern char edata[], end[];
    261 
    262 	/*
    263 	 * Clear the BSS segment.
    264 	 */
    265 	kernend = (void *)mips_round_page(end);
    266 	memset(edata, 0, (char *)kernend - edata);
    267 
    268 	/*
    269 	 * Set up the exception vectors and CPU-specific function
    270 	 * vectors early on.  We need the wbflush() vector set up
    271 	 * before comcnattach() is called (or at least before the
    272 	 * first printf() after that is called).
    273 	 * Also clears the I+D caches.
    274 	 */
    275 	mips_vector_init();
    276 
    277 	/* set the VM page size */
    278 	uvm_setpagesize();
    279 
    280 	memsize = 256*1024*1024;
    281 	physmem = btoc(memsize);
    282 
    283 	bonito_pci_init(&gc->gc_pc, &gc->gc_bonito);
    284 	/*
    285 	 * Override the null bonito_pci_attach_hook with our own to we can
    286 	 * fix the ralink (device 13).
    287 	 */
    288 	gc->gc_pc.pc_attach_hook = gdium_pci_attach_hook;
    289 	gdium_bus_io_init(&gc->gc_iot, gc);
    290 	gdium_bus_mem_init(&gc->gc_memt, gc);
    291 	gdium_dma_init(gc);
    292 	gdium_cnattach(gc);
    293 
    294 	/*
    295 	 * Disable the 2nd PCI window since we don't need it.
    296 	 */
    297 	REGVAL(BONITO_REGBASE + 0x158) = 0xe;
    298 	REGVAL(BONITO_REGBASE + 0x15c) = 0;
    299 	pci_conf_write(&gc->gc_pc, pci_make_tag(&gc->gc_pc, 0, 0, 0), 18, 0);
    300 
    301 	/*
    302 	 * Get the timer from PMON.
    303 	 */
    304 	for (i = 0; envp[i] != NULL; i++) {
    305 		if (!strncmp(envp[i], "cpuclock=", 9)) {
    306 			curcpu()->ci_cpu_freq =
    307 			    strtoul(&envp[i][9], NULL, 10);
    308 			break;
    309 		}
    310 	}
    311 
    312 	if (mips_cpu_flags & CPU_MIPS_DOUBLE_COUNT)
    313 		curcpu()->ci_cpu_freq /= 2;
    314 
    315 	/* Compute the number of ticks for hz. */
    316 	curcpu()->ci_cycles_per_hz = (curcpu()->ci_cpu_freq + hz / 2) / hz;
    317 
    318 	/* Compute the delay divisor. */
    319 	curcpu()->ci_divisor_delay =
    320 	    ((curcpu()->ci_cpu_freq + 500000) / 1000000);
    321 
    322 	/*
    323 	 * Get correct cpu frequency if the CPU runs at twice the
    324 	 * external/cp0-count frequency.
    325 	 */
    326 	if (mips_cpu_flags & CPU_MIPS_DOUBLE_COUNT)
    327 		curcpu()->ci_cpu_freq *= 2;
    328 
    329 #ifdef DEBUG
    330 	printf("Timer calibration: %lu cycles/sec\n",
    331 	    curcpu()->ci_cpu_freq);
    332 #endif
    333 
    334 #if NCOM > 0
    335 	/*
    336 	 * Delay to allow firmware putchars to complete.
    337 	 * FIFO depth * character time.
    338 	 * character time = (1000000 / (defaultrate / 10))
    339 	 */
    340 	delay(160000000 / comcnrate);
    341 	if (comcnattach(&gc->gc_iot, MALTA_UART0ADR, comcnrate,
    342 	    COM_FREQ, COM_TYPE_NORMAL,
    343 	    (TTYDEF_CFLAG & ~(CSIZE | PARENB)) | CS8) != 0)
    344 		panic("malta: unable to initialize serial console");
    345 #endif /* NCOM > 0 */
    346 
    347 	mem_clusters[0].start = 0;
    348 	mem_clusters[0].size = ctob(physmem);
    349 	mem_cluster_cnt = 1;
    350 
    351 	strcpy(cpu_model, "Gdium Liberty 1000");
    352 
    353 	/*
    354 	 * XXX: check argv[0] - do something if "gdb"???
    355 	 */
    356 
    357 	/*
    358 	 * Look at arguments passed to us and compute boothowto.
    359 	 */
    360 	boothowto = RB_AUTOBOOT;
    361 #ifdef NOTYET
    362 	for (i = 1; i < argc; i++) {
    363 		for (cp = argv[i]; *cp; cp++) {
    364 			/* Ignore superfluous '-', if there is one */
    365 			if (*cp == '-')
    366 				continue;
    367 
    368 			howto = 0;
    369 			BOOT_FLAG(*cp, howto);
    370 			if (! howto)
    371 				printf("bootflag '%c' not recognised\n", *cp);
    372 			else
    373 				boothowto |= howto;
    374 		}
    375 	}
    376 #endif
    377 
    378 	/*
    379 	 * Load the rest of the available pages into the VM system.
    380 	 */
    381 	first = round_page(MIPS_KSEG0_TO_PHYS(kernend));
    382 	last = mem_clusters[0].start + mem_clusters[0].size;
    383 	uvm_page_physload(atop(first), atop(last), atop(first), atop(last),
    384 		VM_FREELIST_DEFAULT);
    385 
    386 	/*
    387 	 * Initialize error message buffer (at end of core).
    388 	 */
    389 	mips_init_msgbuf();
    390 
    391 	pmap_bootstrap();
    392 
    393 	/*
    394 	 * Allocate space for proc0's USPACE.
    395 	 */
    396 	v = (void *)uvm_pageboot_alloc(USPACE);
    397 	lwp0.l_addr = proc0paddr = (struct user *)v;
    398 	lwp0.l_md.md_regs = (struct frame *)((char *)v + USPACE) - 1;
    399 	proc0paddr->u_pcb.pcb_context[11] =
    400 	    MIPS_INT_MASK | MIPS_SR_INT_IE; /* SR */
    401 
    402 	/*
    403 	 * Initialize debuggers, and break into them, if appropriate.
    404 	 */
    405 #if defined(DDB)
    406 	if (boothowto & RB_KDB)
    407 		Debugger();
    408 #endif
    409 }
    410 
    411 void
    412 consinit(void)
    413 {
    414 
    415 	/*
    416 	 * Everything related to console initialization is done
    417 	 * in mach_init().
    418 	 */
    419 }
    420 
    421 /*
    422  * Allocate memory for variable-sized tables,
    423  */
    424 void
    425 cpu_startup(void)
    426 {
    427 	vaddr_t minaddr, maxaddr;
    428 	char pbuf[9];
    429 
    430 	/*
    431 	 * Good {morning,afternoon,evening,night}.
    432 	 */
    433 	printf("%s%s", copyright, version);
    434 	format_bytes(pbuf, sizeof(pbuf), ctob(physmem));
    435 	printf("total memory = %s\n", pbuf);
    436 
    437 	/*
    438 	 * Virtual memory is bootstrapped -- notify the bus spaces
    439 	 * that memory allocation is now safe.
    440 	 */
    441 	gdium_configuration.gc_mallocsafe = 1;
    442 
    443 	minaddr = 0;
    444 	/*
    445 	 * Allocate a submap for physio.
    446 	 */
    447 	phys_map = uvm_km_suballoc(kernel_map, &minaddr, &maxaddr,
    448 				    VM_PHYS_SIZE, 0, FALSE, NULL);
    449 
    450 	/*
    451 	 * (No need to allocate an mbuf cluster submap.  Mbuf clusters
    452 	 * are allocated via the pool allocator, and we use KSEG to
    453 	 * map those pages.)
    454 	 */
    455 
    456 	format_bytes(pbuf, sizeof(pbuf), ptoa(uvmexp.free));
    457 	printf("avail memory = %s\n", pbuf);
    458 }
    459 
    460 int	waittime = -1;
    461 
    462 void
    463 cpu_reboot(int howto, char *bootstr)
    464 {
    465 
    466 	/* Take a snapshot before clobbering any registers. */
    467 	if (curproc)
    468 		savectx((struct user *)curpcb);
    469 
    470 	if (cold) {
    471 		howto |= RB_HALT;
    472 		goto haltsys;
    473 	}
    474 
    475 	/* If "always halt" was specified as a boot flag, obey. */
    476 	if (boothowto & RB_HALT)
    477 		howto |= RB_HALT;
    478 
    479 	boothowto = howto;
    480 	if ((howto & RB_NOSYNC) == 0 && (waittime < 0)) {
    481 		waittime = 0;
    482 		vfs_shutdown();
    483 
    484 		/*
    485 		 * If we've been adjusting the clock, the todr
    486 		 * will be out of synch; adjust it now.
    487 		 */
    488 		resettodr();
    489 	}
    490 
    491 	splhigh();
    492 
    493 	if (howto & RB_DUMP)
    494 		dumpsys();
    495 
    496 haltsys:
    497 	doshutdownhooks();
    498 
    499 	pmf_system_shutdown(boothowto);
    500 
    501 	if ((howto & RB_POWERDOWN) == RB_POWERDOWN) {
    502 		/*
    503 		 * Turning on GPIO1 as output will cause a powerdown.
    504 		 */
    505 		REGVAL(BONITO_GPIODATA) |= 2;
    506 		REGVAL(BONITO_GPIOIE) &= ~2;
    507 	}
    508 
    509 	if (howto & RB_HALT) {
    510 		printf("\n");
    511 		printf("The operating system has halted.\n");
    512 		printf("Please press any key to reboot.\n\n");
    513 		cnpollc(1);	/* For proper keyboard command handling */
    514 		cngetc();
    515 		cnpollc(0);
    516 	}
    517 
    518 	printf("%s\n\n", ((howto & RB_HALT) != 0) ? "halted." : "rebooting...");
    519 
    520 	/*
    521 	 * Turning off GPIO2 as output will cause a reset.
    522 	 */
    523 	REGVAL(BONITO_GPIODATA) &= ~4;
    524 	REGVAL(BONITO_GPIOIE) &= ~4;
    525 
    526 	__asm__ __volatile__ (
    527 		"\t.long 0x3c02bfc0\n"
    528 		"\t.long 0x00400008\n"
    529 	    ::: "v0");
    530 }
    531