mca_machdep.c revision 1.1 1 /* $NetBSD: mca_machdep.c,v 1.1 2007/12/17 19:09:40 garbled Exp $ */
2
3 /*-
4 * Copyright (c) 2000, 2001 The NetBSD Foundation, Inc.
5 * Copyright (c) 1996-1999 Scott D. Telford.
6 * All rights reserved.
7 *
8 * This code is derived from software contributed to The NetBSD Foundation
9 * by Scott Telford <s.telford (at) ed.ac.uk> and Jaromir Dolecek
10 * <jdolecek (at) NetBSD.org>.
11 *
12 * Redistribution and use in source and binary forms, with or without
13 * modification, are permitted provided that the following conditions
14 * are met:
15 * 1. Redistributions of source code must retain the above copyright
16 * notice, this list of conditions and the following disclaimer.
17 * 2. Redistributions in binary form must reproduce the above copyright
18 * notice, this list of conditions and the following disclaimer in the
19 * documentation and/or other materials provided with the distribution.
20 * 3. All advertising materials mentioning features or use of this software
21 * must display the following acknowledgement:
22 * This product includes software developed by the NetBSD
23 * Foundation, Inc. and its contributors.
24 * 4. Neither the name of The NetBSD Foundation nor the names of its
25 * contributors may be used to endorse or promote products derived
26 * from this software without specific prior written permission.
27 *
28 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
29 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
30 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
31 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
32 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
33 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
34 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
35 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
36 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
37 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
38 * POSSIBILITY OF SUCH DAMAGE.
39 */
40
41 /*
42 * Machine-specific functions for MCA autoconfiguration.
43 */
44
45 #include <sys/cdefs.h>
46 __KERNEL_RCSID(0, "$NetBSD: mca_machdep.c,v 1.1 2007/12/17 19:09:40 garbled Exp $");
47
48 #include <sys/types.h>
49 #include <sys/param.h>
50 #include <sys/device.h>
51 #include <sys/malloc.h>
52 #include <sys/systm.h>
53 #include <sys/syslog.h>
54 #include <sys/time.h>
55 #include <sys/kernel.h>
56
57 #include <powerpc/pio.h>
58 #define _POWERPC_BUS_DMA_PRIVATE
59 #include <machine/bus.h>
60
61 #include <dev/mca/mcavar.h>
62 #include <dev/mca/mcareg.h>
63
64 #include "opt_mcaverbose.h"
65
66 #ifdef UNUSED
67 static void _mca_bus_dmamap_sync(bus_dma_tag_t, bus_dmamap_t,
68 bus_addr_t, bus_size_t, int);
69 #endif
70
71 /*
72 * For now, we use MCA DMA to 0-16M always. Some IBM PS/2 have 32bit MCA bus,
73 * but majority of them have 24bit only.
74 */
75 #define MCA_DMA_BOUNCE_THRESHOLD (16 * 1024 * 1024)
76
77 /* Updated in mca_busprobe() if appropriate. */
78 int MCA_system = 0;
79
80 //static bus_space_handle_t dmaiot, dmacmdh, dmaexech;
81
82 #define MAX_SLAVE_CHANNELS 8
83 #define MAX_DMA_CHANNELS 16
84
85 #define INIT_DMA_CHN_BITMASK() (0xFFFFFFFF << (32 - MAX_DMA_CHANS))
86 #define INIT_SLAVE_CHN_BITMASK(slaves) (0xFFFFFFFF << (32 - (slaves))
87
88 #define DMA_AVAIL(chn, bitmask) ((bitmask) & (1 << (31 - (chn))))
89 #define DMA_ALLOC(chn, bitmask) ((bitmask) &= ~(1 << (31 - (chn))))
90 #define DMA_FREE(chn, bitmask) ((bitmask) |= (1 << (31 - (chn))))
91
92 /*
93 * MCA DMA controller commands. The exact sense of individual bits
94 * are from Tymm Twillman <tymm (at) computer.org>, who worked on Linux MCA DMA
95 * support.
96 */
97 #define DMACMD_SET_IO 0x00 /* set port (16bit) for i/o transfer */
98 #define DMACMD_SET_ADDR 0x20 /* set addr (24bit) for i/o transfer */
99 #define DMACMD_GET_ADDR 0x30 /* get addr (24bit) for i/o transfer */
100 #define DMACMD_SET_CNT 0x40 /* set memory size for DMA (16b) */
101 #define DMACMD_GET_CNT 0x50 /* get count of remaining bytes in DMA*/
102 #define DMACMD_GET_STATUS 0x60 /* ?? */
103 #define DMACMD_SET_MODE 0x70 /* set DMA mode */
104 # define DMACMD_MODE_XFER 0x04 /* do transfer, read by default */
105 # define DMACMD_MODE_READ 0x08 /* read transfer */
106 # define DMACMD_MODE_WRITE 0x00 /* write transfer */
107 # define DMACMD_MODE_IOPORT 0x01 /* DMA from/to IO register */
108 # define DMACMD_MODE_16BIT 0x40 /* 16bit transfers (default 8bit) */
109 #define DMACMD_SET_ARBUS 0x80 /* ?? */
110 #define DMACMD_MASK 0x90 /* command mask */
111 #define DMACMD_RESET_MASK 0xA0 /* reset */
112 #define DMACMD_MASTER_CLEAR 0xD0 /* ?? */
113
114 const struct evcnt *
115 mca_intr_evcnt(mca_chipset_tag_t ic, int irq)
116 {
117 /* XXX for now, no evcnt parent reported */
118 return NULL;
119 }
120
121 /*
122 * Map the MCA DMA controller registers.
123 */
124 void
125 mca_attach_hook(struct device *parent, struct device *self,
126 struct mcabus_attach_args *mba)
127 {
128 #if 0
129 dmaiot = mba->mba_iot;
130
131 if (bus_space_map(dmaiot, DMA_CMD, 1, 0, &dmacmdh)
132 || bus_space_map(dmaiot, DMA_EXEC, 1, 0, &dmaexech))
133 panic("mca: couldn't map DMA registers");
134 #endif
135 }
136
137 /*
138 * Read value of MCA POS register "reg" in slot "slot".
139 */
140
141 int
142 mca_conf_read(mca_chipset_tag_t mc, int slot, int reg)
143 {
144 int data;
145
146 slot &= 15; /* slot must be in range 0-15 */
147 data = inb(RS6000_BUS_SPACE_IO + MCA_POS_REG(reg) + (slot<<16));
148 return data;
149 }
150
151
152 /*
153 * Write "data" to MCA POS register "reg" in slot "slot".
154 */
155
156 void
157 mca_conf_write(mca_chipset_tag_t mc, int slot, int reg, int data)
158 {
159 slot &= 15; /* slot must be in range 0-15 */
160 outb(RS6000_BUS_SPACE_IO + MCA_POS_REG(reg) + (slot<<16), data);
161 }
162
163
164 void *
165 mca_intr_establish(mca_chipset_tag_t mc, mca_intr_handle_t ih,
166 int level, int (*func)(void *), void *arg)
167 {
168 if (ih == 0 || ih >= ICU_LEN)
169 panic("mca_intr_establish: bogus handle 0x%x", ih);
170
171 /* MCA interrupts are always level-triggered */
172 return intr_establish(ih, IST_LEVEL, level, func, arg);
173 }
174
175 void
176 mca_intr_disestablish(mca_chipset_tag_t mc, void *cookie)
177 {
178 intr_disestablish(cookie);
179 }
180
181
182 /*
183 * Handle a NMI.
184 * return true to panic system, false to ignore.
185 */
186 int
187 mca_nmi(void)
188 {
189 /*
190 * PS/2 MCA devices can generate NMIs - we can find out which
191 * slot generated it from the POS registers.
192 */
193
194 int slot, mcanmi=0;
195
196 /* if there is no MCA bus, call x86_nmi() */
197 if (!MCA_system)
198 goto out;
199
200 /* ensure motherboard setup is disabled */
201 outb(MCA_MB_SETUP_REG, 0xff);
202
203 /* find if an MCA slot has the CHCK bit asserted (low) in POS 5 */
204 for(slot=0; slot<MCA_MAX_SLOTS; slot++) {
205 outb(MCA_ADAP_SETUP_REG, slot | MCA_ADAP_SET);
206 if ((inb(MCA_POS_REG(5)) & MCA_POS5_CHCK) == 0) {
207 mcanmi = 1;
208 /* find if CHCK status is available in POS 6/7 */
209 if((inb(MCA_POS_REG(5)) & MCA_POS5_CHCK_STAT) == 0)
210 log(LOG_CRIT, "MCA NMI: slot %d, POS6=0x%02x, POS7=0x%02x\n",
211 slot+1, inb(MCA_POS_REG(6)),
212 inb(MCA_POS_REG(7)));
213 else
214 log(LOG_CRIT, "MCA NMI: slot %d\n", slot+1);
215 }
216 }
217 outb(MCA_ADAP_SETUP_REG, 0);
218
219 out:
220 if (!mcanmi) {
221 /* no CHCK bits asserted, assume ISA NMI */
222 //return (x86_nmi());
223 return 0;
224 } else
225 return(0);
226 }
227
228 /*
229 * Realistically, we should probe for the presence of an MCA bus here, and
230 * return a reasonable value. However, this port is never expected to run
231 * on anything other than MCA, so rather than write a bunch of complex code
232 * to find that we indeed have a bus, lets just assume we do.
233 */
234 void
235 mca_busprobe(void)
236 {
237 MCA_system = 1;
238 }
239
240 #define PORT_DISKLED 0x92
241 #define DISKLED_ON 0x40
242
243 /*
244 * Light disk busy LED on IBM PS/2.
245 */
246 void
247 mca_disk_busy(void)
248 {
249 outb(PORT_DISKLED, inb(PORT_DISKLED) | DISKLED_ON);
250 }
251
252 /*
253 * Turn off disk LED on IBM PS/2.
254 */
255 void
256 mca_disk_unbusy(void)
257 {
258 outb(PORT_DISKLED, inb(PORT_DISKLED) & ~DISKLED_ON);
259 }
260
261 /*
262 * -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
263 * MCA DMA specific stuff. We use ISA routines for bulk of the work,
264 * since MCA shares much of the charasteristics with it. We just hook
265 * the DMA channel initialization and kick MCA DMA controller appropriately.
266 * -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
267 */
268
269 #ifdef NOTYET
270 /*
271 * Synchronize a MCA DMA map.
272 */
273 static void
274 _mca_bus_dmamap_sync(bus_dma_tag_t t, bus_dmamap_t map, bus_addr_t offset,
275 bus_size_t len, int ops)
276 {
277 struct rs6000_dma_cookie *cookie;
278 bus_addr_t phys;
279 bus_size_t cnt;
280 int dmach, mode;
281
282 _bus_dmamap_sync(t, map, offset, len, ops);
283
284 /*
285 * Don't do anything if not using the DMA controller.
286 */
287 if ((map->_dm_flags & _MCABUS_DMA_USEDMACTRL) == 0)
288 return;
289
290 /*
291 * Don't do anything if not PRE* operation, allow only
292 * one of PREREAD and PREWRITE.
293 */
294 if (ops != BUS_DMASYNC_PREREAD && ops != BUS_DMASYNC_PREWRITE)
295 return;
296
297 cookie = (struct rs6000_dma_cookie *)map->_dm_cookie;
298 dmach = (cookie->id_flags & 0xf0) >> 4;
299
300 phys = map->dm_segs[0].ds_addr;
301 cnt = map->dm_segs[0].ds_len;
302
303 mode = DMACMD_MODE_XFER;
304 mode |= (ops == BUS_DMASYNC_PREREAD)
305 ? DMACMD_MODE_READ : DMACMD_MODE_WRITE;
306 if (map->_dm_flags & MCABUS_DMA_IOPORT)
307 mode |= DMACMD_MODE_IOPORT;
308
309 /* Use 16bit DMA if requested */
310 if (map->_dm_flags & MCABUS_DMA_16BIT) {
311 #ifdef DIAGNOSTIC
312 if ((cnt % 2) != 0) {
313 panic("_mca_bus_dmamap_sync: 16bit DMA and cnt %lu odd",
314 cnt);
315 }
316 #endif
317 mode |= DMACMD_MODE_16BIT;
318 cnt /= 2;
319 }
320
321 /*
322 * Initialize the MCA DMA controller appropriately. The exact
323 * sequence to setup the controller is taken from Minix.
324 */
325
326 /* Disable access to DMA channel. */
327 bus_space_write_1(dmaiot, dmacmdh, 0, DMACMD_MASK | dmach);
328
329 /* Set the transfer mode. */
330 bus_space_write_1(dmaiot, dmacmdh, 0, DMACMD_SET_MODE | dmach);
331 bus_space_write_1(dmaiot, dmaexech, 0, mode);
332
333 /* Set the address byte pointer. */
334 bus_space_write_1(dmaiot, dmacmdh, 0, DMACMD_SET_ADDR | dmach);
335 /* address bits 0..7 */
336 bus_space_write_1(dmaiot, dmaexech, 0, (phys >> 0) & 0xff);
337 /* address bits 8..15 */
338 bus_space_write_1(dmaiot, dmaexech, 0, (phys >> 8) & 0xff);
339 /* address bits 16..23 */
340 bus_space_write_1(dmaiot, dmaexech, 0, (phys >> 16) & 0xff);
341
342 /* Set the count byte pointer */
343 bus_space_write_1(dmaiot, dmacmdh, 0, DMACMD_SET_CNT | dmach);
344 /* count bits 0..7 */
345 bus_space_write_1(dmaiot, dmaexech, 0, ((cnt - 1) >> 0) & 0xff);
346 /* count bits 8..15 */
347 bus_space_write_1(dmaiot, dmaexech, 0, ((cnt - 1) >> 8) & 0xff);
348
349 /* Enable access to DMA channel. */
350 bus_space_write_1(dmaiot, dmacmdh, 0, DMACMD_RESET_MASK | dmach);
351 }
352 #endif
353
354 /*
355 * Allocate a DMA map, and set up DMA channel.
356 */
357 int
358 mca_dmamap_create(bus_dma_tag_t t, bus_size_t size, int flags,
359 bus_dmamap_t *dmamp, int dmach)
360 {
361 #if 0
362 int error;
363 struct rs6000_dma_cookie *cookie;
364
365 #ifdef DEBUG
366 /* Sanity check */
367 if (dmach < 0 || dmach >= MAX_DMA_CHANNELS) {
368 printf("mcadma_create: invalid DMA channel %d\n",
369 dmach);
370 return (EINVAL);
371 }
372
373 if (size > 65536) {
374 panic("mca_dmamap_create: dmamap sz %ld > 65536",
375 (long) size);
376 }
377 #endif
378
379 /*
380 * MCA DMA transfer can be maximum 65536 bytes long and must
381 * be in one chunk. No specific boundary constraints are present.
382 */
383 if ((error = _bus_dmamap_create(t, size, 1, 65536, 0, flags, dmamp)))
384 return (error);
385
386 cookie = (struct rs6000_dma_cookie *) (*dmamp)->_dm_cookie;
387
388 if (cookie == NULL) {
389 /*
390 * Allocate our cookie if not yet done.
391 */
392 cookie = malloc(sizeof(struct rs6000_dma_cookie), M_DMAMAP,
393 ((flags & BUS_DMA_NOWAIT) ? M_NOWAIT : M_WAITOK) | M_ZERO);
394 if (cookie == NULL) {
395
396 return ENOMEM;
397 }
398 (*dmamp)->_dm_cookie = cookie;
399 }
400
401
402 /* Encode DMA channel */
403 cookie->id_flags &= 0x0f;
404 cookie->id_flags |= dmach << 4;
405
406 /* Mark the dmamap as using DMA controller. Some devices
407 * drive DMA themselves, and don't need the MCA DMA controller.
408 * To distinguish the two, use a flag for dmamaps which use the DMA
409 * controller.
410 */
411 (*dmamp)->_dm_flags |= _MCABUS_DMA_USEDMACTRL;
412 #endif
413 return (0);
414 }
415
416 /*
417 * Set I/O port for DMA. Implemented separately from _mca_bus_dmamap_sync()
418 * so that it's available for one-shot setup.
419 */
420 void
421 mca_dma_set_ioport(int dma, uint16_t port)
422 {
423 #if 0
424 /* Disable access to dma channel. */
425 bus_space_write_1(dmaiot, dmacmdh, 0, DMACMD_MASK | dma);
426
427 /* Set I/O port to use for DMA */
428 bus_space_write_1(dmaiot, dmacmdh, 0, DMACMD_SET_IO | dma);
429 bus_space_write_1(dmaiot, dmaexech, 0, port & 0xff);
430 bus_space_write_1(dmaiot, dmaexech, 0, (port >> 8) & 0xff);
431
432 /* Enable access to DMA channel. */
433 bus_space_write_1(dmaiot, dmacmdh, 0, DMACMD_RESET_MASK | dma);
434 #endif
435 }
436