Home | History | Annotate | Line # | Download | only in isa
isa_machdep.c revision 1.4
      1 /*	$NetBSD: isa_machdep.c,v 1.4 1998/03/10 11:43:10 leo Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1997 Leo Weppelman.  All rights reserved.
      5  * Copyright (c) 1996 Christopher G. Demetriou.  All rights reserved.
      6  * Copyright (c) 1994 Charles Hannum.  All rights reserved.
      7  *
      8  * Redistribution and use in source and binary forms, with or without
      9  * modification, are permitted provided that the following conditions
     10  * are met:
     11  * 1. Redistributions of source code must retain the above copyright
     12  *    notice, this list of conditions and the following disclaimer.
     13  * 2. Redistributions in binary form must reproduce the above copyright
     14  *    notice, this list of conditions and the following disclaimer in the
     15  *    documentation and/or other materials provided with the distribution.
     16  * 3. All advertising materials mentioning features or use of this software
     17  *    must display the following acknowledgement:
     18  *	This product includes software developed by Charles Hannum.
     19  * 4. The name of the author may not be used to endorse or promote products
     20  *    derived from this software without specific prior written permission.
     21  *
     22  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     23  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     24  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     25  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     26  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     27  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     28  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     29  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     30  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     31  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     32  */
     33 
     34 #include <sys/types.h>
     35 #include <sys/param.h>
     36 #include <sys/time.h>
     37 #include <sys/systm.h>
     38 #include <sys/errno.h>
     39 #include <sys/device.h>
     40 
     41 #include <vm/vm.h>
     42 #include <vm/vm_kern.h>
     43 
     44 #include <dev/isa/isavar.h>
     45 #include <dev/isa/isareg.h>
     46 
     47 #include <machine/bus.h>
     48 #include <machine/cpu.h>
     49 #include <machine/iomap.h>
     50 #include <machine/mfp.h>
     51 #include <atari/atari/device.h>
     52 
     53 static int	isabusprint __P((void *auxp, const char *));
     54 static int	isabusmatch __P((struct device *, struct cfdata *, void *));
     55 static void	isabusattach __P((struct device *, struct device *, void *));
     56 
     57 struct cfattach isabus_ca = {
     58 	sizeof(struct device), isabusmatch, isabusattach
     59 };
     60 
     61 int
     62 isabusmatch(pdp, cfp, auxp)
     63 struct device	*pdp;
     64 struct cfdata	*cfp;
     65 void		*auxp;
     66 {
     67 	if(atari_realconfig == 0)
     68 		return (0);
     69 	if (strcmp((char *)auxp, "isabus") || cfp->cf_unit != 0)
     70 		return(0);
     71 	return(machineid & ATARI_HADES ? 1 : 0);
     72 }
     73 
     74 void
     75 isabusattach(pdp, dp, auxp)
     76 struct device	*pdp, *dp;
     77 void		*auxp;
     78 {
     79 	struct isabus_attach_args	iba;
     80 
     81 	iba.iba_busname = "isa";
     82 	iba.iba_iot     = ISA_IOSTART;
     83 	iba.iba_memt    = ISA_MEMSTART;
     84 	iba.iba_dmat	= BUS_ISA_DMA_TAG;
     85 
     86 	MFP->mf_aer    |= (IO_ISA1|IO_ISA2); /* ISA interrupts: LOW->HIGH */
     87 
     88 	printf("\n");
     89 	config_found(dp, &iba, isabusprint);
     90 }
     91 
     92 int
     93 isabusprint(auxp, name)
     94 void		*auxp;
     95 const char	*name;
     96 {
     97 	if(name == NULL)
     98 		return(UNCONF);
     99 	return(QUIET);
    100 }
    101 
    102 void
    103 isa_attach_hook(parent, self, iba)
    104 	struct device		  *parent, *self;
    105 	struct isabus_attach_args *iba;
    106 {
    107 }
    108 
    109 /*
    110  * The interrupt stuff is rather ugly. On the Hades, all interrupt lines
    111  * for a slot are wired together and connected to either IO3 (slot1) or
    112  * IO7 (slot2). Since no info can be obtained about the slot position
    113  * at isa_intr_establish() time, the following assumption is made:
    114  *   - irq <= 6 -> slot 1
    115  *   - irq >  6 -> slot 2
    116  */
    117 static isa_intr_info_t iinfo[2] = { { -1 }, { -1 } };
    118 
    119 static int	iifun __P((int, int));
    120 
    121 static int
    122 iifun(slot, sr)
    123 int	slot;
    124 int	sr;
    125 {
    126 	isa_intr_info_t *iinfo_p;
    127 	int		s;
    128 
    129 	iinfo_p = &iinfo[slot];
    130 
    131 	/*
    132 	 * Disable the interrupts
    133 	 */
    134 	if (slot == 0)
    135 		MFP->mf_imrb  &= ~(IB_ISA1);
    136 	else MFP->mf_imra &= ~(IA_ISA2);
    137 
    138 
    139 	if ((sr & PSL_IPL) >= iinfo_p->ipl) {
    140 		/*
    141 		 * We're running at a too high priority now.
    142 		 */
    143 		add_sicallback((si_farg)iifun, (void*)slot, 0);
    144 	}
    145 	else {
    146 		s = splx(iinfo_p->ipl);
    147 		(void) (iinfo_p->ifunc)(iinfo_p->iarg, 0);
    148 		splx(s);
    149 
    150 		/*
    151 		 * Re-enable interrupts after handling
    152 		 */
    153 		if (slot == 0)
    154 			MFP->mf_imrb  |= IB_ISA1;
    155 		else MFP->mf_imra |= IA_ISA2;
    156 	}
    157 	return 1;
    158 }
    159 
    160 void *
    161 isa_intr_establish(ic, irq, type, level, ih_fun, ih_arg)
    162 	isa_chipset_tag_t ic;
    163 	int		  irq, type, level;
    164 	hw_ifun_t	  ih_fun;
    165 	void		  *ih_arg;
    166 {
    167 	isa_intr_info_t *iinfo_p;
    168 	struct intrhand	*ihand;
    169 	int		slot;
    170 
    171 	slot    = (irq <= 6) ? 0 : 1;
    172 	iinfo_p = &iinfo[slot];
    173 
    174 	if (iinfo_p->slot > 0)
    175 	    panic("isa_intr_establish: interrupt was already established\n");
    176 
    177 	ihand = intr_establish((slot == 0) ? 3 : 15, USER_VEC, 0,
    178 				(hw_ifun_t)iifun, (void *)slot);
    179 	if (ihand != NULL) {
    180 		iinfo_p->slot  = slot;
    181 		iinfo_p->ipl   = level;
    182 		iinfo_p->ifunc = ih_fun;
    183 		iinfo_p->iarg  = ih_arg;
    184 		iinfo_p->ihand = ihand;
    185 
    186 		/*
    187 		 * Enable (unmask) the interrupt
    188 		 */
    189 		if (slot == 0) {
    190 			MFP->mf_imrb |= IB_ISA1;
    191 			MFP->mf_ierb |= IB_ISA1;
    192 		}
    193 		else {
    194 			MFP->mf_imra |= IA_ISA2;
    195 			MFP->mf_iera |= IA_ISA2;
    196 		}
    197 		return(iinfo_p);
    198 	}
    199 	return NULL;
    200 }
    201 
    202 void
    203 isa_intr_disestablish(ic, handler)
    204 	isa_chipset_tag_t	ic;
    205 	void			*handler;
    206 {
    207 	isa_intr_info_t *iinfo_p = (isa_intr_info_t *)handler;
    208 
    209 	if (iinfo_p->slot < 0)
    210 	    panic("isa_intr_disestablish: interrupt was not established\n");
    211 
    212 	(void) intr_disestablish(iinfo_p->ihand);
    213 	iinfo_p->slot = -1;
    214 }
    215