Home | History | Annotate | Line # | Download | only in arc
      1 /*	$NetBSD: machdep.c,v 1.134 2024/03/05 14:15:28 thorpej Exp $	*/
      2 /*	$OpenBSD: machdep.c,v 1.36 1999/05/22 21:22:19 weingart Exp $	*/
      3 
      4 /*
      5  * Copyright (c) 1988 University of Utah.
      6  * Copyright (c) 1992, 1993
      7  *	The Regents of the University of California.  All rights reserved.
      8  *
      9  * This code is derived from software contributed to Berkeley by
     10  * the Systems Programming Group of the University of Utah Computer
     11  * Science Department, The Mach Operating System project at
     12  * Carnegie-Mellon University and Ralph Campbell.
     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. Neither the name of the University nor the names of its contributors
     23  *    may be used to endorse or promote products derived from this software
     24  *    without specific prior written permission.
     25  *
     26  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     27  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     28  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     29  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     30  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     31  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     32  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     33  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     34  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     35  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     36  * SUCH DAMAGE.
     37  *
     38  *	from: @(#)machdep.c	8.3 (Berkeley) 1/12/94
     39  */
     40 
     41 #include <sys/cdefs.h>
     42 __KERNEL_RCSID(0, "$NetBSD: machdep.c,v 1.134 2024/03/05 14:15:28 thorpej Exp $");
     43 
     44 #include "opt_ddb.h"
     45 #include "opt_ddbparam.h"
     46 #include "opt_md.h"
     47 #include "opt_modular.h"
     48 
     49 #include <sys/param.h>
     50 #include <sys/systm.h>
     51 #include <sys/signalvar.h>
     52 #include <sys/kernel.h>
     53 #include <sys/proc.h>
     54 #include <sys/buf.h>
     55 #include <sys/reboot.h>
     56 #include <sys/conf.h>
     57 #include <sys/file.h>
     58 #include <sys/mbuf.h>
     59 #include <sys/msgbuf.h>
     60 #include <sys/ioctl.h>
     61 #include <sys/time.h>
     62 #include <sys/tty.h>
     63 #include <sys/exec.h>
     64 #include <uvm/uvm_extern.h>
     65 #include <sys/mount.h>
     66 #include <sys/device.h>
     67 #include <sys/syscallargs.h>
     68 #include <sys/kcore.h>
     69 #include <sys/ksyms.h>
     70 #include <sys/cpu.h>
     71 #include <ufs/mfs/mfs_extern.h>		/* mfs_initminiroot() */
     72 
     73 #include <machine/bootinfo.h>
     74 #include <machine/cpu.h>
     75 #include <machine/reg.h>
     76 #include <machine/pio.h>
     77 #include <sys/bus.h>
     78 #include <machine/trap.h>
     79 #include <machine/autoconf.h>
     80 #include <machine/platform.h>
     81 #include <machine/wired_map.h>
     82 #include <mips/pte.h>
     83 #include <mips/locore.h>
     84 #include <mips/cpuregs.h>
     85 #include <mips/psl.h>
     86 #include <mips/cache.h>
     87 #ifdef DDB
     88 #include <mips/db_machdep.h>
     89 #include <ddb/db_extern.h>
     90 #endif
     91 
     92 #include <dev/cons.h>
     93 
     94 #include <dev/ic/i8042reg.h>
     95 #include <dev/isa/isareg.h>
     96 
     97 #include <arc/arc/arcbios.h>
     98 #include <arc/arc/timervar.h>
     99 
    100 #include "ksyms.h"
    101 
    102 #include "com.h"
    103 #if NCOM > 0
    104 #include <sys/termios.h>
    105 #include <dev/ic/comreg.h>
    106 #include <dev/ic/comvar.h>
    107 
    108 #ifndef COMCONSOLE
    109 #define COMCONSOLE	0
    110 #endif
    111 
    112 #ifndef CONADDR
    113 #define CONADDR	0	/* use default address if CONADDR isn't configured */
    114 #endif
    115 
    116 #ifndef CONSPEED
    117 #define CONSPEED TTYDEF_SPEED
    118 #endif
    119 #ifndef CONMODE
    120 #define CONMODE ((TTYDEF_CFLAG & ~(CSIZE | CSTOPB | PARENB)) | CS8) /* 8N1 */
    121 #endif
    122 #endif /* NCOM */
    123 
    124 /* maps for VM objects */
    125 struct vm_map *phys_map = NULL;
    126 
    127 int	maxmem;			/* max memory per process */
    128 int	cpuspeed = 150;		/* approx CPU clock [MHz] */
    129 vsize_t kseg2iobufsize = 0;	/* to reserve PTEs for KSEG2 I/O space */
    130 struct arc_bus_space arc_bus_io;/* Bus tag for bus.h macros */
    131 struct arc_bus_space arc_bus_mem;/* Bus tag for bus.h macros */
    132 
    133 char *bootinfo;			/* pointer to bootinfo structure */
    134 static char bi_buf[BOOTINFO_SIZE]; /* buffer to store bootinfo data */
    135 static const char *bootinfo_msg = NULL;
    136 
    137 #if NCOM > 0
    138 int	com_freq = COM_FREQ;	/* unusual clock frequency of dev/ic/com.c */
    139 int	com_console = COMCONSOLE;
    140 int	com_console_address = CONADDR;
    141 int	com_console_speed = CONSPEED;
    142 int	com_console_mode = CONMODE;
    143 #else
    144 #ifndef COMCONSOLE
    145 #error COMCONSOLE is defined without com driver configured.
    146 #endif
    147 int	com_console = 0;
    148 #endif /* NCOM */
    149 
    150 char **environment;		/* On some arches, pointer to environment */
    151 
    152 int mem_reserved[VM_PHYSSEG_MAX]; /* the cluster is reserved, i.e. not free */
    153 phys_ram_seg_t mem_clusters[VM_PHYSSEG_MAX];
    154 int mem_cluster_cnt;
    155 
    156 /* initialize bss, etc. from kernel start, before main() is called. */
    157 void mach_init(int, char *[], u_int, void *);
    158 
    159 const char *firmware_getenv(const char *env);
    160 void arc_sysreset(bus_addr_t, bus_size_t);
    161 
    162 extern char kernel_text[], edata[], end[];
    163 
    164 /*
    165  * Do all the stuff that locore normally does before calling main().
    166  * Process arguments passed to us by the BIOS.
    167  * Reset mapping and set up mapping to hardware and init "wired" reg.
    168  * Return the first page address following the system.
    169  */
    170 void
    171 mach_init(int argc, char *argv[], u_int bim, void *bip)
    172 {
    173 	const char *cp;
    174 	int i;
    175 #if 0
    176 	paddr_t kernstartpfn;
    177 #endif
    178 	paddr_t first, last, kernendpfn;
    179 	char *kernend;
    180 #if NKSYMS > 0 || defined(DDB) || defined(MODULAR)
    181 	char *ssym = NULL;
    182 	char *esym = NULL;
    183 	struct btinfo_symtab *bi_syms;
    184 #endif
    185 
    186 	/* set up bootinfo structures */
    187 	if (bim == BOOTINFO_MAGIC && bip != NULL) {
    188 		struct btinfo_magic *bi_magic;
    189 
    190 		memcpy(bi_buf, bip, BOOTINFO_SIZE);
    191 		bootinfo = bi_buf;
    192 		bi_magic = lookup_bootinfo(BTINFO_MAGIC);
    193 		if (bi_magic == NULL || bi_magic->magic != BOOTINFO_MAGIC)
    194 			bootinfo_msg =
    195 			    "invalid magic number in bootinfo structure.\n";
    196 		else
    197 			bootinfo_msg = "bootinfo found.\n";
    198 	} else
    199 		bootinfo_msg = "no bootinfo found. (old bootblocks?)\n";
    200 
    201 	/* clear the BSS segment in kernel code */
    202 #if NKSYMS > 0 || defined(DDB) || defined(MODULAR)
    203 	bi_syms = lookup_bootinfo(BTINFO_SYMTAB);
    204 
    205 	/* check whether there is valid bootinfo symtab info */
    206 	if (bi_syms != NULL) {
    207 		ssym = (char *)bi_syms->ssym;
    208 		esym = (char *)bi_syms->esym;
    209 		kernend = (void *)mips_round_page(esym);
    210 #if 0
    211 		/*
    212 		 * Don't clear BSS here since bi_buf[] is allocated in BSS
    213 		 * and it has been cleared by the bootloader in this case.
    214 		 */
    215 		memset(edata, 0, end - edata);
    216 #endif
    217 	} else
    218 #endif
    219 	{
    220 		kernend = (void *)mips_round_page(end);
    221 		memset(edata, 0, kernend - edata);
    222 	}
    223 
    224 	environment = &argv[1];
    225 
    226 	if (bios_ident()) { /* ARC BIOS present */
    227 		bios_init_console();
    228 		bios_save_info();
    229 		physmem = bios_configure_memory(mem_reserved, mem_clusters,
    230 		    &mem_cluster_cnt);
    231 	}
    232 
    233 	/* Initialize the CPU type */
    234 	ident_platform();
    235 	if (platform == NULL) {
    236 		/* This is probably the best we can do... */
    237 		printf("kernel not configured for this system:\n");
    238 		printf("ID [%s] Vendor [%8.8s] Product [%02x",
    239 		    arc_id, arc_vendor_id, arc_product_id[0]);
    240 		for (i = 1; i < sizeof(arc_product_id); i++)
    241 			printf(":%02x", arc_product_id[i]);
    242 		printf("]\n");
    243 		printf("DisplayController [%s]\n", arc_displayc_id);
    244 #if 1
    245 		for (;;)
    246 			;
    247 #else
    248 		cpu_reboot(RB_HALT | RB_NOSYNC, NULL);
    249 #endif
    250 	}
    251 
    252 	physmem = btoc(physmem);
    253 
    254 	/* compute bootdev for autoconfig setup */
    255 	cp = firmware_getenv("OSLOADPARTITION");
    256 	makebootdev(cp != NULL ? cp : argv[0]);
    257 
    258 	/*
    259 	 * Look at arguments passed to us and compute boothowto.
    260 	 * Default to SINGLE and ASKNAME if no args or
    261 	 * SINGLE and DFLTROOT if this is a ramdisk kernel.
    262 	 */
    263 #ifdef MEMORY_DISK_IS_ROOT
    264 	boothowto = RB_SINGLE;
    265 #else
    266 	boothowto = RB_SINGLE | RB_ASKNAME;
    267 #endif /* MEMORY_DISK_IS_ROOT */
    268 #ifdef KADB
    269 	boothowto |= RB_KDB;
    270 #endif
    271 
    272 	cp = firmware_getenv("OSLOADOPTIONS");
    273 	if (cp) {
    274 		while (*cp) {
    275 			switch (*cp++) {
    276 			case 'a': /* autoboot */
    277 				boothowto &= ~RB_SINGLE;
    278 				break;
    279 
    280 			case 'm': /* mini root present in memory */
    281 				boothowto |= RB_MINIROOT;
    282 				break;
    283 
    284 			case 'n': /* ask for names */
    285 				boothowto |= RB_ASKNAME;
    286 				break;
    287 
    288 			case 'N': /* don't ask for names */
    289 				boothowto &= ~RB_ASKNAME;
    290 				break;
    291 
    292 			case 's': /* use serial console */
    293 				com_console = 1;
    294 				break;
    295 
    296 			case 'q': /* boot quietly */
    297 				boothowto |= AB_QUIET;
    298 				break;
    299 
    300 			case 'v': /* boot verbosely */
    301 				boothowto |= AB_VERBOSE;
    302 				break;
    303 			}
    304 
    305 		}
    306 	}
    307 
    308 	uvm_md_init();
    309 
    310 	/* make sure that we don't call BIOS console from now on */
    311 	cn_tab = NULL;
    312 
    313 	/*
    314 	 * Copy exception-dispatch code down to exception vector.
    315 	 * Initialize locore-function vector.
    316 	 * Clear out the I and D caches.
    317 	 *
    318 	 * Now its time to abandon the BIOS and be self supplying.
    319 	 * Start with cleaning out the TLB. Bye bye Microsoft....
    320 	 *
    321 	 * This may clobber PTEs needed by the BIOS.
    322 	 */
    323 	mips_vector_init(NULL, false);
    324 
    325 	/*
    326 	 * Map critical I/O spaces (e.g. for console printf(9)) on KSEG2.
    327 	 * We cannot call VM functions here, since uvm is not initialized,
    328 	 * yet.
    329 	 * Since printf(9) is called before uvm_init() in main(),
    330 	 * we have to handcraft console I/O space anyway.
    331 	 *
    332 	 * XXX - reserve these KVA space after UVM initialization.
    333 	 */
    334 	(*platform->init)();
    335 
    336 	cpuspeed = platform->clock;
    337 	curcpu()->ci_cpu_freq = platform->clock * 1000000;
    338 	curcpu()->ci_cycles_per_hz = (curcpu()->ci_cpu_freq + hz / 2) / hz;
    339 	curcpu()->ci_divisor_delay =
    340 	    ((curcpu()->ci_cpu_freq + 500000) / 1000000);
    341 	curcpu()->ci_cctr_freq = curcpu()->ci_cpu_freq;
    342 	if (mips_options.mips_cpu_flags & CPU_MIPS_DOUBLE_COUNT) {
    343 		curcpu()->ci_cycles_per_hz /= 2;
    344 		curcpu()->ci_divisor_delay /= 2;
    345 		curcpu()->ci_cctr_freq /= 2;
    346 	}
    347 	cpu_setmodel("%s %s%s",
    348 	    platform->vendor, platform->model, platform->variant);
    349 
    350 	/*
    351 	 * Check to see if a mini-root was loaded into memory. It resides
    352 	 * at the start of the next page just after the end of BSS.
    353 	 */
    354 	if (boothowto & RB_MINIROOT)
    355 		kernend += round_page(mfs_initminiroot(kernend));
    356 
    357 #if NKSYMS || defined(DDB) || defined(MODULAR)
    358 	/* init symbols if present */
    359 	if (esym)
    360 		ksyms_addsyms_elf(esym - ssym, ssym, esym);
    361 #endif
    362 
    363 	maxmem = physmem;
    364 
    365 	/* XXX: revisit here */
    366 
    367 	/*
    368 	 * Load the rest of the pages into the VM system.
    369 	 */
    370 	kernendpfn = atop(round_page(MIPS_KSEG0_TO_PHYS(kernend)));
    371 #if 0
    372 	kernstartpfn = atop(trunc_page(
    373 	    MIPS_KSEG0_TO_PHYS((kernel_text) - UPAGES * PAGE_SIZE)));
    374 	/* give all free memory to VM */
    375 	/* XXX - currently doesn't work, due to "panic: pmap_enter: pmap" */
    376 	for (i = 0; i < mem_cluster_cnt; i++) {
    377 		if (mem_reserved[i])
    378 			continue;
    379 		first = atop(round_page(mem_clusters[i].start));
    380 		last = atop(trunc_page(mem_clusters[i].start +
    381 		    mem_clusters[i].size));
    382 		if (last <= kernstartpfn || kernendpfn <= first) {
    383 			uvm_page_physload(first, last, first, last,
    384 			    VM_FREELIST_DEFAULT);
    385 		} else {
    386 			if (first < kernstartpfn)
    387 				uvm_page_physload(first, kernstartpfn,
    388 				    first, kernstartpfn, VM_FREELIST_DEFAULT);
    389 			if (kernendpfn < last)
    390 				uvm_page_physload(kernendpfn, last,
    391 				    kernendpfn, last, , VM_FREELIST_DEFAULT);
    392 		}
    393 	}
    394 #elif 0 /* XXX */
    395 	/* give all free memory above the kernel to VM (non-contig version) */
    396 	for (i = 0; i < mem_cluster_cnt; i++) {
    397 		if (mem_reserved[i])
    398 			continue;
    399 		first = atop(round_page(mem_clusters[i].start));
    400 		last = atop(trunc_page(mem_clusters[i].start +
    401 		    mem_clusters[i].size));
    402 		if (kernendpfn < last) {
    403 			if (first < kernendpfn)
    404 				first = kernendpfn;
    405 			uvm_page_physload(first, last, first, last,
    406 			    VM_FREELIST_DEFAULT);
    407 		}
    408 	}
    409 #else
    410 	/* give all memory above the kernel to VM (contig version) */
    411 #if 1
    412 	mem_clusters[0].start = 0;
    413 	mem_clusters[0].size  = ctob(physmem);
    414 	mem_cluster_cnt = 1;
    415 #endif
    416 
    417 	first = kernendpfn;
    418 	last = physmem;
    419 	uvm_page_physload(first, last, first, last, VM_FREELIST_DEFAULT);
    420 #endif
    421 
    422 	/*
    423 	 * Initialize error message buffer (at end of core).
    424 	 */
    425 	mips_init_msgbuf();
    426 
    427 	/*
    428 	 * Initialize the virtual memory system.
    429 	 */
    430 	pmap_bootstrap();
    431 
    432 	/*
    433 	 * Allocate uarea page for lwp0 and set it.
    434 	 */
    435 	mips_init_lwp0_uarea();
    436 }
    437 
    438 void
    439 mips_machdep_cache_config(void)
    440 {
    441 
    442 	mips_cache_info.mci_sdcache_size = arc_cpu_l2cache_size;
    443 }
    444 
    445 /*
    446  * Return a pointer to the given environment variable.
    447  */
    448 const char *
    449 firmware_getenv(const char *envname)
    450 {
    451 	char **env;
    452 	int l;
    453 
    454 	l = strlen(envname);
    455 
    456 	for (env = environment; env[0]; env++) {
    457 		if (strncasecmp(envname, env[0], l) == 0 && env[0][l] == '=') {
    458 			return &env[0][l + 1];
    459 		}
    460 	}
    461 	return NULL;
    462 }
    463 
    464 /*
    465  * Console initialization: called early on from main,
    466  * before vm init or startup.  Do enough configuration
    467  * to choose and initialize a console.
    468  */
    469 void
    470 consinit(void)
    471 {
    472 	static int initted;
    473 
    474 	if (initted)
    475 		return;
    476 	initted = 1;
    477 
    478 	(*platform->cons_init)();
    479 }
    480 
    481 /*
    482  * cpu_startup: allocate memory for variable-sized tables,
    483  * initialize CPU, and do autoconfiguration.
    484  */
    485 void
    486 cpu_startup(void)
    487 {
    488 #ifdef BOOTINFO_DEBUG
    489 	if (bootinfo_msg)
    490 		printf(bootinfo_msg);
    491 #endif
    492 
    493 	cpu_startup_common();
    494 }
    495 
    496 void *
    497 lookup_bootinfo(int type)
    498 {
    499 	struct btinfo_common *bt;
    500 	char *bip;
    501 
    502 	/* check for a bootinfo record first */
    503 	if (bootinfo == NULL)
    504 		return NULL;
    505 
    506 	bip = bootinfo;
    507 	do {
    508 		bt = (struct btinfo_common *)bip;
    509 		if (bt->type == type)
    510 			return (void *)bt;
    511 		bip += bt->next;
    512 	} while (bt->next != 0 &&
    513 	    bt->next < BOOTINFO_SIZE /* sanity */ &&
    514 	    (size_t)bip < (size_t)bootinfo + BOOTINFO_SIZE);
    515 
    516 	return NULL;
    517 }
    518 
    519 static int waittime = -1;
    520 
    521 void
    522 cpu_reboot(int howto, char *bootstr)
    523 {
    524 
    525 	/* take a snap shot before clobbering any registers */
    526 	savectx(curpcb);
    527 
    528 #ifdef DEBUG
    529 	if (panicstr)
    530 		stacktrace();
    531 #endif
    532 
    533 	boothowto = howto;
    534 	if ((howto & RB_NOSYNC) == 0 && waittime < 0) {
    535 		/* fill curlwp with live object */
    536 		if (curlwp == NULL)
    537 			curlwp = &lwp0;
    538 		/*
    539 		 * Synchronize the disks....
    540 		 */
    541 		waittime = 0;
    542 		vfs_shutdown();
    543 	}
    544 	(void)splhigh();		/* extreme priority */
    545 
    546 	if ((howto & (RB_DUMP | RB_HALT)) == RB_DUMP)
    547 		dumpsys();
    548 
    549 	doshutdownhooks();
    550 
    551 	pmf_system_shutdown(boothowto);
    552 
    553 	if (howto & RB_HALT) {
    554 		printf("\n");
    555 		printf("The operating system has halted.\n");
    556 		printf("Please press any key to reboot.\n\n");
    557 		cnpollc(1);	/* for proper keyboard command handling */
    558 		cngetc();
    559 		cnpollc(0);
    560 	}
    561 
    562 	printf("rebooting...\n");
    563 	delay(1000000);
    564 
    565 	(*platform->reset)();
    566 
    567 	__asm(" li $2, 0xbfc00000; jr $2; nop\n");
    568 	for (;;)
    569 		; /* Forever */
    570 	/* NOTREACHED */
    571 }
    572 
    573 /*
    574  * Pass system reset command to keyboard controller (8042).
    575  */
    576 void
    577 arc_sysreset(bus_addr_t addr, bus_size_t cmd_offset)
    578 {
    579 	volatile uint8_t *kbdata = (uint8_t *)addr + KBDATAP;
    580 	volatile uint8_t *kbcmd = (uint8_t *)addr + cmd_offset;
    581 
    582 #define KBC_ARC_SYSRESET 0xd1
    583 
    584 	delay(1000);
    585 	*kbcmd = KBC_ARC_SYSRESET;
    586 	delay(1000);
    587 	*kbdata = 0;
    588 }
    589