]> CyberLeo.Net >> Repos - FreeBSD/releng/10.3.git/blob - sys/dev/puc/puc.c
- Copy stable/10@296371 to releng/10.3 in preparation for 10.3-RC1
[FreeBSD/releng/10.3.git] / sys / dev / puc / puc.c
1 /*-
2  * Copyright (c) 2006 Marcel Moolenaar
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  *
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice, this list of conditions and the following disclaimer.
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in the
13  *    documentation and/or other materials provided with the distribution.
14  *
15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
16  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
17  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
18  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
19  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
20  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
21  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
22  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
23  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
24  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
25  */
26
27 #include <sys/cdefs.h>
28 __FBSDID("$FreeBSD$");
29
30 #include <sys/param.h>
31 #include <sys/systm.h>
32 #include <sys/kernel.h>
33 #include <sys/bus.h>
34 #include <sys/conf.h>
35 #include <sys/malloc.h>
36 #include <sys/mutex.h>
37 #include <sys/sysctl.h>
38
39 #include <machine/bus.h>
40 #include <machine/resource.h>
41 #include <sys/rman.h>
42
43 #include <dev/pci/pcireg.h>
44 #include <dev/pci/pcivar.h>
45
46 #include <dev/puc/puc_bus.h>
47 #include <dev/puc/puc_cfg.h>
48 #include <dev/puc/puc_bfe.h>
49
50 #define PUC_ISRCCNT     5
51
52 struct puc_port {
53         struct puc_bar  *p_bar;
54         struct resource *p_rres;
55         struct resource *p_ires;
56         device_t        p_dev;
57         int             p_nr;
58         int             p_type;
59         int             p_rclk;
60
61         int             p_hasintr:1;
62
63         serdev_intr_t   *p_ihsrc[PUC_ISRCCNT];
64         void            *p_iharg;
65
66         int             p_ipend;
67 };
68
69 devclass_t puc_devclass;
70 const char puc_driver_name[] = "puc";
71
72 static MALLOC_DEFINE(M_PUC, "PUC", "PUC driver");
73
74 SYSCTL_NODE(_hw, OID_AUTO, puc, CTLFLAG_RD, 0, "puc(9) driver configuration");
75
76 struct puc_bar *
77 puc_get_bar(struct puc_softc *sc, int rid)
78 {
79         struct puc_bar *bar;
80         struct rman *rm;
81         u_long end, start;
82         int error, i;
83
84         /* Find the BAR entry with the given RID. */
85         i = 0;
86         while (i < PUC_PCI_BARS && sc->sc_bar[i].b_rid != rid)
87                 i++;
88         if (i < PUC_PCI_BARS)
89                 return (&sc->sc_bar[i]);
90
91         /* Not found. If we're looking for an unused entry, return NULL. */
92         if (rid == -1)
93                 return (NULL);
94
95         /* Get an unused entry for us to fill.  */
96         bar = puc_get_bar(sc, -1);
97         if (bar == NULL)
98                 return (NULL);
99         bar->b_rid = rid;
100         bar->b_type = SYS_RES_IOPORT;
101         bar->b_res = bus_alloc_resource_any(sc->sc_dev, bar->b_type,
102             &bar->b_rid, RF_ACTIVE);
103         if (bar->b_res == NULL) {
104                 bar->b_rid = rid;
105                 bar->b_type = SYS_RES_MEMORY;
106                 bar->b_res = bus_alloc_resource_any(sc->sc_dev, bar->b_type,
107                     &bar->b_rid, RF_ACTIVE);
108                 if (bar->b_res == NULL) {
109                         bar->b_rid = -1;
110                         return (NULL);
111                 }
112         }
113
114         /* Update our managed space. */
115         rm = (bar->b_type == SYS_RES_IOPORT) ? &sc->sc_ioport : &sc->sc_iomem;
116         start = rman_get_start(bar->b_res);
117         end = rman_get_end(bar->b_res);
118         error = rman_manage_region(rm, start, end);
119         if (error) {
120                 bus_release_resource(sc->sc_dev, bar->b_type, bar->b_rid,
121                     bar->b_res);
122                 bar->b_res = NULL;
123                 bar->b_rid = -1;
124                 bar = NULL;
125         }
126
127         return (bar);
128 }
129
130 static int
131 puc_intr(void *arg)
132 {
133         struct puc_port *port;
134         struct puc_softc *sc = arg;
135         u_long ds, dev, devs;
136         int i, idx, ipend, isrc, nints;
137         uint8_t ilr;
138
139         nints = 0;
140         while (1) {
141                 /*
142                  * Obtain the set of devices with pending interrupts.
143                  */
144                 devs = sc->sc_serdevs;
145                 if (sc->sc_ilr == PUC_ILR_DIGI) {
146                         idx = 0;
147                         while (devs & (0xfful << idx)) {
148                                 ilr = ~bus_read_1(sc->sc_port[idx].p_rres, 7);
149                                 devs &= ~0ul ^ ((u_long)ilr << idx);
150                                 idx += 8;
151                         }
152                 } else if (sc->sc_ilr == PUC_ILR_QUATECH) {
153                         /*
154                          * Don't trust the value if it's the same as the option
155                          * register. It may mean that the ILR is not active and
156                          * we're reading the option register instead. This may
157                          * lead to false positives on 8-port boards.
158                          */
159                         ilr = bus_read_1(sc->sc_port[0].p_rres, 7);
160                         if (ilr != (sc->sc_cfg_data & 0xff))
161                                 devs &= (u_long)ilr;
162                 }
163                 if (devs == 0UL)
164                         break;
165
166                 /*
167                  * Obtain the set of interrupt sources from those devices
168                  * that have pending interrupts.
169                  */
170                 ipend = 0;
171                 idx = 0, dev = 1UL;
172                 ds = devs;
173                 while (ds != 0UL) {
174                         while ((ds & dev) == 0UL)
175                                 idx++, dev <<= 1;
176                         ds &= ~dev;
177                         port = &sc->sc_port[idx];
178                         port->p_ipend = SERDEV_IPEND(port->p_dev);
179                         ipend |= port->p_ipend;
180                 }
181                 if (ipend == 0)
182                         break;
183
184                 i = 0, isrc = SER_INT_OVERRUN;
185                 while (ipend) {
186                         while (i < PUC_ISRCCNT && !(ipend & isrc))
187                                 i++, isrc <<= 1;
188                         KASSERT(i < PUC_ISRCCNT, ("%s", __func__));
189                         ipend &= ~isrc;
190                         idx = 0, dev = 1UL;
191                         ds = devs;
192                         while (ds != 0UL) {
193                                 while ((ds & dev) == 0UL)
194                                         idx++, dev <<= 1;
195                                 ds &= ~dev;
196                                 port = &sc->sc_port[idx];
197                                 if (!(port->p_ipend & isrc))
198                                         continue;
199                                 if (port->p_ihsrc[i] != NULL)
200                                         (*port->p_ihsrc[i])(port->p_iharg);
201                                 nints++;
202                         }
203                 }
204         }
205
206         return ((nints > 0) ? FILTER_HANDLED : FILTER_STRAY);
207 }
208
209 int
210 puc_bfe_attach(device_t dev)
211 {
212         char buffer[64];
213         struct puc_bar *bar;
214         struct puc_port *port;
215         struct puc_softc *sc;
216         struct rman *rm;
217         intptr_t res;
218         bus_addr_t ofs, start;
219         bus_size_t size;
220         bus_space_handle_t bsh;
221         bus_space_tag_t bst;
222         int error, idx;
223
224         sc = device_get_softc(dev);
225
226         for (idx = 0; idx < PUC_PCI_BARS; idx++)
227                 sc->sc_bar[idx].b_rid = -1;
228
229         do {
230                 sc->sc_ioport.rm_type = RMAN_ARRAY;
231                 error = rman_init(&sc->sc_ioport);
232                 if (!error) {
233                         sc->sc_iomem.rm_type = RMAN_ARRAY;
234                         error = rman_init(&sc->sc_iomem);
235                         if (!error) {
236                                 sc->sc_irq.rm_type = RMAN_ARRAY;
237                                 error = rman_init(&sc->sc_irq);
238                                 if (!error)
239                                         break;
240                                 rman_fini(&sc->sc_iomem);
241                         }
242                         rman_fini(&sc->sc_ioport);
243                 }
244                 return (error);
245         } while (0);
246
247         snprintf(buffer, sizeof(buffer), "%s I/O port mapping",
248             device_get_nameunit(dev));
249         sc->sc_ioport.rm_descr = strdup(buffer, M_PUC);
250         snprintf(buffer, sizeof(buffer), "%s I/O memory mapping",
251             device_get_nameunit(dev));
252         sc->sc_iomem.rm_descr = strdup(buffer, M_PUC);
253         snprintf(buffer, sizeof(buffer), "%s port numbers",
254             device_get_nameunit(dev));
255         sc->sc_irq.rm_descr = strdup(buffer, M_PUC);
256
257         error = puc_config(sc, PUC_CFG_GET_NPORTS, 0, &res);
258         KASSERT(error == 0, ("%s %d", __func__, __LINE__));
259         sc->sc_nports = (int)res;
260         sc->sc_port = malloc(sc->sc_nports * sizeof(struct puc_port),
261             M_PUC, M_WAITOK|M_ZERO);
262
263         error = rman_manage_region(&sc->sc_irq, 1, sc->sc_nports);
264         if (error)
265                 goto fail;
266
267         error = puc_config(sc, PUC_CFG_SETUP, 0, &res);
268         if (error)
269                 goto fail;
270
271         for (idx = 0; idx < sc->sc_nports; idx++) {
272                 port = &sc->sc_port[idx];
273                 port->p_nr = idx + 1;
274                 error = puc_config(sc, PUC_CFG_GET_TYPE, idx, &res);
275                 if (error)
276                         goto fail;
277                 port->p_type = res;
278                 error = puc_config(sc, PUC_CFG_GET_RID, idx, &res);
279                 if (error)
280                         goto fail;
281                 bar = puc_get_bar(sc, res);
282                 if (bar == NULL) {
283                         error = ENXIO;
284                         goto fail;
285                 }
286                 port->p_bar = bar;
287                 start = rman_get_start(bar->b_res);
288                 error = puc_config(sc, PUC_CFG_GET_OFS, idx, &res);
289                 if (error)
290                         goto fail;
291                 ofs = res;
292                 error = puc_config(sc, PUC_CFG_GET_LEN, idx, &res);
293                 if (error)
294                         goto fail;
295                 size = res;
296                 rm = (bar->b_type == SYS_RES_IOPORT)
297                     ? &sc->sc_ioport: &sc->sc_iomem;
298                 port->p_rres = rman_reserve_resource(rm, start + ofs,
299                     start + ofs + size - 1, size, 0, NULL);
300                 if (port->p_rres != NULL) {
301                         bsh = rman_get_bushandle(bar->b_res);
302                         bst = rman_get_bustag(bar->b_res);
303                         bus_space_subregion(bst, bsh, ofs, size, &bsh);
304                         rman_set_bushandle(port->p_rres, bsh);
305                         rman_set_bustag(port->p_rres, bst);
306                 }
307                 port->p_ires = rman_reserve_resource(&sc->sc_irq, port->p_nr,
308                     port->p_nr, 1, 0, NULL);
309                 if (port->p_ires == NULL) {
310                         error = ENXIO;
311                         goto fail;
312                 }
313                 error = puc_config(sc, PUC_CFG_GET_CLOCK, idx, &res);
314                 if (error)
315                         goto fail;
316                 port->p_rclk = res;
317
318                 port->p_dev = device_add_child(dev, NULL, -1);
319                 if (port->p_dev != NULL)
320                         device_set_ivars(port->p_dev, (void *)port);
321         }
322
323         error = puc_config(sc, PUC_CFG_GET_ILR, 0, &res);
324         if (error)
325                 goto fail;
326         sc->sc_ilr = res;
327         if (bootverbose && sc->sc_ilr != 0)
328                 device_printf(dev, "using interrupt latch register\n");
329
330         sc->sc_ires = bus_alloc_resource_any(dev, SYS_RES_IRQ, &sc->sc_irid,
331             RF_ACTIVE|RF_SHAREABLE);
332         if (sc->sc_ires != NULL) {
333                 error = bus_setup_intr(dev, sc->sc_ires,
334                     INTR_TYPE_TTY, puc_intr, NULL, sc, &sc->sc_icookie);
335                 if (error)
336                         error = bus_setup_intr(dev, sc->sc_ires,
337                             INTR_TYPE_TTY | INTR_MPSAFE, NULL,
338                             (driver_intr_t *)puc_intr, sc, &sc->sc_icookie);
339                 else
340                         sc->sc_fastintr = 1;
341
342                 if (error) {
343                         device_printf(dev, "could not activate interrupt\n");
344                         bus_release_resource(dev, SYS_RES_IRQ, sc->sc_irid,
345                             sc->sc_ires);
346                         sc->sc_ires = NULL;
347                 }
348         }
349         if (sc->sc_ires == NULL) {
350                 /* XXX no interrupt resource. Force polled mode. */
351                 sc->sc_polled = 1;
352         }
353
354         /* Probe and attach our children. */
355         for (idx = 0; idx < sc->sc_nports; idx++) {
356                 port = &sc->sc_port[idx];
357                 if (port->p_dev == NULL)
358                         continue;
359                 error = device_probe_and_attach(port->p_dev);
360                 if (error) {
361                         device_delete_child(dev, port->p_dev);
362                         port->p_dev = NULL;
363                 }
364         }
365
366         /*
367          * If there are no serdev devices, then our interrupt handler
368          * will do nothing. Tear it down.
369          */
370         if (sc->sc_serdevs == 0UL)
371                 bus_teardown_intr(dev, sc->sc_ires, sc->sc_icookie);
372
373         return (0);
374
375 fail:
376         for (idx = 0; idx < sc->sc_nports; idx++) {
377                 port = &sc->sc_port[idx];
378                 if (port->p_dev != NULL)
379                         device_delete_child(dev, port->p_dev);
380                 if (port->p_rres != NULL)
381                         rman_release_resource(port->p_rres);
382                 if (port->p_ires != NULL)
383                         rman_release_resource(port->p_ires);
384         }
385         for (idx = 0; idx < PUC_PCI_BARS; idx++) {
386                 bar = &sc->sc_bar[idx];
387                 if (bar->b_res != NULL)
388                         bus_release_resource(sc->sc_dev, bar->b_type,
389                             bar->b_rid, bar->b_res);
390         }
391         rman_fini(&sc->sc_irq);
392         free(__DECONST(void *, sc->sc_irq.rm_descr), M_PUC);
393         rman_fini(&sc->sc_iomem);
394         free(__DECONST(void *, sc->sc_iomem.rm_descr), M_PUC);
395         rman_fini(&sc->sc_ioport);
396         free(__DECONST(void *, sc->sc_ioport.rm_descr), M_PUC);
397         free(sc->sc_port, M_PUC);
398         return (error);
399 }
400
401 int
402 puc_bfe_detach(device_t dev)
403 {
404         struct puc_bar *bar;
405         struct puc_port *port;
406         struct puc_softc *sc;
407         int error, idx;
408
409         sc = device_get_softc(dev);
410
411         /* Detach our children. */
412         error = 0;
413         for (idx = 0; idx < sc->sc_nports; idx++) {
414                 port = &sc->sc_port[idx];
415                 if (port->p_dev == NULL)
416                         continue;
417                 if (device_detach(port->p_dev) == 0) {
418                         device_delete_child(dev, port->p_dev);
419                         if (port->p_rres != NULL)
420                                 rman_release_resource(port->p_rres);
421                         if (port->p_ires != NULL)
422                                 rman_release_resource(port->p_ires);
423                 } else
424                         error = ENXIO;
425         }
426         if (error)
427                 return (error);
428
429         if (sc->sc_serdevs != 0UL)
430                 bus_teardown_intr(dev, sc->sc_ires, sc->sc_icookie);
431         bus_release_resource(dev, SYS_RES_IRQ, sc->sc_irid, sc->sc_ires);
432
433         for (idx = 0; idx < PUC_PCI_BARS; idx++) {
434                 bar = &sc->sc_bar[idx];
435                 if (bar->b_res != NULL)
436                         bus_release_resource(sc->sc_dev, bar->b_type,
437                             bar->b_rid, bar->b_res);
438         }
439
440         rman_fini(&sc->sc_irq);
441         free(__DECONST(void *, sc->sc_irq.rm_descr), M_PUC);
442         rman_fini(&sc->sc_iomem);
443         free(__DECONST(void *, sc->sc_iomem.rm_descr), M_PUC);
444         rman_fini(&sc->sc_ioport);
445         free(__DECONST(void *, sc->sc_ioport.rm_descr), M_PUC);
446         free(sc->sc_port, M_PUC);
447         return (0);
448 }
449
450 int
451 puc_bfe_probe(device_t dev, const struct puc_cfg *cfg)
452 {
453         struct puc_softc *sc;
454         intptr_t res;
455         int error;
456
457         sc = device_get_softc(dev);
458         sc->sc_dev = dev;
459         sc->sc_cfg = cfg;
460
461         /* We don't attach to single-port serial cards. */
462         if (cfg->ports == PUC_PORT_1S || cfg->ports == PUC_PORT_1P)
463                 return (EDOOFUS);
464         error = puc_config(sc, PUC_CFG_GET_NPORTS, 0, &res);
465         if (error)
466                 return (error);
467         error = puc_config(sc, PUC_CFG_GET_DESC, 0, &res);
468         if (error)
469                 return (error);
470         if (res != 0)
471                 device_set_desc(dev, (const char *)res);
472         return (BUS_PROBE_DEFAULT);
473 }
474
475 struct resource *
476 puc_bus_alloc_resource(device_t dev, device_t child, int type, int *rid,
477     u_long start, u_long end, u_long count, u_int flags)
478 {
479         struct puc_port *port;
480         struct resource *res;
481         device_t assigned, originator;
482         int error;
483
484         /* Get our immediate child. */
485         originator = child;
486         while (child != NULL && device_get_parent(child) != dev)
487                 child = device_get_parent(child);
488         if (child == NULL)
489                 return (NULL);
490
491         port = device_get_ivars(child);
492         KASSERT(port != NULL, ("%s %d", __func__, __LINE__));
493
494         if (rid == NULL || *rid != 0)
495                 return (NULL);
496
497         /* We only support default allocations. */
498         if (start != 0UL || end != ~0UL)
499                 return (NULL);
500
501         if (type == port->p_bar->b_type)
502                 res = port->p_rres;
503         else if (type == SYS_RES_IRQ)
504                 res = port->p_ires;
505         else
506                 return (NULL);
507
508         if (res == NULL)
509                 return (NULL);
510
511         assigned = rman_get_device(res);
512         if (assigned == NULL)   /* Not allocated */
513                 rman_set_device(res, originator);
514         else if (assigned != originator)
515                 return (NULL);
516
517         if (flags & RF_ACTIVE) {
518                 error = rman_activate_resource(res);
519                 if (error) {
520                         if (assigned == NULL)
521                                 rman_set_device(res, NULL);
522                         return (NULL);
523                 }
524         }
525
526         return (res);
527 }
528
529 int
530 puc_bus_release_resource(device_t dev, device_t child, int type, int rid,
531     struct resource *res)
532 {
533         struct puc_port *port;
534         device_t originator;
535
536         /* Get our immediate child. */
537         originator = child;
538         while (child != NULL && device_get_parent(child) != dev)
539                 child = device_get_parent(child);
540         if (child == NULL)
541                 return (EINVAL);
542
543         port = device_get_ivars(child);
544         KASSERT(port != NULL, ("%s %d", __func__, __LINE__));
545
546         if (rid != 0 || res == NULL)
547                 return (EINVAL);
548
549         if (type == port->p_bar->b_type) {
550                 if (res != port->p_rres)
551                         return (EINVAL);
552         } else if (type == SYS_RES_IRQ) {
553                 if (res != port->p_ires)
554                         return (EINVAL);
555                 if (port->p_hasintr)
556                         return (EBUSY);
557         } else
558                 return (EINVAL);
559
560         if (rman_get_device(res) != originator)
561                 return (ENXIO);
562         if (rman_get_flags(res) & RF_ACTIVE)
563                 rman_deactivate_resource(res);
564         rman_set_device(res, NULL);
565         return (0);
566 }
567
568 int
569 puc_bus_get_resource(device_t dev, device_t child, int type, int rid,
570     u_long *startp, u_long *countp)
571 {
572         struct puc_port *port;
573         struct resource *res;
574         u_long start;
575
576         /* Get our immediate child. */
577         while (child != NULL && device_get_parent(child) != dev)
578                 child = device_get_parent(child);
579         if (child == NULL)
580                 return (EINVAL);
581
582         port = device_get_ivars(child);
583         KASSERT(port != NULL, ("%s %d", __func__, __LINE__));
584
585         if (type == port->p_bar->b_type)
586                 res = port->p_rres;
587         else if (type == SYS_RES_IRQ)
588                 res = port->p_ires;
589         else
590                 return (ENXIO);
591
592         if (rid != 0 || res == NULL)
593                 return (ENXIO);
594
595         start = rman_get_start(res);
596         if (startp != NULL)
597                 *startp = start;
598         if (countp != NULL)
599                 *countp = rman_get_end(res) - start + 1;
600         return (0);
601 }
602
603 int
604 puc_bus_setup_intr(device_t dev, device_t child, struct resource *res,
605     int flags, driver_filter_t *filt, void (*ihand)(void *), void *arg, void **cookiep)
606 {
607         struct puc_port *port;
608         struct puc_softc *sc;
609         device_t originator;
610         int i, isrc, serdev;
611
612         sc = device_get_softc(dev);
613
614         /* Get our immediate child. */
615         originator = child;
616         while (child != NULL && device_get_parent(child) != dev)
617                 child = device_get_parent(child);
618         if (child == NULL)
619                 return (EINVAL);
620
621         port = device_get_ivars(child);
622         KASSERT(port != NULL, ("%s %d", __func__, __LINE__));
623
624         if (cookiep == NULL || res != port->p_ires)
625                 return (EINVAL);
626         /* We demand that serdev devices use filter_only interrupts. */
627         if (port->p_type == PUC_TYPE_SERIAL && ihand != NULL)
628                 return (ENXIO);
629         if (rman_get_device(port->p_ires) != originator)
630                 return (ENXIO);
631
632         /*
633          * Have non-serdev ports handled by the bus implementation. It
634          * supports multiple handlers for a single interrupt as it is,
635          * so we wouldn't add value if we did it ourselves.
636          */
637         serdev = 0;
638         if (port->p_type == PUC_TYPE_SERIAL) {
639                 i = 0, isrc = SER_INT_OVERRUN;
640                 while (i < PUC_ISRCCNT) {
641                         port->p_ihsrc[i] = SERDEV_IHAND(originator, isrc);
642                         if (port->p_ihsrc[i] != NULL)
643                                 serdev = 1;
644                         i++, isrc <<= 1;
645                 }
646         }
647         if (!serdev)
648                 return (BUS_SETUP_INTR(device_get_parent(dev), originator,
649                     sc->sc_ires, flags, filt, ihand, arg, cookiep));
650
651         sc->sc_serdevs |= 1UL << (port->p_nr - 1);
652
653         port->p_hasintr = 1;
654         port->p_iharg = arg;
655
656         *cookiep = port;
657         return (0);
658 }
659
660 int
661 puc_bus_teardown_intr(device_t dev, device_t child, struct resource *res,
662     void *cookie)
663 {
664         struct puc_port *port;
665         struct puc_softc *sc;
666         device_t originator;
667         int i;
668
669         sc = device_get_softc(dev);
670
671         /* Get our immediate child. */
672         originator = child;
673         while (child != NULL && device_get_parent(child) != dev)
674                 child = device_get_parent(child);
675         if (child == NULL)
676                 return (EINVAL);
677
678         port = device_get_ivars(child);
679         KASSERT(port != NULL, ("%s %d", __func__, __LINE__));
680
681         if (res != port->p_ires)
682                 return (EINVAL);
683         if (rman_get_device(port->p_ires) != originator)
684                 return (ENXIO);
685
686         if (!port->p_hasintr)
687                 return (BUS_TEARDOWN_INTR(device_get_parent(dev), originator,
688                     sc->sc_ires, cookie));
689
690         if (cookie != port)
691                 return (EINVAL);
692
693         port->p_hasintr = 0;
694         port->p_iharg = NULL;
695
696         for (i = 0; i < PUC_ISRCCNT; i++)
697                 port->p_ihsrc[i] = NULL;
698
699         return (0);
700 }
701
702 int
703 puc_bus_read_ivar(device_t dev, device_t child, int index, uintptr_t *result)
704 {
705         struct puc_port *port;
706
707         /* Get our immediate child. */
708         while (child != NULL && device_get_parent(child) != dev)
709                 child = device_get_parent(child);
710         if (child == NULL)
711                 return (EINVAL);
712
713         port = device_get_ivars(child);
714         KASSERT(port != NULL, ("%s %d", __func__, __LINE__));
715
716         if (result == NULL)
717                 return (EINVAL);
718
719         switch(index) {
720         case PUC_IVAR_CLOCK:
721                 *result = port->p_rclk;
722                 break;
723         case PUC_IVAR_TYPE:
724                 *result = port->p_type;
725                 break;
726         default:
727                 return (ENOENT);
728         }
729         return (0);
730 }
731
732 int
733 puc_bus_print_child(device_t dev, device_t child)
734 {
735         struct puc_port *port;
736         int retval;
737
738         port = device_get_ivars(child);
739         retval = 0;
740
741         retval += bus_print_child_header(dev, child);
742         retval += printf(" at port %d", port->p_nr);
743         retval += bus_print_child_footer(dev, child);
744
745         return (retval);
746 }
747
748 int
749 puc_bus_child_location_str(device_t dev, device_t child, char *buf,
750     size_t buflen)
751 {
752         struct puc_port *port;
753
754         port = device_get_ivars(child);
755         snprintf(buf, buflen, "port=%d", port->p_nr);
756         return (0);
757 }
758
759 int
760 puc_bus_child_pnpinfo_str(device_t dev, device_t child, char *buf,
761     size_t buflen)
762 {
763         struct puc_port *port;
764
765         port = device_get_ivars(child);
766         snprintf(buf, buflen, "type=%d", port->p_type);
767         return (0);
768 }