1 /* $NetBSD: machdep.c,v 1.3 2007/10/17 19:54:14 garbled Exp $ */ 2 3 /*- 4 * Copyright (c) 2007 Ruslan Ermilov and Vsevolod Lobko. 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or 8 * without modification, are permitted provided that the following 9 * conditions are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above 13 * copyright notice, this list of conditions and the following 14 * disclaimer in the documentation and/or other materials provided 15 * with the distribution. 16 * 3. The names of the authors may not be used to endorse or promote 17 * products derived from this software without specific prior 18 * written permission. 19 * 20 * THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY 21 * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, 22 * THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A 23 * PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHORS 24 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, 25 * OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, 26 * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, 27 * OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 28 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR 29 * TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT 30 * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY 31 * OF SUCH DAMAGE. 32 */ 33 /* 34 * Copyright (c) 1992, 1993 35 * The Regents of the University of California. All rights reserved. 36 * 37 * This code is derived from software contributed to Berkeley by 38 * the Systems Programming Group of the University of Utah Computer 39 * Science Department, The Mach Operating System project at 40 * Carnegie-Mellon University and Ralph Campbell. 41 * 42 * Redistribution and use in source and binary forms, with or without 43 * modification, are permitted provided that the following conditions 44 * are met: 45 * 1. Redistributions of source code must retain the above copyright 46 * notice, this list of conditions and the following disclaimer. 47 * 2. Redistributions in binary form must reproduce the above copyright 48 * notice, this list of conditions and the following disclaimer in the 49 * documentation and/or other materials provided with the distribution. 50 * 3. Neither the name of the University nor the names of its contributors 51 * may be used to endorse or promote products derived from this software 52 * without specific prior written permission. 53 * 54 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 55 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 56 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 57 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 58 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 59 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 60 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 61 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 62 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 63 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 64 * SUCH DAMAGE. 65 * 66 * @(#)machdep.c 8.3 (Berkeley) 1/12/94 67 * from: Utah Hdr: machdep.c 1.63 91/04/24 68 */ 69 /* 70 * Copyright (c) 1988 University of Utah. 71 * 72 * This code is derived from software contributed to Berkeley by 73 * the Systems Programming Group of the University of Utah Computer 74 * Science Department, The Mach Operating System project at 75 * Carnegie-Mellon University and Ralph Campbell. 76 * 77 * Redistribution and use in source and binary forms, with or without 78 * modification, are permitted provided that the following conditions 79 * are met: 80 * 1. Redistributions of source code must retain the above copyright 81 * notice, this list of conditions and the following disclaimer. 82 * 2. Redistributions in binary form must reproduce the above copyright 83 * notice, this list of conditions and the following disclaimer in the 84 * documentation and/or other materials provided with the distribution. 85 * 3. All advertising materials mentioning features or use of this software 86 * must display the following acknowledgement: 87 * This product includes software developed by the University of 88 * California, Berkeley and its contributors. 89 * 4. Neither the name of the University nor the names of its contributors 90 * may be used to endorse or promote products derived from this software 91 * without specific prior written permission. 92 * 93 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 94 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 95 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 96 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 97 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 98 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 99 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 100 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 101 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 102 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 103 * SUCH DAMAGE. 104 * 105 * @(#)machdep.c 8.3 (Berkeley) 1/12/94 106 * from: Utah Hdr: machdep.c 1.63 91/04/24 107 */ 108 109 #include <sys/cdefs.h> /* RCS ID & Copyright macro defns */ 110 __KERNEL_RCSID(0, "$NetBSD: machdep.c,v 1.3 2007/10/17 19:54:14 garbled Exp $"); 111 112 #include "opt_ddb.h" 113 #include "opt_kgdb.h" 114 115 #include "opt_memsize.h" 116 #include "opt_ethaddr.h" 117 118 #include "opt_pci.h" 119 #include "pci.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 133 #include <net/if.h> 134 #include <net/if_ether.h> 135 136 #include <uvm/uvm_extern.h> 137 138 #include <dev/cons.h> 139 140 #include "ksyms.h" 141 142 #if NKSYMS || defined(DDB) || defined(LKM) 143 #include <machine/db_machdep.h> 144 #include <ddb/db_extern.h> 145 #endif 146 147 #include <mips/cache.h> 148 #include <mips/locore.h> 149 150 #include <mips/adm5120/include/adm5120reg.h> 151 #include <mips/adm5120/include/adm5120var.h> 152 #include <mips/adm5120/include/adm5120_extiovar.h> 153 #include <mips/adm5120/include/adm5120_obiovar.h> 154 #include <mips/adm5120/include/adm5120_mainbusvar.h> 155 #include <mips/adm5120/include/adm5120_pcivar.h> 156 #include <mips/adm5120/dev/uart.h> 157 158 #ifndef MEMSIZE 159 #define MEMSIZE 4 * 1024 * 1024 160 #endif /* !MEMSIZE */ 161 162 struct user *proc0paddr; 163 164 /* Our exported CPU info; we can have only one. */ 165 struct cpu_info cpu_info_store; 166 167 /* Maps for VM objects. */ 168 struct vm_map *exec_map = NULL; 169 struct vm_map *mb_map = NULL; 170 struct vm_map *phys_map = NULL; 171 172 int physmem; /* # pages of physical memory */ 173 int maxmem; /* max memory per process */ 174 175 int mem_cluster_cnt; 176 phys_ram_seg_t mem_clusters[VM_PHYSSEG_MAX]; 177 178 struct adm5120_config adm5120_configuration; 179 180 void adm5120_setcpufreq(void); 181 182 void 183 adm5120_setcpufreq(void) 184 { 185 uint32_t v, freq; 186 187 v = SW_READ(SW_CODE_REG); 188 switch (v & CLKS_MASK) { 189 case CLKS_175MHZ: 190 freq = 175 * 1000 * 1000; 191 break; 192 case CLKS_200MHZ: 193 freq = 200 * 1000 * 1000; 194 break; 195 default: 196 panic("adm5120: cannot determine CPU clock speed"); 197 } 198 199 curcpu()->ci_cpu_freq = freq; 200 curcpu()->ci_cycles_per_hz = (freq + hz / 2) / hz / 2; 201 curcpu()->ci_divisor_delay = ((freq + 500000) / 1000000) / 2; 202 MIPS_SET_CI_RECIPRICAL(curcpu()); 203 } 204 205 void mach_init(int, char **, void *, void *); /* XXX */ 206 207 static void 208 copy_args(int argc, char **argv) 209 { 210 struct adm5120_config *admc = &adm5120_configuration; 211 int i; 212 char *buf; 213 size_t buflen, rc; 214 215 buf = admc->args; 216 buflen = sizeof(admc->args); 217 218 if (argc >= __arraycount(admc->argv)) 219 panic("%s: too many boot args\n", __func__); 220 221 for (i = 0; buflen > 0 && i < argc && argv[i] != NULL; i++) { 222 admc->argv[i] = buf; 223 if ((rc = strlcpy(buf, argv[i], buflen)) >= buflen) 224 panic("%s: boot args too long\n", __func__); 225 226 buf += rc; 227 buflen -= rc; 228 *buf++ = '\0'; 229 buflen--; 230 } 231 if (i < argc) 232 panic("%s: boot args too long\n", __func__); 233 234 admc->argc = argc; 235 } 236 237 static void 238 parse_args(prop_dictionary_t properties, int argc, char **argv, 239 uint32_t *memsizep) 240 { 241 char buf[32]; 242 char *key, *val, *valend; 243 unsigned long tmp; 244 int i; 245 uint8_t enaddr[ETHER_ADDR_LEN]; 246 247 if (memsizep != NULL) 248 *memsizep = MEMSIZE; 249 250 for (i = 0; i < argc && argv[i] != NULL; i++) { 251 if (strlcpy(buf, argv[i], sizeof(buf)) >= sizeof(buf)) 252 goto err; 253 val = buf; 254 key = strsep(&val, "="); 255 if (val == NULL) 256 goto err; 257 if (strcmp(key, "mem") == 0) { 258 tmp = strtoul(val, &valend, 10); 259 if (val == valend || *valend != 'M') 260 goto err; 261 if (memsizep != NULL) 262 *memsizep = tmp * 1024 * 1024; 263 } else if (strcmp(key, "HZ") == 0) 264 ; 265 else if (strcmp(key, "gpio") == 0) { 266 prop_number_t pn; 267 268 tmp = strtoul(val, &valend, 10); 269 if (val == valend || *valend != '\0') 270 goto err; 271 if (properties == NULL) 272 continue; 273 pn = prop_number_create_unsigned_integer(tmp); 274 if (pn == NULL) { 275 printf( 276 "%s: prop_number_create_unsigned_integer\n", 277 __func__); 278 continue; 279 } 280 if (!prop_dictionary_set(properties, "initial-gpio", 281 pn)) { 282 printf("%s: prop_dictionary_set(gpio)\n", 283 __func__); 284 } 285 prop_object_release(pn); 286 } else if (strcmp(key, "kmac") == 0) { 287 prop_data_t pd; 288 289 ether_nonstatic_aton(enaddr, val); 290 if (properties == NULL) 291 continue; 292 pd = prop_data_create_data(enaddr, sizeof(enaddr)); 293 if (pd == NULL) { 294 printf("%s: prop_data_create_data\n", __func__); 295 continue; 296 } 297 if (!prop_dictionary_set(properties, "mac-addr", pd)) { 298 printf("%s: prop_dictionary_set(mac)\n", 299 __func__); 300 } 301 prop_object_release(pd); 302 } else if (strcmp(key, "board") == 0) 303 printf("Routerboard %s\n", val); 304 else if (strcmp(key, "boot") == 0) 305 ; 306 continue; 307 err: 308 printf("bad argv[%d] (%s)\n", i, argv[i]); 309 } 310 } 311 312 void 313 mach_init(int argc, char **argv, void *a2, void *a3) 314 { 315 struct adm5120_config *admc = &adm5120_configuration; 316 uint32_t memsize; 317 vaddr_t kernend; 318 u_long first, last; 319 vaddr_t v; 320 321 extern char edata[], end[]; /* XXX */ 322 323 /* clear the BSS segment */ 324 kernend = mips_round_page(end); 325 memset(edata, 0, kernend - (vaddr_t)edata); 326 327 /* set CPU model info for sysctl_hw */ 328 strcpy(cpu_model, "Infineon ADM5120"); 329 330 /* 331 * Set up the exception vectors and CPU-specific function 332 * vectors early on. We need the wbflush() vector set up 333 * before comcnattach() is called (or at least before the 334 * first printf() after that is called). 335 * Sets up mips_cpu_flags that may be queried by other 336 * functions called during startup. 337 * Also clears the I+D caches. 338 */ 339 mips_vector_init(); 340 341 /* 342 * Set the VM page size. 343 */ 344 uvm_setpagesize(); 345 346 adm5120_setcpufreq(); 347 348 /* 349 * Initialize bus space tags. 350 */ 351 obio_bus_mem_init(&admc->obio_space, admc); 352 extio_bus_mem_init(&admc->extio_space, admc); 353 #if NPCI > 0 354 pciio_bus_mem_init(&admc->pciio_space, admc); 355 pcimem_bus_mem_init(&admc->pcimem_space, admc); 356 #endif 357 358 /* 359 * Initialize bus DMA tag. 360 */ 361 obio_dma_init(&admc->obio_dmat); 362 363 /* 364 * Attach serial console. 365 */ 366 uart_cnattach(); 367 368 /* 369 * Look at arguments passed to us and compute boothowto. 370 */ 371 boothowto = RB_AUTOBOOT; 372 #ifdef KADB 373 boothowto |= RB_KDB; 374 #endif 375 376 parse_args(NULL, argc, argv, &memsize); 377 378 /* 379 * Determine the memory size. 380 * 381 * Note: Reserve the first page! That's where the trap 382 * vectors are located. 383 */ 384 385 #if 0 386 if (GET_MEMSIZE(memsize) == 0) { 387 uint32_t val; 388 389 /* This does not seem to work... --dyoung */ 390 val = SW_READ(SW_MEMCONT_REG); 391 printf("SW_MEMCONT_REG: 0x%08" PRIx32 "\n", val); 392 switch (val & SDRAM_SIZE_MASK) { 393 case SDRAM_SIZE_4MBYTES: 394 memsize = 4 * 1024 * 1024; 395 break; 396 case SDRAM_SIZE_8MBYTES: 397 memsize = 8 * 1024 * 1024; 398 break; 399 case SDRAM_SIZE_16MBYTES: 400 memsize = 16 * 1024 * 1024; 401 break; 402 case SDRAM_SIZE_64MBYTES: 403 memsize = 64 * 1024 * 1024; 404 break; 405 case SDRAM_SIZE_128MBYTES: 406 memsize = 128 * 1024 * 1024; 407 break; 408 default: 409 panic("adm5120: cannot determine memory size"); 410 } 411 } 412 #endif 413 414 physmem = btoc(memsize); 415 416 mem_clusters[mem_cluster_cnt].start = PAGE_SIZE; 417 mem_clusters[mem_cluster_cnt].size = 418 memsize - mem_clusters[mem_cluster_cnt].start; 419 mem_cluster_cnt++; 420 421 /* 422 * Load the rest of the available pages into the VM system. 423 */ 424 first = round_page(MIPS_KSEG0_TO_PHYS(kernend)); 425 last = mem_clusters[0].start + mem_clusters[0].size; 426 uvm_page_physload(atop(first), atop(last), atop(first), atop(last), 427 VM_FREELIST_DEFAULT); 428 429 /* 430 * Initialize message buffer (at end of core). 431 */ 432 mips_init_msgbuf(); 433 434 /* 435 * Initialize the virtual memory system. 436 */ 437 pmap_bootstrap(); 438 439 /* 440 * Init mapping for u page(s) for proc0. 441 */ 442 v = uvm_pageboot_alloc(USPACE); 443 lwp0.l_addr = proc0paddr = (struct user *)v; 444 lwp0.l_md.md_regs = (struct frame *)(v + USPACE) - 1; 445 proc0paddr->u_pcb.pcb_context[11] = 446 MIPS_INT_MASK | MIPS_SR_INT_IE; /* SR */ 447 448 /* 449 * Initialize debuggers, and break into them, if appropriate. 450 */ 451 #if NKSYMS || defined(DDB) || defined(LKM) 452 ksyms_init(0, 0, 0); 453 #endif 454 #ifdef DDB 455 if (boothowto & RB_KDB) 456 Debugger(); 457 #endif 458 459 copy_args(argc, argv); 460 } 461 462 void 463 consinit(void) 464 { 465 466 /* 467 * Everything related to console initialization is done 468 * in mach_init(). 469 */ 470 } 471 472 void 473 cpu_startup(void) 474 { 475 struct adm5120_config *admc = &adm5120_configuration; 476 char pbuf[9]; 477 vaddr_t minaddr, maxaddr; 478 #ifdef DEBUG 479 extern int pmapdebug; /* XXX */ 480 int opmapdebug = pmapdebug; 481 482 pmapdebug = 0; /* Shut up pmap debug during bootstrap */ 483 #endif 484 485 if ((admc->properties = prop_dictionary_create()) == NULL) 486 printf("%s: prop_dictionary_create\n", __func__); 487 parse_args(admc->properties, admc->argc, admc->argv, NULL); 488 489 /* 490 * Good {morning,afternoon,evening,night}. 491 */ 492 printf("%s%s", copyright, version); 493 printf("%s\n", cpu_model); 494 format_bytes(pbuf, sizeof(pbuf), ctob(physmem)); 495 printf("total memory = %s\n", pbuf); 496 497 minaddr = 0; 498 /* 499 * Allocate a submap for exec arguments. This map effectively 500 * limits the number of processes exec'ing at any time. 501 */ 502 exec_map = uvm_km_suballoc(kernel_map, &minaddr, &maxaddr, 503 16 * NCARGS, VM_MAP_PAGEABLE, FALSE, NULL); 504 505 /* 506 * Allocate a submap for physio 507 */ 508 phys_map = uvm_km_suballoc(kernel_map, &minaddr, &maxaddr, 509 VM_PHYS_SIZE, 0, FALSE, NULL); 510 511 /* 512 * No need to allocate an mbuf cluster submap. Mbuf clusters 513 * are allocated via the pool allocator, and we use KSEG to 514 * map those pages. 515 */ 516 517 #ifdef DEBUG 518 pmapdebug = opmapdebug; 519 #endif 520 format_bytes(pbuf, sizeof(pbuf), ptoa(uvmexp.free)); 521 printf("avail memory = %s\n", pbuf); 522 } 523 524 void 525 cpu_reboot(int howto, char *bootstr) 526 { 527 static int waittime = -1; 528 529 /* Take a snapshot before clobbering any registers. */ 530 if (curproc) 531 savectx((struct user *)curpcb); 532 533 /* If "always halt" was specified as a boot flag, obey. */ 534 if (boothowto & RB_HALT) 535 howto |= RB_HALT; 536 537 boothowto = howto; 538 539 /* If system is cold, just halt. */ 540 if (cold) { 541 boothowto |= RB_HALT; 542 goto haltsys; 543 } 544 545 if ((boothowto & RB_NOSYNC) == 0 && waittime < 0) { 546 waittime = 0; 547 548 /* 549 * Synchronize the disks.... 550 */ 551 vfs_shutdown(); 552 553 /* 554 * If we've been adjusting the clock, the todr 555 * will be out of synch; adjust it now. 556 */ 557 resettodr(); 558 } 559 560 /* Disable interrupts. */ 561 splhigh(); 562 563 if (boothowto & RB_DUMP) 564 dumpsys(); 565 566 haltsys: 567 /* Run any shutdown hooks. */ 568 doshutdownhooks(); 569 570 /* 571 * Routerboard BIOS may autoboot, so "pseudo-halt". 572 */ 573 if (boothowto & RB_HALT) { 574 printf("\n"); 575 printf("The operating system has halted.\n"); 576 printf("Please press any key to reboot.\n\n"); 577 cnpollc(1); /* For proper keyboard command handling */ 578 cngetc(); 579 cnpollc(0); 580 } 581 582 printf("reseting board...\n\n"); 583 mips_icache_sync_all(); 584 mips_dcache_wbinv_all(); 585 SW_WRITE(SW_SFTRES_REG, 0); /* reset */ 586 for (;;) 587 /* spin forever */ ; /* XXX */ 588 /*NOTREACHED*/ 589 } 590