The Design and Implementation of the FreeBSD Operating System, Second Edition
Now available: The Design and Implementation of the FreeBSD Operating System (Second Edition)


[ source navigation ] [ diff markup ] [ identifier search ] [ freetext search ] [ file search ] [ list types ] [ track identifier ]

FreeBSD/Linux Kernel Cross Reference
sys/dev/isa/uha_isa.c

Version: -  FREEBSD  -  FREEBSD-13-STABLE  -  FREEBSD-13-0  -  FREEBSD-12-STABLE  -  FREEBSD-12-0  -  FREEBSD-11-STABLE  -  FREEBSD-11-0  -  FREEBSD-10-STABLE  -  FREEBSD-10-0  -  FREEBSD-9-STABLE  -  FREEBSD-9-0  -  FREEBSD-8-STABLE  -  FREEBSD-8-0  -  FREEBSD-7-STABLE  -  FREEBSD-7-0  -  FREEBSD-6-STABLE  -  FREEBSD-6-0  -  FREEBSD-5-STABLE  -  FREEBSD-5-0  -  FREEBSD-4-STABLE  -  FREEBSD-3-STABLE  -  FREEBSD22  -  l41  -  OPENBSD  -  linux-2.6  -  MK84  -  PLAN9  -  xnu-8792 
SearchContext: -  none  -  3  -  10 

    1 /*      $NetBSD: uha_isa.c,v 1.26 2002/10/02 03:10:50 thorpej Exp $     */
    2 
    3 /*-
    4  * Copyright (c) 1998 The NetBSD Foundation, Inc.
    5  * All rights reserved.
    6  *
    7  * This code is derived from software contributed to The NetBSD Foundation
    8  * by Charles M. Hannum.
    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 by the NetBSD
   21  *        Foundation, Inc. and its contributors.
   22  * 4. Neither the name of The NetBSD Foundation nor the names of its
   23  *    contributors may be used to endorse or promote products derived
   24  *    from this software without specific prior written permission.
   25  *
   26  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
   27  * ``AS IS'' AND 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 THE FOUNDATION OR CONTRIBUTORS
   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 #include <sys/cdefs.h>
   40 __KERNEL_RCSID(0, "$NetBSD: uha_isa.c,v 1.26 2002/10/02 03:10:50 thorpej Exp $");
   41 
   42 #include "opt_ddb.h"
   43 
   44 #include <sys/param.h>
   45 #include <sys/systm.h>
   46 #include <sys/device.h>
   47 #include <sys/kernel.h>
   48 #include <sys/proc.h>
   49 #include <sys/user.h>
   50 
   51 #include <machine/bus.h>
   52 #include <machine/intr.h>
   53 
   54 #include <dev/scsipi/scsi_all.h>
   55 #include <dev/scsipi/scsipi_all.h>
   56 #include <dev/scsipi/scsiconf.h>
   57 
   58 #include <dev/isa/isavar.h>
   59 #include <dev/isa/isadmavar.h>
   60 
   61 #include <dev/ic/uhareg.h>
   62 #include <dev/ic/uhavar.h>
   63 
   64 #define UHA_ISA_IOSIZE  16
   65 
   66 int     uha_isa_probe __P((struct device *, struct cfdata *, void *));
   67 void    uha_isa_attach __P((struct device *, struct device *, void *));
   68 
   69 CFATTACH_DECL(uha_isa, sizeof(struct uha_softc),
   70     uha_isa_probe, uha_isa_attach, NULL, NULL);
   71 
   72 #ifndef DDB
   73 #define Debugger() panic("should call debugger here (uha_isa.c)")
   74 #endif /* ! DDB */
   75 
   76 int     u14_find __P((bus_space_tag_t, bus_space_handle_t,
   77             struct uha_probe_data *));
   78 void    u14_start_mbox __P((struct uha_softc *, struct uha_mscp *));
   79 int     u14_poll __P((struct uha_softc *, struct scsipi_xfer *, int));
   80 int     u14_intr __P((void *));
   81 void    u14_init __P((struct uha_softc *));
   82 
   83 /*
   84  * Check the slots looking for a board we recognise
   85  * If we find one, note it's address (slot) and call
   86  * the actual probe routine to check it out.
   87  */
   88 int
   89 uha_isa_probe(parent, match, aux)
   90         struct device *parent;
   91         struct cfdata *match;
   92         void *aux;
   93 {
   94         struct isa_attach_args *ia = aux;
   95         bus_space_tag_t iot = ia->ia_iot;
   96         bus_space_handle_t ioh;
   97         struct uha_probe_data upd;
   98         int rv;
   99 
  100         if (ia->ia_nio < 1)
  101                 return (0);
  102         if (ia->ia_nirq < 1)
  103                 return (0);
  104         if (ia->ia_ndrq < 1)
  105                 return (0);
  106 
  107         if (ISA_DIRECT_CONFIG(ia))
  108                 return (0);
  109 
  110         /* Disallow wildcarded i/o address. */
  111         if (ia->ia_io[0].ir_addr == ISACF_PORT_DEFAULT)
  112                 return (0);
  113 
  114         if (bus_space_map(iot, ia->ia_io[0].ir_addr, UHA_ISA_IOSIZE, 0, &ioh))
  115                 return (0);
  116 
  117         rv = u14_find(iot, ioh, &upd);
  118 
  119         bus_space_unmap(iot, ioh, UHA_ISA_IOSIZE);
  120 
  121         if (rv) {
  122                 if (ia->ia_irq[0].ir_irq != ISACF_IRQ_DEFAULT &&
  123                     ia->ia_irq[0].ir_irq != upd.sc_irq)
  124                         return (0);
  125                 if (ia->ia_drq[0].ir_drq != ISACF_DRQ_DEFAULT &&
  126                     ia->ia_drq[0].ir_drq != upd.sc_drq)
  127                         return (0);
  128 
  129                 ia->ia_nio = 1;
  130                 ia->ia_io[0].ir_size = UHA_ISA_IOSIZE;
  131 
  132                 ia->ia_nirq = 1;
  133                 ia->ia_irq[0].ir_irq = upd.sc_irq;
  134 
  135                 ia->ia_ndrq = 1;
  136                 ia->ia_drq[0].ir_drq = upd.sc_drq;
  137 
  138                 ia->ia_niomem = 0;
  139         }
  140         return (rv);
  141 }
  142 
  143 /*
  144  * Attach all the sub-devices we can find
  145  */
  146 void
  147 uha_isa_attach(parent, self, aux)
  148         struct device *parent, *self;
  149         void *aux;
  150 {
  151         struct isa_attach_args *ia = aux;
  152         struct uha_softc *sc = (void *)self;
  153         bus_space_tag_t iot = ia->ia_iot;
  154         bus_dma_tag_t dmat = ia->ia_dmat;
  155         bus_space_handle_t ioh;
  156         struct uha_probe_data upd;
  157         isa_chipset_tag_t ic = ia->ia_ic;
  158         int error;
  159 
  160         printf("\n");
  161 
  162         if (bus_space_map(iot, ia->ia_io[0].ir_addr, UHA_ISA_IOSIZE, 0, &ioh)) {
  163                 printf("%s: can't map i/o space\n", sc->sc_dev.dv_xname);
  164                 return;
  165         }
  166 
  167         sc->sc_iot = iot;
  168         sc->sc_ioh = ioh;
  169         sc->sc_dmat = dmat;
  170         if (!u14_find(iot, ioh, &upd)) {
  171                 printf("%s: u14_find failed\n", sc->sc_dev.dv_xname);
  172                 return;
  173         }
  174 
  175         if (upd.sc_drq != -1) {
  176                 sc->sc_dmaflags = 0;
  177                 if ((error = isa_dmacascade(ic, upd.sc_drq)) != 0) {
  178                         printf("%s: unable to cascade DRQ, error = %d\n",
  179                             sc->sc_dev.dv_xname, error);
  180                         return;
  181                 }
  182         } else {
  183                 /*
  184                  * We have a VLB controller, and can do 32-bit DMA.
  185                  */
  186                 sc->sc_dmaflags = ISABUS_DMA_32BIT;
  187         }
  188 
  189         sc->sc_ih = isa_intr_establish(ic, upd.sc_irq, IST_EDGE, IPL_BIO,
  190             u14_intr, sc);
  191         if (sc->sc_ih == NULL) {
  192                 printf("%s: couldn't establish interrupt\n",
  193                     sc->sc_dev.dv_xname);
  194                 return;
  195         }
  196 
  197         /* Save function pointers for later use. */
  198         sc->start_mbox = u14_start_mbox;
  199         sc->poll = u14_poll;
  200         sc->init = u14_init;
  201 
  202         uha_attach(sc, &upd);
  203 }
  204 
  205 /*
  206  * Start the board, ready for normal operation
  207  */
  208 int
  209 u14_find(iot, ioh, sc)
  210         bus_space_tag_t iot;
  211         bus_space_handle_t ioh;
  212         struct uha_probe_data *sc;
  213 {
  214         u_int16_t model, config;
  215         int irq, drq;
  216         int resetcount = 4000;  /* 4 secs? */
  217 
  218         model = (bus_space_read_1(iot, ioh, U14_ID + 0) << 8) |
  219                 (bus_space_read_1(iot, ioh, U14_ID + 1) << 0);
  220         if ((model & 0xfff0) != 0x5640)
  221                 return (0);
  222 
  223         config = (bus_space_read_1(iot, ioh, U14_CONFIG + 0) << 8) |
  224                  (bus_space_read_1(iot, ioh, U14_CONFIG + 1) << 0);
  225 
  226         switch (model & 0x000f) {
  227         case 0x0000:
  228                 switch (config & U14_DMA_MASK) {
  229                 case U14_DMA_CH5:
  230                         drq = 5;
  231                         break;
  232                 case U14_DMA_CH6:
  233                         drq = 6;
  234                         break;
  235                 case U14_DMA_CH7:
  236                         drq = 7;
  237                         break;
  238                 default:
  239                         printf("u14_find: illegal drq setting %x\n",
  240                             config & U14_DMA_MASK);
  241                         return (0);
  242                 }
  243                 break;
  244         case 0x0001:
  245                 /* This is a 34f, and doesn't need an ISA DMA channel. */
  246                 drq = -1;
  247                 break;
  248         default:
  249                 printf("u14_find: unknown model %x\n", model);
  250                 return (0);
  251         }
  252 
  253         switch (config & U14_IRQ_MASK) {
  254         case U14_IRQ10:
  255                 irq = 10;
  256                 break;
  257         case U14_IRQ11:
  258                 irq = 11;
  259                 break;
  260         case U14_IRQ14:
  261                 irq = 14;
  262                 break;
  263         case U14_IRQ15:
  264                 irq = 15;
  265                 break;
  266         default:
  267                 printf("u14_find: illegal irq setting %x\n",
  268                     config & U14_IRQ_MASK);
  269                 return (0);
  270         }
  271 
  272         bus_space_write_1(iot, ioh, U14_LINT, UHA_ASRST);
  273 
  274         while (--resetcount) {
  275                 if (bus_space_read_1(iot, ioh, U14_LINT))
  276                         break;
  277                 delay(1000);    /* 1 mSec per loop */
  278         }
  279         if (!resetcount) {
  280                 printf("u14_find: board timed out during reset\n");
  281                 return (0);
  282         }
  283 
  284         /* if we want to fill in softc, do so now */
  285         if (sc) {
  286                 sc->sc_irq = irq;
  287                 sc->sc_drq = drq;
  288                 sc->sc_scsi_dev = config & U14_HOSTID_MASK;
  289         }
  290 
  291         return (1);
  292 }
  293 
  294 /*
  295  * Function to send a command out through a mailbox
  296  */
  297 void
  298 u14_start_mbox(sc, mscp)
  299         struct uha_softc *sc;
  300         struct uha_mscp *mscp;
  301 {
  302         bus_space_tag_t iot = sc->sc_iot;
  303         bus_space_handle_t ioh = sc->sc_ioh;
  304         int spincount = 100000; /* 1s should be enough */
  305 
  306         while (--spincount) {
  307                 if ((bus_space_read_1(iot, ioh, U14_LINT) & U14_LDIP) == 0)
  308                         break;
  309                 delay(100);
  310         }
  311         if (!spincount) {
  312                 printf("%s: uha_start_mbox, board not responding\n",
  313                     sc->sc_dev.dv_xname);
  314                 Debugger();
  315         }
  316 
  317         bus_space_write_4(iot, ioh, U14_OGMPTR,
  318             sc->sc_dmamap_mscp->dm_segs[0].ds_addr + UHA_MSCP_OFF(mscp));
  319         if (mscp->flags & MSCP_ABORT)
  320                 bus_space_write_1(iot, ioh, U14_LINT, U14_ABORT);
  321         else
  322                 bus_space_write_1(iot, ioh, U14_LINT, U14_OGMFULL);
  323 
  324         if ((mscp->xs->xs_control & XS_CTL_POLL) == 0)
  325                 callout_reset(&mscp->xs->xs_callout,
  326                     mstohz(mscp->timeout), uha_timeout, mscp);
  327 }
  328 
  329 /*
  330  * Function to poll for command completion when in poll mode.
  331  *
  332  *      wait = timeout in msec
  333  */
  334 int
  335 u14_poll(sc, xs, count)
  336         struct uha_softc *sc;
  337         struct scsipi_xfer *xs;
  338         int count;
  339 {
  340         bus_space_tag_t iot = sc->sc_iot;
  341         bus_space_handle_t ioh = sc->sc_ioh;
  342 
  343         while (count) {
  344                 /*
  345                  * If we had interrupts enabled, would we
  346                  * have got an interrupt?
  347                  */
  348                 if (bus_space_read_1(iot, ioh, U14_SINT) & U14_SDIP)
  349                         u14_intr(sc);
  350                 if (xs->xs_status & XS_STS_DONE)
  351                         return (0);
  352                 delay(1000);
  353                 count--;
  354         }
  355         return (1);
  356 }
  357 
  358 /*
  359  * Catch an interrupt from the adaptor
  360  */
  361 int
  362 u14_intr(arg)
  363         void *arg;
  364 {
  365         struct uha_softc *sc = arg;
  366         bus_space_tag_t iot = sc->sc_iot;
  367         bus_space_handle_t ioh = sc->sc_ioh;
  368         struct uha_mscp *mscp;
  369         u_char uhastat;
  370         u_long mboxval;
  371 
  372 #ifdef  UHADEBUG
  373         printf("%s: uhaintr ", sc->sc_dev.dv_xname);
  374 #endif /*UHADEBUG */
  375 
  376         if ((bus_space_read_1(iot, ioh, U14_SINT) & U14_SDIP) == 0)
  377                 return (0);
  378 
  379         for (;;) {
  380                 /*
  381                  * First get all the information and then
  382                  * acknowledge the interrupt
  383                  */
  384                 uhastat = bus_space_read_1(iot, ioh, U14_SINT);
  385                 mboxval = bus_space_read_4(iot, ioh, U14_ICMPTR);
  386                 /* XXX Send an ABORT_ACK instead? */
  387                 bus_space_write_1(iot, ioh, U14_SINT, U14_ICM_ACK);
  388 
  389 #ifdef  UHADEBUG
  390                 printf("status = 0x%x ", uhastat);
  391 #endif /*UHADEBUG*/
  392 
  393                 /*
  394                  * Process the completed operation
  395                  */
  396                 mscp = uha_mscp_phys_kv(sc, mboxval);
  397                 if (!mscp) {
  398                         printf("%s: BAD MSCP RETURNED!\n",
  399                             sc->sc_dev.dv_xname);
  400                         continue;       /* whatever it was, it'll timeout */
  401                 }
  402 
  403                 callout_stop(&mscp->xs->xs_callout);
  404                 uha_done(sc, mscp);
  405 
  406                 if ((bus_space_read_1(iot, ioh, U14_SINT) & U14_SDIP) == 0)
  407                         return (1);
  408         }
  409 }
  410 
  411 void
  412 u14_init(sc)
  413         struct uha_softc *sc;
  414 {
  415         bus_space_tag_t iot = sc->sc_iot;
  416         bus_space_handle_t ioh = sc->sc_ioh;
  417 
  418         /* make sure interrupts are enabled */
  419 #ifdef UHADEBUG
  420         printf("u14_init: lmask=%02x, smask=%02x\n",
  421             bus_space_read_1(iot, ioh, U14_LMASK),
  422             bus_space_read_1(iot, ioh, U14_SMASK));
  423 #endif
  424         bus_space_write_1(iot, ioh, U14_LMASK, 0xd1);   /* XXX */
  425         bus_space_write_1(iot, ioh, U14_SMASK, 0x91);   /* XXX */
  426 }

Cache object: 22745215b9bdf5d79764c961bde538d6


[ source navigation ] [ diff markup ] [ identifier search ] [ freetext search ] [ file search ] [ list types ] [ track identifier ]


This page is part of the FreeBSD/Linux Linux Kernel Cross-Reference, and was automatically generated using a modified version of the LXR engine.