pci_machdep.c revision 1.24 1 /* $NetBSD: pci_machdep.c,v 1.24 2000/06/29 08:28:25 mrg Exp $ */
2
3 /*
4 * Copyright (c) 1996 Leo Weppelman. All rights reserved.
5 * Copyright (c) 1996, 1997 Christopher G. Demetriou. All rights reserved.
6 * Copyright (c) 1994 Charles M. 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 M. 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 #include <sys/malloc.h>
41
42 #include <uvm/uvm_extern.h>
43
44 #include <dev/pci/pcivar.h>
45 #include <dev/pci/pcireg.h>
46
47 #include <machine/cpu.h>
48 #include <machine/iomap.h>
49 #include <machine/mfp.h>
50 #include <machine/bswap.h>
51 #include <machine/bus.h>
52
53 #include <atari/atari/device.h>
54 #include <atari/pci/pci_vga.h>
55
56 /*
57 * Sizes of pci memory and I/O area.
58 */
59 #define PCI_MEM_END 0x10000000 /* 256 MByte */
60 #define PCI_IO_END 0x10000000 /* 256 MByte */
61
62 /*
63 * We preserve some space at the begin of the pci area for 32BIT_1M
64 * devices and standard vga.
65 */
66 #define PCI_MEM_START 0x00100000 /* 1 MByte */
67 #define PCI_IO_START 0x00004000 /* 16 kByte (some PCI cards allow only
68 I/O adresses up to 0xffff) */
69
70 /*
71 * PCI memory and IO should be aligned acording to this masks
72 */
73 #define PCI_MACHDEP_IO_ALIGN_MASK 0xffffff00
74 #define PCI_MACHDEP_MEM_ALIGN_MASK 0xfffff000
75
76 /*
77 * Convert a PCI 'device' number to a slot number.
78 */
79 #define DEV2SLOT(dev) (3 - dev)
80
81 /*
82 * Struct to hold the memory and I/O datas of the pci devices
83 */
84 struct pci_memreg {
85 LIST_ENTRY(pci_memreg) link;
86 int dev;
87 pcitag_t tag;
88 pcireg_t reg, address, mask;
89 u_int32_t size;
90 u_int32_t csr;
91 };
92
93 typedef LIST_HEAD(pci_memreg_head, pci_memreg) PCI_MEMREG;
94
95 int pcibusprint __P((void *auxp, const char *));
96 int pcibusmatch __P((struct device *, struct cfdata *, void *));
97 void pcibusattach __P((struct device *, struct device *, void *));
98
99 static void enable_pci_devices __P((void));
100 static void insert_into_list __P((PCI_MEMREG *head, struct pci_memreg *elem));
101 static int overlap_pci_areas __P((struct pci_memreg *p,
102 struct pci_memreg *self, u_int addr, u_int size, u_int what));
103 static int pci_config_offset __P((pcitag_t));
104
105 struct cfattach pcibus_ca = {
106 sizeof(struct device), pcibusmatch, pcibusattach
107 };
108
109 int
110 pcibusmatch(pdp, cfp, auxp)
111 struct device *pdp;
112 struct cfdata *cfp;
113 void *auxp;
114 {
115 if(atari_realconfig == 0)
116 return (0);
117 if (strcmp((char *)auxp, "pcibus") || cfp->cf_unit != 0)
118 return(0);
119 return(machineid & ATARI_HADES ? 1 : 0);
120 }
121
122 void
123 pcibusattach(pdp, dp, auxp)
124 struct device *pdp, *dp;
125 void *auxp;
126 {
127 struct pcibus_attach_args pba;
128
129 enable_pci_devices();
130
131 pba.pba_busname = "pci";
132 pba.pba_pc = NULL;
133 pba.pba_bus = 0;
134 pba.pba_flags = PCI_FLAGS_IO_ENABLED | PCI_FLAGS_MEM_ENABLED;
135 pba.pba_dmat = BUS_PCI_DMA_TAG;
136 pba.pba_iot = leb_alloc_bus_space_tag(NULL);
137 pba.pba_memt = leb_alloc_bus_space_tag(NULL);
138 if ((pba.pba_iot == NULL) || (pba.pba_memt == NULL)) {
139 printf("leb_alloc_bus_space_tag failed!\n");
140 return;
141 }
142 pba.pba_iot->base = PCI_IO_PHYS;
143 pba.pba_memt->base = PCI_MEM_PHYS;
144
145 MFP2->mf_aer &= ~(0x27); /* PCI interrupts: HIGH -> LOW */
146
147 printf("\n");
148
149 config_found(dp, &pba, pcibusprint);
150 }
151
152 int
153 pcibusprint(auxp, name)
154 void *auxp;
155 const char *name;
156 {
157 if(name == NULL)
158 return(UNCONF);
159 return(QUIET);
160 }
161
162 void
163 pci_attach_hook(parent, self, pba)
164 struct device *parent, *self;
165 struct pcibus_attach_args *pba;
166 {
167 }
168
169 /*
170 * Initialize the PCI-bus. The Atari-BIOS does not do this, so....
171 * We only disable all devices here. Memory and I/O enabling is done
172 * later at pcibusattach.
173 */
174 void
175 init_pci_bus()
176 {
177 pci_chipset_tag_t pc = NULL; /* XXX */
178 pcitag_t tag;
179 pcireg_t csr;
180 int device, id, maxndevs;
181
182 tag = 0;
183 id = 0;
184
185 maxndevs = pci_bus_maxdevs(pc, 0);
186
187 for (device = 0; device < maxndevs; device++) {
188
189 tag = pci_make_tag(pc, 0, device, 0);
190 id = pci_conf_read(pc, tag, PCI_ID_REG);
191 if (id == 0 || id == 0xffffffff)
192 continue;
193
194 csr = pci_conf_read(pc, tag, PCI_COMMAND_STATUS_REG);
195 csr &= ~(PCI_COMMAND_MEM_ENABLE|PCI_COMMAND_IO_ENABLE);
196 csr &= ~PCI_COMMAND_MASTER_ENABLE;
197 pci_conf_write(pc, tag, PCI_COMMAND_STATUS_REG, csr);
198 }
199
200 /*
201 * Scan the bus for a VGA-card that we support. If we find
202 * one, try to initialize it to a 'standard' text mode (80x25).
203 */
204 check_for_vga();
205 }
206
207 /*
208 * insert a new element in an existing list that the ID's (size in struct
209 * pci_memreg) are sorted.
210 */
211 static void
212 insert_into_list(head, elem)
213 PCI_MEMREG *head;
214 struct pci_memreg *elem;
215 {
216 struct pci_memreg *p, *q;
217
218 p = LIST_FIRST(head);
219 q = NULL;
220
221 for (; p != NULL && p->size < elem->size; q = p, p = LIST_NEXT(p, link));
222
223 if (q == NULL) {
224 LIST_INSERT_HEAD(head, elem, link);
225 } else {
226 LIST_INSERT_AFTER(q, elem, link);
227 }
228 }
229
230 /*
231 * Test if a new selected area overlaps with an already (probably preselected)
232 * pci area.
233 */
234 static int
235 overlap_pci_areas(p, self, addr, size, what)
236 struct pci_memreg *p, *self;
237 u_int addr, size, what;
238 {
239 struct pci_memreg *q;
240
241 if (p == NULL)
242 return 0;
243
244 q = p;
245 while (q != NULL) {
246 if ((q != self) && (q->csr & what)) {
247 if ((addr >= q->address) && (addr < (q->address + q->size))) {
248 #ifdef DEBUG_PCI_MACHDEP
249 printf("\noverlap area dev %d reg 0x%02x with dev %d reg 0x%02x",
250 self->dev, self->reg, q->dev, q->reg);
251 #endif
252 return 1;
253 }
254 if ((q->address >= addr) && (q->address < (addr + size))) {
255 #ifdef DEBUG_PCI_MACHDEP
256 printf("\noverlap area dev %d reg 0x%02x with dev %d reg 0x%02x",
257 self->dev, self->reg, q->dev, q->reg);
258 #endif
259 return 1;
260 }
261 }
262 q = LIST_NEXT(q, link);
263 }
264 return 0;
265 }
266
267 /*
268 * Enable memory and I/O on pci devices. Care about already enabled devices
269 * (probabaly by the console driver).
270 *
271 * The idea behind the following code is:
272 * We build a by sizes sorted list of the requirements of the different
273 * pci devices. After that we choose the start addresses of that areas
274 * in such a way that they are placed as closed as possible together.
275 */
276 static void
277 enable_pci_devices()
278 {
279 PCI_MEMREG memlist;
280 PCI_MEMREG iolist;
281 struct pci_memreg *p, *q;
282 int dev, reg, id, class;
283 pcitag_t tag;
284 pcireg_t csr, address, mask;
285 pci_chipset_tag_t pc;
286 int sizecnt, membase_1m;
287
288 pc = 0;
289 csr = 0;
290 tag = 0;
291
292 LIST_INIT(&memlist);
293 LIST_INIT(&iolist);
294
295 /*
296 * first step: go through all devices and gather memory and I/O
297 * sizes
298 */
299 for (dev = 0; dev < pci_bus_maxdevs(pc,0); dev++) {
300
301 tag = pci_make_tag(pc, 0, dev, 0);
302 id = pci_conf_read(pc, tag, PCI_ID_REG);
303 if (id == 0 || id == 0xffffffff)
304 continue;
305
306 csr = pci_conf_read(pc, tag, PCI_COMMAND_STATUS_REG);
307
308 /*
309 * special case: if a display card is found and memory is enabled
310 * preserve 128k at 0xa0000 as vga memory.
311 * XXX: if a display card is found without being enabled, leave
312 * it alone! You will usually only create conflicts by enabeling
313 * it.
314 */
315 class = pci_conf_read(pc, tag, PCI_CLASS_REG);
316 switch (PCI_CLASS(class)) {
317 case PCI_CLASS_PREHISTORIC:
318 case PCI_CLASS_DISPLAY:
319 if (csr & (PCI_COMMAND_MEM_ENABLE | PCI_COMMAND_MASTER_ENABLE)) {
320 p = (struct pci_memreg *)malloc(sizeof(struct pci_memreg),
321 M_TEMP, M_WAITOK);
322 memset(p, '\0', sizeof(struct pci_memreg));
323 p->dev = dev;
324 p->csr = csr;
325 p->tag = tag;
326 p->reg = 0; /* there is no register about this */
327 p->size = 0x20000; /* 128kByte */
328 p->mask = 0xfffe0000;
329 p->address = 0xa0000;
330
331 insert_into_list(&memlist, p);
332 }
333 else continue;
334 }
335
336 for (reg = PCI_MAPREG_START; reg < PCI_MAPREG_END; reg += 4) {
337
338 address = pci_conf_read(pc, tag, reg);
339 pci_conf_write(pc, tag, reg, 0xffffffff);
340 mask = pci_conf_read(pc, tag, reg);
341 pci_conf_write(pc, tag, reg, address);
342 if (mask == 0)
343 continue; /* Register unused */
344
345 p = (struct pci_memreg *)malloc(sizeof(struct pci_memreg),
346 M_TEMP, M_WAITOK);
347 memset(p, '\0', sizeof(struct pci_memreg));
348 p->dev = dev;
349 p->csr = csr;
350 p->tag = tag;
351 p->reg = reg;
352 p->mask = mask;
353 p->address = 0;
354
355 if (mask & PCI_MAPREG_TYPE_IO) {
356 p->size = PCI_MAPREG_IO_SIZE(mask);
357
358 /*
359 * Align IO if necessary
360 */
361 if (p->size < PCI_MAPREG_IO_SIZE(PCI_MACHDEP_IO_ALIGN_MASK)) {
362 p->mask = PCI_MACHDEP_IO_ALIGN_MASK;
363 p->size = PCI_MAPREG_IO_SIZE(p->mask);
364 }
365
366 /*
367 * if I/O is already enabled (probably by the console driver)
368 * save the address in order to take care about it later.
369 */
370 if (csr & PCI_COMMAND_IO_ENABLE)
371 p->address = address;
372
373 insert_into_list(&iolist, p);
374 } else {
375 p->size = PCI_MAPREG_MEM_SIZE(mask);
376
377 /*
378 * Align memory if necessary
379 */
380 if (p->size < PCI_MAPREG_IO_SIZE(PCI_MACHDEP_MEM_ALIGN_MASK)) {
381 p->mask = PCI_MACHDEP_MEM_ALIGN_MASK;
382 p->size = PCI_MAPREG_MEM_SIZE(p->mask);
383 }
384
385 /*
386 * if memory is already enabled (probably by the console driver)
387 * save the address in order to take care about it later.
388 */
389 if (csr & PCI_COMMAND_MEM_ENABLE)
390 p->address = address;
391
392 insert_into_list(&memlist, p);
393
394 if (PCI_MAPREG_MEM_TYPE(mask) == PCI_MAPREG_MEM_TYPE_64BIT)
395 reg++;
396 }
397 }
398
399 /*
400 * Both interrupt pin & line are set to the device (== slot)
401 * number. This makes sense on the atari because the
402 * individual slots are hard-wired to a specific MFP-pin.
403 */
404 csr = (DEV2SLOT(dev) << PCI_INTERRUPT_PIN_SHIFT);
405 csr |= (DEV2SLOT(dev) << PCI_INTERRUPT_LINE_SHIFT);
406 pci_conf_write(pc, tag, PCI_INTERRUPT_REG, csr);
407 }
408
409 /*
410 * second step: calculate the memory and I/O adresses beginning from
411 * PCI_MEM_START and PCI_IO_START. Care about already mapped areas.
412 *
413 * beginn with memory list
414 */
415
416 address = PCI_MEM_START;
417 sizecnt = 0;
418 membase_1m = 0;
419 p = LIST_FIRST(&memlist);
420 while (p != NULL) {
421 if (!(p->csr & PCI_COMMAND_MEM_ENABLE)) {
422 if (PCI_MAPREG_MEM_TYPE(p->mask) == PCI_MAPREG_MEM_TYPE_32BIT_1M) {
423 if (p->size > membase_1m)
424 membase_1m = p->size;
425 do {
426 p->address = membase_1m;
427 membase_1m += p->size;
428 } while (overlap_pci_areas(LIST_FIRST(&memlist), p, p->address,
429 p->size, PCI_COMMAND_MEM_ENABLE));
430 if (membase_1m > 0x00100000) {
431 /*
432 * Should we panic here?
433 */
434 printf("\npcibus0: dev %d reg %d: memory not configured",
435 p->dev, p->reg);
436 p->reg = 0;
437 }
438 } else {
439
440 if (sizecnt && (p->size > sizecnt))
441 sizecnt = ((p->size + sizecnt) & p->mask) &
442 PCI_MAPREG_MEM_ADDR_MASK;
443 if (sizecnt > address) {
444 address = sizecnt;
445 sizecnt = 0;
446 }
447
448 do {
449 p->address = address + sizecnt;
450 sizecnt += p->size;
451 } while (overlap_pci_areas(LIST_FIRST(&memlist), p, p->address,
452 p->size, PCI_COMMAND_MEM_ENABLE));
453
454 if ((address + sizecnt) > PCI_MEM_END) {
455 /*
456 * Should we panic here?
457 */
458 printf("\npcibus0: dev %d reg %d: memory not configured",
459 p->dev, p->reg);
460 p->reg = 0;
461 }
462 }
463 if (p->reg > 0) {
464 pci_conf_write(pc, p->tag, p->reg, p->address);
465 csr = pci_conf_read(pc, p->tag, PCI_COMMAND_STATUS_REG);
466 csr |= PCI_COMMAND_MEM_ENABLE | PCI_COMMAND_MASTER_ENABLE;
467 pci_conf_write(pc, p->tag, PCI_COMMAND_STATUS_REG, csr);
468 p->csr = csr;
469 }
470 }
471 p = LIST_NEXT(p, link);
472 }
473
474 /*
475 * now the I/O list
476 */
477
478 address = PCI_IO_START;
479 sizecnt = 0;
480 p = LIST_FIRST(&iolist);
481 while (p != NULL) {
482 if (!(p->csr & PCI_COMMAND_IO_ENABLE)) {
483
484 if (sizecnt && (p->size > sizecnt))
485 sizecnt = ((p->size + sizecnt) & p->mask) &
486 PCI_MAPREG_IO_ADDR_MASK;
487 if (sizecnt > address) {
488 address = sizecnt;
489 sizecnt = 0;
490 }
491
492 do {
493 p->address = address + sizecnt;
494 sizecnt += p->size;
495 } while (overlap_pci_areas(LIST_FIRST(&iolist), p, p->address,
496 p->size, PCI_COMMAND_IO_ENABLE));
497
498 if ((address + sizecnt) > PCI_IO_END) {
499 /*
500 * Should we panic here?
501 */
502 printf("\npcibus0: dev %d reg %d: io not configured",
503 p->dev, p->reg);
504 } else {
505 pci_conf_write(pc, p->tag, p->reg, p->address);
506 csr = pci_conf_read(pc, p->tag, PCI_COMMAND_STATUS_REG);
507 csr |= PCI_COMMAND_IO_ENABLE | PCI_COMMAND_MASTER_ENABLE;
508 pci_conf_write(pc, p->tag, PCI_COMMAND_STATUS_REG, csr);
509 p->csr = csr;
510 }
511 }
512 p = LIST_NEXT(p, link);
513 }
514
515 #ifdef DEBUG_PCI_MACHDEP
516 printf("\nI/O List:\n");
517 p = LIST_FIRST(&iolist);
518
519 while (p != NULL) {
520 printf("\ndev: %d, reg: 0x%02x, size: 0x%08x, addr: 0x%08x", p->dev,
521 p->reg, p->size, p->address);
522 p = LIST_NEXT(p, link);
523 }
524 printf("\nMemlist:");
525 p = LIST_FIRST(&memlist);
526
527 while (p != NULL) {
528 printf("\ndev: %d, reg: 0x%02x, size: 0x%08x, addr: 0x%08x", p->dev,
529 p->reg, p->size, p->address);
530 p = LIST_NEXT(p, link);
531 }
532 #endif
533
534 /*
535 * Free the lists
536 */
537 p = LIST_FIRST(&iolist);
538 while (p != NULL) {
539 q = p;
540 LIST_REMOVE(q, link);
541 free(p, M_WAITOK);
542 p = LIST_FIRST(&iolist);
543 }
544 p = LIST_FIRST(&memlist);
545 while (p != NULL) {
546 q = p;
547 LIST_REMOVE(q, link);
548 free(p, M_WAITOK);
549 p = LIST_FIRST(&memlist);
550 }
551 }
552
553 /*
554 * Atari_init.c maps the config areas NBPG bytes apart....
555 */
556 static int pci_config_offset(tag)
557 pcitag_t tag;
558 {
559 int device;
560
561 device = (tag >> 11) & 0x1f;
562 return(device * NBPG);
563 }
564
565 int
566 pci_bus_maxdevs(pc, busno)
567 pci_chipset_tag_t pc;
568 int busno;
569 {
570 return (4);
571 }
572
573 pcitag_t
574 pci_make_tag(pc, bus, device, function)
575 pci_chipset_tag_t pc;
576 int bus, device, function;
577 {
578 return ((bus << 16) | (device << 11) | (function << 8));
579 }
580
581 pcireg_t
582 pci_conf_read(pc, tag, reg)
583 pci_chipset_tag_t pc;
584 pcitag_t tag;
585 int reg;
586 {
587 u_long data;
588
589 data = *(u_long *)(pci_conf_addr + pci_config_offset(tag) + reg);
590 return (bswap32(data));
591 }
592
593 void
594 pci_conf_write(pc, tag, reg, data)
595 pci_chipset_tag_t pc;
596 pcitag_t tag;
597 int reg;
598 pcireg_t data;
599 {
600 *((u_long *)(pci_conf_addr + pci_config_offset(tag) + reg))
601 = bswap32(data);
602 }
603
604 int
605 pci_intr_map(pc, intrtag, pin, line, ihp)
606 pci_chipset_tag_t pc;
607 pcitag_t intrtag;
608 int pin, line;
609 pci_intr_handle_t *ihp;
610 {
611 /*
612 * According to the PCI-spec, 255 means `unknown' or `no connection'.
613 * Interpret this as 'no interrupt assigned'.
614 */
615 if (line == 255) {
616 *ihp = -1;
617 return 1;
618 }
619
620 /*
621 * Values are pretty useless because the on the Hades all interrupt
622 * lines for a card are tied together and hardwired to the TT-MFP
623 * I/O port.
624 */
625 *ihp = line;
626 return 0;
627 }
628
629 const char *
630 pci_intr_string(pc, ih)
631 pci_chipset_tag_t pc;
632 pci_intr_handle_t ih;
633 {
634 static char irqstr[8]; /* 4 + 2 + NULL + sanity */
635
636 if (ih == -1)
637 panic("pci_intr_string: bogus handle 0x%x\n", ih);
638
639 sprintf(irqstr, "irq %d", ih);
640 return (irqstr);
641
642 }
643
644 const struct evcnt *
645 pci_intr_evcnt(pc, ih)
646 pci_chipset_tag_t pc;
647 pci_intr_handle_t ih;
648 {
649
650 /* XXX for now, no evcnt parent reported */
651 return NULL;
652 }
653
654 /*
655 * The interrupt stuff is rather ugly. On the Hades, all interrupt lines
656 * for a slot are wired together and connected to IO 0,1,2 or 5 (slots:
657 * (0-3) on the TT-MFP. The Pci-config code initializes the irq. number
658 * to the slot position.
659 */
660 static pci_intr_info_t iinfo[4] = { { -1 }, { -1 }, { -1 }, { -1 } };
661
662 static int iifun __P((int, int));
663
664 static int
665 iifun(slot, sr)
666 int slot;
667 int sr;
668 {
669 pci_intr_info_t *iinfo_p;
670 int s;
671
672 iinfo_p = &iinfo[slot];
673
674 /*
675 * Disable the interrupts
676 */
677 MFP2->mf_imrb &= ~iinfo_p->imask;
678
679 if ((sr & PSL_IPL) >= (iinfo_p->ipl & PSL_IPL)) {
680 /*
681 * We're running at a too high priority now.
682 */
683 add_sicallback((si_farg)iifun, (void*)slot, 0);
684 }
685 else {
686 s = splx(iinfo_p->ipl);
687 (void) (iinfo_p->ifunc)(iinfo_p->iarg);
688 splx(s);
689
690 /*
691 * Re-enable interrupts after handling
692 */
693 MFP2->mf_imrb |= iinfo_p->imask;
694 }
695 return 1;
696 }
697
698 void *
699 pci_intr_establish(pc, ih, level, ih_fun, ih_arg)
700 pci_chipset_tag_t pc;
701 pci_intr_handle_t ih;
702 int level;
703 int (*ih_fun) __P((void *));
704 void *ih_arg;
705 {
706 pci_intr_info_t *iinfo_p;
707 struct intrhand *ihand;
708 int slot;
709
710 slot = ih;
711 iinfo_p = &iinfo[slot];
712
713 if (iinfo_p->ipl > 0)
714 panic("pci_intr_establish: interrupt was already established\n");
715
716 ihand = intr_establish((slot == 3) ? 23 : 16 + slot, USER_VEC, 0,
717 (hw_ifun_t)iifun, (void *)slot);
718 if (ihand != NULL) {
719 iinfo_p->ipl = level;
720 iinfo_p->imask = (slot == 3) ? 0x80 : (0x01 << slot);
721 iinfo_p->ifunc = ih_fun;
722 iinfo_p->iarg = ih_arg;
723 iinfo_p->ihand = ihand;
724
725 /*
726 * Enable (unmask) the interrupt
727 */
728 MFP2->mf_imrb |= iinfo_p->imask;
729 MFP2->mf_ierb |= iinfo_p->imask;
730 return(iinfo_p);
731 }
732 return NULL;
733 }
734
735 void
736 pci_intr_disestablish(pc, cookie)
737 pci_chipset_tag_t pc;
738 void *cookie;
739 {
740 pci_intr_info_t *iinfo_p = (pci_intr_info_t *)cookie;
741
742 if (iinfo->ipl < 0)
743 panic("pci_intr_disestablish: interrupt was not established\n");
744
745 MFP2->mf_imrb &= ~iinfo->imask;
746 MFP2->mf_ierb &= ~iinfo->imask;
747 (void) intr_disestablish(iinfo_p->ihand);
748 iinfo_p->ipl = -1;
749 }
750