sys/arch/evbppc/obs405/obs200_machdep.c

   1 /*      $NetBSD: obs200_machdep.c,v 1.8 2008/11/30 18:21:33 martin Exp $        */
   2 /*      Original: machdep.c,v 1.3 2005/01/17 17:24:09 shige Exp */
   3
   4 /*
   5  * Copyright 2001, 2002 Wasabi Systems, Inc.
   6  * All rights reserved.
   7  *
   8  * Written by Eduardo Horvath and Simon Burge for Wasabi Systems, Inc.
   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  * 3. All advertising materials mentioning features or use of this software
  19  *    must display the following acknowledgement:
  20  *      This product includes software developed for the NetBSD Project by
  21  *      Wasabi Systems, Inc.
  22  * 4. The name of Wasabi Systems, Inc. may not be used to endorse
  23  *    or promote products derived from this software without specific prior
  24  *    written permission.
  25  *
  26  * THIS SOFTWARE IS PROVIDED BY WASABI SYSTEMS, INC. ``AS IS'' AND
  27  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
  28  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  29  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL WASABI SYSTEMS, INC
  30  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  31  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  32  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  33  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
  34  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  35  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  36  * POSSIBILITY OF SUCH DAMAGE.
  37  */
  38
  39 /*
  40  * Copyright (C) 1995, 1996 Wolfgang Solfrank.
  41  * Copyright (C) 1995, 1996 TooLs GmbH.
  42  * All rights reserved.
  43  *
  44  * Redistribution and use in source and binary forms, with or without
  45  * modification, are permitted provided that the following conditions
  46  * are met:
  47  * 1. Redistributions of source code must retain the above copyright
  48  *    notice, this list of conditions and the following disclaimer.
  49  * 2. Redistributions in binary form must reproduce the above copyright
  50  *    notice, this list of conditions and the following disclaimer in the
  51  *    documentation and/or other materials provided with the distribution.
  52  * 3. All advertising materials mentioning features or use of this software
  53  *    must display the following acknowledgement:
  54  *      This product includes software developed by TooLs GmbH.
  55  * 4. The name of TooLs GmbH may not be used to endorse or promote products
  56  *    derived from this software without specific prior written permission.
  57  *
  58  * THIS SOFTWARE IS PROVIDED BY TOOLS GMBH ``AS IS'' AND ANY EXPRESS OR
  59  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  60  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  61  * IN NO EVENT SHALL TOOLS GMBH BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
  62  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
  63  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
  64  * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
  65  * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
  66  * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
  67  * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  68  */
  69
  70 #include <sys/cdefs.h>
  71 __KERNEL_RCSID(0, "$NetBSD: obs200_machdep.c,v 1.8 2008/11/30 18:21:33 martin Exp $");
  72
  73 #include "opt_compat_netbsd.h"
  74 #include "opt_ddb.h"
  75 #include "opt_ipkdb.h"
  76 #include "opt_modular.h"
  77
  78 #include <sys/param.h>
  79 #include <sys/kernel.h>
  80 #include <sys/ksyms.h>
  81 #include <sys/mount.h>
  82 #include <sys/reboot.h>
  83 #include <sys/systm.h>
  84 #include <sys/device.h>
  85
  86 #include <uvm/uvm.h>
  87 #include <uvm/uvm_extern.h>
  88
  89 #include <machine/bus.h>
  90 #include <machine/cpu.h>
  91 #include <machine/obs200.h>
  92 #include <machine/century_bios.h>
  93 #include <powerpc/spr.h>
  94
  95 #include <dev/pci/pcivar.h>
  96 #include <dev/pci/pciconf.h>
  97
  98 #include <powerpc/ibm4xx/dcr405gp.h>
  99
 100 #include "ksyms.h"
 101
 102
 103 #define TLB_PG_SIZE     (16*1024*1024)
 104
 105 /*
 106  * Global variables used here and there
 107  */
 108 char bootpath[256];
 109
 110 extern paddr_t msgbuf_paddr;
 111
 112 #if NKSYMS || defined(DDB) || defined(MODULAR)
 113 void *startsym, *endsym;
 114 #endif
 115
 116 void initppc(u_int, u_int, char *, void *);
 117 int lcsplx(int);
 118
 119
 120 void
 121 initppc(u_int startkernel, u_int endkernel, char *args, void *info_block)
 122 {
 123         u_int32_t pllmode;
 124         u_int32_t psr;
 125         vaddr_t va;
 126         u_int memsize;
 127
 128         /* Disable all external interrupts */
 129         mtdcr(DCR_UIC0_ER, 0);
 130         pllmode = mfdcr(DCR_CPC0_PLLMR);
 131         psr = mfdcr(DCR_CPC0_PSR);
 132
 133         /* Setup board from BIOS */
 134         bios_board_init(info_block, startkernel);
 135         memsize = bios_board_memsize_get();
 136
 137         /* Linear map kernel memory. */
 138         for (va = 0; va < endkernel; va += TLB_PG_SIZE)
 139                 ppc4xx_tlb_reserve(va, va, TLB_PG_SIZE, TLB_EX);
 140
 141         /* Map console after physmem (see pmap_tlbmiss()). */
 142         ppc4xx_tlb_reserve(OBS405_CONADDR, roundup(memsize, TLB_PG_SIZE),
 143             TLB_PG_SIZE, TLB_I | TLB_G);
 144
 145         /* Initialize IBM405GPr CPU */
 146         ibm40x_memsize_init(memsize, startkernel);
 147         ibm4xx_init((void (*)(void))ext_intr);
 148
 149         /*
 150          * Set the page size.
 151          */
 152         uvm_setpagesize();
 153
 154         /*
 155          * Initialize pmap module.
 156          */
 157         pmap_bootstrap(startkernel, endkernel);
 158
 159 #ifdef DEBUG
 160         bios_board_print();
 161         printf("  PLL Mode Register = 0x%08x\n", pllmode);
 162         printf("  Chip Pin Strapping Register = 0x%08x\n", psr);
 163 #endif
 164
 165 #if NKSYMS || defined(DDB) || defined(MODULAR)
 166         ksyms_addsyms_elf((int)((u_int)endsym - (u_int)startsym), startsym, endsym);
 167 #endif
 168 #ifdef DDB
 169         if (boothowto & RB_KDB)
 170                 Debugger();
 171 #endif
 172 #ifdef IPKDB
 173         /*
 174          * Now trap to IPKDB
 175          */
 176         ipkdb_init();
 177         if (boothowto & RB_KDB)
 178                 ipkdb_connect(0);
 179 #endif
 180 }
 181
 182 void
 183 consinit(void)
 184 {
 185
 186         obs405_consinit(OBS200_COM_FREQ);
 187 }
 188
 189 int
 190 lcsplx(int ipl)
 191 {
 192
 193         return spllower(ipl);   /* XXX */
 194 }
 195
 196
 197 /*
 198  * Machine dependent startup code.
 199  */
 200 void
 201 cpu_startup(void)
 202 {
 203
 204         /*
 205          * cpu common startup
 206          */
 207         ibm4xx_cpu_startup("OpenBlockS S/R IBM PowerPC 405GP Board");
 208
 209         /*
 210          * Set up the board properties database.
 211          */
 212         bios_board_info_set();
 213
 214         /*
 215          * Now that we have VM, malloc()s are OK in bus_space.
 216          */
 217         bus_space_mallocok();
 218
 219         /*
 220          * no fake mapiodev
 221          */
 222         fake_mapiodev = 0;
 223 }
 224
 225 /*
 226  * Halt or reboot the machine after syncing/dumping according to howto.
 227  */
 228 void
 229 cpu_reboot(int howto, char *what)
 230 {
 231         static int syncing;
 232         static char str[256];
 233         char *ap = str, *ap1 = ap;
 234
 235         boothowto = howto;
 236         if (!cold && !(howto & RB_NOSYNC) && !syncing) {
 237                 syncing = 1;
 238                 vfs_shutdown();         /* sync */
 239                 resettodr();            /* set wall clock */
 240         }
 241
 242         splhigh();
 243
 244         if (!cold && (howto & RB_DUMP))
 245                 ibm4xx_dumpsys();
 246
 247         doshutdownhooks();
 248
 249         pmf_system_shutdown(boothowto);
 250
 251         if ((howto & RB_POWERDOWN) == RB_POWERDOWN) {
 252           /* Power off here if we know how...*/
 253         }
 254
 255         if (howto & RB_HALT) {
 256                 printf("halted\n\n");
 257
 258 #if 0
 259                 goto reboot;    /* XXX for now... */
 260 #endif
 261
 262 #ifdef DDB
 263                 printf("dropping to debugger\n");
 264                 while(1)
 265                         Debugger();
 266 #endif
 267         }
 268
 269         printf("rebooting\n\n");
 270         if (what && *what) {
 271                 if (strlen(what) > sizeof str - 5)
 272                         printf("boot string too large, ignored\n");
 273                 else {
 274                         strcpy(str, what);
 275                         ap1 = ap = str + strlen(str);
 276                         *ap++ = ' ';
 277                 }
 278         }
 279         *ap++ = '-';
 280         if (howto & RB_SINGLE)
 281                 *ap++ = 's';
 282         if (howto & RB_KDB)
 283                 *ap++ = 'd';
 284         *ap++ = 0;
 285         if (ap[-2] == '-')
 286                 *ap1 = 0;
 287
 288         /* flush cache for msgbuf */
 289         __syncicache((void *)msgbuf_paddr, round_page(MSGBUFSIZE));
 290
 291 #if 0
 292  reboot:
 293 #endif
 294         ppc4xx_reset();
 295
 296         printf("ppc4xx_reset() failed!\n");
 297 #ifdef DDB
 298         while(1)
 299                 Debugger();
 300 #else
 301         while (1)
 302                 /* nothing */;
 303 #endif
 304 }
 305
 306 int
 307 pci_intr_map(struct pci_attach_args *pa, pci_intr_handle_t *ihp)
 308 {
 309         /*
 310          * We need to map the interrupt pin to the interrupt bit
 311          * in the UIC associated with it.
 312          *
 313          * This platform has 4 PCI devices.
 314          *
 315          # External IRQ Mappings:
 316          *  dev 7 (Ext IRQ3):   Realtek 8139 Ethernet
 317          *  dev 8 (Ext IRQ0):   PCI Connector
 318          */
 319         static const int irqmap[15/*device*/][4/*pin*/] = {
 320                 { -1, -1, -1, -1 },     /*  1: none */
 321                 { -1, -1, -1, -1 },     /*  2: none */
 322                 { -1, -1, -1, -1 },     /*  3: none */
 323                 { -1, -1, -1, -1 },     /*  4: none */
 324                 { -1, -1, -1, -1 },     /*  5: none */
 325                 { -1, -1, -1, -1 },     /*  6: none */
 326                 {  3, -1, -1, -1 },     /*  7: none */
 327                 {  0, -1, -1, -1 },     /*  8: none */
 328                 { -1, -1, -1, -1 },     /*  9: none */
 329                 { -1, -1, -1, -1 },     /* 10: none */
 330                 { -1, -1, -1, -1 },     /* 11: none */
 331                 { -1, -1, -1, -1 },     /* 12: none */
 332                 { -1, -1, -1, -1 },     /* 13: none */
 333                 { -1, -1, -1, -1 },     /* 14: none */
 334                 { -1, -1, -1, -1 },     /* 15: none */
 335         };
 336
 337         int pin, dev, irq;
 338
 339         pin = pa->pa_intrpin;
 340         dev = pa->pa_device;
 341         *ihp = -1;
 342
 343         /* if interrupt pin not used... */
 344         if (pin == 0)
 345                 return 1;
 346
 347         if (pin > 4) {
 348                 printf("pci_intr_map: bad interrupt pin %d\n", pin);
 349                 return 1;
 350         }
 351
 352         if ((dev < 1) || (dev > 15)) {
 353                 printf("pci_intr_map: bad device %d\n", dev);
 354                 return 1;
 355         }
 356
 357
 358         if ((irq = irqmap[dev - 1][pin - 1]) == -1) {
 359                 printf("pci_intr_map: no IRQ routing for device %d pin %d\n",
 360                         dev, pin);
 361                 return 1;
 362         }
 363
 364         *ihp = irq + 25;
 365         return 0;
 366 }
 367
 368 void
 369 pci_conf_interrupt(pci_chipset_tag_t pc, int bus, int dev, int pin,
 370                         int swiz, int *iline)
 371 {
 372         static const int ilinemap[15/*device*/] = {
 373                 -1, -1, -1, -1,         /* device  1 -  4 */
 374                 -1, -1, 28, 25,         /* device  5 -  8 */
 375                 -1, -1, -1, -1,         /* device  9 - 12 */
 376                 -1, -1, -1,             /* device 13 - 15 */
 377         };
 378
 379         if (bus == 0) {
 380                 if ((dev < 1) || (dev > 15)) {
 381                         printf("pci_intr_map: bad device %d\n", dev);
 382                         *iline = 0;
 383                         return;
 384                 }
 385                 *iline = ilinemap[dev - 1];
 386         } else {
 387                 *iline = 19 + ((swiz + dev + 1) & 3);
 388         }
 389 }