FreeBSD/Linux Kernel Cross Reference
sys/dev/bi/uba_bi.c

     /*      $NetBSD: uba_bi.c,v 1.8 2002/10/02 16:33:39 thorpej Exp $ */
     /*
      * Copyright (c) 1998 Ludd, University of Lule}, Sweden.
      * All rights reserved.
      *
      * Redistribution and use in source and binary forms, with or without
      * modification, are permitted provided that the following conditions
      * are met:
      * 1. Redistributions of source code must retain the above copyright
     *    notice, this list of conditions and the following disclaimer.
     * 2. Redistributions in binary form must reproduce the above copyright
     *    notice, this list of conditions and the following disclaimer in the
     *    documentation and/or other materials provided with the distribution.
     * 3. All advertising materials mentioning features or use of this software
     *    must display the following acknowledgement:
     *      This product includes software developed at Ludd, University of 
     *      Lule}, Sweden and its contributors.
     * 4. The name of the author may not be used to endorse or promote products
     *    derived from this software without specific prior written permission
     *
     * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     */
    
    /*
     * DWBUA BI-Unibus adapter
     */
    
    #include <sys/cdefs.h>
    __KERNEL_RCSID(0, "$NetBSD: uba_bi.c,v 1.8 2002/10/02 16:33:39 thorpej Exp $");
    
    #include <sys/param.h>
    #include <sys/kernel.h>
    #include <sys/buf.h>
    #include <sys/device.h>
    #include <sys/proc.h>
    #include <sys/user.h>
    #include <sys/malloc.h>
    #include <sys/systm.h>
    
    #include <machine/sid.h>
    #include <machine/pte.h>
    #include <machine/pcb.h>
    #include <machine/trap.h>
    #include <machine/scb.h>
    
    #include <vax/bi/bireg.h>
    #include <vax/bi/bivar.h>
    
    #include <vax/uba/ubareg.h>
    #include <vax/uba/ubavar.h>
    
    #include "locators.h"
    
    #define BUA(uba)        ((struct dwbua_regs *)(uba))
    
    static  int uba_bi_match __P((struct device *, struct cfdata *, void *));
    static  void uba_bi_attach __P((struct device *, struct device *, void *));
    static  void bua_init __P((struct uba_softc *));
    static  void bua_purge __P((struct uba_softc *, int));
    
    /* bua_csr */
    #define BUACSR_ERR      0x80000000      /* composite error */
    #define BUACSR_BIF      0x10000000      /* BI failure */
    #define BUACSR_SSYNTO   0x08000000      /* slave sync timeout */
    #define BUACSR_UIE      0x04000000      /* unibus interlock error */
    #define BUACSR_IVMR     0x02000000      /* invalid map register */
    #define BUACSR_BADBDP   0x01000000      /* bad BDP select */
    #define BUACSR_BUAEIE   0x00100000      /* bua error interrupt enable (?) */
    #define BUACSR_UPI      0x00020000      /* unibus power init */
    #define BUACSR_UREGDUMP 0x00010000      /* microdiag register dump */
    #define BUACSR_IERRNO   0x000000ff      /* mask for internal errror number */
    
    /* bua_offset */
    #define BUAOFFSET_MASK  0x00003e00      /* hence max offset = 15872 */
    
    /* bua_dpr */
    #define BUADPR_DPSEL    0x00e00000      /* data path select (?) */
    #define BUADPR_PURGE    0x00000001      /* purge bdp */
    
    /* bua_map -- in particular, those bits that are not in DW780s & DW750s */
    #define BUAMR_IOADR     0x40000000      /* I/O address space */
    #define BUAMR_LAE       0x04000000      /* longword access enable */
    
    static  int allocvec;
    
    CFATTACH_DECL(uba_bi, sizeof(struct uba_softc),
        uba_bi_match, uba_bi_attach, NULL, NULL);
    
    struct dwbua_regs {
            struct  biiregs bn_biic;   /* interface */
           int     pad1[396];
           int     bn_csr;
           int     bn_vor;         /* Vector offset from SCB */
           int     bn_fubar;       /* Failed Unibus address register */
           int     bn_bifar;       /* BI failed address register */
           int     bn_mdiag[5];    /* microdiag regs for BDP */
           int     pad2[3];
           int     bn_dpcsr[6];    /* Data path control and status register */
           int     pad3[38];
           struct  pte bn_map[UBAPAGES];   /* Unibus map registers */
           int     pad4[UBAIOPAGES];
   };
   
   /*
    * Poke at a supposed DWBUA to see if it is there.
    */
   static int
   uba_bi_match(parent, cf, aux)
           struct  device *parent;
           struct  cfdata *cf;
           void    *aux;
   {
           struct bi_attach_args *ba = aux;
   
           if ((ba->ba_node->biic.bi_dtype != BIDT_DWBUA) &&
               (ba->ba_node->biic.bi_dtype != BIDT_KLESI))
                   return 0;
   
           if (cf->cf_loc[BICF_NODE] != BICF_NODE_DEFAULT &&
               cf->cf_loc[BICF_NODE] != ba->ba_nodenr)
                   return 0;
   
           return 1;
   }
   
   void
   uba_bi_attach(parent, self, aux)
           struct device *parent, *self;
           void *aux;
   {
           struct  uba_softc *sc = (void *)self;
           struct  bi_attach_args *ba = aux;
           volatile int timo;
   
           if (ba->ba_node->biic.bi_dtype == BIDT_DWBUA)
                   printf(": DWBUA\n");
           else
                   printf(": KLESI-B\n");
   
           /*
            * Fill in bus specific data.
            */
           sc->uh_uba = (void *)ba->ba_node;
           sc->uh_nbdp = NBDPBUA;
   /*      sc->uh_nr is 0; uninteresting here */
   /*      sc->uh_afterscan; not used */
   /*      sc->uh_errchk; not used */
   /*      sc->uh_beforescan */
           sc->uh_ubapurge = bua_purge;
           sc->uh_ubainit = bua_init;
   /*      sc->uh_type not used */
           sc->uh_memsize = UBAPAGES;
           sc->uh_mr = BUA(sc->uh_uba)->bn_map;
   
   #ifdef notdef
           /* Can we get separate interrupts? */
           scb->scb_nexvec[1][ba->ba_nodenr] = &sc->sc_ivec;
   #endif
           BUA(sc->uh_uba)->bn_biic.bi_csr |= BICSR_ARB_NONE;
           BUA(sc->uh_uba)->bn_biic.bi_csr |= BICSR_STS | BICSR_INIT;
           DELAY(1000);
           timo = 1000;
           while (BUA(sc->uh_uba)->bn_biic.bi_csr & BICSR_BROKE)
                   if (timo == 0) {
                           printf("%s: BROKE bit set\n", self->dv_xname);
                           return;
                   }
   
           BUA(sc->uh_uba)->bn_biic.bi_intrdes = ba->ba_intcpu;
           BUA(sc->uh_uba)->bn_biic.bi_csr = 
               (BUA(sc->uh_uba)->bn_biic.bi_csr&~BICSR_ARB_MASK) | BICSR_ARB_HIGH;
           BUA(sc->uh_uba)->bn_vor = VAX_NBPG + (VAX_NBPG * allocvec++);
   
           uba_attach(sc, BUA(sc->uh_uba)->bn_biic.bi_sadr + UBAPAGES * VAX_NBPG);
   }
   
   
   void
   bua_init(sc)
           struct uba_softc *sc;
   {
           BUA(sc->uh_uba)->bn_csr |= BUACSR_UPI;
           DELAY(500000);
   };
   
   void
   bua_purge(sc, bdp)
           struct uba_softc *sc;
           int bdp;
   {
           BUA(sc->uh_uba)->bn_dpcsr[bdp] |= BUADPR_PURGE;
   }

Cache object: b3c703430c78070743a1ef06aaf21049