1 /* $NetBSD: dec_kn300.c,v 1.45 2025/03/09 01:06:42 thorpej Exp $ */ 2 3 /* 4 * Copyright (c) 1998 by Matthew Jacob 5 * NASA AMES Research Center. 6 * All rights reserved. 7 * 8 * Redistribution and use in source and binary forms, with or without 9 * modification, are permitted provided that the following conditions 10 * are met: 11 * 1. Redistributions of source code must retain the above copyright 12 * notice immediately at the beginning of the file, without modification, 13 * 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. The name of the author may not be used to endorse or promote products 18 * derived from this software without specific prior written permission. 19 * 20 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 21 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 22 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 23 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR 24 * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 26 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 27 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 28 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 29 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 30 * SUCH DAMAGE. 31 */ 32 33 #include <sys/cdefs.h> /* RCS ID & Copyright macro defns */ 34 35 __KERNEL_RCSID(0, "$NetBSD: dec_kn300.c,v 1.45 2025/03/09 01:06:42 thorpej Exp $"); 36 37 #include <sys/param.h> 38 #include <sys/systm.h> 39 #include <sys/device.h> 40 41 #include <machine/rpb.h> 42 #include <machine/alpha.h> 43 #include <machine/autoconf.h> 44 #include <machine/frame.h> 45 #include <machine/cpuconf.h> 46 #include <machine/logout.h> 47 48 #include <dev/pci/pcivar.h> 49 50 #include <uvm/uvm_extern.h> 51 52 #include <alpha/mcbus/mcbusreg.h> 53 #include <alpha/mcbus/mcbusvar.h> 54 #include <alpha/pci/mcpciareg.h> 55 #include <alpha/pci/mcpciavar.h> 56 57 void dec_kn300_init(void); 58 void dec_kn300_cons_init(void); 59 static void dec_kn300_device_register(device_t, void *); 60 static void dec_kn300_mcheck_handler 61 (unsigned long, struct trapframe *, unsigned long, unsigned long); 62 63 #define ALPHASERVER_4100 "AlphaServer 4100" 64 65 const struct alpha_variation_table dec_kn300_variations[] = { 66 { 0, ALPHASERVER_4100 }, 67 { 0, NULL }, 68 }; 69 70 void 71 dec_kn300_init(void) 72 { 73 uint64_t variation; 74 int cachesize; 75 76 platform.family = ALPHASERVER_4100; 77 78 if ((platform.model = alpha_dsr_sysname()) == NULL) { 79 variation = hwrpb->rpb_variation & SV_ST_MASK; 80 if ((platform.model = alpha_variation_name(variation, 81 dec_kn300_variations)) == NULL) 82 platform.model = alpha_unknown_sysname(); 83 } 84 85 platform.iobus = "mcbus"; 86 platform.cons_init = dec_kn300_cons_init; 87 platform.device_register = dec_kn300_device_register; 88 platform.mcheck_handler = dec_kn300_mcheck_handler; 89 90 /* 91 * Determine B-cache size by looking at the primary (console) 92 * MCPCIA's WHOAMI register. 93 */ 94 mcpcia_init(); 95 96 if (mcbus_primary.mcbus_valid) { 97 switch (mcbus_primary.mcbus_bcache) { 98 default: 99 case CPU_BCache_0MB: 100 /* No B-cache or invalid; default to 1MB. */ 101 /* FALLTHROUGH */ 102 103 case CPU_BCache_1MB: 104 cachesize = (1 * 1024 * 1024); 105 break; 106 107 case CPU_BCache_2MB: 108 cachesize = (2 * 1024 * 1024); 109 break; 110 111 case CPU_BCache_4MB: 112 cachesize = (4 * 1024 * 1024); 113 break; 114 } 115 } else { 116 /* Default to 1MB. */ 117 cachesize = (1 * 1024 * 1024); 118 } 119 120 uvmexp.ncolors = atop(cachesize); 121 } 122 123 void 124 dec_kn300_cons_init(void) 125 { 126 struct mcpcia_config *ccp; 127 extern struct mcpcia_config mcpcia_console_configuration; 128 129 ccp = &mcpcia_console_configuration; 130 /* It's already initialized. */ 131 132 pci_consinit(&ccp->cc_pc, &ccp->cc_iot, &ccp->cc_memt, 133 &ccp->cc_iot, &ccp->cc_memt); 134 } 135 136 /* #define BDEBUG 1 */ 137 static void 138 dec_kn300_device_register(device_t dev, void *aux) 139 { 140 static device_t primarydev; 141 struct bootdev_data *b = bootdev_data; 142 143 if (booted_device != NULL || b == NULL) { 144 return; 145 } 146 147 if (primarydev == NULL) { 148 if (device_is_a(dev, "mcpcia")) { 149 struct mcbus_dev_attach_args *ma = aux; 150 151 if (b->bus == ma->ma_mid - 4) { 152 primarydev = dev; 153 #ifdef BDEBUG 154 printf("\nprimarydev = %s\n", 155 device_xname(dev)); 156 #endif 157 } 158 } 159 return; 160 } 161 162 pci_find_bootdev(primarydev, dev, aux); 163 } 164 165 166 /* 167 * KN300 Machine Check Handlers. 168 */ 169 static void kn300_softerr(unsigned long, unsigned long, 170 unsigned long, struct trapframe *); 171 172 static void kn300_mcheck(unsigned long, unsigned long, 173 unsigned long, struct trapframe *); 174 175 /* 176 * "soft" error structure in system area for KN300 processor. 177 * It differs from the EV5 'common' structure in a minor but 178 * exceedingly stupid and annoying fashion. 179 */ 180 181 typedef struct { 182 /* 183 * Should be mc_cc_ev5 structure. Contents are the same, 184 * just in different places. 185 */ 186 uint64_t ei_stat; 187 uint64_t ei_addr; 188 uint64_t fill_syndrome; 189 uint64_t isr; 190 /* 191 * Platform Specific Area 192 */ 193 uint32_t whami; 194 uint32_t sys_env; 195 uint64_t mcpcia_regs; 196 uint32_t pci_rev; 197 uint32_t mc_err0; 198 uint32_t mc_err1; 199 uint32_t cap_err; 200 uint32_t mdpa_stat; 201 uint32_t mdpa_syn; 202 uint32_t mdpb_stat; 203 uint32_t mdpb_syn; 204 uint64_t end_rsvd; 205 } mc_soft300; 206 #define CAP_ERR_CRDX 204 207 208 static void 209 kn300_softerr(unsigned long mces, unsigned long type, unsigned long logout, struct trapframe *framep) 210 { 211 static const char *sys = "system"; 212 static const char *proc = "processor"; 213 int whami; 214 mc_hdr_ev5 *hdr; 215 mc_soft300 *ptr; 216 static const char *fmt1 = " %-25s = 0x%l016x\n"; 217 218 hdr = (mc_hdr_ev5 *) logout; 219 ptr = (mc_soft300 *) (logout + sizeof (*hdr)); 220 whami = alpha_pal_whami(); 221 222 printf("kn300: CPU ID %d %s correctable error corrected by %s\n", whami, 223 (type == ALPHA_SYS_ERROR)? sys : proc, 224 ((hdr->mcheck_code & 0xff00) == (EV5_CORRECTED << 8))? proc : 225 (((hdr->mcheck_code & 0xff00) == (CAP_ERR_CRDX << 8)) ? 226 "I/O Bridge Module" : sys)); 227 228 printf(" Machine Check Code 0x%lx\n", hdr->mcheck_code); 229 printf(" Physical Address of Error 0x%lx\n", ptr->ei_addr); 230 if (ptr->ei_stat & 0x80000000L) 231 printf(" Corrected ECC Error "); 232 else 233 printf(" Other Error"); 234 if (ptr->ei_stat & 0x40000000L) 235 printf("in Memory "); 236 else 237 printf("in B-Cache "); 238 if (ptr->ei_stat & 0x400000000L) 239 printf("during I-Cache fill\n"); 240 else 241 printf("during D-Cache fill\n"); 242 243 printf(fmt1, "EI Status", ptr->ei_stat); 244 printf(fmt1, "Fill Syndrome", ptr->fill_syndrome); 245 printf(fmt1, "Interrupt Status Reg.", ptr->isr); 246 printf("\n"); 247 printf(fmt1, "Whami Reg.", ptr->whami); 248 printf(fmt1, "Sys. Env. Reg.", ptr->sys_env); 249 printf(fmt1, "MCPCIA Regs.", ptr->mcpcia_regs); 250 printf(fmt1, "PCI Rev. Reg.", ptr->pci_rev); 251 printf(fmt1, "MC_ERR0 Reg.", ptr->mc_err0); 252 printf(fmt1, "MC_ERR1 Reg.", ptr->mc_err1); 253 printf(fmt1, "CAP_ERR Reg.", ptr->cap_err); 254 printf(fmt1, "MDPA_STAT Reg.", ptr->mdpa_stat); 255 printf(fmt1, "MDPA_SYN Reg.", ptr->mdpa_syn); 256 printf(fmt1, "MDPB_STAT Reg.", ptr->mdpb_stat); 257 printf(fmt1, "MDPB_SYN Reg.", ptr->mdpb_syn); 258 259 /* 260 * Clear error by rewriting register. 261 */ 262 alpha_pal_wrmces(mces); 263 } 264 265 /* 266 * KN300 specific machine check handler 267 */ 268 269 static void 270 kn300_mcheck(unsigned long mces, unsigned long type, unsigned long logout, struct trapframe *framep) 271 { 272 struct mchkinfo *mcp; 273 static const char *fmt1 = " %-25s = 0x%l016x\n"; 274 int i; 275 mc_hdr_ev5 *hdr; 276 mc_uc_ev5 *ptr; 277 struct mcpcia_iodsnap *iodsnp; 278 279 /* 280 * If we expected a machine check, just go handle it in common code. 281 */ 282 mcp = &curcpu()->ci_mcinfo; 283 if (mcp->mc_expected) { 284 machine_check(mces, framep, type, logout); 285 return; 286 } 287 288 hdr = (mc_hdr_ev5 *) logout; 289 ptr = (mc_uc_ev5 *) (logout + sizeof (*hdr)); 290 ev5_logout_print(hdr, ptr); 291 292 iodsnp = (struct mcpcia_iodsnap *) ((unsigned long) hdr + 293 (unsigned long) hdr->la_system_offset); 294 for (i = 0; i < MCPCIA_PER_MCBUS; i++, iodsnp++) { 295 if (!IS_MCPCIA_MAGIC(iodsnp->pci_rev)) { 296 continue; 297 } 298 printf(" IOD %d register dump:\n", i); 299 printf(fmt1, "Base Addr of PCI bridge", iodsnp->base_addr); 300 printf(fmt1, "Whami Reg.", iodsnp->whami); 301 printf(fmt1, "Sys. Env. Reg.", iodsnp->sys_env); 302 printf(fmt1, "PCI Rev. Reg.", iodsnp->pci_rev); 303 printf(fmt1, "CAP_CTL Reg.", iodsnp->cap_ctrl); 304 printf(fmt1, "HAE_MEM Reg.", iodsnp->hae_mem); 305 printf(fmt1, "HAE_IO Reg.", iodsnp->hae_io); 306 printf(fmt1, "INT_CTL Reg.", iodsnp->int_ctl); 307 printf(fmt1, "INT_REG Reg.", iodsnp->int_reg); 308 printf(fmt1, "INT_MASK0 Reg.", iodsnp->int_mask0); 309 printf(fmt1, "INT_MASK1 Reg.", iodsnp->int_mask1); 310 printf(fmt1, "MC_ERR0 Reg.", iodsnp->mc_err0); 311 printf(fmt1, "MC_ERR1 Reg.", iodsnp->mc_err1); 312 printf(fmt1, "CAP_ERR Reg.", iodsnp->cap_err); 313 printf(fmt1, "PCI_ERR1 Reg.", iodsnp->pci_err1); 314 printf(fmt1, "MDPA_STAT Reg.", iodsnp->mdpa_stat); 315 printf(fmt1, "MDPA_SYN Reg.", iodsnp->mdpa_syn); 316 printf(fmt1, "MDPB_STAT Reg.", iodsnp->mdpb_stat); 317 printf(fmt1, "MDPB_SYN Reg.", iodsnp->mdpb_syn); 318 319 } 320 /* 321 * Now that we've printed all sorts of useful information 322 * and have decided that we really can't do any more to 323 * respond to the error, go on to the common code for 324 * final disposition. Usually this means that we die. 325 */ 326 /* 327 * XXX: HANDLE PCI ERRORS HERE? 328 */ 329 machine_check(mces, framep, type, logout); 330 } 331 332 static void 333 dec_kn300_mcheck_handler(unsigned long mces, struct trapframe *framep, unsigned long vector, unsigned long param) 334 { 335 switch (vector) { 336 case ALPHA_SYS_ERROR: 337 case ALPHA_PROC_ERROR: 338 kn300_softerr(mces, vector, param, framep); 339 break; 340 341 case ALPHA_SYS_MCHECK: 342 case ALPHA_PROC_MCHECK: 343 kn300_mcheck(mces, vector, param, framep); 344 break; 345 default: 346 printf("KN300_MCHECK: unknown check vector 0x%lx\n", vector); 347 machine_check(mces, framep, vector, param); 348 break; 349 } 350 } 351
Indexes created Mon Oct 13 16:09:52 GMT 2025