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