sys/arch/evbmips/gdium/machdep.c

   1 /*      $NetBSD: machdep.c,v 1.9 2009/11/26 00:19:16 matt 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.9 2009/11/26 00:19:16 matt 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/mount.h>
 127 #include <sys/kcore.h>
 128 #include <sys/boot_flag.h>
 129 #include <sys/termios.h>
 130 #include <sys/ksyms.h>
 131 #include <sys/device.h>
 132
 133 #include <uvm/uvm_extern.h>
 134
 135 #include <dev/cons.h>
 136
 137 #include "ksyms.h"
 138
 139 #if NKSYMS || defined(DDB) || defined(MODULAR)
 140 #include <machine/db_machdep.h>
 141 #include <ddb/db_extern.h>
 142 #endif
 143
 144 #include <machine/cpu.h>
 145 #include <machine/psl.h>
 146
 147 #include <mips/bonito/bonitoreg.h>
 148 #include <evbmips/gdium/gdiumvar.h>
 149
 150 #include "com.h"
 151 #if NCOM > 0
 152 #include <dev/ic/comreg.h>
 153 #include <dev/ic/comvar.h>
 154
 155 int     comcnrate = 38400;      /* XXX should be config option */
 156 #endif /* NCOM > 0 */
 157
 158 struct gdium_config gdium_configuration = {
 159         .gc_bonito = {
 160                 .bc_adbase = 11,        /* magic */
 161         },
 162 };
 163
 164 /* For sysctl_hw. */
 165 extern char cpu_model[];
 166
 167 /* Our exported CPU info; we can have only one. */
 168 struct cpu_info cpu_info_store;
 169
 170 /* Maps for VM objects. */
 171 struct vm_map *mb_map = NULL;
 172 struct vm_map *phys_map = NULL;
 173
 174 int     netboot;                /* Are we netbooting? */
 175
 176 phys_ram_seg_t mem_clusters[VM_PHYSSEG_MAX];
 177 int mem_cluster_cnt;
 178
 179 void    configure(void);
 180 void    mach_init(int, char **, char **, void *);
 181
 182 /*
 183  * safepri is a safe priority for sleep to set for a spin-wait during
 184  * autoconfiguration or after a panic.  Used as an argument to splx().
 185  */
 186 int     safepri = MIPS1_PSL_LOWIPL;
 187
 188 /*
 189  * For some reason, PMON doesn't assign a real address to the Ralink's BAR.
 190  * So we have to do it.
 191  */
 192 static void
 193 gdium_pci_attach_hook(device_t parent, device_t self,
 194     struct pcibus_attach_args *pba)
 195 {
 196         const pcitag_t high_dev = pci_make_tag(pba->pba_pc, 0, 17, 1);
 197         const pcitag_t ralink_dev = pci_make_tag(pba->pba_pc, 0, 13, 0);
 198         bus_size_t high_size, ralink_size;
 199         pcireg_t v;
 200
 201         /*
 202          * Get the highest PCI addr used from the last PCI dev.
 203          */
 204         v = pci_conf_read(pba->pba_pc, high_dev, PCI_MAPREG_START);
 205         v &= PCI_MAPREG_MEM_ADDR_MASK;
 206
 207         /*
 208          * Get the sizes of the map registers.
 209          */
 210         pci_mapreg_info(pba->pba_pc, high_dev, PCI_MAPREG_START,
 211             PCI_MAPREG_MEM_TYPE_32BIT, NULL, &high_size, NULL);
 212         pci_mapreg_info(pba->pba_pc, ralink_dev, PCI_MAPREG_START,
 213             PCI_MAPREG_MEM_TYPE_32BIT, NULL, &ralink_size, NULL);
 214
 215         /*
 216          * Position the ralink register space after the last device.
 217          */
 218         v = (v + high_size + ralink_size - 1) & ~(ralink_size - 1);
 219
 220         /*
 221          * Set the mapreg.
 222          */
 223         pci_conf_write(pba->pba_pc, ralink_dev, PCI_MAPREG_START, v);
 224
 225 #if 0
 226         /*
 227          * Why does linux do this?
 228          */
 229         for (int dev = 15; dev <= 17; dev +=2) {
 230                 for (int func = 0; func <= 1; func++) {
 231                         pcitag_t usb_dev = pci_make_tag(pba->pba_pc, 0, dev, func);
 232                         v = pci_conf_read(pba->pba_pc, usb_dev, 0xe0);
 233                         v |= 3;
 234                         pci_conf_write(pba->pba_pc, usb_dev, 0xe0, v);
 235                 }
 236         }
 237 #endif
 238 }
 239
 240 /*
 241  * Do all the stuff that locore normally does before calling main().
 242  */
 243 void
 244 mach_init(int argc, char **argv, char **envp, void *callvec)
 245 {
 246         struct gdium_config *gc = &gdium_configuration;
 247         void *kernend;
 248         u_long first, last;
 249         struct pcb *pcb0;
 250         vaddr_t v;
 251 #ifdef NOTYET
 252         char *cp;
 253         int howto;
 254 #endif
 255         int i;
 256         psize_t memsize;
 257
 258         extern char edata[], end[];
 259
 260         /*
 261          * Clear the BSS segment.
 262          */
 263         kernend = (void *)mips_round_page(end);
 264         memset(edata, 0, (char *)kernend - edata);
 265
 266         /*
 267          * Set up the exception vectors and CPU-specific function
 268          * vectors early on.  We need the wbflush() vector set up
 269          * before comcnattach() is called (or at least before the
 270          * first printf() after that is called).
 271          * Also clears the I+D caches.
 272          */
 273         mips_vector_init();
 274
 275         /* set the VM page size */
 276         uvm_setpagesize();
 277
 278         memsize = 256*1024*1024;
 279         physmem = btoc(memsize);
 280
 281         bonito_pci_init(&gc->gc_pc, &gc->gc_bonito);
 282         /*
 283          * Override the null bonito_pci_attach_hook with our own to we can
 284          * fix the ralink (device 13).
 285          */
 286         gc->gc_pc.pc_attach_hook = gdium_pci_attach_hook;
 287         gdium_bus_io_init(&gc->gc_iot, gc);
 288         gdium_bus_mem_init(&gc->gc_memt, gc);
 289         gdium_dma_init(gc);
 290         gdium_cnattach(gc);
 291
 292         /*
 293          * Disable the 2nd PCI window since we don't need it.
 294          */
 295         mips3_sd((uint64_t *)MIPS_PHYS_TO_KSEG1(BONITO_REGBASE + 0x158), 0xe);
 296         pci_conf_write(&gc->gc_pc, pci_make_tag(&gc->gc_pc, 0, 0, 0), 18, 0);
 297
 298         /*
 299          * Get the timer from PMON.
 300          */
 301         for (i = 0; envp[i] != NULL; i++) {
 302                 if (!strncmp(envp[i], "cpuclock=", 9)) {
 303                         curcpu()->ci_cpu_freq =
 304                             strtoul(&envp[i][9], NULL, 10);
 305                         break;
 306                 }
 307         }
 308
 309         if (mips_cpu_flags & CPU_MIPS_DOUBLE_COUNT)
 310                 curcpu()->ci_cpu_freq /= 2;
 311
 312         /* Compute the number of ticks for hz. */
 313         curcpu()->ci_cycles_per_hz = (curcpu()->ci_cpu_freq + hz / 2) / hz;
 314
 315         /* Compute the delay divisor. */
 316         curcpu()->ci_divisor_delay =
 317             ((curcpu()->ci_cpu_freq + 500000) / 1000000);
 318
 319         /*
 320          * Get correct cpu frequency if the CPU runs at twice the
 321          * external/cp0-count frequency.
 322          */
 323         if (mips_cpu_flags & CPU_MIPS_DOUBLE_COUNT)
 324                 curcpu()->ci_cpu_freq *= 2;
 325
 326 #ifdef DEBUG
 327         printf("Timer calibration: %lu cycles/sec\n",
 328             curcpu()->ci_cpu_freq);
 329 #endif
 330
 331 #if NCOM > 0
 332         /*
 333          * Delay to allow firmware putchars to complete.
 334          * FIFO depth * character time.
 335          * character time = (1000000 / (defaultrate / 10))
 336          */
 337         delay(160000000 / comcnrate);
 338         if (comcnattach(&gc->gc_iot, MALTA_UART0ADR, comcnrate,
 339             COM_FREQ, COM_TYPE_NORMAL,
 340             (TTYDEF_CFLAG & ~(CSIZE | PARENB)) | CS8) != 0)
 341                 panic("malta: unable to initialize serial console");
 342 #endif /* NCOM > 0 */
 343
 344         mem_clusters[0].start = 0;
 345         mem_clusters[0].size = ctob(physmem);
 346         mem_cluster_cnt = 1;
 347
 348         strcpy(cpu_model, "Gdium Liberty 1000");
 349
 350         /*
 351          * XXX: check argv[0] - do something if "gdb"???
 352          */
 353
 354         /*
 355          * Look at arguments passed to us and compute boothowto.
 356          */
 357         boothowto = RB_AUTOBOOT;
 358 #ifdef NOTYET
 359         for (i = 1; i < argc; i++) {
 360                 for (cp = argv[i]; *cp; cp++) {
 361                         /* Ignore superfluous '-', if there is one */
 362                         if (*cp == '-')
 363                                 continue;
 364
 365                         howto = 0;
 366                         BOOT_FLAG(*cp, howto);
 367                         if (! howto)
 368                                 printf("bootflag '%c' not recognised\n", *cp);
 369                         else
 370                                 boothowto |= howto;
 371                 }
 372         }
 373 #endif
 374
 375         /*
 376          * Load the rest of the available pages into the VM system.
 377          */
 378         first = round_page(MIPS_KSEG0_TO_PHYS(kernend));
 379         last = mem_clusters[0].start + mem_clusters[0].size;
 380         uvm_page_physload(atop(first), atop(last), atop(first), atop(last),
 381                 VM_FREELIST_DEFAULT);
 382
 383         /*
 384          * Initialize error message buffer (at end of core).
 385          */
 386         mips_init_msgbuf();
 387
 388         pmap_bootstrap();
 389
 390         /*
 391          * Allocate uarea page for lwp0 and set it.
 392          */
 393         v = uvm_pageboot_alloc(USPACE);
 394         uvm_lwp_setuarea(&lwp0, v);
 395
 396         pcb0 = lwp_getpcb(&lwp0);
 397         pcb0->pcb_context[11] = MIPS_INT_MASK | MIPS_SR_INT_IE; /* SR */
 398
 399         lwp0.l_md.md_regs = (struct frame *)(v + USPACE) - 1;
 400
 401         /*
 402          * Initialize debuggers, and break into them, if appropriate.
 403          */
 404 #if defined(DDB)
 405         if (boothowto & RB_KDB)
 406                 Debugger();
 407 #endif
 408 }
 409
 410 void
 411 consinit(void)
 412 {
 413
 414         /*
 415          * Everything related to console initialization is done
 416          * in mach_init().
 417          */
 418 }
 419
 420 /*
 421  * Allocate memory for variable-sized tables,
 422  */
 423 void
 424 cpu_startup(void)
 425 {
 426         vaddr_t minaddr, maxaddr;
 427         char pbuf[9];
 428
 429         /*
 430          * Good {morning,afternoon,evening,night}.
 431          */
 432         printf("%s%s", copyright, version);
 433         format_bytes(pbuf, sizeof(pbuf), ctob(physmem));
 434         printf("total memory = %s\n", pbuf);
 435
 436         /*
 437          * Virtual memory is bootstrapped -- notify the bus spaces
 438          * that memory allocation is now safe.
 439          */
 440         gdium_configuration.gc_mallocsafe = 1;
 441
 442         minaddr = 0;
 443         /*
 444          * Allocate a submap for physio.
 445          */
 446         phys_map = uvm_km_suballoc(kernel_map, &minaddr, &maxaddr,
 447                                     VM_PHYS_SIZE, 0, FALSE, NULL);
 448
 449         /*
 450          * (No need to allocate an mbuf cluster submap.  Mbuf clusters
 451          * are allocated via the pool allocator, and we use KSEG to
 452          * map those pages.)
 453          */
 454
 455         format_bytes(pbuf, sizeof(pbuf), ptoa(uvmexp.free));
 456         printf("avail memory = %s\n", pbuf);
 457 }
 458
 459 int     waittime = -1;
 460
 461 void
 462 cpu_reboot(int howto, char *bootstr)
 463 {
 464
 465         /* Take a snapshot before clobbering any registers. */
 466         if (curproc)
 467                 savectx(curpcb);
 468
 469         if (cold) {
 470                 howto |= RB_HALT;
 471                 goto haltsys;
 472         }
 473
 474         /* If "always halt" was specified as a boot flag, obey. */
 475         if (boothowto & RB_HALT)
 476                 howto |= RB_HALT;
 477
 478         boothowto = howto;
 479         if ((howto & RB_NOSYNC) == 0 && (waittime < 0)) {
 480                 waittime = 0;
 481                 vfs_shutdown();
 482
 483                 /*
 484                  * If we've been adjusting the clock, the todr
 485                  * will be out of synch; adjust it now.
 486                  */
 487                 resettodr();
 488         }
 489
 490         splhigh();
 491
 492         if (howto & RB_DUMP)
 493                 dumpsys();
 494
 495 haltsys:
 496         doshutdownhooks();
 497
 498         pmf_system_shutdown(boothowto);
 499
 500         if ((howto & RB_POWERDOWN) == RB_POWERDOWN) {
 501                 /*
 502                  * Turning on GPIO1 as output will cause a powerdown.
 503                  */
 504                 REGVAL(BONITO_GPIODATA) |= 2;
 505                 REGVAL(BONITO_GPIOIE) &= ~2;
 506         }
 507
 508         if (howto & RB_HALT) {
 509                 printf("\n");
 510                 printf("The operating system has halted.\n");
 511                 printf("Please press any key to reboot.\n\n");
 512                 cnpollc(1);     /* For proper keyboard command handling */
 513                 cngetc();
 514                 cnpollc(0);
 515         }
 516
 517         printf("%s\n\n", ((howto & RB_HALT) != 0) ? "halted." : "rebooting...");
 518
 519         /*
 520          * Turning off GPIO2 as output will cause a reset.
 521          */
 522         REGVAL(BONITO_GPIODATA) &= ~4;
 523         REGVAL(BONITO_GPIOIE) &= ~4;
 524
 525         __asm__ __volatile__ (
 526                 "\t.long 0x3c02bfc0\n"
 527                 "\t.long 0x00400008\n"
 528             ::: "v0");
 529 }