Return to ka730.c CVS log

Up to [CSRG BSD Unix] / 43BSDTahoe / sys / vax

Annotation of 43BSDTahoe/sys/vax/ka730.c, revision 1.1.1.1

1.1       root        1: /*
                      2:  * Copyright (c) 1982, 1986, 1988 Regents of the University of California.
                      3:  * All rights reserved.  The Berkeley software License Agreement
                      4:  * specifies the terms and conditions for redistribution.
                      5:  *
                      6:  *     @(#)ka730.c     7.2 (Berkeley) 7/9/88
                      7:  */
                      8: 
                      9: #if VAX730
                     10: 
                     11: /*
                     12:  * 730-specific code.
                     13:  */
                     14: 
                     15: #include "param.h"
                     16: 
                     17: #include "cpu.h"
                     18: #include "mem.h"
                     19: #include "mtpr.h"
                     20: 
                     21: struct mcr730 {
                     22:        int     mc_addr;                /* address and syndrome */
                     23:        int     mc_err;                 /* error bits */
                     24: };
                     25: 
                     26: #define        M730_UNCORR     0x80000000      /* rds, uncorrectable error */
                     27: #define        M730_CRD        0x40000000      /* crd */
                     28: #define        M730_FTBPE      0x20000000      /* force tbuf parity error */
                     29: #define        M730_ENACRD     0x10000000      /* enable crd interrupt */
                     30: #define        M730_MME        0x08000000      /* mem-man enable (ala ipr) */
                     31: #define        M730_DM         0x04000000      /* diagnostic mode */
                     32: #define        M730_DISECC     0x02000000      /* disable ecc */
                     33: 
                     34: #define        M730_INH(mcr)   ((mcr)->mc_err = M730_MME)
                     35: #define        M730_ENA(mcr)   ((mcr)->mc_err = (M730_MME|M730_ENACRD))
                     36: #define        M730_ERR(mcr)   ((mcr)->mc_err & (M730_UNCORR|M730_CRD))
                     37: #define        M730_SYN(addr)  ((mcr)->mc_addr & 0x7f)
                     38: #define        M730_ADDR(addr) (((mcr)->mc_addr >> 8) & 0x7fff)
                     39: 
                     40: /* enable crd interrupts */
                     41: ka730_memenable()
                     42: {
                     43: 
                     44:        M730_ENA((struct mcr730 *)mcraddr[0]);
                     45: }
                     46: 
                     47: /* log crd errors */
                     48: ka730_memerr()
                     49: {
                     50:        register struct mcr730 *mcr = (struct mcr730 *)mcraddr[0];
                     51:        struct mcr730 amcr;
                     52: 
                     53:        /*
                     54:         * Must be careful on the 730 not to use invalid
                     55:         * instructions in I/O space, so make a copy;
                     56:         */
                     57:        amcr.mc_addr = mcr->mc_addr;
                     58:        amcr.mc_err = mcr->mc_err;
                     59:        if (M730_ERR(&amcr)) {
                     60:                printf("mcr0: %s", (amcr.mc_err & M730_UNCORR) ?
                     61:                    "hard error" : "soft ecc");
                     62:                printf(" addr %x syn %x\n", M730_ADDR(&amcr), M730_SYN(&amcr));
                     63:                M730_INH(mcr);
                     64:        }
                     65: }
                     66: 
                     67: #define        NMC730  12
                     68: char *mc730[] = {
                     69:        "tb par",       "bad retry",    "bad intr id",  "cant write ptem",
                     70:        "unkn mcr err", "iib rd err",   "nxm ref",      "cp rds",
                     71:        "unalgn ioref", "nonlw ioref",  "bad ioaddr",   "unalgn ubaddr",
                     72: };
                     73: 
                     74: struct mc730frame {
                     75:        int     mc3_bcnt;               /* byte count == 0xc */
                     76:        int     mc3_summary;            /* summary parameter */
                     77:        int     mc3_parm[2];            /* parameter 1 and 2 */
                     78:        int     mc3_pc;                 /* trapped pc */
                     79:        int     mc3_psl;                /* trapped psl */
                     80: };
                     81: 
                     82: ka730_mchk(cmcf)
                     83:        caddr_t cmcf;
                     84: {
                     85:        register struct mc730frame *mcf = (struct mc730frame *)cmcf;
                     86:        register u_int type = mcf->mc3_summary;
                     87: 
                     88:        printf("machine check %x: %s\n", type,
                     89:            type < NMC730 ? mc730[type] : "???");
                     90:        printf("\tparams %x,%x pc %x psl %x mcesr %x\n",
                     91:            mcf->mc3_parm[0], mcf->mc3_parm[1],
                     92:            mcf->mc3_pc, mcf->mc3_psl, mfpr(MCESR));
                     93:        mtpr(MCESR, 0xf);
                     94:        return (MCHK_PANIC);
                     95: }
                     96: #endif

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.