1 /* $NetBSD: ym_acpi.c,v 1.16 2019/05/08 13:40:17 isaki Exp $ */
2 
3 /*
4  * Copyright (c) 2006 Jasper Wallace <jasper@pointless.net>
5  * All rights reserved.
6  *
7  * Copyright (c) 2002 Jared D. McNeill <jmcneill@invisible.ca>
8  * All rights reserved.
9  *
10  * Redistribution and use in source and binary forms, with or without
11  * modification, are permitted provided that the following conditions
12  * are met:
13  * 1. Redistributions of source code must retain the above copyright
14  *    notice, this list of conditions and the following disclaimer.
15  * 2. The name of the author may not be used to endorse or promote products
16  *    derived from this software without specific prior written permission.
17  *
18  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
19  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
20  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
21  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
22  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING,
23  * BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
24  * LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED
25  * AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
26  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
27  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
28  * SUCH DAMAGE.
29  */
30 
31 #include <sys/cdefs.h>
32 __KERNEL_RCSID(0, "$NetBSD: ym_acpi.c,v 1.16 2019/05/08 13:40:17 isaki Exp $");
33 
34 #include <sys/param.h>
35 #include <sys/systm.h>
36 
37 #include <dev/acpi/acpivar.h>
38 
39 #include <dev/audio/audio_if.h>
40 
41 #include <dev/ic/ad1848reg.h>
42 #include <dev/ic/opl3sa3reg.h>
43 
44 #include <dev/isa/ad1848var.h>
45 #include <dev/isa/wssreg.h>
46 #include <dev/isa/ymvar.h>
47 
48 
49 static int          ym_acpi_match(device_t, cfdata_t, void *);
50 static void         ym_acpi_attach(device_t, device_t, void *);
51 
52 CFATTACH_DECL_NEW(ym_acpi, sizeof(struct ym_softc), ym_acpi_match,
53     ym_acpi_attach, NULL, NULL);
54 
55 /*
56  * ym_acpi_match: autoconf(9) match routine
57  */
58 static int
ym_acpi_match(device_t parent,cfdata_t match,void * aux)59 ym_acpi_match(device_t parent, cfdata_t match, void *aux)
60 {
61           struct acpi_attach_args *aa = aux;
62 
63           if (aa->aa_node->ad_type != ACPI_TYPE_DEVICE)
64                     return 0;
65           if (!(aa->aa_node->ad_devinfo->Valid & ACPI_VALID_HID))
66                     return 0;
67           if (!aa->aa_node->ad_devinfo->HardwareId.String)
68                     return 0;
69           /* Yamaha OPL3-SA2 or OPL3-SA3 */
70           if (strcmp("YMH0021", aa->aa_node->ad_devinfo->HardwareId.String))
71                     return 0;
72 
73           return 1;
74 }
75 
76 /*
77  * ym_acpi_attach: autoconf(9) attach routine
78  */
79 static void
ym_acpi_attach(device_t parent,device_t self,void * aux)80 ym_acpi_attach(device_t parent, device_t self, void *aux)
81 {
82           struct ym_softc *sc = device_private(self);
83           struct acpi_attach_args *aa = aux;
84           struct acpi_resources res;
85           struct acpi_io *sb_io, *codec_io, *opl_io, *control_io;
86 #if NMPU_YM > 0
87           struct acpi_io *mpu_io;
88 #endif
89           struct acpi_irq *irq;
90           struct acpi_drq *playdrq, *recdrq;
91           struct ad1848_softc *ac = &sc->sc_ad1848.sc_ad1848;
92           ACPI_STATUS rv;
93 
94           ac->sc_dev = self;
95           /* Parse our resources */
96           rv = acpi_resource_parse(self,
97               aa->aa_node->ad_handle, "_CRS", &res,
98               &acpi_resource_parse_ops_default);
99           if (ACPI_FAILURE(rv))
100                     return;
101 
102           /*
103            * sc_sb_ioh         @ 0
104            * sc_ioh  @ 1
105            * sc_opl_ioh        @ 2
106            * sc_mpu_ioh        @ 3
107            * sc_controlioh @ 4
108            */
109 
110           /* Find and map our i/o registers */
111           sc->sc_iot = aa->aa_iot;
112           sb_io      = acpi_res_io(&res, 0);
113           codec_io = acpi_res_io(&res, 1);
114           opl_io     = acpi_res_io(&res, 2);
115 #if NMPU_YM > 0
116           mpu_io     = acpi_res_io(&res, 3);
117 #endif
118           control_io = acpi_res_io(&res, 4);
119 
120           if (sb_io == NULL || codec_io == NULL || opl_io == NULL ||
121 #if NMPU_YM > 0
122               mpu_io == NULL ||
123 #endif
124               control_io == NULL) {
125                     aprint_error_dev(self,
126                         "unable to find i/o registers resource\n");
127                     goto out;
128           }
129           if (bus_space_map(sc->sc_iot, sb_io->ar_base, sb_io->ar_length,
130               0, &sc->sc_sb_ioh) != 0) {
131                     aprint_error_dev(self, "unable to map i/o registers (sb)\n");
132                     goto out;
133           }
134           if (bus_space_map(sc->sc_iot, codec_io->ar_base, codec_io->ar_length,
135               0, &sc->sc_ioh) != 0) {
136                     aprint_error_dev(self, "unable to map i/o registers (codec)\n");
137                     goto out;
138           }
139           if (bus_space_map(sc->sc_iot, opl_io->ar_base, opl_io->ar_length,
140               0, &sc->sc_opl_ioh) != 0) {
141                     aprint_error_dev(self, "unable to map i/o registers (opl)\n");
142                     goto out;
143           }
144 #if NMPU_YM > 0
145           if (bus_space_map(sc->sc_iot, mpu_io->ar_base, mpu_io->ar_length,
146               0, &sc->sc_mpu_ioh) != 0) {
147                     aprint_error_dev(self, "unable to map i/o registers (mpu)\n");
148                     goto out;
149           }
150 #endif
151           if (bus_space_map(sc->sc_iot, control_io->ar_base,
152               control_io->ar_length, 0, &sc->sc_controlioh) != 0) {
153                     aprint_error_dev(self,
154                         "unable to map i/o registers (control)\n");
155                     goto out;
156           }
157 
158           sc->sc_ic = aa->aa_ic;
159 
160           /* Find our IRQ */
161           irq = acpi_res_irq(&res, 0);
162           if (irq == NULL) {
163                     aprint_error_dev(self, "unable to find irq resource\n");
164                     /* XXX bus_space_unmap */
165                     goto out;
166           }
167           sc->ym_irq = irq->ar_irq;
168 
169           /* Find our playback and record DRQs */
170           playdrq = acpi_res_drq(&res, 0);
171           recdrq = acpi_res_drq(&res, 1);
172           if (playdrq == NULL) {
173                     aprint_error_dev(self, "unable to find drq resources\n");
174                     /* XXX bus_space_unmap */
175                     goto out;
176           }
177           if (recdrq == NULL) {
178                     /* half-duplex mode */
179                     sc->ym_recdrq = sc->ym_playdrq = playdrq->ar_drq;
180           } else {
181                     sc->ym_playdrq = playdrq->ar_drq;
182                     sc->ym_recdrq = recdrq->ar_drq;
183           }
184 
185           ac->sc_iot = sc->sc_iot;
186           if (bus_space_subregion(sc->sc_iot, sc->sc_ioh, WSS_CODEC,
187               AD1848_NPORT, &ac->sc_ioh)) {
188                     aprint_error_dev(self, "bus_space_subregion failed\n");
189                     /* XXX cleanup */
190                     goto out;
191           }
192 
193           aprint_normal_dev(self, "");
194 
195           ac->mode = 2;
196           ac->MCE_bit = MODE_CHANGE_ENABLE;
197 
198           sc->sc_ad1848.sc_ic = sc->sc_ic;
199 
200           /* Attach our ym device */
201           ym_attach(sc);
202 
203  out:
204           acpi_resource_cleanup(&res);
205 }
206