sys/arch/amiga/dev/wdc_amiga.c

   1 /*      $NetBSD: wdc_amiga.c,v 1.30 2008/03/18 20:46:35 cube Exp $ */
   2
   3 /*-
   4  * Copyright (c) 2000, 2003 The NetBSD Foundation, Inc.
   5  * All rights reserved.
   6  *
   7  * This code is derived from software contributed to The NetBSD Foundation
   8  * by Michael L. Hitch.
   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  *
  19  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
  20  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
  21  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  22  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
  23  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
  27  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  28  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  29  * POSSIBILITY OF SUCH DAMAGE.
  30  */
  31
  32 #include <sys/cdefs.h>
  33 __KERNEL_RCSID(0, "$NetBSD: wdc_amiga.c,v 1.30 2008/03/18 20:46:35 cube Exp $");
  34
  35 #include <sys/types.h>
  36 #include <sys/param.h>
  37 #include <sys/systm.h>
  38 #include <sys/malloc.h>
  39 #include <sys/device.h>
  40
  41 #include <machine/cpu.h>
  42 #include <machine/bus.h>
  43 #include <machine/intr.h>
  44 #include <sys/bswap.h>
  45
  46 #include <amiga/amiga/cia.h>
  47 #include <amiga/amiga/custom.h>
  48 #include <amiga/amiga/device.h>
  49 #include <amiga/amiga/gayle.h>
  50 #include <amiga/dev/zbusvar.h>
  51
  52 #include <dev/ata/atavar.h>
  53 #include <dev/ic/wdcvar.h>
  54
  55 struct wdc_amiga_softc {
  56         struct wdc_softc sc_wdcdev;
  57         struct  ata_channel *sc_chanlist[1];
  58         struct  ata_channel sc_channel;
  59         struct  ata_queue sc_chqueue;
  60         struct wdc_regs sc_wdc_regs;
  61         struct isr sc_isr;
  62         volatile u_char *sc_intreg;
  63         struct bus_space_tag cmd_iot;
  64         struct bus_space_tag ctl_iot;
  65         char    sc_a1200;
  66 };
  67
  68 int     wdc_amiga_probe(device_t, cfdata_t, void *);
  69 void    wdc_amiga_attach(device_t, device_t, void *);
  70 int     wdc_amiga_intr(void *);
  71
  72 CFATTACH_DECL_NEW(wdc_amiga, sizeof(struct wdc_amiga_softc),
  73     wdc_amiga_probe, wdc_amiga_attach, NULL, NULL);
  74
  75 int
  76 wdc_amiga_probe(device_t parent, cfdata_t cfp, void *aux)
  77 {
  78         if ((!is_a4000() && !is_a1200()) || !matchname(aux, "wdc"))
  79                 return(0);
  80         return 1;
  81 }
  82
  83 void
  84 wdc_amiga_attach(device_t parent, device_t self, void *aux)
  85 {
  86         struct wdc_amiga_softc *sc = device_private(self);
  87         struct wdc_regs *wdr;
  88         int i;
  89
  90         aprint_normal("\n");
  91
  92         sc->sc_wdcdev.sc_atac.atac_dev = self;
  93         sc->sc_wdcdev.regs = wdr = &sc->sc_wdc_regs;
  94
  95         if (is_a4000()) {
  96                 sc->cmd_iot.base = (u_long)ztwomap(0xdd2020 + 2);
  97                 sc->sc_intreg = (volatile u_char *)ztwomap(0xdd2020 + 0x1000);
  98                 sc->sc_a1200 = 0;
  99         } else {
 100                 sc->cmd_iot.base = (u_long) ztwomap(0xda0000 + 2);
 101                 gayle_init();
 102                 sc->sc_intreg = &gayle.intreq;
 103                 sc->sc_a1200 = 1;
 104         }
 105         sc->cmd_iot.absm = sc->ctl_iot.absm = &amiga_bus_stride_4swap;
 106         wdr->cmd_iot = &sc->cmd_iot;
 107         wdr->ctl_iot = &sc->ctl_iot;
 108
 109         if (bus_space_map(wdr->cmd_iot, 0, 0x40, 0,
 110                           &wdr->cmd_baseioh)) {
 111                 aprint_error_dev(self, "couldn't map registers\n");
 112                 return;
 113         }
 114
 115         for (i = 0; i < WDC_NREG; i++) {
 116                 if (bus_space_subregion(wdr->cmd_iot,
 117                     wdr->cmd_baseioh, i, i == 0 ? 4 : 1,
 118                     &wdr->cmd_iohs[i]) != 0) {
 119
 120                         bus_space_unmap(wdr->cmd_iot,
 121                             wdr->cmd_baseioh, 0x40);
 122                         aprint_error_dev(self, "couldn't map registers\n");
 123                         return;
 124                 }
 125         }
 126
 127         if (bus_space_subregion(wdr->cmd_iot,
 128             wdr->cmd_baseioh, 0x406, 1, &wdr->ctl_ioh))
 129                 return;
 130
 131         sc->sc_wdcdev.sc_atac.atac_cap = ATAC_CAP_DATA16;
 132         sc->sc_wdcdev.sc_atac.atac_pio_cap = 0;
 133         sc->sc_chanlist[0] = &sc->sc_channel;
 134         sc->sc_wdcdev.sc_atac.atac_channels = sc->sc_chanlist;
 135         sc->sc_wdcdev.sc_atac.atac_nchannels = 1;
 136         sc->sc_channel.ch_channel = 0;
 137         sc->sc_channel.ch_atac = &sc->sc_wdcdev.sc_atac;
 138         sc->sc_channel.ch_queue = &sc->sc_chqueue;
 139         sc->sc_channel.ch_ndrive = 2;
 140
 141         wdc_init_shadow_regs(&sc->sc_channel);
 142
 143         sc->sc_isr.isr_intr = wdc_amiga_intr;
 144         sc->sc_isr.isr_arg = sc;
 145         sc->sc_isr.isr_ipl = 2;
 146         add_isr (&sc->sc_isr);
 147
 148         if (sc->sc_a1200)
 149                 gayle.intena |= GAYLE_INT_IDE;
 150
 151         wdcattach(&sc->sc_channel);
 152 }
 153
 154 int
 155 wdc_amiga_intr(void *arg)
 156 {
 157         struct wdc_amiga_softc *sc = (struct wdc_amiga_softc *)arg;
 158         u_char intreq = *sc->sc_intreg;
 159         int ret = 0;
 160
 161         if (intreq & GAYLE_INT_IDE) {
 162                 if (sc->sc_a1200)
 163                         gayle.intreq = 0x7c | (intreq & 0x03);
 164                 ret = wdcintr(&sc->sc_channel);
 165         }
 166
 167         return ret;
 168 }