Home | History | Annotate | Line # | Download | only in obio
wdc_obio.c revision 1.26.2.1
      1  1.26.2.1      tls /*	$NetBSD: wdc_obio.c,v 1.26.2.1 2014/08/20 00:03:11 tls Exp $ */
      2       1.1    shiba 
      3       1.1    shiba /*
      4       1.1    shiba  * Copyright (c) 2002 Takeshi Shibagaki  All rights reserved.
      5       1.1    shiba  *
      6       1.1    shiba  * mac68k OBIO-IDE attachment created by Takeshi Shibagaki
      7       1.1    shiba  *
      8       1.1    shiba  * Redistribution and use in source and binary forms, with or without
      9       1.1    shiba  * modification, are permitted provided that the following conditions
     10       1.1    shiba  * are met:
     11       1.1    shiba  * 1. Redistributions of source code must retain the above copyright
     12       1.1    shiba  *    notice, this list of conditions and the following disclaimer.
     13       1.1    shiba  * 2. Redistributions in binary form must reproduce the above copyright
     14       1.1    shiba  *    notice, this list of conditions and the following disclaimer in the
     15       1.1    shiba  *    documentation and/or other materials provided with the distribution.
     16       1.1    shiba  * 3. All advertising materials mentioning features or use of this software
     17       1.1    shiba  *    must display the following acknowledgement:
     18       1.1    shiba  *	This product includes software developed by Charles M. Hannum.
     19       1.1    shiba  * 4. The name of the author may not be used to endorse or promote products
     20       1.1    shiba  *    derived from this software without specific prior written permission.
     21       1.1    shiba  *
     22       1.1    shiba  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     23       1.1    shiba  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     24       1.1    shiba  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     25       1.1    shiba  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     26       1.1    shiba  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     27       1.1    shiba  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     28       1.1    shiba  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     29       1.1    shiba  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     30       1.1    shiba  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     31       1.1    shiba  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     32       1.1    shiba  */
     33       1.4    lukem 
     34       1.4    lukem #include <sys/cdefs.h>
     35  1.26.2.1      tls __KERNEL_RCSID(0, "$NetBSD: wdc_obio.c,v 1.26.2.1 2014/08/20 00:03:11 tls Exp $");
     36       1.1    shiba 
     37       1.1    shiba #include <sys/types.h>
     38       1.1    shiba #include <sys/param.h>
     39       1.1    shiba #include <sys/systm.h>
     40       1.1    shiba #include <sys/device.h>
     41       1.1    shiba #include <sys/malloc.h>
     42       1.1    shiba #include <sys/kernel.h>
     43       1.1    shiba #include <sys/callout.h>
     44       1.1    shiba 
     45       1.1    shiba #include <machine/bus.h>
     46       1.1    shiba #include <machine/intr.h>
     47       1.1    shiba #include <machine/cpu.h>
     48       1.1    shiba #include <machine/viareg.h>
     49       1.1    shiba 
     50       1.1    shiba #include <mac68k/obio/obiovar.h>
     51       1.1    shiba 
     52       1.1    shiba #include <dev/ata/atavar.h>
     53       1.1    shiba #include <dev/ic/wdcvar.h>
     54       1.1    shiba 
     55       1.8    fredb #define	WDC_OBIO_REG_NPORTS	0x40
     56       1.1    shiba #define	WDC_OBIO_AUXREG_OFFSET	0x38
     57       1.1    shiba #define	WDC_OBIO_AUXREG_NPORTS	1
     58       1.1    shiba #define	WDC_OBIO_ISR_OFFSET	0x101
     59       1.1    shiba #define	WDC_OBIO_ISR_NPORTS	1
     60       1.1    shiba 
     61       1.1    shiba static u_long	IDEBase = 0x50f1a000;
     62       1.1    shiba 
     63       1.1    shiba /*
     64       1.1    shiba  * XXX This code currently doesn't even try to allow 32-bit data port use.
     65       1.1    shiba  */
     66       1.1    shiba 
     67       1.1    shiba struct wdc_obio_softc {
     68       1.1    shiba 	struct  wdc_softc sc_wdcdev;
     69      1.16  thorpej 	struct  ata_channel *sc_chanlist[1];
     70      1.16  thorpej 	struct  ata_channel sc_channel;
     71      1.16  thorpej 	struct	ata_queue sc_chqueue;
     72      1.16  thorpej 	struct	wdc_regs sc_wdc_regs;
     73       1.1    shiba 	void    *sc_ih;
     74       1.1    shiba };
     75       1.1    shiba 
     76      1.23     cube int	wdc_obio_match(device_t, cfdata_t, void *);
     77      1.23     cube void	wdc_obio_attach(device_t, device_t, void *);
     78      1.18      chs void	wdc_obio_intr(void *);
     79       1.1    shiba 
     80      1.23     cube CFATTACH_DECL_NEW(wdc_obio, sizeof(struct wdc_obio_softc),
     81       1.3  thorpej     wdc_obio_match, wdc_obio_attach, NULL, NULL);
     82       1.1    shiba 
     83      1.18      chs static bus_space_tag_t		wdc_obio_isr_tag;
     84      1.18      chs static bus_space_handle_t	wdc_obio_isr_hdl;
     85      1.18      chs static struct ata_channel	*ch_sc;
     86      1.18      chs 
     87       1.1    shiba int
     88      1.23     cube wdc_obio_match(device_t parent, cfdata_t match, void *aux)
     89       1.1    shiba {
     90       1.1    shiba 	struct obio_attach_args *oa = (struct obio_attach_args *) aux;
     91      1.16  thorpej 	struct ata_channel ch;
     92      1.16  thorpej 	struct wdc_softc wdc;
     93      1.16  thorpej 	struct wdc_regs wdr;
     94       1.8    fredb 	int i, result = 0;
     95       1.1    shiba 
     96      1.16  thorpej 	memset(&wdc, 0, sizeof(wdc));
     97       1.1    shiba 	memset(&ch, 0, sizeof(ch));
     98      1.17  thorpej 	ch.ch_atac = &wdc.sc_atac;
     99      1.16  thorpej 	wdc.regs = &wdr;
    100       1.1    shiba 
    101       1.1    shiba 	switch (current_mac_model->machineid) {
    102       1.1    shiba 	case MACH_MACPB150:
    103       1.1    shiba 	case MACH_MACPB190:
    104       1.1    shiba 	case MACH_MACPB190CS:
    105       1.1    shiba 	case MACH_MACP580:
    106       1.1    shiba 	case MACH_MACQ630:
    107      1.16  thorpej 		wdr.cmd_iot = wdr.ctl_iot = oa->oa_tag;
    108       1.1    shiba 
    109      1.16  thorpej 		if (bus_space_map(wdr.cmd_iot, IDEBase, WDC_OBIO_REG_NPORTS,
    110      1.16  thorpej 				0, &wdr.cmd_baseioh))
    111       1.1    shiba 			return 0;
    112       1.1    shiba 
    113      1.16  thorpej 		mac68k_bus_space_handle_swapped(wdr.cmd_iot, &wdr.cmd_baseioh);
    114       1.1    shiba 
    115       1.8    fredb 		for (i = 0; i < WDC_NREG; i++) {
    116      1.16  thorpej 			if (bus_space_subregion(wdr.cmd_iot, wdr.cmd_baseioh,
    117      1.16  thorpej 					    4 * i, 4, &wdr.cmd_iohs[i]) != 0) {
    118       1.8    fredb 				return 0;
    119       1.8    fredb 			}
    120       1.8    fredb 		}
    121      1.15  thorpej 		wdc_init_shadow_regs(&ch);
    122       1.8    fredb 
    123       1.8    fredb 
    124      1.16  thorpej 		if (bus_space_subregion(wdr.cmd_iot, wdr.cmd_baseioh,
    125       1.1    shiba 				        WDC_OBIO_AUXREG_OFFSET,
    126      1.13       he 					WDC_OBIO_AUXREG_NPORTS,
    127      1.16  thorpej 					&wdr.ctl_ioh))
    128       1.1    shiba 			return 0;
    129       1.1    shiba 
    130       1.1    shiba 		result = wdcprobe(&ch);
    131       1.1    shiba 
    132      1.16  thorpej 		bus_space_unmap(wdr.cmd_iot, wdr.cmd_baseioh, WDC_OBIO_REG_NPORTS);
    133       1.1    shiba 
    134       1.1    shiba 		return (result);
    135       1.1    shiba 	}
    136       1.1    shiba 	return 0;
    137       1.1    shiba }
    138       1.1    shiba 
    139       1.1    shiba void
    140      1.23     cube wdc_obio_attach(device_t parent, device_t self, void *aux)
    141       1.1    shiba {
    142      1.23     cube 	struct wdc_obio_softc *sc = device_private(self);
    143      1.16  thorpej 	struct wdc_regs *wdr;
    144       1.1    shiba 	struct obio_attach_args *oa = aux;
    145      1.16  thorpej 	struct ata_channel *chp = &sc->sc_channel;
    146       1.8    fredb 	int i;
    147       1.1    shiba 
    148      1.23     cube 	sc->sc_wdcdev.sc_atac.atac_dev = self;
    149      1.16  thorpej 	sc->sc_wdcdev.regs = wdr = &sc->sc_wdc_regs;
    150      1.16  thorpej 
    151       1.1    shiba 	oa->oa_addr = IDEBase;
    152      1.16  thorpej 	wdr->cmd_iot = wdr->ctl_iot = oa->oa_tag;
    153       1.1    shiba 
    154      1.16  thorpej 	if (bus_space_map(wdr->cmd_iot, oa->oa_addr,
    155      1.16  thorpej 		      WDC_OBIO_REG_NPORTS, 0, &wdr->cmd_baseioh)) {
    156      1.23     cube 		aprint_error_dev(self, "couldn't map registers\n");
    157       1.1    shiba 		return;
    158       1.1    shiba 	}
    159       1.1    shiba 
    160      1.16  thorpej 	mac68k_bus_space_handle_swapped(wdr->cmd_iot,
    161      1.16  thorpej 				  &wdr->cmd_baseioh);
    162       1.8    fredb 
    163       1.8    fredb 	for (i = 0; i < WDC_NREG; i++) {
    164      1.16  thorpej 		if (bus_space_subregion(wdr->cmd_iot,
    165      1.16  thorpej 				    wdr->cmd_baseioh, 4 * i, 4,
    166      1.16  thorpej 				    &wdr->cmd_iohs[i]) != 0) {
    167      1.23     cube 			aprint_error_dev(self,
    168      1.23     cube 			    "unable to subregion control register\n");
    169       1.8    fredb 			return;
    170       1.8    fredb 		}
    171       1.8    fredb 	}
    172       1.1    shiba 
    173      1.16  thorpej 	if (bus_space_subregion(wdr->cmd_iot,
    174      1.16  thorpej 				wdr->cmd_baseioh,
    175       1.8    fredb 				WDC_OBIO_AUXREG_OFFSET, WDC_OBIO_AUXREG_NPORTS,
    176      1.16  thorpej 				&wdr->ctl_ioh)) {
    177      1.23     cube 		aprint_error_dev(self, "unable to subregion aux register\n");
    178       1.1    shiba 		return;
    179       1.8    fredb 	}
    180       1.1    shiba 
    181       1.1    shiba     	wdc_obio_isr_tag = oa->oa_tag;
    182       1.1    shiba 
    183       1.1    shiba 	if (bus_space_map(wdc_obio_isr_tag,
    184       1.1    shiba 			  oa->oa_addr+WDC_OBIO_ISR_OFFSET,
    185       1.1    shiba 			  WDC_OBIO_ISR_NPORTS, 0, &wdc_obio_isr_hdl)) {
    186      1.23     cube 		aprint_error_dev(self, " couldn't map intr status register\n");
    187       1.1    shiba 		return;
    188       1.1    shiba 	}
    189       1.1    shiba 
    190       1.1    shiba 	switch (current_mac_model->machineid) {
    191       1.1    shiba 	case MACH_MACP580:
    192       1.1    shiba 	case MACH_MACQ630:
    193       1.1    shiba 		/*
    194       1.1    shiba 		 * Quadra/Performa IDE generates pseudo Nubus intr at slot F
    195       1.1    shiba 		 */
    196      1.23     cube 		aprint_normal(" (Quadra/Performa series IDE interface)");
    197       1.1    shiba 
    198       1.1    shiba 		add_nubus_intr(0xf, (void (*)(void*))wdc_obio_intr, (void *)sc);
    199       1.1    shiba 
    200       1.1    shiba 		break;
    201       1.1    shiba 	case MACH_MACPB150:
    202       1.1    shiba 	case MACH_MACPB190:
    203       1.1    shiba 	case MACH_MACPB190CS:
    204       1.1    shiba 		/*
    205       1.1    shiba 		 * PowerBook IDE generates pseudo NuBus intr at slot C
    206       1.1    shiba 		 */
    207      1.23     cube 		aprint_normal(" (PowerBook series IDE interface)");
    208       1.1    shiba 
    209       1.1    shiba 		add_nubus_intr(0xc, (void (*)(void*))wdc_obio_intr, (void *)sc);
    210       1.1    shiba 
    211       1.1    shiba 		break;
    212       1.1    shiba 	}
    213       1.1    shiba 
    214       1.1    shiba 	ch_sc = chp;
    215      1.23     cube 	if (device_cfdata(sc->sc_wdcdev.sc_atac.atac_dev)->cf_flags &
    216      1.21  thorpej 	    ATAC_CAP_NOIRQ)
    217      1.17  thorpej 		sc->sc_wdcdev.sc_atac.atac_cap |= ATAC_CAP_NOIRQ;
    218      1.17  thorpej 	sc->sc_wdcdev.sc_atac.atac_cap |= ATAC_CAP_DATA16;
    219      1.17  thorpej 	sc->sc_wdcdev.sc_atac.atac_pio_cap = 0;
    220      1.16  thorpej 	sc->sc_chanlist[0] = chp;
    221      1.17  thorpej 	sc->sc_wdcdev.sc_atac.atac_channels = sc->sc_chanlist;
    222      1.17  thorpej 	sc->sc_wdcdev.sc_atac.atac_nchannels = 1;
    223      1.26   bouyer 	sc->sc_wdcdev.wdc_maxdrives = 2;
    224      1.12  thorpej 	chp->ch_channel = 0;
    225      1.17  thorpej 	chp->ch_atac = &sc->sc_wdcdev.sc_atac;
    226      1.16  thorpej 	chp->ch_queue = &sc->sc_chqueue;
    227      1.22  tsutsui 	wdc_init_shadow_regs(chp);
    228       1.1    shiba 
    229      1.23     cube 	aprint_normal("\n");
    230       1.1    shiba 
    231       1.7   bouyer 	wdcattach(chp);
    232       1.1    shiba }
    233      1.18      chs 
    234      1.18      chs void
    235      1.18      chs wdc_obio_intr(void *arg)
    236      1.18      chs {
    237      1.18      chs 	unsigned char status;
    238      1.18      chs 
    239      1.18      chs 	status = bus_space_read_1(wdc_obio_isr_tag,
    240      1.18      chs 				  wdc_obio_isr_hdl, 0);
    241      1.18      chs 	if (status & 0x20) {
    242      1.18      chs 		wdcintr(ch_sc);
    243      1.18      chs 		bus_space_write_1(wdc_obio_isr_tag,
    244      1.18      chs 				  wdc_obio_isr_hdl, 0, status&~0x20);
    245      1.18      chs 	}
    246      1.18      chs }
    247